# kafedinamic
$kafetualet = {
cls
'<center><img src="images\LakeCafe\Toilet.jpg"></center>'
'Dirty and smelly toilet that seems to have never been cleaned'
clr
gs 'stat'

turand = RAND(0,100)
if turand = 0:
cls
gs 'stat'
'<center><img src="images\picKav\tuarand.jpg"></center>'
'Go to the toilet as you saw in one of the booths drunk girl with bottle in hand rides a dick guy standing on the toilet rassevshegosya.'
act 'Leave': gt 'kafe','workPred'
exit
end
if turand = 1:
cls
gs 'stat'
'<center><img src="images\picKav\tuarand1.jpg"></center>'
'Go to the toilet that you saw what that skinny girl sucks dick at the guy who shoots everything on camera.'
act 'Leave': gt 'kafe','workPred'
exit
end
if turand = 2:
cls
gs 'stat'
'<center><img src="images\picKav\tuarand2.jpg"></center>'
'Go to the toilet you caught what that redhead girlfriend for suction member.'
act 'Leave': gt 'kafe','workPred'
exit
end

	act 'Look in the mirror':
		cla
		gs 'portmirror'
		set $goto1 = 'kafedinamic'
		set $goto2 = ''
		dynamic $portmirror
		act 'Move away from the mirror':
			cla
			dynamic $kafetualet
		end
	end


	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or  cumanus > 0:
		act 'Wash up (0:15)':
		cla
		*clr
		dynamic $showerdin
		set sweat -= 1
		set minut += 15
		'<center><img src="images\pics\wash5.jpg"></center>'
		'You carefully washed sperm with yourself.'
		act 'Exit': dynamic $kafetualet
		end
	end

	if cumlip > 0 or cumface > 0:
		act 'Wash cum off face (0:15)':
		cla
		*clr
		set mop = 1
		set cumlip = 0
		set cumface = 0
		set sweat -= 1
		set minut += 15
		'<center><img src="images\etogame\facesp.jpg"></center>'
		'You carefully washed sperm from her face.'
		act 'Exit': dynamic $kafetualet
		end
	end

	if cumfrot > 0:
		act 'Wipe the cum from clothing (0:15)':
		cla
		*clr
		set cumfrot = 0
		set sweat -= 1
		set minut += 15
		!'<center><img src="images\etogame\facesp.jpg"></center>'
		'You erase traces of semen from the clothes.'
		act 'Exit': dynamic $kafetualet
		end
	end
	if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Change a tampon':
		cla
		*clr
		set tampon -= 1
		set isprok = 1
		set minut += 5
		set manna -= 5
		'<center><img src="images\pics\wash3.jpg"></center>'
		'You change a tampon.'
		act 'Finish': dynamic $kafetualet
		end
	end

act 'Leave': gt 'kafe','workPred'
}
$gividin = {
cls
gs 'stat'
if hour < 22:
'You came to the bar behind which stands the host cafe Givi K., he´s not looking up from wiping glasses looked at you.'
	if hour = 20 and Givi >= 90:
		act 'Beg off Givi':
		cla
		set minut += 5
		set Givi -= 5
		'You take time off to leave early Givi K.. He was a little angry but let you go.'
		act 'Move away': gt 'street'
		end
	end

	if Kavslut > 0 and IrinaQW >= 10 and IrinaSlut = 0 and hour <= 20:
		act 'Ask Givi raise salaries Ire':
		cla
		IrinaSlut = 1
		set minut += 30
		gs 'stat'
		'You are asked to raise the salary Givi Ira. Givi grunted "What for?" You appeal to the fact that she is your close friend and want to help her. Givi promised to think about the wage increase.'
		act 'Move away': gt 'kafe','workPred'
		end
	end

	act 'Chat with Givi':
	cla
		if GiviSex = 0:
		set minut += 30
		set manna += 5
		if Givi <= 90: set Givi += RAND(10,25)
		if Givi > 90 and GiviSex = 0: Givi = 90
		'You talked at the bar with a cafe owner and part-time bartender Givi K..'
			if Givi = 90:
			'Departing from Givi you suddenly got a hand slap on the ass. Turning around you saw that Givi smiling.'
			end
		act 'Move away': gt 'kafe','workPred'
		end

		if GiviSex >= 1 and kavslut = 0:
		set minut += 63
		set manna += 5
		Givi = 100
		'You talked at the bar with a cafe owner and part-time bartender Givi K..'
		'Wai Svetik, I enjoyed it so much last time. Stay with me tonight, help.'
		'Departing from Givi you suddenly got a hand slap on the ass. Turning around you saw that Givi smiling.'
		act 'Move away': gt 'kafe','workPred'
		end


		if GiviSex >= 1 and kavslut > 0:
		set minut += 30
		set manna -= 5
		set Givi = 100
		set givirand = RAND(0,100)
			if givirand < 10 and Venera < 4:
			'"Svetik I what that napryazhonny, take away my stress" With these words, Givi took you by the hand'
				act 'To kneel':
				cla
				*clr
				set smenaKafe += 1
					if giviSex < 2: set GiviSex = 2
				set bj += 1
				gs 'bdman','givi'
				set SUB += 1
				gs 'stat'
				'<center><img src="images\picVA\barbj.jpg"></center>'
				'You bent down and hid from visitors to the high bar, knelt before Givi, he took a member.'
				gs 'bdsex','autobj'
				'Givi hard grabbed you by the hair and pulled your mouth on his cock deeper.'
					act 'Continue to suck.':
					cla
					*clr
					set swallow += 1
					set cumlip += 1
					gs 'stat'
					'<center><img src="images\picV\swallow1.jpg"></center>'
					'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boy>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
					act 'Move away': gt 'kafe','workPred'
					end
				end
				if GiviSex < 2:
					act 'Sdurel what?':
					cla
					'"Wow, you Svetik you PVCs slut zachem soprotivlyaeshsya I tebe money in salary´ll write more, there will be many deneg dresses buy kasmetika." said Givi'
					act 'Move away': gt 'kafe','workPred'
					end
				end
			end
			if givirand >= 10 or Venera >= 4:
			'Givi strongly slapped you in the ass and whinnied. "<<$name>>, zvezda mineta!"'
			act 'Move away': gt 'kafe','workPred'
			end
		end
	end
else
	if Vnesh < 0:
	'Givi you nods his head, "Goodbye, Svetik."'
		act 'Leave':
		cla
		set minut += 5
		gt 'kafeend'
		end
	else
	dynamic $givipredlogdin
	end
end
}

$ashotdin = {
cls
gs 'stat'
'You went into the kitchen where he studied cooking chef Ashot. Dishwasher <a href="exec:dynamic $tamdin">Tamar</a> as always stands near the sink and washes the dishes.'

if hour < 22:
	act 'Eating and drinking in the kitchen':
	cla
	set minut += 30
	gs 'stat'
	frost = 0
	set health += 10
		if energy >= 30:
		set fat += 5
		'You can no longer have.'
		end
		if energy >= 20 and energy < 30:
		set fat += 3
		set energy += 10
		'You pushed through the power of a meal.'
		end
		if energy < 20:
		set energy += 20
		set fat += 1
		'You gladly ate cooked food.'
		end
		if water >= 20:
		'Tea in you no longer climbs.'
		end
		if water < 20:
		'You gladly drank a mug of tea.'
		set water += 20
		end
	act 'Move away': gt 'kafe','workPred'
	end

	act 'Chat with Ashot':
	cla
	set minut += 30
	set manna += 5
	gs 'stat'
	if Ashot <= 90: set Ashot += RAND(0,5)

		if giviSex > 0 and Ashotsex = 0:
			if Ashot <= 90: set Ashot = 90
			set horny += 10
			'When you entered the kitchen, Ashot came up to you and squeezed his hand your buttock, you can even squealed. Ashot laughed.'
			act 'Move away': gt 'kafe','workPred'
		end
		if giviSex = 0 and Ashotsex = 0:
			'You talked in the kitchen with the chef Ashot.'
			act 'Move away': gt 'kafe','workPred'
		end
		if giviSex > 0 and Ashotsex > 0:
		set Ashotrand = RAND(0,100 )
			if Ashotrand > 20:
				set horny += 10
				'"You´re a cool bitch" said Ashot grabbing you in the ass.'
				act 'Move away': gt 'kafe','workPred'
			end
			if Ashotrand <= 20:
			*clr
			cla
			'When you entered the kitchen, Ashot came up to you and squeezed his buttocks your hands "- Razdevaysya My dick miss on your ass"'
				act 'Allow':
				*clr
				cla
					if analplugin = 1 :
						*clr
						cla
						'<center><img src="images\picKav\analplug.jpg"></center>'
						'Wai what razvratnytsa! - Ashot vosklikunul pulling out of your ass anal plug.'
						set analplugin = 0
						act 'Become confused':

							*clr
							cla
							'<center><img src="images\picKav\analkafe.jpg"></center>'
							'Then you put the cancer and put the dick in the ass. Without giving time sphincter to relax, he was rude to fuck you deep pounding cock. Ashot gripped your hips from members beat you in the ass tears flowed from his eyes. "- Move your ass, move, lustful whore!"'
							act 'Moan':
							*clr
							cla
							'<center><img src="images\picKav\kafeanpie.jpg"></center>'
							set horny += SUB - DOM + ((anus-18)*3)
							'Ashot leaned forward thrusting his cock as deeply as possible.'
							set anal += 1
							if 18 > anus: set anus += 1
							if horny >= 100 :
								horny  = 1
								set orgasm += 1
								set analorgasm += 1
								'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
							end

							'Hot jet of sperm hit your anus. Ashot finished and hit you in the ass, saying that such a hole to fuck and need to fuck. And then pulled out a member and you feel like out of your ass rastrahannoy flowed a trickle of sperm. .'
							set Ashotsex += 1
							set cumanus += 1
							act 'Move away': gt 'kafe','workPred'
							end
						end
					else
						'<center><img src="images\picKav\analkafe.jpg"></center>'
						'Then you put the cancer and put the dick in the ass. Without giving time sphincter to relax, he was rude to fuck you deep pounding cock. Ashot gripped your hips from members beat you in the ass tears flowed from his eyes. "- Move your ass, move, lustful whore!"'
						act 'Moan':
							*clr
							cla
							'<center><img src="images\picKav\kafeanpie.jpg"></center>'
							set horny += SUB - DOM + ((anus-18)*3)
							'Ashot leaned forward thrusting his cock as deeply as possible.'
							set anal += 1
							if 18 > anus: set anus += 1
							if horny >= 100 :
								horny  = 1
								set orgasm += 1
								set analorgasm += 1
								'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
							end

							'Hot jet of sperm hit your anus. Ashot finished and hit you in the ass, saying that such a hole to fuck and need to fuck. And then pulled out a member and you feel like out of your ass rastrahannoy flowed a trickle of sperm. .'
							set Ashotsex += 1
							set cumanus += 1
							act 'Move away': gt 'kafe','workPred'
						end
					end
				end

			end

		end

	end

	if giviSex = 0 and Ashotsex > 0:
	set horny += 10
	'"Slyushay, you´re so juicy ass around my dick skewers wai still remember." said Ashot grabbing you in the ass.'

	end
else
'Ashot lays kitchen appliances in their places ready to go.'
end
act 'Move away': gt 'kafe','workPred'
}



$iradin = {
cls
gs 'stat'
'Ira just not worth than not occupied at the counter.'
if hour < 22:
	act 'Chat with Irina':
	cla
	set minut += 30
	set manna += 5
	gs 'stat'
	set willpower += RAND(0,1)
	if Irina <= 100: set Irina += RAND(0,5)
	gs 'stat'
	'You chatted with the waitress at the bar Ira.'
		if IrinaQW ! 10 or IrinaLesbSex >= 3:
			if GiviSex >= 1 and Kavslut = 0:
			'Ira with round eyes tells you that rumor goes, if you Givi in ​​the mouth take.'
			end
			if Kavslut > 0:
			'Ira tells you that she knows that you fuck Caucasians in the evenings at the moment.'
			end
		end

		if IrinaQW = 10 and IrinaLesbSex = 2:
		IrinaLesbSex = 3
		'Irina bit more relaxed and not twitches in your appearance.'
		end
		if IrinaQW = 10 and IrinaLesbSex = 1:
		IrinaLesbSex = 2
		'Irina you smiling and trying to communicate, but it goes like this strained.'
		end
		if IrinaQW = 10 and IrinaLesbSex = 0:
		IrinaLesbSex = 1
		'Irina clearly looks confused and tries not to look you in the eye. You approached her and tried to calm her down. Irina you nodded and said, "Let´s work to pretend that nothing happened. I do not want that to somebody about it knew." You agree with Ira.'
		end
	act 'Move away': gt 'kafe','workPred'
	end
else
	if IrinaSlut >= 2:
	dynamic $givipredlogdin
	end
	if IrinaSlut < 2:
		act 'Go home with Irina':
		cla
		Irina += 5
		set minut += 5
		gs 'stat'
			if Irina < 100:
				if Irina < 50:
					if GiviSex >= 1 and Kavslut = 0:
					$irinatalk = 'Along the way she basically silent and looks askance at you'
					elseif Kavslut > 0:
					$irinatalk = 'Along the way she basically silent and looks askance at you.'
					else
					$irinatalk = 'Irina mostly silent all the way.'
					end
				$irinaend = 'Near the entrance is reserved to you goodbye and goes to his home.'
				end
				if Irina >= 50:
					if GiviSex >= 1 and Kavslut = 0:
					$irinatalk = 'Along the way she mostly silent, but emboldened begins to ask you about your relationship with Givi.'
					elseif Kavslut > 0:
					$irinatalk = 'Along the way she mostly silent, but emboldened begins to ask you about the adventures with hachami wondering how you can be a litter like you.'
					else
					$irinatalk = 'Irina on the road is about trifles.'
					end
				$irinaend = 'Near the entrance she waves a hand and you go to his home.'
				end
			end
			if Irina >= 100 and IrinaQW = 1:
				if GiviSex >= 1 and Kavslut = 0:
				$irinatalk = 'Irina on the way talks about her ex-boyfriend.'
				elseif Kavslut > 0:
				$irinatalk = 'Irina on the way talks about her ex-boyfriend. And also about how she once made a blowjob in the toilet of the club drunk with what that guy.'
				else
				$irinatalk = 'Irina chatted all the way to the time of day.'
				end
			$irinaend = 'Ira standing at the entrance invites you to come to her.'
			act 'Enjoy a visit to Ira': gt 'IrinaRoom','first'
			end
			if Irina >= 100 and IrinaQW >= 10 and IrinaSlut >= 2:
				if Kavslut > 0:
				$irinatalk = 'Ira smiling tells that she had long wanted to stop being a nun and live freely and she thanks you for your help ..'
				end
			$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'
			act 'Going to visit Ira': gt 'IrinaRoom','first'
			end
			if Irina >= 100 and IrinaQW >= 10 and IrinaSlut = 1:
				if GiviSex >= 1 and Kavslut = 0:
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
				elseif Kavslut > 0:
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure. She notes that although you obviously more experience, so that Ira never slept with two men at once.'
				else
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
				end
			$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'
			act 'Going to visit Ira': gt 'IrinaRoom','first'
			end
			if Irina >= 100 and IrinaQW >= 10 and IrinaSlut = 0:
				if GiviSex >= 1 and Kavslut = 0:
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
				elseif Kavslut > 0:
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure. She notes that although you obviously more experience, so that Ira never slept with two men at once. She also asks her to speak to her before Givi word, she also wants to raise.'
				else
				$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
				end
			$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'
			act 'Going to visit Ira': gt 'IrinaRoom','first'
			end
			if Irina >= 100 and IrinaQW = 2:
				if GiviSex >= 1 and Kavslut = 0:
				$irinatalk = 'Irina mostly silent all the way, but mustered determination says he did not expect that it did not expect from you, in order that you not only sleep with men, but also women. Trying to be polite, it tells you that in general it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
				elseif Kavslut > 0:
				$irinatalk = 'Irina mostly silent all the way, but mustered determination says that from such a whore as you can of course was all expect and tells you that you do without brakes. Trying to be polite, it tells you that in general it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
				else
				$irinatalk = 'Irina mostly silent all the way, but mustered determination says did not expect that such a nice girl like you, actually lesbian. Trying to be polite, it tells you that in general it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
				end
			$irinaend = 'Approaching the entrance it goodbye and leaves.'
			end
			if Irina >= 100 and IrinaQW = 0:
			set IrinaQW = 1
			$irinatalk = 'Ira chirps fun all the way.'
			$irinaend = 'She invites you like something on Saturday to go to visit her and goes to his entrance.'
			end
			'You came and went home with Irina. <<$irinatalk>> you get to the house where he lives Il. <<$irinaend>>'
		act 'Say goodbye': gt 'street'
		end
	end
end
}

$tamdin = {
cls
gs 'stat'
'Tamara without interrupting the dishes turned to you.'
if hour < 22:
	act 'Chat with Tamara':
	cla
	set minut += 30
	set manna += 5
	set willpower += RAND(0,2)
	if Tamara <= 100: set Tamara += RAND(0,5)
	'You talked in the kitchen with a dishwasher Tamara.'
		if GiviSex >= 1 and Kavslut = 0:
		'Tamara snorts. It is necessary, and not ashamed to suck Givi for wages, how disgusting!'
		end
		if Kavslut > 0:
		'Caucasian slut you stomp away.'
		end
	act 'Move away': gt 'kafe','workPred'
	end
else
'She already going home and offers to go along.'
	act 'Go home with Tamara':
	cla
	set minut += 5
	if clener = 1: 'You walk down the street with Tamara, she does not live podaleku from you and when you come to her house she stops poproschatsya with you.'
	if clener = 0: clener = 1 & 'You walk down the street with Tamara, Tamara tells you that she sometimes works as a cleaner in an office building nearby.'
	act 'Say goodbye': gt 'street'
	end
end
}

$givipredlogdin = {
if IrinaSlut >= 2:
'Givi revolves around Ira and Givi not how much embarrassed squeezes her ass and snorts "Wai, Ira, you´re a real slut." He turns to you, "Hey Svetik Stay evening, earn bonuses."'
	act 'Well stay with them':
	gt 'kavkazkafe','podgivi'
	end

	act 'Go home':
	cla
	set minut += 5
	gt 'kafeend'
	end
exit
end
'Givi walks with a notepad and recalculates the bottle. Wai <<$name>>, ti smart head, help count bottles.'
	act 'Sorry, but I must go home':
	cla
	set minut += 5
	'You apologized and steel This collection of home.'
		if GiviSex > 0:
		'Wai Svetik. Remain STEM earn entertain.'
			act 'Yet I´m home':
			cla
			set minut += 5
			gt 'kafeend'
			end

			act 'Help Givi':
			gt 'kavkazkafe','podgivi'
			end
		exit
		end
		if GiviSex = 0:
		'Wai Svetik why offend you? I feel about you as a mother. And you do not want to help the old man.'
			act 'Yet I´m home':
			cla
			Givi = 0
			set minut += 5
			gt 'kafeend'
			end

			act 'Help Givi':
			gt 'kavkazkafe','podgivi'
			end
		exit
		end

		act 'Go home':
		cla
		set minut += 5
		gt 'kafeend'
		end
	end

	act 'Help Givi':
	gt 'kavkazkafe','podgivi'
	end
}
--- kafedinamic ---------------------------------