pavResidential.qsrc 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292
  1. # pavResidential
  2. music_loop = 0
  3. CLOSE ALL
  4. $metka = ''
  5. $loc = 'pavResidential'
  6. $menu_loc = 'pavResidential'
  7. $menu_arg = ''
  8. menu_off = 0
  9. $metkaStreet = ''
  10. $locStreet = 'pavResidential'
  11. $location_type = 'public_outdoors'
  12. killvar '$locclass'
  13. if sound = 0:
  14. if month >=11 and month <= 12 or month >=1 and month <=3:
  15. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/zima.mp3',30
  16. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  17. else
  18. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street_leto.mp3',30
  19. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  20. end
  21. end
  22. cls
  23. litltown = 1
  24. alkoblock = 0
  25. boynumBlock = 0
  26. gs 'stat'
  27. !call random events from [street_events], and display them before show location.
  28. if streetevent_hour + 2 < hour:gt'street_event','pavResidential', 'main'
  29. '<center><h2>Pavlovsk</h2></center>'
  30. if month >= 11 or month <= 3:
  31. if hour >= 8 and hour <= 21:
  32. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswinter.jpg"></center>'
  33. else
  34. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswintern.jpg"></center>'
  35. end
  36. else
  37. if hour >= 8 and hour <= 21:
  38. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavres.jpg"></center>'
  39. else
  40. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavresn.jpg"></center>'
  41. end
  42. end
  43. *nl
  44. '<center>You are in the residential area of a provincial town in a rural area of Russia. Population: about 15000 inhabitants.</center>'
  45. '<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> '
  46. '<center>The tallest building in town is the <a href="exec:minut += 5 & gt ''ParChurch'',''start''">church of St Nikolas.</a></center>'
  47. *nl
  48. gs'street_event','pavResidential', 'extras'
  49. if flag_rape_1 = 1:
  50. flag_rape_1 = 0
  51. rape_count = rape
  52. '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.'
  53. elseif flag_rape_1 = 2:
  54. flag_rape_1 = 0
  55. rape_count = rape
  56. '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. '
  57. elseif rape > rape_count:
  58. !for normal rape. differ display with bimbolevel
  59. rape_count = rape
  60. if bimbolevel > 2:
  61. 'You feel great after having sex, and don''t understand why they didn''t just ask. Silly man.'
  62. elseif bimbolevel > 0:
  63. '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. '
  64. else
  65. '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.'
  66. end
  67. end
  68. if pav_slut >= 125 and rand(1, 10) = 10:
  69. '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.'
  70. act 'Decline':gt 'pavResidential'
  71. act 'Go with him': gs 'npcgeneratec', 0, 'Stranger at the Park', rand(18,45) & gs 'boyStat', $npclastgenerated & gt 'gevent', '5'
  72. exit
  73. end
  74. if AlbFather >= 1:
  75. if AlbFaterBlackTime = 0:AlbFaterBlackTime = totminut + 2880
  76. '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?'
  77. end
  78. if AlbFaterBlackTime > 0 and AlbFaterBlackTime <= totminut and hour >= 14 and AlbFather = 1:gt 'AlbFatherQW'
  79. if hour >= 14 and hour <= 22 and AlbFather = 2 and AlbZaDay + 30 < daystart and year > 2015:
  80. gt 'AlbStarsEnd'
  81. end
  82. if hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1:
  83. motherWorry = 1
  84. end
  85. if rand(1, 5) >= 4 and pav_slut >= 75:
  86. if pav_slut < 100:
  87. '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.'
  88. elseif pav_slut < 125:
  89. '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.'
  90. else
  91. '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.'
  92. end
  93. end
  94. gs 'stat'
  95. if car > 0 and cardrive = 20:
  96. cardrive = 20
  97. 'Your <a href="exec:gs ''carF'', ''start''">car<<$car>></a> is parked in the street.'
  98. end
  99. if home_owned[2] = 1:
  100. '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 ''pavcomplex'',''start''">apartment building</a> is right there. Your <a href="exec:minut += 5 & GT ''korrPar''">parents'' home</a> is on the second floor there. <<$gcartext>>'
  101. elseif StoryLine = 1:
  102. 'You are standing near one of the apartment blocks in the old part of Pavlovsk, and the door to the <a href="exec:minut += 2 & GT ''pavcomplex'',''start''">apartment building</a> is right there. Your parents live here, but you are no longer welcome in their home. <<$gcartext>>'
  103. else
  104. '<<$gcartext>>'
  105. end
  106. if StoryLine = 1: 'There is an <a href="exec:minut += 3 & GT ''pavComplexOld'',''etaj_1''">old apartment building</a> near to where your parents live.'
  107. if rexCar = 1 and rexCarDay = daystart and hour >= 21 and hour < 23 and rexSisTalk = 3:
  108. 'Rex is in his car, waiting for you at the parking lot near the apartment building where your parents live.'
  109. act 'Join Rex in his car':gt'reks','avto'
  110. end
  111. if rexCar = 1 and rexCarDay = daystart and hour = 21 and rexSisTalk >= 4:
  112. 'Rex is in his car, waiting for you at the parking lot near the apartment building where your parents live.'
  113. act 'Join Rex in his car':gt'reks','avto2'
  114. end
  115. if fedorKozlovQW >= 20 and FedorKozHome = 1 or fedorKozlovQW = -15 and FedorKozHome = 1:
  116. '<a href="exec:gt ''FedorEv4'', ''Home Entrance''">Fedor''s</a> house.'
  117. end
  118. if hour >= 8 and hour <= 22:'You can see the <a href="exec:$locM = ''pavResidential'' & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'
  119. !if SchoolBlock = 0:
  120. $schoolname = ' and the local <a href="exec: minut += 2 & gt ''gschool_grounds'', ''main''">school</a>.'
  121. !else
  122. ! '.'
  123. !end
  124. 'The town surrounds the old palace grounds which are now a large <a href="exec:minut += 5 & gt ''gskver'', ''start''">public park</a>, close to the residential area is the <a href="exec: minut += 5 & gt ''glake''">lake</a>.'
  125. 'The town square features a <a href="exec: minut += 2 & gt ''gdk''">community center</a><<$schoolname>>'
  126. '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 the Pavlovsk apartments can store their cars in the <a href="exec:minut += 3 & gt ''pavComplex'', ''garages''">garages</a>.'
  127. ''
  128. !!made changes here, to remove direct links to the kids in the apartment complex, make sure this will work with the code left.
  129. if Enable_tablemap = 0:
  130. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:'<a href="exec:minut += 10 & gt ''dimaHome'', ''home''">Dimka Nosov</a>, one of your classmates, lives in one of the fancier houses in town.'
  131. if IgorLoverQW > 0 and IdorBlock = 0:'<a href="exec:minut += 10 & gt ''IgorHome'', ''home''">Igor Kruglov</a>, one of your classmates, lives in one of the fancier houses in town.'
  132. !if katjaFirstKiss >= 1:'<a href="exec:minut += 15 & gt ''KatjaHome''">Katja Meynold</a>, one of your classmates, lives in the richer part of town.'
  133. if katjaFirstKiss >= 1 or mey_vika['mey_vika_qw'] >= 27 or mey_vika['key'] = 1: 'Large private house where the <a href="exec:minut += 10 & gt''mey_home'', ''door''">Meynold twins</a> live.'
  134. if LariskaHomeIn > 0: '<a href="exec:minut += 10 & GT ''LariskaHome''">Lariska Gruzdev</a>, one of your classmates, lives about 10 minutes away from your parents.'
  135. if beinalbinahome > 0:'<a href="exec:minut += 10 & gt ''albinaporog''">Albina Barlovskaya</a>, one of your classmates, lives in one of the few luxurious mansions Pavlovsk has to offer.'
  136. if NatBelBestFrend >= 3 and BeInNatBelHome = 1:'<a href="exec:minut += 10 & gt ''NatBelVhod''">Natasha Belova</a> a classmate, lives in your parent''s apartment block here.'
  137. if anushkaFirstvisit ! 0 and npc_rel['A144'] > 60:'<a href="exec:minut += 10 & gt ''anushapt'', ''home''">Anushka Konstantinov</a> a classmate, lives in one of the other apartment blocks here.'
  138. else
  139. st_count=0 & $show_table=''
  140. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:gs'show_table','Fancier house of <a href="exec:minut += 10 & gt ''dimaHome'', ''home''">Dimka Nosov</a>','3'
  141. if IgorLoverQW > 0 and IdorBlock = 0:gs'show_table','Fancier house of <a href="exec:minut += 10 & gt ''IgorHome'', ''home''">Igor Kruglov</a>', '3'
  142. !if katjaFirstKiss >= 1:gs'show_table','house of <a href="exec:minut += 10 & gt ''KatjaHome''">Katja Meynold</a>.','3'
  143. if katjaFirstKiss >= 1 or mey_vika['mey_vika_qw'] >= 27 or mey_vika['key'] = 1: gs'show_table','House of the <a href="exec:minut += 10 & gt''mey_home'', ''door''">Meynold twins</a>','3'
  144. if LariskaHomeIn > 0:gs'show_table','House of <a href="exec:minut += 10 & GT ''LariskaHome''" >Lariska Gruzdevaya</a>, in richer part','3'
  145. if beinalbinahome > 0:gs'show_table','Luxurious mansion of <a href="exec:minut += 10 & gt ''albinaporog''">Albina Barlovskaya</a>','3'
  146. if NatBelBestFrend >= 3 and BeInNatBelHome = 1:gs'show_table','Poor home of <a href="exec:minut += 10 & gt ''NatBelVhod''">Natasha Belova</a>','3'
  147. if anushkaFirstvisit ! 0 and npc_rel['A144'] > 60:gs'show_table','Messy home of <a href="exec:minut += 10 & gt ''anushapt'', ''home''">Anushka Konstantinov</a>','3'
  148. if st_count > 0 :'<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  149. end
  150. !!end of code changes.
  151. if kanikuli = 0 and StoryLine > 0 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 7 and hour < 9: act '<b>Go to school</b>': minut += 2 & gt 'gschool_grounds', 'main'
  152. if InvitationToDimkaNYparty = 1 and month = 12 and day = 31 and hour > 14 and hour <= 18:
  153. act '<b>Go to Dimka''s house at the New Year party</b>': killvar 'InvitationToDimkaNYparty' & minut += 30 & gt 'sny', '3'
  154. elseif InvitationToDimkaNYparty = 1 and month ! 12:
  155. killvar 'InvitationToDimkaNYparty'
  156. end
  157. if home_owned[2] = 1: act '<b>Go Home</b> (Parents'' Apartment)': minut += 4 & GT 'korrPar'
  158. if pavSharedAptEnabled = 1:act '<b>Go Home</b> (Shared Apartment)': minut += 5 & GT 'pavSharedApt', 'start'
  159. act 'Walk to the commercial area':minut += 5 & gt 'pavCommercial'
  160. act 'Walk to the apartment complex':minut += 2 & gt 'pavcomplex', 'start'
  161. act 'Wait':gs 'obj_din', 'wait'
  162. if (hour > 20 or hour < 4) and succubusQW = 5 and suchuntday ! daystart:
  163. act 'Go hunting near the community center (this can take a lot of time)':
  164. scrand = rand(0,4)
  165. minut += 60 - (5 * (succublvl + scrand))
  166. if rand(0,7) - succublvl < 2:
  167. gt 'succubus', 'pavResfeed'
  168. else
  169. cls
  170. gs 'stat'
  171. '<center><h2>Pavlovsk</h2></center>'
  172. if month >= 11 or month <= 3:
  173. if hour >= 8 and hour <= 21:
  174. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswinter.jpg"></center>'
  175. else
  176. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavreswintern.jpg"></center>'
  177. end
  178. else
  179. if hour >= 8 and hour <= 21:
  180. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavres.jpg"></center>'
  181. else
  182. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavresn.jpg"></center>'
  183. end
  184. end
  185. 'The disco is in full swing, which means a lot of adolescents going to and from the community center. You find a spot down the street from the community center to lie in wait for your prey.'
  186. 'You hide for a few minutes watching groups of students pass you by as you wait for a lone victim to pounce on. You lie in wait for almost thirty minutes, thinking about the meal ahead, your hand finding its way between your legs a few times.'
  187. 'This time you are unsuccessful and fail to find a suitable meal.'
  188. act 'Return': gt 'pavResidential'
  189. end
  190. end
  191. end
  192. if StoryLine ! 0 and (hour >= 8 or hour < 23) and cumloc[11] = 1 and rand(0, 3) = 0 and sosedday ! daystart:
  193. cls
  194. sosedday = daystart
  195. gs 'stat'
  196. if sosedknow = 0:
  197. sosedknow = 1
  198. '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?"'
  199. '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.'
  200. else
  201. '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."'
  202. end
  203. act 'Continue':gt 'pavResidential'
  204. exit
  205. end
  206. if pcs_magik >= 1 and mainQW = 0 and altQS = 1:
  207. cla
  208. *clr
  209. mainQW = 1
  210. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  211. '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.'
  212. 'Tatiana closely looks around you: "I felt a burst of energy. Were you attacked by a magician?"'
  213. act 'No?':gt 'mainQW'
  214. exit
  215. end
  216. if storyline ! 0 and AndRev = 1 and (hour >=22 or hour <=2) and rand(1,100) >= 90 and AndRevstart ! daystart:
  217. cls
  218. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  219. '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.'
  220. act 'Continue':
  221. cls
  222. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
  223. '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."'
  224. act 'Continue': gt 'boilerroom', 'start'
  225. end
  226. end
  227. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  228. if npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week = 7:
  229. cla & *clr
  230. daybelisex = daystart
  231. minut += 5
  232. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  233. 'As you walk through Pavlovsk, Vadim Belys Mitsubishi Pajero stops near you.'
  234. act 'Go to the jeep': return_residential = 1 & gt 'belgang', 'payday'
  235. elseif npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week ! 7 and belgangPayWeek >= 300 and belgangProstitute = 1 and rand (0,2) = 0:
  236. cla & *clr
  237. daybelisex = daystart
  238. minut += 5
  239. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  240. '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.'
  241. act 'Go to the jeep': return_residential = 1 & gt 'belgang', 'workofdebt'
  242. end
  243. --- pavResidential ---------------------------------