etoexhib.qsrc 62 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811
  1. # etoexhib
  2. CLOSE ALL
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $menu_loc = 'etoexhib'
  6. $menu_arg = ''
  7. menu_off = 0
  8. $location_type = 'public_indoors'
  9. if $ARGS[0] = 'pos1':
  10. cla
  11. *clr
  12. minut += 5
  13. menu_off = 1
  14. gs 'stat'
  15. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar1.jpg"></center>'
  16. 'You walk into the room with the solarium. The room is quiet and with dim lights, seems like there is nobody in the solarium except for the administrator. You look at the door.'
  17. act 'Close the door':
  18. cla
  19. *clr
  20. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar8.jpg"></center>'
  21. 'You locked the door and stripped naked, arranging yourself in the solarium, lying on your stomach.'
  22. act 'Next':
  23. cla
  24. *clr
  25. pcs_mood += 10
  26. minut += 20
  27. gs 'stat'
  28. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar9.jpg"></center>'
  29. 'You are tanned and relaxed. Satisfied, you go out of the solarium and dressed out into the hall salon.'
  30. act 'Leave':gt 'salon', 'start'
  31. end
  32. end
  33. act 'Leave the door slightly open':
  34. cla
  35. *clr
  36. pcs_mood += 10
  37. pcs_horny += 10
  38. minut += 5
  39. gs 'stat'
  40. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar1.jpg"></center>'
  41. 'You decide to fool around a bit and leave the door for the room open. You start to slowly undress, when you take your bra off and exposes your breasts, long chills run through your bare back. Now, all of a sudden, anybody could go inside the room and see my breasts, what they would think of me?'
  42. act 'Undress':
  43. cla
  44. *clr
  45. pcs_horny += 10
  46. gs 'stat'
  47. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar2.jpg"></center>'
  48. 'You continue to undress and now your ass is naked bare. Suddenly, you have a feeling that someone is watching you. Your breath quickens, and waves of excitement run thought your body. If someone is really spying on you, you need to strip sexy as possible . You do not know why, it just orders from your feminine nature.'
  49. act 'Undress everything':
  50. cla
  51. *clr
  52. pcs_horny += 10
  53. minut += 5
  54. gs 'stat'
  55. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar4.jpg"></center>'
  56. 'You undressed and went naked into the solarium. There is just a person on the door looking at you. Of curiosity, you attach your legs and bent them to the side , peering into the darkness of the slightly open door. You can actually see and hear the shadow sniffing. There is no doubt, someone is obviously watching you. From the realization that someone is watching you, and that you are lying completely naked, your body begins to tremble. There is a pleasant feeling in the abdomen. You get so excited to the point that you start to spread your legs in different directions. To the joy of the mysterious stranger.'
  57. act 'Spread your legs ':
  58. cla
  59. *clr
  60. pcs_horny += 10
  61. gs 'stat'
  62. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar5.jpg"></center>'
  63. '"I spread my legs as lustful bitch. What did he think of me. Maybe he''s not alone, and all the staff had already escaped to look at me. Lord, and suddenly they shoot me on camera, and tomorrow I´ll be all over the internet." - Thoughts rushing through your head, but the excitement is high and there is no strength to stay.'
  64. act 'Masturbate':
  65. cla
  66. *clr
  67. pcs_horny += 20
  68. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar6.jpg"></center>'
  69. 'You start furiously rubbing your pussy to finally finish your shameless adventure. Gradually, you get excited to such an extent that you can not hold back anymore. You start to moan and push your labia with your fingers, showing your pussy to a stranger in all its glory.'
  70. gs 'arousal', 'mastubate', 10, 'exhibitionism'
  71. gs 'stat'
  72. act 'Next':
  73. cla
  74. *clr
  75. gs 'exhibitionism', 2
  76. gs 'stat'
  77. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solar7.jpg"></center>'
  78. 'Finally, you cover yourself in a powerful orgasms and you became exhausted. Also,you can not hear the sniff any more, it seems the secret observer finished with you.'
  79. ''
  80. 'Gradually you come to your senses, get dressed,and get out of the booth.'
  81. $orgasm_or = 'yes'
  82. gs 'arousal', 'mastubate', 10, 'exhibitionism'
  83. gs 'arousal', 'end'
  84. gs 'stat'
  85. act 'Leave':gt 'salon', 'start'
  86. end
  87. end
  88. end
  89. end
  90. end
  91. end
  92. end
  93. if $ARGS[0] = 'pos2':
  94. cla
  95. *clr
  96. minut += 5
  97. gs 'stat'
  98. '<center><img <<$set_imgh>> src="images/locations/suburban/1dachi.jpg"></center>'
  99. 'You walked through the alleys. Basically, this community is not very populated. Occasionally there are gardeners picking around the region. You hear the clank of a saw somewhere in the outskirts of the forest. At the end of the alley is an artificial reservoir. There are some areas with houses for sale.'
  100. if etoexhib = 0:'You do not know anybody here and the truckers do not have developed any opinion about you.'
  101. if etoexhib = 10:'Start at <a href="exec:gt ''etoexhib'', ''pos9''">clang saws</a>.'
  102. act 'Go to the forest':gt 'etoexhib', 'pos3'
  103. act 'Go down to the lake':gt 'etoexhib', 'pos16'
  104. act 'Leave':gt 'dachi'
  105. end
  106. if $ARGS[0] = 'pos3':
  107. cla
  108. *clr
  109. minut += 5
  110. gs 'stat'
  111. foresrand = rand(1, 100)
  112. '<center><img <<$set_imgh>> src="images/locations/suburban/1fores.jpg"></center>'
  113. 'Livstvenny forest.'
  114. if foresrand < 30:
  115. cla
  116. *clr
  117. '<center><img <<$set_imgh>> src="images/locations/suburban/1fores.jpg"></center>'
  118. 'Greenwood forest.'
  119. 'You can see the mushroom picker far way from you.'
  120. act 'Get his attention':gt 'etoexhib', 'pos4'
  121. elseif foresrand > 90 and exhibitionist_lvl > 1:
  122. cla
  123. *clr
  124. '<center><img <<$set_imgh>> src="images/locations/suburban/1fores.jpg"></center>'
  125. 'Greenwood forest.'
  126. act 'Undress':gt 'etoexhib', 'pos5'
  127. end
  128. act 'Leave':gt 'dachi'
  129. end
  130. if $ARGS[0] = 'pos4':
  131. cla
  132. *clr
  133. minut += 5
  134. gs 'stat'
  135. 'You are waving at the mushroom picker and he stopped to look at you.'
  136. act 'Show your pussy':
  137. cla
  138. *clr
  139. minut += 5
  140. pcs_horny += 10
  141. gs 'exhibitionism', 2
  142. gs 'stat'
  143. '<center><img <<$set_imgh>> src="images/locations/suburban/2fores.jpg"></center>'
  144. 'Smiling, you show the mushroom picker your pussy. He stops in his tracks and stares at you, not understanding what''s happening.'
  145. act 'Leave':gt 'dachi'
  146. end
  147. end
  148. if $ARGS[0] = 'pos5':
  149. cla
  150. *clr
  151. minut += 5
  152. pcs_horny += 10
  153. gs 'exhibitionism', 3
  154. gs 'stat'
  155. '<center><img <<$set_imgh>> src="images/locations/suburban/3fores.jpg"></center>'
  156. 'You stripped down completely and went for a walk in the woods. Your heart was pounding in your chest. Fresh air and a gentle warm breeze caresses you. The sun warms you. You thought that you would feel cold quickly, but the hot summer sun proved you wrong. You left your clothes on the ground, and hoped no one would find them! In this area, there are only mushroom pickers, but if you met them? You''d be embarassed! You found a good clearing. The wind died.'
  157. act 'Next':
  158. cla
  159. *clr
  160. '<center><img <<$set_imgh>> src="images/locations/suburban/4fores.jpg"></center>'
  161. 'You lied down and soaked the sun in a meadow, naked. You did not encounter anyone. Good or bad. It was nice, though a little stressful. You finished sunbathing and relaxing and need to go back and find your clothes.'
  162. act 'Leave':gt 'dachi'
  163. end
  164. end
  165. if $ARGS[0] = 'pos6':
  166. cla
  167. *clr
  168. minut += 15
  169. gs 'stat'
  170. '<center><img <<$set_imgh>> src="images/locations/suburban/rodnik.jpg"></center>'
  171. 'Spring water.'
  172. act 'Drink from the spring':
  173. if pcs_hydra >= 90:
  174. 'You are not thirsty.'
  175. elseif pcs_hydra < 90:
  176. pcs_hydra += 20
  177. cumspclnt = 2
  178. gs 'cum_cleanup'
  179. pcs_breath = 0
  180. 'You gladly drank spring water.'
  181. end
  182. act 'Leave':gt 'dachi'
  183. end
  184. act 'Leave':gt 'dachi'
  185. gs 'treeCircEntry', 'Village'
  186. end
  187. if $ARGS[0] = 'pos7':
  188. cla
  189. *clr
  190. minut += 15
  191. gs 'stat'
  192. '<center><img <<$set_imgh>> src="images/locations/suburban/stolbik.jpg"></center>'
  193. 'The writing on the column has some useful information.'
  194. 'Nina in the 3rd alley sells goat milk at 300 <b>₽</b> per liter'
  195. if money >= 300 and pcs_energy < 70:
  196. act 'Buy milk':
  197. cla
  198. *clr
  199. money -= 300
  200. minut += 30
  201. frost = 0
  202. pcs_health += 10
  203. pcs_mood += 20
  204. gs 'stat'
  205. fat += 1
  206. pcs_energy += 40
  207. pcs_hydra += 40
  208. 'You gladly drank some goat''s milk.'
  209. act 'Leave':gt 'dachi'
  210. end
  211. elseif money >= 300:
  212. 'You feel too full to drink such thick and creamy milk at the moment.'
  213. end
  214. act 'Leave':gt 'dachi'
  215. end
  216. if $ARGS[0] = 'pos8':
  217. cla
  218. *clr
  219. minut += 15
  220. gs 'stat'
  221. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dachakuz.jpg"></center>'
  222. 'Neighbor''s cottage.'
  223. if etoexhib < 10:
  224. act 'Apply neighbors':
  225. cla
  226. *clr
  227. minut += 15
  228. etoexhib = 10
  229. gs 'stat'
  230. '<center><img <<$set_imgh>> src="images/locations/suburban/kuzmich.jpg"></center>'
  231. 'You: "Hello! My name is <<$pcs_nickname>>, I''m your new neighbor, we have not met yet."'
  232. 'Neighbour:"Hi. I''m Kuzmich. So you are the new neighbor."'
  233. '<font color="magenta"> You:"Yes. Can you help me? My whole garden is overgrown with weeds and I would like to clean it up</font>."'
  234. 'Kuzmich:"Well, you can hire some of the local men. They''re all workers. You can find them across the alley."'
  235. act 'Leave':gt 'dachi'
  236. end
  237. act 'Leave':gt 'dachi'
  238. end
  239. act 'Leave':gt 'dachi'
  240. end
  241. if $ARGS[0] = 'pos9':
  242. cla
  243. *clr
  244. minut += 15
  245. gs 'stat'
  246. '<center><img <<$set_imgh>> src="images/locations/suburban/dachastroy.jpg"></center>'
  247. 'You see a country house under construction. The workers are dragging some boards.'
  248. act 'Ask workers to excavate your garden':
  249. cla
  250. *clr
  251. minut += 15
  252. gs 'stat'
  253. '<center><img <<$set_imgh>> src="images/locations/suburban/dachastroy.jpg"></center>'
  254. 'You:"Hello! I need to clean up my garden. Could you help? And how much will it cost?"'
  255. 'Work:"For some shoveling work, 3000<b>₽</b>."'
  256. act 'Agree':
  257. *clr & cla
  258. etoexhib = 11
  259. gs 'stat'
  260. '<center><img <<$set_imgh>> src="images/locations/suburban/dachastroy.jpg"></center>'
  261. 'You agreed with the price that they asked them to clean your vegetable garden.'
  262. act 'Leave':gt 'dachi'
  263. end
  264. act 'Leave':gt 'dachi'
  265. end
  266. act 'Leave':gt 'dachi'
  267. end
  268. if $ARGS[0] = 'pos10':
  269. cla
  270. *clr
  271. minut += 30
  272. pcs_horny += 10
  273. temp = daystart
  274. etoexhib = 12
  275. gs 'stat'
  276. '<center><img <<$set_imgh>> src="images/locations/suburban/dachabust.jpg"></center>'
  277. 'You went out into the garden and asked:'
  278. '"Well, boys? How''s it going?"'
  279. '"It''s going well, young lady. We work in the most effective way we can."'
  280. act 'Leave':gt 'dachamy'
  281. end
  282. if $ARGS[0] = 'pos11':
  283. cla
  284. *clr
  285. minut += 15
  286. etoexhib = 13
  287. pcs_horny += 10
  288. temp = daystart
  289. gs 'stat'
  290. '<center><img <<$set_imgh>> src="images/locations/suburban/dachaex.jpg"></center>'
  291. 'You pretend to hang clothes to dry. You can see through the fence that your neighbor Kuzmich is stealing glances at you. Your lightly knotted robe is not able to hide your appetizing forms. But, you do not hide them, and give your neighbor a good view.'
  292. act 'Go home':gt 'dachamy'
  293. end
  294. if $ARGS[0] = 'pos12':
  295. cla
  296. *clr
  297. minut += 15
  298. pcs_horny += 10
  299. gs 'stat'
  300. '<center><img <<$set_imgh>> src="images/locations/suburban/dachabust2.jpg"></center>'
  301. 'Going out in the garden, you overheard the workers talk and decided to listen to what they were saying.'
  302. '"The landlady is hot. I saw her in her robe hanging clothes in the vegetable garden - she''s so hot!"'
  303. '"I would hit that!"'
  304. '"Yeah, okay. You''re dreaming. You can''t handle that city bitch!"'
  305. '"I''m telling you, she needs a good fuck, and that''s what I want to give her!"'
  306. '"Okay, good luck with that."'
  307. act 'Approach the workers':
  308. cla
  309. *clr
  310. minut += 15
  311. gs 'stat'
  312. '<center><img <<$set_imgh>> src="images/locations/suburban/dachabust3.jpg"></center>'
  313. 'You:"Hello guys! I see the work is progressing, but somehow slowly."'
  314. 'Work:"Sorry young lady. Some motivation would help us work harder."'
  315. act 'Decline':
  316. *clr & cla
  317. etoexhib = 15
  318. temp = daystart
  319. gs 'stat'
  320. '<center><img <<$set_imgh>> src="images/locations/suburban/dachabust3.jpg"></center>'
  321. '<font color="magenta">You:"Until you finish the work, you do not get anything</font>."'
  322. act 'Leave':gt 'dachi'
  323. end
  324. act 'Accept and give half the amount':
  325. *clr & cla
  326. money -= 1500
  327. etoexhib = 14
  328. temp = daystart
  329. gs 'stat'
  330. '<center><img <<$set_imgh>> src="images/locations/suburban/dachabust3.jpg"></center>'
  331. '"Well, here''s half. But tomorrow morning everything has to be finished."'
  332. act 'Leave':gt 'dachi'
  333. end
  334. end
  335. act 'Leave':gt 'dachi'
  336. end
  337. if $ARGS[0] = 'pos13':
  338. cla
  339. *clr
  340. gs 'stat'
  341. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang.jpg"></center>'
  342. 'You get up in the middle of the vegetable garden and begin to undress.'
  343. 'The guys eyes widen in surprise and you see them get excited.'
  344. '- <font color="magenta"> "Boys, you did a good job and deserve a reward!"</font>'
  345. act 'Undress completely':
  346. cla
  347. *clr
  348. gs 'stat'
  349. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang1.jpg"></center>'
  350. 'You stripped naked and stand next to the guys.'
  351. '- <font color="magenta"> Well, I do 100% percent discount?</font>'
  352. act 'Have sex':
  353. cla
  354. *clr
  355. minut += 120
  356. etoexhib = 16
  357. pcs_horny += 50
  358. gang += 1
  359. spafinloc = 4
  360. gs 'cum_manage'
  361. spafinloc = 12
  362. gs 'cum_manage'
  363. spafinloc = 3
  364. gs 'cum_manage'
  365. spafinloc = 0
  366. gs 'cum_manage'
  367. pcs_vag += 1
  368. gs 'stat'
  369. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang4.jpg"></center>'
  370. 'The guys pounced on you and after a few brief caresses they start fucking all your holes.'
  371. horand = rand(1, 100)
  372. if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied'
  373. if horand <= pcs_horny:set pcs_horny = 0 & orgasm += 1 & 'You had an orgasm'
  374. 'When it was over, you picked your clothes up, put them on and went back into the house.'
  375. act 'Next':gt 'dachain'
  376. end
  377. end
  378. end
  379. if $ARGS[0] = 'pos14':
  380. cla
  381. *clr
  382. gs 'stat'
  383. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang2.jpg"></center>'
  384. 'The drunk workers have surrounded you.'
  385. '"Look, here is our princess! You''re just in time for fun, come on guys, our hostess needs some love!"'
  386. 'You:"<font color="magenta">What are you doing?/font>"'
  387. act 'Next':
  388. cla
  389. *clr
  390. gs 'stat'
  391. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang3.jpg"></center>'
  392. 'The guys grabbed you and they start to undress and grope you.'
  393. act 'Surrender':
  394. cla
  395. *clr
  396. minut += 120
  397. etoexhib = 16
  398. pcs_horny += 50
  399. gang += 1
  400. spafinloc = 4
  401. gs 'cum_manage'
  402. spafinloc = 12
  403. gs 'cum_manage'
  404. spafinloc = 3
  405. gs 'cum_manage'
  406. spafinloc = 0
  407. gs 'cum_manage'
  408. pcs_vag += 1
  409. gs 'stat'
  410. '<center><img <<$set_imgh>> src="images/locations/suburban/sex/event/dachagang4.jpg"></center>'
  411. 'The drunk workers pounced on you and after a few brief caresses they fuck all your holes.'
  412. horand = rand(1, 100)
  413. if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied'
  414. if horand <= pcs_horny:set pcs_horny = 0 & orgasm += 1 & 'You had an orgasm'
  415. 'When it was over, you picked your clothes up, put them on and ran into the house.'
  416. act 'Next':gt 'dachain'
  417. end
  418. end
  419. end
  420. if $ARGS[0] = 'pos15':
  421. cla
  422. *clr
  423. gs 'stat'
  424. '<center><img <<$set_imgh>> src="images/locations/city/residential/market/rinokplug.jpg"></center>'
  425. 'You feel good, enjoying the scent of some expensive men''s cologne.'
  426. 'You feel a guy standing behind you, he is a groper and is now intent on touching your ass!'
  427. 'His hand grabs one of your buttcheeks.'
  428. act 'Move away':gt 'city_market', 'start'
  429. act 'Next':
  430. cla
  431. *clr
  432. minut += 10
  433. orgasm += 1
  434. pcs_horny = 0
  435. gs 'stat'
  436. '<center><img <<$set_imgh>> src="images/locations/city/residential/market/butplag.jpg"></center>'
  437. 'You showed no displeasure by his actions even with a lot of people around. All you could hear were people groaning because of the heat.'
  438. 'He moved his hand to your other cheek stopping in the middle, a little below. Little by little. he began to squeeze your ass in his hands. You did not react so he began to move his fingers under the fabric of your skirt to between your legs.'
  439. 'He felt that his "victim" was startled, but not surprised. Because he was experienced, he realized that you were excited and already quite wet.'
  440. 'You felt really excited. You wanted the guy to pull up your skirt and put cock inside... The sensations claimed you, your excitement increasing. You had to keep yourself from starting to groan and moan ...'
  441. 'The man, meanwhile, pulled at your skirt, and with skillful movements got under your skirt. His hand was on your damp with sweat ass and his fingers touched your anal tunnel.'
  442. 'You were slightly shaken; nobody was noticing anything even with the big crowd. He paused a little, seemingly shocked by the fact that a girl would walk around without panties on the market and with a plug in her ass.'
  443. 'You were at the peak of how much you could take; a little more and you''ll cum.'
  444. 'The guy certainly was not done. He penetrated a finger into your vagina and began to push in and pull out. And then you began to tremble, made a few noisy, deep breaths, and the guy''s finger were wet from your moisture.'
  445. '"Wow!" He whispered in your ear. "I did not expect such a reaction from a lady, and especially not one that would enjoy it."'
  446. 'An older woman approaching retirement age asked you:'
  447. '"Devonki, Can you help me?"'
  448. '"I''m sorry, I do not work here", you answered.'
  449. 'The woman must have startled the pervert because when you turned around, he was nowhere to be found.'
  450. act 'Next':gt 'city_market', 'start'
  451. end
  452. end
  453. if $ARGS[0] = 'pos16':
  454. cla
  455. *clr
  456. gs 'stat'
  457. '<center><b><font color="maroon">Lake</font></b></center>'
  458. '<center><img <<$set_imgh>> src="images/locations/suburban/lake.jpg"></center>'
  459. if temper >= 20 and bikini > 0 and hour >= 6 and hour <= 20:
  460. act 'Swim with a swimsuit (1 hour)':
  461. cla
  462. *clr
  463. cumspclnt = 4
  464. gs 'cum_cleanup'
  465. pcs_inhib += rand(1,2)
  466. minut += 60
  467. gs 'exercise', 'tier1', 1, 'stren_exp'
  468. pcs_sweat = 10 + rand(0,4)
  469. '<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
  470. 'You swim in the lake, the water refreshes and invigorates you.'
  471. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
  472. act 'Get out of the water':gt 'etoexhib', 'pos16'
  473. end
  474. end
  475. if temper >= 20 and hour >= 6 and hour <= 20:
  476. act 'Swim naked (1 hour)':
  477. cla
  478. *clr
  479. cumspclnt = 4
  480. gs 'cum_cleanup'
  481. pcs_inhib += 3
  482. minut += 60
  483. gs 'exercise', 'tier1', 1, 'stren_exp'
  484. pcs_sweat = 10 + rand(0,4)
  485. gs 'arousal', 'foreplay', 60, 'exhibition'
  486. gs 'arousal', 'end'
  487. '<center><img <<$set_imgh>> src="images/locations/suburban/lakenude.jpg"></center>'
  488. 'You swim in the lake completely naked, the water refreshes and invigorates you.'
  489. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
  490. act 'Get out of the water':gt 'etoexhib', 'pos16'
  491. end
  492. end
  493. act 'Return to the alley':gt 'etoexhib', 'pos2'
  494. end
  495. if $ARGS[0] = 'pos17':
  496. *clr & cla
  497. $menu_loc = 'etoexhib'
  498. $menu_arg = 'pos17'
  499. menu_off = 0
  500. gs 'stat'
  501. '<center><b><font color="maroon">community center</font></b></center>'
  502. if hour >= 9 and hour < 20:
  503. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk.jpg"></center>'
  504. 'From 20.00 to 23.00, the community center hosts a dance. The entrance fee is 25<b>₽</b>.'
  505. elseif hour >= 20 and hour <= 23:
  506. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
  507. 'At the entrance of the community center, you see many young people. The guys are just standing and smoking, joking and looking for others. The girls are in groups of 2-3 people, discussing various things, some are hiding in the bushes.'
  508. act 'Enter':money -= 25 & minut += 15 & gt 'etoexhib', 'pos18'
  509. end
  510. act 'Go back to the train station':gt 'pav_commercial'
  511. end
  512. if $ARGS[0] = 'pos18':
  513. *clr & cla
  514. $menu_loc = 'etoexhib'
  515. $menu_arg = 'pos18'
  516. menu_off = 0
  517. gs 'stat'
  518. '<center><b><font color="maroon">Disco</font></b></center>'
  519. act 'Go outside':gt 'etoexhib', 'pos17'
  520. if hour < 23:
  521. menu_off = 1
  522. temp = rand(1, 100)
  523. if temp >= 1 and temp < 35:
  524. minut += 30
  525. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho.jpg"></center>'
  526. 'The dance floor is full of people. All are dancing and having fun.'
  527. act 'Dance':
  528. *clr & cla
  529. minut += 30
  530. fat -= 1
  531. if pcs_danc < 50 and pcs_agil >= pcs_danc:danc_exp += 1
  532. pcs_mood += 10
  533. frost = 0
  534. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
  535. 'The music is quite old, but catchy. You have fun dancing, paying no attention to anyone.'
  536. act 'Next':gt 'etoexhib', 'pos18'
  537. end
  538. act 'Next':gt 'etoexhib', 'pos18'
  539. elseif temp >= 35 and temp < 65:
  540. minut += 30
  541. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_pusto.jpg"></center>'
  542. 'The dance floor is unoccupied. Cold and sad. You have plenty of free space.'
  543. if temp >= 35 and temp < 65:
  544. 'There is a kid running around with a camera and he takes pictures of girls.'
  545. act 'Pose for the photographer':
  546. cla
  547. *clr
  548. gs 'stat'
  549. if alko < 3 and pcs_apprnc >= 20 and pcs_apprnc < 120:
  550. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_foto.jpg"></center>'
  551. 'You pose for the amateur photographer, trying to look as attractive as possible.'
  552. act 'Next':gt 'etoexhib', 'pos18'
  553. elseif alko < 3 and pcs_apprnc >= 120:
  554. temp = rand(1, 2)
  555. if temp = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_foto1.jpg"></center>'
  556. if temp = 2:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_foto2.jpg"></center>'
  557. 'You pose for the amateur photographer, trying to look as attractive as possible.'
  558. act 'Next':gt 'etoexhib', 'pos18'
  559. end
  560. if pcs_horny > 10 and alko > 1:
  561. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_glam.jpg"></center>'
  562. 'You put your foot on the table. You thought that photo was so erotic.'
  563. end
  564. end
  565. act 'Next':gt 'etoexhib', 'pos18'
  566. end
  567. elseif temp >= 65 and temp <= 100:
  568. minut += 30
  569. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho1.jpg"></center>'
  570. 'The music is quite old, but catchy. You have fun dancing, paying no attention to anyone.'
  571. act 'Dance':
  572. cla
  573. *clr
  574. minut += 30
  575. fat -= 1
  576. if pcs_danc < 50 and pcs_agil >= pcs_danc:danc_exp += 1
  577. pcs_mood += 10
  578. frost = 0
  579. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
  580. 'The music is quite old, but catchy. You have fun dancing, paying no attention to anyone.'
  581. act 'Next':gt 'etoexhib', 'pos18'
  582. end
  583. act 'Next':gt 'etoexhib', 'pos18'
  584. end
  585. else
  586. 'The Club closes, the lights go off, the music fades and everyone begins to leave.'
  587. end
  588. end
  589. if $ARGS[0] = 'pos19':
  590. *clr & cla
  591. $menu_loc = 'etoexhib'
  592. $menu_arg = 'pos19'
  593. menu_off = 0
  594. gs 'stat'
  595. '<center><b><font color="maroon">Reception</font></b></center>'
  596. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_holl.jpg"></center>'
  597. 'The Lyceum entrance hall. It''s pretty clean and quiet. There is a desk and office for the personnel department. On the wall hangs a timetable.'
  598. if workPTU = 2:
  599. *clr & cla
  600. menu_off = 1
  601. pcs_mood -= 50
  602. workPTU = 1
  603. teachlevel = 0
  604. gs 'stat'
  605. '<center><b><font color="maroon">Direction</font></b></center>'
  606. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
  607. '"What a shame, <<$pcs_nickname>>! You are a disgrace to the honourable profession of teaching! You have no place in our ranks! Take your documents and leave, you are fired!"'
  608. act 'Next':gt 'etoexhib', 'pos20'
  609. exit
  610. end
  611. if teachlevel = 0:'You could not teach yourself out of a paper bag, you are embarrassingly terrible at teaching.'
  612. if teachlevel >= 1 and teachlevel < 10:'You do not deserve to be a teacher.'
  613. if teachlevel >= 10 and teachlevel < 20:'You are only as good as a young, inexperienced intern.'
  614. if teachlevel >= 20 and teachlevel < 30:'You already have a certain reputation.'
  615. if teachlevel >= 30 and teachlevel < 50:'You are a respectable teacher.'
  616. if teachlevel >= 50 and teachlevel < 70:'The other teachers turn to you for advice.'
  617. if teachlevel >= 70 and teachlevel < 90:'Your experience and knowledge is known outside the Lyceum.'
  618. if teachlevel >= 90:'You are the personification of education.'
  619. act 'On the street':gt 'etoexhib', 'pos20'
  620. if workPTU > 2:
  621. act 'Go to the corridor on this floor':gt 'etoexhib', 'pos22'
  622. act 'Go to the second floor corridor':gt 'etoexhib', 'pos23'
  623. act 'Go to the third floor corridor':gt 'etoexhib', 'pos24'
  624. elseif workPTU ! 1:
  625. act 'Visit the personnel department.':
  626. menu_off = 1
  627. if workPTU > 2:
  628. cla
  629. *clr
  630. minut += 5
  631. gs 'stat'
  632. '<center><b><font color="maroon">Personnel department</font></b></center>'
  633. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_cadr.jpg"></center>'
  634. act 'Resign':
  635. cla
  636. workPTU = 0
  637. 'You have resigned and no longer work here.'
  638. act 'Leave the personnel department':gt 'etoexhib', 'pos19'
  639. end
  640. act 'Leave the personnel department':gt 'etoexhib', 'pos19'
  641. elseif workPTU = 0:
  642. cla
  643. *clr
  644. minut += 15
  645. gs 'stat'
  646. '<center><b><font color="maroon">Personnel department</font></b></center>'
  647. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_cadr.jpg"></center>'
  648. '"Hello!" Welcomes the Human Relations employee. She tells you that they need a certified teacher. Working days are Monday to Saturday from 14.00 to 16.00. The pay is 300 <b>₽</b> per day, plus a room in a hostel. The terms of the contract say that, because of a full salary, at the moment, there is no free meals. There is a strict dress code, it must be business atire. Also it is not recommended for women to have bright makeup or a strong perfume.'
  649. if diplom = 0 and fakediplom < 0:
  650. 'You are told that you can not take the job without a diploma of higher pedagogical education.'
  651. fakediplom = 2
  652. elseif diplom = 1 or fakediplom = 1:
  653. act 'Pass an interview for a job':
  654. cla
  655. *clr
  656. minut += 60
  657. gs 'stat'
  658. '<center><b><font color="maroon">Human Resource Department</font></b></center>'
  659. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_cadr.jpg"></center>'
  660. 'You have passed the oral interview, left a copy of your diploma and other documents to the personnel department, where you are told that you can start working.'
  661. act 'Become a teacher':
  662. cla
  663. workPTU = 3
  664. teachlevel = 16
  665. 'You brought your work book and said that you could start work the next business day.'
  666. act 'Exit to Hall':gt 'etoexhib', 'pos19'
  667. end
  668. end
  669. end
  670. act 'Exit to Hall':gt 'etoexhib', 'pos19'
  671. end
  672. end
  673. end
  674. end
  675. if $ARGS[0] = 'pos20':
  676. *clr & cla
  677. $menu_loc = 'etoexhib'
  678. $menu_arg = 'pos20'
  679. menu_off = 0
  680. gs 'stat'
  681. '<center><b><font color="maroon">High School</font></b></center>'
  682. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/lizey.jpg"></center>'
  683. 'On the door hangs a poster:"The Vocational School has been teaching for 11 years in the fields of:(a comprehensive list). We are devoted to the training of the future employees of big enterprises. The college creates optimal conditions for personal and professional formation of students under a modern curriculum."'
  684. if workPTU > 2:'Sport <a href="exec:gt ''etoexhib'', ''pos21''">space.</a>'
  685. if teachlevel > 0 and teachlevel < 10:workPTU = 2
  686. act 'Leave':minut += 15 & gt 'pav_commercial'
  687. act 'Enter the Lyceum':gt 'etoexhib', 'pos19'
  688. end
  689. if $ARGS[0] = 'pos21':
  690. *clr & cla
  691. $menu_loc = 'etoexhib'
  692. $menu_arg = 'pos22'
  693. menu_off = 0
  694. gs 'stat'
  695. '<center><b><font color="maroon">Playground</font></b></center>'
  696. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/stadion.jpg"></center>'
  697. 'You see all that remains of a football field. Pathetic. Nevertheless, the guys are still having fun playing football here.'
  698. if rand(1,100) >= 90:
  699. *clr & cla
  700. menu_off = 1
  701. gs 'stat'
  702. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_fight.jpg"></center>'
  703. 'You see a group of girls, mocking and kicking a young man.'
  704. act 'Interfere for the man':
  705. *clr & cla
  706. teachlevel += 1
  707. '"What are you doing? Immediately stop, I''ll call the police!" You yell at the girls. And they snort:"He''s an ssshole, he deserved it!" but they still leave the guy alone.'
  708. 'You are a good example by helping the helpless man. This will positively impact your reputation.'
  709. act 'Next':gt 'etoexhib', 'pos21'
  710. end
  711. act 'Disregard':gt 'etoexhib', 'pos21'
  712. end
  713. act 'Back':gt 'etoexhib', 'pos20'
  714. end
  715. if $ARGS[0] = 'pos22':
  716. *clr & cla
  717. $menu_loc = 'etoexhib'
  718. $menu_arg = 'pos22'
  719. menu_off = 0
  720. gs 'stat'
  721. '<center><b><font color="maroon">Corridor (1st floor)</font></b></center>'
  722. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_1korr.jpg"></center>'
  723. 'On the first floor there is a medical office, the HR offices, a gym, a dining room and some classes.'
  724. if rand(1,100) >= 90:
  725. *clr & cla
  726. pcs_horny += 5
  727. gs 'stat'
  728. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_rand.jpg"></center>'
  729. 'You met Olga L. the teacher of Foreign Languages. She is wearing a pretty sexy outfit, you think that''s against the rules.'
  730. act 'Next':gt 'etoexhib', 'pos22'
  731. end
  732. act 'Go inside the hall':gt 'etoexhib', 'pos19'
  733. act 'Go inside the gym':gt 'etoexhib', 'pos33'
  734. act 'Go inside the medical office':gt 'etoexhib', 'pos36'
  735. act 'Go inside the dining room':gt 'etoexhib', 'pos37'
  736. end
  737. if $ARGS[0] = 'pos23':
  738. *clr & cla
  739. $menu_loc = 'etoexhib'
  740. $menu_arg = 'pos23'
  741. menu_off = 0
  742. gs 'stat'
  743. '<center><b><font color="maroon">Corridor (2nd floor)</font></b></center>'
  744. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_2korr.jpg"></center>'
  745. 'On this floor there are classrooms, the principal''s office, a library and the teacher''s toilet.'
  746. if rand(1, 100) >= 90:
  747. *clr & cla
  748. menu_off = 0
  749. pcs_horny += 10
  750. gs 'stat'
  751. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_korr1.jpg"></center>'
  752. 'One of the students is sitting on the windowsill. You notice her revealing outfit and cheeky behavior.'
  753. act 'Next':gt 'etoexhib', 'pos23'
  754. end
  755. act 'Account Director':gt 'etoexhib', 'pos28'
  756. act 'Go in the library':gt 'etoexhib', 'pos38'
  757. act 'Go to the toilet':gt 'etoexhib', 'pos39'
  758. act 'Go to the hall':gt 'etoexhib', 'pos19'
  759. end
  760. if $ARGS[0] = 'pos24':
  761. *clr & cla
  762. $menu_loc = 'etoexhib'
  763. $menu_arg = 'pos24'
  764. menu_off = 0
  765. gs 'stat'
  766. '<center><b><font color="maroon">Corridor (3rd floor)</font></b></center>'
  767. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_3korr.jpg"></center>'
  768. 'On this floor there is a class of optional subjects.'
  769. act 'Go inside the hall':gt 'etoexhib', 'pos19'
  770. if hour >= 9 and hour <= 13:act 'Go to class':gt 'etoexhib', 'pos25'
  771. if hour >= 14 and hour < 15:act 'Start teaching':gt 'etoexhib', 'pos26'
  772. if hour >= 15 and hour <= 18:act 'Go to class':gt 'etoexhib', 'pos25'
  773. if hour >= 7 and hour <= 20:act 'Staff room':gt'etoexhib','pos24tk'
  774. end
  775. if $ARGS[0] = 'pos24tk':
  776. $metkaM = 'pos24tk'
  777. $locM = 'etoexhib'
  778. $menu_loc = 'etoexhib'
  779. $menu_arg = 'pos24tk'
  780. menu_off = 0
  781. $location_type = 'public_indoors'
  782. *clr & cla
  783. gs'stat'
  784. minut +=10
  785. '<center><b><font color = maroon>Teacher</font></b></center>'
  786. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_tk.jpg"></center>'
  787. 'A place for the teachers to relax.'
  788. 'On the wall near the front door hanging <a href="exec:gt ''mirror'',''start''">mirror</a>.'
  789. 'In one corner there is a small old sofa.'
  790. act 'Lie down on the couch':
  791. cla
  792. minut += 30
  793. if pcs_sleep < 90:
  794. pcs_sleep += 10
  795. else
  796. pcs_sleep = 100
  797. end
  798. 'You relax on the couch.'
  799. act 'Stand up':gt'etoexhib','pos24tk'
  800. end
  801. if hour >= 14 and hour <= 15:
  802. temp = rand(1,100)
  803. if temp >= 90:
  804. *clr & cla
  805. menu_off = 1
  806. minut += 6
  807. pcs_mood -= 10
  808. gs'stat'
  809. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
  810. '"<<$pcs_nickname>>, where were you? Do you know what is happening in your class right now? I can tell you: there''s some confusion, walking around and there''s even an, pardon the expression, orgy. Go immediately to class, calm everyone down and teach your lesson through the remaining time as is expected of you".'
  811. if izvad = 0:
  812. act 'Ask for forgiveness of the Director':
  813. *clr & cla
  814. minut += 5
  815. gs'stat'
  816. izvad = 1
  817. pzptu = 1
  818. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg" ></center>'
  819. 'You stand back up and see the Director apologizing for your actions.'
  820. 'The Director tells you that you need will come to her study in your free time.'
  821. act 'Leave':gt'etoexhib','pos24'
  822. end
  823. end
  824. act 'Tell the director this won''t happen again':
  825. *clr & cla
  826. minut += 5
  827. gs'stat'
  828. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
  829. 'You agree with your error and say that in the future this will not happen again.'
  830. act 'Leave':teachlevel -= 3 & gt'etoexhib','pos24'
  831. end
  832. end
  833. elseif hour >= 9 and hour <= 12:
  834. temp = rand(1,100)
  835. if temp >= 90:
  836. *clr & cla
  837. menu_off = 1
  838. minut += 60
  839. teachlevel += 2
  840. gs'stat'
  841. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/21ptu.jpg"></center>'
  842. 'You are approached by a student that asked you to help her with her work.'
  843. act 'Help':gt'etoexhib','pos24tk'
  844. end
  845. end
  846. act 'In the corridor':gt'etoexhib','pos24'
  847. end
  848. if $ARGS[0] = 'pos25':
  849. *clr & cla
  850. menu_off =1
  851. gs 'stat'
  852. '<center><b><font color="maroon">Cabinet</font></b></center>'
  853. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_klass.jpg"></center>'
  854. 'Your class.'
  855. if workPTU = 3:
  856. *clr & cla
  857. hour = 14
  858. workPTU = 4
  859. gs 'stat'
  860. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_starosta.jpg"></center>'
  861. 'Ina:"Hello, <<$pcs_nickname>>!" You saw Robski Inna one of the best student in the school'
  862. 'Ina:"You look so chic today!"'
  863. 'You:"Thank you, Ina."'
  864. act 'Next':gt 'etoexhib', 'pos25'
  865. elseif workPTU = 4 and gor_dorm = 4:
  866. *clr & cla
  867. hour = 14
  868. gor_dorm = 5
  869. gs 'stat'
  870. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/cera_nerd2.jpg"></center>'
  871. 'you see Eugene Isenberg, the Botany and Chemistry teacher, someone wrote on his nose.'
  872. 'You:"Hello, Zhenya!"'
  873. 'Zhenya:"Hello, <<$pcs_nickname>>!" He blushes a little and looks at the floor'
  874. 'You:"Zhenya, you have something written on your nose." You point to the mirror.'
  875. 'Eugene looks in the mirror and immediately becomes red as a lobster'
  876. 'Zhenya:"This is what I get for playing with the boys, excuse me and thank you..." He begins to rub his nose hard'
  877. 'It seems some students make fun of this guy, You feel like you should cheer him up.'
  878. 'You:"Do not worry, so tell me, how are you doing? Do you have a girlfriend? Almost every young man your age has a girl.'
  879. 'Zhenya:"Unfortunately, I do not. I am not acquainted with many girls, they always make fun of me... it hurts my feelings.'
  880. 'You:"Well, what do you like to do? Do you have a hobby? Going to the movies, games maybe?'
  881. 'Zhenya started talking in great lenghts about all of his favorite fighters and shooters.'
  882. 'You:"I''m sorry but I have to go. It was nice to chat with you.'
  883. 'Eugene looks at you with burning eyes.'
  884. act 'Next':gt 'etoexhib', 'pos25'
  885. end
  886. act 'Get out into the corridor':gt 'etoexhib', 'pos24'
  887. if teachlevel > 10: act 'Read the school magazine':gt 'etoexhib', 'pos90'
  888. end
  889. if $ARGS[0] = 'pos26':
  890. cla
  891. *clr
  892. minut += 5
  893. gs 'stat'
  894. '<center><b><font color="maroon">Cabinet</font></b></center>'
  895. if pzptu = 0:
  896. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_lesson0.jpg"></center>'
  897. 'You went to your classroom and are ready to start the exercises. Your pupils, divided into groups, talk to each other, some are laughing, some chatting on the phone, others are eating. Basically any other youth.'
  898. act 'Post activity': minut = 0 & hour = 14 & gt'etoexhib','pos27'
  899. elseif pzptu = 1:
  900. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_lesson1xl.jpg"></center>'
  901. 'You went to class and were stunned by what they saw, in class it was madness and mayhem. '
  902. act 'Post activity': minut += 5 & pzptu = 0 & gt'etoexhib','pos27'
  903. end
  904. end
  905. if $ARGS[0] = 'pos27':
  906. *clr & cla
  907. menu_off = 1
  908. minut += 5
  909. gs 'stat'
  910. '<center><b><font color="maroon">Cabinet</font></b></center>'
  911. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/lesson1.jpg"></center>'
  912. 'Your students sit in their seats and listen to you.'
  913. if pcs_horny > 30:
  914. temp = rand(1, 100)
  915. if temp >= 95:
  916. act 'Drop your pencil on the ground':
  917. *clr & cla
  918. pcs_horny += 40
  919. minut += 60
  920. teachlevel -= 5
  921. gs 'stat'
  922. '<center><b><font color="maroon">Cabinet</font></b></center>'
  923. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_karandash.jpg"></center>'
  924. 'Pacing between rows, you go down on your haunches, pretending to pick up a fallen pencil. However, sitting in the back row some of the guys could see under your skirt. Their eyes widened as they could see everything.'
  925. if $pantyworntype = 'none':
  926. temp = rand(1,100)
  927. if temp >= 90:
  928. pcs_mood -= 5
  929. teachlevel -= 2
  930. 'You heard a barely audible whisper - "Look at that! <<$pcs_nickname>> doesn''t have any panties and we can see her pussy!"'
  931. 'You feel your face begins to burn with shame after what you heard.'
  932. 'You struggle for the rest of the lesson, your conscience tugging at you, while you try to convey the material to your students.'
  933. act'Further':gt'etoexhib','pos27'
  934. end
  935. end
  936. act 'Next':gt 'etoexhib', 'pos27'
  937. end
  938. elseif temp >= 85 and temp < 90:
  939. act 'Sit on the table':
  940. *clr & cla
  941. pcs_horny += 40
  942. minut += 60
  943. teachlevel -= 2
  944. gs 'stat'
  945. '<center><b><font color="maroon">Cabinet</font></b></center>'
  946. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_urok1.jpg"></center>'
  947. 'Explaining the material to your students, you sit on the edge of the table. The entire class looks at your feet and legs.'
  948. act 'Next':gt 'etoexhib', 'pos27'
  949. end
  950. elseif temp >= 75 and temp < 80:
  951. act 'Drop the chalk':
  952. *clr & cla
  953. pcs_horny += 40
  954. minut += 60
  955. teachlevel -= 5
  956. gs 'stat'
  957. '<center><b><font color="maroon">Cabinet</font></b></center>'
  958. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_rak.jpg"></center>'
  959. 'While explaining stuff you "accidentally" drop the chalk. At first, you try to pick it up by bending down. You can''t grab it, realizing that the chalk is out of reach. You get down on all fours, with your ass up. Those who sat nearby witnessed an unforgettable show.'
  960. if $pantyworntype = 'none':
  961. temp = rand(1,100)
  962. if temp >= 90:
  963. pcs_mood -= 5
  964. teachlevel -= 2
  965. 'You heard a barely audible whisper - "Look at that! <<$pcs_nickname>> doesn''t have any panties and we can see her pussy!"'
  966. 'You feel your face begins to burn with shame after what you heard.'
  967. 'You struggle for the rest of the lesson, your conscience tugging at you, while you try to convey the material to your students.'
  968. act'Further':gt'etoexhib','pos27'
  969. end
  970. end
  971. act 'Next':gt 'etoexhib', 'pos27'
  972. end
  973. elseif temp >= 65 and temp < 70:
  974. act 'Sit sexily on the table':
  975. *clr & cla
  976. pcs_horny += 40
  977. minut += 60
  978. teachlevel -= 2
  979. gs 'stat'
  980. '<center><b><font color="maroon">Cabinet</font></b></center>'
  981. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_nastol.jpg"></center>'
  982. 'Explaining the material to your students, you sit on the edge of the table. The entire class looks at your feet and legs.'
  983. act 'Next':gt 'etoexhib', 'pos27'
  984. end
  985. elseif temp >= 55 and temp < 60:
  986. act 'Show stockings':
  987. *clr & cla
  988. pcs_horny += 40
  989. minut += 60
  990. teachlevel -= 2
  991. gs 'stat'
  992. '<center><b><font color="maroon">Cabinet</font></b></center>'
  993. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_urok2.jpg"></center>'
  994. 'You sat down next to a student to show him some examples, you casually crossed your legs, showing your student your elastic stockings. Immediately after answering the poor man, he rushed to the toilet. Poor boy.'
  995. act 'Next':gt 'etoexhib', 'pos27'
  996. end
  997. end
  998. end
  999. if hour < 16:
  1000. act 'Teach':
  1001. *clr & cla
  1002. minut += 60
  1003. pcs_mood -= 5
  1004. if mentats_dose > 0:intel_exp += mentats_dose - rand(0,mentats_dose)
  1005. if pcs_intel < 80:intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  1006. if $clothingworntype = 'office' and (pcs_makeup = 1 or pcs_makeup = 2) and teachlevel < 70:teachlevel += 1
  1007. if pcs_makeup = 4:teachlevel -= 1
  1008. money += 150
  1009. gs 'stat'
  1010. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/lesson.jpg"></center>'
  1011. 'You teach a lesson. Your students listen to you carefully.'
  1012. act 'Next':gt 'etoexhib', 'pos27'
  1013. end
  1014. elseif hour >= 16:
  1015. act 'Finish your lesson':
  1016. cla
  1017. 'The lesson ends and the students rush to leave the classroom.'
  1018. act 'Leave': minut += 5 & gt 'etoexhib', 'pos24'
  1019. end
  1020. end
  1021. act 'Get out of the class':gt 'etoexhib', 'pos24'
  1022. end
  1023. if $ARGS[0] = 'pos28':
  1024. *clr & cla
  1025. menu_off = 1
  1026. gs 'stat'
  1027. '<center><b><font color="maroon">Direction</font></b></center>'
  1028. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_dir.jpg"></center>'
  1029. if izvad = 0:
  1030. '"Welcome, <<$pcs_nickname>>! Hope you like working with us. If you have any questions for me, I''m listening."'
  1031. elseif izvad = 1:
  1032. '"Hello again, <<$pcs_nickname>>."'
  1033. end
  1034. act 'Leave the office':gt 'etoexhib', 'pos23'
  1035. end
  1036. if $ARGS[0] = 'pos33':
  1037. *clr & cla
  1038. $menu_loc = 'etoexhib'
  1039. $menu_arg = 'pos33'
  1040. menu_off = 0
  1041. gs 'stat'
  1042. '<center><b><font color="maroon">Gym</font></b></center>'
  1043. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/sportzal.jpg"></center>'
  1044. 'Gym for team sports.'
  1045. act 'Go to the hall':gt 'etoexhib', 'pos19'
  1046. act 'Women''s Shower':gt 'etoexhib', 'pos34'
  1047. act 'Men''s shower':gt 'etoexhib', 'pos35'
  1048. end
  1049. if $ARGS[0] = 'pos34':
  1050. clr & cla
  1051. $menu_loc = 'etoexhib'
  1052. $menu_arg = 'pos34'
  1053. menu_off = 0
  1054. minut += 15
  1055. gs 'stat'
  1056. '<center><b><font color="maroon">Women''s Shower</font></b></center>'
  1057. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_jen.jpg"></center>'
  1058. 'Shower.'
  1059. temp = rand(1, 100)
  1060. if temp >= 90:
  1061. *clr & cla
  1062. menu_off = 1
  1063. minut += 15
  1064. pcs_horny += 20
  1065. gs 'stat'
  1066. '<center><b><font color="maroon">Women''s Shower</font></b></center>'
  1067. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_dush.jpg"></center>'
  1068. '"Oh! <<$pcs_nickname>>, leave, please, we''re not dressed!" Two girls scream, taking a shower.'
  1069. act 'Next':gt 'etoexhib', 'pos33'
  1070. end
  1071. if shampoo > 0:
  1072. act 'Take a shower':gt 'ptu_dush', 'pos1'
  1073. else
  1074. *nl
  1075. '<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
  1076. end
  1077. act 'Go to the hall':gt 'etoexhib', 'pos33'
  1078. end
  1079. if $ARGS[0] = 'pos35':
  1080. *clr & cla
  1081. menu_off = 1
  1082. minut += 15
  1083. teachlevel -= 1
  1084. gs 'stat'
  1085. '<center><b><font color="maroon">Men''s shower</font></b></center>'
  1086. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_muz.jpg"></center>'
  1087. 'Shower for the boys. You should not be here. This will affect your reputation.'
  1088. act 'Go to the hall':gt 'etoexhib', 'pos33'
  1089. end
  1090. if $ARGS[0] = 'pos36':
  1091. *clr & cla
  1092. $menu_loc = 'etoexhib'
  1093. $menu_arg = 'pos36'
  1094. menu_off = 0
  1095. minut += 15
  1096. gs 'stat'
  1097. '<center><b><font color="maroon">Doctor</font></b></center>'
  1098. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_medkab.jpg"></center>'
  1099. 'You see that they can handle first aid, medical examinations and vaccinations in here.'
  1100. temp = rand(1, 100)
  1101. if temp >= 90:
  1102. *clr & cla
  1103. menu_off = 1
  1104. minut += 15
  1105. pcs_horny += 10
  1106. gs 'stat'
  1107. '<center><b><font color="maroon">Doctor</font></b></center>'
  1108. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_med1.jpg"></center>'
  1109. 'When you went into the medical room, nurses were taking pictures of themselves in their outfits in seductive poses. They will probably post those to their social network.'
  1110. act 'Next':gt 'etoexhib', 'pos36'
  1111. end
  1112. act 'In the corridor (1 Floor)':gt 'etoexhib', 'pos22'
  1113. end
  1114. if $ARGS[0] = 'pos37':
  1115. cla
  1116. *clr
  1117. minut += 15
  1118. gs 'stat'
  1119. '<center><b><font color="maroon">Dining</font></b></center>'
  1120. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_stol.jpg"></center>'
  1121. 'You can have dinner or a snack.'
  1122. temp = rand(1, 100)
  1123. if temp >= 90:
  1124. act 'Say hello to the Director':
  1125. *clr & cla
  1126. minut += 15
  1127. teachlevel += 1
  1128. gs 'stat'
  1129. '<center><b><font color="maroon">Dining</font></b></center>'
  1130. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_stoldir.jpg"></center>'
  1131. 'You met the Director of the institution. You politely greeted her and she gave you a compliment.'
  1132. act 'Next':gt 'etoexhib', 'pos37'
  1133. end
  1134. end
  1135. act 'Buy lunch (100 <b>₽</b>)':
  1136. money -= 100
  1137. gs 'food', 'm_meal'
  1138. gt 'etoexhib', 'pos37'
  1139. end
  1140. act 'In the corridor (1st Floor)':gt 'etoexhib', 'pos22'
  1141. end
  1142. if $ARGS[0] = 'pos38':
  1143. cla
  1144. *clr
  1145. minut += 15
  1146. gs 'stat'
  1147. '<center><b><font color="maroon">Library</font></b></center>'
  1148. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_lib.jpg"></center>'
  1149. 'Here, the students can borrow textbooks and reading material. There also is a computer lab with Internet access.'
  1150. temp = rand(1, 100)
  1151. if temp >= 90:
  1152. *clr & cla
  1153. minut += 15
  1154. pcs_horny += 10
  1155. gs 'stat'
  1156. '<center><b><font color="maroon">Library</font></b></center>'
  1157. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_ups.jpg"></center>'
  1158. 'You notice the librarian haunched down and you can see her crotch. In the hall, you hear some people wondering if it was intentional or an accident?'
  1159. act 'Next':gt 'etoexhib', 'pos38'
  1160. end
  1161. if gor_dorm = 5:
  1162. act 'Search the Web for "Tetrodotoxin"':
  1163. *clr & cla
  1164. minut += 120
  1165. gor_dorm = 6
  1166. gs 'stat'
  1167. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_comp.jpg"></center>'
  1168. 'The only things that you could find about this stuff, is that it is used in experimental Pharmacology.'
  1169. act 'Further':gt 'etoexhib', 'pos38'
  1170. end
  1171. end
  1172. act 'Go to the hallway':gt 'etoexhib', 'pos23'
  1173. end
  1174. if $ARGS[0] = 'pos39':
  1175. cla
  1176. *clr
  1177. minut += 15
  1178. gs 'stat'
  1179. '<center><b><font color="maroon">Women''s WC</font></b></center>'
  1180. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_toilet_w.jpg"></center>'
  1181. 'A WC, which in theory, only teachers can use.'
  1182. if $pantyworntype ! 'none':
  1183. act 'Remove underwear':gs 'underwear', 'remove' & gt $loc,$metka
  1184. end
  1185. if tampon > 0 and mesec > 0 and isprok = 0:
  1186. act 'Change tampon':
  1187. cla
  1188. *clr
  1189. tampon = tampon - 1
  1190. isprok = 1
  1191. minut = minut + 5
  1192. pcs_mood -= 5
  1193. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash3.jpg"></center>'
  1194. 'You have changed your tampon.'
  1195. act 'Finish':gt $loc,$metka
  1196. end
  1197. end
  1198. temp = rand(1, 100)
  1199. if temp >= 90:
  1200. *clr & cla
  1201. minut += 15
  1202. pcs_horny += 10
  1203. gs 'stat'
  1204. '<center><b><font color="maroon">Women''s WC</font></b></center>'
  1205. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_zanato.jpg"></center>'
  1206. '"Oops! Sorry, the door was supposed to be closed."'
  1207. act 'Next':gt 'etoexhib', 'pos39'
  1208. end
  1209. act 'Go to the Hallway':gt 'etoexhib', 'pos23'
  1210. end
  1211. if $ARGS[0] = 'pos40':
  1212. cla
  1213. *clr
  1214. minut += 60
  1215. gs 'stat'
  1216. '<center><b><font color="maroon">Town</font></b></center>'
  1217. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hostel/dom_gor.jpg"></center>'
  1218. 'Your room in the hostel. It''s in poor condition, but still better than nothing. In the courtyard there is a clothesline and a shed for the storage of junk. Strangely, even if there seems to be no tenants around, the hostel is crammed to capacity.'
  1219. if gor_dorm > 0:act 'To the room':gt 'dom_gor'
  1220. if gor_dorm = 0:act 'Superintendant':gt 'comendant', 'pos1'
  1221. if gor_dorm = 2:act 'Search for the superintendant':gt 'comendant', 'pos3'
  1222. if gor_dorm >= 3:act 'Inspect the barn':gt 'etoexhib', 'pos43'
  1223. act 'Leave':gt 'pav_commercial'
  1224. end
  1225. if $ARGS[0] = 'pos41':
  1226. $metka = $ARGS[0]
  1227. $loc = $CURLOC
  1228. $metka = $ARGS[0]
  1229. $loc = $CURLOC
  1230. $location_type = 'bathroom'
  1231. cla
  1232. *clr
  1233. minut += 10
  1234. gs 'stat'
  1235. '<center><b><font color="maroon">Shared Bathroom</font></b></center>'
  1236. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hostel/comm_vann.jpg"></center>'
  1237. 'The bathroom is in a terrible state; dirty walls, a mess on the floor, old plumbing, and virtually no water flows. From the pipes comes a strange odor, but there are so many, if only I were smarter.'
  1238. gs 'din_van', 'private'
  1239. if pcs_intel > 50 and gor_dorm = 1:act 'Inspect pipes':gt 'etoexhib', 'pos42'
  1240. act 'Back to the room':gt 'dom_gor'
  1241. end
  1242. if $ARGS[0] = 'pos42':
  1243. cla
  1244. *clr
  1245. minut += 10
  1246. gor_dorm = 2
  1247. gs 'stat'
  1248. '<center><b><font color="maroon">Rusty pipes</font></b></center>'
  1249. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hostel/comm_tru.jpg"></center>'
  1250. 'All the pipes are rusted through, according to the superintendant, it is a clear violation of building rules. On top of that, the pipes stink of chemicals.'
  1251. act 'Back to the room':gt 'dom_gor'
  1252. end
  1253. if $ARGS[0] = 'pos43':
  1254. cla
  1255. *clr
  1256. minut += 10
  1257. if gor_dorm = 3:gor_dorm = 4
  1258. gs 'stat'
  1259. '<center><b><font color="maroon">Shed hostel</font></b></center>'
  1260. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hostel/gor_saray.jpg"></center>'
  1261. 'In addition to an incredible amount of junk, on the floor there are chemicals. On one of the cans you see the sign of chemical hazards and the inscription "Tetrodotoxin". It is better not to touch it.'
  1262. 'Hmm... This is no place for dangerous chemicals. I should try to find out more about this stuff.'
  1263. act 'Back to the room':gt 'dom_gor'
  1264. end
  1265. if $ARGS[0] = 'pos49':
  1266. $metka = $ARGS[0]
  1267. $loc = $CURLOC
  1268. $metka = $ARGS[0]
  1269. $loc = $CURLOC
  1270. $location_type = 'bathroom'
  1271. cla
  1272. *clr
  1273. gs 'stat'
  1274. '<center><b><font color="maroon">Shared Bathroom</font></b></center>'
  1275. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hostel/vann_gor.jpg"></center>'
  1276. 'Bathroom in the dorm.'
  1277. gs 'din_van', 'private'
  1278. act 'To the room':gt 'dom_gor'
  1279. end
  1280. if $ARGS[0] = 'pos50':
  1281. cla
  1282. *clr
  1283. minut += 5
  1284. gs 'stat'
  1285. 'You were hearing some muffled voices, you went straight to a group of teenagers who have gathered here to smoke, chat and drink beer. There is 7 people of young ages, from 18 to 20 years. They watch you with interest and are waiting to see what you will say.'
  1286. 'You obviously did not expect that there would be so many in the dark. You start to severely chastise them for what they are doing, they can start a fire! You ask that they do not come here again, and that they should immediately get out of here. The teens look at each other and then laugh.'
  1287. 'You begin to back away, but you couldn''t get far. You are surrounded on all sides and they begin to look at you in a disturbing way. You feel uneasy. The teens begin to harass you, touch your clothes, and one of them standing behind you, pulls up your blouse. Showing your breasts to the others. Their laughter strengthens and some insults rain down on you from all sides.'
  1288. 'You try to take your clothes back but the teenagers around you constantly push and pull at you in different directions. You beg them to let you go, say that you will never come here again and stuff. But the teenagers only laugh and have openly pinned you. You suddenly feel that someone''s hands got down to your pants and pull sharply to force them down, undressing you. Another bastard pulled your bra off and any other clothes you could have.'
  1289. 'Now you are standing in front of them, completely naked. They begin to push you off into the depths of the attic, and only now can you notice a huge old sofa with broken legs. Going to the couch you stop and try again to calm the teenagers, but they do not even pay attention to it. They have abruptly pushed you on the couch. The teenagers began to unbutton their jeans. A first that approaches is a powerfully built man, he shoves your shoulders and drops you on your back, he unceremoniously and roughly spread your legs, he lays on the top of you, and abruptly penetrates you.'
  1290. act 'Next':
  1291. cla
  1292. *clr
  1293. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/cherdak1.jpg"></center>'
  1294. 'He fucks you in a fast and intense pace. After he finishes, his place is taken by a second guy, and the same thing happened as with the first. Until you fucked all of them, one by one. And then there are those who want a second time.'
  1295. act 'Next':
  1296. cla
  1297. *clr
  1298. minut += 120
  1299. pcs_horny += 50
  1300. gang += 1
  1301. spafinloc = 4
  1302. gs 'cum_manage'
  1303. spafinloc = 12
  1304. gs 'cum_manage'
  1305. pcs_vag += 1
  1306. gs 'stat'
  1307. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/cherdak0.jpg"></center>'
  1308. 'After the last person came in your mouth, the teens buttoned their pants and left, loudly laughing, and discussing what just happened. You pick up your clothes, get dressed, and slowly walked to your apartment.'
  1309. horand = rand(1, 100)
  1310. if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied'
  1311. if horand <= pcs_horny:pcs_horny = 0 & orgasm += 1 & 'You had an orgasm'
  1312. act 'Go to the apartment':gt 'korr'
  1313. end
  1314. end
  1315. end
  1316. if $ARGS[0] = 'pos51':
  1317. $menu_loc = 'etoexhib'
  1318. $menu_arg = 'pos51'
  1319. menu_off = 0
  1320. *clr & cla
  1321. minut += 1
  1322. gs 'stat'
  1323. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/podezd.jpg"></center>'
  1324. 'Entrance to the 5-floors building in which you live. The lock on the door leading to the attic is broken.'
  1325. if sosedQW = 0:
  1326. menu_off = 1
  1327. '<br>Suddenly in the stairwell you are faced with a young guy who is climbing up the stairs. He runs into you and is noticeably embarrassed.<font color="#1589FF">"I''m sorry, I did not see you there. You''ve moved into apartment 69, right?"</font>'
  1328. act 'Yes, I live in the apartment 69':
  1329. *clr & cla
  1330. sosedQW = 1
  1331. minut += 5
  1332. gs 'stat'
  1333. 'You nod, confirming that you live in apartment 69. The guy looks visibly delighted and says, <font color="#1589FF">"Wonderful. I lived there before Petrovich. He tormented the whole building. By the way I''m Timothy, and you are?"</font> '
  1334. act '<<$pcs_nickname>>':
  1335. *clr & cla
  1336. gs 'stat'
  1337. '<font color="magenta">"My name is <<$pcs_nickname>>,"</font> you say. He nodded his head and began to get the key to open the door of the apartment 68. "Very nice. I live in the next apartment." The guy opened the door and on the threshold appeared the curious face of an elderly woman. She pointed her sharp nose at you and began to curiously look you. Timothy entered the apartment and said irritably, "Mother, stop hanging around the front door!" and closed the door.'
  1338. act 'Continue':gt 'etoexhib', 'pos51'
  1339. end
  1340. end
  1341. exit
  1342. elseif sosedQW > 0 and hour >= 16 and sosedDay ! daystart:
  1343. sosedrand = rand(0, 100)
  1344. if sosedrand >= 70:'Your neighbor, <a href="exec:Gt ''Timofei''">Timothy</a>, is in the hallway. He''s smoking a cigarette, flicking the ashes into a jar.'
  1345. end
  1346. act 'Leave the building':
  1347. *clr & cla
  1348. if $clothingworntype = 'nude':
  1349. '<b><font color="red">You need to get dressed.</font></b>'
  1350. xgt $curloc
  1351. elseif sick > 72:
  1352. '<b><font color="red">You are too ill to walk to the street.</font></b>'
  1353. xgt $curloc
  1354. else
  1355. minut += 1
  1356. xgt 'city_residential'
  1357. end
  1358. end
  1359. act 'Go to the attic':gt 'etoexhib', 'pos52'
  1360. act 'Apartment 69: Your home':gt 'korr'
  1361. end
  1362. if $ARGS[0] = 'pos52':
  1363. $menu_loc = 'etoexhib'
  1364. $menu_arg = 'pos52'
  1365. menu_off = 0
  1366. *clr & cla
  1367. minut += 1
  1368. gs 'stat'
  1369. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/cherdak.jpg"></center>'
  1370. 'A flight of stairs that lead to the roof through the attic. It''s dark and scary. This is clearly no place for a decent girl.'
  1371. temp = rand(1, 100)
  1372. if temp > 90:'In the depths of the attic you hear a group of <a href="exec:gt ''etoexhib'', ''pos50''">teens</a> talking. It seems they do not notice you.'
  1373. act 'Go to the hallway':gt 'etoexhib', 'pos51'
  1374. act 'Go up to the roof': gt 'etoexhib', 'pos53'
  1375. end
  1376. if $ARGS[0] = 'pos53':
  1377. $metka = 'pos53'
  1378. $loc = 'etoexhib'
  1379. $menu_loc = 'etoexhib'
  1380. $menu_arg = 'pos53'
  1381. menu_off = 0
  1382. $location_type = 'secluded'
  1383. *clr & cla
  1384. minut += 1
  1385. gs 'stat'
  1386. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/roof.jpg"></center>'
  1387. 'The roof of your apartment building.'
  1388. act 'Go down to the attic':
  1389. if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
  1390. msg '<center><font color = red>You need to get dressed first</font></center>'
  1391. gt 'etoexhib','pos53'
  1392. else
  1393. minut += 1
  1394. gt 'etoexhib','pos52'
  1395. end
  1396. end
  1397. if joint > 0 and jointhigh = 0: act 'Smoke a joint': gs 'drugs', 'joint' & gt $loc, $metka
  1398. if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
  1399. act 'Change back into clothes':
  1400. minut += 5
  1401. gs 'underwear', 'wear'
  1402. gs 'clothing', 'wear_last_worn'
  1403. gt 'etoexhib','pos53'
  1404. end
  1405. end
  1406. if temper >= 15 and hour >= 8 and hour <= 20:
  1407. if ARRSIZE('swimwear') > 0 and $clothingworntype ! 'swimwear':
  1408. act 'Change into a bikini':gt 'changingroom', 'view_swim_list'
  1409. end
  1410. if $clothingworntype = 'swimwear':
  1411. act 'Sunbathe (1:00)':
  1412. cla
  1413. *clr
  1414. minut += 60
  1415. inhib_exp += rand(1,3)
  1416. if pcs_sweat < 35: gs 'sweat', 'add', 5
  1417. pcs_mood += 5
  1418. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/zagar1.jpg"></center>'
  1419. if krem = 0:
  1420. pcs_tan += 1
  1421. 'You lie down to sunbathe.'
  1422. elseif krem > 0:
  1423. krem -= 1
  1424. pcs_tan += 3
  1425. 'You put the sunblock on your body and lied down on the roof to sunbathe.'
  1426. end
  1427. act 'Get Up':gt 'etoexhib', 'pos53'
  1428. end
  1429. end
  1430. end
  1431. end
  1432. if $ARGS[0] = 'pos54':
  1433. *clr & cla
  1434. menu_off = 1
  1435. minut += 5
  1436. gs 'stat'
  1437. '<center><img <<$set_imgh>> src="images/locations/shared/train/spy.jpg"></center>'
  1438. 'A suspicious man. He constantly looks around. Occasionally, some people approach him and leave with papers. After looking carefully, you understand, he sells gas station checks and forged documents. It''s possible and you could find something useful.'
  1439. if fakepassport = 2 or fakediplom = 2:
  1440. !only notify player 1 time after events triggered
  1441. if fakepassport = 2:
  1442. fakepassport = 0
  1443. 'He tells you "A passport with a fake age will cost you 30,000 <b>₽</b>"'
  1444. end
  1445. if fakediplom = 2:
  1446. fakediplom = 0
  1447. 'He tells you "A diploma of bachelor degree will cost you 100,000 <b>₽</b>"'
  1448. end
  1449. end
  1450. act 'Leave': gt 'nordtrain', 'outside'
  1451. if age < 18 and fakepassport ! 1:
  1452. if money => 30000:
  1453. act 'Buy fake passport (30,000 <b>₽</b>)':
  1454. *clr & cla
  1455. minut += 10
  1456. money -= 30000
  1457. fakepassport = 1
  1458. '<center><img <<$set_imgh>> src="images/locations/shared/train/spy.jpg"></center>'
  1459. 'You bought a fake passport, which claims you are an adult.'
  1460. act 'Leave': gt 'nordtrain', 'outside'
  1461. end
  1462. else
  1463. act 'Buy fake passport (<font color="red">30,000 <b>₽</b></font>)': '<br><font color="red">You don''t have enough money to buy the fake passport.</font>'
  1464. end
  1465. end
  1466. if diplom = 0 and fakediplom ! 1:
  1467. if money => 100000:
  1468. act 'Buy fake diploma (100,000 <b>₽</b>)':
  1469. *clr & cla
  1470. minut += 10
  1471. money -= 100000
  1472. fakediplom = 1
  1473. '<center><img <<$set_imgh>> src="images/locations/shared/train/spy.jpg"></center>'
  1474. 'You bought a fake diploma.'
  1475. act 'Leave': gt 'nordtrain', 'outside'
  1476. end
  1477. else
  1478. act 'Buy fake diploma (<font color="red">100,000 <b>₽</b></font>)': '<br><font color="red">You don''t have enough money to buy the fake diploma.</font>'
  1479. end
  1480. end
  1481. end
  1482. if $ARGS[0] = 'pos90':
  1483. cla
  1484. *clr
  1485. minut += 5
  1486. gs 'stat'
  1487. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/memory.jpg"></center>'
  1488. 'Your school magazine.'
  1489. if teachlevel > 40 and gor_dorm = 6:
  1490. act 'Lonely Heart':
  1491. cla
  1492. *clr
  1493. minut += 120
  1494. gor_dorm = 7
  1495. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_tech.jpg"></center>'
  1496. 'In front of you is Eugene A., the school''s chemistry teacher.'
  1497. '"<<$pcs_nickname>>, you are always so attractive. You must be very popular with men."'
  1498. '"I think I understand what you''re asking. You want me to introduce someone to you."'
  1499. '"Do not get me wrong, I''ll soon be 30 and unmarried but can''t meet anyone. Most men in our backwoods town are not interesting."'
  1500. '"I see, do you think you can mail me your most beautiful pictures, a bit of erotica would be good as well. I will find you a good husband on a dating site."'
  1501. '"Erotica! Do you think that is necessary?"'
  1502. '"It is necessary. Men at the sight of a beautiful female body lose their heads."'
  1503. '"Ok, I''ll try to take a picture as erotic as possible."'
  1504. act 'Finish':gt 'etoexhib', 'pos24'
  1505. end
  1506. end
  1507. act 'Leave':
  1508. *clr & cla
  1509. gt 'etoexhib', 'pos24'
  1510. end
  1511. end
  1512. if $ARGS[0] = 'pos91':
  1513. cla
  1514. *clr
  1515. minut += 5
  1516. gor_dorm = 8
  1517. gs 'stat'
  1518. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_tech.jpg"></center>'
  1519. '"Good afternoon, <<$pcs_nickname>>! As you requested, I tried to take a picture as erotic as possible. I hope I did not overdo it. Or maybe I did it wrong, the photo does not seem quite erotic. So please, email me if anything still needed.'
  1520. act 'See next photo':
  1521. cla
  1522. *clr
  1523. minut += 5
  1524. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_tech1.jpg"></center>'
  1525. 'Wow, her stunning figure.'
  1526. act 'See next photo':
  1527. cla
  1528. *clr
  1529. minut += 5
  1530. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_tech2.jpg"></center>'
  1531. 'Wow, Eugene! Hmm... But she wanted to post even more candid photos, even for a dating site! Apparently the girl is quite desperate.'
  1532. 'Now you can go to the site and help her find the man of her dreams.'
  1533. 'Or'
  1534. 'But with these photos I asked for, I could do whatever I want!'
  1535. act 'Go to the site':gt 'Komp', 'znak'
  1536. end
  1537. end
  1538. act 'Exit the browser':gt 'Komp', 'start'
  1539. end
  1540. --- etoexhib ---------------------------------