1
0

pavtrain_market.qsrc 28 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792
  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><h4>Market</h4></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. 'This small open air market is located near the train station.'
  34. if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
  35. act 'Wait for Aurel to arrive':hour = 12 & gt 'pavtrain_market', 'start'
  36. end
  37. if hour >= 8 and hour <= 18:
  38. 'In the market the sellers of goods are beckoning shoppers.'
  39. if pav_slut >= 50 and rand(0,9) = 0:
  40. '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."'
  41. act 'Go with him':gt 'gevent', '3'
  42. act 'Reject him':
  43. menu_off = 1
  44. cla
  45. 'You pretend not to understand what he is saying.'
  46. act 'Return':gt 'pavtrain_market', 'start'
  47. end
  48. exit
  49. end
  50. act 'Wander through the market': gt 'pavtrain_market','events'
  51. act 'Go back to the station': minut += 3 & gt 'pavtrain'
  52. !expand market events from 1.2.4
  53. if arturKnow = 1 and arturQW = 0:
  54. act 'Look for Aurel':gt 'arturRinok', 'start'
  55. elseif arturQW = 1 and (week = 6 or week = 7):
  56. if hour = 12 or hour = 13:
  57. act 'Look for Aurel':gt 'arturRinok', 'work_1'
  58. end
  59. elseif arturQW = 2:
  60. if hour = 16 and minut <= 30:
  61. act 'Look for Aurel':gt 'arturRinok', 'work_2'
  62. elseif hour < 16:
  63. act 'Wait for Aurel to arrive':hour = 16 & minut = 0 & gt 'pavtrain_market', 'start'
  64. end
  65. end
  66. if gobelen > 0 and gobQW = 0:
  67. act'Sell ​​tapestry':
  68. menu_off = 1
  69. cls
  70. gobQW = 1
  71. minut += 15
  72. gs'stat'
  73. '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."'
  74. '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.'
  75. act 'Leave':gt 'pavtrain_market', 'start'
  76. end
  77. end
  78. if gobelen > 0 and gobQW >= 1:
  79. act'Sell ​​tapestry':
  80. menu_off = 1
  81. cls
  82. minut += 15
  83. gs'stat'
  84. 'You go to the man who offered to buy your tapestries for 1000 <b>₽</b>. You find him by his stall, smiling.'
  85. if gobQW = 2:
  86. 'Roman welcomes you. He is interested and businesslike as he asks what you have for sale.'
  87. end
  88. if gobQW = 1:
  89. gobQW = 2
  90. minute + 5
  91. '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.'
  92. end
  93. act'Show your tapestry':
  94. cls
  95. gobelen -= 1
  96. money += 1000
  97. gs'stat'
  98. 'You show your tapestry to Roman and he gives you five hundred for it. You take the money and give him the tapestry.'
  99. act 'Leave':gt 'pavtrain_market', 'start'
  100. end
  101. if gobelen > 1:
  102. act'Sell all of your tapestries':
  103. cls
  104. kolgob = gobelen
  105. gobelen = 0
  106. moneyGob = kolgob*1000
  107. money += moneyGob
  108. gs'stat'
  109. 'You show Roman your tapestries and he gives you <<moneyGob>> <b>₽</b> for them. You take the money and give him the tapestries.'
  110. act 'Leave':gt 'pavtrain_market', 'start'
  111. end
  112. end
  113. act 'Leave':gt 'pavtrain_market', 'start'
  114. end
  115. end
  116. if ShowerIvan = 5 and porndeal = 0 and rand(1,10) <= 4 and lookwine ! daystart:
  117. *clr
  118. cla
  119. gs 'stat'
  120. minut += 20
  121. menu_off = 1
  122. lookwine = daystart
  123. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  124. '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.'
  125. act 'Ask about huangjiu':
  126. cla
  127. '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.'
  128. '"Onry 2 kopec, hundred glam." she said in badly accented Russian, "You buy?"'
  129. '"No," you replied, "I need rice wine, rice wine."'
  130. 'She looked at you in confusion for a moment then suddenly brightened, "Ah!" she exclaimed, "Come, come!"'
  131. 'The old woman hurried to the other side of the stall and you followed her to where a number of smoked piglets hung in a row.'
  132. '"Here," the old woman crowed handing you one of r the pigs, "Nice swine, vely nice swine."'
  133. '"No, not nice swine," you cried in dispair, "Rice. Wine."'
  134. '"Yes, yes," the woman countered, "Nice swine, only 5 lubles."'
  135. 'Just as you were about to give up, a young Chinese boy about your brother''s age arrived.'
  136. '"I am sorry, my grandmother does not speak much Russian." he said as he stepped up beside the old woman who started to speak rapidly to him in what you assumed was Chinese.'
  137. '"My grandmother asks why you don''t like the piglets." he translated as the old woman stopped speaking.'
  138. '"I don''t want a pig," you replied in relief as his Russian is quite good, "I am looking for rice wine, wang-goo."'
  139. '"Ah, huangjiu!" he said in understanding then spoke to his grandmother in Chinese.'
  140. 'The old woman glared at you then hung the smoked pig back on its hook. She shuffled over to the shelf with the bottles and peered short-sightedly at the labels. She finally picked up one of them and brought it over to you.'
  141. '"Why you not say wanted lice wine." she asked in aggrieved tones, "500 lubles."'
  142. if money >= 500:
  143. act 'Buy the wine':
  144. cla
  145. money -= 500
  146. ricewine = 1
  147. 'You hand the woman the money and she gives you the wine.'
  148. act 'Leave': gt 'pavtrain_market', 'start'
  149. end
  150. else
  151. 'You are astonished by the price and realize that you cannot afford the wine. You apologize and turn away.'
  152. act 'Leave the market': gt 'pavtrain_market', 'start'
  153. act 'Continue browsing the market':
  154. *clr
  155. cla
  156. gs 'stat'
  157. minut += 15
  158. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  159. 'You continued to wander through the market for another 15 minutes when the boy from the Chinese stall came up to you.'
  160. '"Hey, you really want that rice wine?" he asked after checking to make sure no one was watching.'
  161. '"Yes," you answered him, "But it costs too much. I can''t afford it."'
  162. '"I''ll make a deal with you." he said, "Go to the porn dealer and buy me a porn magazine and I''ll get you the wine."'
  163. if pornmarkonce = 0: pornmarkonce = 1 & '"Where is the porn dealer?" you asked and he gives you directions.'
  164. act 'Agree': porndeal = 1 & gt 'pavtrain_market', 4
  165. act 'Refuse':
  166. 'You declined his offer and he shrugged and walked away.'
  167. act 'Leave': gt 'pavtrain_market', 'start'
  168. end
  169. end
  170. end
  171. end
  172. elseif ShowerIvan = 5 and lookwine ! daystart:
  173. cla
  174. *clr
  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
  188. cla
  189. menu_off = 1
  190. gs 'stat'
  191. porndealday = daystart
  192. lookboy = 0
  193. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  194. 'The boy from the Chinese stall comes up to you as you entered the market.'
  195. '"Do you have it?" he asked eagerly.'
  196. if haveporn = 1:
  197. porndeal = 2 & ! to close the ricewine event
  198. ricewine = 1
  199. '"Do you have the wine?" you countered.'
  200. 'He pulls the bottle out of his backpack and you trade items.'
  201. act 'Leave': gt 'pavtrain_market', 'start'
  202. else
  203. 'You told him you didn''t have his magazine yet but you were working on it.'
  204. act 'Leave': gt 'pavtrain_market', 'start'
  205. end
  206. end
  207. if porndeal = 1 and porndealday = daystart and lookboy = 0:
  208. cls
  209. cla
  210. menu_off = 1
  211. gs 'stat'
  212. lookboy = 1
  213. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  214. '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.'
  215. act 'Leave': gt 'pavtrain_market', 'start'
  216. end
  217. else
  218. act 'Wander through the market': gt 'pavtrain_market','events'
  219. act 'Go back to the station': minut += 3 & gt 'pavtrain'
  220. end
  221. end
  222. if $ARGS[0] = 'events':
  223. cls
  224. cla
  225. '<center><h4>Market</h4></center>'
  226. minut += 10
  227. menu_off = 1
  228. gs 'stat'
  229. rinevrand = rand(1,19)
  230. act 'Wander around the market': gt 'pavtrain_market','events'
  231. act 'Stop wandering': gt 'pavtrain_market', 'start'
  232. if rand(0,3) ! 0:
  233. gs 'pavtrain_market', rinevrand
  234. else
  235. $pavtrain_market_text[3]='you pass a stall, it is selling children''s clothes.'
  236. $pavtrain_market_text[4]='you see a woman looking for underwear.'
  237. $pavtrain_market_text[5]='you notice a half-naked girl trying on clothes.'
  238. $pavtrain_market_text[6]='you look away as a woman tries on a bra'
  239. $pavtrain_market_text[7]='you don''t see anything unusual, just the usual vegetables and tasteless clothes.'
  240. $pavtrain_market_text[8]='you just see old women in dressing gowns and slippers. Stupid crappy market.'
  241. $pavtrain_market_text[9]='you don''t find anything interesting'
  242. $pavtrain_market_text[10]='you just see cheap Chinese goods and nothing more.'
  243. $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.'
  244. $pavtrain_market_text[12]='you have to be careful as its so busy. The hustle and bustle makes it hard to find anything worthwhile.'
  245. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/brodit'+rand(1,8)+'.jpg"></center>'
  246. 'As you are strolling through the market, ' + $pavtrain_market_text[rand(3,12)]
  247. killvar '$pavtrain_market_text'
  248. end
  249. end
  250. if ARGS[0] = 1:
  251. cla
  252. *clr
  253. menu_off = 1
  254. gs 'stat'
  255. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika1.jpg"></center>'
  256. 'You are strolling through the market when a beggar asks you for some change.'
  257. act 'Don''t give money':
  258. cla
  259. *clr
  260. gs 'stat'
  261. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika2.jpg"></center>'
  262. 'You ignore the begger and pretend not to hear him.'
  263. act 'Wander around the market': gt 'pavtrain_market','events'
  264. end
  265. act 'Give some money':
  266. cla
  267. *clr
  268. money -= rand(3,20)
  269. pcs_willpwr += 5
  270. pcs_mood += 5
  271. gs 'stat'
  272. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/podaet.jpg"></center>'
  273. 'You give the beggar a few rubles'
  274. act 'Wander around the market': gt 'pavtrain_market','events'
  275. end
  276. end
  277. if ARGS[0] = 2:
  278. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  279. 'You see an old man playing the guitar.'
  280. end
  281. if ARGS[0] = 3:
  282. cls
  283. menu_off = 1
  284. gs 'stat'
  285. if month >= 11 or month <= 3:
  286. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/bookw.jpg"></center>'
  287. else
  288. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/book.jpg"></center>'
  289. end
  290. '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.'
  291. act 'Leave':gt 'pavtrain_market', 'start'
  292. if money >= 350:
  293. act 'Buy a fantasy book (350 <b>₽</b>)':
  294. cls
  295. minut += 15
  296. money -= 350
  297. f_book += 1
  298. gs 'stat'
  299. 'You bought a fantasy book for 350 <b>₽</b>.'
  300. act 'Leave':gt 'pavtrain_market', 'start'
  301. end
  302. end
  303. if money >= 350:
  304. act 'Buy a science fiction book (350 <b>₽</b>)':
  305. cls
  306. minut += 15
  307. money -= 350
  308. f_book += 1
  309. gs 'stat'
  310. 'You bought a science ficiton book for 350 <b>₽</b>.'
  311. act 'Leave':gt 'pavtrain_market', 'start'
  312. end
  313. end
  314. if money >= 350:
  315. act 'Buy a romance novel (350 <b>₽</b>)':
  316. cls
  317. minut += 15
  318. money -= 350
  319. w_book += 1
  320. gs 'stat'
  321. 'You bought a romance novel for 350 <b>₽</b>.'
  322. act 'Leave':gt 'pavtrain_market', 'start'
  323. end
  324. end
  325. end
  326. if ARGS[0] = 4:
  327. cla
  328. *clr
  329. menu_off = 1
  330. gs 'stat'
  331. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  332. '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.'
  333. act 'Leave':gt 'pavtrain_market', 'start'
  334. if money >= 699 and card < 2:
  335. act 'Buy cards (699 <b>₽</b>)':
  336. cls
  337. minut += 5
  338. money -= 699
  339. card = 2
  340. TimesBuyPorno += 1
  341. delact 'Buy cards'
  342. gs 'stat'
  343. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  344. 'You tried not to look into the eyes of the porn dealer as you counted out the money. You took the cards and quickly put them in your purse.'
  345. act 'Leave':gt 'pavtrain_market', 'start'
  346. act 'Buy something else':gt 'pavtrain_market', 4
  347. end
  348. end
  349. if porndeal = 1:
  350. if money >= 400:
  351. act 'Buy a porn magazine for the Chinese boy (400 <b>₽</b>)':
  352. cls
  353. minut += 5
  354. money -= 400
  355. haveporn = 1
  356. gs 'stat'
  357. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  358. 'You tried not to look into the eyes of the porn dealer as you counted out the money. You took the magazine and quickly hid it.'
  359. act 'Leave':gt 'pavtrain_market', 'start'
  360. act 'Buy something else':gt 'pavtrain_market', 4
  361. end
  362. end
  363. else
  364. act 'Browse the porn magazines':
  365. cls
  366. pcs_horny += 10
  367. gs 'stat'
  368. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  369. act 'Leave':gt 'pavtrain_market', 'start'
  370. act 'Look for something else':gt 'pavtrain_market', 4
  371. if TimesBuyPorno = 0:
  372. 'You look over the covers of the magazines, covered in images of half-naked girls on them. Many of them appear to be near your own age. The porn dealer noticed your interest and looks at you expectantly.'
  373. act 'Look through a magazine':
  374. cla
  375. '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.'
  376. act 'Leave':gt 'pavtrain_market', 'start'
  377. act 'Look for something else':gt 'pavtrain_market', 4
  378. act 'Ask for the price':
  379. cls
  380. minut += 5
  381. gs 'stat'
  382. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  383. '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."'
  384. act 'Leave':gt 'pavtrain_market', 'start'
  385. act 'Look for something else':gt 'pavtrain_market', 4
  386. if money >= 400:
  387. act 'Buy magazine (400 <b>₽</b>)':
  388. cls
  389. minut += 5
  390. money -= 400
  391. pornMagazine = 40
  392. TimesBuyPorno += 1
  393. gs 'stat'
  394. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  395. '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.'
  396. act 'Leave':gt 'pavtrain_market', 'start'
  397. act 'Buy something else':gt 'pavtrain_market', 4
  398. end
  399. end
  400. end
  401. end
  402. elseif TimesBuyPorno > 0 and TimesBuyPorno < 5:
  403. 'The porn dealer notices you coming over and asks, "Looking to buy a magazine? They''re only 400 <b>₽</b> each."'
  404. act 'Look through a magazine':
  405. cla
  406. '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.'
  407. act 'Leave':gt 'pavtrain_market', 'start'
  408. act 'Look for something else':gt 'pavtrain_market', 4
  409. if money >= 400:
  410. act 'Buy magazine':
  411. cls
  412. minut += 5
  413. money -= 400
  414. pornMagazine = 40
  415. TimesBuyPorno += 1
  416. gs 'stat'
  417. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  418. '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.'
  419. act 'Leave':gt 'pavtrain_market', 'start'
  420. act 'Buy something else':gt 'pavtrain_market', 4
  421. end
  422. end
  423. end
  424. elseif TimesBuyPorno >= 5:
  425. 'The porn dealer see you approaching. "Ah, my best customer!"'
  426. act 'Look through a magazine':
  427. cla
  428. '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.'
  429. act 'Leave':gt 'pavtrain_market', 'start'
  430. act 'Look for something else':gt 'pavtrain_market', 4
  431. if money >= 400:
  432. act 'Buy magazine':
  433. cls
  434. minut += 5
  435. money -= 400
  436. pornMagazine = 40
  437. TimesBuyPorno += 1
  438. gs 'stat'
  439. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  440. '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.'
  441. act 'Leave':gt 'pavtrain_market', 'start'
  442. act 'Buy something else':gt 'pavtrain_market', 4
  443. end
  444. end
  445. end
  446. end
  447. end
  448. end
  449. act 'Ask to see the sex toys':
  450. cls
  451. gs 'stat'
  452. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/sextoys.jpg"></center>'
  453. '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."'
  454. act 'Leave':gt 'pavtrain_market', 'start'
  455. act 'Look for something else':gt 'pavtrain_market', 4
  456. act 'Buy dildo (700 <b>₽</b>)':
  457. cla
  458. if money >= 700 and dildo = 0:
  459. minut += 5
  460. dildo = 1
  461. money -= 700
  462. pcs_horny += 10
  463. TimesBuyPorno += 1
  464. if pcs_horny >= 50 and pav_slut < 75:
  465. 'You buy a dildo and hastily hid it, while your face blushes your embarrassment.'
  466. else
  467. 'You buy a dildo and calmly hide it.'
  468. end
  469. end
  470. act 'Leave':gt 'pavtrain_market', 'start'
  471. act 'Buy something else':gt 'pavtrain_market', 4
  472. end
  473. act 'Buy vibrator (700 <b>₽</b>)':
  474. cla
  475. if money >= 700 and vibrator = 0:
  476. minut += 5
  477. vibrator = 1
  478. money -= 700
  479. pcs_horny += 10
  480. TimesBuyPorno += 1
  481. if pcs_horny >= 50 and pav_slut < 75:
  482. 'You buy a vibrator and hastily hid it, while your face blushes your embarrassment.'
  483. else
  484. 'You buy a vibrator and calmly hide it.'
  485. end
  486. end
  487. act 'Leave':gt 'pavtrain_market', 'start'
  488. act 'Buy something else':gt 'pavtrain_market', 4
  489. end
  490. act 'Buy butt plug (700 <b>₽</b>)':
  491. cla
  492. if money >= 700 and analplug = 0:
  493. minut += 5
  494. money -= 700
  495. analplug = 1
  496. pcs_horny += 10
  497. TimesBuyPorno += 1
  498. if pcs_horny >= 50 and pav_slut < 75:
  499. 'You buy a butt plug and hastily hid it, while your face blushesd your embarrassment.'
  500. else
  501. 'You buy a butt plug and calmly hide it.'
  502. end
  503. end
  504. act 'Leave':gt 'pavtrain_market', 'start'
  505. act 'Buy something else':gt 'pavtrain_market', 4
  506. end
  507. act 'Buy strapon harness (1000 <b>₽</b>)':
  508. cla
  509. if money >= 1000 and strapon = 0:
  510. minut += 5
  511. strapon = 1
  512. money -= 1000
  513. pcs_horny += 10
  514. TimesBuyPorno += 1
  515. if pcs_horny >= 50 and pav_slut < 75:
  516. 'You buy a strapon harness and hastily hid it, while your face blushes your embarrassment.'
  517. else
  518. 'You buy a strapon harness and calmly hide it.'
  519. end
  520. end
  521. act 'Leave':gt 'pavtrain_market', 'start'
  522. act 'Buy something else':gt 'pavtrain_market', 4
  523. end
  524. end
  525. end
  526. if ARGS[0] = 5:
  527. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  528. 'You see an old man playing the guitar.'
  529. end
  530. if ARGS[0] = 6:
  531. menu_off = 1
  532. gs 'stat'
  533. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/nenavizublyadcigan.jpg"></center>'
  534. 'You meet a Gypsy woman. She offers to tell your fortune.'
  535. act 'Agree':
  536. cla
  537. *clr
  538. minut += 5
  539. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gadaet'+rand(1,2)+'.jpg"></center>'
  540. 'You agree and Gypsy takes your hand before she predicts you will have great happiness and lots of money. Afterwards, she promptly walks away.'
  541. act 'Something''s wrong':
  542. cla
  543. *clr
  544. money = 0
  545. pcs_mood -= 50
  546. gs 'stat'
  547. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pusto.jpg"></center>'
  548. 'With a sneaking suspicion you start looking through your stuff. Your wallet is nowhere to be found!'
  549. act 'Find the Gypsy':
  550. cla
  551. *clr
  552. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/okliknut.jpg"></center>'
  553. 'You search the area hoping to find the thief, but she has already disappeared into the crowd.'
  554. act 'Back': gt 'pavtrain_market', 'start'
  555. end
  556. end
  557. end
  558. end
  559. if ARGS[0] = 7:
  560. menu_off = 1
  561. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/kosmetic.jpg"></center>'
  562. tovpay = 800
  563. 'You see some cosmetics on sale for <<tovpay>> <b>₽</b>.'
  564. if money >= tovpay:
  565. act 'Buy':
  566. cls
  567. minut += 15
  568. money -= tovpay
  569. kosmetica += 50
  570. gs 'stat'
  571. gt 'pavtrain_market', 'start'
  572. end
  573. end
  574. end
  575. if ARGS[0] = 8:
  576. menu_off = 1
  577. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vitaminki.jpg"></center>'
  578. tovpay = 105
  579. 'You see some vitamins on sale for <<tovpay>> <b>₽</b>.'
  580. if money >= tovpay:
  581. act 'Buy':
  582. cls
  583. minut += 15
  584. vitamin += 20
  585. money -= tovpay
  586. gt 'pavtrain_market', 'start'
  587. end
  588. end
  589. end
  590. if ARGS[0] = 9:
  591. menu_off = 1
  592. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/condoms.jpg"></center>'
  593. tovpay = 80
  594. 'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
  595. if money >= tovpay:
  596. act 'Buy':
  597. cls
  598. minut += 15
  599. prezik += 5
  600. i = 5
  601. :cndmlp
  602. if rand(0,49)-6*(8-tovpay/10) <= 0:badprezik += 1
  603. if i > 0: i-= 1 & jump 'cndmlp'
  604. killvar 'i'
  605. money -= tovpay
  606. gt 'pavtrain_market', 'start'
  607. end
  608. end
  609. end
  610. if ARGS[0] = 10:
  611. menu_off = 1
  612. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/balzam.jpg"></center>'
  613. tovpay = 100
  614. 'There is lip balm on sale for <<tovpay>> <b>₽</b>.'
  615. if money >= tovpay:
  616. act 'Buy':
  617. cls
  618. minut += 15
  619. lipbalm += 30
  620. money -= tovpay
  621. gt 'pavtrain_market', 'start'
  622. end
  623. end
  624. end
  625. if ARGS[0] = 11:
  626. menu_off = 1
  627. if arturKnow = 0:
  628. 'Someone suddenly calls out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
  629. act 'Look': gt 'arturRinok','start'
  630. else
  631. 'Someone suddenly calls out to you, "Hey <<$pcs_nickname>>, do you want a fresh, juicy tangerine?"'
  632. act 'Go and see Aurel': gt 'arturRinok','start'
  633. end
  634. end
  635. if ARGS[0] = 12:
  636. menu_off = 1
  637. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/cheburek.jpg"></center>'
  638. 'Walking through the market, you came across an old woman selling pies.'
  639. if pcs_energy <= 80:
  640. act 'Buy a pie for 20 <b>₽</b>':
  641. cla
  642. *clr
  643. fat+=3
  644. frost = 0
  645. pcs_health += 5
  646. pcs_mood += 5
  647. pcs_hydra -= 5
  648. pcs_energy+=5
  649. money-=20
  650. minut+=10
  651. gs 'stat'
  652. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/eat.jpg"></center>'
  653. 'You ate a delicious pie with pleasure.'
  654. act 'Continue walking through the market': gt 'pavtrain_market','events'
  655. end
  656. else
  657. *p ', But you are not hungry right now.'
  658. end
  659. end
  660. if ARGS[0] = 13:
  661. menu_off = 1
  662. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dropwallet.jpg"></center>'
  663. 'You see woman ahead of you drop her purse.'
  664. cla
  665. act 'Tell her':
  666. cla
  667. *clr
  668. minut += 2
  669. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vernutwallet.jpg"></center>'
  670. '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.'
  671. act 'Continue walking through the market': gt 'pavtrain_market','events'
  672. end
  673. act 'Look through the purse':
  674. cla
  675. *clr
  676. minut += 5
  677. i = rand(40,200)
  678. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/zaglanut.jpg"></center>'
  679. 'In the purse is <<i>> <b>₽</b>'
  680. act 'Take the money and throw away the wallet':
  681. cla
  682. *clr
  683. money += i
  684. pcs_mood += 10
  685. gt 'pavtrain_market', 'start'
  686. end
  687. act 'Catch up with the woman and return her purse':
  688. cla
  689. *clr
  690. pcs_mood += 5
  691. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/proverka.jpg"></center>'
  692. '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.'
  693. act 'Continue walking through the market': gt 'pavtrain_market','events'
  694. end
  695. end
  696. end
  697. if ARGS[0] = 14:
  698. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rebenok.jpg"></center>'
  699. 'You see a young mother and her crying baby.'
  700. end
  701. if ARGS[0] = 15:
  702. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rezba.jpg"></center>'
  703. 'You find a stall with beautiful things carved out of wood and metal.'
  704. end
  705. if ARGS[0] = 16:
  706. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gruzchik.jpg"></center>'
  707. 'Looking around, you almost collided with a man pulling a small cart.'
  708. end
  709. if ARGS[0] = 17:
  710. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/meatlavka.jpg"></center>'
  711. 'You wandered past a the meet seller and see a butcher working with an axe.'
  712. end
  713. if ARGS[0] = 18:
  714. menu_off = 1
  715. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dirka.jpg"></center>'
  716. 'As you walk past a stall you notice a small hole torn in the canvas.'
  717. act 'Look through the hole':
  718. cla
  719. *clr
  720. if girl > 1: pcs_horny += 5
  721. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pereodev'+rand(1,15)+'.jpg"></center>'
  722. 'You look inside the tent and see ' + $pavtrain_marketrandtext[rand(3,7)]
  723. act 'Leave': gt 'pavtrain_market', 'start'
  724. end
  725. end
  726. if ARGS[0] = 19:
  727. menu_off = 1
  728. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/birthcontrolpills.jpg"></center>'
  729. tovpay = 1500
  730. 'You see a booth selling birth control pills for <<tovpay>> <b>₽</b>.'
  731. if money >= tovpay:
  732. act 'Buy':
  733. cls
  734. minut += 15
  735. tabletki += 1
  736. if rand(0,49) - (6*(8-tovpay/50)) <= 0:
  737. temp = rand(0,3)
  738. if temp = 0:
  739. tabletkiold += 1 & !Pills are expired and less effective
  740. elseif temp = 1:
  741. tabletkifake += 1 & !Pills are counterfeit and useless
  742. elseif temp = 2:
  743. tabletkirej += 1 & !Pills are factory rejects with variable strength
  744. else
  745. !Pills were tampered with
  746. if rand(0,100) = 0:
  747. tabletkifert += 1 & ! pills were replaced with fertility hormones
  748. else
  749. tabletkisug += 1 & ! pills were all replaced with sugar pills
  750. end
  751. end
  752. end
  753. money -= tovpay
  754. gt 'pavtrain_market', 'start'
  755. end
  756. end
  757. end
  758. --- pavtrain_market ---------------------------------