# 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

	!!!Maruda hair mod
	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.'

				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.'

			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.'
				if Kavslut > 0:'Ira tells you that she knows that you fuck Caucasians in the evenings at the moment.'
			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

		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!'
			if Kavslut > 0:'Caucasian slut you stomp away.'

			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'

		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'

				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'

			exit
		end

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

	act 'Help Givi':gt 'kavkazkafe', 'podgivi'
}

--- kafedinamic ---------------------------------