1
0

gdksport.qsrc 59 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251
  1. # gdksport
  2. if $ARGS[0] = 'start':
  3. CLOSE ALL
  4. *clr & cla
  5. $metka ='start'
  6. $metkaM = 'start'
  7. $loc = 'gdksport'
  8. $locM = 'gdksport'
  9. $menu_loc = 'gdksport'
  10. $menu_arg = 'start'
  11. menu_off = 0
  12. $location_type = 'public_indoors'
  13. gs 'stat'
  14. gs 'themes', 'indoors'
  15. '<center><b><font color="maroon">community center</font></b></center>'
  16. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  17. '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'
  18. *nl
  19. '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.'
  20. if kotovLoveQW > 0 and hour = 16:
  21. 'You see <a href="exec:minut += 3 & gt ''kotovEv''">Vitek Kotov</a> with a large sports bag entering the sports club.'
  22. elseif npc_rel['A3'] >= 80 and hour = 17 and ivansportday ! daystart:
  23. 'You see <a href="exec:minut += 3 & gt ''IvanEv''">Ivan Prokhorov</a> with a large sports bag entering the sports club.'
  24. end
  25. if npc_rel['A5'] >= 80 and fedorKozlovQW = 0 and pcs_apprnc >= 20 and fedorkozbreak < 2 and GorSlut < 2: gt 'gdksport', 'Fedor First Date'
  26. if week <= 5 and hour >= 16 and hour < 18 and fedorKozlovQW >= 20:
  27. 'You can see <a href="exec:gt ''FedorMisc'', ''Fedor Workout''">Fedor</a> on his phone next to some punching bags.'
  28. end
  29. *nl
  30. if $clothingworntype ! 'exercise': 'You are not dressed in sports clothes.'
  31. if $shoeworntype ! 'trainers': 'You are not wearing training shoes.'
  32. act 'Go outside':
  33. if $clothingworntype = 'nude':
  34. msg'<b><font color = red>You need to get dressed before leaving.</font></b>'
  35. gt 'gdksport', 'start'
  36. elseif lariskaQwestStart <= daystart and lariskaQwestStart ! 0 and lariskaHelp = 0:
  37. lariskaHelp = 1
  38. gt 'LariskaStart', 'start'
  39. elseif lariskaHelp = 1 and lariskaHelp_end = 0 and lariskaQwestDay <= daystart and AlbZverHelp = 0 and AlbEnemy = 0 and AlbinaInPrison = 0:
  40. lariskaHelp_end = 1
  41. gt 'LariskaStart', 'end'
  42. else
  43. gt 'gdk'
  44. end
  45. end
  46. act 'Go to the toilets':
  47. if $clothingworntype = 'nude':
  48. msg'<b><font color = red>You need to get dressed before leaving.</font></b>'
  49. gt 'gdksport', 'start'
  50. elseif lariskaQwestStart <= daystart and lariskaQwestStart ! 0 and lariskaHelp = 0:
  51. lariskaHelp = 1
  52. gt 'LariskaStart', 'start'
  53. elseif lariskaHelp = 1 and lariskaHelp_end = 0 and lariskaQwestDay <= daystart and AlbZverHelp = 0 and AlbEnemy = 0 and AlbinaInPrison = 0:
  54. lariskaHelp_end = 1
  55. gt 'LariskaStart', 'end'
  56. else
  57. gt 'gdktoilet', 'start'
  58. end
  59. end
  60. act 'Change outfit in the locker room':
  61. cla
  62. gt 'wardrobe', 'start'
  63. end
  64. gs 'wardrobe', 'sports_outfit'
  65. act 'Take a shower':gt 'gdksport', 'shower'
  66. *nl
  67. if pcs_stam > 20 and $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour < 18:
  68. if gsAboBeg > 0 and npc_pregtalk['A131'] = 0:
  69. act 'Take a track lesson, you have <<gsAboBeg>> lessons remaining':gt 'gdksport', 'racing2'
  70. end
  71. if gsAboVolley > 0 and volleysostav = 0 and npc_pregtalk['A69'] = 0:
  72. if week ! 5:
  73. act 'Take a volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball2'
  74. else
  75. act 'Take a volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball3'
  76. end
  77. end
  78. if volleysostav > 0:
  79. if week ! 6 and volkomday ! daystart:
  80. act 'Play with the team':gt 'gdksport', 'vball4'
  81. elseif week = 6 and sorevday ! daystart and hour <= 18:
  82. act 'Play in Tournament': gt 'gdksport', 'vball5'
  83. elseif week = 6 and sorevday ! daystart and hour > 18:
  84. '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!'
  85. npc_rel['A69'] -= 20
  86. sorevday = daystart
  87. act 'Back': gt 'gdksport', 'start'
  88. elseif pregtime >= 90:
  89. act 'Play with the team':gt 'gdksport', 'vballreact'
  90. end
  91. end
  92. if gsAboDance > 0 and albinaQWdance = 0 and npc_pregtalk['A23'] = 0:
  93. act 'Take a dance lesson, you have <<gsAboDance>> lessons remaining':gt 'gdksport', 'dance2'
  94. elseif albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and npc_pregtalk['A23'] = 0 and startletsday ! daystart:
  95. if pregtime >= 90:
  96. act 'Train with Starlets':gt 'gdksport', 'Starletsreact'
  97. else
  98. act 'Train with Starlets':gt 'gdksport', 'starlets'
  99. end
  100. end
  101. elseif pcs_stam <= 20:
  102. *nl
  103. 'You are too tired to do any exercise. You need to rest and replenish your stamina.'
  104. end
  105. end
  106. if $ARGS[0] = 'racing1':
  107. menu_off = 1
  108. *clr & cla
  109. gs 'stat'
  110. 'Race training cost 300 <b>₽</b> for 30 lessons.'
  111. act 'Leave':gt 'gdksport', 'start'
  112. if money >= 300 and gsAboBeg = 0:
  113. act 'Buy 30 racing lessons (300 <b>₽</b>)':
  114. *clr & cla
  115. money -= 300
  116. gsAboBeg += 30
  117. gs 'stat'
  118. 'You paid for 30 racing lessons.'
  119. act 'Leave':gt 'gdksport', 'start'
  120. end
  121. end
  122. end
  123. if $ARGS[0] = 'dance1':
  124. menu_off = 1
  125. *clr & cla
  126. gs 'stat'
  127. 'Dance lessons cost 300 <b>₽</b> for 30 lessons.'
  128. act 'Leave':gt 'gdksport', 'start'
  129. if money >= 300 and gsAboDance = 0:
  130. act 'Buy 30 dance lessons (300 <b>₽</b>)':
  131. *clr & cla
  132. money -= 300
  133. gsAboDance += 30
  134. gs 'stat'
  135. 'You paid for 30 dance lessons.'
  136. act 'Leave':gt 'gdksport', 'start'
  137. end
  138. end
  139. end
  140. if $ARGS[0] = 'vball1':
  141. menu_off = 1
  142. *clr & cla
  143. gs 'stat'
  144. 'Volleyball lessons cost 300 <b>₽</b> for 30 visits.'
  145. act 'Leave':gt 'gdksport', 'start'
  146. if money >= 300 and gsAboVolley = 0:
  147. act 'Buy 30 volleyball lessons (300 <b>₽</b>)':
  148. *clr & cla
  149. money -= 300
  150. gsAboVolley += 30
  151. gs 'stat'
  152. 'You paid for 30 volleyball lessons.'
  153. act 'Leave':gt 'gdksport', 'start'
  154. end
  155. end
  156. end
  157. if $ARGS[0] = 'dance2':
  158. cla & *clr
  159. menu_off = 1
  160. gs 'stat'
  161. '<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
  162. act 'Leave':gt 'gdksport', 'start'
  163. if pcs_danc < 50:
  164. gsAboDance -= 1
  165. timemult = 8
  166. loopcount = 1
  167. :dancetimeloop
  168. gs 'exercise', 'tier2', 0, 'agil_exp', 'danc_exp'
  169. if loopcount < timemult: loopcount += 1 & jump 'dancetimeloop'
  170. loopcount = 0
  171. timemult = 0
  172. if pcs_inhib < 40:inhib_exp += rand(1,2)
  173. 'You take a lesson in modern dance, which is very popular with people your age.'
  174. if pcs_danc < pcs_agil:
  175. 'Your skill still has a ways to go, but your agility helps you pull off some of the dance moves.'
  176. else
  177. 'Your body lacks the agility to perform the dance moves that you are being taught.'
  178. end
  179. !place for use in events
  180. if rand(0, 1) = 0:'You see something <a href="exec:gt ''danceGev''">interesting</a>.'
  181. else
  182. '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.'
  183. if rand(0, 1) = 0:
  184. 'You see something <a href="exec:gt ''danceGev''">interesting</a>.'
  185. elseif albinaQWdance = 0 and StoryLine ! 0 and npc_rel['A23'] <= 20:
  186. gt 'gdksport', 'albina1'
  187. elseif albinaQWdance = 0 and StoryLine ! 0 and npc_rel['A23'] <= 60:
  188. gt 'gdksport', 'albina2'
  189. elseif albinaQWdance = 0 and StoryLine ! 0:
  190. gt 'gdksport', 'albina3'
  191. end
  192. end
  193. end
  194. if $ARGS[0] = 'albina1':
  195. menu_off = 1
  196. *clr & cla
  197. numnpc = 23
  198. $static_num = 'A23'
  199. gs 'stat'
  200. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  201. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  202. 'At the end of the class, a few girls enter the dance studio, including Albina Barlovskaya. You''ve seen Albina around, but you know almost nothing about her.'
  203. act 'Say hello to Albina':
  204. *clr & cla
  205. gs 'stat'
  206. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  207. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  208. 'You approach Albina and say hello. She raised an eyebrow haughtily.'
  209. '"And you are? Oh yeah <<$pcs_nickname>>. You''ve taken up dancing, have you?" You nodded confirming the obvious. Albina laughed dismissively. "Well, how''s that going for you?"'
  210. '"Not bad." You answer her coldly, "Not bad at all."'
  211. 'Albina gave you an arrogant look, "Not bad? Well, maybe in comparison with other local bowlegged cows, but I doubt that you can dance on a professional level."'
  212. act 'I do not care':
  213. *clr & cla
  214. pcs_dom += 1
  215. npc_rel['A23'] -= 5
  216. gs 'stat'
  217. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  218. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  219. 'You replied to Albina as scornfully as possible that you do not care and turned away from her.'
  220. 'She snickered nastily then said to the other girls, "Alright, girls. Let''s get to work."'
  221. act 'Leave':gt 'gdksport', 'start'
  222. end
  223. act 'I know how to dance':
  224. *clr & cla
  225. gs 'stat'
  226. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  227. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  228. 'Albina''s arrogance was getting on your nerves so you told her. "I know how to dance."'
  229. 'Albina turned to you with a sneer and said, "You can sit and see how professionals do it. Then we''ll see if you still think you can dance."'
  230. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  231. act 'Leave':gt 'gdksport', 'start'
  232. act 'Watch': gt 'gdksport', 'albina4'
  233. end
  234. end
  235. end
  236. if $ARGS[0] = 'albina2':
  237. menu_off = 1
  238. *clr & cla
  239. numnpc = 23
  240. $static_num = 'A23'
  241. gs 'stat'
  242. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  243. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  244. 'At the end of the class, a few girls enter the dance studio, including Albina Barlovskaya. You know Albina from school and you have a pretty good relationship.'
  245. act 'Say hello to Albina':
  246. *clr & cla
  247. gs 'stat'
  248. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  249. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  250. 'You approached Albina and said hello. She turned to you and smiled.'
  251. '"Oh, hello, <<$pcs_nickname>>. I didn''t know you started dancing. Are you any good?" Albina asked with interest.'
  252. '"I''m pretty good, I think." you replied with an answering smile, "Even if I do say so myself."'
  253. '"Pretty good, huh?" Albina answered with in a condescending tone, "Well, I''ve seen some of the dancers that take lessons here. It wouldn''t take much to be better them those bow-legged cows. I doubt you''re up to any kind of professional standard though."'
  254. act 'I do not care':
  255. *clr & cla
  256. pcs_dom += 1
  257. npc_rel['A23'] -= 5
  258. gs 'stat'
  259. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  260. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  261. 'Offended by her tone, you replied to Albina as scornfully as possible, "I couldn''t care less what you think."'
  262. 'As you walked away, she snickered nastily then said to the other girls, "Alright, girls. Let''s get to work."'
  263. act 'Leave':gt 'gdksport', 'start'
  264. end
  265. act 'I know how to dance':
  266. *clr & cla
  267. gs 'stat'
  268. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  269. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  270. 'Albina''s tone offended you and you replied hotly, "I can dance as well as any of these girls."'
  271. 'Albina turned to you with a look of disbelief and said, "You can sit and see how professionals do it. Then we''ll see if you still think you can dance."'
  272. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  273. act 'Leave':gt 'gdksport', 'start'
  274. act 'Watch': gt 'gdksport', 'albina4'
  275. end
  276. end
  277. end
  278. if $ARGS[0] = 'albina3':
  279. menu_off = 1
  280. *clr & cla
  281. numnpc = 23
  282. $static_num = 'A23'
  283. gs 'stat'
  284. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  285. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  286. 'At the end of the class, a few girls enter the dance studio, including Albina Barlovskaya. You know Albina from school and you have a very close relationship.'
  287. act 'Say hello to Albina':
  288. *clr & cla
  289. gs 'stat'
  290. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  291. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  292. 'You approached Albina and said hello. She turned to you and smiled.'
  293. '"Oh, hello, <<$pcs_nickname>>. I forget you told me you started dancing. Are you any good?" Albina asked with interest.'
  294. '"I''m pretty good, I think." you replied with an answering smile, "Even if I do say so myself."'
  295. '"Pretty good, huh?" Albina answered with laugh, "Well, I''ve seen some of the dancers that take lessons here. It wouldn''t take much to be better them those bow-legged cows. Do you think you''re up to any kind of professional level?"'
  296. act 'Not really':
  297. *clr & cla
  298. npc_rel['A23'] -= 5
  299. gs 'stat'
  300. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  301. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  302. 'Unsure of yourself, you relied hesitantly, "I couldn''t really say, I''ve never really thought about it."'
  303. '"Well, you keep working at it, maybe you''ll get there someday." then she turned and said to the other girls, "Alright, girls. Let''s get to work."'
  304. act 'Leave':gt 'gdksport', 'start'
  305. end
  306. act 'I know how to dance':
  307. *clr & cla
  308. gs 'stat'
  309. '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
  310. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
  311. '"I''d like to think I can dance as good as anyone, even a professional." you replied honestly.'
  312. 'Albina turned to you with a look of consideration and said, "You can sit and see how professionals do it. Then we''ll see if you still think you can dance."'
  313. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  314. act 'Leave':gt 'gdksport', 'start'
  315. act 'Watch': gt 'gdksport', 'albina4'
  316. end
  317. end
  318. end
  319. if $ARGS[0] = 'albina4':
  320. menu_off = 1
  321. *clr & cla
  322. numnpc = 23
  323. $static_num = 'A23'
  324. minut += 15
  325. gs 'stat'
  326. 'The girls turned on their stereo and started dancing. It immediately became clear to you that they dance very well and professionally. Probably even better than you. Albina herself dances much better than you. It was also clear that they have practiced this routine many times as their movements were closely synchronized with no wasted effort.'
  327. 'When the music ended, Albina said, "Girls, take a little break."'
  328. 'She came to you and said a little breathlessly, "You see, we are pros, real dancers. We are the dance troupe "The Starlets". We do shows on holidays and have even been in a music video."'
  329. act 'Leave':gt 'gdksport', 'start'
  330. if pregtime >= 90:
  331. 'Maybe after you''ve had your child you might try out for them.'
  332. else
  333. act 'Ask if you can join':
  334. *clr & cla
  335. minut += 15
  336. gs 'stat'
  337. 'You asked to join the dance group. Albina grinned, "Can you? We all worked hard to get here so you''ll have to prove yourself. Show us that you know how to dance." Albina started the music and girls gathered to watch you dance.'
  338. act 'Dance':
  339. *clr & cla
  340. minut += 5
  341. if pcs_inhib < 40:inhib_exp += rand(1,2)
  342. gs 'stat'
  343. 'You began to dance to the music, trying as hard as you could to impress them. When the music stopped you came Albina.'
  344. '"You dance like a country bumpkin, of course, but you do have some potential." Albina mused as you stood panting before her.'
  345. act 'Will you take me for your team?':
  346. *clr & cla
  347. albinaQWdance = 1
  348. minut += 5
  349. gs 'stat'
  350. '"Well, am I good enough to join the troupe?" you asked Albina.'
  351. 'Albina thought about it and looked at the other girls; some nodded, others shrugged.'
  352. 'Finally she answered you, "Okay, we''ll take a shot. Maybe you''ll learn something and be worthwhile."'
  353. act 'Leave':gt 'gdksport', 'start'
  354. end
  355. end
  356. end
  357. end
  358. end
  359. if $ARGS[0] = 'starlets':
  360. menu_off = 1
  361. *clr & cla
  362. startletsday = daystart
  363. timemult = 8
  364. loopcount = 1
  365. :starletstimeloop
  366. gs 'exercise', 'tier2', 0, 'agil_exp', 'dancero_exp'
  367. if loopcount < timemult: loopcount += 1 & jump 'starletstimeloop'
  368. loopcount = 0
  369. timemult = 0
  370. pcs_mood -= 5
  371. inhib_exp += rand(2,4)
  372. gs 'stat'
  373. '<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
  374. if pcs_dancero < 15:
  375. sub += 1
  376. 'You train together with the girls in "The Starlets". You danced badly and Albina constantly yelled at you and called you a bowlegged cow.'
  377. elseif pcs_dancero < 30:
  378. sub += 1
  379. 'You train together with the girls of "The Starlets". You sometimes managed to get the moves right, but most of the time you were out of synch or made the wrong move. Albina constantly yelled at you and called you a bowlegged cow.'
  380. elseif pcs_dancero < 45:
  381. 'You train together with the girls of "The Starlets". You managed to get into the general rhythm and moved well with the other girls, but Albina is still not happy. "<<$pcs_nickname>>, you are very sluggish, you need to put more life into it."'
  382. elseif pcs_dancero < 55:
  383. 'You train together with the girls of "The Starlets". You had the routine down pat with no mistakes, but Albina still nagged at you. "<<$pcs_nickname>>, you are not at a funeral, raise your head and smile!"'
  384. else
  385. stardance += 1
  386. 'You danced beautifully and Albina started to use you as an example for the other girls.'
  387. if stardance < 10:
  388. if otkazDanceWhore = 1:
  389. if AlbinaLast = 1:
  390. AlbinaBlokDance = 1
  391. 'After training Albina drew you aside and started berating you. "You clumsy cow. Because of you I am losing customers. So fuck off, you are no longer welcome on the team."'
  392. else
  393. AlbinaLast = 1
  394. otkazDanceWhore = 0
  395. if AlbFather = 0:AlbFather = 1
  396. 'After training Albina drew you aside and started berating you. "I know you''re young and stupid, but I will explain this to you for the first and last time. You are making the customers miserable and they are giving up on "The Starlets". Entertaining the men is part of the business."'
  397. end
  398. end
  399. if DanceWhoreT > 0: DanceWhoreT = 0
  400. if AlbFather = 0 and DanceWhore > rand (5, 20):
  401. AlbFather = 1
  402. 'Albina after training beckoned you to her. "Good work, <<$pcs_nickname>>. The clients were satisfied and you were very discrete. You''re doing fine, doing excellent, in fact. Stick with me and you will have all the money, cars and apartments you could want."'
  403. end
  404. else
  405. stardance = 0
  406. albpayrand = rand(1, 5)
  407. 'Albina gathered the girls. Today we have a small show planned. Each of you will receive <<albpayrand*1000>>. The show will take a couple of hours.'
  408. act 'Do the show':
  409. *clr & cla
  410. timemult = 8
  411. loopcount = 1
  412. :showtimeloop
  413. gs 'exercise', 'tier2', 0, 'agil_exp', 'danc_exp'
  414. if loopcount < timemult: loopcount += 1 & jump 'showtimeloop'
  415. loopcount = 0
  416. timemult = 0
  417. money += albpayrand * 1000
  418. dynamic $showerdin
  419. profiDanceTime += 1
  420. inhib_exp += rand(3,5)
  421. gs 'stat'
  422. 'You agreed and Albina called for a car. Soon the car arrived the girls and you got into the car. Soon you arrived at a building with a large hall where people were sitting around a stage.'
  423. 'You dressed in costumes that were designed and commissioned by Albina, then went on stage to dance to the fiery music. You danced very well and everything went smoothly. You left the stage and Albina distributed the money. You took turns using the shower in the small dressing room.'
  424. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
  425. if pcs_apprnc >= 52:
  426. if pcs_apprnc < 64:wealthmanrand = rand(0, 15)
  427. if pcs_apprnc >= 64 and pcs_apprnc < 72:wealthmanrand = rand(0, 12)
  428. if pcs_apprnc >= 72:wealthmanrand = rand(0, 10)
  429. if wealthmanrand = 0:
  430. kolvomanparty = 1
  431. danceWhorePay = rand(3, 8)
  432. 'You saw that a man in a decent suit went up to Albina and started to talk quietly with her.'
  433. elseif wealthmanrand = 1:
  434. kolvomanparty = 2
  435. danceWhorePay = rand(5, 10)
  436. 'You saw that two guys approached Albina and started to talk to her.'
  437. elseif wealthmanrand = 2:
  438. kolvomanparty = 1
  439. danceWhorePay = rand(4, 9)
  440. 'You saw that an Armenian went up to Albina and started talking to her and gesticulating wildly.'
  441. elseif wealthmanrand = 3:
  442. kolvomanparty = 2
  443. danceWhorePay = rand(6, 12)
  444. 'You saw that two Armenians went up to Albina and started talking to her.'
  445. elseif wealthmanrand = 4:
  446. kolvomanparty = 3
  447. danceWhorePay = rand(8, 14)
  448. 'You saw that three Armenians approached Albina and started talking to her.'
  449. elseif wealthmanrand = 5:
  450. kolvomanparty = 1
  451. danceWhorePay = rand(5, 10)
  452. 'You saw that a black went up Albina and started talking to her.'
  453. elseif wealthmanrand = 6:
  454. kolvomanparty = 2
  455. danceWhorePay = rand(7, 15)
  456. 'You saw that two black men went up Albina and started talking to her.'
  457. elseif wealthmanrand = 7:
  458. kolvomanparty = 3
  459. danceWhorePay = rand(10, 20)
  460. 'You saw that three black men went up Albina and started talking to her.'
  461. end
  462. if wealthmanrand <= 7:
  463. 'After talking Albina came to you. "<<$pcs_nickname>>, we need to talk."'
  464. act 'About what?':
  465. *clr & cla
  466. minut += 15
  467. gs 'stat'
  468. 'You asked Albina what she wanted to talk about.'
  469. if kolvomanparty = 1:
  470. 'Albina came closer to you and quietly began to speak, "You see this guy? If you stay with him for an hour or so and be affectionate, you will be able to earn <<danceWhorePay*1000>> <b>₽</b>."'
  471. else
  472. 'Albina came closer to you and quietly began to speak, "You see these guys? If you stay with them for a couple of hours and be affectionate, you will be able to earn <<danceWhorePay*1000>> <b>₽</b>."'
  473. end
  474. act 'Refuse and leave':
  475. *clr & cla
  476. minut += 15
  477. otkazDanceWhore = 1
  478. DanceWhoreT = 0
  479. gs 'stat'
  480. 'You got in the car along with the rest of the troupe, and shortly you returned to town.'
  481. act 'Leave':gt 'pavResidential'
  482. end
  483. act 'Agree':
  484. *clr & cla
  485. money += danceWhorePay * 1000
  486. DanceWhore += 1
  487. DanceWhoreT += 1
  488. otkazDanceWhore = 0
  489. slutty += 1
  490. gs 'stat'
  491. 'You agreed to be "nice" and Albina counted out your money.'
  492. if wealthmanrand = 0:act 'Go with a man':gt 'AlbStarsWhore', 'whore1'
  493. if wealthmanrand = 1:act 'Go with men':gt 'AlbStarsWhore', 'whore2'
  494. if wealthmanrand = 2:act 'Go in Caucasians':gt 'AlbStarsWhore', 'whore3'
  495. if wealthmanrand = 3:act 'Go with Caucasians':gt 'AlbStarsWhore', 'whore4'
  496. if wealthmanrand = 4:act 'Go with Caucasians':gt 'AlbStarsWhore', 'whore5'
  497. if wealthmanrand = 5:act 'Start with a black man':gt 'AlbStarsWhore', 'whore6'
  498. if wealthmanrand = 6:act 'Go with blacks':gt 'AlbStarsWhore', 'whore7'
  499. if wealthmanrand = 7:act 'Go with blacks':gt 'AlbStarsWhore', 'whore8'
  500. end
  501. end
  502. end
  503. elseif pcs_apprnc < 52:
  504. 'After dancing Albina talked with some of the men.'
  505. end
  506. act 'Drive back':
  507. *clr & cla
  508. minut += 15
  509. gs 'stat'
  510. 'You got in the car along with the rest of the troupe, and shortly you returned to town.'
  511. act 'Leave':gt 'pavResidential'
  512. end
  513. end
  514. end
  515. end
  516. act 'Leave':gt 'gdksport', 'start'
  517. end
  518. if $ARGS[0] = 'cab_home':
  519. menu_off = 1
  520. *clr & cla
  521. minut += 15
  522. gs 'stat'
  523. 'You called a taxi and it took you back to town.'
  524. if spafinloc = 11:
  525. cumspclnt = 11
  526. gs 'cum_cleanup'
  527. 'Along the way you wiped the sperm from your face.'
  528. end
  529. act 'Leave':gt 'pavResidential'
  530. end
  531. if $ARGS[0] = 'racing2':
  532. *clr & cla
  533. menu_off = 1
  534. gsAboBeg -= 1
  535. timemult = 8
  536. loopcount = 1
  537. :runtimeloop
  538. gs 'exercise', 'tier2', 0, 'run_exp'
  539. if loopcount < timemult: loopcount += 1 & jump 'runtimeloop'
  540. loopcount = 0
  541. timemult = 0
  542. gs 'stat'
  543. '<center><img <<$set_imgh>> src="images/locations/shared/park/parkbeg.jpg"></center>'
  544. 'You spend 20 minutes on warm up, run for 90 minutes then spend 10 minutes on your cool down.'
  545. act 'Leave':gt 'gdksport', 'start'
  546. end
  547. if $ARGS[0] = 'vball2':
  548. *clr & cla
  549. menu_off = 1
  550. gsAboVolley -= 1
  551. if alko < 2:
  552. npc_rel['A69'] += rand(0,2)
  553. timemult = 8
  554. loopcount = 1
  555. :vballtimeloop1
  556. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  557. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop1'
  558. loopcount = 0
  559. timemult = 0
  560. else
  561. timemult = 8
  562. loopcount = 1
  563. :vballtimeloop2
  564. gs 'exercise', 'tier1', 0, 'run_exp'
  565. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop2'
  566. loopcount = 0
  567. timemult = 0
  568. if pcs_inhib < 40:inhib_exp += rand(0,1)
  569. end
  570. gs 'stat'
  571. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  572. if alko < 2:
  573. '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.'
  574. else
  575. npc_rel['A69'] -= rand(0,2)
  576. 'You tried to train, but your level of intoxication doesn''t let you focus. The coach sent you to spend the lesson doing laps.'
  577. end
  578. act 'Leave':gt 'gdksport', 'start'
  579. act 'Talk to the coach':gt 'Voltrener', 'start'
  580. end
  581. if $ARGS[0] = 'vball3':
  582. *clr & cla
  583. menu_off = 1
  584. gsAboVolley -= 1
  585. gs 'stat'
  586. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  587. 'On Fridays they hold intramural competitions. Scouts for professional teams sometime come to see who the stronger and more talented players are.'
  588. if alko < 2:
  589. timemult = 8
  590. loopcount = 1
  591. :vballtimeloop3
  592. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  593. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop3'
  594. loopcount = 0
  595. timemult = 0
  596. if pcs_vball < 25:
  597. 'You were an absolutely lousy player and made constant mistakes. Eventually, the coach had enough and he removed you from the court.'
  598. elseif pcs_vball < 50:
  599. 'You did not play very well. Sometimes you made some blunders. The coach was angry, but tolerated your antics.'
  600. elseif pcs_vball < 75:
  601. 'You played well on the court and rarely made any mistakes. The coach looked pleased with you.'
  602. else
  603. 'You played great on the court, and easily defeated your rivals. The coach looked pleased with your game.'
  604. if rand(0, 1) = 0:
  605. if andGevknow = 0:$nameAndGev = 'some guy'
  606. if andGevknow > 0:$nameAndGev = 'Andrei'
  607. 'During the game you got pushed by <a href="exec:gt ''volAndGev'', ''start''"><<$nameAndGev>></a>.'
  608. end
  609. end
  610. else
  611. minut += 120
  612. '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.'
  613. end
  614. act 'Leave':gt 'gdksport', 'start'
  615. act 'Talk to the coach':gt 'Voltrener', 'start'
  616. end
  617. if $ARGS[0] = 'vball4':
  618. *clr & cla
  619. menu_off = 1
  620. volkomday = daystart
  621. timemult = 8
  622. loopcount = 1
  623. :vballtimeloop4
  624. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  625. if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop4'
  626. loopcount = 0
  627. timemult = 0
  628. npc_rel['A69'] += 1
  629. pcs_dom += 1
  630. if pcs_inhib < 40:inhib_exp += rand(0,1)
  631. gs 'stat'
  632. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  633. 'Number of games <<volsesongame>>, Win - <<volsesonwin>>, lesions - <<volsesonloss>>.'
  634. '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.'
  635. act 'Leave':gt 'gdksport', 'start'
  636. if $pantyworntype = 'none' and rand(0,1) = 1 and (volleytanga = 1 or VoltrenerVoyeur >= 5):
  637. act 'Correct clothing':
  638. inhib_exp += rand(1,5)
  639. *clr & cla
  640. TrenerLust += 3
  641. Voltrenersee += 1 & ! setcheck on gg without panties
  642. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/game'+rand(1,2)+'.jpg"></center>'
  643. 'It seems the coach noticed you wasn''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" '
  644. act 'Leave':gs'stat'& gt 'gdksport', 'start'
  645. act 'Go to the coach''s office':gt 'Voltrenersex', 'start'
  646. end
  647. else
  648. act 'Talk to the coach':gt 'Voltrener', 'start'
  649. end
  650. end
  651. if $ARGS[0] = 'vball5':
  652. *clr & cla
  653. menu_off = 1
  654. timemult = 8
  655. ! loopcount = 1
  656. ! :vballtimeloop5
  657. ! gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  658. ! if loopcount < timemult: loopcount += 1 & jump 'vballtimeloop5'
  659. ! loopcount = 0
  660. gs 'stat'
  661. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
  662. 'The tournament starts at 20:00. Your bus departs at 19:00. You gathered your things together with the rest of the team and got on a bus that took you to the out of town match.'
  663. act 'Leave':gt 'gdksport', 'start'
  664. act 'Get on bus and go to play':
  665. volltime = 0
  666. sorevday = daystart
  667. if hour < 19: hour = 19 & minut = 0
  668. timemult = 0
  669. pcs_dom += 1
  670. npc_rel['A69'] += 2
  671. minut += 60 & !total time should be 4 hours, 2 hours for the game and 2 hours travel
  672. gt 'gdksport', 'volley'
  673. end
  674. end
  675. if $ARGS[0] = 'volley':
  676. menu_off = 1
  677. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  678. gs 'exercise', 'tier2', 0, 'vball_exp', 'run_exp', 'agil_exp', 'stren_exp', 'vital_exp'
  679. ! minut += 30
  680. gs 'stat'
  681. if volltime = 0:
  682. !! reset the scores
  683. volpoint = 0
  684. volpointv = 0
  685. 'The teams take to the court and start playing.'
  686. !! reserve player or you were caught drinking by the coach and he forbid you from playing
  687. if trener_Speak < 8 or seealko = 1:
  688. volleysostav = 1
  689. poverkomand = 50
  690. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game3.jpg"></center>'
  691. 'You sit on the bench watching your team play.'
  692. !! starter
  693. else
  694. volleysostav = 2
  695. !! between 0 and 200 dependent on player skills
  696. poverkomand = ((pcs_vball*2) + ((pcs_stren + pcs_vital + pcs_agil + pcs_react)/2))/2
  697. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game4.jpg"></center>'
  698. 'After warming up you run out on the court to join your teammates.'
  699. end
  700. !! opponent skill - between 0 and 200. A perfect player should be able to win every match.
  701. poverkomandV = rand(0, 200)
  702. if poverkomand > poverkomandV:
  703. volpoint = 1
  704. 'Your team plays better than your opponents.'
  705. elseif poverkomand < poverkomandV:
  706. volpointv = 1
  707. 'Your opponents play better than your team.'
  708. else
  709. 'The scoring varies one way, then the other, obviously the teams are evenly matched.'
  710. end
  711. act 'Continue':volltime = 1 & gt 'gdksport', 'volley'
  712. !! halftime
  713. elseif volltime = 1:
  714. 'During the break, both teams have a rest.'
  715. if volpointv = 0:
  716. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener6.jpg"></center>'
  717. 'Coach tells the team that you can''t relax, though winning you still need to be focused and not let the opponents back into the game.'
  718. elseif volpoint = 0:
  719. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener2.jpg"></center>'
  720. '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.'
  721. else
  722. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener1.jpg"></center>'
  723. '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. '
  724. end
  725. if volleysostav = 1:
  726. 'You are sitting on the bench.'
  727. act 'Ask to play':
  728. if seealko = 1:
  729. *clr & cla
  730. 'The coach refuses to let you play because he caught you drinking.'
  731. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  732. else
  733. *clr & cla
  734. gs 'stat'
  735. if npc_rel['A69'] >= rand(0, 80):
  736. volleysostav = 2
  737. pcs_dom += 1
  738. poverkomand = ((pcs_vball*2) + ((pcs_stren + pcs_vital + pcs_agil + pcs_react)/2))/2
  739. 'The coach agrees to let you play the second half.'
  740. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  741. else
  742. 'You ask the coach to play, but he shakes his head and explains that it is not strategically right for the team.'
  743. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  744. end
  745. end
  746. end
  747. end
  748. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  749. !! 2nd half
  750. elseif volltime = 2:
  751. *clr & cla
  752. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game5.jpg"></center>'
  753. 'Break is over and the team starts the second half.'
  754. if volleysostav = 1:'You sit on the bench watching your team play.'
  755. !! change the opponent skill a bit so both halves are not an entirely static affair.
  756. poverkomandV += rand(-50, 50)
  757. if poverkomand > poverkomandV:
  758. volpoint += 1
  759. 'Your team plays better than your opponents.'
  760. !! you came in and your team scored when they would not have without you
  761. if volleysostav = 2 and volpointv = 1:npc_rel['A69'] += 10
  762. elseif poverkomand < poverkomandV:
  763. volpointv += 1
  764. 'Your opponents play better than your team.'
  765. !! you came in and your team gave up a point they would not have without you
  766. if volleysostav = 2 and volpoint = 1:npc_rel['A69'] -= 5
  767. else
  768. 'The scoring varies one way, then the other, obviously the teams are evenly matched.'
  769. !! you came in and your team tied when they would have lost without you
  770. if volleysostav = 2 and volpointv = 1:npc_rel['A69'] += 5
  771. end
  772. act 'Continue':volltime = 3 & gt 'gdksport', 'volley'
  773. !! end of game
  774. elseif volltime = 3:
  775. *clr
  776. cla
  777. volsesongame += 1
  778. if rand (1, 100) < 3:
  779. if volpointv = 2:
  780. volpoint = 0
  781. volpointv = 2
  782. elseif volpoint = 2:
  783. volpoint = 2
  784. volpointv = 0
  785. end
  786. end
  787. 'Final whistle.'
  788. seealko = 0
  789. if volpoint > volpointv:
  790. volsesonwin += 1
  791. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game6.jpg"></center>'
  792. 'Your team wins.'
  793. elseif volpoint < volpointv:
  794. volsesonloss += 1
  795. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game8.jpg"></center>'
  796. 'Your team loses.'
  797. else
  798. if rand (0, 1) = 0:
  799. volsesonwin += 1
  800. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game7.jpg"></center>'
  801. 'The match was very close, but in the end your team pulls of a win.'
  802. else
  803. volsesonloss += 1
  804. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/game7.jpg"></center>'
  805. 'The match was very close, but in the end your team still loses.'
  806. end
  807. end
  808. minut += 60 & !total time should be 4 hours, 2 hours for the game and 2 hours travel
  809. act 'Leave':gt 'gdksport', 'start'
  810. act 'Talk to the coach':gt 'Voltrener', 'start'
  811. end
  812. end
  813. if $ARGS[0] = 'shower':
  814. menu_off = 1
  815. *clr & cla
  816. $location_type = 'bathroom'
  817. dynamic $showerdin
  818. minut += 15
  819. pcs_horny += 1
  820. pcs_makeup = 1
  821. if frost > 0:frost = 0
  822. gs 'stat'
  823. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  824. if IvanShowerYes = 1 and rand(0,3) = 1 and ShowerIvan < 3:
  825. if ShowerIvan = 1: ShowerIvan = 2
  826. 'You entered the women''s shower, turning the water on you began to lather up your body with a washcloth. Suddenly, you hear the door creak as it opened and you remember that you agreed not to lock it for Ivan.'
  827. 'You looked around and see Ivan Prokhorov standing there looking at you. "Hello <<$pcs_nickname>>. The men''s shower is full, so I thought I would join you instead." Ivan smiled after these words.'
  828. act 'Further':gt 'gdksport', 'ShowerWithIvan'
  829. elseif kotovVSprohorov = 1 and ShowerIvan < 3:
  830. kotovVSprohorov = 2
  831. '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 as it opened and you remember that you forgot to lock it.'
  832. 'You looked around and saw Ivan Prokhorov standing in the doorway looking at you. "Hi <<$pcs_nickname>>. Can I join you? The men''s shower is full." Ivan smiled after these words.'
  833. act 'Throw Ivan out':
  834. *clr & cla
  835. IvanShowerQW = 1
  836. gs 'stat'
  837. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  838. 'You covered your chest with one hand and turn sideways crossing your legs as you hurl your washcloth at Ivan. He easily dodged the flying cloth and laughs as he exits the shower room.'
  839. 'You get out of the shower and quickly lock the door, before going back and quickly finishing your shower.'
  840. act 'Get out of the shower':gt 'gdksport', 'start'
  841. end
  842. act 'Uh, what?':
  843. *clr & cla
  844. gs 'stat'
  845. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/shower2.jpg"></center>'
  846. 'You''re completely surprised and confused by Ivan''s sudden appearance, you are struck speechless. Ivan takes your inaction and silence as consent, as he walks into the shower room and closes the door behind him.'
  847. act 'Escape from the shower':
  848. *clr & cla
  849. IvanShowerQW = 1
  850. gs 'stat'
  851. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
  852. '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.'
  853. gt 'gdksport', 'start'
  854. end
  855. act 'Wash together':
  856. IvanShowerYes = 0
  857. if ShowerIvan = 0: ShowerIvan = 1
  858. gt 'gdksport', 'ShowerWithIvan'
  859. end
  860. end
  861. else
  862. 'You enter the women''s shower and turning the water on begin to lather your body with a washcloth. After you rinsed off the soap, you washed your hair with shampoo. Next you rinsed out the shampoo out of your hair and feel completely clean.'
  863. if (trenerlust >= 40 or trenersex = 1) and rand(0,3) = 0:
  864. if VoltrenerVoyeur = 0:
  865. gt 'VoltrenerSexShower', '0'
  866. elseif VoltrenerVoyeur = 1:
  867. gt 'VoltrenerSexShower', '1'
  868. elseif VoltrenerVoyeur = 2 and IvanShowerYes = 0:
  869. gt 'VoltrenerSexShower', '2'
  870. end
  871. end
  872. 'After your shower, you get dressed.'
  873. act 'Get out of the shower':gt 'gdksport', 'start'
  874. end
  875. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
  876. end
  877. if $ARGS[0] = 'ShowerWithIvan':
  878. menu_off = 1
  879. *clr & cla
  880. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  881. 'Ivan walks over to you, pulling his boxer shorts and stepping out of them as they fall around his ankles. Stepping into the shower with you, getting himself wet under the shower. His muscular body was very close to yours.'
  882. 'You tried not to look at him but your eyes involuntarily dropped to his groin where his thick cock hung and swung as he moved. Ivan seeing where you was looking winked, "Want to wash me?"'
  883. gs 'arousal', 'foreplay', 5
  884. gs 'stat'
  885. act 'Lather Ivan':
  886. *clr & cla
  887. gs 'boyStat', 'A3'
  888. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower.jpg"></center>'
  889. 'You took your washcloth and began to lather Ivan''s body. As you move around him, you can''t help but notice his <<dick>>cm <<$dick_girth>> cock began to rise up and getting hard, you feel it brush against your thigh.'
  890. 'Ivan begins to rubs his hands over your body and caress you with his hands. After a few moments you feel his hands on your shoulders as he gentle but firmly pushes you down to your knees.'
  891. gs 'arousal', 'foreplay', 5
  892. gs 'stat'
  893. act 'Give blowjob':
  894. *clr & cla
  895. if npcSex[3] = 0:npcSex[3] = 1 & guy += 1
  896. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shover.jpg"></center>'
  897. 'You slowly sink to your knees in front of Ivan and his <<dick>>cm <<$dick_girth>> cock in front of your face. Ivan leaned 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.'
  898. 'Your lips tightly wrapped around Ivan''s solid rod and you sucked him as the streams of warm water wash over you. Suddenly Ivan pulled his dick out of your mouth and takes you by the hand, pulling you back up to your feet. He brought his lips to your breast and began to suck on your nipple.'
  899. 'Bliss sweeps over you as he suckles your stiff nipple. Releasing your nipple with a wet pop, Ivan pushed you back onto your knees and bent you backwards as he straddles your face, once again sliding his hot cock into your mouth. He began pushing it deeper into your throat.'
  900. gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
  901. gs 'stat'
  902. act 'Allow him to continue':
  903. cla & *clr
  904. if pcs_throat<15:
  905. '<center><video autoplay loop src="images/shared/sex/blowjob/shower6.mp4"></video></center>'
  906. 'Penetrating further and further into your mouth, then into your throat, his member blocked your breath, which caused a gag reflex, nearly causing you to vomit. Freeing your mouth from his dick and wiping your tears, you screamed at Ivan, "This isn''t some bottomless hole for you to shove your dick into, you know!" Ivan gave you a guilty look then he pulled you back to your feet again as he began to kiss you, caress your breasts and ass until you began to moan with desire. He turned you around then bent you over with your ass towards him.'
  907. else
  908. '<center><video autoplay loop src="images/shared/sex/blowjob/shower7.mp4"></video></center>'
  909. 'Penetrating further and further into your mouth, then into your throat, you take his member to the root without any problems and without causing you discomfort, and bringing Ivan "heavenly delight", if his groans and moans were any indication. Feeling that your classmate would flood your throat with his seed at any moment, you pulled your mouth off of his cock and turned and bent over, presenting your ass to Ivan. You also wanted some satisfaction.'
  910. end
  911. if agape > 0:
  912. act 'Continue':
  913. *clr & cla
  914. if pcs_throat < dick:pcs_throat += 1
  915. spafinloc = 12
  916. gs 'cum_manage'
  917. gs 'stat'
  918. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum49.jpg"></center>'
  919. 'Bent over, expecting to feel his <<dick>>cm <<$dick_girth>> cock against your pussy at any moment, you are momentarily surprised when you feel Ivan cock pressed up against your asshole.'
  920. 'Thinking he was unaware you speak up. "Ivan that''s my asshole." You hear Ivan snort. "Yeah I know." And with those words he pushes the head of his <<dick>>cm <<$dick_girth>> cock in your ass. You moan in a mixture of pain and pleasure.'
  921. '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 in your ass.'
  922. '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.'
  923. 'One of your hands rubs your clit while the other one stays against the wall to brace yourself. He has amazing stamina a seemingly endless supply. No matter how much you love him fucking your ass, after awhile you feel your ass beginning to get sore, your moans of pleasure start to turn into grunts of pain.'
  924. '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, he pushes his cock back in your mouth. You try to ignore the taste of his cock, considering just where it was.'
  925. 'You do you best to suck him off quickly. With in moments he is shooting his sperm in your mouth. Once he is done he goes back to showering, he quickly finishes up and starts 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 shower.'
  926. gs 'arousal', 'anal', 5, 'sub', 'rough'
  927. gs 'arousal', 'masturbate', 5
  928. minut -= 5
  929. gs 'arousal', 'end'
  930. gs 'stat'
  931. act 'Get out of the shower':gt 'gdksport', 'start'
  932. end
  933. else
  934. act 'Turn around and bend over':
  935. *clr & cla
  936. IvanShowerQW = 1
  937. lubonus = 2
  938. spafinloc = 3
  939. gs 'Cum_Manage'
  940. if pcs_ass + lubonus + 2 < dick:
  941. if pcs_makeup > 1:pcs_makeup = 0
  942. pcs_horny -= 20
  943. pcs_mood -= 20
  944. if agape < 3:agape = 3
  945. elseif pcs_ass < dick:
  946. pcs_horny += 10
  947. if agape < 2 and lubonus = 0:agape = 2
  948. end
  949. gs 'stat'
  950. '<center><video autoplay loop src="images/shared/sex/vag/doggy/shover2.mp4"></video></center>'
  951. '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 was unaware you speak up. "Ivan that''s my asshole."'
  952. 'You hear Ivan snort. "Yeah I know." And with those words he pushes the head of his <<dick>>cm <<$dick_girth>> cock in 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.'
  953. '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.'
  954. 'One of your hands rubs your clit while the other one stays against the wall to brace yourself. He has amazing stamina a seemingly endless supply. For awhile you buck your hips back against him, fucking him as much as he was fucking you, but no matter how much you love him fucking your ass, after awhile you feel your ass beginning to get sore.'
  955. gs 'arousal', 'anal', 5, 'sub', 'rough'
  956. gs 'arousal', 'masturbate', 5
  957. minut -= 5
  958. gs 'stat'
  959. if VoltrenerVoyeur = 3:gt 'VoltrenerSexShower', '3'
  960. if VoltrenerVoyeur = 4:gt 'VoltrenerSexShower', '4'
  961. if VoltrenerVoyeur = 5:gt 'VoltrenerSexShower', '5'
  962. if pcs_horny >= 100:
  963. if stat['anal'] >= 10 and orgasm > 0:
  964. pcs_mood += 20
  965. $orgasm_or = 'custom'
  966. $orgasm_txt = 'Your whole body contracts and then you cry out in orgasm.'
  967. end
  968. end
  969. '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 your ass and goes back to showering, he quickly finishes up and starts to get dressed.'
  970. '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 shower.'
  971. cumspclnt = 1
  972. gs 'cum_cleanup'
  973. gs 'arousal', 'end'
  974. gs 'stat'
  975. act 'Get out of the shower':gt 'gdksport', 'start'
  976. end
  977. end
  978. end
  979. end
  980. end
  981. end
  982. if $ARGS[0] = 'Ivan_bored':
  983. menu_off = 1
  984. *clr & cla
  985. minut += 5
  986. pcs_horny += 10
  987. gs'stat'
  988. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/school/ivan2.jpg"></center>'
  989. 'You look at Ivan for a long moment and bite your lower lip and then whisper just loud enough he can barely hear you. "I''m bored." He looks at you 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 area''s 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 ushered out by Ivan and sent packing. He watches them go, once they round the corner he pulls you into the bathroom.'
  990. act 'Leave': gt 'gschool_lessons', 'short_break'
  991. act 'Go into the bathroom with Ivan':
  992. *clr & cla
  993. pcs_horny += 20
  994. gs 'boyStat', 'A3'
  995. gs 'stat'
  996. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/school/bbivanbj.jpg"></center>'
  997. '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 along into one of the stalls with him. 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.'
  998. '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.'
  999. '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 the other grabs your butt cheek to spread it open.'
  1000. gs 'arousal', 'kiss', 5, 'sub'
  1001. gs 'arousal', 'hj', 5, 'dom'
  1002. gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
  1003. minut -= 5
  1004. gs 'stat'
  1005. act 'Let him':
  1006. *clr & cla
  1007. lubonus = 2
  1008. spafinloc = 3
  1009. gs 'Cum_Manage'
  1010. if pcs_ass + lubonus + 2 < dick:
  1011. if pcs_makeup > 1:pcs_makeup = 0
  1012. pcs_horny -= 20
  1013. pcs_mood -= 20
  1014. if agape < 3:agape = 3
  1015. elseif pcs_ass < dick:
  1016. if agape < 2 and lubonus = 0:agape = 2
  1017. end
  1018. gs 'stat'
  1019. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/school/schoolanal.jpg"></center>'
  1020. '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.'
  1021. '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 your 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.'
  1022. '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.'
  1023. '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.'
  1024. '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.'
  1025. '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.'
  1026. $orgasm_or = 'yes'
  1027. gs 'arousal', 'anal', 5, 'sub', 'rough'
  1028. gs 'arousal', 'end'
  1029. gs 'stat'
  1030. act 'Continue': gt 'gschool_lessons', 'short_break'
  1031. end
  1032. end
  1033. end
  1034. if $ARGS[0] = 'Fedor First Date':
  1035. menu_off = 1
  1036. *clr & cla
  1037. numnpc = 5
  1038. gs 'stat'
  1039. '<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
  1040. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big5.jpg"></center>'
  1041. if fedorkozbreak = 1:
  1042. 'You enter the sports club and see Fyodor Kozlov, 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?'
  1043. else
  1044. 'You enter the sports club and see Fyodor Kozlov, 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 you like know if you would be up for a good comedy?"'
  1045. end
  1046. act 'Agree':
  1047. *clr & cla
  1048. minut += 15
  1049. gs 'stat'
  1050. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/walk.jpg"></center>'
  1051. '"I would like that." you said with a smile and Fedor responds: "Good, I hear that this movie will have us in stiches." with a delighted look on his face as he wraps his arm around yours then walks you to the movie theater.'
  1052. act 'Watch a movie':
  1053. *clr & cla
  1054. minut += 90
  1055. pcs_mood += 90
  1056. gs 'stat'
  1057. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/seat2.jpg"></center>'
  1058. 'Fedor presentes the tickets at the entrance and together you walked into the theater. You look around and notice that the seats were mostly empty so Fedor leads you to the front row and both got seated. The lights dim then the movie starts. Fedor sits motionless and only occasionally glancing at you. The movie was quite interesting and you couldn''t help but laugh occasionally at the wackiness of the movie. 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?"'
  1059. act 'Agree':
  1060. *clr & cla
  1061. npc_rel['A5'] += 20
  1062. fedorKozlovQW = 10
  1063. minut += 15
  1064. gs 'stat'
  1065. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/walk.jpg"></center>'
  1066. '"Sure, I would love to go out with you." you replied. Fedor was 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.'
  1067. act 'Leave':gt 'pavResidential'
  1068. end
  1069. act 'Refuse':
  1070. *clr & cla
  1071. if fedorkozbreak = 0:fedorKozlovQW = 0
  1072. if fedorkozbreak = 1:fedorKozlovQW = -1
  1073. npc_rel['A5'] = 75
  1074. minut += 15
  1075. gs 'stat'
  1076. '<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
  1077. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/fedorsad.jpg"></center>'
  1078. if fedorkozbreak = 1:
  1079. 'You say to Fedor "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.." Fedor then, silently walks you home.'
  1080. else
  1081. 'You say to Fedor "You seem like a cool guy but I''m just not ready for a relationship right now." Fedor was 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.'
  1082. end
  1083. act 'Leave':gt 'pavResidential'
  1084. end
  1085. end
  1086. end
  1087. act 'Refuse':
  1088. *clr & cla
  1089. npc_rel['A5'] = 70
  1090. gs 'stat'
  1091. '<center><b><h4><font color="blue"><<"Fyodor ">><<"[Fedor]">><<" Kozlov">></font></h4></b></center>'
  1092. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/fedorsad.jpg"></center>'
  1093. 'You said to Fedor "I have too much that I need to do right now... maybe some other time." Fedor then lowered his head with a frown. "Okay. Maybe some other time."'
  1094. act 'Leave':gt 'pavResidential'
  1095. end
  1096. end
  1097. if $ARGS[0] = 'Starletsreact':
  1098. cla
  1099. menu_off = 1
  1100. 'As you approach the Starlets, Albina looks at you in disgust. Loudly enough for the whole team to hear, she says "<<$pcs_nickname>>, no one wants to see some pregnant whore dance. Leave. You''re done." Tears welling in your eyes, you leave, the sound of laughter and taunting following your departure.'
  1101. act 'Continue':npc_pregtalk['A23'] = 1 & gt 'gdk'
  1102. end
  1103. if $ARGS[0] = 'vballreact':
  1104. cla
  1105. menu_off = 1
  1106. '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.'
  1107. act 'Continue':npc_pregtalk['A69'] = 1 & gt 'gdk'
  1108. end
  1109. --- gdksport ---------------------------------