pavtrain_market.qsrc 31 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864
  1. # pavtrain_market
  2. !{change log
  3. March 31, 2016
  4. Added rice wine quest
  5. April 20, 2016
  6. Fixed Rice wine event
  7. }
  8. $location_type = 'public_outdoors'
  9. if $ARGS[0] = 'start':
  10. $metka = 'start'
  11. $loc = 'pavtrain_market'
  12. $menu_loc = 'pavtrain_market'
  13. $menu_arg = 'start'
  14. menu_off = 0
  15. CLOSE ALL
  16. if sound = 0:
  17. if month >=11 and month <= 12 or month >=1 and month <=3:
  18. if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/zima.mp3',30
  19. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  20. else
  21. if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/street_leto.mp3',30
  22. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  23. end
  24. end
  25. clr
  26. gs 'stat'
  27. '<center><h2>Market</h2></center>'
  28. if month >= 11 or month <= 3:
  29. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinokw.jpg"></center>'
  30. else
  31. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinok.jpg"></center>'
  32. end
  33. *nl
  34. 'This small open air market is located near the train station.'
  35. if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
  36. act 'Wait for Aurel to arrive':hour = 12 & gt 'pavtrain_market', 'start'
  37. end
  38. *nl
  39. if hour >= 8 and hour <= 18:
  40. 'The market stalls are buzzing with shoppers. Everyone seems to be in a good mood and you can hear back and forth bargaining as you pass by.'
  41. if pav_slut >= 50 and rand(0,9) = 0:
  42. 'An Armenian man comes up to you and in broken Russian says, "You girl who like men, no? Come meet real men have good time."'
  43. act 'Go with him':gt 'gevent', '3'
  44. act 'Reject him':
  45. menu_off = 1
  46. *clr & cla
  47. 'You pretend not to understand what he is saying, smiling and shaking your head as you move away from him.'
  48. act 'Return':gt 'pavtrain_market', 'start'
  49. end
  50. exit
  51. end
  52. act 'Wander through the market': gt 'pavtrain_market','events'
  53. act 'Go back to the station': minut += 3 & gt 'pavtrain'
  54. !expand market events from 1.2.4
  55. if arturKnow = 1 and arturQW = 0:
  56. act 'Look for Aurel':gt 'arturRinok', 'start'
  57. elseif arturQW = 1 and (week = 6 or week = 7):
  58. if hour = 12 or hour = 13:
  59. act 'Look for Aurel':gt 'arturRinok', 'work_1'
  60. end
  61. elseif arturQW = 2:
  62. if hour = 16 and minut <= 30:
  63. act 'Look for Aurel':gt 'arturRinok', 'work_2'
  64. elseif hour < 16:
  65. act 'Wait for Aurel to arrive':hour = 16 & minut = 0 & gt 'pavtrain_market', 'start'
  66. end
  67. end
  68. if gobelen > 0 and gobQW = 0:
  69. act'Sell ​​tapestry':
  70. menu_off = 1
  71. *clr & cla
  72. gobQW = 1
  73. minut += 15
  74. gs'stat'
  75. 'You stand quietly by the entrance to the market, waiting for customers and displaying your tapestries. Shortly buyers start to gather, but a large, muscular man approaches you and says, "It is illegal to trade in the market without a trader''s license, but I may be interesting in buying your tapestries, 1000 <b>₽</b> apiece. Come and see me at my stall."'
  76. 'Not wanting to get into trouble, you pack your stuff away. The man was already gone, but you saw which direction he went and he should be easy to find.'
  77. act 'Leave':gt 'pavtrain_market', 'start'
  78. end
  79. end
  80. if gobelen > 0 and gobQW >= 1:
  81. act'Sell ​​tapestry':
  82. menu_off = 1
  83. *clr & cla
  84. minut += 15
  85. gs'stat'
  86. 'You go to the man who offered to buy your tapestries for 1000 <b>₽</b>. You find him by his stall, smiling.'
  87. if gobQW = 2:
  88. 'Roman welcomes you. He is interested and businesslike as he asks what you have for sale.'
  89. end
  90. if gobQW = 1:
  91. gobQW = 2
  92. minute + 5
  93. 'The man greets you and introduces himself as Roman, you tell him that your name is <<$pcs_nickname>>. After a brief chat Roman says that he is interested in seeing what you have for sale.'
  94. end
  95. act'Show your tapestry':
  96. *clr & cla
  97. gobelen -= 1
  98. money += 1000
  99. gs'stat'
  100. 'You show your tapestry to Roman and he gives you five hundred for it. You take the money and give him the tapestry.'
  101. act 'Leave':gt 'pavtrain_market', 'start'
  102. end
  103. if gobelen > 1:
  104. act'Sell all of your tapestries':
  105. *clr & cla
  106. kolgob = gobelen
  107. gobelen = 0
  108. moneyGob = kolgob*1000
  109. money += moneyGob
  110. gs'stat'
  111. 'You show Roman your tapestries and he gives you <<moneyGob>> <b>₽</b> for them. You take the money and give him the tapestries.'
  112. act 'Leave':gt 'pavtrain_market', 'start'
  113. end
  114. end
  115. act 'Leave':gt 'pavtrain_market', 'start'
  116. end
  117. end
  118. if ShowerIvan = 5 and porndeal = 0 and rand(1,10) <= 4 and lookwine ! daystart:
  119. *clr & cla
  120. gs 'stat'
  121. minut += 20
  122. menu_off = 1
  123. lookwine = daystart
  124. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  125. 'You were looking through the market when you came upon a stall selling Chinese foods. On a shelf behind the old woman minding the stall there are a number of bottles.'
  126. act 'Ask about wang-goo':
  127. cla
  128. 'You asked the old woman if she has any rice wine to sell. She smiles at you and points to a basket filled with rice.'
  129. '"Onry 2 <b>₽</b>, hundred glam." she said in badly accented Russian, "You buy?"'
  130. '"No," you reply, "I need rice wine, rice wine."'
  131. 'She looks at you in confusion for a moment then suddenly brightened, "Ah!" she exclaims, "Come, come!"'
  132. 'The old woman hurries to the other side of the stall as you follow her to where a number of smoked piglets are hung in a row.'
  133. '"Here," the old woman crowed handing you one of the pigs, "Nice swine, vely nice swine."'
  134. '"No, not nice swine," you sigh out in despair, "Rice! Wine."'
  135. '"Yes, yes," the woman counters, "Nice swine, only 5 <b>₽</b>."'
  136. *nl
  137. 'Just as you were about to give up, a young Chinese boy about your brother''s age arrives.'
  138. '"I am sorry, my grandmother does not speak much Russian." he says as he steps beside the old woman who started to speak rapidly to him in what you assume is Chinese.'
  139. '"My grandmother asks why you don''t like the piglets?" he translates as the old woman stops.'
  140. '"I don''t want a pig," you reply in relief as his Russian is quite good, "I am looking for rice wine, wang-goo."'
  141. '"Ah, huangjiu!" he exclaims as he turns to his grandmother and starts speaking in Chinese.'
  142. 'The old woman glares at you, hangs back the smoked pig and shuffles over to the shelf with the bottles. She finally picks up one of them and brings it over to you.'
  143. '"Why you not say wanted lice wine." she asked in aggrieved tones, "500 <b>₽</b>."'
  144. if money >= 500:
  145. act 'Buy the wine':
  146. *clr & cla
  147. money -= 500
  148. ricewine = 1
  149. 'You hand the woman the money and she gives you the wine.'
  150. act 'Leave': gt 'pavtrain_market', 'start'
  151. end
  152. else
  153. 'You are chocked by the high price and realize that you cannot afford the wine. You apologize and turn away.'
  154. act 'Leave the market': gt 'pavtrain_market', 'start'
  155. act 'Continue browsing the market':
  156. *clr & cla
  157. gs 'stat'
  158. minut += 15
  159. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  160. 'You continue to wander through the market for another 15 minutes when the boy from the Chinese stall comes up to you.'
  161. '"Hey, you really want that rice wine?" he asks after checking to make sure that no one is watching.'
  162. '"Yes," you answer him, "But it''s too expensive. I can''t afford it."'
  163. '"How about we make a deal." he says, "Go to the porn dealer and buy me a porn magazine and I''ll get you the wine."'
  164. if pornmarkonce = 0: pornmarkonce = 1 & '"Where can I find the porn dealer?" you ask and he happily gives you directions.'
  165. act 'Agree': porndeal = 1 & gt 'pavtrain_market', 4
  166. act 'Refuse':
  167. 'You decline his offer as he upsettingly walks away.'
  168. act 'Leave': gt 'pavtrain_market', 'start'
  169. end
  170. end
  171. end
  172. end
  173. elseif ShowerIvan = 5 and lookwine ! daystart:
  174. *clr & cla
  175. menu_off = 1
  176. gs 'stat'
  177. lookwine = daystart
  178. if month >= 11 or month <= 3:
  179. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinokw.jpg"></center>'
  180. else
  181. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinok.jpg"></center>'
  182. end
  183. 'You look around the market, but the Chinese vendors don''t seem to be here today.'
  184. act 'Leave': gt 'pavtrain_market', 'start'
  185. end
  186. if porndeal = 1 and porndealday ! daystart:
  187. *clr & cla
  188. menu_off = 1
  189. gs 'stat'
  190. porndealday = daystart
  191. lookboy = 0
  192. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  193. 'The boy from the Chinese stall comes up to you as you enter the market.'
  194. '"Do you have it?" he asks eagerly.'
  195. if haveporn = 1:
  196. porndeal = 2 & ! to close the ricewine event
  197. ricewine = 1
  198. '"Do you have the wine?" you counter.'
  199. 'He pulls the bottle out of his backpack and you trade items.'
  200. act 'Leave': gt 'pavtrain_market', 'start'
  201. else
  202. 'You tell him that you haven''t had time to pick up the magazine yet but you were working on it.'
  203. act 'Leave': gt 'pavtrain_market', 'start'
  204. end
  205. end
  206. if porndeal = 1 and porndealday = daystart and lookboy = 0:
  207. *clr & cla
  208. menu_off = 1
  209. gs 'stat'
  210. lookboy = 1
  211. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  212. 'You look around the market for the boy from the Chinese stall, but you can''t find him. You decide to look for him another day.'
  213. act 'Leave': gt 'pavtrain_market', 'start'
  214. end
  215. else
  216. act 'Wander through the market': gt 'pavtrain_market','events'
  217. act 'Go back to the station': minut += 3 & gt 'pavtrain'
  218. end
  219. end
  220. if $ARGS[0] = 'events':
  221. '<center><h2>Market</h2></center>'
  222. *clr & cla
  223. minut += 10
  224. menu_off = 1
  225. gs 'stat'
  226. rinevrand = rand(1,19)
  227. act 'Stop wandering': gt 'pavtrain_market', 'start'
  228. act 'Wander around the market': gt 'pavtrain_market','events'
  229. if rand(0,3) ! 0:
  230. gs 'pavtrain_market', rinevrand
  231. else
  232. $pavtrain_market_text[3]='you pass a stall, it is selling children''s clothes.'
  233. $pavtrain_market_text[4]='you see a woman looking for underwear.'
  234. $pavtrain_market_text[5]='you notice a half-naked girl trying on clothes.'
  235. $pavtrain_market_text[6]='you look away as a woman tries on a bra.'
  236. $pavtrain_market_text[7]='you don''t see anything unusual, just the usual vegetables and tasteless clothes.'
  237. $pavtrain_market_text[8]='you just see old women in dressing gowns and slippers. Stupid crappy market.'
  238. $pavtrain_market_text[9]='you don''t find anything interesting.'
  239. $pavtrain_market_text[10]='you just see cheap Chinese goods and nothing more.'
  240. $pavtrain_market_text[11]='you see all the usual stuff. People with bags scurrying back and forth, children begging for toys from their parents and vociferous traders.'
  241. $pavtrain_market_text[12]='you have to be careful as its so busy. The hustle and bustle makes it hard to find anything worthwhile.'
  242. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/brodit'+rand(1,8)+'.jpg"></center>'
  243. *nl
  244. 'As you are strolling through the market, ' + $pavtrain_market_text[rand(3,12)]
  245. killvar '$pavtrain_market_text'
  246. end
  247. end
  248. if ARGS[0] = 1:
  249. *clr & cla
  250. menu_off = 1
  251. gs 'stat'
  252. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika1.jpg"></center>'
  253. 'You are strolling through the market when a beggar asks you for some change.'
  254. act 'Don''t give money':
  255. *clr & cla
  256. gs 'stat'
  257. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika2.jpg"></center>'
  258. 'You ignore the beggar and pretend not to hear him.'
  259. act 'Stop wandering': gt 'pavtrain_market', 'start'
  260. act 'Wander around the market': gt 'pavtrain_market','events'
  261. end
  262. act 'Give some money':
  263. *clr & cla
  264. money -= rand(3,20)
  265. pcs_willpwr += 5
  266. pcs_mood += 5
  267. gs 'stat'
  268. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/podaet.jpg"></center>'
  269. 'You give the beggar a few rubles which he kindly thanks you for.'
  270. act 'Stop wandering': gt 'pavtrain_market', 'start'
  271. act 'Wander around the market': gt 'pavtrain_market','events'
  272. end
  273. end
  274. if ARGS[0] = 2:
  275. *clr & cla
  276. menu_off = 1
  277. minut += 5
  278. gs 'stat'
  279. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  280. 'You see an old man playing the guitar. He''s trying to avert as much attention as he can to himself.'
  281. act 'Stop wandering': gt 'pavtrain_market', 'start'
  282. act 'Wander around the market': gt 'pavtrain_market','events'
  283. end
  284. if ARGS[0] = 3:
  285. *clr & cla
  286. menu_off = 1
  287. gs 'stat'
  288. if month >= 11 or month <= 3:
  289. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/bookw.jpg"></center>'
  290. else
  291. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/book.jpg"></center>'
  292. end
  293. 'You find a stall selling various books, there are fantasy books, science fiction and romance novels, all of which costs only 350 <b>₽</b> each.'
  294. act 'Stop wandering': gt 'pavtrain_market', 'start'
  295. act 'Wander around the market': gt 'pavtrain_market','events'
  296. if money >= 350:
  297. act 'Buy a fantasy book (350 <b>₽</b>)':
  298. *clr & cla
  299. minut += 15
  300. money -= 350
  301. f_book += 1
  302. gs 'stat'
  303. 'You bought a fantasy book for 350 <b>₽</b>.'
  304. act 'Leave':gt 'pavtrain_market', 'start'
  305. end
  306. end
  307. if money >= 350:
  308. act 'Buy a science fiction book (350 <b>₽</b>)':
  309. *clr & cla
  310. minut += 15
  311. money -= 350
  312. f_book += 1
  313. gs 'stat'
  314. 'You bought a science ficiton book for 350 <b>₽</b>.'
  315. act 'Leave':gt 'pavtrain_market', 'start'
  316. end
  317. end
  318. if money >= 350:
  319. act 'Buy a romance novel (350 <b>₽</b>)':
  320. *clr & cla
  321. minut += 15
  322. money -= 350
  323. w_book += 1
  324. gs 'stat'
  325. 'You bought a romance novel for 350 <b>₽</b>.'
  326. act 'Leave':gt 'pavtrain_market', 'start'
  327. end
  328. end
  329. end
  330. if ARGS[0] = 4:
  331. *clr & cla
  332. menu_off = 1
  333. gs 'stat'
  334. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  335. 'You find a small stall that has many shelves with a large variety of porn magazines, a pack of brand new porn playing cards, and you can see several sex toys just behind the counter. The salesman watches over his stall with shifty eyes.'
  336. act 'Stop wandering': gt 'pavtrain_market', 'start'
  337. act 'Wander around the market': gt 'pavtrain_market','events'
  338. if money >= 699 and card < 2:
  339. act 'Buy cards (699 <b>₽</b>)':
  340. *clr & cla
  341. minut += 5
  342. money -= 699
  343. card = 2
  344. TimesBuyPorno += 1
  345. delact 'Buy cards'
  346. gs 'stat'
  347. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  348. 'You try not to look into the eyes of the porn dealer as you count the money. You quickly grab the cards and shove them in your purse.'
  349. act 'Leave':gt 'pavtrain_market', 'start'
  350. act 'Buy something else':gt 'pavtrain_market', 4
  351. end
  352. end
  353. if porndeal = 1:
  354. if money >= 400:
  355. act 'Buy a porn magazine for the Chinese boy (400 <b>₽</b>)':
  356. *clr & cla
  357. minut += 5
  358. money -= 400
  359. haveporn = 1
  360. gs 'stat'
  361. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  362. 'You try your best not to look into the eyes of the porn dealer as you count the money. You take the magazine and quickly hide it.'
  363. act 'Leave':gt 'pavtrain_market', 'start'
  364. act 'Buy something else':gt 'pavtrain_market', 4
  365. end
  366. end
  367. else
  368. act 'Browse the porn magazines':
  369. *clr & cla
  370. pcs_horny += 10
  371. gs 'stat'
  372. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  373. act 'Leave':gt 'pavtrain_market', 'start'
  374. act 'Look for something else':gt 'pavtrain_market', 4
  375. if TimesBuyPorno = 0:
  376. 'You look over the magazine covers, covered in images of half-naked girls on them. Many of them appear to be near your own age. The porn dealer notices your interest and looks at you expectantly.'
  377. act 'Look through a magazine':
  378. cla
  379. 'You pick up one of the magazines and flip through the pages. Inside the magazines, you see men with large erect penis engaging in sexual acts with women who are either half-naked or fully naked, most of them look close to your own age. You feel yourself getting aroused looking at the images.'
  380. act 'Leave':gt 'pavtrain_market', 'start'
  381. act 'Look for something else':gt 'pavtrain_market', 4
  382. act 'Ask for the price':
  383. *clr & cla
  384. minut += 5
  385. gs 'stat'
  386. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  387. 'Blushing profusely right down to your roots, you approach the porn dealer and stammeringly ask him the price on the magazines. The porn dealer smiles at you and says, "All magazines are 400 <b>₽</b> each."'
  388. act 'Leave':gt 'pavtrain_market', 'start'
  389. act 'Look for something else':gt 'pavtrain_market', 4
  390. if money >= 400:
  391. act 'Buy magazine (400 <b>₽</b>)':
  392. *clr & cla
  393. minut += 5
  394. money -= 400
  395. pornMagazine = 40
  396. TimesBuyPorno += 1
  397. gs 'stat'
  398. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  399. 'You try not to look into the porn dealers eyes as you hand him the money. You take the magazine and quickly hide it under your shirt.'
  400. act 'Leave':gt 'pavtrain_market', 'start'
  401. act 'Buy something else':gt 'pavtrain_market', 4
  402. end
  403. end
  404. end
  405. end
  406. elseif TimesBuyPorno > 0 and TimesBuyPorno < 5:
  407. 'The porn dealer notices you coming over and asks, "Looking to buy a magazine? They''re only 400 <b>₽</b> each."'
  408. act 'Look through a magazine':
  409. cla
  410. 'You pick up one of the magazines and flip through the pages. Inside the magazines, you see men with large erect penis engaging in sexual acts with women who are either half-naked or fully naked, most of them look close to your own age. You feel yourself getting aroused looking at the images.'
  411. act 'Leave':gt 'pavtrain_market', 'start'
  412. act 'Look for something else':gt 'pavtrain_market', 4
  413. if money >= 400:
  414. act 'Buy magazine (400 <b>₽</b>)':
  415. *clr & cla
  416. minut += 5
  417. money -= 400
  418. pornMagazine = 40
  419. TimesBuyPorno += 1
  420. gs 'stat'
  421. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  422. 'You try not to look into the porn dealers eyes as you hand him the money. You take the magazine and quickly hide it under your shirt.'
  423. act 'Leave':gt 'pavtrain_market', 'start'
  424. act 'Buy something else':gt 'pavtrain_market', 4
  425. end
  426. end
  427. end
  428. elseif TimesBuyPorno >= 5:
  429. 'The porn dealer sees you approaching the stall, "Ah, my best customer! Welcome back!"'
  430. act 'Look through a magazine':
  431. cla
  432. 'You pick up one of the magazines and flip through the pages. Inside the magazines, you see men with large erect penis engaging in sexual acts with women who are either half-naked or fully naked, most of them look close to your own age. You feel yourself getting aroused looking at the images.'
  433. act 'Leave':gt 'pavtrain_market', 'start'
  434. act 'Look for something else':gt 'pavtrain_market', 4
  435. if money >= 400:
  436. act 'Buy magazine (400 <b>₽</b>)':
  437. *clr & cla
  438. minut += 5
  439. money -= 400
  440. pornMagazine = 40
  441. TimesBuyPorno += 1
  442. gs 'stat'
  443. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  444. 'You try not to look into the porn dealers eyes as you hand him the money. You take the magazine and quickly hide it under your shirt.'
  445. act 'Leave':gt 'pavtrain_market', 'start'
  446. act 'Buy something else':gt 'pavtrain_market', 4
  447. end
  448. end
  449. end
  450. end
  451. end
  452. end
  453. act 'Ask to see the sex toys':
  454. *clr & cla
  455. gs 'stat'
  456. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/sextoys.jpg"></center>'
  457. 'He lets you step behind the counter so you can get a better look, as you do he says. "Take a look and let me know what you would like." You see several 15cm dildos. Each with a tag, "Only 700 <b>₽</b> each." You also see a small selection of vibrators in various colors, mostly pink. "Only 700 <b>₽</b> each." To one side you see many butt plugs, rubber and metal. "Only 700 <b>₽</b>each." Near the bottom is several strapon harnesses. "Only 1000 <b>₽</b>each."'
  458. act 'Leave':gt 'pavtrain_market', 'start'
  459. act 'Look for something else':gt 'pavtrain_market', 4
  460. act 'Buy dildo (700 <b>₽</b>)':
  461. cla
  462. if money >= 700 and dildo = 0:
  463. minut += 5
  464. dildo = 1
  465. money -= 700
  466. pcs_horny += 10
  467. TimesBuyPorno += 1
  468. if pcs_horny >= 50 and pav_slut < 75:
  469. 'You buy a dildo and hastily hide it, while your face blushes with embarrassment.'
  470. else
  471. 'You buy a dildo and calmly hide it.'
  472. end
  473. end
  474. act 'Leave':gt 'pavtrain_market', 'start'
  475. act 'Buy something else':gt 'pavtrain_market', 4
  476. end
  477. act 'Buy vibrator (700 <b>₽</b>)':
  478. cla
  479. if money >= 700 and vibrator = 0:
  480. minut += 5
  481. vibrator = 1
  482. money -= 700
  483. pcs_horny += 10
  484. TimesBuyPorno += 1
  485. if pcs_horny >= 50 and pav_slut < 75:
  486. 'You buy a vibrator and hastily hide it, while your face blushes with embarrassment.'
  487. else
  488. 'You buy a vibrator and calmly hide it.'
  489. end
  490. end
  491. act 'Leave':gt 'pavtrain_market', 'start'
  492. act 'Buy something else':gt 'pavtrain_market', 4
  493. end
  494. act 'Buy butt plug (700 <b>₽</b>)':
  495. cla
  496. if money >= 700 and analplug = 0:
  497. minut += 5
  498. money -= 700
  499. analplug = 1
  500. pcs_horny += 10
  501. TimesBuyPorno += 1
  502. if pcs_horny >= 50 and pav_slut < 75:
  503. 'You buy a butt plug and hastily hide it, while your face blushes with embarrassment.'
  504. else
  505. 'You buy a butt plug and calmly hide it.'
  506. end
  507. end
  508. act 'Leave':gt 'pavtrain_market', 'start'
  509. act 'Buy something else':gt 'pavtrain_market', 4
  510. end
  511. act 'Buy strap-on harness (1000 <b>₽</b>)':
  512. cla
  513. if money >= 1000 and strapon = 0:
  514. minut += 5
  515. strapon = 1
  516. money -= 1000
  517. pcs_horny += 10
  518. TimesBuyPorno += 1
  519. if pcs_horny >= 50 and pav_slut < 75:
  520. 'You buy a strap-on harness and hastily hide it, while your face blushes with embarrassment.'
  521. else
  522. 'You buy a strap-on harness and calmly hide it.'
  523. end
  524. end
  525. act 'Leave':gt 'pavtrain_market', 'start'
  526. act 'Buy something else':gt 'pavtrain_market', 4
  527. end
  528. end
  529. end
  530. if ARGS[0] = 5:
  531. *clr & cla
  532. menu_off = 1
  533. minut += 5
  534. gs 'stat'
  535. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  536. 'You see an old man playing the guitar. He''s trying to avert as much attention as he can to himself.'
  537. act 'Stop wandering': gt 'pavtrain_market', 'start'
  538. act 'Wander around the market': gt 'pavtrain_market','events'
  539. end
  540. if ARGS[0] = 6:
  541. *clr & cla
  542. menu_off = 1
  543. minut += 5
  544. gs 'stat'
  545. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/nenavizublyadcigan.jpg"></center>'
  546. 'You meet a Gypsy woman. She offers to tell your fortune.'
  547. act 'Decline': gt 'pavtrain_market', 'start'
  548. act 'Accept':
  549. *clr & cla
  550. minut += 5
  551. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gadaet'+rand(1,2)+'.jpg"></center>'
  552. 'You agree and Gypsy takes your hand before she predicts you will have great happiness and lots of money. Afterwards, she promptly walks away.'
  553. act 'Something''s wrong':
  554. *clr & cla
  555. money = 0
  556. pcs_mood -= 50
  557. gs 'stat'
  558. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pusto.jpg"></center>'
  559. 'With a sneaking suspicion you start looking through your stuff. Your wallet is nowhere to be found!'
  560. act 'Find the Gypsy':
  561. *clr & cla
  562. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/okliknut.jpg"></center>'
  563. 'You search the area hoping to find the thief, but she has already disappeared into the crowd.'
  564. act 'Back': gt 'pavtrain_market', 'start'
  565. end
  566. end
  567. end
  568. end
  569. if ARGS[0] = 7:
  570. *clr & cla
  571. menu_off = 1
  572. minut += 5
  573. gs 'stat'
  574. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/kosmetic.jpg"></center>'
  575. tovpay = 800
  576. 'You see some cosmetics on sale for <<tovpay>> <b>₽</b>.'
  577. act 'Stop wandering': gt 'pavtrain_market', 'start'
  578. act 'Wander around the market': gt 'pavtrain_market','events'
  579. if money >= tovpay:
  580. act 'Buy the cosmetics (800 <b>₽</b>)':
  581. minut += 15
  582. money -= tovpay
  583. kosmetica += 50
  584. gt 'pavtrain_market', 'start'
  585. end
  586. end
  587. end
  588. if ARGS[0] = 8:
  589. *clr & cla
  590. menu_off = 1
  591. minut += 5
  592. gs 'stat'
  593. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vitaminki.jpg"></center>'
  594. tovpay = 105
  595. 'You see some vitamins on sale for <<tovpay>> <b>₽</b>.'
  596. act 'Stop wandering': gt 'pavtrain_market', 'start'
  597. act 'Wander around the market': gt 'pavtrain_market','events'
  598. if money >= tovpay:
  599. act 'Buy vitamins (105 <b>₽</b>)':
  600. minut += 15
  601. vitamin += 20
  602. money -= tovpay
  603. gt 'pavtrain_market', 'start'
  604. end
  605. end
  606. end
  607. if ARGS[0] = 9:
  608. *clr & cla
  609. menu_off = 1
  610. minut += 5
  611. gs 'stat'
  612. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/condoms.jpg"></center>'
  613. tovpay = 80
  614. 'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
  615. act 'Stop wandering': gt 'pavtrain_market', 'start'
  616. act 'Wander around the market': gt 'pavtrain_market','events'
  617. if money >= tovpay:
  618. act 'Buy condoms (80 <b>₽</b>)':
  619. minut += 15
  620. prezik += 5
  621. i = 5
  622. :cndmlp
  623. if rand(0,49)-6*(8-tovpay/10) <= 0:badprezik += 1
  624. if i > 0: i-= 1 & jump 'cndmlp'
  625. killvar 'i'
  626. money -= tovpay
  627. gt 'pavtrain_market', 'start'
  628. end
  629. end
  630. end
  631. if ARGS[0] = 10:
  632. *clr & cla
  633. menu_off = 1
  634. minut += 5
  635. gs 'stat'
  636. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/balzam.jpg"></center>'
  637. tovpay = 100
  638. 'There is lip balm on sale for <<tovpay>> <b>₽</b>.'
  639. act 'Stop wandering': gt 'pavtrain_market', 'start'
  640. act 'Wander around the market': gt 'pavtrain_market','events'
  641. if money >= tovpay:
  642. act 'Buy lip balm (100 <b>₽</b>)':
  643. *clr & cla
  644. minut += 15
  645. lipbalm += 30
  646. money -= tovpay
  647. gt 'pavtrain_market', 'start'
  648. end
  649. end
  650. end
  651. if ARGS[0] = 11:
  652. *clr & cla
  653. menu_off = 1
  654. minut += 5
  655. gs 'stat'
  656. if arturKnow = 0:
  657. 'Someone suddenly calls out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
  658. act 'Look': gt 'arturRinok','start'
  659. else
  660. 'Someone suddenly calls out to you, "Hey <<$pcs_nickname>>, do you want a fresh, juicy tangerine?"'
  661. act 'Go and see Aurel': gt 'arturRinok','start'
  662. end
  663. end
  664. if ARGS[0] = 12:
  665. *clr & cla
  666. menu_off = 1
  667. minut += 5
  668. gs 'stat'
  669. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/cheburek.jpg"></center>'
  670. 'Walking through the market, you came across an old woman selling pies.'
  671. act 'Stop wandering': gt 'pavtrain_market', 'start'
  672. act 'Wander around the market': gt 'pavtrain_market','events'
  673. if pcs_energy <= 80:
  674. act 'Buy a pie for 20 <b>₽</b>':
  675. *clr & cla
  676. fat+=3
  677. frost = 0
  678. pcs_health += 5
  679. pcs_mood += 5
  680. pcs_hydra -= 5
  681. pcs_energy+=5
  682. money-=20
  683. minut+=10
  684. gs 'stat'
  685. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/eat.jpg"></center>'
  686. 'The pie is still warm as the woman hands it over to you. Barely able to keep yourself away from it, you find a place to sit down and enjoy the pie.'
  687. act 'Continue walking through the market': gt 'pavtrain_market','events'
  688. end
  689. else
  690. *p ', But you are not hungry right now.'
  691. end
  692. end
  693. if ARGS[0] = 13:
  694. *clr & cla
  695. menu_off = 1
  696. minut += 5
  697. gs 'stat'
  698. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dropwallet.jpg"></center>'
  699. 'You see a wallet fall out of a woman''s purse.'
  700. act 'Tell her':
  701. *clr & cla
  702. minut += 2
  703. gs 'stat'
  704. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vernutwallet.jpg"></center>'
  705. 'You call to the woman and hold out her wallet. She looks at you and releasing she gratefully takes her wallet back and walks away.'
  706. act 'Continue walking through the market': gt 'pavtrain_market','events'
  707. end
  708. act 'Look through the purse':
  709. *clr & cla
  710. minut += 5
  711. gs 'stat'
  712. i = rand(40,200)
  713. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/zaglanut.jpg"></center>'
  714. 'You open the wallet and you see that there''s <<i>> <b>₽</b>'
  715. act 'Take the money and throw away the wallet':
  716. money += i
  717. pcs_mood += 10
  718. killvar 'i'
  719. gt 'pavtrain_market', 'start'
  720. end
  721. act 'Catch up with the woman and return her purse':
  722. *clr & cla
  723. pcs_mood += 5
  724. gs 'stat'
  725. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/proverka.jpg"></center>'
  726. 'You catch up with the woman and telling her she dropped something you hand her the purse. The woman checks her money is still there and seeing that everything is in place, she thanks you and walked away.'
  727. act 'Stop wandering': gt 'pavtrain_market', 'start'
  728. act 'Wander around the market': gt 'pavtrain_market','events'
  729. end
  730. end
  731. end
  732. if ARGS[0] = 14:
  733. *clr & cla
  734. menu_off = 1
  735. minut += 5
  736. gs 'stat'
  737. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rebenok.jpg"></center>'
  738. 'You see a young mother and her crying baby.'
  739. act 'Stop wandering': gt 'pavtrain_market', 'start'
  740. act 'Wander around the market': gt 'pavtrain_market','events'
  741. end
  742. if ARGS[0] = 15:
  743. *clr & cla
  744. menu_off = 1
  745. minut += 5
  746. gs 'stat'
  747. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rezba.jpg"></center>'
  748. 'You find a stall with beautiful things carved out of wood and metal.'
  749. act 'Stop wandering': gt 'pavtrain_market', 'start'
  750. act 'Wander around the market': gt 'pavtrain_market','events'
  751. end
  752. if ARGS[0] = 16:
  753. *clr & cla
  754. menu_off = 1
  755. minut += 5
  756. gs 'stat'
  757. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gruzchik.jpg"></center>'
  758. 'Looking around, you almost collide with a man pulling a small cart.'
  759. act 'Stop wandering': gt 'pavtrain_market', 'start'
  760. act 'Wander around the market': gt 'pavtrain_market','events'
  761. end
  762. if ARGS[0] = 17:
  763. *clr & cla
  764. menu_off = 1
  765. minut += 5
  766. gs 'stat'
  767. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/meatlavka.jpg"></center>'
  768. 'You wander past a the meet seller and see a butcher working with an axe.'
  769. act 'Stop wandering': gt 'pavtrain_market', 'start'
  770. act 'Wander around the market': gt 'pavtrain_market','events'
  771. end
  772. if ARGS[0] = 18:
  773. *clr & cla
  774. menu_off = 1
  775. minut += 5
  776. gs 'stat'
  777. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dirka.jpg"></center>'
  778. 'As you walk past a stall you notice a small hole torn in the canvas.'
  779. act 'Stop wandering': gt 'pavtrain_market', 'start'
  780. act 'Wander around the market': gt 'pavtrain_market','events'
  781. act 'Look through the hole':
  782. *clr & cla
  783. if girl > 1: pcs_horny += 5
  784. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pereodev'+rand(1,15)+'.jpg"></center>'
  785. 'You look inside the tent and see ' + $pavtrain_marketrandtext[rand(3,7)]
  786. act 'Leave': gt 'pavtrain_market', 'start'
  787. end
  788. end
  789. if ARGS[0] = 19:
  790. *clr & cla
  791. menu_off = 1
  792. minut += 5
  793. gs 'stat'
  794. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/birthcontrolpills.jpg"></center>'
  795. tovpay = 1500
  796. 'You see a booth selling birth control pills for <<tovpay>> <b>₽</b>.'
  797. act 'Stop wandering': gt 'pavtrain_market', 'start'
  798. act 'Wander around the market': gt 'pavtrain_market','events'
  799. if money >= tovpay:
  800. act 'Buy birth control pills (1500 <b>₽</b>)':
  801. *clr & cla
  802. minut += 15
  803. tabletki += 1
  804. if rand(0,49) - (6*(8-tovpay/50)) <= 0:
  805. temp = rand(0,3)
  806. if temp = 0:
  807. tabletkiold += 1 & !Pills are expired and less effective
  808. elseif temp = 1:
  809. tabletkifake += 1 & !Pills are counterfeit and useless
  810. elseif temp = 2:
  811. tabletkirej += 1 & !Pills are factory rejects with variable strength
  812. else
  813. !Pills were tampered with
  814. if rand(0,100) = 0:
  815. tabletkifert += 1 & ! pills were replaced with fertility hormones
  816. else
  817. tabletkisug += 1 & ! pills were all replaced with sugar pills
  818. end
  819. end
  820. end
  821. money -= tovpay
  822. gt 'pavtrain_market', 'start'
  823. end
  824. end
  825. end
  826. --- pavtrain_market ---------------------------------