gadriver.qsrc 45 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159
  1. # gadriver
  2. if $ARGS[0] = 'start':
  3. $metka = 'start'
  4. $loc = 'gadriver'
  5. menu_off = 0
  6. $menu_loc = 'gadriver'
  7. $menu_arg = 'start'
  8. $location_type = 'public_outdoors'
  9. gs 'stat'
  10. '<center><H2>Slavka River</H2></center>'
  11. if month >= 5 and month <= 9:
  12. if hour >= 6 and hour < 22:
  13. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
  14. else
  15. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_night.jpg"></center>'
  16. end
  17. else
  18. if hour >= 8 and hour < 18:
  19. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter.jpg"></center>'
  20. else
  21. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter_night.jpg"></center>'
  22. end
  23. end
  24. 'A large river flows lazily a for a few hundred meters in the northern outskirts of Gadukino.'
  25. if hour >= 6 and hour < 21 and sunWeather = 1: 'You see the local <a href="exec:gt ''gadriver'', ''fishers''">fishermen</a> fishing with their rods on the riverbank.'
  26. temp_gr = rand(0,20)
  27. if temp_gr = 1 and hour < 5 and month >= 5 and month <= 9 and npc_QW['A60'] >= 20: 'Right next to the path leading to the river, you see <a href="exec: gt ''gadriver'', ''mirapunish'' ">Mira</a> naked, bound with ropes between two trees...'
  28. if temp_gr = 4 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
  29. if mitkaguysriver ! daystart:
  30. mitkaguysriver = daystart
  31. 'While going to the river you meet Kolyamba and Vasyan. They first invite you to join them, then insist you go with them.'
  32. act 'Go with them':
  33. *clr & cla
  34. menu_off = 1
  35. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex17.jpg"></center>'
  36. 'The boys take you to Vasyan''s house, where, they rudely keep pushing you until you are bent over the kitchen table. They then take turns fucking you...'
  37. gs 'boyStat', 'A61'
  38. npc_sex[$boy] += 1
  39. pose = 1
  40. if mesec = 0:
  41. gs 'dinsex', 'boy_puts_condom'
  42. gs 'dinsex','vaginal_sex',20,'sub','gangbang'
  43. gs 'dinsex','sexcum'
  44. else
  45. gs 'dinSex','boy_wants_anal','lubri'
  46. gs 'dinsex','analsex',20,'sub','gangbang'
  47. end
  48. gs 'boyStat', 'A62'
  49. npc_sex[$boy] += 1
  50. if mesec = 0:
  51. gs 'dinsex', 'boy_puts_condom'
  52. gs 'dinsex','vaginal_sex',20,'sub','gangbang'
  53. gs 'dinsex','sexcum'
  54. else
  55. gs 'dinSex','boy_wants_anal','lubri'
  56. gs 'dinsex','analsex',20,'sub','gangbang'
  57. end
  58. gs 'stat'
  59. act 'Finish':minut += 10 & gt'gadukino'
  60. end
  61. else
  62. act 'Go to the beach':gt 'gadriver', 'gadbitch'
  63. act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
  64. end
  65. elseif temp_gr = 5 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
  66. if mitkaguysriver ! daystart:
  67. mitkaguysriver = daystart
  68. 'While walking towards the river you meet the village boys, whom you''ve been drinking with recently. They ask you to go with them.'
  69. act 'Go with them':
  70. *clr & cla
  71. menu_off = 1
  72. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex18.jpg"></center>'
  73. 'The boys lead you to Vasyan''s house, where they spend an hour fucking you in the ass...'
  74. gs 'arousal', 'anal', 20, 'gangbang', 'sub'
  75. gs 'arousal', 'anal', 20, 'gangbang', 'sub'
  76. gs 'arousal', 'anal', 20, 'gangbang', 'sub'
  77. gs 'arousal', 'end'
  78. gs 'boyStat', 'A63'
  79. npc_sex[$boy] += 1
  80. gs 'cum_call','butt',$boy,1
  81. gs 'boyStat', 'A61'
  82. npc_sex[$boy] += 1
  83. gs 'cum_call','butt',$boy,1
  84. gs 'boyStat', 'A62'
  85. npc_sex[$boy] += 1
  86. gs 'cum_call','butt',$boy,1
  87. pcs_ass += 3
  88. gs 'stat'
  89. act 'Leave': gt'gadukino'
  90. end
  91. else
  92. act 'Go to the beach':gt 'gadriver', 'gadbitch'
  93. act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
  94. end
  95. elseif temp_gr = 6 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
  96. if mitkaguysriver ! daystart:
  97. mitkaguysriver = daystart
  98. 'On your way to the river you meet Vasyan, he insists you follow him home...'
  99. act 'Go with him':
  100. *clr & cla
  101. menu_off = 1
  102. gs 'boyStat', 'A62'
  103. npc_sex[$boy] += 1
  104. pose = 1
  105. if mesec = 0:
  106. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex20.jpg"></center>'
  107. 'As soon as you open the door, Vasyan pushes you inside and starts pulling your clothes off crudely. Once you are naked, he pushes you towards the sofa and forces you to your knees...'
  108. gs 'arousal', 'vaginal', 20, 'sub'
  109. gs 'cum_call','butt',$boy,1
  110. else
  111. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex21.jpg"></center>'
  112. 'As soon as you open the door, Vasyan pushes you inside and starts pulling your clothes off crudely. He then throws you onto his bed. Noticing, that you are slightly bleeding he asks if it is that time of the month. You whimper, "Yes." He curses angrily, turns you over and begins roughly fucking your ass...'
  113. gs 'arousal', 'anal', 20, 'sub'
  114. gs 'cum_call','butt',$boy,1
  115. end
  116. gs 'arousal', 'end'
  117. gs 'stat'
  118. act 'Finish': gt'gadukino'
  119. end
  120. else
  121. act 'Go to the beach':gt 'gadriver', 'gadbitch'
  122. act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
  123. end
  124. else
  125. act 'Go to the beach':gt 'gadriver', 'gadbitch'
  126. act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
  127. end
  128. end
  129. if $ARGS[0] = 'gadbitch':
  130. PC_arrive = iif($metka ! 'gadbitch', 1 , 0)
  131. $location_type = 'public_outdoors'
  132. $metka = 'gadbitch'
  133. $loc = 'gadriver'
  134. menu_off = 1
  135. gs 'stat'
  136. '<center><H4>Village Beach</H4></center>'
  137. !125e
  138. if hour >= 6 and hour < 22:
  139. if sunWeather = 1:
  140. if month>=4 and month<=10:
  141. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadbitch_summer.jpg"></center>'
  142. else
  143. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadbitch_winter.jpg"></center>'
  144. end
  145. else
  146. if month>=4 and month<=10:
  147. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadbitch_soft.jpg"></center>'
  148. else
  149. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadbitch_cold.jpg"></center>'
  150. end
  151. end
  152. else
  153. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadbitch_night.jpg"></center>'
  154. end
  155. 'A small country beach, where you can sunbathe and swim.'
  156. mira_temp = rand(1,10)
  157. if MiraLoc = 1:temp_gr = RAND(0,20)
  158. if sunWeather = 1 and MiraLoc = 1:
  159. if RAND(0,10) < 5:
  160. '<a href="exec:sun = 1 & gt ''gadriver'', ''Mira'' ">Mira</a> is laying on the beach sunbathing.'
  161. if npc_rel['A60'] < 15:npc_rel['A60'] += 1
  162. else
  163. '<a href="exec:sun = 0 & gt ''gadriver'', ''Mira'' ">Mira</a> is in the river splashing water around and having fun.'
  164. if npc_rel['A60'] < 15:npc_rel['A60'] += 1
  165. end
  166. end
  167. if MiraLoc ! 1 and npc_QW['A63'] >= 13 and RAND(0,10) = 0 and hour >= 8 and hour < 20 and month >= 5 and month <= 9 and temper >= 15 and sunWeather = 1:'<a href="exec: gt ''gadriver'', ''GuysRiver'' ">Bob Colby</a> is resting on the riverbank.'
  168. if temper >= 15 and month >= 5 and month <= 9:
  169. temp_gr = RAND(0,9)
  170. if $clothingworntype ! 'nude' and (pcs_inhib >= 25 or exhibitionist_lvl > 1):
  171. act 'Strip naked':
  172. cla
  173. minut += 5
  174. gs 'underwear', 'remove'
  175. gs 'clothing', 'strip', 'VillageRiver'
  176. 'Without hesitation, you take off all your clothes and neatly fold them before putting them down on a pile. Without your clothes holding you back, you can go for a nice swim in the river or just lie down in the sand and do some sunbathing.'
  177. act 'Continue': gt 'gadriver', 'gadbitch'
  178. end
  179. end
  180. if $clothingworntype = 'swimwear':
  181. act 'Go for a swim':
  182. cla
  183. *clr
  184. cumspclnt = 4
  185. gs 'cum_cleanup'
  186. minut += 30
  187. gs 'exercise', 'tier1', 1, 'stren_exp'
  188. if pcs_inhib < 50:inhib_exp += rand(1,3)
  189. pcs_sweat = 10 + rand(0,4)
  190. if hour >= 22 or hour <= 6:
  191. if RAND(0,10) < 5 and MiraLoc = 1:
  192. '<center><img <<$set_imgh>> src="images/characters/village/mira/rivertwogirls.jpg"></center>'
  193. 'You and Mira take a nighttime swim in the river, splashing water at each other and having fun.'
  194. else
  195. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriverswim.jpg"></center>'
  196. 'You take a nighttime swim in the river, feeling the refreshing and invigorating water flowing across your body.'
  197. end
  198. else
  199. if RAND(0,10) < 5 and MiraLoc = 1:
  200. '<center><img <<$set_imgh>> src="images/characters/village/mira/rivertwogirls.jpg"></center>'
  201. 'You and Mira take a swim in the river, splashing water at each other and having fun.'
  202. else
  203. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriverswim.jpg"></center>'
  204. 'You take a swim in the river, feeling the refreshing and invigorating water flowing across your body.'
  205. end
  206. end
  207. act 'Get out of the water':
  208. if MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 0 and hour >= 8 and hour < 20:
  209. *clr & cla
  210. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex13.jpg"></center>'
  211. 'When you decide it''s time to get out of the river, you hear the sound of men laughing as they walk on the river bank approaching you. As they get closer you see the smirking faces of the village boys led by Mitya headed towards the river bank while you are still in the shallow waters.'
  212. 'They quickly undress and jump in the water. Within a few seconds you are surrounded by the grinning boys. Without a word they reach for you and roughly take turns forcing you to suck their cocks.'
  213. gs 'arousal', 'bj', 15, 'gangbang', 'sub', 'rough'
  214. gs 'arousal', 'hj', 15, 'gangbang', 'sub', 'rough'
  215. gs 'arousal', 'end'
  216. gs 'boyStat', 'A63'
  217. npc_sex[$boy] += 1
  218. gs 'cum_call','face',$boy, 1,'','',20
  219. gs 'cum_call','hair',$boy, 1,'','',20
  220. gs 'boyStat', 'A61'
  221. npc_sex[$boy] += 1
  222. gs 'cum_call','face',$boy, 1,'','',20
  223. gs 'cum_call','mouth',$boy, 1,'','',20
  224. gs 'boyStat', 'A62'
  225. npc_sex[$boy] += 1
  226. minut -= 10
  227. gs 'cum_call','face',$boy, 1,'','',20
  228. gs 'cum_call','mouth',$boy, 1,'','',20
  229. swallow += RAND(0,3)
  230. gang +=1
  231. gs 'stat'
  232. act 'Finish':gt'gadriver', 'gadbitch'
  233. elseif MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 1 and hour >= 8 and hour < 20 and sub > 0:
  234. *clr & cla
  235. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex19.jpg"></center>'
  236. 'As soon as you get out of the river, you meet a grinning Kolyamba. He smiles wickedly and commands you to get down on your hands and knees so he can fuck you in the ass...'
  237. gs 'boyStat', 'A61'
  238. npc_sex[$boy] += 1
  239. pose = 1
  240. gs 'dinSex','boy_wants_anal'
  241. gs 'arousal', 'anal', 20, 'sub'
  242. gs 'cum_call','anus',$boy, 1,'','',20
  243. gs 'cum_call','butt',$boy, 1,'','',20
  244. gs 'arousal', 'end'
  245. gs 'stat'
  246. act 'Finish':gt'gadriver', 'gadbitch'
  247. else
  248. gt'gadriver', 'gadbitch'
  249. end
  250. end
  251. end
  252. else
  253. if $clothingworntype = 'nude':
  254. act 'Go skinny dipping':
  255. cla
  256. *clr
  257. temp_gr = RAND(0,15)
  258. cumspclnt = 4
  259. gs 'cum_cleanup'
  260. minut = minut + 20
  261. pcs_sweat = 10 + rand(0,4)
  262. pcs_mood += 5
  263. pcs_willpwr = pcs_willpwr + 5
  264. inhib_exp += rand(1,3)
  265. if pcs_stren < 30: stren_exp += 1
  266. if hour >= 22 and hour <= 6:
  267. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/watergirls1.jpg"></center>'
  268. 'You strip your clothes off and slowly step in to the cold river, knowing that the darkness hides your nudity. You swim around feeling the refreshing and invigorating water caressing your body.'
  269. else
  270. if temp_gr >= 10 and MiraLoc = 1:
  271. pcs_horny += RAND(5,15)
  272. gs 'stat'
  273. '<center><img <<$set_imgh>> src="images/characters/village/mira/rivertwogirlsnude'+rand(0,5)+'.jpg"></center>'
  274. 'You step in to the river, you and Mira have a good old fashioned water fight, splashing each other until one of you finally surrenders.'
  275. else
  276. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/watergirls.jpg"></center>'
  277. 'You take your clothes off and swiftly step into the river, you sigh, feeling the cold refreshing and invigorating water.'
  278. end
  279. end
  280. act 'Get out of the water':
  281. if MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 0 and hour >= 8 and hour < 20:
  282. *clr & cla
  283. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex12.jpg"></center>'
  284. 'As soon as you step out of the water, you find yourself standing naked in front of a couple of the village boys, judging from the fishing poles they are carrying, you know they were coming to the river to do some fishing.'
  285. 'But, seeing you skinny dipping, they instead start talking amongst themselves about how much of a slut you are and the only good thing you are for is sucking cock. You tell them to fuck off, but they are too worked up and not listening to you at all.'
  286. gs 'arousal', 'vaginal', 10, 'gangbang', 'sub', 'rough'
  287. gs 'arousal', 'anal', 10, 'gangbang', 'sub', 'rough'
  288. gs 'arousal', 'hj', 10, 'gangbang', 'sub', 'rough'
  289. gs 'arousal', 'bj', 10, 'gangbang', 'sub', 'rough'
  290. gs 'arousal', 'end'
  291. gs 'boyStat', 'A63'
  292. npc_sex[$boy] += 1
  293. gs 'cum_call','butt',$boy, 1
  294. gs 'boyStat', 'A61'
  295. npc_sex[$boy] += 1
  296. gs 'cum_call','anus',$boy, 1,'','',20
  297. gs 'boyStat', 'A62'
  298. npc_sex[$boy] += 1
  299. gs 'cum_call','mouth',$boy
  300. swallow += RAND(0,1)
  301. gs 'stat'
  302. gang +=1
  303. act 'Finish': gt'gadriver', 'gadbitch'
  304. else
  305. gt'gadriver', 'gadbitch'
  306. end
  307. end
  308. end
  309. end
  310. end
  311. if hour >= 8 and hour < 20 and sunWeather = 1:
  312. if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
  313. act 'Sunbathe (1:00)':
  314. if Mira_no = 0 and npc_rel['A60'] > 0 and MiraLoc ! 1 and rand(1,10) > 7 and hour > 8 and hour < 20 and sunWeather = 1 and temper >= 15:
  315. cla
  316. *clr
  317. MiraLoc = 1
  318. mira_go_river = 1
  319. minut += 5
  320. mira_go_blok = 1
  321. if pcs_inhib < 50:inhib_exp += rand(1,3)
  322. gs 'stat'
  323. if $clothingworntype = 'nude':
  324. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_go_river_nude.jpg"></center>'
  325. else
  326. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_go_river.jpg"></center>'
  327. end
  328. 'You are sunbathing by the river when Mira comes along. You smile, she undresses and lays her towel next to yours.'
  329. act 'Continue': gt'gadriver', 'gadbitch'
  330. elseif $clothingworntype = 'nude':
  331. *clr & cla
  332. minut += 60
  333. gs 'exhibitionism', 2
  334. inhib_exp += rand(1,3)
  335. if pcs_sweat < 35 : pcs_sweat += 5
  336. pcs_mood += 5
  337. if temp_gr < 10 and MiraLoc = 1:
  338. '<center><img <<$set_imgh>> src="images/characters/village/mira/beachtwogirlsnude.jpg"></center>'
  339. 'You lie next to Mira and gossip about the villagers, enjoying the sun.'
  340. else
  341. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadrivernude.jpg"></center>'
  342. 'You lie down on your towel and start sunbathing.'
  343. end
  344. if krem = 0:
  345. pcs_tan += 1
  346. elseif krem > 0:
  347. krem -= 1
  348. 'You smear the suntan lotion all over your body to help prevent a sunburn.'
  349. pcs_tan += 3
  350. end
  351. act 'Finish sunbathing':
  352. if MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 0 and hour >= 8 and hour < 20:
  353. *clr & cla
  354. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex14.jpg"></center>'
  355. 'You hear several men''s voices rapidly approaching. All of a sudden a couple of the village boys emerge in front of you. Noticing that you are nude, they brighten up greatly and in a few minutes, despite you protesting lively, they have you on all fours and are roughly fucking you...'
  356. gs 'arousal', 'vaginal', 10, 'gangbang', 'sub', 'rough'
  357. gs 'arousal', 'anal', 10, 'gangbang', 'sub', 'rough'
  358. gs 'arousal', 'bj', 10, 'gangbang', 'sub', 'rough'
  359. gs 'arousal', 'hj', 10, 'gangbang', 'sub', 'rough'
  360. gs 'boyStat', 'A62'
  361. npc_sex[$boy] += 1
  362. gs 'cum_call','butt',$boy, 1
  363. gs 'boyStat', 'A63'
  364. npc_sex[$boy] += 1
  365. gs 'cum_call','anus',$boy, 1,'','',20
  366. gs 'boyStat', 'A61'
  367. npc_sex[$boy] += 1
  368. gs 'cum_call','mouth',$boy
  369. swallow += 1
  370. gs 'arousal', 'end'
  371. gs 'stat'
  372. act 'Get dressed':gt'gadriver', 'gadbitch'
  373. else
  374. gt'gadriver', 'gadbitch'
  375. end
  376. end
  377. else
  378. *clr & cla
  379. minut += 60
  380. if pcs_sweat < 35 : pcs_sweat += 5
  381. pcs_mood += 5
  382. if temp_gr < 10 and MiraLoc = 1:
  383. '<center><img <<$set_imgh>> src="images/characters/village/mira/beachtwogirls.jpg"></center>'
  384. 'You lie next to Mira and gossip about trivial things, enjoying the sun.'
  385. else
  386. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadrivergirl.jpg"></center>'
  387. 'You sunbathe alone on the riverbank.'
  388. end
  389. if krem = 0:
  390. pcs_tan += 1
  391. elseif krem > 0:
  392. krem -= 1
  393. pcs_tan += 3
  394. 'You smear suntan lotion all over your body to prevent a sunburn. Few minutes later you''re all oiled in and start sunbathing.'
  395. end
  396. act 'Finish':
  397. if MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 0 and hour >= 8 and hour < 20:
  398. *clr & cla
  399. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex15.jpg"></center>'
  400. 'After a while, you hear some familiar voices quickly approaching you. A couple minutes later you see the village boys emerge from the bushes. Noticing you sunbathing, they brighten up greatly. In a short amount of time, despite you protesting lively, all of your holes have been violated...'
  401. gs 'arousal', 'vaginal', 10, 'gangbang', 'sub', 'rough'
  402. gs 'arousal', 'anal', 10, 'gangbang', 'sub', 'rough'
  403. gs 'arousal', 'bj', 10, 'gangbang', 'sub', 'rough'
  404. gs 'arousal', 'hj', 10, 'gangbang', 'sub', 'rough'
  405. gs 'arousal', 'end'
  406. gs 'boyStat', 'A61'
  407. npc_sex[$boy] += 1
  408. gs 'cum_call','butt',$boy, 1
  409. gs 'boyStat', 'A62'
  410. npc_sex[$boy] += 1
  411. gs 'cum_call','anus',$boy, 1,'','',20
  412. gs 'boyStat', 'A63'
  413. npc_sex[$boy] += 1
  414. gs 'cum_call','mouth',$boy
  415. swallow += 1
  416. gang +=1
  417. gs 'stat'
  418. act 'Finish':gt'gadriver', 'gadbitch'
  419. elseif MiraLoc = 1 and npc_QW['A60'] >= 15 and temp_gr = 1 and hour >= 8 and hour < 20:
  420. *clr & cla
  421. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex16.jpg"></center>'
  422. 'After a while, you hear voices rapidly approaching from the village, in a couple of minutes you see the village boys emerge from the bushes. Seeing Mira they smile obscenely, and without hesitation they quickly surround her as she lays on the sand. You sit up and watch as they fuck her in all her holes...'
  423. gs 'arousal', 'voyeur', 30, 'gangbang', 'dom'
  424. gs 'arousal', 'end'
  425. gs 'stat'
  426. act 'Finish': gt'gadriver', 'gadbitch'
  427. else
  428. minut += 5
  429. gt'gadriver', 'gadbitch'
  430. end
  431. end
  432. end
  433. end
  434. end
  435. end
  436. end
  437. if ARRSIZE('swimwear') > 0:
  438. act 'Get changed':gt 'changingroom', 'view_swim_list'
  439. end
  440. if $clothingworntype = 'nude':
  441. act 'Get dressed':
  442. clothesAtLocation = FUNC('lost_clothes_here','VillageRiver')
  443. cla
  444. minut += 5
  445. gs 'underwear', 'wear'
  446. if clothesAtLocation = 1: gs 'clothing', 'recover_lost_clothes', 'VillageRiver', 1
  447. act 'Continue': gt 'gadriver', 'gadbitch'
  448. end
  449. end
  450. act 'Leave':
  451. cla
  452. if $clothingworntype = 'swimwear':
  453. cla
  454. 'You need to dress in regular clothes first.'
  455. act'Return':gt'gadriver', 'gadbitch'
  456. elseif $clothingworntype = 'nude':
  457. 'You need to put some clothes on first.'
  458. act'Return':gt'gadriver', 'gadbitch'
  459. else
  460. minut += 5
  461. gt 'gadriver', 'start'
  462. end
  463. end
  464. !! extraordinary events at the river beach. Be aware, this part has to be at the end because it removes actions, which were set before.
  465. if (mira_go_blok = 0 and MiraLoc = 1 and rand(1,10) = 5) or (MiraLoc = 1 and hour >= 20):
  466. *clr & cla
  467. minut += 5
  468. mira_go_blok = 1
  469. mira_no_home = 0
  470. MiraLoc = 0
  471. gs 'stat'
  472. if $clothingworntype = 'nude':
  473. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_go_home_nude.jpg"></center>'
  474. else
  475. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_go_home.jpg"></center>'
  476. end
  477. *nl
  478. '"<<$pcs_nickname>>, I have to go home, " Mira said to you and began to gather her stuff.'
  479. act 'Continue': gt'gadriver', 'gadbitch'
  480. elseif Mira_no = 0 and MiraLoc = 1 and hour > 8 and hour < 20 and sunWeather = 1 and temper >= 15 and PC_arrive = 1:
  481. *clr & cla
  482. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_in_river.jpg"></center>'
  483. *nl
  484. 'Arriving at the beach, you see Mira laying down, sunbathing on a towel.'
  485. MiraLoc = 1
  486. minut += 5
  487. mira_go_blok = 1
  488. gs 'stat'
  489. act 'Continue':
  490. if Miraswimday ! daystart:
  491. *clr & cla
  492. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
  493. *nl
  494. '"<<$pcs_nickname>>, Why are you moping about on the shore, get in the water and swim with me?" - Mira called out to you as she waded into the river.'
  495. minut += 1
  496. Miraswimday = daystart
  497. gs 'stat'
  498. act 'Agree and get changed':
  499. *clr & cla
  500. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/undressbch1.jpg"></center>'
  501. *nl
  502. '"Wait Mira, I have to change out of my clothes!" you cry in response, although she could hardly hear you as she is already splashing around in the river.'
  503. 'You start to take off your clothes.'
  504. if ARRSIZE('swimwear') > 0:
  505. act 'Change into swimwear':
  506. gs 'gadriver','get_changed','start'
  507. end
  508. end
  509. if pcs_inhib >= 25 or exhibitionist_lvl > 1:
  510. act 'Strip naked':
  511. cla
  512. minut += 5
  513. gs 'underwear', 'remove'
  514. gs 'clothing', 'strip', 'VillageRiver'
  515. inhib_exp += rand(1,3)
  516. 'Without hesitation, you take off all your clothes and neatly fold them before putting them down in a pile. Without your clothes holding you back, you can go for a nice swim in the river or just lie down in the sand and do some sunbathing.'
  517. act 'Swim':
  518. *clr & cla
  519. '<center><img <<$set_imgh>> src="images/characters/village/mira/rivertwogirlsnude'+rand(0,5)+'.jpg"></center>'
  520. *nl
  521. 'You wade into the river, and have fun with Mira spraying each other with water.'
  522. temp_gr = RAND(0,15)
  523. cumspclnt = 4 & gs 'cum_cleanup'
  524. minut += 30
  525. gs 'exercise', 'tier1', 1, 'stren_exp'
  526. gs 'exhibitionism', 2
  527. pcs_sweat = 10 + rand(0,4)
  528. gs'stat'
  529. act 'Get out of the water':gt'gadriver', 'gadbitch'
  530. end
  531. end
  532. end
  533. act'Second thoughts': gt 'gadriver', 'second_thoughts'
  534. end
  535. act'Refuse': gt 'gadriver', 'second_thoughts'
  536. else
  537. gt'gadriver', 'gadbitch'
  538. end
  539. end
  540. end
  541. end
  542. if $ARGS[0] = 'get_changed':
  543. menu_off = 1
  544. $metka = 'get_changed'
  545. if $ARGS[1] = 'start':
  546. gt 'changingroom', 'view_swim_list'
  547. else
  548. *clr & cla
  549. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/undressbch.jpg"></center>'
  550. *nl
  551. 'You put on our swimwear and neatly fold your clothes before putting them down in a pile, now you can go for a nice swim in the river or just lie down in the sand and do some sunbathing.'
  552. if $clothingworntype = 'swimwear':
  553. act 'Swim':
  554. *clr & cla
  555. '<center><img <<$set_imgh>> src="images/characters/village/mira/rivertwogirls.jpg"></center>'
  556. *nl
  557. 'You wade into the river, and have fun with Mira spraying each other with water.'
  558. temp_gr = RAND(0,15)
  559. cumspclnt = 4 & gs 'cum_cleanup'
  560. minut += 30
  561. if pcs_inhib < 50:inhib_exp += rand(1,2)
  562. gs 'exercise', 'tier1', 1, 'stren_exp'
  563. pcs_sweat = 10 + rand(0,4)
  564. gs'stat'
  565. act 'Get out of the water':gt'gadriver', 'gadbitch'
  566. end
  567. else
  568. act'Second thoughts': gt 'gadriver', 'second_thoughts'
  569. end
  570. end
  571. end
  572. if $ARGS[0] = 'second_thoughts':
  573. *clr & cla
  574. menu_off = 1
  575. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
  576. *nl
  577. if ARRSIZE('swimwear') = 0:
  578. '"Actually Mira, I can''t come in right now, as I didn''t bring a swimsuit" you replied you her. "I''m going to stay on the shore for a bit."'
  579. *nl
  580. 'You should probably buy some swimwear if you intend of spending time at the beach'
  581. *nl
  582. else
  583. '"Actually Mira, I''ve changed my mind, I don''t feel like swimming just now," you replied you her. "I''m going to stay on the shore for a bit."'
  584. end
  585. minut += 1
  586. npc_rel['A60'] -= 1
  587. gs 'stat'
  588. act 'Continue': gt'gadriver', 'gadbitch'
  589. end
  590. if $ARGS[0] = 'Mira':
  591. *clr & cla
  592. menu_off = 1
  593. minut += 2
  594. gs 'stat'
  595. if sun = 1:
  596. if npc_QW['A60'] < 12:
  597. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirabeach.jpg"></center>'
  598. else
  599. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirabeachnude.jpg"></center>'
  600. end
  601. else
  602. if npc_QW['A60'] < 12:
  603. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
  604. else
  605. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirarivernude.jpg"></center>'
  606. end
  607. end
  608. act 'Leave':gt 'gadriver', 'gadbitch'
  609. act 'Chat':
  610. *clr & cla
  611. minut += 10
  612. pcs_mood += 10
  613. gs 'stat'
  614. if sun = 1:
  615. if npc_QW['A60'] < 12:
  616. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirabeach.jpg"></center>'
  617. else
  618. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirabeachnude.jpg"></center>'
  619. end
  620. else
  621. if npc_QW['A60'] < 12:
  622. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
  623. else
  624. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirarivernude.jpg"></center>'
  625. end
  626. end
  627. if npc_QW['A60'] >= 0:
  628. if npc_QW['A60'] >= 30 and miraprost > 0 and sunWeather = 1:
  629. 'You and Mira talk about her being the village prostitute and how she can improve her performance.'
  630. elseif npc_QW['A60'] >= 20 and sunWeather = 1:
  631. 'It is always nice to talk with Mira and you gossip about boys.'
  632. elseif npc_QW['A60'] >= 15 and sunWeather = 1:
  633. 'You and Mira talk about clothes and shopping, she has a thing for shoes but can''t wear pretty heels because of all the mud.'
  634. elseif npc_QW['A60'] >= 11 and sunWeather = 1:
  635. 'Mira asks you about Pavlovsk and you tell her all about it.'
  636. elseif npc_QW['A60'] >= 9 and sunWeather = 1:
  637. 'You talk to Mira about what it is like living in the village.'
  638. elseif npc_QW['A60'] >= 8 and sunWeather = 1:
  639. 'Mira breaks the silence, "What brings you here to the village?"'
  640. '"My granma-ma and Pop-pop live here, my folks like to come here over the summer. They think the country air will be good for me."'
  641. elseif npc_QW['A60'] = 7 and sunWeather = 1:
  642. 'You decide to strike up some conversation with Mira, "So what is there to do here in the village?"'
  643. '"Its a lot quicker than town, we do have a shop, this lovely beach and there are some beautiful walks. Other than that there''s only the gopnik guys but they are just after one thing and I don''t want that, plus dad would kill me."'
  644. elseif npc_QW['A60'] < 7 and sunWeather = 1:
  645. if npc_rel['A60'] < 15:npc_rel['A60'] += 1
  646. 'You and Mira are chatting about trivial things.'
  647. end
  648. end
  649. act 'Leave':gt 'gadriver', 'gadbitch'
  650. end
  651. end
  652. if $ARGS[0] = 'mirapunish':
  653. *clr & cla
  654. menu_off = 1
  655. minut += 10
  656. pcs_horny += RAND(25,75)
  657. gs 'stat'
  658. '<center><img <<$set_imgh>> src="images/characters/village/mira/mirapunish.jpg"></center>'
  659. 'You approach Mira, she is looking distressed and embarrassingly smiles as you start asking what happened. She pleads you to release her. As you untie her, she explains that Kolyamba punished her for barely biting his cock as she sucked it...'
  660. '"Thank God you showed up." she says with a sigh of relief as you untie her. "I''m glad it was you who found me and not one of those old hags from the village. They would be calling me a whore and I would get scolded about being promiscuous. Those old hags hate us you know. We''re young and beautiful and they are just mean old wrenches." said the naked Mira, revealing her true feelings about the villagers. She continues quietly, "Or it could have been even worse, someone could have abused me, raped me or even killed m..." All of a sudden she stops and lunges herself in your arms weeping. "Thank you," she tells you. "You saved my life!"'
  661. act 'Leave':gt 'gadriver', 'gadbitch'
  662. end
  663. if $ARGS[0] = 'GuysRiver':
  664. *clr & cla
  665. menu_off = 1
  666. minut += 5
  667. pcs_horny += 10
  668. gs 'stat'
  669. temp_gr = RAND(0,10)
  670. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/mitkaguysriver.jpg"></center>'
  671. '"Oh, hi <<$pcs_nickname>>, so it''s just you today?" Kolyamba grinned.'
  672. if temp_gr <= 4:
  673. '"There doesn''t seem to be anyone else around and all of us are as horny as bullfrogs, you want to have a little fun with us? Come on, spread your legs, show us your pussy and start playing with yourself..."'
  674. elseif temp_gr > 4 and temp_gr <= 8:
  675. '"There doesn''t seem to be anyone around, and we are as horny as bullfrogs, you want to have a little fun with us? How about you give us a blowjob? We''ll be really grateful, ha-ha!"'
  676. else
  677. '"Ah, no Mira, it''s just our other hot babe. Come here lovely, we have something really special for you."'
  678. end
  679. if temp_gr < 4:
  680. act 'Pleasure Kolyamba':
  681. *clr & cla
  682. gs 'boyStat', 'A61'
  683. pose = 0
  684. temp_gr = RAND(0,2)
  685. gs 'stat'
  686. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex.jpg"></center>'
  687. 'You quickly take off your pants and climb onto Kolyamba, grabbing his cock, leading it inside you.'
  688. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  689. gs 'stat'
  690. act 'Pleasure Vasyan':
  691. *clr & cla
  692. gs 'boyStat', 'A62'
  693. pose = 0
  694. gs 'stat'
  695. temp_gr = RAND(0,2)
  696. if temp_gr = 0:
  697. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex1.jpg"></center>'
  698. 'Vasyan, rolls you onto your back, sticking his cock into your wet pussy.'
  699. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  700. gs 'arousal', 'end'
  701. gs 'stat'
  702. elseif temp_gr = 1:
  703. gs 'boyStat', 'A62'
  704. spafinloc = 12
  705. gs 'cum_manage'
  706. gs'stat'
  707. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex2.jpg"></center>'
  708. 'Vasya steps up to you and slaps you in the face while pulling out his cock forcing your on your knees so he can slap you with his dick.'
  709. 'He forcefully shoves the cock into your mouth and cums lavishly in your mouth...'
  710. gs 'arousal', 'bj', 5, 'sub', 'group', 'rough'
  711. gs 'arousal', 'end'
  712. gs 'stat'
  713. else
  714. gs 'boyStat', 'A62'
  715. pcs_ass += 1
  716. spafinloc = 3
  717. gs 'cum_manage'
  718. gs'stat'
  719. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex3.jpg"></center>'
  720. 'Vasyan forces you on all four and starts pumping his dick into your ass.'
  721. gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
  722. gs 'arousal', 'end'
  723. gs 'stat'
  724. end
  725. act 'Leave':gt'gadriver', 'gadbitch'
  726. end
  727. end
  728. elseif temp_gr < 8:
  729. act 'Pleasure Kolyamba':
  730. *clr & cla
  731. gs 'boyStat', 'A61'
  732. spafinloc = 12
  733. gs 'cum_manage'
  734. gs'stat'
  735. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex4.jpg"></center>'
  736. 'You get down on your knees and start licking Kolyamba''s dick, after a while you start sucking it like a popsicle...'
  737. 'He only manages to hold out for a short time finishing in your mouth...'
  738. gs 'arousal', 'bj', 5, 'sub', 'group', 'rough'
  739. gs 'stat'
  740. act 'Pleasure Vasyan':
  741. *clr & cla
  742. gs 'boyStat', 'A62'
  743. pose = 0
  744. gs 'stat'
  745. temp_gr = RAND(0,2)
  746. if temp_gr = 0:
  747. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex5.jpg"></center>'
  748. 'Vasyan, lays you onto your back, using his fingers stimulating your vaginal lips while sticking his cock into your wet pussy.'
  749. gs 'arousal', 'vaginal', 10, 'sub', 'group', 'rough'
  750. gs 'arousal', 'end'
  751. gs 'stat'
  752. elseif temp_gr = 1:
  753. gs 'boyStat', 'A62'
  754. spafinloc = 12
  755. gs 'cum_manage'
  756. gs'stat'
  757. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex6.jpg"></center>'
  758. 'Vasyan steps up and roughs you up a little with his hands and then takes out his dick forcing you to suck him off.'
  759. 'He shoves the cock into your mouth and soon cums violently...'
  760. gs 'arousal', 'bj', 5, 'sub', 'group', 'rough'
  761. gs 'arousal', 'end'
  762. gs 'stat'
  763. else
  764. gs 'boyStat', 'A62'
  765. pcs_ass += 1
  766. spafinloc = 3
  767. gs 'cum_manage'
  768. gs'stat'
  769. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex7.jpg"></center>'
  770. 'Vasyan forces you on all four, telling you that you will enjoy this. He pulls out his dick and starts fucking you in the ass.'
  771. gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
  772. gs 'arousal', 'end'
  773. gs 'stat'
  774. end
  775. act 'Leave':gt'gadriver', 'gadbitch'
  776. end
  777. end
  778. else
  779. act 'Pleasure Kolyamba':
  780. *clr & cla
  781. gs 'boyStat', 'A61'
  782. pcs_ass += 1
  783. spafinloc = 3
  784. gs 'cum_manage'
  785. gs'stat'
  786. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex8.jpg"></center>'
  787. 'Kolyamba looks you in the eyes and asks if you trust him. You gulp and reply, "Yes." He takes out a blindfold and places it over your eyes so you can''t see what''s happening next. Kolyamba then proceeds taking both or your clothes off. You stand in front of him blindfolded, naked, and full of anticipation.'
  788. 'He orders you to get down on your knees, he grabs your head and tells you to open your mouth. While pleasuring him he orders you to stop and moves the cock away from the mouth. He then lies down on the ground and tells you to mount him. You move on top of him while he grabs his cock and leads it inside your ass. He frantically starts thrusting his cock inside your ass, cumming after a short while.'
  789. gs 'arousal', 'bj', 10, 'sub', 'group', 'rough'
  790. gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
  791. minut -= 10
  792. gs 'stat'
  793. act 'Pleasure Vasyan':
  794. *clr & cla
  795. gs 'boyStat', 'A62'
  796. pose = 1
  797. gs 'stat'
  798. temp_gr = RAND(0,2)
  799. if temp_gr = 0:
  800. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex9.jpg"></center>'
  801. 'Vasyan tells you he heard about a sex position where both of you will reach ecstasy. Intrigued by this you take your clothes off and start caressing his cock. He removes your hand from his cock and tells you to get down on your hands and knees. Vasya walks behind you, grabs his cock and enters you from behind. You gasp as he mounts you. Soon enough you both cry out in ecstasy cumming at the same time.'
  802. $orgasm_or = 'yes'
  803. gs 'arousal', 'bj', 10, 'sub', 'group', 'rough'
  804. gs 'arousal', 'vaginal', 10, 'sub', 'group', 'rough'
  805. minut -= 10
  806. gs 'arousal', 'end'
  807. gs 'stat'
  808. elseif temp_gr = 1:
  809. gs 'boyStat', 'A62'
  810. spafinloc = 12
  811. gs 'cum_manage'
  812. gs'stat'
  813. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex10.jpg"></center>'
  814. 'Vasyan steps closer to you and tells you he wants his cock sucked. You drop down on your knees and start sucking his glans.'
  815. 'Feeling dissatisfied by your performance he grabs you by the head and forces his cock deep down your throat mumbling something about teaching you how to do it properly. He finishes inside your mouth...'
  816. gs 'arousal', 'bj', 5, 'sub', 'group', 'rough', 'deepthroat'
  817. gs 'arousal', 'end'
  818. gs 'stat'
  819. else
  820. gs 'boyStat', 'A62'
  821. pcs_ass += 1
  822. spafinloc = 3
  823. gs 'cum_manage'
  824. gs'stat'
  825. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex11.jpg"></center>'
  826. 'Vasyan forces you to your hands and knees and starts thrusting his dick into your anus.'
  827. gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
  828. gs 'arousal', 'end'
  829. gs 'stat'
  830. end
  831. act 'Leave':gt'gadriver', 'gadbitch'
  832. end
  833. end
  834. end
  835. if pcs_dom > 0:
  836. act 'Leave':gt'gadriver', 'gadbitch'
  837. end
  838. end
  839. if $ARGS[0] = 'fishers':
  840. *clr & cla
  841. menu_off = 1
  842. minut += 2
  843. gs 'stat'
  844. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriverfishers.jpg"></center>'
  845. if fishersday ! daystart:
  846. act 'Greet':
  847. cla
  848. *clr
  849. fishersday = daystart
  850. minut += 3
  851. if fishersQW < 3:fishersQW += 1
  852. gs 'stat'
  853. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/hifishers.jpg"></center>'
  854. 'You politely greet the fishermen, but they are totally focused on fishing, one of them absently waves in your general direction in response.'
  855. if fishersQW >= 3:
  856. act 'Chat':
  857. cla
  858. *clr
  859. minut += 10
  860. if fishersQW = 3:fishersQW = 4
  861. gs 'stat'
  862. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  863. 'You keep watching as the fishermen throw out their lures, one of them catches a fish and shows off his trophy before putting it into the fish bail. The two of you chat about fishing.'
  864. act 'Leave':gt 'gadriver', 'start'
  865. end
  866. end
  867. if fishersQW = 4:
  868. act 'Ask to borrow a fishing rod':
  869. cla
  870. *clr
  871. minut += 10
  872. fishersQW = 5
  873. gs 'stat'
  874. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  875. 'You decide to try your luck at fishing and ask the fishermen if they could lend you a fishing rod. A friend of the family, Uncle Stepan points to a pile of spare rods and tells you to pick one.'
  876. act 'Fishing':gt 'gadriver', 'fishing'
  877. end
  878. end
  879. if fishersQW = 5:
  880. act 'Fishing with them':
  881. cla
  882. *clr
  883. minut += 10
  884. gs 'stat'
  885. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  886. 'You decide to join your new friends, Uncle Stepan tells you he has plenty of spare rods, and he hands you a rod while his eyes travel up and down your body.'
  887. act 'Fishing':gt 'gadriver', 'fishing'
  888. end
  889. end
  890. act 'Leave':gt 'gadriver', 'start'
  891. end
  892. else
  893. act 'Leave':gt 'gadriver', 'start'
  894. end
  895. end
  896. if $ARGS[0] = 'fishing':
  897. cla
  898. *clr
  899. menu_off = 1
  900. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
  901. 'The stream quietly flows over the rocks, pleasantly tickling your ears. You gaze at the village that''s completely peaceful, there is a sense of serenity about it today.'
  902. 'You caught <<fish>> fish.'
  903. if hour < 22:
  904. act 'Throw the bait':
  905. *clr & cla
  906. minut += RAND(5,10)
  907. if hour < 12:
  908. temp_gr = RAND(5,20)
  909. elseif hour >= 12 and hour < 18:
  910. temp_gr = RAND(0,20)
  911. else
  912. temp_gr = RAND(10,20)
  913. end
  914. gs 'stat'
  915. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/fishingriver.jpg"></center>'
  916. 'You throw out the lure and carefully watch the bobber for signs of nibble.'
  917. if temp_gr > RAND(15,19):
  918. cla
  919. *clr
  920. minut += 1
  921. gs 'stat'
  922. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/nofishingriver.jpg"></center>'
  923. 'Suddenly the bobber dives under the water dramatically. You got one!'
  924. act 'Pull':
  925. cla
  926. *clr
  927. minut += 1
  928. temp_gr = RAND(0,120)
  929. if temp_gr < 50:react_exp += 1
  930. gs 'stat'
  931. if pcs_react > temp_gr:
  932. pcs_mood += rand(5,10)
  933. minut += 1
  934. react_exp += 1
  935. fish += 1
  936. gs 'stat'
  937. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/fishyes.jpg"></center>'
  938. 'You skillfully strike, pulling the rod up sharply. You feel the rod straining slightly, and after a few moments, you excitedly pull a small fish out of the water.'
  939. else
  940. pcs_mood -= rand(5,10)
  941. minut += 1
  942. gs 'stat'
  943. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
  944. 'You strike, but the lack of tension makes the fish escape from the hook.'
  945. end
  946. act 'Throw another bait':gt 'gadriver', 'fishing'
  947. end
  948. else
  949. 'The bobber remains perfectly still, eventually you decide to try a different lure.'
  950. act 'Retrieve bait':gt 'gadriver', 'fishing'
  951. end
  952. end
  953. act 'Finish':
  954. cla
  955. *clr
  956. minut += 5
  957. gs 'stat'
  958. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  959. 'You''re feeling tired, so you return the fishing rod to uncle Stepan.'
  960. if fish > 0:
  961. act 'Release your catch':
  962. cla
  963. *clr
  964. minut += 5
  965. fish = 0
  966. gs 'stat'
  967. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  968. 'You decide to release all the fish you caught today, the other fishermen shake their heads disapprovingly, throwing sidelong glances at your body as you dump the fish back into the river.'
  969. act 'Leave':gt $loc, $metka
  970. end
  971. act 'Give the fish to Uncle Stepan':
  972. cla
  973. *clr
  974. minut += 5
  975. fish = 0
  976. gs 'stat'
  977. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  978. 'You give all the fish you caught to uncle Stepan and he makes a show out of reluctantly accepting them, but you can see that he is actually quite happy with this arrangement.'
  979. act 'Leave':gt $loc, $metka
  980. end
  981. act 'Bring a fish to Boniface':
  982. cla
  983. *clr
  984. minut += 5
  985. fish -= 1
  986. pcs_mood += RAND(15,40)
  987. gs 'stat'
  988. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/villcat2.jpg"></center>'
  989. 'As soon as you enter the house, Boniface immediately jumps down to the floor and twines around your feet. The furry beast starts yowling very loudly and pawing at your legs. He has obviously detected the smell of fresh fish. You treat Boniface to a small fish and within a few minutes all that remains is a pile of fish bones.'
  990. if fish >0: fish = 0 & 'You try to give the rest of the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
  991. act 'Finish': gt 'Gadhouse'
  992. end
  993. act 'Give the fish to your grandmother':
  994. cla
  995. *clr
  996. minut += 5
  997. '<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/givefish.jpg"></center>'
  998. 'You try to give the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
  999. act 'Finish': gt 'Gadhouse'
  1000. end
  1001. else
  1002. act 'Leave':gt $loc, $metka
  1003. end
  1004. end
  1005. else
  1006. cla
  1007. *clr
  1008. minut += 5
  1009. pcs_mood -= RAND(5,10)
  1010. gs 'stat'
  1011. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  1012. 'Uncle Stepan says, "It''s time to head home, young lady." You reluctantly return his fishing rod, knowing that''s it for today.'
  1013. if fish > 0:
  1014. act 'Release your catch':
  1015. cla
  1016. *clr
  1017. minut += 5
  1018. fish = 0
  1019. gs 'stat'
  1020. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  1021. 'You decide to release all the fish you caught today, the other fishermen shake their heads disapprovingly, throwing sidelong glances at your body as you dump the fish back into the river.'
  1022. act 'Leave':gt $loc, $metka
  1023. end
  1024. act 'Give to Uncle Stepan':
  1025. cla
  1026. *clr
  1027. minut += 5
  1028. fish = 0
  1029. gs 'stat'
  1030. '<center><img <<$set_imgh>> src="images/locations/gadukino/river/talkfishers.jpg"></center>'
  1031. 'You give all the fish caught to uncle Stepan and he reluctantly accepts them, you can see he is quite happy with this arrangement.'
  1032. act 'Leave':gt $loc, $metka
  1033. end
  1034. act 'Bring a fish to Boniface':
  1035. cla
  1036. *clr
  1037. minut += 5
  1038. fish -= 1
  1039. pcs_mood += RAND(15,40)
  1040. gs 'stat'
  1041. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/villcat2.jpg"></center>'
  1042. 'As soon as you enter the house, Boniface immediately jumps down to the floor and twines around your feet. The furry beast starts yowling very loudly and pawing at your legs. He has obviously detected the smell of fresh fish. You treat Boniface to a small fish and within a few minutes all that remains is a pile of fish bones.'
  1043. if fish >0: fish = 0 & 'You try to give the rest of the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
  1044. act 'Finish': gt 'Gadhouse'
  1045. end
  1046. act 'Give the fish to your grandmother':
  1047. cla
  1048. *clr
  1049. minut += 5
  1050. '<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/givefish.jpg"></center>'
  1051. 'You try to give the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
  1052. act 'Finish': gt 'Gadhouse'
  1053. end
  1054. else
  1055. act 'Leave':gt $loc, $metka
  1056. end
  1057. end
  1058. end
  1059. --- gadriver ---------------------------------