shop_flamingos.qsrc 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153
  1. # shop_flamingos
  2. if $ARGS[0] = 'start':
  3. $loc_arg = $ARGS[0]
  4. $loc = 'shop_flamingos'
  5. $location_type = 'public_indoors'
  6. $menu_loc = 'shop_flamingos'
  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">Flamingo''s</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/locations/city/island/flamingos/shop.jpg"></center>'
  15. *nl
  16. 'Flamingos is trendy and modern while still keeping the prices low enough for the large student population on the Island. It mimics the latest fashions for young adults but cuts costs on material and manufacturing. This suits the clients who are likely to grow bored of an outfit before it falls apart and that''s why its always busy.'
  17. act 'Leave the flamingos': minut += 3 & gt 'liames'
  18. act 'View dresses': minut += 5 & gt 'shop_flamingos', 'dresses'
  19. act 'View other clothing': minut += 5 & gt 'shop_flamingos', 'clothes'
  20. act 'View purses': minut += 5 & gt 'shop_flamingos', 'purses'
  21. end
  22. if $ARGS[0] = 'dresses':
  23. $loc_arg = 'dresses'
  24. $loc = 'shop_flamingos'
  25. $menu_loc = 'shop_flamingos'
  26. $menu_arg = 'dresses'
  27. menu_off = 0
  28. *clr & cla
  29. gs'stat'
  30. '<center><b><font color="maroon">Viewing Flamingo''s dresses</font></b></center>'
  31. *nl
  32. gs 'clothing_QV', 'shop_header'
  33. act 'Return': minut += 1 & gt 'shop_flamingos', 'start'
  34. clothingfilter['qualitycheck'] = 7
  35. :loopquality_dress
  36. if Clothingstock > 11:
  37. i = 1
  38. else
  39. i = 2
  40. end
  41. :loopflamingos_dress
  42. if flamingos_dress[i] = 0:
  43. gs 'clothing_attributes', 'flamingos_dress', i
  44. gs 'clothing_QV', 'shop_filter'
  45. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  46. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''shop_flamingos'', ''flamingos_dress''"><img src="images/pc/items/flamingos/dress/<<i>>.jpg" height="250" /></a>'
  47. end
  48. end
  49. i += 2
  50. if i <= 90:jump 'loopflamingos_dress'
  51. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_dress'
  52. end
  53. if $ARGS[0] = 'flamingos_dress':
  54. cla
  55. menu_off = 1
  56. if flamingos_dress[i] ! 0:
  57. msg 'You already own this dress.'
  58. gt 'shop_flamingos', 'dresses'
  59. end
  60. gt 'clothing', 'view_clothing_item', 'shop', 'flamingos_dress',i, 3000
  61. end
  62. if $ARGS[0] = 'clothes':
  63. $loc_arg = 'clothes'
  64. $loc = 'shop_flamingos'
  65. $menu_loc = 'shop_flamingos'
  66. $menu_arg = 'clothes'
  67. menu_off = 0
  68. *clr & cla
  69. gs'stat'
  70. '<center><b><font color="maroon">Viewing Flamingo''s outfits</font></b></center>'
  71. *nl
  72. gs 'clothing_QV', 'shop_header'
  73. act 'Return': minut += 1 & gt 'shop_flamingos', 'start'
  74. clothingfilter['qualitycheck'] = 7
  75. :loopquality
  76. if Clothingstock > 11:
  77. i = 1
  78. else
  79. i = 2
  80. end
  81. :loopflamingos
  82. if flamingos_outfits[i] = 0:
  83. gs 'clothing_attributes', 'flamingos_outfits', i
  84. gs 'clothing_QV', 'shop_filter'
  85. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  86. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''shop_flamingos'', ''flamingos_outfits''"><img src="images/pc/items/flamingos/outfits/<<i>>.jpg" height="250" /></a>'
  87. end
  88. end
  89. i += 2
  90. if i <= 50:jump 'loopflamingos'
  91. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
  92. end
  93. if $ARGS[0] = 'flamingos_outfits':
  94. cla
  95. menu_off = 1
  96. if flamingos_outfits[i] ! 0:
  97. msg 'You already own this outfit.'
  98. gt 'shop_flamingos', 'clothes'
  99. end
  100. gt 'clothing', 'view_clothing_item', 'shop', 'flamingos_outfits',i, 3000
  101. end
  102. if $ARGS[0] = 'purses':
  103. $loc_arg = 'purses'
  104. $loc = 'shop_flamingos'
  105. $menu_arg = 'purses'
  106. $menu_loc = 'shop_flamingos'
  107. menu_off = 0
  108. *clr & cla
  109. gs'stat'
  110. act 'Return':
  111. cla
  112. minut += 5
  113. gt 'shop_flamingos', 'start'
  114. end
  115. i = 1
  116. :loopflamingos_purses
  117. if flamingos_purses[i] = 0:*p '<a href="exec: i = <<i>> & gt ''shop_flamingos'', ''purses2''"><img src="images/pc/items/flamingos/purses/<<i>>.jpg" height="250" /></a>'
  118. i += 1
  119. if i <= 20:jump 'loopflamingos_purses'
  120. end
  121. if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'flamingos',i, 2000
  122. --- shop_flamingos ---------------------------------