1
0

budgetclothes.qsrc 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530
  1. # budgetclothes
  2. !2021/04/29
  3. if $ARGS[0] = 'start':
  4. $loc_arg = $ARGS[0]
  5. $loc = 'budgetclothes'
  6. $menu_loc = 'budgetclothes'
  7. $menu_arg = 'start'
  8. menu_off = 0
  9. $location_type = 'event'
  10. '<center><b><font color="maroon">Welcome to G & M - Clothes for all your needs</font></b></center>'
  11. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/gandm/shop.jpg"</center>'
  12. 'G&M is not fancy, it''s certainly not high fashion but it''s cheap and has specific work and school wear.'
  13. clr
  14. gs 'stat'
  15. gs 'themes', 'indoors'
  16. act 'Leave the store':
  17. cla
  18. $shoplocation = ''
  19. if torg = 1:
  20. minut += 3
  21. gt 'torgcentr'
  22. else
  23. gt 'pav_industrial'
  24. end
  25. end
  26. act 'Visit clothing department':
  27. cla
  28. menu_off = 1
  29. act 'Return':gt 'budgetclothes', 'start'
  30. act 'View clothing':
  31. minut += 5
  32. gt 'budgetclothes', 'clothes'
  33. end
  34. act 'View dresses':
  35. minut += 5
  36. gt 'budgetclothes', 'dresses'
  37. end
  38. act 'View office wear':
  39. minut += 5
  40. gt 'budgetclothes', 'office'
  41. end
  42. act 'View maid outfits':
  43. minut += 5
  44. gt 'budgetclothes', 'gm_maid'
  45. end
  46. act 'View server uniforms':
  47. minut += 5
  48. gt 'budgetclothes', 'gm_server'
  49. end
  50. act 'View school uniforms':
  51. minut += 5
  52. gt 'budgetclothes', 'school'
  53. end
  54. end
  55. act 'View regular shoes':
  56. minut += 5
  57. gt 'budgetclothes', 'shoes'
  58. end
  59. act 'View panties':
  60. minut += 5
  61. gt 'budgetclothes', 'panties'
  62. end
  63. act 'View bras':
  64. minut += 5
  65. gt 'budgetclothes', 'bras'
  66. end
  67. act 'View purses':
  68. minut += 5
  69. gt 'budgetclothes', 'purses'
  70. end
  71. act 'View coats':
  72. minut += 5
  73. gt 'budgetclothes', 'coats'
  74. end
  75. end
  76. if $ARGS[0] = 'clothes':
  77. $loc_arg = 'clothes'
  78. $loc = 'budgetclothes'
  79. $menu_loc = 'budgetclothes'
  80. $menu_arg = 'clothes'
  81. menu_off = 0
  82. *clr & cla
  83. gs'stat'
  84. '<center><b><font color="maroon">Viewing G&M outfits</font></b></center>'
  85. *nl
  86. gs 'clothing_QV', 'shop_header'
  87. act 'Return':
  88. cla
  89. minut += 1
  90. gt 'budgetclothes', 'start'
  91. end
  92. clothingfilter['qualitycheck'] = 7
  93. :loopquality
  94. if Clothingstock - 16 > 0:
  95. i = 1
  96. elseif Clothingstock - 8 > 0:
  97. i = 2
  98. else
  99. i = 3
  100. end
  101. :loopgm_outfits
  102. if gm_outfits[i] = 0:
  103. gs 'clothing_attributes', 'gm_outfits', i
  104. gs 'clothing_QV', 'shop_filter'
  105. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  106. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''gm_outfits''"><img src="images/pc/items/gm/outfits/<<i>>.jpg" height="250" /></a>'
  107. end
  108. end
  109. i += 3
  110. if i = 414:i = 415
  111. if i <= 150:jump 'loopgm_outfits'
  112. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality'
  113. end
  114. if $ARGS[0] = 'gm_outfits':
  115. cla
  116. menu_off = 1
  117. if gm_outfits[i] ! 0:
  118. msg 'You already own these clothes.'
  119. gt 'budgetclothes', 'clothes'
  120. end
  121. gt 'clothing', 'view_clothing_item', 'shop', 'gm_outfits',i, 1000
  122. end
  123. if $ARGS[0] = 'dresses':
  124. $loc_arg = 'dresses'
  125. $loc = 'budgetclothes'
  126. $menu_loc = 'budgetclothes'
  127. $menu_arg = 'dresses'
  128. menu_off = 0
  129. *clr & cla
  130. gs'stat'
  131. '<center><b><font color="maroon">Viewing G&M dresses</font></b></center>'
  132. *nl
  133. gs 'clothing_QV', 'shop_header'
  134. act 'Return':
  135. cla
  136. minut += 1
  137. gt 'budgetclothes', 'start'
  138. end
  139. clothingfilter['qualitycheck'] = 7
  140. :loopquality1
  141. if Clothingstock - 16 > 0:
  142. i = 1
  143. elseif Clothingstock - 8 > 0:
  144. i = 2
  145. else
  146. i = 3
  147. end
  148. :loopgm_dress
  149. if gm_dress[i] = 0:
  150. gs 'clothing_attributes', 'gm_dress', i
  151. gs 'clothing_QV', 'shop_filter'
  152. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  153. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''gm_dress''"><img src="images/pc/items/gm/dress/<<i>>.jpg" height="250" /></a>'
  154. end
  155. end
  156. i += 3
  157. if i <= 150:jump 'loopgm_dress'
  158. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality1'
  159. end
  160. if $ARGS[0] = 'gm_dress':
  161. cla
  162. menu_off = 1
  163. if gm_dress[i] ! 0:
  164. msg 'You already own this dress.'
  165. gt 'budgetclothes', 'dresses'
  166. end
  167. gt 'clothing', 'view_clothing_item', 'shop', 'gm_dress',i, 1000
  168. end
  169. if $ARGS[0] = 'office':
  170. $menu_loc = 'budgetclothes'
  171. $menu_arg = 'office'
  172. menu_off = 0
  173. $loc_arg = $ARGS[0]
  174. $loc = 'budgetclothes'
  175. *clr & cla
  176. gs'stat'
  177. '<center><b><font color="maroon">Viewing G&M office clothing</font></b></center>'
  178. *nl
  179. gs 'clothing_QV', 'shop_header'
  180. act 'Return':
  181. cla
  182. minut += 1
  183. gt 'budgetclothes', 'start'
  184. end
  185. clothingfilter['qualitycheck'] = 7
  186. :loopquality2
  187. if Clothingstock > 15:
  188. i = 3
  189. elseif Clothingstock > 7:
  190. i = 2
  191. else
  192. i = 1
  193. end
  194. :loopoffice
  195. if gm_office[i] = 0:
  196. gs 'clothing_attributes', 'gm_office', i
  197. gs 'clothing_QV', 'shop_filter'
  198. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  199. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''officeclo''"><img src="images/pc/items/gm/office/<<i>>.jpg" height="250" /></a>'
  200. end
  201. end
  202. i += 3
  203. if i <= 140:jump 'loopoffice'
  204. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality2'
  205. end
  206. if $ARGS[0] = 'officeclo':
  207. cla
  208. menu_off = 1
  209. if gm_office[i] ! 0:
  210. msg 'You already own these clothes.'
  211. gt 'budgetclothes', 'office'
  212. end
  213. gt 'clothing', 'view_clothing_item', 'shop', 'gm_office',i, 2000
  214. end
  215. if $ARGS[0] = 'gm_maid':
  216. $menu_loc = 'budgetclothes'
  217. $menu_arg = 'gm_maid'
  218. menu_off = 0
  219. $loc_arg = $ARGS[0]
  220. $loc = 'budgetclothes'
  221. *clr & cla
  222. gs'stat'
  223. '<center><b><font color="maroon">Viewing G&M maid outfits</font></b></center>'
  224. *nl
  225. gs 'clothing_QV', 'shop_header'
  226. act 'Return':
  227. cla
  228. minut += 1
  229. gt 'budgetclothes', 'start'
  230. end
  231. clothingfilter['qualitycheck'] = 7
  232. :loopquality_maid
  233. if Clothingstock > 11:
  234. i = 1
  235. else
  236. i = 2
  237. end
  238. :loopgm_maid
  239. if gm_maid[i] = 0:
  240. gs 'clothing_attributes', 'gm_maid', i
  241. gs 'clothing_QV', 'shop_filter'
  242. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  243. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''gm_maidclo''"><img src="images/pc/items/gm/maid/<<i>>.jpg" height="250" /></a>'
  244. end
  245. end
  246. i += 2
  247. if i <= 40:jump 'loopgm_maid'
  248. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_maid'
  249. end
  250. if $ARGS[0] = 'gm_maidclo': gt 'clothing', 'view_clothing_item', 'shop', 'gm_maid',i, 2000
  251. if $ARGS[0] = 'gm_server':
  252. $menu_loc = 'budgetclothes'
  253. $menu_arg = 'gm_server'
  254. menu_off = 0
  255. $loc_arg = $ARGS[0]
  256. $loc = 'budgetclothes'
  257. *clr & cla
  258. gs'stat'
  259. '<center><b><font color="maroon">Viewing G&M server uniforms</font></b></center>'
  260. *nl
  261. gs 'clothing_QV', 'shop_header'
  262. act 'Return':
  263. cla
  264. minut += 1
  265. gt 'budgetclothes', 'start'
  266. end
  267. clothingfilter['qualitycheck'] = 7
  268. :loopquality_server
  269. if Clothingstock > 11:
  270. i = 1
  271. else
  272. i = 2
  273. end
  274. :loopgm_server
  275. if gm_server[i] = 0:
  276. gs 'clothing_attributes', 'gm_server', i
  277. gs 'clothing_QV', 'shop_filter'
  278. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  279. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''gm_serverclo''"><img src="images/pc/items/gm/server/<<i>>.jpg" height="250" /></a>'
  280. end
  281. end
  282. i += 2
  283. if i <= 30:jump 'loopgm_server'
  284. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality_server'
  285. end
  286. if $ARGS[0] = 'gm_serverclo': gt 'clothing', 'view_clothing_item', 'shop', 'gm_server',i, 2000
  287. if $ARGS[0] = 'school':
  288. $menu_loc = 'budgetclothes'
  289. $menu_arg = 'school'
  290. menu_off = 0
  291. $loc_arg = $ARGS[0]
  292. $loc = 'budgetclothes'
  293. *clr & cla
  294. gs'stat'
  295. '<center><b><font color="maroon">Viewing G&M school uniforms</font></b></center>'
  296. *nl
  297. gs 'clothing_QV', 'shop_header'
  298. act 'Return':
  299. cla
  300. minut += 1
  301. gt 'budgetclothes', 'start'
  302. end
  303. clothingfilter['qualitycheck'] = 7
  304. :loopquality4
  305. if Clothingstock > 15:
  306. i = 1
  307. elseif Clothingstock > 7:
  308. i = 2
  309. else
  310. i = 3
  311. end
  312. :loopschool
  313. if gm_school[i] = 0:
  314. gs 'clothing_attributes', 'gm_school', i
  315. gs 'clothing_QV', 'shop_filter'
  316. if clothingfilter['quality'] = 0 or clothingfilter['qualitycheck'] = CloQuality:
  317. if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''schoolclo''"><img src="images/pc/items/gm/school/<<i>>.jpg" height="250" /></a>'
  318. end
  319. end
  320. i += 3
  321. if i = 6:i = 9
  322. if i <= 80:jump 'loopschool'
  323. if clothingfilter['quality'] = 1 and clothingfilter['qualitycheck'] > 0: clothingfilter['qualitycheck'] -=1 & jump 'loopquality4'
  324. end
  325. if $ARGS[0] = 'schoolclo':
  326. cla
  327. menu_off = 1
  328. if gm_school[i] ! 0:
  329. msg 'You already own these clothes.'
  330. gt 'budgetclothes', 'school'
  331. end
  332. gt 'clothing', 'view_clothing_item', 'shop', 'gm_school',i, 1500
  333. end
  334. if $ARGS[0] = 'shoes':
  335. $loc_arg = 'shoes'
  336. $loc = 'budgetclothes'
  337. $menu_loc = 'budgetclothes'
  338. $menu_arg = 'shoes'
  339. menu_off = 0
  340. *clr & cla
  341. gs'stat'
  342. act 'Return':
  343. cla
  344. minut += 1
  345. gt 'budgetclothes', 'start'
  346. end
  347. i = 1
  348. :loopgm_shoes
  349. if gm_shoe[i] = 0:*p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''budget_shoes''"><img src="images/pc/items/gm/shoes/<<i>>.jpg" height="250" /></a>'
  350. i += 1
  351. if i <= 30:jump 'loopgm_shoes'
  352. end
  353. if $ARGS[0] = 'budget_shoes': gt 'shoes', 'view_shoe_item', 'shop', 'gm',i, 700
  354. if $ARGS[0] = 'coats':
  355. $menu_loc = 'budgetclothes'
  356. $menu_arg = 'coats'
  357. menu_off = 0
  358. $loc_arg = 'coats'
  359. $loc = 'budgetclothes'
  360. *clr & cla
  361. gs'stat'
  362. act 'Return':
  363. cla
  364. minut += 1
  365. gt 'budgetclothes', 'start'
  366. end
  367. i = 1
  368. :loopcoats
  369. if gm_coats[i] = 0:*p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''coats2''"><img src="images/pc/items/gm/coats/<<i>>.jpg" height="250" /></a>'
  370. i += 1
  371. if i <= 20:jump 'loopcoats'
  372. end
  373. if $ARGS[0] = 'coats2': gt 'coats', 'view_coat_item', 'shop', 'gm',i, 1500
  374. if $ARGS[0] = 'purses':
  375. $menu_loc = 'budgetclothes'
  376. $menu_arg = 'purses'
  377. menu_off = 0
  378. $loc_arg = 'purses'
  379. $loc = 'budgetclothes'
  380. *clr & cla
  381. gs'stat'
  382. act 'Return':
  383. cla
  384. minut += 1
  385. gt 'budgetclothes', 'start'
  386. end
  387. i = 1
  388. :looppurses
  389. if gm_purses[i] = 0:*p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''purses2''"><img src="images/pc/items/gm/purses/<<i>>.jpg" height="250" /></a>'
  390. i += 1
  391. if i <= 14:jump 'looppurses'
  392. end
  393. if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'gm',i, 1500
  394. if $ARGS[0] = 'panties':
  395. $loc_arg = 'panties'
  396. $loc = 'budgetclothes'
  397. $menu_loc = 'budgetclothes'
  398. $menu_arg = 'panties'
  399. menu_off = 0
  400. *clr & cla
  401. gs'stat'
  402. act 'Return':
  403. cla
  404. minut += 1
  405. gt 'budgetclothes', 'start'
  406. end
  407. i = 1
  408. :looppanties
  409. if cheap_panties[i] = 0:*p '<a href="exec: gt ''panties'', ''view_panty_item'', ''shop'', ''cheap'', <<i>>, 300"><img src="images/pc/panties/basic/<<i>>.jpg" height="150" /></a>'
  410. i += 1
  411. if i = 7: i = 8
  412. if i = 9: i = 10
  413. if i = 21: i = 22
  414. if i = 37: i = 38
  415. if i <= 37:jump 'looppanties'
  416. end
  417. if $ARGS[0] = 'bras':
  418. $menu_loc = 'budgetclothes'
  419. $menu_arg = 'bras'
  420. menu_off = 0
  421. $loc_arg = 'bras'
  422. $loc = 'budgetclothes'
  423. *clr & cla
  424. gs'stat'
  425. act 'Return':
  426. cla
  427. minut += 1
  428. gt 'budgetclothes', 'start'
  429. end
  430. i = 1
  431. :loopbras
  432. if cheap_bras[i] = 0:*p '<a href="exec:gt ''bras'', ''view_bra_item'', ''shop'', ''cheap'', <<i>>, 300"><img src="images/pc/bras/basic/<<i>>.jpg" height="150" /></a>'
  433. i += 1
  434. if i = 11: i = 13
  435. if i = 16: i = 17
  436. if i = 18: i = 19
  437. if i <= 19:jump 'loopbras'
  438. end
  439. --- budgetclothes ---------------------------------