1
0

pavResidential 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303
  1. # pavResidential
  2. CLOSE ALL
  3. music_on = 0
  4. $metka = ''
  5. $loc = 'pavResidential'
  6. $metkaM = ''
  7. $locM = 'pavResidential'
  8. $metkaStreet = ''
  9. $locStreet = 'pavResidential'
  10. $location_type = 'public_outdoors'
  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/street2.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/street2.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. cls
  21. litltown = 1
  22. alkoblock = 0
  23. boynumBlock = 0
  24. gs 'stat'
  25. !call random events from [street_events], and display them before show location.
  26. if streetevent_hour ! hour:gt'street_event','pavResidential', 'main'
  27. '<center><h2>Pavlovsk</h2></center>'
  28. if Enable_towntable = 1 : $_str = '<center><table><tr><td>' else $_str = ''
  29. if month >= 11 or month <= 3:
  30. if hour >= 8 and hour <= 21:
  31. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswinter.jpg"></center>'
  32. else
  33. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswintern.jpg"></center>'
  34. end
  35. else
  36. if hour >= 8 and hour <= 21:
  37. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavres.jpg"></center>'
  38. else
  39. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavresn.jpg"></center>'
  40. end
  41. end
  42. if Enable_towntable = 1 : $_str += '</td><td>'
  43. $_str += '<center>You are in the residential area of a provincial town in a rural area of Russia. Population: about 15000 inhabitants.</center>'
  44. $_str += '<center>Apart from the old <a href="exec:view''images/locations/pavlovsk/palace/Pav_Palace.jpg''">Imperial palace</a> with its surrounding gardens and forest, built by Catherine the Great, and the recently rebuilt <a href="exec:view''images/locations/pavlovsk/fortress/BIP_hotel.png''">Bip fortress</a> (which is now a Luxury hotel and restaurant), it looks much like all the other towns in the region.</a></center> '
  45. $_str += '<center>The tallest building in town is the <a href="exec:gt ''ParChurch'',''start''">church of St Nikolas.</a></center>'
  46. if Enable_towntable = 1 : $_str += '</td></tr><table></center>'
  47. *nl $_str
  48. killvar '$_str'
  49. ''
  50. gs'street_event','pavResidential', 'extras'
  51. if flag_rape_1 = 1:
  52. flag_rape_1 = 0
  53. rape_count = rape
  54. 'You stopped while you see light from streets. Breath and wincing from the pain in the pussy, thought: «Go home and immediately go to bed, no one will notice, and I won''t tell anyone», - decided you: «if I do not fly from this monster.'
  55. elseif flag_rape_1 = 2:
  56. flag_rape_1 = 0
  57. rape_count = rape
  58. 'You woke up from the thoughts in the center of streets. You strange your behavior, yet you got raped. But you had fun and not even particularly worried about it. Well, just a slight concern about the orgasm. You even like it. '
  59. elseif rape > rape_count:
  60. !for normal rape. differ display with bimbolevel
  61. rape_count = rape
  62. if bimbolevel > 2:
  63. 'You feel great after having sex, and don''t understand why they didn''t just ask. Silly man.'
  64. elseif bimbolevel > 0:
  65. 'You wake up from the thoughts in the center of streets. You strange your behavior, yet you got raped. But you had fun and not even particularly worried about it. Well, just a slight concern about the orgasm. You even like it. '
  66. else
  67. 'You stopped while you see light from streets. Breath and wincing from the pain in the pussy, thought: «Go home and immediately go to bed, no one will notice, and I won''t tell anyone», - decided you: «if I do not fly from this monster.'
  68. end
  69. end
  70. if pav_slut >= 150 and rand(1, 10) = 10:
  71. 'A guy approaches you, and asks if you want to earn some money. He''s offering you 100 <b>₽</b> for a quick fuck in the bushes.'
  72. act 'Go with him': gs 'npcgeneratec', 0, 'Stranger at the Park', rand(18,45) & gs 'boyStat', $npclastgenerated & gt 'gevent', '5'
  73. act 'Decline':gt $curloc
  74. exit
  75. end
  76. if AlbFather >= 1:
  77. if AlbFaterBlackTime = 0:AlbFaterBlackTime = totminut + 2880
  78. 'You can see election posters on the walls all over town. They say: "Vote for Boris Barlovsky!" Wait a minute... isn''t that Albina''s father?'
  79. end
  80. if AlbFaterBlackTime > 0 and AlbFaterBlackTime <= totminut and hour >= 14 and AlbFather = 1:gt 'AlbFatherQW'
  81. if hour >= 14 and hour <= 22 and AlbFather = 2 and AlbZaDay + 30 < daystart and year > 2015:
  82. gt 'AlbStarsEnd'
  83. end
  84. if StoryLine > 0 and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18:
  85. motherWorry = 1
  86. end
  87. if rand(1, 5) >= 4 and pav_slut >= 50:
  88. if pav_slut < 75:
  89. 'You catch people staring at you intently, as if they''re supposed to know who you are but can''t quite remember why. You sincerely hope they don''t realize your promiscuous adventures are the reason why. The occasional person chuckling and pointing at you crushes those hopes, and you quickly keep walking before they get a chance to say anything.'
  90. elseif pav_slut < 100:
  91. 'People look at you with lewd grins on their faces, some of them even making vulgar gestures. Looks like they know what you''ve been up to.'
  92. else
  93. 'Everywhere you go, people recognize you as a whore. Some even come over and slap you on the ass, claiming they know you like it when they do, or claiming they want to sample your goods. An elderly woman sitting on a bench calls out to you, loudly calling you a slut and a whore. You hide your face and run away as fast as you can, before she can draw too much attention to you.'
  94. end
  95. end
  96. gs 'stat'
  97. if car > 0 and cardrive = 20:
  98. cardrive = 20
  99. 'Your <a href="exec:gs ''carF'', ''start''">car<<$car>></a> is parked in the street.'
  100. end
  101. if StoryLine = 1 and ParHomeBlock = 0:
  102. 'You live in one of the apartment blocks in the old part of Pavlovsk, and the door to the <a href="exec:minut += 2 & GT ''pod_ezd'',''etaj_1''">apartment building</a> is right there. Your <a href="exec:minut += 5 & GT ''korrPar''">parents'' home</a> is on the second floor there. <<$gcartext>>'
  103. elseif StoryLine = 1:
  104. 'One of the apartment blocks in the old part of Pavlovsk, and the door to the <a href="exec:minut += 2 & GT ''pod_ezd'',''etaj_1''">apartment building</a> is right there. Your parents live here, but you are no longer welcome in their home. <<$gcartext>>'
  105. else
  106. '<<$gcartext>>'
  107. end
  108. if rexCar = 1 and rexCarDay = daystart and hour >= 21 and hour < 23 and rexSisTalk = 3:
  109. 'Rex is in his car, waiting for you at the parking lot near the apartment building where your parents live.'
  110. act 'Join Rex in his car':gt'reks','avto'
  111. end
  112. if rexCar = 1 and rexCarDay = daystart and hour = 21 and rexSisTalk >= 4:
  113. 'Rex is in his car, waiting for you at the parking lot near the apartment building where your parents live.'
  114. act 'Join Rex in his car':gt'reks','avto2'
  115. end
  116. if fedorKozlovQW >= 20 and FedorKozHome = 1 or fedorKozlovQW = -15 and FedorKozHome = 1:
  117. '<a href="exec:gt ''FedorEv4'', ''Home Entrance''">Fedor</a>''s house.'
  118. end
  119. if hour >= 8 and hour <= 22:'You can see the <a href="exec:$locM = ''pavResidential'' & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'
  120. if SchoolBlock = 0:
  121. $schoolname = ' and the local <a href="exec:gt ''gschool_grounds'', ''main''">school</a>.'
  122. else
  123. '.'
  124. end
  125. 'The town surrounds the old place grounds which are now a large <a href="exec:gt ''gskver'', ''park''">public park</a>, close to the residential area is the <a href="exec:gt ''glake''">lake</a>.'
  126. 'The town square features a <a href="exec:gt ''gdk''">community center</a><<$schoolname>>'
  127. 'A <a href="exec:minut += 15 & gt ''Gshveyfab'', ''start''">garment factory</a> named Paris Commune is situated in the industrial area on the outskirts of town. Inhabitants of Pavlovsk can store their cars in the <a href="exec:minut += 5 & gt ''garmassiv''">garages</a>.'
  128. ''
  129. if Enable_tablemap = 0:
  130. if storyline = 1:'<a href="exec:minut += 15 & gt ''shulgahome''">The Shulgin family</a> live in the apartment above your parents.'
  131. if ArtemBeInHome > 0 and artemblok = 0:'<a href="exec:minut += 15 & gt ''artemhome''">Artem Chebotarev</a>, one of your classmates, lives in the same apartment building as your parents, on the first floor.'
  132. if BeInJulMilHome = 1:
  133. if hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:
  134. '<a href="exec:minut += 15 & gt ''JuliaMilVhod''">Julia Milova</a>, one of your classmates, lives in the same apartment building as your parents, on the third floor.'
  135. else
  136. 'Julia Milova, one of your classmates, lives in the same apartment building as your parents, on the third floor.'
  137. end
  138. end
  139. if BeInNatBelHome = 1:
  140. if hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:
  141. '<a href="exec:minut += 15 & gt ''NatBelHome''">Natasha Belova</a>, one of your classmates, lives in the same apartment building as your parents, on the fourth floor.'
  142. else
  143. 'Natasha Belova, one of your classmates, lives in the same apartment building as your parents, on the fourth floor.'
  144. end
  145. end
  146. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:'<a href="exec:minut += 15 & gt ''dimaGoHome2''">Dimka Nosov</a>, one of your classmates, lives in one of the fancier houses in town.'
  147. if IgorLoverQW > 0 and IdorBlock = 0:'<a href="exec:minut += 15 & gt ''IgorHome'', ''home''">Igor Kruglov</a>, one of your classmates, lives in one of the fancier houses in town.'
  148. !if katjaFirstKiss >= 1:'<a href="exec:minut += 15 & gt ''KatjaHome''">Katja Meynold</a>, one of your classmates, lives in the richer part of town.'
  149. if katjaFirstKiss >= 1 or mey_vika['mey_vika_qw'] >= 27 or mey_vika['key'] = 1: 'Large private house where the <a href="exec: gt''mey_home'', ''door''">Meynold twins</a> live.'
  150. if LariskaHomeIn > 0: '<a href="exec:minut += 15 & GT ''LariskaHome''">Larissa Gruzdev</a>, one of your classmates, lives about 15 minutes away from your parents.'
  151. if beinalbinahome > 0:'<a href="exec:minut += 15 & gt ''albinaporog''">Albina Barlovskaya</a>, one of your classmates, lives in one of the few luxurious mansions Pavlovsk has to offer.'
  152. else
  153. st_count=0 & $show_table=''
  154. if (npc_rel['A112'] >=70) or (npc_rel['A112'] >=30 and week < 6 and hour >= 14 and hour <= 23) or (week >= 6 and hour >= 10 and hour < 14) or (week < 6 and hour >= 14 and hour <= 23) or (hour >= 0 and hour < 2):
  155. gs'show_table','Apartment of Uncle <a href="exec:minut += 15 & GT ''shulgahome''" >Shulgin</a>.','3'
  156. else
  157. gs'show_table','Apartment of Uncle Shulgin. Not now.','3'
  158. end
  159. if ArtemBeInHome > 0 and artemblok = 0:gs'show_table','Apartment of <a href="exec:minut += 15 & gt ''artemhome''">Artem Chebotarev</a>.','3'
  160. if BeInJulMilHome = 1:
  161. if hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:
  162. gs'show_table','apartment of <a href="exec:minut += 15 & gt ''JuliaMilHome''">Julia Milova</a>.','3'
  163. else
  164. gs'show_table','apartment of Julia Milova. Not now.','3'
  165. end
  166. end
  167. if BeInNatBelHome = 1:
  168. if hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:
  169. gs'show_table','apartment of <a href="exec:minut += 15 & gt ''NatBelHome''">Natasha Belova</a>.','3'
  170. else
  171. gs'show_table','apartment of Natasha Belova. Not now.','3'
  172. end
  173. end
  174. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:gs'show_table','Fancier house of <a href="exec:minut += 15 & gt ''dimaGoHome2''">Dimka Nosov</a>.','3'
  175. if IgorLoverQW > 0 and IdorBlock = 0:gs'show_table','Fancier house of <a href="exec:minut += 15 & gt ''IgorHome'', ''home''">Igor Kruglov</a>', '3'
  176. !if katjaFirstKiss >= 1:gs'show_table','house of <a href="exec:minut += 15 & gt ''KatjaHome''">Katja Meynold</a>.','3'
  177. if katjaFirstKiss >= 1 or mey_vika['mey_vika_qw'] >= 27 or mey_vika['key'] = 1: gs'show_table','house of <a href="exec: gt''mey_home'', ''door''">twins Manold</a>.','3'
  178. if LariskaHomeIn > 0:gs'show_table','House of <a href="exec:minut += 15 & GT ''LariskaHome''" >Lariska Gruzdevaya</a>, in richer part','3'
  179. if beinalbinahome > 0:gs'show_table','Luxurious mansion of <a href="exec:minut += 15 & gt ''albinaporog''">Albina Barlovskaya</a>.','3'
  180. if st_count > 0 :'<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  181. end
  182. act 'Go to the high street':minut += 5 & gt 'pavCommercial'
  183. if StoryLine = 1 and ParHomeBlock = 0: act '<b>GO HOME</b> (Parents'' Apartment)': minut += 5 & GT 'korrPar'
  184. if kanikuli = 0 and StoryLine > 0 and SchoolAtestat = 0 and week < 6 and hour >= 4 and hour < 9: act '<font color = green><b>Go to school</b></font>': minut += 1 & gt 'gschool_grounds', 'main'
  185. act 'Wait':
  186. cla
  187. waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
  188. if waiting <= 0 or waiting > 120:
  189. minut += 15
  190. elseif waiting > 0 and waiting <= 120:
  191. minut += waiting
  192. end
  193. act 'Check the time':gt $curloc
  194. end
  195. if StoryLine ! 0 and (hour >= 8 or hour < 23) and spdirtyv = 1 and rand(0, 3) = 0 and sosedday ! daystart:
  196. cls
  197. sosedday = daystart
  198. gs 'stat'
  199. if sosedknow = 0:
  200. sosedknow = 1
  201. 'As you walk though Pavlovsk, someone calls out to you "<<$pcs_nickname>>!" You turn around and see uncle Misha, your neighbor. He looks at your face in amazement: "Your face looks like a mess! What is that?"'
  202. 'You blush and hesitate, trying to inconspicuously wipe the sperm off your face. It''s obviously not working; he already noticed. You see his eyes widen when he realizes what it is. "I see. Looks like you had fun", he grins as he continues on his way.'
  203. else
  204. 'Once again you run into uncle Misha, your neighbor. He notices the sperm on your face: "Again? Looks like you''ve been busy, girl. Nice look, it suits you."'
  205. end
  206. act 'Continue':gt 'pavResidential'
  207. exit
  208. end
  209. if pcs_magik >= 1 and mainQW = 0 and altQS = 1:
  210. cla
  211. *clr
  212. mainQW = 1
  213. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  214. 'At the entrance to the apartment building you see Tatiana and Juugo. Tatiana adjusts her glasses and looks around, while Juugo seems to have his head in the clouds not really paying attention to his surroundings. His tattoos are not visible.'
  215. 'Tatiana closely looks around you: "I felt a burst of energy. Were you attacked by a magician?"'
  216. act 'No?':gt 'mainQW'
  217. exit
  218. end
  219. if storyline ! 0 and AndRev = 1 and (hour >=22 or hour <=2) and rand(1,100) >= 90 and AndRevstart ! daystart:
  220. cls
  221. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  222. 'It was late and you were hurrying to get home when you are suddenly grabbed from behind. A large hand covered your mouth and you cannot scream. A powerful arm wrapped around your arms and chest and lifted you from your feet. You are dragged into an alleyway between two buildings and the arm around you loosened for just a moment.'
  223. act 'Continue':
  224. cls
  225. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  226. 'Before you could try to escape, you felt something sting your arm and you felt your body relax against your will. Just before your eyes closed and you lost consciousness, you heard a familiar voice rasp in your ear. "Now you''ll pay for breaking my nose, you little slut."'
  227. act 'Continue': gt 'boilerroom', 'start'
  228. end
  229. end
  230. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  231. if npc_QW['A113'] = 1 and hour>=14 and hour<21 and daybelisex!daystart:
  232. 'You see the by now familiar old Mitsubishi Pajero driving through the streets with Vadim Bely and his gang. Your heart skips a beat as you notice one of them pointing at you, and soon they pull over.'
  233. 'The tinted window slides down and you find yourself staring directly into Vadim''s face. "Slut, get in. It''s time for you to work off your debts."'
  234. act'Get into the jeep':
  235. cls
  236. minut+=5
  237. gs'stat'
  238. 'You open the door and take a seat in the back as Vadim drives through the city.'
  239. if month>=4 and month<=8:
  240. tiperand=rand(0,1)
  241. if tiperand=0:
  242. 'As the car leaves the city and goes off-road at some point, one of the more silent criminals feels the need to explain: "We have a little picnic planned for today. We know just the place... nice and quiet. You''ll be able to entertain us there without interruptions."'
  243. 'The way he says it sends a shiver down your spine.'
  244. 'Finally, a few minutes after the car has left the main roads, you stop somewhere. You have absolutely no idea where you are. The criminals get out of the car and Vadim does the same, telling you to get out and follow them.'
  245. act'Get out of the car':gt'belpicknick'
  246. end
  247. else
  248. act'Look around':
  249. cls
  250. minut+=5
  251. gs'stat'
  252. 'The apartment is actually in decent shape. The minimal amount of furniture and decorations don''t make it look very hospitable though, and you assume this might just be one of the places <<$boydesc>> rented for business or pleasure, not for living in. Noticing you''re spending too much time looking around and aren''t following him swiftly enough, he grabs you by your hair and pulls your face to his, roughly shoving his tongue in your mouth. You can smell the tabacco on his breath, and do your best to ignore the taste as he kisses you.'
  253. act'Kiss him':gt 'BelSex', 'sex'
  254. end
  255. else
  256. 'The car pulls over in the driveway of a large mansion surrounded by a high metal fence. Vadim says a few words into a microphone and the gates swing open. He drives the car to the entrance of the house as the gates close automatically behind you. He then tells you to follow them as the men get out of the car.'
  257. act'Do as they say':gt'belgang'
  258. end
  259. end
  260. end
  261. --- pavResidential ---------------------------------