glife/locations/katjaEv

# 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 run 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 another 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_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 of 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 her 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 of 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 her skirt. Showing you her tender pussy, she seems to have forgotten her panties.'
	end
	'You walk through the streets Pavlovsky together with Kate to her house. You and chatted about all sorts of trivia and have fun.'

	if albinaQWdance > 0 and AlbinaBlokDance = 0:'Katja is very interested in how you are doing with your pro-dancing. In her opinion it is a very private team and there have been many rumors about Albina''s 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 & '"I liked kissing, even if we had to kiss all the boys too, well, all of them but the jerk that 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>'
	'Katja''s 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) + (mentats_dose - rand(0,mentats_dose))
	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 gets 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 kissing and learn that way?"'
		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 gets 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 >= 20:
		'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

					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 suddenly busy with other things.'

						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

						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 around your bikini area.'

								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

				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 < 20:
		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.'
	'Katyas nimble tongue darts into your mouth, you suck on her tongue, then your tongue goes into Katja''s mouth and she very gently caressed it with her tongue and sucks on your tongue.'
	'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 Katja''s tender breasts and she sighs deeply, biting her lip.'
			katjalustrand = rand(0, 30)

			if KatjaLust < katjalustrand:
				'You''re  touching each others breasts 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 Katja''s 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

!!School and dance actions
if $ARGS[0] = 'kiss_events':
	cla
	if flag_start_parc = 0: 
		flag_start_parc += 1 
		'While you kissed Katja, someone came nearby sighed loudly, probably, appreciating the view. But when you could break away from Katya''s lips, there was no one there.'
		if $loc = 'gdkin':
			act 'Return to dance': gt 'gdkin'
		else
			gs 'gschool_lessons', 'afternoon'
		end
	elseif flag_start_parc = 1:
		flag_start_parc += 1 
		if hcol = 0: $textEvent = 'fire in the night' 
		if hcol = 1: $textEvent = 'the sun in the autumn sky' 
		if hcol = 2: $textEvent = 'two intertwining flames,' 
		if hcol = 3: $textEvent = 'the sun at the dawn'
		'While you kissed Katja, someone came nearby sighed loudly, probably, appreciating the view.'
		'"Like <<$textEvent>>, you girls are just so a part of each other. Are all girls as close as the two of you?" You''re so surprised with this unexpectedly accurate comparison, then turned around and saw Ivan Prokhorov, who tenderly looked at you and Katja.'
		'"Thank you, MAN and I don''t know." you reply. He again sighed, and left misty-eyed.'
		if $loc = 'gdkin':
			act 'Return to dance': gt 'gdkin'
		else
			gs 'gschool_lessons', 'afternoon'
		end
	elseif flag_start_parc >= 2:
		'While you kissed Katja, someone came nearby sighed loudly, probably, appreciating the view.'
		'"How beautiful," again it was Ivan, he was waiting for you or something. Not being distracted, you continued to kiss Katja.' 
		'"Look, look, lesbians." one guy yelled and pointed at Katja and you.'
		act 'Glare the moron':gt 'katjaEv', 'moron'
	end
end

if $ARGS[0] = 'moron':
	*clr
	cla
	'<center><img src="images/qwest/alter/katja/glare.jpg"></center>'
	'You glare at the moron calling you lesbians.'
	act 'Sing a different tune':
		*clr
		cla
		'<center><img src="images/qwest/alter/katja/frenchkiss.jpg"></center>'
		'Looking at Ivan, then for this idiot, it seems that Ivan didn''t notice, you sighed and said to the idoit. "Is that really necessary? She is my best friend and we want kiss, you just seem jealous.'
		'"Lesbians, lesbians." He continued to scream like a freak, so much that people began to gather around to find out, what''s happening. Ivan stepped over next to you and put his hand on your shoulder, giving the idiot a glare as well. Boosted by Ivan''s support you continued. "We like boys, just not assholes like you!" with those words, you stood on tiptoe, clasping and Ivan''s head in his hands and gave him a deep long passionate kiss, with lots of tongue.'
		act 'Kiss again':
			*clr
			cla
			if flag_KissEV = 0: flag_KissEV = 1
			'<center><img src="images/qwest/alter/katja/prohorov_3.jpg"></center>'
			'"And I can kiss all the boys." you said, under the joyous hubbub of guys gathering near you. You began to kiss all the boys in succession, carefully avoiding the that called you a lesbian.'
			'Seeing this he said offended. "The redhead doesn''t like guys, I bet." hoping Katja will kiss him to prove him wrong.'
			'But Katja recovered and said. "Wrong again loser.", and began to repeat your route, of kissing the boys.'
			if $loc = 'gdkin':
				'After kissing the last boy, you turn back and make sure Katya kisses all of them too. You now realise the guys are hoping for more and quickly drag Katya away before you accidentally start an orgy.'
				act 'Return to dance': gt 'gdkin'
			else
				'Just as you, kissed the last boy, you turned around to see how Katya was doing with her kissing, but then the bell rang, and you all rushed to class.'
				gs 'gschool_lessons', 'afternoon'
			end
		end	
	end
	
	act 'Keep silent':
		*clr
		cla
		'<center><img src="images/qwest/alter/katja/punch.jpg"></center>'
		'Ivan turned to glare at the guy. "Shut the fuck up." he said in a menacing tone.'
		'The snorts at Ivan. "Lesbian lover."'
		'Ivan didn''t reply, and just punched him in the face, dropping him with a single hit.'
		'A bit shocked but also pleased Ivan would defend you like that. "Thank you Ivan, seriously that was sweet." you said, but Katja only nodded dumbfounded.'
		'Ivan shrugged, looking a little embarrassed. But it was obvious, he was pleased.'
		act 'Thank Ivan':
			*clr
			cla
			if npcSex[3] = 1 and $loc ! 'gdkin':
				'<center><img src="images/qwest/alter/katja/whisper.jpg"></center>'
				'Approaching Ivan, you raised up on tiptoe, and, clasping her arms round his neck, and kissed, and then whispered. "Like kissing girls?" Ivan only replied with a dumbfounded nodded, "Well, then we can show you our appreciation, right Katja?"'
				'Katya, nods only half paying attention. Then it hit her what you said, she looked at Ivan, at you and her eyes lit up with lustful fire, "Right."'
				act 'Hug Katja': gt 'katja_sex','prohorov_sex'
			else
				'<center><img src="images/qwest/alter/katja/frenchkiss.jpg"></center>'
				'"Thank you, Ivan." with these words, you french kissed him. He responded and passionately kissed you back, then left.'
				'"Well, these athletes are hot." Katja said with a sigh, while looking at Ivan''s ass as he walked away.'
				if knowKatjaPreg = 1: 
					'You snort and look at Katja "Just what you need when You already have one inside."'
				else
					'You only snorted at Katja''s words, although Ivan did have a fine looking ass.'
				end

				if $loc = 'gdkin':
					act 'Return to dance': gt 'gdkin'
				else
					gs 'gschool_lessons', 'afternoon'
				end
			end
		end	
	end
end

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