Browse Source

dynamicus iradicus

KevinSmarts 7 years ago
parent
commit
e315f3b74f
6 changed files with 801 additions and 815 deletions
  1. 0 1
      glife-notepad++
  2. 0 1
      glife.qproj
  3. 0 291
      locations/KatjaHomeDin
  4. 542 245
      locations/KatjaHomeTalk
  5. 8 6
      locations/katjaEv
  6. 251 271
      locations/katjaEvDin

+ 0 - 1
glife-notepad++

@@ -321,7 +321,6 @@
             <File name="locations\katjaEv" />
             <File name="locations\katjaEvDin" />
             <File name="locations\KatjaHome" />
-            <File name="locations\KatjaHomeDin" />
             <File name="locations\KatjaHomeTalk" />
             <File name="locations\katja_sex" />
             <File name="locations\Katja_Tanga" />

+ 0 - 1
glife.qproj

@@ -362,7 +362,6 @@
       <Location name="katjaEvDin"/>
       <Location name="KatjaHome"/>
       <Location name="KatjaHomeTalk"/>
-      <Location name="KatjaHomeDin"/>
       <Location name="katja_sex"/>
       <Location name="Katja_Tanga"/>
     </Folder>

+ 0 - 291
locations/KatjaHomeDin

@@ -1,291 +0,0 @@
-# KatjaHomeDin
-$katja_shower_kiss_home = {
-	cls
-	KatjaLust += 10
-	KatjaSlut += 1
-	KatjaHorny += 10
-	gs 'stat'
-	'<center><img 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 and her thin finger finds your clitoris begins to rub it.'
-	
-	gs 'arousal', 'kiss', 10, 'dom', 'lesbian'
-	gs 'arousal', 'vaginal_finger', 10, 'dom', 'lesbian'
-	minut -= 10
-	gs 'stat'
-	
-	if KatjaSlut >= 10:
-		'Katja, gently but firmly puts you on the edge of the tub.'
-	elseif KatjaSlut < 10:
-		'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':
-		cls
-		KatjaHorny -= 10
-		KatjaLust += 1
-		KatjaSlut += 1
-
-		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
-		
-		gs 'stat'
-		'<center><img 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 the clitoris. Soon bliss enveloped your entire body.'
-		'You notice Katja''s hand between her legs and get further turned on watching her pleasure herself while she pleasures you.'
-		'Suddenly you are hit by a powerful orgasm, you feel like you might lose consciousness, 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 $curloc
-		end
-	end
-
-	act 'Remove her hands':
-		cls
-		pcs_dom += 1
-		minut += 5
-		pcs_horny += 10
-		KatjaDom -= 1
-		KatjaHorny -= 10
-		KatjaLust += 1
-		gs 'stat'
-		'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-		'You remove her hands and smile at her. Then you dismiss Katja, who shyly looks to the floor and leaves the bathroom.'
-
-		act 'Get out of the shower':
-			gs 'arousal' 'end'
-			gt $curloc
-		end
-	end
-}
-
-$d_katjaSextalk = {
-	'Reddening Katja looks at you thoughtfully.'
-	kattalkrand = rand(0, 4)
-
-	if kattalkrand = 0:
-		if KatjaKnowBJ > 0:
-			'"<<$pcs_nickname>>, tell me, how are you at sucking dick."'
-		elseif KatjaKnowBJ = 0:
-			'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
-		end
-
-		if stat['bj'] > 0:
-			act 'Tell her about blowjobs':
-				cls
-				KatjaLust += 5
-				KatjaHorny += 10
-				KatjaKnowBJ = 1
-				gs 'stat'
-				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				'You tell Katja how you sucked dick and what it felt like. Katja blushes and bites her lip.'
-
-				act 'further':minut += 15 & gt 'KatjaHomeTalk'
-			end
-		end
-	elseif kattalkrand = 1:
-		if KatjaKnowSex > 0:
-			'"<<$pcs_nickname>>, tell me how you have fucked."'
-		elseif KatjaKnowSex = 0:
-			'"<<$pcs_nickname>>, have you had sex with a guy?"'
-		end
-
-		if stat['vaginal'] > 0:
-			act 'Tell her about sex':
-				cls
-				KatjaLust += 5
-				KatjaHorny += 10
-				KatjaKnowSex = 1
-				gs 'stat'
-				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				'You tell Katja about the times you have had sex and how it felt. Katja blushes and bites her lip.'
-
-				act 'further':minut += 15 & gt 'KatjaHomeTalk'
-			end
-		end
-
-	elseif kattalkrand = 2:
-		if KatjaKnowAnal > 0:
-			'"<<$pcs_nickname>>, tell me how you took it in the ass."'
-		elseif KatjaKnowAnal = 0:
-			'"<<$pcs_nickname>>, have you ever had a guy stick it in your ass?"'
-		end
-
-		if stat['anal'] > 0:
-			act 'Tell her about anal':
-				cls
-				KatjaLust += 5
-				KatjaHorny += 10
-				KatjaKnowAnal = 1
-				gs 'stat'
-				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				'You told Katja about the times you have had anal sex and what it felt like. Katja blushes and bites her lip.'
-
-				act 'further':minut += 15 & gt 'KatjaHomeTalk'
-			end
-		end
-	elseif kattalkrand = 3:
-		if KatjaKnowKuni > 0:
-			'"<<$pcs_nickname>>, tell me how you lick pussy."'
-		elseif KatjaKnowKuni = 0:
-			'"<<$pcs_nickname>>, have you gone down on a girl?"'
-		end
-
-		if stat['cuni'] > 0 or lesbian > 0:
-			act 'Tell her about licking pussy':
-				cls
-				KatjaLust += 5
-				KatjaHorny += 10
-				KatjaKnowKuni = 1
-				gs 'stat'
-				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				'You tell Katja about the times you have had gone down on another girl and how it felt. Katja blushes and bites her lip.'
-
-				if (pcs_dom - sub + 20) < KatjaDom:
-					pcs_dom -= 2
-					act 'Katja tells you to show her':
-						cls
-						minut += 15
-						pcs_horny += 20
-						KatjaHorny = 0
-						KatjaLust += 5
-						KatjaDom += 2
-						katja_dom_sex = 1
-						gs 'stat'
-						'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
-						'Katja tells you to show her how you lick pussy, at first you are a bit confused and then you notice she is 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 a moment more in surprise then anything, but her glistening wet pussy is enough to convince you, you lean forward and places your face between her legs and begin to lick her pussy.'
-						'You suck on her clit and slip your tongue inside of her, working her pussy for all you are 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 your face as much as you are licking her, leaving your face coated in the juices from her pussy.'
-						'Her orgasm hits her hard, leaving her unable to talk as her body spasms. Once Katja''s orgasm passes pass you lick her clean of all her pussy juices, making sure not to miss a single spot. When you raise up to look at Katja she has a smile but also a new look, you are not quite sure what it is, confidence maybe? "Well arn''t you just a good little girl." Then she kisses you deeply, breaking the kiss you start to lean back and spread your legs but she is already shaking her head no.'
-						'"Sorry <<$pcs_nickname>> maybe next time, we need to finish our homework." She says sweetly, you pause a moment and then nod in understand and you see that new look intensify on her face as she smiles, while the two of you finish your homework.'
-
-						gs 'arousal' 'cuni_give', 15, 'sub', 'lesbian'
-						gs 'stat'
-						
-						act 'Further':
-							gs 'arousal', 'end'
-							gt 'KatjaHomeTalk'
-						end
-					end
-				else
-					act 'Further':minut += 15 & gt 'KatjaHomeTalk'
-				end
-			end
-		end
-	elseif kattalkrand = 4:
-		if KatjaKnowMastr > 0:
-			'"<<$pcs_nickname>>, tell me how you masturbate."'
-		elseif KatjaKnowMastr = 0:
-			'"<<$pcs_nickname>>, do you masturbate?"'
-		end
-
-		if stat['mast'] > 0:
-			act 'Tell how you masturbate':
-				cls
-				KatjaLust += 5
-				KatjaHorny += 10
-				! WD: Uninitialised ~ 'KatjaKnowMastr'
-				KatjaKnowMastr = 1
-				gs 'stat'
-				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				'You tell Katja how you masturbate in the bathroom. Katja blushes and bites her lip.'
-
-				if KatjaMastr = 0:
-					act 'further':minut += 15 & gt 'KatjaHomeTalk'
-				elseif KatjaMastr > 0:
-					act 'further':
-						cls
-						KatjaLust += 5
-						KatjaHorny += 10
-						gs 'stat'
-						'<center><img src="images/shared/sex/mast/mastr.jpg"></center>'
-						'Katja says, she also masturbates, right here in the room, fondling herself between her legs.'
-
-						act 'further':minut += 15 & gt 'KatjaHomeTalk'
-					end
-				end
-			end
-
-			if SelfFisting > 0:
-				act 'Tell her how you stuck your fist in your ass':
-					cls
-					KatjaLust += 10
-					KatjaHorny += 20
-
-					if SelfFistingKnow = 0:SelfFistingKnow = 1
-
-					gs 'stat'
-					'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-					'You told Katja how you masturbate your ass and even managed to stretch it so much, that you can shove a fist into it.'
-					'Katja blushes and bites her lip.'
-
-					act 'further':minut += 15 & gt 'KatjaHomeTalk'
-				end
-			end
-		end
-	end
-
-	act 'Refuse to talk about such topics':
-		cls
-		pcs_dom += 1
-		KatjaDom -= 1
-		gs 'stat'
-		'You refused to speak with Katja about such topics. Katja looks confused and looking down mummbles. "Sorry, <<$pcs_nickname>>, I didn''t mean to pry."'
-
-		act 'further':minut += 15 & gt 'KatjaHomeTalk'
-	end
-}
-
-$d_katjahornykiss = {
-	'Katja brings her face to yours, so close, that you can feel her hot breath on her skin.'
-
-	act 'Bring your face close to hers':
-		cls
-		gs 'stat'
-		'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-		'You move even closer to Katja''s face.'
-
-		if KatjaHorny < 50:
-			katjarand = rand(0, 50)
-
-			if katjarand <= KatjaHorny + pcs_dom:
-				act 'Kiss': gt 'katjaEv', 'kiss'
-			else
-				KatjaHorny += 5
-				'Katja giggles and pushes your face away from her.'
-
-				act 'further':minut += 15 & gt 'KatjaHomeTalk'
-
-				if pcs_dom > 0:
-					act 'Seize Katja''s face':
-						cls
-						pcs_dom -= 1
-						KatjaDom -= 5
-						KatjaHorny -= 10
-						KatjaLust += 1
-						gs 'stat'
-						'You wrapped your hands around her face and bring you lips to Katja''s.'
-
-						if pcs_dom < KatjaDom:
-							'Katja firmly takes your hands and removes them from her face, allowing you to understand, that she does not intend to kiss you.'
-
-							act 'further':minut += 15 & gt 'KatjaHomeTalk'
-						else
-							'Katja looks into your eyes.'
-							act 'Kiss': gt 'katjaEv', 'kiss'
-						end
-					end
-				end
-			end
-		elseif KatjaHorny >= 50:
-			act 'Kiss': gt 'katjaEv', 'kiss'
-		end
-	end
-}
-
---- KatjaHomeDin ---------------------------------
-

+ 542 - 245
locations/KatjaHomeTalk

@@ -1,42 +1,24 @@
 # KatjaHomeTalk
-CLOSE ALL
-gs 'KatjaHomeDin'
-gs 'stat'
-'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
-'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
 
-if pcs_sweat >= 20:
-	'Katja wrinkles her nose "<<$pcs_nickname>>, you''re all sweaty. Do you want to use my shower?"'
+if $ARGS[0] = '':
+	CLOSE ALL
+	gs 'KatjaHomeDin'
+	gs 'stat'
+	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+	'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
 
-	act 'Have a shower':
-		cls
-		minut += 15
-		gs 'stat'
+	if pcs_sweat >= 20:
+		'Katja wrinkles her nose "<<$pcs_nickname>>, you''re all sweaty. Do you want to use my shower?"'
 
-		if KatjaHorny >= 50:
-			'Katja takes you in the bathroom. Blushing, she says, "I think I''ll join you."'
-
-			act 'Wash alone':
-				cls
-				dynamic $showerdin
-				minut += 15
-				pcs_horny += 1
-				pcs_hairbsh = 1
-				pcs_makeup = 1
-
-				if frost > 0:frost = 0
-
-				gs 'stat'
-				! WD: Correct Image path ~ "images/dush.jpg"
-				'<center><img src="images/shared/home/bathroom/dush.jpg"></center>'
-				'You kick Katja out of the bathroom and close the door. You get into the shower and begin to lather your body with a cloth.'
-				'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
+		act 'Have a shower':
+			cls
+			minut += 15
+			gs 'stat'
 
-				act 'Get out of the shower':gt $curloc
-			end
+			if KatjaHorny >= 50:
+				'Katja takes you in the bathroom. Blushing, she says, "I think I''ll join you."'
 
-			if mesec <= 0:
-				act 'Bathe together':
+				act 'Wash alone':
 					cls
 					dynamic $showerdin
 					minut += 15
@@ -46,262 +28,291 @@ if pcs_sweat >= 20:
 
 					if frost > 0:frost = 0
 
-					pcs_horny += 10
-					KatjaHorny += 10
-					KatjaLust += 1
 					gs 'stat'
-					'<center><img src="images/characters/pavlovsk/school/girl/katja/shower.jpg"></center>'
-					'You and Katja undress and both climb into the shower.'
-
-					if pcs_pubes <= 3:
-						'Katjas eyes slide over your body lingering a little on your breasts and pussy. Katja moves close to you and you rinse yourself and Katja.'
+					! WD: Correct Image path ~ "images/dush.jpg"
+					'<center><img src="images/shared/home/bathroom/dush.jpg"></center>'
+					'You kick Katja out of the bathroom and close the door. You get into the shower and begin to lather your body with a cloth.'
+					'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
 
-						act 'further':
-							cls
-							gs 'stat'
-							'<center><img src="images/characters/pavlovsk/school/girl/katja/shower2.jpg"></center>'
-							'Katja gently rubs shampoo into your hair then rinses it out with warm shower jets.'
-
-							if KatjaLust >= 10 and KatjaHorny >= 90:
-								'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
-								dynamic $katja_shower_kiss_home
-							else
-								'You and Katja wash yourselves.'
+					act 'Get out of the shower':gt 'KatjaHomeTalk'
+				end
 
-								act 'Get out of the shower':gt $curloc
+				if mesec <= 0:
+					act 'Bathe together':
+						cls
+						dynamic $showerdin
+						minut += 15
+						pcs_horny += 1
+						pcs_hairbsh = 1
+						pcs_makeup = 1
+
+						if frost > 0:frost = 0
+
+						pcs_horny += 10
+						KatjaHorny += 10
+						KatjaLust += 1
+						gs 'stat'
+						'<center><img src="images/characters/pavlovsk/school/girl/katja/shower.jpg"></center>'
+						'You and Katja undress and both climb into the shower.'
+
+						if pcs_pubes <= 3:
+							'Katjas eyes slide over your body lingering a little on your breasts and pussy. Katja moves close to you and you rinse yourself and Katja.'
+
+							act 'further':
+								cls
+								gs 'stat'
+								'<center><img src="images/characters/pavlovsk/school/girl/katja/shower2.jpg"></center>'
+								'Katja gently rubs shampoo into your hair then rinses it out with warm shower jets.'
+
+								if KatjaLust >= 10 and KatjaHorny >= 90:
+									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
+
+									act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
+								else
+									'You and Katja wash yourselves.'
+
+									act 'Get out of the shower':gt 'KatjaHomeTalk'
+								end
 							end
-						end
-					elseif pcs_pubes > 3:
-						'Katja eyes slide over your body lingering a little on your breasts and pubic hair. Katja smiles, "<<$pcs_nickname>>, you''ve got too much hair, it''s not fashionable. I''ll shave it off."'
-
-						act 'Get shaved':
-							cls
-							minut += 5
-							pcs_pubes = 0
-							KatjaHorny += 10
-							KatjaLust += 1
-							gs 'stat'
-							'<center><img src="images/characters/pavlovsk/school/girl/katja/lobok.jpg"></center>'
-							'Katja sat in the bath and you lathers your crotch (and most of your stomach and chest) with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'
-
-							if KatjaLust >= 10 and KatjaHorny >= 90:
-								'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
-								dynamic $katja_shower_kiss_home
-							else
-								'Katja, having finally shaved all the hair between your legs, washes you off with soap.'
-
-								act 'Get out of the shower':gt $curloc
+						elseif pcs_pubes > 3:
+							'Katja eyes slide over your body lingering a little on your breasts and pubic hair. Katja smiles, "<<$pcs_nickname>>, you''ve got too much hair, it''s not fashionable. I''ll shave it off."'
+
+							act 'Get shaved':
+								cls
+								minut += 5
+								pcs_pubes = 0
+								KatjaHorny += 10
+								KatjaLust += 1
+								gs 'stat'
+								'<center><img src="images/characters/pavlovsk/school/girl/katja/lobok.jpg"></center>'
+								'Katja sat in the bath and you lathers your crotch (and most of your stomach and chest) with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'
+
+								if KatjaLust >= 10 and KatjaHorny >= 90:
+									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
+
+									act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
+								else
+									'Katja, having finally shaved all the hair between your legs, washes you off with soap.'
+
+									act 'Get out of the shower':gt 'KatjaHomeTalk'
+								end
 							end
 						end
 					end
 				end
-			end
-		elseif KatjaHorny < 50:
-			dynamic $showerdin
-			minut += 15
-			pcs_horny += 1
-			pcs_hairbsh = 1
-			pcs_makeup = 1
+			elseif KatjaHorny < 50:
+				dynamic $showerdin
+				minut += 15
+				pcs_horny += 1
+				pcs_hairbsh = 1
+				pcs_makeup = 1
 
-			if frost > 0:frost = 0
+				if frost > 0:frost = 0
 
-			gs 'stat'
-			'<center><img src="images/shared/home/bathroom/dush.jpg"></center>'
-			'Katja shows you where the toiletries are and leaves you to have a shower. You get into the shower and begin to lather your body with a cloth.'
-			'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
+				gs 'stat'
+				'<center><img src="images/shared/home/bathroom/dush.jpg"></center>'
+				'Katja shows you where the toiletries are and leaves you to have a shower. You get into the shower and begin to lather your body with a cloth.'
+				'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
 
-			act 'Get out of the shower':gt $curloc
+				act 'Get out of the shower':gt 'KatjaHomeTalk'
+			end
 		end
-	end
-else
-	!!not sweaty
-	if hour < 20:
-		act 'Chat with Katja':
-			cls
-			KatjaHorny += 1
-			!KatjaLust += 1
-			!if npcSex[14] = 1:
-			minut += 15
-			gs 'stat'
-			'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
-			'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-!			if flag_KissEV > 3:
-!				Act 'To continue the dispute':
-!					cla
-!					'- Well will continue our dispute, - asked you '
-!					'- continue, - Katya readily agreed'
-!
-!					act 'Further': gt 'katja_sex','park'
-!				end
-!			end
-			if flag_KissEV = 2: 
-				'"Who do you think kissed more of the boys?" she asked.'
-				Act 'Not to argue':
-					*clr & cla
-					flag_KissEV = 0 
-					'<center><img src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
-					'"We likely kissed about the same number of boys." you readily agreed. Kate breathed a sigh of relief.'
-					'"I shouldn''t have asked anyways." she said, kissing you with gratitude. '
-					act 'Further':gt $curloc
-				end
-				Act 'Bet':
-					cla
-					flag_KissEV = 3
-					'"I totally kissed more boys, besides you have said I like boys more than you, anyways." you categorically stated.'
-					'"Yes, you," gasped in outrage Kate, "I just slowed down so you could catch up.'
-					'"Ha! Not only did I kiss more but they want me to kiss them more."'
-					'"Oh yea?" Kate said with a bit of anger, "Let''s see then, let''s go to the Park and see who can kiss more boys."'
-					'"Good." You agree, let''s dispute. And what''s the bet.'
-					'"Fine, now let''s go kiss some boys." Kate said.'
-					act 'Further': gt 'katja_sex','park'
-				end
-			elseif katjaPreg = 0 or knowKatjaPreg = 1:
-				if KatjaHorny < 50:'Katka talks about school lessons, cosmetics, the latest fashion trends and other very important things.'
+	else
+		!!not sweaty
+		if hour < 20:
+			act 'Chat with Katja':
+				cls
+				KatjaHorny += 1
+				!KatjaLust += 1
+				!if npcSex[14] = 1:
+				minut += 15
+				gs 'stat'
+				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+	!			if flag_KissEV > 3:
+	!				Act 'To continue the dispute':
+	!					cla
+	!					'- Well will continue our dispute, - asked you '
+	!					'- continue, - Katya readily agreed'
+	!
+	!					act 'Further': gt 'katja_sex','park'
+	!				end
+	!			end
+				if flag_KissEV = 2: 
+					'"Who do you think kissed more of the boys?" she asked.'
+					Act 'Not to argue':
+						*clr & cla
+						flag_KissEV = 0 
+						'<center><img src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
+						'"We likely kissed about the same number of boys." you readily agreed. Kate breathed a sigh of relief.'
+						'"I shouldn''t have asked anyways." she said, kissing you with gratitude. '
+						act 'Further':gt 'KatjaHomeTalk'
+					end
+					Act 'Bet':
+						cla
+						flag_KissEV = 3
+						'"I totally kissed more boys, besides you have said I like boys more than you, anyways." you categorically stated.'
+						'"Yes, you," gasped in outrage Kate, "I just slowed down so you could catch up.'
+						'"Ha! Not only did I kiss more but they want me to kiss them more."'
+						'"Oh yea?" Kate said with a bit of anger, "Let''s see then, let''s go to the Park and see who can kiss more boys."'
+						'"Good." You agree, let''s dispute. And what''s the bet.'
+						'"Fine, now let''s go kiss some boys." Kate said.'
+						act 'Further': gt 'katja_sex','park'
+					end
+				elseif katjaPreg = 0 or knowKatjaPreg = 1:
+					if KatjaHorny < 50:'Katka talks about school lessons, cosmetics, the latest fashion trends and other very important things.'
 
-				if KatjaHorny >= 50:
-					dynamic $d_katjaSextalk
-					exit
-				end
-			else
-				'Katja biting her lip and without looking you in the eye, finally plucks up the courage and says, "<<$pcs_nickname>>, i am pregnant."'
+					if KatjaHorny >= 50:
+						gs 'KatjaHomeTalk', 'Sextalk'
+						exit
+					end
+				else
+					'Katja biting her lip and without looking you in the eye, finally plucks up the courage and says, "<<$pcs_nickname>>, i am pregnant."'
 
-				act 'Whos is it?':
-					cls
-					minut += 5
-					knowKatjaPreg = 1
-					gs 'stat'
-					'Dumbfounded, you ask, "Who?" Katja wrinkles her nose, "Santa Claus? Well, it was Voinov. I was with him at the Christmas party at school, we slept together and boom! Jesus, what do I do now?"'
+					act 'Whos is it?':
+						cls
+						minut += 5
+						knowKatjaPreg = 1
+						gs 'stat'
+						'Dumbfounded, you ask, "Who?" Katja wrinkles her nose, "Santa Claus? Well, it was Voinov. I was with him at the Christmas party at school, we slept together and boom! Jesus, what do I do now?"'
 
-					act 'I have no idea':gt $curloc
+						act 'I have no idea':gt 'KatjaHomeTalk'
+					end
 				end
-			end
 
-			act 'further':gt $curloc
-		end
-		
-		if npcSex[14] = 1 and pcs_dom >= KatjaDom:
-			act 'Offer to take a walk in the Park':
-				pcs_dom-=1
-				minut += 15
-				KatjaHorny += 5
-				$ev_name = 'Katja'
-				$ev_name_a = 'Katja'
-				$ev_name_om = 'Katja'
-				dick = 0
-				place = 1
-				Frend_num = 14
-				p_lust = KatjaLust
-				p_slut = KatjaSlut
-				p_dom = KatjaDom
-				p_horny = KatjaHorny
-				p_alko = 0
-				gt 'placer'
+				act 'further':gt 'KatjaHomeTalk'
+			end
+			
+			if npcSex[14] = 1 and pcs_dom >= KatjaDom:
+				act 'Offer to take a walk in the Park':
+					pcs_dom-=1
+					minut += 15
+					KatjaHorny += 5
+					$ev_name = 'Katja'
+					$ev_name_a = 'Katja'
+					$ev_name_om = 'Katja'
+					dick = 0
+					place = 1
+					Frend_num = 14
+					p_lust = KatjaLust
+					p_slut = KatjaSlut
+					p_dom = KatjaDom
+					p_horny = KatjaHorny
+					p_alko = 0
+					gt 'placer'
+				end
 			end
-		end
-
-		if KatjaLust > 10:
-			katkisrand = rand(0, 5)
 
-			if katkisrand = 0:
+			if KatjaLust > 10 and rand(0,5) = 0:
 				cls
 				gs 'stat'
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
-				dynamic $d_katjahornykiss
+				gs 'KatjaHomeTalk', 'hornykiss'
 			end
-		end
 
-		if katja_dom_sex = 1 and KatjaHorny >= 70:dynamic $d_katja_kuni_dom
+			if katja_dom_sex = 1 and KatjaHorny >= 70:
+				act 'Lick Katja': gt 'KatjaEvDin', 'kuni_dom'
+			end
 
-	elseif hour >= 20:
-		'Katja says, "Let''s go to the disco."'
+		elseif hour >= 20:
+			'Katja says, "Let''s go to the disco."'
 
-		if money >= 25:act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
+			if money >= 25:act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
+		end
 	end
-end
 
-if pregTalkKatja = 0 and KatjaConflict = 0 and kid = 0:
-	if knowKatjaPreg = 1 and pregtime >= 150:
-		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 that I was pregnant. I need to think. We''ll talk later"'
-
-		act 'Say goodbye and go home':gt 'pavResidential'
-	elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
-		act 'Tell her you''re pregnant':
-			cls
-			'"What? That''s so exiting! You didn''t get pregnant just to be like me, did you?" she asks playfully.'
+	if pregTalkKatja = 0 and KatjaConflict = 0 and kid = 0:
+		if knowKatjaPreg = 1 and pregtime >= 150:
+			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 that I was pregnant. I need to think. We''ll talk later"'
+
+			act 'Say goodbye and go home':gt 'pavResidential'
+		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+			act 'Tell her you''re pregnant':
+				cls
+				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'"What? That''s so exiting! You didn''t get pregnant just to be like me, did you?" she asks playfully.'
+				*nl
+				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
+			end
+		elseif KatjaPreg = 0 and pregtime >= 150:
+			cla
 			*nl
-			act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
+			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"'
+
+			act 'Say goodbye and go home':gt 'pavResidential'
+		elseif KatjaPreg = 0 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+			act 'Tell her you''re pregnant':
+				cls
+				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'"What? That''s so exiting!'
+				*nl
+				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
+			end
 		end
-	elseif KatjaPreg = 0 and pregtime >= 150:
-		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
 
-		act 'Say goodbye and go home':gt 'pavResidential'
-	elseif KatjaPreg = 0 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
-		act 'Tell her you''re pregnant':
+	if pregTalkKatja = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
+		if knowKatjaPreg = 1 and pregtime >= 150:
+			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. "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."'
+			act 'Say goodbye and go home':gt 'pavResidential'
+		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and (KatjaConflict = 0 or katjaconflict = 2) and pregtime < 150:
+			act 'Tell her you''re pregnant':
+				cls
+				gs 'stat'
+				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+				'<center><img src="images/characters/pavlovsk/school/head/14.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 teen pregnancy. Hell, that''s probably the reason you keep getting pregnant, isn''t it?" She giggles while looking at you affectionately.'
+				*nl
+				act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
+			end
+		end
+	end
+
+	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
+		act 'Apologize':
 			cls
-			'"What? That''s so exiting!'
+			gs 'stat'
+			KatjaConflict = 2
+			'"I''m really sorry I didn''t tell you I was pregnant 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 else like this from you in the future."'
+			'"Good. Now let''s get down to business."'
 			*nl
 			act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
 		end
 	end
-end
 
-if pregTalkKatja = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
-	if knowKatjaPreg = 1 and pregtime >= 150:
-		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. "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."'
-		act 'Say goodbye and go home':gt 'pavResidential'
-	elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and (KatjaConflict = 0 or katjaconflict = 2) and pregtime < 150:
-		act 'Tell her you''re pregnant':
+	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
+		act 'Apologize':
 			cls
 			gs 'stat'
-			'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 teen pregnancy. Hell, that''s probably the reason you keep getting pregnant, isn''t it?" She giggles while looking at you affectionately.'
+			KatjaConflict = 2
+			'"I''m really sorry I didn''t tell you I was pregnant 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 else like this from you in the future."'
+			'"Good. Now let''s get down to business."'
 			*nl
 			act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
 		end
 	end
-end
-
-if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
-	act 'Apologize':
-		cls
-		gs 'stat'
-		KatjaConflict = 2
-		'"I''m really sorry I didn''t tell you I was pregnant 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 else like this from you in the future."'
-		'"Good. Now let''s get down to business."'
-		*nl
-		act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
-	end
-end
 
-if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
-	act 'Apologize':
-		cls
-		gs 'stat'
-		KatjaConflict = 2
-		'"I''m really sorry I didn''t tell you I was pregnant 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 else like this from you in the future."'
-		'"Good. Now let''s get down to business."'
-		*nl
-		act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
-	end
+	act 'Say goodbye and go home':gt 'pavResidential'
 end
 
 if $ARGS[0] = 'katjaknows':
@@ -454,7 +465,293 @@ if $ARGS[0] = 'katjaknows1':
 	end
 end
 
-act 'Say goodbye and go home':gt 'pavResidential'
+if $ARGS[0] = 'shower_kiss_home':
+	cls
+	KatjaLust += 10
+	KatjaSlut += 1
+	KatjaHorny += 10
+	gs 'stat'
+	'<center><img 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 and her thin finger finds your clitoris begins to rub it.'
+	
+	gs 'arousal', 'kiss', 10, 'dom', 'lesbian'
+	gs 'arousal', 'vaginal_finger', 10, 'dom', 'lesbian'
+	minut -= 10
+	gs 'stat'
+	
+	if KatjaSlut >= 10:
+		'Katja, gently but firmly puts you on the edge of the tub.'
+	elseif KatjaSlut < 10:
+		'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':
+		cls
+		KatjaHorny -= 10
+		KatjaLust += 1
+		KatjaSlut += 1
+
+		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
+		
+		gs 'stat'
+		'<center><img 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 the clitoris. Soon bliss enveloped your entire body.'
+		'You notice Katja''s hand between her legs and get further turned on watching her pleasure herself while she pleasures you.'
+		'Suddenly you are hit by a powerful orgasm, you feel like you might lose consciousness, 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
+
+	act 'Remove her hands':
+		cls
+		pcs_dom += 1
+		minut += 5
+		pcs_horny += 10
+		KatjaDom -= 1
+		KatjaHorny -= 10
+		KatjaLust += 1
+		gs 'stat'
+		'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+		'You remove her hands and smile at her. Then you dismiss Katja, who shyly looks to the floor and leaves the bathroom.'
+
+		act 'Get out of the shower':
+			gs 'arousal' 'end'
+			gt 'KatjaHomeTalk'
+		end
+	end
+end
+
+if $ARGS[0] = 'Sextalk':
+	'Reddening Katja looks at you thoughtfully.'
+	kattalkrand = rand(0, 4)
+
+	if kattalkrand = 0:
+		if KatjaKnowBJ > 0:
+			'"<<$pcs_nickname>>, tell me, how are you at sucking dick."'
+		elseif KatjaKnowBJ = 0:
+			'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
+		end
+
+		if stat['bj'] > 0:
+			act 'Tell her about blowjobs':
+				cls
+				KatjaLust += 5
+				KatjaHorny += 10
+				KatjaKnowBJ = 1
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'You tell Katja how you sucked dick and what it felt like. Katja blushes and bites her lip.'
+
+				act 'further':minut += 15 & gt 'KatjaHomeTalk'
+			end
+		end
+	elseif kattalkrand = 1:
+		if KatjaKnowSex > 0:
+			'"<<$pcs_nickname>>, tell me how you have fucked."'
+		elseif KatjaKnowSex = 0:
+			'"<<$pcs_nickname>>, have you had sex with a guy?"'
+		end
+
+		if stat['vaginal'] > 0:
+			act 'Tell her about sex':
+				cls
+				KatjaLust += 5
+				KatjaHorny += 10
+				KatjaKnowSex = 1
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'You tell Katja about the times you have had sex and how it felt. Katja blushes and bites her lip.'
+
+				act 'further':minut += 15 & gt 'KatjaHomeTalk'
+			end
+		end
+
+	elseif kattalkrand = 2:
+		if KatjaKnowAnal > 0:
+			'"<<$pcs_nickname>>, tell me how you took it in the ass."'
+		elseif KatjaKnowAnal = 0:
+			'"<<$pcs_nickname>>, have you ever had a guy stick it in your ass?"'
+		end
+
+		if stat['anal'] > 0:
+			act 'Tell her about anal':
+				cls
+				KatjaLust += 5
+				KatjaHorny += 10
+				KatjaKnowAnal = 1
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'You told Katja about the times you have had anal sex and what it felt like. Katja blushes and bites her lip.'
+
+				act 'further':minut += 15 & gt 'KatjaHomeTalk'
+			end
+		end
+	elseif kattalkrand = 3:
+		if KatjaKnowKuni > 0:
+			'"<<$pcs_nickname>>, tell me how you lick pussy."'
+		elseif KatjaKnowKuni = 0:
+			'"<<$pcs_nickname>>, have you gone down on a girl?"'
+		end
+
+		if stat['cuni'] > 0 or lesbian > 0:
+			act 'Tell her about licking pussy':
+				cls
+				KatjaLust += 5
+				KatjaHorny += 10
+				KatjaKnowKuni = 1
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'You tell Katja about the times you have had gone down on another girl and how it felt. Katja blushes and bites her lip.'
+
+				if (pcs_dom - sub + 20) < KatjaDom:
+					pcs_dom -= 2
+					act 'Katja tells you to show her':
+						cls
+						minut += 15
+						pcs_horny += 20
+						KatjaHorny = 0
+						KatjaLust += 5
+						KatjaDom += 2
+						katja_dom_sex = 1
+						gs 'stat'
+						'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
+						'Katja tells you to show her how you lick pussy, at first you are a bit confused and then you notice she is 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 a moment more in surprise then anything, but her glistening wet pussy is enough to convince you, you lean forward and places your face between her legs and begin to lick her pussy.'
+						'You suck on her clit and slip your tongue inside of her, working her pussy for all you are 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 your face as much as you are licking her, leaving your face coated in the juices from her pussy.'
+						'Her orgasm hits her hard, leaving her unable to talk as her body spasms. Once Katja''s orgasm passes pass you lick her clean of all her pussy juices, making sure not to miss a single spot. When you raise up to look at Katja she has a smile but also a new look, you are not quite sure what it is, confidence maybe? "Well arn''t you just a good little girl." Then she kisses you deeply, breaking the kiss you start to lean back and spread your legs but she is already shaking her head no.'
+						'"Sorry <<$pcs_nickname>> maybe next time, we need to finish our homework." She says sweetly, you pause a moment and then nod in understand and you see that new look intensify on her face as she smiles, while the two of you finish your homework.'
+
+						gs 'arousal' 'cuni_give', 15, 'sub', 'lesbian'
+						gs 'stat'
+						
+						act 'Further':
+							gs 'arousal', 'end'
+							gt 'KatjaHomeTalk'
+						end
+					end
+				else
+					act 'Further':minut += 15 & gt 'KatjaHomeTalk'
+				end
+			end
+		end
+	elseif kattalkrand = 4:
+		if KatjaKnowMastr > 0:
+			'"<<$pcs_nickname>>, tell me how you masturbate."'
+		elseif KatjaKnowMastr = 0:
+			'"<<$pcs_nickname>>, do you masturbate?"'
+		end
+
+		if stat['mast'] > 0:
+			act 'Tell how you masturbate':
+				cls
+				KatjaLust += 5
+				KatjaHorny += 10
+				! WD: Uninitialised ~ 'KatjaKnowMastr'
+				KatjaKnowMastr = 1
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+				'You tell Katja how you masturbate in the bathroom. Katja blushes and bites her lip.'
+
+				if KatjaMastr = 0:
+					act 'further':minut += 15 & gt 'KatjaHomeTalk'
+				elseif KatjaMastr > 0:
+					act 'further':
+						cls
+						KatjaLust += 5
+						KatjaHorny += 10
+						gs 'stat'
+						'<center><img src="images/shared/sex/mast/mastr.jpg"></center>'
+						'Katja says, she also masturbates, right here in the room, fondling herself between her legs.'
+
+						act 'further':minut += 15 & gt 'KatjaHomeTalk'
+					end
+				end
+			end
+
+			if SelfFisting > 0:
+				act 'Tell her how you stuck your fist in your ass':
+					cls
+					KatjaLust += 10
+					KatjaHorny += 20
+
+					if SelfFistingKnow = 0:SelfFistingKnow = 1
+
+					gs 'stat'
+					'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+					'You told Katja how you masturbate your ass and even managed to stretch it so much, that you can shove a fist into it.'
+					'Katja blushes and bites her lip.'
+
+					act 'further':minut += 15 & gt 'KatjaHomeTalk'
+				end
+			end
+		end
+	end
+
+	act 'Refuse to talk about such topics':
+		cls
+		pcs_dom += 1
+		KatjaDom -= 1
+		gs 'stat'
+		'You refused to speak with Katja about such topics. Katja looks confused and looking down mummbles. "Sorry, <<$pcs_nickname>>, I didn''t mean to pry."'
+
+		act 'further':minut += 15 & gt 'KatjaHomeTalk'
+	end
+end
+
+if $ARGS[0] = 'hornykiss':
+	'Katja brings her face to yours, so close, that you can feel her hot breath on her skin.'
+
+	act 'Bring your face close to hers':
+		cls
+		gs 'stat'
+		'<center><img src="images/characters/pavlovsk/school/head/14.jpg"></center>'
+		'You move even closer to Katja''s face.'
+
+		if KatjaHorny < 50:
+
+			if rand(0, 50) <= (KatjaHorny + pcs_dom):
+				act 'Kiss': gt 'katjaEv', 'kiss'
+			else
+				KatjaHorny += 5
+				'Katja giggles and pushes your face away from her.'
+
+				act 'further':minut += 15 & gt 'KatjaHomeTalk'
+
+				if pcs_dom > 0:
+					act 'Seize Katja''s face':
+						cls
+						pcs_dom -= 1
+						KatjaDom -= 5
+						KatjaHorny -= 10
+						KatjaLust += 1
+						gs 'stat'
+						'You wrapped your hands around her face and bring you lips to Katja''s.'
+
+						if pcs_dom < KatjaDom:
+							'Katja firmly takes your hands and removes them from her face, allowing you to understand, that she does not intend to kiss you.'
+
+							act 'further':minut += 15 & gt 'KatjaHomeTalk'
+						else
+							'Katja looks into your eyes.'
+							act 'Kiss': gt 'katjaEv', 'kiss'
+						end
+					end
+				end
+			end
+		elseif KatjaHorny >= 50:
+			act 'Kiss': gt 'katjaEv', 'kiss'
+		end
+	end
+end
+
 
 --- KatjaHomeTalk ---------------------------------
 

+ 8 - 6
locations/katjaEv

@@ -144,7 +144,7 @@ if $ARGS[0] = '6':
 	katjaDeystRand = rand(0, 2)
 
 	if katjaDeystRand = 0:
-		dynamic $d_katjahornykiss
+		gs 'KatjaHomeTalk', 'hornykiss'
 
 		act 'Say goodbye and go home':minut += 15 & KatjaHorny -= 5 & gt 'pavResidential'
 
@@ -250,7 +250,7 @@ if $ARGS[0] = '6':
 
 								if KatjaLust >= 10 and KatjaHorny >= 90:
 									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
-									dynamic $katja_shower_kiss
+									act 'Continue': gt 'KatjaEvDin', 'shower_kiss'
 								else
 									'You and Katja wash yourselves.'
 
@@ -279,7 +279,7 @@ if $ARGS[0] = '6':
 
 								if KatjaLust >= 10 and KatjaHorny >= 90:
 									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
-									dynamic $katja_shower_kiss
+									act 'Continue': gt 'KatjaEvDin', 'shower_kiss'
 								else
 									'Katja, having finally shaved all the hair between your legs, washes you off with soap.'
 
@@ -324,7 +324,7 @@ if $ARGS[0] = '6':
 
 		exit
 	elseif katjaDeystRand = 2 and pcs_sweat < 20:
-		dynamic $d_katjaSextalk
+		gs 'KatjaHomeTalk', 'Sextalk'
 	end
 end
 
@@ -406,7 +406,8 @@ if $ARGS[0] = 'kiss':
 
 									act 'Further':gt 'KatjaHomeTalk'
 								elseif npcSex[14] > 0:
-									dynamic $d_katja_sex
+									gs 'boystat', 'A14', 'a'
+									gs 'KatjaEvDin', 'sex'
 								end
 							end
 						end
@@ -431,7 +432,8 @@ if $ARGS[0] = 'kiss':
 
 						act 'Further':gt 'KatjaHomeTalk'
 					elseif npcSex[14] > 0:
-						dynamic $d_katja_sex
+						gs 'boystat', 'A14', 'a'
+						gs 'KatjaEvDin', 'sex'
 					end
 				end
 

+ 251 - 271
locations/katjaEvDin

@@ -1,6 +1,6 @@
 # katjaEvDin
 
-$d_kat_strapon_main={
+if $ARGS[0] = 'strapon_main':
 	cls
 	gs'stat'
 	'<center><img src="images/shared/sex/lesbian/strapon_main.jpg"></center>'
@@ -17,9 +17,9 @@ $d_kat_strapon_main={
 	end
 
 	if npc_horny['A14'] > 10 and npc_horny['A14'] < 100:
-		dynamic $d_kat_strapon_bj
-		dynamic $d_kat_strapon_miss
-		dynamic $d_kat_strapon_anal
+		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 npc_horny['A14'] < 0:npc_horny['A14'] = 0
@@ -28,154 +28,140 @@ $d_kat_strapon_main={
 		gs 'arousal', 'end'
 		gt'pavResidential'
 	end
-}
+end
 
-$d_kat_strapon_bj={
-	act'Make Katja suck the strap-on':
-		cls
-		KatjaThroat+=1
-		minut+=5
-		gs'stat'
-		'<center><img src="images/shared/sex/lesbian/strapon_bj.jpg"></center>'
-		'You grab a handful of Katja red hair and keep a good hand hold on it. You pull her face over to the strap-on and smack her lips with it a couple of times till she opens her mouth. Once her mouth is open you slide it in and let her suck it for a bit. Then 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 you.'
+if $ARGS[0] = 'strapon_bj':
+	cls
+	KatjaThroat+=1
+	minut+=5
+	gs'stat'
+	'<center><img src="images/shared/sex/lesbian/strapon_bj.jpg"></center>'
+	'You grab a handful of Katja red hair and keep a good hand hold on it. You pull her face over to the strap-on and smack her lips with it a couple of times till she opens her mouth. Once her mouth is open you slide it in and let her suck it for a bit. Then 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 you.'
+	
+	gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
+	gs 'stat'
+	
+	if KatjaThroat>=30:
+		KatjaSlut+=1
+		npc_horny['A14']+=5
+		'Katja expertly swallows strap-on to the base, Her eyes moistened, but Katja is very practiced at deep throating and easily takes the dildo all the way down her throat.'
 		
 		gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
 		gs 'stat'
-		
-		if KatjaThroat>=30:
-			KatjaSlut+=1
-			npc_horny['A14']+=5
-			'Katja expertly swallows strap-on to the base, Her eyes moistened, but Katja is very practiced at deep throating and easily takes the dildo all the way down her throat.'
-			
-			gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
-			gs 'stat'
-		
-		end
-		if KatjaThroat>=10 and KatjaThroat<30:
-			npc_horny['A14']-=5
-			'Katja tries to accommodate the dildo plunging down her throat but she keeps gagging a little, her eyes shed tears and a bit of saliva drips from her mouth but she is able to take it.'
-		end
-		if KatjaThroat<10:
-			npc_horny['A14']-=10
-			'Katja tries to accommodate the dildo plunging down her throat but she keeps gagging, her eyes shed tears, snot runs from her nose, saliva drips from her mouth.'
-		end
-		 
-		act'Further':dynamic $d_kat_strapon_main
+	
 	end
-}
-$d_kat_strapon_miss={
+	if KatjaThroat>=10 and KatjaThroat<30:
+		npc_horny['A14']-=5
+		'Katja tries to accommodate the dildo plunging down her throat but she keeps gagging a little, her eyes shed tears and a bit of saliva drips from her mouth but she is able to take it.'
+	end
+	if KatjaThroat<10:
+		npc_horny['A14']-=10
+		'Katja tries to accommodate the dildo plunging down her throat but she keeps gagging, her eyes shed tears, snot runs from her nose, saliva drips from her mouth.'
+	end
+	 
+	act'Further':gt 'KatjaEvDin', 'strapon_main'
+end
+
+if $ARGS[0] = 'strapon_miss':
 !KatjaSex += 1
 !KatjaGuy += 1
 !KatjaBJ += 1
 !KatjaGang
 !!KatjaAnus
-	act'Fuck Katja with the strap-on':
-		cls
-		gs'stat'
-		'<center><img src="images/shared/sex/lesbian/strapon_miss.jpg"></center>'
-		'You lay Katja on her back and spread her legs. You crawl between her legs, rubbing the <<dick>> cm long <$dick_girth>> dildo against her wet pussy. Then you slip it into her and start to fuck her, you slowly work the strap-on balls deep into her, as you start to fuck her hard.'
-		
-		gs 'arousal', 'vaginal_strap_give', 5, 'lesbian', 'dom'
-		gs 'stat'
-		
-		gs 'npcbreeder', 'insert'
-		if npcbrokehymen = 1
-			'Katja groans when you enter it and bites her lip in pain as the strap-on enters her. You notice visible blood on the strap-on, you just popped Katja''s cherry.'
-			KatjaDeflarator=1
-			KatjaSlut-=10
-			npc_horny['A14']=0
-		elseif dick1 > npc_vag['A14'] + 5:
-			KatjaSlut-=1
-			npc_horny['A14']-=10
-			'Katja bite her lip and moans as you fuck her with the strap-on and gradually she 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 dick1 > npc_vag['A14'] + 3 or npc_horny['A14'] < 10:
-			npc_horny['A14']+=5
-			KatjaSlut+=1
-			'Katja bite her lip and moans as you fuck her with the strap-on and gradually she starts to get into it, she closes her eyes enjoying the sensations.'
-		else
-			if rand(1,2) = 2
-				npc_horny['A14']+=10
-				'You fuck Katja hard and fast, she moans in a excited voice and rolls her eyes in pleasure'
-			else
-				npc_horny['A14']+=20
-				'You fuck Katja hard and fast, she moans in a excited voice "Faster, harder, deeper, yes fuck me!"'
-			end
-			KatjaSlut+=1
-		end	
-		
-		KatjaSex+=1
-		act'Further':dynamic $d_kat_strapon_main
-	end
-}
-$d_kat_strapon_anal={
-	act'Fuck Katja in the ass with the strap-on':
-		cls
-		gs'stat'
-		'<center><img src="images/shared/sex/lesbian/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. Grabbing a bottle of lube you lube up your fingers and slide one then a second one into her ass, working it a bit and lubing it up. Then you stop and lube up the strap-on. Once it is good and lubed you lean over her and slip the strap-on in her ass and being anally fucking her.'
-		
-		gs 'arousal', 'anal_strap_give', 5, 'lesbian', 'dom'
-		gs 'stat'
-		
-		if KatjaAnus>=30:
+	cls
+	gs'stat'
+	'<center><img src="images/shared/sex/lesbian/strapon_miss.jpg"></center>'
+	'You lay Katja on her back and spread her legs. You crawl between her legs, rubbing the <<dick>> cm long <$dick_girth>> dildo against her wet pussy. Then you slip it into her and start to fuck her, you slowly work the strap-on balls deep into her, as you start to fuck her hard.'
+	
+	gs 'arousal', 'vaginal_strap_give', 5, 'lesbian', 'dom'
+	gs 'stat'
+	
+	gs 'npcbreeder', 'insert'
+	if npcbrokehymen = 1
+		'Katja groans when you enter it and bites her lip in pain as the strap-on enters her. You notice visible blood on the strap-on, you just popped Katja''s cherry.'
+		KatjaDeflarator=1
+		KatjaSlut-=10
+		npc_horny['A14']=0
+	elseif dick1 > npc_vag['A14'] + 5:
+		KatjaSlut-=1
+		npc_horny['A14']-=10
+		'Katja bite her lip and moans as you fuck her with the strap-on and gradually she 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 dick1 > npc_vag['A14'] + 3 or npc_horny['A14'] < 10:
+		npc_horny['A14']+=5
+		KatjaSlut+=1
+		'Katja bite her lip and moans as you fuck her with the strap-on and gradually she starts to get into it, she closes her eyes enjoying the sensations.'
+	else
+		if rand(1,2) = 2
 			npc_horny['A14']+=10
-			KatjaSlut+=1
-			'The strap-on slides into Katja''s ass easily all the way down to balls deep into her. She moans in pleasure as you roughly fuck her ass.'
-		end
-		if KatjaAnus<30 and KatjaAnus>=20:
-			npc_horny['A14']+=5
-			'The strap-on slides into Katja''s ass fairly easily, you slowly work your way down until you are balls deep into her. She moans in pleasure as you roughly fuck her ass.'
-		end
-		if KatjaAnus<20 and KatjaAnus>=10:
-			npc_horny['A14']-=5
-			'It takes a little bit of effort to get the strap-on to slide into Katja''s ass, you slowly work your way down until you are balls deep into her. Causing her to cry out a bit in pain. Her hands grasp at the sheets tightly, caught between intense pleasure and pain, her moans echoing both sensations.'
-		end
-		if KatjaAnus<10 and KatjaAnus>0:
-			KatjaSlut-=1
-			npc_horny['A14']-=30
-			'It takes a some effort to get the strap-on to slide into Katja''s tight ass, you slowly work your way down until you are balls deep into her. Causing her to cry out in pain. Her hands grasp at the sheets tightly, she bites the pillow as you anally fuck her with the strap-on.'
-		end
-		if KatjaAnus=0:
-			KatjaSlut-=5
-			npc_horny['A14']=0
-			'Katja squeals when you push the strap-on in her very tight ass, even with all the lube it is very tight and slow going to work it balls deep in her. She cries out in pain, wincing, with tears flowing from her eyes as you fuck her ass.'
+			'You fuck Katja hard and fast, she moans in a excited voice and rolls her eyes in pleasure'
+		else
+			npc_horny['A14']+=20
+			'You fuck Katja hard and fast, she moans in a excited voice "Faster, harder, deeper, yes fuck me!"'
 		end
-		KatjaAnus+=1
-		act'Further':dynamic $d_kat_strapon_main
-	end
-}
+		KatjaSlut+=1
+	end	
+	
+	KatjaSex+=1
+	act'Further':gt 'KatjaEvDin', 'strapon_main'
+end
 
+if $ARGS[0] = 'strapon_anal':
+	cls
+	gs'stat'
+	'<center><img src="images/shared/sex/lesbian/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. Grabbing a bottle of lube you lube up your fingers and slide one then a second one into her ass, working it a bit and lubing it up. Then you stop and lube up the strap-on. Once it is good and lubed you lean over her and slip the strap-on in her ass and being anally fucking her.'
+	
+	gs 'arousal', 'anal_strap_give', 5, 'lesbian', 'dom'
+	gs 'stat'
+	
+	if KatjaAnus>=30:
+		npc_horny['A14']+=10
+		KatjaSlut+=1
+		'The strap-on slides into Katja''s ass easily all the way down to balls deep into her. She moans in pleasure as you roughly fuck her ass.'
+	end
+	if KatjaAnus<30 and KatjaAnus>=20:
+		npc_horny['A14']+=5
+		'The strap-on slides into Katja''s ass fairly easily, you slowly work your way down until you are balls deep into her. She moans in pleasure as you roughly fuck her ass.'
+	end
+	if KatjaAnus<20 and KatjaAnus>=10:
+		npc_horny['A14']-=5
+		'It takes a little bit of effort to get the strap-on to slide into Katja''s ass, you slowly work your way down until you are balls deep into her. Causing her to cry out a bit in pain. Her hands grasp at the sheets tightly, caught between intense pleasure and pain, her moans echoing both sensations.'
+	end
+	if KatjaAnus<10 and KatjaAnus>0:
+		KatjaSlut-=1
+		npc_horny['A14']-=30
+		'It takes a some effort to get the strap-on to slide into Katja''s tight ass, you slowly work your way down until you are balls deep into her. Causing her to cry out in pain. Her hands grasp at the sheets tightly, she bites the pillow as you anally fuck her with the strap-on.'
+	end
+	if KatjaAnus=0:
+		KatjaSlut-=5
+		npc_horny['A14']=0
+		'Katja squeals when you push the strap-on in her very tight ass, even with all the lube it is very tight and slow going to work it balls deep in her. She cries out in pain, wincing, with tears flowing from her eyes as you fuck her ass.'
+	end
+	KatjaAnus+=1
+	act'Further':gt 'KatjaEvDin', 'strapon_main'
+end
 
-$d_kat_vibor_dildo = {
+if $ARGS[0] = 'dildo':
+	cls
+	gs'stat'
 	if npc_horny['A14'] >= 100:npc_horny['A14'] = 80
 	'You get your handbag and pull out the toy.'
-	if strapon > 0:
-		act'Dress Strap':
-			cls
-			minut+=3
-			lesbian += 1
-			gs 'boystat', 'D1', 'b'
-			gs'stat'
-			'<center><img src="images/shared/sex/lesbian/strapon.jpg"></center>'
-			'You put the strap-on harness on and buckle it in place, Katja bites her lip watching your actions.'
-	        dynamic $d_kat_strapon_bj
-	        dynamic $d_kat_strapon_miss
-	        dynamic $d_kat_strapon_anal
-		end
-	end
-
-}
-
-$d_kat_dildo = {
-	act'Get Toys':
+	act'Strap it on':
 		cls
+		minut+=3
+		lesbian += 1
+		gs 'boystat', 'D1', 'b'
 		gs'stat'
-		dynamic $d_kat_vibor_dildo
+		'<center><img src="images/shared/sex/lesbian/strapon.jpg"></center>'
+		'You put the strap-on harness on and buckle it in place, Katja bites her lip watching your actions.'
+		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
+
 
-$katja_shower_kiss = {
+if $ARGS[0] = 'shower_kiss':
 	cls
 	KatjaLust += 10
 	KatjaSlut += 1
@@ -234,10 +220,9 @@ $katja_shower_kiss = {
 
 		act 'Say goodbye and go home':gt 'pavResidential'
 	end
-}
+end
 
-$d_katja_sex = {
-	gs 'boystat', 'A14', 'a'
+if $ARGS[0] = 'sex':
 	act 'relax':
 		cls
 
@@ -252,7 +237,7 @@ $d_katja_sex = {
 			gs 'arousal', 'vaginal_finger', 5, 'lesbian', 'dom'
 			gs 'stat'
 
-			dynamic $d_katja_kuni_p
+			act 'Spread your legs': gt 'KatjaEvDin', 'kuni_p'
 			
 		else
 			KatjaLust += 1
@@ -280,7 +265,7 @@ $d_katja_sex = {
 			gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'dom'
 			gs 'stat'
 
-			dynamic $d_katja_kuni
+			act 'Lick Katja': gt 'KatjaEvDin', 'kuni'
 			
 		else
 			if pcs_dom > 0:
@@ -291,7 +276,7 @@ $d_katja_sex = {
 				gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'dom'
 				gs 'stat'
 
-				dynamic $d_katja_kuni
+				act 'Lick Katja': gt 'KatjaEvDin', 'kuni'
 			
 			else
 				KatjaSlut += 1
@@ -308,187 +293,182 @@ $d_katja_sex = {
 	if strapon > 0:
 		if pcs_dom >= KatjaDom:
 			if KatjaSlut + (pcs_dom - KatjaDom) >= 40 and npc_horny['A14'] >= 30:
-				dynamic $d_kat_dildo
+				act'Get Toys': gt 'KatjaEvDin', 'dildo'
 			end
 		else
 			if KatjaSlut >= 40 + (KatjaDom - pcs_dom) and npc_horny['A14'] >= 30:
-				dynamic $d_kat_dildo
+				act'Get Toys': gt 'KatjaEvDin', 'dildo'
 			end
 		end
 	end
-}
+end
 
-$d_katja_kuni = {
-	act 'Lick Katja':
-		cls
-		KatjaSlut += 1
-		KatjaLust += 1
-		npc_horny['A14'] = 0
+if $ARGS[0] = 'kuni':
+	cls
+	KatjaSlut += 1
+	KatjaLust += 1
+	npc_horny['A14'] = 0
 
-		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
+	if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
 
-		gs 'stat'
-		'<center><img 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, Katja moans and closes her eyes enjoying your tongue, after a while Katja shivers and her pussy starts to contract rhythmically.'
-		'Katja clutches your hair, no longer able to hold back, moans loudly as she orgasms. Then she pushes your head away from her.'
+	gs 'stat'
+	'<center><img 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, Katja moans and closes her eyes enjoying your tongue, after a while Katja shivers and her pussy starts to contract rhythmically.'
+	'Katja clutches your hair, no longer able to hold back, moans loudly as she orgasms. Then she 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."'
-			dynamic $d_katja_kuni_p
-		else
-			act 'Say goodbye and go home':
-				gs 'arousal', 'end'
-				gt 'pavResidential'
-			end
+	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 'Say goodbye and go home':
+			gs 'arousal', 'end'
+			gt 'pavResidential'
 		end
 	end
-}
+end
 
-$d_katja_kuni_p = {
-	act 'Spread your legs':
-		cls
-		KatjaSlut += 1
-		KatjaLust += 1
+if $ARGS[0] 'kuni_p':
+	cls
+	KatjaSlut += 1
+	KatjaLust += 1
 
-		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
+	if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
 
-		gs 'stat'
-		'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni.jpg"></center>'
-		'Katja bows her head between your legs and you feel something as her tongue begin to toy with your clitoris, you enjoy a natural bliss.'
-		'After a while a nice fire builds inside you, it builds and consumes, everything is so hot, then it finds release and you''re in the throes of orgasm.'
-		'Soon the feeling becomes too much and you gently lift Katja''s head away from you.'
+	gs 'stat'
+	'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni.jpg"></center>'
+	'Katja bows her head between your legs and you feel something as her tongue begin to toy with your clitoris, you enjoy a natural bliss.'
+	'After a while a nice fire builds inside you, it builds and consumes, everything is so hot, then it finds release and you''re in the throes of 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 npc_horny['A14'] > 0:
-			'Katja smiles at you "That was great <<$pcs_nickname>>, come on now, my turn."'
-			dynamic $d_katja_kuni
-		else
-			act 'Say goodbye and go home':
-				gs 'arousal', 'end'
-				gt 'pavResidential'
-			end
+	$orgasm_or = 'yes'
+	gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
+	gs 'stat'
+	
+	if npc_horny['A14'] > 0:
+		'Katja smiles at you "That was great <<$pcs_nickname>>, come on now, my turn."'
+		act 'Lick Katja': gt 'KatjaEvDin', 'kuni'
+	else
+		act 'Say goodbye and go home':
+			gs 'arousal', 'end'
+			gt 'pavResidential'
 		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.
-$d_katja_kuni_dom = {
-	act 'Lick Katja':
-		cls
-		KatjaSlut += 1
-		KatjaLust += 1
-		lesbian += 1
-		npc_horny['A14'] = 0
+if $ARGS[0] = 'kuni_dom':
+	cls
+	KatjaSlut += 1
+	KatjaLust += 1
+	lesbian += 1
+	npc_horny['A14'] = 0
 
-		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
+	if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
 
-		gs 'stat'
-		'<center><img 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, Katja moans and closes her eyes enjoying your tongue, after a while Katja shivers and her pussy starts to contract rhythmically.'
-		'Katja clutches your hair and no longer able to hold back, moans loudly and pushes your head away from her.'
-		
-		gs 'arousal', 'cuni_give', 5, 'lesbian', 'sub'
-		gs 'stat'
-		
-		if pcs_horny >= 50:
-			if rand(0,1) = 0:
-				'Katja smiles at you "That was great <<$pcs_nickname>>, spread your legs."'
-				dynamic $d_katja_kuni_p
-			else
-				'She looks at you with a satisfied grin, you know that she is aware you are horny as well. With a mischievously look in her eye she says. "That was great <<$pcs_nickname>> but I think that''s enough of that for today."'
+	gs 'stat'
+	'<center><img 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, Katja moans and closes her eyes enjoying your tongue, after a while Katja shivers and her pussy starts to contract rhythmically.'
+	'Katja clutches your hair and no longer able to hold back, moans loudly and pushes your head away from her.'
+	
+	gs 'arousal', 'cuni_give', 5, 'lesbian', 'sub'
+	gs 'stat'
+	
+	if pcs_horny >= 50:
+		if rand(0,1) = 0:
+			'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, you know that she is aware you are horny as well. With a mischievously look in her eye she says. "That was great <<$pcs_nickname>> but I think that''s enough of that for today."'
 
-				act 'Say goodbye and go home':
+			act 'Say goodbye and go home':
+				gt 'pavResidential'
+			end
+			
+			act 'Beg her to give you a turn.':
+				cls
+				pcs_horny += 5
+				gs 'stat'
+				'<center><img src="images/characters/pavlovsk/school/girl/katja/myturn.jpg"></center>'
+				'You beg her to give you a turn but she shakes her head no. "Sorry <<$pcs_nickname>>, I''m just not in the mood to go down on you... although if you really something, I got this." As she is talking she pulls out a strap-on harness with a rather large dildo attached to it, giving you a wicked grin. You can tell she is just itching to use it on you.'
+
+				act 'Decline and go home':
 					gt 'pavResidential'
 				end
 				
-				act 'Beg her to give you a turn.':
+				act 'Agree':
 					cls
-					pcs_horny += 5
+					pcs_horny += 10
 					gs 'stat'
-					'<center><img src="images/characters/pavlovsk/school/girl/katja/myturn.jpg"></center>'
-					'You beg her to give you a turn but she shakes her head no. "Sorry <<$pcs_nickname>>, I''m just not in the mood to go down on you... although if you really something, I got this." As she is talking she pulls out a strap-on harness with a rather large dildo attached to it, giving you a wicked grin. You can tell she is just itching to use it on you.'
+					'<center><img src="images/characters/pavlovsk/school/girl/katja/katjanewtoy.jpg"></center>'
+					'You bite your lower lip a moment, you are kinda turned on at the idea of Katja using that to fuck you. You start nodding your head yes as you start to take off your clothes. 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 'Decline and go home':
-						gt 'pavResidential'
-					end
-					
-					act 'Agree':
+					act 'Blowjob':
 						cls
-						pcs_horny += 10
 						gs 'stat'
-						'<center><img src="images/characters/pavlovsk/school/girl/katja/katjanewtoy.jpg"></center>'
-						'You bite your lower lip a moment, you are kinda turned on at the idea of Katja using that to fuck you. You start nodding your head yes as you start to take off your clothes. 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."'
+						'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/Katstrapbj.gif"></center>'
+						'As you get naked she makes sure the harness is securely in place. She looks over at you and grins, swinging her hips back and forth making the dildo swing back and forth, which makes her giggle. After you amuses herself for a bit she looks at you with a wicked grin and walks over to you.'
+						'She grabs you by your hair, not to hard but not very gentle either and pulls you off the bed and gets you down in front of her on your knees. Once your on your knees she pushes the head of the dildo against you lips and slips it into your mouth. With a firm hold on your hair she starts fucking your mouth, soon she is ramming the dildo down your throat.'
+						'No matter how use to being throat fucked you are, she makes you gag. She will bury it to the base in your throat and leave it till you start to gag, then she goes back to roughly fucking your mouth. Each time she makes you gag you can hear her giggle, you can tell she is enjoying herself.'
+						'With tears running down your cheeks from being gagged and saliva dripping from you mouth, she finally pulls your head away by your hair. "Ok I think we got this wet enough with your saliva, don''t you. Ready for round two?"'
 
-						act 'Blowjob':
+						gs 'arousal', 'bj', 5, 'lesbian', 'sub', 'rough', 'deepthroat'
+						gs 'stat'
+			
+						if pcs_dom - sub + 30 > KatjaDom: act 'Decline and go home':gt 'pavResidential'
+						act 'Agree to round two':
 							cls
+							stat['vaginal_strap'] += 1
+							pcs_horny += 15
 							gs 'stat'
-							'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/Katstrapbj.gif"></center>'
-							'As you get naked she makes sure the harness is securely in place. She looks over at you and grins, swinging her hips back and forth making the dildo swing back and forth, which makes her giggle. After you amuses herself for a bit she looks at you with a wicked grin and walks over to you.'
-							'She grabs you by your hair, not to hard but not very gentle either and pulls you off the bed and gets you down in front of her on your knees. Once your on your knees she pushes the head of the dildo against you lips and slips it into your mouth. With a firm hold on your hair she starts fucking your mouth, soon she is ramming the dildo down your throat.'
-							'No matter how use to being throat fucked you are, she makes you gag. She will bury it to the base in your throat and leave it till you start to gag, then she goes back to roughly fucking your mouth. Each time she makes you gag you can hear her giggle, you can tell she is enjoying herself.'
-							'With tears running down your cheeks from being gagged and saliva dripping from you mouth, she finally pulls your head away by your hair. "Ok I think we got this wet enough with your saliva, don''t you. Ready for round two?"'
-
-							gs 'arousal', 'bj', 5, 'lesbian', 'sub', 'rough', 'deepthroat'
+							'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapfuck.gif"></center>'
+							'You nod your head you want more, Katja pulls you up to your feet by your hair, it hurts a little but you also like the rough treatment. She gives you a passionate kiss on the lips and then pushes you onto the bed. "That my good little fuck slut, not get on your hands and knees like a good little slut." She gets you on your hands and knees as the kneels down behind you. She gives your bare ass a hard smack.'
+							'With one hand she holds the dildo and starts rubbing it against your pussy lips, with the other she grabs your hair again and pulls your head back. She slips the dildo into your wet pussy, she barely has the tip all the way in you when she pulls back on your hair. Forcing you to lean back a bit while she thrusts her hips forward, burying the dildo the full length inside of you.'
+							'Before she even gives you a chance to get use to it, she starts roughly and furiously fucking you. At first it hurts a little but soon you are soaking wet and moaning in pleasure. Loving the feeling of being used like a as she put it little fuck slut, especially being her little fuck slut. The thought of her dominating you and using you how she wants is more of a turn on than the dildo currently pounding you.'
+							'Your moans get louder as the pleasure ebbs and flows. "Yeah you love this, don''t you bitch?" You moan back to her. "Yes, yes please fuck me, use me!" She redoubles her efforts for a bit, before she finally pulls out of you, keeping hold of your hair and dragging you off the bed with her. She takes you to her desk and bends you over the desk.'
+							'"Reach back and pull those ass cheeks apart so I can fuck you in the ass." she commands you now, you don''t know if you can resist her, you don''t know if you want to.'
+
+							gs 'arousal', 'vaginal_strap', 5, 'lesbian', 'sub', 'rough'
 							gs 'stat'
-				
+						
 							if pcs_dom - sub + 30 > KatjaDom: act 'Decline and go home':gt 'pavResidential'
-							act 'Agree to round two':
+							act 'Surrender your ass':
 								cls
-								stat['vaginal_strap'] += 1
-								pcs_horny += 15
 								gs 'stat'
-								'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapfuck.gif"></center>'
-								'You nod your head you want more, Katja pulls you up to your feet by your hair, it hurts a little but you also like the rough treatment. She gives you a passionate kiss on the lips and then pushes you onto the bed. "That my good little fuck slut, not get on your hands and knees like a good little slut." She gets you on your hands and knees as the kneels down behind you. She gives your bare ass a hard smack.'
-								'With one hand she holds the dildo and starts rubbing it against your pussy lips, with the other she grabs your hair again and pulls your head back. She slips the dildo into your wet pussy, she barely has the tip all the way in you when she pulls back on your hair. Forcing you to lean back a bit while she thrusts her hips forward, burying the dildo the full length inside of you.'
-								'Before she even gives you a chance to get use to it, she starts roughly and furiously fucking you. At first it hurts a little but soon you are soaking wet and moaning in pleasure. Loving the feeling of being used like a as she put it little fuck slut, especially being her little fuck slut. The thought of her dominating you and using you how she wants is more of a turn on than the dildo currently pounding you.'
-								'Your moans get louder as the pleasure ebbs and flows. "Yeah you love this, don''t you bitch?" You moan back to her. "Yes, yes please fuck me, use me!" She redoubles her efforts for a bit, before she finally pulls out of you, keeping hold of your hair and dragging you off the bed with her. She takes you to her desk and bends you over the desk.'
-								'"Reach back and pull those ass cheeks apart so I can fuck you in the ass." she commands you now, you don''t know if you can resist her, you don''t know if you want to.'
-
-								gs 'arousal', 'vaginal_strap', 5, 'lesbian', 'sub', 'rough'
+								'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapanal.jpg"></center>'
+								'You do as she says, you grab your butt cheeks and pull them apart. Almost at once you feel the head of the dildo pressing against your asshole as she says. "That''s my good little butt slut, we will have you trained in no time."'
+								'With the only the lube from your own pussy on the dildo she slips dildo into your ass, she is a little gentle at first, taking it slowly and working it in slowly. She strokes in and out slowly, as she works it deeper and deeper into your ass. Once she has pushes it the full length in your ass and there is no more to push in, she starts to pick up the pace and fuck you harder. You start moaning in a mixture of pleasure and pain. It hurts a little but you also love it, not just the feeling but also being used like this.'
+								'She keeps being up speed, soon the sounds of the skin from her hips slapping against your butt can be heard over your moaning. She seems to lose herself in the act, she stops paying attention to you. You don''t even think she would notice if you orgasmed, after a long time she starts panting, you can tell she is starting to get physically tired and worn out.'
+								
+								gs 'arousal', 'anal_strap', 5, 'lesbian', 'sub', 'rough'
 								gs 'stat'
 							
-								if pcs_dom - sub + 30 > KatjaDom: act 'Decline and go home':gt 'pavResidential'
-								act 'Surrender your ass':
-									cls
-									gs 'stat'
-									'<center><img src="images/characters/pavlovsk/school/girl/katja/sex/school/katstrapanal.jpg"></center>'
-									'You do as she says, you grab your butt cheeks and pull them apart. Almost at once you feel the head of the dildo pressing against your asshole as she says. "That''s my good little butt slut, we will have you trained in no time."'
-									'With the only the lube from your own pussy on the dildo she slips dildo into your ass, she is a little gentle at first, taking it slowly and working it in slowly. She strokes in and out slowly, as she works it deeper and deeper into your ass. Once she has pushes it the full length in your ass and there is no more to push in, she starts to pick up the pace and fuck you harder. You start moaning in a mixture of pleasure and pain. It hurts a little but you also love it, not just the feeling but also being used like this.'
-									'She keeps being up speed, soon the sounds of the skin from her hips slapping against your butt can be heard over your moaning. She seems to lose herself in the act, she stops paying attention to you. You don''t even think she would notice if you orgasmed, after a long time she starts panting, you can tell she is starting to get physically tired and worn out.'
-									
-									gs 'arousal', 'anal_strap', 5, 'lesbian', 'sub', 'rough'
-									gs 'stat'
-								
-									if pcs_horny = 100:
-										analorgasm += 1
-										$orgasm_or = 'custom'
-										$orgasm_txt = 'It is then that your orgasm hits you, it is sudden and amazingly intense.'
-									end
-									'Yet she doesn''t slow down her furious pace, finally unable to keep it up anymore she collapses on your back. You can feel the sweat from her body on your back and her heavy breathing in your ear. As she rests half leaning against and half laying on you, with the dildo buried the full length up your ass still.'
-									'You take the time to rest and relax yourself coming down from the amazing fucking you just received. A few moments later she kisses your back and your neck, before getting off your and pulling the dildo out. Getting up yourself, you see her taking the harness off and tossing it aside. Once it is off and you are facing her, she grabs you by the neck and gives you a passionate deep long kiss. Finally breaking the kiss "My god <<$pcs_nickname>> that was amazing, I hope I didn''t hurt you to much and you enjoyed it as much as I did. No wonder boys fuck us like that, that was amazing."'
-									'She said as she feel back on her bed laying on her back, still breathing hard and looking at you with a somewhat possessive look. You lay down next to her. "It was wonderful, I''m glad you enjoyed it too, even if you was a little rough at times." She leans over and gives you another kiss. "Sorry <<$pcs_nickname>> if I was to rough, but that was beyond description, we are going to half to do that again." The two of you lay quietly for awhile basking in the aftermath, you know something in your relationship has changed and you think for the better. After a bit you get up and get dressed, you need to get going.'
-
-									act 'Go home':
-										gs 'arousal', 'end'
-										gt 'pavResidential'
-									end
+								if pcs_horny = 100:
+									analorgasm += 1
+									$orgasm_or = 'custom'
+									$orgasm_txt = 'It is then that your orgasm hits you, it is sudden and amazingly intense.'
+								end
+								'Yet she doesn''t slow down her furious pace, finally unable to keep it up anymore she collapses on your back. You can feel the sweat from her body on your back and her heavy breathing in your ear. As she rests half leaning against and half laying on you, with the dildo buried the full length up your ass still.'
+								'You take the time to rest and relax yourself coming down from the amazing fucking you just received. A few moments later she kisses your back and your neck, before getting off your and pulling the dildo out. Getting up yourself, you see her taking the harness off and tossing it aside. Once it is off and you are facing her, she grabs you by the neck and gives you a passionate deep long kiss. Finally breaking the kiss "My god <<$pcs_nickname>> that was amazing, I hope I didn''t hurt you to much and you enjoyed it as much as I did. No wonder boys fuck us like that, that was amazing."'
+								'She said as she feel back on her bed laying on her back, still breathing hard and looking at you with a somewhat possessive look. You lay down next to her. "It was wonderful, I''m glad you enjoyed it too, even if you was a little rough at times." She leans over and gives you another kiss. "Sorry <<$pcs_nickname>> if I was to rough, but that was beyond description, we are going to half to do that again." The two of you lay quietly for awhile basking in the aftermath, you know something in your relationship has changed and you think for the better. After a bit you get up and get dressed, you need to get going.'
+
+								act 'Go home':
+									gs 'arousal', 'end'
+									gt 'pavResidential'
 								end
 							end
 						end
 					end
 				end
 			end
-		else
-			act 'Say goodbye and go home':gt 'pavResidential'
 		end
+	else
+		act 'Say goodbye and go home':gt 'pavResidential'
 	end
-}
+end
 
 --- katjaEvDin ---------------------------------