glife/locations/katjaEvDin.qsrc

# katjaEvDin
!2022/28/01

if $ARGS[0] = 'kiss':
	*clr & cla
	minut += 5
	pcs_mood = 100
	pcs_horny += 10
	katjaQW['horny'] += 10

	if katjaQW['QWstage'] < 3:
		if katjaQW['slut'] < 5:
			katjaQW['slut'] = 10
		else
			katjaQW['slut'] += 5
		end
		katjaQW['QWstage'] = 3
	end

	gs 'stat'
	gs 'katjaEvDin'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
	'You bring your face to Katjas face and feel her hot breath on your lips. Katja closes her eyes and touches her lips to your lips.'
	'Katjas nimble tongue darts into your mouth, you suck on her tongue, then your tongue goes into Katja''s mouth and she very gently caressed it with her tongue and sucks on your tongue.'
	'Katja finally pushes away from your flushed face and licks her lips.'

	if katjaQW['horny'] >= 60:
		'Katja moves her hands to your chest and gently touches them with her finger.'

		act 'Let her':
			*clr & cla
			minut += 5
			pcs_horny += 10
			katjaQW['horny'] += 10
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tits.jpg"></center>'
			'Katja bares your breasts and touches them with her fingers, then she bows her head and begins to lick your nipple.'

			gs 'boystat', 'A14', 'a'
			gs 'KatjaEvDin', 'sex'
		end

		gs 'willpower', 'foreplay', 'resist', 'hard'
		if will_cost <= pcs_willpwr:
			act 'Remove her hands (<<will_cost>> Willpower)':
				*clr & cla
				minut += 5
				pcs_horny += 10
				KatjaQW['dom'] -= 1
				katjaQW['horny'] -= 10
				katjaQW['horny'] = min(katjaQW['horny'], 60)
				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 Katja.'

				act 'Further':gt 'KatjaHomeTalk'
			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
	elseif npc_sex['A14'] > 0:
		act 'Touch her chest':
			menu_off = 1
			*clr & cla
			minut += 5
			pcs_horny += 10
			katjaQW['horny'] += 10
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/touch.jpg"></center>'
			'You touch Katja''s tender breasts and she sighs deeply, biting her lip.'

			if katjaQW['horny'] < rand(0,60):
				'You''re her breasts a little before Katja moves away from you.'
				'"I''m not in the mood right now Sveta" Katja says "Another time"'

				act 'Accept Katja''s decision':gt 'KatjaHomeTalk'

				gs 'willpower', 'sex', 'force', 'hard'
				if will_cost <= pcs_willpwr:
					act 'Grab her (<<will_cost>> Willpower)':
						*clr & cla
						minut += 5
						pcs_horny += 10
						KatjaQW['dom'] -= 1
						katjaQW['horny'] -= 10
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/grab.jpg"></center>'
						'You grab Katja firmly so she can''t back away.'
!!{
						if pcs_dom < KatjaQW['dom']:
							'Katja pushes your arms apart and pulls away, you understand that she doesn''t want more.'

							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
						else}
							'Katja freezes in your arms and you stroke her body and kiss her neck.'

							act 'Lick her breast':
								*clr & cla
								minut += 5
								pcs_horny += 10
								katjaQW['horny'] += 10
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tits_katja_get.jpg"></center>'
								'You free Katja''s small, firm breasts from under her clothes and begin to lick them, paying special attention to her nipples. Katja closed her eyes in pleasure and bites her lip.'

								gs 'boystat', 'A14', 'a'
								gs 'KatjaEvDin', 'sex'
							end
						end
!!					end
				else
					act 'Grab her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
			else
				'Katja moves her hands to your chest and gently touches them with her finger.'
				'Katja starts stroking your chest stronger and you feel as she undoes your bra, trying to get to your breasts.'

				act 'Let her':
					*clr & cla
					minut += 5
					pcs_horny += 10
					katjaQW['horny'] += 10
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tits.jpg"></center>'
					'Katja bares your breasts and touches them with her fingers, then she bows her head and begins to lick your nipple.'


					gs 'boystat', 'A14', 'a'
					gs 'KatjaEvDin', 'sex'
				end

				act 'Ask Katja to stop.':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/touch.jpg"></center>'
					'You ask Katja to stop but she ignores you.'

					gs 'willpower', 'foreplay', 'resist', 'hard'

					act 'Give in to her touch':
						*clr & cla
						minut += 5
						pcs_horny += 10
						KatjaQW['dom'] += 1
						katjaQW['horny'] += 10
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tits.jpg"></center>'
						'Katja bares your breasts and touches them with her fingers, then she bows her head and begins to lick your nipple.'

						gs 'boystat', 'A14', 'a'
						gs 'KatjaEvDin', 'sex'
					end
					
					if will_cost <= pcs_willpwr:
						act 'Remove her hands (<<will_cost>> Willpower)':
							*clr & cla
							minut += 5
							pcs_horny += 10
							KatjaQW['dom'] -= 1
							katjaQW['horny'] -= 10
							katjaQW['horny'] = min(katjaQW['horny'], 60)
							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 Katja.'

							act 'Further':gt 'KatjaHomeTalk'
						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
			end
		end
	else
		'Katja turns and begins collecting books, pretending that nothing has happened.'

		act 'Talk about something else': gt 'KatjaHomeTalk'
		if mey_vika['key'] = 1:
			Act 'Smile and leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':gt 'pav_residential'
		end
	end
end

if $ARGS[0] = 'strapon_main':
	*clr & cla
	menu_off = 1
	gs'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon_ready.jpg"></center>'
	!! Added a variable to check if you''ve given Katja an orgasm and are going for round 2 so that a different message will show.
	if KatjaQW['orgasm_day'] ! daystart:
		if katjaQW['horny'] < 20:
			'Katja looks calm and indifferent.'
		elseif katjaQW['horny'] < 40:
			'Katja looks at you with amusement.'
		elseif katjaQW['horny'] < 60:
			'Katja has a slight blush on her cheeks as she looks at you mischievously.'
		elseif katjaQW['horny'] < 80:
			'Katja blushes and languidly looks at you.'
		else
			'Katja''s face is flushed bright red and her chest heaves from deep breathing.'
		end
	else
		if katjaQW['horny'] < 20:
			'Katja looks calm and in control of her breathing again.'
		elseif katjaQW['horny'] < 40:
			'Katja looks at you with amusement. Her breathing seems to be almost back to normal.'
		elseif katjaQW['horny'] < 60:
			'Katja has a slight blush on her cheeks and she looks at you mischievously, still breathing a bit hard.'
		elseif katjaQW['horny'] < 80:
			'Katja blushes and languidly looks at you, obviously still unable to get her breath fully under control again.'
		else
			'Katja''s face is flushed red and her chest heaves from gulping down all the air she can manage. You delight in the fact that you pushed her over the edge so hard.'
		end
	end
	if katjaQW['horny'] > 10 and katjaQW['horny'] < 100:
		act 'Make Katja suck the strap-on': gt 'KatjaEvDin', 'strapon_bj'
		act 'Fuck Katja with the strap-on': gt 'KatjaEvDin', 'strapon_miss'
		act 'Fuck Katja in the ass with the strap-on': gt 'KatjaEvDin', 'strapon_anal'
	end

	if katjaQW['horny'] < 0:katjaQW['horny'] = 0

	act 'Get dressed  and talk about something else': gt 'KatjaHomeTalk'
	if mey_vika['key'] = 1:
		Act 'Smile and leave the room': 
			gs 'arousal', 'end'
			gt 'mey_home', 'start'
		end
	else
		act 'Say goodbye and leave':
			minut += 5
			gs 'arousal', 'end'
			gt 'pav_residential'
		end
	end
end

if $ARGS[0] = 'strapon_bj':
	*clr & cla
	minut+=5
	gs'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon_bj.jpg"></center>'
	'You grab a handful of Katja''s red hair and keep a good hold on it as you pull her face over to the strap-on and smack her lips with it a few times until she opens her mouth. Once her mouth is open, you slide it in and let her suck it before you buck your hips forward and start fucking her mouth and throat with the strap-on, your hand in her hair holding her head in place as you do so.'

	if katjaQW['strapon_bj'] = 0: katjaQW['strapon_bj'] = 1
	gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
	gs 'stat'

	if dick < npc_throat['A14']:
		katjaQW['slut'] += 1
		katjaQW['horny'] += 5
		'Katja expertly swallows the strap-on to the hilt, Her eyes water slightly, but she''s very practiced at deep throating and easily takes the dildo all the way down her throat.'

		gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
		gs 'stat'
	elseif dick < npc_throat['A14']*2:
		katjaQW['horny'] -= 5
		'Katja tries to accommodate the dildo plunging down her throat, but she keeps gagging a little, her eyes shed tears and saliva drips from her mouth, but she''s able to take it.'
	else
		katjaQW['horny'] -= 10
		'Katja tries to accommodate the dildo plunging down her throat, but she keeps gagging, her eyes shed tears, snot runs from her nose and saliva drips from her mouth.'
	end

	if dick > npc_throat['A14']: npc_throat['A14'] += 1

	if katjaQW['horny'] >= 100:
		katjaQW['horny'] = 0
		katjaQW['slut'] += 5
		KatjaQW['orgasm_day'] = daystart
		'Katja moans and bites her lip, looking like she''s already about to orgasm just from sucking the strap-on. "You look so pretty with that big cock slamming home in your throat baby!" you tell her as her hand darts to her clit and she starts to rub herself furiously. In mere seconds, she pushes herself over the edge and starts to tremble violently, all the while moaning around the dildo still pumping her throat.'
	end

	act'Further':gt 'KatjaEvDin', 'strapon_main'
end

if $ARGS[0] = 'strapon_miss':
	*clr & cla
	gs'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon_miss.jpg"></center>'
	'You lay Katja on her back and spread her legs before crawling between them and rubbing the dildo against her wet pussy. You slide it into her and start to fuck her, slowly working the dildo balls deep into her as you start to fuck her harder.'

	if katjaQW['strapon_vag'] = 0: katjaQW['strapon_vag'] = 1
	gs 'arousal', 'vaginal_strap_give', 5, 'lesbian', 'dom'
	gs 'stat'

	if npc_vag['A14'] < 1:
		'Katja groans and bites her lip in pain as the strap-on enters her. You glance down and notice blood on the strap-on. You just popped Katja''s cherry...'
		katjaQW['slut']-=10
		katjaQW['horny'] = 0
		npc_vag['A14'] += 3
	elseif dick > npc_vag['A14'] + 5:
		if npc_vag['A14'] < dick: npc_vag['A14'] += 1
		if npc_vag['A14']*2 < dick: npc_vag['A14'] += 1
		katjaQW['slut']-=1
		katjaQW['horny'] -= 10
		'Katja bites her lip and moans as you fuck her with the strap-on and she gradually starts to get into it. She winces from time to time from one of your hard thrusts into her, obviously hurting her a little, but she reluctantly tolerates it.'
	elseif dick > npc_vag['A14'] + 3 or katjaQW['horny'] < 10:
		if npc_vag['A14'] < dick: npc_vag['A14'] += 1
		if npc_vag['A14']*2 < dick: npc_vag['A14'] += 1
		katjaQW['horny'] += 5
		katjaQW['slut'] += 1
		'Katja bites her lip and moans as you fuck her with the strap-on and she gradually starts to get into it. She closes her eyes and enjoys the sensations.'
	else
		if npc_vag['A14'] < dick: npc_vag['A14'] += 1
		if npc_vag['A14']*2 < dick: npc_vag['A14'] += 1
		if rand(1,2) = 2:
			katjaQW['horny'] += 10
			'You fuck Katja hard and fast and she moans in an excited voice and rolls her eyes in pleasure.'
		else
			katjaQW['horny'] += 20
			'You fuck Katja hard and fast and she moans in an excited voice. "Faster, harder, deeper! Yes, fuck me! Pound me!"'
		end
		katjaQW['slut']+=1
	end

	if katjaQW['horny'] >= 100:
		katjaQW['horny'] = 0
		katjaQW['slut'] += 5
		KatjaQW['orgasm_day'] = daystart
		'Katja moans and bites her lip, looking like she''s already about to orgasm. You lock gazes with her while you increase the pace of your thrusts. After only a few seconds, you feel her starting to tremble violently. You let her ride out her orgasm while slowly pushing the dildo in and out of her a few more times, listening to her sweet moaning while she tries to regain her breath.'
	end

	act'Further':gt 'KatjaEvDin', 'strapon_main'
end

if $ARGS[0] = 'strapon_anal':
	*clr & cla
	gs'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon_anal.jpg"></center>'
	'You roll Katja onto her stomach and spread her legs. Spreading her ass cheeks with your hands, you being to rub her anus with your fingers before grabbing a bottle of lube and lubing up your fingers. You slide two into her ass, stretching it a little while lubing it up. You then lube up the dildo before leaning over and sliding it slowly into her ass. You start slowly fucking her ass.'

	if katjaQW['strapon_ass'] = 0: katjaQW['strapon_ass'] = 1
	gs 'arousal', 'anal_strap_give', 5, 'lesbian', 'dom'
	gs 'stat'

	if npc_ass['A14'] <= 1:
		katjaQW['slut'] -= 5
		katjaQW['horny'] = 0
		'Katja squeals when you push the dildo into her very tight ass. Even with all the lube, it is very tight and difficult to work it deeper into her. She cries out in pain and tears flow from her eyes as you fuck her ass.'
	elseif dick > npc_ass['A14'] + 5:
		katjaQW['slut'] -= 1
		katjaQW['horny'] -= 30
		'It takes some effort to get the dildo to slide into Katja''s tight ass, but you slowly work your way down until you''re balls deep inside her, causing her to cry out in pain. Her hands grasp at the sheets tightly and she bites the pillow as you fuck her ass.'
	elseif dick > npc_ass['A14'] + 3 or katjaQW['horny'] < 10:
		katjaQW['horny'] -= 5
		'It takes a bit of effort to get the dildo to slide into Katja''s ass, but you slowly work your way down until you are balls deep inside her, causing her to cry out a little in pain. Her hands grasp at the sheets tightly, caught between intense pleasure and pain as her moans echo both sensations.'
	elseif dick > npc_ass['A14']:
		katjaQW['horny'] += 5
		'The dildo slides into Katja''s ass fairly easily, and you slowly work your way down until you''re balls deep inside her. She moans in pleasure as you roughly fuck her ass.'
	else
		katjaQW['horny'] += 10
		katjaQW['slut'] += 1
		'The strap-on easily slides into Katja''s ass all the way to the hilt. She moans in pleasure as you roughly fuck her ass.'
	end

	if npc_ass['A14'] < dick: npc_ass['A14'] += 1
	if npc_ass['A14']*2 < dick: npc_ass['A14'] += 1

	if katjaQW['horny'] >= 100:
		katjaQW['horny'] = 0
		katjaQW['slut'] += 5
		KatjaQW['orgasm_day'] = daystart
		'Katja moans and bites her lip, looking like she''s already about to orgasm. You lock gazes with her while you increase the pace of your thrusts. After only a few seconds, you feel her starting to tremble violently. You let her ride out her orgasm while slowly thrusting the dildo in and out of her a few more times, listening to her sweet moaning while she tries to regain her breath.'
	end

	act'Further':gt 'KatjaEvDin', 'strapon_main'
end

if $ARGS[0] = 'strapon_start':
	*clr & cla
	menu_off = 1
	gs'stat'
	if katjaQW['horny'] >= 100: katjaQW['horny'] = 80
	'You get your handbag and pull out the toy.'
	act 'Strap it on':
		*clr & cla
		minut += 3
		gs 'boystat', 'D<<strapnumber>>'
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon.jpg"></center>'
		'You put the strap-on harness on and buckle it in place as Katja bites her lip watching you.'
		act 'Make Katja suck the strap-on': gt 'KatjaEvDin', 'strapon_bj'
		act 'Fuck Katja with the strap-on': gt 'KatjaEvDin', 'strapon_miss'
		act 'Fuck Katja in the ass with the strap-on': gt 'KatjaEvDin', 'strapon_anal'
	end
end

if $ARGS[0] = 'sex':
	menu_off = 1
	act 'relax':
		*clr & cla
		if pcs_horny < 50:pcs_horny = 50
		gs 'stat'

		if katjaQW['slut'] >= 20:
			katjaQW['slut'] += 1
			'Katja puts her hand between your legs. You become aroused and your pussy becomes wet.'

			gs 'arousal', 'vaginal_finger', 5, 'lesbian', 'dom'
			gs 'stat'

			act 'Spread your legs': gt 'KatjaEvDin', 'kuni_p'

		else
			katjaQW['slut'] += 1
			katjaQW['horny'] = min(katjaQW['horny'], 40)
			'Katja is embarrassed and pulls her hand away from 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 go home':gt 'pav_residential'
			end
		end
	end

	act 'Touch Katja between her legs':
		*clr & cla

		if pcs_horny < 50:pcs_horny = 50
		gs 'stat'

		if katjaQW['slut'] >= 20:
			katjaQW['slut'] += 1
			'You put your hand between her legs, feeling her wet pussy under her panties.'

			gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'dom'
			gs 'stat'

			act 'Lick Katja': gt 'KatjaEvDin', 'kuni'
		else
			katjaQW['slut'] += 1
			katjaQW['horny'] = min(katjaQW['horny'], 40)
			'Katja is embarrassed and removes your hand.'

			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 go home':gt 'pav_residential'
			end
		end
	end

	!!This is for a scene of using a dildo on Katja. But such a scene is not yet written.
	!!if (katjaQW['slut'] >= 20) and katjaQW['horny'] >= 30 and dildo > 0:
	!!	act 'Grab a dildo': gt 'KatjaEvDin', 'dildo'
	!!end

	if katjaQW['slut'] >= 40 and katjaQW['horny'] >= 40 and npc_sex['A14'] > 0 and strapon > 0:
		act 'Get your strap-on': gt 'KatjaEvDin', 'strapon_start'
	end
end

if $ARGS[0] = 'kuni':
	*clr & cla
	menu_off = 1
	katjaQW['slut'] += 1
	katjaQW['horny'] = 0

	if npc_sex['A14'] = 0:npc_sex['A14'] = 1 & girl += 1 & katjaQW['slut'] += 5

	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
	'You lean in between Katja''s legs and begin to lick her pussy. She moans and closes her eyes, enjoying your tongue, and after a few minutes, she shivers and her pussy starts to contract rhythmically.'
	'Katja clutches your hair, no longer able to hold back as she moans loudly in orgasm. She then pushes your head away from her.'

	gs 'arousal', 'cuni', 5, 'lesbian', 'sub'
	gs 'stat'

	if pcs_horny >= 50:
		'Katja smiles at you "That was great <<$pcs_nickname>>. Spread your legs."'
		act 'Spread your legs': gt 'KatjaEvDin', 'kuni_p'
	else
		act 'Talk about something else': gt 'KatjaHomeTalk'
		if mey_vika['key'] = 1:
			Act 'Smile and leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':gt 'pav_residential'
		end
	end
end

if $ARGS[0] = 'kuni_p':
	*clr & cla
	menu_off = 1
	katjaQW['slut'] += 1

	if npc_sex['A14'] = 0:npc_sex['A14'] = 1 & girl += 1 & katjaQW['slut'] += 5

	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni.jpg"></center>'
	'Katja moves her head between your legs and you feel her tongue begin to toy with your clitoris, causing you to moan softly.'
	'After a while, you feel a sensation building inside you before it finds release and you''re in the throes of a powerful orgasm.'
	'Soon, the feeling becomes too much and you gently lift Katja''s head away from you.'

	$orgasm_or = 'yes'
	gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
	gs 'stat'

	if katjaQW['horny'] > 0:
		'Katja smiles at you "That was great <<$pcs_nickname>>. Come on now, my turn."'
		act 'Lick Katja': gt 'KatjaEvDin', 'kuni'
	else
		act 'Talk about something else': gt 'KatjaHomeTalk'
		if mey_vika['key'] = 1:
			Act 'Smile and leave the room': gt 'mey_home', 'start'
		else
			act 'Say goodbye and leave':gt 'pav_residential'
		end
	end
end

!!New Katja pcs_dom stuff, this can only happen if the scene in KatjaHomeDin where Katja got you to go down on her and not return the favor happened.
!!anytime after that action when you go to Katja''s house and she is horny I am thinking 70+ this happens.
if $ARGS[0] = 'kuni_dom':
	*clr & cla
	menu_off = 1
	katjaQW['slut'] += 1
	katjaQW['horny'] = 0

	if npc_sex['A14'] = 0:npc_sex['A14'] = 1 & girl += 1 & katjaQW['slut'] += 5

	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
	'You lean in between Katja''s legs and begin to lick her pussy. She moans and closes her eyes, enjoying your tongue, and after a few minutes, she shivers and her pussy starts to contract rhythmically.'
	'Katja clutches your hair, no longer able to hold back as she moans loudly in orgasm. She then pushes your head away from her.'

	gs 'arousal', 'cuni_give', 5, 'lesbian', 'sub'
	gs 'stat'

	if pcs_horny >= 50:
		if katjaQW['dom'] < rand(-50,50) and (katjaQW['strapon_bj'] + katjaQW['strapon_vag'] + katjaQW['strapon_ass']) < 3:
			'Katja smiles at you "That was great <<$pcs_nickname>>, spread your legs."'
			act 'Spread your legs': gt 'KatjaEvDin', 'kuni_p'
		else
			'She looks at you with a satisfied grin, aware you''re horny as well. She smiles at you with a mischievous look in her eye. "That was great <<$pcs_nickname>>, but I think that''s enough of that for today."'

			gs 'willpower', 'sex', 'resist', 'hard'
			if will_cost <= pcs_willpwr:
				act 'Say goodbye and go home (<<will_cost>> Willpower)':
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					gt 'pav_residential'
				end
			else
				act 'Say goodbye and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end	

			act 'Beg her to give you a turn':
				*clr & cla
				katjaQW['dom'] += 1
				pcs_horny += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/myturn.jpg"></center>'
				'You beg her to give you a turn, but she shakes her head. "Sorry <<$pcs_nickname>>, I''m just not in the mood to go down on you, but if you really want something, I''ve got this..." She pulls out a strap-on harness with a rather large dildo attached to it and gives you a wicked grin. You can tell she is just itching to use it on you.'

				gs 'willpower', 'sex', 'resist', 'hard'
				if will_cost <= pcs_willpwr:
					act 'Decline and go home (<<will_cost>> Willpower)':
						gs 'willpower', 'pay', 'resist'
						gs 'stat'
						gt 'pav_residential'
					end
				else
					act 'Decline and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end	

				act 'Agree':
					*clr & cla
					pcs_horny += 10
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katjanewtoy.jpg"></center>'
					'You bite your lower lip. You''re turned on at the idea of Katja using that to fuck you. You nod your head and start undressing as Katja grins and starts putting the harness on. "Sweet! This is going to be fun <<$pcs_nickname>>. I can''t wait to fuck you with this."'

					act 'Blowjob':
						*clr & cla
						gs 'stat'
						'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapbj.mp4"></video></center>'
						'As you get naked, she makes sure the harness is securely in place before she looks over at you and grins, swinging her hips back and forth to make the dildo swing along with her, which makes her giggle. After she amuses herself, she looks at you with a wicked grin and walks over.'
						'She grabs you by your hair, not too hard but not very gently either, pulls you off the bed and gets you down in front of her on your knees. Once you''re on your knees, she pushes the head of the dildo against your lips and slides it into your mouth. With a firm hold on your hair, she starts fucking your mouth and is soon ramming the dildo down your throat.'
						'No matter how used to being throat fucked you are, she makes you gag. She buries it to the base in your throat and leaves it there until you start to gag, before going back to roughly fucking your mouth. Each time she makes you gag, you can hear her giggle, clearly enjoying herself.'
						'With tears running down your cheeks and saliva dripping from your mouth, she finally pulls your head away by your hair. "Okay, I think we got this wet enough, don''t you? Ready for round two?"'

						gs 'arousal', 'bj', 5, 'lesbian', 'sub', 'rough', 'deepthroat'
						gs 'stat'

						gs 'willpower', 'vaginal', 'resist', 'hard'
						if will_cost <= pcs_willpwr:
							act 'Decline and go home (<<will_cost>> Willpower)':
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_residential'
							end
						else
							act 'Decline and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
						end
						
						act 'Agree':
							*clr & cla
							pcs_horny += 15
							gs 'stat'
							'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapfuck.mp4"></video></center>'
							'You nod your head and Katja pulls you up to your feet by your hair. She grabs you on either side of the head and licks some of the saliva off your chin before slowly moving her tongue up to your mouth. You eagerly open your mouth and she gives you a passionate kiss, forcing her tongue into your mouth and then pushes you onto the bed. "That''s my good little fuck slut, now get on your hands and knees like a good little slut!" You get on all fours as she kneels down behind you and gives your ass a hard smack.'
							'She holds the dildo with one hand and starts rubbing it against your pussy lips, while using the other to grab your hair again and pull your head back as she slides the dildo into your wet pussy. She barely has the tip all the way in when she pulls back on your hair, forcing you to lean back as she thrusts her hips forward, shoving the dildo the full length of the dildo inside you.'
							'Before she even gives you a chance to get used to it, she starts roughly and furiously fucking you. Your moans get louder as the pleasure builds. "Yeah, you love this, don''t you bitch?!" 
							"Yes, yes please fuck me. Use me!" you moan back and she doubles her efforts before she finally pulls out of you, keeping hold of your hair as she drags you off the bed. She takes you over to her desk and bends you over it.'
							'"Reach back and pull those ass cheeks apart so I can fuck you in the ass!" she commands you. You don''t know if you can resist her, you don''t know if you even want to.'

							gs 'arousal', 'vaginal_strap', 5, 'lesbian', 'sub', 'rough'
							gs 'stat'

							gs 'willpower', 'anal', 'resist', 'hard'
							if will_cost <= pcs_willpwr:
								act 'Decline and go home (<<will_cost>> Willpower)':
									gs 'willpower', 'pay', 'resist'
									gs 'stat'
									gt 'pav_residential'
								end
							else
								act 'Decline and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
							end
						
							act 'Surrender your ass':
								*clr & cla
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapanal.jpg"></center>'
								'You grab your ass cheeks and pull them apart. Almost at once, you feel the head of the dildo pressing against your asshole. "That''s my good little butt slut. We''ll have you trained in no time."'
								'With only the lubrication from your pussy, she slides it into your ass. She is gentle at first, working it in slowly as she thrusts in and out at a steady pace, gradually works it deeper and deeper into your ass. Once she has pushed the full length into your ass, she starts to pick up the pace and fuck you harder. You start moaning in a mixture of pleasure and pain.'
								'She keeps picking up speed and soon the sound of her hips slapping against your ass can be heard over your moaning. She seems to lose herself in the act and stops paying attention to you. You don''t think she would even notice if you orgasmed. After a good few minutes of this, she starts panting as she gets tired.'

								gs 'arousal', 'anal_strap', 5, 'lesbian', 'sub', 'rough'
								
								if pcs_horny >= 100:
									$orgasm_or = 'yes'
									$orgasm_txt = 'It is then that your orgasm hits you. It is sudden and amazingly intense.'
									gs 'arousal', 'anal_strap', -1, 'lesbian', 'sub', 'rough'
								end
								
								gs 'stat'
								
								'Yet she doesn''t slow down her furious pace. Finally unable to keep it up anymore, she collapses on your back. You can feel her sweat on your back and her heavy breathing in your ear as she rests against with the dildo still firmly up your ass.'
								'You take the time to rest and relax yourself, coming down from the pounding you just received. A few minutes later, she kisses your back and your neck before climbing off you and pulling the dildo out slowly. Getting up yourself, you see her taking the harness off and tossing it aside. You notice that her thighs are slick with sweat and her own juices. She grabs you by the neck and gives you a passionate, deep and very long kiss. "My god <<$pcs_nickname>>, that was amazing! I hope I didn''t hurt you too much and you enjoyed it as much as I did. No wonder boys fuck us like that, that was amazing!" she says upon breaking the kiss.'
								'She falls back on her bed, still breathing hard and looking at you with a somewhat possessive look as you lie down next to her. "It was wonderful. I''m glad you enjoyed it too, even if you were a little rough at times." She leans over and gives you another kiss. "Sorry, but that was beyond description. We''re going to have to do that again sometime." The two of you lay quietly for a while, basking in the aftermath. You know something in your relationship has changed and you think for the better. After a while, you get up and get dressed.'

								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 go home':gt 'pav_residential'
								end
							end
						end
					end
				end
			end
		end
	else
		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 go home':gt 'pav_residential'
		end
	end
end

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

if $ARGS[0] = 'moron':
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/pc/reactions/glare.jpg"></center>'
	'You glare at the moron calling you lesbians.'

	gs 'willpower', 'misc', 'self', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Sing a different tune (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'pay', 'self'
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/frenchkiss.jpg"></center>'
			'Looking at Ivan, then at this idiot, it seems that Ivan didn''t notice, you sighed and said to the idiot. "Is that really necessary? She is my best friend and we want kiss, you just seem jealous.'
			'"Lesbians, lesbians." He continued to scream like a freak, so much that people began to gather around to find out, what''s happening. Ivan stepped over next to you and put his hand on your shoulder, giving the idiot a glare as well. Boosted by Ivan''s support you continued. "We like boys, just not assholes like you!" with those words, you stood on tiptoe, clasping and Ivan''s head in his hands and gave him a deep long passionate kiss, with lots of tongue.'

			act 'Kiss again':
				*clr
				cla
				if flag_KissEV = 0: flag_KissEV = 1
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/prohorov_3.jpg"></center>'
				'"And I can kiss all the boys." you said, under the joyous hubbub of guys gathering near you. You began to kiss all the boys in succession, carefully avoiding the one that called you a lesbian.'
				'Seeing this he said offended. "The redhead doesn''t like guys, I bet." hoping Katja will kiss him to prove him wrong.'
				'But Katja recovered and said. "Wrong again loser.", and began to repeat your route, of kissing the boys.'
				if $loc = 'pav_disco':
					'After kissing the last boy, you turn back and make sure Katja kisses all of them too. You now realise the guys are hoping for more and quickly drag Katja away before you accidentally start an orgy.'
					act 'Return to dance': gt 'pav_disco'
				else
					'Just as you kissed the last boy, you turned around to see how Katja was doing with her kissing, but then the bell rang, and you all rushed to class.'
					act 'Continue': gt 'gschool_lessons', 'short_break'
				end
			end
		end
	else
		act 'Sing a different tune (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end

	act 'Keep silent':
		*clr
		cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/punch.jpg"></center>'
		'Ivan turned to glare at the guy. "Shut the fuck up." he said in a menacing tone.'
		'They snort at Ivan. "Lesbian lover."'
		'Ivan didn''t reply, and just punched him in the face, dropping him with a single hit.'
		'A bit shocked but also pleased Ivan would defend you like that. "Thank you Ivan, seriously that was sweet." you said, but Katja only nodded dumbfounded.'
		'Ivan shrugged, looking a little embarrassed. But it was obvious, he was pleased.'
		act 'Thank Ivan':
			*clr & cla
			if npc_sex['A3'] = 1 and $loc ! 'pav_disco':
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/whisper.jpg"></center>'
				'Approaching Ivan, you raised up on tiptoe, and, clasping her arms round his neck, and kissed, and then whispered. "Like kissing girls?" Ivan only replied with a dumbfounded nodded, "Well, then we can show you our appreciation, right Katja?"'
				'Katja, nods only half paying attention. Then it hit her what you said, she looked at Ivan, at you and her eyes lit up with lustful fire, "Right."'
				act 'Hug Katja': gt 'katja_sex','prohorov_sex'
			else
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/frenchkiss.jpg"></center>'
				'"Thank you, Ivan." with these words, you french kissed him. He responded and passionately kissed you back, then left.'
				'"Well, these athletes are hot." Katja said with a sigh, while looking at Ivan''s ass as he walked away.'
				if knowKatjaPreg = 1:
					'You snort and look at Katja "Just what you need when you already have one inside."'
				else
					'You only snorted at Katja''s words, although Ivan did have a fine looking ass.'
				end

				if $loc = 'pav_disco':
					act 'Return to dance': gt 'pav_disco'
				else
					act 'Continue': gt 'gschool_lessons', 'short_break'
				end
			end
		end
	end
end

--- katjaEvDin ---------------------------------