# katjaEv
CLOSE ALL
$din_katja_kiss = {
	act '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 'gorodok'
							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 'gorodok'
		end
	end
}

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

act 'Go with Katja':
	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>'
	'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 teying to finding out all about it.'
	end

	'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':
		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':
			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:
				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:
					'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?"'
						dynamic $din_katja_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 'gorodok'
						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?"'
						dynamic $din_katja_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 'gorodok'
						end
					end

					exit
				elseif katjaLernQW >= 6:
					katjaDeystRand = rand(0, 2)

					if katjaDeystRand = 0:
						dynamic $d_katjahornykiss

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

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

							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 'gorodok'
						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 'gorodok'
									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 'gorodok'
													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 'gorodok'
													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 'gorodok'
								end
							end
						end

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

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

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

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

