1
0

exhibitionistshop.qsrc 3.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161
  1. # exhibitionistshop
  2. if $ARGS[0] = 'start':
  3. CLOSE ALL
  4. $loc = 'exhibitionistshop'
  5. $metka = 'start'
  6. $location_type = 'public_indoors'
  7. cls
  8. minut += 5
  9. if exhibitionQW = 3: exhibitionQW = 4
  10. gs 'stat'
  11. if night_mode = 1:
  12. fcolor = rgb(255, 255, 255)
  13. bcolor = rgb(0, 0, 0)
  14. lcolor = rgb(106, 90, 205)
  15. else
  16. fcolor = rgb(0, 0, 0)
  17. bcolor = rgb(255, 255, 255)
  18. lcolor = rgb(106, 90, 205)
  19. end
  20. '<center><b><font color="maroon">Exhibitionist Shop</font></b></center>'
  21. '<center><img <<$set_imgh>> src="images/locations/oldtown/exhibitshop/shop.jpg"></center>'
  22. 'A shop in the most modern style who''s clothing is all very revealing and not nearly as classy as the store itself.'
  23. act 'Leave':
  24. minut += 5
  25. gt 'liames'
  26. end
  27. act 'View clothing':
  28. minut += 1
  29. gt 'exhibitionistshop', 'clo'
  30. end
  31. act 'View panties':
  32. minut += 1
  33. gt 'exhibitionistshop', 'panties'
  34. end
  35. act 'View bras':
  36. minut += 1
  37. gt 'exhibitionistshop', 'bras'
  38. end
  39. end
  40. if $ARGS[0] = 'clo':
  41. $metka = 'clo'
  42. $loc = 'exhibitionistshop'
  43. cls
  44. gs'stat'
  45. '<center><b><font color="maroon">Exhibitionist clothing</font></b></center>'
  46. *nl
  47. gs 'clothing_QV', 'shop_header'
  48. act 'Return':
  49. cla
  50. minut += 5
  51. gt 'exhibitionistshop', 'start'
  52. end
  53. if Clothingstock >= 18:
  54. i = 1
  55. elseif Clothingstock >= 12:
  56. i = 2
  57. elseif Clothingstock >= 6:
  58. i = 3
  59. else
  60. i = 4
  61. end
  62. :loopexhibit
  63. if exhibit[i] = 0:
  64. gs 'clothing_attributes', 'exhibit', i
  65. gs 'clothing_QV', 'shop_filter'
  66. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''exhibitionistshop'', ''exhibit''"><img <<$set_imgh>> src="images/pc/clothing/9exhibit/<<i>>.jpg" height="250" /></a>'
  67. end
  68. i += 4
  69. if i <= 57:jump 'loopexhibit'
  70. end
  71. if $ARGS[0] = 'exhibit':
  72. cla
  73. if exhibit[i] ! 0:
  74. msg 'You already own these clothes.'
  75. gt 'exhibitionistshop', 'clo'
  76. end
  77. gt 'clothing', 'view_clothing_item', 'shop', 'exhibit',i, 1000
  78. end
  79. if $ARGS[0] = 'panties':
  80. $metka = 'panties'
  81. $loc = 'exhibitionistshop'
  82. cls
  83. gs'stat'
  84. act 'Return':
  85. cla
  86. minut += 5
  87. gt 'exhibitionistshop', 'start'
  88. end
  89. i = 2
  90. :loopexhibitionist_panties
  91. if exhibitionist_panties[i] = 0:*p '<a href="exec: i = <<i>> & gt ''exhibitionistshop'', ''panties2''"><img src="images/pc/panties/exhibitionist/<<i>>.jpg" height="150" /></a> '
  92. i += 1
  93. if i <= 59:jump 'loopexhibitionist_panties'
  94. end
  95. if $ARGS[0] = 'panties2':
  96. cla
  97. if exhibitionist_panties[i] ! 0:
  98. msg 'You already own these panties.'
  99. gt 'exhibitionistshop', 'panties'
  100. end
  101. gt 'panties', 'view_panty_item', 'shop', 'exhibitionist',i, 600
  102. end
  103. if $ARGS[0] = 'bras':
  104. $metka = 'bras'
  105. $loc = 'exhibitionistshop'
  106. cls
  107. gs'stat'
  108. act 'Return':
  109. cla
  110. minut += 5
  111. gt 'exhibitionistshop', 'start'
  112. end
  113. i = 2
  114. :loopexhibitionist_bras
  115. if exhibitionist_bras[i] = 0:*p '<a href="exec: i = <<i>> & gt ''exhibitionistshop'', ''bras2''"><img src="images/pc/bras/exhibitionist/<<i>>.jpg" height="150" /></a> '
  116. i += 1
  117. if i <= 37:jump 'loopexhibitionist_bras'
  118. end
  119. if $ARGS[0] = 'bras2':
  120. cla
  121. if exhibitionist_bras[i] ! 0:
  122. msg 'You already own these bras.'
  123. gt 'exhibitionistshop', 'bras'
  124. end
  125. gt 'bras', 'view_bra_item', 'shop', 'exhibitionist',i, 600
  126. end
  127. --- exhibitionistshop ---------------------------------