sportShop 7.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229
  1. # sportShop
  2. if $ARGS[0] = 'start':
  3. $location_type = 'public_indoors'
  4. cla
  5. clr
  6. *clr
  7. minut += 5
  8. gs 'stat'
  9. if night_mode = 1:
  10. fcolor = rgb(255, 255, 255)
  11. bcolor = rgb(0, 0, 0)
  12. lcolor = rgb(106, 90, 205)
  13. else
  14. fcolor = rgb(0, 0, 0)
  15. bcolor = rgb(255, 255, 255)
  16. lcolor = rgb(106, 90, 205)
  17. end
  18. '<center><b><font color="maroon">Danilovich sporting goods</font></b></center>'
  19. '<center><img src="images/locations/city/citycenter/mall/sportshop/sportshop.jpg"></center>'
  20. act 'Leave':
  21. cla
  22. minut += 5
  23. gt 'torgcentr'
  24. end
  25. act 'View sports clothes':
  26. cla
  27. minut += 5
  28. gt 'sportshop', 'clo'
  29. end
  30. act 'View swimwear':
  31. cla
  32. minut += 5
  33. gt 'sportshop', 'swim'
  34. end
  35. if skak = 0 and money >= 500:
  36. act 'Buy skipping rope (500 <b>₽</b>)':
  37. cla
  38. minut += 5
  39. money -= 500
  40. skak = 1
  41. act 'Pick up a package':gt 'sportshop', 'start'
  42. end
  43. end
  44. if obruch = 0 and money >= 1500:
  45. act 'Buy hoop (1,500 <b>₽</b>)':
  46. cla
  47. minut += 5
  48. money -= 1500
  49. obruch = 1
  50. act 'Pick up a package':gt 'sportshop', 'start'
  51. end
  52. end
  53. if bookYog = 0 and money >= 1500:
  54. act 'Buy benefits of yoga (1,500 <b>₽</b>)':
  55. cla
  56. minut += 5
  57. money -= 1500
  58. bookYog = 1
  59. act 'Pick up a package':gt 'sportshop', 'start'
  60. end
  61. end
  62. end
  63. if $ARGS[0] = 'clo':
  64. $metka = 'clo'
  65. $loc = 'sportShop'
  66. cls
  67. gs'stat'
  68. '<center><b><font color="maroon">Sportswear - one size fits all</font></b></center>'
  69. *nl
  70. $Headerstring = '<TH>Prostitute clothing '
  71. if clothingfilter_prost = 0:
  72. $Headerstring += '<a href="exec:clothingfilter_prost = 1 & gt ''sportShop'', ''clo''">Included</a></TH>'
  73. else
  74. $Headerstring += '<a href="exec:clothingfilter_prost = 0 & gt ''sportShop'', ''clo''">Excluded</a></TH>'
  75. end
  76. $Headerstring += '<TH>Bimbo clothing '
  77. if clothingfilter_bimbo = 0:
  78. $Headerstring += '<a href="exec:clothingfilter_bimbo = 1 & gt ''sportShop'', ''clo''">Included</a></TH>'
  79. else
  80. $Headerstring += '<a href="exec:clothingfilter_bimbo = 0 & gt ''sportShop'', ''clo''">Excluded</a></TH>'
  81. end
  82. $Headerstring += '<TH>Clothing you are comfortable wearing '
  83. if clothingfilter_comf = 0:
  84. $Headerstring += '<a href="exec:clothingfilter_comf = 1 & gt ''sportShop'', ''clo''">Included</a></TH>'
  85. else
  86. $Headerstring += '<a href="exec:clothingfilter_comf = 0 & gt ''sportShop'', ''clo''">Excluded</a></TH>'
  87. end
  88. $Headerstring += '<TH>Daring clothing '
  89. if clothingfilter_daring = 0:
  90. $Headerstring += '<a href="exec:clothingfilter_daring = 1 & gt ''sportShop'', ''clo''">Included</a></TH>'
  91. else
  92. $Headerstring += 'g<a href="exec:clothingfilter_daring = 0 & gt ''sportShop'', ''clo''">Excluded</a></TH>'
  93. end
  94. $Headerstring += '<TH>Too daring for you clothing '
  95. if clothingfilter_too_daring = 0:
  96. $Headerstring += '<a href="exec:clothingfilter_too_daring = 1 & gt ''sportShop'', ''clo''">Included</a></TH>'
  97. else
  98. $Headerstring += '<a href="exec:clothingfilter_too_daring = 0 & gt ''sportShop'', ''clo''">Excluded</a></TH>'
  99. end
  100. '<center><table border=1><<$Headerstring>></center>'
  101. act 'Return':
  102. cla
  103. minut += 5
  104. gt 'sportshop', 'start'
  105. end
  106. if Clothingstock > 16:
  107. i = 1
  108. elseif Clothingstock > 8:
  109. i = 2
  110. else
  111. i = 3
  112. end
  113. :loopexercise
  114. if exercise[i] = 0:
  115. gs 'clothing_attributes', 'exercise', i
  116. if clothingfilter_comf = 0 and CloExhibit + 10 < pcs_exhibition:
  117. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''exercise''"><img src="images/pc/clothing/7exercise/<<i>>.jpg" height="250" /></a>'
  118. elseif clothingfilter_daring = 0 and CloExhibit + 10 >= pcs_exhibition and CloExhibit <= pcs_exhibition:
  119. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''exercise''"><img src="images/pc/clothing/7exercise/<<i>>.jpg" height="250" /></a>'
  120. elseif clothingfilter_too_daring = 0 and CloExhibit > pcs_exhibition:
  121. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''exercise''"><img src="images/pc/clothing/7exercise/<<i>>.jpg" height="250" /></a>'
  122. end
  123. end
  124. i += 3
  125. if i <= 113:jump 'loopexercise'
  126. end
  127. if $ARGS[0] = 'exercise': gt 'clothing', 'view_clothing_item', 'shop', 'exercise',i, 4000
  128. if $ARGS[0] = 'swim':
  129. $metka = 'swim'
  130. $loc = 'sportShop'
  131. cls
  132. gs'stat'
  133. '<center><b><font color="maroon">Swimwear - one size fits all</font></b></center>'
  134. *nl
  135. $Headerstring = '<TH>Prostitute clothing '
  136. if clothingfilter_prost = 0:
  137. $Headerstring += '<a href="exec:clothingfilter_prost = 1 & gt ''sportShop'', ''swim''">Included</a></TH>'
  138. else
  139. $Headerstring += '<a href="exec:clothingfilter_prost = 0 & gt ''sportShop'', ''swim''">Excluded</a></TH>'
  140. end
  141. $Headerstring += '<TH>Bimbo clothing '
  142. if clothingfilter_bimbo = 0:
  143. $Headerstring += '<a href="exec:clothingfilter_bimbo = 1 & gt ''sportShop'', ''swim''">Included</a></TH>'
  144. else
  145. $Headerstring += '<a href="exec:clothingfilter_bimbo = 0 & gt ''sportShop'', ''swim''">Excluded</a></TH>'
  146. end
  147. $Headerstring += '<TH>Clothing you are comfortable wearing '
  148. if clothingfilter_comf = 0:
  149. $Headerstring += '<a href="exec:clothingfilter_comf = 1 & gt ''sportShop'', ''swim''">Included</a></TH>'
  150. else
  151. $Headerstring += '<a href="exec:clothingfilter_comf = 0 & gt ''sportShop'', ''swim''">Excluded</a></TH>'
  152. end
  153. $Headerstring += '<TH>Daring clothing '
  154. if clothingfilter_daring = 0:
  155. $Headerstring += '<a href="exec:clothingfilter_daring = 1 & gt ''sportShop'', ''swim''">Included</a></TH>'
  156. else
  157. $Headerstring += 'g<a href="exec:clothingfilter_daring = 0 & gt ''sportShop'', ''swim''">Excluded</a></TH>'
  158. end
  159. $Headerstring += '<TH>Too daring for you clothing '
  160. if clothingfilter_too_daring = 0:
  161. $Headerstring += '<a href="exec:clothingfilter_too_daring = 1 & gt ''sportShop'', ''swim''">Included</a></TH>'
  162. else
  163. $Headerstring += '<a href="exec:clothingfilter_too_daring = 0 & gt ''sportShop'', ''swim''">Excluded</a></TH>'
  164. end
  165. '<center><table border=1><<$Headerstring>></center>'
  166. act 'Return':
  167. cla
  168. minut += 5
  169. gt 'sportshop', 'start'
  170. end
  171. !!4 is in he supermarket, so skipped
  172. if Clothingstock > 18:
  173. i = 1
  174. elseif Clothingstock > 12:
  175. i = 2
  176. elseif Clothingstock > 6:
  177. i = 3
  178. else
  179. i = 8
  180. end
  181. :loopswim
  182. if swimwear[i] = 0:
  183. gs 'clothing_attributes', 'swimwear', i
  184. if clothingfilter_comf = 0 and CloExhibit + 10 < pcs_exhibition:
  185. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''swim1''"><img src="images/pc/clothing/12swimwear/<<i>>.jpg" height="250" /></a>'
  186. elseif clothingfilter_daring = 0 and CloExhibit + 10 >= pcs_exhibition and CloExhibit <= pcs_exhibition:
  187. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''swim1''"><img src="images/pc/clothing/12swimwear/<<i>>.jpg" height="250" /></a>'
  188. elseif clothingfilter_too_daring = 0 and CloExhibit > pcs_exhibition:
  189. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''sportshop'', ''swim1''"><img src="images/pc/clothing/12swimwear/<<i>>.jpg" height="250" /></a>'
  190. end
  191. end
  192. i += 4
  193. if i <= 135:jump 'loopswim'
  194. end
  195. if $ARGS[0] = 'swim1': gt 'clothing', 'view_clothing_item', 'shop', 'swimwear',i, 4000
  196. --- sportShop ---------------------------------