shop_coco_carmen.qsrc 2.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798
  1. # shop_coco_carmen
  2. if $ARGS[0] = 'start':
  3. $loc_arg = $ARGS[0]
  4. $loc = 'shop_coco_carmen'
  5. $location_type = 'public_indoors'
  6. $menu_loc = 'shop_coco_carmen'
  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">Coco Carmen</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/coco/shop.jpg"></center>'
  15. *nl
  16. 'If you are happy to push through the tourists Coco has everything a young adult might like to wear. Its a step up from G&M and unless you can afford the boutiques in Old Town you''ll be spending some time buying outfits here.'
  17. act 'Leave the coco': minut += 3 & gt 'pav_commercial'
  18. act 'View clothing': minut += 5 & gt 'shop_coco_carmen', 'clothes'
  19. end
  20. if $ARGS[0] = 'clothes':
  21. $loc_arg = 'clothes'
  22. $loc = 'shop_coco_carmen'
  23. $menu_loc = 'shop_coco_carmen'
  24. $menu_arg = 'clothes'
  25. menu_off = 0
  26. *clr & cla
  27. gs'stat'
  28. '<center><b><font color="maroon">Viewing Coco Carmen outfits</font></b></center>'
  29. *nl
  30. gs 'clothing_QV', 'shop_header'
  31. act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
  32. clothingfilter['qualitycheck'] = 7
  33. :loopquality
  34. if Clothingstock > 11:
  35. i = 1
  36. else
  37. i = 2
  38. end
  39. :loopcoco
  40. if coco[i] = 0:
  41. gs 'clothing_attributes', 'coco', i
  42. gs 'clothing_QV', 'shop_filter'
  43. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  44. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''shop_coco_carmen'', ''coco''"><img src="images/pc/clothing/coco/<<i>>.jpg" height="250" /></a>'
  45. end
  46. end
  47. i += 2
  48. if i <= 185:jump 'loopcoco'
  49. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
  50. end
  51. if $ARGS[0] = 'coco':
  52. cla
  53. menu_off = 1
  54. if coco[i] ! 0:
  55. msg 'You already own these clothes.'
  56. gt 'shop_coco_carmen', 'clothes'
  57. end
  58. gt 'clothing', 'view_clothing_item', 'shop', 'coco',i, 20000
  59. end
  60. if $ARGS[0] = 'shoes':
  61. $loc_arg = $ARGS[0]
  62. $loc = 'shop_coco_carmen'
  63. $menu_loc = 'shop_coco_carmen'
  64. $menu_arg = 'shoes'
  65. menu_off = 0
  66. *clr & cla
  67. gs'stat'
  68. act 'Return': minut += 1 & gt 'shop_coco_carmen', 'start'
  69. if Clothingstock > 11:
  70. i = 1
  71. else
  72. i = 2
  73. end
  74. :loopcoco_shoes
  75. if scoco[i] = 0:*p '<a href="exec: i = <<i>> & gt ''shop_coco_carmen'', ''coco_shoes''"><img src="images/pc/shoes/coco/<<i>>.jpg" height="250" /></a>'
  76. i += 2
  77. if i <= 37:jump 'loopcoco_shoes'
  78. end
  79. --- shop_coco_carmen ---------------------------------