NewCloShop 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  1. # NewCloShop
  2. $location_type = 'event'
  3. if $ARGS[0] = 'start':
  4. $metka = 'start'
  5. $loc = 'NewCloShop'
  6. gs 'stat'
  7. if night_mode = 1:
  8. fcolor = rgb(255, 255, 255)
  9. bcolor = rgb(0, 0, 0)
  10. lcolor = rgb(106, 90, 205)
  11. else
  12. fcolor = rgb(0, 0, 0)
  13. bcolor = rgb(255, 255, 255)
  14. lcolor = rgb(106, 90, 205)
  15. end
  16. '<center><b><font color="maroon">Fashionista</font></b></center>'
  17. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/fashinista.jpg"</center>'
  18. 'This shop features many big name brands and designer clothing. Even their bags look cool.'
  19. act 'View Clothing': gt 'NewCloShop', 'clothes'
  20. act 'View panties': gt 'NewCloShop', 'panties'
  21. act 'Leave':
  22. minut += 15
  23. view
  24. gt 'torgcentr'
  25. end
  26. end
  27. if $ARGS[0] = 'clothes':
  28. $metka = 'clothes'
  29. $loc = 'NewCloShop'
  30. cls
  31. gs'stat'
  32. act 'Return':
  33. cla
  34. minut += 5
  35. gt 'NewCloShop', 'start'
  36. end
  37. i = Clothingstock +1
  38. if Clothingstock - 12 > 0:i -= 12
  39. :loopexpensive
  40. if expensive[i] = 0:*p '<a href="exec: i = <<i>> & gt ''NewCloShop'', ''shmotmag''"><img src="images/pc/clothing/3expensive/<<i>>.jpg" height="250" /></a>'
  41. i += 12
  42. if i <= 425:jump 'loopexpensive'
  43. end
  44. if $ARGS[0] = 'shmotmag':
  45. cla
  46. if expensive[i] ! 0:
  47. msg 'You already own these clothes.'
  48. gt 'NewCloShop', 'clothes'
  49. end
  50. gt 'clothing', 'view_clothing_item', 'shop', 'expensive',i, 10000
  51. end
  52. if $ARGS[0] = 'panties':
  53. $metka = 'panties'
  54. $loc = 'NewCloShop'
  55. cls
  56. gs'stat'
  57. act 'Return':
  58. cla
  59. minut += 5
  60. gt 'NewCloShop', 'start'
  61. end
  62. i = 1
  63. :loopfashionista_panties
  64. if fashionista_panties[i] = 0:*p '<a href="exec: i = <<i>> & gt ''NewCloShop'', ''panties2''"><img src="images/pc/panties/fashionista/<<i>>.jpg" height="150" /></a> '
  65. i += 1
  66. if i <= 70:jump 'loopfashionista_panties'
  67. end
  68. if $ARGS[0] = 'panties2':
  69. cla
  70. if fashionista_panties[i] ! 0:
  71. msg 'You already own these panties.'
  72. gt 'NewCloShop', 'panties'
  73. end
  74. gt 'panties', 'view_panty_item', 'shop', 'fashionista',i, 750
  75. end
  76. --- NewCloShop ---------------------------------