lusso.qsrc 2.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. # lusso
  2. if $ARGS[0] = 'start':
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $location_type = 'public_indoors'
  6. $menu_loc = 'lusso'
  7. $menu_arg = 'start'
  8. menu_off = 0
  9. *clr & cla
  10. mag = 1
  11. gs 'stat'
  12. gs 'themes', 'indoors'
  13. '<center><b><font color="maroon">Lusso Intimo</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/lusso/lusso.jpg"></center>'
  15. *nl
  16. 'The décor is bright and modern the flowers are real and the dressers made with expensive woods.'
  17. 'This is clearly a high end underwear shop. Just knowing you are wearing these will make you stand out more and they will feel so nice you might never want to go back to wearing the cheap ill fitting underwear you used to have to put up with. That is of course assuming you can afford the prices here.'
  18. act 'View panties': minut += 5 & gt 'lusso', 'panties'
  19. act 'View bras': minut += 5 & gt 'lusso', 'bras'
  20. end
  21. if $ARGS[0] = 'panties':
  22. $metka = 'panties'
  23. $loc = 'lusso'
  24. $menu_loc = 'lusso'
  25. $menu_arg = 'panties'
  26. menu_off = 0
  27. *clr & cla
  28. gs'stat'
  29. act 'Return': minut += 1 & gt 'lusso', 'start'
  30. i = 1
  31. :loopboutique_panties
  32. if boutique_panties[i] = 0:*p '<a href="exec: i = <<i>> & gt ''lusso'', ''panties2''"><img src="images/pc/panties/boutique/<<i>>.jpg" height="150" /></a> '
  33. i += 1
  34. if i <= 82:jump 'loopboutique_panties'
  35. end
  36. if $ARGS[0] = 'panties2':
  37. cla
  38. menu_off = 1
  39. if boutique_panties[i] ! 0:
  40. msg 'You already own these panties.'
  41. gt 'lusso', 'panties'
  42. end
  43. gt 'panties', 'view_panty_item', 'shop', 'boutique',i, 1000
  44. end
  45. if $ARGS[0] = 'bras':
  46. $metka = 'bras'
  47. $loc = 'lusso'
  48. $menu_loc = 'lusso'
  49. $menu_arg = 'bras'
  50. menu_off = 0
  51. *clr & cla
  52. gs'stat'
  53. act 'Return': minut += 1 & gt 'lusso', 'start'
  54. i = 1
  55. :loopboutique_bras
  56. if boutique_bras[i] = 0:*p '<a href="exec: i = <<i>> & gt ''lusso'', ''bras2''"><img src="images/pc/bras/boutique/<<i>>.jpg" height="150" /></a> '
  57. i += 1
  58. if i <= 33:jump 'loopboutique_bras'
  59. end
  60. if $ARGS[0] = 'bras2':
  61. cla
  62. menu_off = 1
  63. if boutique_bras[i] ! 0:
  64. msg 'You already own these bras.'
  65. gt 'lusso', 'bras'
  66. end
  67. gt 'bras', 'view_bra_item', 'shop', 'boutique',i, 1000
  68. end
  69. --- lusso ---------------------------------