portnoi2.qsrc 7.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253
  1. # portnoi2
  2. poshvalldrop = 0
  3. i = 1
  4. :ycheapmet
  5. if cheap[i] = 1 and ((cheapB[i] > pcs_hips + 8) or (cheapB[i] < pcs_hips - 8)):poshvalldrop += 1
  6. i += 1
  7. if i <= ARRSIZE('cheap'):jump 'ycheapmet'
  8. i = 1
  9. :ycats_dressmet
  10. if cats_dress[i] = 1 and ((cats_dressB[i] > pcs_hips + 8) or (cats_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
  11. i += 1
  12. if i <= ARRSIZE('cats_dress'):jump 'ycats_dressmet'
  13. i = 1
  14. :ycats_outfitmet
  15. if cats_outfit[i] = 1 and ((cats_outfitB[i] > pcs_hips + 8) or (cats_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
  16. i += 1
  17. if i <= ARRSIZE('cats_outfit'):jump 'ycats_outfitmet'
  18. i = 1
  19. :ycoco_dressmet
  20. if coco_dress[i] = 1 and ((coco_dressB[i] > pcs_hips + 8) or (coco_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
  21. i += 1
  22. if i <= ARRSIZE('coco_dress'):jump 'ycoco_dressmet'
  23. i = 1
  24. :ycoco_outfitmet
  25. if coco_outfit[i] = 1 and ((coco_outfitB[i] > pcs_hips + 8) or (coco_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
  26. i += 1
  27. if i <= ARRSIZE('coco_outfit'):jump 'ycoco_outfitmet'
  28. i = 1
  29. :yflamingos_dressmet
  30. if flamingos_dress[i] = 1 and ((flamingos_dressB[i] > pcs_hips + 8) or (flamingos_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
  31. i += 1
  32. if i <= ARRSIZE('flamingos_dress'):jump 'yflamingos_dressmet'
  33. i = 1
  34. :yflamingos_outfitmet
  35. if flamingos_outfit[i] = 1 and ((flamingos_outfitB[i] > pcs_hips + 8) or (flamingos_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
  36. i += 1
  37. if i <= ARRSIZE('flamingos_outfit'):jump 'yflamingos_outfitmet'
  38. i = 1
  39. :yexpensivemet
  40. if expensive[i] = 1 and ((expensiveB[i] > pcs_hips + 8) or (expensiveB[i] < pcs_hips - 8)):poshvalldrop += 1
  41. i += 1
  42. if i <= ARRSIZE('expensive'):jump 'yexpensivemet'
  43. i = 1
  44. :yformalmet
  45. if formal[i] = 1 and ((formalB[i] > pcs_hips + 8) or (formalB[i] < pcs_hips - 8)):poshvalldrop += 1
  46. i += 1
  47. if i <= ARRSIZE('formal'):jump 'yformalmet'
  48. i = 1
  49. :yofficemet
  50. if office[i] = 1 and ((officeB[i] > pcs_hips + 8) or (officeB[i] < pcs_hips - 8)):poshvalldrop += 1
  51. i += 1
  52. if i <= ARRSIZE('office'):jump 'yofficemet'
  53. i = 1
  54. :yschoolmet
  55. if school[i] = 1 and ((schoolB[i] > pcs_hips + 8) or (schoolB[i] < pcs_hips - 8)):poshvalldrop += 1
  56. i += 1
  57. if i = 6: i = 7
  58. if i <= ARRSIZE('school'):jump 'yschoolmet'
  59. i = 1
  60. :yfetishmet
  61. if fetish[i] = 1 and ((fetishB[i] > pcs_hips + 8) or (fetishB[i] < pcs_hips - 8)):poshvalldrop += 1
  62. i += 1
  63. if i <= ARRSIZE('fetish'):jump 'yfetishmet'
  64. i = 1
  65. :yexhibitmet
  66. if exhibit[i] = 1 and ((exhibitB[i] > pcs_hips + 8) or (exhibitB[i] < pcs_hips - 8)):poshvalldrop += 1
  67. i += 1
  68. if i <= ARRSIZE('exhibit'):jump 'yexhibitmet'
  69. i = 1
  70. :yuniformmet
  71. if uniform[i] = 1 and ((uniformB[i] > pcs_hips + 8) or (uniformB[i] < pcs_hips - 8)):poshvalldrop += 1
  72. i += 1
  73. if i <= ARRSIZE('uniform'):jump 'yuniformmet'
  74. i = 1
  75. :yswimwearmet
  76. if swimwear[i] = 1 and ((swimwearB[i] > pcs_hips + 8) or (swimwearB[i] < pcs_hips - 8)):poshvalldrop += 1
  77. i += 1
  78. if i <= ARRSIZE('swimwear'):jump 'yswimwearmet'
  79. i = 1
  80. :ybeachmet
  81. if beach[i] = 1 and ((beachB[i] > pcs_hips + 8) or (beachB[i] < pcs_hips - 8)):poshvalldrop += 1
  82. i += 1
  83. if i <= ARRSIZE('beach'):jump 'ybeachmet'
  84. i = 1
  85. :yfancy_burlesquemet
  86. if fancy_burlesque[i] = 1 and ((fancy_burlesqueB[i] > pcs_hips + 8) or (fancy_burlesqueB[i] < pcs_hips - 8)):poshvalldrop += 1
  87. i += 1
  88. if i <= ARRSIZE('fancy_burlesque'):jump 'yfancy_burlesquemet'
  89. i = 1
  90. :ydolls_outfitmet
  91. if dolls_outfit[i] = 1 and ((dolls_outfitB[i] > pcs_hips + 8) or (dolls_outfitB[i] < pcs_hips - 8)):poshvalldrop += 1
  92. i += 1
  93. if i <= ARRSIZE('dolls_outfit'):jump 'ydolls_outfitmet'
  94. i = 1
  95. :ydolls_dressmet
  96. if dolls_dress[i] = 1 and ((dolls_dressB[i] > pcs_hips + 8) or (dolls_dressB[i] < pcs_hips - 8)):poshvalldrop += 1
  97. i += 1
  98. if i <= ARRSIZE('dolls_dress'):jump 'ydolls_dressmet'
  99. poshvalldrop = 500 * poshvalldrop
  100. if money < poshvalldrop:
  101. 'You do not have enough money to resize all of your clothing. The total cost would be <<poshvalldrop>> <b>₽</b>.'
  102. elseif poshvalldrop = 0:
  103. 'You do not have any clothes that need tailoring currently,'
  104. elseif money >= poshvalldrop:
  105. money -= poshvalldrop
  106. i = 1
  107. :xcheapmet
  108. if cheap[i] = 1 and ((cheapB[i] > pcs_hips + 8) or (cheapB[i] < pcs_hips - 8)):cheapB[i] = pcs_hips
  109. i += 1
  110. if i <= ARRSIZE('cheap'):jump 'xcheapmet'
  111. i = 1
  112. :xcats_dressmet
  113. if cats_dress[i] = 1 and ((cats_dressB[i] > pcs_hips + 8) or (cats_dressB[i] < pcs_hips - 8)):cats_dressB[i] = pcs_hips
  114. i += 1
  115. if i <= ARRSIZE('cats_dress'):jump 'xcats_dressmet'
  116. i = 1
  117. :xcats_outfitmet
  118. if cats_outfit[i] = 1 and ((cats_outfitB[i] > pcs_hips + 8) or (cats_outfitB[i] < pcs_hips - 8)):cats_outfitB[i] = pcs_hips
  119. i += 1
  120. if i <= ARRSIZE('cats_outfit'):jump 'xcats_outfitmet'
  121. i = 1
  122. :xcoco_dressmet
  123. if coco_dress[i] = 1 and ((coco_dressB[i] > pcs_hips + 8) or (coco_dressB[i] < pcs_hips - 8)):coco_dressB[i] = pcs_hips
  124. i += 1
  125. if i <= ARRSIZE('coco_dress'):jump 'xcoco_dressmet'
  126. i = 1
  127. :xcoco_outfitmet
  128. if coco_outfit[i] = 1 and ((coco_outfitB[i] > pcs_hips + 8) or (coco_outfitB[i] < pcs_hips - 8)):coco_outfitB[i] = pcs_hips
  129. i += 1
  130. if i <= ARRSIZE('coco_outfit'):jump 'xcoco_outfitmet'
  131. i = 1
  132. :xflamingos_dressmet
  133. if flamingos_dress[i] = 1 and ((flamingos_dressB[i] > pcs_hips + 8) or (flamingos_dressB[i] < pcs_hips - 8)):flamingos_dressB[i] = pcs_hips
  134. i += 1
  135. if i <= ARRSIZE('flamingos_dress'):jump 'xflamingos_dressmet'
  136. i = 1
  137. :xflamingos_outfitmet
  138. if flamingos_outfit[i] = 1 and ((flamingos_outfitB[i] > pcs_hips + 8) or (flamingos_outfitB[i] < pcs_hips - 8)):flamingos_outfitB[i] = pcs_hips
  139. i += 1
  140. if i <= ARRSIZE('flamingos_outfit'):jump 'xflamingos_outfitmet'
  141. i = 1
  142. :xexpensivemet
  143. if expensive[i] = 1 and ((expensiveB[i] > pcs_hips + 8) or (expensiveB[i] < pcs_hips - 8)):expensiveB[i] = pcs_hips
  144. i += 1
  145. if i <= ARRSIZE('expensive'):jump 'xexpensivemet'
  146. i = 1
  147. :xformalmet
  148. if formal[i] = 1 and ((formalB[i] > pcs_hips + 8) or (formalB[i] < pcs_hips - 8)):formalB[i] = pcs_hips
  149. i += 1
  150. if i <= ARRSIZE('formal'):jump 'xformalmet'
  151. i = 1
  152. :xofficemet
  153. if office[i] = 1 and ((officeB[i] > pcs_hips + 8) or (officeB[i] < pcs_hips - 8)):officeB[i] = pcs_hips
  154. i += 1
  155. if i <= ARRSIZE('office'):jump 'xofficemet'
  156. i = 1
  157. :xschoolmet
  158. if school[i] = 1 and ((schoolB[i] > pcs_hips + 8) or (schoolB[i] < pcs_hips - 8)):schoolB[i] = pcs_hips
  159. i += 1
  160. if i = 6: i = 7
  161. if i <= ARRSIZE('school'):jump 'xschoolmet'
  162. i = 1
  163. :xfetishmet
  164. if fetish[i] = 1 and ((fetishB[i] > pcs_hips + 8) or (fetishB[i] < pcs_hips - 8)):fetishB[i] = pcs_hips
  165. i += 1
  166. if i <= ARRSIZE('fetish'):jump 'xfetishmet'
  167. i = 1
  168. :xexhibitmet
  169. if exhibit[i] = 1 and ((exhibitB[i] > pcs_hips + 8) or (exhibitB[i] < pcs_hips - 8)):exhibitB[i] = pcs_hips
  170. i += 1
  171. if i <= ARRSIZE('exhibit'):jump 'xexhibitmet'
  172. i = 1
  173. :xuniformmet
  174. if uniform[i] = 1 and ((uniformB[i] > pcs_hips + 8) or (uniformB[i] < pcs_hips - 8)):uniformB[i] = pcs_hips
  175. i += 1
  176. if i <= ARRSIZE('uniform'):jump 'xuniformmet'
  177. i = 1
  178. :xswimwearmet
  179. if swimwear[i] = 1 and ((swimwearB[i] > pcs_hips + 8) or (swimwearB[i] < pcs_hips - 8)):swimwearB[i] = pcs_hips
  180. i += 1
  181. if i <= ARRSIZE('swimwear'):jump 'xswimwearmet'
  182. i = 1
  183. :xbeachmet
  184. if beach[i] = 1 and ((beachB[i] > pcs_hips + 8) or (beachB[i] < pcs_hips - 8)):beachB[i] = pcs_hips
  185. i += 1
  186. if i <= ARRSIZE('beach'):jump 'xbeachmet'
  187. i = 1
  188. :xfancy_burlesquemet
  189. if fancy_burlesque[i] = 1 and ((fancy_burlesqueB[i] > pcs_hips + 8) or (fancy_burlesqueB[i] < pcs_hips - 8)):fancy_burlesqueB[i] = pcs_hips
  190. i += 1
  191. if i <= ARRSIZE('fancy_burlesque'):jump 'xfancy_burlesquemet'
  192. i = 1
  193. :xdolls_outfitmet
  194. if dolls_outfit[i] = 1 and ((dolls_outfitB[i] > pcs_hips + 8) or (dolls_outfitB[i] < pcs_hips - 8)):dolls_outfitB[i] = pcs_hips
  195. i += 1
  196. if i <= ARRSIZE('dolls_outfit'):jump 'xdolls_outfitmet'
  197. i = 1
  198. :xdolls_dressmet
  199. if dolls_dress[i] = 1 and ((dolls_dressB[i] > pcs_hips + 8) or (dolls_dressB[i] < pcs_hips - 8)):dolls_dressB[i] = pcs_hips
  200. i += 1
  201. if i <= ARRSIZE('dolls_dress'):jump 'xdolls_dressmet'
  202. 'You resize all clothing for <<poshvalldrop>> <b>₽</b>.'
  203. end
  204. if $loc = 'pav_factory':
  205. act 'Leave': gt 'pav_industrial'
  206. else
  207. act 'Leave' :gt 'city_market', 'tailor'
  208. end
  209. --- portnoi2 ---------------------------------