glife/locations/gadriver

# gadriver

if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
    $location_type = 'public_outdoors'

	clr
	gs 'stat'

	'<center><H4>River Slavka</H4></center>'

	if month >= 5 and month <= 9:
		if hour >= 6 and hour < 22:
			'<center><img src="images/qwest/gadukino/river/gadriver.jpg"></center>'
		else
			'<center><img src="images/qwest/gadukino/river/gadriver_night.jpg"></center>'
		end
	else
		if hour >= 8 and hour < 18:
			'<center><img src="images/qwest/gadukino/river/gadriver_winter.jpg"></center>'
		else
			'<center><img src="images/qwest/gadukino/river/gadriver_winter_night.jpg"></center>'
		end
	end

	'A good sized creek flows lazily a hundred meters from the northern edge of Gadyukino.'
	
	temp = RAND(0,20)
		if temp <= 3 and hour >= 6 and hour < 21 and month >= 5 and month <= 9 and sunWeather = 1:
		fishers = daystart
			'On the banks spread their fishing rods local <a href="exec:gt ''Gadriver'', ''fishers''">fishermen</a>.'
		elseif fishers = daystart and hour < 21 and sunWeather = 1:
			'On the banks spread their fishing rods local <a href="exec:gt ''Gadriver'', ''fishers''">fishermen</a>.'
		end
	if temp = 1 and hour < 5 and month >= 5 and month <= 9 and miragopQW >= 20:'Right next to the path leading to the river, you see a naked <a href="exec: gt ''Gadriver'', ''mirapunish'' ">Mira</a>, bound with ropes between two trees...'


	if temp = 4 and mirainriver = 0 and mitkasextimes >= 13 and hour >= 5 and sub > 0:
		if mitkaguysriver ! daystart:
			mitkaguysriver = daystart
			'Along the way to the river you meet with Kolyambu Vasyanya those persistently invites you to go with them.'
			
			act 'Go with them':
				cls
				minut += 40
				horny = RAND(40,80)
				$boy = 'Kolyamba'
				silavag = 0
				dick = 16
				pose = 1
				sub += 2
				gs 'cum_manage'
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/river/mitkaguysriversex17.jpg"></center>'
				'The boys take you to Vasya''s house, where, they unceremoniously push you forward until your belly is on the kitchen table.  They take turns fucking you...'
				
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum
				
				$boy = 'Vasya'
				dick = 15
				
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum
				
				act 'Finish':minut += 10 & gt'gadukino'
			end
		else
			act 'To the beach':minut += 5 & gt 'Gadriver', 'Gadbitch'
			act 'To the village':minut += 20 & mirainriver = 0 & gt 'gadukino'
		end
	elseif temp = 5 and mirainriver = 0 and mitkasextimes >= 13 and hour >= 5 and sub > 0:
		if mitkaguysriver ! daystart:
			mitkaguysriver = daystart
			'Along the way to the river you meet the village boys, whom you have been drinking with resently, and they ask you to go with them.'
			
			act 'Go with them':
				cls
				minut += 60
				horny = RAND(40,80)
				$boy = 'Mitya'
				silavag = 0
				dick = 18
				pose = 0
				sub += 5
				anus += 3
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/river/mitkaguysriversex18.jpg"></center>'
				'The boys led you to Vasya''s house, where they spend an hour fucking you in the ass...'
				
				dynamic $analsexrude
				
				$boy = 'Kolyamba'
				dick = 16
				
				dynamic $analsexrude
				
				$boy = 'Vasya'
				dick = 15
				
				dynamic $analsexrude
				
				act 'Leave':minut += 10 & gt'gadukino'
			end
		else
			act 'To the beach':minut += 5 & gt 'Gadriver', 'Gadbitch'
			act 'To the village':minut += 20 & mirainriver = 0 & gt 'gadukino'
		end
	elseif temp = 6 and mirainriver = 0 and mitkasextimes >= 13 and hour >= 5 and sub > 0:
		if mitkaguysriver ! daystart:
			mitkaguysriver = daystart
			'Along the way to the river you meet Vasya and he insists you come with him back to his home...'
			
			act 'Go with him':
				cls
				minut += 20
				horny = RAND(40,70)
				$boy = 'Vasya'
				silavag = 0
				dick = 15
				pose = 1
				sub += 2
				gs 'stat'
				
				if mesec = 0:
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex20.jpg"></center>'
					'As soon as you open the door, Vasya start pulling your cloths off rudely.  Once your nude, he pushes you towards the sofa and forces your to your knees on the sofa...'
				else
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex21.jpg"></center>'
					'As soon as you open the door, Vasya start pulling your cloths off rudely.  He then throws you onto his bed.  Noticing, that your slightly bleeding he asks if it your time of the month.  You say, "Yes."  He curses angrily and turns you onto your belly and roughly begins to fuck your ass...'
				end
				if mesec = 0:
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
				else
					dynamic $analsexrude
				end
				
				act 'Finish':minut += 10 & gt'gadukino'
			end
		else
			act 'To the beach':minut += 5 & gt 'Gadriver', 'Gadbitch'
			act 'To the village':minut += 20 & mirainriver = 0 & gt 'gadukino'
		end
	else
		act 'To the beach':minut += 5 & gt 'Gadriver', 'Gadbitch'
		act 'To the village':minut += 20 & mirainriver = 0 & gt 'gadukino'
	end
end

if $ARGS[0] = 'Gadbitch':
	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
    $location_type = 'public_outdoors'
	cls
	gs 'stat'

	'<center><H4>Village Beach</H4></center>'

	if hour >= 6 and hour < 22:
		if sunWeather = 1:
			'<center><img src="images/qwest/gadukino/river/gadbitch_soft.jpg"></center>'
		else
			'<center><img src="images/qwest/gadukino/river/gadbitch_cold.jpg"></center>'
		end
	else
		'<center><img src="images/qwest/gadukino/river/gadbitch_night.jpg"></center>'
	end

	'A small country beach, where you can sunbathe and swim.'

	act 'Get changed':gt 'changingroom', 'view_swim_list'
	
	if sunWeather = 1 and mirainriver = 1:
		if RAND(0,10) < 5:
			'On the beach lays a sunbathing <a href="exec:sun = 1 & gt ''Gadriver'', ''Mira'' ">Mira</a>.'
		else
			'Miroslava is in the river splashing around and having fun <a href="exec:sun = 0 & gt ''Gadriver'', ''Mira'' ">Mira</a>.'
		end
	end
	if mirainriver = 0 and mitkasextimes >= 13 and RAND(0,10) = 0 and hour >= 8 and hour < 20 and month >= 5 and month <= 9 and temper >= 20 and sunWeather = 1:'On the riverbank rests <a href="exec: gt ''Gadriver'', ''GuysRiver'' ">Bob Colby</a>.'

	if temper >= 20 and month >= 5 and month <= 9:

		if $clothingworntype = 'swimwear':
			act 'Have a swim':
				cla
				*clr
				cumspclnt = 4
				gs 'cum_cleanup'
				minut += 30
				sweat = 10 + rand(0,4)
				manna += 5
				willpower += 5
				temp = RAND(0,9)
				if stren < 30:stren += 1 + (steroid_dose - rand(0,steroid_dose)) & gs 'obj_din', 'steroids'
					if hour >= 22 or hour <= 6:
						'<center><img src="images/qwest/gadukino/river/gadriverswim_night.jpg"></center>'
						'You take a nighttime swim in the creek, feeling the refreshing and invigorating water flowing lazily across your body.'
					else
						if RAND(0,10) < 5 and mirainriver = 1:
							'<center><img src="images/qwest/gadukino/river/rivertwogirls.jpg"></center>'
							'You swim in the creek, splashing water with Mira at each other and having fun.'
						else
							'<center><img src="images/qwest/gadukino/river/gadriverswim.jpg"></center>'
							'You swim in the creek, feeling the refreshing and invigorating water flowing lazily across your body.'
						end
					end
				act 'Get out of the water':
					if mirainriver = 0 and mitkasextimes >= 13 and temp = 0 and hour >= 8 and hour < 20:
						cls
						minut += 20
						horny = RAND(50,90)
						$boy = 'Mitya'
						silavag = 0
						dick = 18
						pose = 0
						sub += 1
						spafinloc = 12
						gs 'cum_manage'
						spafinloc = 11
						gs 'cum_manage'
						gang += 1
						stat['bj'] += 3
						swallow += RAND(0,3)
						gs 'stat'
						
						'<center><img src="images/qwest/gadukino/river/mitkaguysriversex13.jpg"></center>'
						'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 in your direction.  After a few moments you see the smirking faces of the  village boys with Mitya headed towards the river where your still in the water.  They quickly undress on the river bank and enter 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.'
						
						act 'Finish':minut += 5 & gt'Gadriver', 'Gadbitch'
					elseif mirainriver = 0 and mitkasextimes >= 13 and temp = 1 and hour >= 8 and hour < 20 and sub > 0:
						cls
						minut += 20
						horny = RAND(50,90)
						$boy = 'Kolyamba'
						dick = 16
						pose = 1
						sub += 1
						gs 'stat'
						
						'<center><img src="images/qwest/gadukino/river/mitkaguysriversex19.jpg"></center>'
						'As soon as you get out of the river, you come across a grinning Kolyambu.  He smiles wickedly and demands you get down on your hands and knees so he can fuck your ass...'
						
						dynamic $analsexrude
						
						act 'Finish':minut += 5 & gt'Gadriver', 'Gadbitch'
					else
						minut += 5 & gt'Gadriver', 'Gadbitch'
					end
				end
			end
		end
		
		act 'Strip and swim naked':
			cla
			*clr
			temp = RAND(0,15)
			cumspclnt = 4
			gs 'cum_cleanup'
			minut = minut + 20
			sweat = 10 + rand(0,4)
			manna = manna + 5
			willpower = willpower + 5
			if stren < 30:stren = stren + 1
			if hour >= 22 and hour <= 6:
				'<center><img src="images/qwest/gadukino/river/watergirls1.jpg"></center>'
				'You take your clothes off and slowly walk in the river.  You swim about lazily and feel the refreshing and invigorating water caressing your body.'
			else
				if temp >= 10 and mirainriver = 1:
					horny += RAND(5,15)
					gs 'stat'
					'<center><img src="images/qwest/gadukino/river/rivertwogirlsnude.jpg"></center>'
					'You walk in the river, you and Mira have a good old fashioned water fight, splashing water at each other with abandon.'
				else
					'<center><img src="images/qwest/gadukino/river/watergirls.jpg"></center>'
					'You took your clothes off and quickly walk into the river, feeling how refreshing and invigorating water is you sigh.'
				end
			end
			act 'Get out of the water':
				if mirainriver = 0 and mitkasextimes >= 13 and temp = 0 and hour >= 8 and hour < 20:
					cls
					minut += 30
					horny = RAND(50,90)
					$boy = 'Mitya'
					silavag = 0
					dick = 18
					pose = 1
					sub += 5
					anus += 1
					vagina += 1
					spafinloc = 12
					gs 'cum_manage'
					spafinloc = 11
					gs 'cum_manage'
					spafinloc = 3
					gs 'cum_manage'
					gs 'cum_manage'
					gang += 1
					swallow += RAND(0,1)
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex12.jpg"></center>'
					'As soon as you got out of the water, you find yourself standing in front of the a couple of the village boys, from the fishing poles they are carrying, you know they were coming to the river to do some fishing.  But, seeing you swimming naked, they instead starting talking amounst themselves about how much a slut you are and are only good for sucking a cock in her mouth, you tell them to fuck off, but they are worked up and not listening to you at all.'
					
					dynamic $analsexrude
					
					$boy = 'Vasya'
					dick = 15
					
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					
					$boy = 'Kolyamba'
					dick = 16
					
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					
					act 'Finish':minut += 5 & gt'Gadriver', 'Gadbitch'
				else
					minut += 5 & gt'Gadriver', 'Gadbitch'
				end
			end
		end
		if hour >= 8 and hour < 20 and sunWeather = 1:
			if $clothingworntype = 'swimwear':
				act 'Sunbathe (1:00)':
					cla
					*clr
					minut += 60
					if sweat < 35 : sweat += 5
					manna += 5

					if temp < 10 and mirainriver = 1:
						'<center><img src="images/qwest/gadukino/river/beachtwogirls.jpg"></center>'
						'You lie next to Mira on the sand and talking about nothing, thrilling in the sun.'
					else
						'<center><img src="images/qwest/gadukino/river/gadrivergirl.jpg"></center>'
						'You sunbathe alone on the river bank.'
					end
					if krem = 0:
						tan += 1
					elseif krem > 0:
						krem -= 1
						tan += 3
						'You smear sun tan lotion all over your body to help prevent a sunburn.  A few minutes later you lay down and start sunbathing.'
					end
					act 'Finish':

						if mirainriver = 0 and mitkasextimes >= 13 and temp = 0 and hour >= 8 and hour < 20:
							cls
							minut += 30
							horny = RAND(50,90)
							$boy = 'Kolyamba'
							silavag = 0
							dick = 16
							pose = 1
							sub += 5
							anus += 1
							vagina += 1
							spafinloc = 12
							gs 'cum_manage'
							spafinloc = 11
							gs 'cum_manage'
							spafinloc = 3
							gs 'cum_manage'
							gs 'cum_manage'
							gang += 1
							swallow += RAND(0,1)
							gs 'stat'
								
							'<center><img src="images/qwest/gadukino/river/mitkaguysriversex15.jpg"></center>'
							'After a while, you hear voices rapidly approaching from the village, in a couple of minutes you see a couple of the village boys emerge from the bushes. Seeing you sunbathing they perk up considerably.  In just a couple of minutes, despite all your sluggish protests, you have all you holes voilated...'
							
							dynamic $analsexrude
							
							$boy = 'Vasya'
							dick = 15
							
							dynamic $analsexrude
							
							$boy = 'Mitya'
							dick = 18

							dynamic $sexstart
							dynamic $sexstart2
							dynamic $sexcum
							
							act 'Finish':minut += 5 & gt'Gadriver', 'Gadbitch'
						elseif mirainriver = 1 and miragopQW >= 15 and temp = 1 and hour >= 8 and hour < 20:
							cls
							minut += 30
							horny = RAND(50,100)
							dom += 5
							gs 'stat'
								
							'<center><img src="images/qwest/gadukino/river/mitkaguysriversex16.jpg"></center>'
							'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 Miroslava 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...'
							
							act 'Finish':minut += 5 & gt'Gadriver', 'Gadbitch'
						else
							minut += 5
							gt'Gadriver', 'Gadbitch'
						end
					end
				end
			end

			act 'Strip and sunbathe nude (1:00)':
				cla
				*clr
				minut += 60
				if sweat < 35 : sweat += 5
				manna += 5
				if temp < 10 and mirainriver = 1:
					'<center><img src="images/qwest/gadukino/river/beachtwogirlsnude.jpg"></center>'
					'You lie next to Mira on the sand and talking about nothing in particular, thrilling in the sun.'
				else
					'<center><img src="images/qwest/gadukino/river/gadrivernude.jpg"></center>'
					'You strip naked and lie down to sunbathe.'
				end
				if krem = 0:
					tan += 1
				elseif krem > 0:
					krem -= 1
					tan += 3
					'You smear suntan lotion all over your body to help prevent a sunburn.  A few minutes you layed down and started sunbathing.'
				end
				act 'Finish sunbathing and get dressed':
					if mirainriver = 0 and mitkasextimes >= 13 and temp = 0 and hour >= 8 and hour < 20:
						cls
						minut += 30
						horny = RAND(50,90)
						$boy = 'Mitya'
						silavag = 0
						dick = 18
						pose = 1
						sub += 5
						anus += 1
						vagina += 1
						gang += 1
						swallow += RAND(0,1)
						gs 'stat'
						
						'<center><img src="images/qwest/gadukino/river/mitkaguysriversex14.jpg"></center>'
						'As you stand up to get dressed, you hear men''s voices rapidly approaching, then a couple of the village boys emerge in front of you. Seeing you, they perk up considerably and in a few minutes, despite all your sluggish protests, they have you on all fours and start to roughly fuck you...'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						spafinloc = 0
						gs 'cum_manage'
						
						$boy = 'Kolyamba'
						dick = 16
						dynamic $analsexrude
						spafinloc = 3
						gs 'cum_manage'
						
						$boy = 'Vasya'
						dick = 15
						dynamic $analsexrude
						spafinloc = 3
						gs 'cum_manage'
						
						act 'Get dressed':minut += 5 & gt'Gadriver', 'Gadbitch'
					else
						minut += 5
						gt'Gadriver', 'Gadbitch'
					end
				end
			end
		end
	end

	act'Leave':
		if $clothingworntype = 'swimwear':
			cla
			'You need to get dressed in regular clothing first.'
			act'Return':gt'Gadriver', 'Gadbitch'
		else
			minut += 5
			gt 'Gadriver', 'start'
		end
	end
end

if $ARGS[0] = 'Mira':
	cls
	minut += 2
	gs 'stat'


	if sun = 1:
		if miragopQW < 12:
			'<center><img src="images/qwest/gadukino/river/mirabeach.jpg"></center>'
		else
			'<center><img src="images/qwest/gadukino/river/mirabeachnude.jpg"></center>'
		end
	else
		if miragopQW < 12:
			'<center><img src="images/qwest/gadukino/river/mirariver.jpg"></center>'
		else
			'<center><img src="images/qwest/gadukino/river/mirarivernude.jpg"></center>'
		end
	end
	act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'

	act 'Chat':
		cls
		minut += 10
		manna += 10
		gs 'stat'
		if sun = 1:
			if miragopQW < 12:
				'<center><img src="images/qwest/gadukino/river/mirabeach.jpg"></center>'
			else
				'<center><img src="images/qwest/gadukino/river/mirabeachnude.jpg"></center>'
			end
		else
			if miragopQW < 12:
				'<center><img src="images/qwest/gadukino/river/mirariver.jpg"></center>'
			else
				'<center><img src="images/qwest/gadukino/river/mirarivernude.jpg"></center>'
			end
		end
		'You are chatting with Mira about trivial things.'
		act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
	end
end

if $ARGS[0] = 'mirapunish':
	cls
	minut += 10
	horny += RAND(25,75)
	gs 'stat'

	'<center><img src="images/qwest/gadukino/river/mirapunish.jpg"></center>'
	'You come closer to her and Miroslava looks embarrassed and smiles at you.  She emplores you to release her.  As you untie her, she tells you that Kolyamba punished her for lightly bitting his cock as she sucked it...'
	'"Thank God,"  she said with a sigh of relief as you finish untying her.  "It was you who found me and not one of those crone from the village.  They would be raising caine and calling me a whore.  Those old bitches hate us you know.  We''re young and beautiful and they are just mean bitches." spoke the naked Mirka, revealing her true feelings about the villagers.  She continues quitely,"Or it could have been someone else who would have abused me, even rape me, kill m..."  Suddenly, Mira is in your arms weeping.  "Thank you," she tells you.  "You saved my life!"'

	act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
end

if $ARGS[0] = 'GuysRiver':
	cls
	minut += 5
	horny += 10
	gs 'stat'
	temp = RAND(0,10)
	
	'<center><img src="images/qwest/gadukino/river/mitkaguysriver.jpg"></center>'
	'"Oh, hi <<$nickname>>, so just you today?" Kolyamba smiled.'
	if temp <= 4:
		'"It looks like nobody is around, and we are horny as a bull frogs, you want to have a little fun with us?  Let''s take a look at that pussy, spread you legs, and rub that pussy...'
	elseif temp > 4 and temp <= 8:
		'"It looks like nobody is around, and we are horny as a bull frogs, you want to have a little fun with us?  How about you give us blowjobs?  We''ll be thankful even, ha-ha!"'
	else
		'"Ah, no Mira, its just our other hot babe.  Come here lovely, I have something for you."'
	end
	if temp < 4:
		act 'serve Kolyambu':
			cls
			$boy = 'Kolyamba'
			silavag = 0
			pose = 0
			dick = 16
			minut += 10
			horny += RAND(25,75)
			temp = RAND(0,2)
			gs 'stat'
			
			'<center><img src="images/qwest/gadukino/river/mitkaguysriversex.jpg"></center>'
			'You quickly take off your pants and climb onto Mosta Kolyambu, hand griping his cock.'

			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			
			act 'serve Vasya':
				cls
				$boy = 'Vasya'
				silavag = 0
				pose = 0
				dick = 15
				minut += 10
				horny += RAND(25,75)
				gs 'stat'
				temp = RAND(0,2)
				
				if temp = 0:
				
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex1.jpg"></center>'
					'Vasya, rolls you onto your back lowers his cock into your open pussy.'
					
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					
				elseif temp = 1:
					$boy = 'Vasya'
					horny += 15
					minut += 5
					dick = 15
					spafinloc = 12
					gs 'cum_manage'
					stat['bj'] += 1
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex2.jpg"></center>'
					'Bob steps up to you and unceremoniously smacks you in the face with his hand and then with his dick.'
					gs'oral','start'
					'He forces his cock into you mouth and soon cums abundantly in your mouth...'						
				else
					$boy = 'Vasya'
					horny += 10
					minut += 10
					anus += 1
					spafinloc = 3
					gs 'cum_manage'
					dick = 15
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex3.jpg"></center>'
					'Bob forces you to your hands and knees and starts pumping his dick into your anus.'
					dynamic $analsexrude
				end
				act 'Leave':minut += 5 & gt'Gadriver', 'Gadbitch'
			end
		end
	elseif temp < 8:
		act 'serve Kolyambu':
			cls
			$boy = 'Kolyamba'
			horny += 15
			minut += 5
			dick = 16
			spafinloc = 12
			gs 'cum_manage'
			stat['bj'] += 1
			gs'stat'
			
			'<center><img src="images/qwest/gadukino/river/mitkaguysriversex4.jpg"></center>'
			'You bend over the collapsed and panting Kolyamby and take his cock into your mouth and start sucking it...'
			gs'oral','start'
			'He is soon pumping a load of cum into your mouth...'
			
			act 'serve Vasya':
				cls
				$boy = 'Vasya'
				silavag = 0
				pose = 0
				dick = 15
				minut += 10
				horny += RAND(25,75)
				gs 'stat'
				temp = RAND(0,2)
				
				if temp = 0:
				
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex5.jpg"></center>'
					'Vasya, rolls you onto your back lowers his cock into your open pussy'
					
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					
				elseif temp = 1:
					$boy = 'Vasya'
					horny += 15
					minut += 5
					dick = 15
					spafinloc = 12
					gs 'cum_manage'
					stat['bj'] += 1
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex6.jpg"></center>'
					'Bob steps up to you and unceremoniously smacks you in the face with his hand and then with his dick.'
					gs'oral','start'
					'He forces his cock into you mouth and soon cums abundantly in your mouth...'						
				else
					$boy = 'Vasya'
					horny += 30
					minut += 10
					anus += 1
					spafinloc = 3
					gs 'cum_manage'
					dick = 15
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex7.jpg"></center>'
					'Bob forces you to your hands and knees and starts pumping his dick into your anus.'
					dynamic $analsexrude
				end
				act 'Leave':minut += 5 & gt'Gadriver', 'Gadbitch'
			end
		end	
	else
		act 'serve Kolyambu':
			cls
			$boy = 'Kolyamba'
			horny += 30
			minut += 10
			anus += 1
			spafinloc = 3
			gs 'cum_manage'
			dick = 16
			gs'stat'
			
			'<center><img src="images/qwest/gadukino/river/mitkaguysriversex8.jpg"></center>'
			dynamic $analsexrude
			
			act 'serve Vasya':
				cls
				$boy = 'Vasya'
				silavag = 0
				pose = 1
				dick = 15
				minut += 10
				horny += RAND(25,75)
				gs 'stat'
				temp = RAND(0,2)
				
				if temp = 0:
				
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex9.jpg"></center>'
					'Vasya, rolls you onto your back lowers his cock into your open pussy.'
					
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					
				elseif temp = 1:
					$boy = 'Vasya'
					horny += 15
					minut += 5
					dick = 15
					spafinloc = 12
					gs 'cum_manage'
					stat['bj'] += 1
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex10.jpg"></center>'
					'Bob steps up to you and unceremoniously smacks you in the face with his hand and then with his dick.'
					gs'oral','start'
					'He forces his cock into you mouth and soon cums abundantly in your mouth...'					
				else
					$boy = 'Vasya'
					horny += 30
					minut += 10
					anus += 1
					spafinloc = 3
					gs 'cum_manage'
					dick = 15
					gs'stat'
					
					'<center><img src="images/qwest/gadukino/river/mitkaguysriversex11.jpg"></center>'
					'Bob forces you to your hands and knees and starts pumping his dick into your anus.'
					dynamic $analsexrude
				end
				act 'Leave':minut += 5 & gt'Gadriver', 'Gadbitch'
			end
		end
	end	
	if dom > 0:
		act 'Leave':minut += 5 & gt'Gadriver', 'Gadbitch'
	end
end

if $ARGS[0] = 'fishers':
	cls
	minut += 2
	gs 'stat'

	'<center><img src="images/qwest/gadukino/river/gadriverfishers.jpg"></center>'
	
	if fishersday ! daystart:
		act 'Greet':
			cla
			*clr
			fishersday = daystart
			minut += 3
			if fishersQW < 3:fishersQW += 1
			gs 'stat'
			
			'<center><img src="images/qwest/gadukino/river/hifishers.jpg"></center>'
			'You politely greet the fishermen, but they are totally focused on fishing, one of them absently waves in your general direction in response.'
			
			if fishersQW >= 3:
				act 'Chat':
					cla
					*clr
					minut += 10
					if fishersQW = 3:fishersQW = 4
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
					'You keep watching as the fishermen throw out their lures, one of them catches a fish and shows his trophy before putting it into the fish bail. The two of you chat about the fishing and what fish can be caught around the village.'
				
					act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
				end
			end
			if fishersQW = 4:
				act 'Ask to borrow a fishing rod':
					cla
					*clr
					minut += 10
					fishersQW = 5
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
					'You decide to try you hand at fishing and ask the fishermen if they could lend you a fishing rod.  Already familiar to you, Uncle Stepan points to a pile of spare rods and tells you to have fun.'
				
					act 'Fishing':gt 'Gadriver', 'fishing'
				end
			end
			if fishersQW = 5:
				act 'Fishing with them':
					cla
					*clr
					minut += 10
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
					'You decide to join your new friends, and Uncle Stepan is tells you he has plenty of spare rods, and he hands you a rod while his eyes travel up and down your body.'
				
					act 'Fishing':gt 'Gadriver', 'fishing'
				end
			end
			act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
		end
		
		act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
	else
		act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
	end
	
end

if $ARGS[0] = 'fishing':
	cla
	*clr
	'<center><img src="images/qwest/gadukino/river/gadriver.jpg"></center>'
	'The stream quietly washing over rocks, pleasantly tickling the ears.  You gaze about the village, which is peaceful and has a sense of tranquility about it today.'
	'You caught <<fish>> fish.'
	if hour < 22:
		act 'Throw the bait':
			cls
			minut += RAND(5,10)
			if hour < 12:
				temp = RAND(5,20)
			elseif hour >= 12 and hour < 18:
				temp = RAND(0,20)
			else
				temp = RAND(10,20)
			end
			gs 'stat'
			
			'<center><img src="images/qwest/gadukino/river/fishingriver.jpg"></center>'
			'You throw out the lure and carefully watch the bobber for the signs of nibble.'
			
			if temp > RAND(15,19):
				cla
				*clr
				minut += 1
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/river/nofishingriver.jpg"></center>'
				'Suddenly the bobber dives under the water dramatically.  You got one!'
				
				act 'Pull':
					cla
					*clr
					minut += 1
					temp = RAND(0,120)
					if temp < 50:react += 1
					gs 'stat'
					
					if react > temp:
						manna += mannamax/RAND(10,20)
						minut += 1
						react += 1
						fish += 1
						gs 'stat'
						'<center><img src="images/qwest/gadukino/river/fishyes.jpg"></center>'
						'You deftly strike, wrenching the rod up sharply.  You feel the rod straining slightly, and after a few moments, you excitedly pull out of the water a small fish.'
					else
						manna -= mannamax/RAND(10,20)
						minut += 1
						gs 'stat'
						'<center><img src="images/qwest/gadukino/river/gadriver.jpg"></center>'
						'You strike, but from the lack of tension it''s too late, fish already escape from the hook'
						
					end
					act 'Throw another bait':gt 'Gadriver', 'fishing'
				end
			else
				'The bobber remains perfectly still, eventually you decide to try a different lure.'
				act 'Retrieve bait':gt 'Gadriver', 'fishing'
			end
		end
		act 'Finish':
			cla
			*clr
			minut += 5
			gs 'stat'
			
			'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
			'You''re tired, so you return uncle Stepan his fishing rod.'
			if fish > 0:
				act 'Release your catch':
					cla
					*clr
					minut += 5
					fish = 0
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
					'You decide to release all the fish you caught today, other fishmen shake their heads disapprovingly, throwing sidelong glances at your body as dump the fish back into the creek.'
					
					act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
				end
				act 'Give to Uncle Stepa':
					cla
					*clr
					minut += 5
					fish = 0
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
					'You give all the fish you caught to uncle Stepan and he feigned reluctance but accepts them, you can see he is quite happy with this arrangement.'
					
					act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
				end
				act 'Bring a fish to Boniface':
					cla
					*clr
					minut += 5
					fish = 0
					manna += mannamax/RAND(2,5)
					gs 'stat'
					
					'<center><img src="images/qwest/gadukino/villcat2.jpg"></center>'
					'As soon as you enter the house, the furry beast immediately jumps under your feet and starts to meow very loudly.  He can smell of fresh fish.  You treat Boniface to the small fish and within a few minutes all that remains is a pile of fish bones.'
					
					act 'Finish':minut += 2 & gt 'Gadhouse'
				end
			else
				act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
			end
		end
	else
		cla
		*clr
		minut += 5
		manna -= mannamax/RAND(10,15)
		gs 'stat'
		
		'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
		'Uncle Stepan says, "It''s time to head home, young lady."  So you reluctantly return his fishing rod, knowing that''s all for today.'
		
		if fish > 0:
			act 'Release your catch':
				cla
				*clr
				minut += 5
				fish = 0
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
				'You decide to release all the fish you caught today, other fishmen shake their heads disapprovingly, throwing sidelong glances at your body as dump the fish back into the creek.'
				
				act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
			end
			act 'Give to Uncle Stepa':
				cla
				*clr
				minut += 5
				fish = 0
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/river/talkfishers.jpg"></center>'
				'You give all the fish you caught to uncle Stepan and he feigned reluctance but accepts them, you can see he is quite happy with this arrangement.'
				
				act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
			end
			act 'Bring a fish to Boniface':
				cla
				*clr
				minut += 5
				fish = 0
				manna += mannamax/RAND(2,5)
				gs 'stat'
				
				'<center><img src="images/qwest/gadukino/villcat2.jpg"></center>'
				'As soon as you enter the house, the furry beast immediately jumps under your feet and starts to meow very loudly.  He can smell of fresh fish.  You treat Boniface to the small fish and within a few minutes all that remains is a pile of fish bones.'
				
				act 'Finish':minut += 2 & gt 'Gadhouse'
			end
		else
			act 'Leave':minut += 5 & gt 'Gadriver', 'Gadbitch'
		end
	end
end

--- gadriver ---------------------------------