# katjaEv

if $ARGS[0] = '':
	CLOSE ALL
	katjaMeynoldday = daystart
	gs 'stat'
	gs 'KatjaHomeDin'
	gs 'katjaEvDin'
	'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
	'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	'Katja looks at you, smiling. "<<$name>>, come to my house, we can help each other with our homework."'

	if fedorKozlovQW >= 10:'You and Katja suitable into Fedor. "Hi girls, what you up to?" Katja says, embarrassed. "We are just going to do our homework together." Fedor thinks for a bit, then says, "Okay. Then I''ll see you anot time." Then turns and walks away.'

	'KatjaLust - <<KatjaLust>>'
	'KatjaSlut - <<KatjaSlut>>'
	'KatjaDom - <<KatjaDom>>'
	'KatjaMastr - <<KatjaMastr>>'

	act 'Say goodbye and go home':gt 'pavResidential'

	act 'Go with Katja': gt 'katjaEv', '1'
end

if $ARGS[0] = '1':
	cls
	minut += 15
	manna += 100
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
	if month=1 or month=2 or month=12 or month=11:
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	else 	
		'<center><img src="images/qwest/alter/katja/Katja_go_home.jpg"></center>'
		if katja_scool_sex=1 and KatjaHorny > 60 and rand (1,3) = 1: *clr & '<center><img src="images/qwest/alter/katja/Katja_go_home_tanga.jpg"></center>' & 'You walk through the streets Pavlovsky together with Kate to her house. You and chatted about all sorts of trivia and have fun. Suddenly Kate stopped and turned around looking at you, a mischievous look lifted myself skirt. Showing you her panties. '
		if Katja_tanga_end=1 and KatjaHorny > 60 and rand (1,3) = 1: *clr & '<center><img src="images/qwest/alter/katja/Katja_go_home_no_tanga.jpg"></center>' & 'You walk through the streets Pavlovsky together with Kate to her house. You and chatted about all sorts of trivia and have fun. Suddenly Kate stopped and turned around looking at you, a mischievous look lifted myself skirt. Showing your tender pussy. Panty looks like she ceased to wear.'
	end
	'You through the streets of the town, with Katja to her house. You are chatting together about all sorts of trivia and fun.'

	if albinaQWdance > 0 and AlbinaBlokDance = 0:'Katja is very interested in how you are getting along with your pro-dancing. In her opinion it is a very private team and there have been many rumors about Albinas team.'
	if kotovLoveQW > 0:'Katja asks you about your relationship with Victor Kotov, expressing her opinion about it. According to her Victor is rude and a true gangster.'

	if pirsA = 1 and KatjaKnowPirsA = 0:
		KatjaKnowPirsA = 1
		KatjaLust += 5
		'Kate noticed you have a pierced tongue and chattered all the way trying to finding out all about it.'
	end

	if flag_KissEV = 1: flag_KissEV = 2 & '- And yet if I hadn`t stepped, we kissed all the boys would too, as you, well, of course besides the jerk, who called us lesbians, - suddenly said Katya. You only snorted in response.'

	'Finally you get to her house. A detached two storey house with attached garages and quite a large garden, giving the impression of neatness and order. Katja shows you to her room.'

	act 'Go to Katjas room': gt 'katjaEv', '2'
end

if $ARGS[0] = '2':
	cls
	minut += 15
	manna += 100
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
	'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	'Katjas room is not that clean and her things are in a circle around her bed. Katja throws her rucksack to the floor with her textbooks and notebooks falling out.'

	act 'Do homework with Katja': gt 'katjaEv', '3'
end

if $ARGS[0] = '3':
	cls
	minut += 30
	grupNPC[14] += 10
	lernHome = 0
	lern += rand(2, 4)
	intel += rand(0, 1)
	katjaLernTimes += 1
	gs 'stat'
	'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	'For half an hour you and Katja pour over your books, you fully learn the lessons and pretty well understand the materials.'

	if katjaLernTimes >= 10: gs 'katjaEv', 'learning'

	act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
end

if $ARGS[0] = 'learning':
	katjaLernQW += 1

	if katjaLernQW < 5:
		katrand = rand(0, 3)

		if katrand = 0:'You notice that Katja stares you in the face, as if she wants to say something, but turns away.'
		if katrand = 1:'You notice that Katja blushed and turned away from you.'
		if katrand = 2:'Katja as if by accident puts her hand on your knee, then quickly removes it.'
		if katrand = 3:'Katja smiles at you, quite a silly smile, then turns away.'
	elseif katjaLernQW = 5:
		gt 'katjaEv', '5'
	elseif katjaLernQW >= 6:
		gt 'katjaEv', '6'
	end
end

if $ARGS[0] = '5':
	'Katja thinks about something, then embarrassed and blushing asks you "<<$name>>, have you kissed a boy?"'

	act 'Yes':
		cls
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'You smile at Katja and say that of course you kissed boys. Katja, even more shyly, "You see <<$name>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Could you teach me how to kiss?"'
		act 'Kiss': gt 'katjaEv', 'kiss'

		act 'No':
			cls
			katjaLernQW = 0
			katjaLernTimes = 1
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
			'You refuse to kiss Katja and she is mad at you.'

			act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
		end
	end

	act 'No':
		cls
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'You shake your head and say that you have never kissed a boy. Katja, even more shyly, "You see <<$name>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Maybe we could try to kiss, that way learn?"'
		act 'Kiss': gt 'katjaEv', 'kiss'

		act 'No':
			cls
			katjaLernQW = 0
			katjaLernTimes = 1
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
			'You refuse to kiss Katja and she is mad at you.'
			act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
		end
	end
end

if $ARGS[0] = '6':
	katjaDeystRand = rand(0, 2)

	if katjaDeystRand = 0:
		dynamic $d_katjahornykiss

		act 'Say goodbye and go home':minut += 15 & KatjaHorny -= 5 & gt 'pavResidential'

		exit
	elseif katjaDeystRand = 1:
		if npcSex[14] = 1:
			if KatjaSlut =< 500:
				'Katja invites you to take a walk in the park.'

			elseif KatjaSlut > 500:
				'"<<$name>>, let''s go to the park, and try and find some boys.'
			end

			act 'Go to the park':
				minut += 15
				KatjaHorny += 5
				$ev_name = 'Katja'
				$ev_name_a= 'Katja'
				$ev_name_om = 'Katja'
				dick = 0
				place = 1
				Frend_num = 14
				p_lust = KatjaLust
				p_slut = KatjaSlut
				p_dom = KatjaDom
				p_horny = KatjaHorny
				p_alko = 0
				gt 'placer'
			end

			act 'Refuse and go home':minut += 15 & KatjaHorny -= 5 & gt 'pavResidential'

			exit
		elseif npcSex[14] = 0:
			KatjaHorny += 5
			KatjaLust += 1
			'Katja starts chatting about boys, cosmetics and school with you.'

			act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
		end
	elseif katjaDeystRand = 2 and sweat > 0:
		'Katja wrinkled her nose "<<$name>>,you''re all sweaty. Do you want to use my shower?"'

		act 'Have a shower':
			cls
			minut += 15
			gs 'stat'

			if KatjaHorny >= 50:
				'Katja takes you in the bathroom. Blushing, she says, "I think I''ll join you."'

				act 'Wash alone':
					cls
					dynamic $showerdin
					minut += 15
					horny += 1
					hapri = 1
					mop = 1
					sweat = -3

					if frost > 0:frost = 0

					gs 'stat'
					'<center><img src="images/pics/dush.jpg"></center>'
					'You kick Katja out of the bathroom and close the door. You get into the shower and begin to lather your body with a cloth.'
					'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'

					act 'Get out of the shower':
						cls
						gs 'stat'
						'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
						'You leave the shower and walk into the Katjas room. You chat with Katja, but she seems to have things to do.'

						act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
					end
				end

				if mesec <= 0:
					act 'Bathe together':
						cls
						dynamic $showerdin
						minut += 15
						horny += 1
						hapri = 1
						mop = 1
						sweat = -3

						if frost > 0:frost = 0

						horny += 10
						KatjaHorny += 10
						KatjaLust += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/shower.jpg"></center>'
						'You and Katja undress and both climb into the shower.'

						if lobok <= 0:
							'Katjas eyes slide over your body lingering a little on your breasts and pussy. Katja moves close to you and you rinse yourself and Katja.'

							act 'further':
								cls
								gs 'stat'
								'<center><img src="images/qwest/alter/katja/shower2.jpg"></center>'
								'Katja gently rubs shampoo into your hair then rinses it out with warm shower jets.'

								if KatjaLust >= 10 and KatjaHorny >= 90:
									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
									dynamic $katja_shower_kiss
								else
									'You and Katja wash yourselves.'

									act 'Get out of the shower':
										cls
										gs 'stat'
										'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
										'You leave the shower and walk into the Katjas room. You chat with Katja, but she seems to have things to do.'

										act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
									end
								end
							end
						elseif lobok > 0:
							'Katja eyes slide over your body lingering a little on your breasts and pubic hair. Katja smiles, "<<$name>>, you''ve got too much hair, it''s not fashionable. I''ll shave it off."'

							act 'Get shaved':
								cls
								minut += 5
								lobok =- 3
								KatjaHorny += 10
								KatjaLust += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/katja/lobok.jpg"></center>'
								'Katja sits in the bath and lathers your crotch (and most of your stomach and chest) with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'

								if KatjaLust >= 10 and KatjaHorny >= 90:
									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
									dynamic $katja_shower_kiss
								else
									'Katja, having finally shaved all the hair between your legs, washes you off with soap.'

									act 'Get out of the shower':
										cls
										gs 'stat'
										'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
										'You leave the shower and walk into the Katjas room. You chat with Katja, but she seems to have things to do.'

										act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
									end
								end
							end
						end
					end
				end
			elseif KatjaHorny < 50:
				dynamic $showerdin
				minut += 15
				horny += 1
				hapri = 1
				mop = 1
				sweat = -3

				if frost > 0:frost = 0

				gs 'stat'
				'<center><img src="images/pics/dush.jpg"></center>'
				'Katja shows you where the toiletries are and leaves you to have a shower. You get into the shower and begin to lather your body with a cloth.'
				'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'

				act 'Get out of the shower':
					cls
					gs 'stat'
					'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
					'You leave the shower and walk into the Katjas room. You chat with Katja, but she seems to have things to do.'
					act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
				end
			end
		end

		act 'Refuse and go home':minut += 15 & KatjaHorny -= 5 & gt 'pavResidential'

		exit
	elseif katjaDeystRand = 2 and sweat <= 0:
		dynamic $d_katjaSextalk
	end
end

if $ARGS[0] = 'kiss':
	cls
	minut += 5
	manna += 100
	horny += 10
	KatjaHorny += 10

	if katjaFirstKiss = 0:
		katjaFirstKiss = 1
		KatjaLust = 10
		KatjaSlut = 10
		KatjaDom = 50
		KatjaOTN = 1
	end

	gs 'stat'
	gs 'katjaEvDin'
	gs 'KatjaHomeDin'
	'<center><img src="images/qwest/alter/katja/kiss.jpg"></center>'
	'You bring your face to Katjas face and feel her hot breath on your lips. Katja closes her eyes and touches her lips to your lips.'
	'In your mouth penetrates Katyas nimble tongue that you start to suck, then your tongue goes into Katjas mouth and she very gently caressed it with her tongue and sucks.'
	'Katja finally pushes away from your flushed face and licks her lips.'

	if KatjaHorny >= 75 and mesec <= 0:
		'Katja moves her hands to your chest and gently touches them with her finger.'

		act 'touch her chest':
			cls
			minut += 5
			horny += 10
			KatjaHorny += 10
			KatjaLust += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/katja/touch.jpg"></center>'
			'You touch Katjas tender breast and she sighs deeply, biting her lip.'
			katjalustrand = rand(0, 30)

			if KatjaLust < katjalustrand:
				'You''re a touch each other breast a little before Katja moves away from you.'

				act 'Further':gt 'KatjaHomeTalk'

				if dom > 0:
					act 'grab her':
						cls
						minut += 5
						horny += 10
						dom -= 1
						KatjaDom -= 5
						KatjaHorny -= 10
						KatjaLust += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/grab.jpg"></center>'
						'You grab Katja firmly so she can''t back away.'

						if dom < KatjaDom:
							'Katja pushes your arms apart and pulls away, you understand that she doesn''t want more.'

							act 'Say goodbye and go home':minut += 15 & gt 'pavResidential'
						else
							'Katja freezes in your arms and you stroke her body and kiss her neck.'

							act 'Lick her breast':
								cls
								minut += 5
								horny += 10
								KatjaDom -= 1
								KatjaHorny += 10
								KatjaLust += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/katja/tits.jpg"></center>'
								'You free Katjas small, firm breasts from under her clothes and begin to lick them, paying special attention to her nipples. Katja closed her eyes in pleasure and bites her lip.'

								if npcSex[14] = 0:
									'After a while Katja moves your hands away.'

									act 'Further':gt 'KatjaHomeTalk'
								elseif npcSex[14] > 0:
									dynamic $d_katja_sex
								end
							end
						end
					end
				end
			else
				'Katja starts stroking your chest stronger and you feel as she undoes your bra, trying to get to your breasts.'

				act 'Let her':
					cls
					minut += 5
					horny += 10
					KatjaDom += 1
					KatjaHorny += 10
					KatjaLust += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/katja/tits.jpg"></center>'
					'Katja bares your breasts and touches them with her fingers, then she bows her head and begins to lick your nipple.'

					if npcSex[14] = 0:
						'Having licked your breasts, Katja stands up and turns to start cleaning her room.'

						act 'Further':gt 'KatjaHomeTalk'
					elseif npcSex[14] > 0:
						dynamic $d_katja_sex
					end
				end

				act 'Remove her hands':
					cls
					dom += 1
					minut += 5
					horny += 10
					KatjaDom -= 1
					KatjaHorny -= 10
					KatjaLust += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
					'You remove her hands and smile at Katja.'

					act 'Further':gt 'KatjaHomeTalk'
				end
			end
		end
	else
		'Katja turns and begins collecting books, pretending that nothing has happened.'

		act 'Say goodbye and go home':gt 'pavResidential'
	end
end

--- katjaEv ---------------------------------