shop_flamingos.qsrc 3.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126
  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 'city_island'
  18. act 'View dresses': minut += 5 & gt 'shop_flamingos', 'dresses'
  19. act 'View other clothing': minut += 5 & gt 'shop_flamingos', 'clothes'
  20. end
  21. if $ARGS[0] = 'dresses':
  22. $loc_arg = 'dresses'
  23. $loc = 'shop_flamingos'
  24. $menu_loc = 'shop_flamingos'
  25. $menu_arg = 'dresses'
  26. menu_off = 0
  27. *clr & cla
  28. gs'stat'
  29. '<center><b><font color="maroon">Viewing Flamingo''s dresses</font></b></center>'
  30. *nl
  31. gs 'clothing_QV', 'shop_header'
  32. act 'Return': minut += 1 & gt 'shop_flamingos', 'start'
  33. clothingfilter['qualitycheck'] = 7
  34. :loopquality_dress
  35. if Clothingstock > 11:
  36. i = 1
  37. else
  38. i = 2
  39. end
  40. :loopflamingos_dress
  41. if flamingos_dress[i] = 0:
  42. gs 'clothing_attributes', 'flamingos_dress', i
  43. gs 'clothing_QV', 'shop_filter'
  44. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  45. 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/clothing/flamingos_dress/<<i>>.jpg" height="250" /></a>'
  46. end
  47. end
  48. i += 2
  49. if i <= 185:jump 'loopflamingos_dress'
  50. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_dress'
  51. end
  52. if $ARGS[0] = 'flamingos_dress':
  53. cla
  54. menu_off = 1
  55. if flamingos[i] ! 0:
  56. msg 'You already own this dress.'
  57. gt 'shop_flamingos', 'dresses'
  58. end
  59. gt 'clothing', 'view_clothing_item', 'shop', 'flamingos_dress',i, 20000
  60. end
  61. if $ARGS[0] = 'clothes':
  62. $loc_arg = 'clothes'
  63. $loc = 'shop_flamingos'
  64. $menu_loc = 'shop_flamingos'
  65. $menu_arg = 'clothes'
  66. menu_off = 0
  67. *clr & cla
  68. gs'stat'
  69. '<center><b><font color="maroon">Viewing Flamingo''s outfits</font></b></center>'
  70. *nl
  71. gs 'clothing_QV', 'shop_header'
  72. act 'Return': minut += 1 & gt 'shop_flamingos', 'start'
  73. clothingfilter['qualitycheck'] = 7
  74. :loopquality
  75. if Clothingstock > 11:
  76. i = 1
  77. else
  78. i = 2
  79. end
  80. :loopflamingos
  81. if flamingos_outfit[i] = 0:
  82. gs 'clothing_attributes', 'flamingos_outfit', i
  83. gs 'clothing_QV', 'shop_filter'
  84. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  85. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''shop_flamingos'', ''flamingos_outfit''"><img src="images/pc/clothing/flamingos_outfit/<<i>>.jpg" height="250" /></a>'
  86. end
  87. end
  88. i += 2
  89. if i <= 185:jump 'loopflamingos'
  90. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
  91. end
  92. if $ARGS[0] = 'flamingos_outfit':
  93. cla
  94. menu_off = 1
  95. if flamingos[i] ! 0:
  96. msg 'You already own this outfit.'
  97. gt 'shop_flamingos', 'clothes'
  98. end
  99. gt 'clothing', 'view_clothing_item', 'shop', 'flamingos_outfit',i, 20000
  100. end
  101. --- shop_flamingos ---------------------------------