1
0

gdksport 42 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088
  1. # gdksport
  2. !{Change log 14/03/2016
  3. reformatted to use arguments
  4. standardized prices and number of lessons to 300 <b>₽</b> for 30 lessons
  5. removed dynamic call from 'Wash in shower'
  6. reduced dance skill gain to 0-2 per lesson
  7. capped dance skill at 75 for lessons
  8. reduced dance skill requirement for Albina quest to 75
  9. added alternate starts to Albona quest based on relationship level
  10. moved content of 'volley' to 'gdksport','volley'
  11. fixed missing ShowerIvan = 1 and ShowerIvan = 2 variables
  12. 29/03/2016
  13. fixed Lariska quest start to run even if the fight was more than a week ago
  14. }
  15. if $ARGS[0] = 'start':
  16. CLOSE ALL
  17. $metkaM = $ARGS[0]
  18. $locM = $CURLOC
  19. $metka = $ARGS[0]
  20. $loc = $CURLOC
  21. gs 'stat'
  22. fcolor = rgb(0, 0, 0)
  23. bcolor = rgb(255, 255, 255)
  24. lcolor = rgb(106, 90, 205)
  25. '<center><b><font color="maroon">community center</font></b></center>'
  26. '<center><img src="images/qwest/alter/gdksport.jpg"></center>'
  27. 'The community center sports club offers lessons for <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>.'
  28. if kotovLoveQW > 0 and hour = 16:
  29. 'You see <a href="exec:minut += 3 & gt ''kotovEv''">Vitek Kotov</a> with a large sports bag enter the sports club.'
  30. elseif grupNPC[3] >= 80 and hour = 17 and ivansportday ! daystart:
  31. 'You see <a href="exec:minut += 3 & gt ''IvanEv''">Ivan Prokhorov</a> with a large sports bag enter the sports club.'
  32. end
  33. ! WD: Uninitialised ~ 'UNSTARTER' allways false
  34. ! if grupNPC[5] >= 80 and fedorKozlovQW = 0 and GorSlut = 0 and UNSTARTER = 1: gt 'gdksport', 'fedor_date'
  35. !!event does not start as it is incomplete, needs home location and cinema location!!
  36. act 'Go outside':
  37. if lariskaQwestStart <= daystart and lariskaQwestStart ! 0 and lariskaHelp ! 1: gt 'LariskaStart', 'start'
  38. if lariskaQwestDay = daystart: gt 'LariskaStart', 'end'
  39. if $clothingworntype ! 'nude':
  40. gt 'gdk'
  41. else
  42. msg'<b><font color = red>You need to get dressed before leaving.</font></b>'
  43. gt 'gdksport', 'start'
  44. end
  45. end
  46. act 'Change clothes in the locker room':gt 'clothing_QV', 'list'
  47. if $clothingworntype ! 'exercise' and (albinaQWdance > 0 or gsAboDance > 0 or gsAboBeg > 0 or gsAboVolley > 0):'You are not dressed in sports clothes.'
  48. if sweat >= 0:
  49. act 'Wash in the shower':gt 'gdksport', 'shower'
  50. end
  51. if hour < 16 or hour > 20: exit
  52. if gsAboDance > 0 and $clothingworntype = 'exercise' and albinaQWdance = 0:
  53. act 'Go to dance lesson, you have <<gsAboDance>> lessons remaining':gt 'gdksport', 'dance2'
  54. end
  55. if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and $clothingworntype = 'exercise':
  56. act 'Train with Starlets':gt 'gdksport', 'starlets'
  57. end
  58. if gsAboBeg > 0 and $clothingworntype = 'exercise':
  59. act 'Go to track lesson, you have <<gsAboBeg>> lessons remaining':gt 'gdksport', 'racing2'
  60. end
  61. if gsAboVolley > 0 and volleysostav = 0 and $clothingworntype = 'exercise':
  62. if week ! 5:
  63. act 'Go to volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball2'
  64. else
  65. act 'Go to volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball3'
  66. end
  67. end
  68. if volleysostav > 0 and $clothingworntype = 'exercise':
  69. if week ! 6 and volkomday ! daystart:
  70. act 'To engage with the team':gt 'gdksport', 'vball4'
  71. elseif week = 6 and sorevday ! daystart:
  72. act 'Play in Tournament': gt 'gdksport', 'vball5'
  73. end
  74. end
  75. end
  76. if $ARGS[0] = 'racing1':
  77. cls
  78. gs 'stat'
  79. 'Race training cost 300 <b>₽</b> for 30 lessons.'
  80. if money >= 300 and gsAboBeg = 0:
  81. act 'Buy 30 racing lessons (300 RUB)':
  82. cls
  83. money -= 300
  84. gsAboBeg += 30
  85. gs 'stat'
  86. 'You paid for 30 racing lessons.'
  87. act 'Leave':gt 'gdksport', 'start'
  88. end
  89. end
  90. act 'Leave':gt 'gdksport', 'start'
  91. end
  92. if $ARGS[0] = 'dance1':
  93. cls
  94. gs 'stat'
  95. 'Dance lessons cost 300 <b>₽</b> for 30 lessons.'
  96. if money >= 300 and gsAboDance = 0:
  97. act 'Buy 30 dance lessons (300 RUB)':
  98. cls
  99. money -= 300
  100. gsAboDance += 30
  101. gs 'stat'
  102. 'You paid for 30 dance lessons.'
  103. act 'Leave':gt 'gdksport', 'start'
  104. end
  105. end
  106. act 'Leave':gt 'gdksport', 'start'
  107. end
  108. if $ARGS[0] = 'vball1':
  109. cls
  110. gs 'stat'
  111. 'Volleyball lessons cost 300 <b>₽</b> for 30 visits.'
  112. if money >= 300 and gsAboVolley = 0:
  113. act 'Buy 30 volleyball lessons (300 RUB)':
  114. cls
  115. money -= 300
  116. gsAboVolley += 30
  117. gs 'stat'
  118. 'You paid for 30 volleyball lessons.'
  119. act 'Leave':gt 'gdksport', 'start'
  120. end
  121. end
  122. act 'Leave':gt 'gdksport', 'start'
  123. end
  124. if $ARGS[0] = 'dance2':
  125. cla
  126. *clr
  127. gsAboDance -= 1
  128. minut += 120
  129. fat -= 5
  130. if agil< 50:agil += rand(1, 3)
  131. if agil >= 50 and agil < 80:agil += rand(0, 2)
  132. if agil >= 80:agil += rand(0, 1)
  133. manna -= 5
  134. sweat += 3
  135. if dance < agil and dance < 75:dance += rand(0,2)
  136. gs 'stat'
  137. '<center><img src="images/etogame/fit1.jpg"></center>'
  138. if dance < 75:
  139. 'You take a lesson in modern dance, which is very popular in discos.'
  140. if dance < agil:
  141. 'Your skills still have a ways to go, but your agility helps you pull off some of the dance moves.'
  142. else
  143. 'Your body lacks the agility to perform the dance moves you are being taught.'
  144. end
  145. !place for use in events
  146. if rand(0, 1) = 0:'You see something <a href="exec:gt ''danceGev''">interesting</a>.'
  147. elseif dance >= 75:
  148. 'You have gone as far as you can with this dance class, you need to find a new teacher.'
  149. if albinaQWdance > 0:
  150. !place for use in events
  151. if rand(0, 1) = 0:'You see something <a href="exec:gt ''danceGev''">interesting</a>.'
  152. elseif albinaQWdance = 0 and StoryLine ! 0 and grupNPC[23] <= 20: gt 'gdksport', 'albina1'
  153. elseif albinaQWdance = 0 and StoryLine ! 0 and grupNPC[23] > 20 and grupNPC <= 60: gt 'gdksport', 'albina2'
  154. elseif albinaQWdance = 0 and StoryLine ! 0 and grupNPC[23] >= 60: gt 'gdksport', 'albina3'
  155. end
  156. end
  157. act 'Leave':gt 'gdksport', 'start'
  158. end
  159. if $ARGS[0] = 'albina1':
  160. cls
  161. numnpc = 23
  162. gs 'stat'
  163. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  164. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  165. '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.'
  166. act 'Say hello to Albina':
  167. cls
  168. numnpc = 23
  169. gs 'stat'
  170. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  171. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  172. 'You approached Albina and said hello. She raised an eyebrow haughtily.'
  173. '"And you are? Oh yeah <<$name>>. "You''ve taken up dancing, have you?" You nodded confirming the obvious. Albina laughed dismissively. "Well, how''s that going for you?"'
  174. '"Not bad." You answer her coldly, "Not bad at all."'
  175. '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."'
  176. act 'I do not care':
  177. cls
  178. numnpc = 23
  179. dom += 1
  180. grupNPC[numnpc] -= 5
  181. gs 'stat'
  182. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  183. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  184. 'You replied to Albina as scornfully as possible that you do not care and turned away from her.'
  185. 'She snickered nastily then said to the other girls, "Alright, girls. Let''s get to work."'
  186. act 'Leave':gt 'gdksport', 'start'
  187. end
  188. act 'I know how to dance':
  189. cls
  190. numnpc = 23
  191. gs 'stat'
  192. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  193. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  194. 'Albina''s arrogance was getting on your nerves so you told her firmly that you know how to dance.'
  195. '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."'
  196. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  197. act 'Leave':gt 'gdksport', 'start'
  198. act 'Watch': gt 'gdksport', 'albina4'
  199. end
  200. end
  201. end
  202. if $ARGS[0] = 'albina2':
  203. cls
  204. numnpc = 23
  205. gs 'stat'
  206. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  207. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  208. '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.'
  209. act 'Say hello to Albina':
  210. cls
  211. numnpc = 23
  212. gs 'stat'
  213. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  214. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  215. 'You approached Albina and said hello. She turned to you and smiled.'
  216. '"Oh, hello, <<$name>>. I didn''t know you started dancing. Are you any good?" Albina asked with interest.'
  217. '"I''m pretty good, I think." you replied with an answering smile, "Even if I do say so myself."'
  218. '"pretty good, huh?" Albina answered with in a condenscending 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."'
  219. act 'I do not care':
  220. cls
  221. numnpc = 23
  222. dom += 1
  223. grupNPC[numnpc] -= 5
  224. gs 'stat'
  225. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  226. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  227. 'Offended by her tone, you replied to Albina as scornfully as possible, "I couldn''t care less what you think."'
  228. 'As you walked away, she snickered nastily then said to the other girls, "Alright, girls. Let''s get to work."'
  229. act 'Leave':gt 'gdksport', 'start'
  230. end
  231. act 'I know how to dance':
  232. cls
  233. numnpc = 23
  234. gs 'stat'
  235. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  236. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  237. 'Albina''s tone offended you and you replied hotly, "I can dance as well as any of these girls."'
  238. '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."'
  239. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  240. act 'Leave':gt 'gdksport', 'start'
  241. act 'Watch': gt 'gdksport', 'albina4'
  242. end
  243. end
  244. end
  245. if $ARGS[0] = 'albina3':
  246. cls
  247. numnpc = 23
  248. gs 'stat'
  249. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  250. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  251. '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.'
  252. act 'Say hello to Albina':
  253. cls
  254. numnpc = 23
  255. gs 'stat'
  256. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  257. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  258. 'You approached Albina and said hello. She turned to you and smiled.'
  259. '"Oh, hello, <<$nickname>>. I forget you told me you started dancing. Are you any good?" Albina asked with interest.'
  260. '"I''m pretty good, I think." you replied with an answering smile, "Even if I do say so myself."'
  261. '"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?"'
  262. act 'Not really':
  263. cls
  264. numnpc = 23
  265. grupNPC[numnpc] -= 5
  266. gs 'stat'
  267. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  268. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  269. 'Unsure of yourself, you relied hesitantly, "I couldn''t really say, I''ve never really thought about it."'
  270. '"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."'
  271. act 'Leave':gt 'gdksport', 'start'
  272. end
  273. act 'I know how to dance':
  274. cls
  275. numnpc = 23
  276. gs 'stat'
  277. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  278. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  279. '"I''d like to think I can dance as good as anyone, even a professional." you replied honestly.'
  280. '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."'
  281. 'Turning to the other girls, she said, "Alright girls, Let''s get to work!"'
  282. act 'Leave':gt 'gdksport', 'start'
  283. act 'Watch': gt 'gdksport', 'albina4'
  284. end
  285. end
  286. end
  287. if $ARGS[0] = 'albina4':
  288. cls
  289. minut += 15
  290. gs 'stat'
  291. '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.'
  292. 'When the music ended, Albina said, "Girls, take a little break."'
  293. '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."'
  294. act 'Leave':gt 'gdksport', 'start'
  295. act 'Ask if you can join':
  296. cls
  297. minut += 15
  298. gs 'stat'
  299. '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.'
  300. act 'Dance':
  301. cls
  302. minut += 5
  303. gs 'stat'
  304. 'You began to dance to the music, trying as hard as you could to impress them. When the music stopped you came Albina.'
  305. '"You dance like a country bumpkin, of course, but you do have some potential." Albina mused as you stood panting before her.'
  306. act 'Will you take me for your team?':
  307. cls
  308. albinaQWdance = 1
  309. minut += 5
  310. gs 'stat'
  311. '"Well, am I good enough to join the troupe?" you asked Albina.'
  312. 'Albina thought about it and looked at the other girls; some nodded, others shrugged.'
  313. 'Finally she answered you, "Okay, we''ll take a shot. Maybe you''ll learn something and be worthwhile."'
  314. act 'Leave':gt 'gdk'
  315. end
  316. end
  317. end
  318. end
  319. if $ARGS[0] = 'starlets':
  320. cls
  321. minut += 120
  322. fat -= 5
  323. if agil < 50: agil += rand(1, 3)
  324. if agil >= 50 and agil < 80: agil += rand(0, 2)
  325. if agil >= 80:agil += rand(0,1)
  326. manna -= 5
  327. sweat += 3
  328. dancePRO += rand(1, 3)
  329. gs 'stat'
  330. '<center><img src="images/etogame/fit1.jpg"></center>'
  331. if dancePRO < 20:
  332. sub += 1
  333. 'You train together with the girls in "The Starlets". You danced badly and Albina constantly yelled at you and called you a bowlegged cow.'
  334. elseif dancePRO >= 20 and dancePRO < 40:
  335. sub += 1
  336. '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.'
  337. elseif dancePRO >= 40 and dancePRO < 60:
  338. '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. "<<$name>>, you are very sluggish, you need to put more life into it."'
  339. elseif dancePRO >= 60 and dancePRO < 80:
  340. 'You train together with the girls of "The Starlets". You had the routine down pat with no mistakes, but Albina still nagged at you. "<<$name>>, you are not at a funeral, raise your head and smile!"'
  341. elseif dancePRO >= 80:
  342. stardance += 1
  343. 'You danced beautifully and Albina started to use you as an example for the other girls.'
  344. if stardance < 10:
  345. if otkazDanceWhore = 1:
  346. if AlbinaLast = 1:
  347. AlbinaBlokDance = 1
  348. 'After training Albina drew you aside and started berating you. "You roundnose cow. Because of you I am losing customers. So fuck off, you are no longer welcome on the team."'
  349. else
  350. AlbinaLast = 1
  351. otkazDanceWhore = 0
  352. if AlbFather = 0:AlbFather = 1
  353. '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."'
  354. end
  355. end
  356. if DanceWhoreT > 0: DanceWhoreT = 0
  357. if AlbFather = 0 and DanceWhore > rand (1, 20):
  358. AlbFather = 1
  359. 'Albina after training beckoned you to her. "Good work, <<$name>>. 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."'
  360. end
  361. else
  362. stardance = 0
  363. albpayrand = rand(1, 5)
  364. 'Albina gathered the girls. Today we have a small small show planned. Each of you will receive <<albpayrand*1000>>. The show will take a couple of hours.'
  365. act 'Do the show':
  366. cls
  367. minut += 120
  368. money += albpayrand * 1000
  369. sweat = -3
  370. profiDanceTime += 1
  371. gs 'stat'
  372. 'You agreed and Albina called for a car. Soon the car arrived and you and the girls got into the car. Soon you arrived at a building with a large hall where people were sitting around a stage. 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.'
  373. if vnesh >= 52:
  374. if vnesh < 64:wealthmanrand = rand(0, 15)
  375. if vnesh >= 64 and vnesh < 72:wealthmanrand = rand(0, 12)
  376. if vnesh >= 72:wealthmanrand = rand(0, 10)
  377. if wealthmanrand = 0:
  378. kolvomanparty = 1
  379. danceWhorePay = rand(3, 8)
  380. 'You saw that a man in a decent suit went up to Albina and started to talk quietly with her.'
  381. elseif wealthmanrand = 1:
  382. kolvomanparty = 2
  383. danceWhorePay = rand(5, 10)
  384. 'You saw that two guys approached Albina and started to talk to her.'
  385. elseif wealthmanrand = 2:
  386. kolvomanparty = 1
  387. danceWhorePay = rand(4, 9)
  388. 'You saw that an Armenian went up to Albina and started talking to her and gesticulating wildly.'
  389. elseif wealthmanrand = 3:
  390. kolvomanparty = 2
  391. danceWhorePay = rand(6, 12)
  392. 'You saw that two Armenians went up to Albina and started talking to her.'
  393. elseif wealthmanrand = 4:
  394. kolvomanparty = 3
  395. danceWhorePay = rand(8, 14)
  396. 'You saw that three Armenians approached Albina and started talking to her.'
  397. elseif wealthmanrand = 5:
  398. kolvomanparty = 1
  399. danceWhorePay = rand(5, 10)
  400. 'You saw that a black went up Albina and started talking to her.'
  401. elseif wealthmanrand = 6:
  402. kolvomanparty = 2
  403. danceWhorePay = rand(7, 15)
  404. 'You saw that two black men went up Albina and started talking to her.'
  405. elseif wealthmanrand = 7:
  406. kolvomanparty = 3
  407. danceWhorePay = rand(10, 20)
  408. 'You saw that three black men went up Albina and started talking to her.'
  409. end
  410. if wealthmanrand <= 7:
  411. 'After talking Albina came to you. "<<$name>>, need to talk."'
  412. act 'About what?':
  413. cls
  414. minut += 15
  415. gs 'stat'
  416. 'You asked Albina what she wanted to talk about.'
  417. if kolvomanparty = 1:
  418. '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>."'
  419. else
  420. '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>."'
  421. end
  422. act 'Refuse and leave':
  423. cls
  424. minut += 15
  425. otkazDanceWhore = 1
  426. DanceWhoreT = 0
  427. gs 'stat'
  428. 'You got in the car and soon, along with the rest of the troupe, you returned to town.'
  429. act 'Leave':gt 'pavResidential'
  430. end
  431. act 'Agree':
  432. cls
  433. money += danceWhorePay * 1000
  434. DanceWhore += 1
  435. DanceWhoreT += 1
  436. otkazDanceWhore = 0
  437. slutty += 1
  438. gs 'stat'
  439. 'You agreed to be "nice" and Albina counted out your money.'
  440. if wealthmanrand = 0:act 'Go with a man':gt 'DanceWhore1'
  441. if wealthmanrand = 1:act 'Go with men':gt 'DanceWhore2'
  442. if wealthmanrand = 2:act 'Go in Caucasians':gt 'DanceWhore3'
  443. if wealthmanrand = 3:act 'Go with Caucasians':gt 'DanceWhore4'
  444. if wealthmanrand = 4:act 'Go with Caucasians':gt 'DanceWhore5'
  445. if wealthmanrand = 5:act 'Start with a black man':gt 'DanceWhore6'
  446. if wealthmanrand = 6:act 'Go with blacks':gt 'DanceWhore7'
  447. if wealthmanrand = 7:act 'Go with blacks':gt 'DanceWhore8'
  448. end
  449. end
  450. end
  451. elseif vnesh < 52:
  452. 'After dancing Albina talked with some of the men.'
  453. end
  454. act 'Drive back':
  455. cls
  456. minut += 15
  457. gs 'stat'
  458. 'You got in the car and soon, along with the rest of the troupe, you returned to town.'
  459. act 'Leave':gt 'pavResidential'
  460. end
  461. end
  462. end
  463. end
  464. act 'Leave':gt 'gdksport', 'start'
  465. end
  466. if $ARGS[0] = 'cab_home':
  467. cls
  468. minut += 15
  469. gs 'stat'
  470. 'You called a taxi and it brought you back to town.'
  471. if spafinloc = 11:
  472. cumspclnt = 11
  473. gs 'cum_cleanup'
  474. 'Along the way you wiped the sperm from your face.'
  475. end
  476. act 'Leave':gt 'pavResidential'
  477. end
  478. if $ARGS[0] = 'racing2':
  479. cla
  480. *clr
  481. gsAboBeg -= 1
  482. minut += 120
  483. speed += rand(1, 3)
  484. manna -= 5
  485. if salo > 0:salo -= 1
  486. fat -= 5
  487. sweat += 3
  488. beg += rand(0,2)
  489. gs 'stat'
  490. '<center><img src="images/etogame/parkbeg.jpg"></center>'
  491. 'You spend 20 minutes on warm up, run for 90 minutes then spend 10 minutes on your cool down.'
  492. act 'Leave':gt 'gdksport', 'start'
  493. end
  494. if $ARGS[0] = 'vball2':
  495. cla
  496. *clr
  497. gsAboVolley -= 1
  498. minut += 120
  499. if alko = 0:
  500. trenerepa += rand(0,2)
  501. volleyboll += rand(0,2)
  502. speed += rand(0,2)
  503. beg += rand(0,2)
  504. if agil < 50:agil += rand(1, 3)
  505. if agil >= 50 and agil < 80:agil += rand(0, 2)
  506. if agil >= 80:agil += rand(0, 1)
  507. if stren < 10:stren += rand(1, 3)
  508. if stren >= 10 and stren < 20:stren += rand(1, 2)
  509. if stren >= 20 and stren < 30:stren += 1
  510. if stren >= 30 and stren < 40:stren += rand(0, 1)
  511. if vital < 10:vital += rand(1, 3)
  512. if vital >= 10 and vital < 20:vital += rand(1, 2)
  513. if vital >= 20 and vital < 30:vital += 1
  514. if vital >= 30 and vital < 40:vital += rand(0, 1)
  515. end
  516. manna -= 5
  517. fat -= 5
  518. sweat += 3
  519. gs 'stat'
  520. '<center><img src="images/qwest/alter/gdksport.jpg"></center>'
  521. if alko = 0:'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.'
  522. if alko > 0: trenerepa -= rand(0,2) & 'You tried to train, but your level of intoxication doesn''t let you focus. The coach sent you to spend the lesson doing laps.'
  523. act 'Leave':gt 'gdksport', 'start'
  524. act 'Speak to coach':gt 'Voltrener', 'start'
  525. end
  526. if $ARGS[0] = 'vball3':
  527. cla
  528. *clr
  529. gsAboVolley -= 1
  530. minut += 120
  531. if alko = 0:
  532. volleyboll += rand(0,2)
  533. speed += rand(0,2)
  534. agil += rand(0,2)
  535. if stren < 40:stren += rand(0,2)
  536. if vital < 40:vital += rand(0,2)
  537. beg += rand(1, 2)
  538. dom += 1
  539. end
  540. manna -= 5
  541. fat -= 5
  542. sweat += 3
  543. gs 'stat'
  544. '<center><img src="images/qwest/alter/gdksport.jpg"></center>'
  545. 'On Fridays they hold intramural competitions. Scouts for professional teams sometime come to see who the stronger and more talented players are.'
  546. if alko = 0:
  547. if volleyboll < 25:
  548. 'You were an absolutely lousy player and made constant mistakes. Eventually, the coach had enough and he removed you from the court.'
  549. elseif volleyboll >= 25 and volleyboll < 50:
  550. 'You did not play very well. Sometimes you made some blunders. The coach was angry, but tolerated your antics.'
  551. elseif volleyboll >= 50 and volleyboll < 75:
  552. 'You played well on the court and rarely made any mistakes. The coach looked pleased with you.'
  553. elseif volleyboll >= 75:
  554. 'You played great on the court, and easily defeated your rivals. The coach looked pleased with your game.'
  555. if rand(0, 1) = 0:
  556. if andGevknow = 0:$nameAndGev = 'some guy'
  557. if andGevknow > 0:$nameAndGev = 'Andrei'
  558. 'During the game you got pushed by <a href="exec:gt ''volAndGev'', ''start''"><<$nameAndGev>></a>.'
  559. end
  560. end
  561. else
  562. '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.'
  563. end
  564. act 'Leave':gt 'gdksport', 'start'
  565. act 'Go to coaching':gt 'Voltrener', 'start'
  566. end
  567. if $ARGS[0] = 'vball4':
  568. cla
  569. *clr
  570. volkomday = daystart
  571. minut += 120
  572. speed += rand(1, 3)
  573. agil += rand(1, 3)
  574. if stren < 50:stren += rand(1, 3)
  575. if vital < 50:vital += rand(1, 3)
  576. manna -= 5
  577. fat -= 5
  578. sweat += 3
  579. beg += rand(1, 2)
  580. volleyboll += 1
  581. trenerepa += 1
  582. dom += 1
  583. gs 'stat'
  584. '<center><img src="images/qwest/alter/gdksport.jpg"></center>'
  585. 'Number of games <<volsesongame>>, Win - <<volsesonwin>>, lesions - <<volsesonloss>>.'
  586. '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.'
  587. act 'Leave':gt 'gdksport', 'start'
  588. if tanga = 0 and rand(0,1) = 1 and (volleytanga = 1 or VoltrenerVoyeur >= 5):
  589. act 'Correct clothing':
  590. *clr & cla
  591. TrenerLust += 3
  592. Voltrenersee += 1 & ! setcheck on gg without panties
  593. '<center><img src="images/qwest/alter/volley/game'+rand(1,2)+'.jpg"></center>'
  594. 'It seems the coach noticed your manipulation and your young pussy, his eyes lit up and he said turning away: "<<$surname>>. Come see me after training. I need to show you UH ... a few things" '
  595. act 'Escape':gs'stat'& gt 'gdksport', 'start'
  596. act 'Go to the coach''s office':gt 'Voltrenersex', 'start'
  597. end
  598. else
  599. act 'Go to coaching':gt 'Voltrener', 'start'
  600. end
  601. end
  602. if $ARGS[0] = 'vball5':
  603. cla
  604. *clr
  605. if poverkomand = 0:poverkomand = 600
  606. volltime = 0
  607. sorevday = daystart
  608. minut += 180
  609. speed += rand(1, 3)
  610. agil += rand(1, 3)
  611. if stren < 60:stren += rand(1, 3)
  612. if vital < 60:vital += rand(1, 3)
  613. manna -= 5
  614. fat -= 5
  615. sweat += 3
  616. beg += rand(1, 2)
  617. volleyboll += rand(1, 3)
  618. dom += 1
  619. trenerepa += 2
  620. gs 'stat'
  621. '<center><img src="images/qwest/alter/gdksport.jpg"></center>'
  622. 'You gathered your things together with the rest of the team and got on a bus that took you to a place where there will be a match.'
  623. act 'Play':gt 'gdksport', 'volley'
  624. end
  625. end
  626. if $ARGS[0] = 'volley':
  627. minut += 30
  628. gs 'stat'
  629. if volltime = 0:
  630. !! reset the scores
  631. volpoint = 0
  632. volpointv = 0
  633. 'The teams take to the court and start playing.'
  634. !! reserve player or you were caught drinking by the coach and he forbid you from playing
  635. if trener_Speak < 8 or seealko = 1:
  636. volleysostav = 1
  637. poverkomand = 500
  638. '<center><img src="images/qwest/alter/volley/game3.jpg"></center>'
  639. 'You sit on the bench watching your team play.'
  640. !! starter
  641. else
  642. volleysostav = 2
  643. poverkomand = 500 + ((volleyboll*2) + ((stren + vital + agil + react)/2))/2
  644. '<center><img src="images/qwest/alter/volley/game4.jpg"></center>'
  645. 'After warming up you run out on the court to join your teammates.'
  646. end
  647. !! opponent skill
  648. poverkomandV = rand(300, 1300)
  649. if poverkomand > poverkomandV:
  650. volpoint = 1
  651. 'Your team plays better than your opponents.'
  652. elseif poverkomand < poverkomandV:
  653. volpointv = 1
  654. 'Your opponents play better than your team.'
  655. else
  656. 'The scoring varies one way, then the other, obviously the teams are evenly matched.'
  657. end
  658. act 'Continue':volltime = 1 & gt 'gdksport', 'volley'
  659. !! halftime
  660. elseif volltime = 1:
  661. 'During the break, both teams have a rest.'
  662. if volpointv = 0:
  663. '<center><img src="images/qwest/alter/volley/Tren/VolleyTrener6.jpg"></center>'
  664. '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.'
  665. elseif volpoint = 0:
  666. '<center><img src="images/qwest/alter/volley/Tren/VolleyTrener2.jpg"></center>'
  667. '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.'
  668. else
  669. '<center><img src="images/qwest/alter/volley/Tren/VolleyTrener1.jpg"></center>'
  670. '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. '
  671. end
  672. if volleysostav = 1:
  673. 'You are sitting on the bench.'
  674. act 'Ask to play':
  675. if seealko = 1:
  676. cls
  677. 'The coach refuses to let you play because he caught you drinking.'
  678. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  679. else
  680. cls
  681. gs 'stat'
  682. if trenerepa >= rand(0, 80):
  683. volleysostav = 2
  684. dom += 1
  685. poverkomand += ((volleyboll*2) + ((stren + vital + agil + react)/2))/2
  686. 'The coach agrees to let you play the second half.'
  687. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  688. else
  689. 'You ask the coach to play, but he shakes his head and explains that it is not staigically right for the team.'
  690. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  691. end
  692. end
  693. end
  694. end
  695. act 'Continue':volltime = 2 & gt 'gdksport', 'volley'
  696. !! 2nd half
  697. elseif volltime = 2:
  698. *clr
  699. cla
  700. '<center><img src="images/qwest/alter/volley/game5.jpg"></center>'
  701. 'Break is over and the team start the second half.'
  702. if volleysostav = 1:'You sit on the bench watching your team play.'
  703. if poverkomand > poverkomandV:
  704. volpoint += 1
  705. 'Your team plays better than your opponents.'
  706. !! you came in and your team scored when they would not have without you
  707. if volleysostav = 2 and volpointv = 1:trenerepa += 10
  708. elseif poverkomand < poverkomandV:
  709. volpointv += 1
  710. 'Your opponents play better than your team.'
  711. !! you came in and your team gave up a point they would not have without you
  712. if volleysostav = 2 and volpoint = 1:trenerepa -= 10
  713. else
  714. 'The scoring varies one way, then the other, obviously the teams are evenly matched.'
  715. !! you came in and your team tied when they would not lost without you
  716. if volleysostav = 2 and volpointv = 1:trenerepa += 5
  717. end
  718. act 'Continue':volltime = 3 & gt 'gdksport', 'volley'
  719. !! end of game
  720. elseif volltime = 3:
  721. *clr
  722. cla
  723. volsesongame += 1
  724. if rand (1, 100) < 3:
  725. if volpointv = 2:
  726. volpoint = 0
  727. volpointv = 2
  728. elseif volpoint = 2:
  729. volpoint = 2
  730. volpointv = 0
  731. end
  732. end
  733. 'Final whistle.'
  734. seealko = 0
  735. if volpoint > volpointv:
  736. volsesonwin += 1
  737. '<center><img src="images/qwest/alter/volley/game6.jpg"></center>'
  738. 'Your team won.'
  739. elseif volpoint < volpointv:
  740. volsesonloss += 1
  741. '<center><img src="images/qwest/alter/volley/game8.jpg"></center>'
  742. 'Your team lost.'
  743. else
  744. if rand (0, 1) = 0:
  745. volsesonwin += 1
  746. '<center><img src="images/qwest/alter/volley/game7.jpg"></center>'
  747. 'The match was very close, but in the end your team gets the win.'
  748. else
  749. volsesonloss += 1
  750. '<center><img src="images/qwest/alter/volley/game7.jpg"></center>'
  751. 'The match was very close, but in the end your team losses.'
  752. end
  753. end
  754. act 'Leave':gt 'gdksport', 'start'
  755. act 'Go to coaching':gt 'Voltrener', 'start'
  756. end
  757. end
  758. if $ARGS[0] = 'shower':
  759. cls
  760. cumspclnt = 1
  761. gs 'cum_cleanup'
  762. minut += 15
  763. horny += 1
  764. hapri = 1
  765. mop = 1
  766. sweat = -3
  767. if frost > 0:frost = 0
  768. gs 'stat'
  769. '<center><img src="images/pics/dush.jpg"></center>'
  770. if IvanShowerYes = 1 and rand(0,3) = 1 and ShowerIvan < 3:
  771. if ShowerIvan = 1: ShowerIvan = 2
  772. 'You entered the women''s shower and turning the water on you began to lather 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. You looked around and see Ivan Prokhorov stand there looking at you. "Hello <<$nickname>>. The men''s shower is full, so I thought I would join you instead." Ivan smiled after these words.'
  773. act 'Further':gt 'gdksport', 'ShowerWithIvan'
  774. elseif kotovVSprohorov = 1 and ShowerIvan < 3:
  775. kotovVSprohorov = 2
  776. '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. You looked around and saw Ivan Prokhorov standing in the doorway looking at you. "Hi <<$name>>. Can I join you? The men''s shower is full." Ivan smiled after these words.'
  777. act 'Throw Ivan out':
  778. cls
  779. IvanShowerQW = 1
  780. gs 'stat'
  781. '<center><img src="images/qwest/alter/ev/Shower1.jpg"></center>'
  782. 'You covered your chest with one hand and hurled your washcloth at Ivan. He easily dodged the flying cloth and laughed as he exited the shower room. You locked the door and quickly finished your shower.'
  783. act 'Get out of the shower':gt 'gdksport', 'start'
  784. end
  785. act 'Uh, what?':
  786. cls
  787. gs 'stat'
  788. '<center><img src="images/qwest/alter/ev/Shower2.jpg"></center>'
  789. 'Completely surprised and confused by Ivan''s sudden appearance, you are struck speachless. Ivan regarded your inaction and silence as consent. He came into the shower room and closed the door behind him.'
  790. act 'Escape from the shower':
  791. cls
  792. IvanShowerQW = 1
  793. gs 'stat'
  794. '<center><img src="images/qwest/alter/ev/Shower1.jpg"></center>'
  795. 'You cover your breasts with one hand as you quickly grab your towel and escape from the shower. As you ran into the changing room, you could hear Ivan laughing.'
  796. gt 'gdksport', 'start'
  797. end
  798. act 'Wash together':
  799. IvanShowerYes = 0
  800. if ShowerIvan = 0: ShowerIvan = 1
  801. gt 'gdksport', 'ShowerWithIvan'
  802. end
  803. end
  804. else
  805. 'You entered the women''s shower and turning the water on began to lather your body with a washcloth. After you rinsed off the soap, you washed your hair with shampoo. You rinsed out the shampoo and became completely clean.'
  806. if (trenerlust >= 40 or trenersex = 1) and rand(0,3) = 0:
  807. if VoltrenerVoyeur = 0:
  808. gt 'VoltrenerSexShower', '0'
  809. elseif VoltrenerVoyeur = 1:
  810. gt 'VoltrenerSexShower', '1'
  811. elseif VoltrenerVoyeur = 2 and IvanShowerYes = 0:
  812. gt 'VoltrenerSexShower', '2'
  813. end
  814. end
  815. 'After your shower, you combed your hair and dressed.'
  816. act 'Get out of the shower':gt 'gdksport', 'start'
  817. end
  818. end
  819. if $ARGS[0] = 'ShowerWithIvan':
  820. cls
  821. minut += 5
  822. horny += 10
  823. gs'stat'
  824. '<center><img src="images/pics/dush.jpg"></center>'
  825. 'Ivan took off his boxer shorts and wet himself under the shower. His muscular body was very close to yours. You tried not to look at him but your eyes involuntarily dropped to his groin where hung his thick cock. Ivan winked, "Want to wash me?"'
  826. act 'lather Ivan':
  827. cls
  828. minut += 5
  829. horny += 20
  830. gs 'stat'
  831. '<center><img src="images/qwest/alter/Ev/shower.jpg"></center>'
  832. 'You took a washcloth and began to lather Ivan''s body. His cock began to rise up and touched your thigh. Ivan began to hug you and caress your body with his hands.'
  833. act 'Give blowjob':
  834. cls
  835. minut += 5
  836. horny += 20
  837. bj += 1
  838. if npcSex[3] = 0:npcSex[3] = 1 & guy += 1
  839. gs 'stat'
  840. '<center><img src="images/qwest/alter/Ev/shover.jpg"></center>'
  841. 'You slowly sank to your knees in front of Ivan and his cock was in front of your face. Ivan probed impatiently with the head of his cock against your lips. Your mouth opened almost against your will and you let his cock slide in. 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 member out of your mouth and, taking you by the hand, raised you to your feet. He brought his lips to your breast and began to suck. Bliss swept over you as he suckled your stiff nipple. Releasing your nipple with a wet pop, Ivan pushed you back onto your knees and beent you backwards as he staddled your face, once again sliding his hot cock into your mouth. He began pushing it deeper into your throat.'
  842. act 'Allow him to continue':
  843. cla & *clr
  844. if throat<15:
  845. '<center><img src="images/qwest/alter/ev/shower6.gif"></center>'
  846. 'Penetrating further and further into your mouth, then into your throat, his member blocked you breath and started to cause 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 began to kiss you and 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.'
  847. else
  848. '<center><img src="images/qwest/alter/ev/shower7.gif"></center>'
  849. '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.'
  850. end
  851. if agape > 0:
  852. act 'Continue':
  853. cls
  854. minut += 5
  855. horny += 10
  856. $boy = 'Ivan'
  857. dick = 17
  858. if throat < dick:throat += 1
  859. spafinloc = 12
  860. gs 'cum_manage'
  861. gs 'stat'
  862. '<center><img src="images/qwest/alter/Ev/cocksuckerswallow.jpg"></center>'
  863. 'Ivan wants your ass, but when he removes his cock and moves to turn you around, you tell him your butt is too sore.'
  864. 'He is clearly not pleased, but you take his cock back into your mouth and work the shaft while you swirl your tongue against the head.'
  865. 'Ivan can only hold back briefly against such an onslaught and you draw back so he can watch himself cum in your mouth.'
  866. act 'Get out of the shower':gt 'gdksport', 'start'
  867. end
  868. else
  869. act 'Turn around and bend over':
  870. cls
  871. IvanShowerQW = 10
  872. minut += 5
  873. horny += 20
  874. $boy = 'Ivan'
  875. dick = 17
  876. lubonus = 2
  877. gs 'stat'
  878. '<center><img src="images/qwest/alter/Ev/shover2.jpg"></center>'
  879. 'As you bend over, you feel Ivan''s hand stroking your ass and his finger starts to massage your anus.'
  880. dynamic $analsex
  881. cumspclnt = 1
  882. gs 'cum_cleanup'
  883. if VoltrenerVoyeur = 3:gt 'VoltrenerSexShower', '3'
  884. if VoltrenerVoyeur = 4:gt 'VoltrenerSexShower', '4'
  885. if VoltrenerVoyeur = 5:gt 'VoltrenerSexShower', '5'
  886. 'Ivan pulls his member out of your ass and you feel the warm splatter of sperm on your back and ass cheeks.'
  887. act 'Get out of the shower':gt 'gdksport', 'start'
  888. end
  889. end
  890. end
  891. end
  892. end
  893. end
  894. if $ARGS[0] = 'fedor_date':
  895. cls
  896. fedorKozlovQW = 1
  897. numnpc = 5
  898. gs 'stat'
  899. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  900. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  901. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  902. 'You unexpectedly met Fedor Kozlov from your class as you entered the sports club. He smiled affably at you.'
  903. '"Hello <<$name>>. Hmm ... Here is the deal ... I have an extra ticket to the movies. Let''s go together."'
  904. act 'Refuse':
  905. cls
  906. grupNPC[5] = 40
  907. gs 'stat'
  908. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  909. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  910. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  911. 'You told Fedor that you have too much to do and don''t have the time. Fedor frowned. "Okay. Maybe some other time."'
  912. act 'Leave':gt 'gdksport', 'start'
  913. end
  914. act 'Agree':
  915. cls
  916. fedorKozlovQW = 10
  917. grupNPC[5] = 100
  918. minut += 15
  919. gs 'stat'
  920. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  921. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  922. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  923. 'You agreed and Fedor was delighted. He took you to the movie theater located in the park.'
  924. act 'Watch a movie':
  925. cls
  926. minut += 100
  927. manna += 100
  928. gs 'stat'
  929. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  930. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  931. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  932. 'Fedor presented the tickets at the entrance and you went into the theatre. Soon the lights went out and started the movie. Fedor sat motionless and only occasionally glancing at you. Movie was quite interesting and you watched it with pleasure. When the movie ended, the lights were turned on and Fedor walked you out. "<<$name>>. I like you. Maybe we could go out together?"'
  933. act 'Refuse':
  934. cls
  935. grupNPC[5] = 40
  936. fedorKozlovQW = 2
  937. minut += 15
  938. gs 'stat'
  939. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  940. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  941. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  942. 'You refused to go out with him and said you wanted to just stay friends. Fedor was visibly upset and silently walked you home.'
  943. act 'Leave':gt 'pavResidential'
  944. end
  945. act 'Agree':
  946. cls
  947. minut += 15
  948. gs 'stat'
  949. '<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
  950. ! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
  951. '<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
  952. 'You have agreed to meet with Fedor. Fedor was visibly delighted and escort you to the house on the way you viewed fun discussing movies.'
  953. act 'Leave':gt 'pavResidential'
  954. end
  955. end
  956. end
  957. end
  958. --- gdksport ---------------------------------