gdksport.qsrc 48 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986
  1. # gdksport
  2. !2020/10/16
  3. if $ARGS[0] = 'start':
  4. CLOSE ALL
  5. *clr & cla
  6. $loc_arg ='start'
  7. $locM_arg = 'start'
  8. $loc = 'gdksport'
  9. $locM = 'gdksport'
  10. $menu_loc = 'gdksport'
  11. $menu_arg = 'start'
  12. menu_off = 0
  13. $location_type = 'public_indoors'
  14. gs 'stat'
  15. gs 'themes', 'indoors'
  16. '<center><b><font color="maroon">community center</font></b></center>'
  17. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  18. 'The community center sports club offers lessons in <a href="exec: gt ''gdksport'',''racing1''">Racing</a>, <a href="exec: gt ''gdksport'',''dance1''">Dance</a> and <a href="exec: gt ''gdksport'',''vball1''">Volleyball</a>. All lessons start before 18:00'
  19. *nl
  20. 'In the locker room is a <a href="exec: gt ''mirror'',''start''">mirror</a>, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec: gt ''mirror'',''brush''">brush</a>','brush') + ' your hair.'
  21. *nl
  22. 'You can access your <a href="exec: quick_dress = 1 & gt ''wardrobe'', ''default''">default clothing</a> options directly.'
  23. *nl
  24. if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and cheerleaders_on = 1: 'Albina is at cheerleading, so there is no Starlets training today.'
  25. if kotovLoveQW > 0 and hour = 16:
  26. 'You see <a href="exec:minut += 3 & gt ''kotovEv''">Vitek Kotov</a> with a large sports bag entering the sports club.'
  27. elseif npc_rel['A3'] >= 80 and hour = 17 and ivansportday ! daystart:
  28. 'You see <a href="exec:minut += 3 & gt ''IvanEv''">Ivan Prokhorov</a> with a large sports bag entering the sports club.'
  29. end
  30. if npc_rel['A5'] >= 80 and fedorKozlovQW = 0 and hotcat >= 5 and fedorkozbreak < 2 and pav_slut <= 75: gt 'gdksport', 'Fedor First Date'
  31. if week <= 5 and hour >= 16 and hour < 18 and fedorKozlovQW >= 20:
  32. 'You can see <a href="exec: gt ''FedorMisc'', ''Fedor Workout''">Fedor</a> on his phone next to some punching bags.'
  33. end
  34. if (temper < 15 or sunWeather ! 1) and hour > 8 and hour < 12 and week = 6 and bbpickupDay + 14 <= daystart and fbpickupDay ! daystart:
  35. *nl
  36. 'As you pass by the sports field you notice that most of the ''jocks'' have gathered around the <a href="exec:gt ''bbgamein'', ''start''">basketball court</a>.'
  37. end
  38. *nl
  39. if $clothingworntype ! 'danilovich': 'You are not dressed in sports clothes.'
  40. if $shoeworntype ! 'danilovich': 'You are not wearing training shoes.'
  41. act 'Go outside':
  42. if $clothingworntype = 'nude':
  43. msg'<b><font color = red>You need to get dressed before leaving.</font></b>'
  44. gt 'gdksport', 'start'
  45. elseif lariskaQwestStart <= daystart and lariskaQwestStart ! 0 and LariskaQW['LariskaHelp'] = 0:
  46. LariskaQW['LariskaHelp'] = 1
  47. gt 'LariskaStart', 'start'
  48. elseif LariskaQW['LariskaHelp'] = 1 and LariskaQW['LariskaHelpEnd'] = 0 and lariskaQwestDay <= daystart:
  49. LariskaQW['LariskaHelpEnd'] = 1
  50. gt 'LariskaStart', 'end'
  51. else
  52. gt 'pav_commcenter'
  53. end
  54. end
  55. act 'Go to the toilets':
  56. if $clothingworntype = 'nude':
  57. msg'<b><font color = red>You need to get dressed before leaving.</font></b>'
  58. gt 'gdksport', 'start'
  59. elseif lariskaQwestStart <= daystart and lariskaQwestStart ! 0 and LariskaQW['LariskaHelp'] = 0:
  60. LariskaQW['LariskaHelp'] = 1
  61. gt 'LariskaStart', 'start'
  62. elseif LariskaQW['LariskaHelp'] = 1 and LariskaQW['LariskaHelpEnd'] = 0 and lariskaQwestDay <= daystart:
  63. LariskaQW['LariskaHelpEnd'] = 1
  64. gt 'LariskaStart', 'end'
  65. else
  66. gt 'gdktoilet', 'start'
  67. end
  68. end
  69. act 'Change outfit in the locker room':
  70. cla
  71. gt 'wardrobe', 'start'
  72. end
  73. gs 'wardrobe', 'sports_outfit'
  74. if shampoo > 0 or (StoryLine = 1 and (SchoolAtestat = 0 or SchoolBlock = 0)):
  75. act 'Take a shower': gt 'gdksport', 'shower'
  76. else
  77. '<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
  78. end
  79. *nl
  80. if pcs_stam > 20 and $clothingworntype = 'danilovich' and $shoeworntype = 'danilovich' and hour < 18:
  81. if gsAboBeg > 0 and npc_pregtalk['A131'] = 0:
  82. act 'Take a track lesson. You have <<gsAboBeg>> lessons remaining': gt 'gdksport', 'racing2'
  83. end
  84. if gsAboVolley > 0 and volleysostav = 0 and npc_pregtalk['A69'] = 0:
  85. if week ! 5:
  86. act 'Take a volleyball lesson. You have <<gsAboVolley>> lessons remaining': gt 'gdksport', 'vball2'
  87. else
  88. act 'Take a volleyball lesson. You have <<gsAboVolley>> lessons remaining': gt 'gdksport', 'vball3'
  89. end
  90. end
  91. if volleysostav > 0:
  92. if week ! 6 and volkomday ! daystart:
  93. act 'Play with the team': gt 'gdksport', 'vball4'
  94. elseif week = 6 and sorevday ! daystart and hour <= 18:
  95. act 'Play in Tournament': gt 'gdksport', 'vball5'
  96. elseif week = 6 and sorevday ! daystart and hour > 18:
  97. 'As you look around, you don''t see anyone from the team. You suddenly realize that there was a tournament game today and you were supposed to be here at 18:00! You missed the bus and the coach is going to be furious!'
  98. npc_rel['A69'] -= 20
  99. sorevday = daystart
  100. act 'Back': gt 'gdksport', 'start'
  101. elseif pregtime >= 90:
  102. act 'Play with the team': gt 'gdksport', 'vballreact'
  103. end
  104. end
  105. if gsAboDance > 0 and AlbinaQW['StarletsJoined'] = 0 and npc_pregtalk['A23'] = 0:
  106. act 'Take a dance lesson. You have <<gsAboDance>> lessons remaining':
  107. if rand(0, 5) = 0:
  108. gt 'danceGev'
  109. else
  110. gt 'gdksport', 'dance2'
  111. end
  112. end
  113. elseif AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and AlbinaQW['startletsday'] ! daystart:
  114. if hour = 15 and starlets_on = 1:
  115. if pregtime >= 90 or grupTipe = 5 or starlets_missed = 1:
  116. if pregtime >= 90: act 'Train with Starlets': gt 'AlbStars', 'Starletsreact'
  117. if grupTipe = 5: act 'Train with Starlets': gt 'AlbStars', 'StarletsEnd'
  118. if starlets_missed = 1:
  119. act 'Train with Starlets':
  120. starlets_missed = 0
  121. starlet_practice_skipped += 1
  122. gt 'AlbStars', 'StarletsPracticeMissed'
  123. end
  124. end
  125. else
  126. act 'Train with Starlets': gt 'AlbStars', 'starlets'
  127. end
  128. act 'Quit the Starlets' : gt 'AlbStars', 'Quit'
  129. else
  130. act 'Train with Starlets': '<br><font color="red"> The Starlets are not training right now.</font>'
  131. end
  132. end
  133. elseif pcs_stam <= 20:
  134. *nl
  135. 'You are too tired to do any exercise. You need to rest and replenish your stamina.'
  136. end
  137. if deodorant > 0 and deodorant_on = 0:
  138. 'Your deodorant will last you for <b><<deodorant>></b> more '+iif(deodorant = 1, 'application.', 'applications.')
  139. act 'Apply deodorant (0:01)':
  140. *clr & cla
  141. menu_off = 1
  142. minut += 1
  143. deodorant -= 1
  144. gs 'sweat', 'deo'
  145. iif(func('body_din','pregnancyVisibility') = 1, '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant_preg.jpg"></center>', '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant.jpg"></center>')
  146. 'You apply deodorant to your armpits. It will keep you feeling fresh and clean for longer.'
  147. act 'Continue': menu_off = 0 & gt $loc, $loc_arg
  148. end
  149. end
  150. end
  151. if $ARGS[0] = 'racing1':
  152. menu_off = 1
  153. *clr & cla
  154. gs 'stat'
  155. 'Race training cost 300 <b>₽</b> for 30 lessons.'
  156. act 'Leave': gt 'gdksport', 'start'
  157. if money >= 300 and gsAboBeg <= 0:
  158. act 'Buy 30 racing lessons (300 <b>₽</b>)':
  159. *clr & cla
  160. money -= 300
  161. gsAboBeg = 30
  162. gs 'stat'
  163. 'You paid for 30 racing lessons.'
  164. act 'Leave': gt 'gdksport', 'start'
  165. end
  166. end
  167. end
  168. if $ARGS[0] = 'dance1':
  169. menu_off = 1
  170. *clr & cla
  171. gs 'stat'
  172. 'Dance lessons cost 300 <b>₽</b> for 30 lessons.'
  173. act 'Leave': gt 'gdksport', 'start'
  174. if money >= 300 and gsAboDance <= 0:
  175. act 'Buy 30 dance lessons (300 <b>₽</b>)':
  176. *clr & cla
  177. money -= 300
  178. gsAboDance = 30
  179. gs 'stat'
  180. 'You paid for 30 dance lessons.'
  181. act 'Leave': gt 'gdksport', 'start'
  182. end
  183. end
  184. end
  185. if $ARGS[0] = 'vball1':
  186. menu_off = 1
  187. *clr & cla
  188. gs 'stat'
  189. 'Volleyball lessons cost 300 <b>₽</b> for 30 visits.'
  190. act 'Leave': gt 'gdksport', 'start'
  191. if money >= 300 and gsAboVolley <= 0:
  192. act 'Buy 30 volleyball lessons (300 <b>₽</b>)':
  193. *clr & cla
  194. money -= 300
  195. gsAboVolley = 30
  196. gs 'stat'
  197. 'You paid for 30 volleyball lessons.'
  198. act 'Leave': gt 'gdksport', 'start'
  199. end
  200. end
  201. end
  202. if $ARGS[0] = 'dance2':
  203. cla & *clr
  204. menu_off = 1
  205. gs 'stat'
  206. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dance_studio/fit1.jpg"></center>'
  207. act 'Leave': gt 'gdksport', 'start'
  208. if pcs_danc < 50:
  209. gsAboDance -= 1
  210. timemult = 8
  211. loopcount = 1
  212. :dancetimeloop
  213. gs 'exercise', 'tier2', 0, 'agil_exp', 'danc_exp'
  214. if loopcount < timemult: loopcount += 1 & jump 'dancetimeloop'
  215. loopcount = 0
  216. timemult = 0
  217. if pcs_inhib < 40:inhib_exp += rand(1,2)
  218. 'You take a lesson in modern dance, which is very popular with people your age.'
  219. if pcs_danc < pcs_agil:
  220. 'Your skill still has a ways to go, but your agility helps you pull off some of the dance moves.'
  221. else
  222. 'Your body lacks the agility to perform the dance moves that you are being taught.'
  223. end
  224. !place for use in events
  225. gs 'stat'
  226. else
  227. 'There is nothing you can learn from this dance class with your current skill. You need to find a new teacher or travel to the city to find better dance classes if you wish to improve further.'
  228. if AlbinaQW['StarletsJoined'] = 0 and StoryLine ! 0 and ( month < 10 or ( month = 10 and day < 18 )):
  229. if alterstrtimg = 13:
  230. gt 'AlbStars', 'albina3'
  231. elseif grupTipe = 1 or grupTipe = 2:
  232. gt 'AlbStars', 'albina2'
  233. else
  234. gt 'AlbStars', 'albina1'
  235. end
  236. end
  237. end
  238. end
  239. if $ARGS[0] = 'racing2':
  240. *clr & cla
  241. menu_off = 1
  242. gsAboBeg -= 1
  243. timemult = 8
  244. loopcount = 1
  245. :runtimeloop
  246. gs 'exercise', 'tier2', 0, 'run_exp'
  247. if loopcount < timemult: loopcount += 1 & jump 'runtimeloop'
  248. loopcount = 0
  249. timemult = 0
  250. gs 'stat'
  251. '<center><img <<$set_imgh>> src="images/locations/shared/park/parkbeg.jpg"></center>'
  252. 'You spend 20 minutes on warm up, run for 90 minutes then spend 10 minutes on your cool down.'
  253. act 'Leave': gt 'gdksport', 'start'
  254. end
  255. if $ARGS[0] = 'vball2':
  256. *clr & cla
  257. menu_off = 1
  258. gsAboVolley -= 1
  259. if alko < 2:
  260. npc_rel['A69'] += rand(0,2)
  261. timemult = 8
  262. loopcount = 1
  263. :vballtimeloop1
  264. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  265. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop1'
  266. loopcount = 0
  267. timemult = 0
  268. else
  269. timemult = 8
  270. loopcount = 1
  271. :vballtimeloop2
  272. gs 'exercise', 'tier1', 0, 'run_exp'
  273. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop2'
  274. loopcount = 0
  275. timemult = 0
  276. if pcs_inhib < 40:inhib_exp += rand(0,1)
  277. end
  278. gs 'stat'
  279. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  280. if alko < 2:
  281. 'At the beginning of the workout you ran a few laps around the gym. After some sprints, you did abdominal exercises. Afterwards, you practiced volleying and serving the ball.'
  282. else
  283. npc_rel['A69'] -= rand(0,2)
  284. 'You tried to train, but your level of intoxication doesn''t let you focus. The coach sent you to spend the lesson doing laps.'
  285. end
  286. act 'Leave': gt 'gdksport', 'start'
  287. act 'Talk to the coach': gt 'Voltrener', 'start'
  288. end
  289. if $ARGS[0] = 'vball3':
  290. *clr & cla
  291. menu_off = 1
  292. gsAboVolley -= 1
  293. gs 'stat'
  294. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  295. 'On Fridays they hold intramural competitions. Scouts for professional teams sometime come to see who the stronger and more talented players are.'
  296. if alko < 2:
  297. timemult = 8
  298. loopcount = 1
  299. :vballtimeloop3
  300. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  301. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop3'
  302. loopcount = 0
  303. timemult = 0
  304. if pcs_vball < 25:
  305. 'You were an absolutely lousy player and made constant mistakes. Eventually, the coach had enough and he removed you from the court.'
  306. elseif pcs_vball < 50:
  307. 'You did not play very well. Sometimes you made some blunders. The coach was angry, but tolerated your antics.'
  308. elseif pcs_vball < 75:
  309. 'You played well on the court and rarely made any mistakes. The coach looked pleased with you.'
  310. else
  311. 'You played great on the court, and easily defeated your rivals. The coach looked pleased with your game.'
  312. if rand(0, 1) = 0:
  313. if andGevknow = 0:$nameAndGev = 'some guy'
  314. if andGevknow > 0:$nameAndGev = 'Andrei'
  315. 'During the game you got pushed by <a href="exec: gt ''volAndGev'', ''start''"><<$nameAndGev>></a>.'
  316. end
  317. end
  318. else
  319. minut += 120
  320. 'You took to the court, but kept missing plays because you were too drunk to focus. The coach noticed your state and removed you from the game.'
  321. end
  322. act 'Leave': gt 'gdksport', 'start'
  323. act 'Talk to the coach': gt 'Voltrener', 'start'
  324. end
  325. if $ARGS[0] = 'vball4':
  326. *clr & cla
  327. menu_off = 1
  328. volkomday = daystart
  329. timemult = 8
  330. loopcount = 1
  331. :vballtimeloop4
  332. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  333. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop4'
  334. loopcount = 0
  335. timemult = 0
  336. npc_rel['A69'] += 1
  337. if pcs_inhib < 40:inhib_exp += rand(0,1)
  338. gs 'stat'
  339. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  340. 'Number of games <<volsesongame>>, Win - <<volsesonwin>>, lesions - <<volsesonloss>>.'
  341. 'At the beginning of the workout you ran a few laps around the room. Afterwards the coach has you do push-ups and crunches. Then you practiced receiving and setting up plays and serving the ball. At the end of the workout you had a practice game.'
  342. act 'Leave': gt 'gdksport', 'start'
  343. if $pantyworntype = 'none' and rand(0,1) = 1 and (volleytanga = 1 or VoltrenerVoyeur >= 5):
  344. gs 'willpower', 'exhib', 'self'
  345. if will_cost <= pcs_willpwr:
  346. act 'Correct clothing (<<will_cost>> Willpower)':
  347. *clr & cla
  348. inhib_exp += rand(1,5)
  349. TrenerLust += 3
  350. Voltrenersee += 1 & ! setcheck on gg without panties
  351. gs 'willpower', 'exhib', 'self'
  352. gs 'willpower', 'pay', 'self'
  353. gs 'stat'
  354. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/game'+rand(1,2)+'.jpg"></center>'
  355. 'It seems the coach noticed you weren''t wearing any panties, his eyes lit up and he said turning away: "<<$pcs_lastname>>. Come see me after training. I need to show you UH... a few things" '
  356. act 'Leave':gs'stat'& gt 'gdksport', 'start'
  357. act 'Go to the coach''s office': gt 'Voltrenersex', 'start'
  358. end
  359. else
  360. act 'Correct clothing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  361. end
  362. else
  363. act 'Talk to the coach': gt 'Voltrener', 'start'
  364. end
  365. end
  366. if $ARGS[0] = 'vball5':
  367. *clr & cla
  368. menu_off = 1
  369. timemult = 8
  370. ! loopcount = 1
  371. ! :vballtimeloop5
  372. ! gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  373. ! if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop5'
  374. ! loopcount = 0
  375. gs 'stat'
  376. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  377. 'The tournament starts at 19:00. Your bus departs at 18:00. You gather your things together with the rest of the team and get on a bus that takes you to the out of town match.'
  378. act 'Leave': gt 'gdksport', 'start'
  379. act 'Get on bus and go to play':
  380. volltime = 0
  381. sorevday = daystart
  382. if hour < 18: hour = 18 & minut = 0
  383. timemult = 0
  384. npc_rel['A69'] += 2
  385. minut += 60 & !total time should be 4 hours, 2 hours for the game and 2 hours travel
  386. gt 'gdksport', 'volley'
  387. end
  388. end
  389. if $ARGS[0] = 'volley':
  390. menu_off = 1
  391. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  392. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  393. ! minut += 30
  394. gs 'stat'
  395. if volltime = 0:
  396. !! reset the scores
  397. volpoint = 0
  398. volpointv = 0
  399. 'The teams take to the court and start playing.'
  400. !! reserve player or you were caught drinking by the coach and he forbid you from playing
  401. if trener_Speak < 8 or seealko = 1:
  402. volleysostav = 1
  403. poverkomand = 50
  404. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game3.jpg"></center>'
  405. 'You sit on the bench watching your team play.'
  406. !! starter
  407. else
  408. volleysostav = 2
  409. !! between 0 and 200 dependent on player skills
  410. poverkomand = ((pcs_vball*2) + ((pcs_stren + pcs_vital + pcs_agil + pcs_react)/2))/2
  411. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game4.jpg"></center>'
  412. 'After warming up you run out on the court to join your teammates.'
  413. end
  414. !! opponent skill - between 0 and 200. A perfect player should be able to win every match.
  415. poverkomandV = rand(0, 200)
  416. if poverkomand > poverkomandV:
  417. volpoint = 1
  418. 'Your team plays better than your opponents.'
  419. elseif poverkomand < poverkomandV:
  420. volpointv = 1
  421. 'Your opponents play better than your team.'
  422. else
  423. 'The scoring varies one way, then the other, obviously the teams are evenly matched.'
  424. end
  425. act 'Continue':volltime = 1 & gt 'gdksport', 'volley'
  426. !! halftime
  427. elseif volltime = 1:
  428. 'During the break, both teams have a rest.'
  429. if volpointv = 0:
  430. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener6.jpg"></center>'
  431. 'Coach tells the team that you can''t relax. "Although we''re winning, you still need to be focused! Don''t let the enemy back into the game!"'
  432. elseif volpoint = 0:
  433. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener2.jpg"></center>'
  434. 'Coach tells the team that losing the first half is bad, but it''s not a disaster. "You pick yourselves up and go out and kick their asses. You can still win this game in the second half."'
  435. else
  436. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener1.jpg"></center>'
  437. 'Coach tells the team that there is no draws in volleyball, he expects you to keep doing the things that you are doing well, but increase pressure. "With more discipline and toughness, you can win this game!"'
  438. end
  439. if volleysostav = 1:
  440. 'You are sitting on the bench.'
  441. act 'Ask to play':
  442. if seealko = 1:
  443. *clr & cla
  444. 'The coach refuses to let you play because he caught you drinking.'
  445. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  446. else
  447. *clr & cla
  448. gs 'stat'
  449. if npc_rel['A69'] >= rand(0, 80):
  450. volleysostav = 2
  451. poverkomand = ((pcs_vball*2) + ((pcs_stren + pcs_vital + pcs_agil + pcs_react)/2))/2
  452. 'The coach agrees to let you play the second half.'
  453. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  454. else
  455. 'You ask the coach to play, but he shakes his head and explains that it is not strategically right for the team.'
  456. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  457. end
  458. end
  459. end
  460. end
  461. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  462. !! 2nd half
  463. elseif volltime = 2:
  464. *clr & cla
  465. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game5.jpg"></center>'
  466. 'Break is over and the team starts the second half.'
  467. if volleysostav = 1:'You sit on the bench watching your team play.'
  468. !! change the opponent skill a bit so both halves are not an entirely static affair.
  469. poverkomandV += rand(-50, 50)
  470. if poverkomand > poverkomandV:
  471. volpoint += 1
  472. 'Your team plays better than your opponents.'
  473. !! you came in and your team scored when they would not have without you
  474. if volleysostav = 2 and volpointv = 1:npc_rel['A69'] += 10
  475. elseif poverkomand < poverkomandV:
  476. volpointv += 1
  477. 'Your opponents play better than your team.'
  478. !! you came in and your team gave up a point they would not have without you
  479. if volleysostav = 2 and volpoint = 1:npc_rel['A69'] -= 5
  480. else
  481. 'The scoring varies one way, then the other. The teams are obviously evenly matched.'
  482. !! you came in and your team tied when they would have lost without you
  483. if volleysostav = 2 and volpointv = 1:npc_rel['A69'] += 5
  484. end
  485. act 'Continue':volltime = 3 & gt 'gdksport', 'volley'
  486. !! end of game
  487. elseif volltime = 3:
  488. *clr
  489. cla
  490. volsesongame += 1
  491. if rand (1, 100) < 3:
  492. if volpointv = 2:
  493. volpoint = 0
  494. volpointv = 2
  495. elseif volpoint = 2:
  496. volpoint = 2
  497. volpointv = 0
  498. end
  499. end
  500. 'Final whistle.'
  501. seealko = 0
  502. if volpoint > volpointv:
  503. volsesonwin += 1
  504. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game6.jpg"></center>'
  505. 'Your team wins.'
  506. elseif volpoint < volpointv:
  507. volsesonloss += 1
  508. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game8.jpg"></center>'
  509. 'Your team loses.'
  510. else
  511. if rand (0, 1) = 0:
  512. volsesonwin += 1
  513. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game7.jpg"></center>'
  514. 'The match was very close, but in the end your team pulls off a win.'
  515. else
  516. volsesonloss += 1
  517. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game7.jpg"></center>'
  518. 'The match was very close, but in the end your team still loses.'
  519. end
  520. end
  521. minut += 60 & !total time should be 4 hours, 2 hours for the game and 2 hours travel
  522. act 'Leave': gt 'gdksport', 'start'
  523. act 'Talk to the coach': gt 'Voltrener', 'start'
  524. end
  525. end
  526. if $ARGS[0] = 'shower':
  527. menu_off = 1
  528. *clr & cla
  529. $location_type = 'bathroom'
  530. if StoryLine = 1 and (SchoolAtestat = 0 or SchoolBlock = 0): noShampoo = 1
  531. dynamic $showerdin
  532. minut += 15
  533. pcs_horny += 1
  534. pcs_makeup = 1
  535. if frost > 0:frost = 0
  536. gs 'stat'
  537. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  538. if IvanShowerYes = 1 and rand(0,3) = 1 and ShowerIvan < 3:
  539. if ShowerIvan = 1: ShowerIvan = 2
  540. 'You enter the women''s shower, and turning the water on, you begin to lather up your body with a washcloth. Suddenly, you hear the door creak open and you remember that you agreed not to lock it for Ivan.'
  541. 'You look around and see Ivan standing there looking at you. "Hello <<$pcs_nickname>>. The men''s shower is full, so I thought I would join you instead." He smiles.'
  542. act 'Shower with Ivan': gt 'gdksport', 'ShowerWithIvan'
  543. gs 'willpower', 'bj', 'resist'
  544. if will_cost <= pcs_willpwr:
  545. act 'Not today (<<will_cost>> Willpower)':
  546. *clr & cla
  547. gs 'willpower', 'bj', 'resist'
  548. gs 'willpower', 'pay', 'resist'
  549. gs 'stat'
  550. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  551. 'You cover your breasts with one hand and turn sideways crossing your legs while flashing Ivan your best smile.'
  552. '"How about another time Ivan? I''m not feeling it right now." Ivan just laughs and walk out of the shower room.'
  553. 'You quickly lock the door, before finishing your shower in peace.'
  554. act 'Get out of the shower': gt 'gdksport', 'start'
  555. end
  556. else
  557. act 'Not today (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  558. end
  559. !! We only set IvanShowerQW = 1 if the player showers with Ivan because the scene that uses this
  560. !! variable where the player talks to Ivan about the shower at school assumes the player did
  561. !! not run away or kick out Ivan before anything happened. This scene was initially a one-off,
  562. !! but was changed to make it repeatable because showering with Ivan here is non-obviously an
  563. !! intermediate step in becoming a starter on the volleyball team. If avoiding needing this
  564. !! scene to be repeatable is desired, someone with a better sense of Ivan as a character than
  565. !! me could add a version of the followup scene at school for when the player doesn''t shower
  566. !! with Ivan using IvanShowerQW = 2 at some point. If this is done, this scene can be made
  567. !! non-repeatable by removing the (IvanShowerQW = 2 and rand(0,3) = 1) part
  568. elseif (kotovVSprohorov = 1 or (IvanShowerQW = 2 and rand(0,3) = 1)) and ShowerIvan < 3:
  569. 'You enter the women''s shower and turning the water on, begin to lather your body with a washcloth. Suddenly, you hear the door creak open and you remember that you forgot to lock it.'
  570. 'You look around and see Ivan standing in the doorway looking at you. "Hi <<$pcs_nickname>>. Can I join you? The men''s shower is full' + iif(IvanShowerQW = 2, ' again', '') + '." He smiles.'
  571. kotovVSprohorov = 2
  572. IvanShowerQW = 2
  573. gs 'willpower', 'bj', 'resist'
  574. if will_cost <= pcs_willpwr:
  575. act 'Throw Ivan out (<<will_cost>> Willpower)':
  576. *clr & cla
  577. gs 'willpower', 'bj', 'resist'
  578. gs 'willpower', 'pay', 'resist'
  579. gs 'stat'
  580. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  581. 'You cover your breasts with one hand and turn sideways crossing your legs as you hurl your washcloth at Ivan. He easily dodges the flying cloth and laughs as he exits the shower room.'
  582. 'You quickly lock the door, before finishing your shower in peace.'
  583. act 'Get out of the shower': gt 'gdksport', 'start'
  584. end
  585. else
  586. act 'Throw Ivan out (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  587. end
  588. act 'Uh, what?':
  589. *clr & cla
  590. gs 'stat'
  591. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/shower2.jpg"></center>'
  592. 'Completely surprised and confused by Ivan''s sudden appearance, you are struck speechless. Ivan takes your inaction and silence as consent, and he walks into the shower room and closes the door behind him.'
  593. gs 'willpower', 'bj', 'resist', 'hard'
  594. if will_cost <= pcs_willpwr:
  595. act 'Escape from the shower (<<will_cost>> Willpower)':
  596. *clr & cla
  597. gs 'willpower', 'bj', 'resist', 'hard'
  598. gs 'willpower', 'pay', 'resist'
  599. gs 'stat'
  600. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  601. 'You cover your breasts with one hand as you quickly grab your towel and run from the shower. As you run into the changing room, you can hear Ivan laughing.'
  602. act 'Get out of the shower': gt 'gdksport', 'start'
  603. end
  604. else
  605. act 'Escape from the shower (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  606. end
  607. act 'Wash together':
  608. IvanShowerQW = 1
  609. IvanShowerYes = 0
  610. if ShowerIvan = 0: ShowerIvan = 1
  611. gt 'gdksport', 'ShowerWithIvan'
  612. end
  613. end
  614. else
  615. 'You enter the women''s shower and turning the water on begin to lather your body with a washcloth. After you rinse off the soap, you wash your hair. You then rinse your hair and feel completely clean.'
  616. if (trenerlust >= 40 or trenersex = 1) and rand(0,3) = 0 and VoltrenerVoyeur = 0:
  617. act 'Continue': gt 'VoltrenerSexShower', '0'
  618. elseif (trenerlust >= 40 or trenersex = 1) and rand(0,3) = 0 and VoltrenerVoyeur = 1:
  619. act 'Continue': gt 'VoltrenerSexShower', '1'
  620. elseif (trenerlust >= 40 or trenersex = 1) and rand(0,3) = 0 and VoltrenerVoyeur = 2 and IvanShowerYes = 0:
  621. act 'Continue': gt 'VoltrenerSexShower', '2'
  622. else
  623. 'After your shower, you get dressed.'
  624. act 'Get out of the shower': gt 'gdksport', 'start'
  625. end
  626. end
  627. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
  628. end
  629. if $ARGS[0] = 'ShowerWithIvan':
  630. menu_off = 1
  631. *clr & cla
  632. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  633. 'Ivan walks over to you, pulling his boxer shorts down and stepping out of them as they fall around his ankles. Stepping into the shower with you, getting himself wet under the water. His muscular body is very close to yours.'
  634. 'You try not to look at him, but your eyes involuntarily drop to his groin where his thick cock swings as he moves. Ivan, seeing where you are looking winks. "Want to wash me?"'
  635. gs 'arousal', 'foreplay', 5
  636. gs 'stat'
  637. act 'Lather Ivan':
  638. *clr & cla
  639. gs 'boyStat', 'A3'
  640. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower.jpg"></center>'
  641. 'You take your washcloth and begin to lather Ivan''s body. As you move around him, you can''t help but notice his <<dick>>cm <<$dick_girth>> cock begin to rise up and get hard. You feel it brush against your thigh.'
  642. 'Ivan begins to rubs his hands over your body and caress you. After a few minutes, you feel his hands on your shoulders as he gently but firmly pushes you down to your knees.'
  643. gs 'arousal', 'foreplay', 5
  644. gs 'stat'
  645. act 'Give blowjob':
  646. *clr & cla
  647. if npc_Sex['A3'] = 0: npc_Sex['A3'] = 1 & guy += 1
  648. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shover.jpg"></center>'
  649. 'You slowly sink to your knees in front of Ivan and his <<dick>>cm <<$dick_girth>> cock is in front of your face. Ivan leans forward, probing impatiently with the head of his cock against your lips. Your mouth opens almost against your will and you let his cock slide in your mouth.'
  650. 'Your lips tightly wrap around Ivan''s solid rod and you suck him as the streams of warm water wash over you. Suddenly Ivan pulls his dick out of your mouth and takes you by the hand, pulling you back up to your feet. He brings his lips to your breast and begins to suck on your nipple.'
  651. 'Bliss sweeps over you as he suckles your stiff nipple. Releasing your nipple with a wet pop, Ivan pushes you back onto your knees and bends you backwards as he straddles your face, once again sliding his hot cock into your mouth. He begins pushing it deeper into your throat.'
  652. gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
  653. gs 'stat'
  654. act 'Allow him to continue':
  655. cla & *clr
  656. if pcs_throat < 15:
  657. '<center><video autoplay loop src="images/shared/sex/blowjob/shower6.mp4"></video></center>'
  658. 'Penetrating further and further into your mouth, then into your throat, his member blocks your breath, which causes a gag reflex, nearly causing you to vomit. Freeing your mouth from his dick and wiping your tears, you scream at him. "This isn''t some bottomless hole for you to shove your dick into, you know!" Ivan gives you a guilty look then pulls you back to your feet again as he begins to kiss you and caress your breasts and ass until you begin to moan with desire. He turns you around and bends you over.'
  659. else
  660. '<center><video autoplay loop src="images/shared/sex/blowjob/shower7.mp4"></video></center>'
  661. 'Penetrating further and further into your mouth, then into your throat, you take his member to the base without any problems and without causing you discomfort, bringing Ivan "heavenly delight" if his groans and moans are any indication. Feeling that your classmate would flood your throat with his seed at any moment, you pull your mouth off of his cock and turn and bend over, presenting your ass to him. You also want some satisfaction.'
  662. end
  663. if agape > 0:
  664. act 'Continue':
  665. *clr & cla
  666. if pcs_throat < dick:pcs_throat += 1
  667. spafinloc = 12
  668. gs 'cum_manage'
  669. gs 'stat'
  670. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum49.jpg"></center>'
  671. 'Bent over, expecting to feel his <<dick>>cm <<$dick_girth>> cock against your pussy at any moment, you are momentarily surprised when you feel it pressed up against your asshole.'
  672. 'Thinking he is unaware you speak up. "Wrong hole Ivan!" Ivan just snorts in response. "Yeah I know." He then pushes the head of his <<dick>>cm <<$dick_girth>> cock into your ass. You moan in a mixture of pain and pleasure.'
  673. 'He takes it slow, giving you time to adjust to his dick invading your ass. Once your moans turn more to ones of pleasure then pain, he slips it in deeper, slowly working himself balls deep into your ass.'
  674. *nl
  675. 'Once there he begins stroking his <<dick>>cm <<$dick_girth>> cock faster and faster in your ass. Soon, his skin is slapping against your bare ass as he pounds you hard and fast.'
  676. 'One of your hands rubs your clit while the other one stays against the wall to brace yourself. He has amazing stamina in a seemingly endless supply. No matter how much you love him fucking your ass, after a while you feel your ass beginning to get sore, your moans of pleasure start to turn into grunts of pain.'
  677. 'Apparently sensing your growing discomfort, he makes one more powerful thrust with a grunt then pulls out of your ass. He pulls you around and pushes you back down to your knees before he slides his cock back in your mouth. You try to ignore the taste of his cock, considering just where it just was.'
  678. 'You do you best to suck him off quickly and within moments, he is shooting his sperm into your mouth. Once he is done, he goes back to showering, quickly finishing up and starting to get dressed. He watches you as you get dressed. "That was great <<$pcs_nickname>>, we should do that again sometime." Without waiting for a reply, he leaves the room.'
  679. gs 'arousal', 'anal', 5, 'sub', 'rough'
  680. gs 'arousal', 'masturbate', 5
  681. minut -= 5
  682. gs 'arousal', 'end'
  683. gs 'stat'
  684. act 'Get out of the shower': gt 'gdksport', 'start'
  685. end
  686. else
  687. act 'Turn around and bend over':
  688. *clr & cla
  689. lubonus = 2
  690. spafinloc = 3
  691. gs 'Cum_Manage'
  692. if pcs_ass + lubonus + 2 < dick:
  693. if pcs_makeup > 1:pcs_makeup = 0
  694. pcs_horny -= 20
  695. pcs_mood -= 20
  696. if agape < 3:agape = 3
  697. elseif pcs_ass < dick:
  698. pcs_horny += 10
  699. if agape < 2 and lubonus = 0:agape = 2
  700. end
  701. gs 'stat'
  702. '<center><video autoplay loop src="images/shared/sex/vag/doggy/shover2.mp4"></video></center>'
  703. 'As you bend over, you feel Ivan''s hand stroking your ass and his finger starts to massage your anus. You are momentarily surprised when you feel his fingers pressed up against your asshole. Thinking he is unaware you speak up. "That''s my <i>other</i> hole Ivan..."'
  704. 'Ivan just snorts in response. "Yeah I know." He then pushes the head of his <<dick>>cm <<$dick_girth>> cock into your ass. You moan in a mixture of pain and pleasure. He takes it slow, giving you time to adjust to his dick invading your ass.'
  705. 'Once your moans turn more to ones of pleasure then pain, he slips it in deeper, slowly working himself balls deep in your ass. Once there he begins stroking his <<dick>>cm <<$dick_girth>> cock faster and faster in your ass. Soon, his skin is slapping against your bare ass as he pounds you hard and fast.'
  706. 'One of your hands rubs your clit while the other one stays against the wall to brace yourself. He has amazing stamina in a seemingly endless supply. For a while, you buck your hips back against him, fucking him as much as he is fucking you, but no matter how much you love him fucking your ass, after a while you feel your ass beginning to get sore.'
  707. gs 'arousal', 'anal', 5, 'sub', 'rough'
  708. gs 'arousal', 'masturbate', 5
  709. minut -= 5
  710. gs 'stat'
  711. if VoltrenerVoyeur = 3:
  712. act 'Continue': gt 'VoltrenerSexShower', '3'
  713. elseif VoltrenerVoyeur = 4:
  714. act 'Continue': gt 'VoltrenerSexShower', '4'
  715. elseif VoltrenerVoyeur = 5:
  716. act 'Continue': gt 'VoltrenerSexShower', '5'
  717. else
  718. if pcs_horny >= 100:
  719. if stat['anal'] >= 10 and orgasm > 0:
  720. pcs_mood += 20
  721. $orgasm_or = 'custom'
  722. $orgasm_txt = 'Your whole body contracts and then you cry out in orgasm.'
  723. end
  724. end
  725. 'Your moans of pleasure start to turn into grunts of pain. Apparently sensing your growing discomfort, he makes one more powerful thrust with a grunt. His body spasms against yours as you feel him cumming in your ass. Once he is done he pulls out of you and goes back to showering, quickly finishing up and starting to get dressed.'
  726. 'He watches you as you get dressed. "That was great <<$pcs_nickname>>, we should do that again sometime." Without waiting for a reply, he leaves the room.'
  727. cumspclnt = 1
  728. gs 'cum_cleanup'
  729. gs 'arousal', 'end'
  730. gs 'stat'
  731. act 'Get out of the shower': gt 'gdksport', 'start'
  732. end
  733. end
  734. end
  735. end
  736. gs 'willpower', 'anal', 'resist', 'hard'
  737. if will_cost <= pcs_willpwr:
  738. act 'That''s enough for now (<<will_cost>> Willpower)':
  739. gs 'willpower', 'anal', 'resist', 'hard'
  740. gs 'willpower', 'pay', 'resist'
  741. gs 'stat'
  742. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  743. 'Ivan pauses for a brief second and you use the chance to quickly stand up and jump out of the shower.'
  744. 'You look back at him and say "I think you''ve had enough of me for today. Maybe you can have more next time."'
  745. act 'Get out of the shower': gt 'gdksport', 'start'
  746. end
  747. else
  748. act 'That''s enough for now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  749. end
  750. end
  751. end
  752. end
  753. if $ARGS[0] = 'Ivan_bored':
  754. menu_off = 1
  755. *clr & cla
  756. minut += 5
  757. pcs_horny += 10
  758. gs'stat'
  759. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/school/ivan2.jpg"></center>'
  760. 'You look at Ivan for a long moment and bite your lower lip and then whisper just loud enough that he can barely hear you. "I''m bored..." He looks at you for a moment then smiles. He looks around, then takes you by the hand and leads you away from the others, into one of the lesser used areas of the school. He stops at one of the boys restrooms, going inside and leaving you outside. A few moments later, two younger boys are sent packing by Ivan. Once they round the corner, he pulls you into the bathroom.'
  761. gs 'willpower', 'anal', 'resist'
  762. if will_cost <= pcs_willpwr:
  763. act 'Leave (<<will_cost>> Willpower)':
  764. gs 'willpower', 'anal', 'resist'
  765. gs 'willpower', 'pay', 'resist'
  766. gs 'stat'
  767. gt 'gschool_lessons', 'short_break'
  768. end
  769. else
  770. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  771. end
  772. act 'Go into the bathroom with Ivan':
  773. *clr & cla
  774. pcs_horny += 20
  775. gs 'boyStat', 'A3'
  776. gs 'stat'
  777. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/school/bbivanbj.jpg"></center>'
  778. 'Once inside, Ivan starts to kiss you passionately while pulling your clothes off and tossing them all over. You return his kiss and help remove your clothes. He backs up, pulling you into one of the stalls. Once your clothes are removed he starts removing his own clothes, which you are only to happy to help with. Once you''re both fully naked, he sits down on the toilet and gently pushes you down to your knees.'
  779. 'He guides your head to his <<dick>>cm <<$dick_girth>> cock. Using one of your hands you grab his dick and start to stroke the shaft while you open your mouth and take his dick into your mouth. You wrap your lips tightly around his shaft and start sucking him, while using your tongue to tease the head. You alternate your hand from stroking him and fondling his balls.'
  780. 'He moans and grabs your hair, you can feel he is restraining himself from forcing your head down and jamming his dick down your throat. After a couple of minutes, he growls a bit and stands up, pulling you up as well. Without explaining he turns you around so quickly you almost stumble, only his strong hands on you keep you from falling into the stall wall. He roughly bends you over, using one hand to guide his cock while the other grabs your butt cheek to spread it open.'
  781. gs 'arousal', 'kiss', 5, 'sub'
  782. gs 'arousal', 'hj', 5, 'dom'
  783. gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
  784. minut -= 5
  785. gs 'stat'
  786. act 'Let him':
  787. *clr & cla
  788. lubonus = 2
  789. gs 'cum_call', 'anus', 'A3', 1
  790. if pcs_ass + lubonus + 2 < dick:
  791. if pcs_makeup > 1:pcs_makeup = 0
  792. pcs_horny -= 20
  793. pcs_mood -= 20
  794. if agape < 3:agape = 3
  795. elseif pcs_ass < dick:
  796. if agape < 2 and lubonus = 0:agape = 2
  797. end
  798. gs 'stat'
  799. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/school/schoolanal.jpg"></center>'
  800. 'He rubs the tip of his dick against your asshole for a couple of moments and then you feel a sharp pain as he pushes it in. With only your saliva as lubrication, it doesn''t slide in as easily. You bite your lip and cry out a little in pain. He relaxes a little and rubs your back as he takes it slow, giving you time to stretch and adjust to his cock invading your ass.'
  801. 'He slowly strokes his <<dick>>cm <<$dick_girth>> cock in your ass, with each stroke pushing it just a little deeper in your ass. Once he is about half way in your moans turn from pain to pleasure, while one of your hands starts rubbing your clit. You start moaning louder and panting, your pussy is now soaking wet. After a couple of minutes the pleasure is building up inside of your body so much you no longer even need to stimulate your clitorous any longer. "Fuck <<$pcs_nickname>>, you not only have the hottest ass of any girls in school, but the tightest one I have ever fucked." Ivan says as he can tell you''re getting into it, grabbing your hips with both hands. He drives himself balls deep into your ass, eliciting a squeak of pain from you, but sensation of pain is quickly overwhelmed by pleasure.'
  802. 'Holding onto your hips with both hands, he holds you steady and keeps you from pulling away, as he jack hammers his <<dick>>cm <<$dick_girth>> cock balls deep in your ass. You moan in pain and pleasure, mostly pleasure, the sounds of your moans, almost drowned out the sounds of his skin slapping against yours, his balls slapping against your wet pussy. You place your hands against the stall wall to keep him from driving your head into it, from his powerful and violent thrusts. As he abuses your poor little asshole, you find yourself loving every second of it.'
  803. *nl
  804. 'You have an intense orgasm that leaves your legs shaking and barely able to keep standing. You are almost to the point where you are unable to take it anymore, either from the intense pleasure or the growing burning sensation in your ass. Either way the matter is moot, as Ivan drives himself once more balls deep into your ass, but this time holds himself there. You feel his cock twitching as he shoots hot sperm deep in your ass, spurt after spurt filling you up with his semen in what seems an almost unending stream. Finally he takes a shuddering breath and pulls out of you, leaving you to almost collapse with out his support.'
  805. 'You both start to get dressed, him faster than you, as your still unsteady on your feet, from your shaky legs. Once he is done getting dressed he helps you gather the rest of your clothes from where he tossed them aside. As you are seeing to the final adjustments of your clothes he goes to the bathroom door and looks out both ways down the hall, motioning you over just as the class bell rings. Oh well, at least you have a good excuse to be a little late, you think to yourself with a smile.'
  806. 'As you start to go out the door, he stops you and squeezes your ass with his strong hand and says. "That was great <<$pcs_nickname>>, you are coolest chick in school, not to mention the hottest. Maybe we can do this again sometime soon, or maybe I will come see you in the shower at the community center some night, maybe even tonight." He grins and winks at you, giving your ass a hard slap, as he rushes off to class. You only have time to nod in agreement to his idea of doing this again, you bite your lip as you watch him go. You have mixed feelings about this, Ivan is a great guy and a lot of fun, but you know he doesn''t want a girlfriend. He just wants to be friends with benefits, but is that enough for you? You don''t have time to think on it more as you hurry to class.'
  807. $orgasm_or = 'yes'
  808. gs 'arousal', 'anal', 5, 'sub', 'rough'
  809. gs 'arousal', 'end'
  810. gs 'stat'
  811. act 'Continue': gt 'gschool_lessons', 'short_break'
  812. end
  813. end
  814. end
  815. if $ARGS[0] = 'Fedor First Date':
  816. menu_off = 1
  817. *clr & cla
  818. numnpc = 5
  819. gs 'stat'
  820. '<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
  821. '<center><img <<$set_imgh>> src="images/characters/shared/photos/big5.jpg"></center>'
  822. if fedorkozbreak = 1:
  823. 'You enter the sports club and see Fedor standing by the front door. He looks as though he is waiting for someone and as soon as he sees you, he flashes you a smile and he approaches with an affable smile on his face. "Hello <<$pcs_firstname>>." he says with a warm smile. He pauses for a moment, then reaches into his pockets and pulls out 2 tickets and says "Here is the deal. I know that we had a bit of a bumpy relationship before, but I would like to try again if you will. So what do you say? Wanna go on another date with me?"'
  824. else
  825. 'You enter the sports club and see Fedor standing by the front door. He looks as though he is waiting for someone and as soon as he sees you, his eyes light up and he approaches you with an affable smile on his face. "Hello <<$pcs_firstname>>." he says with a warm smile. He pauses for a moment, then reaches into his pockets and pulls out 2 tickets and says "Here is the deal. I have an extra ticket to the movies and I would like know if you would be up for a good comedy?"'
  826. end
  827. act 'Agree':
  828. *clr & cla
  829. minut += 15
  830. gs 'stat'
  831. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/walk.jpg"></center>'
  832. '"I would like that." you say with a smile and Fedor responds: "Good, I hear that this movie will have us in stiches." With a delighted look on his face, he wraps his arm around yours then walks you to the movie theater.'
  833. act 'Watch a movie':
  834. *clr & cla
  835. minut += 90
  836. pcs_mood += 90
  837. gs 'stat'
  838. '<center><img <<$set_imgh>> src="images/locations/shared/cinema/kino_1.jpg"></center>'
  839. 'Fedor presents the tickets at the entrance and together you walk into the theater. You look around and notice that the seats are mostly empty, so Fedor leads you to the front row and you both sit down. The lights dim and the movie starts. Fedor sits motionless and only occasionally glances at you. The movie was quite interesting and you couldn''t help but laugh occasionally at the wackiness of it. When the movie ends, the lights turn on and Fedor walks you out. "<<$pcs_firstname>>. You seem like a cool girl. Maybe we could go out together. What do you say?"'
  840. act 'Agree':
  841. *clr & cla
  842. npc_rel['A5'] += 20
  843. fedorKozlovQW = 10
  844. minut += 15
  845. gs 'stat'
  846. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/walk.jpg"></center>'
  847. '"Sure, I would love to go out with you." you reply and Fedor is visibly delighted. "Alright, I look forward to hanging out with you again. Whenever you are up for another date then meet me in the school yard, after school." Fedor says as he walks you back home. The two of you have fun discussing your favorite movies as you continue your way home.'
  848. act 'Leave': gt 'pav_residential'
  849. end
  850. act 'Refuse':
  851. *clr & cla
  852. if fedorkozbreak = 0:fedorKozlovQW = 0
  853. if fedorkozbreak = 1:fedorKozlovQW = -1
  854. npc_rel['A5'] = 70
  855. minut += 15
  856. gs 'stat'
  857. '<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
  858. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/fedorsad.jpg"></center>'
  859. if fedorkozbreak = 1:
  860. 'You shake your head. "Sorry Fedor, but I don''t think that this is really working out. I''m sorry." Fedor looks visibly upset as he replies "I guess it was never meant to be, I''m sorry for wasting your time..." He then silently walks you home.'
  861. else
  862. 'You shake your head. "You seem like a cool guy, but I''m just not ready for a relationship right now." Fedor is visibly upset as he replies "I guess it wasn''t a good time. If you ever change your mind then pay me a visit at school." he says with a forced smile as he silently walks you home.'
  863. end
  864. act 'Leave': gt 'pav_residential'
  865. end
  866. end
  867. end
  868. act 'Refuse':
  869. *clr & cla
  870. npc_rel['A5'] = 70
  871. gs 'stat'
  872. '<center><b><h4><font color="blue"><<"Fyodor ">><<"[Fedor]">><<" Kozlov">></font></h4></b></center>'
  873. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/fedorsad.jpg"></center>'
  874. 'You shake your head. "I have too much that I need to do right now. Maybe some other time." Fedor lowers his head with a frown. "Okay. Maybe some other time."'
  875. act 'Leave': gt 'pav_residential'
  876. end
  877. end
  878. if $ARGS[0] = 'vballreact':
  879. cla
  880. menu_off = 1
  881. 'As you approach the team, your coach notices you and calls you aside. "<<$pcs_firstname>>, are you pregnant? I can''t let you play like that. Also, a pregnant teenager would definitely reflect poorly on me and the rest of the team. Sorry, but off the team." Tears welling in your eyes, you leave.'
  882. minut += 5
  883. gs 'stat'
  884. act 'Continue':npc_pregtalk['A69'] = 1 & gt 'pav_commcenter'
  885. end
  886. --- gdksport ---------------------------------