Browse Source

[added] New sex event for comming back from town with a horny Katja.

bgkjdgbizgblzdgbr 1 year ago
parent
commit
fa88341e58
3 changed files with 276 additions and 48 deletions
  1. 2 2
      locations/katja_city.qsrc
  2. 41 15
      locations/katja_procedural.qsrc
  3. 233 31
      locations/katja_uni_sex.qsrc

+ 2 - 2
locations/katja_city.qsrc

@@ -103,9 +103,9 @@ if $ARGS[0] = 'metro_destination':
 				'But you finally manage to get her to her room and in her bed. She goes out immediately and you lever her to sleep.'
 				act 'Go to the hallway': gt 'uni_dorm', 'second_floor'
 			else
-				if (katjaQW['horny'] > rand(40,80) and katjaQW['sex_clossedness'] < 2) or katjaQW['couple'] = 1:
+				if katjaQW['horny'] > rand(40,80) and katjaQW['sex_clossedness'] < 2:
 					'You get out at the Metro Station near the university and Katja suggest that you go with her to her room'
-					act 'Go with her to her room': gt 'katja_dorm', 'start'
+					act 'Go with her to her room': gt 'katja_uni_sex', 'comming_home_from_date'
 					act 'Say you don''t want to and leave her': gt 'city_island'
 				else
 					'You exit the metro station near the university and say goodbye to each other.'

+ 41 - 15
locations/katja_procedural.qsrc

@@ -28,6 +28,7 @@
 !! katjaQW['couple'] is set to 1 when you agree to be a couple.
 !! katjaQW['faithful'] is sent to 1 if you are a couple and agree not to have sex with others (unless you both participate)
 !! katjaQW['cheat_warning'] is set the first time Katja confronts the player because the caught them cheating and to 2 after the player have been caught so many times that Katja warns them that she will also starts to sleep around. 
+!! katjaQW['cheat_times'] the number of times since her last waring that Katja is certain that you cheated on her.
 
 !! katjaQW['sex_clossedness'] 0 mean no restriction on sex scenes with Katja, 1 mean only scenes with Katja and the player character are available, 2 mean that the player character wont have sex with Katja
 
@@ -140,7 +141,14 @@ if $ARGS[0] = 'hourly':
 	end
 	if katjaQW['under_influnece_of_cocaine'] > 0: katjaQW['under_influnece_of_cocaine'] -= 1
 
-	if katjaQW['nightclub_private_room_boy'] = 1 and katjaQW['disco_loc'] ! 7: katjaQW['nightclub_private_room_boy'] = 0 & gs 'katja_procedural', 'sex_set', 1
+	!! Resetting her sublocation at the nightclub after she leaves the nightclub
+	if locat['katja]' ! 53: katjaQW['disco_loc'] = 0
+
+	!! Setting the sex stat for Katja if she went to a private room at the nightclub and the player character did not spy on her.
+	if katjaQW['nightclub_private_room_boy'] = 1 and katjaQW['disco_loc'] ! 7:
+		katjaQW['nightclub_private_room_boy'] = 0
+		if rand(0,katjaQw['slut']/25) > 0: gs 'katja_procedural', 'sex_set', 1
+	end
 end
 
 if $ARGS[0] = 'cikl':
@@ -176,17 +184,11 @@ if $ARGS[0] = 'cikl':
 	if npc_sex['A14'] >= 1 and katjaQW['simultanous_girls'] = 0: katjaQW['simultanous_girls'] = 1
 
 	!! Katja learning about you sexual experience from other sources because you are a slut.
-	if fame['pav_slut'] >= 150 and stat['bj'] > 0 and katjaQW['knows_BJ'] ! 1: katjaQW['knows_BJ'] = 1
-	if fame['pav_slut'] >= 250 or preg > 0 and stat['vaginal'] > 0 and katjaQW['knows_sex'] ! 1: katjaQW['knows_sex'] = 1
+	if (fame['pav_slut'] >= 150 or (fame['city_slut'] >= 150 and yearstart > 1)) and stat['bj'] > 0 and katjaQW['knows_BJ'] ! 1: katjaQW['knows_BJ'] = 1
+	if (fame['pav_slut'] >= 250 or (fame['city_slut'] >= 250 and yearstart > 1) or preg > 0) and stat['vaginal'] > 0 and katjaQW['knows_sex'] ! 1: katjaQW['knows_sex'] = 1
 
 	!!Resetting if Katja have shown you that she is not wearing panties at the disco. The reason to not use a daystart variable, is the if you show it very late Friday it might prevent you from seeing it Saturday (daystart can change during the event)
 	if katjaQW['no_panties_at_disco'] > 0: katjaQW['no_panties_at_disco'] = 0
-
-	!! Setting the sex stat for Katja if she went to a private room at the nightclub and the player character did not spy on her.
-	if katjaQW['nightclub_private_room_boy'] = 1: 
-		katjaQW['nightclub_private_room_boy'] = 0
-		if rand(0,katjaQw['slut']/25) > 0: gs 'katja_procedural', 'sex_set', 1
-	end
 	
 	!!Out commented Katja becoming pregnant until more content for a pregnant Katja is done 
 	!!if katjaPreg = 0 and month >= 2 and year > 2016: katjaPreg = 1
@@ -264,18 +266,42 @@ if $ARGS[0] = 'face_color':
 	!! To print the colour of her face, for the player to get an idea of her arousal
 	if katjaQW['QWstage'] > 2:
 		if katjaQW['horny'] < 20:
-			'Katja looks calm and stoic.'
+			if $ARGS[1] = 'func':
+				$result = 'Katja looks calm and stoic.'
+			 else
+				'Katja looks calm and stoic.'
+			end
 		elseif katjaQW['horny'] < 40:
-			'Katja looks at you with a naughty twinkle in her eyes.'
+			if $ARGS[1] = 'func':
+				$result = 'Katja looks at you with a naughty twinkle in her eyes.'
+			 else
+				'Katja looks at you with a naughty twinkle in her eyes.'
+			end
 		elseif katjaQW['horny'] < 60:
-			'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
+			if $ARGS[1] = 'func':
+				$result = 'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
+			 else
+				'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
+			end
 		elseif katjaQW['horny'] < 80:
-			'Katja is blushing fairly obviously and looks at you longingly.'
+			if $ARGS[1] = 'func':
+				$result = 'Katja is blushing fairly obviously and looks at you longingly.'
+			 else
+				'Katja is blushing fairly obviously and looks at you longingly.'
+			end
 		else
-			'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
+			if $ARGS[1] = 'func':
+				$result = 'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
+			 else
+				'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
+			end
 		end
 	else
-		'Katja looks at you with a smile.'
+		if $ARGS[1] = 'func':
+			$result = 'Katja looks at you with a smile.'
+		 else
+			'Katja looks at you with a smile.'
+		end
 	end
 end
 

+ 233 - 31
locations/katja_uni_sex.qsrc

@@ -263,7 +263,7 @@ if $ARGS[0] = 'library_licking3':
 			act 'Bring her to an orgasm':
 				cla & *clr
 				katjaQW['slut'] += 3
-				katjaQW['hrony'] = 0
+				katjaQW['horny'] = 0
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/library_licking5.jpg"></center>'
 				'Katja removes one on her hands to steady herself as you finally brings her to an orgasm. She is shaking for a long time, clearly trying to keep her voice down so as not to draw attention.'
 				gs 'arousal', 'cuni_give', 1, 'lesbian'
@@ -322,18 +322,18 @@ if $ARGS[0] = 'library_leave_actions':
 end
 
 if $ARGS[0] = 'library_threesome1':
-	gs 'npcgeneratec', 0, 'hot_student', rand(18,28), 2
+	gs 'npcgeneratec', 0, 'Hot Student', rand(18,28), 2
 	gs 'boyStat', $npclastgenerated
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/library_threesome1.jpg"></center>'
 	'While you and Katja are sitting in one of the reading rooms of the library, a handsome guy comes into the room. He leans over you. "So how are the studys going my beautiful angels?"'
 	'"Good. good. It''s going good," you manage to say as you notice Katja trying extremely hard to not start laughing over his corny lines.'
 	'"Well if it''s going so good, then perhaps you ladies need a break from your hard work..." he continues. "I''m <<$npc_nickname[$npclastgenerated]>> and will of course be more than willing to offer my services to make sure that you ladies are entertained during your respite." You look at Katja and see that she also understands his intentions.'
 	*nl
-	if (katjaQW['boy_block'] = 1 or katjaQW['relationship_count_start'] > 0) and katjaQW['slut'] >= rand(50,100) :
+	if (katjaQW['boy_block'] = 1 or katjaQW['sex_clossedness'] > 0) and katjaQW['slut'] >= rand(50,100) :
 		'"Sorry, but neither you or any other boy could possibly have anything that could entertain us," Katja says in a completely deadpan voice. He look flabbergasted before quickly turning around and leaving. "Go girl. That was impressive!" you tell Katja, and she blushes slightly.'
 		act 'Finish up': gt 'katja_uni_sex', 'threeseome_over'
 	else
-		if katjaQW['QWstage'] < 6 or katjaQW['boy_block'] = 1 or katjaQW['relationship_count_start'] > 0:
+		if katjaQW['QWstage'] < 6 or katjaQW['boy_block'] = 1 or katjaQW['sex_clossedness'] > 0:
 			'You can see Katja looking uncomfortable at his suggestion. "What the fuck? Get the hell away from us, perv!" you say in a harsh voice. He seems very surprised and doesn''t know what to say, so he just slowly backs away.'
 			'After he leaves the room, Katja can''t hold it any more and breaks out laughing "What a moron!" she says. "I can''t believe that they let such idiots enter the uni."'
 			'"Maybe he''s a lab experiment that got loose?" you suggest, which just sends Katja into another giggling fit. After she stops laughing, you return to your work.'
@@ -460,7 +460,7 @@ if $ARGS[0] = 'library_threesome2':
 								act 'On top of Katja':
 									cla & *clr
 									katjaQW['slut'] += 3
-									katjaQW['hrony'] = 0
+									katjaQW['horny'] = 0
 									if npc_vag['A14'] < dick: npc_vag['A14'] += 1
 									if npc_vag['A14']*2 < dick: npc_vag['A14'] += 1
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/library_threesome10.jpg"></center>'
@@ -476,7 +476,10 @@ if $ARGS[0] = 'library_threesome2':
 										gs 'stat'
 										'He continues to pound you, and you''re wondering if he will manage to pull out before he pulls out at the last second, causing his cum to splatter all over your pussy. You then climb off Katja and she slides off the table.'
 										'"That was amazing!" <<$npc_nickname[$npclastgenerated]>> says while getting dressed.'
-										'"Yeah, that wasn''t bad," Katja replies. '+iif(katjaQW['slut'] >= 100, '"At least he knows how to use his dick, even if he doesn''t know how to use his words,"', '"Yes. We did get something useful out of him after all, who would have thought with such a corny come on" you say.')+' <<$npc_nickname[$npclastgenerated]>> doesn''t seem to know how to react to that, and just puts on the rest of his clothes and leaves. Once he''s gone, you and Katja break down laughing before finally getting your clothes back on and returning to the books.'
+										'"Yeah, that wasn''t bad," Katja replies. '+iif(katjaQW['slut'] >= 100, '"At least he knows how to use his dick, even if he doesn''t know how to use his words,"', '"Yes. We did get something useful out of him after all, who would have thought with such a corny come on" you say.')+' <<$npc_nickname[$npclastgenerated]>> doesn''t seem to know how to react to that, and just puts on the rest of his clothes and leaves.'
+										'Once he''s gone, you and Katja break down laughing before finally getting clean up, your clothes back on and returning to the books.'
+										cumspclnt = 1
+										gs 'cum_cleanup'
 										act 'Finish up': gt 'katja_uni_sex', 'threeseome_over'
 									end
 								end
@@ -538,7 +541,7 @@ if $ARGS[0] = 'lazar_katja_uni_3some':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_katja_uni_3some5.jpg"></center>'
 					'Your tops quickly hit the floor as you keep doing poses. You start to wonder if this is all Lazar wants you to do.'
-					'Katja seems to be thinking the same thing. "Are you just going to keep taking pictures or are you going to come over here'+iif(kajtaQW['slut'] > 70 and ( katjaQW['QWstage'] > 4 or katjaQW['anal_quest'] > 2), ' and fuck us', '')+'?" she asks.'
+					'Katja seems to be thinking the same thing. "Are you just going to keep taking pictures or are you going to come over here'+iif(katjaQW['slut'] > 70 and ( katjaQW['QWstage'] > 4 or katjaQW['anal_quest'] > 2), ' and fuck us', '')+'?" she asks.'
 					gs 'arousal', 'flash', 1, 'group'
 					gs 'stat'
 					act 'Get naked':
@@ -799,9 +802,11 @@ if $ARGS[0] = 'lazar_katja_cum':
 		*clr & cla
 		minut += 10
 		gs 'katja_meynold_schedule'
+		cumspclnt = 1
+		gs 'cum_cleanup'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/KWT2.jpg"></center>'
-		'You get dressed and say goodbye to Lazar. He tells you it was great having you over and that you should come again. You answer him that it was a great time.'
+		'You clean up, get dressed and say goodbye to Lazar. He tells you it was great having you over and that you should come again. You answer him that it was a great time.'
 		*nl
 		if katjaQW['QWstage'] = 5 and katjaQW['anal_quest'] = 2:
 			katjaQW['QWstage'] = 6
@@ -862,9 +867,10 @@ if $ARGS[0] = 'lazar_ivan_katja_uni_4some':
 		gs 'stat'
 		act 'The guys join':
 			*clr & cla
-			gs 'boyStat', 'A3', 'A149'
+			gs 'boyStat', 'A3', 'a'
+			gs 'boyStat', 'A149', 'b'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some2.jpg"></center>'
-			'While you and Katja are sitting on your knees on the couch, sharing a long kiss, the guys move in. Katja quickly has Lazar''s <<$boydesc2>>, <<dick2>> cm, <<$dick_girth2>> dick in her hand, while Ivan approaches you from behind.'
+			'While you and Katja are sitting on your knees on the couch, sharing a long kiss, the guys move in. Katja quickly has Lazar''s <<dick2>> cm, <<$dick_girth2>> dick in her hand, while Ivan approaches you from behind.'
 			'You and Katja break off your kiss and, with a look, decide to give the guys some attention.'
 			gs 'arousal', 'foreplay', 2, 'group'
 			gs 'arousal', 'kiss', -2, 'group', 'lesbian'
@@ -872,7 +878,7 @@ if $ARGS[0] = 'lazar_ivan_katja_uni_4some':
 			act 'Suck some dick':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some3.jpg"></center>'
-				'You turn around and take Ivan''s <<$boydesc1>>, <<dick1>> cm, <<$dick_girth1>> cock in your eager mouth. At the same time, Katja is exploring Lazar''s cock with her mouth.'
+				'You turn around and take Ivan''s <<dick1>> cm, <<$dick_girth1>> cock in your eager mouth. At the same time, Katja is exploring Lazar''s cock with her mouth.'
 				'"Suck that dick," Ivan says.'
 				'"Yeah, show us what good little cocksucking sluts you are!" Lazar adds, and the two of you start sucking eagerly to show off your skills.'
 				if npc_throat['A14'] < dick2: npc_throat['A14'] += 1
@@ -913,11 +919,11 @@ if $ARGS[0] = 'lazar_ivan_katja_uni_4some':
 							'Katja is ready as Lazar rams his cock down her throat. She takes it like a pro under Lazar''s onslaught, seemingly having no gag reflex, and even seems to be enjoying it.'
 						end
 						if 2*pcs_throat < dick1:
-							'You only have a moment before Ivan stuffs his <<$boydesc1>>, <<$dick_girth1>> cock in your throat. You have a lot of trouble accommodating it and your gag reflex is constantly giving you problems.'
+							'You only have a moment before Ivan stuffs his <<$dick_girth1>> cock in your throat. You have a lot of trouble accommodating it and your gag reflex is constantly giving you problems.'
 						elseif pcs_throat < dick1:
-							'You only have a moment before Ivan stuffs his <<$boydesc1>>, <<$dick_girth1>> cock in your throat. You have a little trouble accommodating it and your gag reflex is occasionally giving you problems.'
+							'You only have a moment before Ivan stuffs his <<$dick_girth1>> cock in your throat. You have a little trouble accommodating it and your gag reflex is occasionally giving you problems.'
 						else
-							'You only have a moment before Ivan stuffs his <<$boydesc1>>, <<$dick_girth1>> cock in your throat. You have no trouble taking it all and you deepthroat it like a pro.'
+							'You only have a moment before Ivan stuffs his <<$dick_girth1>> cock in your throat. You have no trouble taking it all and you deepthroat it like a pro.'
 						end
 						gs 'arousal', 'bj', 4, 'dick2', 'group', 'deepthroat'
 						gs 'stat'
@@ -963,7 +969,7 @@ if $ARGS[0] = 'lazar_ivan_katja_uni_4some':
 								act 'Get on Lazar''s cock':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some8.jpg"></center>'
-									'You do as Lazar says and sit down on his <<$boydesc2>>, <<$dick_girth2>> dick. Ivan moves so that his cock is in your face and Katja joins you in sucking it while you ride Lazar.'
+									'You do as Lazar says and sit down on his <<$dick_girth2>> dick. Ivan moves so that his cock is in your face and Katja joins you in sucking it while you ride Lazar.'
 									'After a short period of time, Ivan moves away and gets behind you, lining his dick with your asshole.'
 									gs 'arousal', 'vaginal', 3, 'dick2', 'group'
 									gs 'arousal', 'bj', -2, 'dick1', 'group'
@@ -1018,7 +1024,7 @@ if $ARGS[0] = 'lazar_ivan_dp':
 		*nl
 		'After some minutes, the guys stop. "Now it''s Katja''s turn," Lazar says.'
 		'"Yeah, I also want to try her ass," Ivan agrees.'
-		if kajtaQW['dp'] = 0:
+		if katjaQW['dp'] = 0:
 			'"I''ve never tried something like that!" Katja says, a little shocked. "I don''t know if I''ll... be able to..." she stammers.'
 			'"Well, there''s a first time for everything," Lazar says.'
 			if katjaQW['slut'] < 100 or katjaQW['horny'] < 100:
@@ -1033,9 +1039,9 @@ if $ARGS[0] = 'lazar_ivan_dp':
 				act 'Watch Katja''s first DP': gt 'katja_uni_sex', 'lazar_ivan_katja_dp'
 			end
 		else
-			if kajtaQW['dp'] < 5:
+			if katjaQW['dp'] < 5:
 				'"Okay... But please be gentle," Katja says, making the guys look very excited.'
-			elseif kajtaQW['dp'] < 10:
+			elseif katjaQW['dp'] < 10:
 				'"Okay. Let''s do it," she says, making the guys look very excited.'
 			else
 				'"What are you waiting for? I need both my holes stuffed right now!" Katja says, making the guys almost lose their minds in excitement.'
@@ -1048,12 +1054,12 @@ end
 if $ARGS[0] = 'lazar_ivan_katja_dp':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some11.jpg"></center>'
 	'Ivan removes his dick from your ass and you get off Lazar. You then take hold of Lazar''s dick and tell Katja to get on it.'
-	if kajtaQW['dp'] = 0:
+	if katjaQW['dp'] = 0:
 		katjaQW['slut'] += 5
 		'She does so after a little hesitation, '+iif(npc_vag['A14'] < dick2, 'still not completely comfortable with a dick his size', 'taking his <<$boydesc2>> cock like it was something she does every day')+'.'
 		'You then'+iif(katjaQW['lube'] = 1, ' start adding more lube to her asshole and ', ' ')+'decide to give Ivan''s cock a good sloppy blowjob to apply more lubrication.'
 		'After a minute of getting his dick ready and Katja comfortable on Lazar''s cock, you guide Ivan''s <<$dick_girth1>> dick into Katja''s'+iif(npc_ass['A14'] < 5, ' tiny', ' '+iif(npc_vag['A14'] < 10, 'somewhat', 'well')+'used')+' asshole.'
-	elseif kajtaQW['dp'] < 5:
+	elseif katjaQW['dp'] < 5:
 		katjaQW['slut'] += 3
 		'She does so with little hesitation '+iif(npc_vag['A14'] < dick2, 'still not completely comfortable with dicks his size', 'taking his <<$boydesc2>> cock as if it were something she does everyday')+'.'
 		'You then'+iif(katjaQW['lube'] = 1, ' start adding more lube to her asshole and ', ' ')+'decide to give Ivan''s cock a good sloppy blowjob to apply more lubrication.'
@@ -1071,16 +1077,16 @@ if $ARGS[0] = 'lazar_ivan_katja_dp':
 	act 'Watch Katja get two cocks at once':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some12.jpg"></center>'
-		'Ivan slowly pushes his cock into Katja''s ass, taking his time to get as much in he can.'+iif(pc_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pc_vag['A14'] < dick2, ' Katja is clearly looking uncomfortable, biting her lips to hide the pain', 'Katja is taking it fine')+'.'
-		if kajtaQW['dp'] = 0:
+		'Ivan slowly pushes his cock into Katja''s ass, taking his time to get as much in he can.'+iif(pcs_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pcs_vag['A14'] < dick2, ' Katja is clearly looking uncomfortable, biting her lips to hide the pain', 'Katja is taking it fine')+'.'
+		if katjaQW['dp'] = 0:
 			'When Ivan finally stops pushing, Katja lets out a sigh. "Whoa, so this is how it feels having a dick in both your ass and pussy," she says, sounding surprised.'
 			'After a moment, Ivan asks if Katja is okay and if they can start to move. She agrees with a slight nod. The guys then start moving and try to coordinate their thrusts to give Katja the most pleasure.'
 		else
-			if pc_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pc_vag['A14'] < dick2:
+			if pcs_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pcs_vag['A14'] < dick2:
 				'When Ivan finally stops pushing, you ask Katja if she is okay. She says she is, though she does not sound convincing, so you signal to Ivan that he should hold.'
 				'After a little while, Katja doesn''t seem to be in pain anymore. Ivan asks if she''s okay and if they can start to move, and she agrees with a slight nod. The guys start moving and try to coordinate their thrusts to give Katja the most pleasure.'
 			else
-				'When Ivan stops pushing, he waits a little until Katja '+iif(kajtaQW['dp'] < 5, 'tells them to start moving.', 'yells in frustration, "Fuck me! Use those cocks!"')+' Then the guys start to moving and they try to coordinate their thrusts to give Katja the most pleasure.'
+				'When Ivan stops pushing, he waits a little until Katja '+iif(katjaQW['dp'] < 5, 'tells them to start moving.', 'yells in frustration, "Fuck me! Use those cocks!"')+' Then the guys start to moving and they try to coordinate their thrusts to give Katja the most pleasure.'
 			end
 		end
 		if npc_vag['A14'] < dick2: npc_vag['A14'] += 1
@@ -1092,10 +1098,10 @@ if $ARGS[0] = 'lazar_ivan_katja_dp':
 		act 'Watch Katja get both holes plowed at the same time':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/sex/lazar_ivan_katja_uni_4some13.jpg"></center>'
-			'The guys begin to pick up pace and before long, they are plowing both of Katja''s holes. '+iif( pc_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pc_vag['A14'] < dick2, 'Katja is clearly feeling a mixture of pain and pleasure, but endures', 'Katja seems to take a lot of pleasure from it, and enjoys')+' the pounding.'
-			'After some minutes with Katja letting out moans of'+iif( pc_ass['A14'] + 4* katjaQW['lube'] < dick1 or 2*pc_vag['A14'] < dick2, ' pain and ', ' ')+'pleasure, Lazar says, "I want some of <<$pcs_nickname>>''s sweet ass!" and the guys stop.'
-			kajtaQW['dp'] += 1
-			if  kajtaQW['ivan_lazar_dp'] = 0: kajtaQW['ivan_lazar_dp'] = 1
+			'The guys begin to pick up pace and before long, they are plowing both of Katja''s holes. '+iif( pcs_ass['A14'] + 4*katjaQW['lube'] < dick1 or 2*pcs_vag['A14'] < dick2, 'Katja is clearly feeling a mixture of pain and pleasure, but endures', 'Katja seems to take a lot of pleasure from it, and enjoys')+' the pounding.'
+			'After some minutes with Katja letting out moans of'+iif( pcs_ass['A14'] + 4* katjaQW['lube'] < dick1 or 2*pcs_vag['A14'] < dick2, ' pain and ', ' ')+'pleasure, Lazar says, "I want some of <<$pcs_nickname>>''s sweet ass!" and the guys stop.'
+			katjaQW['dp'] += 1
+			if  katjaQW['ivan_lazar_dp'] = 0: katjaQW['ivan_lazar_dp'] = 1
 			gs 'arousal', 'foreplay', 3, 'group', 'lesbian'
 			gs 'stat'
 			act 'Back to butt fucking':  gt 'katja_uni_sex', 'lazar_ivan_anal2'
@@ -1122,7 +1128,7 @@ if $ARGS[0] = 'lazar_ivan_anal2':
 			'Lazar cums fast all over Katja''s face. Soon after, Ivan pulls out of you and you and Katja get up and receive his cum all over your faces. To the guys'' amazement, you start licking the cum off each other''s face.'
 			gs 'cum_call', 'mouth', 'A149', 1, 0, 10000, 20
 			gs 'cum_call', 'face', 'A3', 1, 0, 10000, 20
-			cumspclnt = 11
+			cumspclnt = 1
 			gs 'cum_cleanup'
 			katjaQW['slut'] += 2
 			katjaQW['horny'] = 0
@@ -1144,11 +1150,11 @@ if $ARGS[0] = 'lazar_ivan_anal2':
 						katjaQW['Lazar_Ivan_4some'] = 3
 					end
 					'As you walk back towards the campus, Katja is silent and looks a little thoughtful. "So? How was your first time having sex with '+iif(katjaQW['simultanous_boys'] < 2, 'two guys at once', 'both Ivan and Lazar')+'?" you ask.'
-					'"It was great!" she answers. "So exciting!'+iif(kajtaQW['dp'] = 1, ' Trying to have a dick in both my pussy and ass at the same time was quite the experience," she continues.', '"')
+					'"It was great!" she answers. "So exciting!'+iif(katjaQW['dp'] = 1, ' Trying to have a dick in both my pussy and ass at the same time was quite the experience," she continues.', '"')
 					'"It was also nice trying Ivan''s cock'+iif( katjaQW['ivan_anal'] = 1, ' again,', '. He really is an ass man like the rumors said,')+'" Katja says. "This is definitely something we need to repeat."'
 					if katjaQW['ivan_anal'] = 0: katjaQW['ivan_anal'] = 1
 				else
-					if kajtaQW['dp'] = 1:
+					if katjaQW['dp'] = 1:
 						'As you walk back towards the campus, Katja is silent and looks a little thoughtful. "So? How was your first double penetration?" you ask.'
 						'"It was an interesting experience, trying to have a dick in both my pussy and ass at the same time. I think I need to try it again to really know if it''s something I like," Katja answers.'
 					else
@@ -1442,5 +1448,201 @@ if $ARGS[0] =  'after_movie_sex2':
 	end
 end
 
+if $ARGS[0] = 'comming_home_from_date':
+	$loc = 'katja_dorm'
+	$loc_arg = 'start'
+	$menu_loc = 'katja_dorm'
+	$menu_arg = 'start'
+	$locclass = 'livingr'
+	$location_type = 'indoors'
+	CLOSE ALL	
+	menu_off = 1
+	minut += 10
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party1.jpg"></center>'
+	'You walk back to Katja''s dorm room, talking about what you experienced tonight. Katja'+iif(katjaQW['horny'] > 100, ' constantly brings up the more naughty stuff', ' is a little less talkative than usual')+'.'
+	'As she turns the key to her door, '+func('katja_procedural', 'face_color', 'func')
+	'After you go into her room, she sits down and, absentmindedly, starts to gently caress her body.'
+	act 'See what she does':
+		*clr & cla
+		gs 'arousal', 'erotic', 3, 'lesbian'		
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party2.jpg"></center>'
+		'Katja first pulls down the straps of her dress, exposing her nice, round C-cup breasts.'
+		if katjaQW['pantiesQWstage'] >= 5 or (katjaQW['take_of_panties_day'] = daystart and hour > 5) or (katjaQW['take_of_panties_day'] = daystart -1 and hour < 5):
+			'She then hikes up her skirt, exposing her bare pussy.'
+		else
+			'She then hikes up her skirt, exposing her panty-clad pussy, and proceeds to remove her underwear.'		
+		end
+		'She spreads her legs apart before grabbing her breasts and then looks you directly in the eyes, almost like an invitation...'
+		act 'Ignore her for now':
+			*clr & cla
+			gs 'arousal', 'erotic_nudity', 3, 'lesbian'		
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party3.jpg"></center>'
+			'She starts to massage her breasts, before running her left hand down her body to play with her pussy.'
+			act 'Let her play with herself and leave':
+				minut += 2
+				gs 'arousal', 'end'
+				katjaQW['horny'] = 0
+				gs 'npc_relationship', 'modify', 'A14', 'hate'
+				if katjaQW['masturbates'] = 0: katjaQW['masturbates'] = 1
+				gs 'stat'
+				gt 'uni_dorm', 'second_floor'
+			end
+			act 'Crawl up to her': gt 'katja_uni_sex', 'after_date_sex1'			
+		end
+		act 'Crawl up to her': gt 'katja_uni_sex', 'after_date_sex1'
+	end
+end
+
+if $ARGS[0] = 'after_date_sex1':
+	gs 'arousal', 'erotic_nudity', 3, 'lesbian'		
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex1.jpg"></center>'
+	'You get down on your hands and knees and start to slowly crawl towards the redhead, who continues staring you in the eyes with '+iif(katjaQW['couple'] = 1, 'love and desire.', 'passion and lust.')
+	act 'Finger her':
+		*clr & cla
+		gs 'arousal', 'vaginal_finger_give', 3, 'lesbian'
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex2.jpg"></center>'
+		'Katja lies back when you get close enough to touch her. You get between her legs and glide your finger into her very wet pussy.'
+		'She''s still staring into your eyes with '+iif(katjaQW['couple'] = 1, 'longing.', 'anticipation.')
+		act 'Kiss her':
+			*clr & cla
+			gs 'arousal', 'vaginal_finger_give', 3, 'lesbian'
+			gs 'arousal', 'kiss', -3, 'lesbian'
+			gs 'arousal', 'clit_finger_give', -3, 'lesbian'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex3.jpg"></center>'
+			'You lean down and start to make out passionately with Katja while you continue to glide your fingers in and out of her slit and play with her clit.'
+			act 'Lick her':
+				*clr & cla
+				gs 'arousal', 'cuni_give', 3, 'lesbian'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex4.jpg"></center>'
+				'You stop kissing to move down and replace your fingers with your tongue and start to lick her, now extremely wet, pussy to Katja''s loud moans.'
+				act 'Back to fingers and kissing':
+					*clr & cla
+					gs 'arousal', 'vaginal_finger_give', 3, 'lesbian'
+					gs 'arousal', 'kiss', -3, 'lesbian'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex5.jpg"></center>'
+					'After tasting her sweet pussy for a couple of minutes, you slide up behind her and guide your fingers back into her wet slit and start moving them in and out, in an increasingly faster pace.'
+					'Katja moves her one hand to play with her clit and turns her head to you. Her mouth finds yours and your tongues start battling as she gets closer and closer to coming.'
+					act 'Get her off':
+						*clr & cla
+						gs 'arousal', 'vaginal_finger_give', 3, 'lesbian'
+						gs 'stat'
+						katjaQW['horny'] = 0
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex6.jpg"></center>'
+						'Your fingers pump into her at a very fast pace until her mouth lets go of yours and she comes with a scream.'
+						'You slow down your movement while Katja continues to moan loudly, seemingly having several small orgasms before finally just lying there, panting with a satisfied look on her face.'
+						act 'Your turn': gt 'katja_uni_sex', 'after_date_sex2'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'after_date_sex2':
+	minut += 3
+	$orgasm_or = 'no'
+	gs 'arousal', 'vaginal_finger', 3, 'lesbian'
+	gs 'arousal', 'foreplay', -3, 'lesbian'
+	katjaQW['horny'] += rand(0,5)
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex7.jpg"></center>'
+	'After Katja has come down, she whispers, "Your turn now."'
+	'You get up on your knees and take off your dress'+iif($braworntype = 'none', ',', ' and remove your bra,')+' while Katja '+iif($pantyworntype = 'none', 'just admires your body.', 'pulls down your panties.')  
+	'She then licks your left nipple while moving her hand down to your vagina, and starts to push her fingers inside, back and forth.' 
+	act 'Let her guide you':
+		*clr & cla
+		gs 'arousal', 'foreplay', 3, 'lesbian'
+		gs 'arousal', 'vaginal_finger', -2, 'lesbian'
+		katjaQW['horny'] += rand(0,5)
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex8.jpg"></center>'
+		'Katja removes her fingers from your pussy, before gently laying you down on your back, while her mouth is still giving your nipple attention.' 
+		'She slowly kisses her way down your body while her fingers starts playing with your slit again.'
+		act 'Get your pussy eaten':
+			*clr & cla
+			gs 'arousal', 'cuni', 3, 'lesbian'
+			gs 'arousal', 'vaginal_finger', -3, 'lesbian'
+			katjaQW['horny'] += rand(0,5)
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex9.jpg"></center>'
+			'Katja''s mouth reaches your pussy and she gently licks your clit, while her fingers move in and out of your pussy.' 
+			'She slowly increases her speed until her fingers are moving at a fast pace. Meanwhile, she continues to suck on your clit, as if it were the only thing worth doing, bring you closer and closer to an orgasm.'
+			act 'Cum':
+				*clr & cla
+				$orgasm_or = 'yes'
+				gs 'arousal', 'cuni', 3, 'lesbian', 'no_orgasm_msg'
+				katjaQW['horny'] += rand(0,5)
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex10.jpg"></center>'
+				'Katja''s tongue finally makes you reach an orgasm, and you feel an explosion of pleasure overtake you. You let out an almost primal scream while you cum extremely hard.'
+				act 'Relax':
+					*clr & cla
+					if katjaQW['couple'] = 1:
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex11b.jpg"></center>'
+						'You lie there for a while with your eyes closed after the fantastic orgasm you just had. When you finally open your eyes, you see that Katja has crawled on top of you with her face very close to yours.'
+						'She stares into your eyes for several minutes with a look that is full of tenderness and longing, showing her deep love for you.'
+						gs 'arousal', 'erotic_nudity', 3, 'lesbian'
+					else
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/uni/dorm/sex/katja_after_party_sex11a.jpg"></center>'
+						'You lie there for a while with your eyes closed after the fantastic orgasm you just had. When you finally open your eyes, you see that Katja has crawled on top of you with her face very close to yours.'
+						'She then moves in with one deep, passionate kiss.'
+						minut += 1
+						gs 'arousal', 'kiss', 1, 'lesbian'				
+					end
+					gs 'arousal', 'end'
+					katjaQW['horny'] += rand(0,5)
+					gs 'stat'
+					'Katja finally gets up and takes off her dress that is still around her waist like a belt. She changes into her sleepwear while you get dressed.' 
+					if hour < 22 and hour > 7:
+						locat['katja'] = 52
+						locat['katja_rand2'] = daystart
+						locat['katja_save2'] = locat['katja']
+						'"It''s still early," Katja says after looking at her phone. "I think I want to watch a movie before I go to bed. Wanna join me?"' 
+						act 'Watch a movie with Katja':
+							*clr & cla
+							minut += 10
+							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+							'"Sounds good," you reply. "Anything I can help with?"'
+							'"Yes, go to the kitchen to get a bowl of popcorn," she answers.'
+							'You go the to kitchen and prepare the popcorn while Katja finishes setting up the movie. You both sit down on her bed and start watching the film she has selected.'
+							act 'Watch the movie': gt 'katja_dorm', 'watch_movie'
+						end					
+						act 'Don''t watch a movie with Katja':
+							*clr & cla
+							minut += 2						
+							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+							'"I don''t feel like watching a movie right now," you say.'
+							'"Okay. What we just did was still a perfect way to end our evening," Katja replies.'
+							'"See you some other time, '+iif(katjaQW['couple'] = 1, 'my love', '<<$pcs_nickname>>')+'," she says before'+iif(katjaQW['couple'] = 1, ' she gives you a quick kiss, and ', ' ')+'starts to set up her computer for a movie.' 
+							act 'Leave her room': minut += 2 & gt 'uni_dorm', 'second_floor'
+						end
+					else
+						locat['katja']  = 20
+						if hour < 8:
+							locat['katja_rand2'] = daystart-1
+						else
+							locat['katja_rand2'] = daystart
+						end
+						locat['katja_save2'] = locat['katja']					
+						'"What we just did was still a perfect way to end our evening," Katja says.'
+						'"Yes, it was," you agree.'
+						'"Now I''m off to bed," Katja continues.'
+						'"See you some other time, '+iif(katjaQW['couple'] = 1, 'my love', '<<$pcs_nickname>>')+'," she says before'+iif(katjaQW['couple'] = 1, ' she gives you a quick kiss, and ', ' ')+'starts to set up her computer for a movie.' 
+						act 'Leave her room': minut += 2 & gt 'uni_dorm', 'second_floor'
+					end
+				end
+			end
+		end
+	end
+end
+
 --- katja_uni_sex ---------------------------------