1
0

pav_train_market.qsrc 35 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966
  1. # pav_train_market
  2. !2020/10/14/Gwen
  3. $location_type = 'public_outdoors'
  4. if $ARGS[0] = 'start':
  5. $loc_arg = 'start'
  6. $loc = 'pav_train_market'
  7. $menu_loc = 'pav_train_market'
  8. $menu_arg = 'start'
  9. menu_off = 0
  10. CLOSE ALL
  11. if sound = 0:
  12. if month >=11 and month <= 12 or month >=1 and month <=3:
  13. if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/zima.mp3',30
  14. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  15. else
  16. if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/street_leto.mp3',30
  17. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  18. end
  19. end
  20. clr
  21. gs 'stat'
  22. '<center><h2>Market</h2></center>'
  23. if month >= 11 or month <= 3:
  24. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinokw.jpg"></center>'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinok.jpg"></center>'
  27. end
  28. *nl
  29. 'This small open air market is located near the train station.'
  30. *nl
  31. 'On one of the stalls has a sign "Cash paid for secondhand clothes", here you can <a href="exec:cloc=2 & gt ''clothing'', ''view_clothing_list'', ''sell''">sell individual items</a> or <a href="exec:gs ''portnoi''">all of your unwanted clothes</a>.'
  32. if arturQW = 1 and (week = 6 or week = 7) and hour < 12: act 'Wait for Arthur to arrive':hour = 12 & gt 'pav_train_market', 'start'
  33. *nl
  34. if hour >= 8 and hour <= 18:
  35. '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.'
  36. if pav_slut >= 100 and rand(0,9) = 0:
  37. menu_off = 1
  38. gs 'stat'
  39. '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."'
  40. act 'Reject him':
  41. *clr & cla
  42. 'You pretend not to understand what he is saying, smiling and shaking your head as you move away from him.'
  43. act 'Return':gt 'pav_train_market', 'start'
  44. end
  45. act 'Go with him':gt 'gevent', '3'
  46. exit
  47. end
  48. act 'Go back to the station': minut += 3 & gt 'pav_train'
  49. act 'Wander through the market': gt 'pav_train_market','events'
  50. if pavtrain_book = 1: act 'Go to the book stall': minut += 5 & gt 'pav_train_market', 3
  51. if pavmarket_porn = 1: act 'Go to the porn stall': minut += 5 & gt 'pav_train_market', 4
  52. if arturKnow = 1 and arturQW = 0:
  53. act 'Look for Arthur':gt 'arturRinok', 'start'
  54. elseif arturQW = 1 and (week = 6 or week = 7):
  55. if hour = 12 or hour = 13:
  56. act 'Look for Arthur':gt 'arturRinok', 'work_1'
  57. end
  58. elseif arturQW = 2:
  59. if hour = 16 and minut <= 30:
  60. act 'Look for Arthur':gt 'arturRinok', 'work_2'
  61. elseif hour < 16:
  62. act 'Wait for Arthur to arrive':hour = 16 & minut = 0 & gt 'pav_train_market', 'start'
  63. end
  64. end
  65. if gobelen > 0 and gobQW = 0:
  66. act'Sell ​​tapestry':
  67. menu_off = 1
  68. *clr & cla
  69. gobQW = 1
  70. minut += 15
  71. gs'stat'
  72. '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."'
  73. '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.'
  74. act 'Leave':gt 'pav_train_market', 'start'
  75. end
  76. elseif gobelen > 0 and gobQW >= 1:
  77. act'Sell ​​tapestry':
  78. menu_off = 1
  79. *clr & cla
  80. minut += 15
  81. gs'stat'
  82. 'You go to the man who offered to buy your tapestries for 1000 <b>₽</b>. You find him by his stall, smiling.'
  83. if gobQW = 2:
  84. 'Roman welcomes you. He is interested and businesslike as he asks what you have for sale.'
  85. elseif gobQW = 1:
  86. gobQW = 2
  87. minut += 5
  88. '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.'
  89. end
  90. act 'Leave':gt 'pav_train_market', 'start'
  91. act'Show your tapestry':
  92. *clr & cla
  93. gobelen -= 1
  94. money += 1000
  95. gs'stat'
  96. 'You show your tapestry to Roman and he gives you five hundred for it. You take the money and give him the tapestry.'
  97. act 'Leave':gt 'pav_train_market', 'start'
  98. end
  99. if gobelen > 1:
  100. act'Sell all of your tapestries':
  101. *clr & cla
  102. 'You show Roman your tapestries and he gives you <<gobelen * 1000>> <b>₽</b> for them. You take the money and give him the tapestries.'
  103. money += gobelen * 1000
  104. gobelen = 0
  105. gs'stat'
  106. act 'Leave':gt 'pav_train_market', 'start'
  107. end
  108. end
  109. end
  110. end
  111. if ShowerIvan = 5 and porndeal = 0 and rand(1,10) <= 4 and ricewine ! 1 and lookwine ! daystart:
  112. *clr & cla
  113. gs 'stat'
  114. minut += 20
  115. menu_off = 1
  116. lookwine = daystart
  117. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  118. '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.'
  119. act 'Ask about wang-goo':
  120. cla
  121. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  122. '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.'
  123. '"Onry 2 <b>₽</b>, hundred glam." she said in badly accented Russian, "You buy?"'
  124. '"No," you reply, "I need rice wine, rice wine."'
  125. 'She looks at you in confusion for a moment then suddenly brightened, "Ah!" she exclaims, "Come, come!"'
  126. '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.'
  127. '"Here," the old woman crowed handing you one of the pigs, "Nice swine, vely nice swine."'
  128. '"No, not nice swine," you sigh out in despair, "Rice! Wine."'
  129. '"Yes, yes," the woman counters, "Nice swine, only 5 <b>₽</b>."'
  130. *nl
  131. 'Just as you were about to give up, a young Chinese boy about your brother''s age arrives.'
  132. '"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.'
  133. '"My grandmother asks why you don''t like the piglets?" he translates as the old woman stops.'
  134. '"I don''t want a pig," you reply in relief as his Russian is quite good, "I am looking for rice wine, wang-goo."'
  135. '"Ah, huangjiu!" he exclaims as he turns to his grandmother and starts speaking in Chinese.'
  136. '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.'
  137. '"Why you not say wanted rice wine." she asked in aggrieved tones, "500 <b>₽</b>."'
  138. if money >= 500:
  139. act 'Buy the wine':
  140. *clr & cla
  141. money -= 500
  142. ricewine = 1
  143. 'You hand the woman the money and she gives you the wine.'
  144. act 'Leave': gt 'pav_train_market', 'start'
  145. end
  146. else
  147. 'You are chocked by the high price and realize that you cannot afford the wine. You apologize and turn away.'
  148. act 'Leave the market': gt 'pav_train_market', 'start'
  149. act 'Continue browsing the market':
  150. *clr & cla
  151. gs 'stat'
  152. minut += 15
  153. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  154. 'You continue to wander through the market for another 15 minutes when the boy from the Chinese stall comes up to you.'
  155. '"Hey, you really want that rice wine?" he asks after checking to make sure that no one is watching.'
  156. '"Yes," you answer him, "But it''s too expensive. I can''t afford it."'
  157. '"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."'
  158. if pornmarkonce = 0: pornmarkonce = 1 & '"Where can I find the porn dealer?" you ask and he happily gives you directions.'
  159. act 'Refuse':
  160. 'You decline his offer as he upsettingly walks away.'
  161. act 'Leave': gt 'pav_train_market', 'start'
  162. end
  163. act 'Agree': porndeal = 1 & gt 'pav_train_market', 4
  164. end
  165. end
  166. end
  167. elseif ShowerIvan = 5 and ricewine ! 1 and lookwine ! daystart:
  168. *clr & cla
  169. menu_off = 1
  170. gs 'stat'
  171. lookwine = daystart
  172. if month >= 11 or month <= 3:
  173. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinokw.jpg"></center>'
  174. else
  175. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/grinok.jpg"></center>'
  176. end
  177. 'You look around the market, but the Chinese vendors don''t seem to be here today.'
  178. act 'Leave': gt 'pav_train_market', 'start'
  179. end
  180. if porndeal = 1 and ricewine ! 1 and porndealday ! daystart:
  181. *clr & cla
  182. menu_off = 1
  183. gs 'stat'
  184. porndealday = daystart
  185. lookboy = 0
  186. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/market_boy01.jpg"></center>'
  187. 'The boy from the Chinese stall comes up to you as you enter the market.'
  188. '"Do you have it?" he asks eagerly.'
  189. if haveporn = 1:
  190. porndeal = 2 & ! to close the ricewine event
  191. ricewine = 1
  192. '"Do you have the wine?" you counter.'
  193. 'He pulls the bottle out of his backpack and you trade items.'
  194. act 'Leave': gt 'pav_train_market', 'start'
  195. else
  196. 'You tell him that you haven''t had time to pick up the magazine yet but you were working on it.'
  197. act 'Leave': gt 'pav_train_market', 'start'
  198. end
  199. elseif porndeal = 1 and ricewine ! 1 and porndealday = daystart and lookboy = 0:
  200. *clr & cla
  201. menu_off = 1
  202. gs 'stat'
  203. lookboy = 1
  204. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
  205. '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.'
  206. act 'Leave': gt 'pav_train_market', 'start'
  207. end
  208. else
  209. 'The market stalls are empty. The market is only open between 08:00 and 19:00.'
  210. act 'Go back to the station': minut += 3 & gt 'pav_train'
  211. end
  212. end
  213. if $ARGS[0] = 'events':
  214. *clr & cla
  215. minut += 10
  216. menu_off = 1
  217. gs 'stat'
  218. '<center><h2>Market</h2></center>'
  219. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/brodit'+rand(1,16)+'.jpg"></center>'
  220. 'You wander around the market taking in the sounds and colours but nothing catches your eye.'
  221. act 'Stop wandering': gt 'pav_train_market', 'start'
  222. if hour >= 8 and hour <= 18:
  223. act 'Wander around the market': gt 'pav_train_market','events'
  224. end
  225. if rand(0,3) = 0: gt 'pav_train_market', rand(1,19)
  226. end
  227. if ARGS[0] = 1:
  228. *clr & cla
  229. menu_off = 1
  230. gs 'stat'
  231. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika1.jpg"></center>'
  232. 'You are strolling through the market when a beggar asks you for some change.'
  233. act 'Don''t give money':
  234. *clr & cla
  235. gs 'stat'
  236. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika2.jpg"></center>'
  237. 'You ignore the beggar and pretend not to hear him.'
  238. act 'Stop wandering': gt 'pav_train_market', 'start'
  239. if hour >= 8 and hour <= 18:
  240. act 'Wander around the market': gt 'pav_train_market','events'
  241. end
  242. end
  243. act 'Give some money':
  244. *clr & cla
  245. money -= rand(3,20)
  246. pcs_mood += 5
  247. gs 'stat'
  248. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/podaet.jpg"></center>'
  249. 'You give the beggar a few rubles which he kindly thanks you for.'
  250. act 'Stop wandering': gt 'pav_train_market', 'start'
  251. if hour >= 8 and hour <= 18:
  252. act 'Wander around the market': gt 'pav_train_market','events'
  253. end
  254. end
  255. end
  256. if ARGS[0] = 2:
  257. *clr & cla
  258. menu_off = 1
  259. minut += 5
  260. gs 'stat'
  261. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  262. 'You see an old man playing the guitar. He''s trying to avert as much attention as he can to himself.'
  263. act 'Stop wandering': gt 'pav_train_market', 'start'
  264. if hour >= 8 and hour <= 18:
  265. act 'Wander around the market': gt 'pav_train_market','events'
  266. end
  267. end
  268. if ARGS[0] = 3:
  269. *clr & cla
  270. menu_off = 1
  271. pavtrain_book = 1
  272. gs 'stat'
  273. if month >= 11 or month <= 3:
  274. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/bookw.jpg"></center>'
  275. else
  276. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/book.jpg"></center>'
  277. end
  278. '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.'
  279. act 'Stop wandering': gt 'pav_train_market', 'start'
  280. if hour >= 8 and hour <= 18:
  281. act 'Wander around the market': gt 'pav_train_market','events'
  282. end
  283. if money >= 350:
  284. act 'Buy a fantasy book (350 <b>₽</b>)':
  285. *clr & cla
  286. minut += 15
  287. money -= 350
  288. f_book += 1
  289. gs 'stat'
  290. '<center><img <<$set_imgh>> src="images/shared/accessories/books/fantasy' + rand(1,9) + '.jpg"></center>'
  291. 'You bought a fantasy book for 350 <b>₽</b>.'
  292. act 'Leave':gt 'pav_train_market', 'start'
  293. end
  294. end
  295. if money >= 350:
  296. act 'Buy a science fiction book (350 <b>₽</b>)':
  297. *clr & cla
  298. minut += 15
  299. money -= 350
  300. f_book += 1
  301. gs 'stat'
  302. '<center><img <<$set_imgh>> src="images/shared/accessories/books/scifi' + rand(1,6) + '.jpg"></center>'
  303. 'You bought a science ficiton book for 350 <b>₽</b>.'
  304. act 'Leave':gt 'pav_train_market', 'start'
  305. end
  306. end
  307. if money >= 350:
  308. act 'Buy a romance novel (350 <b>₽</b>)':
  309. *clr & cla
  310. minut += 15
  311. money -= 350
  312. w_book += 1
  313. gs 'stat'
  314. '<center><img <<$set_imgh>> src="images/shared/accessories/books/romance' + rand(1,20) + '.jpg"></center>'
  315. 'You bought a romance novel for 350 <b>₽</b>.'
  316. act 'Leave':gt 'pav_train_market', 'start'
  317. end
  318. end
  319. end
  320. if ARGS[0] = 4:
  321. *clr & cla
  322. menu_off = 1
  323. pavmarket_porn = 1
  324. gs 'stat'
  325. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  326. '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.'
  327. act 'Stop wandering': gt 'pav_train_market', 'start'
  328. if hour >= 8 and hour <= 18:
  329. act 'Wander around the market': gt 'pav_train_market','events'
  330. end
  331. if money >= 699 and card < 2:
  332. act 'Buy cards (699 <b>₽</b>)':
  333. *clr & cla
  334. minut += 5
  335. money -= 699
  336. card = 2
  337. TimesBuyPorno += 1
  338. delact 'Buy cards'
  339. gs 'stat'
  340. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  341. '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.'
  342. act 'Leave':gt 'pav_train_market', 'start'
  343. act 'Buy something else':gt 'pav_train_market', 4
  344. end
  345. end
  346. if porndeal = 1:
  347. if money >= 400:
  348. act 'Buy a porn magazine for the Chinese boy (400 <b>₽</b>)':
  349. *clr & cla
  350. minut += 5
  351. money -= 400
  352. haveporn = 1
  353. gs 'stat'
  354. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  355. '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.'
  356. act 'Leave':gt 'pav_train_market', 'start'
  357. act 'Buy something else':gt 'pav_train_market', 4
  358. end
  359. end
  360. else
  361. act 'Browse the porn magazines':
  362. *clr & cla
  363. gs 'arousal', 'erotic', 5
  364. gs 'arousal', 'end'
  365. gs 'stat'
  366. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  367. act 'Leave':gt 'pav_train_market', 'start'
  368. act 'Look for something else':gt 'pav_train_market', 4
  369. if TimesBuyPorno = 0:
  370. '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.'
  371. act 'Look through a magazine':
  372. cla
  373. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  374. '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.'
  375. act 'Leave':gt 'pav_train_market', 'start'
  376. act 'Look for something else':gt 'pav_train_market', 4
  377. act 'Ask for the price':
  378. *clr & cla
  379. minut += 5
  380. gs 'stat'
  381. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  382. '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."'
  383. act 'Leave':gt 'pav_train_market', 'start'
  384. act 'Look for something else':gt 'pav_train_market', 4
  385. if money >= 400:
  386. act 'Buy magazine (400 <b>₽</b>)':
  387. *clr & cla
  388. minut += 5
  389. money -= 400
  390. pornMagazine = 40
  391. TimesBuyPorno += 1
  392. gs 'stat'
  393. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  394. '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.'
  395. act 'Leave':gt 'pav_train_market', 'start'
  396. act 'Buy something else':gt 'pav_train_market', 4
  397. end
  398. end
  399. end
  400. end
  401. elseif TimesBuyPorno > 0 and TimesBuyPorno < 5:
  402. 'The porn dealer notices you coming over and asks, "Looking to buy a magazine? They''re only 400 <b>₽</b> each."'
  403. act 'Look through a magazine':
  404. cla
  405. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  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 'pav_train_market', 'start'
  408. act 'Look for something else':gt 'pav_train_market', 4
  409. if money >= 400:
  410. act 'Buy magazine (400 <b>₽</b>)':
  411. *clr & cla
  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 'pav_train_market', 'start'
  420. act 'Buy something else':gt 'pav_train_market', 4
  421. end
  422. end
  423. end
  424. elseif TimesBuyPorno >= 5:
  425. 'The porn dealer sees you approaching the stall, "Ah, my best customer! Welcome back!"'
  426. act 'Look through a magazine':
  427. cla
  428. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  429. '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.'
  430. act 'Leave':gt 'pav_train_market', 'start'
  431. act 'Look for something else':gt 'pav_train_market', 4
  432. if money >= 400:
  433. act 'Buy magazine (400 <b>₽</b>)':
  434. *clr & cla
  435. minut += 5
  436. money -= 400
  437. pornMagazine = 40
  438. TimesBuyPorno += 1
  439. gs 'stat'
  440. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
  441. '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.'
  442. act 'Leave':gt 'pav_train_market', 'start'
  443. act 'Buy something else':gt 'pav_train_market', 4
  444. end
  445. end
  446. end
  447. end
  448. end
  449. end
  450. act 'Ask to see the sex toys':
  451. *clr & cla
  452. gs 'stat'
  453. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/sextoys.jpg"></center>'
  454. '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 without a dildo. "Only 500 <b>₽</b>each."'
  455. act 'Leave':gt 'pav_train_market', 'start'
  456. act 'Look for something else':gt 'pav_train_market', 4
  457. if money >= 700 and middildo = 0:
  458. act 'Buy a 15cm dildo (700 <b>₽</b>)':
  459. cla
  460. minut += 5
  461. middildo = 1
  462. money -= 700
  463. pcs_horny += 10
  464. TimesBuyPorno += 1
  465. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/15cm.jpg"></center>'
  466. if pcs_inhib < 35:
  467. 'You buy a dildo and hastily hide it, while your face blushes with embarrassment.'
  468. else
  469. 'You buy a dildo and calmly hide it.'
  470. end
  471. act 'Leave':gt 'pav_train_market', 'start'
  472. act 'Buy something else':gt 'pav_train_market', 4
  473. end
  474. end
  475. if money >= 1000 and suction_dildo = 0:
  476. act 'Buy a 15cm suction dildo (1000 <b>₽</b>)':
  477. cla
  478. minut += 5
  479. suction_dildo += 1
  480. money -= 1000
  481. pcs_horny += 10
  482. TimesBuyPorno += 1
  483. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/15cm.jpg"></center>'
  484. if pcs_inhib < 35:
  485. 'You buy the dildo and hastily hide it, while your face blushes with embarrassment.'
  486. else
  487. 'You buy the dildo and calmly hide it.'
  488. end
  489. act 'Leave':gt 'pav_train_market', 'start'
  490. act 'Buy something else':gt 'pav_train_market', 4
  491. end
  492. elseif money >= 1000 and suction_dildo > 0:
  493. act 'Buy another 15cm suction dildo (1000 <b>₽</b>)':
  494. cla
  495. minut += 5
  496. suction_dildo += 1
  497. money -= 1000
  498. pcs_horny += 10
  499. TimesBuyPorno += 1
  500. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/15cm.jpg"></center>'
  501. if pcs_inhib < 35:
  502. 'You buy the dildo and hastily hide it, while your face blushes with embarrassment.'
  503. else
  504. 'You buy the dildo and calmly hide it.'
  505. end
  506. act 'Leave':gt 'pav_train_market', 'start'
  507. act 'Buy something else':gt 'pav_train_market', 4
  508. end
  509. end
  510. if money >= 700 and vibrator = 0:
  511. act 'Buy vibrator (700 <b>₽</b>)':
  512. cla
  513. minut += 5
  514. vibrator = 1
  515. money -= 700
  516. pcs_horny += 10
  517. TimesBuyPorno += 1
  518. if pcs_horny >= 50 and pav_slut < 150:
  519. 'You buy a vibrator and hastily hide it, while your face blushes with embarrassment.'
  520. else
  521. 'You buy a vibrator and calmly hide it.'
  522. end
  523. act 'Leave':gt 'pav_train_market', 'start'
  524. act 'Buy something else':gt 'pav_train_market', 4
  525. end
  526. end
  527. if money >= 700 and analplug = 0:
  528. act 'Buy butt plug (700 <b>₽</b>)':
  529. cla
  530. minut += 5
  531. money -= 700
  532. analplug = 1
  533. !!this needs to be changed from analplug bought to smallbp for the smallone
  534. pcs_horny += 10
  535. TimesBuyPorno += 1
  536. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/bp_small.jpg"></center>'
  537. if pcs_horny >= 50 and pav_slut < 150:
  538. 'You buy a butt plug and hastily hide it, while your face blushes with embarrassment.'
  539. else
  540. 'You buy a butt plug and calmly hide it.'
  541. end
  542. act 'Leave':gt 'pav_train_market', 'start'
  543. act 'Buy something else':gt 'pav_train_market', 4
  544. end
  545. end
  546. if dildo = 1:
  547. if money >= 500 and strapon = 0:
  548. act 'Buy strap-on harness (500 <b>₽</b>)':
  549. cla
  550. minut += 5
  551. strapon = 1
  552. strapnumber = 1
  553. money -= 500
  554. pcs_horny += 10
  555. TimesBuyPorno += 1
  556. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/harness.jpg"></center>'
  557. if pcs_horny >= 50 and pav_slut < 150:
  558. 'You buy a strap-on harness and hastily hide it, while your face blushes with embarrassment.'
  559. else
  560. 'You buy a strap-on harness and calmly hide it.'
  561. end
  562. act 'Leave':gt 'pav_train_market', 'start'
  563. act 'Buy something else':gt 'pav_train_market', 4
  564. end
  565. end
  566. else
  567. if money >= 1200 and strapon = 0 and middildo = 0:
  568. act 'Buy strap-on harness with a 15cm dildo (1200 <b>₽</b>)':
  569. cla
  570. minut += 5
  571. strapon = 1
  572. middildo = 1
  573. strapnumber = 1
  574. money -= 1200
  575. pcs_horny += 10
  576. TimesBuyPorno += 1
  577. '<center><img <<$set_imgh>> src="images/pc/items/sextoys/harness.jpg"></center>'
  578. if pcs_horny >= 50 and pav_slut < 150:
  579. 'You buy a strap-on harness and hastily hide it, while your face blushes with embarrassment.'
  580. else
  581. 'You buy a strap-on harness and calmly hide it.'
  582. end
  583. act 'Leave':gt 'pav_train_market', 'start'
  584. act 'Buy something else':gt 'pav_train_market', 4
  585. end
  586. end
  587. end
  588. end
  589. end
  590. if ARGS[0] = 5:
  591. *clr & cla
  592. menu_off = 1
  593. minut += 5
  594. gs 'stat'
  595. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dedgitara.jpg"></center>'
  596. 'You see an old man playing the guitar. He''s trying to avert as much attention as he can to himself.'
  597. act 'Stop wandering': gt 'pav_train_market', 'start'
  598. if hour >= 8 and hour <= 18:
  599. act 'Wander around the market': gt 'pav_train_market','events'
  600. end
  601. end
  602. if ARGS[0] = 6:
  603. *clr & cla
  604. menu_off = 1
  605. minut += 5
  606. gs 'stat'
  607. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/nenavizublyadcigan.jpg"></center>'
  608. 'You meet a Gypsy woman. She offers to tell your fortune.'
  609. act 'Decline': gt 'pav_train_market', 'start'
  610. act 'Accept':
  611. *clr & cla
  612. minut += 5
  613. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gadaet'+rand(1,2)+'.jpg"></center>'
  614. 'You agree and Gypsy takes your hand before she predicts you will have great happiness and lots of money. Afterwards, she promptly walks away.'
  615. act 'Something''s wrong':
  616. *clr & cla
  617. money = 0
  618. pcs_mood -= 50
  619. gs 'stat'
  620. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pusto.jpg"></center>'
  621. 'With a sneaking suspicion you start looking through your stuff. Your wallet is nowhere to be found!'
  622. act 'Find the Gypsy':
  623. *clr & cla
  624. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/okliknut.jpg"></center>'
  625. 'You search the area hoping to find the thief, but she has already disappeared into the crowd.'
  626. act 'Back': gt 'pav_train_market', 'start'
  627. end
  628. end
  629. end
  630. end
  631. if ARGS[0] = 7:
  632. *clr & cla
  633. menu_off = 1
  634. minut += 5
  635. gs 'stat'
  636. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/kosmetic.jpg"></center>'
  637. tovpay = 800
  638. 'You see some cosmetics on sale for <<tovpay>> <b>₽</b>.'
  639. act 'Stop wandering': gt 'pav_train_market', 'start'
  640. if hour >= 8 and hour <= 18:
  641. act 'Wander around the market': gt 'pav_train_market','events'
  642. end
  643. if money >= tovpay:
  644. act 'Buy the cosmetics (800 <b>₽</b>)':
  645. minut += 15
  646. money -= tovpay
  647. kosmetica += 50
  648. gt 'pav_train_market', 'start'
  649. end
  650. end
  651. end
  652. if ARGS[0] = 8:
  653. *clr & cla
  654. menu_off = 1
  655. minut += 5
  656. gs 'stat'
  657. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vitaminki.jpg"></center>'
  658. tovpay = 105
  659. 'You see some vitamins on sale for <<tovpay>> <b>₽</b>.'
  660. act 'Stop wandering': gt 'pav_train_market', 'start'
  661. if hour >= 8 and hour <= 18:
  662. act 'Wander around the market': gt 'pav_train_market','events'
  663. end
  664. if money >= tovpay:
  665. act 'Buy vitamins (105 <b>₽</b>)':
  666. minut += 15
  667. vitamin += 20
  668. money -= tovpay
  669. gt 'pav_train_market', 'start'
  670. end
  671. end
  672. end
  673. if ARGS[0] = 9:
  674. *clr & cla
  675. menu_off = 1
  676. minut += 5
  677. gs 'stat'
  678. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/condoms.jpg"></center>'
  679. tovpay = 80
  680. 'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
  681. act 'Stop wandering': gt 'pav_train_market', 'start'
  682. if hour >= 8 and hour <= 18:
  683. act 'Wander around the market': gt 'pav_train_market','events'
  684. end
  685. if money >= tovpay:
  686. act 'Buy condoms (80 <b>₽</b>)':
  687. minut += 15
  688. prezik += 5
  689. i = 5
  690. :cndmlp
  691. if rand(0,49)-6*(8-tovpay/10) <= 0:badprezik += 1
  692. if i > 0: i-= 1 & jump 'cndmlp'
  693. killvar 'i'
  694. money -= tovpay
  695. gt 'pav_train_market', 'start'
  696. end
  697. end
  698. end
  699. if ARGS[0] = 10:
  700. *clr & cla
  701. menu_off = 1
  702. minut += 5
  703. gs 'stat'
  704. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/balzam.jpg"></center>'
  705. tovpay = 100
  706. 'There is lip balm on sale for <<tovpay>> <b>₽</b>.'
  707. act 'Stop wandering': gt 'pav_train_market', 'start'
  708. if hour >= 8 and hour <= 18:
  709. act 'Wander around the market': gt 'pav_train_market','events'
  710. end
  711. if money >= tovpay:
  712. act 'Buy lip balm (100 <b>₽</b>)':
  713. *clr & cla
  714. minut += 15
  715. lipbalm += 30
  716. money -= tovpay
  717. gt 'pav_train_market', 'start'
  718. end
  719. end
  720. end
  721. if ARGS[0] = 11:
  722. *clr & cla
  723. menu_off = 1
  724. minut += 5
  725. gs 'stat'
  726. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
  727. if arturKnow = 0:
  728. 'Someone suddenly calls out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
  729. act 'Look': gt 'arturRinok','start'
  730. else
  731. 'Someone suddenly calls out to you, "Hey <<$pcs_nickname>>, do you want a fresh, juicy tangerine?"'
  732. act 'Go and see Arthur': gt 'arturRinok','start'
  733. end
  734. end
  735. if ARGS[0] = 12:
  736. *clr & cla
  737. menu_off = 1
  738. minut += 5
  739. gs 'stat'
  740. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/cheburek.jpg"></center>'
  741. 'Walking through the market, you came across an old woman selling pies.'
  742. act 'Stop wandering': gt 'pav_train_market', 'start'
  743. if hour >= 8 and hour <= 18:
  744. act 'Wander around the market': gt 'pav_train_market','events'
  745. end
  746. if pcs_energy <= 80:
  747. act 'Buy a pie for 20 <b>₽</b>':
  748. *clr & cla
  749. fat+=3
  750. frost = 0
  751. pcs_health += 5
  752. pcs_mood += 5
  753. pcs_hydra -= 5
  754. pcs_energy+=5
  755. money-=20
  756. minut+=10
  757. gs 'stat'
  758. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/eat.jpg"></center>'
  759. '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.'
  760. act 'Continue walking through the market': gt 'pav_train_market','events'
  761. end
  762. else
  763. *p ', But you are not hungry right now.'
  764. end
  765. end
  766. if ARGS[0] = 13:
  767. *clr & cla
  768. menu_off = 1
  769. minut += 5
  770. gs 'stat'
  771. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dropwallet.jpg"></center>'
  772. 'You see a wallet fall out of a woman''s purse.'
  773. act 'Tell her':
  774. *clr & cla
  775. minut += 2
  776. gs 'stat'
  777. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vernutwallet.jpg"></center>'
  778. '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.'
  779. act 'Continue walking through the market': gt 'pav_train_market','events'
  780. end
  781. act 'Look through the purse':
  782. *clr & cla
  783. minut += 5
  784. i = rand(40,200)
  785. gs 'stat'
  786. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/zaglanut.jpg"></center>'
  787. 'You open the wallet and you see that there''s <<i>> <b>₽</b>'
  788. gs 'willpower', 'misc', 'self', 'easy'
  789. if will_cost <= pcs_willpwr:
  790. act 'Take the money and throw away the wallet (<<will_cost>> Willpower)':
  791. *clr & cla
  792. money += i
  793. pcs_mood += 10
  794. killvar 'i'
  795. gs 'willpower', 'pay', 'resist'
  796. gs 'stat'
  797. 'You just need the money.'
  798. act 'Continue': gt 'pav_train_market','start'
  799. end
  800. else
  801. act 'Take the money and throw away the wallet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  802. end
  803. act 'Catch up with the woman and return her purse':
  804. *clr & cla
  805. pcs_mood += 5
  806. gs 'stat'
  807. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/proverka.jpg"></center>'
  808. '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.'
  809. act 'Stop wandering': gt 'pav_train_market', 'start'
  810. if hour >= 8 and hour <= 18:
  811. act 'Wander around the market': gt 'pav_train_market','events'
  812. end
  813. end
  814. end
  815. end
  816. if ARGS[0] = 14:
  817. *clr & cla
  818. menu_off = 1
  819. minut += 5
  820. gs 'stat'
  821. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rebenok.jpg"></center>'
  822. 'You see a young mother and her crying baby.'
  823. act 'Stop wandering': gt 'pav_train_market', 'start'
  824. if hour >= 8 and hour <= 18:
  825. act 'Wander around the market': gt 'pav_train_market','events'
  826. end
  827. end
  828. if ARGS[0] = 15:
  829. *clr & cla
  830. menu_off = 1
  831. minut += 5
  832. gs 'stat'
  833. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/rezba.jpg"></center>'
  834. 'You find a stall with beautiful things carved out of wood and metal.'
  835. act 'Stop wandering': gt 'pav_train_market', 'start'
  836. if hour >= 8 and hour <= 18:
  837. act 'Wander around the market': gt 'pav_train_market','events'
  838. end
  839. end
  840. if ARGS[0] = 16:
  841. *clr & cla
  842. menu_off = 1
  843. minut += 5
  844. gs 'stat'
  845. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/gruzchik.jpg"></center>'
  846. 'Looking around, you almost collide with a man pulling a small cart.'
  847. act 'Stop wandering': gt 'pav_train_market', 'start'
  848. if hour >= 8 and hour <= 18:
  849. act 'Wander around the market': gt 'pav_train_market','events'
  850. end
  851. end
  852. if ARGS[0] = 17:
  853. *clr & cla
  854. menu_off = 1
  855. minut += 5
  856. gs 'stat'
  857. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/meatlavka.jpg"></center>'
  858. 'You wander past a the meet seller and see a butcher working with an axe.'
  859. act 'Stop wandering': gt 'pav_train_market', 'start'
  860. if hour >= 8 and hour <= 18:
  861. act 'Wander around the market': gt 'pav_train_market','events'
  862. end
  863. end
  864. if ARGS[0] = 18:
  865. *clr & cla
  866. menu_off = 1
  867. minut += 5
  868. gs 'stat'
  869. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dirka.jpg"></center>'
  870. 'As you walk past a stall you notice a small hole torn in the canvas.'
  871. act 'Stop wandering': gt 'pav_train_market', 'start'
  872. if hour >= 8 and hour <= 18:
  873. act 'Wander around the market': gt 'pav_train_market','events'
  874. end
  875. gs 'willpower', 'voyeur', 'self', 'easy'
  876. if will_cost <= pcs_willpwr:
  877. act 'Look through the hole (<<will_cost>> Willpower)':
  878. *clr & cla
  879. gs 'arousal', 'voyeur', 2
  880. gs 'willpower', 'pay', 'resist'
  881. gs 'stat'
  882. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pereodev'+rand(1,15)+'.jpg"></center>'
  883. 'You look inside the tent and see ' + $pavtrain_marketrandtext[rand(3,7)]
  884. act 'Leave': gt 'pav_train_market', 'start'
  885. end
  886. else
  887. act 'Look through the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  888. end
  889. end
  890. if ARGS[0] = 19:
  891. *clr & cla
  892. menu_off = 1
  893. minut += 5
  894. gs 'stat'
  895. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/birthcontrolpills.jpg"></center>'
  896. tovpay = 1500
  897. 'You see a booth selling birth control pills for <<tovpay>> <b>₽</b>.'
  898. act 'Stop wandering': gt 'pav_train_market', 'start'
  899. if hour >= 8 and hour <= 18:
  900. act 'Wander around the market': gt 'pav_train_market','events'
  901. end
  902. if money >= tovpay:
  903. act 'Buy birth control pills (1500 <b>₽</b>)':
  904. *clr & cla
  905. minut += 15
  906. tabletki += 1
  907. if rand(0,49) - (6*(8-tovpay/50)) <= 0:
  908. temp = rand(0,3)
  909. if temp = 0:
  910. tabletkiold += 1 & !Pills are expired and less effective
  911. elseif temp = 1:
  912. tabletkifake += 1 & !Pills are counterfeit and useless
  913. elseif temp = 2:
  914. tabletkirej += 1 & !Pills are factory rejects with variable strength
  915. else
  916. !Pills were tampered with
  917. if rand(0,100) = 0:
  918. tabletkifert += 1 & ! pills were replaced with fertility hormones
  919. else
  920. tabletkisug += 1 & ! pills were all replaced with sugar pills
  921. end
  922. end
  923. end
  924. money -= tovpay
  925. gt 'pav_train_market', 'start'
  926. end
  927. end
  928. end
  929. --- pav_train_market ---------------------------------