scandalicious.qsrc 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221
  1. # scandalicious
  2. if $ARGS[0] = 'start':
  3. $loc = 'scandalicious'
  4. $loc_arg = 'start'
  5. $location_type = 'public_indoors'
  6. cls
  7. menu_off = 0
  8. gs 'stat'
  9. gs 'themes', 'indoors'
  10. '<center><b><font color="maroon">Scandalicious</font></b></center>'
  11. '<center><img src="images/locations/city/citycenter/mall/scandalicious/shop.jpg"></center>'
  12. *nl
  13. 'This store is cheap and tacky. The clothing lives up to the name though and you assume they saved a lot of money on fabric.
  14. It''s not somewhere you''d go with your Mom or let her know you''d even looked in the window but if you want to show off your body there is nowhere better to shop. The staff aren''t judging anyone so it feels relaxed but there is still a mix of those hiding their embarrassment and those exuding confidence.'
  15. *nl
  16. act 'Leave':
  17. cla
  18. minut += 3
  19. gt 'torgcentr'
  20. end
  21. act 'View clothing':
  22. minut += 5
  23. gt 'scandalicious', 'clothes'
  24. end
  25. act 'View dresses':
  26. minut += 5
  27. gt 'scandalicious', 'dresses'
  28. end
  29. act 'View swimsuits':
  30. cla
  31. minut += 5
  32. gt 'scandalicious', 'swim'
  33. end
  34. act 'View bikinis':
  35. cla
  36. minut += 5
  37. gt 'scandalicious', 'bikinis'
  38. end
  39. end
  40. if $ARGS[0] = 'clothes':
  41. $loc_arg = 'clothes'
  42. $loc = 'scandalicious'
  43. $menu_loc = 'scandalicious'
  44. $menu_arg = 'clothes'
  45. menu_off = 0
  46. *clr & cla
  47. gs'stat'
  48. '<center><b><font color="maroon">Viewing Scandalicious outfits</font></b></center>'
  49. *nl
  50. gs 'clothing_QV', 'shop_header'
  51. act 'Return':
  52. cla
  53. minut += 1
  54. gt 'scandalicious', 'start'
  55. end
  56. clothingfilter['qualitycheck'] = 7
  57. :loopquality
  58. i = 1
  59. :loopscandalicious_outfits
  60. if scandalicious_outfits[i] = 0:
  61. gs 'clothing_attributes', 'scandalicious_outfits', i
  62. gs 'clothing_QV', 'shop_filter'
  63. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  64. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''scandalicious'', ''scandalicious_outfits''"><img src="images/pc/items/scandalicious/outfits/<<i>>.jpg" height="250" /></a>'
  65. end
  66. end
  67. i += 1
  68. if i <= 20:jump 'loopscandalicious_outfits'
  69. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
  70. end
  71. if $ARGS[0] = 'scandalicious_outfits':
  72. cla
  73. menu_off = 1
  74. if scandalicious_outfits[i] ! 0:
  75. msg 'You already own these clothes.'
  76. gt 'scandalicious', 'clothes'
  77. end
  78. gt 'clothing', 'view_clothing_item', 'shop', 'scandalicious_outfits',i, 1500
  79. end
  80. if $ARGS[0] = 'dresses':
  81. $loc_arg = 'dresses'
  82. $loc = 'scandalicious'
  83. $menu_loc = 'scandalicious'
  84. $menu_arg = 'dresses'
  85. menu_off = 0
  86. *clr & cla
  87. gs'stat'
  88. '<center><b><font color="maroon">Viewing Scandalicious dresses</font></b></center>'
  89. *nl
  90. gs 'clothing_QV', 'shop_header'
  91. act 'Return':
  92. cla
  93. minut += 1
  94. gt 'scandalicious', 'start'
  95. end
  96. clothingfilter['qualitycheck'] = 7
  97. :loopquality1
  98. i = 1
  99. :loopscandalicious_dress
  100. if scandalicious_dress[i] = 0:
  101. gs 'clothing_attributes', 'scandalicious_dress', i
  102. gs 'clothing_QV', 'shop_filter'
  103. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  104. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''scandalicious'', ''scandalicious_dress''"><img src="images/pc/items/scandalicious/dress/<<i>>.jpg" height="250" /></a>'
  105. end
  106. end
  107. i += 1
  108. if i <= 50:jump 'loopscandalicious_dress'
  109. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality1'
  110. end
  111. if $ARGS[0] = 'scandalicious_dress':
  112. cla
  113. menu_off = 1
  114. if scandalicious_dress[i] ! 0:
  115. msg 'You already own this dress.'
  116. gt 'scandalicious', 'dresses'
  117. end
  118. gt 'clothing', 'view_clothing_item', 'shop', 'scandalicious_dress',i, 1500
  119. end
  120. if $ARGS[0] = 'swim':
  121. $loc_arg = 'swim'
  122. $loc = 'scandalicious'
  123. cls
  124. gs'stat'
  125. '<center><b><font color="maroon">Swimsuits - one size fits all</font></b></center>'
  126. *nl
  127. gs 'clothing_QV', 'shop_header'
  128. act 'Return':
  129. cla
  130. minut += 1
  131. gt 'scandalicious', 'start'
  132. end
  133. clothingfilter['qualitycheck'] = 7
  134. :loopquality2
  135. i = 1
  136. :loopscandalicious_swimsuit
  137. if scandalicious_swimsuit[i] = 0:
  138. gs 'clothing_attributes', 'scandalicious_swimsuit', i
  139. gs 'clothing_QV', 'shop_filter'
  140. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  141. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''scandalicious'', ''swim1''"><img src="images/pc/items/scandalicious/swim/one/<<i>>.jpg" height="250" /></a>'
  142. end
  143. end
  144. i += 1
  145. if i <= 40:jump 'loopscandalicious_swimsuit'
  146. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality2'
  147. end
  148. if $ARGS[0] = 'swim1': gt 'clothing', 'view_clothing_item', 'shop', 'scandalicious_swimsuit',i, 1750
  149. if $ARGS[0] = 'bikinis':
  150. $loc_arg = 'bikinis'
  151. $loc = 'scandalicious'
  152. cls
  153. gs'stat'
  154. '<center><b><font color="maroon">Bikinis - one size fits all</font></b></center>'
  155. *nl
  156. gs 'clothing_QV', 'shop_header'
  157. act 'Return':
  158. cla
  159. minut += 1
  160. gt 'scandalicious', 'start'
  161. end
  162. clothingfilter['qualitycheck'] = 7
  163. :loopquality3
  164. i = 1
  165. :loopscandalicious_bikinis
  166. if scandalicious_bikinis[i] = 0:
  167. gs 'clothing_attributes', 'scandalicious_bikinis', i
  168. gs 'clothing_QV', 'shop_filter'
  169. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  170. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''scandalicious'', ''bikini1''"><img src="images/pc/items/scandalicious/swim/two/<<i>>.jpg" height="250" /></a>'
  171. end
  172. end
  173. i += 1
  174. if i <= 70:jump 'loopscandalicious_bikinis'
  175. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality3'
  176. end
  177. if $ARGS[0] = 'bikini1': gt 'clothing', 'view_clothing_item', 'shop', 'scandalicious_bikinis',i, 1750
  178. --- scandalicious ---------------------------------