glife/locations/KatjaHomeTalk.qsrc

# KatjaHomeTalk
!2022/08/02

!!This files governs Katjas interactions in ther room. For the variable controlling her content see the documentation in katja_procedural.

if $ARGS[0] = '':
	$loc = 'mey_home'
	$loc_arg = '5'
	$menu_loc = 'mey_home'
	$menu_arg = '5'
	$locclass = 'livingr'
	$location_type = 'indoors'
	CLOSE ALL
	menu_off = 1
	gs 'vicky_meynold_schedule'
	gs 'katja_meynold_schedule'
	gs 'stat'
	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'

	if katjaQW['QWstage'] > 2:
		if katjaQW['horny'] < 20:
			'Katja looks calm and stoic.'
		elseif katjaQW['horny'] < 40:
			'Katja looks at you with a naughty twinkle in her eyes.'
		elseif katjaQW['horny'] < 60:
			'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
		elseif katjaQW['horny'] < 80:
			'Katja is blushing fairly obviously and looks at you longingly.'
		else
			'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
		end
	else
		'Katja looks at you with a smile.'
	end

	if locat['katja'] = 10:
		!!When the weather is good the coolkids and the jock meet at the beach sometime and Katja goes to tther to join them, if the player is talking to when this happens she asks them to go with. Alternatively the can just leave.
		'"The others are meeting at the beach right now. Come on lets go meet them" she says.'
		act 'Go to the beach with Katja': minut += 15 & gt 'pav_lake', 'school_mates'
	elseif locat['katja'] = 8:
		!!Friday and Sturday evening Katja goes to the disco, if the player is talking to when this happens she asks them to go with. Alternatively the can just leave.
		'"Let''s go to the disco!" Katja suggests with a smile.'
		if money >= 25:act 'Go to the disco':money -= 25 & minut += 10 & gt 'pav_disco'
	elseif locat['katja'] = 9:
		'Katja notices how late it is and politely asks you to leave.'
	else
		if pcs_sweat >= 20:
			!katja doesn''t like stinky people so if the player is sveaty she will ask the player to take a bath. The player can leave instead.
			'Katja wrinkles her nose. "<<$pcs_nickname>>, you''re all sweaty! Do you want to use my shower?"'

			act 'Have a shower': gt 'KatjaHomeTalk', 'shower'
		else
			!!not sweaty

			if katjaQW['know_katja_uni'] = 0 and SchoolAtestat = 1 and (month > 6 or (month = 6 and day > 15)):
				!!Katja tells you that she has enrolled in the university.
				gt 'KatjaHomeTalk',  'katja_uni_tell'

			else
				if katjaQW['QWstage'] = 6 and katjaQW['anal_quest'] >= 3 and katjaQW['slut'] > 100 and katjaQW['horny'] > 60 and katjaQW['sex_clossedness'] = 0:
					!!If Katja have had sex with both marcus and Ivan and have been corrupted enough. Then she will when she is horny ask about trying sex with other boys. 
					gt 'KatjaHomeTalk', 'random_park_sex_talk'
			
				elseif katjaQW['QWstage'] = 5 and katjaQW['marcus_pussy'] > 0: 
					!!If Katja have has had her first time with Marcus she will discuss this the next time the player talks to her at home
					gt 'KatjaHomeTalk', 'first_boy_sex_follow_up'
			
				elseif katjaQW['QWstage'] = 5 and katjaQW['marcus_asked'] = 1 and katjaQW['sex_clossedness'] = 0: 
					!!If Marcus have agreed to be katja''s first, the player will tell this to Katja the next time the talk at home
					gt 'KatjaHomeTalk', 'Marcus_answer_talk'
			
				elseif katjaQW['QWstage'] < 4 and katjaQW['slut'] >= 50 and katjaQW['horny'] >= 40 and (katjaQW['knows_BJ'] + katjaQW['knows_sex']) >= 2 and npc_sex['A14'] > 0 and katjaQW['anal_quest'] ! 1 and katjaQW['sex_clossedness'] = 0 and katjaQW['pussy_sex'] = 0:
					!!If Katja have been corrupted enough, have had sex with the player and know that the player have both given blow jobs and have had vaginal sex with a boy. She will if she is horny ask the player to help her arrange her first time with a boy.
					gt 'KatjaHomeTalk', 'sex_with_boy_ask'
			
				else
					if katjaQW['slut'] >= 60 and katjaQW['horny'] >= 40 and (katjaQW['knows_BJ'] + katjaQW['knows_anal']) >= 2 and npc_sex['A14'] > 0 and katjaQW['anal_quest'] = 0 and katjaQW['QWstage'] ! 4 and katjaQW['sex_clossedness'] = 0 and katjaQW['anal_sex'] = 0: 
						!!If Katja have been corrupted enough, have had sex with the player and know that the player have both given blow jobs and have had vaginal sex with a boy. She will if she is horny ask the player to help her arrange her first time with a boy.
						gt 'KatjaHomeTalk', 'anal_sex_with_boy_ask'
				
					else
						if min(katjaQW['horny'],100) > rand(40,400) or (katjaQW['QWstage'] = 2 and min(katjaQW['horny'],100) > rand(40,160)) and katjaQW['sex_clossedness'] < 2:
							if katjaQW['QWstage'] >= 6 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and rand(0,6) =0 and katjaQW['Marcus_day'] ! daystart and katjaQW['sex_clossedness'] = 0:
								!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home. She will also only ask for a threesoem 1 out of 7 time she ask you for sex.
								katjaQW['Marcus_day'] = daystart
								gt 'katjaHomeTalk', 'marcus_kiss' 
						
							elseif katjaQW['QWstage'] > 2:
								!!The standard start of her sex scenes at home. Happens if the marcus ask do not trigger and Katja have kissed the player.
								gt 'KatjaHomeTalk', 'hornykiss'
						
							else
								!!This only triggers if the player have never kissed Katja.
								gt 'KatjaHomeTalk', 'tender_kiss'
							end
					
						else 
							if npc_pregtalk['A14'] = 0 and (KatjaConflict = 0 or katjaconflict = 2) and func('body_din','pregnancyVisibility') = 1:
								!! If Katja can see you are pregant and you haven''t already told her this will create a conflict with to different responses depending on if Katja is pregnant or not.
								if kid > 0:
									cla
									gs 'stat'
									minut += 5
									KatjaConflict = 1
									KatConCheck = daystart
									'"You''re pregnant again?" Her face turns red and her expression is far angrier than you''ve ever seen her. "After everything, you still didn''t trust me enough to tell me?" she screams at you. "I thought there was something special between us." Tears begin rolling down her cheeks. "Just leave me alone, I don''t even want to see you right now."'
							
								elseif knowKatjaPreg = 1:
									cla
									gs 'stat'
									minut += 5
									KatjaConflict = 1
									KatConCheck = daystart
									'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I told you when I got pregnant. I need to think. We''ll talk later."'

								else
									cla
									*nl
									minut += 5
									KatjaConflict = 1
									KatConCheck = daystart
									'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I need to think. We''ll talk later."'
								end							
						
							else
								!!If no events triggers they you go to the part where the player can choose things to do with Katja.
								gt 'katjaHomeTalk', 'chat' 
							end
						end
					end
				end
			end
		end
	end
	if mey_vika['key'] = 1:
		Act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
	end
end


if $ARGS[0] = 'chat':
	!!This is what gives the different option for the player to talk with Katja about.
	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'

	if katjaQW['QWstage'] > 2:
		if katjaQW['horny'] < 20:
			'Katja looks calm and stoic.'
		elseif katjaQW['horny'] < 40:
			'Katja looks at you with a naughty twinkle in her eyes.'
		elseif katjaQW['horny'] < 60:
			'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
		elseif katjaQW['horny'] < 80:
			'Katja is blushing fairly obviously and looks at you longingly.'
		else
			'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
		end
	else
		'Katja looks at you with a smile.'
	end

	func('npc_reactions', 'general', 'A14')

	if lernHome > 0 and katjaQW['QWstage'] >= 2: 
		!!If you have homework you can do it with Katja.
		act 'Do your homework together': 
		minut += 5
		gt 'KatjaHomeTalk', 'homework'
		end
	end

	if university['student'] = 1 and katjaQW['know_going_to_teaching_degree'] = 0 and $university['enrolled_in'] = 'teaching_studies':
		act 'Tell Katja that you''re going to the university': gt 'KatjaHomeTalk', 'uni_tell'
	end

	act 'Chat with Katja':
		!!The generic chat option.
		cla & *clr
		katjaQW['horny'] += 1
		minut += 15
		gs 'stat'
		'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	!	if flag_KissEV >= 3:
	!		act 'To continue the dispute':
	!		cla
	!		'- Well will continue our dispute, - asked you '
	!		'- continue, - Katya readily agreed'
	!
	!		act 'Continue': gt 'katja_sex','park'
	!		end
	!	end
		if flag_KissEV = 2:
			'"Who do you think kissed more of the boys?" she asks.'
			act 'Equal amount':
				*clr & cla
				flag_KissEV = 0
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
				'"We likely kissed about the same number of boys," you answer with a smile.'
				'She breathes a sigh of relief. "I shouldn''t have asked anyways," she replies and kisses you in gratitude.'
				act 'Change the subject':gt 'KatjaHomeTalk'
			end
			act 'Claim victory':
				cla
				flag_KissEV = 3
				'"I totally won!" you say with a playful smile.'
				'"I only slowed down because you were so far behind!" she says and sticks her tongue out at you.'
				'"Suuure. I think they just liked kissing me more than you."'
				'"Oh, yeah? Let''s go see then. We''ll go to the park and see who can kiss more boys," she says with a hint of anger in her voice.'
				act 'Go to the park': gt 'katja_sex','park'
			end
		else
			if katjaPreg ! 0 and knowKatjaPreg = 0:
				'Katja bites her lip and, without looking you in the eye, finally plucks up the courage "<<$pcs_nickname>>, I''m pregnant..."'

				act 'Who''s the father?':
					cla
					minut += 5
					knowKatjaPreg = 1
					gs 'stat'
					'"Wait, what? Who?" you ask, dumbfounded.'
					'Katja wrinkles her nose. "Svyatoslav.... I hooked up with him at the Christmas party and...well... Jesus, what do I do now?!"'

					act 'Be sympathetic':
						cla
						'At a loss for words, you simply hug her.'
						act 'Continue talking':gt 'KatjaHomeTalk'
					end
				end

			else
				if (rand(0,100) > katjaQW['horny'] + min(katjaQW['slut']/2,50)) or katjaQW['sex_clossedness'] = 2:
					!!If Katja is horny she will talk about sex, else she will talk about normal stuff. The more corrupted she is the less horny she need to be to talk about sex.
					'Katja talks about school lessons, cosmetics, the latest fashion trends and other things she considers very important.'
				else
					gs 'KatjaHomeTalk', 'Sextalk'
				end
				act 'Continue':gt 'KatjaHomeTalk'

			end
		end
	end
			
	if katjaQW['boy_lie'] = 1:
		!!If Katja told you that she was interested in a boy and wanted to try kissing beacuase of that you can ask her who it is. Wont get an answer before she is somehow corrupted and have started a sexual relationship.
		act 'Ask Katja who she likes':
			cla & *clr
			katjaQW['horny'] += 1
			minut += 15
			gs 'stat'
			'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'"So who''s the boy you mentioned being interested in earlier?" you ask curiously.' 
			if katjaQW['slut'] >= 60 and npc_sex['A14'] > 0 and katjaQW['horny'] > 40:
				'"Nobody, you dummy! It was just an excuse so you would kiss me!" she answers with a laugh.'
				katjaQW['boy_lie'] = 2
				act 'Continue': gt 'KatjaHomeTalk', 'hornykiss'
			else
				'"That''s my secret, and I''m not going to tell you!" she says with a wink.'
				act 'Continue':gt 'KatjaHomeTalk'
			end
		end
	end

	if katjaQW['QWstage'] = 4 and katjaQW['marcus_pussy'] = 0 and katjaQW['sex_clossedness'] = 0: act 'Tell her you''ll find a boy for her to have sex with': gt 'KatjaHomeTalk', 'boy_discussion'
	!!If Katja asked your help in finding a boy to try sex with and you said no. You have the choice to reverse that decision.

	if katjaQW['anal_quest'] = 1 and katjaQW['sex_clossedness'] = 0: act 'Tell her you''ll find a boy for her to try anal with': gt 'KatjaHomeTalk', 'anal_discussion'
	!!If Katja asked your help in finding a boy to try anal sex with and you said no. You have the choice to reverse that decision.

	if katjaQW['slut'] >= 50 and katjaQW['horny'] >= 80 and npc_sex['A14'] > 0 and katjaQW['sex_clossedness'] < 2:
		!!If you are in a sexual relationship and you can see that Katja is very horny, then you have the possibility to start sex.
		act 'Lick Katja': gt 'KatjaEvDin', 'kuni_dom'
	end

	if katjaQW['QWstage'] >= 7 and katjaQW['birth_control_start_day'] < daystart and katjaQW['birth_control_start_day'] > 0 and katjaQW['horny'] > 60 and katjaQW['sex_clossedness'] = 0:
		!!If you have gotten to the last stage of Katja''s questline, you can suggest to go to the park to look for boys if Katja is horny.
		act 'Look for boys in the park':
			minut += 15
			katjaQW['horny'] += 5
			$ev_name = 'Katja'
			$ev_name_a = 'Katja'
			$ev_name_om = 'Katja'
			dick = 0
			place = 1
			Frend_num = 14
			p_slut = katjaQW['slut']
			p_dom = KatjaQW['dom'] + 50
			p_horny = katjaQW['horny']
			p_alko = 0
			gt 'placer'
		end
	end
			

	if katjaQW['QWstage'] = 5 and katjaQW['marcus_asked'] = 2 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and (katjaQW['horny']+katjaQW['slut']) > 100 and katjaQW['sex_clossedness'] = 0:
	!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home. This is the lead in to the Marcus threesome if it is the first time.
		act 'Suggest that you call Marcus':
			*clr & cla
			katjaQW['Marcus_day'] = daystart
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'Katja is looking aroused, so you suggest calling Marcus so that Katja can finally see what it''s like to have sex with a boy.'
			'"Okay. Let''s call him. We should have time before Vicky comes home," she says, looking both aroused and nervous at the same time.'
			act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
		end
	end

	if katjaQW['QWstage'] >= 6 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and katjaQW['horny'] > 80 and katjaQW['Marcus_day'] ! daystart and katjaQW['sex_clossedness'] = 0:
	!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home. This is the lead in to the Marcus threesome if it have allready been fone at least one time.
		act 'Suggest that you call Marcus':
			*clr & cla
			katjaQW['Marcus_day'] = daystart
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'Katja is looking very aroused, so you suggest calling Marcus to see if he wants to have some fun with you.'
			'"Okay. Let''s call him. We should have time before Vicky comes home," she says while looking very excited.'
			act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
		end
	end

	if katjaQW['birth_control_start_day'] = 0 and katjaQW['QWstage'] >= 6 and katjaQW['sex_clossedness'] < 2:
		!!If you haven''t already told katja to use birthcontrol you can do so. This will prevent her from getting pregnant, and is necessary for taking to the park to have sex with random boys.
		act 'Tell Katja that you think she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
	end

	act '"Let''s hang out"': 
		!!This starts the option to go out and do stuff. The same option are availeble her as if you have choosen to hang out after school.
		cla
		gs 'stat'
		if katjaQW['QWstage'] > 1 and pcs_makeup <= 1:
			'"Hey! Wait a minute <<$pcs_nickname>>! I bet you would look great with a little make-up on you! What do you say?"'
			act 'Let her put makeup on you':
				*clr & cla
				pcs_hairbsh = 1
				minut += 10
				gs 'stat'
				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'Katja happily grins as she quickly straightens your hair. "What do you want? A light touch-up, some normal make-up or shall I just shovel it on?"'

				act 'Light touch-up':
					cla
					pcs_makeup = 2
					'Katja subtly applies some neutral tones, with a light application of makeup to bring out your natural beauty.'
					if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) & 'Katja suddenly becomes aware that she is staring into your eyes and blushes.'

					act '"Let''s hang out"':gt 'katjaEv','kathan'
				end

				act 'Normal make-up':
					cla
					pcs_makeup = 3
					'Katja applies some mildly vibrate tones and colors of makeup to cover your minor imperfections and enhance your best features.'
					if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) & 'Katja suddenly becomes aware that she is staring into your eyes and blushes.'

					act '"Let''s hang out"':gt 'katjaEv','kathan'
				end

				act 'Heavy make-up':
					cla
					pcs_makeup = 4
					'Katja applies some deeper, richer shades of makeup that are thick enough to cover most imperfections while drawing attention to your eyes and lips.'
					if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) & 'Katja suddenly becomes aware that she is staring into your eyes and blushes.'

					act '"Let''s hang out"':gt 'katjaEv','kathan'
				end
			end
					
			act 'You really don''t need it':gt 'katjaEv','kathan'
		else
			gt 'katjaEv','kathan'
		end 
	end

	if npc_pregtalk['A14'] = 0 and (KatjaConflict = 0 or katjaconflict = 2) and knowpreg = 1 and pregchem > 0 and func('body_din','pregnancyVisibility') = 0:
	!!If you are pregnant you can tell Katja that you are. Diferent versions depending on if she is pregnant or not and if you already have kids.
		if  kid > 0:
			act 'Tell her you''re pregnant':
				cla & *clr
				gs 'stat'
				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'Katja''s face lights up. "Congratulations! This is even more exciting than last time! Every time you tell me you’re pregnant, I feel even better about my own pregnancy. Hell, that''s probably the reason you keep getting pregnant, isn''t it?" She giggles while looking at you affectionately.'
				act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
			end		

		elseif knowKatjaPreg = 1:
			act 'Tell her you''re pregnant':
				cla & *clr
				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'"What?! That''s so exiting! You didn''t get pregnant just to be like me, did you?" she asks playfully.'
				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
			end

		elseif KatjaPreg = 0:
			act 'Tell her you''re pregnant':
				cla & *clr
				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'"What? That''s so exiting!"'
				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
			end
		end
	end

	if npc_pregtalk['A14'] = 0 and KatjaConflict = 1 and KatConCheck ! daystart :
	!!If you did not tell katja that you are pregnant and she found out anyway. You can try to apologize. Different version if it is your fisrt child or not.
		if kid = 0:
			act 'Apologize':
				cla & *clr
				gs 'stat'
				KatjaConflict = 2
				'"I''m really sorry I didn''t tell you sooner. I was just so embarrassed."'
				'Katja sighs. "I understand. I just want you to know you can trust me and it hurts to realize that you don''t."'
				'"I do trust you. I promise I won''t keep anything like this from you in the future."'
				'"Good. Now let''s get down to business."'
				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
			end
		
		else
			act 'Apologize':
				cla & *clr
				gs 'stat'
				KatjaConflict = 2
				'"I''m really sorry I didn''t tell you sooner. I was just so embarrassed it happened again."'
				'Katja sighs. "I understand. I just want you to know you can trust me and it hurts to realize that you don''t."'
				'"I do trust you. I promise I won''t keep anything else like this from you in the future."'
				'"Good. Now let''s get down to business."'
				act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
			end
		end
	end

	if katjaQW['boy_block'] = 1:
		act 'Tell Katja you are have decided that boys are fun after all <br><font color="red">(Katja will start asking about sex with boys boys again)</font>': gt 'KatjaHomeTalk',  'boy_yes'
	end

	if mey_vika['key'] = 1:
		Act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
	end
end

if $ARGS[0] = 'shower':
	cla & *clr
	minut += 15
	gs 'stat'

	if katjaQW['horny'] >= 50 and katjaQW['QWstage'] > 2 and katjaQW['sex_clossedness'] < 2:
		'Katja takes you into the bathroom. Blushing, she says, "I think I''ll join you."'

		act 'Have a shower alone':
			cla & *clr
			noShampoo = 1
			dynamic $showerdin
			minut += 15
			pcs_hairbsh = 1
			pcs_makeup = 1

			if frost > 0:frost = 0

			gs 'stat'
			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></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. Once you rinse the shampoo off, you are completely clean.'
			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'

			act 'Get out of the shower':gt 'KatjaHomeTalk'
		end

		act 'Bathe together':
			cla & *clr
			noShampoo = 1
			dynamic $showerdin
			pcs_hairbsh = 1
			pcs_makeup = 1

			if frost > 0:frost = 0

			gs 'arousal', 'erotic_nudity', 15
			katjaQW['horny'] += 10
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/shower.jpg"></center>'
			'You and Katja undress and climb into the shower together.'

			if pcs_pubes <= 3:
				'Katja''s eyes glance over your body, lingering a little on your breasts and pussy. She moves closer to you as you rinse yourself off.'

				act 'Continue':
					cla & *clr
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/shower2.jpg"></center>'
					'Katja gently rubs shampoo into your hair before rinsing it out.'

					if katjaQW['horny'] >= 80 and npc_sex['A14'] > 0:
						'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes are glistening.'

						act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
					else
						'You and Katja wash yourselves.'

						act 'Get out of the shower':gt 'KatjaHomeTalk'
					end
					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
				end
			else
				'Katja eyes glance over your body, lingering a little on your breasts and pubic hair. She then smiles at you. "<<$pcs_nickname>>, you''ve got too much hair down there! It''s not fashionable! I''ll shave it off."'

				act 'Get shaved':
					cla & *clr
					pcs_pubes = 0
					katjaQW['horny'] += 10
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/lobok.jpg"></center>'
					'Katja sits in the bath as you lather yourself up with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'

					if katjaQW['horny'] >= 80 and npc_sex['A14'] > 0:
						gs 'arousal', 'foreplay', 5
						gs 'stat'
						'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes are glistening.'

						act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
					else
						gs 'arousal', 'massage', 5
						gs 'stat'
						'Katja, having finally shaved all the hair between your legs, washes you off with soap.'

						act 'Get out of the shower':gt 'KatjaHomeTalk'
					end
					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
				end
			end
		end
	else
		noShampoo = 1
		dynamic $showerdin
		minut += 15
		pcs_hairbsh = 1
		pcs_makeup = 1

		if frost > 0:frost = 0

		gs 'stat'
		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></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. Once you rinse off the shampoo, you are completely clean.'
		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'

		act 'Get out of the shower':gt 'KatjaHomeTalk'
	end
end

if $ARGS[0] = 'katjaknows':
	cla
	npc_pregtalk['A14'] = 1
	*nl
	if katjaQW['slut'] < 60 and $wombthfathID = 'A34':
		minut += 10
		'"So, who''s the baby-daddy?" Katja teases.'
		*nl
		'You tell Katja that you''re having Kolka''s baby.'
		'"You were knocked up by your brother!? That''s so crazy! Is he at least good in bed?"'
		'"I wouldn''t be pregnant if he wasn''t," you laugh. "I only let the best cock inside me."'
		'Katja blushes and you give her a quick kiss before she can react.'

	elseif katjaQW['slut'] < 60 and $wombthfathID = 'A28':
		minut += 10
		'"So, who''s the baby-daddy?" Katja teases.'
		*nl
		'You tell Katja that you''re having your step-father''s baby.'
		'"You were knocked up by your step-dad!? That''s so crazy!"'
		'Katja blushes and you give her a quick kiss before she can react.'

	elseif katjaQW['slut'] < 60 and $wombthfathID = 'A35':
		minut += 10
		'"So, who''s the baby-daddy?" Katja teases.'
		*nl
		'You tell Katja that you''re having your biological father''s baby.'
		'"You were knocked up by your own father!? That''s so crazy!"'
		'Katja blushes and you give her a quick kiss before she can react.'

	elseif katjaQW['slut'] < 60 and ($wombthfath = '' or $wombthfathID = 'unknown'):
		minut += 10
		'"So, who''s the baby-daddy?" Katja teases.'
		*nl
		'You tell her that you don''t actually know whose baby is growing inside you.'
		'"No way! Really?" She is completely flabbergasted.'
		'"Yeah, I sometimes feel like my life is spinning out of control."'
		'Katja places a hand on your shoulder "<<$pcs_nickname>>, if I can do anything to make your life a little easier, please let me know."'
		'You blush and thank her before planting a quick kiss on her cheek.'

	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A34':
		minut += 10
		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
		*nl
		'You tell Katja that you''re having Kolka''s baby.'
		'"You were knocked up by your brother!? That''s so sexy!" she moans before going in for a passionate kiss.'
		'As your <<$pc_desc[''lips'']>> lips separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions revolve around riding your brother''s dick."'
		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'

	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A28':
		minut += 10
		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
		*nl
		'You tell Katja that you''re having your step-father''s baby.'
		'"You were knocked up by your step-dad!? That''s so sexy!" she moans before going in for a passionate kiss.'
		'As your <<$pc_desc[''lips'']>> lips separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'

	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A35':
		minut += 10
		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
		*nl
		'You tell Katja that you''re having your biological father''s baby.'
		'"You were knocked up by your own father!? That''s so sexy!" she moans before going in for a passionate kiss.'
		'As your <<$pc_desc[''lips'']>> lips separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'

	elseif katjaQW['slut'] >= 60 and ($wombthfath = '' or $wombthfathID = 'unknown'):
		minut += 10
		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
		*nl
		'You tell her that you don''t actually know whose baby is growing inside of you.'
		'"You''re such a sexy slut!" she moans before going in for a passionate kiss.'
		'As your <<$pc_desc[''lips'']>> lips separate from hers, you look into her eyes. "I''m really glad you''re not judging me like a lot of other people have."'
		'"<<$pcs_nickname>>, I would never judge you. Plus, if I''m being honest, I''m a little jealous. I wish I could let myself have that much fun."'
		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'

	else
		minut += 10
		'"So, who''s the baby-daddy?" Katja teases.'
		*nl
		iif( ($wombthfath = '' or $wombthfathID = 'unknown'), '"I don''t know who the father is "', '"It looks like I got knocked up by <<$wombthfath>>"')
		'"I hope they know how lucky they are," she says while clearly blushing.'
	end
	act 'Continue':
		if $loc = 'katja_dorm':
			gt 'katja_dorm', 'talk'
		else
			gt 'KatjaHomeTalk'
		end
	end
end

if $ARGS[0] = 'katjaknows1':
	cla
	npc_pregtalk['A14'] = 1
	if katjaQW['slut'] < 60:
		'"So, hot stuff. Same father as last time?"'
	else
		'"Fuck, I love seeing you pregnant. I hope you''re up for having lots of babies." She blushes intensely and kisses you. "So, who put this one into you?"'
	end
	*nl
	!!The family reactions
	if ($wombthfathID = 'A34' and npc_rel['A34'] > 50) or ($wombthfathID = 'A28' and npc_rel['A28'] > 50) or ($wombthfathID = 'A29' and npc_rel['A29'] > 50):
		if $wombthfathID = $ChildThFath[kid-1]:
			if katjaQW['slut'] >= 60:
				'You tell Katja that <<$wombthfath>> got you pregnant again.'
				'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
				'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
				'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
			else
				'You tell Katja that <<$wombthfath>> got you pregnant again.'
				'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
				'"I just hope he makes you happy. It''s sometimes hard to believe that you''re the woman I fell in love with." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
			end
		else
			if katjaQW['slut'] >= 60:
				'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
				'Her eyes widen. "Wow, your family must be really close," she giggles.'
				'"Shit, ''which of your family members did you like being knocked up by the most?'' might be the hottest question anyone has ever made me think of. Just when I started thinking I couldn''t love you any more." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
				'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t think I''ll forget the image of you being passed around your family like a good little slut. I need something to masturbate about when you''re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
			else
				'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
				'Her eyes widen. "wow, your family must be really close," she giggles.'
				'"To think I''d fall in love with a woman who lets multiple members of her own family knock her up." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
			end
		end
	!!The non-family reactions
	else
		if $wombthfathID = $ChildThFath[kid-1]:
			'You tell Katja that <<$wombthfath>> is the father again.'
			'"I hope he makes you happy. And that he doesn''t mind sharing you with me," she blushes. "I would hate to completely lose the woman I love." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
		elseif $wombthfath = '' or $wombthfathID = 'unknown':
			if katjaQW['slut'] >= 60:
				'You tell Katja that you don''t know you the father is.'
				'"Seems like you had a little too much fun then," she chuckles.'
				'"I hope you''ll include me next time."'
			else
				if npc_rel['A14'] >= 40:
					'You tell Katja that you don''t know you the father is.'
					'"Seems like you had a little too much fun then," she chuckles.'
				else
					'You tell Katja that you prefer not to say who the father is.'
					'"Seems like you had a little too much fun then," she chuckles.'
				end
			end
		else
			'You tell Katja that the father is <<$wombthfath>>.'
			'"I''m glad you realize you''re too special to limit yourself to one man. I love you too much to let you do anything less." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
		end
	end

	act 'Continue':
		minut += 10
		if $loc = 'katja_dorm':
			gt 'katja_dorm', 'talk'
		else
			gt 'KatjaHomeTalk'
		end
	end
end

if $ARGS[0] = 'shower_kiss_home':
	cla & *clr
	katjaQW['slut'] += 1
	katjaQW['horny'] += 10
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showerkiss.jpg"></center>'
	'Katja gently hugs you with one hand and kisses you on the lips. You feel her soft palm on your naked pussy as her finger finds your clitoris and begins to rub it.'

	gs 'arousal', 'kiss', 10, 'dom', 'lesbian'
	gs 'arousal', 'vaginal_finger', 10, 'dom', 'lesbian'
	minut -= 10
	gs 'stat'

	if katjaQW['slut'] >= 50:
		'Katja gently but firmly puts you on the edge of the tub.'
	else
		'Katja gently caresses your clitoris with her fingers and her lips begin to kiss your neck, slowly making her way down.'
	end
	
	act 'Sit on the edge of the tub':
		cla & *clr
		katjaQW['horny'] -= 10
		katjaQW['slut'] += 1

		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showersex.jpg"></center>'
		'You sat on the edge of the tub and open your legs to expose your wet pussy. Katja gets on her knees in front of you and gently licks your swollen red petals.'
		'Her tongue begins to briskly caress your pussy, not forgetting about your clitoris. Bliss soon envelopes your entire body.'
		'You notice Katja''s hand between her legs and get further turned on watching her pleasure herself while she pleasures you.'
		$orgasm_txt = 'You are suddenly hit by a powerful orgasm and feel like you might lose consciousness as your whole body bends and convulses and a hot wave washes over you.'
		$orgasm_or = 'yes'
		gs 'arousal', 'cuni', 10, 'dom', 'lesbian'
		gs 'stat'

		act 'Get out of the shower':
			gs 'arousal', 'end'
			gt 'KatjaHomeTalk'
		end
	end
	
	gs 'willpower', 'cuni', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Remove her hands (<<will_cost>> Willpower)':
			cla & *clr
			minut += 5
			pcs_horny += 10
			KatjaQW['dom'] -= 1
			katjaQW['horny'] -= 10
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'You remove her hands and smile at her. You dismiss her and she shyly looks at the floor before leaving the bathroom.'

			act 'Get out of the shower':
				gs 'arousal', 'end'
				gt 'KatjaHomeTalk'
			end
		end
	else
		act 'Remove her hands (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end	
end

if $ARGS[0] = 'homework':
	*clr & cla
	menu_off = 1
	minut += 30
	npc_rel['A14'] += 2
	gs 'grades', 'homework', 'school', 'yes', 1, 1, 'A14'
	lern += rand(2, 4)
	gs 'exp_gain', 'intel', rand(0, 1) + (mentats_dose - rand(0,mentats_dose))
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'For half an hour you and Katja pour over your books, you fully learn the lessons and pretty well understand the material.'

	act 'Finish': gt 'KatjaHomeTalk'
	if mey_vika['key'] = 1:
		act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave': minut += 5 & gt 'pav_residential'
	end
end

if $ARGS[0] = 'Sextalk':
	'After talking for some time Katja looks at you thoughtfully while her head is turning completely red.'
	if katjaQW['boy_block'] = 1:
		kattalkrand = rand(3, 4)
	else
		kattalkrand = rand(0, 4)
	end

	if kattalkrand = 0:
		if stat['bj'] > 0:
			gs 'KatjaHomeTalk', 'bj_talk1'
		else
			if katjaQW['knows_BJ'] > 0:
				'"<<$pcs_nickname>>, tell me, how are you at sucking dick?"'
			else
				'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
			end
			act 'You''ve never given a blowjob':
				*clr & cla
				minut += 3
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'You tell Katja that you have never given a blowjob to a guy. She admits that she hasn''t either. "Vicky talks about how good it is all the time, but I don''t know. Guys usually smell bad and I''m sure it would taste awful."'
				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		end

		act 'Tell Katja you are not into boys <br><font color="red">(blocks further contents with Katja and boys)</font>': gt 'KatjaHomeTalk',  'boy_no'

	elseif kattalkrand = 1:
		if katjaQW['knows_sex'] > 0:
			'"<<$pcs_nickname>>, tell me. Have you ever fucked someone?"'
		else
			'"<<$pcs_nickname>>, have you ever had sex with a guy?"'
		end

		if stat['vaginal'] > 0:
			act 'Talk about sex':
				*clr & cla
				minut += 3
				katjaQW['horny'] += 5
				katjaQW['knows_sex'] = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'You tell Katja about the times you''ve had sex and how it felt. She blushes and bites her lip.'
				if katjaQW['pussy_sex'] > 0:
					if npc_sex['A14'] > 0: katjaQW['QWstage'] = 6
					'Katja also tells you a story of have she had sex with a boy a boy you don''t know she picked up one night se went out.'
				end
				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		else
			act 'No':
				*clr & cla
				minut += 3
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				if katjaQW['pussy_sex'] = 0:
					'You tell Katja that you''ve never had sex with a guy, and she admits that she''s also still a virgin. "That probably makes us the only non nerds who haven''t had sex! Vicky does it all the time with Vanya. She won''t shut up about it!"'
				else
					if npc_sex['A14'] > 0: katjaQW['QWstage'] = 6
					'You tell Katja that you''ve never had sex with a guy, and she is very surprised. "What you have never had sex with a guy? Even I have had that. I thought I was the last girl from school to loose my virginity. Vicky definitely make it seems like I was abnormal not finding somebody to fuck in school. She wouldn''t stop pushing to find a guy. It was so annoying."'
				end

				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		end

		act 'Tell Katja you are not into boys <br><font color="red">(blocks further contents with Katja and boys)</font>': gt 'KatjaHomeTalk',  'boy_no'

	elseif kattalkrand = 2:
		if katjaQW['knows_anal'] > 0:
			'"<<$pcs_nickname>>, what''s anal sex like?"'
		else
			'"<<$pcs_nickname>>, have you ever had a guy stick it in your ass?"'
		end

		if stat['anal'] > 0:
			act 'Talk about anal':
				*clr & cla
				minut += 3
				katjaQW['horny'] += 5
				katjaQW['knows_anal'] = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'You tell Katja about the times you''ve had anal sex and what it feels like. She blushes and bites her lip.'
				if katjaQW['anal_sex'] > 0:
					if npc_sex['A14'] > 0: katjaQW['anal_quest'] = 3
					'Katja also tells you a story of anal sex she had with a boy a boy you don''t know she picked up one night se went out.'
				end

				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		else
			act 'You''ve never had anal sex':
				*clr & cla
				minut += 3
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				if katjaQW['anal_sex'] = 0:
					'You tell Katja that you''ve never had anal sex. She says that she heard that a lot of girls in your class do, some more than others.'
				else
					if npc_sex['A14'] > 0: katjaQW['anal_quest'] = 3
					'You tell Katja that you''ve never had anal sex. "You havn''t?" she ask rhetorically "It''s actually quit good. You should try it."'
				end

				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		end

		act 'Tell Katja you are not into boys <br><font color="red">(blocks further contents with Katja and boys)</font>': gt 'KatjaHomeTalk',  'boy_no'

	elseif kattalkrand = 3:
		if katjaQW['knows_cuni'] > 0 or npc_sex['A14'] > 0:
			'"<<$pcs_nickname>>, tell me how you lick pussy."'
		else
			'"<<$pcs_nickname>>, have you gone down on a girl?"'
		end

		if stat['cuni_give'] > 0:
			act 'Talk about licking pussy':
				*clr & cla
				minut += 3
				katjaQW['horny'] += 5
				katjaQW['knows_cuni'] = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'You tell Katja about the times you''ve gone down on another girl and how it feels. She blushes and bites her lip.'
				
				if katjaQW['horny'] > 50 and katjaQW['slut'] >= 40 and rand(-30,30) < katjaQW['dom'] and npc_sex['A14'] > 0:
					'Katja asks you to show her how you lick pussy.'

					act 'Show her':
						*clr & cla
						katjaQW['horny'] = 0
						katjaQW['slut'] += 1
						katjaQW['dom'] += 2
						if npc_sex['A14'] = 0: npc_sex['A14'] = 1 & girl += 1
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
						'You''re a little confused at first before you notice her pulling her panties off. Once she has them off, she opens her legs wide. "Go on, <<$pcs_nickname>>. Show me how you do it, please."'
						'You pause, more in surprise than anything, but her glistening wet pussy is enough to convince you. You lean forward and place your face between her legs and start licking.'
						'You suck on her clit and slip your tongue inside of her, working her pussy for all you''re worth. She begins to moan loudly and buck her hips, grinding your face into her crotch. As she gets close to orgasm, she grabs your hair and holds your face against her pussy, rubbing herself against you as much as you are licking her, leaving your face coated in her juices.'
						'Her orgasm hits her hard, leaving her unable to talk as her body spasms. Once her orgasm passes, you lick her clean of all her pussy juices, making sure not to miss a single spot. When you look up at Katja, she has a confident smile on her face. "Well aren''t you just a good little girl?" She then kisses you deeply before you start to lean back and spread your legs, but she''s already shaking her head.'
						'"Sorry <<$pcs_nickname>>, maybe next time. We need to finish our homework," she says sweetly. You pause before nodding in understanding. You see that new confident look intensify on her face as she smiles and the two of you finish your homework.'

						gs 'arousal', 'cuni_give', 15, 'sub', 'lesbian'
						gs 'arousal', 'end'
						gs 'stat'

						act 'Continue talking':
							if $loc = 'katja_dorm':
								gt 'katja_dorm', 'talk'
							else
								gt 'KatjaHomeTalk'
							end
						end
					end
					act 'Ignore her':
						minut += 5
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
				else
					act 'Continue talking':
						minut += 5
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
				end
			end
		else
			act 'No':
				*clr & cla
				minut += 3
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				if katjaQW['simultanous_girls'] > 0:
					'"I''ve never gone down on a girl" you say and Katja looks quite surprised. "Never? Is it something that you have thought about?" she ask in a curious tone.'
					act 'I''ve thought about it':
						cla
						minut += 3
						katjaQW['horny'] += 20
						'"I''ve thought about it, alright it''s just the situation never came up" you tell Katja. "So it is something you want to try" Katja ask.'
						if katjaQW['horny'] >= 50 and katjaQW['QWstage'] > 2 and katjaQW['slut'] >= 20:
							'"So what would you do if that situation was to come up. For example right now?" Katja asks in a seductive voice.'
							act 'See what Katja does': gt 'katjaHomeTalk', 'hornykiss'
							act 'Stop her from doing anything':
								cla
								gs 'npc_relationship', 'modify', 'A14', 'dislike'
								'"It would definitely not happen right now. Rigth?" you say a little unsure of how Katja will react.'
								'"Of course not. Nothing happens here you don''t want to" she says clearly looking disappointed. She quickly changes the subject.'
								act 'Continue talking':
									minut += 5
									if $loc = 'katja_dorm':
										gt 'katja_dorm', 'talk'
									else
										gt 'KatjaHomeTalk'
									end
								end							
							end
						else
							'"Well. I think that you should find a chance to try it. It is quite good" Katja says with a wink, but then changes the subject.'
							act 'Continue talking':
								minut += 5
								if $loc = 'katja_dorm':
									gt 'katja_dorm', 'talk'
								else
									gt 'KatjaHomeTalk'
								end
							end
						end
					end
					act 'I''m not into girls':
						cla
						minut += 3
						gs 'npc_relationship', 'modify', 'A14', 'dislike'
						gs 'stat'
						'"I''m not into girls" you tell Katja. "Really?" Katja says surprised "To bad for you. You are really missing out on something. Making love to girls are rally something, they are '+iif(katjaQW['knows_sex'] +katjaQW['knows_BJ'] + katjaQW['knows_anal'] > 0, 'much more tender than boys', 'so tender')+'."'
						'"I really think that you should give it a thought" she continues seemingly a little disappointed in your responds. she then changes the subject.'
						act 'Continue talking':
							minut += 5
							if $loc = 'katja_dorm':
								gt 'katja_dorm', 'talk'
							else
								gt 'KatjaHomeTalk'
							end
						end
					end
				else
					'You tell Katja that you''ve never gone down on a girl. She seems a little surprised and you get the feeling that this was not what she wanted to hear.'
				end
				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		end
	elseif kattalkrand = 4:
		if katjaQW['knows_masterbation'] > 0:
			'"<<$pcs_nickname>>, tell me how you masturbate."'
		else
			'"<<$pcs_nickname>>, do you masturbate?"'
		end

		if stat['mast'] > 0:
			act 'Talk about masturbation':
				*clr & cla
				minut += 3
				katjaQW['horny'] += 5
				katjaQW['knows_masterbation'] = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'You tell Katja how you masturbate in the bathroom and she blushes and bites her lip.'

				if katjaQW['masturbates'] = 0:
					act 'Continue talking':
						minut += 5
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
				else
					act 'Katja responds':
						*clr & cla
						minut += 5
						katjaQW['horny'] += 10
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/mastr.jpg"></center>'
						'Katja tells you she also masturbates, right here in this room, fondling herself between her legs.'

						act 'Continue talking':
							minut += 5
							if $loc = 'katja_dorm':
								gt 'katja_dorm', 'talk'
							else
								gt 'KatjaHomeTalk'
							end
						end
					end
				end
			end

			if stat['self_fisting'] > 0:
				act 'Tell her how you pushed your hand into your pussy':
					*clr & cla
					minut += 3
					katjaQW['horny'] += 10

					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
					'You tell Katja how you '+iif(stat['self_fisting'] = 0, 'once', 'sometimes')+' put your whole fist into your pussy, and how it felt doing it.'
					'Katja looks '+iif(katjaQW['knows_self_fisting'] = 0, 'completely shocked, but', 'excited, and')+' her head turns even redder as she bites her lip.'

					if katjaQW['knows_self_fisting'] = 0: katjaQW['knows_self_fisting'] = 1

					act 'Continue talking':
						if katjaQW['fisted_vag'] = 0 and npc_vag['A14'] > 3 and katjaQW['slut'] >= 70 and katjaQW['horny'] >= 50 and npc_sex['A14'] > 0:
							gt 'katjaHomeTalk', 'fisting_ask'
						else
							minut += 5
							if $loc = 'katja_dorm':
								gt 'katja_dorm', 'talk'
							else
								gt 'KatjaHomeTalk'
							end
						end
					end
				end
			end

			if stat['self_fisting_anal'] > 0:
				act 'Tell her how you fisted your ass':
					*clr & cla
					minut += 3
					katjaQW['horny'] += 10

					if katjaQW['knows_self_fisting_anal'] = 0: katjaQW['knows_self_fisting_anal'] = 1

					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
					'You tell Katja how you masturbate anally and even managed to stretch it so much that you could shove your fist into it.'
					'She blushes and bites her lip.'

					act 'Continue talking':
						minut += 5
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
				end
			end
		else
			act 'You''ve never masturbated':
				*clr & cla
				minut += 3
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				if katjaQW['masturbates'] > 0:
					'"What!!" Katja says surprised. "You never masturbated. Why? I thought that everybody does it, even I do it and and I''m usually the last to do anything" she continues'
					'You then try to explain why you have never masturbated.'
				else
					'You tell Katja that you''ve never masturbated. She seems surprised at your answer.'
				end
				act 'Continue talking':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
		end
	end

	act 'Refuse to talk about such topics':
		cla
		minut += 1
		gs 'stat'
		'You refuse to talk about such topics with her and she looks down in confusion and mumbles. "Sorry, <<$pcs_nickname>>, I didn''t mean to pry."'

		act 'Continue talking':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end
end

if $ARGS[0] = 'bj_talk1':
	minut += 3
	if katjaQW['knows_BJ'] > 0:
		'"<<$pcs_nickname>>!" she says, a sparkle in her eye. "Tell me what it''s like to sucking dick again."'
	elseif katjaQW['knows_BJ']= 0:
		'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
	end

	if stat['bj'] > 0:
		if katjaQW['knows_BJ'] = 0:
			act 'No (lie)':
				cla & *clr
				minut += 3		
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'"No," you shake your head before shamelessly lying through your teeth. "I''ve never given a blowjob before."'
				'"Oh." She sits back, looking disappointed for some reason.'
				act 'Continue':
					minut += 5
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end
			end
			act'Yes':
				minut += 3
				cla & *clr
				katjaQW['horny'] += 5
				katjaQW['knows_BJ'] = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'"Yeah. I''ve given a few," you admit.'
				'"What''s it like?" Katja asks, eyes wide with excitement.'
				gs'KatjaHomeTalk','bj_talk2'
			end
		elseif stat['bj'] > 0:
			minut += 3
			katjaQW['horny'] += 5
			gs'KatjaHomeTalk','bj_talk2'
		end
	else
		act 'No':
			cla & *clr
			minut += 3
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'"No," you shake your head. "I''ve never given a blowjob before."'
			'"Oh." She sits back, looking disappointed for some reason. "Guess we''re both clueless then, huh?"'
			act 'Continue':
				minut += 5
				if $loc = 'katja_dorm':
					gt 'katja_dorm', 'talk'
				else
					gt 'KatjaHomeTalk'
				end
			end
		end
		!!act'I''ve given a few (lie)':
	end
end

if $ARGS[0] = 'bj_talk2':
	act'It tastes funny':
		cla & *nl
		'"It tastes funny," you wrinkle your nose. "It''s like, kinda salty? But also sort of... musty? I don''t think I mind the act itself that much, but dick has a weird flavor."'
		'Katja seems taken aback, almost disappointed. You guess this isn''t the answer she was hoping for.'
		act 'Continue':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end
	
	act'It''s fun':
		cla & *nl
		katjaQW['horny'] += 5
		'"It''s fun!" you grin. "I''m not really sure what it is, but something about having a dick in your mouth is really entertaining. It''s like, totally alive! And you can feel it making all these tiny movements when it''s on your tongue. I really like giving head."'
		'Katja hangs on your every word, nodding excitedly for you to keep describing your experiences with oral sex to her.'
		act 'Continue':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end
	
	act'It''s whatever':
		cla & *nl
		'"I don''t mind doing it but I don''t love it either," you say. "Dick doesn''t really taste like anything if it''s clean. Kinda salty if it isn''t. I don''t know. It''s whatever I guess."'
		'You shrug.'
		'Katja seems taken aback, almost disappointed. You guess this isn''t the answer she was hoping for.'
		act 'Continue':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end
	
	act'It''s boring':
		cla & *nl
		'"It''s boring," you roll your eyes. "You have to keep sucking the whole time and after a while my jaw just starts to ache with the motion. It''s a dick in your mouth, I don''t know what to tell you.'
		'Katja seems taken aback, looking almost worried. You guess you just shattered some impressions she had about giving head.'
		act 'Continue':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end
	
	act'It turns me on':
		cla & *nl
		katjaQW['horny'] += 5
		'"It turns me on so much," you admit, biting your lip in a lusty smile. "When someone''s in your mouth, you can make them feel <i>really</i> good. And they''ll respond to what you do. If you take their whole length, they''ll squirm. If you lick the head, it''ll twitch under your touch. Just knowing you can make someone else feel that way... Ugh, just <i>thinking</i> about it gets me wet!"'
		'Katja hangs on your every word, nodding along with wide eyes as you describe what it is you love so much about giving head. A faint blush also comes to her cheeks and you notice her unconsciously rubbing her thighs together.'
		act 'Continue':
			minut += 5
			if $loc = 'katja_dorm':
				gt 'katja_dorm', 'talk'
			else
				gt 'KatjaHomeTalk'
			end
		end
	end	
end

if $ARGS[0] = 'hornykiss':
	'Katja brings her face so close to yours that you can feel her hot breath on your skin.'

	act 'Bring your face close to hers':
		cla & *clr
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
		'You move even closer to Katja''s face.'

		if katjaQW['horny'] < 50:

			if rand(0, 50) < 15:
				act 'Kiss': gt 'katjaEvDin', 'kiss'
			else
				katjaQW['horny'] += 5
				'Katja giggles and pushes your face away from her.'

				act 'Change the subject':
					minut += 15
					if $loc = 'katja_dorm':
						gt 'katja_dorm', 'talk'
					else
						gt 'KatjaHomeTalk'
					end
				end

!!				if pcs_dom > 0:
					act 'Grab Katja''s face':
						cla & *clr
						KatjaQW['dom'] -= 2
						katjaQW['horny'] -= 10
						gs 'stat'
						'You wrap your hands around her face and bring you lips to Katja''s.'

						!!if pcs_dom < KatjaQW['dom']:
							!!'Katja firmly takes your hands and removes them from her face, allowing you to understand, that she does not intend to kiss you.'

							!!act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
						!!else
							'Katja looks into your eyes.'
							act 'Kiss': gt 'katjaEvDin', 'kiss'
						!!end
					end
				!!end
			end
		else
			act 'Kiss': gt 'katjaEvDin', 'kiss'
		end
	end
end

if $ARGS[0] = 'tender_kiss':
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'Katja thinks about something before blushing in embarrassment. "<<$pcs_nickname>>... Have you ever... kissed a boy?"'
	katjaQW['boy_lie'] = 1

	act 'Yes':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
		'You smile at Katja and say that you''ve kissed boys. Katja, even more shyly, continues. "You see, I like this guy, but he''s older than me and I''m afraid that when we start to kiss, I''ll do something wrong. Could you teach me how to kiss?"'

		act 'Kiss': gt 'katjaEvDin', 'kiss'

		act 'Refuse':
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'You refuse and she looks at you with pleading eyes. "Please <<$pcs_nickname>>, you don''t want me to be bad at kissing, do you?"'
		
			act 'Relent': 
				katjaQW['dom'] += 2 
				gt 'katjaEvDin', 'kiss'
			end
			
			gs 'willpower', 'kiss', 'resist', 'medium'
			if will_cost <= pcs_willpwr:
				act 'Stand firm (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
					'You refuse to kiss Katja and she gets mad at you.'

					act 'Talk about something else':
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
					if $loc = 'katja_dorm':
						act 'Stop talking': gt 'katja_dorm', 'start'
					elseif mey_vika['key'] = 1:
						Act 'Leave the room': gt 'mey_home', 'start'
					else
						act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
					end
				end
			else
				act 'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
	end

	act 'No':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
		'You shake your head and say that you''ve never kissed a boy. Katja, even more shyly, continues. "You see, I like this guy but he''s older than me and I''m afraid that when we start to kiss, I''ll do something wrong. Maybe we could try kissing and learn that way?"'
		act 'Kiss': gt 'katjaEvDin', 'kiss'

		act 'Refuse':
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'You refuse and she looks at you with pleading eyes. "Please <<$pcs_nickname>>, it''ll help us both so we''re better when we finally kiss a boy!"'
		
			act 'Relent': 
				katjaQW['dom'] += 2 
				gt 'katjaEvDin', 'kiss'
			end

			gs 'willpower', 'kiss', 'resist', 'medium'
			if will_cost <= pcs_willpwr:
				act 'Stand firm (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
					'You refuse to kiss Katja and she gets mad at you.'

					act 'Talk about something else':
						if $loc = 'katja_dorm':
							gt 'katja_dorm', 'talk'
						else
							gt 'KatjaHomeTalk'
						end
					end
					if $loc = 'katja_dorm':
						act 'Stop talking': gt 'katja_dorm', 'start'
					elseif mey_vika['key'] = 1:
						act 'Leave the room': gt 'mey_home', 'start'
					else
						act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
					end
				end
			else
				act 'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
	end
end

if $ARGS[0] = 'marcus_kiss':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
	'Katja almost jumps you and gives you a kiss. Afterwards, she looks at you a little hesitantly. "You know, having Marcus over is quite fun, so why don''t we call him right now?"'
	act 'Agree':  gt 'katja_sex', 'marcus_wait'
	act 'You''re not in the mood': katjaQW['horny'] -= 20 & gt 'KatjaHomeTalk'
end

if $ARGS[0] = 'TamVal':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/TK.jpg"></center>'
	'Katja has left her phone at home, so you have a quick visit to her room, but as you reach the entry hall, some words reach your ears. Two women are talking in the living room.'
	'"Oh Aunt Tamara! It has been marvelous to be with you again, but it is so unjust that my job only lets me see you so little, and I... I want to return all the favors you have given me."'
	'The woman sounds young and, you must say, a little flirty? Turning towards Katja, you see recognition and surprise in her eyes.'
	'"It is my pleasure Valentina, but you don''t need to do anything. What you must do is concentrate on your studies and work. With that, I''m served, but it is late and I think we must say goodbye. So, Valentina?"'
	'The older woman sounds a lot more serious, but not without fondness, then suddenly they shut up and some muffled sounds reach your ears. Katja takes your hand and sneaks deeper into the house, where you see two women, embraced and kissing affectionately. Maybe too affectionately for a goodbye kiss. By your side, Katja gasps and the two women turn towards you. The older one smiles, unperturbed at the sudden interruption. The younger (not much older than you), after a moment, tightens her embrace and gives you a somewhat defiant smile.'
	'"Oh Ekaterina! Look who has come to see us! Valentina!"'
	'Katja mumbles something that sounds like a "hello", then without loosening her grip on your hand, quickly takes you towards her bedroom. As you two enter, she throws herself at the bed and muffles a scream in the pillow.'
	minut += 5
	gs 'stat'

	act 'Katja is confused':
		menu_off = 1
		*clr & cla
		katjaQW['QWstage'] = 2
		'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
		'You try to calm the hyper-ventilating redhead as she maniacally gets up and takes a peek beyond her room''s door. Finally, she calms enough to talk with you.'
		'"<<$pcs_nickname>>, you saw that didn''t you? I mean... they were... oh God!"'
		'Taking her hand, you force Katja to sit by your side and embrace the redhead, mostly to stop her from driving you crazy.'
		'"There there Katja. Just stop and breathe."'
		'She takes your advice, and takes a big gulp of air. That seemed to quieten her down, deflating and returning her to a more "normal" mindstate. Even at that, she is troubled.'
		'"Sorry <<$pcs_nickname>>, it''s just that a lot of things suddenly made sense. Look, Valentina lived here some time ago here. I don''t know all the history, but she left her mother to live in the city and ended up in some kind of trouble. Mom welcomed her to our home, and... remember how she clung to my mom? Valentina was always that way and seemed jealous of Vicky and me and now I''m thinking..."'
		'"That maybe your mother and Valentina were, or are, lovers? That troubles you? You don''t like that?"'
		'Katja looks at you with a mix of emotions in her face. Confusion, surprise, doubt, fear. She opens and closes her mouth, looks at you, blushes and says something surprising...'
		'"I don''t know... maybe? I never thought about something like that. Ehm... <<$pcs_nickname>>... what would you think, if I... I mean... ehm... behaved like Valentina and... tried to kiss you?"'

		minut += 5
		gs 'stat'

		gs 'willpower', 'kiss', 'force', 'hard'

		if will_cost <= pcs_willpwr:
			act '"What if I''m the one that wants to kiss you?" (<<will_cost>> Willpower)':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
				'At your ballsy question, Katja answers in one of the most logical ways. The blush in the already agitated girl''s cheeks extends, encompassing her face, neck and you assume her body. She looks like a pressure cooker about to explode. The next part is less logical, as she opens her mouth and tries to talk, but coughs. After licking her lips, she answers in a raspy and unsure voice.'
				'"Yes?"'
				'You lean against her and give her a little kiss on the lips. She doesn''t react, so you continue, grabbing at her face, cheeks and neck. Her hands raise against your chest, but she doesn''t try to push you away. In fact, she begins to kiss you back.'
				'This escalates into an awkward make out, as the inexperienced girl shyly tries to follow your lead, biting you on more than one occasion. More and more, your lips and eventually tongues mix, arousing the two of you in an ever-increasing loop, but it all stops when Katja gives a surprised "Epp!" and moves away from you.'
				'It seems that one of your hands had somehow reached below her clothes and, well, began to play with one of her tits. Now the two of you are looking at the transgressive hand in confusion. Biting her lips, she looks around nervously and tries to fix her ruffled clothes.'
				'"That was... woah. Hmmm... Something <<$pcs_nickname>>"'

				gs 'willpower', 'pay', 'force'
				gs 'willpower', 'pay', 'force', 'hard'
				npc_rel['A14'] += 1
				katjaQW['slut'] += 5
				katjaQW['dom'] -= 2
				katjaQW['QWstage'] = 3
				minut += 5
				pcs_mood += 10
				gs 'arousal', 'kiss', 10
				gs 'stat'

				act 'Time to leave': gt 'katjaHomeTalk','TamVal_2'
			end
		else
			act '"What if I''m the one that wants to kiss you?" (<font color="red"><<will_cost>> Willpower</font>)': Msg '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		gs 'willpower', 'kiss', 'self'

		if will_cost <= pcs_willpwr:
			act '"Katja... want to try it?" (<<will_cost>> Willpower)':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'

				'Katja''s eyes open wide and, for a moment, you have the sensation that somehow you have fucked this, but she doesn''t say or do anything. She just sits by your side and looks intensely at your face.'
				'"Yes"'
				'You practically didn''t hear Katja''s whispered word before she leans against you and softly kisses your lips. It barely touches your skin and you think that is the end until her hands reach towards you and grab your clothes, holding you in place.'
				'She begins kissing you slowly... experimentally. Little kisses all over your lips, with a surprising intensity in Katja''s eyes. Soon, things escalate as her tongue tries to pry open your mouth. You aren''t going to lie, she isn''t good at this, and more than one time, she bites you maybe a little too hard but. You. Don''t. Care.'
				'You end up laying down on Katja''s bed with her all over you. The make out session quickly escalates and you find yourself gasping for oxygen as Katja tries to reach your tonsils with her tongue (and bites you again). A part of your aroused mind barely registers that the redhead is reaching under your clothes, towards your bust and... She stops?!'
				'A confused "Hu?" escapes your lips as you try to understand what just happened. Katja has retreated to the bed''s headboard. Biting her lips, she looks around nervously and tries to fix her ruffled clothes.'
				'"That was. Woah. Hm. Something <<$pcs_nickname>>"'

				gs 'willpower', 'pay', 'self'
				gs 'willpower', 'pay', 'self', 'hard'
				npc_rel['A14'] += 1
				katjaQW['slut'] += 5
				katjaQW['QWstage'] = 3
				minut += 5
				pcs_mood += 10
				gs 'arousal', 'kiss', 10
				gs 'stat'

				act 'Time to leave': gt 'katjaHomeTalk','TamVal_2'
			end
		else
			act '"Katja... want to try it?" (<font color="red"><<will_cost>> Willpower</font>)': Msg '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		act 'Stare at her awkwardly.':
			*clr & cla
			'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
			'"Hu?!"'
			'That is the most your brain seems capable of answering to Katja''s question and obviously she didn''t take it too well.'
			'"Sorry <<$pcs_nickname>>! I wasn''t insinuating... I mean... I didn''t want to... ehm..."'
			'You stare at her while she stares at you. The silence only seems to make the two of you more embarrassed by the second... fuck!'
			pcs_mood -= 10
			npc_rel['A14'] -= 5
			minut += 5
			gs 'stat'

			act 'Time to leave': gt 'katjaHomeTalk','TamVal_2'
		end

		if succubusQW = 5:
			act 'Answer Succubus style':
				*clr & cla
				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
				'"Jajaja! That is easy Katja! I''ll show you things that your "mama" never taught you!"'
				'You smile as Katja, the cutest human tomato, stares back at you with exploding eyes. She then jumps from the bed and screams at you, half angrily, half embarrassed.'
				'"<<$pcs_nickname>>! I wasn''t joking! This is a hard moment for me!"'
				'You can''t stop smiling at her cuteness, but the truth is that Katja''s childishness is getting boring. Her mother has a worshiping toygirl at her beck and call, Vicky has acquired the munch-eating services of a rock-hard-abs jock. Well, Katja can have a fucking superhuman succubus! What is she thinking?! End up as the only virgin in your class? Time to change that.'
				'"Ok Katja, time for a lesson. Let''s get naked."'
				'You begin to take away your clothes as a flabbergasted Katja stops in her tracks and tries to process what you just said.'
				'"Eh... what? <<$pcs_nickname>>, is this a joke?"'
				gs 'stat'

				act 'No it isn''t':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/pc/body/succubusself.jpg"></center>'
					'You call <<$sucself1>> up from its resting place'
					'It fills you completely, suffusing through your being with power...'
					'<font color="red"><b>and hunger</b></font>'
					'In an instant, the Veil breaks and Katja is exposed to all your radiance. Fear crosses her eyes before the fake reality reasserts its influence and obfuscates her perceptions, but by that moment, tendrils of your mana have connected with her deepest desires.'
					'Slowly... Timidly... Katja begins to undress and she stands before you in only her panties, trying desperately to cover herself and looking mortified. You are surprised that she has the will to leave that last piece of clothing, but, damn, if she isn''t a cute vision!'
					'"Come here Katja! Just relax! We aren''t going to do anything wrong!"'
					gs 'stat'

					act 'She sits on the bed.':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/SL1.jpg"></center>'
						'"Ok <<$pcs_nickname>>... what... what are you planning to do?"'
						'You don''t answer. In it''s place, there is only an embrace. Katja squirms nervously, but doesn''t try to break away. Kissing her beautiful neck, you wait and let the redhead relax... A  difficult task, so after a few minutes, your hands begin to roam her body.'
						'"Listen to me shy, innocent, self-conscious, virginal Katja. From now on, you will respond only with "Oh... oh... oh..." Do you understand my pet?"'
						'Your right hand finally reaches between her legs and rests over the soft fabric of her panties. A promise of things to come... stopping when she closes her legs.'
						'"<<$pcs_nickname>>! Ouch!"'
						'At Katja''s transgression, you give her crotch a little pinch, startling her, but making her shut up. Your enhanced senses let you caress all her erogenous zones and soon she is moaning, forgetting her reluctance at your dominant act.'
						'"It is ok my pet. Just... let me do all the work. But first, I need you to give me something... will you let me in?"'
						'She looks at you confused, but unquestionably aroused. With a vague understanding of your words, she opens her legs.'
						gs 'stat'

						act 'Time to take a "gift"':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/SL2.jpg"></center>'
							'Even through the silky fabric, you can sense her lower labia engorging with blood. Hot and wet, she is ready for your first "lesson"'
							'"We are going to do it slowly, don''t get nervous."'
							'Katja leans against you and closes her eyes. With a hand, you pull away the last obstacle towards her cunt and with the other, caress her lips. Katja just moans at your teasing, her hips moving unwittingly in the quest for more pleasure.'
							'You continue touching her, helping the excited clitoris to reach beyond its little prison, and putting it under your assault. Little by little, you feel Katja''s hotness and wetness permeate her pussy, making it easy for you to insert your fingers into the tightly closed slit'
							'"Oh?"'
							'That is the only word that escapes Katja''s mouth as your index and middle fingers travel through her more secret of places. The aroused flesh barely resists your intrusion as the fingertips reach an intact barrier that obediently parts before your assault. You move your fingers in a scissorlike motion.'
							'"Ouch!"'
							'You retire the hand and raise it so the no-longer little girl can see it. Between your fingers, covered in her slickness, a pinkish hue can be appreciated.'
							gs 'stat'

							act 'Ending the lesson':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/SL3.jpg"></center>'
								'Katja looks dumbfounded at your hand. Her inexperience makes it difficult for the redhead to understand what just happened. Suddenly, her eyes open in realization and you kiss her while congratulating the woman between your arms.'
								'"Congratulations Ekaterina Meynold! You are now a grown up woman! And grown ups get gifts."'
								'Too shocked and aroused, Katja lets you lie her on the bed, take away her panties, and go down on her. She has lost any reservation to be heard, and her moans fill the room. Your assault on her pussy, united to the arousal your touch has brought, makes her happily thrash all over the bed.'
								'You feel it when Katja raises her hips and a long guttural grunt escape her lips. She orgasms, and in that instant, a sympathetic link triggers, letting her energy flow towards you. Katja moans again and again as your feeding triggers orgasm after orgasm.'
								'Finally, exhausted, Katja lies on the bed, cuddling against you. For the next few minutes she doesn''t say anything, and in fact, seems to be on the brink of dozing off. You begin to pick up your clothes. It is probably best if you leave now.'
								gs 'arousal', 'vaginal_finger_give', 10, 'lesbian'
								gs 'arousal', 'cuni_give', 10, 'lesbian'
								pcs_mood += 20
								katjaQW['slut'] += 20
								npc_rel['A14'] += 5
								if npc_sex['A14'] = 0: girl += 1 & npc_sex['A14'] = 1
								if npc_vag['A14'] = 0: npc_vag['A14'] = 1
								katjaQW['QWstage'] = 3
								npcbrokehymen = 1
								KatjaQW['dom'] -= 5
								sexnutrition += 25 * scfeed
								suclezsex = lesbian
								succubxp += 6
								sucabslez = 1
								gs 'stat'

								act 'Time to leave': gt 'katjaHomeTalk', 'TamVal_2'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'TamVal_2':
	*clr & cla
	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'A few minutes pass with Katja in contemplative silence before you finally decide to leave, but as you reach for the door, she finally talks.'
	 '"Hey <<$pcs_nickname>>! I... look this is going to sound awkward, Especially... ehm... taking into consideration what just happened... I was thinking about this before, well, you know. Will you want to... come home to study? I''m not trying to... Ehm... Fuck!"'
	'You smile at Katja''s awkwardness.'
	'"Yes, I would like that Katja, don''t worry."'
	'She gives you a timid smile before climbing under her bed''s covers as you leave. This has been a full afternoon. There is nothing more for you here... Except Katja''s mother waiting for you in the entry hall...'
	minut += 5
	gs 'stat'

	act 'A Talk':
		*clr & cla
		menu_off = 1
		'<center><h4><font color="maroon">Tamara Meynold</font></h4></center>'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big257.jpg"></center>'

		if zz_stage >= 1:
			'"So...<<$pcs_nickname>>, what exactly is troubling my daughter?"'
			'She is asking you without concern, and for a moment, you don''t know what to say, but finally decide to answer.'
			'"She is troubled about the fact that Valentina and you are in a... well... romantic relationship."'
			'Tamara seems to think about your answer, and finally gives a somewhat exasperated sigh.'
			'"It''s seems I must talk with this girl. Well, thanks <<$pcs_nickname>>... Hm... A moment, what do you think my relationship with Valentina is?"'
			'Ok, that is, without a doubt, a loaded question. Licking your lips, you try to give a more or less educated answer.'
			'"Sincerely? I don''t know, but she seemed... Ehm..."'
			'"Too clingy? Yes indeed <<$pcs_nickname>>. Valentina isn''t the first girl I have helped to get back on her feet, but she is without a doubt the most "grateful"... Sigh... Well... A pleasure, but I must talk with my daughter."'
			'Finally, after saying your goodbyes, you leave the house.'

		else
			'"<<$pcs_nickname>> isn''t it? I''m Tamara Meynold, my pleasure."'
			'"Hello Mrs. Maynold."'
			'"So... <<$pcs_nickname>>, what exactly is troubling my little girl?"'
			'She is asking you without concern, and for a moment, you don''t know what to say, but finally decide to answer.'
			'"She is troubled about the fact that Valentina and you are in a... well... romantic relationship."'
			'Tamara seems to think about your answer, and finally gives a somewhat exasperated sigh.'
			'"It''s seems I must talk with this girl. Well, thanks <<$pcs_nickname>>... Hm... A moment, what do you think my relationship with Valentina is?"'
			'Ok, that is, without a doubt, a loaded question. Licking your lips, you try to give a more or less educated answer.'
			'"Sincerely? I don''t know, but she seemed... Ehm..."'
			'"Too clingy? Yes indeed <<$pcs_nickname>>. Valentina isn''t the first girl I have helped to get back on her feet, but she is without a doubt the most "grateful"... Sigh... Well... A pleasure, but I must talk with my daughter."'
			'Finally, after saying your goodbyes, you leave the house.'
		end

		minut += 5
		gs 'stat'

		act 'Leave':gt 'pav_residential'
	end
end

if $ARGS[0] = 'boy_discussion':
	*clr & cla
	katjaQW['QWstage'] = 5
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	if  Marcus_sextype > 0:
		katjaQW['horny'] += 20
		'"I sometimes have sex with Marcus, and I can tell you he is really into Russian girls. I''m sure that he would love to pop the cherry of a Russian beauty like you."'
		'"Marcus is very good looking.... If you think he would be willing to have sex with a girl like me..." Katja trails off, starting to sound nervous again.'
		'"I''m sure that he would love to have sex with you. As any man who isn''t gay would," you answer. Katja''s face brightens up and she moves towards you for a kiss.'
		act 'Kiss her back': gt 'katjaEvDin', 'kiss'
	else
		katjaQW['horny'] += 10
		'"Do you have any boy in mind?" you ask.' 
		'"I don''t know. Lazar is hot, but I have the feeling that he would just consider us a check on his list, and not be able to keep his mouth shut," she answers before pondering. "Maybe Marcus? He''s very good looking, and I haven''t heard of him spreading rumors. Most of the others don''t listen to what he says anyway because he''s black and from America. Do you think he will be a good first time?" she asks.' 
		'"I don''t know, I''ve never had sex with him," you answer. "Maybe you could try that..."' 
		'Katja looks at you pleading with her big eyes. "Please <<$pcs_nickname>>. I really want my first time to be good, so could you please test him for me?"'
		*nl
		'"Marcus is hot, but how would we approach him?" you ask.' 
		'"Try to dance with him at the disco, and get close to him. He really seems to like the girls there, and since you''re the hottest there, I''m sure he''ll like it. Especially if you lead him on like you know how to do," she says in her most flattering voice.'
		'You smile. "Okay, I''ll try to dance with him at the disco, and see if I can test him for you."'
		'"You are the bestest friend!" she says with a huge smile and give you a tight hug.'
		act 'Talk about something else': gt 'KatjaHomeTalk'
		if mey_vika['key'] = 1:
			act 'Leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
		end
	end
end

if $ARGS[0] = 'anal_discussion':
	*clr & cla
	katjaQW['anal_quest'] = 2
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	if  IvanShowerQW = 11:
		katjaQW['horny'] += 20
		'"Ivan seems to be very interested in our kissing. I sometimes have anal sex with him. You can say we''re what you call ''friends with benefits''. I think he might be interested," you tell her.'
		'"Ivan is hot... I''ve also heard that he''s really into anal sex. Yeah, if you think he''s willing, then..." Katja is having trouble finding the words as she gets visibly excited thinking about it.'
		'"We could try to see if he is up for something next time he watches us kiss at school'+iif(month > 4 and month < 10, ', or if we ran into him on the beach', '.')+'" you answer and Katja throws her arms around you and goes in for a kiss.'
		act 'Kiss her back': gt 'katjaEvDin', 'kiss'
	else
		katjaQW['horny'] += 10
		'"Do you have any boy in mind?" you ask.' 
		'"Well, Ivan seems to be quite interested in our kissing at school. The other girls say that he''s really into anal sex. He''s also very hot," she answers. "So maybe you could try him out to see if it doesn''t hurt to much with him? I don''t want my first time to be too painful."'
		'"Yeah, Ivan is hot. I need to find a way to approach him about it though," you reply.' 
		'"He trains in the gym at the community center in the late afternoon. You might have luck talking with him there. I''ve also heard a rumor that he sometimes uses the women''s shower there," she tells you.'
		'You smile. "Okay, I''ll try to see if he''s up for something there and try him out for you."'
		act 'Talk about something else': gt 'KatjaHomeTalk'
		if mey_vika['key'] = 1:
			act 'Leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
		end
	end
end


if $ARGS[0] = 'preventation_talk':
	*clr & cla
	minut += 5
	gs 'stat'
	katjaQW['birth_control_start_day'] = daystart + 15
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'	
	'"If you want to '+iif( katjaQW['QWstage'] = 7, 'have sex with boys in the park', 'continue having sex with boys around here')+', you should get on birth control," you tell Katja. "Most of the boys around here don''t want to use condoms, and don''t care if they get the girls pregnant."'
	'"And if they get a girl pregnant, they''ll just pretend it wasn''t them. You don''t want to raise a child on your own right now, do you?" you ask. "No" she answer weakly "No, I don''t. I want to have children, but not right now. Not before I go to university."' 
	'"Then you should get on the pill," you continue. "I''m sure if you ask your mother, then she''ll help you. I can''t imagine Vicky not being on the pill at this point, but if you don''t want to ask her, you can buy it at the local pharmacy. My aunt Luda works there and she won''t tell anybody about it. She knows how to be discreet."'
	act 'Talk about something else':
		if $loc = 'katja_dorm':
			gt 'katja_dorm', 'talk'
		else
			gt 'KatjaHomeTalk'
		end
	end
	if $loc = 'katja_dorm':
		act 'Stop talking': gt 'katja_dorm', 'start'
	elseif mey_vika['key'] = 1:
		act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
	end	
end

if $ARGS[0] = 'random_park_sex_talk':
	*clr & cla
	katjaQW['QWstage'] = 7
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'Katja gives you the most sultry look she can muster. "You know, sex with Ivan and Marcus is great and all, but I was thinking that it might be time to try other boys."'
	'"Do you have anybody in mind?" you ask.' 
	'"Not any of the boys in the class. I don''t think anybody except Ivan could keep their mouth shut about having a threesome with the two hottest chicks in school!" she answers. "I don''t really know anybody else. You''ve been much more around than me, so maybe you know somebody?"'
	act 'Tell her about the boys in the park':
		cla
		katjaQW['horny'] += 5
		'You tell her that strangers come to the park and look for girls to have fun with, without any commitment, and suggest that you could try to pick up some boys there.'
		'"Awesome!" she says and looks at you really excitedly. "Why don''t we go right now?"'
		if katjaQW['birth_control_start_day'] < daystart and katjaQW['birth_control_start_day'] > 0:
			act 'Agree':
				minut += 15
				katjaQW['horny'] += 5
				$ev_name = 'Katja'
				$ev_name_a = 'Katja'
				$ev_name_om = 'Katja'
				dick = 0
				place = 1
				Frend_num = 14
				p_slut = katjaQW['slut']
				p_dom = KatjaQW['dom'] + 50
				p_horny = katjaQW['horny']
				p_alko = 0
				gt 'placer'
			end				
			act 'Not right now': gt 'KatjaHomeTalk'
		else
			'Remembering that the boys in the park won''t use protection, you turn Katja down.'
			if katjaQW['birth_control_start_day'] = 0: 
				act 'Tell Katja that you think she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
			end
			act 'Talk about something else': gt 'KatjaHomeTalk'
			if mey_vika['key'] = 1:
				act 'Leave the room': gt 'mey_home', 'start'
			else
				act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
			end
		end
	end
end

if $ARGS[0] = 'sex_with_boy_ask':
	*clr & cla
	katjaQW['QWstage'] = 4
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'Katja looks at you nervously, but with that look in her eyes that tells you she''s thinking about something naughty. "You''ve told me all about how good it is to have sex with a boy," she meekly says. "I... I think... I think I would like to try it too..."'
	if katjaQW['anal_quest'] > 1:
		'"So you want me to set it up again?" you ask, and Katja just nods sheepishly. "Okay. Now Ivan doesn''t fuck girls in the pussy since he''s afraid of getting them pregnant, so I assume that you want me to find somebody else?"'
		'"Yes <<$pcs_nickname>>. You know so many guys, so I''m sure you can arrange my first time to be perfect!" she says in her most persuasive voice.'
	else
		'"Okay, so why don''t you?" you ask.' 
		'"I don''t know how to approach a boy..." she answers. "I don''t want a boyfriend, I just want to try having sex with a boy. Can''t you help me arrange it? Please..." she says, looking at you pleadingly with her big eyes.'
	end
	act 'Agree': gt 'KatjaHomeTalk', 'boy_discussion'
	act 'Refuse':
		cla
		'You refuse to help her, but she continues to beg you.'
		act 'Tell her to ask a boy herself':
			cla
			katjaQW['horny'] -= 20
			minut += 5
			'She stops begging and you return to talking about other subjects.'
			act 'Continue': gt 'KatjaHomeTalk'
		end
		act 'You''re too precious to share':
			cla
			katjaQW['horny'] += 20
			minut += 5
			'She stops begging and looks at you with lust in her eyes.'
			act 'Talk about something else': gt 'KatjaHomeTalk'
			act 'Kiss her': gt 'katjaEvDin', 'kiss'
		end
		act 'Tell her to stick with girls':
			cla
			katjaQW['horny'] -= 5
			minut += 5
			'"Boys aren''t worth it. Just stick with girls," you tell her and she stops begging, but doesn''t look completely convinced.'
			act 'Talk about something else': gt 'KatjaHomeTalk'
		end					
	end
end

if $ARGS[0] = 'Marcus_answer_talk':
	*clr & cla
	katjaQW['marcus_asked'] = 2
	minut += 5
	katjaQW['Marcus_day'] = daystart
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'You tell Katja that you''ve talked with Marcus and he agreed. She looks at you excitedly. "So when do we do it?"'
	'"He agreed to come over when I call him, so we can call him right now, or wait for another time," you answer.'
	if week < 6 and  (locat['Vicky'] = 10 or locat['Vicky'] = 11) and (katjaQW['horny']+katjaQW['slut']) > 100:
		'"Okay. Let''s call him right now!" she squeals, her face completely red.'
		act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
	elseif (katjaQW['horny'] + katjaQW['slut']) <= 100:
		'"I don''t know. Maybe another time. I need to think about it some more," she says while looking a little nervous.' 
		'"Okay, another time then," you reply.'
		act 'Talk about something else': gt 'KatjaHomeTalk'
	else
		'"We can''t call him now! Vicky will be home soon and I don''t want her to see him here!" she says while looking a little panicked.' 
		'"Okay, we''ll plan it for another day when we have time," you reply.'
		act 'Talk about something else': gt 'KatjaHomeTalk'
	end
end

if $ARGS[0] = 'first_boy_sex_follow_up':
	*clr & cla
	katjaQW['QWstage'] = 6
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'Katja gives you a big hug. "Thank you! The experience with Marcus was great!" she says with a huge grin.'
	if npc_vag['A14'] + 5 < npc_dick['A146']:
		'"It didn''t hurt too much?" you ask.' 
		'"It hurt, that was why I couldn''t take it any longer. But it was fun and I think it''ll hurt less the next time," she answers.' 
		'"So you want to have sex with a boy again?" you reply.'
	else
		'"It did look like you had fun," you say.' 
		'"I definitely had fun, I thought it would hurt, but I didn''t feel any pain," she answers.' 
		'"Might be all the times I used my dildo on you," you reply.'
	end
	'"We should definitely do this again some time," she finishes.' 
	'"We''ll see if the opportunity comes up again," you answer.'
	act 'Talk about something else': gt 'KatjaHomeTalk'
	if katjaQW['birth_control_start_day'] = 0:
		act 'Tell her that she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
	end
end	

if $ARGS[0] = 'anal_sex_with_boy_ask':
	*clr & cla
	minut += 5
	gs 'stat'
	katjaQW['anal_quest'] = 1
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'Katja starts speaking a little hesitantly. "You keep telling me that anal sex with a boy is so good'+iif(katjaQW['strapon_ass'] = 1, ', and you fucking me in the ass with your strapon is nice, but it would probably be so much better with a real cock,', ', and I think I also would like to try it,')+'" she says while looking at you with her most begging eyes.'
	if katjaQW['QWstage'] >= 6:
		'"So you want me to set it up again?" you ask, and Katja just nods sheepishly. "Okay. Since you asked, I expect that you want to try it with somebody else that isn''t Marcus?" "Yes, <<$pcs_nickname>>. You know so many guys, so I''m sure you can arrange my first anal sex to be perfect!" she says in her most persuasive voice.'
	else
		'"Okay, so why don''t you?" you ask. "I don''t know how to approach a boy..." she answers. "I don''t want a boyfriend, I just want to try having anal sex with a boy. Can''t you help me arrange it? Please..." she says while looking at you pleadingly with her big eyes.'
	end
	act 'Agree': gt 'KatjaHomeTalk', 'anal_discussion'
	act 'Refuse':
		cla
		'You refuse to help her, but she continues to beg you.'
		act 'Tell her to ask a boy herself':
			cla
			katjaQW['horny'] -= 20
			minut += 5
			'She stops begging and you return to talking about other subjects.'
			act 'Continue': gt 'KatjaHomeTalk'
		end
		act 'You''re too precious to share':
			cla
			katjaQW['horny'] += 20
			minut += 5
			'She stops begging and looks at you with lust in her eyes.'
			act 'Talk about something else': gt 'KatjaHomeTalk'
			act 'Kiss her': gt 'katjaEvDin', 'kiss'
		end
		act 'Tell her to stick to girls':
			cla
			katjaQW['horny'] -= 5
			minut += 5
			'"Boys aren''t worth it. Just stick with girls," you tell her and she stops begging, but doesn''t look completely convinced.'
			act 'Talk about something else': gt 'KatjaHomeTalk'
		end
	end					
end

if $ARGS[0] = 'uni_tell':
	*clr & cla
	minut += 15
	katjaQW['know_going_to_teaching_degree'] = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	if katjaQW['know_katja_uni'] = 0:
		'You tell Katja that you have enrolled at the university to study to become a teacher. She replies that she also plans to do the same, and that it will be fun studying at the university together. She bombards you with questions about how your enrolment process went.'
	else
		'You tell Katja that you have also enrolled to study teaching at the university. She replies that it will be fun studying at the university together before you spend the next few minutes talking excitedly about what you know about the program.'
	end
	if $loc = 'mey_home':
		act 'Talk about something else': gt 'KatjaHomeTalk'
	elseif $loc = 'pav_disco':
		act 'Ask if she wants to dance': gt 'pav_disco_coolkids', 'katja_dance_ask'
		act 'Do something else': gt 'pav_disco_classmates', 'classmates'
	else
		act 'Talk to someone else': gt 'pav_beach_chat', 'beach_hangout'
	end
end

if $ARGS[0] = 'katja_uni_tell':
	*clr & cla
	minut += 15
	katjaQW['know_katja_uni'] = 1
	katjaQW['knows_dorm_room_number'] = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	if katjaQW['know_going_to_teaching_degree'] = 0:
		'Katja excitedly tells you that she has been accepted into the university to study teaching. She then tells you about how great the program is. She also tells you that she are going to move into room 26 at the university dorm in the beginning August.' 
		if university['student'] = 1 and $university['enrolled_in'] = 'teaching_studies':
			act 'Tell Katja that you''re going to the university': gt 'KatjaHomeTalk', 'uni_tell'
		end	
	else
		'Katja excitedly tells you that she has also been accepted into the university to study teaching, and that it will be fun studying at the university together. She also tells you that she are going to move into room 26 at the university dorm in the beginning August. You then spend the next few minutes talking excitedly about what you know about the program.'
	end
	if $loc = 'mey_home':
		act 'Talk about something else': gt 'KatjaHomeTalk'
	elseif $loc = 'pav_disco':
		act 'Talk about something else':  gt 'pav_disco_coolkids', 'katja'
	else
		act 'Enjoy the sun': gt 'pav_beach_chat', 'katja'
	end
end

if $ARGS[0] = 'boy_no':
	*clr & cla
	minut += 15
	katjaQW['horny'] += 20
	katjaQW['boy_block'] = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'"I don''t have interest in boys," you tell Katja.' 
	'"Oh," she replies "Does that mean..." she starts, but her voice falters.' 
	'"Yes. I ''m only interested in girls," you say.' 
	'Katja doesn''t say anything, but her face is getting redder and she looks intensely at you with her big eyes.'
	act 'Talk about something else':
		if $loc = 'katja_dorm':
			gt 'katja_dorm', 'talk'
		else
			gt 'KatjaHomeTalk'
		end
	end
	if $loc = 'katja_dorm':
		act 'Stop talking': gt 'katja_dorm', 'start'
	elseif mey_vika['key'] = 1:
		act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
	end
end

if $ARGS[0] = 'boy_yes':
	*clr & cla
	minut += 15
	katjaQW['horny'] += 10
	katjaQW['boy_block'] = 0
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'"So I told you earlier that I had no interest in boys?" you say.' 
	'"Yes I remember," she replies.' 
	'"Turns out I was wrong. I am in fact starting find boys attractive," you say.' 
	'"So have you already done something with a boy? Tell me everything! What is it you find attractive about boys? Who is the hottest guy in school?" Katja starts bombarding you with questions.' 
	'"Slow down. This is also something new for me. But we can talk about boys if you want to," you say as you see Katja''s face getting more red.'
	act 'Talk about something else':
		if $loc = 'katja_dorm':
			gt 'katja_dorm', 'talk'
		else
			gt 'KatjaHomeTalk'
		end
	end
	if $loc = 'katja_dorm':
		act 'Stop talking': gt 'katja_dorm', 'start'
	elseif mey_vika['key'] = 1:
		act 'Leave the room': gt 'mey_home', 'start'
	else
		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
	end
end

if $ARGS[0] = 'fisting_ask':
	*clr & cla
	minut += 15
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
	'"Wow," she says, sitting there thoughtful while her breathing is becoming more aroused. After a few seconds, she says "It did not hurt at all?"' 
	'"Not a lot," you answer. "When you''re in control, you can make sure that the pain is not too much."' 
	'She looks thoughtful again. "I don''t think I could do that to myself," she says.' 
	'"That''s okay. It''s not for everybody," you say.' 
	'"But it does sounds so hot!" she says. "Maybe... you could..." her voice trails off. After a moment, she continues. "Maybe you could show me..."' 
	'"You want me to fist myself here in front of you?" you ask.' 
	'"No, I want you... to..." her voice falters again.' 
	'"You want me fist you?" you ask. She doesn''t say anything, but slowly nods. "Right now?" Again she doesn''t say anything, but nods."'
	act 'Show Katja how fisting is done': gt 'katja_sex', 'first_fisting'
	act 'Say you will do it another time':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
		'You tell Katja that you are not in the mood right now, but you might do it anther time if she asks.'
		if $loc = 'katja_dorm':
			act 'Stop talking': gt 'katja_dorm', 'start'
		elseif mey_vika['key'] = 1:
			act 'Leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
		end	
	end
end

--- KatjaHomeTalk ---------------------------------