gschool_grounds.qsrc 36 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761
  1. # gschool_grounds
  2. !Outside school building
  3. if $ARGS[0] = 'main':
  4. CLOSE ALL
  5. $loc = 'gschool_grounds'
  6. $metka = 'main'
  7. $location_type = 'public_outdoors'
  8. $menu_loc = 'gschool_grounds'
  9. $menu_arg = 'main'
  10. menu_off = 0
  11. *clr & cla
  12. gs 'stat'
  13. '<center><b><font color="maroon">Outside School</font></b></center>'
  14. if month > 2 and month < 9:
  15. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool.jpg"></center>'
  16. else
  17. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/schoolwinter.jpg"></center>'
  18. end
  19. 'Pavlovsk''s only school, all the local children go here for their education. Next to the school is the athletic field, a parking lot for the teachers, just beyond the parking lot is a grove of trees, and past that is the old school building. After the new school was built the old one was supposed to get renovated and used for advance classes but budget cuts meant the project was canceled and now the old school building stands empty. Though many of the kids use it to skip class or as a place to sneak off to drink or have sex.'
  20. if ((hour = 6 and minut >= 30) or (hour >= 7 and hour < 18)) and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0:
  21. 'With the school open you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'',''change_room''">changing rooms</a> by the gym and change your outfit.'
  22. end
  23. if day = nyp_day and month = 12 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0:
  24. if hour >= 14 and hour < 17:
  25. 'All the boys and girls are standing near the school. Everyone did their best to look good today, wearing their nicest clothes. Someone calls out to you, "Hey <<$pcs_nickname>>, are you coming to the New Year''s Eve party or not? You didn''t pay the 1000 <b>₽</b> entry fee yet!"'
  26. if money >= 1000:act 'Go to the party (1,000 <b>₽</b>)':money -= 1000 & gt 'nyp_school', 'start'
  27. end
  28. end
  29. if InvitationToDimkaNYparty = 1 and day = 31 and day = nyp_day:
  30. killvar 'InvitationToDimkaNYparty'
  31. act 'Follow Dimka to his home at the New Year party': minut += 30 & gt 'sny', '3'
  32. end
  33. if week < 6 and hour = 14 and kanikuli = 0 and afterschool_day ! daystart:
  34. afterschool_day = daystart
  35. if rand(0,3) = 0:
  36. $eventtype = 'after_school'
  37. gt 'gschool_events', 'break_events'
  38. else
  39. gt 'gschool_events', 'afterschool_events'
  40. end
  41. end
  42. if hour <= 8 and kanikuli = 6:
  43. 'Today is graduation day! The school prom is tonight as well.'
  44. act 'Go to your graduation':
  45. *clr & cla
  46. menu_off = 1
  47. hour = 10
  48. minut = 0
  49. SchoolAtestat = 1
  50. kanikuli = 7
  51. gs 'stat'
  52. if home_owned[2] = 0:
  53. 'Everyone from your year is assembled in the auditorium of the school. Your teachers are standing on a platform in front of several rows of chairs where you and your classmates are sitting. Some parents and siblings are sitting in the back rows. Nobody from your family showed up.'
  54. else
  55. 'Everyone from your year is assembled in the auditorium of the school. Your teachers are standing on a platform in front of several rows of chairs where you and your classmates are sitting. Some parents and siblings are sitting in the back rows. You turn your head and see your mother and your brother sitting among them.'
  56. end
  57. 'Your Principial begins calling your classmates in alphabetical order. Finally it''s your turn.'
  58. if pcs_grades >= 90:
  59. 'You go up to the podium. As the Principal shakes your hand she announces "As every year I''d like to honor our best student of the year. Miss <<$pcs_lastname>> here performed exceptionally well in her studies and I think that deserves some recognition." She starts applaude and the auditorium quickly joins in the applause.'
  60. if home_owned[2] = 1:'As you return to your place you see your mother smiling brightly.'
  61. elseif pcs_grades >= 70:
  62. 'You go up to the podium. The Principal shakes your hand and gives you your diploma. "Well done, Miss <<$pcs_lastname>>!" she says before you return to your place.'
  63. else
  64. 'You go up to the podium. The Principal shakes your hand and gives you your diploma and you return to your place.'
  65. end
  66. act 'Return to town': minut += 2 & gt 'pavResidential'
  67. act 'Go to the prom party':
  68. *clr & cla
  69. minut += 540
  70. pcs_energy += 70
  71. gs 'drugs', 'alcohol', 'vodka', rand(2,3)
  72. gs 'underwear', 'remove'
  73. gs 'clothing', 'strip'
  74. gs 'stat'
  75. 'After the official graduation, everyone gets hammered at the prom party. You don''t remember much of what happened, only recalling a few flashbacks of going skinny dipping in the town fountain with a group of friends. Your mouth is dry and you can taste beer and what might be a kebab, you are somewhere in the town center, all of your clothes are missing and you are completely naked.'
  76. 'You make your way back home, you think you are discrete and stick to poorly lit areas but you really don''t remember and somehow have bits of someone''s hedge in your hair.'
  77. act 'Go home': gt 'korrPar'
  78. end
  79. end
  80. exit
  81. end
  82. if SchoolAtestat = -1 and week < 6 and hour >= 6 and hour < 14:
  83. act 'Get your diploma':
  84. *clr & cla
  85. menu_off = 1
  86. minut += 20
  87. SchoolAtestat = 1
  88. kanikuli = 7
  89. gs 'stat'
  90. if pcs_grades >= 70:
  91. 'The Principal hands you your diploma. "Well done, Miss <<$pcs_lastname>>! Good luck in your future!" she says as she shakes your hand.'
  92. else
  93. 'The Principal hands you your diploma. "Good luck in your future!" she says as she shakes your hand.'
  94. end
  95. act 'Return to town': minut += 2 & gt 'pavResidential'
  96. end
  97. end
  98. !! act 'Go to old school building': gt
  99. !! act 'Go to the Principals Office': gt
  100. if week < 6 and hour >= 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and schoolBlock = 0:
  101. if $clothingworntype = 'school' or Enable_sforma = 1:
  102. if hour = 6:
  103. if minut < 30:
  104. 'It''s too early for school now.'
  105. else
  106. if NikoEv = 10: gt 'NikoDates', 'Walk Of Shame'
  107. act 'Wait for class': gt 'gschool_grounds', 'bulding'
  108. end
  109. elseif hour = 7:
  110. if NikoEv = 10:
  111. gt 'NikoDates', 'Walk Of Shame'
  112. elseif minut <= 45:
  113. act '<b>Go to class</b>': gt 'gschool_grounds', 'bulding'
  114. else
  115. 'You are late for school, you could rush to class or just skip until the second period.'
  116. act '<b>Rush to class</b>':
  117. demerit += 5
  118. gt 'gschool_grounds', 'bulding'
  119. end
  120. act 'Skip class':
  121. *clr & cla
  122. menu_off = 1
  123. '<center><b><font color="maroon">School Hallway</font></b></center>'
  124. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall0<<rand(0,2)>>.jpg"></center>'
  125. 'You don''t feel like attending all of your classes this morning. Surely no one will miss you if you skip one of your three morning classes.'
  126. act 'Go to girl''s bathroom': gt 'gschool_girls_bathroom', 'start'
  127. act 'Go to boy''s bathroom': gt 'gschool_boys_bathroom', 'start'
  128. end
  129. end
  130. elseif hour = 8:
  131. if NikoEv = 10: gt 'NikoDates', 'Walk Of Shame'
  132. 'You missed your whole first class, hopefully no one noticed.'
  133. act '<b>Rush to class</b>': demerit += 10 & gt 'gschool_grounds', 'bulding'
  134. elseif hour < 14:
  135. 'It''s too late for school now. You have been marked as absent today.'
  136. end
  137. else
  138. 'You''re not allowed to attend any classes at school if you''re not wearing your school uniform.'
  139. end
  140. end
  141. act 'Return to town': minut += 2 & gt 'pavResidential'
  142. act 'Go to the sports field': minut += 1 & gt 'gschool_grounds', 'sports'
  143. if joint > 0 and jointhigh = 0: act 'Smoke a joint behind the school building': gs 'drugs', 'joint' & gt $loc, $metka
  144. if week = 6 and hour = 8 and StoryLine > 0 and SchoolAtestat = 0 and detention_set = 1 and schoolBlock = 0: act 'Go to detention': gt 'gschool_detention', 'start'
  145. if zverRageQW = 1: gt 'gschool_grounds', 'KristinaFight'
  146. if week < 6 and hour = 14 and dimaRevenge = 5 and dimaRevChoice = 0:
  147. gt 'dimaRevenge', dimaRevenge
  148. elseif week < 6 and hour = 14 and dimaRevenge = 4 and dimaRevChoice = 1:
  149. gt 'dimaRevenge', dimaRevenge
  150. elseif week < 6 and hour = 7 and dimaRevenge = 5 and dimaRevChoice = 1:
  151. gt 'dimaRevenge', 5, 'before'
  152. elseif week < 6 and hour = 7 and dimaRevenge = 6 and dimaRevChoice = 1:
  153. gt 'dimaRevenge', 6, 'before'
  154. elseif week < 6 and hour = 14 and dimaRevenge = 7 and dimaRevChoice = 1:
  155. gt 'dimaRevenge', dimaRevenge
  156. elseif week < 6 and hour = 7 and dimaRevenge = 4 and dimaRevChoice = 2:
  157. gt 'dimaRevenge', dimaRevenge, 'day4jockbefore'
  158. elseif week < 6 and hour = 7 and dimaRevenge = 5 and dimaRevChoice = 2:
  159. gt 'dimaRevenge', dimaRevenge, 'day5jockbefore'
  160. elseif week < 6 and hour = 14 and dimaRevenge = 6 and dimaRevChoice = 2:
  161. gt 'dimaRevenge', 5, 'day5jockafter'
  162. !elseif week < 6 and hour = 11 and dimaRevenge = 4 and dimaRevChoice = 3:
  163. ! gt 'gschool_lessons', 'short_break'
  164. elseif week < 6 and hour = 7 and dimaRevenge = 5 and dimaRevChoice = 3:
  165. gt 'dimaRevenge', dimaRevenge
  166. elseif week < 6 and hour = 14 and dimaRevenge = 4 and dimaRevChoice = 4:
  167. gt 'dimaRevenge', dimaRevenge, 'after'
  168. elseif week < 6 and hour = 7 and dimaRevenge = 5 and dimaRevChoice = 4:
  169. gt 'dimaRevenge', dimaRevenge, 'before'
  170. elseif week < 6 and hour = 14 and dimaRevenge = 6 and dimaRevChoice = 4:
  171. gt 'dimaRevenge', 5, 'after'
  172. elseif week < 6 and hour = 7 and dimaRevenge = 7 and dimaRevChoice = 4:
  173. gt 'dimaRevenge', 6
  174. elseif week < 6 and hour = 7 and dimaRevenge = 5 and dimaRevChoice = 5:
  175. gt 'dimaRevenge', dimaRevenge, 'before'
  176. elseif week < 6 and hour = 7 and dimaRevenge = 4 and dimaRevChoice = 5:
  177. gt 'dimaRevenge', 5
  178. elseif week < 6 and hour = 7 and dimaRevenge = 4 and dimaRevChoice = 6:
  179. gt 'dimaRevenge', dimaRevenge
  180. end
  181. if hour >= 14 and pav_slut >= 125 and SchoolGossip > 0 and afterschoolday ! daystart: gt 'gschool_sex', 'suck'
  182. if week = 1 and kanikuli = 0 and arthakQW = 10 and apmeetday ! daystart and hour >= 14: gt 'artgar'
  183. if hour = 14 and week < 6 and kanikuli = 0:
  184. if NikoDate_Day ! daystart:
  185. if NikoIntro = 0:
  186. gt 'NikoEv', 'Intro'
  187. elseif NikoVolkovQW = 5 and NikoEv = 6 and NikoDate = 0:
  188. gt 'NikoDates', 'After School'
  189. elseif NikoVolkovQW = 5 and NikoEv = 8 and NikoDate = 0:
  190. gt 'NikoDates', 'After School 2'
  191. elseif (NikoVolkovQW = 5 and NikoDate = 1) or NikoEv = 11:
  192. 'You can see <a href="exec: gt ''NikoEv'', ''Niko Dates''">Nikolai Volkov</a> smoking outside of the school.'
  193. elseif NikoVolkovQW = 10 and NikoEv >= 17 and NikoEv <= 20:
  194. '<a href="exec: gt ''NikoEv2'', ''Events''">Nikolai Volkov</a> is smoking outside of the school.'
  195. elseif NikoVolkovQW = 10 and NikoEv = 22:
  196. gt 'NikoEv2', 'Recovery'
  197. end
  198. end
  199. if ivan_afterschool = 1: act 'Meet Ivan after school': gt 'gschool_sex', 'afterschool'
  200. if LinaSlut > 0 and rand(1,10) < 3:'You see Lina, Dan and Vasily leaving the school together.'
  201. if Enable_tablemap = 0:
  202. if anushkaFirstvisit = 0 and meet_after_school = 1:'<a href="exec: gt ''anushka'', ''meet_after_school''">Anushka Konstantinov</a> is leaning against a tree just in front of the school.'
  203. if LariskaHomeIn > 0:'<a href="exec:minut += 1 & gt ''LariskaGo''">Lariska Gruzdev</a> impatiently walks back and fourth across the courtyard, as if she''s waiting for someone.'
  204. if JuliaMilLernQW >= 1:'<a href="exec:minut += 1 & gt ''JuliaMilGo''">Julia Milova</a> is sitting somewhere on the school courtyard, reading a book.'
  205. if NatashaQW > 0:'<a href="exec:minut += 1 & gt ''NatBelGo''">Natasha Belova</a> is standing in a corner.'
  206. if artemLernQW >= 1 and artemVitokQW ! 2 and artemblok = 0:'<a href="exec:minut += 15 & gt ''artemEv'', ''start''">Artem Chebotarev</a> is waiting for you near the school entrance.'
  207. if npc_QW['A231'] = 1 or npc_QW['A231'] = 3 or npc_QW['A231'] >= 5:'<a href="exec:minut += 1 & gt ''AleksandraGo'', ''Start''"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></a> is waiting for you at the end of the school courtyard, listening to music.'
  208. if katjaMeynoldday ! daystart and meynoldQW >= 2:'<a href="exec:minut += 15 & gt ''katjaEv''">Katja Meynold</a> is walking across the school courtyard, getting ready to go home.'
  209. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:
  210. '<a href="exec:minut += 15 & gt ''dimaEv'', ''after_school''">Dimka Nosov</a> is deep in thought, as he leans against a lamp post.'
  211. elseif DimaRudeQW > 0 and dimarudeday ! daystart and DimaRudeBlock = 0:
  212. if rand(0,4) = 0: gt 'dimaEv', 'after_school'
  213. '<a href="exec:minut += 15 & gt ''dimaEv'', ''after_school''">Dimka Nosov</a> is deep in thought, as he leans against a lamp post.'
  214. end
  215. if IgorLoverQW > 0 and igorkruglovday ! daystart and IdorBlock = 0:'<a href="exec:minut += 15 & gt ''igorhome'', ''entrance''">Igor Kruglov</a> is talking to some of his friends on the courtyard.'
  216. if fedorKozlovQW >= 10 and kotovVSkozlov = 1:
  217. 'You can see <a href="exec: gt ''FedorEv'', ''Strela Chat''">Fedor</a> sitting in the corner of the schoolyard by himself.'
  218. elseif fedorKozlovQW >= 10 and fedorkozqw = 2 and FedorLuv < -4:
  219. 'You can see <a href="exec: gt ''FedorEv2'', ''Fedor Breakup''">Fedor</a> standing by himself with a troubled look on his face.'
  220. elseif fedorKozlovQW >= 10:
  221. 'You can see <a href="exec: gt ''FedorEv'', ''Start''">Fedor</a> with his backpack around his arm, standing by himself.'
  222. end
  223. else
  224. !display friends in table if switch is on.
  225. st_count=0 & $show_table=''
  226. if anushkaFirstvisit = 0 and meet_after_school = 1:gs'show_table','<a href="exec: gt ''anushka'', ''meet_after_school''">Anushka Konstantinov</a>','5'
  227. if LariskaHomeIn > 0:gs'show_table','<a href="exec:minut += 1 & gt ''LariskaGo''">Lariska Gruzdev</a>','5'
  228. if JuliaMilLernQW >= 1:gs'show_table','<a href="exec:minut += 1 & gt ''JuliaMilGo''">Julia Milov</a>','5'
  229. if NatashaQW > 0:gs'show_table','<a href="exec:minut += 1 & gt ''NatBelGo''">Natasha Belova</a>','5'
  230. if artemLernQW >= 1 and artemVitokQW ! 2 and artemblok = 0:gs'show_table','<a href="exec:minut += 15 & gt ''artemEv'', ''start''">Artem Chebotarev</a>','5'
  231. if katjaMeynoldday ! daystart and meynoldQW >= 2:gs'show_table','<a href="exec:minut += 15 & gt ''katjaEv''">Katja Meynold</a>','5'
  232. if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:
  233. gs'show_table','<a href="exec:minut += 15 & gt ''dimaHome'', ''home''">Dimka Nosov</a>','5'
  234. elseif DimaRudeQW > 0 and dimarudeday ! daystart and DimaRudeBlock = 0:
  235. if rand(0,4) = 0: gt 'dimaEv', 'after_school'
  236. gs'show_table','<a href="exec:minut += 15 & gt ''dimaEv'', ''after_school''">Dimka Nosov</a>','5'
  237. end
  238. if IgorLoverQW > 0 and igorkruglovday ! daystart and IdorBlock = 0:gs'show_table','<a href="exec:minut += 15 & gt ''igorhome'', ''entrance''">Igor Kruglov</a>','5'
  239. if fedorKozlovQW >= 10 and kotovVSkozlov = 1:
  240. gs'show_table','<a href="exec: gt ''FedorEv'', ''Strela Chat''">','5'
  241. elseif fedorKozlovQW >= 10 and fedorkozqw = 2 and FedorLuv < -4:
  242. gs'show_table','<a href="exec: gt ''FedorEv2'', ''Fedor Breakup''">','5'
  243. elseif fedorKozlovQW >= 10:
  244. gs'show_table','<a href="exec: gt ''FedorEv'', ''Start''">Fedor</a>','5'
  245. end
  246. if npc_QW['A231'] = 1 or npc_QW['A231'] = 3 or npc_QW['A231'] >= 5:gs'show_table','<a href="exec:minut += 1 & gt ''AleksandraGo'', ''Start''"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></a>','5'
  247. if st_count > 0 :
  248. 'Near school yard, you see:'
  249. '<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  250. end
  251. end
  252. if albinaCarday ! daystart and AlbFrend >= 1 and albrideday ! daystart:'<a href="exec:minut += 15 & gt ''albinaRide''">Albina Barlovskaya</a> is waiting behind the wheel of a large black SUV, parked near the school.'
  253. ! meynold`s events
  254. if hour = 14 and vicky_afterschool ! daystart: gs 'mey_vika_events', 'near_school'
  255. if mey_vika['mey_vika_qw'] = 35 or mey_vika['mey_vika_qw'] = 36 and minut < 45:
  256. act 'Study with Tamara Mikhailovna':
  257. if mey_vika['mey_vika_qw'] = 36: gt 'mey_tamara_events', 'rebuke'
  258. gt 'mey_tamara_events', 'learning0'
  259. end
  260. end
  261. end
  262. if strelaDay ! daystart and strelaQW = 1 and hour = 14:
  263. *clr & cla
  264. gs 'stat'
  265. 'A Mitsubishi Pajero and a BMW drive up to the school gates. Strong, muscular guys in leather jackets and tracksuits get out of the cars. They have came to meet Vitek, Dan and Vasily. You watch them talk about something, though you''re not close enough to hear what it''s about. Then you notice Fedor Kozlov leaving school; his face all swollen and bruised. Fedor waves his hand at you, "<<$pcs_nickname>>! Come here, you''re my witness!"'
  266. act 'Go and see what Fedor needs': gt 'strela'
  267. exit
  268. end
  269. end
  270. !Outside school sports field
  271. if $ARGS[0] = 'sports':
  272. $loc = 'gschool_grounds'
  273. $location_type = 'public_outdoors'
  274. $metka = 'sports'
  275. $menu_loc = 'gschool_grounds'
  276. $menu_arg = 'sports'
  277. menu_off = 0
  278. *clr & cla
  279. gs 'stat'
  280. if month > 2 and month < 9:
  281. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school//grounds/field.jpg"></center>'
  282. else
  283. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school//grounds/fieldwinter.jpg"></center>'
  284. end
  285. 'There is a football field and around it is a track, often before and after school kids use the field and track.'
  286. if week = 5 and hour >= 16 and hour <= 18: 'As you pass by the sports field you hear lots of cheering and yelling coming from the younger kids on the field. As you approach you see <a href="exec: gt ''gschool_socialchg1'', ''tLazar''">Lazar</a> is on the football field showing off his skills.'
  287. if (week = 1 or week = 3) and hour >= 16 and hour <= 18: 'Looking toward what you can barely describe as a running track, you notice <a href="exec: gt ''gschool_socialchg1'', ''tSvyatoslav''">Svyatoslav</a> doing sprints by the football field.'
  288. ! Giving football preference, since there''s no indoor option for it.
  289. if temper => 15 and sunWeather = 1 and hour > 8 and hour < 12 and week = 6 and fbpickupDay + 14 => daystart and bbpickupDay ! daystart:
  290. 'As you pass by the sports field you notice that most of the ''jocks'' have gathered around the <a href="exec:gt ''fbgameout''">football field</a>.'
  291. elseif temper => 15 and sunWeather = 1 and hour > 8 and hour < 12 and week = 6 and bbpickupDay + 14 => daystart and fbpickupDay ! daystart:
  292. 'As you pass by the sports field you notice that most of the ''jocks'' have gathered around the <a href="exec:gt ''bbgameout''">basketball court</a>.'
  293. end
  294. act 'Leave the sports field': minut += 1 & gt 'gschool_grounds', 'main'
  295. if schoolrunday ! daystart and $clothingworntype = 'exercise' and $shoeworntype = 'trainers':
  296. act 'Go for a run (1 hour)':
  297. *clr & cla
  298. menu_off = 1
  299. minut += 60
  300. schoolrunday = daystart
  301. fat -= rand(2, 7)
  302. run_exp += rand(0, 2)
  303. gs 'sweat', 'add', 20
  304. gs 'stat'
  305. if month > 2 and month < 9:
  306. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school//grounds/runsummer.jpg"></center>'
  307. else
  308. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school//grounds/runwinter.jpg"></center>'
  309. end
  310. 'You spend an hour on the track going for a run.'
  311. act 'Continue': gt 'gschool_grounds', 'sports'
  312. end
  313. elseif schoolrunday ! daystart and ($clothingworntype ! 'exercise' or $shoeworntype ! 'trainers'):
  314. 'You could go for a run here if you were wearing sports clothes and shoes.'
  315. end
  316. if hour >= 9 and hour < 18 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0: 'With the school open you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'',''change_room''">changing rooms</a> by the gym and change your outfit.'
  317. if week = 6 and schoolSorev = 2 and hour = 10 and SchoolBlock = 0:
  318. *nl
  319. 'Athletic students of your school and other schools in the area have gathered at the athletics track near your school. Everyone is getting ready for the running competition.'
  320. if $clothingworntype = 'exercise' and $shoeworntype = 'trainers':
  321. act 'Participate in the 400m sprint event': gt 'gschool_grounds', 'SchoolRun2'
  322. else
  323. 'You need to wear exercise clothes to participate.'
  324. end
  325. end
  326. if week = 6 and schoolSorev = 1 and hour = 10 and SchoolBlock = 0:
  327. *nl
  328. 'Athletic students of your school and other schools in the area have gathered at the athletics track near your school. Everyone is getting ready for the running competition.'
  329. if $clothingworntype = 'exercise' and $shoeworntype = 'trainers':
  330. act 'Participate in the 400m sprint race': gt 'gschool_grounds', 'SchoolRun'
  331. else
  332. 'You need to wear exercise clothes to participate.'
  333. end
  334. end
  335. gs 'family'
  336. end
  337. !!School building
  338. if $ARGS[0] = 'bulding':
  339. $loc = 'gschool_grounds'
  340. $metka = 'bulding'
  341. $location_type = 'public_indoors'
  342. $menu_loc = 'gschool_grounds'
  343. $menu_arg = 'bulding'
  344. menu_off = 0
  345. gs 'stat'
  346. '<center><b><font color="maroon">Inside School</font></b></center>'
  347. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall0<<rand(0,2)>>.jpg"></center>'
  348. 'The hallways of the school building are painted with a cheap green paint, which you think may be toxic. Budget cuts.'
  349. act 'Continue':
  350. if hour = 8: late = 1
  351. gs 'stat'
  352. BeInSchool += 1
  353. if rand(0,1) = 0:
  354. gt 'gschool_lessons', 'morning'
  355. else
  356. if rand(0,3) = 0:
  357. gt 'gschool_events', 'teacher_greet'
  358. else
  359. $eventtype = 'before_school'
  360. gt 'gschool_events', 'break_events'
  361. end
  362. end
  363. end
  364. act 'Return to town': minut += 2 & gt 'pavResidential'
  365. if dimaRevenge = 1:
  366. menu_off = 1
  367. 'You''re in a good mood today as you enter the school. That changes when Dimka stops you in the hall on the way to class.
  368. "I know what you did, bitch. Did you really thing I wouldn''t figure out it was you that wiped my harddrive."
  369. Before you can deny anything he continues: "I don''t even need that video to ruin your life. Just you wait. Soon the whole school will know what a whore you are."
  370. His words fill you with dread as you make your way to class.'
  371. end
  372. if zverSlutQW = 1 and week = 1 and lariskaQwestDay < daystart and lariskaQwestDay ! 0 and zverRageQW = 2:
  373. menu_off = 1
  374. zverSlutQW = 2
  375. if KotovZverHelp ! 1:
  376. $npc_notes['A18'] = 'Ever since your fight, Christina has been avoiding you. She''s been humiliated ever since you told the whole school about how she sucked the P.E. teacher''s dick for a place in the running competition, and beat her up when she tried to fight you. Barely a shade of her former self she stands timidly in a corner, her head still wrapped in gauss. Whenever she opens her mouth, people can see the broken teeth she hasn''t had a chance to get fixed yet.'
  377. if lariskaHelp > 0:
  378. 'Lariska tells you that you crushed Christina''s spirit when she lost that fight to you, and that there''s no fight left in her now. You know better though; Christina is the type of person to hold a grudge, and you expect she''s just biding her time until she finds a good opportunity to get back at you.'
  379. end
  380. else
  381. if LinaSlut > 0:$text_end = ' and Lina'
  382. 'Lariska tells you that Christina will require treatment for several months to fully recover from the beating you gave her, and also that Avelina has been hooking up with Vitek Kotov recently. You suspect this might have something to do with Christina; Lina would do anything for Christina. You feel a knot in your stomach; being on Vitek''s bad side could be really bad for you.'
  383. end
  384. if lariskaHelp > 0:LariskaHomeIn = 1
  385. $npc_notes['A13'] = 'Lariska is an athletic girl with a weak personality: she''s very dependent on other people''s opinions of her. Christina used to control her, but ever since you took care of Christina she has been a lot more lively. She has a spark in her eyes, and is almost always in a good mood. Even though Mikhail Nikolayevich sees a lot of potential in her and offered her a spot on the volleyball team, she''s afraid to go pro.'
  386. elseif zverSlutQW = 0 and week = 1 and lariskaQwestDay < daystart and lariskaQwestDay ! 0 and zverRageQW = 2:
  387. menu_off = 1
  388. $npc_notes['A18'] = 'Christina is a tall and strong girl. She''s one of the best athletes your school has to offer. Her leadership skills, combined with her intelligence and tenacity make her a very serious threat to anyone who would challenge her.'
  389. npc_rel['A18'] = 0
  390. *nl
  391. $npc_notes['A13'] = 'Lariska is an athletic girl with a weak personality: she''s very dependent on other people''s opinions of her. Christina controls her every move, and ever since the fight she has been avoiding you. She seems even more down than usual, and often looks sad. Even though Mikhail Nikolayevich sees a lot of potential in her and offered her a spot on the volleyball team, she''s afraid to go pro.'
  392. if lariskaHelp > 0:
  393. $text_end = ' And don''t you worry, I will take care of your girlfriend Lariska as well. I''ll teach her what happens when she sides against me.'
  394. $npc_notes['A13'] = 'Lariska is an athletic girl with a weak personality: she''s very dependent on other people''s opinions of her. Christina used to control her, but ever since you stood up to Christina she has been a lot more lively. Even though Mikhail Nikolayevich saw a lot of potential in her and offered her a spot on the volleyball team, she''s afraid to go pro. Her close ties with Christina Zvereva have put her in a bad light, and she has now been banned from playing for the volleyball team even if she wanted to.'
  395. end
  396. 'Christina Zvereva approaches you:'
  397. '"What do you want, bitch? Have you recovered from your ass-kicking yet? At least you understand your place now.<<$text_end>>"'
  398. lariskaQwestDay += 99999
  399. end
  400. end
  401. if $ARGS[0] = 'KristinaFight':
  402. $location_type = 'event_outdoors'
  403. *clr & cla
  404. menu_off = 1
  405. gs 'stat'
  406. zverRageQW = 2
  407. 'As you cross the school yard after school, you are surprised by a powerful kick in your back. You fall to your hands and knees and rub your sore back for a second, before you turn around and see Christina Zvereva, her face contorted with rage. She yells at you, "You fucking bitch! How dare you spread shit about me like that? I''ll break your fucking face!"'
  408. gs 'fight','initFight'
  409. gs 'boyStat', 'A18'
  410. !!stats
  411. strenV = 85
  412. speedV = 75
  413. agilV = 75
  414. reactV = 75
  415. vitalV = 95
  416. intelV = 45
  417. willV = 45
  418. !Skills
  419. magikV = 95
  420. boxingV = 35
  421. shootV = 95
  422. !Parameters
  423. healthV = vitalV*10 + strenV*5
  424. manaV = intelV*10 + magikV*10
  425. willpowerV = willV*10
  426. BonusAtakV = 0
  427. BonusDefV = 0
  428. !Action Programme
  429. program = 0
  430. fightEnding = 12
  431. if spellavtoklon = 1:klon = 3
  432. if spellbefshild = 1:defence = 500
  433. round = 0
  434. act 'fight': gt 'fight','start'
  435. end
  436. if $ARGS[0] = 'SchoolRun':
  437. $location_type = 'event_outdoors'
  438. *clr & cla
  439. menu_off = 1
  440. minut += 30
  441. gs 'stat'
  442. 'You think you might be able to win, and sign up to participate in the competition. After quickly changing into your running gear you return to the track. The guys are having their race first, and you watch them as you prepare. As expected, Ivan Prokhorov wins. When the guys have finished, it is the girls'' turn.'
  443. act 'Go to the start':
  444. *clr & cla
  445. minut += 30
  446. schoolSorev = 0
  447. kolsorev += 1
  448. gs 'stat'
  449. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/begsor.jpg"></center>'
  450. 'The 400m sprint event for girls is up next. You take off your jacket and go the starting line, mentally preparing yourself for the race.'
  451. wait 725
  452. 'On your marks...'
  453. wait 725
  454. 'Get set...'
  455. wait 725
  456. 'Go!'
  457. wait 725
  458. begminus = 0
  459. if bmi_calc > 25:
  460. begminus = ((bmi_calc - 25)*4)
  461. elseif bmi_calc < 18:
  462. begminus = ((25 - bmi_calc)*6)
  463. end
  464. begresult = pcs_run - begminus
  465. act 'Run': gs 'gschool_grounds', 'SchoolRun_result'
  466. gs 'willpower', 'skill', 'run_lvl', 'hard'
  467. if will_cost <= pcs_willpwr:
  468. act 'Give it your best (<<will_cost>> Willpower)':
  469. begresult += 10
  470. gs 'willpower', 'pay', 'self'
  471. gs 'gschool_grounds', 'SchoolRun_result'
  472. end
  473. else
  474. act 'Give it your best (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  475. end
  476. end
  477. end
  478. if $ARGS[0] = 'SchoolRun_result':
  479. cla
  480. if begresult <= 15:
  481. grupvalue[2] -= 2
  482. 'You barely manage to reach the finish line at all. There''s no point in checking where you finished, you already know you were last by uite a large margin.'
  483. elseif begresult < 20:
  484. grupvalue[2] -= 1
  485. 'You struggle to keep up with the other girls, and finish in last place.'
  486. elseif begresult < 25:
  487. 'You run as fast as you can, but only manage to finish second to last.'
  488. elseif begresult < 30:
  489. 'You run as fast as you can, but only manage to take 6th place.'
  490. elseif begresult < 35:
  491. grupvalue[2] += 1
  492. 'You run as fast as you can, but only manage to take 5th place.'
  493. elseif begresult < 40:
  494. grupvalue[2] += 1
  495. 'You run as fast as you can, but only manage to take 4th place.'
  496. elseif begresult < 50:
  497. grupvalue[2] += 2
  498. 'You run as fast as you can, and manage to take 3rd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you.'
  499. elseif begresult < 60:
  500. grupvalue[2] += 3
  501. 'You run as fast as you can, and manage to take 2nd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you on your achievement.'
  502. else
  503. swinbeg += 1
  504. grupvalue[2] += 5
  505. 'You run as fast as you can, and manage to reach the finish line before anyone else. First place! Mr. Pavlovich, the P.E. teacher at your school, congratulates you on winning the competition, as you walk around with your arms raised in triumph.'
  506. end
  507. run_exp += 1
  508. fat -= 10
  509. if swinbeg = 3 and LocalRun = 0:
  510. LocalRun = 1
  511. if razradbeg < 1:
  512. 'You have won the school running competition three times now and Mr. Pavlovich, the P.E. teacher at your school, announces that your success has not gone unnoticed. He smiles and awards you the third tier sports trophy in running, which you proudly accept and show to everyone.'
  513. razradbeg = 1
  514. else
  515. 'You have won the school running competition three times now and Mr. Pavlovich, the P.E. teacher at your school, smiles and awards you a local competition trophy which you proudly accept and show to everyone.'
  516. end
  517. end
  518. gs 'stat'
  519. act 'Return to town': gt 'gschool_grounds', 'main'
  520. end
  521. if $ARGS[0] = 'SchoolRun2':
  522. $location_type = 'event_outdoors'
  523. *clr & cla
  524. menu_off = 1
  525. minut += 30
  526. gs 'stat'
  527. 'You think you might be able to win, and sign up to participate in the competition. After quickly changing into your running gear you return to the track. The guys are having their race first, and you watch them as you prepare. As expected, Ivan Prokhorov wins. When the guys have finished, it is the girls'' turn.'
  528. if swinbeggor = 0:
  529. 'Getting ready at the start is Christina Zvereva, one of the girls in your class. She scoffs at you, "You''ll never beat me!"'
  530. elseif swinbeggor = 1:
  531. 'Getting ready at the start is Christina Zvereva, one of the girls in your class. She looks at you angrily and says, "You beat me once, but never again!"'
  532. elseif swinbeggor = 2:
  533. 'Getting ready at the start is Christina Zvereva, one of the girls in your class. She looks at you with hatred, "You again, bitch? You''re going down this time, I promise you!"'
  534. end
  535. act 'Go to the start':
  536. *clr & cla
  537. kolsorev += 1
  538. minut += 30
  539. schoolSorev = 0
  540. gs 'stat'
  541. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/begsor.jpg"></center>'
  542. 'The 400m sprint event for girls is up next. You take off your jacket and go the starting line, mentally preparing yourself for the race.'
  543. wait 725
  544. 'On your marks...'
  545. wait 725
  546. 'Get set...'
  547. wait 725
  548. 'Go!'
  549. wait 725
  550. begminus = 0
  551. if bmi_calc > 25:
  552. begminus = ((bmi_calc - 25)*4)
  553. elseif bmi_calc < 18:
  554. begminus = ((25 - bmi_calc)*6)
  555. end
  556. begresult = pcs_run - begminus
  557. act 'Run': gs 'gschool_grounds', 'SchoolRun2_result'
  558. gs 'willpower', 'skill', 'run_lvl', 'hard'
  559. if will_cost <= pcs_willpwr:
  560. act 'Give it your best (<<will_cost>> Willpower)':
  561. begresult += 10
  562. gs 'willpower', 'pay', 'self'
  563. gs 'gschool_grounds', 'SchoolRun2_result'
  564. end
  565. else
  566. act 'Give it your best (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  567. end
  568. end
  569. end
  570. if $ARGS[0] = 'SchoolRun2_result':
  571. cla
  572. if begresult <= 15:
  573. grupvalue[2] -= 2
  574. 'You barely manage to reach the finish line at all. There''s no point in checking where you finished, you already know you were last by quite a large margin.'
  575. elseif begresult < 20:
  576. grupvalue[2] -= 1
  577. 'You struggle to keep up with the other girls, and finish in last place.'
  578. elseif begresult < 25:
  579. 'You run as fast as you can, but only manage to finish second to last.'
  580. elseif begresult < 30:
  581. 'You run as fast as you can, but only manage to take 6th place.'
  582. elseif begresult < 35:
  583. grupvalue[2] += 1
  584. 'You run as fast as you can, but only manage to take 5th place.'
  585. elseif begresult < 40:
  586. grupvalue[2] += 1
  587. 'You run as fast as you can, but only manage to take 4th place.'
  588. elseif begresult < 50:
  589. grupvalue[2] += 2
  590. 'You run as fast as you can, and manage to take 3rd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you.'
  591. elseif begresult < 60:
  592. grupvalue[2] += 3
  593. 'You run as fast as you can, and manage to take 2nd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you on your achievement.'
  594. else
  595. swinbeggor += 1
  596. grupvalue[2] += 5
  597. 'You run as fast as you can, and manage to reach the finish line before anyone else. First place! Mr. Pavlovich, the P.E. teacher at your school, congratulates you on winning the competition yet again while you walk around with your arms raised in triumph.'
  598. end
  599. run_exp += 1
  600. fat -= 10
  601. if swinbeggor = 3 and LocalRun = 1:
  602. LocalRun = 2
  603. npc_rel['A18'] = 0
  604. zverevaQW = 1
  605. if razradbeg < 2:
  606. 'You have won the competition three more times and Mr. Pavlovich awards you the second tier sports trophy in running.'
  607. razradbeg = 2
  608. else
  609. 'You have won the competition three more times and Mr. Pavlovich awards you another trophy.'
  610. end
  611. 'Christina Zvereva stands nearby glaring at you the whole time, her hands balled into fists. She''s seething with rage, realizing she cannot beat you.'
  612. elseif swinbeggor = 2 and begresult >= 130:
  613. npc_rel['A18'] = 0
  614. 'Christina Zvereva is gasping for breath at the finish line. She was unable to overtake you, and came second again. Christina avoids your gaze, not wanting to look you in the eye.'
  615. elseif swinbeggor = 1 and begresult >= 130:
  616. npc_rel['A18'] = 0
  617. 'Christina Zvereva is gasping for breath at the finish line. She was unable to overtake you, and came second yet again. You just flash her a teethy grin and continue your victory lap. Through clenched teeth Christina growls at you, "You bitch!"'
  618. end
  619. gs 'stat'
  620. act 'Leave': gt 'gschool_grounds', 'main'
  621. end
  622. if $ARGS[0] = 'change_room':
  623. $metka = 'change_room'
  624. $loc = 'gschool_grounds'
  625. $location_type = 'bathroom'
  626. $locM = 'gschool_grounds'
  627. $metkaM = 'change_room'
  628. $menu_loc = 'gschool_grounds'
  629. $menu_arg = 'change_room'
  630. menu_off = 0
  631. *clr & cla
  632. gs 'stat'
  633. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/lockerroom.jpg"></center>'
  634. act 'Leave the school building':
  635. if $clothingworntype = 'nude':
  636. msg'<b><font color = red>You need to get dressed.</font></b>'
  637. gt 'gschool_grounds', 'change_room'
  638. else
  639. minut += 1
  640. gt 'gschool_grounds', 'main'
  641. end
  642. end
  643. act 'Go to sports field':
  644. if $clothingworntype = 'nude':
  645. msg'<b><font color = red>You need to get dressed.</font></b>'
  646. gt 'gschool_grounds', 'change_room'
  647. else
  648. minut += 1
  649. gt 'gschool_grounds', 'sports'
  650. end
  651. end
  652. *nl
  653. 'The locker room is accessed through the school gym, and is left unlocked until 18:30 each day, to be utilised by students using the sports ground for training and events outside school hours. The room is cold, damp and filled with lockers, benches, and not much else. You can <a href="exec: gt ''wardrobe'', ''start''">change your outfit</a> by the lockers here'+iif(pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0,', and <a href="exec:dynamic $pirManage">manage your piercings</a>', '.')+''
  654. if (hour = 18 and minut >= 30) or hour > 18:
  655. 'The school is closing for the night and you have to leave so you don''t get stuck here all night.'
  656. exit
  657. end
  658. gs 'wardrobe', 'sports_outfit'
  659. act 'Change you outfit':
  660. cla
  661. gt 'wardrobe', 'start'
  662. end
  663. dynamic $removepan
  664. act 'Look in the mirror': gt 'mirror', 'start'
  665. if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
  666. dynamic $quickwash
  667. dynamic $basin
  668. if shampoo > 0:
  669. dynamic $shower
  670. else
  671. '<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
  672. end
  673. dynamic $tampon
  674. gs 'din_van', 'pblc_pee'
  675. end
  676. --- gschool_grounds ---------------------------------