Merge branch 'master' of https://git.tfgames.site/Kevin_Smarts/glife

glife.qproj

@@ -686,12 +686,15 @@
 		<Location name="sex_ev_cowgirl"/>
 		<Location name="sex_ev_cum"/>
 		<Location name="sex_ev_doggy"/>
+		<Location name="sex_ev_events"/>
 		<Location name="sex_ev_foreplay"/>
 		<Location name="sex_ev_foreplay_desc"/>
 		<Location name="sex_ev_miss"/>
+		<Location name="sex_ev_wakeup"/>
 		<Location name="sex_ev_morning"/>
 		<Location name="sex_ev_pillow_talk"/>
 		<Location name="sex_ev_pillow_talk2"/>
+		<Location name="sex_ev_boy_pillow_talk"/>
 		<Location name="sex_ev_favorite_part"/>
 		<Location name="sex_ev_work_talk1"/>
 		<Location name="sex_ev_sex"/>
@@ -700,6 +703,7 @@
 		<Location name="sex_ev_stats"/>
 		<Location name="sex_ev_talk"/>
 		<Location name="sex_ev_reactions"/>
+		<Location name="sex_ev_reactions_creampie"/>
 		<Location name="sex_ev_virgin"/>
 		<Location name="sex_ev_leave"/>
 		<Location name="sex_ev_hookup_leave"/>

locations/BMloc.qsrc

@@ -8,6 +8,7 @@ act 'Dance':
 	*clr & cla
 	gs 'stat'
 	gs 'boystat', $bmNane[Tboynum]
+	$hookupboy = $bmNane[Tboynum]
 	$npc_usedname[$npclastcalled] = $npc_nickname[$npclastcalled]
 
 	if bmFrend[Tboynum] = 0:

locations/Cum_Manage.qsrc

@@ -1003,6 +1003,25 @@ if $ARGS[0] = 'cum_stat_display':
 	cum_loc['tits'] = cumloc[15]
 	cum_loc['hair'] = cumloc[16]
 	cum_loc['condom_in_pussy'] = cumloc[17]
+	
+	cum_vol['vagina'] = cumvol[0]
+	cum_vol['labia'] = cumvol[1]
+	cum_vol['panty_front'] = cumvol[2]
+	cum_vol['anus'] = cumvol[3]
+	cum_vol['butt'] = cumvol[4]
+	cum_vol['panty_back'] = cumvol[5]
+	cum_vol['clothes_groin'] = cumvol[6]
+	cum_vol['clothes'] = cumvol[7]
+	cum_vol['back'] = cumvol[8]
+	cum_vol['legs'] = cumvol[9]
+	cum_vol['arms'] = cumvol[10]
+	cum_vol['face'] = cumvol[11]
+	cum_vol['mouth'] = cumvol[12]
+	cum_vol['hands'] = cumvol[13]
+	cum_vol['stomach'] = cumvol[14]
+	cum_vol['tits'] = cumvol[15]
+	cum_vol['hair'] = cumvol[16]
+	cum_vol['condom_in_pussy'] = cumvol[17]
 end
 
 --- Cum_Manage ---------------------------------

locations/body.qsrc

@@ -124,7 +124,8 @@ if $ARGS[0] = 'DailyUpdate':
 	end
 
 	! Leg and pubes hair growth
-	if lashair ! 1:
+	! disabled for testing hourly growth instead
+	!!{if lashair ! 1:
 		pcs_leghair += 1
 		!!Pubic hair growth at 1/2 per night
 		if pcs_pubes['growth'] > 1:
@@ -132,7 +133,8 @@ if $ARGS[0] = 'DailyUpdate':
 			pcs_pubes += 1
 		end
 		pcs_pubes['growth'] += 1
-	end
+		gs 'body_desc', 'pube_desc_update'
+	end}
 	
 	if age < 18 and rand (0,2) = 0 and pcs_leghair > 0: pcs_leghair -= 1
 

locations/body_desc.qsrc

@@ -856,24 +856,30 @@ end
 
 if $ARGS[0] = 'pubes':
 	if lashair = 0:
+		$pube_style['shape'] = ''
 		if pcs_pubes <= 3:
 			lobkoef = 3
 			$pcs_pubes = 'You have a smoothly <a href="exec:view''<<FUNC(''$pube_image'')>>''">shaved pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'silky', 'hairless', 'smooth-shaven', 'freshly-shaven')
 			$pc_descWordy['pubes'] = 'silky, freshly-shaven'
+			$pube_style['word'] = 'shaved'
 		elseif pcs_pubes <= 10:
 			lobkoef = 0
 			$pcs_pubes = 'You have stubble growing around your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'stubbly', 'scratchy', 'roughly-stubbled')
 			$pc_descWordy['pubes'] = 'scratchy, roughly-stubbled'
+			$pube_style['word'] = 'stubble'
 		elseif pcs_pubes <= 15:
 			lobkoef = 0
 			$pcs_pubes = 'You have a tidy patch of hair growing above your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'almost bare', 'barely-haired', 'well-kept')
 			$pc_descWordy['pubes'] = 'scratchy, roughly-stubbled'
+			$pube_style['word'] = 'patch'
 		elseif pcs_pubes <= 25:
 			lobkoef = 0
+			$pube_style['word'] = 'trimmed'
 			if pubestyle = 9:
+				$pube_style['shape'] = 'bush'
 				$pcs_pubes = 'You have neatly trimmed section of hair around your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 			elseif pubestyle = 12:
 				$pcs_pubes = 'You have cute little patch of bush at the top of your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
@@ -882,7 +888,27 @@ if $ARGS[0] = 'pubes':
 			elseif pubestyle = 14:
 				$pcs_pubes = 'You have neatly trimmed rectangle of hair just above your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 			else
-				$pcs_pubes = 'You have a bushy but well-maintained mat of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
+				if pubestyle = 2:
+					$pube_style['shape'] = 'V'
+					$pcs_pubes = 'You have a cleanly trimmed mat of pubic hair in the <a href="exec:view''<<FUNC(''$pube_image'')>>''">shape of a V</a>. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 3:
+					$pube_style['shape'] = 'triangle'
+					$pcs_pubes = 'You have a cleanly trimmed mat of pubic hair in the <a href="exec:view''<<FUNC(''$pube_image'')>>''">shape of a triangle</a>. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 4:
+					$pube_style['shape'] = 'landing_strip'
+					$pcs_pubes = 'You have a cleanly trimmed <a href="exec:view''<<FUNC(''$pube_image'')>>''">landing strip</a> between your legs. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 5:
+					$pube_style['shape'] = 'heart'
+					$pcs_pubes = 'You have a cleanly trimmed mat of pubic hair in the <a href="exec:view''<<FUNC(''$pube_image'')>>''">shape of a heart</a>. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 6:
+					$pube_style['shape'] = 'flame'
+					$pcs_pubes = 'You have a cleanly trimmed mat of pubic hair in the <a href="exec:view''<<FUNC(''$pube_image'')>>''">shape of a flame</a>. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 7:
+					$pube_style['shape'] = 'cross'
+					$pcs_pubes = 'You have a cleanly trimmed mat of pubic hair in the <a href="exec:view''<<FUNC(''$pube_image'')>>''">shape of a cross</a>. <<$pirspiz>><br><<$clitsize>>'
+				elseif pubestyle = 8:
+					$pcs_pubes = 'You have a close-cropped lawn of pubic hair covering your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
+				end
 			end
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'wispy-haired', 'lightly-furred', 'trimmed', 'well-maintained')
 			$pc_descWordy['pubes'] = 'trimmed, well-kept'
@@ -891,16 +917,63 @@ if $ARGS[0] = 'pubes':
 			$pcs_pubes = 'You have a bushy but well-maintained mat of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'furred', 'bushy', 'partially-maintained')
 			$pc_descWordy['pubes'] = 'bushy, thick'
+			$pube_style['word'] = 'bush'
 		elseif pcs_pubes >= 40:
 			lobkoef = 0
 			$pcs_pubes = 'You have a wild and unkempt jungle of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
 			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'thickly-furred', 'very hairy', 'ill-maintained')
 			$pc_descWordy['pubes'] = 'hairy, wild-maned'
+			$pube_style['word'] = 'untrimmed'
 		end
 	elseif lashair = 1:
 		$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'hairless', 'smooth', 'bald', 'silky-smooth')
 		$pc_descWordy['pubes'] = 'eternally silky-smooth'
 		$pcs_pubes = 'You have a smooth, <a href="exec:view''<<FUNC(''$pube_image'')>>''">bald pussy</a>. <<$pirspiz>><br><<$clitsize>>'
+		$pube_style['word'] = 'shaved'
+	end
+	gs 'body_desc', 'pube_desc_update'
+end
+
+
+if $ARGS[0] = 'pube_desc_update':
+	if pcs_pubes <= 3:
+		if lashair = 1:
+			$pube_desc = 'lasered'
+		else
+			$pube_desc = 'shaved'
+		end
+	elseif pcs_pubes <= 10:
+		$pube_desc = 'stubbly'
+	elseif pcs_pubes <= 15:
+		$pube_desc = 'mini bush'
+	elseif pcs_pubes <= 25:
+		if pubestyle = 2:
+			$pube_desc = 'little V'
+		elseif pubestyle = 3:
+			$pube_desc = 'little triangle'
+		elseif pubestyle = 4:
+			$pube_desc = 'landing strip'
+		elseif pubestyle = 5:
+			$pube_desc = 'heart shape'
+		elseif pubestyle = 6:
+			$pube_desc = 'fire shape'
+		elseif pubestyle = 7:
+			$pube_desc = 'cross shape'
+		elseif pubestyle = 8:
+			$pube_desc = 'trimmed'
+		elseif pubestyle = 9:
+			$pube_desc = 'small bush'
+		elseif pubestyle = 12:
+			$pube_desc = 'mini bush'
+		elseif pubestyle = 13:
+			$pube_desc = 'strip of bush'
+		elseif pubestyle = 14:
+			$pube_desc = 'rectangle'
+		end
+	elseif pcs_pubes <= 30:
+		$pube_desc = 'full bush'
+	elseif pcs_pubes <= 40:
+		$pube_desc = 'wild bush'
 	end
 end
 

locations/booty_call.qsrc

@@ -17,10 +17,21 @@ if $ARGS[0] = 'scheduler2':
 !!		temporary removal of npc_rel requirement until boy initiated breakups can occur
 
 !!		if (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and (npc_big_fight[$FuckBuddy[i]] < daystart - 7 and daystart > 7):
-		if npc_booty_call_date[$boy] ! daystart and (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
-			gs 'booty_call', 'scheduler3'
+		if $npc_rel_type[$FuckBuddy[i]] = 'sugar_daddy':
+			if npc_sugar_daddy_timer[$FuckBuddy[i]] - (npc_rel[$FuckBuddy[i]] / 10) > daystart:
+				npc_no_booty_call[$FuckBuddy[i]] = daystart
+				
+			elseif npc_booty_call_date[$FuckBuddy[i]] ! daystart and (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call_date[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
+				sugar_daddy_call[$FuckBuddy[i]] = 1
+				gs 'booty_call', 'scheduler3'
+				
+			end
 		else
-			npc_no_booty_call[$FuckBuddy[i]] = daystart
+			if npc_booty_call_date[$FuckBuddy[i]] ! daystart and (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call_date[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
+				gs 'booty_call', 'scheduler3'
+			else
+				npc_no_booty_call[$FuckBuddy[i]] = daystart
+			end
 		end
 		i += 1
 		gs 'booty_call', 'scheduler2'
@@ -53,7 +64,8 @@ end
 !!				booty_call_time[$FuckBuddy[i]] = 600 + rand(0,720)
 
 if $ARGS[0] = 'set_booty_call_date':
-	if sex_ev['invite_today'] = 1:
+	sex_ev['set_date'] = 1
+	if sex_ev['invite_today'] = 1 or hour < 5:
 		npc_booty_call_date[$boy] = daystart
 	elseif sex_ev['invite_tomorrow'] = 1:
 		npc_booty_call_date[$boy] = daystart + 1
@@ -61,6 +73,7 @@ if $ARGS[0] = 'set_booty_call_date':
 	if npc_booty_call_time[$boy] = 0:
 		npc_booty_call_time[$boy] = npc_start_free_time[$boy]
 	end
+	if npc_rel_type[$boy] = 'sugar_daddy': sugar_daddy_call[$boy] = 1
 end
 
 if $ARGS[0] = 'block_booty_calls':
@@ -77,7 +90,7 @@ if $ARGS[0] = 'SMS raiser':
 	i = 0
 	:booty_call_sms_raiser_loop
 	if i < arrsize('$FuckBuddy'):
-		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_last_booty_call[$boy] ! daystart:
+		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_last_booty_call[$FuckBuddy[i]] ! daystart:
 			gs 'booty_call_sms', 'start', $FuckBuddy[i]
 			gs 'booty_call_sms', 'Add SMS', $FuckBuddy[i]
 			booty_call_time[$FuckBuddy[i]] = 2399
@@ -103,6 +116,21 @@ if $ARGS[0] = 'home_links':
 	if i < arrsize('$Fuckbuddy') : jump 'loopBC_homes'
 end
 
+if $ARGS[0] = 'hotel_links':
+	i=0
+	*nl
+	:loopBC_hotel
+	if $booty_call_hotel[$Fuckbuddy[i]] = $region and booty_call_invite[$FuckBuddy[i]] = daystart:
+		dynamic(' ''<a href="exec: minut += 2 & gt ''''sex_ev_start'''',''''initiate_pre'''',''''<<$Fuckbuddy[i]>>'''' "><<$npc_firstname[$Fuckbuddy[i]]>></a> booked a hotel room to meet you in.'' ')
+		!! ''''
+	end
+	
+	i +=1
+	if i < arrsize('$Fuckbuddy') : jump 'loopBC_hotel'
+end
+
+!! booty_call_invite['B0']
+
 if $ARGS[0] = 'text':
 	!! boy code?
 	!! IMAGE HERE
@@ -405,6 +433,19 @@ if $ARGS[0] = 'npc_stat_update':
 				npc_end_free_time[$FuckBuddy[i]] = 23
 			end
 		elseif npc_finance[$FuckBuddy[i]] = 2:
+			if rand(1,2) = 1:
+				npc_start_free_time[$npclastgenerated] = 8
+				npc_end_free_time[$npclastgenerated] = 12
+				
+				npc_work_start[$npclastgenerated] = 13
+				npc_work_end[$npclastgenerated] = 21
+			else
+				npc_start_free_time[$npclastgenerated] = 18
+				npc_end_free_time[$npclastgenerated] = 22
+				
+				npc_work_start[$npclastgenerated] = 9
+				npc_work_end[$npclastgenerated] = 17
+			end
 			npc_apt_type[$FuckBuddy[i]] = 5
 			!!npc_apt_type[$npclastgenerated] = rand(5,6)
 			!! apt_type 6 is disabled until pictures are added
@@ -415,4 +456,19 @@ if $ARGS[0] = 'npc_stat_update':
 	end
 end
 
+!! ------------ Legacy Backup ------------------------
+
+if $ARGS[0] = 'draw':
+	! this routine should invoke a the booty call sms from random friend in $lover list
+	! but I cannnot randomize the time because the probability is 100 % now
+	! I suppose that the routine will be modified later to take in account the lovers preferences
+	if booty_call['A0'] ! daystart :
+		$lover_drawn = $fuckbuddy[rand(0,arrsize('$fuckbuddy')-1)]
+		gs 'booty_call_sms', 'start',$lover_drawn
+		gs 'booty_call_sms', 'Add SMS', $lover_drawn
+		booty_call['A0'] = daystart
+	end
+end
+
+
 --- booty_call ---------------------------------

locations/booty_call_sms.qsrc

@@ -5,88 +5,119 @@ $SMSBkM = '</font></td><td width=10%></td></tr></table>'
 $SMSFrF = '<table width=80%><tr><td width=10%></td><td collspan=2 bgcolor=pink><font color=black>'
 $SMSBkF = '</font></td></tr></table>'
 
-if $ARGS[0] = 'start':	
+if $ARGS[0] = 'start':
+	$booty_call_daily_id[i] = $FuckBuddy[i]
 !!	if npc_booty_call[$ARGS[1]] = daystart:
-!!		gs 'booty_call_sms', 'pre_planned_booty_call'
-!!	else
-		$VM['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')
-		$VF[$ARGS[1]+'0'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')
-
-		$VM['1'] = 'i was thinking about you today'
-		$VF['1a'] = 'what were you thinking about?'
-
-		if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
-			$VM['2a'] = 'your mouth around my cock'
-		elseif npc_know_virgin[$ARGS[1]] ! 1:
-			if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
-				$VM['2a'] = 'your pussy filled with my cum'
-			elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
-				$VM['2a'] = 'fucking you bowlegged'
-			elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
-				$VM['2a'] = 'blowing my load all over your pretty face'
-			elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
-				$VM['2a'] = 'watching you swallow my cum'
-			elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
-				$VM['2a'] = 'my cum all over your tits'
-			elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
-				$VM['2a'] = 'pounding you on all fours'
-			elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
-				$VM['2a'] = 'you riding my cock like crazy'			
-			else
-				if rand(0,1) = 1:
-					$VM['2a'] = 'you naked on my bed'
-				else
-					$VM['2a'] = 'want to come over and have some fun?'
-				end
-			end
-		end
+!!		gs 'booty_call_sms', 'pre_planned_booty_call', $FuckBuddy[i]
+!!	elseif sugar_daddy_call[$FuckBuddy[i]] = 1:
+	if sugar_daddy_call[$FuckBuddy[i]] = 1:
+		gs 'booty_call_sms', 'sugar_daddy_booty_call', $FuckBuddy[i]
+	elseif npc_std_test[$FuckBuddy[i]] = 1:
+		gs 'booty_call_sms', 'std_free', $FuckBuddy[i]
+!!	elseif npc_booty_call[$FuckBuddy[i]] = daystart:
+!!		gs 'booty_call_sms', 'pre_planned_booty_call', $FuckBuddy[i]
+	else
+		gs 'booty_call_sms', 'default_booty_call', $FuckBuddy[i]
+	end
+end
 
-		$VF['1b'] = 'me too'
-		
-		if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
-			$VM['2a'] = 'i want to feel your mouth around my cock'
-		elseif npc_know_virgin[$ARGS[1]] ! 1:
-			if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
-				$VM['2a'] = 'i want to pump you full of cum'
-			elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
-				$VM['2b'] = 'come over i want to hear you screaming my name'
-			elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
-				$VM['2a'] = 'i want to cum all over your face'
-			elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
-				$VM['2a'] = 'i want to watch you swallow my cum'
-			elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
-				$VM['2a'] = 'let me glaze your tits with my cum'
-			elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
-				$VM['2a'] = 'i want to pound you on all fours'
-			elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
-				$VM['2a'] = 'i want you to ride my cock like theres no tomorrow'			
+if $ARGS[0] = 'default_booty_call':	
+	!! boy
+	$VM['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')
+	
+	!! player
+	$VF[$ARGS[1]+'0'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')
+	
+	!! boy
+	$VM['1'] = 'ive been thinking about you'
+	
+	!! player response 1 option 1
+	$VF['1a'] = 'what were you thinking about?'
+	
+	!! boy response 1
+	if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
+		$VM['2a'] = 'your mouth around my cock'
+	elseif npc_know_virgin[$ARGS[1]] ! 1:
+		if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
+			$VM['2a'] = 'your pussy filled with my cum'
+		elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
+			$VM['2a'] = 'fucking you bowlegged'
+		elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
+			$VM['2a'] = 'your pretty face covered in my cum'
+		elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
+			$VM['2a'] = 'watching you swallow my cum'
+		elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
+			$VM['2a'] = 'my cum all over your tits'
+		elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
+			$VM['2a'] = 'pounding you on all fours'
+		elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
+			$VM['2a'] = 'you riding my cock like crazy'			
+		else
+			if rand(0,1) = 1:
+				$VM['2a'] = 'you naked on my bed'
 			else
-				if rand(0,1) = 1:
-					$VM['2b'] = 'lets fuck like bunnies today'
-				else
-					$VM['2b'] = 'come over lets have some fun today'
-				end
+				$VM['2a'] = 'want to come over and have some fun?'
 			end
 		end
-
-		$VF['2a'] = 'sorry, i cant. i have stuff to do'
-		$VM['3a'] = 'shit, maybe next time then'
-
-		$VF['2b'] = 'ill come right now ;)'
-		if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
-			$VM['3b'] = 'im already hard'
-		elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
+	end
+	
+	!! player response 1 option 2
+	$VF['1b'] = 'me too'
+	
+	!! boy response 2
+	if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
+		$VM['2a'] = 'i want to feel your mouth around my cock'
+	elseif npc_know_virgin[$ARGS[1]] ! 1:
+		if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
+			$VM['2a'] = 'i want to pump you full of cum'
+		elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
+			$VM['2b'] = 'come over i want to hear you screaming my name'
+		elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
+			$VM['2a'] = 'i want to cum all over your face'
+		elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
+			$VM['2a'] = 'i want to watch you swallow my cum'
+		elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
+			$VM['2a'] = 'let me glaze your tits with my cum'
+		elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
+			$VM['2a'] = 'i want to pound you on all fours'
+		elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
+			$VM['2a'] = 'i want you to ride my cock like theres no tomorrow'			
+		else
 			if rand(0,1) = 1:
-				$VM['3b'] = 'in the street?? damn! keep it in your pants till you get here!'
+				$VM['2b'] = 'lets fuck like bunnies today'
 			else
-				$VM['3b'] = 'as long as you make me cum later'
+				$VM['2b'] = 'come over lets have some fun today'
 			end
-		elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
-			$VM['3b'] = 'phrasing'
+		end
+	end
+	
+	!! player response 2 option 1
+	if hour < 21:
+		$VF['2a'] = 'sorry, i cant. i have stuff to do'
+	else
+		$VF['2a'] = 'its late. text me sooner if you want me to come over.'
+	end
+	
+	!! boy response 2 option 1
+	$VM['3a'] = 'shit, maybe next time then'
+	
+	!! player response 2 option 2
+	$VF['2b'] = 'ill come right now ;)'
+	
+	!! boy response 2 option 2
+	if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
+		$VM['3b'] = 'im already hard'
+	elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
+		if rand(0,1) = 1:
+			$VM['3b'] = 'in the street?? damn! keep it in your pants till you get here!'
 		else
-			$VM['3b'] = 'cant wait'
+			$VM['3b'] = 'as long as you make me cum later'
 		end
-!!	end
+	elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
+		$VM['3b'] = 'phrasing'
+	else
+		$VM['3b'] = 'cant wait'
+	end
 end
 
 if $ARGS[0] = 'pre_planned_booty_call':	
@@ -126,6 +157,117 @@ if $ARGS[0] = 'pre_planned_booty_call':
 	end
 end
 
+if $ARGS[0] = 'std_free':	
+	!! boy
+	$VM['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')
+	
+	!! player
+	$VF[$ARGS[1]+'0'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')
+	
+	!! boy
+	$VM['1'] = 'got some good news'
+	
+	!! player response 1 option 1
+	$VF['1a'] = 'oh?'
+	
+	!! boy response 1
+	$VM['2a'] = 'my std test came back clean. why dont we celebrate tog'
+	
+	!! player response 1 option 2
+	$VF['1b'] = 'what is it?'
+	
+	!! boy response 2
+	$VM['2a'] = 'my std test came back clean'
+	
+	!! player response 2 option 1
+	if hour < 21:
+		$VF['2a'] = 'sorry, i cant. i have stuff to do'
+	else
+		$VF['2a'] = 'its late. text me sooner if you want me to come over.'
+	end
+	
+	!! boy response 2 option 1
+	$VM['3a'] = 'shit, maybe next time then'
+	
+	!! player response 2 option 2
+	$VF['2b'] = 'ill come right now ;)'
+	
+	!! boy response 2 option 2
+	if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
+		$VM['3b'] = 'im already hard'
+	elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
+		if rand(0,1) = 1:
+			$VM['3b'] = 'in the street?? damn! keep it in your pants till you get here!'
+		else
+			$VM['3b'] = 'as long as you make me cum later'
+		end
+	elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
+		$VM['3b'] = 'phrasing'
+	else
+		$VM['3b'] = 'cant wait'
+	end
+end
+
+
+if $ARGS[0] = 'sugar_daddy_booty_call':	
+	!! boy
+	$VM['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')
+	
+	!! player
+	$VF[$ARGS[1]+'0'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')
+	
+	!! boy
+	$VM['1'] = 'ive been thinking about you'
+	
+	!! player response 1 option 1
+	$VF['1a'] = 'what were you thinking about?'
+	
+	!! boy response 1 option 1
+	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$ARGS[1]] >= 3:
+		$VM['2a'] = 'i booked a hotel room in Pav. why dont you come by?'
+	else
+		$VM['2a'] = 'i want to see you. why dont you come by my apartment?'
+	end
+	
+	!! player response 1 option 2
+	$VF['1b'] = 'me too'
+	
+	!! boy response 2 option 2
+	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$ARGS[1]] >= 3:
+		$VM['2a'] = 'i booked a hotel room in Pav. why dont you come by?'
+	else
+		$VM['2a'] = 'i want to see you. why dont you come by my apartment?'
+	end
+	
+	!! player response 2 option 1
+	if hour < 21:
+		$VF['2a'] = 'sorry, i cant. i have stuff to do'
+	else
+		$VF['2a'] = 'its late. text me sooner if you want me to come over.'
+	end
+	
+	!! boy response 2 option 1
+	$VM['3a'] = 'damn scheduling conflicts'
+	
+	!! player response 2 option 2
+	$VF['2b'] = 'ill come right now ;)'
+	
+	!! boy response 2 option 2
+	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$ARGS[1]] >= 3:
+		$VM['3b'] = 'room <<rand(1,3)>><<rand(10,19)>>'
+	else
+		if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
+			$VM['3b'] = 'im already hard'
+		elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
+			$VM['3b'] = 'as long as you make me cum later'
+		elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
+			$VM['3b'] = 'phrasing'
+		else
+			$VM['3b'] = 'cant wait'
+		end
+	end
+end
+
 if $ARGS[0] = 'Add SMS':
 	$trialSMS  = $SMSFrM+$VM['0']+$SMSBkM
 	$trialSMS += '<table><tr><th> Reply</th></tr>'
@@ -182,6 +324,7 @@ if $ARGS[0] = 'V1b':
 end
 
 if $ARGS[0] = 'V2an':
+	!! booty call is declined
 	$trialSMS   = $SMSFrM+$VM['0']+$SMSBkM
 	$trialSMS += $SMSFrF+$VF[$SMSContact[ARGS[1]]+'0']+$SMSBkF
 	$trialSMS += $SMSFrM+$VM['1']+$SMSBkM
@@ -190,6 +333,10 @@ if $ARGS[0] = 'V2an':
 	$trialSMS += $SMSFrF+$VF['2a']+$SMSBkF
 	$SMSMessage[ARGS[1]] = $trialSMS
 	gs 'telefon', 'show_sms', ARGS[1]
+	if sugar_daddy_call[$SMSContact[ARGS[1]]] = 1:
+		npc_rel[$SMSContact[ARGS[1]]] -= 2
+		sugar_daddy_call[$SMSContact[ARGS[1]]] = 0
+	end
 	wait 500
 	$trialSMS += $SMSFrM+$VM['3a']+$SMSBkM
 	$SMSMessage[ARGS[1]] = $trialSMS
@@ -197,6 +344,7 @@ if $ARGS[0] = 'V2an':
 end
 
 if $ARGS[0] = 'V2ap':
+	!! booty call is accepted
 	$trialSMS  = $SMSFrM+$VM['0']+$SMSBkM
 	$trialSMS += $SMSFrF+$VF[$SMSContact[ARGS[1]]+'0']+$SMSBkF
 	$trialSMS += $SMSFrM+$VM['1']+$SMSBkM
@@ -210,9 +358,11 @@ if $ARGS[0] = 'V2ap':
 	$SMSMessage[ARGS[1]] = $trialSMS
 	gs 'telefon', 'show_sms', ARGS[1]
 	booty_call_invite[$SMSContact[ARGS[1]]] = daystart
+	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$SMSContact[ARGS[1]]] >= 3: $booty_call_hotel[$SMSContact[ARGS[1]]] = 'pav'
 end
 
 if $ARGS[0] = 'V2bn':
+	!! booty call is declined
 	$trialSMS  = $SMSFrM+$VM['0']+$SMSBkM
 	$trialSMS += $SMSFrF+$VF[$SMSContact[ARGS[1]]+'0']+$SMSBkF
 	$trialSMS += $SMSFrM+$VM['1']+$SMSBkM
@@ -221,6 +371,10 @@ if $ARGS[0] = 'V2bn':
 	$trialSMS += $SMSFrF+$VF['2a']+$SMSBkF
 	$SMSMessage[ARGS[1]] = $trialSMS
 	gs 'telefon', 'show_sms', ARGS[1]
+	if sugar_daddy_call[$SMSContact[ARGS[1]]] = 1:
+		npc_rel[$SMSContact[ARGS[1]]] -= 2
+		sugar_daddy_call[$SMSContact[ARGS[1]]] = 0
+	end
 	wait 500
 	$trialSMS += $SMSFrM+$VM['3a']+$SMSBkM
 	$SMSMessage[ARGS[1]] = $trialSMS
@@ -228,6 +382,7 @@ if $ARGS[0] = 'V2bn':
 end
 
 if $ARGS[0] = 'V2bp':
+	!! booty call is accepted
 	$trialSMS  = $SMSFrM+$VM['0']+$SMSBkM
 	$trialSMS += $SMSFrF+$VF[$SMSContact[ARGS[1]]+'0']+$SMSBkF
 	$trialSMS += $SMSFrM+$VM['1']+$SMSBkM
@@ -241,6 +396,7 @@ if $ARGS[0] = 'V2bp':
 	$SMSMessage[ARGS[1]] = $trialSMS
 	gs 'telefon', 'show_sms', ARGS[1]
 	booty_call_invite[$SMSContact[ARGS[1]]] = daystart
+	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$SMSContact[ARGS[1]]] >= 3: $booty_call_hotel[$SMSContact[ARGS[1]]] = 'pav'
 !!	killvar '$VF'
 !!	killvar '$MF'
 end

locations/cikl.qsrc

@@ -357,6 +357,11 @@ if prezikmsg = 2: prezikmsg = 3
 
 gs 'fertility', 'birth_control'
 
+
+if tabletkiday < daystart - 5:
+	birth_control['using_bc'] = 0
+end
+
 if birth_control['think_safe'] = 1:
 	stat['forgot_bc_pill'] = 0
 elseif pilldaychk < daystart - 1 and pilldaychk > daystart - 5 and pillcon2 > 0:

locations/cum_call.qsrc

@@ -9,7 +9,7 @@
 	'anal' redirects to 'anus' (prevents further errors)
 $ARGS[1] is for the name of the sexual partner
 ARGS[2] is a for knowing the partner. Defaults to 0. If this is not set to 1 the status window message will mention "some guy" instead of his name.
-	0 - unknown sex partner (his name may be known, but she newer saw him before, and likely won't ever again, or she won't remeber it)
+	0 - unknown sex partner (his name may be known, but she never saw him before, and likely won't ever again, or she won't remember it)
 	1 - sex partner is known for MC (classmate, neighbor, someone she new beforehand)
 	2 - MC is unaware of the act (like unconscious sex)
 ARGS[3] is contraception, if left blank it will use the default, if you want to force a particular type:

locations/din_bad.qsrc

@@ -440,6 +440,14 @@ $d_tabletkied = {
 	end
 	'<a href="exec:dynamic $d_tabletkieda, 4">Examine the birth control pills.</a>'
 	if tabletkioddk = 1: '<a href="exec:dynamic $d_tabletkieda, 5">Dump the strange pills.</a>'
+	*nl
+	if birth_control['placebo_skip'] = 0:
+		'Skip your <a href="exec:*clr & birth_control[''placebo_skip''] = 1 & dynamic $d_tabletkied">placebo pills.</a>'
+		'(Will cause you to no longer menstruate)'
+	else
+		'Start taking your <a href="exec:*clr & birth_control[''placebo_skip''] = 0 & dynamic $d_tabletkied">placebo pills</a> again.'
+		'(Will cause periods to start back up again in your menstrual cycle)'
+	end
 	act 'Return':gs 'din_bad', 'd_bag'
 	'</td></tr></table></center>'
 }
@@ -774,31 +782,43 @@ $d_cycreport_update = {
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Your implant is not yet effective.</font>'				
 				elseif pillcon2 > 0 and birth_control['think_safe'] = 1:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>You are currently on the birth control pill.</font>'
-				elseif pillcon2 > 0 and ((FocH > (Foch_Max - 96)) or ovulate > 0) and birth_control['think_safe'] = 0:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=red>It is currently a dangerous day.</font>'
-				elseif pillcon2 > 0 and birth_control['think_safe'] = 0:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective.'
+				elseif pillcon2 > 0 and ((FocH > (Foch_Max - 96)) or ovulate > 0) and birth_control['think_safe'] = 0 and birth_control['using_bc'] > 0:
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=red>It is currently your fertile stage and a dangerous day to have unprotected sex.</font>'
+				elseif pillcon2 > 0 and birth_control['think_safe'] = 0 and birth_control['using_bc'] > 0:
+					if stat['safe_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=green>Today is a safe day to have unprotected sex.</font>'
+					elseif birth_control['think_safe'] ! 1 and stat['probably_safe_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=blue>Today is <i>probably</i> a safe day to have unprotected sex.</font>'
+					elseif birth_control['think_safe'] ! 1 and stat['dangerous_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=red>Today is a dangerous day to have unprotected sex.</font>'
+					end
 				elseif daystart = tabletkiday:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You have taken the pill but it will be several weeks before it is fully effective.'
+					if stat['safe_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You have taken the pill but it will be several weeks before it is fully effective. <font color=green>Today is a safe day to have unprotected sex.</font>'
+					elseif birth_control['think_safe'] ! 1 and stat['probably_safe_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You have taken the pill but it will be several weeks before it is fully effective. <font color=blue>Today is <i>probably</i> a safe day to have unprotected sex.</font>'
+					elseif birth_control['think_safe'] ! 1 and stat['dangerous_day'] = 1:
+						$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You have taken the pill but it will be several weeks before it is fully effective. <font color=red>Today is a dangerous day to have unprotected sex.</font>'
+					end
 				elseif FocH > (Foch_Max - 96) or ovulate > 0:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>It is currently your fertile stage.</font>'
 				elseif birth_control['implant_status'] = 1:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Your implant stopped working. You need a new one.</font>'
 				elseif birth_control['think_safe'] ! 1 and stat['safe_day'] = 1:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have sex.</font>'
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have unprotected sex.</font>'
 				elseif birth_control['think_safe'] ! 1 and stat['probably_safe_day'] = 1:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=blue>Today is <i>probably</i> a safe day to have sex.</font>'
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=blue>Today is <i>probably</i> a safe day to have unprotected sex.</font>'
 				elseif birth_control['think_safe'] ! 1 and stat['dangerous_day'] = 1:
-					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Today is a dangerous day to have sex.</font>'
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Today is a dangerous day to have unprotected sex.</font>'
 				else
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period.'
 				end
 !!{				if stat['vaginal'] > 0 and  birth_control['think_safe'] ! 1 and stat['safe_day'] = 1:
 					$calendar_method_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have unprotected sex.</font>'
 				elseif stat['vaginal'] > 0 and  birth_control['think_safe'] ! 1 and stat['probably_safe_day'] = 1:
-					$calendar_method_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>You are unlikely to get pregnant if you have sex today.</font>'
+					$calendar_method_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>You are unlikely to get pregnant if you have unprotected sex today.</font>'
 				elseif stat['vaginal'] > 0 and  birth_control['think_safe'] ! 1 and stat['dangerous_day'] = 1:
-					$calendar_method_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have sex.</font>'
+					$calendar_method_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have unprotected sex.</font>'
 				end}
 			end
 		elseif denypreg = 1:
@@ -1057,7 +1077,7 @@ if $ARGS[0] = 'takepill':
 	end
 	!! added empty week to allow menstruation - it take effect only when the pills are taken automatically
 !!	if placebopart <= 0 or tabletkicheck ! 1:
-	if placebopart <= 0:
+	if placebopart <= 0 or birth_control['placebo_skip'] = 1:
 		if ptype = 0:
 			pillsleft[ptype] -= 1
 			pcs_skin += 1

locations/din_van.qsrc

@@ -310,7 +310,7 @@ $SkinCare = {
 }
 
 $brit = {
-	if shave_menu = 1 and mc_inventory['razor'] > 1:
+	if shave_menu = 1 and (mc_inventory['razor'] > 1 or pcs_shave['free_razor'] = 1):
 		if pcs_leghair > 3 or (pubestyle > 0 and pcs_pubes >= shave_trigger):
 			if pcs_leghair > 3 and (pubestyle > 0 and pcs_pubes >= shave_trigger):
 				if daystart < 10 and $start_type[1] = 'tg':
@@ -322,7 +322,7 @@ $brit = {
 					$shave_txt1 = 'With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don''t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?'
 				elseif pubestyle = 1:
 					$shave_act = 'Shave your legs and pussy'
-					if pcs_pubes <= 10:
+					if pcs_pubes > 10:
 						$shave_txt1 = 'You do your legs first before lathering up your crotch and taking a razor to the bush growing there. After a few minutes of shaving, you take a moment to inspect yourself, making sure you got everything.'
 						$shave_txt2 = 'Satisfied there isn''t even a single hair left, you rinse yourself off, enjoying the newfound smoothness of your pussy.'
 					else
@@ -385,47 +385,28 @@ $brit = {
 						'<<$shave_txt2>>'
 						minut += 15
 						pcs_leghair = 0
+						stat['leg_hair_growth_timer'] = totminut
 						pcs_pubes = shave_length
+						stat['pube_growth_timer'] = totminut
 						pcs_horny += 5
-						mc_inventory['razor'] -=  2
+						if pcs_shave['free_razor'] = 1:
+							pcs_shave['free_razor'] = 0
+						else
+							mc_inventory['razor'] -=  2
+						end
 						dynamic $dryOff
 						gs'selfplay','bathtub_dildo_check'
 						gs'selfplay','shower_dildo_check'
 					end
 				end
 			end
-			
-			if pcs_leghair > 3:
-				act'Shave your legs (0:05)':
-					menu_off = 1
-					*clr & cla
-					minut += 5
-					pcs_leghair = 0
-					pcs_horny += 5
-					mc_inventory['razor'] -=  1
-!!					if $locM = 'uni_dorm' and $loc ='vann' and rand(0, 5) = 5:gt 'vann', 'brit1'
-					'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave2.jpg"></center>'
-					*nl
-					if daystart < 10 and $start_type[1] = 'tg':
-						'You can''t shake off the fact that you''re a girl now, so you decide it''d be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.'
-						'You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn''t really all that different. In the end, you get a pretty decent job done.'
-					elseif daystart < 30 and $start_type[1] = 'tg':
-						pcs_mood += 10
-						'With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don''t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?'
-					else
-						'You lather your legs up and grab your razor. After spending a few minutes methodically shaving away every last hair, your legs are smooth and clean. The feeling of your silky skin turns you on a little.'
-					end
-					dynamic $dryOff
-					gs'selfplay','bathtub_dildo_check'
-					gs'selfplay','shower_dildo_check'
-				end
-			end
 		else
 			'<br>You don''t need to shave.'
 		end
 	end
 	
-	if (shave_menu = 2 or shave_menu = 1) and mc_inventory['razor'] > 0:
+
+	if (shave_menu = 2 or shave_menu = 1) and (mc_inventory['razor'] > 0 or pcs_shave['free_razor'] = 1):
 		if pubestyle > 0 and pcs_pubes >= shave_trigger:
 			if pubestyle = 1:
 				$shave_act = 'Shave your pussy'
@@ -486,8 +467,13 @@ $brit = {
 					*nl
 					minut += 10
 					pcs_pubes = shave_length
+					stat['pube_growth_timer'] = totminut
 					pcs_horny += 5
-					mc_inventory['razor'] -=  1
+					if pcs_shave['free_razor'] = 1:
+						pcs_shave['free_razor'] = 0
+					else
+						mc_inventory['razor'] -= 1
+					end
 					'<<$shave_txt1>>'
 					*nl
 					'<<$shave_txt2>>'
@@ -499,15 +485,21 @@ $brit = {
 		end
 	end
 	
-	if (shave_menu = 3 or shave_menu = 1) and mc_inventory['razor'] > 0:
+	if (shave_menu = 3 or shave_menu = 1) and (mc_inventory['razor'] > 0 or pcs['free_razor'] = 1):
 		if pcs_leghair > 3:
 			act 'Shave your legs (0:05)':
 				menu_off = 1
 				*clr & cla
 				minut += 5
 				pcs_leghair = 0
+				stat['leg_hair_growth_timer'] = totminut
 				pcs_horny += 5
-				mc_inventory['razor'] -=  1
+
+				if pcs_shave['free_razor'] = 1:
+					pcs_shave['free_razor'] = 0
+				else
+					mc_inventory['razor'] -= 2
+				end
 !!				if $locM = 'uni_dorm' and rand(0, 5) = 5:gt 'vann', 'brit1'
 				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave2.jpg"></center>'
 				*nl
@@ -526,6 +518,160 @@ $brit = {
 			end
 		end
 	end
+	
+	if shave_menu > 0 and (mc_inventory['razor'] > 0 or pcs['free_razor'] = 1) and (pcs_leghair > 0 or (pcs_pubes < shave_trigger and pcs_pubes > shave_trigger - 3)):
+		act'Shave early':
+			cla
+			if shave_menu = 1 and pcs_leghair > 0 and pcs_leghair < 4 and pcs_pubes < shave_trigger and pcs_pubes > shave_trigger - 3:
+				if pubestyle = 1:
+					$shave_both_act = 'Shave early - legs and pussy'
+					$shave_txt1 = 'Inspecting yourself, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance now. You lather up your legs and crotch, grabbing your razor and carefully scrape the blade across your still-smooth skin.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your shaving areas are clean. Satisfied, you rinse off, pleased with the extra smooth feeling of your legs and pussy.'
+				elseif (pubestyle >= 2 and pubestyle <= 8) or pubestyle >= 12:
+					$shave_both_act = 'Trim early - legs and bush'
+					$shave_txt1 = 'Inspecting your pubes, it''s not quite time for you to shave the stubble at the edges, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. Might as well do your legs too while you''re at it. You lather up and grab your razor, carefully scraping the blade around the edges of your bush and up and down your legs.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your trim has well maintained edges. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 9:
+					$shave_both_act = 'Trim early - legs and bush'
+					$shave_txt1 = 'Inspecting your bush, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. Might as well do your legs too while you''re at it. You lather up and grab your razor, carefully scraping the blade around the edges of your bush and up and down your legs.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your pubes are a nice even lawn between your smooth legs. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 10:
+					$shave_both_act = 'Trim early - legs and bush'
+					$shave_txt1 = 'Inspecting your bush, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. Might as well do your legs too while you''re at it. You lather up and grab your razor, carefully scraping the blade around the edges of your bush and up and down your legs.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your bush is a well shaped hedge. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 11:
+					$shave_both_act = 'Shave early - legs and pussy'
+					$shave_txt1 = 'Inspecting yourself, it''s not quite time for you to shave yet and you''re usually too lazy to get to it before it starts growing into actual hair, but you''re feeling motivated so you might as well do it right now. You lather up your legs and crotch, grabbing your razor and carefully scrape the blade across your still-smooth skin.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your shaving areas are clean. Satisfied, you rinse off, pleased with the extra smooth feeling of your legs and pussy.'
+				else
+					$shave_both_act = ''
+				end
+				
+				if $shave_both_act ! '':
+					act '<<$shave_both_act>> (0:10)':
+						menu_off = 1
+						*clr & cla
+						if $locM = 'uni_dorm' and rand(0, 5) = 0:gt 'vann', 'brit1'
+						if $loc ='gadbana':
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave.mp4"></center>'
+						elseif pcs_pubes <= 10 and shave_length = 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave_stubble.mp4"></center>'
+						elseif shave_length = 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave_bush.mp4"></center>'
+						elseif shave_length > 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/trim_bush.mp4"></center>'
+						else
+							'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave3.jpg"></center>'
+						end
+						*nl
+						'<<$shave_txt1>>'
+						*nl
+						'<<$shave_txt2>>'
+						minut += 10
+						pcs_leghair = 0
+						stat['leg_hair_growth_timer'] = totminut
+						pcs_pubes = shave_length
+						stat['pube_growth_timer'] = totminut
+						pcs_horny += 5
+						if pcs_shave['free_razor'] = 1:
+							pcs_shave['free_razor'] = 0
+						else
+							mc_inventory['razor'] -=  2
+						end
+						dynamic $dryOff
+						gs'selfplay','bathtub_dildo_check'
+						gs'selfplay','shower_dildo_check'
+					end
+				end
+			end
+			
+			if (shave_menu = 2 or shave_menu = 1) and pcs_pubes < shave_trigger and pcs_pubes > shave_trigger - 3:
+				if pubestyle = 1:
+					$shave_act = 'Shave early - pussy only'
+					$shave_txt1 = 'Inspecting yourself, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance now. You lather up your crotch, grabbing your razor and carefully scrape the blade across your still-smooth skin.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your shaving areas are clean. Satisfied, you rinse off, pleased with the extra smooth feeling of your pussy.'
+				elseif (pubestyle >= 2 and pubestyle <= 8) or pubestyle >= 12:
+					$shave_act = 'Trim early - pubes only'
+					$shave_txt1 = 'Inspecting your pubes, it''s not quite time for you to shave the stubble at the edges, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. You lather up and grab your razor, carefully scraping the blade around the edges of your pubes.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your trim has well maintained edges. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 9:
+					$shave_act = 'Trim early - bush only'
+					$shave_txt1 = 'Inspecting your bush, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. You lather up and grab your shaving implements and start carefully clipping and trimming around the edges of your bush.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your pubes are a nice even lawn between your legs. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 10:
+					$shave_act = 'Trim early - bush only'
+					$shave_txt1 = 'Inspecting your bush, it''s not quite time for you to shave yet, but you''re not sure if you''ll be able to get to it later and decide to do some early maintenance. You lather up and grab your shaving implements and start carefully clipping and trimming around the edges of your bush.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your bush is a well shaped hedge. Satisfied, you rinse off, feeling clean, neat, and tidy.'
+				elseif pubestyle = 11:
+					$shave_act = 'Shave early - pussy only'
+					$shave_txt1 = 'Inspecting yourself, it''s not quite time for you to shave yet and you''re usually too lazy to get to it before it starts growing into actual hair, but you''re feeling motivated so you might as well do it right now. You lather up your crotch, grab your razor, and carefully scrape the blade across your still-smooth skin.' 
+					$shave_txt2 = 'After a few minutes of work, the razor has tiny little bits of hair and skin stuck in it and your pussy is perfectly cleanshaven. Satisfied, you rinse off, pleased with the extra smooth feeling between your legs.'
+				else
+					$shave_act = ''
+				end
+					
+				if $shave_act ! '':
+					act '<<$shave_act>> (0:05)':
+						menu_off = 1
+						*clr & cla
+						if $locM = 'uni_dorm' and rand(0, 5) = 0:gt 'vann', 'brit1'
+						if $loc ='gadbana':
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave.mp4"></center>'
+						elseif pcs_pubes <= 10 and shave_length = 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave_stubble.mp4"></center>'
+						elseif shave_length = 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/shave_bush.mp4"></center>'
+						elseif shave_length > 2:
+							'<center><video autoplay loop src="images/shared/home/bathroom/trim_bush.mp4"></center>'
+						else
+							'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave3.jpg"></center>'
+						end
+						*nl
+						'<<$shave_txt1>>'
+						*nl
+						'<<$shave_txt2>>'
+						minut += 5
+						pcs_leghair = 0
+						stat['leg_hair_growth_timer'] = totminut
+						pcs_pubes = shave_length
+						stat['pube_growth_timer'] = totminut
+						pcs_horny += 5
+						if pcs_shave['free_razor'] = 1:
+							pcs_shave['free_razor'] = 0
+						else
+							mc_inventory['razor'] -=  2
+						end
+						dynamic $dryOff
+						gs'selfplay','bathtub_dildo_check'
+						gs'selfplay','shower_dildo_check'
+					end
+				end
+			end
+			
+			if (shave_menu = 3 or shave_menu = 1) and pcs_leghair > 0:
+				act'Shave early - Legs only (0:03)':
+					menu_off = 1
+					*clr & cla
+					minut += 3
+					pcs_leghair = 0
+					stat['leg_hair_growth_timer'] = totminut
+					pcs_horny += 5
+					if pcs_shave['free_razor'] = 1:
+						pcs_shave['free_razor'] = 0
+					else
+						mc_inventory['razor'] -= 1
+					end
+					if $locM = 'uni_dorm' and rand(0, 5) = 5:gt 'vann', 'brit1'
+					'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave2.jpg"></center>'
+					*nl
+					'Inspecting your legs, it''s not really time to shave them yet, but there''s no reason you can''t just do a quick pass right now and save effort later. You lather your legs up and grab your razor. After spending a few minutes methodically shaving away every last hair, your legs are smooth and clean. The feeling of your silky skin turns you on a little.'
+					dynamic $dryOff
+					gs'selfplay','bathtub_dildo_check'
+					gs'selfplay','shower_dildo_check'
+				end
+			end
+		end
+	end
 }
 
 $tampon =  {
@@ -1019,9 +1165,10 @@ $palelady = {
 
 if $ARGS[0] = 'private':
 	menu_off = 0
+
 	if mc_inventory['razor'] > 0:'You have enough razors left for <b><<mc_inventory[''razor'']>></b> more shaves. <a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
-	if mc_inventory['razor'] > 0 and mc_inventory['razor'] <= 2 and razor['warning'] ! daystart:
-		razor['warning'] = daystart
+	if mc_inventory['razor'] > 0 and mc_inventory['razor'] <= 2 and razor['warning'] < daystart:
+		razor['warning'] = daystart + 5
 		msg'	You''re about to run out of razors!'
 	end
 
@@ -1683,7 +1830,7 @@ if $ARGS[0] = 'shave_options':
 	*P '<TR><TD><center><a href="exec:view''images/pc/body/pussy/hair/pussy.jpg''"><img Height = <<shave_img_hgt>> src="images/pc/body/pussy/hair/pussy.jpg"></a></center></TD><TD><center><a href="exec:view''<<FUNC(''$pube_image'',16,pcs_pubecol[2],2)>>''"><img Height = <<shave_img_hgt>> src="<<FUNC(''$pube_image'',16,pcs_pubecol[2],2)>>"></a></center></TD><TD><center><a href="exec:view''<<FUNC(''$pube_image'',16,pcs_pubecol[2],3)>>''"><img Height = <<shave_img_hgt>> src="<<FUNC(''$pube_image'',16,pcs_pubecol[2],3)>>"></a></center></TD><TD><center><a href="exec:view''<<FUNC(''$pube_image'',16,pcs_pubecol[2],4)>>''"><img Height = <<shave_img_hgt>> src="<<FUNC(''$pube_image'',16,pcs_pubecol[2],4)>>"></a></center></TD><TD><center><a href="exec:view''<<FUNC(''$pube_image'',16,pcs_pubecol[2],5)>>''"><img Height = <<shave_img_hgt>> src="<<FUNC(''$pube_image'',16,pcs_pubecol[2],5)>>"></a></center></TD>'
 	'<TR><TD><center>'
 	if pubestyle ! 1:
-		'<a href="exec:pubestyle = 1 & shave_length = 2 & shave_trigger = 4 & '+iif(shave_menu = 3,'shave_menu = 1', 'shave_menu = 2')+' & gt ''din_van'', ''shave_options''">Clean Shave</a>'
+		'<a href="exec:pubestyle = 1 & shave_length = 1 & shave_trigger = 4 & '+iif(shave_menu = 3,'shave_menu = 1', 'shave_menu = 2')+' & gt ''din_van'', ''shave_options''">Clean Shave</a>'
 	else
 		'Clean Shave'
 	end
@@ -1726,14 +1873,14 @@ if $ARGS[0] = 'shave_options':
 		'Cross-Shaped'
 	end
 	'</center></TD><TD><center>'
-	if pubestyle ! 8 and pcs_pubes > 20:
+	if pubestyle ! 8 and pcs_pubes > 16:
 		'<a href="exec:pubestyle = 8 & shave_length = 16 & shave_trigger = 21 & '+iif(shave_menu = 3,'shave_menu = 1', 'shave_menu = 2')+' & gt ''din_van'', ''shave_options''">Trimmed</a>'
 	else
 		'Trimmed'
 	end
 	'</center></TD><TD><center>'
-	if pubestyle ! 9 and pcs_pubes > 25:
-		'<a href="exec:pubestyle = 9 & shave_length = 16 & shave_trigger = 21 & '+iif(shave_menu = 3,'shave_menu = 1', 'shave_menu = 2')+' & gt ''din_van'', ''shave_options''">Small Bush</a>'
+	if pubestyle ! 9 and pcs_pubes > 20:
+		'<a href="exec:pubestyle = 9 & shave_length = 20 & shave_trigger = 26 & '+iif(shave_menu = 3,'shave_menu = 1', 'shave_menu = 2')+' & gt ''din_van'', ''shave_options''">Small Bush</a>'
 	else
 		'Small Bush'
 	end

locations/foto_events.qsrc

@@ -293,9 +293,12 @@ if $ARGS[0] = 'commercial':
 		model_job_week += 1
 		model_week = (daystart - week) / 7
 		modelfoto['shoots'] += 1
-		money += modelpayfin
+		if $model['pay_method'] = 'direct_deposit':
+			karta += modelpayfin
+		else
+			money += modelpayfin
+		end
 		modelfoto['earnings'] += modelpayfin
-		gt 'foto','studio'
 	else
 		practice_session = 0
 	end
@@ -326,9 +329,9 @@ if $ARGS[0] = 'commercial':
 						cla
 						*nl
 						'"Sure!" you say. "I''ve always wanted to be an actress, I just never thought I''d get a chance like this. When do we shoot?"'
-						if $actress['firstname'] = '':
-							$actress['firstname'] = $model['firstname']
-							$actress['lastname'] = $model['lastname']
+						if $actress_stats['firstname'] = '':
+							$actress_stats['firstname'] = $model['firstname']
+							$actress_stats['lastname'] = $model['lastname']
 						end
 						casting = 3
 						if week >= 6:
@@ -348,14 +351,17 @@ if $ARGS[0] = 'commercial':
 					end
 
 					act '"Triple rate?! Hell yeah!"':
-					casting = 3
+						casting = 3
+						if $actress_stats['firstname'] = '':
+							$actress_stats['firstname'] = $model['firstname']
+							$actress_stats['lastname'] = $model['lastname']
+						end
 						cla
 						'"Triple rate?! Hell yeah! Who cares about being naked in public when I''m getting paid that much! I''d let them gangbang me for that kind of money!"'
 						*nl
 						'"I''m sure they''d be happy to arrange that with you some other time," he says with a shit eating grin.'
-						'You punch him playfully on the arm.'
 						act '"So when do we shoot?"':
-						cla
+							cla
 							casting = 3
 							if week >= 6:
 								SMTV_commercial = daystart - week + 13
@@ -385,6 +391,10 @@ if $ARGS[0] = 'commercial':
 							*nl
 							'"I guess so," you say. "Since they''re paying so much, it''s hard to turn down. Besides, it might be worth it to break into acting, right?"'
 							casting = 3
+							if $actress_stats['firstname'] = '':
+								$actress_stats['firstname'] = $model['firstname']
+								$actress_stats['lastname'] = $model['lastname']
+							end
 							if week >= 6:
 								SMTV_commercial = daystart - week + 13
 								'"If it means anything to you, I think you''re making the right choice for your career." He hands you a business card for the <b>Aurora Talent Agency</b> in the city center. "Be here next Saturday at 10:00, this is where they said they were going to set up the shoot."'
@@ -1013,6 +1023,7 @@ if $ARGS[0] = 'list':
 	if specialjob7 > 95 and fame['city_kickboxing'] >=30 and pcs_inhib >= 45:'<a href="exec:gt ''foto_events2'',''kickboxing_documentary''">   Kickboxing documentary</a>'
     if specialjob8 > 95 and fame['city_running'] >=30 and pcs_inhib >= 50 and month >= 3 and month <=8:'<a href="exec:gt ''foto_events2'',''track_&_field_documentary''">   Track & Field documentary</a>'
 !!		if specialjob9 >= 95:'<a href="exec:gt ''foto_events'',''model_portraits''">photo albums</a>'
+!!	if specialjob9 >= 95:'<a href="exec:gt ''foto_events2'',''terry1''">Terry Request</a>'
 !!	if specialjob6 >= 95:'<a href="exec:gt ''foto_events'',''documentary''">	Documentary</a>'
 end
 

locations/foto_models.qsrc

@@ -49,12 +49,12 @@ if $ARGS[0] = 'model_chatter':
 		*nl
 		'The girls giggle together as you tune out again...'
 	elseif model['chatter'] = 5:
-		'"...and he offered me a job at the porn studio down the road."'
+		'"... needed the debut money."'
 		'"Oh! You finally did your first nude shoot?"'
-		'"About time, girl. How long have you been here? Four months?"'
+		'"About time girl! How long have you been here? Four months?"'
 		'"What?? Who took four months to do their first nude shoot?"'
 		'"I just didn''t want to show my pussy on camera, okay? It''s not like I''m shy, but it''s just a little classier that way."'
-		'"Still though, four months? I mean, second shoot was a nude shoot."'
+		'"Still though, four months? I mean, my second shoot was a nude shoot."'
 		'"Yeah, but you''re a slut, Stasya."'
 		*nl
 		'The rest of the conversation devolves into shouting and laughter and you can''t really hear anything specific.'

locations/foto_practice.qsrc

@@ -610,13 +610,13 @@ if $ARGS[0] = 'nude':
 					'"Well, if you''re sure. But I''m telling you, it won''t help very much until you''re more comfortable."'
 					act'Continue':
 						cla & *clr
-						gs 'exp_gain', 'mdlng', rand(1,3)
+						gs 'exp_gain', 'mdlng', rand(7,10)
 						inhib_exp += 1
 						gs 'stat'
 						'<center><video autoplay loop src="images/locations/city/citycenter/photo/nudepractice3.mp4"></video></center>'
 						'You hate to admit it, but he''s right. You keep holding yourself too stiff, striking the wrong pose, not paying attention to your expression, and a myriad of other mistakes. Every time the camera flashes, you feel panic course through your entire body, and you''re sure it shows.'
 						*nl
-						'Two hours later, you don''t feel like you learned very much and you don''t feel much more confident in your body either.'
+						'You spend the next couple hours training yourself to be as professional as possible and hiding your discomfort.'
 						act'End practice':gt'foto','end'
 					end
 				end
@@ -683,12 +683,10 @@ if $ARGS[0] = 'nude':
 				'You spend a good portion of the next two hours laughing with the photographer and the rest of the staff, practicing the ridiculous and convoluted poses required for nude modelling.'
 				if pcs_mdlng < 20:
 					act'Continue':
-						cla
-						*nl
+						cla & *nl
 						'Without clothes, the shoot becomes all about posture. You''re very comfortable and confident in your body, but you never realized how much of an advantage clothes were for making yourself sexier on camera and how straining it can be to pose in ways that compensate. This is going to take some getting used to.'
 						act'Continue':
 							cla & *clr
-							*nl
 							'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
 							'The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
 							act 'Leave':gt 'foto', 'end'
@@ -697,7 +695,6 @@ if $ARGS[0] = 'nude':
 				else
 					act'Continue':
 						cla & *clr
-						*nl
 						'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
 						'The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
 						if pcs_mdlng >= 40 and commercial = 0:

locations/foto_shoot.qsrc

@@ -48,10 +48,10 @@ if $ARGS[0] = 'model':
 		act'Clothing':
 			$modelfoto['shoot_type'] = 'catalog'
 			modelfoto['shoots'] += 1
-			model_week = (daystart - week) / 7
 			modelfoto['catalog'] += 1
 			model_job_week += 1
 			gs 'exp_gain', 'mdlng', rand(2,5)
+			model_week = (daystart - week) / 7
 			gs 'fame', 'city', 'modelling', 'tiny'
 			minut += 120
 			money += 450
@@ -71,10 +71,10 @@ if $ARGS[0] = 'model':
 		act'Swimsuits':
 			$modelfoto['shoot_type'] = 'swim_catalog'
 			modelfoto['shoots'] += 1
-			model_week = (daystart - week) / 7
 			modelfoto['catalog'] += 1
 			model_job_week += 1
 			gs 'exp_gain', 'mdlng', rand(2,5)
+			model_week = (daystart - week) / 7
 			gs 'fame', 'city', 'modelling', 'tiny'
 			minut += 120
 			money += 450
@@ -324,7 +324,7 @@ if $ARGS[0] = 'glamour_shoot':
 		end
 	end
 
-	act 'Topless':
+	act 'Exposed breasts':
 		$modelfoto['shoot_type'] = 'topless'
 		*clr & cla
 		if modelfoto['topless'] >= 5 and modelfoto['nude'] < 1: gt'foto_events','nude_persuasion'
@@ -364,12 +364,13 @@ end
 !! ----------------------------------------------------------------------------------------------------
 
 if $ARGS[0] = 'nude_shoot':
+	
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	'"Alright, we can do that. What kind of nude shoot?"'
 	
-	act 'Tasteful nude':
+	act 'Limited nude':
 		$modelfoto['shoot_type'] = 'taste_nude'
 		*clr & cla
 		if modelfoto['tastenude'] >= 5 and (modelfoto['topless'] + modelfoto['toplessnude'] + modelfoto['fullnude']) < 1: gt'foto_events','nude_persuasion'
@@ -401,7 +402,8 @@ if $ARGS[0] = 'nude_shoot':
 		end
 	end
 	
-	act 'Topless nude':
+	act 'Exposed breasts nude':
+		
 		$modelfoto['shoot_type'] = 'top_nude'
 		*clr & cla
 		if modelfoto['toplessnude'] >= 3 and modelfoto['pussy'] < 1:gt'foto_events','nude_persuasion'
@@ -433,7 +435,7 @@ if $ARGS[0] = 'nude_shoot':
 		end
 	end
 	
-	act 'Full nude':
+	act 'Full exposure':
 		$modelfoto['shoot_type'] = 'full_nude'
 		if modelfoto['fullnude'] = 0:
 			gt'foto_nude_debut', 'nude_debut_pre'
@@ -682,10 +684,12 @@ if $ARGS[0] = 'trans_ling':
 	modelfoto['nip'] += 1
 	modelfoto['lingerie'] += 1
 	gs 'exp_gain', 'mdlng', rand(8,10)
-	if pcs_inhib < 45: gs 'willpower','pay','self'
+	if pcs_inhib < 45: 
+		gs 'willpower','pay','self'
+		inhib_exp += rand(1,3)
+	end
 	gs 'fame', 'city', 'modelling', 'small'
 	if fame['city_modelling'] > 200: gs 'fame', 'city', 'modelling', rand(3,8)
-	inhib_exp += rand(0,2)
 	gs 'stat'
 	if rand(0,1) = 1:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/ling_trans/<<rand(1,3)>>.mp4"></video></center>'
@@ -711,10 +715,12 @@ if $ARGS[0] = 'topless':
 	modelfoto['nip'] += 1
 	modelfoto['topless'] += 1
 	gs 'exp_gain', 'mdlng', rand(6,10)
-	if pcs_inhib < 50: gs 'willpower','pay','self'
+	if pcs_inhib < 50:
+		gs 'willpower','pay','self'
+		inhib_exp += rand(1,3)
+	end
 	gs 'fame', 'city', 'modelling', 'small'
 	if fame['city_modelling'] > 200: gs 'fame', 'city', 'modelling', rand(3,8)
-	inhib_exp += rand(0,2)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topless/<<rand(1,57)>>.jpg"></center>'
 	'You spend two hours striking various posing with topless breasts, listening to instruction while the photographer takes pictures of you.'
@@ -735,10 +741,12 @@ if $ARGS[0] = 'tasteful':
 	modelfoto['tastenude'] += 1
 	modelfoto['nude'] += 1
 	gs 'exp_gain', 'mdlng', rand(9,10)
-	if pcs_inhib < 40: gs 'willpower','pay','self'
+	if pcs_inhib < 40: 
+		gs 'willpower','pay','self'
+		inhib_exp += rand(1,2)
+	end
 	gs 'fame', 'city', 'modelling', 'small'
 	if fame['city_modelling'] > 200: gs 'fame', 'city', 'modelling', rand(3,10)
-	inhib_exp += rand(0,2)
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/tastenude/<<rand(1,28)>>.jpg"></center>'
 	'Already naked, you step onto the set and begin the shoot immediately.'
 	*nl
@@ -758,10 +766,12 @@ if $ARGS[0] = 'topless_nude':
 	modelfoto['nude'] += 1
 	modelfoto['toplessnude'] += 1
 	gs 'exp_gain', 'mdlng', rand(9,10)
-	if pcs_inhib < 55: gs 'willpower','pay','self'
+	if pcs_inhib < 55:
+		gs 'willpower','pay','self'
+		inhib_exp += rand(1,4)
+	end
 	gs 'fame', 'city', 'modelling', 'medium'
 	if fame['city_modelling'] > 200: gs 'fame', 'city', 'modelling', rand(3,10)
-	inhib_exp += rand(1,3)
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topnude/<<rand(1,79)>>.jpg"></center>'
 	'Already naked, you step onto the set and begin the shoot immediately.'
 	*nl
@@ -784,20 +794,42 @@ if $ARGS[0] = 'nude':
 	modelfoto['nip'] += 1
 	modelfoto['pussy'] += 1
 	gs 'exp_gain', 'mdlng', rand(9,10)
-	if pcs_inhib < 60: gs 'willpower','pay','self'
+	if pcs_inhib < 60:
+		gs 'willpower','pay','self'
+		inhib_exp += rand(1,4)
+	end
 	gs 'fame', 'city', 'modelling', 'medium'
 	if fame['city_modelling'] > 200: gs 'fame', 'city', 'modelling', rand(5,10)
-	inhib_exp += rand(1,3)
-	if pcs_pubes < 16:
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude/<<rand(1,17)>>.jpg"></center>'
-		'Already naked, you step onto the set and begin the shoot immediately.'
-		*nl
-		'You spend two hours posing confidently for a photographer taking pictures of you that fully expose your breasts and pussy. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+	if rand(0,1) = 1:
+		if pcs_pubes < 16:
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude/<<rand(1,17)>>.jpg"></center>'
+			'Already naked, you step onto the set and begin the shoot immediately.'
+			*nl
+			'You spend two hours posing for a photographer taking pictures of you that fully expose your breasts and pussy. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/bnude/<<rand(1,20)>>.jpg"></center>'
+			modelfoto['bush'] += 1
+			'Already naked, you step onto the set and begin the shoot immediately.'
+			*nl
+			'You spend two hours posing confidently for a photographer taking pictures of you, your <<$pcdesc_pubes>> pussy providing a nice contrast to the rest of your smooth body. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+		end
 	else
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/bnude/<<rand(1,20)>>.jpg"></center>'
-		'Already naked, you step onto the set and begin the shoot immediately.'
-		*nl
-		'You spend two hours posing confidently for a photographer taking pictures of you, your <<$pc_desc[''pubes'']>> pussy providing a nice contrast to the rest of your smooth body. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+		if pcs_pubes < 16:
+			modelfoto['pussy'] += 1
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude/<<rand(1,17)>>.jpg"></center>'
+			'The photographer sends you on a quick trip to the dressing room to change into some clothes before the shoot.'
+			*nl
+			'Once you''re back, you spend two hours posing in the selected outfit and stripping or removing each piece as required. You never completely lose the clothes, but at one point or another, your breasts or pussy or both are put on display for the camera.'
+			*nl
+			'When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/bnude/<<rand(1,20)>>.jpg"></center>'
+			'The photographer sends you on a quick trip to the dressing room to change into some clothes before the shoot.'
+			*nl
+			'Once you''re back, you spend two hours posing for a photographer taking pictures of you in the selected outfit and stripping down piece by piece until your most intimate parts are exposed. Even though you started clothed, you have no doubt that the full spread will feature images that capture every part of you, even your furry pussy.'
+			*nl
+			'When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+		end
 	end
 	if modelfoto['nude'] = 1 and foto_persuade ! 5:
 		'You blink at the amount but the person who gave it to you reassures you it''s normal. The studio has a policy of doubling the pay for a model''s nude debut.'
@@ -826,7 +858,7 @@ if $ARGS[0] = 'erotic':
 	if pcs_inhib < 65: gs 'willpower','pay','self'
 	gs 'fame', 'city', 'modelling', 'small'
 	gs 'fame', 'city', 'porn', 'small'
-	if pcs_inhib < 60:inhib_exp += rand(1,3)
+	if pcs_inhib < 60:inhib_exp += 6
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/erotic/<<rand(1,19)>>.jpg"></center>'
 	if $pantyworntype ! 'none':
 	

locations/hourly_events.qsrc

@@ -361,6 +361,32 @@ if insleep = 0:
 	if temper >= 20: gs 'sweat', 'add', rand(0,1)
 end
 
+! Leg and pubes hair growth
+if lashair ! 1:
+	if pcs_traits['jungle_jane'] = 0:
+		if stat['leg_hair_growth_timer'] < totminut - 1440:
+			stat['leg_hair_growth_timer'] = totminut
+			pcs_leghair += 1
+		end
+		if stat['pube_growth_timer'] < totminut - 2880:
+			stat['pube_growth_timer'] = totminut
+			pcs_pubes += 1
+		end
+		!!Pubic hair growth at 1/2 per night
+	else
+		!! if trait is active, growth speed is doubled
+		if stat['leg_hair_growth_timer'] < totminut - 720:
+			stat['leg_hair_growth_timer'] = totminut
+			pcs_leghair += 1
+		end
+		if stat['pube_growth_timer'] < totminut - 1440:
+			stat['pube_growth_timer'] = totminut
+			pcs_pubes += 1
+		end
+	end
+	gs 'body_desc', 'pube_desc_update'
+end
+
 ! vovan edition, from 1.2.5
 if huntersAndreisex > 0: huntersAndreisex -= 1
 if huntersSergeisex > 0: huntersSergeisex -= 1

locations/item_stock_db.qsrc

@@ -890,5 +890,44 @@ if $ARGS[0] = 'uni':
     $img_curr_aisle['<<item_idx>>'] = ''
 
 end
+if $ARGS[0] = 'mothershop':	
+item_idx = 1
+$item_curr_aisle['<<item_idx>>'] = 'Morning Sickness Pills' 
+$var_curr_aisle['<<item_idx>>'] = 'meds_morning_sick'
+$desc_curr_aisle['<<item_idx>>'] = ''
+quantity_curr_aisle['<<item_idx>>'] = 12
+max_curr_aisle['<<item_idx>>'] = 0
+cost_curr_aisle['<<item_idx>>'] = 80
+$img_curr_aisle['<<item_idx>>'] = ''
+
+item_idx = 2
+$item_curr_aisle['<<item_idx>>'] = 'Pregnancy Ball' 
+$var_curr_aisle['<<item_idx>>'] = 'preg_ball'
+$desc_curr_aisle['<<item_idx>>'] = ''
+quantity_curr_aisle['<<item_idx>>'] = 1
+max_curr_aisle['<<item_idx>>'] = 1
+cost_curr_aisle['<<item_idx>>'] = 2475
+$img_curr_aisle['<<item_idx>>'] = ''
+
+item_idx = 3
+$item_curr_aisle['<<item_idx>>'] = 'Pregnancy Brace' 
+$var_curr_aisle['<<item_idx>>'] = 'preg_brace'
+$desc_curr_aisle['<<item_idx>>'] = ''
+quantity_curr_aisle['<<item_idx>>'] = 1
+max_curr_aisle['<<item_idx>>'] = 1
+cost_curr_aisle['<<item_idx>>'] = 975
+$img_curr_aisle['<<item_idx>>'] = ''
+
+item_idx = 4
+$item_curr_aisle['<<item_idx>>'] = 'Pregnancy Pillow' 
+$var_curr_aisle['<<item_idx>>'] = 'meds_morning_sick'
+$desc_curr_aisle['<<item_idx>>'] = ''
+quantity_curr_aisle['<<item_idx>>'] = 1
+max_curr_aisle['<<item_idx>>'] = 1
+cost_curr_aisle['<<item_idx>>'] = 2475
+$img_curr_aisle['<<item_idx>>'] = ''
+
+end
+
 --- item_stock_db ---------------------------------
 

locations/model_emily1.qsrc

@@ -13,7 +13,7 @@ if $ARGS[0] = 'emily_1':
 	act'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
-		'Turning around, you see a girl with long hair and large breasts serious look on her face."'
+		'Turning around, you see a girl with long hair, large breasts, and serious look on her face."'
 		'"Get the fuck out of the way! I''m trying to get to my shoot!"'
 		act'"Oh, sorry about that..."':
 			*clr & cla
@@ -21,12 +21,16 @@ if $ARGS[0] = 'emily_1':
 			'You apologetically step aside as she strides past you. "Sorry, I didn''t realize I was in the way.'
 			'"Well you should pay more attention. You must be new here."'
 			'"Yeah, I am. I actua-"'
-			'She cuts you off mid-sentence. "Well, here''s your introduction: I''m Emily and if you see me coming, get <i>the fuck</i> out of my way. I''m going to be the next big thing in this city and it''s people like you who are always getting in my way and holding me back. So step off bitch. I have things to do."'
-			'She walks past and onto a nearby set, loudly complaining to the photographer, "Hey, I know I''m late. There was some fucking new girl who doesn''t know her fucking place around here. Let''s get started."'
+			*nl
+			'She cuts you off mid-sentence.'
+			*nl
+			'"Well, here''s your introduction: I''m Emily and if you see me coming, get <i>the fuck</i> out of my way. I''m going to be the next big thing in this city and it''s stupid little bitches like you who are always getting in my way and holding me back. So step <i>off</i>. I have things to do."'
+			'She walks past and onto a nearby set, loudly complaining to the photographer.'
+			'"Hey, I know I''m late. There was some fucking new girl who doesn''t know her fucking place around here. Let''s get started."'
 			act'Watch her work':
 				*clr & cla
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/nude1.mp4"></video></center>'
-				'Despite her rude attitude, the moment she steps on on set acts perfectly professional, taking directions and adjusting poses flawlessly. She knows how to work her assets in just the right ways. She must be really set on being a pro.'
+                'Despite her rude attitude, the moment she steps on set, she acts perfectly professional, taking directions and adjusting poses flawlessly. She knows how to work her assets in just the right ways. She must be really set on being a pro.'
 				act'Leave':gt'foto','studio'
 			end
 			act'Leave':gt'foto','studio'
@@ -36,7 +40,7 @@ if $ARGS[0] = 'emily_1':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/turnback.jpg"></center>'
 			'"What do you just say to me?! Who do you think you are talking to people like that?"'
-			'The girl shoves her way past you and looks over her shoulder at you. She says, "You must be new here so I''ll give you the short version: I''m Emily and I''m going to be the next big thing in this town so when you see me coming, you get <i>the fuck</i> out of my way." And with that, she walks off towards her shoot.'
+            'The girl shoves her way past you and looks over her shoulder at you. "You must be new here so I''ll give you the short version: I''m Emily and I''m going to be the next big thing in this town, so when you see me coming, you get <i>the fuck</i> out of my way." With that, she walks off towards her shoot.'
 			act'Take the high road':
 				*clr & cla
 				'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/pornwalk1.mp4"></video></center>'
@@ -47,7 +51,7 @@ if $ARGS[0] = 'emily_1':
 				act'Watch her work':
 					*clr & cla
 					'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/nude1.mp4"></video></center>'
-					'Despite her rude attitude, the moment she steps on on set acts perfectly professional, taking directions and adjusting poses flawlessly. She knows how to work her assets in just the right ways. She must be really set on being a pro.'
+					'Despite her rude attitude, the moment she steps on set, she acts perfectly professional, taking directions and adjusting poses flawlessly. She knows how to work her assets in just the right ways. She must be really set on being a pro.'
 					act'Leave':gt'foto','studio'
 				end		
 			end
@@ -72,21 +76,21 @@ if $ARGS[0] = 'emily_1':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
 				'"Cunt!" you hiss'
-				'She stops dead in her tracks for a moment before whirling around and stomping back towards you. "What did you just say to me???"'
-				'"You heard me. Cu-n-<b>t.</b>" You spit the words from between your teeth, emphasizing the word so much that it transforms from one syllable to three. As the last sound leaves your lips, she steps in close to you, her face is barely centimeters away. You feel a proximity hovering over your chest and in your subconscious mind you realize it must be her nipples, which are almost touching tips with yours. As the stare goes on you begin to tense up and you feel like she''s about to hit you.'
+				'She stops dead in her tracks before whirling around and stomping back towards you. "What did you just say to me???"'
+				'"You heard me. Cu-n-<b>t.</b>" You spit the words from between your teeth, emphasizing the word so much that it transforms from one syllable to three. As the last sound leaves your lips, she steps in close to you, her face barely centimeters away from yours. You feel a proximity hovering over your chest and in your subconscious mind you realize it must be her nipples, which are almost touching tips with yours. As the stare goes on, you begin to tense up and you feel like she''s about to hit you.'
 				act'Continue':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
-					'Seething anger burns behind her eyes as she continues to leer at you. "Now listen here you fucking slut, I''m going to be the next big thing in this town and you better remember it. You''ve seen the photo albums in the main hall? I''m Emily. That''s right. I''m number three. And someday soon I''m going to be number one. And no matter how hard you try, no matter how hard you work, no matter how hot you think you are, my name is <i>always</i> going to be above yours. Now make like the whore you are, and <b>fuck off.</b>"'
-					'And with that, she turns around and walks onto a nearby set. She loudly complains to the photographer, "Hey, I know I''m late. There was some fucking slut of a newbie who doesn''t know her fucking place around here. Let''s get started."'
+					'Seething anger burns behind her eyes as she continues to leer at you. "Now listen here you fucking slut, I''m going to be the next big thing in this town and you better remember it. You''ve seen the photo albums in the main hall? I''m Emily. That''s right. I''m number three. And someday soon I''m going to be number one. And no matter how hard you try, no matter how hard you work, no matter how hot you think you are, my name is <i>always</i> going to be above yours. Now make like the whore you are and <b>fuck off.</b>"'
+					'With that, she turns around and walks onto a nearby set, where she loudly complains to the photographer. "Hey, I know I''m late. There was some fucking slut of a newbie who doesn''t know her fucking place around here. Let''s get started."'
 					act'Leave':gt'foto','studio'
 				
 					act'Watch her work':
 						*clr & cla
 						'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/nude1.mp4"></video></center>'
-						'You hate this stupid fucking bitch and her fucking face with her fucking ego and her fucking attitude with all your heart and soul but nothing pisses you off more than the fact that she''s actually really good at this. She''s incredibly professional, taking directions from the photographer flawlessly, working her body in a way that exudes sexuality with every move and pose. If she is still as angry as you are, she doesn''t show the slightest sign of it, maintaining perfect composure at all times.'
+						'You hate this stupid fucking bitch and her fucking face with her fucking ego and her fucking attitude with all your heart and soul, but nothing pisses you off more than the fact that she''s actually really good at this. She''s incredibly professional, taking directions from the photographer flawlessly, working her body in a way that exudes sexuality with every move and pose. If she''s still as angry as you are, she doesn''t show the slightest sign of it, maintaining perfect composure at all times.'
 						*nl
-						'You growl under your breath, "One day... I swear..." and walk away before you give yourself an aneurysm from being too ticked off.'
+						'"One day... I swear..." you growl under your breath and walk away before you give yourself an aneurysm from being too ticked off.'
 						act'Leave':gt'foto','studio'
 					end
 				end
@@ -104,15 +108,15 @@ if $ARGS[0] = 'emily_2':
 		'Unable to control the impulse, your eyes flick to her shapely breasts before going back into the stare. Even though it was only a fraction of a second, she saw you do it and immediately pounces on you for it.'
 		act'Continue':
 			*clr & cla
-			if tits <= 4: 
+			if tits < 4: 
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/5.jpg"></center>'
-				'"What''s the matter slut? Jealous?" she says with a smirk, obviously lording her size and shape of her tits over you and your <<$titsize>> breasts.'
+				'"What''s the matter, slut? Jealous?" she says with a smirk, obviously lording the size and shape of her tits over you and your <<$titsize>> breasts.'
 				act'Grind your teeth in jealousy':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/4.jpg"></center>'
 					'You say nothing and clench your jaw, grinding your teeth together. This girl pisses you off more than anything in the world and it definitely doesn''t help that she''s right about you wishing you had bigger breasts. You cross your arms over your chest and look away, hiding your breasts from her gaze and trying your best not to blush in embarrassment.' 
 					'"Whatever..." you mutter.'
-					'"Aww..." she says in mock pity. "It''s okay. Some boys like smaller, flatter girls like you." She leans over to whisper in your ear, "But they all <i>wish</i> they were with a woman like me..." She pats you on the head and says, "Maybe if you drink your milk you can ''level up'' one day. Or you can use all your whore money to buy some implants!" cackling to herself as she walks off.'
+					'"Aww..." she says in mock pity. "It''s okay. Some boys like smaller, flatter girls like you." She leans over to whisper in your ear, "But they all <i>wish</i> they were with a woman like me..." She pats you on the head. "Maybe if you drink your milk you can ''level up'' one day. Or you can use all your whore money to buy some implants!" She cackles to herself as she walks off.'
 					'<i><b>This. Fucking. Bitch!</b></i>'
 					act'Leave':gt'foto','studio'
 				end
@@ -125,23 +129,24 @@ if $ARGS[0] = 'emily_2':
 					emily['hate'] += 1
 					'"Why would I be jealous of fat cow tits like yours?" you sneer back.'
 					'"<i>Excuuuuuuuse me?!</i>"'
-					'Your words seem to catch her off guard and she steps back as though she''s genuinely offended and hurt. Sensing you have the upper hand, you push your breasts up with your hands, saying, "Maybe they''re not as big, but at least they''re cute, perky, and don''t get waved around like fake cow udders."'
+					'Your words seem to catch her off guard and she steps back as though she''s genuinely offended. Sensing you have the upper hand, you push your breasts up with your hands. "Maybe they''re not as big, but at least they''re cute, perky and don''t get waved around like fake cow udders."'
 					'"H-how dare you!" Emily begins to stammer in fury. "My breasts are completely natural and I have <i>never</i> used plastic surgery for anything! I''m naturally this gorgeous!"'
 					'"Is that the line you give to the boys that tease you at the club?" you say, giving her the same smirk she first gave you as you walk by. "At least I don''t look like a bimbo bitch!" you call over your shoulder without turning leaving her behind with what you imagine to be a jaw dropped look on her face.' 
+					*nl
 					'Pettiness never felt so good...'
 					act'Leave':gt'foto','studio'
 				end
 				
 			elseif tits = 4:
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/1.jpg"></center>'
-				'"What''s the matter slut? Jealous? Wish you had a pair like mine?"'
+				'"What''s the matter, slut? Jealous? Wish you had a pair like mine?"'
 				act'"We''re the same size!"':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/4.jpg"></center>'
 					'Your mouth drops open in disbelief and offense. "What are you talking about you stuck up bitch?! We''re the same size!'
 					'She continues smirking as she pretends to muse over what you said.'
 					'"True... But there''s more to it than size..." she says, moving through poses like she''s doing a shoot or something. "Softness, supplness, the way they bounce..." She sways them back and forth to make her point, jiggling with the slightest movements.'
-					'Emily moves close and whispers, "No one cares what size a girl''s tits are when they''re as flabby as yours," before striding past and leaving you fuming.'
+					'"No one cares what size a girl''s tits are when they''re as flabby as yours," Emily whispers before striding past and leaving you fuming.'
 					'<i><b>This. Fucking. Bitch!</b></i>'
 					act'Leave':gt'foto','studio'
 				end
@@ -152,9 +157,9 @@ if $ARGS[0] = 'emily_2':
 					emily['hate'] += 1
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/3.jpg"></center>'
-					'"Why would I? At least I don''t need mine to distract from an ass ugly face!"'
+					'"Why would I? At least I don''t need mine to distract people from an ass ugly face!"'
 					'"<i>Excuuuuuuuse me?!</i>"'
-					'Your words seem to catch her off guard and she steps back as though she''s genuinely offended and hurt. Sensing you have the upper hand, you push your advantage. "Oh yeah, I bet when the boys come by your house they all bring a paper bag to put over that face of yours. They love using your tits to get off, they just don''t want to see your face while they do it!"'
+					'Your words seem to catch her off guard and she steps back as though she''s genuinely offended. Sensing you have the upper hand, you push your advantage. "Oh yeah, I bet when the boys come by your house they all bring a paper bag to put over that face of yours. They love using your tits to get off, they just don''t want to see your face while they do it!"'
 					'"H-how dare you!" Emily begins to stammer in fury. "I-! You-!"'
 					'"I don''t have time for this," you interrupt her. "Let me know if any of them manage to cum without a blindfold. I''ll take them to the doctor to get them some glasses!" Her jaw drops as you saunter past feeling good about yourself.' 
 					act'Leave':gt'foto','studio'
@@ -162,13 +167,13 @@ if $ARGS[0] = 'emily_2':
 			
 			elseif tits >= 5:
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/1.jpg"></center>'
-				'"What''s the matter whore? Wish you didn''t have such fat cow tits?" she says with fake concern and pushing out her chest, obviously trying to talk down your larger <<$titsize>> breasts.'
+				'"What''s the matter, whore? Wish you didn''t have such fat cow tits?" she says with fake concern and pushing out her chest, obviously trying to talk down your larger <<$titsize>> breasts.'
 				
 				act'"What''s wrong with having big breasts?"':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/2.jpg"></center>'
 					'"What''s wrong with having big breasts?!" you exclaim. "Yours are big too!"'
-					'"True," she says while walking up to you so you''re shoulder to shoulder. "But mine are soft and perky and <i>just</i> the right size. Any bigger and they end up fat and saggy like yours where you have to worry about knocking someone out if you turn too fast." And then paying no more attention to you at all, she strides off while your jaw hits the floor. By the time you recover from this offense, she''s already long gone.'
+					'"True," she says while walking up to you so you''re shoulder to shoulder. "But mine are soft and perky and <i>just</i> the right size. Any bigger and they end up fat and saggy like yours where you have to worry about knocking someone out if you turn too fast." Paying no more attention to you, she strides off while your jaw hits the floor. By the time you recover from this offense, she''s already long gone.'
 					'<i><b>This. Fucking. Bitch!</b></i>'
 					act'Leave':gt'foto','studio'
 				end
@@ -178,10 +183,10 @@ if $ARGS[0] = 'emily_2':
 				act'Insults are just the mark of a jealous bitch':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/3.jpg"></center>'
-					'"What? Are you saying that just because you''re jealous that you don''t have these instead of those mosquito bites you call breasts?"'
+					'"Are you saying that because you''re jealous you don''t have these instead of those mosquito bites you call breasts?"'
 					'"<i>Excuuuuuuuse me?!</i>" Your words seem to catch her off guard and she steps back as though she''s genuinely offended. "How could you even say that?! My breasts are obviously-"'
-					'"Excuses, excuses!" you say, cutting her off. "You can say whatever you like, the only thing I know is that <i>my</i> milkshakes bring all the boys to the yard." You step up to her and whisper in her ear, "And damn right, <i>they''re better than yours,</i>" before stepping off and striding away confidently.'
-					'<i>Suck it bitch,</i> you think to yourself as you walk away.'
+					'"Excuses, excuses!" you say, cutting her off. "You can say whatever you like, the only thing I know is that <i>my</i> milkshakes bring all the boys to the yard." You step up to her and whisper in her ear. "And damn right, <i>they''re better than yours,</i>"'
+					'<i>Suck it bitch,</i> you think to yourself as you confidently walk away.'
 					act'Leave':gt'foto','studio'
 				end
 			end
@@ -190,40 +195,40 @@ if $ARGS[0] = 'emily_2':
 		'Walking through the studio, you round the corner of a set and nearly bump into Emily.'
 		'"Oh. It''s you," she says flatly.'
 		'"Uhh, yeah... I never introduced myself the last time we saw each other. I''m <<$model[''firstname'']>>, I''m a new model here at the agency."'
-		'"Yeah, I know, I knew. Models are the only ones who walk around here naked, I''m not stupid."'
-		'"Right... So-" you start to say something but she interrupts you.'
+		'"Yeah, I know. Models are the only ones who walk around here naked, I''m not retarded."'
+		'"Right... So-" you start to say something, but she interrupts you.'
 		'"Look, are you just here to waste my time?"'
 		act'"Excuse me?"':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
 			'You blink, taken aback. "Excuse me?"'
 			'"I''m asking if you''re just trying to waste my time. Because everywhere, I go, that''s all you ever seem to do: get in my way and waste my fucking time."'
-			'She brushes past you rolling her eyes. You hear her muttering under her breath as she walks away. "Fucking amateurs, why do they even waste time with girls like that here..."'
+			'She brushes past you while rolling her eyes. You hear her muttering under her breath as she walks away. "Fucking amateurs, why do they even waste time with girls like that here..."'
 			act'Leave':gt'foto','studio'
 		end
 		act'"What''s your problem bitch?"':
 !!			emily['hate'] += 1
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
-			'"Okay, what''s your problem bitch?" you snap back at her. "I''ve only spoken to you two times and both times you''ve been nothing but a vicious cunt. What the fuck did I ever do to you?"'
+			'"Okay, what''s your problem bitch?" you snap back at her. "I''ve only spoken to you two times and both times you''ve been nothing but a cunt. What the fuck did I ever do to you?"'
 			'Emily gets in your face and snaps back at you. "My problem with you is that you''re always in my fucking way! You come here, standing around like you''re going to get famous, and wasting everyone else''s time that they should be spending on me!"'
 			'"Oh, and you are going to get famous?" you retort.'
-			'"Yes. Because unlike you, I''ve been getting ready for this my whole life. I spent all of high school eating right and working out, getting a thin body and the most volouptuous ass. I started working here the moment I turned 18 and have spent every day since working with the photographers to become the perfect model. I''ve done hundreds of shoots, I''m sponsored by lingerie and clothing companies, and currently I''m working on breaking into the actress business. And then here <i>you</i> are, coming in probably just here for easy money like some kind of cheap whore and you expect me to treat you as some kind of special snowflake?"'
+			'"Yes. Because unlike you, I''ve been getting ready for this my whole life. I spent all of high school eating right and working out, getting a thin body and the most voluptuous ass. I started working here the moment I turned 18 and have spent every day since working with the photographers to become the perfect model. I''ve done hundreds of shoots, I''m sponsored by lingerie and clothing companies, and currently I''m working on breaking into the actress business. And then here <i>you</i> are, coming in for easy money like some kind of cheap whore and expecting me to treat you like some kind of special snowflake!"'
 			act'"I didn''t realize how serious you were"':
 				*clr & cla
 				emily['hate'] -= 1
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
 				'You find yourself taken aback by her tirade and step away from her.'
 				'"I-, I''m sorry Emily. I didn''t realize you were so serious about your work here. I never meant to bother you, I just... we just bumped into each other by accident, I swear."'
-				'She sighs a bit in exhasperation but otherwise recomposes herself. "Okay, whatever. It''s not a big deal I guess, just don''t make a habit of it," she says and brushes past you. You hear her muttering under her breath as she walks away. "Fucking amateurs, why do they even waste time with girls like that here..."'
+				'She sighs in exasperation, but otherwise recomposes herself. "Okay, whatever. It''s not a big deal I guess, just don''t make a habit of it," she says and brushes past you. You hear her muttering under her breath as she walks away. "Fucking amateurs, why do they even waste time with girls like that here..."'
 				act'Leave':gt'foto','studio'
 			end
 			act'"Who gave you the right?"':
 				*clr & cla
 				emily['hate'] += 1
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
-				'"And you think that gives you the right to act the way you do?" you shout back. "Plenty of other people are working hard here, why does your own work make you deserve it more than the rest? What, just because you were born with big tits and a pretty face makes you ''destined'' to make it big? You''re such a self-entitled brat!"'
-				'"A filthy amateur like you wouldn''t understand," she huffs. "And that''s always what you''re going to be. Just another picture of tits on the internet with a forgotten name to go along with them."'
+				'"And you think that gives you the right to act the way you do?" you shout back. "Plenty of other people are working hard here, so why does your work make you deserve it more than the rest? Just because you were born with big tits and a pretty face doesn''t mean you''re ''destined'' to make it big. You''re such a self-entitled brat!"'
+				'"A filthy amateur like you wouldn''t understand," she huffs. "And that''s always what you''re going to be. Just another set of tits on the internet with a forgotten name to go along with them."'
 				'Without another word, she walks away, leaving you in fumes.'
 				act'Leave':gt'foto','studio'
 			end
@@ -251,25 +256,25 @@ if $ARGS[0] = 'emily_modelling':
 	emily['model'] = rand(1,6)
 	if emily['model'] = 1:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/nude1.mp4"></video></center>'
-		'Looking around for Emily, you find her on set in the middle of a nude shoot. She is completely concentrated on her task and doesn''t even notice you. You spend a few moments watching before walking away.'
+		'Looking around for Emily, you find her on set in the middle of a nude shoot. She''s completely concentrated on her task and doesn''t even notice you. You spend a few minutes watching before walking away.'
 	elseif emily['model'] = 2:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/nude2.mp4"></video></center>'
-		'Looking around for Emily, you find her on set in the middle of a nude shoot. She looks happy and completely different from any other time you''ve interacted with her, but you can only assume it has something to do with the shoot as she blows on some kind of party toy. You watch for a few more moments before walking away.'
+		'Looking around for Emily, you find her on set in the middle of a nude shoot. She looks happy and completely different from any other time you''ve interacted with her, but you can only assume it has something to do with the shoot as she blows on some kind of party toy. You watch for a few more minutes before walking away.'
 	elseif emily['model'] = 3:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/sexy.mp4"></video></center>'
-		'Looking around for Emily, you find her on set in the middle of a shoot. She''s wearing some kind of transparent lingerie and unzipped jeans, carefully and purposefully working her thin body to create a sexy atmosphere. You watch for a few more moments before walking away.'
+		'Looking around for Emily, you find her on set in the middle of a shoot. She''s wearing some kind of transparent lingerie and unzipped jeans, carefully and purposefully working her thin body to create a sexy atmosphere. You watch for a few more minutes before walking away.'
 	elseif emily['model'] = 4:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/underwear.mp4"></video></center>'
-		'Looking around for Emily, you find her on set in the middle of an underwear shoot. As you watch she moves through a bunch of different positions but never actually stopping to pose. And the expressions she puts on don''t seem like a freeze frame of emotion, more like all of her movements are part of the expression together. Taking a look at the camera, you realize this is some kind of video they''re filming, maybe a commercial. You watch for a little while longer before walking away.'
+		'Looking around for Emily, you find her on set in the middle of an underwear shoot. As you watch, she moves through a bunch of different positions but never actually stops to pose. The expressions she puts on don''t seem like a freeze frame of emotion, more like all of her movements are part of the expression together. Taking a look at the camera, you realize this is some kind of video they''re filming, maybe a commercial. You watch for a little while longer before walking away.'
 	elseif emily['model'] = 5:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/sponsor.mp4"></video></center>'
 		'Looking around for Emily, you find her on set in the middle of a shoot. She''s dancing around and acting playful while intermittently stripping out of her clothing with big bold letters of what the brand is. Maybe this is some kind of sponsorship or commercial she''s filming right now? Maybe both. You watch for a little while longer before walking away.'
 	elseif emily['model'] = 6:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/emily_r/modelling/ana.mp4"></video></center>'
 		if anastasia[status] > 0:
-			'Looking around for Emily, you find her on set in the middle of a lingerie shoot with Anastasia. The two of them sit on the ground together taking cues from each other and the photographers as they go through poses. Anastasia doesn''t seem to notice but something about Emily''s face makes her seem bitter, like she''s annoyed to be working with her. Maybe it has something to do with her rankings in the studio. You watch for a few more moments before walking away.'
+			'Looking around for Emily, you find her on set in the middle of a lingerie shoot with Anastasia. The two of them sit on the ground together taking cues from each other and the photographers as they go through poses. Anastasia doesn''t seem to notice but something about Emily''s face makes her seem bitter, like she''s annoyed to be working with her. Maybe it has something to do with her rankings in the studio. You watch for a few more minutes before walking away.'
 		else
-			'Looking around for Emily, you find her on set in the middle of a lingerie shoot with another model you feel like you''ve seen around. The two of them sit on the ground together taking cues from each other and the photographers as they go through poses. The other woman doesn''t seem to notice but Emily seems really bitter, like she''s annoyed to be working with her. You wonder what that''s about as you watch for a few more moments before walking away.'
+			'Looking around for Emily, you find her on set in the middle of a lingerie shoot with another model you feel like you''ve seen around. The two of them sit on the ground together taking cues from each other and the photographers as they go through poses. The other woman doesn''t seem to notice but Emily seems really bitter, like she''s annoyed to be working with her. You wonder what that''s about as you watch for a few more minutes before walking away.'
 		end
 	end
 		
@@ -285,9 +290,9 @@ if $ARGS[0] = 'emily_warning':
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
 		'You sigh deeply, turning around to see exactly what you expect: bitchy looking Emily walking towards you.'
 		if emily['hate'] <= 0:
-			'"I thought we were past this Em-" you start, before she cuts you off, stomping right up to your face, her glare reflecting an intensity of rage that you have never seen before, even from her.'
+			'"I thought we were past this Em-" you start before she cuts you off, stomping right up to your face, her glare reflecting an intensity of rage that you''ve never seen before, even from her.'
 		else
-			'"What is it n-" you start, before she cuts you off, stomping right up to your face, her glare reflecting an intensity of rage that you have never seen before, even from her.'
+			'"What is it n-" you start before she cuts you off, stomping right up to your face, her glare reflecting an intensity of rage that you''ve never seen before, even from her.'
 		end
 		'"You''re really rising through the ranks around here." Her voice is completely calm, a strange contrast from the burning fury you see behind her eyes. "Made a name for yourself. Good for you!"'
 		'She gives you a chilling smile.'
@@ -295,7 +300,7 @@ if $ARGS[0] = 'emily_warning':
 		act'Gulp':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/face.jpg"></center>'
-			'You reflexively swallow in fear, shying back away from her.'
+			'You reflexively swallow in fear and shyly back away from her.'
 			'"A good bitch knows her place," Emily regards you with a smirk, eyes still dead and lacking humor. "Do what I say and you won''t have to learn yours."'
 			'She walks away without another word, leaving just as abruptly as she appeared.'
 			act'Leave':gt'foto','studio'
@@ -305,7 +310,7 @@ if $ARGS[0] = 'emily_warning':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/5.jpg"></center>'
 			'"And why would I do that?" you snort.'
-			'"Because you''re an good bitch," Emily regards you with a smirk, eyes still dead and lacking humor. "Bitches know their place. And if they don''t, they get put into their place, whether they like it or not. Consider this your final warning."'
+			'"Because you''re a good bitch," Emily regards you with a smirk, eyes still dead and lacking humor. "Bitches know their place. And if they don''t, they get put into their place, whether they like it or not. Consider this your final warning."'
 			'She walks away without another word, leaving just as abruptly as she appeared.'
 			act'Leave':gt'foto','studio'
 		end
@@ -358,7 +363,7 @@ if $ARGS[0] = 'emily_chat':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/5.jpg"></center>'
 				gs 'exp_gain', 'mdlng', 2
-				'"What? You''re so afraid of your position that if you give help to a silly amateur like me it''ll knock you off your pedestal? Huh. Maybe you''re not good enough for me to be asking after all."'
+				'"What? You''re so afraid of your position that if you give help to a silly amateur like me it''ll knock you off your pedestal? Huh. Maybe you''re not good enough for me to be asking after all..."'
 				'Emily''s eyes narrow at your words before re-adjusting herself to respond. "I suppose I could give some advice to a poor unfortunate soul like you. At the very least maybe you''d stop embarrassing yourself on set and making the studio look bad. I can''t have you bringing down Aphrodite''s name and my fame just by association."'
 				'You smirk inwardly, pleased with how easy it was to manipulate her into doing this and listen as she starts giving you real advice.'
 				'"The most important things about modelling is how to hold yourself. If you can''t pull off the pose to make yourself or the clothes you''re wearing look sexy then you''ve failed. Practice the poses, spend time in front of the mirror testing looks. And when you''re on set, keep changing it up. Taking direction from the photographers is important but if you want to act like a professional then you need to take initiative. Every time the camera flashes, alter your position, even if just a little bit. They''re only looking for one perfect shot, either they have it or they don''t. But help them search."'
@@ -381,7 +386,7 @@ if $ARGS[0] = 'emily_chat':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/emily_r/talking/1.jpg"></center>'
 		'"I was wondering if you could give some advice about keeping a model''s figure. Do you have any?"'
-		'"Yeah, don''t live like a filthy pig. What, do you want me to write out a diet plan for you that lets you keep stuffing your face ice cream and chocolate? Cause that doesn''t exist, stupid."'
+		'"Yeah, don''t live like a filthy pig. What? Do you want me to write out a diet plan for you that lets you keep stuffing your face with ice cream and chocolate? Cause that doesn''t exist, stupid."'
 		act'Keep chatting':gt'model_emily1', 'emily_chat'
 	end
 

locations/model_jeff1.qsrc

@@ -17,7 +17,7 @@ if $ARGS[0] = 'jeff_1':
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/1.jpg"></center>'
 		'"Hi! Are you the new model here?"'
 		'"Yeah, I-" you start to say.'
-		'"Welcome to our little family!" the girl says, interrupting you, suddenly jumping up and wrapping her arms around your neck.'
+		'"Welcome to our little family!" the girl says, interrupting you and suddenly jumping up and wrapping her arms around your neck.'
 		'You can feel her puffy nipples against your skin and you can tell she''s really not shy in the least about physical boundaries or personal space.'
 		'"Ah-! Ahm... Thanks..." you say awkwardly when she lets you go. "I was just looking around, getting familiar with the studio."'
 		'"How do you like it? I personally find it very busy... People don''t want to play with me very often..." she says with a pouty face.'
@@ -42,7 +42,7 @@ if $ARGS[0] = 'jeff_1':
 					'"That''s your real name?"'
 					'"Nope!" She keeps smiling.'
 					'"Ahh, uh... Okay..." you say.'
-					'All of sudden she seems to startle herself and squeaks, "Oh no! I totally forgot, I was supposed to be on set! Gotta run! It was nice meeting you!" you hear Jeff call back as she skips off towards the other side of the studio.'
+					'All of sudden she seems to startle herself and squeaks. "Oh no! I totally forgot, I was supposed to be on set! Gotta run! It was nice meeting you!" you hear Jeff call back as she skips off towards the other side of the studio.'
 					'<i>What a weird girl...</i>'
 					jeff['status'] = 2
 					act'Leave':gt 'foto','studio'
@@ -56,8 +56,8 @@ if $ARGS[0] = 'jeff_2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/4.jpg"></center>'
 	jeff['status'] = 3
-	'As you walk past a set, you hear someone yell out from an armchair, "Hey there cutie!"'
-	'Looking over you see Jeff smiling at you, sitting with her legs up and her neat little pussy on peeking out from between them. She must''ve just finished a shoot.'
+	'As you walk past a set, you hear someone yell out from an armchair. "Hey there, cutie!"'
+	'Looking over, you see Jeff smiling at you, sitting with her legs up and her neat little pussy on peeking out from between them. She must''ve just finished a shoot.'
 	act'Hey!':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/5.jpg"></center>'
@@ -66,9 +66,8 @@ if $ARGS[0] = 'jeff_2':
 		act'"Isn''t that bad?"':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/6.jpg"></center>'
-			'"Isn''t that bad?" you ask. "After all, they''re paying you to be on set and do the job aren''t they?"'
-			'"Oh I knowwwww! But why can''t I have a bit of fun now and then?"'
-			'She starts to kick her leg up and down playfully.'
+			'"Isn''t that bad?" you ask. "After all, they''re paying you to be on set and do the job, aren''t they?"'
+			'"Oh I knowwwww! But why can''t I have a bit of fun now and then?" She starts to kick her leg up and down playfully.'
 			'Her carefree attitude is very interesting to you. You decide to ask her what she did before she was a model.'
 			'"Before? Oh, I used to work for an escort service."'
 			act'"An... escort service...?"':
@@ -77,7 +76,7 @@ if $ARGS[0] = 'jeff_2':
 				'"An... escort service...?" you ask tentatively.'
 				'"Mhmmm! I needed some money to pay for my university tuition so I did some part time escorting."'
 				'"So you would..."'
-				'"Let old men use my innocent, nubile, teen body to fulfill their sexual fantasies for money? Sure! Sometimes they there weren''t very nice though," she says putting on a pouty face. "It could be hard sometimes because of that, but I was a big girl so I powered through! Anyways, that''s why I switched to modelling after a little while. They''re much nicer here!"'
+				'"Let old men use my innocent, nubile, teen body to fulfil their sexual fantasies for money? Sure! Sometimes they there weren''t very nice though," she says putting on a pouty face. "It could be hard sometimes because of that, but I was a big girl so I powered through! Anyways, that''s why I switched to modelling after a little while. They''re much nicer here!"'
 				act'That''s... good?':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/8.jpg"></center>'
@@ -85,7 +84,7 @@ if $ARGS[0] = 'jeff_2':
 					'"What is it you said you were studying in university?"'
 					'"Economy and management!" she says proudly.'
 					'<i>This airhead? Economy and management?!</i>'
-					'"Well, I guess I should go now. Gotta get paid! Bye <<$model[''nickname'']>>!" she says and then runs off.'
+					'"Well, I guess I should go now. Gotta get paid! Bye <<$model[''nickname'']>>!" she says and runs off.'
 					act'Leave':gt 'foto','studio'
 				end
 			end
@@ -96,7 +95,7 @@ if $ARGS[0] = 'jeff_2':
 				'"An escort service??" you ask in surprise.'
 				'"Mhmmm! I needed some money to pay for my university tuition so I did some part time escorting."'
 				'"So you would have sex with people for money?"'
-				'"Yup! I''d let them fulfill their every sexual fantasy! For some reason a lot of them liked this position," she says, putting her legs up in the air and flashing her pussy at you. "It paid the bills really well and even let me get a nice apartment in the residential area after I paid off my tuition for that year. Sometimes they there weren''t very nice though," she says putting on a pouty face. "It could be hard sometimes because of that, but I was a big girl so I powered through! Anyways, that''s why I switched to modelling after a little while. They''re much nicer here!"'
+				'"Yup! I''d let them fulfil their every sexual fantasy! For some reason a lot of them liked this position," she says, putting her legs up in the air and flashing her pussy at you. "It paid the bills really well and even let me get a nice apartment in the residential area after I paid off my tuition for that year. Sometimes they weren''t very nice though..." she says putting on a pouty face. "It could be hard sometimes because of that, but I was a big girl so I powered through! Anyways, that''s why I switched to modelling after a little while. They''re much nicer here!"'
 				act'That''s... good?':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/8.jpg"></center>'
@@ -104,7 +103,7 @@ if $ARGS[0] = 'jeff_2':
 					'"What is it you said you were studying in university?"'
 					'"Economy and management!" she says proudly.'
 					'<i>This airhead? Economy and management?!</i>'
-					'"Well, I guess I should go now. Gotta get paid! Bye <<$model[''nickname'']>>!" she says and then runs off.'
+					'"Well, I guess I should go now. Gotta get paid! Bye <<$model[''nickname'']>>!" she says and runs off.'
 					act'Leave':gt 'foto','studio'
 				end
 			end
@@ -327,7 +326,7 @@ if $ARGS[0] = 'jeff_sex_talk':
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/jeff_m/talking/22.jpg"></center>'
 		'"Definitely the time I fucked my bio professor."'
 		'"You fucked your professor?"'
-		'"Oh yeah, I fuck any professor I think I can get away with. Really easy way to bump up your grades. Older guys always have their specific fetishes and my bio professor has a bit of an oral fixation with nipples. The first time we hooked up, I came three times before he even put it in me! That man has a mouth that was made to suck on titties."'
+		'"Oh yeah, I fuck any professor I think I can get away with. Really easy way to bump up your grades. Older guys always have their specific fetishes and my bio professor has a bit of an oral fixation with nipples. The first time we hooked up, I came three times before he even put it in me! That man has a mouth that was <i>made</i> to suck on titties."'
 		act 'Continue': gt'model_jeff1', 'jeff_sex_talk'
 	end
 	

locations/model_krystal.qsrc

@@ -464,13 +464,13 @@ end
 if $ARGS[0] = 'krystal3':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/krystal_b/meeting3/1.jpg"></center>'
-	'You see Krystal standing by one of the sets with a male.'
+	'You see Krystal standing by one of the sets with a man.'
 	'<i>Must be a photographer.</i>'
 	act'Say hi':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/krystal_b/meeting3/2.jpg"></center>'
 		'"Hey Krys-"'
-		'You stop suddenly as the guy starts to reachs up her skirt and down her dress.'
+		'You stop suddenly as the guy starts to reaches up her skirt and down her dress.'
 		act'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/krystal_b/meeting3/3.jpg"></center>'
@@ -479,7 +479,7 @@ if $ARGS[0] = 'krystal3':
 			'You timidly walk over to her.'
 			'"This is my boyfriend, Ben," she says while he fondles her breast.'
 			'"Uhmm... Nice to meet you Ben..." You hold out your hand and he says nothing to you, continuing to grope her and kiss the back of her neck.'
-			'"Oh, don''t mind him," Krystal continues on. "We haven''t had sex since -<i>ahhh!</i>- this morning, so he''s very-! Eager-!" Her last word comes out as a squeal when he pinches her nipple and pulls on it.'
+			'"Oh, don''t mind him," Krystal continues on. "We haven''t had sex since -<i>ahhh!</i>- this morning, so he''s very-! eager-!" Her last word comes out as a squeal when he pinches her nipple and pulls on it.'
 			'"Did you want to stick around? We could make this a threesome," she says casually while leaning onto her boyfriend. She''s clearly enjoying his advances.'
 			act'"No, that''s okay..."':
 				*clr & cla
@@ -786,7 +786,7 @@ end
 if $ARGS[0] = 'krystalshower':
 	menu_off = 1
 	gs'stat'
-	'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/shower.mp4"></video></center>'
+	'<center><video autoplay loop src="images/shared/sex/shower/cuni2.mp4"></video></center>'
 	'As you head into the shower area, you''re hit in the face by the unmistakable sound of someone moaning in pleasure.'
 	*nl
 	'"Ahh! Yes! Just like that!"'
@@ -802,14 +802,14 @@ if $ARGS[0] = 'krystalshower':
 			pcs_makeup = 1
 			gs 'arousal', 'voyeur_sex', 15
 			dynamic $showerdin
-			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/broshower.mp4"></video></center>'
+			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></video></center>'
 			'You step into a stall and turn on the shower, trying your best to ignore what is going on while Krystal starts getting fucked from behind.'
 			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 			if pcs_horny >= 40:
 				act 'Use the shower head on your pussy':
 					cla
 					*clr
-					'<center><video autoplay loop src="images/shared/home/bathroom/wash2.mp4"></video><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/showerfuck.mp4"></video></center>'
+					'<center><video autoplay loop src="images/shared/home/bathroom/wash2.mp4"></video><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
 					*nl
 					'Her boyfriend pushes her against the wall and pulls her leg up to get deep inside her. Krystal''s moans and the sound of cock slamming into her pussy are too much for you and you can''t stop yourself from placing the shower head between your legs, massaging your pussy with powerful jets of warm water and fingers.'
 					'Your voices start to sync together, echoing out of the stalls in perfect time with each other.'
@@ -825,7 +825,7 @@ if $ARGS[0] = 'krystalshower':
 						cla & *clr
 						if exhibitionist_lvl < 2:
 							pcs_mood += 15
-							'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/showercum.mp4"></video></center>'
+							'<center><video autoplay loop src="images/shared/sex/shower/cum_jerkoff1.mp4"></video></center>'
 							'Her boyfriend pulls out of her and she jacks him off furiously until he spatters her belly with his cum.'
 							gs 'arousal', 'voyeur_sex', -10
 							$orgasm_or = 'no'
@@ -847,7 +847,7 @@ if $ARGS[0] = 'krystalshower':
 							end
 						else
 							pcs_mood += 15
-							'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/showercum.mp4"></video></center>'
+							'<center><video autoplay loop src="images/shared/sex/shower/cum_jerkoff1.mp4"></video></center>'
 							'Her boyfriend pulls out of her and she jacks him off furiously until he spatters her belly with his cum.'
 							$orgasm_or = 'no'
 							gs 'arousal', 'clit_vibe', -5, 'masturbate', 'exhibitionism'
@@ -874,7 +874,7 @@ if $ARGS[0] = 'krystalshower':
 			if exhibitionist_lvl > 1:
 				act 'Dry off':
 					cla & *clr
-					'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/showerfuck.mp4"></video></center>'
+					'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
 					'You start to towel off looking a little enviously at Krystal when her boyfriend pushes her against the wall and starts to take her from the front.'
 					*nl
 					'You take one last look with a bit of regret and go back to the main floor of the studio.'
@@ -886,7 +886,7 @@ if $ARGS[0] = 'krystalshower':
 			else
 				act 'Dry off':
 					cla & *clr
-					'<center><video autoplay loop src="images/locations/city/citycenter/photo/portraits/krystal_b/showerfuck.mp4"></video></center>'
+					'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
 					'You shyly towel off, still doing your best to ignore the wild and unashamed sex of your co-worker and her boyfriend, who have now switched positions so Krystal''s back is to the wall with her leg up and his big fat cock now pummelling her from the front.'
 					*nl
 					'As you finish drying off you realize how wet between the legs you are. Blushing hard you put your towel in the bin and go back to the main floor of the studio.'

locations/model_mari.qsrc

@@ -3,12 +3,16 @@
 !! ---------------------------------------- Mari Model ---------------------------------------------------------
 !!npc_rel['A213'] = Mari
 
-if $ARGS[0] = 'mari_1':
+if $ARGS[0] = 'mari_age':
 	if month >= 5 and day >= 20:
 		mari['age'] = year - 1999
 	else
 		mari['age'] = year - 1998
 	end
+end
+
+if $ARGS[0] = 'mari_1':
+	gs 'model_mari','mari_age'
 	if mari['status'] =  2:gt 'model_mari','mari_2'
 	if mari['status'] =  3:gt 'model_mari','mari_3'
 	if mari['status'] =  4:gt 'model_mari','mari_4'
@@ -198,6 +202,7 @@ end
 
 
 if $ARGS[0] = 'mari_2':
+	gs 'model_mari','mari_age'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading1.jpg"></center>'
 	'On your way to a shoot, you see Mari on a break, sitting in the chair of an unused set. At least you think she''s on break because she''s reading a book. But you''re not totally sure since she''s also completely naked.'
@@ -273,6 +278,7 @@ end
 
 if $ARGS[0] = 'mari_3':
 	*clr & cla
+	gs 'model_mari','mari_age'
 	if $mari['used_firstname'] = '':
 		$mari['used_firstname'] = $model['firstname']
 		$mari['used_nickname'] = $model['nickname']
@@ -304,6 +310,7 @@ end
 
 if $ARGS[0] = 'mari_4':
 	*clr & cla
+	gs 'model_mari','mari_age'
 	mari['busy'] = rand(1,3)
 	mari['status'] =  rand(3,4)
 	mari['busy_cooldown'] = hour + 2
@@ -352,6 +359,7 @@ if $ARGS[0] = 'mari_4':
 end
 
 if $ARGS[0] = 'mari_chat':
+	gs 'model_mari','mari_age'
 	act'Leave':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading13.jpg"></center>'
@@ -540,10 +548,10 @@ if $ARGS[0] = 'mari_underwear_chat':
 		end
 	end
 	
-	act'I buy from Fashionista':
+	act'I buy from Lusso Intimo':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading2.jpg"></center>'
-		'"I get most of my underwear from Fashionista," you tell her.'
+		'"I get most of my underwear from Lusso Intimo," you tell her.'
 		'"Oh yeah? I''ve never shopped there before. What kind of stuff do they have?"'
 		'"Super stylish and fancy. Very lacy. I really like it."'
 		'"Oh. I''m not really into lace. A bit uncomfortable for me. Maybe I''ll try something else. Thanks for the suggestion though!"'
@@ -721,10 +729,11 @@ if $ARGS[0] = 'mari_modelling_chat':
 
 	if mari['name_chat'] = 0:gs 'model_mari','mari_nametalk'
 	
+	
 	gs'model_mari','mari_parents'
 	gs'model_mari','mari_fakepassport_talk'
 	gs'model_mari','mari_first_nude'
-
+	gs'model_mari','other_models_talk'
 	
 end
 
@@ -846,26 +855,24 @@ if $ARGS[0] = 'mari_nametalk3':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading3.jpg"></center>'
 			'"It is, actually," you nod.'
-			'"Really?" Mari perks up at that.'
-			'"You seem surprised," you laugh.'
-			'"Most of the other models use a proper fake name," she says. "I didn''t expect anybody else to use their real name."'
-			act'Keep chatting':gt 'model_mari','mari_modelling_chat'
+			gs 'model_mari','mari_same_nametalk'
 		end
 	elseif $model['firstname'] = $pcs_nickname:
 		act'It''s my nickname':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading3.jpg"></center>'
 			'"It is, actually," you nod. "Well, sort of. It''s a nickname for me, like you."'
-			'"Really?" Mari perks up at that.'
-			'"You seem surprised," you laugh.'
-			'"Most of the other models use a proper fake name," she says. "I didn''t expect anybody else to be like me in this regard."'
-			act'Keep chatting':gt 'model_mari','mari_modelling_chat'
+			gs 'model_mari','mari_same_nametalk'
 		end
 	else
 		act'No, it''s <<$pcs_firstname>>':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading3.jpg"></center>'
-			'"It''s not," you shake your head. "My real name is <<$pcs_firstname>>. My friends call me <<$pcs_nickname>>."'
+			if $pcs_nickname ! $pcs_firstname:
+				'"It''s not," you shake your head. "My real name is <<$pcs_firstname>>. My friends call me <<$pcs_nickname>>."'
+			else
+				'"It''s not," you shake your head. "My real name is <<$pcs_firstname>>."'
+			end
 			!!'"<<$pcs_nickname>>..." Mari says, smiling to herself as if seeing how your name feels in her mouth. "I like it. Do... do you mind if I call you that?"'
 			gs 'model_mari','mari_nametalk5'
 		end
@@ -898,8 +905,19 @@ if $ARGS[0] = 'mari_nametalk4':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading3.jpg"></center>'
 		'You feel bad leaving her in the dark. She''s right. It''s only fair after all.'
-		'"My real name is <<$pcs_firstname>>," you admit. "My friends call me <<$pcs_nickname>>."'
-		gs 'model_mari','mari_nametalk5'
+		if $model['firstname'] = $pcs_firstname:
+			'"<<$pcs_firstname>> is my real name," you admit.'
+			gs 'model_mari','mari_same_nametalk'
+		elseif $model['firstname'] = $pcs_nickname:
+			'"<<$pcs_nickname>> is my real name," you admit. "Sort of. It''s my nickname."'
+			gs 'model_mari','mari_same_nametalk'
+		elseif $pcs_nickname ! $pcs_firstname:
+			'"My real name is <<$pcs_firstname>>," you admit. "My friends call me <<$pcs_nickname>>."'
+			gs 'model_mari','mari_nametalk5'
+		else
+			'"My real name is <<$pcs_firstname>>," you admit.'
+			gs 'model_mari','mari_nametalk5'
+		end
 	end
 end
 
@@ -931,6 +949,17 @@ if $ARGS[0] = 'mari_nametalk5':
 end
 
 
+if $ARGS[0] = 'mari_same_nametalk':
+	'"Really?" Mari perks up at that.'
+	'"You seem surprised," you laugh.'
+	if $model['firstname'] = $pcs_firstname:
+		'"Most of the other models use a proper fake name," she says. "I didn''t expect anybody else to use their real name."'
+	else
+		'"Most of the other models use a proper fake name," she says. "I didn''t expect anybody else to be like me and basically still use their real name."'
+	end
+	act'Keep chatting':gt 'model_mari','mari_modelling_chat'
+end
+
 if $ARGS[0] = 'mari_parents':
 	if mari['parent_ask'] < 1 and mid($start_type,1,2) = 'sg':
 		act'Ask about her parents':
@@ -1176,9 +1205,8 @@ if $ARGS[0] = 'mari_first_nude2':
 end
 
 if $ARGS[0] = 'mari_first_nude2.shave':
-	*nl
 	'"They made you shave for it?" you ask.'
-	'"Yeah. The studio has this policy that every model''s first full frontal has to shave her... yeah... I''d never completely shaved everything off like that before so it was a weird experience at first. Mostly felt... breezy? Like being more naked than naked if that makes any sense. It''s a good thing I like being naked!" she laughs.'
+	'"Yeah. The studio has this policy that every model''s first full frontal has to shave her... yeah... I''d done it once before, but it''s not like I showed anybody, let alone had photographs taken of it. It made me feel... naked? Like being more naked than naked if that makes any sense. It''s a good thing I like being naked!" she laughs.'
 	gs'model_mari', 'mari_first_nude4'
 end
 
@@ -1187,7 +1215,6 @@ if $ARGS[0] = 'mari_first_nude3':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading5.jpg"></center>'
 		'"No," you shake your head. "I haven''t seen yours."'
-		*nl
 		'"Well, that''s probably for the best," Mari replies, a faint blush coloring her cheeks. "You''d probably tease me for looking too cheerful. Honestly? It was a great experience for me. I had a lot of fun doing it. I''ve never really been embarrassed about my body so when they asked me if I wanted to pose nude I just figured why not? It was a little embarrassing to shave everything, uhm, down there... but even that wasn''t too bad. It mostly felt... breezy? Like being more naked than naked if that makes any sense. It''s a good thing I like being naked!" she laughs. "But since I did my debut early on in my career, the majority of my portfolio is filled with nudes now."'
 		gs'model_mari', 'mari_first_nude4'
 	end
@@ -1196,7 +1223,6 @@ if $ARGS[0] = 'mari_first_nude3':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading5.jpg"></center>'
 		'"Yeah I''ve gone through yours."'
-		*nl
 		'"Oh dear!" Mari blushes hard. "Well then you could probably tell I might have been having too much fun. I''ve never really been embarrassed about my body so when they asked me if I wanted to pose nude I just figured why not? It was a little embarrassing to shave everything, uhm, down there... but even that wasn''t too bad. It mostly felt... breezy? Like being more naked than naked if that makes any sense. It''s a good thing I like being naked!" she laughs. "But honestly? It was a great experience for me. And since I did it early on in my career the majority of my portfolio is filled with nudes now."'
 		gs'model_mari', 'mari_first_nude4'
 	end
@@ -1209,12 +1235,21 @@ if $ARGS[0] = 'mari_first_nude4':
 			if modelfoto['fullnude'] > 0 and mari['knows_underage'] = 1:
 				'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading4.jpg"></center>'
 				'"So you did your first nude shoot when you were still underage?" you ask.'
-				'"Yeah, just like you," she smirks. "I guess maybe it''s not something to be too proud of when you put it like that. It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the math. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same when I was 17 as I do when I''m 18."'
+				if mari['age'] = 18:
+					'"Yeah, just like you," she smirks. "I guess maybe it''s not something to be too proud of when you put it like that. It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the math. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same in photos of when I was 17 as I do now that I''m 18."'
+				else
+					'"Yeah, just like you," she smirks. "I guess maybe it''s not something to be too proud of when you put it like that. It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the math. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same in photos of when I was 17 as I do in photos of when I was 18."'
+				end
 				act'Keep chatting':gt 'model_mari','mari_modelling_chat'
 			else
 				'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading5.jpg"></center>'
+				
 				'"So you did your first nude shoot when you were still underage?" you ask.'
-				'"Yeah, I guess so," she shrugs. "It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the math. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same when I was 17 as I do when I''m 18."'
+				if mari['age'] = 18:
+					'"Yeah, I guess so," she shrugs a little shyly. "It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the maths. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same in photos of when I was 17 as I do now that I''m 18."'
+				else
+					'"Yeah, I guess so," she shrugs a little shyly. "It certainly makes it harder to consider telling my parents about what I do. If they ever start reading dates, they might do the maths. My mother would be mortified! But there''s no turning back now. I was only a couple months from my birthday anyways. Seems like a technicality at that point. I look the same in photos of when I was 17 as I do in photos of when I was 18."'
+				end
 				act'Keep chatting':gt 'model_mari','mari_modelling_chat'
 			end
 		end
@@ -1359,6 +1394,12 @@ if $ARGS[0] = 'pc_nude_debut_talk':
 	end
 end
 
+if $ARGS[0] = 'other_models_talk':
+	act'Ask about the other models':
+	
+	end
+end
+
 if $ARGS[0] = 'weekend_plans':
 	if week = 5:
 		act'Ask about her weekend plans':
@@ -1380,7 +1421,7 @@ if $ARGS[0] = 'weekend_plans':
 				else
 					'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading2.jpg"></center>'
 					'"Any plans for the weekend Mari?" you ask.'
-					'"Yeah, I''m gonna go home to visit my parents," she smiles.'
+					'"I''m gonna go home to visit my parents," she smiles.'
 					'"In Gadukino?"'
 					'"Mhm. I make a point of trying to see them every couple weeks. Sometimes work gets in the way, but I can usually make it out at least once a month. It''s nice that they''re only a train ride away. I always feel better after spending some time with them."'
 				end
@@ -1403,16 +1444,16 @@ end
 
 if $ARGS[0] = 'mari_sex_talk':
 	if mari['sex'] = 0:
-		act'Ask for sex advice':
+		act'Talk about sex':
 			*clr & cla
 			mari['sex'] = 1
 			'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading3.jpg"></center>'
-			'"Sex?? You want to ask me for advice on sex???" she says, seemingly surprised.'
-			'"Yeah, I just wanted to ask you about it since you always have such good advice about everything."'
+			'"Sex?? You want to talk about sex???" she says, seemingly surprised.'
+			'"Yeah, just a bit of girl talk," you say with a conspirational smile.'
 			act'Continue':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading5.jpg"></center>'
-				'"Well... That''s... I..." Mari is blushing heavily, her face turning dramatically red. You think this is the first time you''ve ever seen her embarrassed about something. "I might not be the best person to ask <<$mari[''used_nickname'']>>..."'
+				'"Well... That''s... I..." Mari is blushing heavily, her face turning dramatically red. You think this is the first time you''ve ever seen her embarrassed about something. "I don''t have a lot to talk about in that department <<$mari[''used_nickname'']>>..."'
 				act'"Wait... don''t tell me you..."':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading4.jpg"></center>'
@@ -1422,7 +1463,7 @@ if $ARGS[0] = 'mari_sex_talk':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading5.jpg"></center>'
 						'Your mouth is agape as she wriggles in embarrassment. She doesn''t seem upset by any means, she''s still clearly smiling. It kind of reminds you of when you were younger and when girls asked each other if they had ever kissed a boy.'
-						'"You''re a virgin?! You''re a nude model who''s <<sisterAge>> and living in St. Petersburg and you''re a virgin?!"'
+						'"You''re a virgin?! You''re a nude model who''s <<mari[''age'']>> and living in St. Petersburg and you''re a virgin?!"'
 						'Your exclamations are met with hushes, "Shh! Shh! Shh shh shh! Not so loud!" as Mari tries to quiet you down while holding back her own nervous laughter.'
 						act'"But how?!"':
 							*clr & cla
@@ -1488,7 +1529,7 @@ if $ARGS[0] = 'mari_sex_talk':
 												'"It''s okay <<$mari[''used_nickname'']>>," Mari says, instantly breaking back into her usual smile. "You''re probably right. No harm done."'
 												act'Continue':
 													*clr & cla
-													'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading17.jpg"></center>'
+													'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading19.jpg"></center>'
 													'"No harm done..." she mutters to herself again with a far-off look.'
 													gs 'model_mari','mari_chat'
 												end
@@ -1506,7 +1547,7 @@ if $ARGS[0] = 'mari_sex_talk':
 												cla & *clr
 												'<center><img <<$set_imgh>> src="images/characters/city/models/mari/talking/reading19.jpg"></center>'
 												'"Maybe?" you shrug. "The way you act, how kind you are to the other girls here, the way you''re always hugging me... It might be more affectionate than you realize. But I can''t be the judge of that. Only you can say if it''s something more."'
-												'"I guess this is something I''ll have to think about..."'
+												'"I guess this is something I''ll have to think about..." she mumbles with a far-off look.'
 												gs 'model_mari','mari_chat'
 											end
 											

locations/npcgeneratec.qsrc

@@ -146,9 +146,11 @@ end
 !!	$npc_dick_desc is set here
 !!	this variable is to set a shorthand method of checking dick size without looking for specific numbers
 !!	it is organized by length and then ascending girth
+!!	$npc_dick_class is a fast way of determining size by category
 
 !! short dicks
 if npc_dick[$npclastgenerated] < 9:
+	$npc_dick_class[$npclastgenerated] = 'short'
 	if $npc_thdick[$npclastgenerated] = 'skinny' or $npc_thdick[$npclastgenerated] = 'slim':
 	
 		$npc_dick_desc[$npclastgenerated] = 'tiny'
@@ -164,7 +166,8 @@ if npc_dick[$npclastgenerated] < 9:
 	end
 	
 !! average length dicks
-elseif npc_dick[$npclastgenerated] < 13:
+elseif npc_dick[$npclastgenerated] < 15:	
+	$npc_dick_class[$npclastgenerated] = 'average'
 	if $npc_thdick[$npclastgenerated] = 'skinny' or $npc_thdick[$npclastgenerated] = 'slim':
 	
 		$npc_dick_desc[$npclastgenerated] = 'skinny'
@@ -179,7 +182,8 @@ elseif npc_dick[$npclastgenerated] < 13:
 		
 	end
 !! long dicks
-elseif npc_dick[$npclastgenerated] < 18:
+elseif npc_dick[$npclastgenerated] < 20:
+	$npc_dick_class[$npclastgenerated] = 'big'
 	if $npc_thdick[$npclastgenerated] = 'skinny' or $npc_thdick[$npclastgenerated] = 'slim':
 	
 		$npc_dick_desc[$npclastgenerated] = 'long'
@@ -193,6 +197,7 @@ elseif npc_dick[$npclastgenerated] < 18:
 	end
 !! extremely long dicks
 else
+	$npc_dick_class[$npclastgenerated] = 'extra_big'
 	if $npc_thdick[$npclastgenerated] = 'skinny' or $npc_thdick[$npclastgenerated] = 'slim':
 	
 		$npc_dick_desc[$npclastgenerated] = 'lengthy'
@@ -297,7 +302,7 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 
 	npc_residence[$npclastgenerated] = temp_location
 	if npc_residence[$npclastgenerated] = 1:
-		npc_finance[$npclastgenerated] = 0
+		npc_finance[$npclastgenerated] = rand(0,1)
 		$npc_residence[$npclastgenerated] = 'pav_res'
 	elseif npc_residence[$npclastgenerated] = 2:
 		npc_finance[$npclastgenerated] = 0
@@ -363,12 +368,29 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 		
 		if npc_car[$npclastgenerated] = 0: npc_car[$npclastgenerated] = rand(-3,1)
 	elseif npc_finance[$npclastgenerated] = 2:
+		if rand(1,2) = 1:
+			npc_start_free_time[$npclastgenerated] = 8
+			npc_end_free_time[$npclastgenerated] = 12
+			
+			npc_work_start[$npclastgenerated] = 13
+			npc_work_end[$npclastgenerated] = 21
+		else
+			npc_start_free_time[$npclastgenerated] = 18
+			npc_end_free_time[$npclastgenerated] = 22
+			
+			npc_work_start[$npclastgenerated] = 9
+			npc_work_end[$npclastgenerated] = 17
+		end
 		npc_apt_type[$npclastgenerated] = 5
 		!!npc_apt_type[$npclastgenerated] = rand(5,6)
 		!! apt_type 6 is disabled until pictures are added
 		npc_occupation[$npclastgenerated] = rand(14,18)
 		npc_car[$npclastgenerated] = rand(0,1)
 	end
+	
+	!! failsafe until possibility of roommates is sorted out
+	if npc_apt_type[$npclastgenerated] = 4: npc_apt_type[$npclastgenerated] = 5
+	
 	npc_day_off[$npclastgenerated] = rand(1,7)
 	
 	
@@ -493,15 +515,17 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 	elseif npc_occupation[$npclastgenerated] = 15: 
 		$npc_occupation[$npclastgenerated] = 'programmer'
 	elseif npc_occupation[$npclastgenerated] = 16: 
-		$npc_occupation[$npclastgenerated] = 'criminal'
+		npc_criminal[$npclastgenerated] = 1
 		!! npc_criminal_open determines whether or not they will hide their criminality from the player
 		npc_criminal_open[$npclastgenerated] = rand(0,1)
-		if rand(1,3) = 1:
-			$npc_crime_type[$npclastgenerated] = 'drug_dealer'
+		if rand(1,4) = 1:
+			$npc_occupation[$npclastgenerated] = 'pimp'
+		elseif rand(1,3) = 1:
+			$npc_occupation[$npclastgenerated] = 'drug_dealer'
 		elseif rand(1,2) = 1:
-			$npc_crime_type[$npclastgenerated] = 'enforcer'
+			$npc_occupation[$npclastgenerated] = 'enforcer'
 		else
-			$npc_crime_type[$npclastgenerated] = 'thief'
+			$npc_occupation[$npclastgenerated] = 'thief'
 		end
 	elseif npc_occupation[$npclastgenerated] = 17: 
 		$npc_occupation[$npclastgenerated] = 'businessman'
@@ -550,28 +574,29 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 	npc_goal[$npclastgenerated] = rand(1,3)
 
 !!	npc_fidelity is how they will behave in a relationship
-!!	1-3 = will cheat on you 
-!!	4-6 = will cheat on others with you
-!!		4 = cheats on them with you for the first time
+!!	1-3 = will cheat on you and others with no guilt
+!!	5-6 = will cheat on others with you
 !!		5 = has been cheating and feels guilty
-!!		6 = is a serial cheater with no guilt
+!!		6 = cheats on them with you for the first time
 !!	7 = is fine with open relationship
 !!	8-10 = will be faithful
 	if npc_fidelity[$npclastgenerated] >= 8:
 		$npc_fidelity[$npclastgenerated] = 'faithful'
 	elseif npc_fidelity[$npclastgenerated] = 7:
 		$npc_fidelity[$npclastgenerated] = 'open'
-	elseif npc_fidelity[$npclastgenerated] >= 4:
+	elseif npc_fidelity[$npclastgenerated] >= 5:
 		$npc_fidelity[$npclastgenerated] = 'seduced'
 	elseif npc_fidelity[$npclastgenerated] >= 1:
 		$npc_fidelity[$npclastgenerated] = 'cheater'
 	end
 
-!!	4 = is a serial cheater with no guilt
-!!	5 = has been cheating and feels guilty
-!!	6 = cheats on them with you for the first time
-
-	if npc_fidelity[$npclastgenerated] >= 4 and npc_fidelity[$npclastgenerated] <= 6: npc_girlfriend[$npclastgenerated] = rand(0,1)
+	if npc_fidelity[$npclastgenerated] <= 5:
+		if npctempgage >= 26 and rand(1,2) = 1 and npc_finance[$npclastgenerated] = 2:
+			npc_wife[$npclastgenerated] = rand(0,1)
+		else
+			npc_girlfriend[$npclastgenerated] = rand(0,1)
+		end
+	end
 
 !! initialise lover length in days
 	npc_lover_days[$npclastgenerated] = 0
@@ -600,15 +625,6 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 		end
 	end
 	
-	if rand(0,2) > 0:
-		if rand(0,1) = 1:
-			npc_neat[$npclastgenerated] = 1
-			npc_messy[$npclastgenerated] = 0
-		else
-			npc_messy[$npclastgenerated] = 1
-			npc_neat[$npclastgenerated] = 0
-		end
-	end
 	
 	!! npc_gentle = 1: npc is likely to have a soft emotional and physical touch outside of sex
 	!! npc_rough = 1: npc is likely to have a rough/aggressive emotional and physical touch outside of sex
@@ -617,11 +633,11 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 			npc_gentle[$npclastgenerated] = 1
 			npc_rough[$npclastgenerated] = 0
 		else
-			npc_gentle[$npclastgenerated] = 1
-			npc_rough[$npclastgenerated] = 0
+			npc_gentle[$npclastgenerated] = 0
+			npc_rough[$npclastgenerated] = 1
 		end
 	end
-	!! npc_diligent = 1: npc is more methodical, doesn''t like to skip steps, and usuallly plays it safe
+	!! npc_diligent = 1: npc is more methodical, doesn''t like to skip steps, and usually plays it safe
 	!! npc_risktaker = 1: npc is more likely to take risks, such as never using a condom
 	if rand(0,2) > 0:
 		if rand(0,1) = 1:
@@ -633,6 +649,16 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 		end
 	end
 	
+	if rand(0,2) > 0:
+		if rand(1,3) + npc_diligent[$npclastgenerated] > 2:
+			npc_neat[$npclastgenerated] = 1
+			npc_messy[$npclastgenerated] = 0
+		else
+			npc_messy[$npclastgenerated] = 1
+			npc_neat[$npclastgenerated] = 0
+		end
+	end
+	
 	!! if npc_argumentative = 1: they will get into more arguments with you about things
 	!! it is also harder to persuade them
 	npc_argumentative[$npclastgenerated] = rand(0,2)
@@ -669,15 +695,17 @@ $npc_dna[$npclastgenerated] = func('DNA','create')
 	
 !! ------------------------- sex related preferences ----------------------------------
 
-	if rand(0,1) >= 1 and npc_risktaker[$npclastgenerated] ! 1:
+!!	if rand(0,1) >= 1 and npc_risktaker[$npclastgenerated] ! 1:
+	if rand(0,1) >= 1:
 !!		if npc_condom_conscious = 1: they will use condoms but can be talked out of it
-!!		if npc_condom_conscious = 2: they will always insist on using condoms unless you are in a committed relationship 
+!!		if npc_condom_conscious = 2: they will always insist on using condoms unless you are in a committed relationship and/or trying for a baby
 		if npc_diligent[$npclastgenerated] = 1:
 			npc_condom_conscious[$npclastgenerated] = rand(-1,2)
 		else
 			npc_condom_conscious[$npclastgenerated] = rand(-2,2)
 		end
-	elseif npc_diligent[$npclastgenerated] ! 1:
+!!	elseif npc_diligent[$npclastgenerated] ! 1:
+	else
 !!		if npc_no_condoms = 1: they have a preference for skipping condoms but can be talked into using one
 !!		if npc_no_condoms = 2: they will never use a condom no matter what
 		if npc_risktaker[$npclastgenerated] = 1:

locations/npcpreservec.qsrc

@@ -86,19 +86,14 @@ if mid($npctemp,1,1) = 'C':
 	
 	npc_start_free_time[$npclastsaved] = npc_start_free_time[$npctemp]
 	npc_end_free_time[$npclastsaved] = npc_end_free_time[$npctemp]
-	npc_day_off[$npclastsaved]  		= npc_day_off[$npctemp]
+	npc_work_start[$npclastsaved] 	= npc_work_start[$npctemp]
+	npc_work_end[$npclastsaved] = npc_work_end[$npctemp]
+	
+	npc_day_off[$npclastsaved]		 = npc_day_off[$npctemp]
 	
 	npc_car[$npclastsaved]  		= npc_car[$npctemp]
 	npc_intel[$npclastsaved]		= npc_intel[$npctemp]
 	npc_humor[$npclastsaved]		= npc_humor[$npctemp]
-	npc_fav_pos[$npclastsaved]		= npc_fav_pos[$npctemp]
-	$npc_fav_pos[$npclastsaved]		= $npc_fav_pos[$npctemp]
-	npc_sex_speed[$npclastsaved]	= npc_sex_speed[$npctemp]
-	npc_cum_pref[$npclastsaved]		= npc_cum_pref[$npctemp]
-	$npc_cum_pref[$npclastsaved]	= $npc_cum_pref[$npctemp]
-	$npc_bukakke_fetish[$npclastsaved]	= $npc_bukakke_fetish[$npctemp]
-	npc_tit_pref[$npclastsaved]		= npc_tit_pref[$npctemp]
-	npc_bush_pref[$npclastsaved]	= npc_bush_pref[$npctemp]
 
 	npc_style[$npclastsaved]		= npc_style[$npctemp]
 	npc_smoker[$npclastsaved]		= npc_smoker[$npctemp]
@@ -111,6 +106,7 @@ if mid($npctemp,1,1) = 'C':
 	
 	npc_fidelity[$npclastsaved]		= npc_fidelity[$npctemp]
 	$npc_fidelity[$npclastsaved]	= $npc_fidelity[$npctemp]
+	npc_wife[$npclastsaved]			= npc_wife[$npctemp]
 	npc_girlfriend[$npclastsaved]	= npc_girlfriend[$npctemp]
 	npc_lover_days[$npclastsaved]	= 0
 	npc_lover_keys[$npclastsaved]	= 0
@@ -121,8 +117,13 @@ if mid($npctemp,1,1) = 'C':
 	npc_latesleeper[$npclastsaved]	= npc_latesleeper[$npctemp]
 	npc_generous[$npclastsaved]		= npc_generous[$npctemp]
 	npc_selfish[$npclastsaved] 		= npc_selfish[$npctemp]
+	npc_gentle[$npclastsaved] 		= npc_gentle[$npctemp]
+	npc_rough[$npclastsaved] 		= npc_rough[$npctemp]
 	npc_risktaker[$npclastsaved] 	= npc_risktaker[$npctemp]
 	npc_diligent[$npclastsaved] 	= npc_diligent[$npctemp]
+	npc_neat[$npclastsaved] 		= npc_neat[$npctemp]
+	npc_messy[$npclastsaved] 		= npc_messy[$npctemp]
+	npc_diligent[$npclastsaved] 	= npc_diligent[$npctemp]
 	
 	npc_argumentative[$npclastsaved]	= npc_argumentative[$npctemp]
 	npc_competitive[$npclastsaved]		= npc_competitive[$npctemp]
@@ -132,12 +133,28 @@ if mid($npctemp,1,1) = 'C':
 	npc_caretaker[$npclastsaved] 		= npc_caretaker[$npctemp]
 	npc_childfree[$npclastsaved]		= npc_childfree[$npctemp]
 	npc_abusive[$npclastsaved] 			= npc_abusive[$npctemp]
+
+	npc_cuddler[$npclastsaved] 			= npc_cuddler[$npctemp]
+
+!!	sex traits and stats
 	npc_sexdrive[$npclastsaved] 		= npc_sexdrive[$npctemp]
 	npc_sex_stamina[$npclastsaved] 		= npc_sex_stamina[$npctemp]
+	
+	npc_fav_pos[$npclastsaved]		= npc_fav_pos[$npctemp]
+	$npc_fav_pos[$npclastsaved]		= $npc_fav_pos[$npctemp]
+	npc_sex_speed[$npclastsaved]	= npc_sex_speed[$npctemp]
+	npc_gentle_lover[$npclastsaved]	= npc_gentle_lover[$npctemp]
+	npc_dirty_lover[$npclastsaved]	= npc_dirty_lover[$npctemp]
+	npc_sensual_lover[$npclastsaved]= npc_sensual_lover[$npctemp]
+	npc_cum_pref[$npclastsaved]		= npc_cum_pref[$npctemp]
+	$npc_cum_pref[$npclastsaved]	= $npc_cum_pref[$npctemp]
+	$npc_bukakke_fetish[$npclastsaved]	= $npc_bukakke_fetish[$npctemp]
+	npc_tit_pref[$npclastsaved]		= npc_tit_pref[$npctemp]
+	npc_bush_pref[$npclastsaved]	= npc_bush_pref[$npctemp]
+	npc_cum_cannon[$npclastsaved]		= npc_cum_cannon[$npctemp]
 	npc_sex_spanker[$npclastsaved] 		= npc_sex_spanker[$npctemp]
 	npc_pussyeater[$npclastsaved]		= npc_pussyeater[$npctemp]
-	npc_cuddler[$npclastsaved] 			= npc_cuddler[$npctemp]
-	npc_cum_cannon[$npclastsaved]		= npc_cum_cannon[$npctemp]
+
 
 	$npc_index[$npclastsaved] = $npclastsaved
 

locations/pav_disco.qsrc

@@ -385,6 +385,28 @@ if $ARGS[0] = '':
 			gs 'stat'
 			act 'Continue': gt 'pav_disco'
 		end
+		act'Dance provocatively':
+			minut += 15
+			pcs_stam -= 5
+			gs 'sweat', 'add', 3
+			fat -= 1
+			gs 'exp_gain', 'danc', 1
+			pcs_mood += 10
+			frost = 0
+			gs 'stat'
+			cla & *clr
+			'<center><b><font color="maroon">Disco</font></b></center>'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/dance.jpg"></center>'
+			gs 'pav_disco', 'dance_partner'
+			gs 'stat'
+			'You head out to the dance floor with the intention of attracting some attention. It''s not long before you catch someone''s eye...'
+			*nl
+			'<<$din_disc_dance2>>'
+			act 'Move away': gt 'pav_disco'
+			act 'Dance with the guy': gt 'pav_disco', 'dance_vrp'
+			exit
+		end
+		
 		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0: act 'Look for your classmates': gt 'pav_disco_classmates', 'classmates'
 	elseif hour < 20:
 		'<center><b><font color="maroon">Disco</font></b></center>'
@@ -624,7 +646,7 @@ if $ARGS[0] = 'dance_vrp':
 							act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
-					act 'Go to the hotel': gt 'pav_disco_sex', 'hotel'
+					act 'Go to the hotel':sex_ev['pav_hotel'] = 1 & gt 'pav_disco_sex', 'hotel'
 				end
 			elseif DPtipe = 2:
 				$npc_usedname[$npclastcalled] = $npc_nickname[$npclastcalled]
@@ -683,6 +705,8 @@ if $ARGS[0] = 'dance_partner':
 			end
 		elseif DaPaTipeRand >= 90:
 			!!traveling_expenses
+			npc_residence[$boy] = rand(3,4)
+			npc_finance[$boy] = 2
 			bmtimeTipe = 2
 			DrunkDPTrand = rand(0,100)
 
@@ -797,6 +821,7 @@ if $ARGS[0] = 'familiar2':
 			if bmTip[Tboynum] = 1:gt 'pav_disco_sex', 'outside'
 			if bmTip[Tboynum] = 2:
 				DPtipe = 2
+				sex_ev['pav_hotel'] = 1
 				gt 'pav_disco_sex', 'hotel'
 			end
 		end

locations/pav_hotel.qsrc

@@ -220,6 +220,8 @@ act 'Kill some time in the hotel lobby':
 	gt 'pav_hotel'
 end
 
+gs 'booty_call', 'hotel_links'
+
 if $ARGS[0] = 'Pavlin' :
 	*clr & cla
 	menu_off = 1

locations/saveupdater.qsrc

@@ -402,6 +402,8 @@ if temp_current_save_version  < 00080100:
 		$model['nickname']  = $pcs_nickname
 		$model['lastname']  = $pcs_lastname
 	end
+	
+	if $model['pay_method'] = '': $model['pay_method'] = 'cash_envelope'
 
 	!! Fixing Katja and Natasha relationship
 	if npc_sex['A14'] > 1: npc_sex['A14'] = 1
@@ -2052,15 +2054,19 @@ if temp_current_save_version < 00090003:
 	if cltarelka > 0:		 mc_inventory['dish_plates']	= cltarelka 	  &killvar'cltarelka'
 	if tkan > 0:			 mc_inventory['sewing_fabric']	= tkan 			  &killvar'tkan'
 	if sewing_kit > 0:		 mc_inventory['sewing_kit']		= sewing_kit	  &killvar'sewing_kit'
-	if TV > 0:		 mc_inventory['tech_tv']		= TV	  &killvar'TV'
-	if komp > 0:		 mc_inventory['tech_computer']		= komp	  &killvar'komp'
-	if GameCD2 > 0:		 mc_inventory['tech_game_ds']		= GameCD2	  &killvar'GameCD2'
-	if posudomashina > 0:		 mc_inventory['tech_dishwasher']		= posudomashina	  &killvar'posudomashina'
-	if stiralka > 0:		 mc_inventory['tech_washing_machine']		= stiralka	  &killvar'stiralka'
-	if zenit > 0:		 mc_inventory['tech_camera']		= zenit	  &killvar'zenit'
-	if minifoto > 0:		 mc_inventory['tech_hidden_cam']		= minifoto	  &killvar'minifoto'
-	if webcamera > 0:		 mc_inventory['tech_webcam']		= webcamera	  &killvar'webcamera'
-!	if  > 0:		 mc_inventory['']		= 	  &killvar''
+	if TV > 0:	 		 	 mc_inventory['tech_tv']		= TV	  		  &killvar'TV'
+	if komp > 0:			 mc_inventory['tech_computer']	= komp	 		  &killvar'komp'
+	if GameCD2 > 0:			 mc_inventory['tech_game_ds']	= GameCD2		  &killvar'GameCD2'
+	if posudomashina > 0:	 mc_inventory['tech_dishwasher']= posudomashina	  &killvar'posudomashina'
+	if stiralka > 0:		 mc_inventory['tech_washing_machine']	= stiralka&killvar'stiralka'
+	if zenit > 0:			 mc_inventory['tech_camera']	= zenit		 	  &killvar'zenit'
+	if minifoto > 0:		 mc_inventory['tech_hidden_cam']= minifoto		  &killvar'minifoto'
+	if webcamera > 0:		 mc_inventory['tech_webcam']	= webcamera		  &killvar'webcamera'
+	if ms_pill > 0:			 mc_inventory['meds_morning_sick']	= ms_pill	  &killvar'ms_pill'
+	if preg_ball > 0:		 mc_inventory['preg_ball']		= preg_ball		  &killvar'preg_ball'
+	if preg_brace > 0:		 mc_inventory['preg_brace']		= preg_brace	  &killvar'preg_brace'
+	if preg_pillow > 0:		 mc_inventory['preg_pillow']	= preg_pillow	  &killvar'preg_pillow'
+!	if  > 0:		 mc_inventory['']		= 	  &killvar''	
 end
 
 killvar 'temp_current_save_version'

locations/sex_ev_after.qsrc

@@ -5,7 +5,8 @@ if $ARGS[0] = 'quit':
 		act'Leave in anger':
 			cla & *clr
 			$sex_ev['bed_room']
-			'"You know what, <<$npc_firstname[$boy]>>? <i>Fuck you!</i>" You leap off the bed in a huff, quickly grabbing your things and throwing your clothes on.'
+			'"You know what? <i>Fuck you!</i>"'
+			'You leap off the bed in a huff and start grabbing your things and throwing your clothes on.'
 			!! if npc_abusive[$boy] > 0 and rand(1,10) > number:
 			!! get raped
 			!! else
@@ -47,64 +48,75 @@ end
 
 if $ARGS[0] = 'stop_here':
 	act'Ask to stop':
-		sex_ev['finish_ask'] = 1
+		cla
+		act'Go back': cla & gs 'sex_ev_sex', 'sex_end'
 		if sex_ev['sleep_fuck'] > 0:
-			cla & *clr
-			$sex_ev['bed_room']
-			'"Satisfied?" you ask sleepily.'
-			gs'sex_ev_after', 'stop_here2'
-		elseif sex_ev['blowjob_continue_ask'] = 1:
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
-			'"There, happy now?" you ask, playing with his cock.'
-			gs'sex_ev_after', 'stop_here2'
-		else
-			cla
-			act'You good to stop here?':
-				if sex_ev['keep_going_continue'] > 0:
-					cla & *clr
-					gs 'sex_ev_sex', 'inserted_img'
-					'"Is that good enough for you now?" you ask.'
-				elseif sex_ev['first_break'] = 1:
-					cla & *nl
-					'"Actually," you say. "I''m happy if we just to finish here. How about you?"'
-				else
-					cla & *clr
-					gs 'sex_ev_sex', 'inserted_img'
-					'"I think I''m good here," you say. "How about you?"'
-				end
-				gs'sex_ev_after', 'stop_here2'
-			end
-			
-			act'I''m shattered':
+			act'Confirm':
 				cla & *clr
-				gs 'sex_ev_sex', 'inserted_img'
-				if sex_ev['consecutive_orgasm'] = 1:
-					'"Can we... stop here...?" you pant tiredly. "That last orgasm really took it out of me. I''m shattered..."'
-				elseif sex_ev['consecutive_orgasm'] > 1:
-					'"Can we... stop here...?" you pant tiredly. "You made me come so many times in a row... I''m shattered..."'
-				else
-					'"Can we... stop here...?" you pant tiredly. "I''m absolutely shattered..."'
-				end
+				$sex_ev['bed_room']
+				'"Satisfied?" you ask sleepily.'
 				gs'sex_ev_after', 'stop_here2'
 			end
-			
-			act'Need to get going':
+		elseif sex_ev['blowjob_continue_ask'] = 1:
+			act'Confirm':
 				cla & *clr
-				gs 'sex_ev_sex', 'inserted_img'
-				'"You mind if we stop here?" you ask. "I need to get going soon."'
+				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+				'"There, happy now?" you ask, playing with his cock.'
 				gs'sex_ev_after', 'stop_here2'
 			end
-			
-			gs'sex_ev_pillow_talk2', 'wakeup_sex_late_for_school'
+		else
+			act'Confirm':
+				cla
+				gs'sex_ev_after', 'stop_here_menu'
+			end
 		end
 !!		gs'sex_ev_after', 'stop_here2'
 !!		gs'sex_ev_after', 'after_sex2'
 	end
 end
 
-if $ARGS[0] = 'stop_here2':
+if $ARGS[0] = 'stop_here_menu':
+	act'You good to stop here?':
+		if sex_ev['keep_going_continue'] > 0:
+			cla & *clr
+			gs 'sex_ev_sex', 'inserted_img'
+			'"Is that good enough for you now?" you ask.'
+		elseif sex_ev['first_break'] = 1:
+			cla & *nl
+			'"Actually," you say. "I''m happy if we just to finish here. How about you?"'
+		else
+			cla & *clr
+			gs 'sex_ev_sex', 'inserted_img'
+			'"I think I''m good here," you say. "How about you?"'
+		end
+		gs'sex_ev_after', 'stop_here2'
+	end
+	
+	act'I''m shattered':
+		cla & *clr
+		gs 'sex_ev_sex', 'inserted_img'
+		if sex_ev['consecutive_orgasm'] = 1:
+			'"Can we... stop here...?" you pant tiredly. "That last orgasm really took it out of me. I''m shattered..."'
+		elseif sex_ev['consecutive_orgasm'] > 1:
+			'"Can we... stop here...?" you pant tiredly. "You made me come so many times in a row... I''m shattered..."'
+		else
+			'"Can we... stop here...?" you pant tiredly. "I''m absolutely shattered..."'
+		end
+		gs'sex_ev_after', 'stop_here2'
+	end
+	
+	act'Need to get going':
+		cla & *clr
+		gs 'sex_ev_sex', 'inserted_img'
+		'"You mind if we stop here?" you ask. "I need to get going soon."'
+		gs'sex_ev_after', 'stop_here2'
+	end
+	
+	gs'sex_ev_pillow_talk2', 'wakeup_sex_late_for_school'
+end
 
+if $ARGS[0] = 'stop_here2':
+	sex_ev['finish_ask'] = 1
 	if totminut > sex_ev['start_time'] + 60 and sex_ev['cum_count'] > 0:
 		gs'sex_ev_after', 'finish_sex'
 	elseif sex_ev['cum_count'] < npc_sexdrive[$boy] - rand(1,3) and sex_ev['blowjob_continue_ask'] ! 1:
@@ -409,6 +421,35 @@ if $ARGS[0] = 'tap_out':
 	end
 end
 
+if $ARGS[0] = 'stop_hurry1':
+	act'"You good?"':
+		cla & *clr
+		gs 'sex_ev_sex', 'inserted_img'
+		'"You good?" you ask <<$npc_firstname[$boy]>>.'
+		if sex_ev['cum_count'] < npc_sexdrive[$boy] - rand(1,3):
+			'"Good enough for now, I guess," he pants. "You gotta go, right?"'
+			'"Yeah," you say wistfully. "Sorry. And thanks."'
+		else
+			'"Yeah, I''m good," he sighs with satisfaction.'
+		end
+		act'Pull apart': gs'sex_ev_after', 'stop_hurry2'
+	end
+	
+	if sex_ev['fuck_enjoyment'] < 1:
+		
+	end
+end
+
+if $ARGS[0] = 'stop_hurry2':
+	cla & *clr
+	if sex_ev['cock_inserted'] = 1:
+		gs 'sex_ev_after', 'pull_apart'
+	else
+		$sex_ev['bed_room']
+	end
+	gs 'sex_ev_after', 'after_sex2'
+end
+
 if $ARGS[0] = 'fucked_out':
 	cla & *clr
 	sex_ev['fucked_out'] += 1
@@ -536,7 +577,7 @@ if $ARGS[0] = 'his_wipes':
 				cumspclnt = 1
 			end
 			cla & *clr
-			if cumloc[11] > 0 or $sex_ev['last_cum'] = 'facial':
+			if cum_loc['face'] > 0 or $sex_ev['last_cum'] = 'facial':
 				!! face
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial36.jpg"></center>'
 				if sex_ev['wipes'] = 2:
@@ -546,13 +587,13 @@ if $ARGS[0] = 'his_wipes':
 					'You reach up and poke at the sperm coating your face. Ew. You really need to clean that up before you do anything else. Reaching down to your purse, you pull some wipes out of your purse.'
 				end
 				*nl
-				if cumloc[16] > 0:
+				if cum_loc['hair'] > 0:
 					!! hair
 					'You carefully wipe the cum from your face, making sure to get every last drop, including getting the tangled web that <<$npc_firstname[$boy]>> managed to get in your hair. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
 				else
 					'You carefully wipe the cum from your face, making sure to get every last drop. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
 				end
-			elseif cumloc[14] > 0 or $sex_ev['last_cum'] = 'stomach':
+			elseif cum_loc['stomach'] > 0 or $sex_ev['last_cum'] = 'stomach':
 				!! stomach
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/bellycum3.jpg"></center>'
 				if sex_ev['wipes'] = 2:
@@ -561,7 +602,7 @@ if $ARGS[0] = 'his_wipes':
 				else
 					'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse.'
 				end
-			elseif cumloc[4] > 0 or $sex_ev['last_cum'] = 'ass' or $sex_ev['last_cum'] = 'back':
+			elseif cum_loc['butt'] > 0 or $sex_ev['last_cum'] = 'ass' or $sex_ev['last_cum'] = 'back':
 				!! butt
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
 				if sex_ev['wipes'] = 2:
@@ -570,7 +611,7 @@ if $ARGS[0] = 'his_wipes':
 				else
 					'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse, awkwardly wiping your ass and back with it.'
 				end
-			elseif cumloc[0] > 0 or $sex_ev['last_cum'] = 'creampie':
+			elseif cum_loc['vagina'] or $sex_ev['last_cum'] = 'creampie':
 				!! vagina
 				if hypnoAddict > 0:
 					$sex_ev['bed_room']
@@ -1045,40 +1086,42 @@ if $ARGS[0] = 'cum_clean':
 			cla
 			act'Never mind': cla & gs 'sex_ev_sex', 'sex_end'
 			
-			act'Ask him if he has any wipes':
-				sex_ev['cock_inserted'] = 0
-				gs 'cum_cleanup', 'cleanloc'
-				gs'stat'
-				cla & *clr
-				
-				if cum_loc['face'] > 0:
-					gs'sex_ev_reactions', 'facial_smile_img'
-					'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your face.'
-				elseif cum_loc['vagina'] > 0:
-					'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/after1.mp4"></video></center>'
-					'"Got anything for this?" you ask, smiling wryly as you wipe your hands through your legs at the globs of cum still leaking from between them.'
-				elseif cum_loc['hands'] > 0:
-					$sex_ev['bed_room']
-					'"Got anything for this?" you ask, holding up your hand, spreading your fingers to emphasize the sticky strands of cum hanging from them.'
-				else
-					$sex_ev['bed_room']
-					'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your body.'
-				end
-				if sex_ev['sex_over'] > 0:
-					'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer. He pulls one out and starts wiping himself down, tossing you the bag.'
-				else
-					'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer and tossing it over.'
-				end
-				*nl
-				'You pull out a handful and clean yourself off as well. Following <<$npc_firstname[$boy]>>''s lead, you finish by tossing the used wipe into a small trashcan in the corner of the room.'
-				if sex_ev['sex_over'] = 1:
-					gs'sex_ev_after', 'after_sex1'
-				else
-					gs'sex_ev_sex', 'sex_end'
+			if sex_ev['boy_in_shower'] ! 1:
+				act'Ask him if he has any wipes':
+					sex_ev['cock_inserted'] = 0
+					gs 'cum_cleanup', 'cleanloc'
+					gs'stat'
+					cla & *clr
+					
+					if cum_loc['face'] > 0:
+						gs'sex_ev_reactions', 'facial_smile_img'
+						'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your face.'
+					elseif cum_loc['vagina'] > 0:
+						'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/after1.mp4"></video></center>'
+						'"Got anything for this?" you ask, smiling wryly as you wipe your hands through your legs at the globs of cum still leaking from between them.'
+					elseif cum_loc['hands'] > 0:
+						$sex_ev['bed_room']
+						'"Got anything for this?" you ask, holding up your hand, spreading your fingers to emphasize the sticky strands of cum hanging from them.'
+					else
+						$sex_ev['bed_room']
+						'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your body.'
+					end
+					if sex_ev['sex_over'] > 0:
+						'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer. He pulls one out and starts wiping himself down, tossing you the bag.'
+					else
+						'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer and tossing it over.'
+					end
+					*nl
+					'You pull out a handful and clean yourself off as well. Following <<$npc_firstname[$boy]>>''s lead, you finish by tossing the used wipe into a small trashcan in the corner of the room.'
+					if sex_ev['sex_over'] = 1:
+						gs'sex_ev_after', 'after_sex1'
+					else
+						gs'sex_ev_sex', 'sex_end'
+					end
 				end
 			end
 			
-			if mc_inventory['makeup_wipes'] > 0:
+			if salfetka > 0:
 				act'Use your wipes':
 					gs'sex_ev_after', 'wipe_menu'
 					act'Clean everything':
@@ -1098,7 +1141,7 @@ if $ARGS[0] = 'cum_clean':
 					end
 				end
 			end
-
+			
 			if cumloc[13] > 0:
 				act'Lick your fingers clean':
 					sex_ev['cock_inserted'] = 0
@@ -1107,44 +1150,47 @@ if $ARGS[0] = 'cum_clean':
 					stat['swallow'] += 1
 					cla & *clr
 					'<center><img <<$set_imgh>> src="images/shared/sex/cum/lick_fingers.jpg"></center>'
-					'Briefly making eye contact with <<$npc_firstname[$boy]>>, you use your fingers to gather up all the loose cum on you and stick out your tongue, running it up your hand, licking every drop from it and into your mouth. You give your hand a thorough tongue bath, sucking your fingers clean at the end. Once finished, you smack your lips, smiling at <<$npc_firstname[$boy]>> who stared at you the whole time.'
-					if sex_ev['he_cleaned'] = 0:
-						'"Any chance I could get one of those?" he gestures towards his cock.'
-						act'You''re on your own':
-							cla & *clr
-							$sex_ev['bed_room']
-							'"Sorry soldier, but you''re on your own," you giggle.'
-							'"<i>Of course I am...</i>" He sighs but reaches for his nightstand, pulling a pack of wipes from it and gets to work cleaning himself up. Once he''s done, he tosses the used wipe into a trash can in the corner of his room.'
-							if sex_ev['sex_over'] = 1:
-								gs'sex_ev_after', 'after_sex1'
-							else
-								gs'sex_ev_sex', 'sex_end'
+					if sex_ev['boy_in_shower'] ! 1:
+						'Briefly making eye contact with <<$npc_firstname[$boy]>>, you use your fingers to gather up all the loose cum on you and stick out your tongue, running it up your hand, licking every drop from it and into your mouth. You give your hand a thorough tongue bath, sucking your fingers clean at the end. Once finished, you smack your lips, smiling at <<$npc_firstname[$boy]>> who stared at you the whole time.'
+						if sex_ev['he_cleaned'] = 0:
+							'"Any chance I could get one of those?" he gestures towards his cock.'
+							act'You''re on your own':
+								cla & *clr
+								$sex_ev['bed_room']
+								'"Sorry soldier, but you''re on your own," you giggle.'
+								'"<i>Of course I am...</i>" He sighs but reaches for his nightstand, pulling a pack of wipes from it and gets to work cleaning himself up. Once he''s done, he tosses the used wipe into a trash can in the corner of his room.'
+								if sex_ev['sex_over'] = 1:
+									gs'sex_ev_after', 'after_sex1'
+								else
+									gs'sex_ev_sex', 'sex_end'
+								end
 							end
-						end
 
-						act'Sure':
-							cla & *clr
-							'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
-							'"Sure thing," you smile. Crawling forward between his legs, you bend down and run your lips up and down his shaft, sucking, kissing, and licking every curve and contour until it''s completely clean.'
-							'"There. All better?"'
-							'"Much better," he smiles back.'
-							if sex_ev['cum_count'] < npc_sexdrive[$boy]:
-								*nl
-								'He seems more than pleased by your act of service, considering the stiffness that seems to have returned to his dick under your touch.'
+							act'Sure':
+								cla & *clr
+								'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+								'"Sure thing," you smile. Crawling forward between his legs, you bend down and run your lips up and down his shaft, sucking, kissing, and licking every curve and contour until it''s completely clean.'
+								'"There. All better?"'
+								'"Much better," he smiles back.'
+								if sex_ev['cum_count'] < npc_sexdrive[$boy]:
+									*nl
+									'He seems more than pleased by your act of service, considering the stiffness that seems to have returned to his dick under your touch.'
+								end
+								if sex_ev['sex_over'] = 1:
+									gs'sex_ev_after', 'after_sex1'
+								else
+									gs'sex_ev_after', 'stop_here'
+									gs 'sex_ev_sex', 'keep_going'
+								end
 							end
+						else
+							'You lick the sticky salty liquid off your fingers and gulp it down.'
 							if sex_ev['sex_over'] = 1:
-								gs'sex_ev_after', 'after_sex1'
+								act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
 							else
-								gs'sex_ev_after', 'stop_here'
-								gs 'sex_ev_sex', 'keep_going'
+								gs'sex_ev_sex', 'sex_end'
 							end
 						end
-					else
-						if sex_ev['sex_over'] = 1:
-							gs'sex_ev_after', 'after_sex1'
-						else
-							gs'sex_ev_sex', 'sex_end'
-						end
 					end
 				end
 			end
@@ -1153,13 +1199,13 @@ if $ARGS[0] = 'cum_clean':
 end
 
 if $ARGS[0] = 'facial_mouth_clean':
-	if $sex_ev['cum_choice'] = 'facial' or $sex_ev['cum_choice'] = 'face_mouth':
+	if ($sex_ev['last_cum'] = 'facial' or $sex_ev['last_cum'] = 'face_mouth') and sex_ev['boy_in_shower'] ! 1:
 		act'Clean him off with your mouth':
 			sex_ev['react'] = 1
 			gs'stat'
 			cla & *clr
-!!			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial24.jpg"></center>'
-			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial24.jpg"></center>'
+!!			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
 			if sex_ev['fuck_count'] > 0 and sex_ev['no_condom'] = 1:
 				'You lean forward, wrapping your lips around <<$npc_firstname[$boy]>> and run them up and down to clean him off. You can faintly taste the salty sweetness of yourself on his cock, as well as the remnants of cum that was still inside it, drawn out your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
 			else
@@ -1221,29 +1267,29 @@ if $ARGS[0] = 'pull_apart':
 	if $sex_ev['cum_choice'] = 'creampie':
 		if $sex_ev['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'<<$npc_firstname[$boy]>> climbs off of you, removing his cock from your pussy in the process, and flops down on the other side of the bed. His cum seeps from your pussy, trickling down the crack of your ass into the bedsheets.'
 		elseif $sex_ev['position'] = 'doggy':
 			'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'<<$npc_firstname[$boy]>> pulls out from behind you and you roll over together onto your backs. His cum seeps from your pussy, slowly oozing down your thighs.'
 		elseif $sex_ev['position'] = 'cowgirl':
 			'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'You climb off of <<$npc_firstname[$boy]>> and flop down next to him. As soon as his cock vacates your pussy, cum begins to drip from it, trickling down the crack of your ass into the bedsheets.'
 		end
 	else
 		if $sex_ev['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'<<$npc_firstname[$boy]>> removes his cock from your pussy, climbing out from between your legs, flopping onto the other side of the bed.'
 		elseif $sex_ev['position'] = 'doggy':
 			'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'<<$npc_firstname[$boy]>> pulls out from behind you and you roll over together onto your backs.'
 		elseif $sex_ev['position'] = 'cowgirl':
 			'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
-			$sex_ev['end_comment']
+			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
 			'You climb off of <<$npc_firstname[$boy]>>, letting his cock slip from your pussy, and flop down beside him.'
 		end
 	end
@@ -1256,11 +1302,12 @@ if $ARGS[0] = 'after_sex2_w_picture':
 end
 
 if $ARGS[0] = 'after_sex2':
+	sex_ev['sex_over'] = 1
 	sex_ev['pillow_talking'] = 0
 	if sex_ev['morning_after'] > 0:
 		act'Get on with the morning':
 			cla & *clr
-			gs'sex_ev_morning', 'wakeup2'
+			gs'sex_ev_morning', 'morning_menu2'
 		end
 	elseif sex_ev['sleep_fuck'] > 0:
 		act'Go back to sleep':
@@ -1276,7 +1323,7 @@ if $ARGS[0] = 'after_sex2':
 			act'Get dressed':gt'sex_ev_leave', 'dressing1'
 		end
 	end
-	if sex_ev['npc_late'] ! 1 and $clothingworntype = 'nude':
+	if sex_ev['npc_late'] ! 1 and $clothingworntype = 'nude' and sex_ev['boy_in_shower'] ! 1:
 		act'Relax together':
 			cla & *clr
 			if sex_ev['get_up'] = 1:
@@ -1295,7 +1342,34 @@ if $ARGS[0] = 'after_sex2':
 		end
 	end
 	
-	act'Use his bathroom':gt'sex_ev_after', 'boy_bathroom'
+	if sex_ev['boy_in_shower'] ! 1:
+		act'Use the bathroom':gt'sex_ev_after', 'boy_bathroom'
+	elseif sex_ev['boy_in_shower'] = 1 and sex_ev['boy_shower'] ! 1:
+		if npc_apt_type[$boy] = 2 or $sex_ev['loc'] = 'hotel_room':
+			'<<$npc_firstname[$boy]>> is in the shower. You can hear the water running through the door.'
+		elseif npc_apt_type[$boy] = 3 and $sex_ev['loc'] ! 'pc_home':
+			'<<$npc_firstname[$boy]>> is in the shower and you can hear water running through the wall.'
+		else
+			'<<$npc_firstname[$boy]>> is taking a shower somewhere else in his apartment.'
+		end
+		
+		act'Wait for <<$npc_firstname[$boy]>> to finish':
+			cla & *clr
+			$sex_ev['bed_room']
+			'You wait patiently on the bed for <<$npc_firstname[$boy]>> to finish his shower.'
+			act'Continue':gs'sex_ev_shower', 'boy_shower_finish'
+		end
+		
+		act'Join him in the shower':gs'sex_ev_shower', 'after_shower_join'
+		
+		if sex_ev['drawer_rummage'] = 0 and sex_ev['loc'] ! 'pc_home':
+			if  sex_ev['loc'] = 'hotel_room':
+				'<<$npc_firstname[$boy]>>''s <a href="exec:gs ''sex_ev_events'',''sneak_phone''">phone</a> lays on top of the hotel room <a href="exec:gs ''sex_ev_events'',''rummage_drawers_start''">dresser</a> unattended.'
+			else
+				'<<$npc_firstname[$boy]>>''s <a href="exec:gs ''sex_ev_events'',''sneak_phone''">phone</a> lays on top of his <a href="exec:gs ''sex_ev_events'',''rummage_drawers_start''">dresser</a> unattended.'
+			end
+		end
+	end
 		
 	if sex_ev['cigarette'] = 0 and (mc_inventory['cigarettes'] > 0 or npc_smoker[$boy] > 0) and sex_ev['npc_late'] ! 1:
 		act'Smoke a cigarette':cla & gs'sex_ev_after', 'smoke_ciga1'
@@ -1306,6 +1380,20 @@ if $ARGS[0] = 'after_sex2':
 	gs'sex_ev_after', 'plan_b'
 	gs'sex_ev_after', 'birth_control_pill_take'
 	gs'sex_ev_after', 'spend_night_ask'
+	
+!!{	if sex_ev['boy_in_shower'] = 1:
+		if $sex_ev['loc'] = 'hotel_room':
+			
+		elseif npc_apt_type[$boy] = 2:
+			''
+		elseif npc_apt_type[$boy] = 3 and $sex_ev['loc'] ! 'pc_home':
+			'<<$npc_firstname[$boy]>> is in the shower and you can hear water running through the wall.'
+		else
+			'<<$npc_firstname[$boy]>> is taking a shower somewhere else in his apartment.'
+		end
+	end}
+	
+	gs 'sex_ev_events', 'boy_timecheck'
 end
 
 
@@ -1330,6 +1418,7 @@ if $ARGS[0] = 'after_sex_dressed':
 	else
 	
 	end
+	
 	act'Use the bathroom':gt'sex_ev_after', 'boy_bathroom'
 	
 	gs'sex_ev_leave', 'breakup_start'
@@ -1350,12 +1439,15 @@ if $ARGS[0] = 'boy_bathroom':
 	cla & *clr
 	$sex_ev['bath_room']
 	act'Back to the bedroom':
-		if sex_ev['dressed_to_go'] = 1:
-			gt 'sex_ev_after', 'after_sex_dressed'
+		cla
+		if sex_ev['dressed_to_go'] = 1:	
+			*clr
+			$sex_ev['bed_room']
+			gs 'sex_ev_after', 'after_sex_dressed'
 		elseif sex_ev['morning_after'] = 0:
 			gt 'sex_ev_after', 'after_sex2_w_picture'
 		else
-			gt 'sex_ev_morning', 'wakeup2'
+			gt 'sex_ev_morning', 'morning_menu2'
 		end
 	end
 	act'Use the mirror':
@@ -1391,11 +1483,11 @@ if $ARGS[0] = 'boy_bathroom':
 			act'Take a shower':gs'sex_ev_morning', 'shower'
 		end
 	end
-	if mc_inventory['sanitary_pads'] > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprokp = 0 and isprok = 0 and $pantyworntype ! 'none' and knowpreg = 0:
+	if sanpad > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprokp = 0 and isprok = 0 and $pantyworntype ! 'none' and knowpreg = 0:
 		act 'Use a sanitary pad (0:02)':
 			menu_off = 1
 			*clr & cla
-			mc_inventory['sanitary_pads'] -=  1
+			sanpad -= 1
 			isprokp = 1
 			minut += 2
 			pcs_mood -= 5
@@ -1405,11 +1497,11 @@ if $ARGS[0] = 'boy_bathroom':
 			act'Continue':gs'sex_ev_after', 'boy_bathroom'
 		end
 	end
-	if mc_inventory['tampons'] > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprok = 0 and isprokp = 0 and knowpreg = 0:
+	if tampon > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprok = 0 and isprokp = 0 and knowpreg = 0:
 		act 'Use a tampon (0:02)':
 			menu_off = 1
 			*clr & cla
-			mc_inventory['tampons'] -=  1
+			tampon -= 1
 			isprok = 1
 			minut += 2
 			pcs_mood -= 5
@@ -1470,11 +1562,12 @@ if $ARGS[0] = 'relax_together':
 	elseif pcs_sleep < 30 and sex_ev['get_up'] = 0 and sex_ev['angry_after'] = 0:
 		act'Rest your eyes':gt'sex_ev_after', 'bed'
 	end
+	gs'sex_ev_talk', 'sugar_daddy_pay'
 	gs'sex_ev_after', 'sore_pussy_msg'
 end
 
 if $ARGS[0] = 'cock_clean':
-	if sex_ev['cock_cleanup'] ! 1 and sex_ev['fuck'] > 0 and sex_ev['get_up'] ! 1:
+	if sex_ev['cock_cleanup'] ! 1 and sex_ev['fuck'] > 0 and sex_ev['get_up'] ! 1 and sex_ev['boy_in_shower'] ! 1 and sex_ev['boy_shower'] = 0:
 		act'Clean his cock':
 			sex_ev['cock_cleanup'] = 1
 			cla & *clr
@@ -1506,7 +1599,7 @@ if $ARGS[0] = 'kiss':
 		$orgasm_or = 'no'
 		sex_ev['after_kiss'] = 1
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/kiss1.jpg"></center>'
-		if npc_rel[$boy] < 50:
+		if npc_rel[$boy] < 100:
 			gs 'arousal', 'kiss', -2
 			if sex_ev['cuni_count'] > 0:
 				'You lean over to kiss <<$npc_firstname[$boy]>>, gently pressing your lips against his. They taste slightly salty, which you recognize as the taste of your own pussy, still on his lips from when he ate you out earlier.'
@@ -1534,8 +1627,17 @@ if $ARGS[0] = 'kiss':
 					gs 'sex_ev_after', 'relax_together'
 				end
 			end
+			if $npc_rel_type[$boy] = 'sugar_daddy':
+				act'Because you''re being paid':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"Cause you''re paying me," you smile wryly.'
+					gs 'sex_ev_after', 'relax_together'
+				end
+			end
 		else
-			gs 'arousal', 'kiss', -10, 'no_orgasm_msg'
+			!! revamp this later so it doesn''t always overwhelm all the options
+			gs 'arousal', 'kiss', -10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs 'arousal', 'kiss', rand(2,3)
 			'You lean over to kiss <<$npc_firstname[$boy]>>, gently pressing your lips against his. Instantly, it sparks something within you and the kiss takes on a passion of its own and you find yourself drinking him in; his taste, his scent, his tongue, feverishly pressing your faces together as if you might die at any second.'
 			*nl
@@ -1724,20 +1826,21 @@ if $ARGS[0] = 'smoke_ciga1':
 			gt'sex_ev_after', 'smoke_ciga2'
 		end
 	end
-	
-	act'Bum a cigarette':
-		sex_ev['bum_cigarette'] = 1
-		mc_inventory['cigarettes'] += 1
-		siga_bum = 1
-		gt'sex_ev_after', 'smoke_ciga_bum'
-	end
-	
-	act'Bum a cigarette and play with your phone':
-		sex_ev['bum_cigarette'] = 1
-		sex_ev['cigarette'] = 3
-		mc_inventory['cigarettes'] += 1
-		siga_bum = 1
-		gt'sex_ev_after', 'smoke_ciga_bum'
+	if sex_ev['boy_in_shower'] ! 1:
+		act'Bum a cigarette':
+			sex_ev['bum_cigarette'] = 1
+			mc_inventory['cigarettes'] += 1
+			siga_bum = 1
+			gt'sex_ev_after', 'smoke_ciga_bum'
+		end
+		
+		act'Bum a cigarette and play with your phone':
+			sex_ev['bum_cigarette'] = 1
+			sex_ev['cigarette'] = 3
+			mc_inventory['cigarettes'] += 1
+			siga_bum = 1
+			gt'sex_ev_after', 'smoke_ciga_bum'
+		end
 	end
 end
 
@@ -1745,7 +1848,7 @@ if $ARGS[0] = 'smoke_ciga2':
 	npc_know_pc_smoker[$boy] = 1
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke0.jpg"></center>'
-	if npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
+	if sex_ev['boy_in_shower'] ! 1 and npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
 		'Watching <<$npc_firstname[$boy]>> inspires you to reach for your own cigarettes and light up too.'
 	elseif sex_ev['annoyed'] > 0:
 		'Feeling very irritated at <<$npc_firstname[$boy]>>, you grab a cigarette and light up.'
@@ -1759,26 +1862,36 @@ if $ARGS[0] = 'smoke_ciga2':
 		gs 'drugs', 'smoke'
 		if sex_ev['phone'] = 2:gt'sex_ev_after', 'smoke_phone'
 		cla & *clr
-		if npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
-			sex_ev['boy_smoked'] = 1
-			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
-			if sex_ev['annoyed'] > 0:
-				'The two of you puff away in silence, smoking up your irritation and refusing to speak to one another.'
+		if sex_ev['boy_in_shower'] ! 1:
+			if npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
+				sex_ev['boy_smoked'] = 1
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
+				if sex_ev['annoyed'] > 0:
+					'The two of you puff away in silence, smoking up your irritation and refusing to speak to one another.'
+				else
+					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed. <<$npc_firstname[$boy]>> does the same beside you.'
+				end
 			else
-				'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed. <<$npc_firstname[$boy]>> does the same beside you.'
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
+				if sex_ev['annoyed'] > 0:
+					'You focus entirely on the cigarette in your mouth, making a point of ignoring <<$npc_firstname[$boy]>> for as long as it burns between your lips.'
+				elseif sex_ev['cigarette'] = 1:
+					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. The smoke trails hazily around the room as you enjoy another cigarette.'
+				else
+					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed.'
+				end
 			end
+			gs'sex_ev_after', 'relax_together'
 		else
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
-			if sex_ev['annoyed'] > 0:
-				'You focus entirely on the cigarette in your mouth, making a point of ignoring <<$npc_firstname[$boy]>> for as long as it burns between your lips.'
-			elseif sex_ev['cigarette'] = 1:
+			if sex_ev['cigarette'] = 1:
 				'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. The smoke trails hazily around the room as you enjoy another cigarette.'
 			else
 				'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed.'
 			end
+			gs'sex_ev_after', 'after_sex2'
 		end
 		sex_ev['cigarette'] = 1
-		gs'sex_ev_after', 'relax_together'
 	end
 end
 
@@ -1840,7 +1953,7 @@ if $ARGS[0] = 'smoke_phone':
 end
 
 if $ARGS[0] = 'spend_night_ask':
-	if (hour >= 20 or $daystage['desc'] = 'mid_night') and sex_ev['spend_night'] = 0 and sex_ev['angry_after'] = 0 and sex_ev['sleepover'] = 0 and $sex_ev['loc'] ! 'pc_home':
+	if (hour >= 20 or $daystage['desc'] = 'mid_night') and sex_ev['spend_night'] = 0 and sex_ev['angry_after'] = 0 and sex_ev['sleepover'] = 0 and $sex_ev['loc'] ! 'pc_home' and sex_ev['boy_in_shower'] ! 1:
 		act'Ask to spend the night':
 			sex_ev['spend_night'] = 1
 			cla & *clr
@@ -1907,7 +2020,7 @@ end
 if $ARGS[0] = 'spend_night':
 	if npc_cheating_know[$boy] = 1:
 		!! this means he''s cheating on someone with you and you know it
-		if rand(1,10) > 7 and hour < 22:
+		if rand(1,10) > 7 and hour < 20 and hour > 16:
 			sex_ev['cant_stay'] = 1
 			if $sex_ev['loc'] = 'npc_home':
 				'"Sorry, can''t. My girlfriend wanted to come over tonight. In fact, you should leave soon before she catches you."'
@@ -1920,6 +2033,8 @@ if $ARGS[0] = 'spend_night':
 		else
 			if $sex_ev['loc'] = 'npc_home':
 				'"Sure, my girlfriend isn''t gonna be around for a while. You can crash here."'
+			elseif $sex_ev['loc'] = 'hotel_room':
+				'"Sure. The room is booked until tomorrow anyways."'
 			else
 				'"Of course," he smiles.'
 			end
@@ -1939,7 +2054,7 @@ if $ARGS[0] = 'spend_night':
 			'"Ugh, really?"'
 			'"Yeah, I know. Sucks."'
 			gs'sex_ev_after', 'after_sex2'
-		elseif npc_girlfriend[$boy] = 1 and hour < 22:
+		elseif npc_girlfriend[$boy] = 1 and hour < 20 and hour > 16:
 			sex_ev['cant_stay'] = 1
 			npc_cheating_know[$boy] = 1
 			'"Sorry, my girlfriend is coming over soon. Can''t let her catch you here."'
@@ -2033,7 +2148,6 @@ end
 if $ARGS[0] = 'sleep_function':
 	gs 'sex_ev_sex', 'reset'
 	gs 'arousal', 'end'
-	if npc_latesleeper[$boy] = 0 and npc_caretaker[$boy] = 1 and rand(1,4) < 4 and $sex_ev['loc'] ! 'hotel_room': sex_ev['boy_make_breakfast'] = 1
 !!{	if $sex_ev['loc'] = 'npc_home':
 		if hour < 20:
 			sex_ev['lover_left'] = 1
@@ -2047,13 +2161,14 @@ if $ARGS[0] = 'sleep_function':
 	if rand(1,10) < npc_sexdrive[$boy] - (sex_ev['cum_count']/2) + npc_sleep_sex_okay[$boy] and (stat['think_virgin'] ! 1 or sex_ev['fuck_count'] > 0) and sex_ev['sleep_fuck'] = 0 and sex_ev['lover_left'] ! 1:
 		sex_ev['sleepover'] = 1
 		if rand(0,1) = 1:
+			sex_ev['sleep_fuck'] = 1
 			sex_ev['extra_cum'] += npc_sexdrive[$boy]/2
 			sex_ev['sleep_time'] = rand(1,3)
 			minut += 60*sex_ev['sleep_time']
 			pcs_sleep += 15*sex_ev['sleep_time']
 			pcs_health += 5*sex_ev['sleep_time']
 			gs'stat'
-			gt'sex_ev_sex', 'sleep_sex'
+			
 		else
 			sex_ev['sleepover'] = 1
 			if alko > 6:
@@ -2063,7 +2178,7 @@ if $ARGS[0] = 'sleep_function':
 				gs'sleep', 'simple'
 			end
 			sex_ev['extra_cum'] += npc_sexdrive[$boy]
-			gt'sex_ev_sex', 'wakeup_sex'
+			sex_ev['wake_fuck'] = 1
 		end
 	else
 		sex_ev['extra_cum'] += npc_sexdrive[$boy]
@@ -2077,7 +2192,31 @@ if $ARGS[0] = 'sleep_function':
 		end
 
 		if mid($start_type,1,2) = 'sg' and func('homes_properties', 'has_access', 'parents_home'): sveta_punishment['no_come_home'] = 1
-		gt'sex_ev_morning', 'morning'
+		gt'sex_ev_wakeup', 'start'
+	end
+	
+	if npc_latesleeper[$boy] = 0 and npc_caretaker[$boy] = 1 and rand(1,4) < 4 and $sex_ev['loc'] ! 'hotel_room':
+		sex_ev['boy_make_breakfast'] = 1
+		if sex_ev['boy_shower'] = 1: sex_ev['boy_shower'] = 0
+	elseif npc_earlyriser[$boy] = 1 and sex_ev['wake_fuck'] ! 1:
+		if rand(1,2) = 1:
+			sex_ev['boy_in_shower'] = 1
+		else
+			sex_ev['boy_shower'] = 1
+		end
+	else
+		if sex_ev['boy_shower'] = 1: sex_ev['boy_shower'] = 0
+	end
+	
+	if sex_ev['wake_fuck'] = 1:
+		gt'sex_ev_sex', 'wakeup_sex'
+	elseif sex_ev['sleep_fuck'] = 0:
+		gt'sex_ev_wakeup', 'start'
+	elseif sex_ev['sleep_fuck'] = 1:
+		gt'sex_ev_sex', 'sleep_sex'
+	else
+		!! failsafe option
+		gt'sex_ev_wakeup', 'start'
 	end
 end
 --- sex_ev_after ---------------------------------

locations/sex_ev_boy_pillow_talk.qsrc

@@ -0,0 +1,1024 @@
+# sex_ev_boy_pillow_talk
+
+!! ------------------------------ BOY INITIATED CONVERSATIONS -------------------------------------------------
+if $ARGS[0] = 'boy_talk':
+	if sex_ev['boy_topic_check'] = 0: gs 'sex_ev_boy_pillow_talk', 'boy_topic_check'
+	
+	if sex_ev['boy_topics'] > 0 and rand(0,1) = 1:
+!!		:boy_talk_loop
+		if sex_ev['good_for_you'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
+			cla
+			act'<<$npc_firstname[$boy]>> has something to say':gs 'sex_ev_favorite_part', 'boy_good_for_you'
+!!		elseif sex_ev['boy_pube_talk'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
+!!			cla
+!!			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'boy_pube_talk'
+		elseif sex_ev['no_kids'] = 1 and npc_know_no_kids[$boy] = 1 and sex_ev['no_kids_talk'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
+			cla
+			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'boy_no_kids'
+		elseif sex_ev['boy_shower'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
+			cla
+			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'boy_take_shower'
+		
+!!		elseif sex_ev['no_swallow_talk'] = 0 and sex_ev['cum_mouth'] > 0 and sex_ev['swallow_count'] = 0 and rand(1,2) = 1:
+!!			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'dont_swallow_talk'
+
+!!		elseif sex_ev['always_swallow_talk'] = 0 and (sex_ev['cum_mouth'] = sex_ev['swallow_count'] or sex_ev['always_swallow'] = 1) and rand(1,2) = 1:
+!!			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'dont_swallow_talk'
+
+		elseif sex_ev['broken_condom'] >= 1 and sex_ev['broken_condom_talk'] = 0 and rand(1,2) = 1:
+			cla
+			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_boy_pillow_talk', 'boy_broken_condom'
+!!		elseif sex_ev['creampie_okay'] = 0:
+		
+!!		elseif sex_ev['boy_no_kids'] = 0:
+		else
+!!			cla & gs'sex_ev_pillow_talk', 'topic_route'
+!!			jump 'boy_talk_loop'
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_topic_check':
+	sex_ev['boy_topics'] = 0
+	
+	if npc_thinkage[$boy] = 0 and sex_ev['age_ask_talk'] = 0: sex_ev['boy_topics'] += 1
+	
+	if sex_ev['cum_count'] >= (npc_sexdrive[$boy] / 4 * 3) and sex_ev['good_for_you'] ! 1: sex_ev['boy_topics'] += 1
+	if sex_ev['broken_condom'] >= 1 and sex_ev['broken_condom_talk'] ! 1 and (npc_selfish ! 1 and (npc_childfree = 1 or npc_caretaker = 1)): sex_ev['boy_topics'] += 1
+!!	if sex_ev['surprise_creampie_count'] >= 1 and sex_ev['creampie_okay'] ! 1: sex_ev['boy_topics'] += 1
+
+!!	DISABLED UNTIL YOU PUSH THE PUBIC STYLE CHANGES IN BODY_DIN
+!!	if sex_ev['boy_pube_talk'] ! 1 and $npc_know_pubeshape[$boy] ! $pube_style['shape']: sex_ev['boy_topics'] += 1
+	
+!!{	if sex_ev['cum_mouth'] > 0 and sex_ev['swallow_count'] = 0:
+		sex_ev['boy_topics'] += 1
+	elseif sex_ev['cum_mouth'] = sex_ev['swallow_count']:
+		sex_ev['boy_topics'] += 1
+	end}
+	
+!!	if sex_ev['no_kids'] = 1 and npc_know_no_kids[$boy] = 1: sex_ev['boy_topics'] += 1
+	if sex_ev['boy_shower'] = 0: sex_ev['boy_topics'] += 1
+
+!!	if sex_ev['broken_condom'] >= 1 and sex_ev['broken_condom_talk'] ! 1: sex_ev['boy_topics'] += 1
+!!	if sex_ev['condom'] ! 1 and sex_ev['boy_condom_rule_talk'] ! 1: sex_ev['boy_topics'] += 1
+	sex_ev['boy_topic_check'] = 1
+end
+
+if $ARGS[0] = 'boy_topic_choose':
+	
+end
+
+
+if $ARGS[0] = 'dont_swallow_talk':
+	sex_ev['boy_topics'] -= 1
+	sex_ev['how_many_fb_talk'] = 1
+	gs'sex_ev_pillow_talk', 'talk_time_add'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+	'"So you don''t swallow?" <<$npc_firstname[$boy]>> asks.'
+end
+
+if $ARGS[0] = 'boy_broken_condom':
+	if sex_ev['broken_condom_talk'] = 0 and sex_ev['broken_condom'] >= 1:
+		sex_ev['broken_condom_talk'] = 1
+		sex_ev['boy_topics'] -= 1
+		gs'sex_ev_pillow_talk', 'talk_time_add'
+		if npc_pay_for_ma_pill[$boy] = 1:
+			if sex_ev['ma_pill_money'] = 0:
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Oh, before I forget. Since the condom broke, I think I owe you this," <<$npc_firstname[$boy]>> says, reaching over to his wallet and handing you a 1000 <b>₽</b> note. "For the morning after pill."'
+				'"Thanks," you say, taking the money.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			elseif npc_childfree[$boy] > 0:
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Don''t forget to buy the pill later," <<$npc_firstname[$boy]>> reminds you.'
+				act'Don''t worry':
+					cla & *nl
+					'"Don''t worry," you nod. "I won''t forget."'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+				
+				act'Get irritated':
+					npc_rel[$boy] -= 1
+					cla & *nl
+					'"I know, I know," you scowl in irritation. "You don''t have to freaking remind me."'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+			else
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		elseif sex_ev['ma_pill'] > 0:
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if sex_ev['ma_pill'] = 1:
+				'"Really unlucky about that broken condom," <<$npc_firstname[$boy]>> says. "But at least you have that morning after pill."'
+			elseif sex_ev['ma_pill'] = 2:
+				'"Really unlucky about that broken condom," <<$npc_firstname[$boy]>> says. "Good thing you had that morning after pill."'
+			end
+			act'Yeah':
+				cla & *nl
+				'"Yeah," you nod back.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			gs'sex_ev_boy_pillow_talk', 'boy_take_pill_now'
+		elseif npc_know_bc[$boy] = 0 and sex_ev['ma_pill'] = 0 and (npc_selfish[$boy] ! 1 and (npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1)):
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if cum_loc['vagina'] > 0:
+				'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything...?"'
+			else
+				'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything...?"'
+			end
+			
+			if mc_inventory['morning_after_pill'] = 0:
+				act'I''ll buy a morning after pill':
+					cla & *nl
+					'"It''s okay," you nod reassuringly. "I''ll get a morning after pill tomorrow. No big deal."'
+					'He smiles back, seeming to relax a bit.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+			else
+				act'I have a pill':
+					cla & *nl
+					sex_ev['ma_pill'] = 1
+					'"It''s okay," you smile. "I have a morning after pill. No big deal."'
+					'He nods, smiling and seeming to relax a bit.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+				
+				gs'sex_ev_boy_pillow_talk', 'boy_take_pill_now'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_take_pill_now':
+	if sex_ev['ma_pill'] < 2 and mc_inventory['morning_after_pill'] > 0:
+		act'Take your morning after pill (shy)':
+			cla & *nl
+			sex_ev['ma_pill'] = 2
+			'"It''s okay," you say. "In fact..."'
+			'<<$npc_firstname[$boy]>> watches you reach into your purse and pull out your morning after pill and you can''t help but blush beneath his gaze.'
+			if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+				'"My aunt gave me this for emergencies," you say shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
+			else
+				'"The instructions say to take it as soon as possible for best effect," you smile shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
+			end
+			gs 'medical_din', 'morning_after_pill_function'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+		act'Take your morning after pill (sexy)':
+			cla & *nl
+			sex_ev['ma_pill'] = 2
+			'"It''s fine," you say, smiling mischievously. "In fact..."'
+			'As <<$npc_firstname[$boy]>> watches you pull your morning after pill from your purse, you give him a smouldering look. Sticking out your tongue at him, you pop the pill onto your mouth, swallowing with a wide grin.'
+			if $sex_ev['last_cum'] = 'swallow':
+				'"If only I thought to do this earlier," you grin. "Could''ve washed it down with your load."'
+			elseif LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+				'"My aunt gave me this," you grin.'
+				'"She sounds like a good aunt," <<$npc_firstname[$boy]>> smirks back. "Or a slutty one."'
+				'"Kind of both actually," you say, causing both of you to laugh.'
+			else
+				'"I''m not ready to be a mom," you smirk.'
+			end
+			gs 'medical_din', 'morning_after_pill_function'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_pube_talk':
+	sex_ev['boy_pube_talk'] = 1
+	sex_ev['boy_topics'] -= 1
+!!	if ($npc_like_pubestyle[$boy] ! '' and $npc_like_pubestyle[$boy] ! $pube_style['word']) or ($npc_like_pubestyle[$boy] = 'none' and $npc_know_pubes[$boy] ! $pube_style['word']):gt'sex_ev_pillow_talk', 'boy_pubes_changed'
+	
+	$npc_know_pubes[$boy] = $pube_style['word']
+	gs'sex_ev_pillow_talk', 'talk_time_add'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+	if $pube_style['word'] = 'shaved':
+		if $npc_like_pubestyle[$boy] = $pube_style['word']:
+			!! this determines if you''ve already had this conversation before
+			'"I love how sexy your pussy is," <<$npc_firstname[$boy]>> says, admiringly running his fingers across the smooth skin of your pubic area.'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes2'
+		else
+			'"I see you keep it clean down there," he says, looking at your smooth-shaven pussy.'
+			act'I like it this way':
+				sex_ev['like_pubes'] = 1
+				cla
+				act'You just like it':
+					cla & *nl
+					'"Yeah," you say. "I just like it this way. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It feels good':
+					cla & *nl
+					'"I like it this way," you say. "It feels nice to have a smooth pussy. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s classy':
+					cla & *nl
+					'"I like it this way," you say. "I think it''s classier keep a clean shave. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s sexy':
+					cla & *nl
+					'"I like it this way," you say. "It''s sexy to keep a smooth pussy. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			
+			act'When I feel like it':
+				sex_ev['lazy_shave'] = 1
+				cla & *nl
+				if pubestyle = 11:
+					'"Sometimes," you shrug. "I''ll give it a shave when it starts turning into bush, but I''ll live with the stubble for a few days at a time. Why do you ask?"'
+				else
+					'"Sometimes," you shrug. "On some days I''ll just give it a trim, on other days I''ll shave it all off. Sometimes I just go full bush. Why do you ask?"'
+				end
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			if model['status'] = 1:
+				act'It''s for work':
+					cla & *nl
+					'"It''s for work," you shrug. "I''m a model, so it''s better to keep it shaved."'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			gs'sex_ev_boy_pillow_talk', 'pubes_problem'
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_other_lovers'
+		end
+	elseif $pube_style['word'] = 'stubble':
+		if $npc_like_pubestyle[$boy] = 'shaved':
+			!! this determines if you''ve already had this conversation before
+			'"You forget to shave today?" <<$npc_firstname[$boy]>> says eyeing your stubbly pussy.'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes2'
+		else
+			'"Looks like someone forgot to shave today," <<$npc_firstname[$boy]>> says eyeing your stubbly pussy.'
+			act'Forgot':
+				cla
+				act'Shrug':
+					cla & *nl
+					'"Yeah," you say with a shrug. "Happens sometimes. What of it?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'Annoyance':
+					cla & *nl
+					'"Yeah," you say, drawing your eyebrows together in irritation. "I forgot. So what? Got a problem with that?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+			end
+			
+			act'Growing it out':
+				cla & *nl
+				'"No I didn''t," you reply. "I''m growing it out. But you gotta go through stubble to get to hair."'
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			act'No time':
+				cla & *nl
+				'"Wanted to but I didn''t have time this morning," you reply.'
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			act'I''m lazy':
+				sex_ev['lazy_shave'] = 1
+				cla & *nl
+				if pubestyle = 11:
+					'"I''m just lazy," you sigh. "Too much work to keep it smooth down there all the time. I''ll do it when it gets to be too annoying. Why do you ask?"'
+				else
+					'"I''m just lazy," you sigh. "Didn''t feel like doing it today. Why do you ask?"'
+				end
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			if model['status'] = 1:
+				act'It''s for work':
+					cla & *nl
+					'"It''s for work," you shrug. "I''m a model, so it''s better to keep it shaved."'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_other_lovers2'
+		end
+	elseif $pube_style['word'] = 'trimmed':
+		if $npc_like_pubestyle[$boy] = $pube_style['word']:
+			!! ^^ this determines if you''ve already had this conversation before
+			if $npc_know_pubeshape[$boy] = $pube_style['shape']:
+				'"I still can''t get over how sexy your bush is," <<$npc_firstname[$boy]>> says, looking admiringly at your neatly trimmed pussy hair.'
+				gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes2'
+			else
+				'"Did you do something new down there?" <<$npc_firstname[$boy]>> asks, looking at your <<$pube_style[''shape'']>>-shaped pubic hair.'
+				gs'sex_ev_pillow_talk', 'changed_pube_style'
+			end
+		else
+			'"I see you keep it trimmed down there," he says, looking at your neatly maintained pubic hair.'
+			act'I like it this way':
+				sex_ev['like_pubes'] = 1
+				cla
+				act'You just like it':
+					cla & *nl
+					'"Yeah," you say. "I just like it this way. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It feels good':
+					cla & *nl
+					'"I like it tidy down there," you say. "It feels better than full bush. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s classy':
+					cla & *nl
+					'"I like it tidy down there," you say. "I think it''s classier to have some hair down there without going full bush. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s sexy':
+					cla & *nl
+					'"I like it tidy down there," you say. "Makes me feel sexy. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			
+			if model['status'] = 1:
+				act'It''s for work':
+					cla & *nl
+					'"It''s for work," you shrug. "I''m a model, so it''s better to keep things tidy between the legs."'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			gs'sex_ev_boy_pillow_talk', 'pubes_problem'
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_other_lovers'
+		end
+	elseif $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
+	!! full bush talk
+	!! find real number later
+		if $npc_like_pubestyle[$boy] = $pube_style['word']:
+			!! this determines if you''ve already had this conversation before
+			'"I still can''t get over how sexy your bush is," <<$npc_firstname[$boy]>> says, looking admiringly at your furry pussy.'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes2'
+		else
+			'"So, you don''t shave?" <<$npc_firstname[$boy]>> asks, looking at your furry pussy.'
+			act'I like it this way':
+				sex_ev['like_pubes'] = 1
+				cla
+				
+				act'You just like it':
+					cla & *nl
+					'"Yeah," you say. "I just like it this way. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It feels good':
+					cla & *nl
+					'"I like it this way," you say. "There''s just something comfortable about having a full bush between my legs. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s classy':
+					cla & *nl
+					'"I like it this way," you say. "I think it''s classy to go full bush instead of shaving it off. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+				
+				act'It''s sexy':
+					cla & *nl
+					'"I like it this way," you say. "I think bush is sexy. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+			
+			act'Lazy':
+				sex_ev['lazy_shave'] = 1
+				cla & *nl
+				if pubestyle = 10:
+					'"I''m just lazy," you shrug. "I''ll trim it back if it starts getting out of hand, but it''s too much hassle to maintain a landing strip or anything like that. Why do you ask?"'
+				else
+					'"I''m just lazy," you shrug. "It''s too much trouble to maintain. Easier to just let it grow. Why do you ask?"'
+				end
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			act'Hate shaving':
+				sex_ev['lazy_shave'] = 1
+				cla & *nl
+				if pubestyle = 10:
+					'"I hate shaving," you sigh. "I''ll trim it back if it starts getting out of hand, but it''s such a pain in the ass to do anything more than that. Why do you ask?"'
+				else
+					'"I hate shaving," you sigh. "It''s such a pain in the ass. Can''t stand it. Easier to just let it grow. Why do you ask?"'
+				end
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_young'
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_problem'
+			
+			gs'sex_ev_boy_pillow_talk', 'pubes_other_lovers'
+						
+			if pubestyle = 10:
+				act'Just trim':
+					cla & *nl
+					'"I just trim," you sigh. "Don''t really like going ''full jungle'' down there, but don''t really like shaving either. Why do you ask?"'
+					gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_pubes_response':
+	if pcs_pubes >= 4 and npc_bush_pref[$boy] = 1:
+		'"You''d look super hot if you shaved it clean," he says.'
+		gs'sex_ev_boy_pillow_talk', 'boy_asks_cleanshave'
+	elseif ($pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed'):
+		if npc_bush_pref[$boy] = 2:
+			'"Ever considered trimming it down?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_asks_trim'
+		elseif npc_bush_pref[$boy] = 3:
+			'"I think it''s sexy too," he grins. "Too many girls feel peer pressured into shaving it off, but I love a nice full bush."'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes'
+		end
+	elseif $pube_style['word'] = 'trimmed':
+		if npc_bush_pref[$boy] = 2:
+			'"I think it''s hot," <<$npc_firstname[$boy]>> grins. "I love it when a girl knows how to take care of her bush."'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes'
+		elseif npc_bush_pref[$boy] = 3:
+			'"Ever considered letting it grow out more?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_asks_bush'
+		end
+	elseif pcs_pubes < 4:
+		if npc_bush_pref[$boy] = 1:
+			'"I think it''s hot," he grins. "No one likes to find a gorilla between a girl''s legs. Clean-shaven is the best."'
+			gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes2'
+		elseif npc_bush_pref[$boy] = 2:
+			'"Ever considered letting it grow out a little?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_asks_trim'
+		elseif npc_bush_pref[$boy] = 3:
+			'"Ever considered letting it grow out?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_asks_bush'
+		end
+	else
+		'Bug report: boy_pubes_response dead-end'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	if npc_bush_pref[$boy] = 0:
+		$npc_like_pubestyle[$boy] = 'none'
+		'"Just noting. Some girls shave, some don''t. Some guys want it one way, other guys another. Me? I don''t care if it''s more like an apple, a kiwi, or a coconut," he laughs aloud. "I just like pussy."'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+end
+
+if $ARGS[0] = 'dont_shave_like_talk':
+	
+end
+
+if $ARGS[0] = 'boy_asks_cleanshave':
+	act'No way':
+		cla & *nl
+		if sex_ev['like_pubes'] = 1:
+			'"No way," you say, giving him a look. "I already told you, I like it this way. I''m not shaving it just for you."'
+		elseif sex_ev['lazy_shave'] = 1:
+			'"No way," you say, giving him a look. "If I''m already too lazy to do it for me, what makes you think I''m going to do it for you?"'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'You think I should?':
+		cla & *nl
+		'"You think I should?" you ask him, looking down and inspecting your pussy.'
+		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy without any hair down there. Just your bare beautiful pussy lips on display."'		
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	act'You''d like that?':
+		cla & *nl
+		'"You''d like it like that?" you ask, looking down and inspecting your pussy.'
+		'"Yeah," <<$npc_firstname[$boy]>> says. "I''d really love it if you went full clean shave. It''d be so hot."'		
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	gs'sex_ev_boy_pillow_talk', 'annoyed_shave'
+	
+	if pubestyle = 10:
+		act'I''ll get to it later':
+			cla & *nl
+			'"Yeah, yeah," you wave your hand absently. "I''ll get to it eventually."'
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_asks_trim':
+	act'No':
+		cla & *nl
+		if sex_ev['like_pubes'] = 1:
+			'"Not really," you shrug. "I already told you, I like it this way. Why would I consider doing anything different?"'
+		elseif sex_ev['lazy_shave'] = 1:
+			'"No way," you say, giving him a look. "If I''m already lazy about it, what makes you think I''m going to do it for you?"'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'You think I should?':
+		cla & *nl
+		if pcs_pubes < 4:
+			'"You think I should?" you ask him, looking down and inspecting your smooth pussy.'
+			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you had a bit of hair down there. Not a full bush or anything like that, but just a landing strip or something."'
+		elseif $pube_style['word'] = 'stubble':
+			'"You think I should?" you ask him, looking down and inspecting your stubbly pussy.'
+			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you had a bit of hair down there. Not a full bush or anything like that, but just a landing strip or something."'
+		else
+			'"You think I should?" you ask him, looking down and inspecting your bush.'
+			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you trimmed it back a little."'
+		end
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	act'You''d like that?':
+		cla & *nl
+		'"You''d like it like that?" you ask, looking down and inspecting your bush.'
+		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you trimmed it back a little. It''d be so hot."'		
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	gs'sex_ev_boy_pillow_talk', 'annoyed_shave'
+end
+
+if $ARGS[0] = 'boy_asks_bush':
+	act'No':
+		cla & *nl
+		if sex_ev['like_pubes'] = 1:
+			'"Not really," you shrug. "I already told you, I like it this way. Why would I consider doing anything different?"'
+		else
+			'"Not really," you say, giving him a look. "What makes you think I''d grow a bush just for you?"'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'You think I should?':
+		cla & *nl
+		if pcs_pubes < 4:
+			'"You think I should?" you ask him, looking down and inspecting your smooth pussy.'
+		elseif $pube_style['word'] = 'stubble':
+			'"You think I should?" you ask him, looking down and inspecting your stubbly pussy.'
+		else
+			'"You think I should?" you ask him, looking down and inspecting your pubic hair.'
+		end
+		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy with a full bush."'
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	act'You''d like that?':
+		cla & *nl
+		if pcs_pubes < 4:
+			'"You''d like it like that?"" you ask him, looking down and inspecting your smooth pussy.'
+		elseif $pube_style['word'] = 'stubble':
+			'"You''d like it like that?" you ask him, looking down and inspecting your stubbly pussy.'
+		else
+			'"You''d like it like that?" you ask him, looking down and inspecting your pubic hair.'
+		end
+		'"Yeah," <<$npc_firstname[$boy]>> says. "I''d love it if you went full bush."'
+		gs'sex_ev_boy_pillow_talk', 'change_pubes_for_boy'
+	end
+	
+	gs'sex_ev_boy_pillow_talk', 'annoyed_shave'
+end
+
+if $ARGS[0] = 'change_pubes_for_boy':
+	act'I''ll think about it':
+		npc_shave_think[$boy] = daystart
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/pillow_talk3.mp4"></video></center>'
+		'"I''ll think about it," you say. "But no promises."'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'Sure':
+		npc_shave_promise[$boy] = daystart
+		cla & *nl
+		'"Sure," you smile at <<$npc_firstname[$boy]>>. "I could give it a try..."'
+		'<<$npc_firstname[$boy]>> grins back eagerly at you.'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'I guess I could':
+		npc_shave_promise[$boy] = daystart
+		cla & *nl
+		'"Well..." you say. "I guess I could give it a try..."'
+		'<<$npc_firstname[$boy]>> grins back eagerly at you.'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'For you (hesitant)':
+		npc_shave_promise[$boy] = daystart
+		cla & *nl
+		'"Well..." you say. "I guess I could try it? For you."'
+		'You punctuate your promise with an affectionate smile, returned with an eager grin from <<$npc_firstname[$boy]>>.'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'For you (affectionate)':
+		npc_shave_promise[$boy] = daystart
+		cla & *nl
+		'"If it will make you happy, then of course I''ll do it."'
+		'You smile affectionately at <<$npc_firstname[$boy]>>, who returns it with an eager grin.'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+end
+
+if $ARGS[0] = 'annoyed_shave':
+	act'Get annoyed':
+		cla & *nl
+		if sex_ev['fuck_count'] > 0:
+			if sex_ev['like_pubes'] = 1:
+				'"No?" you say, glaring at him. "I just told you I like it this way and you didn''t seem to have a problem fucking it a few minutes ago."'
+			elseif sex_ev['lazy_shave'] = 1:
+				'"No?" you say, glaring at him. "You didn''t seem to have a problem fucking it a few minutes ago, so why should I?"'
+			end
+		else
+			if sex_ev['like_pubes'] = 1:
+				'"No?" you say, glaring at him. "I just told you I like it this way and it didn''t seem to be a problem with making you hard a few minutes ago."'
+			elseif sex_ev['lazy_shave'] = 1:
+				'"No?" you say, glaring at him. "It didn''t seem to be a problem with making you hard a few minutes ago, so why should I?"'
+			end
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+end
+
+if $ARGS[0] = 'boy_likes_pubes':
+!!	if $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
+		$npc_like_pubestyle[$boy] = pubestyle
+		act'Good to know':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/pillow_talk3.mp4"></video></center>'
+			'"Well good to know," you laugh. "I''ll keep it in mind next time I look at a razor."'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+		act'Glad you think so':
+			cla & *nl
+			'"I''m glad you think so. It''s always nice to know someone thinks you''re sexy," you say, giving him a soft smile.'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+		act'Glad I have your permission (sarcastic)':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/pillow_talk_eyeroll.mp4"></video></center>'
+			'"Well I''m glad I have your permission to shave the way I like it," you huff, acerbically rolling your eyes.'
+			if npc_argumentative[$boy] = 1:
+				npc_rel[$boy] -= 2
+				'"What the fuck is your problem?" <<$npc_firstname[$boy]>> growls. "I was trying to pay you a compliment!"'
+				act'Apologize':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'You immediately feel bad and look back at him with a guilty expression on your face.'
+					'"I''m sorry," you say. "I... I don''t know why I snapped at you like that. You''re right. I should be happy you think I''m sexy."'
+					'You give him an apologetic smile and though <<$npc_firstname[$boy]>> still seems a little annoyed with you, he mostly calms down as well.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+				
+				act'I didn''t ask!':
+					sex_ev['angry_after'] = 1
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"Well I didn''t ask for your opinion!" you snap back. "It''s my body and my bush, I can do whatever I want without hearing how you feel about it!"'
+					*nl
+					'<i>Ugh! Men!</i> you grumble internally.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+			else
+				'"I didn''t mean it like that," <<$npc_firstname[$boy]>> says, looking bemused. "I just wanted to let you know I think you''re hot."'
+				act'Apologize':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'You immediately feel guilty and look back at him.'
+					'"I''m sorry," you say. "I... I don''t know why I snapped at you like that. That was... uncalled for..."'
+					'You give him an embarrassed smile and <<$npc_firstname[$boy]>> smiles back, letting you know he accepts your apology.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+				
+				act'I didn''t ask for a man''s opinion!':
+					sex_ev['angry_after'] = 1
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"Well I didn''t ask for your opinion!" you snap back. "It''s my body and my bush, I can do whatever I want without hearing how a man feels about it!"'
+					*nl
+					'<i>Ugh! Men!</i> you grumble internally.'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+			end
+		end
+!!	else
+		
+!!	end
+end
+
+if $ARGS[0] = 'boy_likes_pubes2':
+	act'Thanks':
+		cla & *nl
+		'"Thanks," you smile back. "It''s always nice to be complimented."'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'I like it too':
+		cla & *nl
+		'"Me too," you smile back before taking an admiring look yourself. "I love the look of my pussy."'
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'Don''t do it for you':
+		cla & *nl
+		'"It''s not like I do it for you," you say, brushing his compliment aside and rolling your eyes.'
+		if npc_argumentative[$boy] = 1:
+			'"Way to be a bitch about it," he mumbles under his breath.'
+		else
+			'"Doesn''t mean I can''t appreciate it for myself," he grins back.'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	act'Compliment his cock':
+		npc_rel[$boy] += 2
+		cla & *nl		
+		if $npc_dick_desc[$boy] = 'tiny':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "For a guy with a tiny dick, you sure know how to use it."'
+		elseif $npc_dick_desc[$boy] = 'short':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "It''s pretty small, but you sure know how to use it."'
+		elseif $npc_dick_desc[$boy] = 'chode':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "You may be small, but so you''re <i>so</i> thick. I love feeling you stretch me out."'
+		elseif $npc_dick_desc[$boy] = 'skinny':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "For a guy with such a skinny dick, you sure know how to use it."'
+		elseif $npc_dick_desc[$boy] = 'normal':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "You fill me up just right."'
+		elseif $npc_dick_desc[$boy] = 'thick':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood. Even flaccid, its girth is impressive. "You''re <i>so</i> big!"'
+		elseif $npc_dick_desc[$boy] = 'long':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its length down his thighs even when flaccid. "It''s <i>so</i> long. All the other guys I sleep with can''t get nearly as deep as you can."'
+		elseif $npc_dick_desc[$boy] = 'huge':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, impressive in its size even flaccid. "It''s <i>huge</i>! And I love how deep I can feel you inside me."'
+		elseif $npc_dick_desc[$boy] = 'enormous':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, impressive in its size even flaccid. "You''re packing some serious firepower. I can barely even fit you inside me!"'
+		elseif $npc_dick_desc[$boy] = 'lengthy':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs even when flaccid. "I can practically feel you in my stomach when you''ve got the whole thing inside me."'
+		elseif $npc_dick_desc[$boy] = 'gigantic':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs even when flaccid. "I can practically feel you in my stomach when you''ve got the whole thing inside me."'
+		elseif $npc_dick_desc[$boy] = 'monster':
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his monstrously large manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs with a girth nearly as thick as your wrist even flaccid. "It''s like you''ve got an arm for a dick. I didn''t even know cocks could get that big!"'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+end
+
+if $ARGS[0] = 'pubes_young':
+	act'Makes me feel too young':
+		cla & *nl
+		if $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
+			'"I tried it once but I didn''t like it," you grimace. "Made me feel like a little girl. It was weird. I prefer to have a full bush compared to that. Why do you ask?"'
+		else
+			'"I tried it once but I didn''t like it," you grimace. "Made me feel like a little girl. It was weird. So now I always make sure I have some hair down there. Why do you ask?"'
+		end
+		gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+	end
+end
+
+
+if $ARGS[0] = 'pubes_problem':
+	act'Got a problem with that?':
+		cla & *nl
+		if $pube_style['word'] = 'shaved':
+			'"Got a problem with my pussy?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
+!!			gs'sex_ev_pillow_talk', 'pubes_problem2'
+		elseif $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
+			'"Got a problem with my bush?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
+!!{			if npc_bush_pref[$boy] = 1:
+				'"You''d look super sexy if you shaved it all off," he says.'
+				gs'sex_ev_boy_pillow_talk', 'boy_asks_cleanshave'
+			elseif npc_bush_pref[$boy] = 2:
+				'"Ever considered trimming it down?" he asks.'
+				gs'sex_ev_boy_pillow_talk', 'boy_asks_trim'
+			elseif npc_bush_pref[$boy] = 3:
+				'"I think it''s sexy too," he grins. "Too many girls feel peer pressured into shaving it off, but I love a nice full bush."'
+				gs'sex_ev_boy_pillow_talk', 'boy_likes_pubes'
+			end}
+		else
+			'"Got a problem with my pubes?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
+		end
+		gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+	end
+end
+
+if $ARGS[0] = 'pubes_problem_bush':
+	
+end
+
+
+if $ARGS[0] = 'pubes_other_lovers':
+	if $npc_like_pubestyle ! '':
+		act'My ex liked it':
+			cla & *nl
+			'"My ex preferred it this way," you shrug. "Why do you ask?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+		end
+		
+		if pcs_lover > 0 and pcs_lover - pcs_girlfriends > 0:
+			act'My boyfriend likes it':
+				cla & *nl
+				'"My boyfriend likes it this way," you shrug. "Why do you ask?"'
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+		end
+		
+		if pcs_girlfriends > 0:
+			act'My girlfriend likes it':
+				cla & *nl
+				'"My girlfriend likes it this way," you shrug. "Why do you ask?"'
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+		end
+		
+		act'My last fuckbuddy liked it':
+			cla & *nl
+			'"A fuckbuddy I used to have liked it this way," you shrug. "Why do you ask?"'
+			gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+		end
+		
+		
+		if arrsize('$fuckbuddy') > 1:
+			act'My other fuckbuddy likes it':
+				cla & *nl
+				'"My other fuckbuddy likes it this way," you shrug. "Why do you ask?"'
+				gs'sex_ev_boy_pillow_talk', 'boy_pubes_response'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'pubes_other_lovers2':
+
+end
+
+if $ARGS[0] = 'boy_condom_rule':
+	if sex_ev['condom'] ! 1:
+	
+	end
+end
+
+if $ARGS[0] = 'boy_take_shower':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+	if pcs_sweat >= 20 or rand(1,2) = 1:
+		sex_ev['join_shower_offer'] = 1
+		if pcs_sweat >= 20:
+			'"I could really use a shower after that," <<$npc_firstname[$boy]>> says. "Want to join me?"'
+		else
+			'"I think I''m gonna take a shower," <<$npc_firstname[$boy]>> says. "Want to join me?"'
+		end
+		act'No thanks':
+			sex_ev['boy_in_shower'] = 1
+			cla & *nl
+			'"That''s okay, I think I''m just going to keep chilling here for a while," you reply.'
+			'"Suit yourself," <<$npc_firstname[$boy]>> shrugs and gets up, leaving you alone in the sheets.'
+			act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
+		end
+		
+		act'Sure':
+			cla & *nl
+			'"Sure," you reply. "That sounds nice."'
+			'You let <<$npc_firstname[$boy]>> lead you out of bed and into the bathroom.'
+			act'Shower together':gt'sex_ev_shower', 'after_shower_together'
+		end
+	else
+		'"I think I''m gonna take a shower," <<$npc_firstname[$boy]>> says.'
+		act'Have fun':
+			sex_ev['boy_in_shower'] = 1
+			cla & *nl
+			'"Okay. Have fun in there," you reply and <<$npc_firstname[$boy]>> gets up, leaving you alone in the sheets.'
+			act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
+		end
+		
+		act'Ask to join':
+			cla & *nl
+			'"Maybe I could join you in there," you suggest.'
+			'"That sounds like a good idea," he smiles back.'
+			'You let <<$npc_firstname[$boy]>> lead you out of bed and into the bathroom.'
+			act'Shower together':gt'sex_ev_shower', 'after_shower_together'
+		end
+	end
+end
+
+if $ARGS[0] = 'how_many_fb':
+	sex_ev['boy_topics'] -= 1
+	sex_ev['how_many_fb_talk'] = 1
+	gs'sex_ev_pillow_talk', 'talk_time_add'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+	'"So how many fuckbuddies do you have?" <<$npc_firstname[$boy]>> asks.'
+	if arrsize('$fuckbuddy') = 1 and $npc_rel_type[$boy] = 'fuckbuddy':
+		act'"Just you"':
+			
+		end
+	else
+		act'Tell him':
+		
+		end
+		
+		act'Lie (half)':
+	
+		end
+		
+		act'Lie':
+		
+		end
+	end
+end
+
+if $ARGS[0] = 'boy_no_kids':
+	sex_ev['boy_topics'] -= 1
+	sex_ev['no_kids_talk'] = 1
+	gs'sex_ev_pillow_talk', 'talk_time_add'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+	'"So you don''t want kids?" <<$npc_firstname[$boy]>> asks, looking over at you.'
+	act'Not right now':
+		cla & *nl
+		'"Not right now," you shake your head. "Maybe one day, but I''m not ready to be a mother. What about you?"'
+		if npc_childfree[$boy] = 1:
+			pc_know_childfree[$boy] = 1
+			'"I never want kids," he replies.'
+			act'Really?':
+				cla & *nl
+				'"Really?" you ask, sitting up to look at him with astonishment. "Never? Never ever?"'
+				'"Never ever ever," he says, grimacing. "I already hate other people''s kids. Why would I want to have any of my own?"'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'I get that':
+				cla & *nl
+				'"I get that," you nod back. "Parenthood isn''t for everyone."'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		else
+			'"It wouldn''t be so bad, being a father," he replies. "Not sure about the when, but I think I''d really like to have a kid or two one day."'
+			act'Maybe one day':
+				cla & *nl
+				'"Maybe one day," you say again, shrugging.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'I get that':
+				cla & *nl
+				'"I get that," you nod back. "Might be nice to have someone to live for."'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		end
+	end
+	
+	act'Never':
+		cla & *nl
+		'"Not now, not ever," you grimace. "Motherhood sounds... ugh."'
+		if npc_childfree[$boy] = 1:
+			'"I feel the same way," he says, nodding. "I hate everything to do with kids. I never want children of any kind."'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		else
+			'"Don''t you think you''d get lonely?" <<$npc_firstname[$boy]>> asks. "Y''know, knowing that you wouldn''t have anything to live for except yourself when you get old?"'
+			act'I guess...':
+				cla & *nl
+				'"I guess, maybe," you mumble. "I don''t know. Why does everything have to be about procreation? Why can''t I just live my life for myself? Can''t I just be happy with that?"'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'I''ll have a spouse':
+				cla & *nl
+				'"I''ll get married," you shrug. "Why would I be lonely then?"'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'Play it off':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"That''s what I have guys like you for," you smirk. "To fuck me when I get lonely."'
+				*nl
+				'<<$npc_firstname[$boy]>> can tell you just sidestepped the question, but doesn''t press the topic any further.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		end
+	end
+end
+
+--- sex_ev_boy_pillow_talk ---------------------------------

locations/sex_ev_cowgirl.qsrc

@@ -12,12 +12,16 @@ if $ARGS[0] = 'cowgirl_start':
 			elseif $sex_ev['position'] = 'doggy':
 				'You push <<$npc_firstname[$boy]>> backwards, throwing him onto his back before swiftly turning around and mounting him.'
 			end
+			
 			'"My turn to be on top," you grin.'
-			act'Ride him gently':gt 'sex_ev_cowgirl', 'cowgirl1'
+!!			if sex_ev['no_condom'] ! 1:
+				act'Ride him gently':gt 'sex_ev_cowgirl', 'cowgirl1'
 
-			act'Ride him steadily':gt 'sex_ev_cowgirl', 'cowgirl2'
+				act'Ride him steadily':gt 'sex_ev_cowgirl', 'cowgirl2'
 
-			act'Ride him hard':gt 'sex_ev_cowgirl', 'cowgirl3'
+				act'Ride him hard':gt 'sex_ev_cowgirl', 'cowgirl3'
+			$sex_ev['position'] = 'cowgirl'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 		
 	elseif sex_ev['initiative'] ! 1 and sex_ev['force_initiative'] ! 1:
@@ -40,6 +44,8 @@ if $ARGS[0] = 'cowgirl_start':
 			act'Ride him steadily':gt 'sex_ev_cowgirl', 'cowgirl2'
 
 			act'Ride him hard':gt 'sex_ev_cowgirl', 'cowgirl3'
+			$sex_ev['position'] = 'cowgirl'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	else
 		act'Climb on top of him':
@@ -63,6 +69,8 @@ if $ARGS[0] = 'cowgirl_start':
 			act'Ride him steadily':gt 'sex_ev_cowgirl', 'cowgirl2'
 
 			act'Ride him hard':gt 'sex_ev_cowgirl', 'cowgirl3'
+			$sex_ev['position'] = 'cowgirl'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	end
 end
@@ -84,19 +92,24 @@ if $ARGS[0] = 'cowgirl_girl_orgasm_continue':
 			!! IMAGE HERE
 			'You''ve barely finished your orgasm when he begins moving his hips again underneath you. You mew in protest, hypersensitive to every movement of his cock inside your still-quivering pussy. At his insistence, you start moving your hips again.'
 		end
+		
+!!{		
 		act'Keep going':gt 'sex_ev_cowgirl', 'cowgirl<<sex_ev[''speed'']>>.2'
-!!{		act'Ride him gently':gt 'sex_ev_cowgirl', 'cowgirl1'
+		act'Ride him gently':gt 'sex_ev_cowgirl', 'cowgirl1'
 
 		act'Ride him steadily':gt 'sex_ev_cowgirl', 'cowgirl2'
 
 		act'Ride him hard':gt 'sex_ev_cowgirl', 'cowgirl3'}
+		$sex_ev['position'] = 'cowgirl'
+		$sex_ev['pos_speed'] = 'cowgirl<<sex_ev[''speed'']>>'
+		gs'sex_ev_sex', 'fuck_continue'
 	end
 end
 
 if $ARGS[0] = 'cowgirl_goto':
 	sex_ev['cock_inserted'] = 1
 	if sex_ev['speed'] = 0: sex_ev['speed'] = rand(1,3)
-	gt 'sex_ev_cowgirl', 'cowgirl<<sex_ev[''speed'']>>'
+	act'Ride him':gt 'sex_ev_cowgirl', 'cowgirl<<sex_ev[''speed'']>>'
 end
 
 if $ARGS[0] = 'cowgirl_change_position':
@@ -142,6 +155,8 @@ if $ARGS[0] = 'cowgirl_pain2':
 		gs 'sex_ev_cum', 'fuck_cum'
 	end
 	
+	act'Tell <<$npc_firstname[$boy]>> it hurts': gs 'sex_ev_cowgirl', 'cowgirl_pain3'
+	
 	act'Ask to try something else':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
@@ -162,6 +177,83 @@ if $ARGS[0] = 'cowgirl_pain2':
 	end
 end
 
+if $ARGS[0] = 'cowgirl_pain3':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/2.jpg"></center>'
+	'"Ouch!" you yelp, instinctively bouncing away from the offending dick.'
+	'The motion leaves you off balance and you accidentally end up stabbing your pussy with <<$npc_firstname[$boy]>>''s cock again, causing you sit up sharply and nearly fall off the bed.'
+	if (npc_abusive[$boy] > 0 or (npc_selfish[$boy] = 1 and rand(1,3) >= 2)) and npc_caretaker[$boy] ! 1:
+		'"What the fuck happened?" he exclaims irritatedly. "Why did you stop?"'
+	else
+		'"Oh fuck!" he exclaims as he manages to grab hold of your hips. "What happened? Are you okay?"'
+	end
+	act'Be irritated':
+		minut += 1
+		npc_dislike[$boy] += 2
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/2.jpg"></center>'
+		'"Your stupid cock is stabbing my cervix!" you scowl. "What the fuck, do you have a knife hidden in there or something?"'
+		if npc_argumentative[$boy] > 0 or (npc_abusive[$boy] > 0 or npc_selfish[$boy] = 1 and npc_caretaker[$boy] ! 1):
+			if npc_argumentative[$boy] > 0: npc_dislike[$boy] += 2
+			'"I''m not the one driving here!" <<$npc_firstname[$boy]>> growls back. "If it hurts, I didn''t put you in this position!'
+		else
+			'"Oh. Sorry," he mumbles sheepishly.'
+		end
+		'"Whatever. Can we just move around to get a better angle?"'
+		*nl
+		'The two of you awkwardly shuffle around for a minute, trying to find a position for your hips that''s a little more comfortable.'
+		'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+		act'Fine I guess':
+			sex_ev['fuck_enjoyment'] = 0
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+			'"Fine I guess," you sigh, sinking your hips down to the base of his length. It doesn''t really feel good, but at least it doesn''t hurt anymore.'
+			*nl
+			'<<$npc_firstname[$boy]>> seems to be a little ticked off by your attitude as you start moving your hips again.'
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+		end
+		
+		act'Better':
+			sex_ev['fuck_enjoyment'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+			'"<i>Finally</i>," you sigh. "Yes, that feels better. I''ll have to remember this next time."'
+			*nl
+			'<<$npc_firstname[$boy]>> seems to be a little ticked off by your attitude as you start moving your hips again.'
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+		end
+	end
+	
+	act'Laugh it off':
+		minut += 1
+		npc_like[$boy] += 2
+		sex_ev['fuck_enjoyment'] = 1
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+		if sex_ev['dick_too_big'] = 1:
+			sex_ev['dick_too_big'] = 2
+			sex_ev['fuck_enjoyment'] = 0
+			minut += rand(1,2)
+			'"Your dick is kind of big for me," you smile ruefully. "Can we just pause for a sec to let my poor pussy adjust?"'
+			'"Oh. Yeah, sure."'
+			*nl
+			'You spend a couple minutes with your hips flat against <<$npc_firstname[$boy]>>''s, sat on his cock with its entire length inside you and taking deep breaths as you slowly let it stretch your pussy. Eventually the pain fades to nothing more than a dull ache and even maybe feels a little good.'
+			*nl
+			'"Okay," you nod. "I''m ready to try again."'
+		else
+			'"I''m fine," you chuckle. "Your dick is kind of at an awkward angle though. Can we adjust a little?"'
+			'"Oh. Yeah, sure."'
+			*nl
+			'The two of you shuffle around a little finding a position that''s a little more comfortable for both of you.'
+			'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+			'"Much better," you nod back and start moving your hips again.'
+		end
+		act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+	end
+end
+
 if $ARGS[0] = 'cowgirl1':
 	sex_ev['cowgirl_fuck'] = 1
 	!! slow pace
@@ -172,12 +264,12 @@ if $ARGS[0] = 'cowgirl1':
 	!! sex_ev['cowgirl_fuck'] tracks if you fuck in this position
 !!	if pcs_vag = 0:gt 'sex_ev_virgin', 'cowgirl_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
-
+	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow2.mp4"></video></center>'
 	if mesec > 0:
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
 		gs 'sex_ev_cowgirl', 'cowgirl1_start_period_desc'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow2.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow2.mp4"></video></center>'
 		gs 'sex_ev_cowgirl', 'cowgirl1_start_desc'
 	end
 
@@ -235,6 +327,8 @@ end
 if $ARGS[0] = 'cowgirl1.2':
 	sex_ev['cowgirl_fuck'] = 1
 	cla & *clr
+	sex_ev['speed'] = 1
+	$sex_ev['position'] = 'cowgirl'
 	$sex_ev['pos_speed'] = 'cowgirl1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -263,10 +357,20 @@ if $ARGS[0] = 'cowgirl1.2':
 				'You whimper softly, clenching your teeth as hard as you can as you keep forcing yourself to slowly work your pussy up and down <<$npc_firstname[$boy]>>''s shaft. It hurts <i>so much</i>, but you can''t bring yourself to face the embarrassment of stopping.'
 			end
 		end
+		
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you keep moving your hips, rolling them as sensually as possible and doing your best to make <<$npc_firstname[$boy]>> feel good, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			'Your breath hitches as <<$npc_firstname[$boy]>>''s cock hits somewhere deep inside you and you feel wetness <i>sploosh</i> through your pussy. You aren''t sure what changed, but it''s like <<$npc_firstname[$boy]>>''s cock found the "feel good" button and you can''t stop pressing it. You can''t stop moving your hips and moan openly as you slide up and down up his slick shaft.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You keep rolling your hips, focusing on the motions and tightening your pussy around <<$npc_firstname[$boy]>>''s cock. It seems to throb in response inside of you and you think he''ll come soon if you keep this up.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -275,19 +379,24 @@ if $ARGS[0] = 'cowgirl1.2':
 			'"<i>Ah~! Ahh~! Ahhh~!</i>"'
 			*nl
 			'You moan softly as you continue bouncing on <<$npc_firstname[$boy]>>''s cock. It still basically feels numb to your pussy other than the occasional bump, but you don''t want him to feel bad about it either so you play along, trying to pretend and rolling your hips in a way you hope at least feels good for him.'
-		elseif sex_ev['dirty_talk'] = 1:
+		elseif $sex_ev['dirty_talk'] ! '':
 			gs 'sex_ev_cowgirl', 'cowgirl1.2_dirty_talk'
 			*nl
 			'All your dirty talk is just that: talk. Your pussy still barely feels anything other than the occasional bump, but you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending it feels good, and continue on rolling your hips over his.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant hard as you keep rolling your hips, focusing on the motions and how good it feels and your pussy almost instinctively tightens around <<$npc_firstname[$boy]>>''s cock. It seems to throb in response inside of you and you think he''ll come soon if you keep this up.'
 	elseif sex_ev['moan'] = 1:
 		'You moan softly into <<$npc_firstname[$boy]>>''s ear as you gently work your hips up and down his cock.'
 	elseif sex_ev['moan'] = 2:
 		'"<i>Ah~! Yes~! Mmm~!</i>"'
 		*nl
 		'You moan loudly, letting your voice fill the room as you gently work your pussy up and down <<$npc_firstname[$boy]>>''s cock.'
-	elseif sex_ev['dirty_talk'] = 1:
-		'"I love your cock so much," you whisper into <<$npc_firstname[$boy]>>''s ear. "I can feel every part of it inside me. I want to ride you forever..."'
+	elseif $sex_ev['dirty_talk'] ! '':
+		gs 'sex_ev_cowgirl', 'cowgirl1.2_dirty_talk'
 	else
 		'You keep riding him gently, enjoying every moment.'
 	end
@@ -316,11 +425,12 @@ if $ARGS[0] = 'cowgirl2':
 	sex_ev['cowgirl_fuck'] = 1
 !!	if pcs_vag = 0:gt 'sex_ev_virgin', 'cowgirl_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
+	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med<<rand(1,4)>>.mp4"></video></center>'
 	if mesec > 0:
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
 		'You bounce up and down at a healthy pace, feeling the length of his cock pump in and out of your pussy from below, and your hips clap loudly against him, echoing off the walls. You feel extra wetness, the blood of your menstrual cycle, running down his shaft, sloppy wet sounds louder than usual as a result.'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med<<rand(1,4)>>.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med<<rand(1,4)>>.mp4"></video></center>'
 		'You bounce up and down at a healthy pace, feeling the length of his cock pump in and out of your pussy from below, and your hips clap loudly against him, echoing off the walls.'
 	end
 
@@ -376,6 +486,8 @@ end
 
 if $ARGS[0] = 'cowgirl2.2':
 	sex_ev['cowgirl_fuck'] = 1
+	sex_ev['speed'] = 2
+	$sex_ev['position'] = 'cowgirl'
 	$sex_ev['pos_speed'] = 'cowgirl2'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -404,10 +516,20 @@ if $ARGS[0] = 'cowgirl2.2':
 				'You whimper softly, clenching your teeth as hard as you can as you keep forcing yourself to ride <<$npc_firstname[$boy]>> at a steady pace. The sound of clapping fills the room and it hurts <i>so much</i>, but you can''t bring yourself to face the embarrassment of stopping.'
 			end
 		end
+		
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you doggedly keep bouncing up and down on <<$npc_firstname[$boy]>>''s cock, clenching your abdomen to tighten your pussy in hopes that it''ll make him come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			'Your breath hitches as <<$npc_firstname[$boy]>>''s cock hits somewhere deep inside you and you feel wetness <i>sploosh</i> through your pussy. You aren''t sure what changed, but it''s like <<$npc_firstname[$boy]>>''s cock found the "feel good" button and you can''t stop pressing it. You can''t stop moving your hips and moan openly as you begin slamming your pussy to the base of his cock with full enthusiasm.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You keep bouncing up and down on <<$npc_firstname[$boy]>>, focusing on the motions and tightening your pussy around his cock. It seems to throb in response inside of you and you think he''ll come soon if you keep this up.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -421,14 +543,19 @@ if $ARGS[0] = 'cowgirl2.2':
 			*nl
 			'All your dirty talk is just that: talk. Your pussy still barely feels anything other than the occasional bump, but you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending it feels good, and continue bouncing up and down his cock.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant hard as you keep bouncing on <<$npc_firstname[$boy]>>''s cock, focusing on the motions and how good it feels and your pussy almost instinctively tightens around him. He seems to throb in response inside of you and you think you''ll both come soon if you keep this up.'
 	elseif sex_ev['moan'] = 1:
 		'You keep bouncing up and down on <<$npc_firstname[$boy]>>''s cock, your own heavy panting filling your ears.'
 	elseif sex_ev['moan'] = 2:
 		'"<i>Ah~! Yes~! Mmm~!</i>"'
 		*nl
 		'You moan loudly, letting your voice fill the room as you bounce up and down <<$npc_firstname[$boy]>>''s cock.'
-	elseif sex_ev['dirty_talk'] = 1:
-		'"You''re so deep inside me," you moan. "I love riding you like this! Your cock feels so good!"'
+	elseif $sex_ev['dirty_talk'] ! '':
+		gs 'sex_ev_cowgirl', 'cowgirl1.2_dirty_talk'
 	else
 		'You bounce up and down on <<$npc_firstname[$boy]>>''s cock, focusing on the hammering you feel deep inside you, letting the reverberations of your hips and his course through your body from your sex to the tips of your nipples.'
 	end
@@ -456,11 +583,12 @@ if $ARGS[0] = 'cowgirl3':
 	!! sex_ev['cowgirl_fuck'] tracks if you fuck in this position
 !!	if pcs_vag = 0:gt 'sex_ev_virgin', 'cowgirl_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
+	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard<<rand(1,4)>>.mp4"></video></center>'
 	if mesec > 0:
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
 		'You bounce up and down on <<$npc_firstname[$boy]>>''s cock as hard as you can while he simultaneously thrusts his hips up towards you from below. The result is an awesome clap every time your bodies collide, enormous waves of kinetic energy quaking through your body. Blood from your period streams from your pussy, running down your legs.'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard<<rand(1,4)>>.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard<<rand(1,4)>>.mp4"></video></center>'
 		'You bounce up and down on <<$npc_firstname[$boy]>>''s cock as hard as you can while he simultaneously thrusts his hips up towards you from below. The result is an awesome clap every time your bodies collide, enormous waves of kinetic energy quaking through your body.'
 	end
 
@@ -518,6 +646,8 @@ end
 if $ARGS[0] = 'cowgirl3.2':
 	sex_ev['cowgirl_fuck'] = 1
 	cla & *clr
+	sex_ev['speed'] = 3
+	$sex_ev['position'] = 'cowgirl'
 	$sex_ev['pos_speed'] = 'cowgirl3'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -555,10 +685,20 @@ if $ARGS[0] = 'cowgirl3.2':
 				'You sob openly as you smash your pussy down onto <<$npc_firstname[$boy]>>''s cock. It hurts so much you think you''re going to die, but for some reason your hips won''t stop moving. A wordless cry leaves your lips and you keep riding <<$npc_firstname[$boy]>> like you''re trying to impale yourself on his shaft.'
 			end
 		end
+		
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you doggedly keep bouncing up and down on <<$npc_firstname[$boy]>>''s cock, clenching your abdomen to tighten your pussy and smashing your hips down against his in hopes that it''ll make him come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			'Your breath hitches as <<$npc_firstname[$boy]>>''s cock hits somewhere deep inside you and you feel wetness <i>sploosh</i> through your pussy. You aren''t sure what changed, but it''s like you found the "feel good" button with <<$npc_firstname[$boy]>>''s cock and you can''t stop pressing it. You can''t stop moving your hips and moan openly as you begin smashing your pussy to the base of his cock with full enthusiasm, riding <<$npc_firstname[$boy]>> like there''s no tomorrow.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You keep bouncing up and down on <<$npc_firstname[$boy]>>, smashing your hips against his as hard as you can and tightening your pussy around his cock. It seems to throb in response inside of you and you think he''ll come soon if you keep this up.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -572,6 +712,11 @@ if $ARGS[0] = 'cowgirl3.2':
 			*nl
 			'All your dirty talk is just that: talk. Your pussy still barely feels anything other than the occasional bump, but this is about making <<$npc_firstname[$boy]>> feel good, so you keep violently riding <<$npc_firstname[$boy]>>''s cock like there''s no tomorrow.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant hard as you ride <<$npc_firstname[$boy]>> like there''s no tomorrow. His cock hammers your insides but it only causes you to tighten up, giving back just as good as you''re getting. It seems to throb in response inside of you and you think you''ll both come soon if you keep this up.'
 	elseif sex_ev['cowgirl_rand'] = 2:
 		if sex_ev['moan'] = 1:
 			'"<i>Ah~! Ahh~! Nngh~! Ahh~!</i>"'
@@ -581,8 +726,8 @@ if $ARGS[0] = 'cowgirl3.2':
 			'"<i>Ah~! Yes~! Mmm~!</i>"'
 			*nl
 			'You moan loudly, letting your voice fill the room as you slam your pussy down <<$npc_firstname[$boy]>>''s cock over and over again.'
-		elseif sex_ev['dirty_talk'] = 1:
-			'"I love riding your cock!" you scream loudly as you plunge yourself down onto it. "You''re so hard! So fucking good!"'
+		elseif $sex_ev['dirty_talk'] ! '':
+			gs 'sex_ev_cowgirl', 'cowgirl1.2_dirty_talk'
 		else
 			'You pant loudly, breasts bouncing in the air while you bounce on <<$npc_firstname[$boy]>>''s dick, loving every thrust and every second.'
 		end
@@ -595,8 +740,8 @@ if $ARGS[0] = 'cowgirl3.2':
 			'"<i>AH~! AH~! YES~! YES~! AHH~!</i>"'
 			*nl
 			'Your voice echoes off the walls mixing with the sound of <<$npc_firstname[$boy]>>''s hips slamming into yours from below over and over again.'
-		elseif sex_ev['dirty_talk'] = 1:
-			'"Ahh~! Yes! Just like that!" you scream loudly as <<$npc_firstname[$boy]>> jackhammers into your pussy from below you. "Fill me with your dick! Fuck me in half!"'
+		elseif $sex_ev['dirty_talk'] ! '':
+			gs 'sex_ev_cowgirl', 'cowgirl1.2_dirty_talk'
 		else
 			'You groan wordlessly, letting your eyes roll back in your skull while <<$npc_firstname[$boy]>> does all the work, violently thrusting up into you over and over and over, sending earthquakes of pleasure coursing through your entire body.'
 		end
@@ -873,7 +1018,8 @@ end
 
 if $ARGS[0] = 'cowgirl1.2_dirty_talk':
 !! '"Ah~! Yes~! Just like that~!" you moan, your voice a hoarse with arousal. "You''re so deep! I can feel you inside me..."'
-	if sex_ev['dirty_talk']  = 1:
+	
+	if $sex_ev['dirty_talk'] = 'cock':
 		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
 			'"Ahh~! Your cock feels so good~!" you moan, your voice a hoarse with arousal as you roll your hips over <<$npc_firstname[$boy]>>. "Your tiny dick is gonna make me come~!"'
 		elseif $npc_dick_desc[$boy] = 'chode':
@@ -909,7 +1055,7 @@ if $ARGS[0] = 'cowgirl1.2_dirty_talk':
 		elseif $npc_dick_desc[$boy] = 'monster':
 			'"<i>Ungh~! Fuck~!</i>" you groan, struggling to ride <<$npc_firstname[$boy]>>''s massive cock. "Your cock is so <i>fucking big~!</i> It''s like a baseball bat in my pussy~! I can feel you in my stomach~! Nngh~! I feel like I''m gonna throw up~! But I can''t stop moving~! Oh god it''s gonna rip me in half~!"'
 		end
-	elseif sex_ev['dirty_talk'] = 2:
+	elseif $sex_ev['dirty_talk'] = 'arousal':
 		!! dirty talk about your arousal
 		if pcs_horny >= 60:
 			if rand(0,1) = 1:
@@ -924,12 +1070,30 @@ if $ARGS[0] = 'cowgirl1.2_dirty_talk':
 				'"Ah~! That feels <i>so good</i>," you moan quietly. "I''m gonna go crazy~!"'
 			end
 		end
-	elseif sex_ev['dirty_talk'] = 3:
+	elseif $sex_ev['dirty_talk'] = 'technique':
 		!! dirty talk about his technique
 		if rand(0,1) = 1:
 			'"Yes~! Just like that~!" you moan. "You''re so good~! Don''t stop~! Don''t stop~!"'
 		else
-			'"I love the way you fuck me," you moan hoarsely. "Keep going~!"'
+			'"I love the way you fuck me~!" you moan hoarsely. "Keep going~!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he moves his cock inside you unexpectedly, guiding your hips with his hands.'
+			'"Yours~!" you whimper atop him.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Oh fuck~!" you moan softly, barely louder than a whisper. "This dirty little slut is gonna cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you barely gasp out. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck~! I''m such a dirty girl~!" you mew softly. "I can''t stop moving~! I''m such a slut~!"'
+			else
+				'"Have you ever been ridden by a cunt as sloppy as mine?" you moan. "Ungh~! I''m so wet~! Only a whore like me would get this wet~!"'
+			end
 		end
 	end
 end
@@ -1132,32 +1296,74 @@ end
 
 if $ARGS[0] = 'cowgirl2.2_dirty_talk':
 !!	'"Ah! Fuck! Just like that!" you moan loudly. "Fuck my pussy with your big cock! Right there! Fuck! You''re so good!"'
-	if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your tiny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'chode':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your fat chode! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'skinny':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your skinny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'normal':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy just like that!" you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'thick':
-		if pcs_vag <= 10:
-			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck, you''re so big! You''re stretching me out! Don''t stop! Fuck my pussy with your big cock! It''s so good!"'
+	if $sex_ev['dirty_talk'] = 'cock':
+		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your tiny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'chode':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your fat chode! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'skinny':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your skinny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'normal':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy just like that!" you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'thick':
+			if pcs_vag <= 10:
+				'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck, you''re so big! You''re stretching me out! Don''t stop! Fuck my pussy with your big cock! It''s so good!"'
+			else
+				'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Don''t stop! Fuck my pussy with your big cock! Fuck, you''re so big! You''re so <i>fucking</i> good!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'long':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Ungh~! You''re <i>so</i> deep! Right there! Right there! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'huge':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'enormous':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re <i>so</i> big! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'lengthy':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> I feel you in my stomach~! It''s so good!!"'
+		elseif $npc_dick_desc[$boy] = 'gigantic':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
+		elseif $npc_dick_desc[$boy] = 'monster':
+			'"Ungh~! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck me with your monster cock~! Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! I can feel you in my stomach~! Don''t stop~! Don''t stop~! Don''t stop~!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'arousal':
+		!! dirty talk about your arousal
+		if pcs_horny >= 60:
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck~!" you groan between bounces. "I''m gonna come~!"'
+			else
+				'"I''m gonna come~!" you moan. "I can''t stop moving~! <i>I''m gonna come~! I''m gonna come~! I''m gonna come~!</i>"'
+			end
 		else
-			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Don''t stop! Fuck my pussy with your big cock! Fuck, you''re so big! You''re so <i>fucking</i> good!"'
+			if rand(0,1) = 1:
+				'"Ungh~! I''m <i>so</i> wet..." you moan loudly. "You feel so good inside me~! I can''t stop~!"'
+			else
+				'"Ah~! My pussy can''t get enough~!" you moan loudly. "I''m gonna go crazy~!"'
+			end
+		end
+	elseif $sex_ev['dirty_talk'] = 'technique':
+		!! dirty talk about his technique
+		if rand(0,1) = 1:
+			'"Yes~! Just like that~!" you moan. "You''re so fucking good~! Don''t stop~! Don''t stop~!"'
+		else
+			'"Ah~! You''re so good~!" you moan. "You''re driving me crazy~!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he yanks your hips down, slamming your pussy onto his cock.'
+			'"Yours~!" you whimper atop him.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Oh fuck~!" you moan loudly. "This dirty little slut is gonna cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you barely gasp out. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck~! I''m such a dirty girl~!" you moan loudly. "I can''t stop moving~! I''m such a slut~!"'
+			else
+				'"Have you ever been ridden by a cunt as sloppy as mine?" you moan. "Ungh~! I''m so wet~! Only a whore like me would get this wet~!"'
+			end
 		end
-	elseif $npc_dick_desc[$boy] = 'long':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Ungh~! You''re <i>so</i> deep! Right there! Right there! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'huge':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'enormous':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re <i>so</i> big! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'lengthy':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> I feel you in my stomach~! It''s so good!!"'
-	elseif $npc_dick_desc[$boy] = 'gigantic':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
-	elseif $npc_dick_desc[$boy] = 'monster':
-		'"Ungh~! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck me with your monster cock~! Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! I can feel you in my stomach~! Don''t stop~! Don''t stop~! Don''t stop~!"'
 	end
 end
 
@@ -1462,36 +1668,87 @@ end
 
 if $ARGS[0] = 'cowgirl3.2_dirty_talk':
 !!	'"Yes! Fuck! Yes! Just like that!" you scream. "Pound my pussy! Clap my ass! Fill me with your cock!"'
-	if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your tiny cock!"'
-	elseif $npc_dick_desc[$boy] = 'chode':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! "Fuck me with your fat chode!"'
-	elseif $npc_dick_desc[$boy] = 'skinny':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your skinny dick!"'
-	elseif $npc_dick_desc[$boy] = 'normal':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your cock!"'
-	elseif $npc_dick_desc[$boy] = 'thick':
-		if pcs_vag <= 10:
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+	if $sex_ev['dirty_talk'] = 'cock':
+		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your tiny cock!"'
+		elseif $npc_dick_desc[$boy] = 'chode':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! "Fuck me with your fat chode!"'
+		elseif $npc_dick_desc[$boy] = 'skinny':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your skinny dick!"'
+		elseif $npc_dick_desc[$boy] = 'normal':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your cock!"'
+		elseif $npc_dick_desc[$boy] = 'thick':
+			if pcs_vag <= 10:
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+			else
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> Yes! Just like that! Your cock is so big! Don''t stop! Don''t stop! Pound my ass!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'long':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> deep! Don''t stop! Don''t stop! Pound my ass!"'
+		elseif $npc_dick_desc[$boy] = 'huge':
+			'"OH FUCK!" you scream so hard it hurts. "You''re so big! You''re <i>so</i> big! Don''t stop! Pound my pussy with your big fucking cock!"'
+		elseif $npc_dick_desc[$boy] = 'enormous':
+			if pcs_vag <= 10:
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> big! You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+			else
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re so big! You''re <i>so</i> big! Oh fuck! Don''t stop! Don''t stop! Don''t fucking stop!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'lengthy':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! <i>Oh my God!</i> Don''t <i>fucking</i> stop!"'
+		elseif $npc_dick_desc[$boy] = 'gigantic':
+			'"OH FUCK!" you scream so hard it hurts. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
+		elseif $npc_dick_desc[$boy] = 'monster':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! Oh <i>fuck!</i> You''re so big! You''re <i>so</i> big! You''re so <i>fucking big</i>! Don''t fucking stop! Tear me in half with your monster cock!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'arousal':
+		!! dirty talk about your arousal
+		if pcs_horny >= 70:
+			if rand(0,1) = 1:
+				'"Yes~! Fuck~! Yes~!" you scream. "I can''t fucking stop~! I''m gonna fucking come~!"'
+			else
+				'"Oh <i>fuck</i>~!" you scream. "I''m so fucking wet~! I''m gonna come~! I''m gonna come all over your cock~!"'
+			end
 		else
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> Yes! Just like that! Your cock is so big! Don''t stop! Don''t stop! Pound my ass!"'
+			if rand(0,1) = 1:
+				'"Ungh~! Yes~!" you scream. "My pussy loves your cock~! I can''t get enough~!"'
+			else
+				'"My pussy can''t get enough of you~!" you scream. "I need more~! More~! It''s so good~!"'
+			end
 		end
-	elseif $npc_dick_desc[$boy] = 'long':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> deep! Don''t stop! Don''t stop! Pound my ass!"'
-	elseif $npc_dick_desc[$boy] = 'huge':
-		'"OH FUCK!" you scream so hard it hurts. "You''re so big! You''re <i>so</i> big! Don''t stop! Pound my pussy with your big fucking cock!"'
-	elseif $npc_dick_desc[$boy] = 'enormous':
-		if pcs_vag <= 10:
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> big! You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+	elseif $sex_ev['dirty_talk'] = 'technique':
+		!! dirty talk about his technique
+		if pcs_horny >= 70:
+			if rand(0,1) = 1:
+				'"Yes~! Fuck~! Yes~!" you scream. "Pound my fucking pussy~! Don''t stop~! You''re gonna make me come~!"'
+			else
+				'"Oh <i>fuck</i>~!" you scream. "I''m so fucking wet~! I''m gonna come all over your cock~! You''re driving me crazy~!"'
+			end
 		else
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re so big! You''re <i>so</i> big! Oh fuck! Don''t stop! Don''t stop! Don''t fucking stop!"'
+			if rand(0,1) = 1:
+				'"Ungh~! Don''t stop~!" you scream. "Smash my pussy~! It feels so good~!"'
+			else
+				'"Fuck~!" you scream. "Fuck~! Pound my fucking pussy~! <b><i>Fuck~!</i></b>"'
+			end
 		end
-	elseif $npc_dick_desc[$boy] = 'lengthy':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! <i>Oh my God!</i> Don''t <i>fucking</i> stop!"'
-	elseif $npc_dick_desc[$boy] = 'gigantic':
-		'"OH FUCK!" you scream so hard it hurts. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
-	elseif $npc_dick_desc[$boy] = 'monster':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! Oh <i>fuck!</i> You''re so big! You''re <i>so</i> big! You''re so <i>fucking big</i>! Don''t fucking stop! Tear me in half with your monster cock!"'
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he thrusts his cock into you from below like an inverted jackhammer.'
+			'"Yours~!" you whimper from atop him, barely able to keep from falling over.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you scream. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you scream. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you scream. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you scream. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
 end
 

locations/sex_ev_doggy.qsrc

@@ -25,7 +25,7 @@ if $ARGS[0] = 'doggy_start':
 			else
 				'"I want to try it from behind."'
 			end
-			act'Keep fucking':gs'sex_ev_doggy', 'doggy_goto'
+			gs'sex_ev_doggy', 'doggy_goto'
 		end
 	elseif sex_ev['initiative'] ! 1 and sex_ev['force_initiative'] ! 1:
 		gs 'sex_ev_sex', 'speed_select'
@@ -33,34 +33,38 @@ if $ARGS[0] = 'doggy_start':
 			sex_ev['cock_inserted'] = 1
 			cla
 			if sex_ev['fuck_count'] = 0:
-				if npc_rough_lover[$boy] = 1:
+				!!if npc_rough_lover[$boy] = 1:
+				if rand(0,1) = 1:
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/sex/vag/doggy/spit1.mp4"></video></center>'
 					'He flips you over and pulls you to your knees. You feel his hands on your ass and hear an <i>aach ptoogh-!</i> from behind you and a glob of something wet lands directly into your pussy.'
 					act'Take it in stride':
 						cla & *nl
 						'You take it in stride as <<$npc_firstname[$boy]>> pushes his finger in and spreads his spit wad around inside you.'
 						'"Just making sure you''re nice and wet," he says, lining himself up with you. You can hear the smile in his voice.'
-						act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+						gs'sex_ev_doggy', 'doggy_goto'
 					end
 					
 					act'Enjoy':
 						cla & *nl
 						'"Ah~!" you moan, feeling your arousal spread and lube up your pussy even more than the spit and the fingers inside it.'
 						'"Just making sure you''re nice and wet," he says, lining himself up with you. You can hear the smile in his voice.'
-						act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+						gs'sex_ev_doggy', 'doggy_goto'
 					end
 					
 					act'Flinch':
 						cla & *nl
 						'You flinch in surprise but otherwise don''t say anything as <<$npc_firstname[$boy]>> pushes a finger inside, spreading his spit wad around inside your pussy.'
 						'"Just making sure you''re nice and wet," he says, lining himself up with you. You can hear the smile in his voice.'
-						act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+						gs'sex_ev_doggy', 'doggy_goto'
 					end
 					
 					act'Complain':
 						cla & *nl
 						'"Ew!" you grimace. "Could you <i>not</i> spit in my pussy like that?"'
 						'"Just making sure you''re nice and wet," he says, lining himself up with you. You can hear the smile in his voice.'
-						act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+						if lubri > 0:'"I have lube you know!" you growl back.'
+						gs'sex_ev_doggy', 'doggy_goto'
 					end
 					
 					act'You like it dirty':
@@ -70,21 +74,21 @@ if $ARGS[0] = 'doggy_start':
 						cla & *nl
 						'"Mmmm~!" you moan hoarsely, spreading your knees further apart. "Yes daddy, make sure this dirty little pussy is nice and wet for you."'
 						'Encouraged by your dirty talk, he spits into your pussy again drawing more squeals of pleasure from you as he jams fingers in after, spreading the saliva around your insides. You can feel yourself dripping wet now and it''s not the spit.'
-						act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+						gs'sex_ev_doggy', 'doggy_goto'
 					end
 				else
 					'He flips you over and pulls you to your knees.'
 					'"I wanna fuck you from behind."'
-					act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+					gs'sex_ev_doggy', 'doggy_goto'
 				end
 			elseif $sex_ev['position'] = 'doggy':
 				'He pulls you back onto your knees and you immediately feel him pressing inside you from behind again.'
-				act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+				gs'sex_ev_doggy', 'doggy_goto'
 			else
 				'He forces you onto your knees and gives you a slap on the ass before pressing himself inside your pussy.'
-				act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+				gs'sex_ev_doggy', 'doggy_goto'
 			end
-			
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	else
 		gs 'sex_ev_sex', 'speed_select'
@@ -94,15 +98,16 @@ if $ARGS[0] = 'doggy_start':
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy2.jpg"></center>'
 			if sex_ev['fuck_count'] = 0:
 				'You turn around and get on your knees, presenting your ass towards him.'
-				'"Fuck me from behind."'
+				'"Let''s do it doggy style," you say, giving him a sultry look over your shoulder.'
 			elseif $sex_ev['position'] = 'doggy':
 				'You get back on your knees, waggling your ass enticingly at him.'
 			elseif $sex_ev['position'] = 'miss' or $sex_ev['position'] = 'cowgirl':
-				'"I want you to fuck me from behind this time," you say, giving him a sultry look over your shoulder.'
+				'"I want to do it doggy this time," you say, giving him a sultry look over your shoulder.'
 			else
 				'"I need you inside me again," you say, giving him a sultry look over your shoulder.'
 			end
-			act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+			gs'sex_ev_doggy', 'doggy_goto'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	end
 end
@@ -112,7 +117,7 @@ if $ARGS[0] = 'doggy_girl_orgasm_continue':
 	act'Continue':
 		sex_ev['cock_inserted'] = 1
 		cla & *clr
-		gs 'sex_ev_sex', 'speed_select'
+!!		gs 'sex_ev_sex', 'speed_select'
 		if $sex_ev['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
 			'You''ve barely finished your orgasm when he rolls you onto your knees and pulls your hips back towards him. With one swift thrust, he plunges his cock into your still-quivering pussy, earning an involuntary gasp from your lips.'
@@ -126,15 +131,15 @@ if $ARGS[0] = 'doggy_girl_orgasm_continue':
 		'"I''m not finished yet," he growls from behind you.'
 		$sex_ev['position'] = 'doggy'
 		$sex_ev['pos_speed'] = 'doggy<<sex_ev[''speed'']>>'
-!!		act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
 		gs'sex_ev_sex', 'fuck_continue'
 	end
 end
 
 if $ARGS[0] = 'doggy_goto':
 	sex_ev['cock_inserted'] = 1
+	$sex_ev['position'] = 'doggy'
 	if sex_ev['speed'] = 0: sex_ev['speed'] = rand(1,3)
-	gt 'sex_ev_doggy', 'doggy<<sex_ev[''speed'']>>'
+	act'Get fucked':gt 'sex_ev_doggy', 'doggy<<sex_ev[''speed'']>>'
 end
 
 if $ARGS[0] = 'doggy_change_position':
@@ -181,6 +186,8 @@ if $ARGS[0] = 'doggy_pain2':
 		gs 'sex_ev_cum', 'fuck_cum'
 	end
 	
+	act'Tell <<$npc_firstname[$boy]>> it hurts': gs 'sex_ev_doggy', 'doggy_pain3'
+	
 	act'Ask to try something else':
 		cla & *clr
 		if ((npc_selfish[$boy] = 1 and $npc_fav_pos[$boy] = 'miss') or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
@@ -201,6 +208,82 @@ if $ARGS[0] = 'doggy_pain2':
 	end
 end
 
+if $ARGS[0] = 'doggy_pain3':
+	if (npc_abusive[$boy] > 0 or (npc_selfish[$boy] = 1 and rand(1,3) >= 2)) and npc_caretaker[$boy] ! 1:
+		cla & *nl
+		'"Ouch! Hey! Ow!" you yelp. "Wait! That hurts!"'
+		iif(sex_ev['speed'] < 3, '"It''ll get better," <<$npc_firstname[$boy]>> says uncaringly and continues to fuck you without breaking stride.', '"It''ll get better," <<$npc_firstname[$boy]>> grunts uncaringly and continues to fuck you without breaking stride.')
+		act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+	else
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
+		'"Ouch!" you yelp. "Wait! Ow!"'
+		'<<$npc_firstname[$boy]>> stops halfway through a thrust, jabbing you painfully with his cock again and nearly falling on you in the process.'
+		'"Shit! Sorry," he says. "What happened? Are you okay?"'
+		act'Be irritated':
+			minut += 1
+			npc_dislike[$boy] += 2
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/shock1.jpg"></center>'
+			'"Who taught you how to fuck?" you scowl. "Your dick is stabbing into me in all the worst ways!"'
+			if npc_argumentative[$boy] > 0:
+				'"Well sorry that your pussy doesn''t exactly come with an instruction manual!" <<$npc_firstname[$boy]>> growls back.'
+			else
+				'"Oh. Sorry," he mumbles sheepishly.'
+			end
+			'"Whatever. Can we just move around to get a better angle?"'
+			*nl
+			'The two of you awkwardly shuffle around for a minute, trying to find a position for your hips that''s a little more comfortable.'
+			'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+			act'Fine I guess':
+				sex_ev['fuck_enjoyment'] = 0
+				cla & *nl
+				'"Fine I guess," you sigh. It doesn''t really feel good, but at least it doesn''t hurt anymore.'
+				*nl
+				'<<$npc_firstname[$boy]>> takes your response as approval and starts moving again.'
+				act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+			end
+			
+			act'Better':
+				sex_ev['fuck_enjoyment'] = 1
+				cla & *nl
+				'"<i>Finally</i>," you sigh. "Yes, that feels better. Try to remember this next time."'
+				*nl
+				'<<$npc_firstname[$boy]>> seems to be a little ticked off by your attitude but starts moving again anyways.'
+				act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+			end
+		end
+		
+		act'Laugh it off':
+			minut += 1
+			npc_like[$boy] += 2
+			sex_ev['fuck_enjoyment'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			if sex_ev['dick_too_big'] = 1:
+				sex_ev['dick_too_big'] = 2
+				sex_ev['fuck_enjoyment'] = 0
+				minut += rand(1,2)
+				'"Your dick is kind of big for me," you smile ruefully. "Can we just pause for a sec to let my poor pussy adjust?"'
+				'"Oh. Yeah, sure."'
+				*nl
+				'You spend a couple minutes with <<$npc_firstname[$boy]>>''s entire length inside you, taking deep breaths as you slowly let it stretch your pussy. Eventually the pain fades to nothing more than a dull ache and even maybe feels a little good.'
+				*nl
+				'"Okay," you nod. "You can start moving again."'
+			else
+			
+				'"I''m fine," you chuckle. "Your dick is kind of at an awkward angle though. Can we adjust a little?"'
+				'"Oh. Yeah, sure."'
+				*nl
+				'The two of you shuffle around a little finding a position for your hips that''s a little more comfortable.'
+				'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+				'"Much better," you nod back and he resumes thrusting.'
+			end
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+		end
+	end
+end
+
 if $ARGS[0] = 'doggy1':
 	sex_ev['doggy_fuck'] = 1
 	!! slow pace
@@ -210,12 +293,12 @@ if $ARGS[0] = 'doggy1':
 	!! sex_ev['doggy_fuck'] tracks if you fuck in this position
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'doggy_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
-
+	'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow1.mp4"></video></center>'
 	if mesec > 0:
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/blood1.jpg"></center>'
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/blood1.jpg"></center>'
 		gs 'sex_ev_doggy', 'doggy1_start_period_desc'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow1.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow1.mp4"></video></center>'
 		gs 'sex_ev_doggy', 'doggy1_start_desc'
 	end
 
@@ -287,7 +370,9 @@ end
 if $ARGS[0] = 'doggy1.1':
 	sex_ev['doggy_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy1'
+	sex_ev['speed'] = 1
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow2.mp4"></video></center>'
@@ -298,7 +383,9 @@ end
 if $ARGS[0] = 'doggy1.2':
 	sex_ev['doggy_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy1'
+	sex_ev['speed'] = 1
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow<<rand(1,2)>>.mp4"></video></center>'
@@ -326,10 +413,20 @@ if $ARGS[0] = 'doggy1.2':
 				'You whimper softly, clenching your teeth as hard as you can as <<$npc_firstname[$boy]>> continues to thrust into you from behind, trying with all your might to prevent yourself from bursting into tears. It hurts <i>so much</i>, but you can''t bring yourself to tell him to stop.'
 			end
 		end
+		
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you try to move your hips in time with his, throwing them back to meet his thrusts and doing your best to make <<$npc_firstname[$boy]>> feel good, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			'Your breath hitches as <<$npc_firstname[$boy]>> continues to slowly thrust into your pussy from behind. You aren''t sure what changed, but it''s like your body is waking up from a deep sleep. His cock stretches your walls, every thrust <i>fills</i> you in a way you didn''t know you needed to be, and even now you can feel yourself get wetter and wetter, slicking up his cock and making it easier to reach the deepest parts of your pussy.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You focus on <<$npc_firstname[$boy]>>''s cock inside of you, clenching your abdomen and throwing your hips back in time with his, trying to squeeze your pussy tight around him to make him come faster.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -338,14 +435,19 @@ if $ARGS[0] = 'doggy1.2':
 			'"<i>Ah~! Ahh~! Ahhh~!</i>"'
 			*nl
 			'You moan softly as <<$npc_firstname[$boy]>> continues to pump his cock into you from behind. It still basically feels numb to your pussy other than the occasional bump, but you don''t want him to feel bad about it either so you play along, trying to pretend it feels good.'
-		elseif sex_ev['dirty_talk'] = 1:
+		elseif $sex_ev['dirty_talk'] ! '':
 			gs 'sex_ev_doggy', 'doggy1.2_dirty_talk'
 			*nl
 			'All your dirty talk is just that: talk. Your pussy still barely feels anything other than the occasional bump, but you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending it feels good.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant like a bitch in heat as your pussy tightens up and you start throwing your hips back to meet <<$npc_firstname[$boy]>>''s thrusts. By the way his breathing changes, you think you''re doing as good a job of pleasing him as he is for you.'
 	elseif sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
 		gs 'sex_ev_doggy', 'doggy1.2_moan_desc'
-	elseif sex_ev['dirty_talk'] = 1:
+	elseif $sex_ev['dirty_talk'] ! '':
 		gs 'sex_ev_doggy', 'doggy1.2_dirty_talk'
 	else
 		'You let out sighs of contentment, focusing on <<$npc_firstname[$boy]>>''s cock inside you.'
@@ -376,12 +478,12 @@ if $ARGS[0] = 'doggy2':
 	!! sex_ev['doggy_fuck'] tracks if you fuck in this position
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'doggy_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
-
+	'<center><video autoplay loop src="images/shared/sex/vag/doggy/med1.mp4"></video></center>'
 	if mesec > 0:
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/blood1.jpg"></center>'
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/blood1.jpg"></center>'
 		gs 'sex_ev_doggy', 'doggy2_start_period_desc'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/doggy/med1.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/doggy/med1.mp4"></video></center>'
 		gs 'sex_ev_doggy', 'doggy2_start_desc'
 	end
 	act'Enjoy it':
@@ -459,7 +561,9 @@ end
 if $ARGS[0] = 'doggy2.1':
 	sex_ev['doggy_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy2'
+	sex_ev['speed'] = 2
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/med<<rand(1,4)>>.mp4"></video></center>'
@@ -471,7 +575,9 @@ end
 if $ARGS[0] = 'doggy2.2':
 	sex_ev['doggy_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy2'
+	sex_ev['speed'] = 2
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/med<<rand(1,4)>>.mp4"></video></center>'
@@ -499,11 +605,20 @@ if $ARGS[0] = 'doggy2.2':
 				'You whimper softly, clenching your teeth as hard as you can as <<$npc_firstname[$boy]>>''s hips loudly clap into your ass and pain lances through your pussy. It hurts <i>so much</i>, but you can''t bring yourself to tell him to stop.'
 			end
 		end
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you try to move your hips in time with his, throwing them back to meet <<$npc_firstname[$boy]>>''s thrusts, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			$orgasm_or = ''
 			'Your breath hitches as <<$npc_firstname[$boy]>> continues to steadily fuck you from behind. You aren''t sure what changed, but it''s like your body is waking up from a deep sleep. His cock stretches your walls, every thrust <i>fills</i> you in a way you didn''t know you needed to be, and even now you can feel yourself get wetter and wetter, slicking up his cock and making it slide in and out of you with much greater, and pleasurable, force.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You focus on <<$npc_firstname[$boy]>>''s cock inside of you, clenching your abdomen and throwing your hips back in time with his, trying to squeeze your pussy tight around him to make him come faster.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -512,11 +627,16 @@ if $ARGS[0] = 'doggy2.2':
 			'"<i>Ah~! Ahh~! Ahhh~!</i>"'
 			*nl
 			'You moan loudly as <<$npc_firstname[$boy]>> continues to pump his cock into you from behind. It still basically feels numb to your pussy other than the slapping of his hips against yours, but you don''t want him to feel bad about it either so you play along, trying to pretend it feels good.'
-		elseif sex_ev['dirty_talk'] = 1:
+		elseif $sex_ev['dirty_talk'] ! '':
 			gs 'sex_ev_doggy', 'doggy2.2_dirty_talk'
 			*nl
 			'All your dirty talk is just that: talk. For all the effort <<$npc_firstname[$boy]>> is putting in, you can''t say it feels very good. But you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending otherwise.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant like a bitch in heat as your pussy tightens up and you start throwing your hips back to meet <<$npc_firstname[$boy]>>''s thrusts. By the way his breathing changes, you think you''re doing as good a job of pleasing him as he is for you.'
 	elseif sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
 		if sex_ev['moan'] = 1:
 			'"<i>Nngh~! Ngh~! Ngh~! Nnngh~!</i>"'
@@ -525,7 +645,7 @@ if $ARGS[0] = 'doggy2.2':
 		end
 		*nl
 		gs 'sex_ev_doggy', 'doggy2.2_moan_desc'
-	elseif sex_ev['dirty_talk'] = 1:
+	elseif $sex_ev['dirty_talk'] ! '':
 		gs 'sex_ev_doggy', 'doggy2.2_dirty_talk'
 	else
 		gs 'sex_ev_doggy', 'doggy2.2_sensation_desc'
@@ -553,7 +673,7 @@ if $ARGS[0] = 'doggy3':
 	!! sex_ev['doggy_fuck'] tracks if you fuck in this position
 	sex_ev['doggy_fuck'] = 1
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'doggy_virg_hard1'
-	gs 'arousal', 'vaginal',1,'no_orgasm_msg', 'rough'
+	gs 'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'rough'
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/rough1.mp4"></video></center>'
 	'You gasp as <<$npc_firstname[$boy]>> slams his cock into you from behind, the impact rippling through your entire body. As your head jerks back reflexively, <<$npc_firstname[$boy]>>''s hand grabs hold of your hair, yanking on it to pull you harder onto his cock.'
 	*nl
@@ -745,7 +865,9 @@ end
 
 if $ARGS[0] = 'doggy3.1':
 	sex_ev['doggy_fuck'] = 1
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy3'
+	sex_ev['speed'] = 3
 	cla & *clr
 	if npc_abusive[$boy] = 1:
 		sex_ev['rough_fuck'] = 1
@@ -785,7 +907,9 @@ end
 if $ARGS[0] = 'doggy3.2':
 	sex_ev['doggy_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy3'
+	sex_ev['speed'] = 3
 	gs 'sex_ev_sex', 'fuck_rough_arousal_code'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/hard<<rand(1,3)>>.mp4"></video></center>'
@@ -817,11 +941,21 @@ if $ARGS[0] = 'doggy3.2':
 				'You sob openly as <<$npc_firstname[$boy]>> smashes his cock into you from behind. It hurts so much you think you''re going to die, but you can''t manage to tell him to stop. The only thing you can do is cry wordlessly as he pounds you straight into the bed with his thrusts.'
 			end
 		end
+		
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you move your hips in time with his, throwing them back to meet <<$npc_firstname[$boy]>>''s demolishing thrusts and try to ride the wave, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			$orgasm_or = ''
 			'Your breath hitches as <<$npc_firstname[$boy]>> continues to pound your pussy from behind. You aren''t sure what changed, but it''s like your body is coming alive. His cock stretches your walls, it''s so <i>deep</i> inside you, and even now you can feel yourself get wetter and wetter, slicking up his cock and making it hammer you harder and harder with greater satisfaction every time.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You focus on <<$npc_firstname[$boy]>>''s cock as he pounds you, clenching your abdomen and throwing your hips back in time with his, trying to squeeze your pussy tight around him to make him come faster.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -830,14 +964,19 @@ if $ARGS[0] = 'doggy3.2':
 			'"<i>Ah~! Ahh~! Ahhh~!</i>"'
 			*nl
 			'You moan loudly as <<$npc_firstname[$boy]>> continues to pound his cock between your legs. It still basically feels numb to your pussy other than the slamming of his hips against yours, but you don''t want him to feel bad about it either so you play along, trying to pretend it feels good.'
-		elseif sex_ev['dirty_talk'] = 1:
+		elseif $sex_ev['dirty_talk'] ! '':
 			gs 'sex_ev_doggy', 'doggy3.2_dirty_talk'
 			*nl
 			'All your dirty talk is just that: talk. <<$npc_firstname[$boy]>> continues to relentlessly smash your pussy with his cock and you honestly can''t say it feels very good. But you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending otherwise.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		'"<i>Hah~! Hahh~! Ahh~! Hahh~!</i>"'
+		*nl
+		'You pant like a bitch in heat as <<$npc_firstname[$boy]>> pounds you from behind. Your pussy almost involuntarily tighten up, desperately throwing your hips back to meet <<$npc_firstname[$boy]>>''s thrusts. By the way his breathing changes, you think you''re giving just as good as you''re getting as you feel arousal dribble down your thighs.'
 	elseif sex_ev['moan'] >= 1:
 		gs 'sex_ev_doggy', 'doggy3.2_moan_desc'
-	elseif sex_ev['dirty_talk'] = 1:
+	elseif $sex_ev['dirty_talk'] ! '':
 		gs 'sex_ev_doggy', 'doggy3.2_dirty_talk'
 	else
 		gs 'sex_ev_doggy', 'doggy3.2_sensation_desc'
@@ -1096,7 +1235,7 @@ end
 
 if $ARGS[0] = 'doggy1.2_dirty_talk':
 !! '"Ah~! Yes~! Just like that~!" you moan, your voice a hoarse with arousal. "You''re so deep! I can feel you inside me..."'
-	if sex_ev['dirty_talk']  = 1:
+	if $sex_ev['dirty_talk'] = 'cock':
 		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
 			'"Ah~! Yes~! Just like that~!" you moan, your voice a hoarse with arousal as <<$npc_firstname[$boy]>> does an amazing job fucking you with his tiny cock. "You''re so good! Right there~! Right there!"'
 		elseif $npc_dick_desc[$boy] = 'chode':
@@ -1124,7 +1263,7 @@ if $ARGS[0] = 'doggy1.2_dirty_talk':
 		elseif $npc_dick_desc[$boy] = 'monster':
 			'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! Don''t stop~!"'
 		end
-	elseif sex_ev['dirty_talk'] = 2:
+	elseif $sex_ev['dirty_talk'] = 'arousal':
 		!! dirty talk about your arousal
 		if pcs_horny >= 60:
 			if rand(0,1) = 1:
@@ -1139,12 +1278,30 @@ if $ARGS[0] = 'doggy1.2_dirty_talk':
 				'"Ah~! That feels <i>so good</i>," you moan quietly. "I''m gonna go crazy~!"'
 			end
 		end
-	elseif sex_ev['dirty_talk'] = 3:
+	elseif $sex_ev['dirty_talk'] = 'technique':
 		!! dirty talk about his technique
 		if rand(0,1) = 1:
 			'"Yes~! Just like that~!" you moan. "You''re so good~! Don''t stop~! Don''t stop~!"'
 		else
-			'"I love the way you fuck me," you moan hoarsely. "Keep going~!"'
+			'"I love the way you fuck me~!" you moan hoarsely. "Keep going~!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he moves his cock inside you with tantalizing slowness.'
+			'"Yours~!" you whimper, squirming beneath him.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you moan softly, barely louder than a whisper. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you moan. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you mew softly. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you moan. "Own this pussy with your cock~!"'
+			end
 		end
 	end
 end
@@ -1347,32 +1504,73 @@ end
 
 if $ARGS[0] = 'doggy2.2_dirty_talk':
 !!	'"Ah! Fuck! Just like that!" you moan loudly. "Fuck my pussy with your big cock! Right there! Fuck! You''re so good!"'
-	if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your tiny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'chode':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your fat chode! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'skinny':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your skinny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'normal':
-		'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy just like that!" you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'thick':
-		if pcs_vag <= 10:
-			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck, you''re so big! You''re stretching me out! Don''t stop! Fuck my pussy with your big cock! It''s so good!"'
+	if $sex_ev['dirty_talk'] = 'cock':
+		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your tiny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'chode':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your fat chode! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'skinny':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy with your skinny dick! " you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'normal':
+			'"Ah! <i>Fuck!</i> Yes! Yes! Fuck my pussy just like that!" you moan loudly. "Don''t stop! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'thick':
+			if pcs_vag <= 10:
+				'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck, you''re so big! You''re stretching me out! Don''t stop! Fuck my pussy with your big cock! It''s so good!"'
+			else
+				'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Don''t stop! Fuck my pussy with your big cock! Fuck, you''re so big! You''re so <i>fucking</i> good!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'long':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Ungh~! You''re <i>so</i> deep! Right there! Right there! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'huge':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'enormous':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re <i>so</i> big! You''re so <i>fucking</i> good!"'
+		elseif $npc_dick_desc[$boy] = 'lengthy':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> I feel you in my stomach~! It''s so good!!"'
+		elseif $npc_dick_desc[$boy] = 'gigantic':
+			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
+		elseif $npc_dick_desc[$boy] = 'monster':
+			'"Ungh~! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck me with your monster cock~! Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! I can feel you in my stomach~! Don''t stop~! Don''t stop~! Don''t stop~!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'arousal':
+		if pcs_horny >= 70:
+			if rand(0,1) = 1:
+				'"Ungh~! Yes~! Fuck~!" you pant. "You''re gonna make me come~!"'
+			else
+				'"Oh fuck~! <i>I''m gonna come~! I''m gonna come~! I''m gonna come~!</i>" you moan. "Don''t stop!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! I''m <i>so</i> wet..." you moan. "You feel so good inside me~!"'
+			else
+				'"My pussy can''t get enough of you~!" you moan. "You''re making me so wet~!"'
+			end
+		end
+	elseif $sex_ev['dirty_talk'] = 'technique':
+		if rand(0,1) = 1:
+			'"Yes~! Just like that~!" you moan. "You''re so fucking good~! Don''t stop~! Don''t stop~!"'
 		else
-			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Don''t stop! Fuck my pussy with your big cock! Fuck, you''re so big! You''re so <i>fucking</i> good!"'
+			'"Ah~! You''re so good~!" you moan. "You''re driving me crazy~!"'
 		end
-	elseif $npc_dick_desc[$boy] = 'long':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Ungh~! You''re <i>so</i> deep! Right there! Right there! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'huge':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'enormous':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your huge cock! Ungh~! You''re <i>so</i> deep! You''re <i>so</i> big! You''re so <i>fucking</i> good!"'
-	elseif $npc_dick_desc[$boy] = 'lengthy':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> I feel you in my stomach~! It''s so good!!"'
-	elseif $npc_dick_desc[$boy] = 'gigantic':
-		'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
-	elseif $npc_dick_desc[$boy] = 'monster':
-		'"Ungh~! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck me with your monster cock~! Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! I can feel you in my stomach~! Don''t stop~! Don''t stop~! Don''t stop~!"'
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he slowly withdraws his cock before ramming it back into your cunt.'
+			'"Yours~!" you whimper into the bedsheets.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you moan loudly. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you moan. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you moan loudly. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you moan. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
 end
 
@@ -1677,36 +1875,87 @@ end
 
 if $ARGS[0] = 'doggy3.2_dirty_talk':
 !!	'"Yes! Fuck! Yes! Just like that!" you scream. "Pound my pussy! Clap my ass! Fill me with your cock!"'
-	if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your tiny cock!"'
-	elseif $npc_dick_desc[$boy] = 'chode':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! "Fuck me with your fat chode!"'
-	elseif $npc_dick_desc[$boy] = 'skinny':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your skinny dick!"'
-	elseif $npc_dick_desc[$boy] = 'normal':
-		'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your cock!"'
-	elseif $npc_dick_desc[$boy] = 'thick':
-		if pcs_vag <= 10:
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+	if $sex_ev['dirty_talk'] = 'cock':
+		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your tiny cock!"'
+		elseif $npc_dick_desc[$boy] = 'chode':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! "Fuck me with your fat chode!"'
+		elseif $npc_dick_desc[$boy] = 'skinny':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your skinny dick!"'
+		elseif $npc_dick_desc[$boy] = 'normal':
+			'"Yes! Fuck! Yes! Just like that!" you scream so hard it hurts. "Clap my fucking ass! Fuck me with your cock!"'
+		elseif $npc_dick_desc[$boy] = 'thick':
+			if pcs_vag <= 10:
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+			else
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> Yes! Just like that! Your cock is so big! Don''t stop! Don''t stop! Pound my ass!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'long':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> deep! Don''t stop! Don''t stop! Pound my ass!"'
+		elseif $npc_dick_desc[$boy] = 'huge':
+			'"OH FUCK!" you scream so hard it hurts. "You''re so big! You''re <i>so</i> big! Don''t stop! Pound my pussy with your big fucking cock!"'
+		elseif $npc_dick_desc[$boy] = 'enormous':
+			if pcs_vag <= 10:
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> big! You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+			else
+				'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re so big! You''re <i>so</i> big! Oh fuck! Don''t stop! Don''t stop! Don''t fucking stop!"'
+			end
+		elseif $npc_dick_desc[$boy] = 'lengthy':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! <i>Oh my God!</i> Don''t <i>fucking</i> stop!"'
+		elseif $npc_dick_desc[$boy] = 'gigantic':
+			'"OH FUCK!" you scream so hard it hurts. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
+		elseif $npc_dick_desc[$boy] = 'monster':
+			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! Oh <i>fuck!</i> You''re so big! You''re <i>so</i> big! You''re so <i>fucking big</i>! Don''t fucking stop! Tear me in half with your monster cock!"'
+		end
+	elseif $sex_ev['dirty_talk'] = 'arousal':
+		!! dirty talk about your arousal
+		if pcs_horny >= 70:
+			if rand(0,1) = 1:
+				'"Yes~! Fuck~! Yes~!" you scream. "I love getting pounded~! You''re gonna make me come~!"'
+			else
+				'"Oh <i>fuck</i>~!" you scream. "I''m so fucking wet~! I''m gonna come~! I''m gonna come all over your cock~!"'
+			end
 		else
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> Yes! Just like that! Your cock is so big! Don''t stop! Don''t stop! Pound my ass!"'
+			if rand(0,1) = 1:
+				'"Ungh~! Don''t stop~!" you scream. "Smash my sloppy wet pussy~!"'
+			else
+				'"My pussy can''t get enough of you~!" you scream. "I need more~! More~! It''s so good~!"'
+			end
 		end
-	elseif $npc_dick_desc[$boy] = 'long':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> deep! Don''t stop! Don''t stop! Pound my ass!"'
-	elseif $npc_dick_desc[$boy] = 'huge':
-		'"OH FUCK!" you scream so hard it hurts. "You''re so big! You''re <i>so</i> big! Don''t stop! Pound my pussy with your big fucking cock!"'
-	elseif $npc_dick_desc[$boy] = 'enormous':
-		if pcs_vag <= 10:
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re <i>so</i> big! You''re gonna tear me in half! Don''t stop! Don''t stop!"'
+	elseif $sex_ev['dirty_talk'] = 'technique':
+		!! dirty talk about his technique
+		if pcs_horny >= 70:
+			if rand(0,1) = 1:
+				'"Yes~! Fuck~! Yes~!" you scream. "Pound my fucking pussy~! Don''t stop~! You''re gonna make me come~!"'
+			else
+				'"Oh <i>fuck</i>~!" you scream. "I''m so fucking wet~! I''m gonna come all over your cock~! You''re driving me crazy~!"'
+			end
 		else
-			'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> You''re so big! You''re <i>so</i> big! Oh fuck! Don''t stop! Don''t stop! Don''t fucking stop!"'
+			if rand(0,1) = 1:
+				'"Ungh~! Don''t stop~!" you scream. "Smash my pussy~! It feels so good~!"'
+			else
+				'"Fuck~!" you scream. "Fuck~! Pound my fucking pussy~! <b><i>Fuck~!</i></b>"'
+			end
 		end
-	elseif $npc_dick_desc[$boy] = 'lengthy':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! <i>Oh my God!</i> Don''t <i>fucking</i> stop!"'
-	elseif $npc_dick_desc[$boy] = 'gigantic':
-		'"OH FUCK!" you scream so hard it hurts. "Oh <i>fuck!</i> You''re <i>so</i> deep! You''re so <i>fucking big</i>! I can feel you in my stomach~! Don''t stop~!"'
-	elseif $npc_dick_desc[$boy] = 'monster':
-		'"OH FUCK!" you scream so hard it hurts. "<i>Fuck!</i> I feel you in my stomach~! Oh <i>fuck!</i> You''re so big! You''re <i>so</i> big! You''re so <i>fucking big</i>! Don''t fucking stop! Tear me in half with your monster cock!"'
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he smashes his cock into you like a battering ram.'
+			'"Yours~!" you whimper into the bedsheets.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you scream. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you scream. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you scream. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you scream. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
 end
 

locations/sex_ev_events.qsrc

@@ -0,0 +1,138 @@
+# sex_ev_events
+!! for special events
+
+if $ARGS[0] = 'sneak_phone':
+	msg'Placeholder - Event is WIP'
+end
+
+if $ARGS[0] = 'rummage_drawers_start':
+	cla
+	act'Go back':gs 'sex_ev_after', 'after_sex2_w_picture'
+	act'Rummage through his dresser':gt 'sex_ev_events', 'rummage_drawers1'
+end
+
+if $ARGS[0] = 'rummage_drawers1':
+	sex_ev['drawer_rummage'] = 1
+	cla & *clr
+	'<center><video autoplay loop src="images/pc/activities/misc/open_drawers1.mp4"></video></center>'
+	!! if $npc_occupation[$boy] = 'drug_dealer': find drugs
+	act'Close the drawer':gs'sex_ev_events', 'rummage_drawers_end_route'
+	
+	if rand(1,3) = 1:
+		'You rummage through <<$npc_firstname[$boy]>>''s drawers. You don''t find anything of interest.'
+	!!{elseif npc_criminal[$boy] > 0:
+		'Your eyes go wide as you pull back on <<$npc_firstname[$boy]>>''s drawers and find a handgun inside.'
+		act'What is this???':gt'sex_ev_events', 'gun_ev_confront1'
+		if sveta_is_cop = 1:
+			act'Take note of the serial number':gt'sex_ev_events', 'gun_ev_serial1'
+		end}
+	else
+		sex_ev['boy_money'] = rand(3,9)
+		if npc_finance[$boy] = 1: sex_ev['boy_money'] += rand(1,5)
+		if npc_finance[$boy] = 2: sex_ev['boy_money'] = sex_ev['boy_money'] * 2
+		'You rummage through <<$npc_firstname[$boy]>>''s drawers. You find <<sex_ev[''boy_money''] * 100>> <b>₽</b> in various notes, along with some of his other things.'
+		act'Steal it':
+			cla & *clr
+			$sex_ev['bed_room']
+			sex_ev['stole_money'] = 1
+			if rand(1,2) = 1:
+				if $sex_ev['loc'] = 'hotel_room' or npc_apt_type[$boy] = 2 or npc_apt_type[$boy] = 3:
+					'You take a wary glance at the bathroom door. Right as you do, you hear the water shut off. Realizing there''s only seconds, you take your chance and grab the cash out of the drawer and running back to your things to stuff it into your bag.'
+				else
+					'You take a wary glance at the door. Seems like <<$npc_firstname[$boy]>> is still showering so it should be safe. But right as you pick up the cash, you hear footsteps in the hall. Panic shoots through you as you run back to stuff it into your bag.'
+				end
+				act'Hide the money!':gs'sex_ev_events', 'rummage_drawers_end_route'
+			else
+				if $sex_ev['loc'] = 'hotel_room' or npc_apt_type[$boy] = 2 or npc_apt_type[$boy] = 3:
+					'You take a wary glance at the bathroom door. The water''s still running. It doesn''t seem like he''s going to come out any time soon. You decide to take your chance and grab the cash, closing the drawer and stuffing it into your purse.'
+				else
+					'You take a wary glance at the door. You don''t hear <<$npc_firstname[$boy]>> coming so you decide to take your chance and grab the cash, closing the drawer and stuffing it into your purse.'
+				end
+				act'Wait for <<$npc_firstname[$boy]>> to finish':
+					cla & *clr
+					$sex_ev['bed_room']
+					if $sex_ev['loc'] = 'hotel_room' or npc_apt_type[$boy] = 2 or npc_apt_type[$boy] = 3:
+						'After hiding the money, you sit back on the bed and act natural. It''s only a couple minutes before you hear the water shut off and <<$npc_firstname[$boy]>> comes out with wet hair and a towel wrapped around his waist.'
+					else
+						'After hiding the money, you sit back on the bed and act natural. It''s only a couple minutes before <<$npc_firstname[$boy]>> comes strolling back into the bedroom with wet hair and a towel wrapped around his waist.'
+					end
+					gs'sex_ev_shower', 'boy_shower_finish_acts'
+				end
+				act'Join him in the shower':gt'sex_ev_shower', 'after_shower_join'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'rummage_drawers_end_route':
+	cla & *clr
+	if sex_ev['boy_in_shower'] = 1:
+		gs'sex_ev_events', 'rummage_drawers_shower_end'
+	else
+	
+	end
+end
+
+if $ARGS[0] = 'rummage_drawers_shower_end':
+	$sex_ev['bed_room']
+	
+	!! if rand(1,3) = 1: he catches you
+	if sex_ev['stole_money'] = 1:
+		money += sex_ev['boy_money'] * 100
+		'You finish hiding the money in your bag just as <<$npc_firstname[$boy]>> comes into the room, hair wet from the shower, towel wrapped around his waist.'
+	else
+		'You finish closing the drawer and step away just as <<$npc_firstname[$boy]>> comes into the room, hair wet from the shower, towel wrapped around his waist.'
+	end
+	gs'sex_ev_shower', 'boy_shower_finish_acts'
+end
+
+
+if $ARGS[0] = 'boy_timecheck':
+	if hour >= npc_work_start[$boy] - 1 and hour < npc_work_end[$boy] and rand(1,5) = 1:
+		sex_ev['npc_late'] = 1
+		gs'sex_ev_events', 'boy_gotta_go'
+	end
+end
+
+if $ARGS[0] = 'boy_gotta_go':
+	cla
+	act'Continue':
+		cla & *clr
+		$sex_ev['bed_room']
+		'<<$npc_firstname[$boy]>> checks the time.'
+		if sex_ev['boy_shower'] = 1:
+			'"Shit, I gotta go," he says, dropping his towel and reaching for his clothes. ' + iif(hour >= npc_work_start[$boy], '"I''m late for work."', '"I''m gonna be late for work."')
+		else
+			'"Shit, I gotta go," he says, hauling himself out of bed. ' + iif(hour >= npc_work_start[$boy], '"I''m late for work."', '"I''m gonna be late for work."')
+		end
+		gs'sex_ev_events', 'boy_gotta_go2'
+	end
+end
+
+if $ARGS[0] = 'boy_gotta_go2':
+	cla
+	if $sex_ev['loc'] ! 'pc_home':
+		'"Should I get dressed too then?" you ask.'
+	end
+	if $sex_ev['loc'] = 'hotel_room':
+		sex_ev['hotel_days'] = rand(1,3)
+		if sex_ev['hotel_days'] = 1:
+			'"No need to rush. The room is booked until tomorrow," <<$npc_firstname[$boy]>> grins. "Feel free to order room service. Just make sure to be gone by checkout."'
+		else
+			'"No need to rush. The room is booked for a few more days," <<$npc_firstname[$boy]>> grins. "Feel free to order room service. Just make sure to be gone by checkout."'
+		end
+		*nl
+		'With that, <<$npc_firstname[$boy]>> finishes getting dressed and heads out the door, leaving you in the hotel room all to yourself.'
+		act'Continue':gs'sex_ev_leave', 'exit'
+	elseif $sex_ev['loc'] = 'npc_home':
+		if npc_lover_keys[$boy] = 1:
+			'"No, it''s fine. You have a key right? Just lock up when you leave," he says, quickly getting dressed.'
+		else
+			'"Yeah, I need you to leave so I can lock up."'
+			'You hurry to get dressed beside <<$npc_firstname[$boy]>>.'
+			gs'sex_ev_leave', 'dress_loop_end'
+			gs'sex_ev_leave', 'leaving_dialogue_choices'
+		end
+	end
+end
+--- sex_ev_events ---------------------------------

locations/sex_ev_favorite_part.qsrc

@@ -21,7 +21,7 @@ if $ARGS[0] = 'boy_good_for_you':
 	sex_ev['boy_topics'] -= 1
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-	act'I had fun too':
+	act'I had fun':
 		cla & *nl
 		if sex_ev['virgin'] = 1 and sex_ev['fuck_count'] > 0:
 			'"I had fun too," you smile back. "Was it... good...? For my first time...?'
@@ -32,6 +32,12 @@ if $ARGS[0] = 'boy_good_for_you':
 	end
 	
 	if sex_ev['type'] = 'hookup':
+		if sex_ev['cum_count'] >= (npc_sexdrive[$boy] + sex_ev['extra_cum']) / 4 * 3 and npc_sexdrive[$boy] >= 6:
+			'"Damn! You''re incredible!" <<$npc_firstname[$boy]>> says. "I haven''t come that much in ages."'
+		else
+			'"That was pretty good," <<$npc_firstname[$boy]>> smiles at you.'
+		end
+	else
 		if sex_ev['cum_count'] >= npc_sexdrive[$boy] + sex_ev['extra_cum']:
 			'"Holy shit," <<$npc_firstname[$boy]>> pants. "You emptied my balls out."'
 			act'I could still go more':
@@ -42,18 +48,38 @@ if $ARGS[0] = 'boy_good_for_you':
 					'"I was really close to my next orgasm," you reply, wistfully rubbing your thighs together.'
 				elseif age < 20:
 					'"I''m a horny teenager, what do you expect?" you reply, rubbing your thighs together.'
-				elseif age < 20:
+				else
 					'"I''m a just a horny girl," you reply, rubbing your thighs together.'
 				end
 				gs'sex_ev_favorite_part', 'good_for_you2'
 			end
-		elseif sex_ev['cum_count'] >= (npc_sexdrive[$boy] + sex_ev['extra_cum']) / 4 * 3 and npc_sexdrive[$boy] >= 6:
-			'"Damn! You''re incredible!" <<$npc_firstname[$boy]>> says. "I haven''t come that much in ages."'
 		else
-			'"That was pretty good," <<$npc_firstname[$boy]>> smiles at you.'
+			'"Was it good for you too?" <<$npc_firstname[$boy]>> asks, grinning tiredly at you.'
+		end
+	end
+	
+	act'I''ve had better':
+		cla & *nl
+		if sex_ev['girl_orgasm'] = 1:
+			'"I''ve had better," you pant tiredly, still coming down from your orgasm.'
+		else
+			'"I''ve had better," you shrug ambivalently.'
+		end
+		gs'sex_ev_pillow_talk', 'topic_route'
+	end
+	
+	if sex_ev['orgasm_count'] < 1:
+		act'It was fine':
+			cla & *nl
+			'"It was fine I guess," you shrug ambivalently.'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+		act'I didn''t cum (annoyed)':
+			cla & *nl
+			'"Would have been nice if I got to come," you sigh passive aggressively.'
+			gs'sex_ev_pillow_talk', 'topic_route'
 		end
-	else
-		'"Was it good for you too?" <<$npc_firstname[$boy]>> asks, grinning tiredly at you.'
 	end
 end
 
@@ -694,7 +720,7 @@ if $ARGS[0] = 'npc_miss_fav1':
 		
 		act'Like feeling his weight':
 			cla & *nl
-			'"Me too," you smile back. "I love feeling the weight of your body on top of me, pressing down through your cock and into my pussy. I can''t get that in any other position. It''s really intense."'
+			'"Me too," you smile back. "I can feel the weight of your entire body when you''re on top, pressing down through your cock into my pussy. I love it."'
 			gs'sex_ev_pillow_talk', 'topic_route'
 		end
 		
@@ -911,6 +937,7 @@ if $ARGS[0] = 'pc_favorite_part':
 	gs'sex_ev_favorite_part', 'pc_mouthcum_fav1'
 	gs'sex_ev_favorite_part', 'pc_facial_fav1'
 	gs'sex_ev_favorite_part', 'pc_titcum_fav1'
+!!	gs'sex_ev_favorite_part', 'pc_broken_condom1'
 	
 end
 
@@ -998,8 +1025,8 @@ if $ARGS[0] = 'pc_fuck_fav1':
 				if sex_ev['miss_fuck'] = 1:
 					act'When we did it missionary':
 						cla & *clr
-						'<center><video autoplay loop src="images/shared/sex/after/pillow_talk2.mp4"></video></center>'
-						'"I liked it when we did it in missionary," you smile.'
+						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+						'"I liked it when you were on top," you smile.'
 						'"Yeah?" <<$npc_firstname[$boy]>> grins back. "That''s your favorite position?"'
 						act'Not usually':
 							cla & *nl
@@ -1025,13 +1052,13 @@ if $ARGS[0] = 'pc_fuck_fav1':
 						
 						act'Like feeling his weight':
 							cla & *nl
-							'"There''s something really hot about feeling a guy''s on top of me," you say. "I can feel the weight of your entire body pressing down through your cock and into my pussy. It''s really intense."'
+							'"I can feel the <i>weight</i> of you when you''re on top," you say. "Your entire body pressing down through your cock into my pussy. I really like that."'
 							gs'sex_ev_pillow_talk', 'topic_route'
 						end
 						
 						act'Like being on bottom':
 							cla & *nl
-							'"I just like it when the guy''s on top," you say. "Being on bottom is more fun."'
+							'"I just like being on bottom. It''s more fun," you smile.'
 							gs'sex_ev_pillow_talk', 'topic_route'
 						end
 					end
@@ -1040,8 +1067,8 @@ if $ARGS[0] = 'pc_fuck_fav1':
 				if sex_ev['doggy_fuck'] = 1:
 					act'When we did it doggy':
 						cla & *clr
-						'<center><video autoplay loop src="images/shared/sex/after/pillow_talk2.mp4"></video></center>'
-						'"I liked it when you fucked me doggy," you smile.'
+						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+						'"I liked it when you fucked me from behind," you smile.'
 						'"Yeah?" <<$npc_firstname[$boy]>> grins back. "You like it doggy?"'
 						act'Not usually':
 							cla & *nl
@@ -1116,7 +1143,7 @@ if $ARGS[0] = 'pc_fuck_fav1':
 						cla & *clr
 						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 						'"I liked it when you fucked me hard," you grin.'
-						'"You like it that way?" <<$npc_firstname[$boy]>> grins.'
+						'"You like it rough?" <<$npc_firstname[$boy]>> grins.'
 						act'Sometimes':
 							cla & *nl
 							'"Not always," you shrug. "But any one speed is boring if you don''t mix it up. A good pounding is always welcome provided the timing is right."'
@@ -1126,7 +1153,7 @@ if $ARGS[0] = 'pc_fuck_fav1':
 						act'Admit it':
 							npc_knows_pc_likes_rough[$boy] = 1
 							cla & *nl
-							'"Sure do," you admit freely. "Nothing I love more than a good pounding."'
+							'"Yeah," you admit freely. "Nothing I love more than a good pounding."'
 							gs'sex_ev_pillow_talk', 'topic_route'
 						end
 					end
@@ -1225,6 +1252,12 @@ if $ARGS[0] = 'pc_fuck_fav2':
 							gs'sex_ev_pillow_talk', 'topic_route'
 						end
 						
+						act'Like feeling his weight':
+							cla & *nl
+							'"I can feel your weight when you''re on top..." you manage to stammer out, feeling your blush intensify. "I-it... it feels really good..."'
+							gs'sex_ev_pillow_talk', 'topic_route'
+						end
+						
 						act'Like being on bottom':
 							cla & *nl
 							'"Y-yes," you admit, feeling your blush intensify. "I like... I like it when the guy is on top..."'
@@ -1523,6 +1556,20 @@ if $ARGS[0] = 'pc_titcum_fav1':
 	end
 end
 
+if $ARGS[0] = 'pc_broken_condom1':
+	if sex_ev['broken_condom_creampie_cum'] = 1:
+		act'When the condom broke':
+			cla
+			act'Embarrassed':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"When, er-" You feel yourself blushing already but force yourself to stammer out the rest. "When the condom, uhm... broke..."'
+			end
+			
+		end
+	end
+end
+
 if $ARGS[0] = 'good_for_you_too':
 	act'Satisfied':
 		cla & *nl
@@ -1532,17 +1579,35 @@ if $ARGS[0] = 'good_for_you_too':
 	
 	act'Unsatisfied':
 		cla & *nl
-		'"Not really," you sigh. .'
+		'"Not really," you sigh.'
 		gs'sex_ev_pillow_talk', 'topic_route'
 	end
 	
 	act'It was okay':
 		cla & *nl
-		
-		'"I had fine I guess," you shrug.' + iif(sex_ev['virgin'] ! 1, ' "Wasn''t the worst lay I''ve ever had."', '')
+		'"It was fine I guess," you shrug.' + iif(sex_ev['virgin'] ! 1, ' "Wasn''t the worst lay I''ve ever had."', '')
 		gs'sex_ev_pillow_talk', 'topic_route'
 	end
 	
+	if sex_ev['orgasm_count'] = 0:
+		act'Didn''t get to come':
+			cla
+			act'Irritable':
+				cla & *nl
+				'"You need to up your game," you sigh irritably. "I didn''t even come once."'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'Teasing':
+				cla & *nl
+				'"I didn''t manage to come even once," you smirk wistfully, rubbing your thighs together. "You need to up your game."'
+				!! if npc_argumentative[$boy] ! 1 and npc_insecure[$boy] ! 1:
+				'"I''ll work on it," he smiles back shyly.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		end
+	end
+	
 	if sex_ev['fuck_count'] > 0:
 		act'Good dicking':
 			cla & *nl
@@ -1558,7 +1623,7 @@ if $ARGS[0] = 'good_for_you_too':
 			cla & *nl
 			'"I think I''m dick drunk," you say with a ditzy giggle, rubbing your wet thighs together.'
 			gs'sex_ev_pillow_talk', 'topic_route'
-		end		
+		end
 	end
 	
 	if pain['vaginal'] > 40:

locations/sex_ev_foreplay.qsrc

@@ -155,7 +155,7 @@ if $ARGS[0] = 'selfish_fuck_start':
 			'<<$npc_firstname[$boy]>> pushes you down on the bed and spreads your legs, preparing to thrust between them.'
 			if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 				act'Stop him (virgin)':$sex_ev['position'] = 'miss' & gt'sex_ev_virgin', 'lover_wait'
-				act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
+				gs'sex_ev_virgin', 'start3'
 			else
 				act'Let <<$npc_firstname[$boy]>> fuck you':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>>_goto'
 			end
@@ -184,7 +184,7 @@ if $ARGS[0] = 'selfish_fuck_start':
 				'<<$npc_firstname[$boy]>> pushes you down on the bed and spreads your legs, pausing only to grab a condom and roll it onto his cock.'
 				if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 					act'Stop him (virgin)':$sex_ev['position'] = 'miss' & gt'sex_ev_virgin', 'lover_wait'
-					act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
+					gs'sex_ev_virgin', 'start3'
 				else
 					act'Let <<$npc_firstname[$boy]>> fuck you':gs 'sex_ev_condoms', 'npc_condom_use_stats' & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>>_goto'
 				end
@@ -316,7 +316,7 @@ if $ARGS[0] = 'cuni_alternatives':
 		gs 'sex_ev_foreplay', 'bj_dom1'
 	end
 	if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
-		act'You can take my virginity':gt'sex_ev_virgin', 'start2'
+		gs'sex_ev_virgin', 'start2'
 	elseif sex_ev['fuck_count'] = 0:
 		act'We could just skip to fucking?':
 			cla & *nl
@@ -341,8 +341,8 @@ end
 if $ARGS[0] = 'period_lick':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/kuni/pussylick4.mp4"></video></center>'
-	gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
-	gs 'arousal', 'cuni',-10,'no_orgasm_msg'
+	gs 'arousal', 'cuni',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs 'arousal', 'cuni',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'stat'
 	$sex_ev['position'] = 'kuni'
 	'You lay back on the bed, letting your eyes roll back in your skull. Blood and pussy juice flow like water from your cunt and <<$npc_firstname[$boy]>> laps it up like ambrosia. It feels <i>so</i> good and you relax while he goes to work on you down there.'
@@ -369,7 +369,7 @@ if $ARGS[0] = 'period_lick':
 	else
 		act'Don''t stop!':
 			$orgasm_or = 'yes'
-			gs 'arousal', 'cuni',rand(1,2),'no_orgasm_msg'
+			gs 'arousal', 'cuni',rand(1,2), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
@@ -399,7 +399,7 @@ end
 if $ARGS[0] = 'pussy_lick':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/kuni/pussylick4.mp4"></video></center>'
-	gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
+	gs 'arousal', 'cuni',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'stat'
 	$sex_ev['position'] = 'kuni'
 	sex_ev['cuni_count'] += 1
@@ -435,7 +435,7 @@ if $ARGS[0] = 'pussy_lick':
 	else
 		act'Don''t stop!':
 			$orgasm_or = 'yes'
-			gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
+			gs 'arousal', 'cuni',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
@@ -472,7 +472,7 @@ if $ARGS[0] = 'pussy_lick_loop':
 			cla & *clr
 			pcs_horny = 90
 			$orgasm_or = 'yes'
-			gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
+			gs 'arousal', 'cuni',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			sex_ev['orgasm_count'] += 1
 			sex_ev['consecutive_cuni_orgasm'] += 1
@@ -540,7 +540,7 @@ end
 if $ARGS[0] = 'nipple_play':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/foreplay/nipple_play1.mp4"></video></center>'
-	gs 'arousal', 'foreplay',rand(5,10),'no_orgasm_msg'
+	gs 'arousal', 'foreplay',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	$sex_ev['position'] = 'nipple_play'
 	'<<$npc_firstname[$boy]>> leans forward, grabbing ahold of your breasts with his hands and uses his mouth on your nipples. He sucks them up, flicks at the tips with his tongue, sending electricity flying through them. Heat spreads through your hips and you can feel wetness pooling between your thighs.'
@@ -551,13 +551,13 @@ if $ARGS[0] = 'nipple_play':
 			gs 'sex_ev_foreplay', 'kuni_start'
 		else
 			cla & *clr
-			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss2.jpg"></center>'
 			sex_ev['position_choose'] = 1
-			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, climbing on top of you with his rock hard cock between your legs.'
+			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, spreading your legs.'
 			$sex_ev['position'] = 'miss'
 			if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 				act'Stop him (virgin)':$sex_ev['position'] = 'miss' & gt'sex_ev_virgin', 'lover_wait'
-				act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
+				gs'sex_ev_virgin', 'start3'
 			elseif sex_ev['condom'] ! 0 or sex_ev['no_condom'] ! 0:
 				act'Let <<$npc_firstname[$boy]>> fuck you':gs 'sex_ev_condoms', 'npc_condom_use_stats' & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>>_goto'
 			else
@@ -645,7 +645,7 @@ end
 if $ARGS[0] = 'bj_sub1':
 	sex_ev['bj_count'] += 1
 	$sex_ev['bj_type'] = 'sub'
-	gs'arousal', 'bj',rand(2,7),'no_orgasm_msg'
+	gs'arousal', 'bj',rand(2,7), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	if sex_ev['reluctant_bj'] = 1:
@@ -684,7 +684,7 @@ end
 
 if $ARGS[0] = 'bj_sub2':
 	sex_ev['bj_count'] += 1
-	gs'arousal', 'bj',rand(2,7),'no_orgasm_msg'
+	gs'arousal', 'bj',rand(2,7), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj52.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> slowly pumps his cock in and out of your mouth, plunging it all the way down your throat where you can feel it press against your windpipe. You keep it loose while he does all the work, occasionally letting your tongue snake out for a cheeky lick, but otherwise just let <<$npc_firstname[$boy]>> keep fucking your face.'
@@ -1171,7 +1171,7 @@ if $ARGS[0] = 'bj_sub_cum_face3':
 		'"<<$sex_ev[''cum_desc'']>>" you ask.'
 		'<<$npc_firstname[$boy]>> sits up, working his shaft with his hand as he points it at your face. That seems like a "yes" to you.'
 		gs'sex_ev_cum', 'facial_close_eyes'
-		gs'sex_ev_cum', 'facial_tongue_swallow'
+		gs'sex_ev_cum', 'facial_tongue_cum'
 		gs'sex_ev_cum', 'facial_tongue_spit'
 		gs'sex_ev_cum', 'facial_brace'
 		act'Jerk him yourself':gt'sex_ev_cum', 'facial_jerk_him'
@@ -1398,7 +1398,7 @@ if $ARGS[0] = 'bj_force_cum_grumble':
 
 					act'Help him out (hand)':
 						cla & *clr
-						gs'arousal', 'hj',1,'no_orgasm_msg'
+						gs'arousal', 'hj',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
 						'"Let me help you out with that," you smile, rolling over and taking <<$npc_firstname[$boy]>>''s dick in your hand. Even soft, you feel it twitch in response to your touch and you can''t help but smile wider at the reaction. You begin working the shaft up and down and in no time at all, you''ve got nice stiff cock ready for fucking.'
@@ -1408,7 +1408,7 @@ if $ARGS[0] = 'bj_force_cum_grumble':
 
 					act'Help him out (mouth)':
 						cla & *clr
-						gs'arousal', 'bj',1,'no_orgasm_msg'
+						gs'arousal', 'bj',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
 						'"Let me help you out with that," you smile, rolling over and taking <<$npc_firstname[$boy]>>''s dick in your hand. Leaning down, you take the soft tip of his dick and place it between your lips, sucking gently. You instantly feel it twitch and you can''t help but smirk, even with a cock in your mouth.'
@@ -1420,7 +1420,7 @@ if $ARGS[0] = 'bj_force_cum_grumble':
 				else
 					'"Nah, I think I''m tapped out.'
 					act'Try to get him hard again (hand)':
-						gs'arousal', 'hj',rand(1,2),'no_orgasm_msg'
+						gs'arousal', 'hj',rand(1,2), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						cla & *clr
 						if sex_ev['cum_count'] >= npc_sexdrive[$boy]:
@@ -1444,7 +1444,7 @@ if $ARGS[0] = 'bj_force_cum_grumble':
 					end
 
 					act'Try to get him hard again (mouth)':
-						gs'arousal', 'bj',rand(1,2),'no_orgasm_msg'
+						gs'arousal', 'bj',rand(1,2), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						if sex_ev['cum_count'] >= npc_sexdrive[$boy]:
 							cla & *clr
@@ -1502,11 +1502,11 @@ if $ARGS[0] = 'bj_sub_lets_fuck':
 		if know_virgin[$boy] = 1:
 			'"That was great," he smiles. "That was exactly what I wanted. But I want more now."'
 			act'I''m saving my virginity':gt'sex_ev_virgin', 'saving_virginity'
-			act'Okay (lose your virginity)':gt'sex_ev_virgin', 'start4'
+			gs'sex_ev_virgin', 'start4'
 		else
 			'"That was great," he smiles. "That was exactly what I wanted. But <i>now</i> I want your pussy."'
 			act'I''m saving my virginity':gt'sex_ev_virgin', 'saving_virginity'
-			act'Okay (lose your virginity)':gt'sex_ev_virgin', 'start3'
+			gs'sex_ev_virgin', 'start3'
 		end
 	else
 		'"That was great," he smiles. "That was exactly what I wanted. But <i>now</i> I want your pussy."'
@@ -1591,7 +1591,7 @@ if $ARGS[0] = 'bj_sub_lets_fuck':
 end
 
 if $ARGS[0] = 'bj_resume':
-	gs 'arousal', 'bj',rand(5,10),'no_orgasm_msg'
+	gs 'arousal', 'bj',rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
@@ -1655,6 +1655,7 @@ end
 
 
 if $ARGS[0] = 'foreplay_choose':
+	sex_ev['fuck_pos'] = 0
 	sex_ev['fuck'] = 0
 	if $sex_ev['position'] ! 'makeout':gs 'sex_ev_foreplay', 'makeout_dom1'
 
@@ -1699,8 +1700,8 @@ if $ARGS[0] = 'makeout_dom1':
 	if npc_no_kiss[$boy] ! 1:
 		act'Make out with him':
 			npc_no_kiss[$boy] = 2
-			gs'arousal', 'kiss',rand(2,4),'no_orgasm_msg'
-			gs'arousal', 'foreplay',-10,'no_orgasm_msg'
+			gs'arousal', 'kiss',rand(2,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			gs'arousal', 'foreplay',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			$sex_ev['position'] = 'makeout'
 			cla & *clr
@@ -1717,8 +1718,8 @@ if $ARGS[0] = 'makeout_dom1':
 				'You push <<$npc_firstname[$boy]>> onto the bed, crawling over him and plunge your tongue into his mouth, kissing him with everything you''ve got while his hands roam all over your body.'
 			end
 			act'Move your hand to his cock':
-				gs'arousal', 'kiss',rand(2,4),'no_orgasm_msg'
-				gs'arousal', 'hj',-rand(2,4),'no_orgasm_msg'
+				gs'arousal', 'kiss',rand(2,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+				gs'arousal', 'hj',-rand(2,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/foreplay/makeout2.mp4"></video></center>'
 				
@@ -1734,14 +1735,14 @@ if $ARGS[0] = 'makeout_dom1':
 end
 
 if $ARGS[0] = 'makeout_dom2':
-	gs'arousal', 'kiss',rand(2,4),'no_orgasm_msg'
+	gs'arousal', 'kiss',rand(2,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	if rand(0,1) = 1:
 		'<center><video autoplay loop src="images/shared/sex/foreplay/makeout1.mp4"></video></center>'
 		'You continue making out with <<$npc_firstname[$boy]>>, loving the taste of his lips and the feel of his tongue against yours.'
 	else
 		'<center><video autoplay loop src="images/shared/sex/foreplay/grope1.mp4"></video></center>'
-		gs'arousal', 'foreplay',-10,'no_orgasm_msg'
+		gs'arousal', 'foreplay',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		'You continue making out with <<$npc_firstname[$boy]>>, loving the taste of his lips. <<$npc_firstname[$boy]>> can''t keep his hands off of you, groping your breasts while continuing to plunge his tongue down your throat.'
 	end
 	act'Keep making out':gt'sex_ev_foreplay', 'makeout_dom2'
@@ -1751,14 +1752,14 @@ if $ARGS[0] = 'makeout_dom2':
 end
 
 if $ARGS[0] = 'makeout_dom3':
-	gs'arousal', 'kiss',rand(2,7),'no_orgasm_msg'
-	gs'arousal', 'hj',-rand(2,4),'no_orgasm_msg'
+	gs'arousal', 'kiss',rand(2,7), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'hj',-rand(2,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	if rand(0,1) = 1:
 		'<center><video autoplay loop src="images/shared/sex/foreplay/makeout2.mp4"></video></center>'
 		'You continue making out with <<$npc_firstname[$boy]>> while jerking him off, loving the taste of his lips and the feel of his tongue against yours and the hard swell of his cock in your hand.'
 	else
-		gs'arousal', 'foreplay',-5,'no_orgasm_msg'
+		gs'arousal', 'foreplay',-5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		'<center><video autoplay loop src="images/shared/sex/foreplay/grope1.mp4"></video></center>'
 		'You continue making out with <<$npc_firstname[$boy]>> while jerking him off, loving the taste of his lips and the hard swell of his cock in your hand. In return, <<$npc_firstname[$boy]>> can''t keep his hands off of you, endlessly groping your breasts while he continues to plunge his tongue down your throat.'
 	end
@@ -1770,7 +1771,7 @@ end
 
 if $ARGS[0] = 'handjob_dom1':
 	act'Play with his cock (hand)':
-		gs'arousal', 'hj',rand(1,4),'no_orgasm_msg'
+		gs'arousal', 'hj',rand(1,4), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		gs'stat'
 		$sex_ev['position'] = 'handjob'
 		cla & *clr
@@ -1812,7 +1813,7 @@ if $ARGS[0] = 'bj_dom1':
 	act'Play with his cock (mouth)':
 		$sex_ev['position'] = 'blowjob_tease'
 		sex_ev['bj_tease'] += 1
-		gs'arousal', 'bj',rand(2,3),'no_orgasm_msg'
+		gs'arousal', 'bj',rand(2,3), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		gs'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
@@ -1834,7 +1835,8 @@ end
 if $ARGS[0] = 'bj_dom1_tease':
 	act'Keep teasing':
 		cla & *clr
-		gs'arousal', 'bj',rand(1,3),'no_orgasm_msg'
+		sex_ev['fuck_pos'] = 0
+		gs'arousal', 'bj',rand(1,3), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		gs'stat'
 		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
 		'You continue swirling your tongue around <<$npc_firstname[$boy]>>, nibbling at the edges so to speak. Every lick causes a twitch. Every kiss, a pulse. His hips roll beneath you, his cock throbs in your hand.'
@@ -1888,7 +1890,8 @@ if $ARGS[0] = 'bj_dom2':
 	sex_ev['bj_count'] += 1
 	sex_ev['cycle_limit'] += 1
 	sex_ev['cock_inserted'] = 0
-	gs'arousal', 'bj',rand(2,7),'no_orgasm_msg'
+	sex_ev['fuck_pos'] = 0
+	gs'arousal', 'bj',rand(2,7), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
 	if $sex_ev['position'] = 'blowjob_tease':
@@ -1920,14 +1923,6 @@ if $ARGS[0] = 'bj_dom_cum_sort':
 end
 
 if $ARGS[0] = 'bj_dom2_continue':
-	act'Keep blowing <<$npc_firstname[$boy]>>':
-		sex_ev['cycle_limit'] += 1
-		cla & *clr
-		'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
-		'You keep blowing <<$npc_firstname[$boy]>>, working his cock with your lips and his shaft with your hand, making sure to add in lots of tongue and drool even more spit.'
-		gs 'sex_ev_foreplay', 'bj_dom_cum_sort'
-	end
-	
 	act'Pull back (sex)':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
@@ -1940,6 +1935,22 @@ if $ARGS[0] = 'bj_dom2_continue':
 		end
 		gs 'sex_ev_sex', 'sex_start'
 	end
+	
+	act'Keep blowing <<$npc_firstname[$boy]>>':
+		sex_ev['cycle_limit'] += 1
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
+		'You keep blowing <<$npc_firstname[$boy]>>, working his cock with your lips and his shaft with your hand, making sure to add in lots of tongue and drool even more spit.'
+		gs 'sex_ev_foreplay', 'bj_dom_cum_sort'
+	end
+	
+	act'Dirty talk':
+		sex_ev['cycle_limit'] += 1
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
+		'"You taste so good," you moan loudly as you briefly come up for air before plunging your lips back down <<$npc_firstname[$boy]>>''s shaft.'
+		gs 'sex_ev_foreplay', 'bj_dom_cum_sort'
+	end
 end
 
 if $ARGS[0] = 'bj_dom2_cum_act':
@@ -2206,7 +2217,7 @@ if $ARGS[0] = 'facesit_1':
 end
 
 if $ARGS[0] = 'facesit_2':
-	gs 'arousal', 'cuni', rand(4,8),'no_orgasm_msg'
+	gs 'arousal', 'cuni', rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	'<center><video autoplay loop src="images/shared/sex/facesit/1.mp4"></video></center>'
 	'You press your pussy right onto <<$npc_firstname[$boy]>>''s face, forcing it between his lips. He immediately complies, sucking gently on your sex while running his tongue through the folds of your pussy to caress your clit.'
@@ -2285,7 +2296,7 @@ if $ARGS[0] = 'facesit_3':
 
 		act'Come again':
 			$orgasm_or = 'yes'
-			gs 'arousal', 'cuni', rand(2,5),'no_orgasm_msg'
+			gs 'arousal', 'cuni', rand(2,5), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/facesit/orgasm1.mp4"></video></center>'
@@ -2338,7 +2349,7 @@ if $ARGS[0] = 'transition1':
 			act'Blowjob':gt 'sex_ev_foreplay', 'bj_sub2'
 		end
 		if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
-			act'Take my virginity':gt'sex_ev_virgin', 'start1'
+			gs'sex_ev_virgin', 'start1'
 		else
 			act'Fuck instead?':
 				cla & *nl

locations/sex_ev_hookup_leave.qsrc

@@ -8,14 +8,15 @@ if $ARGS[0] = 'gotta_go':
 		$sex_ev['fun'] = 'fun'
 	end
 	
-	
 	if rand(1,20) < sex_ev['cum_count'] + sex_ev['extra_cum']: sex_ev['continuation'] = 1
 	if sex_ev['leaving'] = 0:
 		act'I should go':
 			sex_ev['leaving'] = 1
 			cla & *clr
 			gs 'sex_ev_leave', 'dress_loop'
-			if sex_ev['sleepover'] = 1:
+			if sex_ev['angry_after'] = 1 or sex_ev['annoyed'] > 0:
+				'"I have to go," you say flatly, reaching down for your clothes without looking at <<$npc_firstname[$boy]>>.'
+			elseif sex_ev['sleepover'] = 1:
 				'"This has been nice," you say, <<$sex_ev[''dress_describe'']>>. "But I really should go."'
 			elseif sex_ev['get_up'] = 0:
 				'As nice as this is, you really can''t stay and you heave yourself up and away from <<$npc_firstname[$boy]>>, getting up from the bed and moving over to where your discarded clothes were thrown.'
@@ -25,20 +26,21 @@ if $ARGS[0] = 'gotta_go':
 			end
 			gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
-		
-		act'Thanks for the <<$sex_ev[''fun'']>>':
-			sex_ev['leaving'] = 1
-			cla & *clr
-			gs 'sex_ev_leave', 'dress_loop'
-			'You get up from the bed and pad across the floor, bending down to pick up your discarded apparel.'
-			if sex_ev['sleepover'] = 1:
-				'"Thanks for the <<$sex_ev[''fun'']>> last night," you say, <<$sex_ev[''dress_describe'']>> with a smirk over your shoulder. "And for letting me stay over."'
-			elseif sex_ev['get_up'] = 0:
-				'"Thanks for the <<$sex_ev[''fun'']>>," you say, <<$sex_ev[''dress_describe'']>> with a smirk over your shoulder.'
-			else
-				'"Well, thanks for the <<$sex_ev[''fun'']>>," you say, <<$sex_ev[''dress_describe'']>> with a smirk over your shoulder.'
+		if sex_ev['mad'] < 1 and sex_ev['angry_after'] < 1:
+			act'Thanks for the <<$sex_ev[''fun'']>>':
+				sex_ev['leaving'] = 1
+				cla & *clr
+				gs 'sex_ev_leave', 'dress_loop'
+				'You get up from the bed and pad across the floor, bending down to pick up your discarded apparel.'
+				if sex_ev['sleepover'] = 1:
+					'"Thanks for the <<$sex_ev[''fun'']>> last night," you say, <<$sex_ev[''dress_describe'']>> with a smirk over your shoulder. "And for letting me stay over."'
+				elseif sex_ev['get_up'] = 0:
+					'"Thanks for the <<$sex_ev[''fun'']>>," you say, <<$sex_ev[''dress_describe'']>>.'
+				else
+					'"Well, thanks for the <<$sex_ev[''fun'']>>," you say, <<$sex_ev[''dress_describe'']>>.'
+				end
+				gs 'sex_ev_hookup_leave', 'hookup_continuation'
 			end
-			gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	else
 		act'Prepare to leave':
@@ -54,34 +56,58 @@ if $ARGS[0] = 'gotta_go':
 end
 
 if $ARGS[0] = 'hookup_continuation':
-	if rand(1,10) > 7 and (hour > 20 or hour < 2) and npc_caretaker[$boy] > 0 and npc_girlfriend[$boy] = 0 and sex_ev['cant_stay'] = 0:
-		'"Really?" <<$npc_firstname[$boy]>> sits up in bed. "You don''t have to. Are you sure you don''t want to spend the night?"'
-		gs 'sex_ev_hookup_leave', 'spend_the_night'
-	elseif sex_ev['continuation'] > 0:
-		if npc_goal[$boy] = 1:
-			gs 'sex_ev_hookup_leave', 'npc_fuckbuddy_request'
-		elseif npc_goal[$boy] > 1:
-			gs 'sex_ev_hookup_leave', 'npc_date_request'
-		end
-		gs 'sex_ev_hookup_leave', 'finish_dressing'
-	elseif sex_ev['thank_for_fun'] = 1:
-		if sex_ev['bj_count'] > 0 and sex_ev['fuck_count'] < 1:
-			if sex_ev['virgin'] > 0:
-				'"Thanks for the blowjob," he smirks back. "You give pretty good head. You sure you''re a virgin?" You don''t respond, <<$sex_ev[''dress_describe'']>>, but roll your eyes at his commentary.'
+	sex_ev['hookup_continuation_check'] = 1
+	if $sex_ev['type'] = 'hookup':
+		sex_ev['continuation'] = rand(-1,1)
+		if rand(1,10) > 7 and (hour > 20 or hour < 2) and npc_caretaker[$boy] > 0 and npc_girlfriend[$boy] = 0 and sex_ev['cant_stay'] = 0 and sex_ev['sleepover'] ! 1:
+			'"You know, it''s kinda late." <<$npc_firstname[$boy]>> sits up in bed. "You don''t have to go right now. Did you want to maybe... spend the night?"'
+			gs 'sex_ev_hookup_leave', 'spend_the_night'
+		else
+			if sex_ev['continuation'] > 0 and sex_ev['mad'] < 1 and sex_ev['angry_after'] < 1:
+				cla
+				if npc_finance[$boy] = 2 and npc_goal[$boy] < 3 and (rand(-1,2) - $npc_selfish[$boy] > 0 or sex_ev['prostitution'] = 1):
+					gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer'
+				elseif npc_goal[$boy] = 1:
+					gs 'sex_ev_hookup_leave', 'npc_fuckbuddy_request'
+				elseif npc_goal[$boy] > 1:
+					gs 'sex_ev_hookup_leave', 'npc_date_request'
+				end
+				gs 'sex_ev_leave', 'dressing_finish'
+			elseif sex_ev['thank_for_fun'] = 1:
+				if sex_ev['bj_count'] > 0 and sex_ev['fuck_count'] < 1:
+					if sex_ev['virgin'] > 0:
+						'"Thanks for the blowjob," he smirks back. "You give pretty good head. You sure you''re a virgin?" You don''t respond, <<$sex_ev[''dress_describe'']>>, but roll your eyes at his commentary.'
+					else
+						'"Thanks for the blowjob," he smirks back as you''re <<$sex_ev[''dress_describe'']>>. "You give great head."'
+					end
+				elseif sex_ev['fuck_count'] > 0:
+					'"Right back at you," he smirks in return while you''re <<$sex_ev[''dress_describe'']>>.'
+				end
+				gs 'sex_ev_hookup_leave', 'later'
+				gs 'sex_ev_leave', 'dress_talk_pc'
+				gs 'sex_ev_hookup_leave', 'panty_gift'
 			else
-				'"Thanks for the blowjob," he smirks back as you''re <<$sex_ev[''dress_describe'']>>. "You give great head."'
+				cla
+				'"Alright, sure. Feel free to see yourself out."'
+				gs 'sex_ev_hookup_leave', 'later'
+				gs 'sex_ev_leave', 'dress_talk_pc'
+				gs 'sex_ev_leave', 'panty_gift'
 			end
-		elseif sex_ev['fuck_count'] > 0:
-			'"Right back at you," he smirks in return while you''re <<$sex_ev[''dress_describe'']>>.'
 		end
-		gs 'sex_ev_hookup_leave', 'later'
-		gs 'sex_ev_hookup_leave', 'panty_gift'
-		gs'sex_ev_leave', 'dress_talk'
 	else
-		'"Alright, sure. Feel free to see yourself out."'
-		gs 'sex_ev_hookup_leave', 'later'
-		gs 'sex_ev_leave', 'panty_gift'
-		gs'sex_ev_leave', 'dress_talk'
+		sex_ev['continuation'] = rand(-1,1)
+		if sex_ev['continuation'] > 0 and sex_ev['mad'] < 1 and sex_ev['angry_after'] < 1:
+			
+			if npc_finance[$boy] = 2 and npc_goal[$boy] < 3 and (rand(-1,2) - $npc_selfish[$boy] > 0 or sex_ev['prostitution'] = 1) and $npc_rel_type[$boy] ! 'sugar_daddy':
+				cla
+				gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer'
+	!!		elseif npc_goal[$boy] = 1 and $npc_rel_type[$boy] ! 'fuckbuddy' and $npc_rel_type[$boy] ! 'sugar_daddy':
+	!!			gs 'sex_ev_hookup_leave', 'npc_fuckbuddy_request'
+	!!		elseif npc_goal[$boy] > 1 and $npc_rel_type[$boy] ! 'fuckbuddy' and $npc_rel_type[$boy] ! 'sugar_daddy'::
+	!!			gs 'sex_ev_hookup_leave', 'npc_date_request'
+			end
+	!!		gs 'sex_ev_leave', 'dressing_finish'
+		end
 	end
 end
 
@@ -100,14 +126,14 @@ if $ARGS[0] = 'spend_the_night':
 		act'No, I shouldn''t':
 			sex_ev['cant_stay'] = 1
 			cla & *clr
-			$npc_apt_bedroom[$boy]
+			$sex_ev['bed_room']
 			'"... no," you sigh. "I really shouldn''t. I want to, but I can''t."'
 			gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 		
 		act'I guess I could...':
 			cla & *clr
-			$npc_apt_bedroom[$boy]
+			$sex_ev['bed_room']
 			'"... I guess I could..." you relent, dropping the clothes you were holding.'
 			act'Undress and get into bed with him':
 				if $clothingworntype ! 'nude':gs 'clothing', 'strip'
@@ -206,7 +232,7 @@ if $ARGS[0] = 'pc_date_request':
 end
 
 if $ARGS[0] = 'npc_fuckbuddy_request':
-	if sex_ev['thank_for_fun'] = 1:		
+	if sex_ev['thank_for_fun'] = 1:
 		'"You want to do it again sometime? Nothing serious, just sex. No strings."'
 	else
 		if sex_ev['npc_can_spend_the_night'] > 0:
@@ -314,6 +340,181 @@ if $ARGS[0] = 'npc_date_request':
 	end
 end
 
+if $ARGS[0] = 'npc_sugar_daddy_offer':
+	sex_ev['sugar_daddy_offer'] = rand(10,20)
+	if sex_ev['thank_for_fun'] = 1:
+		'"Did you really enjoy it? Or are you just saying that?" <<$npc_firstname[$boy]>> asks.'
+		act'Just saying (honest)':
+			gs 'sex_ev_leave', 'dress_loop'
+			'"Just saying it," you shrug, <<$sex_ev[''dress_describe'']>>. "If I''m being honest, this wasn''t anything special. But I thought I''d try to be polite."'
+			gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer2'
+		end
+		
+		act'Just saying (teasing)':
+			gs 'sex_ev_leave', 'dress_loop'
+			'"Just saying," you say, <<$sex_ev[''dress_describe'']>> with a teasing smirk. "I was trying to be nice."'
+			gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer2'
+		end
+		
+		act'You mean it':
+			gs 'sex_ev_leave', 'dress_loop'
+			'"No really," you smirk, <<$sex_ev[''dress_describe'']>>. "It was a good time."'
+			gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer2'
+		end
+	else
+		gs 'sex_ev_hookup_leave', 'npc_sugar_daddy_offer2'
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_offer2':
+	'"How about we do this again?" <<$npc_firstname[$boy]>> says.'
+	'"Do what?" you ask back, <<$sex_ev[''dress_describe'']>>.'
+	if sex_ev['prostitution'] > 0:
+		'"This," he says again, gesturing vaguely around the room. "I you can keep me company and I can get you some... compensation."'
+	else
+		'"This," he says again, gesturing vaguely around the room. "And maybe for your time and your company I could find you some... compensation."'
+	end
+	act'Not a hooker':
+		gs 'sex_ev_leave', 'dress_loop'
+		'"I''m not a hooker," you say, <<$sex_ev[''dress_describe'']>>.'
+		'"I didn''t say you were," <<$npc_firstname[$boy]>> snickers back. "Don''t think of it that way. Think of it more like... a sugar daddy relationship. Will you let me be your daddy?"'
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_refuse'
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_how_much'
+	end
+	gs'sex_ev_hookup_leave', 'npc_sugar_daddy_how_much'
+	gs 'sex_ev_hookup_leave', 'have_a_boyfriend'
+	gs 'sex_ev_hookup_leave', 'have_a_girlfriend'
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_refuse':
+	act'Refuse him':
+		cla
+		act'Nice try but no':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"Nice try but no," you grimace and pick up the rest of your things and head out the door.'
+			act'Leave':gt 'sex_ev_leave', 'exit'
+		end
+		
+		act'Not that kind of girl':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"I''m not that kind of girl," you sneer.'
+			'"The missing money from my wallet would disagree," he chuckles back.'
+			'Filled with disgust, you pick up the rest of your things and head out the door.'
+			act'Leave':gt 'sex_ev_leave', 'exit'
+		end
+		
+		act'"You''re disgusting"':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"You''re disgusting," you sneer.'
+			'"Hey, what''s the point of money if you don''t spend it?" he chuckles back.'
+			'Filled with revulsion, you pick up the rest of your things and head out the door.'
+			act'Leave':gt 'sex_ev_leave', 'exit'
+		end
+		
+		act'"You can''t afford me"':
+			gs 'sex_ev_leave', 'dress_loop'
+			'"Please," you scoff, <<$sex_ev[''dress_describe'']>>. "You can''t afford me."'
+			'"So you say, but your loss in the end I suppose," he smirks back.'
+			act'Leave':gt 'sex_ev_leave', 'exit'
+		end
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_how_much':
+	act'How much?':
+		gs 'sex_ev_leave', 'dress_loop'
+		'"Depends," you muse, <<$sex_ev[''dress_describe'']>>. "How much are we talking?"'
+		'"How about... <<sex_ev[''sugar_daddy_offer''] * 100>> <b>₽</b> a date?"'
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_refuse'
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_accept'
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle'
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_accept':
+	act'Accept':
+		gs 'sex_ev_leave', 'sugar_daddy_add'
+		gs 'sex_ev_leave', 'dress_loop'
+		'"That sounds... mutually beneficial," you say, slowly <<$sex_ev[''dress_describe'']>>.'
+		'"I''ll look forward to the next time you come over then," <<$npc_firstname[$boy]>> smirks. "Give me your number so I can tell you when to come over.'
+		*nl
+		'You hand him your phone and when you get it back you see he''s the latest saved contact.'
+		gs'sex_ev_leave', 'leaving_dialogue_choices'
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_haggle':
+	act'Haggle':
+		:invalid_counter_offer
+		sex_ev['sugar_daddy_counteroffer'] = input ("Pick a number between 10 and 50. The number will be multiplied by 100. (10 will be 1000, 25 will be 2500, 50 will be 5000)")
+		if sex_ev['sugar_daddy_counteroffer'] > 50 or sex_ev['sugar_daddy_counteroffer'] < 10 :
+			msg 'Invalid input. Pick a number between 10 and 50.'
+			jump 'invalid_counter_offer'
+		else
+			gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle2'
+		end
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_haggle2':
+	gs 'sex_ev_leave', 'dress_loop'
+	if sex_ev['sugar_daddy_counteroffer'] = sex_ev['sugar_daddy_offer']:
+		gs'sex_ev_hookup_leave', 'npc_sugar_daddy_accept'
+	elseif sex_ev['sugar_daddy_counteroffer'] < sex_ev['sugar_daddy_offer']:
+		sex_ev['sugar_daddy_offer'] = sex_ev['sugar_daddy_counteroffer']
+		gs 'sex_ev_leave', 'sugar_daddy_add'
+		'"Why don''t we say <<sex_ev[''sugar_daddy_counteroffer''] * 100>>? I''d feel bad if I took too much," you smirk, <<$sex_ev[''dress_describe'']>>.'
+		'"Hey if you''re willing to put out for less, I won''t complain," <<$npc_firstname[$boy]>> grins back. "Give me your number so I can tell you when to come over.'
+		*nl
+		'You hand him your phone and when you get it back you see he''s the latest saved contact.'
+		gs'sex_ev_leave', 'leaving_dialogue_choices'
+	elseif sex_ev['sugar_daddy_counteroffer'] > 25:
+		if sex_ev['haggle_fail'] = 1:
+			gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle_fail'
+		else
+			'"How about <<sex_ev[''sugar_daddy_counteroffer''] * 100>>?" you smirk, <<$sex_ev[''dress_describe'']>>.'
+			'"You greedy bitch," <<$npc_firstname[$boy]>> snickers back. "You''re not worth that much. Come on, try again."'
+			sex_ev['haggle_fail'] = 1
+			gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle'
+		end
+	elseif rand(1,pcs_persuas) > npc_willpower[$boy] or sex_ev['sugar_daddy_counteroffer'] < sex_ev['sugar_daddy_offer'] + 2:
+		sex_ev['sugar_daddy_offer'] = sex_ev['sugar_daddy_counteroffer']
+		gs 'sex_ev_leave', 'sugar_daddy_add'
+		'"Why don''t we say... <<sex_ev[''sugar_daddy_counteroffer''] * 100>>?" you smirk, <<$sex_ev[''dress_describe'']>>. "That seems worth my time."'
+		'"You drive a hard bargain baby girl," <<$npc_firstname[$boy]>> grins back. "But I think I can work with that. Give me your number so I can tell you when to come over.'
+		*nl
+		'You hand him your phone and when you get it back you see he''s the latest saved contact.'
+		gs'sex_ev_leave', 'leaving_dialogue_choices'
+	else
+		if sex_ev['haggle_fail'] = 1:
+			gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle_fail'
+		else
+			sex_ev['sugar_daddy_offer'] += rand(1,2)
+			'"How about... <<sex_ev[''sugar_daddy_counteroffer''] * 100>>?" you ask, <<$sex_ev[''dress_describe'']>>.'
+			'"Seems a little steep," <<$npc_firstname[$boy]>> frowns. "Why don''t we try <<sex_ev[''sugar_daddy_offer''] * 100>>?'
+			gs'sex_ev_hookup_leave', 'npc_sugar_daddy_haggle'
+		end
+	end
+end
+
+if $ARGS[0] = 'npc_sugar_daddy_haggle_fail':
+	'"How about <<sex_ev[''sugar_daddy_counteroffer''] * 100>>?" you try again, <<$sex_ev[''dress_describe'']>>.'
+	if sex_ev['sugar_daddy_counteroffer'] > 25:
+		'"Who do you think you are?" <<$npc_firstname[$boy]>> scoffs. "I could fuck a supermodel for that kind of money. You know what? Forget it. I don''t need another gold digger in my life."'
+	else
+		'"Still too rich for my blood," <<$npc_firstname[$boy]>> says with a shake of his head. "You know what? Forget it. I don''t need another gold digger in my life."'
+	end
+	if sex_ev['dress_end'] = 1:
+		'Everything becomes very awkward very quickly and you take that as your cue to grab your things and hurry out the door.'
+	else
+		'Everything becomes very awkward very quickly and you take that as your cue to finish getting dressed in a hurry and head out the door.'
+	end
+	act'Leave':gt 'sex_ev_leave', 'exit'
+end
+
 if $ARGS[0] = 'fuckbuddy_text':
 	gs 'sex_ev_leave', 'fuckbuddy_add'
 	sex_ev['text_message'] = rand(1,2)
@@ -331,7 +532,7 @@ end
 
 
 if $ARGS[0] = 'later':
-	gs 'sex_ev_hookup_leave', 'finish_dressing'
+	gs 'sex_ev_leave', 'dressing_finish'
 	gs 'sex_ev_hookup_leave', 'pc_fuckbuddy_request'
 	gs 'sex_ev_hookup_leave', 'pc_date_request'
 end
@@ -361,11 +562,21 @@ if $ARGS[0] = 'have_a_boyfriend':
 	if pcs_lover - pcs_girlfriends > 0:
 		act'I have a boyfriend':
 			npc_know_girlfriend[$boy] = 0
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
-			gs 'sex_ev_leave', 'dress_loop_code'
+			gs 'sex_ev_leave', 'dress_loop'
 			'"I have a boyfriend," you say, giving him a look as you''re <<$sex_ev[''dress_describe'']>>.'
-			if npc_fidelity[$boy] = 6:
+			if sex_ev['sugar_daddy_offer'] > 0:
+				'"So?" <<$npc_firstname[$boy]>> grins shamelessly. "Does that change the value of the money?"'
+				gs'sex_ev_hookup_leave', 'npc_sugar_daddy_refuse'
+				gs'sex_ev_hookup_leave', 'npc_sugar_daddy_how_much'
+				act'So long as you know':
+					cla & *clr
+					$sex_ev['bed_room']
+					gs 'sex_ev_leave', 'fuckbuddy_add'
+					'"Just wanted to make sure you knew," you reply, shrugging as you''re <<$sex_ev[''dress_describe'']>>. "So how much are we talking here?"'
+					'"How about... <<sex_ev[''sugar_daddy_offer''] * 100>> <b>₽</b> a ''date?''"'
+					gs'sex_ev_hookup_leave', 'npc_sugar_daddy_accept'
+				end
+			elseif npc_fidelity[$boy] <= 5:
 				if npc_girlfriend[$boy] = 1 and npc_goal[$boy] = 1:
 					'"So? I have a girlfriend," he grins shamelessly. "Doesn''t mean we can''t keep fucking."'
 					act'No way':
@@ -402,36 +613,50 @@ if $ARGS[0] = 'have_a_girlfriend':
 	if pcs_girlfriends > 0:
 		act'I have a girlfriend':
 			npc_know_girlfriend[$boy] = 1
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			gs 'sex_ev_leave', 'dress_loop'
 			'"I have a girlfriend," you say, giving him a look as you''re <<$sex_ev[''dress_describe'']>>.'
-			if npc_fidelity[$boy] = 6:
-				if npc_girlfriend[$boy] = 1 and npc_goal[$boy] = 1:
-					'"Hey, me too!" he grins shamelessly.'
-					act'No way':
-						cla & *clr
-						'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
-						'"Nice try but no," you grimace, and pick up the rest of your things and head out the door.'
-						act'Leave':gt 'sex_ev_leave', 'exit'
-					end
-					act'So long as you know':
-						cla & *clr
-						$npc_apt_bedroom[$boy]
-						gs 'sex_ev_leave', 'fuckbuddy_add'
-						'"So long as you know," you reply, <<$sex_ev[''dress_describe'']>>. You exchange numbers with him and a moment later a notification pings in your messages.'
-						*nl
-						gs 'sex_ev_hookup_leave', 'fuckbuddy_text'
+			if sex_ev['sugar_daddy_offer'] > 0:
+				'"So?" <<$npc_firstname[$boy]>> grins shamelessly. "Does that change the value of the money?"'
+				gs'sex_ev_hookup_leave', 'npc_sugar_daddy_refuse'
+				gs'sex_ev_hookup_leave', 'npc_sugar_daddy_how_much'
+				act'So long as you know':
+					cla & *clr
+					$sex_ev['bed_room']
+					gs 'sex_ev_leave', 'fuckbuddy_add'
+					'"Just wanted to make sure you knew," you reply, shrugging as you''re <<$sex_ev[''dress_describe'']>>. "So how much are we talking here?"'
+					'"How about... <<sex_ev[''sugar_daddy_offer''] * 100>> <b>₽</b> a ''date?''"'
+					gs'sex_ev_hookup_leave', 'npc_sugar_daddy_accept'
+				end
+			else
+				elseif npc_fidelity[$boy] <= 5:
+					if npc_girlfriend[$boy] = 1 and npc_goal[$boy] = 1:
+						'"Hey, me too!" he grins shamelessly.'
+						act'No way':
+							cla & *clr
+							'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+							'"Nice try but no," you grimace, and pick up the rest of your things and head out the door.'
+							act'Leave':gt 'sex_ev_leave', 'exit'
+						end
+						
+						act'So long as you know':
+							cla & *clr
+							$sex_ev['bed_room']
+							gs 'sex_ev_leave', 'fuckbuddy_add'
+							'"So long as you know," you reply, <<$sex_ev[''dress_describe'']>>. You exchange numbers with him and a moment later a notification pings in your messages.'
+							*nl
+							gs 'sex_ev_hookup_leave', 'fuckbuddy_text'
+							act'Leave':gt 'sex_ev_leave', 'exit'
+						end
+					else
+						'"Whatever, your loss," he shrugs. "Bi girls always come back when they start missing dick."'
+						'"That''s what strapons are for," you roll your eyes, pulling on the rest of your clothes. You give yourself a once over, making sure everything''s in place and wave goodbye as you head towards the door.'
 						act'Leave':gt 'sex_ev_leave', 'exit'
 					end
 				else
-					'"Whatever, your loss," he shrugs. "Bi girls always come back when they start missing dick."'
-					'"That''s what strapons are for," you roll your eyes, pulling on the rest of your clothes. You give yourself a once over, making sure everything''s in place and wave goodbye as you head towards the door.'
+					'"Oh. Uhh, well..." <<$npc_firstname[$boy]>> trails off and you''re left in an extremely uncomfortable silence while you get dressed in front of him.'
+					'<i>Holy fuck this is awkward,</i> you think to yourself as you pull the last of your clothes on. After giving yourself a once over, you give <<$npc_firstname[$boy]>> a strained smile and wave goodbye, quickly striding towards the door to escape.'
 					act'Leave':gt 'sex_ev_leave', 'exit'
 				end
-			else
-				'"Oh. Uhh, well..." <<$npc_firstname[$boy]>> trails off and you''re left in an extremely uncomfortable silence while you get dressed in front of him.'
-				'<i>Holy fuck this is awkward,</i> you think to yourself as you pull the last of your clothes on. After giving yourself a once over, you give <<$npc_firstname[$boy]>> a strained smile and wave goodbye, quickly striding towards the door to escape.'
-				act'Leave':gt 'sex_ev_leave', 'exit'
 			end
 		end
 	end

locations/sex_ev_leave.qsrc

@@ -3,51 +3,90 @@
 if $ARGS[0] = 'exit':
 	minut += 2
 	!! exit should be based on type of apartment and location
-	if $sex_ev['loc'] = 'npc_home':
-			gs 'sex_ev_leave', 'ending'
-		if npc_residence[$boy] = 1:
-			!! Pav residential exit
-			gt 'pav_residential'
-		elseif npc_residence[$boy] = 2:
-			!! Student dorms exit
-			gt 'city_island'
-		elseif npc_residence[$boy] = 3:
-			!! St. Petersburg Residential exit
-			gt 'city_residential'
-		elseif npc_residence[$boy] = 4:
-			!! St. Petersburg City Center exit
-			gt 'city_center'
-	!!{ disabled for bug testing
-		else
-			if $region = 'pav':
+	if sex_ev['unique_npc'] = 1:
+		gt $sex_ev_exit['exit_file'], $sex_ev_exit['exit_arg']
+	else
+		if $sex_ev['loc'] = 'npc_home':
+				gs 'sex_ev_leave', 'ending'
+			if npc_residence[$boy] = 1:
+				!! Pav residential exit
 				gt 'pav_residential'
-			elseif $region = 'pav':
-				gt 'pav_commercial'
-			elseif $region = 'pav_park':
-				gt 'pav_park', 'start'
-			elseif $region = 'city':
+			elseif npc_residence[$boy] = 2:
+				!! Student dorms exit
+				gt 'city_island'
+			elseif npc_residence[$boy] = 3:
+				!! St. Petersburg Residential exit
 				gt 'city_residential'
-			elseif $region = 'city_center':
+			elseif npc_residence[$boy] = 4:
+				!! St. Petersburg City Center exit
 				gt 'city_center'
-			elseif $region = 'city_park':
-				gt 'city_park', 'start'
-			elseif $region = 'city_island':
-				gt 'city_island'
-			end}
+		!!{ disabled for bug testing
+			else
+				if $region = 'pav':
+					gt 'pav_residential'
+				elseif $region = 'pav':
+					gt 'pav_commercial'
+				elseif $region = 'pav_park':
+					gt 'pav_park', 'start'
+				elseif $region = 'city':
+					gt 'city_residential'
+				elseif $region = 'city_center':
+					gt 'city_center'
+				elseif $region = 'city_park':
+					gt 'city_park', 'start'
+				elseif $region = 'city_island':
+					gt 'city_island'
+				end}
+			end
+		elseif $sex_ev['loc'] = 'hotel_room':
+			if sex_ev['hotel_days'] > 0:
+				if $region = 'pav':
+					$hotel = 'pav_hotel'
+					gs 'sex_ev_leave', 'ending'
+					gt 'HotelRoom', 'better'
+				elseif $region = 'city':
+					$hotel = 'city_hotel'
+					gs 'sex_ev_leave', 'ending'
+					gt 'HotelRoom', 'best'
+				end
+			else
+				if $region = 'pav':
+					gs 'sex_ev_leave', 'ending'
+					gt 'pav_hotel'
+				elseif $region = 'city':
+					gs 'sex_ev_leave', 'ending'
+					gt 'city_hotel'
+				end
+			end
+	!!		gt $sex_ev_exit['exit_file'], $sex_ev_exit['exit_arg']
+		elseif $sex_ev['loc'] = 'pc_home':
+			gs 'sex_ev_leave', 'ending'
+			if $sex_ev_exit['loc'] = 'bedroom':
+				gt 'bedr'
+			elseif $sex_ev_exit['loc'] = 'hallway':
+				gt 'korr'
+			end
 		end
-	elseif $sex_ev['loc'] = 'hotel':
+	end
+end
+
+if $ARGS[0] = 'exit_into_loc':
+	!! for when you end the event and continue to hang out at a lover''s apartment or hotel
+	if $sex_ev['loc'] = 'npc_home':
 		gs 'sex_ev_leave', 'ending'
-		if $region = 'pav':
-			gt 'pav_hotel'
-		elseif $region = 'city':
-			gt 'city_center'
-		end
-		gt $sex_ev_exit['exit_file'], $sex_ev_exit['exit_arg']
-	elseif $sex_ev['loc'] = 'pc_home':
+		gs 'lover_home', 'bedroom'
+	elseif $sex_ev['loc'] = 'hotel_room':
+!!		if $region = 'pav':
 		gs 'sex_ev_leave', 'ending'
+		gs 'lover_home', 'hotel_room'
+	elseif $sex_ev['loc'] = 'pc_home':
 		if $sex_ev_exit['loc'] = 'bedroom':
+			gs 'sex_ev_leave', 'ending'
+			pcs_romance['lover_here'] = 1
 			gt 'bedr'
 		elseif $sex_ev_exit['loc'] = 'hallway':
+			pcs_romance['lover_here'] = 1
+			gs 'sex_ev_leave', 'ending'
 			gt 'korr'
 		end
 	end
@@ -70,56 +109,112 @@ if $ARGS[0] = 'fuckbuddy_add':
 	npc_no_booty_call[$boy] = daystart
 end
 
+if $ARGS[0] = 'sugar_daddy_add':
+	if $npc_rel_type[$boy] ! 'fuckbuddy': gs 'sex_ev_leave', 'fuckbuddy_add'
+	npc_sugar_daddy_price[$boy] = sex_ev['sugar_daddy_offer'] * 100
+	$npc_rel_type[$boy] = 'sugar_daddy'
+	sex_ev['sugar_daddy_paid'] = 1
+end
+
 if $ARGS[0] = 'lover_add':
 	gs 'lover', 'add', $boy
 end
 
 if $ARGS[0] = 'ending':
-!!	gs 'sex_ev_stats', 'save'
+	gs 'sex_ev_stats', 'save_stats'
+	if sugar_daddy_call[$boy] = 1:
+		sugar_daddy_call[$boy] = 0
+	end
+	if $booty_call_hotel[$boy] ! '': $booty_call_hotel[$boy] = ''
 	gs 'arousal', 'end'
-	if $clothingworntype = 'nude': gs'sex_ev_leave', 'dress'
+	if $clothingworntype = 'nude' and sex_ev['skip_dress'] = 0: gs'sex_ev_leave', 'dress'
 	if sex_ev['fuck'] > 0: know_virgin[$boy] = 0
 	if sex_ev['creampie_orgasm'] = 1: stat_memory['creampie_orgasm'] = daystart
 	npc_last_sex[$boy] = daystart
+	if $sex_ev['prostitution_flag'] = 'prostitution' or sex_ev['prostitution'] = 1: npc_prostituation_count[$boy] += 1
+	if sex_ev['set_date'] ! 1: npc_booty_call_date[$boy] = 0
+	
+	if sex_ev['hotel_days'] > 0:
+		if $region = 'pav':
+			hotelRoom['pav_hotel'] = 2
+		elseif $region = 'city':
+			hotelRoom['city_hotel'] = 3
+		end
+		hotelRoomDays['<<$region>>_hotel'] = daystart + sex_ev['hotel_days']
+		hotelRoom['<<$region>>_room_service_free'] = 1
+	end
 	killvar 'sex_ev'
 end
 
 if $ARGS[0] = 'leaving_dialogue':
 	'"I gotta get going," you say.'
 	'"Okay, see you later."'
-	act'"Bye"':
-		$sex_ev['leave_dialogue'] = 'Bye'
-		gs'sex_ev_leave', 'leaving_action'
-	end
+	gs'sex_ev_leave', 'leaving_dialogue_choices'
+end
 
-	act'"See ya"':
-		$sex_ev['leave_dialogue'] = 'See ya'
-		gs'sex_ev_leave', 'leaving_action'
-	end
-	
-	act'"Toodles"':
-		$sex_ev['leave_dialogue'] = 'Toodles'
-		gs'sex_ev_leave', 'leaving_action'
-	end
-	if $npc_rel_type[$boy] ! '':
-		act'"Text me"':
-			$sex_ev['leave_dialogue'] = 'Text me'
+if $ARGS[0] = 'leaving_dialogue_choices':
+	if sex_ev['mad'] = 1 or sex_ev['angry_after']:
+		act'Leave angrily':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart1.mp4"></video></center>'
+			'You don''t reply, just grab your things in irritation and stalk out the door.'
+			act'Leave':gt'sex_ev_leave', 'exit'
+		end
+		
+		act'Hide your annoyance':
+			cla & *nl
+			'"Later," you say flatly and grab your things to stalk out the door.'
+			act'Leave':gt'sex_ev_leave', 'exit'
+		end
+	else
+		act'"Bye"':
+			$sex_ev['leave_dialogue'] = 'Bye'
+			gs'sex_ev_leave', 'leaving_action'
+		end
+
+		act'"See ya"':
+			$sex_ev['leave_dialogue'] = 'See ya'
 			gs'sex_ev_leave', 'leaving_action'
 		end
 		
-		if npc_booty_call_date[$boy] = daystart and sex_ev['sleepover'] = 1:
-			act'"See you soon"':
-				$sex_ev['leave_dialogue'] = 'See you soon'
-				gs'sex_ev_leave', 'leaving_action'
+		act'"Toodles"':
+			$sex_ev['leave_dialogue'] = 'Toodles'
+			gs'sex_ev_leave', 'leaving_action'
+		end
+		if $npc_rel_type[$boy] ! '':
+			if $npc_rel_type[$boy] = 'sugar_daddy':
+				act'Text me any time':
+					$sex_ev['leave_dialogue'] = 'Text me any time you want some company'
+					gs'sex_ev_leave', 'leaving_action'
+				end
+			else
+				act'"Text me"':
+					$sex_ev['leave_dialogue'] = 'Text me'
+					gs'sex_ev_leave', 'leaving_action'
+				end
 			end
-		elseif npc_booty_call_date[$boy] = daystart + 1:
-			act'"See you tomorrow"':
-				$sex_ev['leave_dialogue'] = 'See you tomorrow'
-				gs'sex_ev_leave', 'leaving_action'
+			
+			if npc_booty_call_date[$boy] = daystart and sex_ev['sleepover'] = 1:
+				act'"See you soon"':
+					$sex_ev['leave_dialogue'] = 'See you soon'
+					gs'sex_ev_leave', 'leaving_action'
+				end
+			elseif npc_booty_call_date[$boy] = daystart + 1:
+				act'"See you tomorrow"':
+					$sex_ev['leave_dialogue'] = 'See you tomorrow'
+					gs'sex_ev_leave', 'leaving_action'
+				end
+			else
+				act'"Till next time"':
+					$sex_ev['leave_dialogue'] = 'Till next time'
+					gs'sex_ev_leave', 'leaving_action'
+				end
 			end
-		else
-			act'"Till next time"':
-				$sex_ev['leave_dialogue'] = 'Till next time'
+		end
+		
+		if $npc_rel_type[$boy] = 'sugar_daddy':
+			act'Don''t forget the money':
+				$sex_ev['leave_dialogue'] = 'Just make sure you have the money ready for next time'
 				gs'sex_ev_leave', 'leaving_action'
 			end
 		end
@@ -156,8 +251,9 @@ end
 
 if $ARGS[0] = 'leaving_end':
 	cla & *nl
-	if $npc_rel_type[$boy] = 'sugar_daddy':
-		'Just before you go, <<$npc_firstname[$boy]>> hands you an envelope with 2000<b>₽‎</b> in it.'
+	if $npc_rel_type[$boy] = 'sugar_daddy' and sex_ev['sugar_daddy_paid'] = 0:
+		money += npc_sugar_daddy_price[$boy]
+		'Just before you go, <<$npc_firstname[$boy]>> hands you <<npc_sugar_daddy_price[$boy]>><b>₽‎</b>.'
 		*nl
 	end
 	'"<<$sex_ev[''leave_dialogue'']>>," you say<<$sex_ev[''leave_action'']>>.'
@@ -794,12 +890,12 @@ end
 if $ARGS[0] = 'dress':
 	if $clothingworntype = 'nude': gs 'clothing', 'wear_last_worn'
 !!	if $pantyworntype = 'none' and $lastwornpantytype ! 'none' and $lastwornpantytype ! '':
-	if $pantyworntype = 'none' and $lastwornpantytype ! 'none':
-		gs 'panties', 'wear', $lastwornpantytype, lastwornpantynumber
+	if $pantyworntype = 'none' and $lastwornpantytype['sex_ev'] ! 'none':
+		gs 'panties', 'wear', $lastwornpantytype['sex_ev'], lastwornpantynumber['sex_ev']
 	end
 !!	if $braworntype = 'none' and $lastwornbratype ! 'none' and $lastwornbratype ! '':
-	if $braworntype = 'none' and $lastwornbratype ! 'none':
-		gs 'bras', 'wear', $lastwornbratype, lastwornbranumber
+	if $braworntype = 'none' and $lastwornbratype['sex_ev'] ! 'none':
+		gs 'bras', 'wear', $lastwornbratype['sex_ev'], lastwornbranumber['sex_ev']
 	end
 	gs 'stat'
 end
@@ -853,7 +949,6 @@ if $ARGS[0] = 'dressing1':
 	cla & *clr
 !!	gs'sex_ev_leave', 'dress'
 	gs'sex_ev_leave', 'dress_loop'
-	
 	if sex_ev['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and sex_ev['boy_asleep'] ! 0:
 		if sex_ev['towel'] = 1:
 			sex_ev['towel'] = 0
@@ -874,8 +969,18 @@ if $ARGS[0] = 'dressing1':
 			'"Guess I''ll go then," you sigh, <<$sex_ev[''dress_describe'']>>.'
 			gs'sex_ev_leave', 'dressing2'
 			gs 'sex_ev_leave', 'panty_gift'
-		elseif sex_ev['npc_late'] = 0:
-			'"You heading out?" <<$npc_firstname[$boy]>> asks as you are <<$sex_ev[''dress_describe'']>>.'
+		elseif sex_ev['npc_late'] = 1:
+			'<<$npc_firstname[$boy]>> starts getting dressed next to you.'
+				gs'sex_ev_leave', 'dressing2'
+		else
+			if sex_ev['boy_in_shower'] = 1:
+				sex_ev['boy_in_shower'] = 0
+				'<<$npc_firstname[$boy]>> comes back into the room just as you are <<$sex_ev[''dress_describe'']>> with a towel around his waist and wet hair.'
+				'"Hey, what''s up? You heading out?" he asks.'
+			elseif sex_ev['npc_late'] = 0:
+				'"You heading out?" <<$npc_firstname[$boy]>> asks as you are <<$sex_ev[''dress_describe'']>>.'
+			end
+			
 			gs'sex_ev_leave', 'not_leaving'
 			gs'sex_ev_leave', 'leaving_soon'
 			gs'sex_ev_leave', 'something_to_do'
@@ -886,13 +991,10 @@ if $ARGS[0] = 'dressing1':
 				gs'sex_ev_leave', 'mom_late'
 				gs'sex_ev_leave', 'need_homework'
 				gs'sex_ev_leave', 'school_night'
-			else
-				gs'sex_ev_leave', 'going_school'
 			end
-!!			gs'sex_ev_leave', 'dress_talk'
-		else
-			'<<$npc_firstname[$boy]>> starts getting dressed next to you.'
-			gs'sex_ev_leave', 'dressing2'
+			gs'sex_ev_leave', 'going_school'
+	!!		gs'sex_ev_leave', 'dress_talk'
+			
 		end
 
 	!!	act'Talk while you dress':
@@ -931,17 +1033,19 @@ if $ARGS[0] = 'dressing_finish':
 end
 
 if $ARGS[0] = 'not_leaving':
-	act'Not yet':
-		cla & *clr
-		gs'sex_ev_leave', 'dress_loop'
-		gs'sex_ev_leave', 'dress_start_desc'
-		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
-		'"Not yet," you say, <<$sex_ev[''dress_describe'']>>. "Just tired of hanging out naked."'
-		'"I''m never tired of seeing you naked."'
-		act'Roll your eyes':
-			cla & *nl
-			'"Whatever," you sigh, rolling your eyes to the heavens.'
-			gs 'sex_ev_leave', 'dressing2'
+	if $sex_ev['type'] ! 'hookup':
+		act'Not yet':
+			cla & *clr
+			gs'sex_ev_leave', 'dress_loop'
+			gs'sex_ev_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			'"Not yet," you say, <<$sex_ev[''dress_describe'']>>. "Just tired of hanging out naked."'
+			'"I''m never tired of seeing you naked."'
+			act'Roll your eyes':
+				cla & *nl
+				'"Whatever," you sigh, rolling your eyes to the heavens.'
+				gs 'sex_ev_leave', 'dressing2'
+			end
 		end
 	end
 end
@@ -954,7 +1058,6 @@ if $ARGS[0] = 'leaving_soon':
 		gs'sex_ev_leave', 'dress_start_desc'
 		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 		if sex_ev['sleepover'] < 1:
-			
 			'"Yeah," you say, <<$sex_ev[''dress_describe'']>>.' + iif($sex_ev['loc'] = 'pc_home', ' "Get your clothes on so I can get out of here."', ' ')
 			gs 'sex_ev_leave', 'dressing2'
 			gs 'sex_ev_leave', 'panty_gift'
@@ -966,6 +1069,7 @@ if $ARGS[0] = 'leaving_soon':
 				gs 'sex_ev_leave', 'dressing2'
 				gs 'sex_ev_leave', 'panty_gift'
 			end
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
@@ -987,6 +1091,7 @@ if $ARGS[0] = 'going_disco':
 				gs 'sex_ev_leave', 'dressing2'
 				
 				gs 'sex_ev_leave', 'panty_gift'
+				if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 			end
 		else
 			act'Going to the club':
@@ -1003,6 +1108,7 @@ if $ARGS[0] = 'going_disco':
 				gs 'sex_ev_leave', 'dressing2'
 				
 				gs 'sex_ev_leave', 'panty_gift'
+				if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 			end
 		end
 	end
@@ -1024,6 +1130,7 @@ if $ARGS[0] = 'mom_late':
 			gs 'sex_ev_leave', 'dressing2'
 			
 			gs 'sex_ev_leave', 'panty_gift'
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
@@ -1045,6 +1152,7 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"I want to go to uni," you say, <<$sex_ev[''dress_describe'']>>. "Can''t do that if I fail out of school for not doing my homework."'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 				act'Don''t be an asshole':
 					cla & *clr
@@ -1052,6 +1160,7 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"Don''t be an asshole," you glare, <<$sex_ev[''dress_describe'']>>. "My grades are important to me. More important than spending more time fucking you."'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 			else
 				'"I guess your future after school is pretty important," <<$npc_firstname[$boy]>> says.'
@@ -1060,6 +1169,7 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"Thanks," you say, <<$sex_ev[''dress_describe'']>>. "It means a lot to me that you get it."'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 				
 				act'Want to go to uni':
@@ -1067,6 +1177,7 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"I really want to go to uni," you say, <<$sex_ev[''dress_describe'']>>. "So keeping up with my classes is really important."'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 				
 				act'Damn straight':
@@ -1074,6 +1185,7 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"Damn straight it is," you say, <<$sex_ev[''dress_describe'']>>. "Skipping schoolwork to fuck you could end up fucking me for life!"'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 				
 				act'No hard feelings':
@@ -1081,9 +1193,11 @@ if $ARGS[0] = 'need_homework':
 					gs'sex_ev_leave', 'dress_start_desc'
 					'"No hard feelings, right?" you ask, <<$sex_ev[''dress_describe'']>>. "I really like you, I just can''t afford to get kicked out of school."'
 					gs 'sex_ev_leave', 'dressing2'
+					if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 				end
 			end
 			gs 'sex_ev_leave', 'panty_gift'
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
@@ -1109,6 +1223,7 @@ if $ARGS[0] = 'something_to_do':
 				gs'sex_ev_morning', 'end_morning'
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 end
 
@@ -1133,6 +1248,7 @@ if $ARGS[0] = 'see_a_friend':
 				gs'sex_ev_morning', 'end_morning'
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 end
 
@@ -1144,16 +1260,21 @@ if $ARGS[0] = 'another_fuckbuddy':
 			gs'sex_ev_leave', 'dress_loop'
 			gs'sex_ev_leave', 'dress_start_desc'
 			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
-			'"Yeah," you smirk, <<$sex_ev[''dress_describe'']>>. "Got another booty call to show up to."'
+			if $sex_ev['type'] = 'hookup':
+				'"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Got a booty call to answer."'
+			else
+				'"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Got another booty call to answer."'
+			end
 			'"You really get around don''t you?" <<$npc_firstname[$boy]>> smirks back.'
 			gs 'sex_ev_leave', 'dressing2'
 			gs 'sex_ev_leave', 'panty_gift'
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
 
 if $ARGS[0] = 'going_school':
-	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour < 9 and hour > 5: 
 		act'School':
 			cla & *clr
 			gs'sex_ev_leave', 'dress_loop'
@@ -1177,9 +1298,9 @@ if $ARGS[0] = 'going_school':
 				end
 			else
 				if sex_ev['late_for_school'] = 1 and hour >= 8:
-					'"I already told you, I''m late for school," you say, <<$sex_ev[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+					'"I already told you, I''m late for school," you say, <<$sex_ev[''dress_describe'']>>. ' + iif(sex_ev['sleepover'] = 1, '"But thanks for letting me spend the night."', ' ')
 				elseif sex_ev['late_for_school'] = 1:
-					'"I already told you, I''m gonna be late for school," you say, <<$sex_ev[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+					'"I already told you, I''m gonna be late for school," you say, <<$sex_ev[''dress_describe'']>>. ' + iif(sex_ev['sleepover'] = 1, '"But thanks for letting me spend the night. And the second fuck," you add with a wink.', ' ')
 				elseif hour = 7:
 					'"Gotta get to school," you say, <<$sex_ev[''dress_describe'']>>. "Thanks for letting me spend the night."'
 				else
@@ -1188,17 +1309,18 @@ if $ARGS[0] = 'going_school':
 				if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
 					gs 'sex_ev_leave', 'sex_ev_invite_later'
 				else
-					'"No problem."'
+					if sex_ev['sleepover'] = 1: '"No problem."'
 					gs'sex_ev_morning', 'end_morning'
 				end
 			end
 			gs'sex_ev_leave', 'dress_talk'
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
 
 if $ARGS[0] = 'school_night':
-	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7): 
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7) and (hour > 19 or hour < 5): 
 		act'It''s a school night':
 			cla & *clr
 			gs'sex_ev_leave', 'dress_loop'
@@ -1227,6 +1349,7 @@ if $ARGS[0] = 'school_night':
 				end
 				gs'sex_ev_leave', 'dress_talk'
 			end
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
@@ -1255,6 +1378,7 @@ if $ARGS[0] = 'panty_gift':
 				!!'"Enjoy," you smirk.'
 				gs 'sex_ev_leave', 'panty_gift2'
 			end
+			if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 		end
 	end
 end
@@ -1280,6 +1404,7 @@ if $ARGS[0] = 'panty_gift2':
 				gs 'sex_ev_leave', 'dressing2'
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 	
 	act'Something to remember the occasion':
@@ -1306,6 +1431,7 @@ if $ARGS[0] = 'panty_gift2':
 				gs 'sex_ev_leave', 'dressing2'
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 	
 	act'Consider it a trophy':
@@ -1328,6 +1454,7 @@ if $ARGS[0] = 'panty_gift2':
 				gs 'sex_ev_leave', 'dressing2'
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 	
 	if sex_ev['virgin'] = 1:
@@ -1352,6 +1479,7 @@ if $ARGS[0] = 'panty_gift2':
 				end
 			end
 		end
+		if sex_ev['hookup_continuation_check'] = 0:gs 'sex_ev_hookup_leave', 'hookup_continuation'
 	end
 	
 	if sex_ev['orgasm_count'] > 0:
@@ -1380,7 +1508,7 @@ if $ARGS[0] = 'panty_gift2':
 		act'For making me orgasm (tradition)':
 			cla & *clr
 			gs'sex_ev_leave', 'dress_loop'
-			if $sex_ev['type'] = 'hookup':
+			if npc_panty_give[$boy] <= 1:
 				'"For making me come," you smile, <<$sex_ev[''dress_describe'']>>. "I always give a boy my panties if he makes me come."'
 			else
 				'"Cause you made me come," you smile, <<$sex_ev[''dress_describe'']>>. "You know I always give a boy my panties if he makes me come."'
@@ -1481,7 +1609,6 @@ if $ARGS[0] = 'dress_loop':
 	gs'stat'
 end
 
-
 if $ARGS[0] = 'dress_loop_end':
 	!! this forces the player to get fully dressed
 	gs'sex_ev_leave', 'dress_loop_code'
@@ -1507,20 +1634,20 @@ if $ARGS[0] = 'dress_loop_code':
 !!		killvar 'lastwornbratype'
 !!		killvar 'lastwornbranumber'
 !!		$sex_ev['dress_describe'] = 'pulling your panties up your legs and fastening your bra around your chest'
-	elseif $lastwornpantytype ! 'none' and $pantyworntype = 'none' and sex_ev['panty_wear'] ! 1:
-		gs 'panties', 'wear', $lastwornpantytype, lastwornpantynumber
+	elseif $lastwornpantytype['sex_ev'] ! 'none' and $pantyworntype = 'none' and sex_ev['panty_wear'] ! 1:
+		gs 'panties', 'wear', $lastwornpantytype['sex_ev'], lastwornpantynumber['sex_ev']
 		killvar 'lastwornpantytype'
 		killvar 'lastwornpantynumber'
 		sex_ev['panty_wear'] = 1
 		$sex_ev['dress_describe'] = 'pulling your panties up'
-	elseif $lastwornbratype ! 'none' and $lastwornbratype ! '' and $braworntype = 'none' and sex_ev['bra_wear'] ! 1:
-		gs 'bras', 'wear', $lastwornbratype, lastwornbranumber
+	elseif $lastwornbratype['sex_ev'] ! 'none' and $lastwornbratype['sex_ev'] ! '' and $braworntype = 'none' and sex_ev['bra_wear'] ! 1:
+		gs 'bras', 'wear', $lastwornbratype['sex_ev'], lastwornbranumber['sex_ev']
 		killvar 'lastwornbratype'
 		killvar 'lastwornbranumber'
 		sex_ev['bra_wear'] = 1
 		$sex_ev['dress_describe'] = 'fastening your bra around your chest'
-	elseif $clothingworntype = 'nude' and $lastwornclothingtype ! 'nude':
-		gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
+	elseif $clothingworntype = 'nude' and $lastwornclothingtype['sex_ev'] ! 'nude':
+		gs 'clothing', 'wear', $lastwornclothingtype['sex_ev'], lastwornclothingnumber['sex_ev']
 		jump 'dress_loop_start'
 	elseif $clothingworntype ! 'nude' and sex_ev['dress_end'] ! 1:
 		if CloDress = 1 and (sex_ev['dress_top_wear'] ! 1 or sex_ev['dress_skirt_wear'] ! 1):
@@ -1581,7 +1708,7 @@ if $ARGS[0] = 'dress_talk':
 	
 	gs 'sex_ev_leave', 'panty_gift'
 	
-	if sex_ev['dress_end'] ! 1 and sex_ev['plans_later_talk'] = 0 and rand(0,1) = 1 and $sex_ev['type'] ! 'hookup':
+	if sex_ev['dress_end'] ! 1 and sex_ev['sex_ev_ask'] = 0 and rand(0,1) = 1 and $sex_ev['type'] ! 'hookup':
 		gs 'sex_ev_leave', 'npc_sex_ev_invite'
 !!{
 		!! he initiates
@@ -1591,7 +1718,7 @@ if $ARGS[0] = 'dress_talk':
 		gs 'sex_ev_leave', 'dress_talk_pc'
 	}
 	else
-		gs 'sex_ev_after', 'after_sex_dressed'
+!!		gs 'sex_ev_after', 'after_sex_dressed'
 	end
 end
 
@@ -1647,7 +1774,7 @@ end
 
 
 if $ARGS[0] = 'dress_talk_pc':
-	if sex_ev['plans_later_talk'] = 0 and (hour < 16 or sex_ev['sleepover'] = 1):
+	if sex_ev['plans_later_talk'] = 0 and ((hour < 16 and hour > 4) or sex_ev['sleepover'] = 1):
 		act'Ask him what he''s doing later':
 			sex_ev['plans_later_talk'] = 1
 			gs'sex_ev_leave', 'dress_loop'
@@ -1681,7 +1808,8 @@ if $ARGS[0] = 'dress_talk_pc':
 	gs'sex_ev_leave', 'had_a_good_time'
 	gs'sex_ev_leave', 'stay_over_thanks'
 	gs'sex_ev_leave', 'walk_funny'
-!!	gs'sex_ev_leave', 'leak_all_day'
+	gs'sex_ev_leave', 'leak_all_day'
+	gs'sex_ev_leave', 'pc_sex_ev_invite'
 	
 end
 
@@ -1690,7 +1818,7 @@ end
 !!end
 
 if $ARGS[0] = 'had_a_good_time':
-	if sex_ev['good_time'] = 0 and sex_ev['annoyed'] = 0:
+	if sex_ev['good_time'] = 0 and sex_ev['annoyed'] = 0 and sex_ev['mad'] = 0 and sex_ev['angry_after'] = 0:
 		act'I had a good time':
 			cla & *clr
 			sex_ev['good_time'] = 1
@@ -1838,7 +1966,7 @@ end
 
 
 if $ARGS[0] = 'leak_all_day':
-	if cum_vol['vagina'] > 100 and $sex_ev['cum_leak_talk'] = '' and hour < 10:
+	if cum_loc['vagina'] > 0 and cum_vol['vagina'] > 100 and $sex_ev['cum_leak_talk'] = '' and hour < 10:
 		act'Gonna be leaking cum all day':
 			cla
 			act'Embarrassed':
@@ -1980,6 +2108,7 @@ if $ARGS[0] = 'leak_all_day2':
 	else
 	
 	end
+	gs'sex_ev_leave', 'leak_all_day3'
 end
 
 if $ARGS[0] = 'leak_all_day3':
@@ -2036,65 +2165,87 @@ if $ARGS[0] = 'npc_date_later_response':
 end
 
 if $ARGS[0] = 'pc_sex_ev_invite':
-	if $sex_ev['type'] = 'hookup':
-		gs 'sex_ev_hookup_leave', 'pc_fuckbuddy_request'
-	elseif sex_ev['sleepover'] = 1 or hour < 5:
-		act'Ask to come over later':
-			sex_ev['invite_today'] = 1
-			cla & *clr
-			gs'sex_ev_leave', 'dress_loop'
-			if sex_ev['sleepover'] = 1:
-				'"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>.'
-			else
-				'"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>. "In the daytime?"'
-			end
-			if npc_day_off[$boy] = week:
-				if rand(1,10)/2 <= npc_sexdrive[$boy]:
-					'"Maybe. What time were you thinking?"'
-					gs'sex_ev_leave', 'pc_sex_ev_timeset'
+	if sex_ev['sex_ev_ask'] = 0:
+		if $sex_ev['type'] = 'hookup':
+			gs 'sex_ev_hookup_leave', 'pc_fuckbuddy_request'
+		elseif sex_ev['sleepover'] = 1 or hour < 5:
+			act'Ask to come over later':
+				sex_ev['invite_today'] = 1
+				sex_ev['sex_ev_ask'] = 1
+				cla & *clr
+				gs'sex_ev_leave', 'dress_loop'
+				if sex_ev['sleepover'] = 1:
+					'"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>.'
 				else
-					'"Twice in one day might be a little bit too much for me," <<$npc_firstname[$boy]>> smiles back ruefully.'
-					gs'sex_ev_leave', 'dress_loop_code'
-					'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
-					gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					'"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>. "In the daytime?"'
 				end
-			else
-				if rand(1,10)/2 <= npc_sexdrive[$boy]:
-					'"What time were you thinking?"'
-					gs'sex_ev_leave', 'pc_sex_ev_timeset'
+				if $npc_rel_type[$boy] = 'sugar_daddy':
+					if npc_sugar_daddy_timer[$boy] - (npc_rel[$boy] / 10) < daystart:
+						'"You''re gonna bleed me dry at this rate," <<$npc_firstname[$boy]>> chuckles ruefully. "But I''d like that. How about <<npc_start_free_time[$boy]>>?"'
+						gs 'sex_ev_leave', 'busy_time'
+						gs 'sex_ev_leave', 'sex_ev_plan'
+					else
+						'"I don''t think I can afford such frequent visits from you," <<$npc_firstname[$boy]>> chuckles ruefully. "Maybe another time."'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
+				elseif npc_day_off[$boy] = week:
+					if rand(1,10)/2 <= npc_sexdrive[$boy]:
+						'"Maybe. What time were you thinking?"'
+						gs'sex_ev_leave', 'pc_sex_ev_timeset'
+					else
+						'"Twice in one day might be a little bit too much for me," <<$npc_firstname[$boy]>> smiles back ruefully.'
+						gs'sex_ev_leave', 'dress_loop_code'
+						'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
 				else
-					'"Think I might be a little too tapped out from work," <<$npc_firstname[$boy]>> grunts.'
-					gs'sex_ev_leave', 'dress_loop_code'
-					'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
-					gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					if rand(1,10)/2 <= npc_sexdrive[$boy]:
+						'"What time were you thinking?"'
+						gs'sex_ev_leave', 'pc_sex_ev_timeset'
+					else
+						'"Think I might be a little too tapped out from work," <<$npc_firstname[$boy]>> grunts.'
+						gs'sex_ev_leave', 'dress_loop_code'
+						'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
 				end
 			end
-		end
-	elseif hour >= 5:
-		act'Ask to come over tomorrow':
-			sex_ev['invite_tomorrow'] = 1
-			cla & *clr
-			gs'sex_ev_leave', 'dress_loop'
-			'"Want to do this again tomorrow?" you ask, flashing a smile while you''re <<$sex_ev[''dress_describe'']>>.'
-			if npc_day_off[$boy] = week + 1 or (npc_day_off[$boy] = 1 and week = 7):
-				if rand(1,10)/2 <= npc_sexdrive[$boy]:
-					'"Hmm... It''ll be my day off... What time were you thinking?"'
-					gs'sex_ev_leave', 'pc_sex_ev_timeset'
-				else
-					'"Sorry, I have some things I need to get done tomorrow."'
-					gs'sex_ev_leave', 'dress_loop_code'
-					'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
-					gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
-				end
-			else
-				if rand(1,10)/2 <= npc_sexdrive[$boy]:
-					'"What time were you thinking?"'
-					gs'sex_ev_leave', 'pc_sex_ev_timeset'
+		elseif hour >= 5:
+			act'Ask to come over tomorrow':
+				sex_ev['invite_tomorrow'] = 1
+				sex_ev['sex_ev_ask'] = 1
+				cla & *clr
+				gs'sex_ev_leave', 'dress_loop'
+				'"Want to do this again tomorrow?" you ask, flashing a smile while you''re <<$sex_ev[''dress_describe'']>>.'
+				if $npc_rel_type[$boy] = 'sugar_daddy':
+					if npc_sugar_daddy_timer[$boy] - (npc_rel[$boy] / 10) < daystart:
+						'"You''re gonna bleed me dry at this rate," <<$npc_firstname[$boy]>> chuckles ruefully. "But I''d like that. How about <<npc_start_free_time[$boy]>>?"'
+						gs 'sex_ev_leave', 'busy_time'
+						gs 'sex_ev_leave', 'sex_ev_plan'
+					else
+						'"I don''t think I can afford such frequent visits from you," <<$npc_firstname[$boy]>> chuckles ruefully. "Maybe another time."'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
+				elseif npc_day_off[$boy] = week + 1 or (npc_day_off[$boy] = 1 and week = 7):
+					if rand(1,10)/2 <= npc_sexdrive[$boy]:
+						'"Hmm... It''ll be my day off... What time were you thinking?"'
+						gs'sex_ev_leave', 'pc_sex_ev_timeset'
+					else
+						'"Sorry, I have some things I need to get done tomorrow."'
+						gs'sex_ev_leave', 'dress_loop_code'
+						'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
 				else
-					'"Sorry, I have some things I need to get done tomorrow."'
-					gs'sex_ev_leave', 'dress_loop_code'
-					'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
-					gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					if rand(1,10)/2 <= npc_sexdrive[$boy]:
+						'"What time were you thinking?"'
+						gs'sex_ev_leave', 'pc_sex_ev_timeset'
+					else
+						'"Sorry, I have some things I need to get done tomorrow."'
+						gs'sex_ev_leave', 'dress_loop_code'
+						'"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
+						gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
+					end
 				end
 			end
 		end
@@ -2104,7 +2255,7 @@ end
 if $ARGS[0] = 'pc_sex_ev_timeset':
 	act'How about...': 
 		:invalid_timeset
-		npc_booty_call_time[$boy] = input ("When do you want to come over to <<$npc_firstname[$boy]>>''s? (Pick an hour 1 - 22.)")
+		npc_booty_call_time[$boy] = input ("When do you want to come over again? (Pick an hour 1 - 22.)")
 		if npc_booty_call_time[$boy] > 22:
 			msg 'Invalid input. Pick an hour between 1 and 22.'
 			jump 'invalid_timeset'
@@ -2163,11 +2314,11 @@ if $ARGS[0] = 'pc_sex_ev_invite_denied':
 end
 
 if $ARGS[0] = 'npc_sex_ev_invite':
-	if (rand(1,10) < npc_sexdrive[$boy] or rand(1,200) < npc_rel[$boy]) and sex_ev['plans_later_talk'] = 0:
+	if ((rand(1,10) < npc_sexdrive[$boy] or rand(1,200) < npc_rel[$boy]) and sex_ev['sex_ev_ask'] = 0) and ($npc_rel_type[$boy] ! 'sugar_daddy' or (npc_sugar_daddy_timer[$boy] - (npc_rel[$boy] / 10) < daystart)):
 		cla
 		act'Continue':
 			gs 'sex_ev_leave', 'dress_loop'
-			sex_ev['plans_later_talk'] = 1
+			sex_ev['sex_ev_ask'] = 1
 			if npc_day_off[$boy] = week + 1 or (week = 7 and npc_day_off[$boy] = 1):
 				sex_ev['invite_tomorrow'] = 1
 				if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
@@ -2205,13 +2356,13 @@ if $ARGS[0] = 'npc_sex_ev_invite':
 			end
 		end
 	else
-		sex_ev['plans_later_talk'] = 1
+		sex_ev['sex_ev_ask'] = 1
 	end
 end
 
 if $ARGS[0] = 'sex_ev_invite_later':
 	act'Continue':
-		sex_ev['plans_later_talk'] = 1
+		sex_ev['sex_ev_ask'] = 1
 		gs 'sex_ev_leave', 'dress_loop'
 		if npc_day_off[$boy] = week and sex_ev['sleepover'] = 1:
 			$sex_ev_plan_loc[$boy] = 'lover_home'
@@ -2316,6 +2467,21 @@ if $ARGS[0] = 'sex_ev_plan':
 			end
 		end
 	end
+	
+	if $npc_rel_type[$boy] = 'sugar_daddy':
+		act'As long as you''re paying':
+			gs 'booty_call', 'set_booty_call_date'
+			gs 'sex_ev_leave', 'dress_loop'
+			'"As long as you''re paying for it," you smirk, <<$sex_ev[''dress_describe'']>>.'
+			if rand(0,1) = 1:
+				'"Greedy bitch," <<$npc_firstname[$boy]>> grins back lewdly.'
+			else
+				'"Great," <<$npc_firstname[$boy]>> grins back.'
+			end
+			gs 'sex_ev_leave', 'dress_talk'
+			if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
+		end
+	end
 end
 
 if $ARGS[0] = 'sex_ev_plan2':
@@ -2343,7 +2509,7 @@ if $ARGS[0] = 'money_for_ma_pill':
 	cla & *clr
 	gs'sex_ev_leave', 'dress_loop'
 	'"Hey," <<$npc_firstname[$boy]>> says as you''re <<$sex_ev[''dress_describe'']>>. "Don''t forget this."'
-	'He grabs his wallet and pulls out a 1000<b>₽</b note, holding it out to you.'
+	'He grabs his wallet and pulls out a 1000<b>₽</b> note, holding it out to you.'
 	'"For the morning after pill," he says.'
 	'"Oh yeah, thanks," you nod, taking it from him.'
 	gs 'sex_ev_leave', 'dressing2'

locations/sex_ev_miss.qsrc

@@ -4,7 +4,7 @@ if $ARGS[0] = 'missionary_start':
 	if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-		'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+		'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees and spreads your legs apart, preparing to fuck you.'
 		act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
 		act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
 	elseif sex_ev['change_pos'] = 1:
@@ -19,24 +19,25 @@ if $ARGS[0] = 'missionary_start':
 				'You lean forward, letting <<$npc_firstname[$boy]>>''s cock slip from your pussy beneath you. With a sultry smile, you slowly lean back, lowering yourself down to the bed.'
 			end
 			'"I want you on top," you whisper huskily.'
-			act'Keep fucking':gs'sex_ev_miss', 'miss_goto'
+			$sex_ev['position'] = 'miss'
+			gs'sex_ev_miss', 'miss_goto'
 		end
 	elseif sex_ev['initiative'] ! 1 and sex_ev['force_initiative'] ! 1:
 		gs 'sex_ev_sex', 'speed_select'
 		act'Continue':
 			sex_ev['cock_inserted'] = 1
-			if sex_ev['condom'] = 0: sex_ev['no_condom'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
 			if sex_ev['fuck_count'] = 0:
-				'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+				'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees and spreads your legs apart, preparing to fuck you.'
 			elseif $sex_ev['position'] = 'miss':
 				'<<$npc_firstname[$boy]>> grabs you by the hips and pulls you back towards him, quickly sliding his cock back into your waiting pussy.'
 			else
-				'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
-				'"I get to be on top this time," he says, grinning.'
+				'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees and spreads your legs apart, preparing to fuck you.'
+				'"I get to be on top this time," he grins.'
 			end
-			act'Get fucked':gs'sex_ev_miss', 'miss_goto'
+			gs'sex_ev_miss', 'miss_goto'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	else
 		gs 'sex_ev_sex', 'speed_select'
@@ -54,7 +55,8 @@ if $ARGS[0] = 'missionary_start':
 			else
 				'"I need you inside me again," you whisper, spreading your legs and pussy wide for <<$npc_firstname[$boy]>>.'
 			end
-			act'Get fucked':gs'sex_ev_miss', 'miss_goto'
+			gs'sex_ev_miss', 'miss_goto'
+			!!gs 'sex_ev_condoms', 'condoms'
 		end
 	end
 end
@@ -76,15 +78,156 @@ if $ARGS[0] = 'miss_girl_orgasm_continue':
 		'"I''m not finished yet," he growls.'
 		$sex_ev['position'] = 'miss'
 		$sex_ev['pos_speed'] = 'miss<<sex_ev[''speed'']>>'
-!!		act'Get fucked':gs'sex_ev_miss', 'miss_goto'
 		gs'sex_ev_sex', 'fuck_continue'
 	end
 end
 
+if $ARGS[0] = 'miss_insert_slow':
+	sex_ev['orgasm'] = orgasm
+	if sex_ev['condom'] ! 1: sex_ev['no_condom'] = 1
+	
+	gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	if pcs_horny > 80: gs'arousal', 'vaginal', -10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	
+	if $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
+		gs 'pain', 3, 'vaginal', 'stretch'
+	end
+	
+	gs'stat'
+	$sex_ev['position'] = 'miss'
+	'<center><video autoplay loop src="images/shared/sex/vag/miss/enter1.mp4"></video></center>'
+	'<<$npc_firstname[$boy]>> carefully positions himself between your legs, lines up the head of his cock, and gently forces it into the folds of your pussy.'
+	*nl
+	if $npc_dick_desc[$boy] = 'tiny':
+		'Not that he needed to be careful. His hips come flush with yours and you still feel plenty of wiggle room inside you. He might as well have put his finger in...'
+	elseif $npc_dick_desc[$boy] = 'short':
+		'He pushes through your lips and you feel his cock fill the entrance to your snatch before stopping short as his hips collide with yours...'
+	elseif $npc_dick_desc[$boy] = 'chode':
+		'He passes between your lips and you feel his cock <i>stretching</i> you out as he pushes in, before stopping short as his hips collide with yours...'
+	elseif $npc_dick_desc[$boy] = 'skinny':
+		'He slips in between your lips, comfortably sliding his cock all the way in before stopping just shy of your cervix, though it isn''t a very tight fit...'
+	elseif $npc_dick_desc[$boy] = 'normal':
+		'He pushes through your lips and fills you with perfectly average length and girth...'
+	elseif $npc_dick_desc[$boy] = 'thick':
+		'You immediately feel your pussy <i>stretch</i> out as he pushes in, your walls straining to accomodate his thick girth...'
+	elseif $npc_dick_desc[$boy] = 'long':
+		'He slips in between your lips, comfortably sliding all the way in before abruptly colliding with your cervix. His length barely manages to fit inside you, though it isn''t a very tight fit width-wise...'
+	elseif $npc_dick_desc[$boy] = 'huge':
+		'He pushes through your lips, filling you with cock before it abruptly collides with your cervix. His full length seems to barely fit inside you...'
+	elseif $npc_dick_desc[$boy] = 'enormous':
+		'You immediately feel your pussy <i>stretch</i> out as he pushes in, your walls straining to accomodate his thick girth. Even as they struggle with his width, his length quickly makes its presence known as well when his cock abruptly collides with your cervix. It seems to barely fits inside you...'
+	elseif $npc_dick_desc[$boy] = 'lengthy':
+		'He slips in between your lips, comfortably sliding all the way in before abruptly colliding with your cervix. Just from the way it pokes your innards, you can tell he hasn''t even managed to get his full length inside you. Although it isn''t a very tight fit width-wise...'
+	elseif $npc_dick_desc[$boy] = 'gigantic':
+		'He pushes through your lips, filling you with cock before it abruptly collides with your cervix. Just from the way it pokes your innards, you can tell he hasn''t even managed to get his full length inside you...'
+	elseif $npc_dick_desc[$boy] = 'monster':
+		'You immediately feel your pussy <i>stretch</i> out as he pushes in, your walls straining to accomodate his thick girth. Even as they struggle with his width, his length quickly makes its presence known as well when his cock abruptly collides with your cervix. Just from the way it pokes your innards, you can tell he hasn''t even managed to get his full length inside you...'
+	end
+
+	act'Enjoyment':
+		cla
+		sex_ev['fuck_enjoyment'] = 1
+		
+		act'Gasp':
+			cla & *nl
+			'You gasp as the pleasure of his insertion sends heat washing through your hips and electric tingles racing across your skin.'
+			gs'sex_ev_miss', 'miss_goto'
+		end
+		
+		act'Moan':
+			cla & *nl
+			'You let out a loud moan as heat fills up your insides and your pussy begins to salivate with just the insertion of his cock.'
+			gs'sex_ev_miss', 'miss_goto'
+		end
+		
+		act'Groan':
+			cla & *nl
+			'You let out a husky groan as an indescribable <i>ache</i> rocks through your insides. Like a crumb of bread to a woman starving to death, just the insertion of his cock sets your lustful hunger ablaze.'
+			gs'sex_ev_miss', 'miss_goto'
+		end
+		
+		if $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
+			act'He''s big!':
+				cla
+				if npc_fuck_times[$boy] = 0:
+					if sex_ev['fuck_count'] = 0:
+						'"Oh <i>fuck!</i> That''s big!" you groan, squirming in pleasure around the cock that is absolutely <i>filling</i> you right now.'
+					else
+						'"Oh <i>fuck!</i>" you groan in pleasure. "I still can''t get over how fucking <i>big</i> you are!"'
+					end
+				else
+					if sex_ev['fuck_count'] = 0:
+						'"Nngh~! <i>Fuck~!</i>" you groan loudly, giving <<$npc_firstname[$boy]>> a wry smile afterwards. "That first insertion that bad boy of yours is always the best."'
+					else
+						'"Nngh~! <i>Fuck~!</i>" you groan loudly, grinning as you do. "It''s so good every time!"'
+					end
+				end
+				gs'sex_ev_miss', 'miss_goto'
+			end
+		end
+	end
+
+	act'Discomfort':
+		cla
+		act'He''s big!':
+			cla
+			if npc_fuck_times[$boy] = 0:
+				if sex_ev['fuck_count'] = 0:
+					'"Oh <i>fuck!</i> That''s big!" you groan, squirming as your pussy aches from getting overstuffed.'
+					if npc_arrogant[$boy] > 0:
+						'"Pretty incredible, isn''t it?" he grins hautily, taking a moment seemingly to admire the size of his own cock.'
+					elseif npc_caretaker[$boy] > 0:
+						'"Sorry," he says, a sympathetic look in his eyes.'
+					else
+						'"Your pussy is so tight," <<$npc_firstname[$boy]>> grins back.'
+					end
+				else
+					'"Oh <i>fuck!</i>" you groan in discomfort. "That''s still <i>fucking</i> big!"'
+					if npc_arrogant[$boy] > 0:
+						if sex_ev['virgin'] = 0:
+							'"Won''t be able to go back to regular cocks after this," he chuckles.'
+						else
+							'"I''m spoiling you for life," he chuckles. "No guy is ever going to fill you up like this."'
+						end
+					elseif npc_caretaker[$boy] > 0:
+						'"Sorry," he says, a sympathetic look in his eyes.'
+					else
+						'"Your pussy is so tight," <<$npc_firstname[$boy]>> grins back.'
+					end
+				end
+				
+			else
+				if sex_ev['fuck_count'] = 0:
+					'"Nngh~! <i>Fuck~!</i>" you groan loudly as <<$npc_firstname[$boy]>>''s cock overstuffs your poor pussy. "I can never get used to how <i>big</i> you are."'
+				else
+					'"Nngh~!" you groan loudly.'
+				end
+			end
+			gs'sex_ev_miss', 'miss_goto'
+		end
+	end
+	
+	
+	if orgasm_buildup >= 100 or pcs_traits['easy_orgasms'] > 0:
+		act'Orgasm!':
+			cla & *clr
+			if sex_ev['orgasm'] = orgasm:
+				$orgasm_or = 'yes'
+				gs'arousal', 'vaginal', -1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			end
+		end
+	end
+end
+
 if $ARGS[0] = 'miss_goto':
+	$sex_ev['position'] = 'miss'
 	sex_ev['cock_inserted'] = 1
 	if sex_ev['speed'] = 0: sex_ev['speed'] = rand(1,3)
-	gt 'sex_ev_miss', 'miss<<sex_ev[''speed'']>>'
+	if $sex_ev['mood_type'] = 'romantic' and sex_ev['speed'] < 3:
+		act'Make love to <<$npc_firstname[$boy]>>':gt 'sex_ev_miss', 'miss<<sex_ev[''speed'']>>'
+	else
+		act'Let <<$npc_firstname[$boy]>> fuck you':gt 'sex_ev_miss', 'miss<<sex_ev[''speed'']>>'
+	end
 end
 
 if $ARGS[0] = 'missionary_change_position':
@@ -114,7 +257,7 @@ if $ARGS[0] = 'miss_pain1':
 			sex_ev['dick_too_big'] = 1
 			sex_ev['fuck_enjoyment'] = -1
 			$orgasm_or = 'no'
-			'Every thrust of <<$npc_firstname[$boy]>>''s hips elicits a gasp of pain from your lips. His cock is too much for your poor pussy and moment of it inside you is pure torture.'
+			'Every thrust of <<$npc_firstname[$boy]>>''s hips elicits a gasp of pain from your lips. His cock is too much for your poor pussy and it''s hard to enjoy.'
 			gs 'sex_ev_miss', 'miss_pain2'
 		end
 	end
@@ -129,10 +272,12 @@ if $ARGS[0] = 'miss_pain2':
 		gs 'sex_ev_cum', 'fuck_cum'
 	end
 	
-	act'Ask to try something else':
+	act'Tell <<$npc_firstname[$boy]>> it hurts': gs 'sex_ev_miss', 'miss_pain3'
+	
+	act'Ask to try another position':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
-		'"Do you think-! We could try-! Something else?" you ask.'
+		'"Do you think-! We could try-! Something else?" you manage to grunt out between thrusts.'
 		if ((npc_selfish[$boy] = 1 and $npc_fav_pos[$boy] = 'miss') or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
 			gs 'sex_ev_sex', 'fuck_no_cum_code'
 			'"No way," <<$npc_firstname[$boy]>> grunts back. "I''m enjoying this."'
@@ -147,6 +292,82 @@ if $ARGS[0] = 'miss_pain2':
 	end
 end
 
+if $ARGS[0] = 'miss_pain3':
+	if (npc_abusive[$boy] > 0 or (npc_selfish[$boy] = 1 and rand(1,3) >= 2)) and npc_caretaker[$boy] ! 1:
+		cla & *nl
+		'"Ouch! Hey! Ow!" you yelp. "Wait! That hurts!"'
+		iif(sex_ev['speed'] < 3, '"It''ll get better," <<$npc_firstname[$boy]>> says uncaringly and continues to fuck you without breaking stride.', '"It''ll get better," <<$npc_firstname[$boy]>> grunts uncaringly and continues to fuck you without breaking stride.')
+		act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+	else
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+		'"Ouch! Hey! Ow!" you yelp. "Wait! That hurts!"'
+		'<<$npc_firstname[$boy]>> stops halfway through a thrust, jabbing you painfully with his cock again and nearly falling on you in the process.'
+		'"Shit! Sorry," he says. "What happened? Are you okay?"'
+		act'Be irritated':
+			minut += 1
+			npc_dislike[$boy] += 2
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/1.jpg"></center>'
+			'"Who taught you how to fuck?" you scowl. "Your dick is stabbing into me in all the worst ways!"'
+			if npc_argumentative[$boy] > 0:
+				'"Well sorry that your pussy doesn''t exactly come with an instruction manual!" <<$npc_firstname[$boy]>> growls back.'
+			else
+				'"Oh. Sorry," he mumbles sheepishly.'
+			end
+			'"Whatever. Can we just move around to get a better angle?"'
+			*nl
+			'The two of you awkwardly shuffle around for a minute, trying to find a position for your hips that''s a little more comfortable.'
+			'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+			act'Fine I guess':
+				sex_ev['fuck_enjoyment'] = 0
+				cla & *nl
+				'"Fine I guess," you sigh. It doesn''t really feel good, but at least it doesn''t hurt anymore.'
+				*nl
+				'<<$npc_firstname[$boy]>> takes your response as approval and starts moving again.'
+				act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+			end
+			
+			act'Better':
+				sex_ev['fuck_enjoyment'] = 1
+				cla & *nl
+				'"<i>Finally</i>," you sigh. "Yes, that feels better. Try to remember this next time."'
+				*nl
+				'<<$npc_firstname[$boy]>> seems to be a little ticked off by your attitude but starts moving again anyways.'
+				act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+			end
+		end
+		
+		act'Laugh it off':
+			minut += 1
+			npc_like[$boy] += 2
+			$orgasm_or = ''
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+			if sex_ev['dick_too_big'] = 1:
+				sex_ev['dick_too_big'] = 2
+				sex_ev['fuck_enjoyment'] = 0
+				minut += rand(1,2)
+				'"Your dick is kind of big for me," you smile ruefully. "Can we just pause for a sec to let my poor pussy adjust?"'
+				'"Oh. Yeah, sure."'
+				*nl
+				'You spend a couple minutes with <<$npc_firstname[$boy]>>''s entire length inside you, taking deep breaths as you slowly let it stretch your pussy. Eventually the pain fades to nothing more than a dull ache and even maybe feels a little good.'
+				*nl
+				'"Okay," you nod. "You can start moving again."'
+			else
+				sex_ev['fuck_enjoyment'] = 1
+				'"I''m fine," you chuckle. "Your dick is kind of at an awkward angle though. Can we adjust a little?"'
+				'"Oh. Yeah, sure."'
+				*nl
+				'The two of you shuffle around a little finding a position for your hips that''s a little more comfortable.'
+				'"How''s that?" <<$npc_firstname[$boy]>> asks.'
+				'"Much better," you nod back and he resumes thrusting.'
+			end
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''pos_speed'']>>.2'
+		end
+	end
+end
+
 if $ARGS[0] = 'miss1':
 	!! slow pace
 	sex_ev['miss_fuck'] = 1
@@ -158,15 +379,16 @@ if $ARGS[0] = 'miss1':
 	sex_ev['kiss'] = 0
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'miss_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
+	'<center><video autoplay loop src="images/shared/sex/vag/miss/slow2.mp4"></video></center>'
 	if mesec > 0:
-		if sex_ev['condom'] = 1:
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood_condom1.jpg"></center>'
-		else
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood1.jpg"></center>'
-		end
+!!		if sex_ev['condom'] = 1 and sex_ev['no_condom'] ! 1:
+!!			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood_condom1.jpg"></center>'
+!!		else
+!!			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood1.jpg"></center>'
+!!		end
 		gs 'sex_ev_miss', 'miss1_start_period_desc'
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/miss/slow2.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/miss/slow2.mp4"></video></center>'
 !!		'<<$npc_firstname[$boy]>> pumps his cock in and out of you slowly, focusing more on technique than speed and driving as deep inside you as he can with every thrust.'
 		gs 'sex_ev_miss', 'miss1_start_desc'
 	end
@@ -246,7 +468,9 @@ end
 if $ARGS[0] = 'miss1.1':
 	cla & *clr
 	sex_ev['miss_fuck'] = 1
+	$sex_ev['position'] = 'miss'
 	$sex_ev['pos_speed'] = 'miss1'
+	sex_ev['speed'] = 1
 	sex_ev['kiss'] = 0
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -259,7 +483,10 @@ end
 if $ARGS[0] = 'miss1.2':
 	sex_ev['miss_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'miss'
 	$sex_ev['pos_speed'] = 'miss1'
+	sex_ev['speed'] = 1
+	
 	sex_ev['kiss'] = 0
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -288,6 +515,11 @@ if $ARGS[0] = 'miss1.2':
 				'You whimper softly, clenching your teeth as hard as you can, trying with all your might to prevent yourself from bursting into tears. It hurts <i>so much</i>, but you can''t bring yourself to tell him to stop.'
 			end
 		end
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you try to move your hips in time with his, rolling them and doing your best to make <<$npc_firstname[$boy]>> feel good, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
@@ -296,6 +528,15 @@ if $ARGS[0] = 'miss1.2':
 			else
 				'Your breath hitches as <<$npc_firstname[$boy]>> continues to slowly thrust into your pussy. You aren''t sure what changed, but somewhere along the line everything started feeling <i>really good</i>. When his cock stretches your pussy, you want to be stretched <i>more</i>. Your pussy clamps down on him, gripping his cock in the hopes it will never need to let go. But the juices flowing from your snatch make that impossible and every thrust that fills you leaves you tantalized for more. You <i>ache</i> for him to fill you, and every new thrust grants that wish again and again.'
 			end
+			if sex_ev['cum_speed_up'] = 1:
+				sex_ev['cum_speed_up'] = 0
+				*nl
+				'As your pleasure increases, you try your best to bring his up as well, putting in the effort to try and make him come.'
+			end
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You widen your legs and try to roll your hips in time with <<$npc_firstname[$boy]>>''s, trying to make him come faster.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -317,7 +558,11 @@ if $ARGS[0] = 'miss1.2':
 			end
 		end
 	else
-		if sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You widen your legs and eagerly throw your hips back towards <<$npc_firstname[$boy]>> in time with his. Maybe if you time it right, you can come together.'
+		elseif sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
 			if sex_ev['moan'] <= 1:
 				'"<i>Mmm... Ah~! Ahhh...</i>"'
 		!!		'You moan softly as <<$npc_firstname[$boy]>> continues to pump his cock between your legs. Slowly. Gently. His manhood drives deep inside you, stretching your walls, <i>filling</i> you. Your breath hitches with every thrust, and it feels wonderful.'
@@ -369,17 +614,18 @@ if $ARGS[0] = 'miss2':
 	sex_ev['missionary_fuck'] = 1
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'miss_virg_norm1'
 	gs 'sex_ev_sex', 'fuck_arousal_code'
+	'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex0.mp4"></video></center>'
 	if mesec > 0:
-		if sex_ev['condom'] = 1:
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood_condom1.jpg"></center>'
-		else
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood1.jpg"></center>'
-		end
+!!		if sex_ev['condom'] = 1 and sex_ev['no_condom'] ! 1:
+!!			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood_condom1.jpg"></center>'
+!!		else
+!!			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/blood1.jpg"></center>'
+!!		end
 !!		'<<$npc_firstname[$boy]>> drives into you at a steady pace, hard enough that your breasts jiggle with every thrust, but not so hard that he''s jackhammering you. Wet slaps echo around the room with every thrust, a little wetter sounding than usual on account of your period.'
 		gs 'sex_ev_miss', 'miss2_start_period_desc'
 		
 	else
-		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex0.mp4"></video></center>'
+!!		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex0.mp4"></video></center>'
 !!		'<<$npc_firstname[$boy]>> drives into you at a steady pace, hard enough that your breasts jiggle with every thrust, but not so hard that he''s jackhammering you. Wet slaps echo around the room with every thrust and he drives his cock deep inside you every time.'
 		gs 'sex_ev_miss', 'miss2_start_desc'
 		
@@ -465,6 +711,9 @@ end
 
 if $ARGS[0] = 'miss2.1':
 	sex_ev['miss_fuck'] = 1
+	$sex_ev['position'] = 'miss'
+	$sex_ev['pos_speed'] = 'miss2'
+	sex_ev['speed'] = 2
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	sex_ev['kiss'] = 0
 	cla & *clr
@@ -482,7 +731,9 @@ end
 if $ARGS[0] = 'miss2.2':
 	sex_ev['miss_fuck'] = 1
 	cla & *clr
+	$sex_ev['position'] = 'miss'
 	$sex_ev['pos_speed'] = 'miss2'
+	sex_ev['speed'] = 2
 	sex_ev['kiss'] = 0
 	gs 'sex_ev_sex', 'fuck_arousal_code'
 	cla & *clr
@@ -511,10 +762,19 @@ if $ARGS[0] = 'miss2.2':
 				'You whimper softly, clenching your teeth as hard as you can, trying with all your might to prevent yourself from bursting into tears every time <<$npc_firstname[$boy]>>''s hips loudly clap into your''s and pain lances through your pussy. It hurts <i>so much</i>, but you can''t bring yourself to tell him to stop.'
 			end
 		end
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you try to move your hips in time with his, rolling them and doing your best to make <<$npc_firstname[$boy]>> feel good, hoping he''ll come quickly.'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			'Your breath hitches as <<$npc_firstname[$boy]>> continues to steadily thrust into your pussy. You aren''t sure what changed, but it''s like your body is waking up from a deep sleep. His cock stretches your walls, every thrust <i>fills</i> you in a way you didn''t know you needed to be, and even now you can feel yourself get wetter and wetter, slicking up his cock and making it slide in and out of you with much greater, and pleasurable, force.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'As your pleasure increases, you try your best to bring his up as well, putting in the effort to try and make him come.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -528,6 +788,10 @@ if $ARGS[0] = 'miss2.2':
 			*nl
 			'All your dirty talk is just that: talk. For all the effort <<$npc_firstname[$boy]>> is putting in, you can''t say it feels very good. But you don''t want <<$npc_firstname[$boy]>> to feel bad about it either so you play along, pretending otherwise.'
 		end
+	elseif sex_ev['cum_speed_up'] = 1:
+		sex_ev['cum_speed_up'] = 0
+		*nl
+		'You widen your legs and eagerly throw your hips back towards <<$npc_firstname[$boy]>> in time with his. Maybe if you time it right, you can come together.'
 	elseif sex_ev['moan'] >= 1:
 		if sex_ev['moan'] = 1:
 			'"<i>Ah~! Ahh~! Haa~! Ah!</i>"'
@@ -571,7 +835,7 @@ if $ARGS[0] = 'miss3':
 	sex_ev['missionary_fuck'] = 1
 	sex_ev['kiss'] = 0
 	if pcs_vag = 0 and sex_ev['fuck_count'] = 0:gt 'sex_ev_virgin', 'miss_virg_hard1'
-	gs 'arousal', 'vaginal',1,'no_orgasm_msg', 'rough'
+	gs 'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'rough'
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/rough1.mp4"></video></center>'
 	gs 'sex_ev_miss', 'miss3_start_desc'
 	*nl
@@ -725,7 +989,9 @@ end
 if $ARGS[0] = 'miss3.1':
 	sex_ev['miss_fuck'] = 1
 	pcs_sweat += 1
+	$sex_ev['position'] = 'miss'
 	$sex_ev['pos_speed'] = 'miss3'
+	sex_ev['speed'] = 3
 	sex_ev['kiss'] = 0
 	cla & *clr
 	if npc_abusive[$boy] = 1 and (npc_knows_pc_likes_rough[$boy] = 0 or sex_ev['rough_enjoy'] ! 1):
@@ -765,7 +1031,9 @@ end
 if $ARGS[0] = 'miss3.2':
 	sex_ev['miss_fuck'] = 1
 	pcs_sweat += 1
+	$sex_ev['position'] = 'miss'
 	$sex_ev['pos_speed'] = 'miss3'
+	sex_ev['speed'] = 3
 	sex_ev['kiss'] = 0
 	
 	cla & *clr
@@ -799,12 +1067,21 @@ if $ARGS[0] = 'miss3.2':
 				'You sob openly as <<$npc_firstname[$boy]>> smashes his cock into you. It hurts so much you think you''re going to die, but you can''t manage to tell him to stop. The only thing you can do is cry wordlessly as he stabs into your pussy over and over again.'
 			end
 		end
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'Nevertheless, you try to move your hips in time with his, rolling them and doing your best to make <<$npc_firstname[$boy]>> feel good. Maybe you can make him come soon and put an end to this agony...'
+		end
 	elseif sex_ev['fuck_enjoyment'] = 0:
 		gs 'sex_ev_sex', 'fuck_no_cum_code'
 		if sex_ev['fuck_pain'] = -1:
 			sex_ev['fuck_enjoyment'] = 1
 			$orgasm_or = ''
 			'Your breath hitches as <<$npc_firstname[$boy]>> continues to pound your pussy. You aren''t sure what changed, but it''s like your body is coming alive. His cock stretches your walls, <i>filling</i> you in a way you didn''t know you needed to be, and even now you can feel yourself get wetter and wetter, slicking up his cock and making it slam harder into you with every thrust.'
+		elseif sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You widen your legs and try to roll your hips in time with <<$npc_firstname[$boy]>>''s as he pounds you, trying to make him come faster.'
 		elseif sex_ev['moan'] = 1:
 			'"<i>Mm-! Mmm-! Mm-! Mmm-!</i>"'
 			*nl
@@ -820,7 +1097,11 @@ if $ARGS[0] = 'miss3.2':
 		end
 	else
 		gs 'sex_ev_sex', 'fuck_rough_arousal_code'
-		if sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
+		if sex_ev['cum_speed_up'] = 1:
+			sex_ev['cum_speed_up'] = 0
+			*nl
+			'You widen your legs and eagerly throw your hips back towards <<$npc_firstname[$boy]>> as he pounds your pussy. Maybe if you time it right, you can come together.'
+		elseif sex_ev['moan'] <= 2 and sex_ev['moan'] > 0:
 			gs 'sex_ev_miss', 'miss3.2_moan_desc'
 		elseif sex_ev['dirty_talk'] = 1:
 	!!		'"Yes! Yes! Just like that!" you scream. "Fuck me with your cock! Pound my pussy!"'
@@ -869,7 +1150,7 @@ if $ARGS[0] = 'miss_kiss':
 	act'Kiss him':
 		npc_like[$boy] += 2
 		sex_ev['kiss'] = 1
-		gs 'arousal', 'kiss', -rand(1,2),'no_orgasm_msg'
+		gs 'arousal', 'kiss', -rand(1,2), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		gs 'sex_ev_sex', 'fuck_arousal_code'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/vag/miss/kiss1.mp4"></video></center>'
@@ -1189,42 +1470,73 @@ if $ARGS[0] = 'miss1.2_moan_desc':
 end
 
 if $ARGS[0] = 'miss1.2_dirty_talk':
-	if sex_ev['dirty_talk']  = 1:
+	sex_ev['dirty_talk'] += 1
+	if $sex_ev['dirty_talk'] = 'cock':
 		!! dirty talk about his cock
-		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
-			'"Ah~! Your cock feels so good!" you moan. "Don''t stop! Fuck me with your tiny dick!"'
-		elseif $npc_dick_desc[$boy] = 'chode':
-			'"Ah~! Your cock feels so good!" you moan. "Don''t stop! Fuck me with your fat chode!"'
-		elseif $npc_dick_desc[$boy] = 'skinny':
-			'"Ah~! Your cock feels so good!" you moan. "It''s so smooth! Fuck me with your skinny dick!"'
-		elseif $npc_dick_desc[$boy] = 'normal':
-			'"Ah~! Your cock feels so good!" you moan. "You fit just right inside me! Fuck me with your perfect dick!"'
-		elseif $npc_dick_desc[$boy] = 'thick':
-			if pcs_vag <= 10:
-				'"Ah~! You''re so big!" you moan. "Ungh~! You''re stretching me out! It''s so good!"'
-			else
-				'"Ah~! You''re so big!" you moan. "Ungh~! It feels so good~! Fuck me with your big cock~!"'
+		if rand(1,2) = 1:
+			if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+				'"Ah~! Your cock feels so good!" you moan. "Don''t stop! Fuck me with your tiny dick!"'
+			elseif $npc_dick_desc[$boy] = 'chode':
+				'"Ah~! Your cock feels so good!" you moan. "Don''t stop! Fuck me with your fat chode!"'
+			elseif $npc_dick_desc[$boy] = 'skinny':
+				'"Ah~! Your cock feels so good!" you moan.'
+			elseif $npc_dick_desc[$boy] = 'normal':
+				'"Ah~! Your cock feels so good!" you moan. "You fit just right inside me!"'
+			elseif $npc_dick_desc[$boy] = 'thick':
+				if pcs_vag <= 10:
+					'"Ah~! You''re so big!" you moan. "Ungh~! You''re stretching me out! It''s so good!"'
+				else
+					'"Ah~! You''re so big!" you moan. "Ungh~! It feels so good~! Fuck me with your big cock~!"'
+				end
+			elseif $npc_dick_desc[$boy] = 'long':
+				'"Ungh~!" you groan. "You''re so deep! Nngh~! Right there! Right there~!"'
+			elseif $npc_dick_desc[$boy] = 'huge':
+				'"Ungh~!" you groan. "Your cock is so <i>big</i>! You''re so huge!"'
+			elseif $npc_dick_desc[$boy] = 'enormous':
+				'"Ungh~!" you groan. "You''re so <i>fucking big</i>! Don''t stop!"'
+			elseif $npc_dick_desc[$boy] = 'lengthy':
+				'"Ungh~!" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> Your cock is so fucking long! I feel you in my stomach~!"'
+			elseif $npc_dick_desc[$boy] = 'gigantic':
+				'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! I can feel you in my stomach~!"'
+			elseif $npc_dick_desc[$boy] = 'monster':
+				'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re gonna rip me in half~!"'
+			end
+		else
+			if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
+				'"Haa~! Ahh~!" you moan. "I''m addicted to your tiny dick!"'
+			elseif $npc_dick_desc[$boy] = 'chode':
+				'"Ah~! Your cock feels so good!" you moan. "Don''t stop! Fuck me with your fat chode!"'
+			elseif $npc_dick_desc[$boy] = 'skinny':
+				'"Ah~! Your cock feels so good!" you moan.'
+			elseif $npc_dick_desc[$boy] = 'normal':
+				'"Ah~! Your cock feels so good!" you moan. "You fit just right inside me!"'
+			elseif $npc_dick_desc[$boy] = 'thick':
+				if pcs_vag <= 10:
+					'"Ah~! You''re so big!" you moan. "Ungh~! You''re stretching me out! It''s so good!"'
+				else
+					'"Ah~! You''re so big!" you moan. "Ungh~! It feels so good~! Fuck me with your big cock~!"'
+				end
+			elseif $npc_dick_desc[$boy] = 'long':
+				'"Ungh~!" you groan. "You''re so deep! Nngh~! Right there! Right there~!"'
+			elseif $npc_dick_desc[$boy] = 'huge':
+				'"Ungh~!" you groan. "Your cock is so <i>big</i>! You''re so huge!"'
+			elseif $npc_dick_desc[$boy] = 'enormous':
+				'"Ungh~!" you groan. "You''re so <i>fucking big</i>! Don''t stop!"'
+			elseif $npc_dick_desc[$boy] = 'lengthy':
+				'"Ungh~!" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> Your cock is so fucking long! I feel you in my stomach~!"'
+			elseif $npc_dick_desc[$boy] = 'gigantic':
+				'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! I can feel you in my stomach~!"'
+			elseif $npc_dick_desc[$boy] = 'monster':
+				'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re gonna rip me in half~!"'
 			end
-		elseif $npc_dick_desc[$boy] = 'long':
-			'"Ungh~!" you groan. "You''re so deep! Nngh~! Right there! Right there~!"'
-		elseif $npc_dick_desc[$boy] = 'huge':
-			'"Ungh~!" you groan. "Your cock is so <i>big</i>! You''re so huge!"'
-		elseif $npc_dick_desc[$boy] = 'enormous':
-			'"Ungh~!" you groan. "You''re so <i>fucking big</i>! Don''t stop!"'
-		elseif $npc_dick_desc[$boy] = 'lengthy':
-			'"Ungh~!" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> Your cock is so fucking long! I feel you in my stomach~!"'
-		elseif $npc_dick_desc[$boy] = 'gigantic':
-			'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! I can feel you in my stomach~!"'
-		elseif $npc_dick_desc[$boy] = 'monster':
-			'"Ungh~! <i>Fuck!</i>" you groan, your voice a hoarse with arousal. "Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re gonna rip me in half~!"'
 		end
-	elseif sex_ev['dirty_talk'] = 2:
+	elseif $sex_ev['dirty_talk'] = 'arousal':
 		!! dirty talk about your arousal
 		if pcs_horny >= 70:
 			if rand(0,1) = 1:
 				'"Ungh~! Yes~! Fuck~!" you moan softly, barely louder than a whisper. "You''re gonna make me come~!"'
 			else
-				'"Oh <i>fuck</i>~! OhmygodImgonnacum~!" you moan. "I''m gonna come~!"'
+				'"Oh <i>fuck</i>~! OhshitImgonnacum~!" you moan. "I''m gonna cum~!"'
 			end
 		else
 			if rand(0,1) = 1:
@@ -1233,18 +1545,36 @@ if $ARGS[0] = 'miss1.2_dirty_talk':
 				'"Ah~! That feels <i>so good</i>," you moan quietly. "I''m gonna go crazy~!"'
 			end
 		end
-	elseif sex_ev['dirty_talk'] = 3:
+	elseif $sex_ev['dirty_talk'] = 'technique':
 		!! dirty talk about his technique
 		if rand(0,1) = 1:
 			'"Yes~! Just like that~!" you moan. "You''re so good~! Don''t stop~! Don''t stop~!"'
 		else
-			'"I love the way you fuck me," you moan hoarsely. "Keep going~!"'
+			'"I love the way you fuck me~!" you moan hoarsely. "Keep going~!"'
 		end
-	elseif sex_ev['dirty_talk'] = 4:
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
 		!! you''re a dirty girl
-		if pcs_horny >= 70:
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he moves his cock inside you with tantalizing slowness.'
+			'"Yours~!" you whimper, squirming beneath him.'
+		elseif pcs_horny >= 70:
 			if rand(1,1) = 1:
 				'"Yes~! Fuck my sloppy pussy~!" you moan softly, barely louder than a whisper. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you moan. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you mew softly. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you moan. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
+	elseif $sex_ev['dirty_talk'] = 'cheating_bf':
+		if pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Yes~!" you moan softly, barely louder than a whisper. "Fuck this cheating whore''s pussy~! Make my cunt crave another cock~!"'
 			else
 				'"Oh fuck~! Oh fuck~! I''m gonna cum~!" you moan. "~!"'
 			end
@@ -1256,7 +1586,23 @@ if $ARGS[0] = 'miss1.2_dirty_talk':
 			end
 		end
 		!! make this dirty slut yours!
+	elseif $sex_ev['dirty_talk'] = 'cheating_gf':
+		if pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! ~!" you moan softly, barely louder than a whisper. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh fuck~! Oh fuck~! I''m gonna cum~!" you moan. "~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! I''m <i>so</i> wet..." you mew softly. "Make this lesbian slut crave your cock~!"'
+			else
+				'"Ah~! That feels <i>so good</i>," you moan quietly. "I''m gonna go crazy~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
+	if sex_ev['dirty_talk'] > 1: sex_ev['dirty_talk'] = 0
 end
 
 if $ARGS[0] = 'miss1.2_sensation_desc':
@@ -1454,7 +1800,7 @@ end
 
 if $ARGS[0] = 'miss2.2_dirty_talk':
 !!	'"Ah! Fuck! Just like that!" you moan loudly. "Fuck my pussy with your big cock! Right there! Fuck! You''re so good!"'
-	if sex_ev['dirty_talk'] = 1:
+	if $sex_ev['dirty_talk'] = 'cock':
 		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
 			'"Ah! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck my pussy with your tiny dick! Right there! Right there! You''re so <i>fucking</i> good!"'
 		elseif $npc_dick_desc[$boy] = 'chode':
@@ -1482,7 +1828,7 @@ if $ARGS[0] = 'miss2.2_dirty_talk':
 		elseif $npc_dick_desc[$boy] = 'monster':
 			'"Ungh~! <i>Fuck!</i> Just like that!" you moan loudly. "Fuck me with your monster cock~! Oh <i>fuck!</i> You''re so <i>fucking big</i>! You''re tearing me in half! Don''t stop~! Don''t stop~! Don''t stop~!"'
 		end
-	elseif sex_ev['dirty_talk'] = 2:
+	elseif $sex_ev['dirty_talk'] = 'arousal':
 		if pcs_horny >= 70:
 			if rand(0,1) = 1:
 				'"Ungh~! Yes~! Fuck~!" you pant. "You''re gonna make me come~!"'
@@ -1496,12 +1842,31 @@ if $ARGS[0] = 'miss2.2_dirty_talk':
 				'"My pussy can''t get enough of you," you moan. "You''re making me so wet~!"'
 			end
 		end
-	elseif sex_ev['dirty_talk'] = 3:
+	elseif $sex_ev['dirty_talk'] = 'technique':
 		if rand(0,1) = 1:
 			'"Yes~! Just like that~!" you moan. "You''re so fucking good~! Don''t stop~! Don''t stop~!"'
 		else
 			'"Ah~! You''re so good~!" you moan. "You''re driving me crazy~!"'
 		end
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he slowly withdraws his cock before ramming it hard back into your cunt.'
+			'"Yours~!" you whimper, squirming beneath him.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you moan loudly. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you moan. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you moan loudly. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you moan. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
 end
 
@@ -1790,7 +2155,7 @@ if $ARGS[0] = 'miss3.2_moan_desc':
 end
 
 if $ARGS[0] = 'miss3.2_dirty_talk':
-	if sex_ev['dirty_talk']  = 1:
+	if $sex_ev['dirty_talk']  = 'cock':
 		!! dirty talk about his cock
 		if $npc_dick_desc[$boy] = 'tiny' or $npc_dick_desc[$boy] = 'short':
 			'"Yes! Yes! Just like that!" you scream at the top of your lungs. "Fuck me with your tiny cock! Pound my pussy!"'
@@ -1823,7 +2188,7 @@ if $ARGS[0] = 'miss3.2_dirty_talk':
 		elseif $npc_dick_desc[$boy] = 'monster':
 			'"OH FUCK!" you scream at the top of your lungs. "<i>Fuck!</i> I feel you in my stomach~! Oh <i>fuck!</i> You''re so big! You''re <i>so</i> big! You''re so <i>fucking big</i>! You''re gonna tear me in half! Don''t fucking stop!"'
 		end
-	elseif sex_ev['dirty_talk'] = 2:
+	elseif $sex_ev['dirty_talk'] = 'arousal':
 		!! dirty talk about your arousal
 		if pcs_horny >= 70:
 			if rand(0,1) = 1:
@@ -1838,7 +2203,7 @@ if $ARGS[0] = 'miss3.2_dirty_talk':
 				'"My pussy can''t get enough of you~!" you scream. "I need more~! More~! It''s so good~!"'
 			end
 		end
-	elseif sex_ev['dirty_talk'] = 3:
+	elseif $sex_ev['dirty_talk'] = 'technique':
 		!! dirty talk about his technique
 		if pcs_horny >= 70:
 			if rand(0,1) = 1:
@@ -1853,6 +2218,25 @@ if $ARGS[0] = 'miss3.2_dirty_talk':
 				'"I love having you between my legs," you moan. "You''re making me so wet~!"'
 			end
 		end
+	elseif $sex_ev['dirty_talk'] = 'dirty_girl':
+		!! you''re a dirty girl
+		if npc_dirty_lover[$boy] = 1 and rand(1,2) = 1:
+			'"Who''s pussy is this?" <<$npc_firstname[$boy]>> growls as he smashes his cock into you like a battering ram.'
+			'"Yours~!" you whimper, squirming beneath him.'
+		elseif pcs_horny >= 70:
+			if rand(1,1) = 1:
+				'"Yes~! Fuck my sloppy pussy~!" you scream. "Make this dirty little slut cum all over your cock~!"'
+			else
+				'"Oh shit~! Imgonnacum~!" you scream. "You''re gonna make this filthy whore cum~!"'
+			end
+		else
+			if rand(0,1) = 1:
+				'"Ungh~! Fuck my dirty cunt~!" you scream. "Fuck me like the filthy whore I am~!"'
+			else
+				'"Make this pussy yours~!" you scream. "Own this pussy with your cock~!"'
+			end
+		end
+		!! make this dirty slut yours!
 	end
 end
 

locations/sex_ev_pillow_talk.qsrc

@@ -34,23 +34,32 @@ end
 
 if $ARGS[0] = 'topics':
 	gs'sex_ev_pillow_talk', 'stop_talk'
-	if sex_ev['angry_after'] = 0:
-		act'Small talk':cla & gs'sex_ev_pillow_talk2', 'small_talk'
-		if sex_ev['sex_over'] = 1:
-			act'Talk about the sex':cla & gs'sex_ev_pillow_talk', 'sex_talk'
-		end
-		if sex_ev['fuck_count'] > 0:
-			act'Talk about condoms':cla & gs'sex_ev_pillow_talk', 'condom_talk'
+	if sex_ev['unique_npc'] = 1:
+		gs 'sex_ev_pillow_talk_<<$boy>>', 'topic_menu'
+	else
+		if sex_ev['angry_after'] = 0:
+			act'Small talk':cla & gs'sex_ev_pillow_talk2', 'small_talk'
+			if sex_ev['sex_over'] = 1:
+				act'Talk about the sex':cla & gs'sex_ev_pillow_talk', 'sex_talk'
+			end
+			if sex_ev['fuck_count'] > 0:
+				act'Talk about condoms':cla & gs'sex_ev_pillow_talk', 'condom_talk'
+			end
+			act'Talk about cum':cla & gs'sex_ev_pillow_talk', 'cum_talk'
+			act'Play with his cock':cla & gs'sex_ev_pillow_talk2', 'dick_talk'
+			if sex_ev['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_pillow_talk', 'free_creampies'
+			if sex_ev['wake_fuck'] = 1 or sex_ev['sleep_fuck'] = 1 or sex_ev['morning_fuck'] = 1:
+				act'Morning sex talk':cla & gs'sex_ev_pillow_talk2', 'morning_sex_talk'
+			end
+			gs'sex_ev_talk', 'ma_pill_money'
 		end
-		act'Talk about cum':cla & gs'sex_ev_pillow_talk', 'cum_talk'
-		act'Play with his cock':cla & gs'sex_ev_pillow_talk2', 'dick_talk'
-		if sex_ev['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_pillow_talk', 'free_creampies'
-		if sex_ev['wake_fuck'] = 1 or sex_ev['sleep_fuck'] = 1 or sex_ev['morning_fuck'] = 1:
-			act'Morning sex talk':cla & gs'sex_ev_pillow_talk2', 'morning_sex_talk'
+		if sex_ev['boy_pillow_talk'] > 0:
+			sex_ev['boy_pillow_talk'] = 0
+			gs'sex_ev_boy_pillow_talk', 'boy_talk'
+		else
+			sex_ev['boy_pillow_talk'] += 1
 		end
-		gs'sex_ev_talk', 'ma_pill_money'
 	end
-	gs'sex_ev_pillow_talk', 'boy_talk'
 end
 
 if $ARGS[0] = 'talk_time_add':
@@ -58,9 +67,6 @@ if $ARGS[0] = 'talk_time_add':
 	gs 'stat'
 end
 
-!! -------------------------- SEX TALK ----------------------------
-
-
 if $ARGS[0] = 'sex_talk':
 	$sex_ev['convo'] = ''
 	gs'sex_ev_pillow_talk', 'stop_talk'
@@ -70,6 +76,7 @@ if $ARGS[0] = 'sex_talk':
 	gs'sex_ev_pillow_talk', 'long_time'
 !!	gs'sex_ev_pillow_talk', 'sorry_didnt_cum'
 	gs'sex_ev_pillow_talk', 'better_than_boyfriend'
+	gs'sex_ev_pillow_talk', 'sweaty_sex'
 	gs'sex_ev_pillow_talk', 'sore_pussy'
 	
 	if sex_ev['sleepover'] = 1:
@@ -84,6 +91,7 @@ if $ARGS[0] = 'condom_talk':
 	gs'sex_ev_pillow_talk', 'ran_out_of_condoms'
 	gs'sex_ev_pillow_talk', 'better_without'
 	gs'sex_ev_pillow_talk', 'wish_no_condoms1'
+!!	gs'sex_ev_pillow_talk', 'always_condoms1'
 	gs'sex_ev_pillow_talk', 'love_going_bareback'
 end
 
@@ -94,8 +102,41 @@ if $ARGS[0] = 'cum_talk':
 	gs'sex_ev_pillow_talk', 'broken_creampie_rule'
 	gs'sex_ev_pillow_talk', 'plastered'
 	gs'sex_ev_pillow_talk', 'thank_no_creampie'
+	gs'sex_ev_pillow_talk', 'mess_for_maids'
+end
+
+if $ARGS[0] = 'small_talk':
+	gs'sex_ev_pillow_talk', 'stop_talk'
+	act'Change the subject':cla & gs 'sex_ev_pillow_talk', 'topics'
+	gs'sex_ev_pillow_talk2', 'plans_later'
+	gs'sex_ev_pillow_talk2', 'weather_talk'
+	gs'sex_ev_pillow_talk2', 'fav_body_part'
+!!	gs'sex_ev_work_talk1', 'job_talk'
+
+	if sex_ev['sleepover'] = 1:gs'sex_ev_talk', 'morning_talk'
+end
+
+if $ARGS[0] = 'dick_talk_topics':
+	gs'sex_ev_pillow_talk', 'stop_talk'
+	act'Change the subject':cla & gs'sex_ev_pillow_talk', 'topic_route'
+	gs'sex_ev_pillow_talk2', 'whats_it_like_dick'
+	gs'sex_ev_pillow_talk2', 'dicks_are_weird'
+	gs'sex_ev_pillow_talk2', 'dick_compliment'
+	gs'sex_ev_pillow_talk2', 'whats_it_like_fuck_girl'
+end
+
+if $ARGS[0] = 'morning_sex_talk':
+	gs'sex_ev_pillow_talk', 'stop_talk'
+	act'Change the subject':cla & gs'sex_ev_pillow_talk', 'topic_route'
+	gs'sex_ev_pillow_talk2', 'morning_start_day'
+	gs'sex_ev_pillow_talk2', 'morning_sore_pussy'
+	gs'sex_ev_pillow_talk2', 'wakeup_sex_late_for_school'
+	gs'sex_ev_morning', 'want_breakfast'
+	gs'sex_ev_pillow_talk2', 'forgot_bc_talk1'
 end
 
+!! -------------------------- SEX TALK ----------------------------
+
 if $ARGS[0] = 'good_for_you':
 	if sex_ev['good_for_you'] = 0 and sex_ev['mad'] ! 1 and sex_ev['blue_ball'] ! 1:
 		act'Was it good for you?':
@@ -226,6 +267,35 @@ if $ARGS[0] = 'better_than_boyfriend':
 	end
 end
 
+if $ARGS[0] = 'sweaty_sex':
+	if pcs_sweat > sex_ev['starting_sweat'] + 20 and sex_ev['fuck_count'] > 0 and sex_ev['sweaty_talk'] = 0:
+		act'I''m so sweaty':
+			sex_ev['sweaty_talk'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if sex_ev['rough_fuck'] > 0:
+				'"Whew, I''m so sweaty after that," you pant, looking at the moisture running down your skin. "We really went hard didn''t we?"'
+				if npc_sex_speed[$boy] = 3:
+					'"A hard fuck is the best fuck," <<$npc_firstname[$boy]>> grins back at you.'
+				elseif npc_sex_speed[$boy] = 2:
+					'"It''s nice to go hard now and then," <<$npc_firstname[$boy]>> smiles.'
+				else
+					'"It''s not usually my thing," <<$npc_firstname[$boy]>> says with a small smile. "But since you wanted to..."'
+				end
+			else
+				'"Whew, I''m so sweaty after that," you pant, looking at the moisture running down your skin. "I didn''t realize we fucked that hard."'
+				if npc_gymrat[$boy] = 1 or npc_apt_spare[$boy] = 'gym':
+					'"Sex is better cardio than most people think," <<$npc_firstname[$boy]>> grins back.'
+				else
+					sex_ev['weather_pillow_talk'] = 1
+					'"I don''t think we did," <<$npc_firstname[$boy]>> pants back. "I think it''s just that hot today."'
+				end
+			end
+			gs'sex_ev_pillow_talk', 'sex_talk'
+		end
+	end
+end
+
 if $ARGS[0] = 'sore_pussy':
 	if pain['vaginal'] > 10 and sex_ev['sore_pussy_talk'] = 0:
 		act'Sore pussy':
@@ -252,88 +322,103 @@ if $ARGS[0] = 'sore_pussy':
 			end
 			
 			if $npc_dick_desc[$boy] = 'thick' or $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
-				act'<<$npc_firstname[$boy]>>''s cock is too big':
-					cla & *nl
-					'"I think your cock is too big for me," you say, giving a rueful glance at <<$npc_firstname[$boy]>>''s enormous manhood as you rub your thighs together. "My pussy feels like it''s been pounded by a sledgehammer."'
-					if npc_arrogant[$boy] = 1:
-						'"It is pretty impressive, isn''t it?" he replies smugly, giving his own cock an appreciative glance.'
-						act'Yeah it is':
-							cla & *nl
-							'"Hell yeah it is," you grin back. '
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
-						
-						act'Arrogant much?':
-							cla & *nl
-							'"Nice to know my pain isn''t feeding your ego or anything like that," you say with a raised eyebrow.'
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
-						
-						if npc_rel_type[$boy] ! 'boyfriend' and pcs_lover - pcs_girlfriends > 0:
-							act'Wish my boyfriend was that big':
-								npc_know_cheat[$boy] = 1
+				act'<<$npc_firstname[$boy]>>''s cock is big':
+					cla
+					act'<i>Too</i> big':
+						cla & *nl
+						'"I think your cock is too big for me," you say, giving a rueful glance at <<$npc_firstname[$boy]>>''s enormous manhood as you rub your thighs together. "My pussy feels like it''s been pounded by a sledgehammer."'
+						if npc_arrogant[$boy] = 1:
+							'"It is pretty impressive, isn''t it?" he replies smugly, giving his own cock an appreciative glance.'
+							act'Yeah it is':
 								cla & *nl
-								'"I wish my boyfriend had one like that," you say. "It''s so big but it feels so good..."'
+								'"Hell yeah it is," you grin back. '
 								gs'sex_ev_pillow_talk', 'sex_talk'
 							end
-						end
-					elseif npc_caretaker[$boy] = 1 or rand(1,2) = 1:
-						'"Sorry," <<$npc_firstname[$boy]>> says with a guilty smile. "That''s the one part of me I can''t really control."'
-						act'Not his fault':
-							cla & *nl
-							'"I know," you reply. "It''s not your fault. But it still does hurt a little."'
-							'You give him a small smile to let him know there''s no hard feelings.'
-							gs'sex_ev_pillow_talk', 'sex_talk'
+							
+							act'Arrogant much?':
+								cla & *nl
+								'"Nice to know my pain isn''t feeding your ego or anything like that," you say with a raised eyebrow.'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+							
+							if npc_rel_type[$boy] ! 'boyfriend' and pcs_lover - pcs_girlfriends > 0:
+								act'Wish my boyfriend was that big':
+									npc_know_cheat[$boy] = 1
+									cla & *nl
+									'"I wish my boyfriend had one like that," you say. "It''s so big but it feels so good..."'
+									gs'sex_ev_pillow_talk', 'sex_talk'
+								end
+							end
+						elseif npc_caretaker[$boy] = 1 or rand(1,2) = 1:
+							'"Sorry," <<$npc_firstname[$boy]>> says with a guilty smile. "That''s the one part of me I can''t really control."'
+							act'Not his fault':
+								cla & *nl
+								'"I know," you reply. "It''s not your fault. But it still does hurt a little."'
+								'You give him a small smile to let him know there''s no hard feelings.'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+							
+							act'Worth it':
+								cla & *nl
+								'"Don''t be sorry," you reply, shaking your head. "The pain is more than worth the pleasure."'
+								'You give him a small smile to let him know you enjoyed yourself.'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+						else
+							'"Hey, you''re the one who wanted to fuck me," <<$npc_firstname[$boy]>> shrugs.'
+							if npc_fuck_times[$boy] = 0:
+								act'Didn''t know what I was getting into':
+									cla & *nl
+									'"That was before I knew what I was getting into," you respond wryly.'
+									gs'sex_ev_pillow_talk', 'sex_talk'
+								end
+							else
+								act'He''s got a point':
+									cla & *nl
+									'"You''ve got a point there," you respond wryly.'
+									gs'sex_ev_pillow_talk', 'sex_talk'
+								end
+							end
 						end
 						
-						act'Worth it':
-							cla & *nl
-							'"Don''t be sorry," you reply, shaking your head. "The pain is more than worth the pleasure."'
-							'You give him a small smile to let him know you enjoyed yourself.'
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
-					else
-						'"Hey, you''re the one who wanted to fuck me," <<$npc_firstname[$boy]>> shrugs.'
-						if npc_fuck_times[$boy] = 0:
-							act'Didn''t know what I was getting into':
+						if npc_rel_type[$boy] ! '':
+							act'Need to get used to this':
 								cla & *nl
-								'"That was before I knew what I was getting into," you respond wryly.'
+								'"I''m gonna have to get used to having something so big inside me," you say, wryly twisting your lips while still examining his cock.'
 								gs'sex_ev_pillow_talk', 'sex_talk'
 							end
-						else
-							act'He''s got a point':
+							
+							act'Just need practice':
 								cla & *nl
-								'"You''ve got a point there," you respond wryly.'
+								'"I think I just need more practice," you reply, giving him a suggestive look. By the way he stares back, you think he got your meaning.'
 								gs'sex_ev_pillow_talk', 'sex_talk'
 							end
 						end
-					end
-					
-					if npc_rel_type[$boy] ! '':
-						act'Need to get used to this':
-							cla & *nl
-							'"I''m gonna have to get used to having something so big inside me," you say, wryly twisting your lips while still examining his cock.'
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
 						
-						act'Just need practice':
-							cla & *nl
-							'"I think I just need more practice," you reply, giving him a suggestive look. By the way he stares back, you think he got your meaning.'
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
-					end
-					
-					if npc_rel_type[$boy] = 'boyfriend':
-						act'Lucky you''re my boyfriend':
-							cla & *nl
-							'"Just count yourself lucky you''re already my boyfriend," you say, giving him a wry smirk. "I might''ve considered looking for a guy with a smaller cock if we weren''t dating."'
-							gs'sex_ev_pillow_talk', 'sex_talk'
-						end
-					elseif npc_rel_type[$boy] = 'husband':
-						act'Lucky you''re my husband':
-							cla & *nl
-							'"Just count yourself lucky we''re already married," you say, giving him a teasing smile. "A divorce is too much hassle to go through just because your cock is too big. I''ll just have to live with the pain."'
-							gs'sex_ev_pillow_talk', 'sex_talk'
+						if $npc_rel_type[$boy] = 'sugar_daddy':
+							act'Lucky you''re my sugar daddy':
+								cla & *nl
+								'"Just count yourself lucky you''re my sugar daddy," you say, giving him a wry smirk. "If you were just my boyfriend, I might have broken up with you over this."'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+							
+							act'Lucky you''re paying me (insulting)':
+								cla & *nl
+								'"Just count yourself lucky you''re sugar babying me," you say, wrinkling your nose. "I would never put up with a cock like this if I wasn''t getting paid."'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+						elseif $npc_rel_type[$boy] = 'boyfriend':
+							act'Lucky you''re my boyfriend':
+								cla & *nl
+								'"Just count yourself lucky you''re already my boyfriend," you say, giving him a wry smirk. "I might''ve considered looking for a guy with a smaller cock if we weren''t dating."'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
+						elseif $npc_rel_type[$boy] = 'husband':
+							act'Lucky you''re my husband':
+								cla & *nl
+								'"Just count yourself lucky we''re already married," you say, giving him a teasing smile. "A divorce is too much hassle to go through just because your cock is too big. I''ll just have to live with the pain."'
+								gs'sex_ev_pillow_talk', 'sex_talk'
+							end
 						end
 					end
 				end
@@ -350,6 +435,26 @@ if $ARGS[0] = 'sore_pussy2':
 	end
 end
 
+if $ARGS[0] = 'sleep_fuck_wakeup_talk':
+	if sex_ev['sleep_fuck'] = 2:
+		
+	end
+end
+
+if $ARGS[0] = 'rough_sex_talk':
+	if sex_ev['rough_pillow_talk'] = 0:
+		if sex_ev['rough_enjoy'] = 1:
+			act'I loved it when you got rough':
+				
+			end
+		elseif sex_ev['rough_hurt'] = 1:
+			act'Did you have to get so rough?':
+				
+			end
+		end
+	end
+end
+
 !! ----------------------- CONDOM TALK ---------------------------------------
 
 if $ARGS[0] = 'ran_out_of_condoms':
@@ -569,7 +674,7 @@ end
 
 if $ARGS[0] = 'better_without':
 !!	if sex_ev['condom'] >= 2 and sex_ev['better_without'] = 0:
-	if sex_ev['no_condom'] = 1 and sex_ev['better_without'] = 0 and npc_bareback[$boy] = 0:
+	if sex_ev['no_condom'] = 1 and sex_ev['better_without'] = 0 and sex_ev['bareback_pillowtalk'] = 0 and npc_bareback[$boy] = 0:
 		act'It was better without the condom':
 			gs'sex_ev_pillow_talk', 'talk_time_add'
 			sex_ev['better_without'] = 1
@@ -673,7 +778,7 @@ end
 
 
 if $ARGS[0] = 'wish_no_condoms1':
-	if sex_ev['condoms_used'] + sex_ev['pc_condoms_used'] > 0 and sex_ev['wish_no_condoms_talk'] = 0 and sex_ev['fuck_count'] > 0 and sex_ev['creampie_count'] = 0:
+	if sex_ev['condoms_used'] + sex_ev['pc_condoms_used'] > 0 and sex_ev['wish_no_condoms_talk'] = 0 and sex_ev['fuck_count'] > 0 and sex_ev['creampie_count'] = 0 and $sex_ev['type'] ! 'hookup':
 		act'Wish we didn''t need condoms':
 			sex_ev['wish_no_condoms_talk'] = 1
 			cla
@@ -732,21 +837,23 @@ if $ARGS[0] = 'wish_no_condoms2':
 			act'We got lucky':
 				cla & *nl
 				'"We were lucky," you say with a roll of your eyes. "If we keep going with no protection, I''m practically guaranteed to end up with one of your loads inside me on a bad day."'
-				if npc_no_condoms[$boy] = 1 and npc_argumentative[$boy] = 1:
+				if (npc_no_condoms[$boy] = 1 or rand(1,3)) and (npc_argumentative[$boy] = 1 or npc_selfish[$boy] = 1 or rand(1,2)):
 					sex_ev['boy_pill_suggest'] = 1
 					'"That''s what the morning after pill is for," he argues. "Any time we fuck up, just get a pill."'
 					gs'sex_ev_talk', 'bareback_think_pill'
 					gs'sex_ev_talk', 'bareback_agree'
 					gs'sex_ev_talk', 'bareback_pill_expense'
-				elseif npc_no_condoms[$boy] = 1 and npc_know_bc_not_effective[$boy] = 0:
+				elseif (npc_no_condoms[$boy] = 1 or rand(1,3)) and npc_know_bc[$boy] ! 1 and npc_know_bc_not_effective[$boy] ! 1:
 					'"Then why not start birth control?" he asks. "If you''re on birth control, it won''t matter whether or not we use condoms."'
 					gs'sex_ev_talk', 'bareback_bc_suggest'
 				elseif npc_know_bc_not_effective[$boy] = 1:
 					'"I can''t wait until your birth control is ready," he says. "Then we can fuck without worry."'
+					gs'sex_ev_pillow_talk', 'topic_route'
 				else
 					'"Guess you have a point there," <<$npc_firstname[$boy]>> says ruefully. "It can be hard to pull out sometimes."'
+					gs'sex_ev_pillow_talk', 'topic_route'
 				end
-				gs'sex_ev_pillow_talk', 'topic_route'
+				
 			end
 		else
 		!!{	if sex_ev['accidental_creampie_convo'] = 0:
@@ -812,6 +919,7 @@ if $ARGS[0] = 'wish_no_condoms_response_no_kids':
 	
 	if stat['dangerous_day'] = 1:
 		act'It''s a danger day (annoyed)':
+			sex_ev['danger_day'] = 1
 			cla & *nl
 			'"I''m in my fertile stage right now you moron," you say with no small amount of irritation. "Of course I wanted a condom today! I could get pregnant!"'
 			gs'sex_ev_pillow_talk', 'topic_route'
@@ -819,8 +927,50 @@ if $ARGS[0] = 'wish_no_condoms_response_no_kids':
 	end
 end
 
+if $ARGS[0] = 'always_condoms1':
+	if npc_condom_conscious[$boy] > 0 and sex_ev['no_condom'] < 1 and $npc_rel_type[$boy] ! 'boyfriend' and sex_ev['condom_conscious_talk'] = 0:
+		act'You always use condoms?':
+			sex_ev['condom_conscious_talk'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if $sex_ev['type'] = 'hookup':
+				'"So... you always use a condom when you hook up with someone?" you ask.'
+			else
+				'"So you always use a condom, huh?" you ask <<$npc_firstname[$boy]>>.'
+			end
+			if npc_childfree[$boy] = 1:
+				sex_ev['no_kids'] = 1
+				'"Always," he nods. "It''s just safer for both of us. Neither of us want an STD. And I especially don''t want you to get pregnant."'
+			else
+				'"Always," he nods. "It''s just safer for both of us."'
+			end
+			
+			act'Safety first':
+				cla & *nl
+				'"Yeah," you nod back. "Safety first. Glad you see it the same way."'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'Very considerate of him':
+				npc_rel[$boy] += 1
+				cla & *nl
+				'"That''s really considerate of you," you remark. "A lot of guys try to talk girls into going bareback, not thinking about the consequences. It''s nice to be with a guy who''s thinking about that stuff first instead of later."'
+				'"Well I think I''d find it pretty annoying if I got a bad case of the crabs too," <<$npc_firstname[$boy]>> laughs back.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+			
+			act'Doesn''t it feel bad?':
+				cla & *nl
+				'"Don''t condoms kind of suck for you though?" you ask. "Isn''t it hard to feel with one on?"'
+				'"I think sex is pleasurable enough without the added risk. Plus I think a bad case of the crabs would suck a lot more than wearing a condom," he laughs back.'
+				gs'sex_ev_pillow_talk', 'topic_route'
+			end
+		end
+	end
+end
+
 if $ARGS[0] = 'love_going_bareback':
-	if sex_ev['bareback_pillowtalk'] = 0 and sex_ev['no_condom'] = 1:
+	if sex_ev['bareback_pillowtalk'] = 0 and sex_ev['better_without'] = 0 and sex_ev['no_condom'] = 1 and (sex_ev['virgin'] ! 1 or sex_ev['condom'] = 1):
 		act'Love going bareback':
 			sex_ev['bareback_pillowtalk'] = 1
 			cla & *clr
@@ -851,7 +1001,7 @@ if $ARGS[0] = 'love_going_bareback':
 					'"That''s why I never use them," <<$npc_firstname[$boy]>> says smugly. "They''re bad for the environment."'
 				else
 					if npc_humor[$boy] = 1:
-						'"Well it <i>is</i> technically artificial," he chuckles to himself. "I don''t think latex is a commonly occurring material in the wild."'
+						'"Well it is <i>technically</i> artificial," he chuckles to himself. "I don''t think latex is a commonly occurring material in the wild."'
 					elseif npc_bareback[$boy] = 2 and sex_ev['danger_day'] ! 1:
 						'"Good thing today wasn''t a danger day," <<$npc_firstname[$boy]>> smiles back at you.'
 					else
@@ -885,19 +1035,40 @@ end
 
 
 if $ARGS[0] = 'thank_no_creampie':
-	if sex_ev['no_condom'] = 1 and sex_ev['creampie_count'] = 0:
-		act'Thanks for coming outside':
+	if sex_ev['pullout_thank'] = 0 and sex_ev['no_condom'] = 1 and sex_ev['creampie_count'] = 0:
+		act'Thanks for pulling out':
+			sex_ev['pullout_thank'] = 1
 			cla
+			'"Thanks for remembering to pull out," you say.'
 			if npc_dont_like_creampie[$boy] = 1:
-				'"Thanks for coming outside," you smile.'
+				!! '"Thanks for remembering to pull out," you say.'
+			elseif npc_cum_pref[$boy] = 'creampie':
+				'"Wish I didn''t have to," he sighs. "Coming inside a girl is the best feeling in the world."'
+				act'Ew':
+					cla & *nl
+					'"Yech~!" you grimace in disgust. "Well that makes one of us."'
+					gs'sex_ev_pillow_talk', 'topic_route'
+				end
+				
+				if birth_control['think_safe'] ! 1:
+					act'Not on birth control':
+						cla
+						act'I wish you could too':
+							cla & *nl
+							'"I wish you could babe, I really do," you say wistfully. "I love creampies too. But I''m not on birth control."'
+							gs'sex_ev_pillow_talk', 'topic_route'
+						end
+					end
+				end
+
 			else
-				'"Thanks for not coming inside me," you murmur.'
+				!! '"Thanks for remembering to pull out," you say.'
 				if sex_ev['promise_no_creampie'] = 1:
 					'"Hey, I promised didn''t I?"'
 					'"I know. But some guys don''t listen. I appreciate that you actually followed through."'
 					gs'sex_ev_pillow_talk', 'topic_route'
 				else
-					'"No problem. Though you didn''t ask me to. Would it have been a problem if I had?"'
+					'"No problem. Though you didn''t ask me to. Would it have been a problem if I hadn''t?"'
 					act'No but thanks anyways':
 						cla & *nl
 						'"No," you shake your head. "But thanks anyways. I thought it was considerate."'
@@ -985,6 +1156,10 @@ if $ARGS[0] = 'thank_no_creampie':
 	end
 end
 
+if $ARGS[0] = 'thank_no_creampie2':
+
+end
+
 if $ARGS[0] = 'risky_creampie_care1':
 	if npc_risky_creampie_count[$boy] > sex_ev['risky_creampie'] + 10 and sex_ev['risky_creampie'] > 0 and sex_ev['no_condom'] = 1 and sex_ev['careful_creampie_talk'] = 0 and $sex_ev['type'] ! 'hookup':
 		act'Need to be more careful about creampies':
@@ -1272,6 +1447,54 @@ if $ARGS[0] = 'plastered':
 	end
 end
 
+if $ARGS[0] = 'mess_for_maids':
+	if $sex_ev['loc'] = 'hotel_room' and sex_ev['mess_for_maid_talk'] = 0 and sex_ev['cum_count'] >= 5 and sex_ev['cum_count'] - (sex_ev['cum_mouth'] - sex_ev['facial_count']) >= 4:
+		act'A real mess for the maids':
+			sex_ev['mess_for_maid_talk'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if sex_ev['virgin'] = 1 and sex_ev['fuck_count'] > 0:
+				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
+				elseif sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
+				else
+					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your virginity mixing in.', ' As well as the light pink blots of blood from your lost virginity.')
+				end
+			elseif mesec > 0 and sex_ev['fuck_count'] > 0:
+				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
+				elseif sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
+				else
+					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your period mixing in.', ' As well as the dark red stains streaking across the sheets from your period.')
+				end
+			else
+				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
+				elseif sex_ev['cum_condom'] >= 4:
+					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
+				else
+					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress.', ' ')
+				end
+			end
+			
+			if npc_wife[$boy] = 1 and $npc_fidelity[$npclastgenerated] = 'cheater' and rand(1,2) = 1:
+				npc_has_wife_know[$boy] = 1
+				'"This is a bigger mess than I made with my wife on my first honeymoon," he chuckles.'
+			else
+				if rand(1,2) = 1:
+					'"I''m sure they''ve seen worse," he chuckles.'
+				else
+					'"At least we don''t have to do it," he chuckles.'
+				end
+			end
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+	end
+end
+
+
 if $ARGS[0] = 'ruined_makeup':
 	if pcs_makeup = 0 and sex_ev['starting_makeup'] > 1 and sex_ev['ruin_makeup'] = 0:
 		act'You ruined my makeup':
@@ -1383,24 +1606,38 @@ if $ARGS[0] = 'free_creampies':
 			act'I don''t mind':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-				'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I don''t mind if you just come wherever you want."'
+				'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I don''t mind if you just come wherever you want.' + iif(birth_control['think_safe'] = 1, ' I''m on birth control anyways, so it isn''t a problem if you finish inside."', '"')
+				if birth_control['think_safe'] = 1:npc_know_bc[$boy] = 1
 				gs 'sex_ev_pillow_talk', 'free_creampies2'
 			end
 			act'I love creampies':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-				'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I really like it when you do. It feels good."'
+				'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I really like it when you do. It feels good.' + iif(birth_control['think_safe'] = 1, ' Besides, I''m on birth control."', '"')
+				if birth_control['think_safe'] = 1:npc_know_bc[$boy] = 1
 				gs 'sex_ev_pillow_talk', 'free_creampies2'
 			end
 			if $pc_cum_pref_know[$boy] = 'creampie':
 				act'I know how much you like it':
 					cla & *clr
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-					'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I know how much you like it. And I want you to feel good."'
+					'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask to come inside me. I know how much you like it. And I want you to feel good.' + iif(birth_control['think_safe'] = 1, ' Besides, I''m on birth control. So you can come inside me as much as you want without danger."', '"')
+				if birth_control['think_safe'] = 1:npc_know_bc[$boy] = 1
 					gs 'sex_ev_pillow_talk', 'free_creampies2'
 				end
 			end
-			if birth_control['think_safe'] ! 1:
+			if birth_control['think_safe'] = 1:
+				act'I''m on birth control':
+					npc_know_bc[$boy] = 1
+					cla & *clr
+					$sex_ev['temp_pic']
+					'"You don''t need to ask to come inside me y''know," you murmur. "I''m on birth control. It''s safe."'
+					'"Really?" <<$npc_firstname[$boy]>> asks.'
+					'"Really," you reply with a gentle smile. "I''ll let you know when it''s safe. And then you can come inside me as much as you want."'
+					'<<$npc_firstname[$boy]>> is positively beaming back at you.'
+					gs'sex_ev_talk', 'free_creampies2'
+				end
+			else
 				act'It''s okay when it''s safe':
 					npc_free_creampies[$boy] = 1
 					cla & *clr
@@ -1422,7 +1659,7 @@ if $ARGS[0] = 'free_creampies2':
 	if npc_abusive[$boy] = 1 and npc_childfree[$boy] ! 1:
 		npc_free_creampies[$boy] = 2
 		if $npc_cum_pref[$boy] = 'creampie':
-			'<<$npc_firstname[$boy]>> gives you a predatory grin, so full of desire that it makes you involuntarily swallow.'
+			'<<$npc_firstname[$boy]>> gives you a predatory grin, so full of desire that it makes you gulp nervously.'
 			*nl
 			'"Good to know..."'
 		else
@@ -1629,21 +1866,23 @@ if $ARGS[0] = 'broken_creampie_rule':
 	end
 end
 
-if $ARGS[0] = 'sleep_fuck_wakeup_talk':
-	if sex_ev['sleep_fuck'] = 2:
-		
-	end
-end
-
-if $ARGS[0] = 'rough_sex_talk':
-	if sex_ev['rough_pillow_talk'] = 0:
-		if sex_ev['rough_enjoy'] = 1:
-			act'I loved it when you got rough':
-				
+if $ARGS[0] = 'pullout_repeat_failure_talk1':
+	if sex_ev['failed_to_pullout_talk'] = 0 and npc_pullout_failure[$boy] > 0 and sex_ev['creampie_count'] > 0 and sex_ev['promise_no_creampie'] > 0:
+		act'I can''t believe you came inside me again':
+			sex_ev['failed_to_pullout_talk'] = 1
+			cla
+			act'(Humorous)':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"I can''t believe you came inside me again," you giggle uncontrollably. "You''re really bad at pulling out, you know that?"'
+				gs'sex_ev_pillow_talk', 'topic_route'
 			end
-		elseif sex_ev['rough_hurt'] = 1:
-			act'Did you have to get so rough?':
-				
+			
+			act'(Annoyed)':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
+				'"I can''t believe you came inside me again," you sigh in exasperation. "You''re really bad at pulling out, you know that?"'
+				gs'sex_ev_pillow_talk', 'topic_route'
 			end
 		end
 	end
@@ -1747,847 +1986,6 @@ if $ARGS[0] = 'couldnt_sleep_fuck':
 	end
 end
 
-!! ------------------------------ BOY INITIATED CONVERSATIONS -------------------------------------------------
-if $ARGS[0] = 'boy_talk':
-	if sex_ev['boy_topic_check'] = 0: gs 'sex_ev_pillow_talk', 'boy_topic_check'
-	
-	if sex_ev['boy_topics'] > 0 and rand(0,1) = 1:
-		if sex_ev['good_for_you'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
-			cla
-			act'<<$npc_firstname[$boy]>> has something to say':gs 'sex_ev_favorite_part', 'boy_good_for_you'
-		elseif sex_ev['boy_pube_talk'] = 0 and rand(1,sex_ev['boy_topics']) = 1:
-			cla
-			act'<<$npc_firstname[$boy]>> has something to say':gs'sex_ev_pillow_talk', 'boy_pube_talk'
-!!		elseif sex_ev['broken_condom_talk'] = 0 and rand(1,2) = 1:
-		
-!!		elseif sex_ev['creampie_okay'] = 0:
-		
-!!		elseif sex_ev['boy_no_kids'] = 0:
-
-		end
-	end
-end
-
-if $ARGS[0] = 'boy_topic_check':
-	sex_ev['boy_topics'] = 0
-	if sex_ev['cum_count'] >= (npc_sexdrive[$boy] / 4 * 3) and sex_ev['good_for_you'] ! 1: sex_ev['boy_topics'] += 1
-!!	if sex_ev['broken_condom'] >= 1 and sex_ev['broken_condom_talk'] ! 1 and (npc_selfish ! 1 and (npc_childfree = 1 or npc_caretaker = 1)): sex_ev['boy_topics'] += 1
-!!	if sex_ev['creampie_surprise'] >= 1 and sex_ev['creampie_okay'] ! 1: sex_ev['boy_topics'] += 1
-
-!!{	DISABLED UNTIL YOU PUSH THE PUBIC STYLE CHANGES IN BODY_DIN
-	if sex_ev['boy_pube_talk'] ! 1: sex_ev['boy_topics'] += 1}
-
-!!	if sex_ev['broken_condom'] >= 1 and sex_ev['boy_pube_talk'] ! 1: sex_ev['boy_topics'] += 1
-!!	if sex_ev['condom'] ! 1 and sex_ev['boy_condom_rule_talk'] ! 1: sex_ev['boy_topics'] += 1
-	sex_ev['boy_topic_check'] = 1
-end
-
-if $ARGS[0] = 'boy_topic_choose':
-	
-end
-
-
-if $ARGS[0] = 'boy_broken_condom':
-	if sex_ev['broken_condom_talk'] = 0 and sex_ev['broken_condom'] >= 1 and npc_know_bc[$boy] = 0 and sex_ev['ma_pill'] = 0 and (npc_selfish[$boy] ! 1 and (npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1)):
-		gs'sex_ev_pillow_talk', 'talk_time_add'
-		cla & *clr
-		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-		if cum_loc['vagina'] > 0:
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything...?"'
-		else
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything...?"'
-		end
-		
-		if mc_inventory['morning_after_pill'] = 0:
-			act'I''ll buy a morning after pill':
-				cla & *nl
-				'"It''s okay," you nod reassuringly. "I''ll get a morning after pill tomorrow. No big deal."'
-				'He smiles back, seeming to relax a bit.'
-				gs'sex_ev_pillow_talk', 'topic_route'
-			end
-		else
-			act'I have a pill':
-				cla & *nl
-				sex_ev['ma_pill'] = 1
-				'"It''s okay," you smile. "I have a morning after pill. No big deal."'
-				'He nods, smiling and seeming to relax a bit.'
-				gs'sex_ev_pillow_talk', 'topic_route'
-			end
-			
-			act'Take your morning after pill (shy)':
-				cla & *nl
-				sex_ev['ma_pill'] = 2
-				'"It''s okay," you say. "In fact..."'
-				'<<$npc_firstname[$boy]>> watches you reach into your purse and pull out your morning after pill and you can''t help but blush beneath his gaze.'
-				if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
-					'"My aunt gave me this for emergencies," you say shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
-				else
-					'"The instructions say to take it as soon as possible for best effect," you smile shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
-				end
-				gs 'medical_din', 'morning_after_pill_function'
-				gs'sex_ev_pillow_talk', 'topic_route'
-			end
-			
-			act'Take your morning after pill (sexy)':
-				cla & *nl
-				sex_ev['ma_pill'] = 2
-				'"It''s fine," you say, smiling mischievously. "In fact..."'
-				'As <<$npc_firstname[$boy]>> watches you pull your morning after pill from your purse, you give him a smouldering look. Sticking out your tongue at him, you pop the pill onto your mouth, swallowing with a wide grin.'
-				if $sex_ev['last_cum'] = 'swallow':
-					'"If only I thought to do this earlier," you grin. "Could''ve washed it down with your load."'
-				elseif LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
-					'"My aunt gave me this," you grin.'
-					'"She sounds like a good aunt," <<$npc_firstname[$boy]>> smirks back. "Or a slutty one."'
-					'"Kind of both actually," you say, causing both of you to laugh.'
-				else
-					'"I''m not ready to be a mom," you smirk.'
-				end
-				gs 'medical_din', 'morning_after_pill_function'
-				gs'sex_ev_pillow_talk', 'topic_route'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'boy_pube_talk':
-	sex_ev['boy_pube_talk'] = 1
-	sex_ev['boy_topics'] -= 1
-	if ($npc_like_pubestyle[$boy] ! '' and $npc_like_pubestyle[$boy] ! $pube_style['word']) or ($npc_like_pubestyle[$boy] = 'none' and $npc_know_pubes[$boy] ! $pube_style['word']):gt'sex_ev_pillow_talk', 'boy_pubes_changed'
-	
-	$npc_know_pubes[$boy] = $pube_style['word']
-	gs'sex_ev_pillow_talk', 'talk_time_add'
-	cla & *clr
-	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-	if $pube_style['word'] = 'shaved':
-		if $npc_like_pubestyle[$boy] = $pube_style['word']:
-			!! this determines if you''ve already had this conversation before
-			'"I love how sexy your pussy is," <<$npc_firstname[$boy]>> says, admiringly running his fingers across the smooth skin of your pubic area.'
-			gs'sex_ev_pillow_talk', 'boy_likes_pubes2'
-		else
-			'"I see you keep it clean down there," he says, looking at your smooth-shaven pussy.'
-			act'I like it this way':
-				sex_ev['like_pubes'] = 1
-				cla
-				act'It''s feels good':
-					cla & *nl
-					'"I like it this way," you say. "It feels nice to have a smooth pussy. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s classy':
-					cla & *nl
-					'"I like it this way," you say. "I think it''s classier keep a clean shave. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s sexy':
-					cla & *nl
-					'"I like it this way," you say. "It''s sexy to keep a smooth pussy. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			
-			act'When I feel like it':
-				sex_ev['lazy_shave'] = 1
-				cla & *nl
-				if pubestyle = 11:
-					'"Sometimes," you shrug. "I''ll give it a shave when it starts turning into bush, but I''ll live with the stubble for a few days at a time. Why do you ask?"'
-				else
-					'"Sometimes," you shrug. "On some days I''ll just give it a trim, on other days I''ll shave it all off. Sometimes I just go full bush. Why do you ask?"'
-				end
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			if model['status'] = 1:
-				act'It''s for work':
-					cla & *nl
-					'"It''s for work," you shrug. "I''m a model, so it''s better to keep it shaved."'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			gs'sex_ev_pillow_talk', 'pubes_problem'
-			
-			gs'sex_ev_pillow_talk', 'pubes_other_lovers'
-		end
-	elseif $pube_style['word'] = 'stubble':
-		if $npc_like_pubestyle[$boy] = 'shaved':
-			!! this determines if you''ve already had this conversation before
-			'"You forget to shave today?" <<$npc_firstname[$boy]>> says eyeing your stubbly pussy.'
-			gs'sex_ev_pillow_talk', 'boy_likes_pubes2'
-		else
-			'"Looks like someone forgot to shave today," <<$npc_firstname[$boy]>> says eyeing your stubbly pussy.'
-			act'Forgot':
-				cla
-				act'Shrug':
-					cla & *nl
-					'"Yeah," you say with a shrug. "Happens sometimes. What of it?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'Annoyance':
-					cla & *nl
-					'"Yeah," you say, drawing your eyebrows together in irritation. "I forgot. So what? Got a problem with that?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-			end
-			
-			act'Growing it out':
-				cla & *nl
-				'"No I didn''t," you reply. "I''m growing it out. But you gotta go through stubble to get to hair."'
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			act'No time':
-				cla & *nl
-				'"Wanted to but I didn''t have time this morning," you reply.'
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			act'I''m lazy':
-				sex_ev['lazy_shave'] = 1
-				cla & *nl
-				if pubestyle = 11:
-					'"I''m just lazy," you sigh. "Too much work to keep it smooth down there all the time. I''ll do it when it gets to be too annoying. Why do you ask?"'
-				else
-					'"I''m just lazy," you sigh. "Didn''t feel like doing it today. Why do you ask?"'
-				end
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			if model['status'] = 1:
-				act'It''s for work':
-					cla & *nl
-					'"It''s for work," you shrug. "I''m a model, so it''s better to keep it shaved."'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			
-			gs'sex_ev_pillow_talk', 'pubes_other_lovers2'
-		end
-	elseif $pube_style['word'] = 'trimmed':
-		if $npc_like_pubestyle[$boy] = $pube_style['word']:
-			!! ^^ this determines if you''ve already had this conversation before
-			if $npc_know_pubeshape[$boy] = $pube_style['shape']:
-				'"I still can''t get over how sexy your bush is," <<$npc_firstname[$boy]>> says, looking admiringly at your neatly trimmed pussy hair.'
-				gs'sex_ev_pillow_talk', 'boy_likes_pubes2'
-			else
-				'"Did you do something new down there?" <<$npc_firstname[$boy]>> asks, looking at your <<$pube_style[''shape'']>>-shaped pubic hair.'
-				gs'sex_ev_pillow_talk', 'changed_pube_style'
-			end
-		else
-			'"I see you keep it trimmed down there," he says, looking at your neatly maintained pubic hair.'
-			act'I like it this way':
-				sex_ev['like_pubes'] = 1
-				cla
-				act'It''s feels good':
-					cla & *nl
-					'"I like it tidy down there," you say. "It feels better than full bush. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s classy':
-					cla & *nl
-					'"I like it tidy down there," you say. "I think it''s classier to have some hair down there without going full bush. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s sexy':
-					cla & *nl
-					'"I like it tidy down there," you say. "Makes me feel sexy. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			
-			if model['status'] = 1:
-				act'It''s for work':
-					cla & *nl
-					'"It''s for work," you shrug. "I''m a model, so it''s better to keep things tidy between the legs."'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			gs'sex_ev_pillow_talk', 'pubes_problem'
-			
-			gs'sex_ev_pillow_talk', 'pubes_other_lovers'
-		end
-	elseif $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
-	!! full bush talk
-	!! find real number later
-		if $npc_like_pubestyle[$boy] = $pube_style['word']:
-			!! this determines if you''ve already had this conversation before
-			'"I still can''t get over how sexy your bush is," <<$npc_firstname[$boy]>> says, looking admiringly at your furry pussy.'
-			gs'sex_ev_pillow_talk', 'boy_likes_pubes2'
-		else
-			'"So, you don''t shave?" <<$npc_firstname[$boy]>> asks, looking at your furry pussy.'
-			act'I like it this way':
-				sex_ev['like_pubes'] = 1
-				cla
-				act'It''s feels good':
-					cla & *nl
-					'"I like it this way," you say. "There''s just something comfortable about having a full bush between my legs. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s classy':
-					cla & *nl
-					'"I like it this way," you say. "I think it''s classy to go full bush instead of shaving it off. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-				
-				act'It''s sexy':
-					cla & *nl
-					'"I like it this way," you say. "I think bush is sexy. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-			
-			act'Lazy':
-				sex_ev['lazy_shave'] = 1
-				cla & *nl
-				if pubestyle = 10:
-					'"I''m just lazy," you shrug. "I''ll trim it back if it starts getting out of hand, but it''s too much hassle to maintain a landing strip or anything like that. Why do you ask?"'
-				else
-					'"I''m just lazy," you shrug. "It''s too much trouble to maintain. Easier to just let it grow. Why do you ask?"'
-				end
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			act'Hate shaving':
-				sex_ev['lazy_shave'] = 1
-				cla & *nl
-				if pubestyle = 10:
-					'"I hate shaving," you sigh. "I''ll trim it back if it starts getting out of hand, but it''s such a pain in the ass to do anything more than that. Why do you ask?"'
-				else
-					'"I hate shaving," you sigh. "It''s such a pain in the ass. Can''t stand it. Easier to just let it grow. Why do you ask?"'
-				end
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-			
-			gs'sex_ev_pillow_talk', 'pubes_young'
-			
-			gs'sex_ev_pillow_talk', 'pubes_problem'
-			
-			gs'sex_ev_pillow_talk', 'pubes_other_lovers'
-						
-			if pubestyle = 10:
-				act'Just trim':
-					cla & *nl
-					'"I just trim," you sigh. "Don''t really like going ''full jungle'' down there, but don''t really like shaving either. Why do you ask?"'
-					gs'sex_ev_pillow_talk', 'boy_pubes_response'
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'boy_pubes_response':
-	if pcs_pubes >= 4 and npc_bush_pref[$boy] = 1:
-		'"You''d look super hot if you shaved it clean," he says.'
-		gs'sex_ev_pillow_talk', 'boy_asks_cleanshave'
-	elseif ($pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed'):
-		if npc_bush_pref[$boy] = 2:
-			'"Ever considered trimming it down?"'
-			gs'sex_ev_pillow_talk', 'boy_asks_trim'
-		elseif npc_bush_pref[$boy] = 3:
-			'"I think it''s sexy too," he grins. "Too many girls feel peer pressured into shaving it off, but I love a nice full bush."'
-			gs'sex_ev_pillow_talk', 'boy_likes_pubes'
-		end
-	elseif $pube_style['word'] = 'trimmed':
-		if npc_bush_pref[$boy] = 2:
-			'"I think it''s hot," <<$npc_firstname[$boy]>> grins. "I love it when a girl knows how to take care of her bush."'
-			gs'sex_ev_pillow_talk', 'boy_likes_trimmed'
-		elseif npc_bush_pref[$boy] = 3:
-			'"Ever considered letting it grow out more?"'
-			gs'sex_ev_pillow_talk', 'boy_asks_bush'
-		end
-	elseif pcs_pubes < 4:
-		if npc_bush_pref[$boy] = 1:
-			'"I think it''s hot," he grins. "No one likes to find a gorilla between a girl''s legs. Clean-shaven is the best."'
-			gs'sex_ev_pillow_talk', 'boy_likes_pubes2'
-		elseif npc_bush_pref[$boy] = 2:
-			'"Ever considered letting it grow out a little?"'
-			gs'sex_ev_pillow_talk', 'boy_asks_trim'
-		elseif npc_bush_pref[$boy] = 3:
-			'"Ever considered letting it grow out?"'
-			gs'sex_ev_pillow_talk', 'boy_asks_bush'
-		end
-	else
-		'Bug report: boy_pubes_response dead-end'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	if npc_bush_pref[$boy] = 0:
-		$npc_like_pubestyle[$boy] = 'none'
-		'"Some girls shave, some don''t. Some guys want it one way, other guys another. Me? I don''t care if it''s more like an apple, a kiwi, or a coconut," he laughs aloud. "I just like pussy."'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-end
-
-if $ARGS[0] = 'dont_shave_like_talk':
-	
-end
-
-if $ARGS[0] = 'boy_asks_cleanshave':
-	act'No way':
-		cla & *nl
-		if sex_ev['like_pubes'] = 1:
-			'"No way," you say, giving him a look. "I already told you, I like it this way. I''m not shaving it just for you."'
-		elseif sex_ev['lazy_shave'] = 1:
-			'"No way," you say, giving him a look. "If I''m already too lazy to do it for me, what makes you think I''m going to do it for you?"'
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'You think I should?':
-		cla & *nl
-		'"You think I should?" you ask him, looking down and inspecting your pussy.'
-		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy without any hair down there. Just your bare beautiful pussy lips on display."'		
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	act'You''d like that?':
-		cla & *nl
-		'"You''d like it like that?" you ask, looking down and inspecting your pussy.'
-		'"Yeah," <<$npc_firstname[$boy]>> says. "I''d really love it if you went full clean shave. It''d be so hot."'		
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	gs'sex_ev_pillow_talk', 'annoyed_shave'
-	
-	if pubestyle = 10:
-		act'I''ll get to it later':
-			cla & *nl
-			'"Yeah, yeah," you wave your hand absently. "I''ll get to it eventually."'
-		end
-	end
-end
-
-if $ARGS[0] = 'boy_asks_trim':
-	act'No':
-		cla & *nl
-		if sex_ev['like_pubes'] = 1:
-			'"Not really," you shrug. "I already told you, I like it this way. Why would I consider doing anything different?"'
-		elseif sex_ev['lazy_shave'] = 1:
-			'"No way," you say, giving him a look. "If I''m already lazy about it, what makes you think I''m going to do it for you?"'
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'You think I should?':
-		cla & *nl
-		if pcs_pubes < 4:
-			'"You think I should?" you ask him, looking down and inspecting your smooth pussy.'
-			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you had a bit of hair down there. Not a full bush or anything like that, but just a landing strip or something."'
-		elseif $pube_style['word'] = 'stubble':
-			'"You think I should?" you ask him, looking down and inspecting your stubbly pussy.'
-			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you had a bit of hair down there. Not a full bush or anything like that, but just a landing strip or something."'
-		else
-			'"You think I should?" you ask him, looking down and inspecting your bush.'
-			'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you trimmed it back a little."'
-		end
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	act'You''d like that?':
-		cla & *nl
-		'"You''d like it like that?" you ask, looking down and inspecting your bush.'
-		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy if you trimmed it back a little. It''d be so hot."'		
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	gs'sex_ev_pillow_talk', 'annoyed_shave'
-end
-
-if $ARGS[0] = 'boy_asks_bush':
-	act'No':
-		cla & *nl
-		if sex_ev['like_pubes'] = 1:
-			'"Not really," you shrug. "I already told you, I like it this way. Why would I consider doing anything different?"'
-		else
-			'"Not really," you say, giving him a look. "What makes you think I''d grow a bush just for you?"'
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'You think I should?':
-		cla & *nl
-		if pcs_pubes < 4:
-			'"You think I should?" you ask him, looking down and inspecting your smooth pussy.'
-		elseif $pube_style['word'] = 'stubble':
-			'"You think I should?" you ask him, looking down and inspecting your stubbly pussy.'
-		else
-			'"You think I should?" you ask him, looking down and inspecting your pubic hair.'
-		end
-		'"Yeah," <<$npc_firstname[$boy]>> says. "I think you''d look super sexy with a full bush."'
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	act'You''d like that?':
-		cla & *nl
-		if pcs_pubes < 4:
-			'"You''d like it like that?"" you ask him, looking down and inspecting your smooth pussy.'
-		elseif $pube_style['word'] = 'stubble':
-			'"You''d like it like that?" you ask him, looking down and inspecting your stubbly pussy.'
-		else
-			'"You''d like it like that?" you ask him, looking down and inspecting your pubic hair.'
-		end
-		'"Yeah," <<$npc_firstname[$boy]>> says. "I''d love it if you went full bush."'
-		gs'sex_ev_pillow_talk', 'change_pubes_for_boy'
-	end
-	
-	gs'sex_ev_pillow_talk', 'annoyed_shave'
-end
-
-if $ARGS[0] = 'change_pubes_for_boy':
-	act'I''ll think about it':
-		npc_shave_think[$boy] = daystart
-		cla & *clr
-		'<center><video autoplay loop src="images/shared/sex/after/pillow_talk3.mp4"></video></center>'
-		'"I''ll think about it," you say. "But no promises."'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'Sure':
-		npc_shave_promise[$boy] = daystart
-		cla & *nl
-		'"Sure," you smile at <<$npc_firstname[$boy]>>. "I could give it a try..."'
-		'<<$npc_firstname[$boy]>> grins back eagerly at you.'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'I guess I could':
-		npc_shave_promise[$boy] = daystart
-		cla & *nl
-		'"Well..." you say. "I guess I could give it a try..."'
-		'<<$npc_firstname[$boy]>> grins back eagerly at you.'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'For you (hesitant)':
-		npc_shave_promise[$boy] = daystart
-		cla & *nl
-		'"Well..." you say. "I guess I could try it? For you."'
-		'You punctuate your promise with an affectionate smile, returned with an eager grin from <<$npc_firstname[$boy]>>.'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'For you (affectionate)':
-		npc_shave_promise[$boy] = daystart
-		cla & *nl
-		'"If it will make you happy, then of course I''ll do it."'
-		'You smile affectionately at <<$npc_firstname[$boy]>>, who returns it with an eager grin.'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-end
-
-if $ARGS[0] = 'annoyed_shave':
-	act'Get annoyed':
-		cla & *nl
-		if sex_ev['fuck_count'] > 0:
-			if sex_ev['like_pubes'] = 1:
-				'"No?" you say, glaring at him. "I just told you I like it this way and you didn''t seem to have a problem fucking it a few minutes ago."'
-			elseif sex_ev['lazy_shave'] = 1:
-				'"No?" you say, glaring at him. "You didn''t seem to have a problem fucking it a few minutes ago, so why should I?"'
-			end
-		else
-			if sex_ev['like_pubes'] = 1:
-				'"No?" you say, glaring at him. "I just told you I like it this way and it didn''t seem to be a problem with making you hard a few minutes ago."'
-			elseif sex_ev['lazy_shave'] = 1:
-				'"No?" you say, glaring at him. "It didn''t seem to be a problem with making you hard a few minutes ago, so why should I?"'
-			end
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-end
-
-if $ARGS[0] = 'boy_likes_pubes':
-	if $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
-		$npc_like_pubestyle[$boy] = pubestyle
-		act'Good to know':
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/after/pillow_talk3.mp4"></video></center>'
-			'"Well good to know," you laugh. "I''ll keep it in mind next time I look at a razor."'
-			gs'sex_ev_pillow_talk', 'topic_route'
-		end
-		
-		act'Glad you think so':
-			cla & *nl
-			'"I''m glad you think so. It''s always nice to know someone thinks you''re sexy," you say, giving him a soft smile.'
-			gs'sex_ev_pillow_talk', 'topic_route'
-		end
-		
-		act'Glad I have your permission (sarcastic)':
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/after/pillow_talk_eyeroll.mp4"></video></center>'
-			'"Well I''m glad I have your permission to shave the way I like it," you huff, acerbically rolling your eyes.'
-			if npc_argumentative[$boy] = 1:
-				npc_rel[$boy] -= 2
-				'"What the fuck is your problem?" <<$npc_firstname[$boy]>> growls. "I was trying to pay you a compliment!"'
-				act'Apologize':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'You immediately feel bad and look back at him with a guilty expression on your face.'
-					'"I''m sorry," you say. "I... I don''t know why I snapped at you like that. You''re right. I should be happy you think I''m sexy."'
-					'You give him an apologetic smile and though <<$npc_firstname[$boy]>> still seems a little annoyed with you, he mostly calms down as well.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'I didn''t ask!':
-					sex_ev['angry_after'] = 1
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'"Well I didn''t ask for your opinion!" you snap back. "It''s my body and my bush, I can do whatever I want without hearing how you feel about it!"'
-					*nl
-					'<i>Ugh! Men!</i> you grumble internally.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-			else
-				'"I didn''t mean it like that," <<$npc_firstname[$boy]>> says, looking bemused. "I just wanted to let you know I think you''re hot."'
-				act'Apologize':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'You immediately feel guilty and look back at him.'
-					'"I''m sorry," you say. "I... I don''t know why I snapped at you like that. That was... uncalled for..."'
-					'You give him an embarrassed smile and <<$npc_firstname[$boy]>> smiles back, letting you know he accepts your apology.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'I didn''t ask for a man''s opinion!':
-					sex_ev['angry_after'] = 1
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'"Well I didn''t ask for your opinion!" you snap back. "It''s my body and my bush, I can do whatever I want without hearing how a man feels about it!"'
-					*nl
-					'<i>Ugh! Men!</i> you grumble internally.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-			end
-		end
-	else
-		
-	end
-end
-
-if $ARGS[0] = 'boy_likes_pubes2':
-	act'Thanks':
-		cla & *nl
-		'"Thanks," you smile back. "It''s always nice to be complimented."'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'I like it too':
-		cla & *nl
-		'"Me too," you smile back before taking an admiring look yourself. "I love the look of my pussy."'
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'Don''t do it for you':
-		cla & *nl
-		'"It''s not like I do it for you," you say, brushing his compliment aside and rolling your eyes.'
-		if npc_argumentative[$boy] = 1:
-			'"Way to be a bitch about it," he mumbles under his breath.'
-		else
-			'"Doesn''t mean I can''t appreciate it for myself," he grins back.'
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-	
-	act'Compliment his cock':
-		npc_rel[$boy] += 2
-		cla & *nl		
-		if $npc_dick_desc[$boy] = 'tiny':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "For a guy with a tiny dick, you sure know how to use it."'
-		elseif $npc_dick_desc[$boy] = 'short':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "It''s pretty small, but you sure know how to use it."'
-		elseif $npc_dick_desc[$boy] = 'chode':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "You may be small, but so you''re <i>so</i> thick. I love feeling you stretch me out."'
-		elseif $npc_dick_desc[$boy] = 'skinny':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "For a guy with such a skinny dick, you sure know how to use it."'
-		elseif $npc_dick_desc[$boy] = 'normal':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his flaccid manhood. "You fill me up just right."'
-		elseif $npc_dick_desc[$boy] = 'thick':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood. Even flaccid, its girth is impressive. "You''re <i>so</i> big!"'
-		elseif $npc_dick_desc[$boy] = 'long':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its length down his thighs even when flaccid. "It''s <i>so</i> long. All the other guys I sleep with can''t get nearly as deep as you can."'
-		elseif $npc_dick_desc[$boy] = 'huge':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, impressive in its size even flaccid. "It''s <i>huge</i>! And I love how deep I can feel you inside me."'
-		elseif $npc_dick_desc[$boy] = 'enormous':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, impressive in its size even flaccid. "You''re packing some serious firepower. I can barely even fit you inside me!"'
-		elseif $npc_dick_desc[$boy] = 'lengthy':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs even when flaccid. "I can practically feel you in my stomach when you''ve got the whole thing inside me."'
-		elseif $npc_dick_desc[$boy] = 'gigantic':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs even when flaccid. "I can practically feel you in my stomach when you''ve got the whole thing inside me."'
-		elseif $npc_dick_desc[$boy] = 'monster':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his monstrously large manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs with a girth nearly as thick as your wrist even flaccid. "It''s like you''ve got an arm for a dick. I didn''t even know cocks could get that big!"'
-		end
-		gs'sex_ev_pillow_talk', 'topic_route'
-	end
-end
-
-if $ARGS[0] = 'pubes_young':
-	act'Makes me feel too young':
-		cla & *nl
-		if $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
-			'"I tried it once but I didn''t like it," you grimace. "Made me feel like a little girl. It was weird. I prefer to have a full bush compared to that. Why do you ask?"'
-		else
-			'"I tried it once but I didn''t like it," you grimace. "Made me feel like a little girl. It was weird. So now I always make sure I have some hair down there. Why do you ask?"'
-		end
-		gs'sex_ev_pillow_talk', 'boy_pubes_response'
-	end
-end
-
-
-if $ARGS[0] = 'pubes_problem':
-	act'Got a problem with that?':
-		cla & *nl
-		if $pube_style['word'] = 'shaved':
-			'"Got a problem with my pussy?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
-!!			gs'sex_ev_pillow_talk', 'pubes_problem2'
-		elseif $pube_style['word'] = 'bush' or $pube_style['word'] = 'untrimmed':
-			'"Got a problem with my bush?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
-!!{			if npc_bush_pref[$boy] = 1:
-				'"You''d look super sexy if you shaved it all off," he says.'
-				gs'sex_ev_pillow_talk', 'boy_asks_cleanshave'
-			elseif npc_bush_pref[$boy] = 2:
-				'"Ever considered trimming it down?" he asks.'
-				gs'sex_ev_pillow_talk', 'boy_asks_trim'
-			elseif npc_bush_pref[$boy] = 3:
-				'"I think it''s sexy too," he grins. "Too many girls feel peer pressured into shaving it off, but I love a nice full bush."'
-				gs'sex_ev_pillow_talk', 'boy_likes_pubes'
-			end}
-		else
-			'"Got a problem with my pubes?" you ask, giving <<$npc_firstname[$boy]>> a hard side-eye.'
-		end
-		gs'sex_ev_pillow_talk', 'boy_pubes_response'
-	end
-end
-
-if $ARGS[0] = 'pubes_problem_bush':
-	
-end
-
-
-if $ARGS[0] = 'pubes_other_lovers':
-	if $npc_like_pubestyle ! '':
-		act'My ex liked it':
-			cla & *nl
-			'"My ex preferred it this way," you shrug. "Why do you ask?"'
-			gs'sex_ev_pillow_talk', 'boy_pubes_response'
-		end
-		
-		if pcs_lover > 0 and pcs_lover - pcs_girlfriends > 0:
-			act'My boyfriend likes it':
-				cla & *nl
-				'"My boyfriend likes it this way," you shrug. "Why do you ask?"'
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-		end
-		
-		if pcs_girlfriends > 0:
-			act'My girlfriend likes it':
-				cla & *nl
-				'"My girlfriend likes it this way," you shrug. "Why do you ask?"'
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-		end
-		
-		act'My last fuckbuddy liked it':
-			cla & *nl
-			'"A fuckbuddy I used to have liked it this way," you shrug. "Why do you ask?"'
-			gs'sex_ev_pillow_talk', 'boy_pubes_response'
-		end
-		
-		
-		if arrsize('$fuckbuddy') > 1:
-			act'My other fuckbuddy likes it':
-				cla & *nl
-				'"My other fuckbuddy likes it this way," you shrug. "Why do you ask?"'
-				gs'sex_ev_pillow_talk', 'boy_pubes_response'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'pubes_other_lovers2':
-
-end
-
-if $ARGS[0] = 'boy_condom_rule':
-	if sex_ev['condom'] ! 1:
-	
-	end
-end
-
-if $ARGS[0] = 'boy_no_kids':
-	if sex_ev['no_kids'] = 1 and npc_know_no_kids = 1:
-		'"So you don''t want kids?" <<$npc_firstname[$boy]>> asks, looking over at you.'
-		act'Not right now':
-			cla & *nl
-			'"Not right now," you shake your head. "Maybe one day, but I''m not ready to be a mother. What about you?"'
-			if npc_childfree[$boy] = 1:
-				pc_know_childfree[$boy] = 1
-				'"I never want kids," he replies.'
-				act'Really?':
-					cla & *nl
-					'"Really?" you ask, sitting up to look at him with astonishment. "Never? Never ever?"'
-					'"Never ever ever," he says, grimacing. "I already hate other people''s kids. Why would I want to have any of my own?"'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'I get that':
-					cla & *nl
-					'"I get that," you nod back. "Parenthood isn''t for everyone."'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-			else
-				'"It wouldn''t be so bad, being a father," he replies. "Not sure about the when, but I think I''d really like to have a kid or two one day."'
-				act'Maybe one day':
-					cla & *nl
-					'"Maybe one day," you say again, shrugging.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'I get that':
-					cla & *nl
-					'"I get that," you nod back. "Might be nice to have someone to live for."'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-			end
-		end
-		
-		act'Never':
-			cla & *nl
-			'"Not now, not ever," you grimace. "Motherhood sounds... ugh."'
-			if npc_childfree[$boy] = 1:
-				'"I feel the same way," he says, nodding. "I never want to be a parent. That sounds awful."'
-				gs'sex_ev_pillow_talk', 'topic_route'
-			else
-				'"Don''t you think you''d get lonely?" <<$npc_firstname[$boy]>> asks. "Y''know, knowing that you wouldn''t have anything to live for except yourself when you get old?"'
-				act'I guess...':
-					cla & *nl
-					'"I guess, maybe," you mumble. "I don''t know. Why does everything have to be about procreation? Why can''t I just live my life?"'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'I''ll have a spouse':
-					cla & *nl
-					'"I''ll get married," you shrug. "Why would I be lonely then?"'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'Play it off':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'"That''s what I have guys like you for," you smirk. "To fuck me when I get lonely."'
-					*nl
-					'<<$npc_firstname[$boy]>> can tell you just sidestepped the question, but doesn''t press the topic any further.'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-			end
-		end
-	end
-end
-
 
 if $ARGS[0] = 'angry_end':
 	cla & *nl

locations/sex_ev_pillow_talk2.qsrc

@@ -82,10 +82,10 @@ if $ARGS[0] = 'fav_body_part':
 	!!			if npc_humor[$boy] = 2:
 	!!				'"Your tits," he grins, bending his head and popping your nipple into his mouth for a gentle suckle. "Definitely your tits."'
 	!!			else
-					'"Your breasts," he smiles, glancing down to admire them.'
+					'"Your tits obviously," he smiles, glancing down to admire them.'
 	!!			end
 				
-				act'Really?':
+				act'Really? (insecure)':
 					cla & *clr
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
 					if pcs_cupsize <= 15:
@@ -137,8 +137,8 @@ if $ARGS[0] = 'fav_body_part':
 				
 				act'I like them too':
 					cla & *nl
-					'"Me too," you grin. "I love my boobs!"'
-					'"They''re the best," he nods, bowing his head to kiss one.'
+					'"Me too," you grin. "I think they''re my best asset."'
+					'"Mhmm..." He nods and bows his head to kiss your nipple.'
 					gs'sex_ev_pillow_talk2', 'small_talk'
 				end
 			elseif $npc_fav_body_part[$boy] = 'ass':
@@ -148,7 +148,7 @@ if $ARGS[0] = 'fav_body_part':
 					'"I love your ass," he smiles, running his hand up your thigh to give your bottom a firm squeeze.'
 				end
 				
-				act'Really?':
+				act'Really? (insecure)':
 					cla & *clr
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
 					'"Really?" you ask, surprised. "My ass? Not my boobs? Or my pussy?"'
@@ -181,13 +181,13 @@ if $ARGS[0] = 'fav_body_part':
 				end
 				
 			elseif $npc_fav_body_part[$boy] = 'pussy':
-				gs 'arousal', 'foreplay', 1, 'no_orgasm_msg'
+				gs 'arousal', 'foreplay', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs 'stat'
 				'"I love your pussy," he says, his fingers slowly running up the inside of your thigh to caress your lower lips.'
-				act'Really?':
+				act'Really? (insecure)':
 					cla & *clr
-					gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
-					gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+					gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+					gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
 					'"You really think so?" you ask. "Not my boobs or my ass or-"'
@@ -220,13 +220,13 @@ if $ARGS[0] = 'fav_body_part':
 					gs'sex_ev_pillow_talk2', 'small_talk'
 				end
 				
-				if stat['think_virgin'] ! 1 or sex_ev['fuck_count'] > 0 or npc_fuck_times[$boy] > 0:
+				if stat['think_virgin'] ! 1 and (sex_ev['fuck_count'] > 0 or npc_fuck_times[$boy] > 0):
 					act'You just like fucking it':
 						cla & *nl
 						'"You''re just saying that because you get to fuck it," you smirk teasingly.'
 						if npc_pussyeater[$boy] = 1 and (sex_ev['kuni'] > 0 or npc_kuni_times[$boy]):
-							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
-							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 							gs 'stat'
 							'"That''s not true," he smirks back. "I love eating it too."'
 							if cum_loc['vagina'] > 0:
@@ -242,13 +242,13 @@ if $ARGS[0] = 'fav_body_part':
 						end
 						gs'sex_ev_pillow_talk2', 'small_talk'
 					end
-				elseif sex_ev['virgin'] = 1:
+				elseif sex_ev['virgin'] = 1 and sex_ev['fuck_count'] > 0:
 					act'You''re just saying that because you deflowered me':
 						cla & *nl
-						'"You''re just saying that because I was a virgin and you''re the first one who got to fuck it," you smirk teasingly.'
+						'"You''re just saying that because you''re the first one who got to fuck it," you smirk teasingly.'
 						if npc_pussyeater[$boy] = 1 and (sex_ev['kuni'] > 0 or npc_kuni_times[$boy]):
-							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
-							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 							gs 'stat'
 							'"That''s not true," he smirks back. "I love eating it too."'
 							if cum_loc['vagina'] > 0:
@@ -269,8 +269,8 @@ if $ARGS[0] = 'fav_body_part':
 						cla & *nl
 						'"You''re just saying that because you want to fuck me," you smirk teasingly.'
 						if npc_pussyeater[$boy] = 1 and (sex_ev['kuni'] > 0 or npc_kuni_times[$boy]):
-							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
-							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+							gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+							gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 							gs 'stat'
 							'"Not just that," he smirks back. "I like the taste."'
 							if cum_loc['vagina'] > 0:
@@ -287,8 +287,8 @@ if $ARGS[0] = 'fav_body_part':
 					end
 				end
 			else
-				gs 'arousal', 'foreplay', 1, 'no_orgasm_msg'
-				gs 'arousal', 'foreplay', -5, 'no_orgasm_msg'
+				gs 'arousal', 'foreplay', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+				gs 'arousal', 'foreplay', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs 'stat'
 				!! $npc_fav_body_part[$boy] = 'thighs':
 				'"Your legs," he says, slowly caressing his fingers up and down the curve of your thigh. It''s tantalizing, the way he dances the tips across your skin, sending goosebumps wherever they go.'
@@ -913,19 +913,19 @@ if $ARGS[0] = 'show_dance_end3':
 				act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
 				act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
 			else
-				act'Get fucked':gs'sex_ev_miss', 'miss_goto'
+				gs'sex_ev_miss', 'miss_goto'
 			end
 		elseif sex_ev['position_rand'] = 2 or $npc_fav_pos[$boy] = 'doggy':
 			!! doggy
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
 			'<<$npc_firstname[$boy]>> flips you onto your stomach, pulls you up by the hips, and lines his cock up with your pussy.'
-			act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+			gs'sex_ev_doggy', 'doggy_goto'
 		elseif sex_ev['position_rand'] = 3:
 			!! blowjob
 			'<<$npc_firstname[$boy]>> positions your head between his legs, pushing his manhood towards your face.'
 			gs 'sex_ev_foreplay', 'bj_ask2'
 		elseif sex_ev['position_rand'] = 4 and (cum_loc['vagina'] = 0 or npc_pussyeater[$boy] = 1):
-			gs 'arousal', 'foreplay', -5, 'no_orgasm_msg'
+			gs 'arousal', 'foreplay', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			'<<$npc_firstname[$boy]>> throws you on your back and starts lightly kissing your stomach, sending shivers across your skin, as each kiss goes lower than the last, slowly heading down to your pussy.'
 			gs 'sex_ev_foreplay', 'kuni_start'
 		else
@@ -1082,6 +1082,38 @@ if $ARGS[0] = 'dick_compliment':
 			end
 		end
 		
+		if ($npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster') and ($npc_rel_type[$boy] ! 'boyfriend' or $npc_rel_type[$boy] ! 'husband'):
+			act'Its ruining other guys for you':
+				cla & *clr
+				gs'sex_ev_pillow_talk2', 'dick_grab_image'
+				'"This thing is ruining sex with other guys for me," you say, hungrily staring at <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> manhood.'
+				'"Yeah?" he says with a smug grin.'
+				'"You''re so big, other dicks feel like fingers inside me," you say with a rueful expression. "I feel <i>empty</i> by anything smaller than this."'
+				gs'sex_ev_pillow_talk2', 'dick_talk_topics'
+			end
+			
+			if pcs_lover - pcs_girlfriends > 0:
+				act'Ruining sex with your boyfriend':
+					cla & *clr
+					gs'sex_ev_pillow_talk2', 'dick_grab_image'
+					'"This thing is ruining sex with my boyfriend," you say ruefully.'
+					'"Yeah?" <<$npc_firstname[$boy]>> says with a smug grin.'
+					'"You''re <i>way</i> bigger," you say, staring hungrily at his <<$npc_dick_desc[$boy]>> manhood. "It''s like he''s fucking me with a toothpick in comparison..."'
+					gs'sex_ev_pillow_talk2', 'dick_talk_topics'
+				end
+			end
+			
+			if pcs_girlfriends > 0:
+				act'Ruining sex with your girlfriend':
+					cla & *clr
+					gs'sex_ev_pillow_talk2', 'dick_grab_image'
+					'"This thing is ruining sex with my girlfriend," you say ruefully.'
+					'"Yeah?" <<$npc_firstname[$boy]>> says with a smug grin.'
+					'"Now when we sleep together, all I can think about is how much I want this cock inside me," you say, staring hungrily at his <<$npc_dick_desc[$boy]>> manhood. "Lesbian sex is <i>so</i> unsatisfying now..."'
+					gs'sex_ev_pillow_talk2', 'dick_talk_topics'
+				end
+			end
+		end
 	end
 end
 
@@ -1322,7 +1354,7 @@ if $ARGS[0] = 'wakeup_sex_late_for_school':
 				act'I need to hurry':
 					cla & *nl
 					'"I gotta get out of here," you say. "I can''t afford to be absent too many times."'
-					gs'sex_ev_morning', 'wakeup2'
+					gs'sex_ev_morning', 'morning_menu2'
 				end
 				
 				act'Worth it':
@@ -1335,7 +1367,7 @@ if $ARGS[0] = 'wakeup_sex_late_for_school':
 					act'I''m gonna get kicked out of school':
 						cla & *nl
 						'"Fuck!" you swear again. "If I don''t make it by the end of first period, I''m gonna get expelled!"'
-						gs'sex_ev_morning', 'wakeup2'
+						gs'sex_ev_morning', 'morning_menu2'
 					end
 				end				
 			end
@@ -1347,7 +1379,6 @@ if $ARGS[0] = 'wakeup_sex_late_for_school':
 					else
 						'"I don''t even have time to shower and clean my pussy out," you say. "Your cum is going to be running down my legs all day."'
 					end
-					'You give <<$npc_firstname[$boy]>> a wry smirk.'
 					gs'sex_ev_pillow_talk2', 'morning_sex_talk'
 				end
 			end
@@ -1504,4 +1535,12 @@ if $ARGS[0] = 'share_life_single':
 	end
 end
 
+if $ARGS[0] = 'sugar_daddy_talk':
+	''
+end
+
+if $ARGS[0] = 'sugar_daddy_talk2':
+	'"What have you been doing with the money?"'
+end
+
 --- sex_ev_pillow_talk2 ---------------------------------

locations/sex_ev_reactions_creampie.qsrc

@@ -0,0 +1,2771 @@
+# sex_ev_reactions_creampie
+
+!! -------------------- creampie reactions --------------------------------
+
+if $ARGS[0] = 'creampie_react':
+	if sex_ev['cock_inserted'] = 1:gs'sex_ev_cum', 'cum_inside_pull_away'
+	if $sex_ev['last_cum'] = 'creampie':
+!!		if sex_ev['creampie_surprise'] = 1:
+		
+		if sex_ev['creampie_ask'] = 1 and npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] < 3 and npc_free_creampies[$boy] = 0:
+			gs'sex_ev_reactions_creampie', 'thought_no_creampies'
+		else
+			if sex_ev['reluctant_creampie'] ! 1 and sex_ev['unhappy_creampie'] ! 1:
+				act'Happy creampie':cla & gs'sex_ev_reactions_creampie', 'creampie_happy'
+			end
+			
+			if sex_ev['unhappy_creampie'] ! 1:
+				act'Conflicted creampie':cla & gs'sex_ev_reactions_creampie', 'creampie_conflicted'
+			end
+			
+			act'Unhappy creampie':cla & gs'sex_ev_reactions_creampie', 'creampie_unhappy'
+			gs'sex_ev_reactions_creampie', 'creampie_cum_together_react'
+			gs'sex_ev_talk', 'free_creampies'
+			gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+			gs'sex_ev_reactions_creampie', 'did_you_come_inside'
+			gs'sex_ev_reactions_creampie', 'have_plan_b2'
+			gs'sex_ev_reactions', 'cum_already'
+		end
+	end
+end
+
+if $ARGS[0] = 'first_creampie':
+	if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) = 1:
+		act'First creampie':
+			npc_first_creampie[$boy] = 1
+			cla
+			act'Is that what it feels like?':
+				cla & *clr
+				if sex_ev['cock_inserted'] = 1:
+					if $sex_ev['position'] = 'miss':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+					elseif $sex_ev['position'] = 'doggy':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					elseif $sex_ev['position'] = 'cowgirl':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+					end
+				else
+					if $sex_ev['position'] = 'miss':
+						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+					elseif $sex_ev['position'] = 'doggy':
+						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+					elseif $sex_ev['position'] = 'cowgirl':
+						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+					end
+				end
+				if sex_ev['orgasm'] < orgasm:
+					'"Is... is that what it feels like when a guy comes inside...?" you stammer breathlessly.'
+				else
+					'"Is... is that what it feels like when a guy comes inside...?" you gasp in shock.'
+				end
+				if stat['think_virgin'] = 0:
+					'"Wait, was that your first creampie?" <<$npc_firstname[$boy]>> asks.'
+					act'"You''re my first"':
+						cla & *clr
+						if sex_ev['cock_inserted'] = 1:
+							if $sex_ev['position'] = 'miss':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+							elseif $sex_ev['position'] = 'doggy':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+							elseif $sex_ev['position'] = 'cowgirl':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+							end
+						else
+							if $sex_ev['position'] = 'miss':
+								'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+							elseif $sex_ev['position'] = 'doggy':
+								'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+							elseif $sex_ev['position'] = 'cowgirl':
+								'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+							end
+						end
+						'"Yeah," you nod, giving <<$npc_firstname[$boy]>> a warm smile. "You''re my first."'
+						if $npc_cum_pref[$boy] = 'creampie':
+							'"Careful," he smiles back at you. "You might get addicted."'
+						else
+							'He smiles back at you.'
+						end
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				elseif $npc_cum_pref[$boy] = 'creampie' or sex_ev['virgin_creampie_request'] = 1:
+					'"Yeah," he smiles back. "Feels pretty good doesn''t it?"'
+				else
+					'"Yeah. Did you like it?"'
+				end
+				if sex_ev['orgasm'] < orgasm:
+					'You nod back, too overwhelmed to be able to say anything else.'
+				else
+					act'Feels gross':
+						cla & *nl
+						'"Ugh," you grimace in disgust. "This might be one of the grossest things I''ve ever felt."'
+						gs 'sex_ev_sex', 'sex_end'
+					end
+					
+					act'Feels good':
+						cla & *nl
+						'"Yeah," you can''t help but smile back. "It feels <i>really</i> good..."'
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+			if stat['think_virgin'] = 0:
+				act'"You''re my first"':
+					cla & *clr
+					if sex_ev['cock_inserted'] = 1:
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+						end
+					else
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+						end
+					end
+					
+					if sex_ev['orgasm'] < orgasm:
+						'"Hey, can I tell you something?" you ask, breathing hard after your orgasm.'
+					else
+						'"Hey, can I tell you something?" you ask, giving <<$npc_firstname[$boy]>> a look.'
+					end
+					'"Sure," he says. "What is it?"'
+					'"I''ve never let a guy come inside me before," you smile back warmly. "You''re my first."'
+					gs 'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_safe_day':
+	if sex_ev['safe_day'] = 0 and sex_ev['probably_safe_day'] = 0 and sex_ev['danger_day'] = 0 and birth_control['think_safe'] ! 1 and sex_ev['ma_pill'] = 0 and sex_ev['plan_b_buy'] = 0 and npc_know_bc[$boy] ! 1:
+		if stat['safe_day'] = 1:
+			act'It''s a safe day':
+				sex_ev['safe_day'] = 1
+				cla
+				act'Reassurance':
+					cla & *clr
+					if sex_ev['cock_inserted'] = 0:
+						gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+						'"Don''t worry," you smile as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "It''s a safe day."'
+					else
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+							'"Don''t worry," you smile at <<$npc_firstname[$boy]>>, cupping his face. "It''s a safe day."'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+							'"Don''t worry," you smile at <<$npc_firstname[$boy]>> over your shoulder. "It''s a safe day."'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+							'"Don''t worry," you smile down at <<$npc_firstname[$boy]>>. "It''s a safe day."'
+						end
+					end
+					if $sex_ev['last_cum'] = 'broken_condom':
+						gs'sex_ev_cum', 'what_now'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+				
+				act'Lucky':
+					cla & *clr
+					if sex_ev['creampie_surprise'] = 1:
+						if sex_ev['cock_inserted'] = 0:
+							gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+							if $sex_ev['last_cum'] = 'broken_condom':
+								'"That was lucky," you smile as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "If a condom is going to break, it might as well be on a safe day."'
+							else
+								'"That was lucky," you smile as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "If you''re gonna come inside me by mistake, it might as well be on a safe day."'
+							end
+						else
+							if $sex_ev['position'] = 'miss':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+								'"Just count yourself lucky it was a safe day for me," you smile at <<$npc_firstname[$boy]>>.'
+							elseif $sex_ev['position'] = 'doggy':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+								'"Just count yourself lucky it was a safe day for me," you smile at <<$npc_firstname[$boy]>> over your shoulder.'
+							elseif $sex_ev['position'] = 'cowgirl':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+								'"Just count yourself lucky it was a safe day for me," you smile down at <<$npc_firstname[$boy]>>.'
+							end
+						end
+					else
+						sex_ev['creampie_allowance'] = 1
+						if sex_ev['cock_inserted'] = 0:
+							gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+							if $sex_ev['last_cum'] = 'broken_condom':
+								'"That was lucky," you smile as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "If a condom is going to break, it might as well be on a safe day."'
+							else
+								'"We''re in luck today," you smile as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "It''s a safe day, so you can come inside me as much as you want."'
+							end
+						else
+							if $sex_ev['position'] = 'miss':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+								'"We''re in luck today," you smile blissfully at <<$npc_firstname[$boy]>>. "It''s a safe day, so you can come inside me as much as you want."'
+							elseif $sex_ev['position'] = 'doggy':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+								'"We''re in luck today," you smile over your shoulder at <<$npc_firstname[$boy]>>. "It''s a safe day, so you can come inside me as much as you want."'
+							elseif $sex_ev['position'] = 'cowgirl':
+								'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+								'"We''re in luck today,"  you smile down at <<$npc_firstname[$boy]>>. "It''s a safe day, so you can come inside me as much as you want."'
+							end
+						end
+					end
+					if $sex_ev['last_cum'] = 'broken_condom' or sex_ev['promise_no_creampie'] = 1:
+						gs'sex_ev_cum', 'what_now'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+				
+				if mesec > 0:
+					cla & *clr
+					if sex_ev['cock_inserted'] = 0:
+						gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+						'"Don''t worry, I''m on my period," you say as <<$npc_firstname[$boy]>>''s pink-tinged cum trickles from your pussy. "I shouldn''t get pregnant."'
+					else
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say. "I shouldn''t get pregnant."'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say over your shoulder. "I shouldn''t get pregnant."'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say. "I shouldn''t get pregnant."'
+						end
+					end
+					if $sex_ev['last_cum'] = 'broken_condom' or sex_ev['promise_no_creampie'] = 1:
+						gs'sex_ev_cum', 'what_now'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+		elseif stat['probably_safe_day'] = 1:
+			act'It should be a safe day':
+				sex_ev['probably_safe_day'] = 1
+				cla
+				act'Reassurance':
+					cla & *clr
+					if sex_ev['cock_inserted'] = 0:
+						gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+						'"It should be safe today," you say as <<$npc_firstname[$boy]>>''s cum continues to trickle from your pussy. "I''m pretty sure I won''t get pregnant."'
+					else
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+							'"It should be safe today," you say. "I''m pretty sure I won''t get pregnant."'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+							'"It should be safe today," you say over your shoulder. "I''m pretty sure I won''t get pregnant."'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+							'"It should be safe today," you say. "I''m pretty sure I won''t get pregnant."'
+						end
+					end
+					if $sex_ev['last_cum'] = 'broken_condom' or sex_ev['promise_no_creampie'] = 1:
+						gs'sex_ev_cum', 'what_now'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+				
+				if mesec > 0:
+					cla & *clr
+					if sex_ev['cock_inserted'] = 0:
+						gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+						'"Don''t worry, I''m on my period," you say as <<$npc_firstname[$boy]>>''s pink-tinged cum trickles from your pussy. "I shouldn''t get pregnant."'
+					else
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say. "I shouldn''t get pregnant."'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say over your shoulder. "I shouldn''t get pregnant."'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+							'"Don''t worry, I''m on my period," you say. "I shouldn''t get pregnant."'
+						end
+					end
+					if $sex_ev['last_cum'] = 'broken_condom' or sex_ev['promise_no_creampie'] = 1:
+						gs'sex_ev_cum', 'what_now'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_happy':
+	act'Back': cla & gs'sex_ev_reactions', 'react_menu'
+	gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+	gs'sex_ev_reactions_creampie', 'feel_full'
+	gs'sex_ev_reactions_creampie', 'love_creampies'
+	gs'sex_ev_reactions_creampie', 'cum_together_kiss'
+	gs'sex_ev_reactions_creampie', 'creampie_apologize'
+	gs'sex_ev_reactions_creampie', 'already_creampied_me'
+	gs'sex_ev_reactions_creampie', 'thanks_for_asking'
+	gs'sex_ev_reactions_creampie', 'creampie_enjoy_that'
+	gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+	gs'sex_ev_reactions_creampie', 'pullout_game_tease'
+	gs'sex_ev_talk', 'free_creampies'
+	gs'sex_ev_reactions_creampie', 'have_plan_b2'
+end
+
+if $ARGS[0] = 'creampie_conflicted':
+	act'Back': cla & gs'sex_ev_reactions', 'react_menu'
+	gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+	gs'sex_ev_reactions_creampie', 'told_you_not_to_creampie'
+	gs'sex_ev_reactions_creampie', 'cum_together_no_bc1'
+	gs'sex_ev_reactions_creampie', 'pull-out_finish'
+end
+
+if $ARGS[0] = 'creampie_unhappy':
+	act'Back': cla & gs'sex_ev_reactions', 'react_menu'
+	gs'sex_ev_reactions_creampie', 'creampie_gross'
+	gs'sex_ev_reactions_creampie', 'creampie_ask_next_time_mad'
+	gs'sex_ev_reactions_creampie', 'cum_together_no_bc2'
+	gs'sex_ev_reactions_creampie', 'promised_no_creampie'
+end
+
+if $ARGS[0] = 'creampie_cum_together_react':
+	if sex_ev['came_together'] = 2:
+		act'Did we come together?':
+			sex_ev['came_together'] = 3
+			if sex_ev['did_we_cum_together'] = 1:
+				cla & *nl
+				'You nod hazily, mind still swimming from your orgasm.'
+			else
+				cla & *clr
+				if sex_ev['cock_inserted'] = 1:
+					if $sex_ev['position'] = 'miss':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+						'Did you...? did we...? together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
+					elseif $sex_ev['position'] = 'doggy':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+						'Your knees give out underneath you, falling down to the bed with <<$npc_firstname[$boy]>> on top of you.'
+						'Did you...? did we...? together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
+					elseif $sex_ev['position'] = 'cowgirl':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+						'You let yourself collapse on top of <<$npc_firstname[$boy]>>, feeling your breasts pressed against his chest, which rises and falls with the same laboured breathing as your own.'
+						'Did you...? did we...? together..?" you murmur. <<$npc_firstname[$boy]>> just nods.'
+					end
+				else
+					if $sex_ev['last_cum'] = 'creampie':
+						if $sex_ev['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+							'You lean back on the bed, letting <<$npc_firstname[$boy]>>''s thick cum drain from your pussy.'
+						elseif $sex_ev['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vagcreampie/doggy2.jpg"></center>'
+							'You lay down, letting your breasts smush into the mattress as you feel <<$npc_firstname[$boy]>>''s thick cum drain from your pussy.'
+						elseif $sex_ev['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/vagcreampie/cowgirl1.jpg"></center>'
+							'You lean back, sitting down between <<$npc_firstname[$boy]>>''s legs as you watch his thick cum drain from between yours.'
+						end
+					elseif $sex_ev['last_cum'] = 'condom':
+						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+						'You lean back on the bed, breathing hard as <<$npc_firstname[$boy]>> slowly flops down beside you.'
+					end
+					'"Did you...? did we...? together..?" you pant. He just nods back, breathing just as hard with a faint smile.'
+				end
+			end
+			sex_ev['did_we_cum_together'] = 1
+			act'Continue':cla & gs 'sex_ev_sex', 'sex_end'
+			gs'sex_ev_reactions_creampie', 'creampie_react'
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_enjoy_that':
+	if sex_ev['creampie_surprise'] > 0 and sex_ev['came_together'] < 1:
+		act'Did you enjoy that?':
+			cla & *clr
+			if sex_ev['cock_inserted'] = 1:
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Did you enjoy that?" you ask sweetly, leaving <<$npc_firstname[$boy]>>''s cock stuffed inside you and smiling up at him.'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'"Did you enjoy that?" you ask sweetly, leaving <<$npc_firstname[$boy]>>''s cock stuffed inside you and smiling at him over your shoulder.'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+					'"Did you enjoy that?" you ask sweetly, leaving <<$npc_firstname[$boy]>>''s cock stuffed inside you and smiling down at him.'
+				end
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+				'"Did you enjoy that?" you ask, looking at him in amusement.'
+			end
+			'"Your pussy is amazing," he pants.'
+			act'Continue':cla & gs'sex_ev_sex', 'sex_end'
+			act'I''m glad':
+				cla & *nl
+				'"I''m glad you liked it so much," you say, letting your smile grow wider.'
+				gs'sex_ev_sex', 'sex_end'
+			end
+			
+			act'That''s what they say':
+				cla & *nl
+				'"All the boys say so," you shrug, letting your smile slip into a smug grin.'
+				gs'sex_ev_sex', 'sex_end'
+			end				
+			
+			act'I liked it too':
+				cla & *nl
+				'"I liked it too," you smile. "It felt nice."'
+				gs'sex_ev_sex', 'sex_end'
+			end
+			gs'sex_ev_reactions_creampie', 'thanks_for_asking'
+			gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_ask_next_time':
+	if sex_ev['he_ask_creampie'] ! 1 and sex_ev['creampie_ask'] ! 1:
+		if sex_ev['creampie_surprise'] = 1:
+			act'Ask next time':
+				cla
+				if npc_ask_creampie[$boy] = 0:
+					act'(Not mad)':
+						npc_ask_creampie[$boy] = 1
+						$sex_ev['ask_next_time'] = 'not_mad'
+						cla & *nl
+						if sex_ev['came_together'] > 0:
+							'"I don''t mind... if you come inside me..." you pant. "But... could you ask next time...?"'
+						else
+							'"I don''t mind if you come inside me," you smile gently at him. "But you need to ask before you do."'
+						end
+						if sex_ev['just_cum_inside_me'] = 1 and sex_ev['cum_wherever'] ! 1:
+							gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+						else
+							if npc_free_creampies[$boy] = 2:
+								'"I thought you said I didn''t have to ask," <<$npc_firstname[$boy]>> says confusedly.'
+								'"Changed my mind. You need to start asking again."'
+								npc_free_creampies[$boy] = 1
+							elseif sex_ev['cum_wherever'] = 1:
+								'"You told me I could come wherever I wanted," he pants in return, smiling.'
+								'"I guess I did," you smile back, cupping his face in your hand. "But you should still warn me next time."'
+								'You cup his face in your hand, giving him a post-orgasm smile to let him know you''re not mad.'
+							elseif npc_know_bc[$boy] = 1:
+								'"You''re on birth control anyways aren''t you?"'
+								'"You still Need. To. Ask."'
+								'You poke his nose teasingly to emphasize your last word. But your dick drunk smile tells him you''re not really mad.'
+							end
+							gs'sex_ev_sex', 'sex_end'
+						end
+					end
+				
+					act'(A little mad)':
+						$sex_ev['ask_next_time'] = 'little_mad'
+						cla & *nl
+						if sex_ev['came_together'] > 0:
+							'"If you''re going to... come inside me..." you pant. "... you need to ask..."'
+							'You try to give him a look of annoyance, but it''s very difficult to produce angry vibes off the back of an orgasm.'
+						else
+							'"You need to ask me if you''re going to come inside," you frown at <<$npc_firstname[$boy]>> in annoyance.'
+						end
+						if npc_free_creampies[$boy] = 2:
+							'"I thought you said I didn''t have to ask," <<$npc_firstname[$boy]>> says confusedly.'
+							'"Changed my mind. You need to start asking again."'
+						elseif sex_ev['cum_wherever'] = 1:
+							'"You told me I could come wherever I wanted," he pants in return, smiling.'
+							'"You still need to warn me," you say, ' + iif(sex_ev['came_together'] > 0,'managing a slightly better glare this time, though it has an equally negligible effect.', 'letting your frown deepen into a scowl.')
+						elseif npc_know_bc[$boy] = 1:
+							'"You''re on birth control anyways aren''t you?"'
+							'"You still need to ask," you grumble, ' + iif(sex_ev['came_together'] > 0, 'managing a slightly better glare this time, though it has an equally negligible effect.', 'your frown deepening.')
+						else
+							'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+						end
+						npc_ask_creampie[$boy] = 1
+						gs'sex_ev_cum', 'what_now'
+					end
+				elseif npc_ask_creampie[$boy] = 1:
+					act'What happened to asking? (not mad)':
+						cla & *nl
+						if sex_ev['came_together'] > 0:
+							'"What... happened... to asking...?" you pant, giving him a dick-drunk smile.'
+						else
+							'"Didn''t I say something about asking before coming inside me?" you chide with a teasing smile.'
+						end
+						if sex_ev['cum_wherever'] = 1:
+							'"You told me I could come wherever I wanted," he grins in return.'
+							'"You still need to warn me," you chide gently.'
+						elseif npc_know_bc[$boy] = 1:
+							'"You''re on birth control anyways aren''t you?"'
+							'"You still need to ask," you chide gently.'
+						else
+							'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+						end
+						gs'sex_ev_cum', 'what_now'
+					end
+					
+					act'I thought I told you to ask (nice)':
+						npc_ask_creampie[$boy] = 1
+						$sex_ev['ask_next_time'] = 'not_mad'
+						cla & *nl
+						'"I thought I told you to ask...?" you say.'
+						'"Sorry," he replies sheepishly.'
+						act'I liked it':
+							cla & *nl
+							'"It''s okay," you smile gently, cupping his face with your hand. "I liked it."'
+							gs'sex_ev_sex', 'sex_end'
+						end
+						
+						act'Next time':
+							cla & *nl
+							'"Next time..." you smile gently, cupping his face with your hand.'
+							gs'sex_ev_cum', 'what_now'
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_ask_next_time2':
+	act'Just warn me next time':
+		cla & *nl
+		'"Just make sure to give me a warning next time," you chuckle.'
+		gs'sex_ev_cum', 'what_now'
+	end
+end
+
+if $ARGS[0] = 'creampie_be_better':
+	act'Don''t be sorry, be better':
+		cla
+		act'(Forgiving)':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				if sex_ev['cock_inserted'] = 1:
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Don''t be sorry," you say, gently cupping <<$npc_firstname[$boy]>>''s face. "Be better."'
+				else
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+					'"Don''t be sorry," you say gently, looking into <<$npc_firstname[$boy]>>''s eyes. "Be better."'
+				end
+			elseif $sex_ev['position'] = 'doggy':
+				if sex_ev['cock_inserted'] = 1:
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				end
+				'"Don''t be sorry," you say gently, looking into <<$npc_firstname[$boy]>>''s eyes. "Be better."'
+			elseif $sex_ev['position'] = 'cowgirl':
+				if sex_ev['cock_inserted'] = 1:
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+				end
+				'"Don''t be sorry," you say gently, looking into <<$npc_firstname[$boy]>>''s eyes. "Be better."'
+			end
+			gs'sex_ev_cum', 'what_now'
+		end
+		
+		if $sex_ev['ask_next_time'] ! 'not_mad':
+			act'(Sullen)':
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					if sex_ev['cock_inserted'] = 1:
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+						'"Don''t be sorry," you sigh with disappointment. "Be better."'
+					else
+						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/oops.jpg"></center>'
+					end
+				elseif $sex_ev['position'] = 'doggy':
+					if sex_ev['cock_inserted'] = 1:
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/2.jpg"></center>'
+					else
+						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+					end
+				elseif $sex_ev['position'] = 'cowgirl':
+					if sex_ev['cock_inserted'] = 1:
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+					else
+						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+					end
+				end
+				'"Don''t be sorry," you sigh with measurable disappointment. "Be better."'
+				gs'sex_ev_cum', 'what_now'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_ask_next_time_mad':
+	if sex_ev['creampie_force'] ! 1:
+		if npc_ask_creampie[$boy] = 0:
+			act'Ask next time (very mad)':
+				if sex_ev['cock_inserted'] = 0:
+					cla & *nl
+				else
+					cla & *clr
+					if $sex_ev['position'] = 'miss':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+					elseif $sex_ev['position'] = 'doggy':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/shock1.jpg"></center>'
+					elseif $sex_ev['position'] = 'cowgirl':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+					end
+				end
+				if sex_ev['came_together'] > 0:
+					'"You need to..." you pant. "... ask... before you do... that..."'
+					'It''s hard to give a glare that has impact when you''re still dick drunk off the back of your last orgasm but you somehow manage anyways, looking at him with daggers in your eyes.'
+				else
+					'"Can''t you fucking ask before you come inside me?" you scowl.'
+				end
+				if npc_free_creampies[$boy] = 2:
+					'"I thought you said I didn''t have to ask," <<$npc_firstname[$boy]>> says confusedly.'
+					'"Changed my mind. You need to start asking again."'
+				elseif sex_ev['cum_wherever'] = 1:
+					'"You told me I could come wherever I wanted," he pants in return, smiling.'
+					'"You still need to fucking tell me what you''re gonna do," you hiss.'
+				elseif npc_know_bc[$boy] = 1:
+					'"You''re on birth control anyways aren''t you?"'
+					'"That''s not a fucking excuse you asshole!" you hiss.'
+				else
+					'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+					'"Don''t be sorry," you grumble. "Be better."'
+				end
+				npc_ask_creampie[$boy] = 1
+				gs'sex_ev_reactions_creampie', 'creampie_ask_next_time_mad2'
+			end
+		else
+			act'What happened to asking (very mad)':
+				cla & *nl
+				if sex_ev['came_together'] > 0:
+					'"Didn''t..." you pant, exhaustedly glaring at him. "... I tell you... to ask first...?"'
+				else
+					'"What the fuck!" you scowl. "Didn''t I tell you to ask first?!"'
+				end
+				gs'sex_ev_reactions_creampie', 'creampie_ask_next_time_mad2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_ask_next_time_mad2':
+	if npc_free_creampies[$boy] = 2:
+		'"I thought you said I didn''t have to ask," <<$npc_firstname[$boy]>> says confusedly.'
+		'"Changed my mind. You need to start asking again."'
+	elseif sex_ev['cum_wherever'] = 1:
+		'"You told me I could come wherever I wanted," he pants in return, smiling.'
+		'"You still need to fucking tell me what you''re gonna do," you hiss.'
+	elseif npc_know_bc[$boy] = 1:
+		'"You''re on birth control anyways aren''t you?"'
+		'"That''s not a fucking excuse you asshole!" you hiss.'
+	else
+		'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+		'"Don''t be sorry," you grumble. "Be better."'
+	end
+	npc_ask_creampie[$boy] = 1
+	gs'sex_ev_sex', 'sex_end'
+end
+
+if $ARGS[0] = 'cum_together_no_bc1':
+	if birth_control['think_safe'] = 0 and sex_ev['creampie_ask'] = 0 and sex_ev['he_ask_creampie_yes'] ! 1 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and stat['dangerous_day'] = 1)):
+		act'Be careful (pregnancy)':
+			cla
+			if pillcon2 > 0:
+				act'Not effective yet (not mad)':
+					cla & *nl
+					npc_know_bc_not_effective[$boy] = 1
+					'"You need to be more careful," you murmur, smiling affectionately at <<$npc_firstname[$boy]>>. "My birth control pills haven''t kicked in yet..."'
+					gs'sex_ev_sex', 'sex_end'
+				end
+			else
+				if npc_know_not_bc[$boy] = 0:
+					act'Not on birth control':
+						cla & *nl
+						gs'sex_ev_stats', 'no_birth_control_know'
+						'"You need to be more careful..." you murmur wryly. "I''m not on birth control..."'
+						'With a warm smile, you cup <<$npc_firstname[$boy]>>''s face with your hand, letting him know your warning is just a warning and that you''re not mad.'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				else
+					act'Still not on birth control':
+						cla & *nl
+						'"Hey..." you murmur wryly. "I''m still not on birth control... We can''t keep letting this happen..."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+			if sex_ev['risky_creampie'] > 0:
+				act'Danger day (not mad)':
+					cla & *nl
+					if sex_ev['danger_day'] = 1:
+						'"Hey," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Didn''t I tell you something about today being a dangerous day for me...?"'
+					else
+						sex_ev['danger_day'] = 1
+						'"Well that''s not good," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Pretty sure I''m ovulating today..."'
+					end
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+		
+		act'Plan B is expensive':
+			cla
+			act'Teasing':
+				cla & *nl
+				'"Hey, plan B is expensive y''know," you complain teasingly, letting <<$npc_firstname[$boy]>> know that you''re only a <i>little</i> mad.'
+				if sex_ev['type'] = 'prostitution':
+					'"Then it''s a good thing you''re getting paid," he snickers.'
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+			act'Annoyed':
+				cla & *nl
+				'"Hey, plan B is expensive y''know," you complain teasingly, letting <<$npc_firstname[$boy]>> know that you''re only a <i>little</i> mad.'
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'cum_together_no_bc2':
+	if sex_ev['creampie_ask'] = 0 and sex_ev['he_ask_creampie_yes'] ! 1 and npc_free_creampies[$boy] = 0 and birth_control['think_safe'] = 0:
+		if npc_know_not_bc[$boy] = 0:
+			act'Not on birth control':
+				cla & *nl
+				gs'sex_ev_stats', 'no_birth_control_know'
+				if sex_ev['came_together'] > 0:
+					'"I''m not on birth control..." you pant. A shiver runs through your body. Whether from your recent orgasm or from fear, you''re not sure.'
+				else
+					'"What the fuck <<$npc_firstname[$boy]>>," you frown. "I''m on on birth control! You didn''t even ask!"'
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+		else
+			act'Still not on birth control':
+				cla & *nl
+				if sex_ev['came_together'] > 0:
+					'"Hey," you pant. "I''m still not on birth control... This is dangerous..."'
+					'A shiver runs through your body. Whether from your recent orgasm or from fear, you''re not sure.'
+				else
+					'"What the fuck <<$npc_firstname[$boy]>>," you frown. "You know I''m on on birth control! You can''t just keep blowing loads inside me without permission."'
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+		if pillcon2 > 0:
+			act'Birth control pill not effective yet':
+				cla & *nl
+				npc_know_bc_not_effective[$boy] = 1
+				if sex_ev['came_together'] > 0:
+					if npc_creampie_count[$boy] > 0:
+						'"You can''t keep doing that..." you pant. "My birth control pills haven''t kicked in yet..."'
+						'A shiver runs through your body. Whether from your recent orgasm or from fear, you''re not sure.'
+					else
+						'"My birth control pills haven''t kicked in yet..." you pant.'
+						'A shiver runs through your body. Whether from your recent orgasm or from fear, you''re not sure.'
+					end
+				else
+					if npc_creampie_count[$boy] > 0:
+						'"Come on man?" you frown. "You can''t keep coming inside me right now. My birth control pills haven''t kicked in yet. I could get pregnant."'
+					else
+						'"Seriously dude?" you frown. "My birth control hasn''t kicked in yet. I could get pregnant."'
+						'A shiver runs through your body. Whether from your recent orgasm or from fear, you''re not sure.'
+					end
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+		if sex_ev['risky_creampie'] = 1:
+			act'Ovulating today':
+				cla & *nl
+				if sex_ev['came_together'] > 0:
+					if sex_ev['danger_day'] = 1:
+						'"I thought I told you," you pant nervously. "I''m ovulating today... I could get pregnant..."'
+					else
+						sex_ev['danger_day'] = 1
+						'"Oh fuck," you pant. "This is really bad. I think I''m ovulating today..."'
+					end
+				else
+					if sex_ev['danger_day'] = 1:
+						'"What the fuck dude!" you growl. "I told you I''m ovulating today! Do you <i>want</i> me to get pregnant?!"'
+					else
+						sex_ev['danger_day'] = 1
+						'"Oh fuck," you say, going pale. "This is really bad. I think I''m ovulating today..."'
+					end
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'pull-out_finish':
+	if sex_ev['pullout_ask'] = 1 and sex_ev['creampie_surprise'] = 1 and sex_ev['came_together'] > 0:
+		act'[pull]... out...':
+			cla & *nl
+			'"... out..." you finish belatedly. You gulp, panting to catch your breath, insides twisted in conflict between your wish that he had pulled out and the orgasm that just rocked your body from the inside out.'
+			gs'sex_ev_sex', 'sex_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_gross':
+	if sex_ev['creampie_ask'] ! 1 and sex_ev['came_together'] = 0:
+		act'That was gross':
+			npc_dont_like_creampie[$boy] = 1
+			if sex_ev['just_cum_inside_me'] = 1:
+				sex_ev['cock_inserted'] = 0
+				cla & *clr
+				gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+				'"Gross," you cringe as <<$npc_firstname[$boy]>> slips his cock out from inside you, releasing a flood of cum that comes spilling out of your pussy.'
+			elseif sex_ev['cock_inserted'] = 0:
+				cla & *nl
+				'"Well," you say, cringing as <<$npc_firstname[$boy]>>''s cum oozes from your pussy. "That was gross."'
+				'"Gross? What''s so gross about a creampie?" <<$npc_firstname[$boy]>> asks.'
+			else
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Well," you say, wriggling beneath <<$npc_firstname[$boy]>>, cringing at the slimy <i>fullness</i> of your pussy. "This is gross."'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'"Well," you say, wriggling beneath <<$npc_firstname[$boy]>>, cringing at the slimy <i>fullness</i> of your pussy. "This is gross."'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+					'"Well," you say, shifting your weight on top of <<$npc_firstname[$boy]>>, cringing at the slimy <i>fullness</i> inside your belly. "This is gross."'
+				end
+				'"Gross? What''s so gross about a creampie?" <<$npc_firstname[$boy]>> asks.'
+			end
+			gs'sex_ev_reactions_creampie', 'creampie_gross2'
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_gross2':
+	act'Feels weird':
+		cla & *nl
+		if npc_free_creampies[$boy] > 0 and $pc_cum_pref_know[$boy] = 'creampie':
+			'"They feel weird," you grimace, before twisting your mouth in a wry smirk and shrug. "But I like you. So you better be happy I let you do this."'
+		else
+			'"It feels weird when guys come inside," you grimace. "It feels like a bunch of slime filling up my vagina. I don''t like it."'
+		end
+		gs'sex_ev_sex', 'sex_end'
+	end
+	
+	act'Cleanup is gross':
+		cla & *nl
+		if npc_free_creampies[$boy] > 0 and $pc_cum_pref_know[$boy] = 'creampie':
+			'"It''s not the creampie itself, it''s the clean up," you grimace, before twisting your mouth in a wry smirk and shrug. "It has a tendency to stick around for a while and <i>gush</i> when you''re least expecting it. So you better be happy I let you do this."'
+		else
+			'"It''s not the creampie itself, it''s the clean up," you grimace, before twisting your mouth in a wry smirk and shrug. "It has a tendency to stick around for a while and <i>gush</i> when you''re least expecting it."'
+		end
+		gs'sex_ev_sex', 'sex_end'
+	end
+	
+	act'Not ready for kids':
+		sex_ev['no_kids'] = 1
+		cla & *nl
+		if birth_control['think_safe'] ! 1:
+			gs'sex_ev_stats', 'no_birth_control_know'
+			'"I''m not on birth control," you grimace. "I can practically <i>feel</i> the little bastards swimming around inside me and trying to knock me up. Just the thought of getting pregnant grosses me out."'
+		else
+			if npc_know_bc[$boy] = 1:
+				'"The idea of pregnancy grosses me out," you grimace.'
+				'"But aren''t you on birth control?" <<$npc_firstname[$boy]>> asks.'
+				if birth_control['think_safe'] ! 1:
+					cla
+					act'Forgot a few days':
+						cla & *nl
+						'"I uhh..." you say guiltily. "I might have forgotten to take my pill a few times... I''m not sure how effective it is right now..."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'Stopped using':
+						cla & *nl
+						gs 'sex_ev_stats', 'no_birth_control_know'
+						'"I uhh..." you say guiltily. "I stopped using it... I guess I forgot to tell you..."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				else
+					'"Yeah but just the thought is enough to turn me off. I can practically <i>feel</i> the little bastards swimming around inside, trying to knock me up. Ick."'
+					gs'sex_ev_sex', 'sex_end'
+				end
+			else
+				gs'sex_ev_stats', 'birth_control_know'
+				'"The idea of pregnancy grosses me out," you grimace. "I''m on birth control but my paranoia turns creampies into a huge turnoff. I can practically <i>feel</i> the little bastards swimming around inside, trying to knock me up. Ick."'
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'promised_no_creampie':
+	if sex_ev['promise_no_creampie'] = 1 and sex_ev['creampie_ask'] ! 1 and sex_ev['he_ask_creampie_yes'] ! 1 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and sex_ev['danger_day'] = 1)):
+		act'You promised you wouldn''t come inside!':
+			sex_ev['mad'] = 1
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/shock1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			end
+			if sex_ev['came_together'] > 0:
+				'"What the fuck!" you start dizzily, head swimming as you''re caught halfway between rage and a post-orgasm endorphin rush. "You promised you wouldn''t come inside me!"'
+			else
+				'"What the fuck!" you shout. "You promised you wouldn''t come inside me!"'
+			end
+			if sex_ev['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he pants back.'
+				'"I meant anywhere except there," you grumble back.'
+			elseif npc_selfish[$boy] = 1:
+				'"It felt too good," he pants. "Couldn''t pull out."'
+				'"Don''t you have any idea what a fucking promise is?!" you seethe. "Asshole!"'
+			else
+				'"Sorry," he pants sheepishly.'
+				'"It''s okay," you murmur back, unable to keep the smile from your voice.'
+			end
+			gs'sex_ev_sex', 'sex_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'thanks_for_asking':
+	if sex_ev['he_ask_creampie'] = 1 and npc_free_creampies[$boy] = 0:
+		act'Thanks for asking':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+			end
+			if sex_ev['creampie_force'] = 1 and sex_ev['came_together'] > 0:
+				'"Thanks for asking," you pant, smiling mischievously at <<$npc_firstname[$boy]>>.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif sex_ev['creampie_force'] = 1:
+				'"Thanks for asking," you say mischievously.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif sex_ev['came_together'] > 0 and npc_ask_creampie[$boy] = 1:
+				'"Thanks for asking," you murmur, giving <<$npc_firstname[$boy]>> a blissful smile.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif sex_ev['came_together'] > 0:
+				'"Thanks for asking," you murmur, giving <<$npc_firstname[$boy]>> a blissful smile.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif npc_ask_creampie[$boy] = 1:
+				'"Thanks for asking," you smile sweetly. "It means a lot to me."'
+				'"Well, you wanted me to, didn''t you?" he smiles back.'
+				gs'sex_ev_sex', 'sex_end'
+			else
+				'"Thanks for asking permission," you say to <<$npc_firstname[$boy]>>. "It means a lot to me."'
+				if npc_dont_like_creampie[$boy] = 1:
+					'"I thought you didn''t like creampies," he asks curiously.'
+					act'Did it for you':
+						cla & *nl
+						'"I don''t," you say, giving him a warm smile. "But I know you do."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'Got used to it':
+						cla & *nl
+						npc_dont_like_creampie[$boy] = 0
+						'"I got used to it," you shrug. "I don''t mind them so much anymore."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'Changed my mind':
+						cla & *nl
+						npc_dont_like_creampie[$boy] = 0
+						npc_know_love_creampie[$boy] = 1
+						'"Changed my mind," you grin. "I like them now. So long as you ask."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'Only when it''s you':
+						cla & *nl
+						'"I like them now," you say, giving him a warm smile. "But only when it''s you."'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				else
+					'"Thanks for letting me," he smiles back.'
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'told_you_not_to_creampie':
+	if sex_ev['promise_no_creampie'] = 1 and sex_ev['creampie_ask'] ! 1 and sex_ev['he_ask_creampie_yes'] ! 1 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and sex_ev['danger_day'] = 1)):
+		act'I said no creampies':
+			cla
+			act'(Not mad)':
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Hey..." You look up at <<$npc_firstname[$boy]>>, still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'"Hey..." You look back at <<$npc_firstname[$boy]>>, still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+					'"Hey..." You lay down, resting on <<$npc_firstname[$boy]>>''s chest, still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				end
+				if sex_ev['cum_wherever'] = 1:
+					'"You said I could come wherever I wanted," he pants back.'
+					'"I meant anywhere except there," you murmur back, unable to keep the smile from your voice.'
+				elseif npc_selfish[$boy] = 1:
+					'"It felt too good," he pants. "Couldn''t pull out."'
+					'"I don''t think I can disagree," you murmur back, unable to keep the smile from your voice.'
+				else
+					'"Sorry," he pants sheepishly.'
+					'"It''s okay," you murmur back, unable to keep the smile from your voice.'
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+			
+			act'(Annoyed)':
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Hey..." You try to glare at <<$npc_firstname[$boy]>>, though it''s difficult while still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'"Hey..." You try to glare at <<$npc_firstname[$boy]>>, though it''s difficult while still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+					'"Hey..." You lay down, resting on <<$npc_firstname[$boy]>>''s chest, still shivering from your orgasm. "I thought I told you not to come inside me..."'
+				end
+				if sex_ev['cum_wherever'] = 1:
+					'"You said I could come wherever I wanted," he pants back.'
+					'"I meant anywhere except there," you grumble back.'
+				elseif npc_selfish[$boy] = 1:
+					'"It felt too good," he pants. "Couldn''t pull out."'
+					'"That''s no excuse," you grumble.'
+				else
+					'"Sorry," he pants sheepishly.'
+					'"It''s okay," you murmur back, unable to keep the smile from your voice.'
+				end
+				gs'sex_ev_sex', 'sex_end'
+			end
+			
+		end
+	end
+end
+
+if $ARGS[0] = 'thought_no_creampies':
+	if sex_ev['creampie_ask'] = 1 and npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] < 3 and npc_free_creampies[$boy] = 0:
+		cla
+		act'Continue':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/2.jpg"></center>'
+			end
+			act'Ignore the question':cla & gs'sex_ev_sex', 'sex_end'
+			if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+!!				if rand(0,1) = 1:
+					'"Finally break up with your shitty boyfriend?" <<$npc_firstname[$boy]>> grins, panting.'
+					if pcs_lover = 0:
+						act'Yeah':
+							npc_boyfriend_creampie_rule[$boy] = 0
+							cla & *nl
+							'"Yeah," you smile back. "I''m single again. Which means all the creampies in the world for me. At least until I start dating again."'
+							'You give him a wink.'
+							gs'sex_ev_sex', 'sex_end'
+						end
+						
+						act'Get sad':
+							npc_boyfriend_creampie_rule[$boy] = 0
+							cla & *nl
+							'An ache immediately pulses inside your chest.'
+							'"Yeah..." you mumble, turning your head. "It was a bad breakup..."'
+							gs'sex_ev_sex', 'sex_end'
+						end
+					end
+					act'Changed my rules':
+						cla & *nl
+						npc_boyfriend_creampie_rule[$boy] = 3
+						'"No, we''re still together. But I decided to change my rules," you smile.'
+						act'Only emotional cheating counts':
+							cla & *nl
+							'"It''s only cheating if I''m emotionally involved with you. Since I''m only using you for sex, it doesn''t count!"'
+							gs'sex_ev_sex', 'sex_end'
+						end
+						
+						act'No kissing':
+							cla & *nl
+							npc_no_kiss[$boy] = 1
+							'"It''s only cheating if I kiss you. As long as we''re just fucking each other''s brains out, I''m not cheating!"'
+							gs'sex_ev_sex', 'sex_end'
+						end
+						
+						act'No anal':
+							cla & *nl
+							npc_no_anal[$boy] = 1
+							'"It''s only cheating if I let you fuck my ass. That''s reserved for boyfriends and husbands. So as long as we don''t do that, it''s not cheating!"'
+							'"It''s usually the other way around, isn''t it?" <<$npc_firstname[$boy]>> snickers'
+							gs'sex_ev_sex', 'sex_end'
+						end
+					end
+					
+					act'I''m cheating':
+						npc_boyfriend_creampie_rule[$boy] = 3
+						cla & *nl
+						'"No, we''re still together," you smile. "But I decided to start cheating on him."'
+						'You wink.'
+						gs'sex_ev_sex', 'sex_end'
+					end
+!!{				else
+					'"Finally decided to let a real man fill you up, huh?" <<$npc_firstname[$boy]>> grins, panting.'
+					if pcs_lover = 0:
+						act'I''m single now':
+							npc_boyfriend_creampie_rule[$boy] = 0
+							cla & *nl
+							'"My boyfriend and I broke up," you smile back. "Which means I''m single again. Which means all the creampies in the world for me. At least until I get a new boyfriend."'
+							'You wink.'
+							gs'sex_ev_sex', 'sex_end'
+						end
+					end
+				end}
+			else
+				'"I thought," <<$npc_firstname[$boy]>> pants. "You said I wasn''t allowed to come inside you? Something about your boyfriend?"'
+				if pcs_lover = 0:
+					act'I''m single now':
+						npc_boyfriend_creampie_rule[$boy] = 0
+						cla & *nl
+						'"My boyfriend and I broke up," you smile back. "Which means I''m single again. Which means all the creampies in the world for me. At least until I get a new boyfriend."'
+						'You wink.'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				end
+				
+				act'Changed my rules':
+					cla & *nl
+					npc_boyfriend_creampie_rule[$boy] = 3
+					'"I decided to change my rules," you smile.'
+					act'Only emotional cheating counts':
+						cla & *nl
+						'"It''s only cheating if I''m emotionally involved with you. Since I''m only using you for sex, it doesn''t count!"'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'No kissing':
+						cla & *nl
+						npc_no_kiss[$boy] = 1
+						'"It''s only cheating if I kiss you. As long as we''re just fucking each other''s brains out, I''m not cheating!"'
+						gs'sex_ev_sex', 'sex_end'
+					end
+					
+					act'No anal':
+						cla & *nl
+						npc_no_anal[$boy] = 1
+						'"It''s only cheating if I let you fuck my ass. That''s reserved for boyfriends and husbands. So as long as we don''t do that, it''s not cheating!"'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				end
+				
+				act'I''m cheating':
+					npc_boyfriend_creampie_rule[$boy] = 3
+					cla & *nl
+					'"Well, the thing is..." you say, letting a smile creep onto your face. "I decided to start cheating on him. So you can come inside me all you want..."'
+					'You wink.'
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'cum_together_yeah':
+	if npc_know_love_creampie[$boy] ! 1:
+		act'Yeah':
+			cla & *nl
+			sex_ev['react'] = 1
+			minut += rand(2,5)
+			gs'stat'
+			if sex_ev['cum_together_fake'] = 0:
+				'"Yeah..." you smile back. You choose to let the moment speak for itself and don''t say anything more. It seems <<$npc_firstname[$boy]>> feels the same way as he rests with you, his cock still inside you but neither of you in a hurry to change it.'
+			else
+				'"Yeah..." you smile. You choose to keep your lies to a minimum and leave it at that. <<$npc_firstname[$boy]>> seems happy enough and smiles back at you, content with his cock resting inside you.'
+			end
+			gs 'sex_ev_sex', 'sex_end'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'creampie_pull_out_image':
+	if $sex_ev['position'] = 'miss':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+	elseif $sex_ev['position'] = 'doggy':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+	elseif $sex_ev['position'] = 'cowgirl':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>'
+	end
+end
+
+
+if $ARGS[0] = 'creampie_felt_great':
+	if sex_ev['surprise_cum_together'] ! 1:
+		act'That felt great':
+			cla & *clr
+			sex_ev['react'] = 1
+			if sex_ev['cock_inserted'] = 0:
+				gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+				if sex_ev['just_cum_inside_me'] = 1:
+					'"That felt great," you smile, beaming at <<$npc_firstname[$boy]>>.'
+				elseif orgasm > sex_ev['orgasm']:
+					!! Sveta came
+					if sex_ev['came_together'] = 1 or sex_ev['came_together'] = 3:
+						'"That felt great," you pant, aftershocks of your orgasm still shivering through you, enjoying the feeling of cum draining from your pussy.'
+						'<<$npc_firstname[$boy]>> just smiles tiredly back at you.'
+					else
+						'"That was..." you pant, aftershocks of your orgasm still shivering through you, cum draining from your pussy. "Did we... together...?"'
+						'"Yeah..." he breathes back.'
+						'"I thought so," you smile. "That was incredible..."'
+					end
+				else
+					if sex_ev['cum_together_fake'] = 1:
+						'"That was..." you pant, dramatically feigning post-orgasm shakes, letting the cum drain from your pussy. "I could... feel you... -<i>gasp</i>- inside me..."'
+					else
+						'"That was amazing," you gush, enjoying the feeling of cum draining from your pussy. "I could <i>feel</i> you coming inside me. It felt so good!"'
+					end
+					'<<$npc_firstname[$boy]>> just smiles tiredly back at you.'
+				end
+			else
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+				end
+				if sex_ev['just_cum_inside_me'] = 1:
+					'"That felt great," you smile, beaming at <<$npc_firstname[$boy]>>, squeezing him with your pussy.'
+				elseif orgasm > sex_ev['orgasm']:
+					!! you just came
+					if sex_ev['came_together'] = 1 or sex_ev['came_together'] = 3:
+						'"That was amazing," you pant, aftershocks of your orgasm still shivering through you, enjoying the feeling being filled by both <<$npc_firstname[$boy]>>''s cum and his cock. "I could <i>feel</i> you coming inside me. It felt so good!"'
+						'<<$npc_firstname[$boy]>> just smiles tiredly back at you.'
+					elseif sex_ev['cum_together_fake'] = 1:
+						'"That was..." you pant, aftershocks of your orgasm still shivering through you, cum draining from your pussy. "Did we... together...?"'
+						'"Yeah..." he breathes back.'
+						'"I thought so," you smile. "I could feel it inside me. It was <i>amazing</i>..."'
+					else
+						'"That was..." you pant, aftershocks of your orgasm still shivering through you. "I just... Did you... did we... together...?"'
+						'"Yeah..." he breathes back.'
+						'"I thought so," you smile. "I could feel you inside me. It was <i>amazing</i>..."'
+					end
+				else
+					'"That was great," you grin, gently flexing your pussy around <<$npc_firstname[$boy]>>''s cock, still stuffed inside you with all of his cum. "I could <i>feel</i> when you came inside me. It felt so good!"'
+				end
+			end
+			if sex_ev['just_cum_inside_me'] = 1:
+				gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+			else
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'feel_full':
+	act'I feel full':
+		cla & *clr
+		if $sex_ev['position'] = 'miss':
+			iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>')
+			
+			if sex_ev['came_together'] > 0:
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and marvelling at the warmth you feel inside your hips.'
+				else
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and savouring the warmth as much as you can, even as it spills from your snatch.'
+				end
+			else
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you murmur, gently rubbing your belly and marvelling at the warmth you feel inside your hips.'
+				else
+					'"I feel... <i>full</i>..." you murmur, gently rubbing your belly and savouring the warmth as much as you can, even as it spills from your snatch.'
+				end
+			end
+		elseif $sex_ev['position'] = 'doggy':
+			iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>')
+
+			if sex_ev['came_together'] > 0:
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and marvelling at the warmth you feel inside your hips.'
+				else
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and savouring the warmth as much as you can, even as it runs from your snatch.'
+				end
+			else
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you murmur, marvelling at the warmth you feel between your hips.'
+				else
+					'"I feel... <i>full</i>..." you murmur, savouring the warmth as much as you can even as it spills from your snatch.'
+				end
+			end
+		elseif $sex_ev['position'] = 'cowgirl':
+			iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>')
+			if sex_ev['came_together'] > 0:
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and marvelling at the warmth you feel inside your hips.'
+				else
+					'"I feel... <i>full</i>..." you gulp, shivering with orgasmic aftershocks and savouring the warmth as much as you can, even as it spills from your snatch.'
+				end
+			else
+				if sex_ev['cock_inserted'] = 1:
+					'"I feel... <i>full</i>..." you murmur, gently rubbing your belly and marvelling at the warmth you feel inside your hips.'
+				else
+					'"I feel... <i>full</i>..." you murmur, gently rubbing your belly and savouring the warmth as much as you can, even as it spills from your snatch.'
+				end
+			end
+		end
+		
+		sex_ev['react'] = 1
+		minut += rand(1,2)
+		gs'stat'
+		
+		gs 'sex_ev_sex', 'sex_end'
+	end
+end
+
+if $ARGS[0] = 'love_creampies':
+	if sex_ev['first_creampie'] ! 1:
+		if npc_know_love_creampie[$boy] = 1:
+			act'I love it when you come inside':
+				sex_ev['react'] = 1
+				cla & *clr
+				minut += rand(2,5)
+				gs'stat'
+				if $sex_ev['position'] = 'miss':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>')
+				elseif $sex_ev['position'] = 'doggy':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>')
+				elseif $sex_ev['position'] = 'cowgirl':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>')
+				end
+				if npc_know_love_creampie[$boy] = 1:
+					if sex_ev['came_together'] > 0:
+						'"I love it when you come inside me," you smile, shivering with orgasmic aftershocks.'
+					else
+						'"I love it when you come inside me," you smile.'
+					end
+					if $npc_cum_pref[$boy] = 'creampie':
+						'"I love coming inside you," he smiles back.'
+					else
+						'"I know," he smirks back.'
+					end
+				end
+				gs 'sex_ev_sex', 'sex_end'
+			end
+		else
+			act'I love creampies':
+				sex_ev['react'] = 1
+				cla & *clr
+				minut += rand(2,5)
+				gs'stat'
+				if $sex_ev['position'] = 'miss':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>')
+				elseif $sex_ev['position'] = 'doggy':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>')
+				elseif $sex_ev['position'] = 'cowgirl':
+					iif(sex_ev['cock_inserted'] = 1,'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/cowgirl1.jpg"></center>')
+				end
+				npc_know_love_creampie[$boy] = 1
+				if sex_ev['came_together'] > 0:
+					'"I love it when guys come inside me," you sigh contently, still giddy from your orgasm. "It always makes me come too."'
+				else
+					'"I love it when guys come inside me," you sigh contently. "Something about it just turns me on so much."'
+				end
+				if $npc_cum_pref[$boy] = 'creampie':
+					 $pc_cum_pref_know[$boy] = npc_cum_pref[$boy]
+					'"Coming inside is always the best," he says, looking at you. "We must be made to match."'
+					'"Must be," you say back, giving him a smile.'		
+				else
+					'"Maybe I should come inside you more often then."'
+					'"Yes," you nod, smiling. "You definitely should."'
+				end
+				gs 'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'cum_together_kiss':
+	if ($sex_ev['position'] = 'miss' or $sex_ev['position'] = 'cowgirl' or sex_ev['cock_inserted'] = 0) and sex_ev['cum_together_fake'] = 0 and sex_ev['came_together'] > 0:
+		act'Kiss him':
+			cla & *clr
+			if sex_ev['cock_inserted'] = 0:
+				iif($sex_ev['position'] = 'cowgirl','<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/kiss1.jpg"></center>','<center><img <<$set_imgh>> src="images/shared/sex/after/kiss1.jpg"></center>')
+				'Overwhelmed with endorphins and emotion, you lean into <<$npc_firstname[$boy]>> and kiss him. In the afterglow of your simultaneous orgasm and his cum flowing from your pussy, intertwining your lips with his just feels... <i>right.</i>'
+			elseif $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/kiss1.jpg"></center>'
+				'Overwhelmed with endorphins and emotion, you wrap your arms around <<$npc_firstname[$boy]>> and kiss him. After coming together, still being filled by his cock and his cum, kissing like this just feels... <i>right.</i>'
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/kiss1.jpg"></center>'
+				'Overwhelmed with endorphins and emotion, you move your head over to <<$npc_firstname[$boy]>>''s and kiss him. After coming together, still being filled by his cock and his cum, kissing like this just feels... <i>right.</i>'
+			end
+			*nl
+			if npc_no_kiss[$boy] = 1:
+				npc_no_kiss[$boy] = 2
+				'"I thought you said no kissing," he smiles, breaking the kiss.'
+				act'Changed my mind':
+					cla & *nl
+					'"I changed my mind," you smile back, kissing him again.'
+					gs 'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Couldn''t resist':
+					cla & *nl
+					'"I couldn''t resist," you smile back, kissing him again. "You made me feel too good."'
+					gs 'sex_ev_sex', 'sex_end'
+				end
+				
+				act'You earned it':
+					cla & *nl
+					'"You earned it," you smile back, kissing him again.'
+					gs 'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Shut up':
+					cla & *nl
+					'"Shut up," you smile, and kiss him again.'
+					gs 'sex_ev_sex', 'sex_end'
+				end
+			else
+				npc_no_kiss[$boy] = 2
+				'He returns the kiss eagerly and your entire body tingles with pleasure. The warmth of his cum inside you, his cock still filling you up, and his lips on yours create a mixture of indescribable satisfaction inside you.'
+				gs 'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_apologize':
+	if sex_ev['creampie_force'] = 1:
+		act'Couldn''t resist':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+			end
+			'"Sorry," you smile teasingly. "I couldn''t resist."'
+			gs 'sex_ev_sex', 'sex_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'already_creampied_me':
+	if sex_ev['creampie_count'] > 1 and sex_ev['danger_day'] = 1 and sex_ev['creampie_allowance'] = 0:
+		act'Since you already came inside... (creampies okay)':
+			sex_ev['creampie_allowance'] = 1
+			cla & *nl
+			'"You can keep coming inside me if you want," you smile at <<$npc_firstname[$boy]>>. "Since you already did it once, we might as well make the most of it..."'
+			gs 'sex_ev_sex', 'sex_end'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'creampie_pc_startled':
+!!	if sex_ev['creampie_allowance'] = 0 and sex_ev['creampie_ask'] ! 1 and sex_ev['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
+	if sex_ev['creampie_ask'] ! 1 and sex_ev['creampie_force'] ! 1 and sex_ev['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
+		act'Startled':
+			$sex_ev['reaction'] = 'startled'
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/shock1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			end
+			'You gasp in surprise, freezing up as <<$npc_firstname[$boy]>>''s cock continues to pulse inside you.'
+			if sex_ev['cock_inserted'] = 1:gs'sex_ev_cum', 'cum_inside_pull_away'
+			gs'sex_ev_reactions_creampie', 'did_you_come_inside'
+		end
+	end
+end
+
+if $ARGS[0] = 'take_in_stride1':
+	if sex_ev['take_in_stride'] = 0:
+		act'Take it in stride':
+			sex_ev['take_in_stride'] = 1
+			cla & *nl
+			if $sex_ev['reaction'] = 'startled':
+				if $sex_ev['position'] = 'miss':
+					'After your momentary surprise, you take it in stride, smiling as you resume throwing your hips forward against <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				elseif $sex_ev['position'] = 'doggy':
+					'After your momentary surprise, you take it in stride, smiling as you resume throwing your hips back against <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'After your momentary surprise, you take it in stride, smiling as you resume rolling your hips over <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				end
+			else
+				if $sex_ev['position'] = 'miss':
+					'You take it in stride, smiling as you continue to throw your hips forward against <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				elseif $sex_ev['position'] = 'doggy':
+					'You take it in stride, smiling as you continue to throw your hips back against <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'You take it in stride, smiling as you continue to roll your hips over <<$npc_firstname[$boy]>>''s, letting him fully ride out his orgasm inside you.'
+				end
+			end
+			act'Continue':cla & gs'sex_ev_sex', 'sex_end'
+			gs 'sex_ev_cum', 'cum_inside_pull_away'
+			gs'sex_ev_reactions', 'cum_react'
+		end
+	end
+end
+
+if $ARGS[0] = 'did_you_come_inside':
+	if sex_ev['creampie_ask'] ! 1 and sex_ev['creampie_force'] ! 1 and (sex_ev['came_together'] < 3 or sex_ev['surprise_cum_together'] = 1) and sex_ev['just_cum_inside_me'] = 0 and sex_ev['creampie_surprise'] = 1:
+		act'Did you just come inside me?':
+			sex_ev['just_cum_inside_me'] = 1
+			if sex_ev['cock_inserted'] = 0:
+				cla & *clr
+				gs 'sex_ev_reactions_creampie', 'creampie_pull_out_image'
+				if $sex_ev['position'] = 'miss':
+					'"Did you just come inside me?" you ask somewhat rhetorically as you watch a stream of milky liquid trickle from your pussy.'
+				elseif $sex_ev['position'] = 'doggy':
+					'"Did you just come inside me?" you ask somewhat rhetorically as you feel liquid continue to drain from your snatch.'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'"Did you just come inside me?" you ask somewhat rhetorically as you watch a stream of milky liquid trickle from your pussy.'
+				end
+			else
+				cla & *nl
+				if sex_ev['accidental_creampie_count'] > 1 and sex_ev['creampie_allowance'] ! 1 and npc_free_creampies[$boy] = 0:
+					'"Did you just come inside me?" you ask. "<i>Again?</i>"'
+				else
+					'"Did you just come inside me?" you ask.'
+				end
+			end
+			!! the following section has many different menus to account for continuity of choices depending on how the boy responds
+			if sex_ev['cum_warn'] = 1 and sex_ev['surprise_cum_together'] = 1:
+				'"I was trying to tell you," <<$npc_firstname[$boy]>> pants, breathing hard. "I was going to come... But you weren''t listening..."'
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_thought_so'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions_creampie', 'pullout_game_tease'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			elseif (sex_ev['virgin_creampie_request'] = 1 and sex_ev['creampie_count'] = 1) or sex_ev['creampie_allowance'] > 0:
+				'"Yeah. You said I could, didn''t you?" he says with a satisfied sigh.'
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_accident_fine'
+					gs'sex_ev_reactions_creampie', 'creampie_just_checking'
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+					gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			elseif npc_free_creampies[$boy] = 2 or sex_ev['creampie_allowance'] = 1:
+				'"Yeah," he sighs beatifically.'
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_accident_fine'
+					gs'sex_ev_reactions_creampie', 'creampie_just_checking'
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_thought_so'
+					gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+					gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions_creampie', 'pullout_game_tease'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+				'"Yeah, your pussy was so tight," he sighs with a beatific smile. "Couldn''t help it."'
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_accident_fine'
+					gs'sex_ev_reactions_creampie', 'creampie_just_checking'
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_thought_so'
+					gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+					gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions_creampie', 'pullout_game_tease'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			elseif sex_ev['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he says, smiling beatifically.'
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_accident_fine'
+					gs'sex_ev_reactions_creampie', 'creampie_just_checking'
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_thought_so'
+					gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+					gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			else
+				if sex_ev['accidental_creampie_count'] = 1:
+					if sex_ev['promise_no_creampie'] = 1:
+						if sex_ev['danger_day'] = 1:
+							if sex_ev['girl_orgasm'] = 0:
+								'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know I promised and I know you said it''s a danger day, but I couldn''t hold it and- I swear! I didn''t mean to!"'
+							else
+								'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know I promised and I know you said it''s a danger day, but you came and it felt so good and I couldn''t hold it and- I''m so sorry!"'
+							end
+						else
+							if sex_ev['girl_orgasm'] = 0:
+								'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know I promised I wouldn''t but I couldn''t hold it and- I swear! I didn''t mean to!"'
+							else
+								'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know I promised I wouldn''t, but you came and it felt so good and I couldn''t hold it and- I''m <i>so</i> so sorry!"'
+							end
+						end
+					elseif npc_ask_creampie[$boy] > 0:
+						if sex_ev['girl_orgasm'] = 0:
+							'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know you told me to ask but I couldn''t hold it and- I''m <i>so</i> so sorry!"'
+						else
+							'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I know you told me to ask but you were cumming and I couldn''t get your attention and I couldn''t hold it and- I''m <i>so</i> so sorry!"'
+						end
+					else
+						
+						if sex_ev['girl_orgasm'] = 0:
+							'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I didn''t mean to! I tried to hold it and- I''m <i>so</i> so sorry!"'
+						else
+							'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I didn''t mean to! But you came and it felt so good and I tried to hold it but- I''m <i>so</i> so sorry!"'
+						end
+					end
+				else
+					'"I''m so sorry!" <<$npc_firstname[$boy]>> apologizes profusely. "I can''t believe I fucked up again!"'
+				end
+				act'Take it in stride':
+					cla
+					gs'sex_ev_reactions_creampie', 'creampie_accident_fine'
+					gs'sex_ev_reactions_creampie', 'creampie_just_checking'
+					gs'sex_ev_reactions_creampie', 'creampie_that_explains'
+					gs'sex_ev_reactions_creampie', 'creampie_thought_so'
+					gs'sex_ev_reactions_creampie', 'creampie_felt_great'
+					gs'sex_ev_reactions_creampie', 'creampie_ask_next_time'
+					gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+					gs'sex_ev_reactions_creampie', 'pullout_game_tease'
+					gs'sex_ev_reactions', 'quickshot_tease1'
+				end
+			end
+			
+			act'Panic':
+				cla
+				gs'sex_ev_reactions_creampie', 'oh_shit_options'
+				gs'sex_ev_reactions_creampie', 'creampie_freakout'
+			end
+			
+			act'Get angry':
+				cla
+				gs'sex_ev_reactions_creampie', 'creampie_wtf'
+				gs'sex_ev_reactions_creampie', 'told_you_not_to_creampie'
+				gs'sex_ev_reactions_creampie', 'creampie_gross'
+			end
+			
+			gs'sex_ev_reactions_creampie', 'delayed_creampie_orgasm1'
+		end
+	end
+end
+
+if $ARGS[0] = 'delayed_creampie_orgasm1':
+	if orgasm = sex_ev['orgasm'] and sex_ev['came_together'] = 0:
+		act'Delayed creampie orgasm':
+			sex_ev['orgasm_count'] += 1
+			sex_ev['simultaneous_orgasm_count'] += 1
+			sex_ev['came_together'] = 2
+			sex_ev['react'] = 1
+			$orgasm_or = 'yes'
+			gs'arousal', 'vaginal',-1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			gs'stat'
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><video autoplay loop src="images/shared/sex/vag/miss/orgasm1.mp4"></video></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
+			end
+			'An instant later, you suddenly find yourself intensely aware of the pool of heat filling up your insides and a thrill of euphoric spasms abruptly roll through your body, covering your skin in goosebumps and locking your mouth in a silent scream of beautiful agony.'
+			*nl
+			'You cry your wordless cry, unable to do anything except tremble around <<$npc_firstname[$boy]>>''s cock inside you.'
+			act'Continue':
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking down at you with an utterly confused expression.'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking down at you with an utterly confused expression.'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+					'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking up at you with an utterly confused expression.'
+				end
+				*nl
+				if sex_ev['virgin'] = 1 and sex_ev['creampie_count'] = 1:
+					'"Is... is that what it feels like when a guy comes inside...?" you stammer breathlessly.'
+					if $sex_ev['cum_choice'] = 'creampie_surprise' and sex_ev['virgin_creampie_request'] ! 1:
+						'"Yeah..." he replies nervously.'
+						'"Oh..." you mumble, too overwhelmed to be able to say anything else.'
+					elseif $npc_cum_pref[$boy] = 'creampie' or sex_ev['virgin_creampie_request'] = 1:
+						'"Yeah," he smiles back. "Feels pretty good doesn''t it?"'
+						'You nod back, too overwhelmed to be able to say anything else.'
+					else
+						'"Yeah. Did you like it?"'
+						'You nod back, too overwhelmed to be able to say anything else.'
+					end
+					if sex_ev['creampie_allowance'] ! 1:
+						'"So you''re not mad?"'
+						if $sex_ev['cum_choice'] = 'creampie_surprise':gs'sex_ev_reactions_creampie', 'accidents_happen1'
+						gs'sex_ev_reactions_creampie', 'creampie_felt_too_good'
+						gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+						gs'sex_ev_reactions_creampie', 'have_plan_b'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				else
+					'"Surprise overrode my brain," you smile tiredly at him. "I was so surprised, I forgot to come for a second."'
+					if sex_ev['cum_wherever'] = 1:
+						'"Well you <i>did</i> say I could come wherever I wanted."'
+						'"I guess I did," you chuckle softly. "But for some reason I didn''t expect my pussy."'
+						if $pc_cum_pref_know[$boy] = 'creampie':
+							'"Don''t know why you''d think that," he smirks back.'
+						else
+							'He smirks amusedly back at you.'
+						end
+						gs 'sex_ev_sex', 'sex_end'
+					elseif npc_free_creampies[$boy] = 2:
+						'"Well you said I could come inside you whenever I wanted," he smirks back.'
+						'"I just didn''t expect it right then," you chuckle softly.'
+						gs 'sex_ev_sex', 'sex_end'
+					elseif sex_ev['creampie_allowance'] = 1:
+						'"Well you said I could come inside you today," he smirks back.'
+						if npc_free_creampies[$boy] = 0:
+							'"I guess I was just expecting you to warn me," you chuckle softly.'
+						else
+							'"I just didn''t expect it right then," you chuckle softly.'
+						end
+						gs 'sex_ev_sex', 'sex_end'
+					elseif $sex_ev['cum_choice'] = 'creampie_surprise' and sex_ev['creampie_allowance'] ! 1:
+						'"So you''re not mad?"'
+						gs'sex_ev_reactions_creampie', 'accidents_happen1'
+						gs'sex_ev_reactions_creampie', 'creampie_felt_too_good'
+						gs'sex_ev_reactions_creampie', 'not_mad'
+						gs'sex_ev_reactions_creampie', 'a_little_mad'
+						gs'sex_ev_reactions_creampie', 'creampie_furious'
+						gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+						gs'sex_ev_reactions_creampie', 'have_plan_b'
+					else
+						gs 'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'did_you_come_inside_boy_react1':
+	if npc_selfish[$boy] ! 1 and npc_abusive[$boy] <= 0 and sex_ev['creampie_allowance'] = 0:
+		'"I- wait, you''re not mad?" <<$npc_firstname[$boy]>> asks in surprise.'
+		gs'sex_ev_reactions_creampie', 'accidents_happen1'
+		gs'sex_ev_reactions_creampie', 'creampie_felt_too_good'
+		gs'sex_ev_reactions_creampie', 'not_mad'
+		gs'sex_ev_reactions_creampie', 'a_little_mad'
+		gs'sex_ev_reactions_creampie', 'creampie_furious'
+		gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+		gs'sex_ev_reactions_creampie', 'have_plan_b'
+		gs'sex_ev_reactions_creampie', 'creampie_ask_next_time2'
+		act'"I love creampies"':
+			cla & *nl
+			npc_know_love_creampie[$boy] = 1
+			'"I love creampies," you grin back at him. "Why would I be mad?"'
+			gs'sex_ev_cum', 'what_now'
+		end
+		
+		act'"Why would I be mad?"':
+			cla & *nl
+			'"No?" you reply. "Why would I be mad?"'
+			gs 'sex_ev_sex', 'sex_end'
+		end
+	else
+		gs 'sex_ev_sex', 'sex_end'
+	end
+end
+
+if $ARGS[0] = 'accidents_happen1':
+	act'It was an accident':
+		cla & *nl
+		if sex_ev['accidents_happen'] = 0:
+			'"It was an accident, right?" you ask.'
+			iif(npc_selfish[$boy] ! 1 and npc_abusive[$boy] <= 0 and sex_ev['creampie_allowance'] = 0, '"Yeah," he says abashedly.', '"Yeah," he says, totally straightfaced.')
+			'"Then it''s okay. Accidents happen," you reply, smiling fondly at him.'
+		elseif sex_ev['ma_pill'] = 1:
+			'"I''m already going to get a pill," you smirk amusedly. "What''s one more creampie in that case?"'
+		else
+			'"I told you before didn''t I? Accidents happen," you smile. "No big deal."'
+		end
+		sex_ev['accidents_happen'] = 1
+!!		gs 'sex_ev_sex', 'sex_end'
+		gs'sex_ev_cum', 'what_now'
+	end
+end
+
+if $ARGS[0] = 'creampie_felt_too_good':
+	act'Felt too good':
+		cla & *nl
+		'"Felt too good to be mad," you sigh back. <<$npc_firstname[$boy]>> seems to take this as a good sign.'
+!!		gs 'sex_ev_sex', 'sex_end'
+		gs'sex_ev_cum', 'what_now'
+	end
+end
+
+
+if $ARGS[0] = 'creampie_accident_fine':
+	act'It''s fine':
+		cla & *clr
+		if $sex_ev['position'] = 'miss':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+		elseif $sex_ev['position'] = 'doggy':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+		elseif $sex_ev['position'] = 'cowgirl':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+		end
+		if (sex_ev['virgin_creampie_request'] = 1 and sex_ev['creampie_count'] = 1) or sex_ev['creampie_allowance'] > 0:
+			'"Yeah. You said I could, didn''t you?" he says with a satisfied sigh.'
+			'"Mhm," you smile back. "It''s fine. I was just asking."'
+			gs'sex_ev_sex', 'sex_end'
+		elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+			'"Yeah, your pussy was so tight," he sighs with a beatific smile. "Couldn''t help it."'
+			'"Okay," you smile back. "It''s fine. I was just asking."'
+			gs'sex_ev_sex', 'sex_end'
+		elseif sex_ev['cum_wherever'] = 1:
+			'"You said I could come wherever I wanted," he says, smiling beatifically.'
+			'"I guess I did," you smile back.'
+			gs'sex_ev_sex', 'sex_end'
+		else
+			'"It''s fine," you smile reassuringly.'
+			if sex_ev['just_cum_inside_me'] = 1:
+				gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+			else
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_just_checking':
+	act'Just checking':
+		cla & *clr
+		if $sex_ev['position'] = 'miss':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+		elseif $sex_ev['position'] = 'doggy':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+		elseif $sex_ev['position'] = 'cowgirl':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+		end
+		if (sex_ev['virgin_creampie_request'] = 1 and sex_ev['creampie_count'] = 1) or sex_ev['creampie_allowance'] > 0:
+			'"Yeah. You said I could, didn''t you?" he says with a satisfied sigh.'
+			'"Mhm," you smile back. "I was just checking."'
+			gs'sex_ev_sex', 'sex_end'
+		elseif npc_free_creampies[$boy] = 2 or sex_ev['creampie_allowance'] = 1:
+			'"Yeah," he sighs beatifically.'
+			'"Oh okay," you nod. "Just checking."'
+			gs'sex_ev_sex', 'sex_end'
+		elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+			'"Yeah, your pussy was so tight," he sighs with a beatific smile. "Couldn''t help it."'
+			'"Okay," you smile back. "I was just checking. Wasn''t sure if you finished or not."'
+			gs'sex_ev_sex', 'sex_end'
+		elseif sex_ev['cum_wherever'] = 1:
+			'"You said I could come wherever I wanted," he says, smiling beatifically.'
+			'"I didn''t say it was a problem," you smile back. I was just checking."'
+			gs'sex_ev_sex', 'sex_end'
+		else
+			'"Oh okay," you nod. "Just checking."'
+			if sex_ev['just_cum_inside_me'] = 1:
+				gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+			else
+				gs'sex_ev_sex', 'sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_that_explains':
+	if sex_ev['surprise_cum_together'] = 1:
+		act'That explains it':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+			end
+			if sex_ev['cum_warn'] = 1:
+				'"I was trying to tell you," <<$npc_firstname[$boy]>> pants, breathing hard. "I was going to come... But you weren''t listening..."'
+				'"Ah. That explains it," you say, now being able to recognize the warmth filling up your insides as his cum.'
+			elseif (sex_ev['virgin_creampie_request'] = 1 and sex_ev['creampie_count'] = 1) or sex_ev['creampie_allowance'] > 0:
+				'"Yeah. You said I could, didn''t you?" he says with a satisfied sigh.'
+				'"Ah. That explains it," you say, now being able to recognize the warmth filling up your insides as his cum.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif npc_free_creampies[$boy] = 2 or sex_ev['creampie_allowance'] = 1:
+				'"Yeah," he sighs beatifically.'
+				'"Ah. That explains it, " you say, now being able to recognize the warmth filling up your insides as his cum.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+				'"Yeah, your pussy was so tight," he sighs with a beatific smile. "Couldn''t help it."'
+				'"Ah. That explains it, " you say, now being able to recognize the warmth filling up your insides as his cum.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif sex_ev['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he says, smiling beatifically.'
+				'"Ah. That explains it, " you say, now being able to recognize the warmth filling up your insides as his cum.'
+				gs'sex_ev_sex', 'sex_end'
+			else
+				'"Ah. That explains it, " you say, now being able to recognize the warmth filling up your insides as his cum.'
+				if sex_ev['just_cum_inside_me'] = 1:
+					gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+				else
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+			
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_thought_so':
+	if sex_ev['surprise_cum_together'] = 1:
+		act'I thought so':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+			end
+			if npc_free_creampies[$boy] = 2 or sex_ev['creampie_allowance'] = 1:
+				'"Yeah," he sighs beatifically.'
+				'"Thought so," you say, nodding your head and smiling back at <<$npc_firstname[$boy]>>.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+				'"Yeah, your pussy was so tight," he sighs with a beatific smile. "Couldn''t help it."'
+				'"Thought so," you say, nodding your head and smiling back at <<$npc_firstname[$boy]>>.'
+				gs'sex_ev_sex', 'sex_end'
+			elseif sex_ev['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he says, smiling beatifically.'
+				'"Thought so," you say, nodding your head and smiling back at <<$npc_firstname[$boy]>>.'
+				gs'sex_ev_sex', 'sex_end'
+			else
+				'"Thought so," you say, nodding your head and smiling back at <<$npc_firstname[$boy]>>.'
+				if sex_ev['just_cum_inside_me'] = 1:
+					gs'sex_ev_reactions_creampie', 'did_you_come_inside_boy_react1'
+				else
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+			
+		end
+	end
+end
+
+if $ARGS[0] = 'not_mad':
+	act'I''m not mad':
+		sex_ev['cock_inserted'] = 0
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/drip3.mp4"></video></center>'
+		if sex_ev['pullout_game'] = 1:
+			'"Maybe I should be," you say. "After all that talk about your pullout game..."'
+		elseif sex_ev['promise_no_creampie'] = 1:
+			'"Maybe I should be," you say. "After all, you <i>did</i> just blow your load inside me, and right after you promised you wouldn''t..."'
+		elseif sex_ev['dont_need_condom'] = 1:
+			'"Maybe I should be," you say. "After all, you <i>did</i> just blow your load inside me, right after talking me into not using a condom..."'
+		else
+			'"Maybe I should be," you say. "After all, you <i>did</i> just blow your load inside me without even asking me..."'
+		end
+		'You lay back on the bed, looking up at <<$npc_firstname[$boy]>>, feeling his cum continue to trickle out of your pussy. <<$npc_firstname[$boy]>> gulps.'
+		'But no," you say. "I''m not mad. You didn''t mean to and' + iif(sex_ev['came_together'] > 0, ' I think you''d know I was lying if I said it didn''t feel good.', ' ') + 'I won''t hold it against you." You let your face light up with a smile and <<$npc_firstname[$boy]>> breathes a sigh of relief, letting himself smile as well.'
+		gs'sex_ev_cum', 'what_now'
+	end
+end
+
+if $ARGS[0] = 'a_little_mad':
+	act'I''m a little mad':
+		sex_ev['cock_inserted'] = 0
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/drip3.mp4"></video></center>'
+		if sex_ev['promise_no_creampie'] = 1:
+			'"Well, I am a <i>little</i> mad," you say, letting a hard edge creep into your voice. "After all, you <i>did</i> just blow your load inside me, right after you promised you wouldn''t come inside..."'
+		elseif sex_ev['dont_need_condom'] = 1:
+			'"Well, I am a <i>little</i> mad," you say, letting a hard edge creep into your voice. "After all, you <i>did</i> just blow your load inside me, right after talking me into not using a condom..."'
+		else
+			'"Well, I am a <i>little</i> mad," you say, letting a hard edge creep into your voice. "After all, you did just blow your load into me without even having the common fucking decency of asking."'
+		end
+		'You lay back on the bed, looking up at <<$npc_firstname[$boy]>>, feeling his cum continue to trickle out of your pussy. <<$npc_firstname[$boy]>> gulps.'
+		'But..." you say. ' + iif(sex_ev['came_together'] > 0, '"It felt really good too. If you hadn''t made me come, then I''d probably be beating the shit out of you right now. But you did, so you get off easy this time."', '"Everybody makes mistakes. So I''ll let you off easy this time."') + 'You give <<$npc_firstname[$boy]>> a gentle punch on the arm and let your face light up with a smile. <<$npc_firstname[$boy]>> breathes a sigh of relief, letting himself smile as well.'
+		gs'sex_ev_cum', 'what_now'
+	end
+end
+
+if $ARGS[0] = 'creampie_furious':
+	act'I''m furious!':
+		sex_ev['cock_inserted'] = 0
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/annoyed1.jpg"></center>'
+		'"Mad?" you scoff. "I''m fucking furious!"'
+		'<<$npc_firstname[$boy]>> cringes back as you glare at him with all the anger you can muster.'
+		if sex_ev['promise_no_creampie'] = 1:
+			'"First," you say, jabbing your finger at him in accusation. "I ask you to use a condom. Then you talk me into skipping it, saying ''oh, it''ll be okay, it''s just this one time'' and like a moron, I listened to you. And <i>then</i> right after you promise not to come inside me, you fucking come inside me anyways!" By the time you''re finished with your rant, you''re practically shouting.'
+		elseif sex_ev['dont_need_condom'] = 1:
+			'"First," you say, jabbing your finger at him in accusation. "I ask you to use a condom. Then you talk me into skipping it, saying ''oh, it''ll be okay, it''s just this one time'' and like a moron, I listened to you. And <i>then</i> you fucking come inside me anyways!" By the time you''re finished with your rant, you''re practically shouting.'
+		else
+			'"Who the fuck do you think you are? Blowing your load like that inside me without warning?!" you say, jabbing your finger at him in accusation. "Did you even <i>think</i> about what you are doing? What if I''m not on birth control? What if you''re not clean? What if I DON''T FUCKING WANT YOU TO FUCKING COME INSIDE ME?! DON''T I GET A CHOICE SINCE IT''S MY FUCKING PUSSY THAT YOU''RE FUCKING?!" By the time you''re finished with your rant, you''re practically shouting.'
+		end
+		if sex_ev['came_together'] > 0:
+			'"The only reason I''m not tearing your head off right now is because you somehow managed to make <i>me</i> come in the middle of all of that and if I kill you over this, I''ll feel like a hypocrite. So count yourself lucky, fuckass." You finish with a <i>harumph</i>, sitting down on the bed with enough force to make the frame shake.'
+		end
+		*nl
+		if sex_ev['cum_count'] >= npc_sexdrive[$boy] + sex_ev['extra_cum']:
+			gs'sex_ev_after', 'after_sex1'
+		else
+			'You spend the next minute or so in silence fuming before <<$npc_firstname[$boy]>> gets your attention.'
+			'"So... did you want to keep going?" he asks awkwardly.'
+			act'We''re done':
+				sex_ev['angry_after'] = 1
+				cla & *nl
+				'"Are you fucking kidding me?" you scoff. "No, we''re done fucking now."'
+				gs'sex_ev_after', 'after_sex1'
+			end
+			
+			act'Sure':
+				cla & *nl
+				'"Sure," you grumble and get back into position.'
+				gs'sex_ev_sex', 'reset'
+				gs'sex_ev_sex', 'sex_menu'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_wtf_image':
+	if $sex_ev['position'] = 'miss':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/oops.jpg"></center>'
+	elseif $sex_ev['position'] = 'doggy':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
+	elseif $sex_ev['position'] = 'cowgirl':
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
+	end
+end
+
+if $ARGS[0] = 'creampie_wtf':
+	if sex_ev['creampie_allowance'] ! 1 and sex_ev['creampie_ask'] ! 1 and sex_ev['came_together'] = 0 and npc_free_creampies[$boy] ! 2 and sex_ev['virgin_creampie_request'] ! 1:
+		act'What the fuck!':
+			cla
+			sex_ev['cock_inserted'] = 0
+			sex_ev['react'] = 1
+			sex_ev['mad'] = 1
+			sex_ev['creampie_wtf'] += 1
+			if sex_ev['promise_no_creampie'] = 1:
+				act'You promised you''d pull out!':
+					cla & *clr
+					gs'sex_ev_reactions_creampie', 'creampie_wtf_image'
+					if sex_ev['ma_pill_tomorrow'] = 1:
+						'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after.'
+						'"What? You said you were gonna get the pill tomorrow anyways."'
+						gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						act'That''s not a creampie pass!':
+							cla & *nl
+							'"That isn''t a free pass to come inside me!" you scowl, wiping irritably at your pussy with your fingers.'
+							gs'sex_ev_sex', 'sex_end'
+						end
+					elseif sex_ev['creampie_count'] = 1:
+						'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "You promised you would pull out!"'
+						
+						if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+							if mesec > 0 and (sex_ev['probably_safe_day'] = 1 or sex_ev['safe_day'] = 1):
+								'"Oh, you''ll be fine," he waves dismissively. "You said it yourself, you can''t get pregnant on your period."'
+							else
+								'"Oh, you''ll be fine," he waves dismissively. "One creampie isn''t gonna kill you."'
+							end
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							gs'sex_ev_reactions_creampie', 'creampie_forgive'
+							
+							act'You promised!':
+								cla & *nl
+								'"That doesn''t matter!" you hiss. "You promised!"'
+								'<<$npc_firstname[$boy]>> rolls his eyes and shrugs.'
+								gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+								gs'sex_ev_reactions_creampie', 'creampie_forgive'
+								gs'sex_ev_after', 'quit'
+							end
+						else
+							'"Shit! I know! I know!" he says, looking agitated. "I''m so sorry! Fuck! It was an accident, I swear! I didn''t mean to!"'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							gs'sex_ev_reactions_creampie', 'creampie_forgive'
+						end
+						
+						if birth_control['think_safe'] ! 1:
+							act'I''m not on birth control!':
+								cla & *nl
+								if npc_know_not_bc[$boy] = 1:
+									'"You know I''m not on birth control you fucking moron!" you hiss back.'
+								else
+									npc_know_not_bc[$boy] = 1
+									'"I''m not on birth control you fucking moron!" you hiss back.'
+								end
+								if rand(0,1) = 1:
+									'"You''re not gonna get pregnant from one creampie," he says, rolling his eyes.'
+								else
+									'"Just buy some plan B tomorrow," he  says, rolling his eyes.'
+								end
+								gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+								gs'sex_ev_reactions_creampie', 'creampie_forgive'
+								gs'sex_ev_after', 'quit'
+							end
+						end
+					else
+						'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "You promised you would pull out!"'
+						if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+							if rand(0,1) = 1:
+								'"It''s not like it matters after the first one," he grunts dismissively. "Don''t get bent out of shape."'
+							else
+								'"It''s not like it makes any difference at this point," he says, waving his hand dismissively. "Just buy some plan B tomorrow."'
+							end
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						else
+							'"Fuck! I''m so sorry! " he says, looking ashamed. "It was an accident! I swear! I didn''t mean to!"'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							gs'sex_ev_reactions_creampie', 'creampie_forgive'
+						end
+					end
+				end
+			end
+			if birth_control['think_safe'] ! 1:
+				act'Not on birth control':
+					cla & *clr
+					gs'sex_ev_reactions_creampie', 'creampie_wtf_image'
+					if npc_know_not_bc[$boy] = 1 and sex_ev['ma_pill_tomorrow'] ! 1 and sex_ev['creampie_count'] = 1:
+						'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "You know I''m not on birth control!"'
+						if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+							if mesec > 0:
+								'"Oh, you''ll be fine," he waves dismissively. "You said it yourself, you can''t get pregnant on your period."'
+							elseif rand(0,1) = 1:
+								'"Oh, you''ll be fine," he waves dismissively. "You''re not gonna get knocked up from one creampie."'
+							else
+								'"Oh, you''ll be fine," he waves dismissively. "Just buy some plan B tomorrow."'
+							end
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						else
+							'"Shit! I know! I know!" he says, looking agitated. "I''m so sorry! Fuck! It was an accident, I swear! I didn''t mean to!"'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							gs'sex_ev_reactions_creampie', 'creampie_forgive'
+						end
+					else
+						if sex_ev['ma_pill_tomorrow'] = 1:
+							'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after.'
+							'"What? You said you were gonna get the pill tomorrow anyways."'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							act'That''s not a creampie pass!':
+								cla & *nl
+								'"That isn''t a free pass to come inside me!" you scowl, wiping irritably at your pussy with your fingers.'
+								gs'sex_ev_sex', 'sex_end'
+							end
+	!!					elseif npc_know_not_bc[$boy] = 0:
+						else
+							gs'sex_ev_stats', 'no_birth_control_know'
+							'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "I''m not on birth control!"'
+							if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+								if rand(0,1) = 1:
+									'"Oh, you''ll be fine," he grunts dismissively. "It''s just one cumshot. Don''t get bent out of shape. It''s not gonna kill you."'
+								else
+									'"Oh, you''ll be fine," he says, waving his hand dismissively. "Just buy some plan B tomorrow."'
+								end
+								gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+							else
+								'"Fuck! I''m so sorry! " he says, looking ashamed. "It was an accident, I swear! I didn''t mean to!"'
+								gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+								gs'sex_ev_reactions_creampie', 'creampie_forgive'
+							end
+						end
+					end
+				end
+			end
+			
+			if sex_ev['creampie_wtf'] > 1:
+				act'Again?!':
+					cla & *clr
+					gs'sex_ev_reactions_creampie', 'creampie_wtf_image'
+					'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, a new batch of cum now trickling out of your cunt. "<i>Again?!</i>"'
+					if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+						'"Your pussy''s just too tight," he says, not looking even slightly sorry for his actions. "It keeps sucking me in."'
+					else
+						'<<$npc_firstname[$boy]>> cringes, looking as guilty as you think he is.'
+					end
+					act'No self control?!':
+						cla & *nl
+						'"How fucking hard is it to keep your cum out of my pussy?" you glare, seething. "Do you not have <i>any</i> self control? Just fucking pull out!"'
+						gs'sex_ev_sex', 'sex_end'
+					end
+				end
+			end
+			
+			if npc_ask_creampie[$boy] = 1:
+				act'I told you to ask!':
+					cla & *clr
+					gs'sex_ev_reactions_creampie', 'creampie_wtf_image'
+					'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "I thought I fucking told you to ask!"'
+					if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+						if npc_know_bc[$boy] = 1:
+							'"Don''t be such a bitch," he says, rolling his eyes. "You''re on birth control anyways. Why does it matter?"'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						elseif rand(0,1) = 1:
+							'"Oh, you''ll be fine," he grunts dismissively. "It''s just one cumshot. Don''t get bent out of shape. It''s not gonna kill you."'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						else
+							'"Your pussy''s just too tight," he says, not looking even slightly sorry for his actions. "It keeps sucking me in."'
+							gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						end
+					else
+						'<<$npc_firstname[$boy]>> cringes, looking as guilty as you think he is.'
+						gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						gs'sex_ev_reactions_creampie', 'creampie_forgive'
+					end
+				end
+			else
+				act'You need to ask first!':
+					npc_ask_creampie[$boy] = 1
+					cla & *clr
+					gs'sex_ev_reactions_creampie', 'creampie_wtf_image'
+					'"What the fuck!" you exclaim as <<$npc_firstname[$boy]>> lets his cock slip from your pussy, the flow of liquid you were expecting following out quickly after. "You can''t just come inside me like that! You need to fucking ask me!"'
+					if npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1:
+						if rand(0,1) = 1:
+							'"Oh, you''ll be fine," he grunts dismissively. "It''s just one creampie. Don''t get bent out of shape. It''s not gonna kill you."'
+						else
+							'"Your pussy''s just too tight," he says, not looking even slightly sorry for his actions. "It keeps sucking me in."'
+						end
+						gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+					else
+						'<<$npc_firstname[$boy]>> cringes, looking as guilty as you think he is.'
+						gs'sex_ev_reactions_creampie', 'creampie_wtf_2'
+						gs'sex_ev_reactions_creampie', 'creampie_forgive'
+					end
+				end
+			end			
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_wtf_no_bc':
+
+end
+
+if $ARGS[0] = 'creampie_forgive':
+	act'Forgive him':
+		sex_ev['forgive_creampie'] = 1
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+		'You take a deep breath, looking down at your legs and the cum trickling from between them.'
+		if sex_ev['accidental_creampie'] >= 1:
+			'"It''s... fine I guess," you sigh. "If it was really an accident, I forgive you."'
+		else
+			'"I guess I can forgive you this time..." you sigh. "I don''t feel like being angry right now."'
+		end
+		gs'sex_ev_cum', 'what_now'
+!!		gs'sex_ev_sex', 'sex_end'
+	end
+end
+
+if $ARGS[0] = 'creampie_forgive2':
+	act'Forgive him':
+		cla
+		act'Amused':
+			sex_ev['forgive_creampie'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+			'You take a deep breath, looking down at your legs and the cum trickling from between them.'
+			'"It''s... fine I guess," you sigh. "If it was really an accident, I forgive you."'
+			gs'sex_ev_sex', 'sex_end'
+		end
+		
+		act'Begrudging':
+			sex_ev['forgive_creampie'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+			'You take a deep breath, looking down at your legs and the cum trickling from between them.'
+			'"It''s... fine I guess," you sigh. "If it was really an accident, I forgive you."'
+			gs'sex_ev_sex', 'sex_end'
+		end
+		
+		if birth_control['think_safe'] = 1:
+			act'On birth control':
+				
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'creampie_wtf_2':
+	act'Ignore it':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"Ugh," you grumble, choosing to take the high road on this one. "Whatever."'
+		gs'sex_ev_sex', 'sex_end'
+	end
+	
+	act'You''re an asshole':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"You''re a fucking asshole, you know that?" you sneer.'
+		gs'sex_ev_sex', 'sex_end'
+	end
+end
+
+if $ARGS[0] = 'creampie_accident_oh_shit':
+	if birth_control['think_safe'] ! 1 and sex_ev['creampie_allowance'] ! 1:
+		act'Oh shit! (no birth control)':
+			!! npc_know_not_bc[$boy] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
+			'"Oh shit!" Your eyes go wide in shock and you jump away, quickly spreading your legs to see thick liquid already dripping from your snatch. You look up, making eye contact with <<$npc_firstname[$boy]>>.'
+			gs'sex_ev_reactions_creampie', 'oh_shit_options'
+		end
+	end
+end
+
+if $ARGS[0] = 'oh_shit_options':
+	if sex_ev['creampie_allowance'] = 0 and npc_free_creampies[$boy] < 2 and birth_control['think_safe'] = 0:
+		act'This isn''t good':
+			cla & *nl
+			gs'sex_ev_stats', 'no_birth_control_know'
+			'"Well this isn''t good," you gulp, looking horrified at <<$npc_firstname[$boy]>>. "I''m not on birth control..."'
+			gs'sex_ev_cum', 'what_now'
+		end
+	!!{	if mc_inventory['morning_after_pill'] = 0:
+			act'I guess I need a pill':
+				cla
+				act'Annoyed':
+					sex_ev['ma_pill_tomorrow'] = 1
+					cla & *nl
+					'"I guess I''m going to need a pill tomorrow," you say, frowning.'
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Unconcerned':
+					sex_ev['ma_pill_tomorrow'] = 1
+					cla & *nl
+					'"I guess I''m going to need a pill tomorrow," you shrug, unconcerned.'
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Humorous':
+					sex_ev['ma_pill_tomorrow'] = 1
+					cla & *nl
+					'"I guess I''m going to need a pill tomorrow," you say, giving <<$npc_firstname[$boy]>> a wry smirk to let him know you''re not mad.'
+					gs'sex_ev_cum', 'what_now'
+				end
+			end
+		else}
+			gs'sex_ev_reactions_creampie', 'have_plan_b'
+	!!	end
+	end
+end
+
+if $ARGS[0] = 'have_plan_b':
+	if birth_control['think_safe'] = 0 and npc_know_bc[$boy] ! 1 and sex_ev['plan_b_buy'] ! 1 and sex_ev['ma_pill'] ! 1:
+		if mc_inventory['morning_after_pill'] > 0:
+			act'I have some plan B':
+				cla
+				act'Calm':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					'"I have a morning after pill," you say calmly. "I''ll be okay."'
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Amused':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+						'"It''s okay," you giggle, finding a strange amusement in how unapologetic <<$npc_firstname[$boy]>> is about it. "I have a morning after pill."'
+					else
+						'"It''s okay," you giggle, unable to keep from laughing at <<$npc_firstname[$boy]>>''s worry. "I have some plan B on me."'
+					end
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Sexy':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					'"It''s okay," you say with a sexy smile. "I have a morning after pill."'
+					gs'sex_ev_cum', 'what_now'
+				end
+			end
+		else
+			act'I''ll buy some plan B':
+				cla
+				act'Calm':
+					sex_ev['plan_b_buy'] = 1
+					cla & *nl
+					if npc_pay_for_ma_pill[$boy] = 1:
+						'"I''ll get a morning after pill later," you shrug. "You''re paying for it after all."'
+						'"Yeah..."'
+					else
+						'"I''ll get a morning after pill later," you shrug. "No big deal."'
+					end
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Amused':
+					sex_ev['plan_b_buy'] = 1
+					cla & *nl
+					if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll get a morning after pill later," you giggle, finding a strange amusement in how unapologetic <<$npc_firstname[$boy]>> is about it. "Besides, you''re the one paying for it, aren''t you?"'
+							'"Yeah..."'
+						else
+							'"I''ll get a morning after pill later," you giggle, finding a strange amusement in how unapologetic <<$npc_firstname[$boy]>> is about it.'
+						end
+					else
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll get a morning after pill later," you giggle, unable to keep from laughing at <<$npc_firstname[$boy]>>''s worry. "Besides, you''re paying for it, aren''t you?"'
+							'"Yeah..."'
+						else
+							'"I''ll get a morning after pill later," you giggle, unable to keep from laughing at <<$npc_firstname[$boy]>>''s worry.'
+						end
+					end
+					gs'sex_ev_cum', 'what_now'
+				end
+				
+				act'Sexy':
+					sex_ev['plan_b_buy'] = 1
+					cla & *nl
+					
+					if npc_pay_for_ma_pill[$boy] = 1:
+						'"It''s okay, I''ll get a morning after pill later," you say with a sexy smirk. "You''re paying for it after all."'
+						'"Yeah..."'
+					else
+						'"It''s okay," you say with a sexy smile. "I''ll get a morning after pill later."'
+					end
+					gs'sex_ev_cum', 'what_now'
+				end
+			end
+		end
+	end
+	
+	if stat['safe_day'] = 1 and sex_ev['safe_day'] = 0:
+		
+	elseif stat['probably_safe_day'] = 1 and sex_ev['probably_safe_day'] = 0:
+	
+	end
+end
+
+if $ARGS[0] = 'have_plan_b2':
+	if sex_ev['ma_pill'] = 0 and sex_ev['plan_b_buy'] = 0 and sex_ev['safe_day'] = 0 and sex_ev['probably_safe_day'] = 0 and birth_control['think_safe'] = 0 and npc_know_bc[$boy] ! 1:
+		if mc_inventory['morning_after_pill'] > 0:
+			act'I have some plan B':
+				cla
+				act'Calm':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					'"Don''t worry," you say calmly. "I have a morning after pill."'
+					gs'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Amused':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					'"Don''t worry," you giggle with glee. "I have a morning after pill."'
+					gs'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Sexy':
+					sex_ev['ma_pill'] = 1
+					cla & *nl
+					'"Don''t worry," you say with a sexy smile. "I have a morning after pill."'
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+		else
+			act'I''ll buy some plan B':
+				sex_ev['plan_b_buy'] = 1
+				cla
+				act'Calm':
+				cla & *nl
+					if sex_ev['came_together'] > 0:
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll get a morning after pill later. Besides," you smile tiredly between panting breaths. "You''re paying for it, right?"'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"I''ll get a morning after pill later," you pant. <<$npc_firstname[$boy]>> nods back.'
+						end
+					else
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll get a morning after pill later," you say with calm assurance. "Besides, you''re paying for it, right?"'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"I''ll buy a morning after pill later," you say to <<$npc_firstname[$boy]>> with calm assurance.'
+						end
+					end
+					gs'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Amused':
+					cla & *nl
+					if sex_ev['came_together'] > 0:
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll guess this means I''m going to need to buy a morning after pill later. You''re still paying for it, right?" you giggle breathlessly, still a little giddy from your orgasm.'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"I''ll guess this means I''m going to need to buy a morning after pill later," you giggle breathlessly, still a little giddy from your orgasm.'
+						end
+					else
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll guess this means I''m going to need to buy a morning after pill later. You''re still paying for it, right?" you giggle at <<$npc_firstname[$boy]>>.'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"I''ll guess this means I''m going to need to buy a morning after pill later," you giggle at <<$npc_firstname[$boy]>>.'
+						end
+					end
+					gs'sex_ev_sex', 'sex_end'
+				end
+				
+				act'Sexy':
+					cla & *nl
+					if sex_ev['came_together'] > 0:
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"I''ll buy a morning after pill later," you say, giving <<$npc_firstname[$boy]>> your best post-orgasm smile. "You''ll still pay for it, won''t you?"'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"I''ll guess this means I''m going to need to buy a morning after pill later," you giggle breathlessly, still a little giddy from your orgasm.'
+						end
+					else
+						if npc_pay_for_ma_pill[$boy] = 1:
+							'"Don''t worry," you say, giving <<$npc_firstname[$boy]>> a smouldering look. "I''ll buy a morning after pill later. With your money of course," you add with a wink.'
+							'<<$npc_firstname[$boy]>> nods back.'
+						else
+							'"Don''t worry," you say, giving <<$npc_firstname[$boy]>> a smouldering look. "I''ll buy a morning after pill later."'
+						end
+					end
+					gs'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_accident_birth_control':
+	if birth_control['think_safe'] = 1:
+		if tabletkishot > 0:
+			$sex_ev['bc_type'] = 'shot'
+		else
+			$sex_ev['bc_type'] = 'pill'
+		end
+		act'I''m on the <<$sex_ev[''bc_type'']>>':
+			gs'sex_ev_stats', 'birth_control_know'
+			npc_know_not_bc[$boy] = 0
+			cla & *nl
+			if sex_ev['condom'] = 1:
+				'"It''s okay." you reassure him. "I''m on the <<$sex_ev[''bc_type'']>>. I just like condoms for extra safety."'
+			else
+				'"It''s okay." you reassure him. "I''m on the <<$sex_ev[''bc_type'']>>."'
+			end
+			'<<$npc_firstname[$boy]>> seems to relax, relieved that you''re not upset.'
+			gs'sex_ev_cum', 'what_now'
+		end
+	else
+		act'I''m on birth control (lie)':
+			gs'sex_ev_stats', 'birth_control_know'
+			npc_know_not_bc[$boy] = 0
+			cla & *nl
+			'"It''s okay," you smile, telling a barefaced lie. "I''m on birth control."'
+			'<<$npc_firstname[$boy]>> seems to relax, relieved that you''re not upset.'
+			*nl
+			'<i>I wonder if his baby is going to be swimming around inside me after this?</i>'
+			gs'sex_ev_cum', 'what_now'
+		end
+
+		act'If I get pregnant, you better take responsibility (tease)':
+			cla & *nl
+			'"If I get pregnant, you better take responsibility for this," you say with a smile to let him know you''re only teasing. He seems deeply discomforted by your joke though...'
+			gs'sex_ev_cum', 'what_now'
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_freakout':
+	if sex_ev['creampie_ask'] ! 1 and sex_ev['creampie_allowance'] = 0 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and sex_ev['danger_day'] = 1)):
+		act'Freak the fuck out':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
+			if sex_ev['skip_condom'] = 1:
+				'"Ohmygodohmygodohmygodohmygod!" You cut him off with a torrent of words that spill from your mouth as you hyperventilatea and globs of cum spill from your pussy.'
+			elseif sex_ev['promise_no_creampie'] = 1:
+				!!{ let him fuck you without one if he wouldn''t come inside you
+				if npc_selfish[$boy] = 1:
+					'"Sorry, your pussy was just so tight and I-"'
+				else
+					'"Oh shit! I''m sorry! I''m sorry I''m sorry I-"'
+				end}
+				'"Ohmygodohmygodohmygodohmygod!" You cut him off with a torrent of words that spill from your mouth as you hyperventilatea and globs of cum spill from your pussy. "You said-! You promised-!"'
+			else
+				'"Ohmygodohmygodohmygodohmygod!" You cut him off with a torrent of words that spill from your mouth as you hyperventilatea and globs of cum spill from your pussy.'
+			end
+			'You put your hand to your head as you begin to feel faint.'
+			*nl
+		!!{	if birth_control['think_safe'] = 1:
+				'<i>What was I thinking? What if I get an STD?! Why didn''t I insist on a condom...</i>'
+			else
+				'<i>What was I thinking? What if I get an STD? What if I get pregnant?! Why didn''t I insist on a condom...</i>'
+			end}
+			*nl
+			if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+				'"Jeez, I didn''t know you were going to freak out like this," <<$npc_firstname[$boy]>> says, holding his hands up defensively. "Just chill out! You can buy a morning after pill tomorrow, it''ll be fine."'
+			elseif sex_ev['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted!" <<$npc_firstname[$boy]>> says.'
+			elseif npc_diligent[$boy] > 0:
+				'"Hang on, just calm down. It''ll be okay. As long as you get a morning after pill, it''ll be fine, right?"'
+			else
+				'"I''m so sorry! I swear! I didn''t mean to!" <<$npc_firstname[$boy]>> says panicking just as much as you are.'
+			end
+			act'Calm down':
+				cla & *clr
+				$sex_ev['bed_room']
+				if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0 or npc_diligent[$boy] > 0:
+					'Trying to focus on his words, you force yourself to take deep, slow breaths, calming down while <<$npc_firstname[$boy]>> tries to apologize to you.'
+					'"See? It''s all gonna be fine."'
+				else
+					'You force yourself to take deep, slow breaths, calming down while <<$npc_firstname[$boy]>> tries to apologize to you.'
+				end
+				act'It''ll be fine':
+					cla & *nl
+					if birth_control['think_safe'] < 1:
+						iif(npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0 or npc_diligent[$boy] > 0, '<i>He''s right, it''ll be okay.</i> ', '<i>Everything is fine, you''re going to be fine. </i>') + '<i>You''re going to get a morning after pill tomorrow and you''re <b>not</b> going to get pregnant. You''re going to remember to go to the pharmacy, you''re going to remember to take the pill, and you''re not going to get knocked up tonight! Everything is going to be fine! <b>It''s going to be fine!</b></i>'
+					else
+						iif(npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0 or npc_diligent[$boy] > 0, '<i>He''s right, it''ll be okay.</i> ', '<i>Everything is fine, you''re going to be fine. </i>') + '<i>You''re on birth control so you don''t need another pill. You''re not going to get pregnant! And he''s not going to have an STD. Can''t have one! Because if he did that would be... Nope! I''m not gonna think about that! Because I''m not getting an STD tonight! Everything is going to be fine! <b>It''s going to be fine!</b></i>'
+					end
+					*nl
+					'After running through this thought process several more times accompanied by many more breaths, you finally begin to calm down.'
+					gs'sex_ev_after', 'pre'
+				end
+			end
+
+			act'I have to go!':
+				cla & *clr
+				$sex_ev['bed_room']
+				'"I have to go!" Without warning, you spring up and start grabbing your things, throwing on your clothes with frantic haste.'
+				'"Wha- Where are you going?!"'
+				if birth_control['think_safe'] = 1:
+					'"I just have to go!"'
+					'"I told you, if you''re worried you can just get-"'
+					'"That''s not what this is about!"'
+					'"Then-!"'
+					'"Can''ttalkgottago!"'
+					'You don''t wait to hear what he was trying to say and dash out the door.'
+					*nl
+					'<i>Fuck! What am I going to do if I get an STD?!</i>'
+				else
+					'"I need to get a morning after pill!"'
+					'"Right now?!"'
+					'"Right now!!! I can''t wait even one minute! I can''t get knocked up!"'
+					if hour >= 21:
+						'"No pharmacy is open this time of night! Stop freaking out! Y-"'
+						'"Can''ttalkgottago!"'
+						'You don''t wait to hear what he was trying to say and dash out the door.'
+					else
+						'"Why the rush?? You don''t have to do it right this second-"'
+						'"I have to to be sure! I gotta get it today before the pharmacy closes!"'
+						'"But-!"'
+						'"Can''ttalkgottago!"'
+						'You don''t wait to hear what he was trying to say and dash out the door.'
+					end
+				end
+				act'Leave':gt'sex_ev_leave', 'exit'
+			end
+
+			act'That''s not what I''m concerned about! (STDs)':
+				cla & *clr
+				$sex_ev['bed_room']
+				'"That''s not what I''m concerned about!" you say, your hyperventilating getting worse.'
+				'"Then wha- Wait, you think I have an STD???"'
+				'"I don''t know! You could! I just don''t know!"'
+				'"If you were really concerned about that then why would you let me fuck without a condom??"'
+				if sex_ev['condom'] >= 2:
+					'"You didn''t want to use one!" you yelp.'
+				else
+					'"<i>I! DON''T! KNOW!</i>" you scream.'
+				end
+				'"Well I''m fucking clean, alright?! I promise!"'
+
+				act'Calm down':
+					cla & *clr
+					$sex_ev['bed_room']
+					'Trying to focus on his words, you force yoruself to take deep, slow breaths, calming down while <<$npc_firstname[$boy]>> tries to reassure you.'
+					'<i>He''s right, it''ll be okay. You''re on birth control and he came inside you so it''s okay! He''s not going to have an STD. Can''t have one! Because if he did that would... Nope! I''m not gonna think about that! Because I''m not getting an STD tonight! Everything is going to be fine! <b>It''s going to be fine!</b></i>'
+					*nl
+					'After running through this thought process several more times accompanied by many more breaths, you finally begin to calm down.'
+					gs'sex_ev_after', 'pre'
+				end
+
+				act'I have to go!':
+					cla & *clr
+					$sex_ev['bed_room']
+					'"I have to go!" Without warning, you spring up and start grabbing your things, throwing on your clothes with frantic haste.'
+					'"Wha- Where are you going?!"'
+					'"I just have to go!"'
+					'"If you''re worried about that then leaving now isn''t going to-"'
+					'"That''s not what this is about!"'
+					'"Then-!"'
+					'"Can''ttalkgottago!"'
+					'You don''t wait to hear what he was trying to say, you don''t even really know what you''re saying, and you dash out the door.'
+					*nl
+					'<i>Fuck! What am I going to do if I get an STD?!</i>'
+					act'Leave':gt'sex_ev_leave', 'exit'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'pullout_game_tease':
+	if sex_ev['pullout_game'] > 0 and $sex_ev['last_cum'] = 'creampie' and sex_ev['creampie_surprise'] = 1:
+		act'Pullout game, huh? (laugh it off)':
+			cla & *clr
+			if $sex_ev['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+			elseif $sex_ev['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/smile1.jpg"></center>'
+			elseif $sex_ev['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+			end
+			'"So much for ''pullout game,''" you smile teasingly at <<$npc_firstname[$boy]>>.'
+			if npc_selfish[$boy] ! 1 and npc_abusive[$boy] <= 0 and sex_ev['creampie_allowance'] = 0:
+				'"S-sorry," he stammers, blushing furiously.'
+				'His face makes you laugh wholeheartedly' + iif(sex_ev['cock_inserted'] = 1,' unable to help but notice how it makes your pussy flex around his cock and cum inside you.', '.')
+			else
+				'"Sorry," he says, not looking sorry at all. "I really tried to, but I couldn''t help it."'
+				'You roll your eyes to the heavens.'
+			end
+			'"So... are you mad?"'
+			gs'sex_ev_reactions_creampie', 'accidents_happen1'
+			gs'sex_ev_reactions_creampie', 'creampie_felt_too_good'
+			gs'sex_ev_reactions_creampie', 'not_mad'
+			gs'sex_ev_reactions_creampie', 'a_little_mad'
+			gs'sex_ev_reactions_creampie', 'creampie_safe_day'
+			gs'sex_ev_reactions_creampie', 'have_plan_b'
+		end
+	end
+end
+
+--- sex_ev_reactions_creampie ---------------------------------

locations/sex_ev_sex.qsrc

@@ -16,7 +16,7 @@ end
 
 if $ARGS[0] = 'sex_start':
 	if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0: 
-		act'Give him your virginity':gs'sex_ev_virgin', 'start1'
+		gs'sex_ev_virgin', 'start1'
 	elseif sex_ev['fuck_count'] = 0 and ($sex_ev['position'] ! 'miss' or  $sex_ev['position'] ! 'doggy' or  $sex_ev['position'] ! 'cowgirl'):
 		act'Fuck <<$npc_firstname[$boy]>>':sex_ev['must_fuck'] = 1 & gs 'sex_ev_sex', 'sex_pre'
 	elseif sex_ev['cock_inserted'] = 1 and $sex_ev['last_cum'] = 'creampie' and ($sex_ev['position'] = 'miss' or  $sex_ev['position'] = 'doggy' or  $sex_ev['position'] = 'cowgirl'):
@@ -111,7 +111,7 @@ if $ARGS[0] = 'sex_pre':
 	end
 	sex_ev['position_choose'] = 1
 	gs 'stat'
-	if sex_ev['condom'] ! 0 or sex_ev['no_condom'] ! 0:
+	if sex_ev['no_condom'] ! 0:
 		gs 'sex_ev_sex', 'position_choose'
 	end
 	gs 'sex_ev_condoms', 'condoms'
@@ -185,35 +185,52 @@ if $ARGS[0] = 'he_choose_position':
 	else
 		'"Do whatever you want to me <<$npc_lovername[$boy]>>," you smile.'
 	end
-	act'Continue':
-		if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
-			cla & *clr
-			$sex_ev['position'] = 'miss'
-			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
-			'"I wanna fuck your pussy."'
-			act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
-			act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
-		elseif rand(0,1) = 1:
-			if $npc_fav_pos[$boy] = 'miss':
-				gs 'sex_ev_miss', 'missionary_start'
-			elseif $npc_fav_pos[$boy] = 'doggy':
-				gs 'sex_ev_doggy', 'doggy_start'
-			elseif $npc_fav_pos[$boy] = 'cowgirl':
-				gs 'sex_ev_cowgirl', 'cowgirl_start'
-			elseif $npc_fav_pos[$boy] = 'blowjob' and sex_ev['must_fuck'] ! 1:
+	
+!!	
+	if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
+		act'Continue':
+			if sex_ev['virgin'] ! 1 or npc_selfish[$boy] = 1:
+				cla & *clr
+				$sex_ev['position'] = 'miss'
+				'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+				'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+				'"I wanna fuck your pussy."'
+				act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
+				gs'sex_ev_virgin', 'start3'
+			elseif $npc_fav_pos[$boy] = 'blowjob':
 				gs 'sex_ev_foreplay', 'bj_ask'
-			elseif npc_pussyeater[$boy] = 1 and sex_ev['must_fuck'] ! 1:
+			else
 				*nl
 				'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
 				gs 'sex_ev_foreplay', 'kuni_start'
-			else
-				gs 'sex_ev_sex', 'rand_position'
 			end
+		end
+	elseif rand(0,1) = 1:
+		if $npc_fav_pos[$boy] = 'miss':
+			sex_ev['fuck_pos'] = 1
+			gs 'sex_ev_miss', 'missionary_start'
+		elseif $npc_fav_pos[$boy] = 'doggy':
+			sex_ev['fuck_pos'] = 1
+			gs 'sex_ev_doggy', 'doggy_start'
+		elseif $npc_fav_pos[$boy] = 'cowgirl':
+			sex_ev['fuck_pos'] = 1
+			gs 'sex_ev_cowgirl', 'cowgirl_start'
+		elseif $npc_fav_pos[$boy] = 'blowjob' and sex_ev['must_fuck'] ! 1:
+			gs 'sex_ev_foreplay', 'bj_ask'
+		elseif npc_pussyeater[$boy] = 1 and sex_ev['must_fuck'] ! 1:
+			*nl
+			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
+			gs 'sex_ev_foreplay', 'kuni_start'
 		else
 			gs 'sex_ev_sex', 'rand_position'
 		end
+		if sex_ev['condom_check'] ! 1: gs 'sex_ev_condoms', 'condoms'
+	else
+		gs 'sex_ev_sex', 'rand_position'
+		if sex_ev['condom_check'] ! 1: gs 'sex_ev_condoms', 'condoms'
 	end
+	
+!!	end
 end
 
 if $ARGS[0] = 'rand_position':
@@ -233,10 +250,10 @@ if $ARGS[0] = 'rand_position':
 		elseif sex_ev['position_rand'] = 3:
 			!! cowgirl
 			gs 'sex_ev_cowgirl', 'cowgirl_start'
-		elseif sex_ev['position_rand'] = 4 and sex_ev['must_fuck'] ! 1:
+		elseif sex_ev['position_rand'] = 4:
 			!! blowjob
 			gs 'sex_ev_foreplay', 'bj_ask'
-		elseif sex_ev['position_rand'] = 5 and sex_ev['must_fuck'] ! 1 and (sex_ev['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
+		elseif sex_ev['position_rand'] = 5 and (sex_ev['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
 			*nl
 			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
 			gs 'sex_ev_foreplay', 'kuni_start'
@@ -253,16 +270,16 @@ end
 if $ARGS[0] = 'fuck_arousal_code':
 	sex_ev['fuck_time_temp'] = rand(1,4)
 	sex_ev['fuck_time_total'] += sex_ev['fuck_time_temp']
-	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'],'no_orgasm_msg'
-	gs 'arousal', 'vaginal', -sex_ev['fuck_time_temp'],'no_orgasm_msg'
+	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	if sex_ev['fuck_enjoyment'] > 0: gs 'arousal', 'vaginal', -sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'stat'
 end
 
 if $ARGS[0] = 'fuck_rough_arousal_code':
 	sex_ev['fuck_time_temp'] = rand(1,4)
 	sex_ev['fuck_time_total'] += sex_ev['fuck_time_temp']
-	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'],'no_orgasm_msg', 'rough'
-	gs 'arousal', 'vaginal', -sex_ev['fuck_time_temp'],'no_orgasm_msg', 'rough'
+	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'rough'
+	if sex_ev['fuck_enjoyment'] > 0: gs 'arousal', 'vaginal', -sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'rough'
 	gs 'stat'
 end
 
@@ -270,7 +287,7 @@ if $ARGS[0] = 'fuck_rough_no_cum_code':
 	$orgasm_or = 'no'
 	sex_ev['fuck_time_temp'] = rand(1,4)
 	sex_ev['fuck_time_total'] += sex_ev['fuck_time_temp']
-	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'],'no_orgasm_msg', 'rough'
+	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'rough'
 	gs 'stat'
 end
 
@@ -278,7 +295,7 @@ if $ARGS[0] = 'fuck_no_cum_code':
 	$orgasm_or = 'no'
 	sex_ev['fuck_time_temp'] = rand(1,4)
 	sex_ev['fuck_time_total'] += sex_ev['fuck_time_temp']
-	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'],'no_orgasm_msg'
+	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'stat'
 end
 
@@ -286,7 +303,7 @@ if $ARGS[0] = 'fuck_arousal_cum_code':
 	sex_ev['fuck_time_temp'] = 1
 	sex_ev['fuck_time_total'] += 1
 	if sex_ev['creampie_ask'] = 1: sex_ev['ask_creampie_count'] += 1
-	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'],'no_orgasm_msg'
+	gs 'arousal', 'vaginal', sex_ev['fuck_time_temp'], 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'stat'
 end
 
@@ -299,7 +316,7 @@ if $ARGS[0] = 'girl_orgasm_change_position':
 		else
 			gs 'sex_ev_doggy', 'doggy_girl_orgasm_continue'
 !!		else
-!!			gs 'sex_ev_cowgirl', 'cowgirl_girl_orgasm_continue'
+!!!			gs 'sex_ev_cowgirl', 'cowgirl_girl_orgasm_continue'
 		end
 	end
 end
@@ -334,16 +351,16 @@ if $ARGS[0] = 'fuck_continue':
 			act'Fake some moans':sex_ev['moan'] = 2 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
 			act'Starting to feel good':sex_ev['fuck_pain'] = -1 & $orgasm_or = '' & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
 		else
-			act'Focus on the sensations':$orgasm_or = '' & sex_ev['dirty_talk'] = 0 & sex_ev['moan'] = 0 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
-			act'Moan softly':$orgasm_or = '' & sex_ev['dirty_talk'] = 0 & sex_ev['moan'] = 1 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
-			act'Moan loudly':$orgasm_or = '' & sex_ev['dirty_talk'] = 0 & sex_ev['moan'] = 2 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
-	!!		act'Dirty talk...':gs 'sex_ev_sex', 'dirty_talk1'
-			act'Dirty talk':
+			act'Focus on the sensations':$orgasm_or = '' & $sex_ev['dirty_talk'] = '' & sex_ev['moan'] = 0 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+			act'Moan softly':$orgasm_or = '' & $sex_ev['dirty_talk'] = '' & sex_ev['moan'] = 1 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+			act'Moan loudly':$orgasm_or = '' & $sex_ev['dirty_talk'] = '' & sex_ev['moan'] = 2 & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+			act'Dirty talk...':gs 'sex_ev_sex', 'dirty_talk1'
+	!!{		act'Dirty talk':
 				$orgasm_or = ''
 				sex_ev['moan'] = 0
 				sex_ev['dirty_talk'] = 1
 				gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
-			end
+			end}
 !!{			if $sex_ev['speed'] ! 3:
 				act'Talk while fucking':
 					cla
@@ -354,9 +371,18 @@ if $ARGS[0] = 'fuck_continue':
 					end
 				end
 			end}
-			if sex_ev['fuck_enjoyment'] ! 2:
-				act'Fake enjoyment':sex_ev['bored'] = 1 & sex_ev['moan'] = 3 & $orgasm_or = 'no' & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
-			end
+			
+		end
+		
+!!{		if sex_ev['fuck_enjoyment'] ! 2:
+			act'Fake enjoyment':sex_ev['bored'] = 1 & sex_ev['moan'] = 3 & $orgasm_or = 'no' & gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+		end}
+		
+		act'Try to make <<$npc_firstname[$boy]>> come':
+			cla
+			sex_ev['cum_speed_up'] = 1
+			sex_ev['extra_stim'] += 1
+			gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
 		end
 		
 		act'Change position':
@@ -367,6 +393,14 @@ if $ARGS[0] = 'fuck_continue':
 		
 		if $sex_ev['position'] = 'cowgirl':
 			act'Change pace':gs 'sex_ev_cowgirl', 'cowgirl_change_pace'
+		else
+!!{			if sex_ev['speed'] = 1:
+				
+			elseif sex_ev['speed'] = 2:
+				
+			elseif sex_ev['speed'] = 3:
+				
+!!			end}
 		end
 		
 		if sex_ev['stop_orgasm'] = 0:
@@ -384,15 +418,34 @@ if $ARGS[0] = 'fuck_continue':
 				gs 'sex_ev_sex', 'fuck_continue'
 			end
 		end
+		
 		gs'sex_ev_after', 'tap_out'
+		
+		
+		act'Ask <<$npc_firstname[$boy]>> to hurry up and finish':
+			cla
+			sex_ev['hurry_up'] = 1
+			sex_ev['boy_cum'] = 1
+			gs 'sex_ev_sex', 'hurry_up_menu'
+		end
+		
+		if sex_ev['pc_cocaine'] = 1 and sex_ev['boy_cocaine'] = 1:
+			act'Fuck all night long':gt'sex_ev_events', 'coke_all_nighter'
+		end
 	else
 		sex_ev['girl_orgasm'] = 0
-		if $npc_fav_pos[$boy] = 'miss' and rand(0,1) = 1:
-			gs 'sex_ev_miss', 'miss_girl_orgasm_continue'
-		elseif $npc_fav_pos[$boy] = 'doggy' and rand(0,1) = 1:
-			gs 'sex_ev_doggy', 'doggy_girl_orgasm_continue'
-		elseif $npc_fav_pos[$boy] = 'cowgirl' and rand(0,1) = 1:
-			gs 'sex_ev_cowgirl', 'cowgirl_girl_orgasm_continue'
+		if rand(1,3) = 1:
+			if $npc_fav_pos[$boy] = 'miss' and rand(0,1) = 1:
+				gs 'sex_ev_miss', 'miss_girl_orgasm_continue'
+			elseif $npc_fav_pos[$boy] = 'doggy' and rand(0,1) = 1:
+				gs 'sex_ev_doggy', 'doggy_girl_orgasm_continue'
+			elseif $npc_fav_pos[$boy] = 'cowgirl' and rand(0,1) = 1:
+				gs 'sex_ev_cowgirl', 'cowgirl_girl_orgasm_continue'
+			else
+				gs 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>>_girl_orgasm_continue'
+			end
+!!		elseif rand(1,2) = 1:
+!!			gs 'sex_ev_doggy', 'doggy_girl_orgasm_continue'
 		else
 			gs 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>>_girl_orgasm_continue'
 		end
@@ -476,6 +529,72 @@ if $ARGS[0] = 'position_change':
 	end
 end
 
+if $ARGS[0] = 'fuck_me_faster':
+	act'Ask <<$npc_firstname[$boy]>> to fuck you faster':
+		cla & *clr
+		if $sex_ev['position'] = 'miss':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+		elseif $sex_ev['position'] = 'doggy':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+		elseif $sex_ev['position'] = 'cowgirl':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+		end
+	end
+end
+
+if $ARGS[0] = 'hurry_up_menu':
+	act'Running out of time':
+		cla & *nl
+		sex_ev['no_time_stop'] = 1
+		if sex_ev['speed'] < 3:
+			'"Are you close to coming?" you ask, looking at the clock. "I need to get going soon."'
+		else
+			'"Are you close to coming?" you barely manage to pant out, looking at the clock. "I need to get going soon."'
+		end
+		'"Just give me a minute," he grunts back.'
+		act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+	end
+	
+	act'Need to get to work':
+		cla & *nl
+		sex_ev['work_stop'] = 1
+		if sex_ev['speed'] < 3:
+			'"Hey, are you close?" you ask, looking at the clock. "I need to get work soon."'
+		else
+			'"Hey-! Are you-! Close-?" you barely manage to pant out, looking at the clock. "I need to-! Get to work soon-!"'
+		end
+		'"Just give me a minute," he grunts back.'
+		act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+	end
+	
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 6:
+		act'Need to get to school':
+			cla & *nl
+			sex_ev['school_stop'] = 1
+			if sex_ev['speed'] < 3:
+				'"Hey, are you close?" you ask, looking at the clock. "We need to stop soon or I''ll be late for school."'
+			else
+				'"Hey-! Are you-! Close-?" you barely manage to pant out, looking at the clock. "I need to-! Get to class-!"'
+			end
+			'"Just give me a minute," he grunts back.'
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+		end
+	end
+	
+!!{	if sex_ev['fuck_enjoyment'] = 0:
+		act'This is boring':
+			cla & *nl
+			if sex_ev['speed'] < 3:
+				'"Can you hurry up and come already?" you sigh loudly. "This is kinda boring."'
+			else
+				'"Can you hurry up and come already?" you barely manage to pant out. "This is kinda boring."'
+			end
+			'"Just give me a minute," he grunts back.'
+			act'Continue':gt 'sex_ev_<<$sex_ev[''position'']>>', '<<$sex_ev[''position'']>><<sex_ev[''speed'']>>.2'
+		end
+	end}
+end
+
 if $ARGS[0] = 'girl_cum_pre':
 	*nl
 	'It isn''t long before you feel right at the edge of climax. Your body tenses up, pressure builds inside you, straining against your skin which feels hot and tingly. You feel like you''re going to explode any second now.'
@@ -495,6 +614,7 @@ if $ARGS[0] = 'sex_end':
 		gs'sex_ev_sex', 'take_a_break'
 		gs'sex_ev_sex', 'harden_hand'
 		gs'sex_ev_sex', 'harden_mouth'
+		gs'sex_ev_after', 'tap_out'
 	end
 !!	act'Clean up': gs'sex_ev_after', 'wipe_menu'
 !!	gs'sex_ev_after', 'his_wipes'
@@ -504,7 +624,11 @@ if $ARGS[0] = 'sex_end':
 		gs'sex_ev_reactions', 'cum_kiss_cock'
 		gs'sex_ev_reactions', 'cum_react'
 	end
-	gs'sex_ev_after', 'tap_out'
+	
+	if sex_ev['hurry_up'] > 0:
+		cla
+		gs 'sex_ev_after', 'stop_hurry1'
+	end
 end
 
 if $ARGS[0] = 'speed_select':
@@ -524,24 +648,24 @@ end
 if $ARGS[0] = 'dirty_talk1':
 	cla
 	act'... about his cock':
-		sex_ev['dirty_talk'] = 1
+		$sex_ev['dirty_talk'] = 'cock'
 		gs 'sex_ev_sex', 'dirty_talk2'
 	end
 	
 	act'... about your arousal':
-		sex_ev['dirty_talk'] = 2
+		$sex_ev['dirty_talk'] = 'arousal'
 		gs 'sex_ev_sex', 'dirty_talk2'
 	end
 	
 	act'... about his fucking':
-		sex_ev['dirty_talk'] = 3
+		$sex_ev['dirty_talk'] = 'technique'
 		gs 'sex_ev_sex', 'dirty_talk2'
 	end
 	
-!!	act'... because you''re a dirty girl':
-!!		sex_ev['dirty_talk'] = 4
-!!		gs 'sex_ev_sex', 'dirty_talk2'
-!!	end
+	act'... because you''re a dirty girl':
+		$sex_ev['dirty_talk'] = 'dirty_girl'
+		gs 'sex_ev_sex', 'dirty_talk2'
+	end
 end
 
 if $ARGS[0] = 'dirty_talk2':
@@ -860,6 +984,7 @@ if $ARGS[0] = 'birth_control_take':
 end
 
 if $ARGS[0] = 'he_end_break':
+	gs 'sex_ev_sex', 'reset'
 	sex_ev['position_rand'] = rand(1,5)
 	cla & *clr
 	$sex_ev['bed_room']
@@ -870,23 +995,23 @@ if $ARGS[0] = 'he_end_break':
 		act'... giggles':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as he forces your legs open and lines his cock up with your pussy.'
+			'You burst into uncontrollable giggles as <<$npc_firstname[$boy]>> forces your legs open and lines his cock up with your pussy.'
 			if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 				act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
-				act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
+				gs'sex_ev_virgin', 'start3'
 			else
-				act'Get fucked':gs'sex_ev_miss', 'miss_goto'
+				gs'sex_ev_miss', 'miss_goto'
 			end
 		end
 		act'... a yelp of surprise':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from your lips as he forces your legs open and lines his cock up with your pussy.'
+			'You yelp loudly as <<$npc_firstname[$boy]>> grabs you, forcing your legs open and lining his cock up with your pussy.'
 			if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0:
 				act'Stop him (virgin)':gt'sex_ev_virgin', 'lover_wait'
-				act'Let him take your virginity':gs'sex_ev_virgin', 'start3'
+				gs'sex_ev_virgin', 'start3'
 			else
-				act'Get fucked':gs'sex_ev_miss', 'miss_goto'
+				gs'sex_ev_miss', 'miss_goto'
 			end
 		end
 	elseif sex_ev['position_rand'] = 2 or $npc_fav_pos[$boy] = 'doggy':
@@ -896,13 +1021,13 @@ if $ARGS[0] = 'he_end_break':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
 			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass, lining his cock up with your pussy.'
-			act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+			gs'sex_ev_doggy', 'doggy_goto'
 		end
 		act'... a yelp of surprise':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
 			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass before plunging his cock into your pussy.'
-			act'Get fucked':gs'sex_ev_doggy', 'doggy_goto'
+			gs'sex_ev_doggy', 'doggy_goto'
 		end
 	elseif sex_ev['position_rand'] = 3 and sex_ev['must_fuck'] ! 1:
 		!! blowjob
@@ -911,12 +1036,12 @@ if $ARGS[0] = 'he_end_break':
 		'"I can''t stop thinking about your mouth around my cock," he says, his stare becoming even more predatory.'
 		gs 'sex_ev_foreplay', 'bj_ask2'
 	elseif sex_ev['position_rand'] = 4 and (cum_loc['vagina'] = 0 or npc_pussyeater[$boy] = 1):
-		gs 'arousal', 'foreplay', -5, 'no_orgasm_msg'
+		gs 'arousal', 'foreplay', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		'After a few minutes, <<$npc_firstname[$boy]>> climbs on top of you without saying anything.'
 		'"Hey, what are you-" you start to ask until his head descends to your stomach. He lightly kisses it, sending shivers across your skin, before kissing again and again and again, each kiss lower than the last, slowly heading towards your thighs.'
 		gs 'sex_ev_foreplay', 'kuni_start'
 	else
-		gs 'arousal', 'foreplay', -5, 'no_orgasm_msg'
+		gs 'arousal', 'foreplay', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		'After a few minutes, <<$npc_firstname[$boy]>> climbs on top of you without saying anything.'
 		'"Hey, what are you-" you start to ask until his head descends to your neck. He lightly kisses your throat, sending shivers across your skin, before kissing again and again and again, each kiss lower than the last, blazing a trail down your collarbone to the breasts his hands are already thoroughly massaging.'
 		act'Continue':gs 'sex_ev_foreplay', 'nipple_play'
@@ -930,15 +1055,28 @@ if $ARGS[0] = 'keep_going':
 		elseif $sex_ev['position'] = 'miss' or $sex_ev['position'] = 'doggy' or $sex_ev['position'] = 'cowgirl':
 			
 			minut += rand(1,2)
-			if sex_ev['cock_inserted'] = 1 and $sex_ev['last_cum'] = 'creampie':
-				cla & *nl
-				'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
+			if sex_ev['boy_cocaine'] > 0:
+				if sex_ev['cock_inserted'] = 1 and $sex_ev['last_cum'] = 'creampie':
+					cla & *nl
+					'"Wanna keep going?" you ask, flexing your pussy around his cock. Having lost none of its hardness, it twitches inside you in response, causing you to grin. "That feels like a yes."'
+				else
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+					'"Wanna keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
+					'"Fuck yes," he grins back, his cock still stiff as a rock despite having just come.'
+					!!act'Sex':cla & gs'sex_ev_sex', 'position_choose' & gs 'sex_ev_condoms', 'condoms'
+				end
 			else
-				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
-				'"Wanna keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
-				'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
-				!!act'Sex':cla & gs'sex_ev_sex', 'position_choose' & gs 'sex_ev_condoms', 'condoms'
+				if sex_ev['cock_inserted'] = 1 and $sex_ev['last_cum'] = 'creampie':
+					cla & *nl
+					'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
+				else
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+					'"Wanna keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
+					'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
+					!!act'Sex':cla & gs'sex_ev_sex', 'position_choose' & gs 'sex_ev_condoms', 'condoms'
+				end
 			end
 			gs'sex_ev_sex', 'reset'
 			gs'sex_ev_sex', 'sex_menu'
@@ -961,7 +1099,7 @@ if $ARGS[0] = 'keep_going':
 end
 
 if $ARGS[0] = 'sex_menu':
-	act'Let him lead':cla & gs 'sex_ev_sex', 'he_choose_position'
+	act'Let him lead':cla & sex_ev['force_initiative'] = 2 & gs 'sex_ev_sex', 'he_choose_position'
 	act'Foreplay':cla & gs 'sex_ev_foreplay', 'foreplay_choose'
 	gs'sex_ev_sex', 'sex_start'
 end
@@ -1226,6 +1364,8 @@ if $ARGS[0] = 'reset':
 	if sex_ev['orgasm'] < orgasm and sex_ev['virgin'] = 1:
 		sex_ev['fuck_enjoyment'] = 0
 		sex_ev['fuck_pain'] = 0
+!!	else
+		
 	end
 	sex_ev['orgasm'] = orgasm
 	sex_ev['kiss'] = 0
@@ -1242,9 +1382,12 @@ if $ARGS[0] = 'reset':
 	sex_ev['cleanup'] = 0
 	if sex_ev['came_together'] > 0:
 		sex_ev['came_together'] = 0
-		sex_ev['creampie_orgasm'] = 1
+!!		sex_ev['creampie_orgasm'] += 1
+		sex_ev['simultaneous_orgasm_count'] += 1
 		sex_ev['did_we_cum_together'] = 0
 	end
+	sex_ev['creampie_surprise'] = 0
+	sex_ev['surprise_cum_together'] = 0
 	sex_ev['cum_together_fake'] = 0
 	sex_ev['cum_react'] = 0
 	if sex_ev['mad'] = 1:sex_ev['mad'] = 2
@@ -1273,6 +1416,7 @@ if $ARGS[0] = 'reset':
 	sex_ev['smoke_break'] = 0
 	sex_ev['first_break'] = 0
 	sex_ev['cycle_limit'] = 0
+	sex_ev['extra_stim'] = 0
 	if sex_ev['consecutive_orgasm'] = 0: sex_ev['magik'] = pcs_magik
 	$sex_ev['reaction'] = ''
 	sex_ev['just_cum_inside_me'] = 0
@@ -1284,69 +1428,45 @@ if $ARGS[0] = 'reset':
 	sex_ev['cock_sex_clean'] = 0
 	if sex_ev['creampie_force'] = 1: sex_ev['creampie_force'] = 2
 	sex_ev['creampie_ask'] = 0
+	sex_ev['cant_hold_cum'] = 0
+	sex_ev['condom_check'] = 0
+	sex_ev['fuck_pos'] = 0
+	sex_ev['boy_shower'] = 0
+	$sex_ev['end_comment'] = ''
+	$sex_ev['cum_together_dialogue1'] = ''
 end
 
 if $ARGS[0] = 'pain':
-	if sex_ev['speed'] ! 3:
-		if $npc_dick_desc[$boy] = 'lengthy':
-			if pcs_vag <= 20:
-				gs 'pain', 2, 'cervix', 'hit'
-			else
-				gs 'pain', 1, 'cervix', 'hit'
-			end
-		elseif $npc_dick_desc[$boy] = 'gigantic':
-			if pcs_vag <= 20:
-				gs 'pain', 2, 'cervix', 'hit'
-				gs 'pain', 1, 'vaginal', 'stretch'
-			else
-				gs 'pain', 1, 'cervix', 'hit'
-			end
-		elseif $npc_dick_desc[$boy] = 'monster':
-			if pcs_vag <= 20:
-				gs 'pain', 2, 'cervix', 'hit'
-				gs 'pain', 2, 'vaginal', 'stretch'
-			else
-				gs 'pain', 1, 'cervix', 'hit'
-				gs 'pain', 1, 'vaginal', 'stretch'
-			end
-		end
-	else
-		if $npc_dick_desc[$boy] = 'lengthy':
-			if pcs_vag <= 20:
-				gs 'pain', 3, 'cervix', 'hit'
-			else
-				gs 'pain', 2, 'cervix', 'hit'
-			end
-		elseif $npc_dick_desc[$boy] = 'gigantic':
-			if pcs_vag <= 20:
-				gs 'pain', 3, 'cervix', 'hit'
-				gs 'pain', 2, 'vaginal', 'stretch'
+	if pcs_traits['elastigirl'] ! 1:
+		if sex_ev['lube_active'] ! 1:
+			if sex_ev['speed'] ! 3:
+				sex_ev['pain_value'] = dick - pcs_vag
+				if pcs_vag < dick:
+					gs 'pain', sex_ev['pain_value'], 'cervix', 'hit'
+					gs 'pain', sex_ev['pain_value'], 'vaginal', 'stretch'
+				end
 			else
-				gs 'pain', 2, 'cervix', 'hit'
+				sex_ev['pain_value'] = ((dick - pcs_vag) / 2)
+				if pcs_vag < dick:
+					gs 'pain', sex_ev['pain_value'], 'cervix', 'hit'
+					gs 'pain', sex_ev['pain_value'], 'vaginal', 'stretch'
+				end
 			end
-		elseif $npc_dick_desc[$boy] = 'monster':
-			if pcs_vag <= 20:
-				gs 'pain', 3, 'cervix', 'hit'
-				gs 'pain', 2, 'vaginal', 'stretch'
+			if sex_ev['fuck_enjoyment'] = -1: gs 'pain', 1, 'vaginal', 'ache'
+			if sex_ev['fuck_time_total'] > pcs_vag * 3 and sex_ev['pain_counter'] = 0:
+				sex_ev['pain_counter'] = 1
+				gs 'pain', 1, 'vaginal', 'ache'
 			else
-				gs 'pain', 2, 'cervix', 'hit'
-				gs 'pain', 2, 'vaginal', 'stretch'
+				sex_ev['pain_counter'] -= 1
 			end
 		end
 	end
-	if sex_ev['fuck_enjoyment'] = -1: gs 'pain', 1, 'vaginal', 'ache'
-	if sex_ev['fuck_time_total'] > pcs_vag * 3 and sex_ev['pain_counter'] = 0:
-		sex_ev['pain_counter'] = 1
-		gs 'pain', 2, 'vaginal', 'ache'
-	else
-		sex_ev['pain_counter'] -= 1
-	end
 end
 
 if $ARGS[0] = 'sleep_sex':
 	sex_ev['start_time'] = totminut
 	sex_ev['sleep_fuck'] = 1
-	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg'
+	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	if npc_sex_speed <= 2:
 		$sex_ev['sleep_video1'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow<<rand(1,2)>>.mp4"></video></center>'
 		$sex_ev['sleep_video2'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow2.mp4"></video></center>'
@@ -1677,7 +1797,7 @@ if $ARGS[0] = 'sleep_cum':
 end
 
 if $ARGS[0] = 'wakeup_fondling':
-	gs'arousal', 'foreplay', -rand(5,10), 'no_orgasm_msg'
+	gs'arousal', 'foreplay', -rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/shared/sex/sleep/fondle1.jpg"></center>'
 	'"Mmmmm..."'
@@ -1692,7 +1812,7 @@ if $ARGS[0] = 'wakeup_sex':
 	sex_ev['sleep_fuck'] = 1
 	sex_ev['wake_fuck'] = 1
 	sex_ev['morning_after'] = 1
-	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg'
+	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	if npc_sex_speed <= 2:
 		$sex_ev['sleep_video1'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow<<rand(1,2)>>.mp4"></video></center>'
 		$sex_ev['sleep_video2'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow2.mp4"></video></center>'
@@ -1822,7 +1942,7 @@ if $ARGS[0] = 'morning_skyrim_joke':
 				'"Uhh, <i>yes</i>. It was," you say, giving him a look of contempt. "I felt the moisture in my vagina practically evaporate. There is no way I''m going to let you fuck me right after saying that with your cock <i>inside</i> me."'
 				*nl
 				'You successfully push <<$npc_firstname[$boy]>> off of you, shuddering with utter disgust the moment he''s out from between your legs.'
-				gs'sex_ev_morning', 'wakeup1'
+				gs'sex_ev_morning', 'morning_menu1'
 			end
 			
 			act'Ugh, fine':
@@ -1899,7 +2019,7 @@ if $ARGS[0] = 'morning_wtf_forgive2':
 		'Your anger returns swiftly.'
 		'"No! Did you really think I was going to say yes after you were just <i>molesting</i> me in my sleep?"'
 		'<<$npc_firstname[$boy]>> sighs disappointedly and lays back in bed.'
-		gs'sex_ev_morning', 'wakeup1'
+		gs'sex_ev_morning', 'morning_menu1'
 	end
 	
 	act'Oh alright':

locations/sex_ev_shower.qsrc

@@ -81,7 +81,7 @@ if $ARGS[0] = 'before_alone':
 	minut += 5
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
-	mc_inventory['noshampoo'] = 1
+	noShampoo = 1
 	dynamic $showerdin
 	sex_ev['start_shower'] = 1
 	gs 'stat'
@@ -96,9 +96,9 @@ end
 
 if $ARGS[0] = 'before_together1':
 	sex_ev['start_shower'] = 1
-	mc_inventory['noshampoo'] = 1
+	noShampoo = 1
 	dynamic $showerdin
-	gs'arousal', 'massage',5,'no_orgasm_msg'
+	gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
@@ -139,7 +139,7 @@ if $ARGS[0] = 'before_together2':
 			act'Let him fuck you':
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
-				gs'arousal', 'massage',5,'no_orgasm_msg'
+				gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				'You turn to face <<$npc_firstname[$boy]>>.'
 				if (sex_ev['condom'] > 0 and sex_ev['npc_condom_insist'] ! 1 and sex_ev['creampie_allowance'] = 0 and npc_free_creampies[$boy] ! 2) or sex_ev['danger_day'] = 1:
@@ -231,7 +231,7 @@ if $ARGS[0] = 'before_jerkoff_cum1':
 		'You work him even harder, trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. The sensation of his cum spattering across your stomach is the last thing you need and you come as well, moaning loudly even as you continue to finish him off.'
 	end
 	act'Continue':
-		mc_inventory['noshampoo'] = 1
+		noShampoo = 1
 		dynamic $showerdin
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/shower/after2.mp4"></video></center>'
@@ -279,7 +279,7 @@ if $ARGS[0] = 'before_shower_fuck1':
 	sex_ev['fuck_count'] += 1
 	sex_ev['shower_sex'] += 1
 	sex_ev['orgasm'] = orgasm
-	gs'arousal', 'vaginal',rand(10,15),'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(10,15), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/leg_up1.mp4"></video></center>'
@@ -309,9 +309,10 @@ if $ARGS[0] = 'before_shower_cum_ask':
 	end
 	act'Jerk him off':gt'sex_ev_shower', 'before_jerkoff_cum1'
 		
-	if sex_ev['condom'] > 0:
-		act'Not inside!':sex_ev['not_inside'] = 1 & gt'sex_ev_shower', 'before_jerkoff_cum1'
-	end
+!!	if sex_ev['condom'] > 0 or stat['dangerous_day'] > 0 or sex_ev['promise_no_creampie'] = 1:
+
+		act'Not inside!':sex_ev['not_inside'] = 1 & gt'sex_ev_shower', 'morning_shower_fuck_jerkoff'
+!!	end
 end
 
 if $ARGS[0] = 'before_shower_creampie_surprise':
@@ -383,7 +384,7 @@ if $ARGS[0] = 'before_shower_creampie_surprise':
 	act'Creampie induced orgasm':
 		if sex_ev['orgasm'] = orgasm:
 			$orgasm_or = 'yes'
-			gs'arousal', 'vaginal',1,'no_orgasm_msg'
+			gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		end
 		sex_ev['creampie_orgasm'] += 1
 		cla & *clr
@@ -513,7 +514,7 @@ end
 
 if $ARGS[0] = 'after_borrow_shower':
 	cla & *clr
-	mc_inventory['noshampoo'] = 1
+	NoShampoo = 1
 	$sex_ev['bed_room']
 	'"I''m gonna borrow your shower," you say, sliding out of the bed.'
 	if rand(1,10) < npc_sexdrive[$boy] and sex_ev['angry_after'] = 0:
@@ -528,7 +529,7 @@ if $ARGS[0] = 'after_borrow_shower':
 			'"That sounds like nice," you smile and you let him lead you into the bathroom.'
 			act'Go shower':gt'sex_ev_shower', 'after_shower_together'
 		end
-	elseif npc_selfish[$boy] = 1:
+	elseif npc_selfish[$boy] = 1 and $sex_ev['loc'] ! 'hotel_room':
 		'"Don''t use up all my soap."'
 		act'Okay':
 			cla & *nl
@@ -554,7 +555,7 @@ if $ARGS[0] = 'after_borrow_shower':
 			act'Shower':gt'sex_ev_shower', 'after_alone'
 		end
 	else
-		if npc_caretaker[$boy] = 1 and sex_ev['angry_after'] = 0:
+		if npc_caretaker[$boy] = 1 and sex_ev['angry_after'] = 0 and $sex_ev['loc'] ! 'hotel_room':
 			if npc_apt_type <= 2:
 				'"Okay. Feel free to use my towel when you''re done."'
 			else
@@ -572,7 +573,7 @@ if $ARGS[0] = 'after_alone':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 	sex_ev['shower'] = 1
-	mc_inventory['noshampoo'] = 1
+	noShampoo = 1
 	dynamic $showerdin
 	gs 'stat'
 	'You turn on the faucet, relaxing as the hot water pours down over your skin. After a few minutes, you turn the tap off and step out.'
@@ -628,17 +629,48 @@ if $ARGS[0] = 'after_towel_skip2':
 	end
 end
 
+if $ARGS[0] = 'after_shower_join':
+	sex_ev['join_shower'] = 1
+	sex_ev['boy_shower'] = 1
+	'<center><video autoplay loop src="images/shared/sex/shower/join2.mp4"></video></center>'
+	'A blast of steam hits you in the face as you open the bathroom door. You pad your way inside and open the shower to find <<$npc_firstname[$boy]>> under the faucet.'
+	if sex_ev['join_shower_offer'] = 1:
+		'"Couldn''t resist after all, huh?" he smirks as you slip in beside him.'
+	end
+	
+	act'Didn''t want to wait':
+		cla & *nl
+		'"I didn''t want to wait my turn," you say, pushing your way into the direct path of the water stream.'
+		act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'after_shower_together'
+	end
+	
+	act'Couldn''t resist':
+		cla & *nl
+		if sex_ev['join_shower_offer'] = 1:
+			'"Yeah," you smile, pushing your way into the direct path of the water stream.'
+		else
+			'"I couldn''t resist joining you after all," you say, pushing your way into the direct path of the water stream.'
+		end
+		act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'after_shower_together'
+	end
+end
+
 if $ARGS[0] = 'after_shower_together':
 	sex_ev['shower'] = 1
-	mc_inventory['noshampoo'] = 1
+	sex_ev['boy_shower'] = 1
+	noShampoo = 1
 	dynamic $showerdin
 	cla & *clr
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shower_together.jpg"></center>'
-	'The two of you step into the shower together, hot water raining down on you, letting it wash away the sweat of your recent lovemaking.'
+	if sex_ev['join_shower'] = 1:
+		'The two of you bask in the heat of the shower together and the hot water raining down on you, letting it wash away the sweat of your recent lovemaking.'
+	else
+		'The two of you step into the shower together, hot water raining down on you, letting it wash away the sweat of your recent lovemaking.'
+	end
 	act'Continue':
 		cla & *clr
-		gs'arousal', 'massage',5,'no_orgasm_msg'
+		gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		gs'stat'
 		'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
 		'It doesn''t take long before you feel <<$npc_firstname[$boy]>>''s hands on you, running up and down your body, across your breasts and down towards your pussy.'
@@ -665,7 +697,7 @@ if $ARGS[0] = 'after_shower_together':
 
 		act'Enjoy his touch':
 			cla & *clr
-			gs'arousal', 'massage',5,'no_orgasm_msg'
+			gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
 			'"Mmmmmmmm..."'
@@ -700,7 +732,7 @@ if $ARGS[0] = 'after_shower_together':
 						end
 					end
 					act'Mutual masturbation':
-						gs'arousal', 'hj',-3,'no_orgasm_msg'
+						gs'arousal', 'hj',-3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						cla & *clr
 						'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></video></center>'
@@ -716,7 +748,7 @@ if $ARGS[0] = 'after_shower_together':
 					act'Well...':
 						cla & *clr
 						'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
-						gs'arousal', 'massage',5,'no_orgasm_msg'
+						gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						'"Well..." Your breath hitches as he gives your nipples a light squeeze. You feel warm and wet and it''s <i>not</i> just the shower.'
 !!						if stat['think_virgin'] = 0 and sex_ev['virgin'] ! 1:
@@ -752,7 +784,7 @@ if $ARGS[0] = 'after_shower_together':
 				act'Shower sex':
 					cla & *clr
 					'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
-					gs'arousal', 'massage',5,'no_orgasm_msg'
+					gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 					gs'stat'
 					'You turn to face <<$npc_firstname[$boy]>>.'
 					if (sex_ev['condom'] > 0 and sex_ev['npc_condom_insist'] ! 1 and sex_ev['creampie_allowance'] = 0 and npc_free_creampies[$boy] ! 2) or sex_ev['danger_day'] = 1:
@@ -775,7 +807,7 @@ if $ARGS[0] = 'after_shower_together':
 end
 
 if $ARGS[0] = 'after_shower_fun1':
-	gs'arousal', 'hj',3,'no_orgasm_msg'
+	gs'arousal', 'hj',3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></video></center>'
@@ -784,8 +816,8 @@ if $ARGS[0] = 'after_shower_fun1':
 end
 
 if $ARGS[0] = 'after_shower_fun2':
-	gs'arousal', 'foreplay',3,'no_orgasm_msg'
-	gs'arousal', 'hj',-3,'no_orgasm_msg'
+	gs'arousal', 'foreplay',3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'hj',-3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/fun2.mp4"></video></center>'
@@ -794,8 +826,8 @@ if $ARGS[0] = 'after_shower_fun2':
 end
 
 if $ARGS[0] = 'after_shower_fun3':
-	gs'arousal', 'foreplay',3,'no_orgasm_msg'
-	gs'arousal', 'hj',-3,'no_orgasm_msg'
+	gs'arousal', 'foreplay',3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'hj',-3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/fun3.mp4"></video></center>'
@@ -808,8 +840,8 @@ end
 
 if $ARGS[0] = 'after_shower_fun4':
 	$orgasm_or = 'yes'
-	gs'arousal', 'foreplay',1,'no_orgasm_msg'
-	gs'arousal', 'hj',-1,'no_orgasm_msg'
+	gs'arousal', 'foreplay',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'hj',-1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs 'cum_call', 'stomach', $boy, 1
 	gs'stat'
 	cla & *clr
@@ -829,7 +861,7 @@ end
 if $ARGS[0] = 'after_shower_sex1':
 	sex_ev['shower_sex'] += 1
 	sex_ev['orgasm'] = orgasm
-	gs'arousal', 'vaginal',rand(10,15),'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(10,15), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
@@ -863,9 +895,10 @@ if $ARGS[0] = 'after_shower_cum_ask':
 	end
 	act'Jerk him off':gt'sex_ev_shower', 'after_shower_fuck_jerkoff'
 		
-	if sex_ev['condom'] > 0 or stat['dangerous_day'] > 0:
-		act'Not inside!':sex_ev['not_inside'] = 1 & gt'sex_ev_shower', 'after_shower_fuck_jerkoff'
-	end
+!!	if sex_ev['condom'] > 0 or stat['dangerous_day'] > 0 or sex_ev['promise_no_creampie'] = 1:
+
+		act'Not inside!':sex_ev['not_inside'] = 1 & gt'sex_ev_shower', 'morning_shower_fuck_jerkoff'
+!!	end
 end
 
 if $ARGS[0] = 'after_shower_creampie_surprise':
@@ -938,7 +971,7 @@ if $ARGS[0] = 'after_shower_creampie_surprise':
 	act'Creampie induced orgasm':
 		if sex_ev['orgasm'] = orgasm:
 			$orgasm_or = 'yes'
-			gs'arousal', 'vaginal',1,'no_orgasm_msg'
+			gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		end
 		sex_ev['creampie_orgasm'] += 1
 		cla & *clr
@@ -1083,6 +1116,7 @@ if $ARGS[0] = 'after_shower_fuck_jerkoff_end':
 end
 
 if $ARGS[0] = 'after_shower_clean_options':
+	sex_ev['boy_shower'] = 1
 	gs'sex_ev_shower', 'after_shower_cum_rinse'
 	gs'sex_ev_shower', 'after_shower_again'
 	gs'sex_ev_shower', 'after_shower_again_long'
@@ -1095,10 +1129,10 @@ if $ARGS[0] = 'after_shower_cum_rinse':
 		act'Rinse off':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
-			mc_inventory['noshampoo'] = 1
+			noShampoo = 1
 			dynamic $showerdin
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal_finger',rand(1,2),'no_orgasm_msg', 'masturbate'
+			gs'arousal', 'vaginal_finger',rand(1,2), 'no_orgasm_msg', $sex_ev['prostitution_flag'], 'masturbate'
 			gs'stat'
 			if sex_ev['shower_creampie'] = 1:
 				'You hog the water, directing the stream between your legs to flush the cum from your pussy. After pumping your fingers in and out a few times to confirm nothing else is coming out, you turn off the faucet.'
@@ -1121,7 +1155,7 @@ if $ARGS[0] = 'after_shower_again':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 			minut += 5
-			mc_inventory['noshampoo'] = 1
+			noShampoo = 1
 			dynamic $showerdin
 			gs'stat'
 			if sex_ev['shower_fuck'] = 1:
@@ -1148,7 +1182,7 @@ if $ARGS[0] = 'after_shower_again_long':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 			minut += 15
-			mc_inventory['noshampoo'] = 1
+			noShampoo = 1
 			dynamic $showerdin
 			gs'stat'
 			if sex_ev['shower_creampie'] = 1:
@@ -1167,7 +1201,7 @@ if $ARGS[0] = 'after_shower_again_long':
 end
 
 if $ARGS[0] = 'after_shower_together_end':
-	mc_inventory['noshampoo'] = 1
+	noShampoo = 1
 	dynamic $showerdin
 	cla & *clr
 	$sex_ev['bath_room']
@@ -1209,7 +1243,7 @@ if $ARGS[0] = 'morning_look1':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/romance/misc/nude_walk1.mp4"></video></center>'
 	'Curious to know where he is, you climb out of bed, wandering his apartment looking for him. A few doors down the hall, you realize you hear water running in the bathroom. He must be taking a shower.'
-	act'Head back to the bedroom':gt'sex_ev_morning', 'wakeup2'
+	act'Head back to the bedroom':gt'sex_ev_morning', 'morning_menu2'
 	act'Wait your turn':
 		minut += rand(1,5)
 		gs 'stat'
@@ -1226,7 +1260,7 @@ end
 
 if $ARGS[0] = 'morning_shower_join1':
 	sex_ev['morning_shower'] = 1
-	'<center><video autoplay loop src="images/shared/sex/shower/join1.mp4"></video></center>'
+	'<center><video autoplay loop src="images/shared/sex/shower/join2.mp4"></video></center>'
 	'A blast of steam hits you in the face as you open the bathroom door. You pad your way inside, casually slipping into the shower with <<$npc_firstname[$boy]>>.'
 	if $sex_ev['loc'] = 'pc_home':
 		'"Scoot over," you say, pushing your way in. <<$npc_firstname[$boy]>> obliges, his eyes sparkling with arousal.'
@@ -1294,7 +1328,7 @@ end
 if $ARGS[0] = 'morning_together1':
 	sex_ev['npc_morning_shower'] = 1
 	sex_ev['morning_shower_together'] = 1
-	gs'arousal', 'massage',5,'no_orgasm_msg'
+	gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
@@ -1331,7 +1365,7 @@ if $ARGS[0] = 'morning_together1':
 
 		act'Enjoy his touch':
 			cla & *clr
-			gs'arousal', 'massage',5,'no_orgasm_msg'
+			gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
 			'"Mmmmmmmm..."'
@@ -1366,7 +1400,7 @@ if $ARGS[0] = 'morning_together1':
 						end
 					end
 					act'Mutual masturbation':
-						gs'arousal', 'hj',-3,'no_orgasm_msg'
+						gs'arousal', 'hj',-3, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 						gs'stat'
 						cla & *clr
 						'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></video></center>'
@@ -1381,7 +1415,7 @@ if $ARGS[0] = 'morning_together1':
 					if stat['think_virgin'] ! 1 or sex_ev['fuck_count'] > 0:
 						act'Well...':
 							cla & *nl
-							gs'arousal', 'massage',5,'no_orgasm_msg'
+							gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 							gs'stat'
 							'"Well..." Your breath hitches as he gives your nipples a light squeeze. You feel warm and wet and it''s <i>not</i> just the shower. "I suppose..."'
 	!!						if stat['think_virgin'] = 0 and sex_ev['virgin'] ! 1:
@@ -1414,7 +1448,7 @@ if $ARGS[0] = 'morning_together_sex1':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
 		gs 'arousal', 'foreplay', 10
-		mc_inventory['noshampoo'] = 1
+		noShampoo = 1
 		dynamic $showerdin
 		'You stay in the shower with <<$npc_firstname[$boy]>> a while longer, allowing him to keep playing with your breasts and fondling your body, but don''t let it progress any further until the water shuts off.'
 		*nl
@@ -1463,7 +1497,7 @@ if $ARGS[0] = 'morning_jerkoff_cum1':
 		'You turn to face him, staring into <<$npc_firstname[$boy]>>''s eyes as you work him even harder trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. The sensation of his cum spattering across your stomach is the last thing you need and you come as well, moaning loudly even as you continue to finish him off.'
 	end
 	act'Continue':
-		mc_inventory['noshampoo'] = 1
+		noShampoo = 1
 		dynamic $showerdin
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/shower/after2.mp4"></video></center>'
@@ -1510,7 +1544,7 @@ end
 if $ARGS[0] = 'morning_shower_fuck2':
 	sex_ev['shower_sex'] += 1
 	sex_ev['orgasm'] = orgasm
-	gs'arousal', 'vaginal',rand(10,15),'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(10,15), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/doggy<<rand(1,3)>>.mp4"></video></center>'
@@ -1544,9 +1578,10 @@ if $ARGS[0] = 'morning_shower_cum_ask':
 	end
 	act'Jerk him off':gt'sex_ev_shower', 'morning_shower_fuck_jerkoff'
 		
-	if sex_ev['condom'] > 0 or stat['dangerous_day'] > 0:
+!!	if sex_ev['condom'] > 0 or stat['dangerous_day'] > 0 or sex_ev['promise_no_creampie'] = 1:
+
 		act'Not inside!':sex_ev['not_inside'] = 1 & gt'sex_ev_shower', 'morning_shower_fuck_jerkoff'
-	end
+!!	end
 end
 
 if $ARGS[0] = 'morning_shower_creampie_surprise':
@@ -1624,7 +1659,7 @@ if $ARGS[0] = 'morning_shower_creampie_surprise':
 	act'Creampie induced orgasm':
 		if sex_ev['orgasm'] = orgasm:
 			$orgasm_or = 'yes'
-			gs'arousal', 'vaginal',1,'no_orgasm_msg'
+			gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 		end
 		sex_ev['creampie_orgasm'] += 1
 		cla & *clr
@@ -1770,7 +1805,7 @@ if $ARGS[0] = 'morning_shower_fuck_jerkoff_end':
 end
 
 if $ARGS[0] = 'morning_shower_together_end':
-	mc_inventory['noshampoo'] = 1
+	noShampoo = 1
 	dynamic $showerdin
 	act'Finish up':
 		cla
@@ -1782,6 +1817,7 @@ end
 
 if $ARGS[0] = 'morning_sex_end':
 	sex_ev['npc_morning_shower'] = 2
+	sex_ev['boy_shower'] = 1
 	gs 'sex_ev_shower', 'morning_shower_together_end'
 	if sex_ev['morning_fuck'] = 0:
 		if sex_ev['morning_shower_cum'] = 1:
@@ -1805,9 +1841,10 @@ end
 if $ARGS[0] = 'morning_towel_on':
 	cla & *clr
 	sex_ev['towel'] = 1
+	sex_ev['boy_shower'] = 1
 	'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/towel.jpg"></center>'
 	'You pull a towel from the cupboard and dry off with it before wrapping it around your chest before exiting the bathroom and back into the bedroom.'
-	act'Continue':gs'sex_ev_morning', 'wakeup2'
+	act'Continue':gs'sex_ev_morning', 'morning_menu2'
 end
 
 if $ARGS[0] = 'morning_towel_head':
@@ -1818,22 +1855,24 @@ if $ARGS[0] = 'morning_towel_head':
 	'You pull a towel from the cupboard and dry your body with it, only pausing to wrapping it around your hair before opening the door. Upon stepping out of the bathroom, <<$npc_firstname[$boy]>> eyes light up at the sight of your body, completely naked except for the towel turban atop your head.'
 	*nl
 	'"Thanks," you smile at him.'
-	act'Continue':gs'sex_ev_morning', 'wakeup2'
+	act'Continue':gs'sex_ev_morning', 'morning_menu2'
 end
 
 if $ARGS[0] = 'morning_towel_borrow':
 	act'Borrow a towel':
 		cla & *nl
 		sex_ev['towel'] = 1
+		sex_ev['boy_shower'] = 1
 		'You accept gratefully it and towel off before wrapping it around your chest, exiting the bathroom with him.'
-		act'Continue':gs'sex_ev_morning', 'wakeup2'
+		act'Continue':gs'sex_ev_morning', 'morning_menu2'
 	end
 end
 
 if $ARGS[0] = 'morning_towel_skip':
+	sex_ev['boy_shower'] = 1
 	'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/no_towel.jpg"></center>'
 	'You grab <<$npc_firstname[$boy]>>''s towel before he can and give yourself a quick wipe before handing it off to him with a mischievous smirk and head back to the bedroom, letting him ogle your naked ass on the way out.'
-	act'Continue':gs'sex_ev_morning', 'wakeup2'
+	act'Continue':gs'sex_ev_morning', 'morning_menu2'
 end
 
 if $ARGS[0] = 'wont_creampie1':
@@ -1849,4 +1888,44 @@ if $ARGS[0] = 'wont_creampie2':
 	'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
 end
 
+
+if $ARGS[0] = 'boy_shower_finish':
+	cla & *clr
+	$sex_ev['bed_room']
+	'<<$npc_firstname[$boy]>> returns to the bedroom with wet hair and a towel wrapped around his waist.'
+	gs'sex_ev_shower', 'boy_shower_finish_acts'
+end
+
+
+if $ARGS[0] = 'boy_shower_finish_acts':
+	sex_ev['boy_in_shower'] = 0
+	sex_ev['boy_shower'] = 1
+	act'"Good shower?"':
+		cla & *nl
+		'"Did you have a good shower?" you ask' + iif(sex_ev['drawer_rummage'] = 1, ' innocently putting your hands behind your back as if you hadn''t just been snooping through his things.', '.')
+		if sex_ev['join_shower_offer'] = 1:
+			'"Could have used some company in there," he smiles back wistfully.'
+			act'Sorry':
+				cla & *nl
+				'"Sorry," you reply.'
+				act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
+			end
+		else
+			'"Yeah, I feel much better now," he says.'
+			act'Glad to hear it':
+				cla & *nl
+				'"Glad to hear it," you reply.'
+				act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
+			end
+		end
+		if sex_ev['shower'] = 0:
+			act'My turn':
+				cla & *nl
+				'"I think it''s my turn now," you say, hauling yourself out of bed and passing him by into the steamy just-used bathroom.'
+				act'Shower':gt'sex_ev_shower', 'after_alone'
+			end
+		end
+	end
+end
+
 --- sex_ev_shower ---------------------------------

locations/sex_ev_start.qsrc

@@ -109,15 +109,42 @@ if $ARGS[0] = 'lover_initiate':
 		$sex_ev['type'] = 'dating_sex'
 	elseif $npc_rel_type[$boy] = 'fuckbuddy':
 		$sex_ev['type'] = 'booty_call'
-		if (booty_call_invite[$boy] = daystart or npc_booty_call[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
+		if (booty_call_invite[$boy] = daystart or npc_booty_call_date[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
+			gs 'sex_ev_start', 'lover_home_img_init'
 			gt 'sex_ev_start', 'fb_invited_start'
 		elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_booty_call[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
+			gs 'sex_ev_start', 'lover_home_img_init'
 			gt 'sex_ev_start', 'fb_uninvited_start'
 		else
+			gs 'sex_ev_start', 'lover_home_img_init'
 			gs 'sex_ev_start', 'neighborhood_image'
 			'You knock on <<$npc_firstname[$boy]>>''s door but there is no answer.'
 			act'Leave':gt $loc
 		end
+	elseif $npc_rel_type[$boy] = 'sugar_daddy':
+		$sex_ev['type'] = 'booty_call'
+		sugar_daddy_call[$boy] = 1
+		if $booty_call_hotel[$boy] = 'pav':
+			gs 'sex_ev_start', 'pav_hotel_img_init'
+			gt 'sex_ev_start', 'fb_invited_start'
+		elseif $booty_call_hotel[$boy] = 'city':
+			gs 'sex_ev_start', 'city_hotel_img_init'
+			gt 'sex_ev_start', 'fb_invited_start'
+		else
+			if (booty_call_invite[$boy] = daystart or npc_booty_call_date[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
+				gs 'sex_ev_start', 'lover_home_img_init'
+				gt 'sex_ev_start', 'fb_invited_start'
+			!!{elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_booty_call[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
+				this is disabled until cheating events can be established
+				gs 'sex_ev_start', 'lover_home_img_init'
+				gt 'sex_ev_start', 'fb_uninvited_start'
+			else}
+				gs 'sex_ev_start', 'lover_home_img_init'
+				gs 'sex_ev_start', 'neighborhood_image'
+				'You knock on <<$npc_firstname[$boy]>>''s door but there is no answer.'
+				act'Leave':gt $loc
+			end
+		end
 	end
 end
 
@@ -132,7 +159,7 @@ if $ARGS[0] = 'hookup_initiate':
 	end
 end
 
-if $ARGS[0] = 'lover_home_start':
+if $ARGS[0] = 'lover_home_img_init':
 	$sex_ev['loc'] = 'npc_home'
 	$sex_ev['bed_room'] = $npc_apt_bedroom[$boy]
 	$sex_ev['bath_room'] = $npc_apt_bathroom[$boy]
@@ -141,10 +168,19 @@ if $ARGS[0] = 'lover_home_start':
 	$sex_ev['hall_way'] = $npc_apt_hall[$boy]
 end
 
+if $ARGS[0] = 'pav_hotel_img_init':
+	$sex_ev['loc'] = 'hotel_room'
+	$sex_ev['bed_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.room.normal.jpg"></center>'
+	$sex_ev['bath_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.room.normal1.jpg"></center>'
+	$sex_ev['kitchen_room'] = 'none'
+	$sex_ev['living_room'] = 'none'
+	$sex_ev['hall_way'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.room.normal.jpg"></center>'
+end
+
 if $ARGS[0] = 'fb_npc_home_start':
 !!	gs 'boystat', $ARGS[1]
 	$sex_ev['type'] = 'booty_call'
-	if (booty_call_invite[$boy] = daystart or npc_booty_call[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
+	if (booty_call_invite[$boy] = daystart or npc_booty_call_date[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
 		gt 'sex_ev_start', 'fb_invited_start'
 	elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_booty_call[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
 		gt 'sex_ev_start', 'fb_uninvited_start'
@@ -157,7 +193,18 @@ end
 
 if $ARGS[0] = 'hookup_npc_home_start':
 	gs 'sex_ev_start', 'hookup_initiate'
-	gs 'sex_ev_start', 'lover_home_start'
+	gs 'sex_ev_start', 'lover_home_img_init'
+	gs 'sex_ev_start', 'begin'
+	gs 'sex_ev_start', 'undress'
+end
+
+if $ARGS[0] = 'hookup_hotel_start':
+	gs 'sex_ev_start', 'hookup_initiate'
+	if $region = 'pav':
+		gs 'sex_ev_start', 'pav_hotel_img_init'
+	else
+		gs 'sex_ev_start', 'city_hotel_img_init'
+	end
 	gs 'sex_ev_start', 'begin'
 	gs 'sex_ev_start', 'undress'
 end
@@ -172,16 +219,29 @@ if $ARGS[0] = 'begin':
 	end
 	gs 'sex_ev_stats', 'starting_stats'
 	gs 'sex_ev_stats', 'npc_update'
+	if sugar_daddy_call[$boy] = 1:
+		$sex_ev['prostitution_flag'] = 'prostitution'
+		sex_ev['prostitution'] = 1
+		npc_sugar_daddy_timer[$boy] = daystart + 10
+	end
 	npc_last_booty_call[$boy] = daystart
 end
 
+if $ARGS[0] = 'fb_hotel_start':
+	if $region = 'pav':
+		gs 'sex_ev_start', 'pav_hotel_img_init'
+	else
+		gs 'sex_ev_start', 'city_hotel_img_init'
+	end
+	gs 'sex_ev_start', 'begin'
+	gs 'sex_ev_start', 'undress'
+end
+
 if $ARGS[0] = 'fb_invited_start':
-	$sex_ev['loc'] = 'npc_home'
 	$loc = 'sex_ev_start'
 	$loc_arg = 'fb_invited_start'
 !!	savegame 'autosave_sex_ev.sav'
 	gs 'sex_ev_start', 'begin'
-	gs 'sex_ev_start', 'lover_home_start'
 	$sex_ev['hall_way']
 	'You knock on the door and <<$npc_firstname[$boy]>> opens up.'
 	if pcs_sweat > 29:
@@ -330,7 +390,13 @@ if $ARGS[0] = 'fb_invited_start':
 				end
 			end
 		end
-				
+		if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour < 9 and hour >= 6:
+			act'Make it fast (school)':
+				cla & *nl
+				'"Let''s make this fast," you say. "I have class this morning."'
+				act'Undress':gt 'sex_ev_foreplay', 'undress'
+			end
+		end
 		if prezik > 0 and npc_bareback[$boy] = 0:
 			act'I brought condoms':
 				pc_buy_condoms[$boy] = 2
@@ -350,12 +416,12 @@ if $ARGS[0] = 'fb_invited_start':
 			act'Brought a morning after pill':
 				cla
 				sex_ev['skip_condom'] = 1
-				sex_ev['no_condom'] = 1
+				!! sex_ev['no_condom'] = 1
 				sex_ev['ma_pill'] = 1
 				act'No condoms':
 					cla & *clr
 					$sex_ev['bed_room']
-					'"I brought a morning after pill," you say, stepping inside and drawing close to <<$npc_firstname[$boy]>>. You lean in and whisper in his ear, "<i>We don''t need to use a condom today.</i>"'
+					'"I brought a morning after pill," you whisper in his ear. "<i>We can skip the condoms today.</i>"'
 					act'Undress':gt 'sex_ev_foreplay', 'undress'
 				end
 				
@@ -363,7 +429,7 @@ if $ARGS[0] = 'fb_invited_start':
 					sex_ev['creampie_allowance'] = 1
 					cla & *clr
 					$sex_ev['bed_room']
-					'"I brought a morning after pill," you say, stepping inside and drawing close to <<$npc_firstname[$boy]>>. You lean in and whisper in his ear, "<i>That means can come inside me today.</i>"'
+					'"I brought a morning after pill," you whisper in his ear. "<i>Fill me with your cum.</i>"'
 					act'Undress':gt 'sex_ev_foreplay', 'undress'
 				end
 			end
@@ -435,13 +501,13 @@ end
 
 if $ARGS[0] = 'fb_uninvited_start':
 	gs 'sex_ev_start', 'begin'
-	gs 'sex_ev_start', 'lover_home_start'
+	gs 'sex_ev_start', 'lover_home_img_init'
 	$sex_ev['hall_way']
 	'You knock on the door and you hear the latch unlock and the door swings open.'
 	act'I was in the neighborhood':
 		cla & *nl
 		'"Hey," you smile at <<$npc_firstname[$boy]>> who blinks in surprise. "I was in the neighborhood and I started thinking about you, wondering if you wanted to fool around some...?"'
-		if npc_booty_call[$boy] = daystart:
+		if npc_booty_call_date[$boy] = daystart:
 			'"I was just about to text you," he grins.'
 			'So am I coming in or what?" you grin back.'
 		else
@@ -455,7 +521,7 @@ if $ARGS[0] = 'fb_uninvited_start':
 				'"I''m the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in.'
 			elseif npc_humor[$boy] = 2 and npc_cum_pref[$boy] = 'mouth':
 				'"I''m the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in. "In your mouth that is."'
-			elseif npc_booty_call[$boy] = daystart:
+			elseif npc_booty_call_date[$boy] = daystart:
 				'"As long as those clothes are coming off in the next 10 seconds," he says, leering at your ass as he steps aside to let you in.'
 			else
 				'"Well I won''t say no to a free fuck," he smirks, stepping aside to let you in and leering at your ass as you walk past.'
@@ -549,11 +615,20 @@ if $ARGS[0] = 'undress':
 	gs 'arousal', 'foreplay_give', -2
 	gs'stat'
 	'<center><video autoplay loop src="images/shared/sex/misc/undress1.mp4"></video></center>'
-	'The moment you''re through the door, the both of you begin discarding clothes in a hurry. By the time you''re at the bed, there''s a trail of clothing across the floor.'
+	'The moment you pass through the door, a clothes begin getting frantically torn from your bodies leading a trail all the way to the bed until not a stitch remains on either of you.'
 	gs 'sex_ev_start', 'bed_start'
 end
 
 if $ARGS[0] = 'undress_function':
+	$lastwornclothingtype['sex_ev'] = $clothingworntype
+	lastwornclothingnumber['sex_ev'] = clothingwornnumber
+	
+	$lastwornpantytype['sex_ev'] = $pantyworntype
+	lastwornpantynumber['sex_ev'] = pantywornnumber
+	
+	$lastwornbratype['sex_ev'] = $braworntype
+	lastwornbranumber['sex_ev'] = pantywornnumber
+
 	if CloDress = 1:sex_ev['CloDress'] = 1
 	if CloStyle2 = 4: npc_know_schoolgirl[$boy] = 1
 	if $clothingworntype ! 'nude':gs 'clothing', 'strip'

locations/sex_ev_stats.qsrc

@@ -7,7 +7,7 @@ if $ARGS[0] = 'npc_update':
 end
 
 if $ARGS[0] = 'starting_stats':
-	$lastwornpantytype = $pantyworntype
+	$lastwornpantytype['sex_ev'] = $pantyworntype
 	lastwornpantynumber['sex_ev'] = pantywornnumber
 	$lastwornbratype['sex_ev'] = $braworntype
 	lastwornbranumber['sex_ev'] = brawornnumber
@@ -31,22 +31,23 @@ if $ARGS[0] = 'starting_stats':
 	sex_ev['cum_stomach'] = cum_loc['stomach']
 	sex_ev['cum_tits'] = cum_loc['tits']
 	sex_ev['cum_hair'] = cum_loc['hair']
-	sex_ev['sweat'] = pcs_sweat
+	sex_ev['starting_sweat'] = pcs_sweat
 	sex_ev['orgasm'] = orgasm
 	sex_ev['orgasm_limit'] = orgasm + 6
 	sex_ev['pc_condom_count'] = prezik
 	sex_ev['start_time'] = totminut
+	sex_ev['start_hour'] = hour
 	if $start_type[1] ! 'nomagic': sex_ev['magik'] = pcs_magik
 	if npc_fuckbuddy[$boy] ! 1: npc_fuckbuddy[$boy] = 1
 	if tabletkiday = daystart: sex_ev['bc_take'] = 1
 end
 
-if $ARGS[0] = 'save':
+if $ARGS[0] = 'save_stats':
 	!! number of times you have initiated or responded to a booty call
 	npc_bootycalls[$boy] += 1
 	
 	!! number of times you have had sex with an npc
-	npc_fuck_times[$boy] += sex_ev['fuck']
+	if sex_ev['fuck'] > 0 or sex_ev['fuck_count'] > 0: npc_fuck_times[$boy] += 1
 	
 	!! number of times you have fucked bareback
 	npc_fuck_times[$boy] += sex_ev['no_condom']
@@ -67,7 +68,10 @@ if $ARGS[0] = 'save':
 	npc_fake_orgasm_count[$boy] += sex_ev['fake_orgasm_count']
 	
 	!! number of times you have been creampied by your fuckbudy
-	npc_creampie_count[$boy] += sex_ev['creampie']
+	npc_creampie_count[$boy] += sex_ev['creampie_count']
+	
+	!! number of times you have been accidentally creampied by your fuckbudy
+	npc_accidental_creampie_count[$boy] += sex_ev['accidental_creampie_count']
 	
 	!! number of times you have cum together with your fuckbuddy
 	npc_cum_together_count[$boy] += sex_ev['creampie_orgasm']
@@ -102,7 +106,7 @@ if $ARGS[0] = 'save':
 	!! number of times you have denied letting your fuckbuddy take your virginity
 	npc_virgin_deny[$boy] += sex_ev['virgin_deny']
 	
-	!! if your fuckbuddy takes your virginity without consent
+	!! if your lover takes your virginity without consent
 	npc_virgin_rapist[$boy] += sex_ev['virgin_rape']
 	
 	if sex_ev['sleep_fuck'] > 0: npc_sleep_fuck += 1
@@ -111,6 +115,15 @@ if $ARGS[0] = 'save':
 		!!absence from school
 		npc_school_absences[$boy] = schoolprogul
 	end
+	
+	!! if your lover says they have pullout game and do not cum inside you, it will be remembered that the last time you had sex
+	if npc_pullout_game[$boy] = 1 and sex_ev['no_condom'] = 1 and sex_ev['creampie_count'] = 0: 
+		npc_no_creampie_mistakes[$boy] += 1
+		npc_no_creampie_mistakes_last_time[$boy] = 1
+	elseif npc_pullout_game[$boy] = 1 and sex_ev['no_condom'] = 1 and sex_ev['creampie_count'] > 0:
+		npc_pullout_failure[$boy] += 1
+		npc_pullout_failure_last_time[$boy] = 1
+	end
 end
 
 
@@ -118,6 +131,7 @@ if $ARGS[0] = 'birth_control_know':
 	npc_know_bc_not_effective[$boy] = 0
 	npc_know_not_bc[$boy] = 0
 	npc_know_bc[$boy] = 1
+	if npc_pay_for_ma_pill[$boy] = 1: npc_pay_for_ma_pill[$boy] = -1
 end
 
 

locations/sex_ev_talk.qsrc

@@ -68,7 +68,9 @@ if $ARGS[0] = 'boy_accidental_creampie2':
 		elseif stat['probably_safe_day'] = 1:
 			act'I think so':
 				cla & *nl
-				if $sex_ev['convo'] = 'used_all_condoms':
+				if mesec > 0:
+					'"I think so," you say. "I''m pretty sure I can''t get pregnant on my period..."'
+				elseif $sex_ev['convo'] = 'used_all_condoms':
 					'"I think so," you say. "It <i>should</i> be a safe day for me as long as I''m keeping track of my cycle correctly..."'
 				else
 					'"I think so," you say. "It <i>should</i> be a safe day for me as long as I''m keeping track of my cycle correctly..."'
@@ -268,17 +270,30 @@ end
 if $ARGS[0] = 'pc_have_morning_after':
 	if mc_inventory['morning_after_pill'] = 0:
 		act'I''ll buy a morning after pill':
+			sex_ev['plan_b_buy'] = 1
 			cla & *nl
 			if sex_ev['sleepover'] = 0:
-				'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill tomorrow. No big deal."'
+				sex_ev['ma_pill_tomorrow'] = 1
+				if npc_pay_for_ma_pill[$boy] = 1:
+					'"I''ll get a morning after pill ' + iif(sex_ev['sleepover'] = 0, 'tomorrow', 'later') + '," you murmur. "You''re paying for it, right?"'
+					'"Yeah," he replies. "I''ll give you the money when we''re done."'
+				else
+					'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill ' + iif(sex_ev['sleepover'] = 0, 'tomorrow. No big deal."', 'later today. No big deal."')
+				end
 			else
-				'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill later today. No big deal."'
+				if npc_pay_for_ma_pill[$boy] = 1:
+					'"I''ll get a morning after pill ' + iif(sex_ev['sleepover'] = 0, 'tomorrow', 'later') + '," you murmur. "You''re paying for it, right?"'
+					'"Yeah," he replies. "I''ll give you the money when we''re done."'
+				else
+					'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill ' + iif(sex_ev['sleepover'] = 0, 'tomorrow', 'later') + '. No big deal."'
+				end
 			end
 			'He nods, seeming to relax a bit.'
 			gs'sex_ev_pillow_talk', 'topic_route'
 		end
 	else
 		act'I''ve got a morning after pill':
+			sex_ev['ma_pill'] = 1
 			cla & *nl
 			'"It''s okay," you smile reassuringly. "I have a morning after pill. It''s no big deal."'
 			act'Continue':cla & gs'sex_ev_pillow_talk', 'topic_route'
@@ -540,7 +555,7 @@ if $ARGS[0] = 'forgot_bc_talk':
 		act'Wallow':
 			cla & *nl
 			'"I know, I know!" you moan miserably, berating yourself as much as he''s berating you. "I''m a fucking idiot. I''m sorry, I''m so sorry."'
-			gs'sex_ev_morning', 'wakeup1'
+			gs'sex_ev_morning', 'morning_menu1'
 		end
 		
 		act'Tell him to fuck off':
@@ -548,30 +563,32 @@ if $ARGS[0] = 'forgot_bc_talk':
 			sex_ev['angry_after'] = 1
 			cla & *nl
 			'"<i>''Your''</i> kids?" you say, glaring at him. "If I get pregnant, you''re not the one who''s gonna have to push your ugly baby out her pussy! Don''t try to make this about you. You can fuck off!"'
-			gs'sex_ev_morning', 'wakeup1'
+			gs'sex_ev_morning', 'morning_menu1'
 		end
 		
 		if mc_inventory['morning_after_pill'] > 0:
 			act'Morning after pill (sorry)':
 				gs 'medical_din', 'morning_after_pill_function'
+				sex_ev['ma_pill'] = 2
 				cla & *nl
 				'"I know, I know!" you moan miserably, berating yourself as much as he''s berating you. "I''m sorry, I''m so sorry. I know I fucked up. But I have this at least."'
 				*nl
 				'You fish a plan B pill out of your bag and hold it up for him to see.'
 				*nl
 				'"This ought to buy us some protection," you say, putting it in your mouth and crunching it down dry.'
-				gs'sex_ev_morning', 'wakeup1'
+				gs'sex_ev_morning', 'morning_menu1'
 			end
 			
 			act'Morning after pill (fuck off)':
 				gs 'medical_din', 'morning_after_pill_function'
 				npc_rel[$boy] -= 10
 				sex_ev['angry_after'] = 1
+				sex_ev['ma_pill'] = 2
 				cla & *nl
 				'"<i>''Your''</i> kids?" you say, glaring at him. "You know what? You can fuck off! I made a mistake and I admitted it. And you I have the fucking solution," you say, defiantly holding up your morning after pill.'
 				*nl
 				'"So you can fuck off!" you say again, throwing the pill in your mouth and crunching it down dry. "This is what I get for wanting to be accountable and transparent," you grumble, grinding your teeth on the bitter medicine.'
-				gs'sex_ev_morning', 'wakeup1'
+				gs'sex_ev_morning', 'morning_menu1'
 			end
 		end
 	elseif sex_ev['creampie_count'] = 0:
@@ -593,6 +610,7 @@ if $ARGS[0] = 'forgot_bc_talk':
 			
 			if mc_inventory['morning_after_pill'] > 0:
 				act'Take your morning after pill':
+					sex_ev['ma_pill'] = 2
 					gs 'medical_din', 'morning_after_pill_function'
 					cla & *nl
 					'"I have this," you say, fishing around in your bag to pull out your morning after pill.'
@@ -604,6 +622,7 @@ if $ARGS[0] = 'forgot_bc_talk':
 				end
 			else
 				act'Buy some plan B?':
+					sex_ev['plan_b_buy'] = 1
 					cla & *nl
 					'"Buy a morning after pill?" you say, shrugging. "I don''t know. Does it still work when you''re already sort of on birth control?"'
 					*nl
@@ -617,7 +636,7 @@ end
 
 if $ARGS[0] = 'forgot_bc_exit':
 	if $temp_loc = 'sex_ev_morning':
-		gs'sex_ev_morning', 'wakeup1'
+		gs'sex_ev_morning', 'morning_menu1'
 	else
 		gs'sex_ev_pillow_talk2', 'morning_sex_talk'
 	end
@@ -737,10 +756,10 @@ if $ARGS[0] = 'bareback_pill_expense':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
 		'"That pill costs money you know," you say irritatedly. "I''m not willing to pay for that every time you forget to pull out."'
-		if npc_finance[$boy] = 2 and npc_selfish[$boy] < 1:
+		if npc_finance[$boy] >= 1 and ((npc_selfish[$boy] < 1 and rand(1,3) = 3) or (npc_finance[$boy] = 2 and npc_no_condoms[$boy] = 1 and npc_selfish[$boy] = 1)):
 			'"How about I pay for it then?" <<$npc_firstname[$boy]>> asks. "Any time you need a morning after pill because of me, I''ll give you money to pay for it."'
 			'He grabs his wallet and pulls out a wad of notes.'
-			'"1000<b>₽</b> should be enough, right?" he grins. "First one can be on me."'
+			'"1000<b>₽</b> should be enough, right?" he grins. "You can buy one to be ready for next time."'
 			act'Refuse':
 				cla
 				act'Couldn''t impose':
@@ -748,7 +767,11 @@ if $ARGS[0] = 'bareback_pill_expense':
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
 					'You blink as he offers the cash to you.'
 					'"No, I couldn''t possibly," you say, pushing it back towards him. "I''d feel bad taking your money."'
-					'"Why? I''m getting something out of it too," he grins extending his hand again. "Just take it and let''s start going bareback."'
+					if npc_rel_type[$boy] = 'boyfriend':
+						'"Why? I''m your boyfriend," he grins extending the money again. "You feel bad that the guy you''re dating wants to pay for something?"'
+					else
+						'"Why? I''m getting something out of it too," he grins extending the money again. "Just take it and let''s start going bareback."'
+					end
 					gs 'willpower', 'misc', 'resist'
 					if will_cost <= pcs_willpwr:
 						act'Refuse (<<will_cost>> Willpower)':
@@ -763,6 +786,8 @@ if $ARGS[0] = 'bareback_pill_expense':
 					else
 						act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
+					
+					gs'sex_ev_talk', 'ma_pill_deal_accept'
 				end
 				
 				act'Hormonal influence':
@@ -792,43 +817,47 @@ if $ARGS[0] = 'bareback_pill_expense':
 					end
 				end}
 			end
-			
-			act'Accept':
-				cla
-				act'Surprise':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-					'"Wait really?" you say in surprise, taking the notes from him. "You''d really do that? I can just have this?"'
-					gs'sex_ev_talk', 'boy_pays_for_ma_pills'
-				end
-				
-				act'Gratitude':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-					'"Oh! Wow," you say, taking the notes from him. "That''s... This is actually very helpful. That''s so nice of you! Not sure how many guys would be willing to pay for a girl''s emergency birth control like this."'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-				act'Excitement':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-					'"Seriously?!" you say, excitedly grabbing the money. "If you''re paying for it then sure!"'
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end
-				
-!!{				act'Embarrassment':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
-					
-					gs'sex_ev_pillow_talk', 'topic_route'
-				end}
-			end
+			gs'sex_ev_talk', 'ma_pill_deal_accept'
 		else
-			
+			'"I guess you have a point there," <<$npc_firstname[$boy]>> chuckles. "It could really add up quickly if things went wrong."'
+			gs'sex_ev_pillow_talk', 'topic_route'
 		end
 	end
 end
 
+if $ARGS[0] = 'ma_pill_deal_accept':
+	act'Accept':
+		cla
+		act'Surprise':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+			'"Wait really?" you say in surprise, taking the notes from him. "You''d really do that? I can just have this?"'
+			gs'sex_ev_talk', 'boy_pays_for_ma_pills'
+		end
+		
+		act'Gratitude':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+			'"Oh! Wow," you say, taking the notes from him. "That''s... This is actually very helpful. That''s so nice of you! Not sure how many guys would be willing to pay for a girl''s emergency birth control like this."'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+		act'Excitement':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			'"Seriously?!" you say, excitedly grabbing the money. "If you''re paying for it then sure!"'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+		
+!!{				act'Embarrassment':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
+			
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end}
+	end
+end
+
 if $ARGS[0] = 'boy_pays_for_ma_pills':
 	if npc_childfree[$boy] = 1:
 		'"Well it would cost me a lot more money if you got pregnant and I had to pay child support," <<$npc_firstname[$boy]>> chuckles jokingly. "But I make plenty of money. The cost of a few pills is hardly going to make a dent. So you ready to stop using condoms?"'
@@ -840,11 +869,14 @@ if $ARGS[0] = 'boy_pays_for_ma_pills':
 	npc_bareback[$boy] = 1
 	money += 1000
 	sex_ev['ma_pill_money'] = 1
+	gs'sex_ev_pillow_talk', 'topic_route'
 end
 
 if $ARGS[0] = 'ma_pill_money':
 	if sex_ev['ma_pill_money'] = 0 and npc_pay_for_ma_pill[$boy] = 1 and sex_ev['creampie_count'] > 0:
 		act'Ask for plan B money':
+			sex_ev['ma_pill_money'] = 1
+			money += 1000
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			if cum_loc['vagina'] > 0:
@@ -854,15 +886,20 @@ if $ARGS[0] = 'ma_pill_money':
 			end
 			'"Sure thing," he says, quickly reaching over to his wallet and pulling out a 1000<b>₽</b note and handing it to you.'
 			'"Thanks," you say as you take it.'
-			sex_ev['ma_pill_money'] = 1
-			money += 1000
+			
 			gs'sex_ev_pillow_talk', 'topic_route'
 		end
 	end
 end
 
 if $ARGS[0] = 'bareback_bc_suggest':
-	if birth_control['using_bc'] > 0:
+	if birth_control['using_bc'] = 0:
+		act'Think about it':
+			cla & *nl
+			'"Hmmm..." you hum to yourself. "I''ll think about it...'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		end
+	else
 		act'Already am':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
@@ -914,12 +951,11 @@ if $ARGS[0] = 'borrow_planb':
 				$sex_ev['bed_room']
 			end
 			'"Hey, can I borrow some money?" you ask <<$npc_firstname[$boy]>>. "I need it for the morning after pill."'
-			if rand(1,4) = 1 and npc_finance[$boy] = 0:
-				if npc_selfish[$boy] = 1:
-					'"Are you kidding? I barely have any money myself," <<$npc_firstname[$boy]>> scowls. "I got nothing to give to you."'
-				else
-					'"Actually, I''m a little strapped for cash myself," he mumbles embarrassedly. "I need every ruble right now. Sorry."'
-				end
+			if npc_finance[$boy] = 0 and npc_selfish[$boy] = 1 and rand(1,4) > 1:
+				'"Are you kidding? I barely have any money myself," <<$npc_firstname[$boy]>> scowls. "I got nothing to give to you."'
+				gs 'sex_ev_talk', 'borrow_money_exit'
+			elseif rand(1,4) = 1 and npc_finance[$boy] = 0:
+				'"Actually, I''m a little strapped for cash myself," he mumbles embarrassedly. "I need every ruble right now. Sorry."'
 				gs 'sex_ev_talk', 'borrow_money_exit'
 			elseif npc_know_bc[$boy] > 0:
 				'"Aren''t you on birth control already?" he asks confusedly.'
@@ -927,7 +963,8 @@ if $ARGS[0] = 'borrow_planb':
 					'"I just like being extra safe," you say.'
 				else
 					gs'sex_ev_stats','no_birth_control_know'
-					'"I actually stopped a while back... Did I forget to tell you?" you say with an embarrassed smile.'
+					'"I actually stopped a while back... Did I forget to tell you?"'
+					'You give <<$npc_firstname[$boy]>> an embarrassed smile.'
 				end
 				
 				if birth_control['think_safe'] = 1 and npc_selfish[$boy] = 1:
@@ -1142,4 +1179,38 @@ if $ARGS[0] = 'rape_explain2':
 	'"I guess I kind of ruined the mood, didn''t I?" you say with a small laugh of self pity.'
 
 end
+
+
+if $ARGS[0] = 'sugar_daddy_pay':
+	if $npc_rel_type[$boy] = 'sugar_daddy' and sex_ev['sugar_daddy_paid'] = 0 and sex_ev['sex_over'] = 1:
+		act'Ask for your sugar money':
+			sex_ev['sugar_daddy_paid'] = 1
+			money += npc_sugar_daddy_price[$boy]
+			cla
+			act'Demurely':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk4.jpg"></center>'
+				'"Now that we''ve had our fun..." you smile sweetly. "And I did something for you... Don''t you have something for me...?"'
+				'You pout cutely, making doe eyes at <<$npc_firstname[$boy]>> who smiles back and reaches over to his wallet.'
+				'"Sure do," he says, pulling out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b> in cash and handing it over to you. "There you go baby girl."'
+				'"Thank you daddy," you smile back and put the money away into your purse.'
+				gs 'sex_ev_after', 'relax_together'
+			end
+			
+			act'Transactionally':
+				npc_dislike[$boy] += 1
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
+				if sex_ev['fuck_count'] > 0:
+					'"Okay, we''ve fucked. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b>.'
+				else
+					'"Okay, I got you off. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b>.'
+				end
+				'"Here," he says. He offers it towards you and you snatch it out of his hand.'
+				'"Thanks," you reply absent-mindedly as you stuff the money into your purse.'
+				gs 'sex_ev_after', 'relax_together'
+			end
+		end
+	end
+end
 --- sex_ev_talk ---------------------------------

locations/sex_ev_virgin.qsrc

@@ -2,45 +2,53 @@
 
 if $ARGS[0] = 'start1':
 	!! player initiated
-	cla & *clr
-	sex_ev['virgin'] = 1
-	$sex_ev['bed_room']
-	'With a fast beating heart, you turn to look at <<$npc_firstname[$boy]>>.'
-	'"<<$npc_firstname[$boy]>>... I want you to take my virginity."'
-	gs'sex_ev_virgin', 'start_flavor'
-	gs'sex_ev_virgin', 'start_options'
+	act'Ask <<$npc_firstname[$boy]>> to take your virginity':
+		cla & *clr
+		sex_ev['virgin'] = 1
+		$sex_ev['bed_room']
+		'With a fast beating heart, you turn to look at <<$npc_firstname[$boy]>>.'
+		'"<<$npc_firstname[$boy]>>... I want you to take my virginity."'
+		gs'sex_ev_virgin', 'start_flavor'
+		gs'sex_ev_virgin', 'start_options'
+	end
 end
 
 if $ARGS[0] = 'start2':
 	!! player initiated, alternative suggestion variant
-	cla & *clr
-	sex_ev['virgin'] = 1
-	$sex_ev['bed_room']
-	'"Well..." You bite your lip, heart pounding inside your chest, mulling over what you''re about to say. "What if... I let you fuck me?"'
-	gs'sex_ev_virgin', 'start_flavor'
-	gs'sex_ev_virgin', 'start_options'
+	act'Give <<$npc_firstname[$boy]>> your virginity':
+		cla & *clr
+		sex_ev['virgin'] = 1
+		$sex_ev['bed_room']
+		'"Well..." You bite your lip, heart pounding inside your chest, mulling over what you''re about to say. "What if... I let you fuck me?"'
+		gs'sex_ev_virgin', 'start_flavor'
+		gs'sex_ev_virgin', 'start_options'
+	end
 end
 
 if $ARGS[0] = 'start3':
 	!! NPC initiated, player doesn''t stop them
-	cla & *nl
-	sex_ev['virgin'] = 1
-	'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
-	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. Take my virginity."'
-	gs'sex_ev_virgin', 'start_flavor'
-	gs'sex_ev_virgin', 'start_options'
+	act'Let <<$npc_firstname[$boy]>> take your virginity':
+		cla & *nl
+		sex_ev['virgin'] = 1
+		'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
+		'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. Take my virginity."'
+		gs'sex_ev_virgin', 'start_flavor'
+		gs'sex_ev_virgin', 'start_options'
+	end
 end
 
 if $ARGS[0] = 'start4':
 	!! NPC initiated, they know that player wants to save it before attempting, player doesn''t stop them
-	sex_ev['virgin'] = 1
-	cla & *clr
-	pcs_horny += 20
-	$sex_ev['bed_room']
-	'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. You know what you told him before. You know that you want to save it. But right now, you just can''t hold yourself back. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
-	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have me."'
-	gs'sex_ev_virgin', 'start_flavor'
-	gs'sex_ev_virgin', 'start_options'
+	act'Okay (lose your virginity)':
+		sex_ev['virgin'] = 1
+		cla & *clr
+		pcs_horny += 20
+		$sex_ev['bed_room']
+		'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. You know what you told him before. You know that you want to save it. But right now, you just can''t hold yourself back. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
+		'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have me."'
+		gs'sex_ev_virgin', 'start_flavor'
+		gs'sex_ev_virgin', 'start_options'
+	end
 end
 
 if $ARGS[0] = 'start5':
@@ -98,6 +106,8 @@ if $ARGS[0] = 'start_options':
 	sex_ev['orgasm_count'] = orgasm
 	if sex_ev['condom'] = 0 and sex_ev['no_condom'] = 0 and sex_ev['condom_setup'] ! 1:
 		act'Continue':cla & gs 'sex_ev_condoms', 'condoms'
+	elseif sex_ev['force_initiative'] = 2:
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
 	else
 		act'Let him take the lead':gt'sex_ev_virgin', 'his_choice'
 
@@ -125,7 +135,7 @@ if $ARGS[0] = 'start_with_condom':
 end
 
 if $ARGS[0] = 'start_without_condom':
-	if npc_caretaker[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,3) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
+	if npc_caretaker[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,2) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
 		'<<$npc_firstname[$boy]>> moves back in between your legs before he stops, hesitating.'
 		gs 'sex_ev_virgin', 'start_options2'
 	else
@@ -158,7 +168,9 @@ if $ARGS[0] = 'saving_virginity':
 	cla & *clr
 	$sex_ev['bed_room']
 	'"We can''t do that," you shake your head. "I''m saving my virginity."'
-	if (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1 or rand(1,3) = 1) and npc_caretaker[$boy] ! 1:
+	if npc_finance[$boy] = 2 and npc_caretaker[$boy] ! 1 and npc_assertive[$boy] ! -1:
+		gs 'sex_ev_virgin', 'buy_virginity1'
+	elseif (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1 or rand(1,3) = 1) and npc_caretaker[$boy] ! 1:
 		if rand(1,2) = 1:
 			'"Come on," he whispers. "I''m so fucking hard for you right now... Let me pop your cherry..."'
 		else
@@ -206,6 +218,7 @@ if $ARGS[0] = 'saving_virginity':
 			end
 			
 			gs 'sex_ev_condoms', 'virgin_condom_ask1'
+			gs 'sex_ev_condoms', 'virgin_condom_pc_ask1'
 		end
 	else
 		sex_ev['no_sex'] = 1
@@ -269,6 +282,7 @@ if $ARGS[0] = 'lover_wait':
 	if $sex_ev['type'] = 'hookup' and know_virgin[$boy] = 0:gt'sex_ev_virgin', 'hookup_wait'
 	cla & *clr
 	if WIP_enabled > 0 and rand(1,10) < npc_sexdrive[$boy] and npc_abusive[$boy] > 0:
+		sex_ev['rape_ev'] = 1
 		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virg-!"'
@@ -290,8 +304,8 @@ if $ARGS[0] = 'lover_wait':
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virginity!"'
 			'"Sorry. I got caught up in the moment. I forgot."'
-			'"Fucking idiot! Are you trying to knock me up or something?" you growl.'
-			'"Well what do you want to do instead?" he asks.'
+		!!	'"Fucking idiot! Are you trying to knock me up or something?" you growl.'
+		!!	'"Well what do you want to do instead?" he asks.'
 		else
 			'"Wait!" you yelp. "I''m a virgin! You can''t!"'
 			'"Oh. I didn''t realize. You realize that we''re fuckbuddies right?"'
@@ -353,8 +367,10 @@ if $ARGS[0] = 'not_ready':
 	act'I''m just not sure if I''m ready':
 		cla & *clr
 		$sex_ev['bed_room']
-		'"I''m just not sure if I''m ready," you stammer.'
-		if npc_caretaker[$boy] = 1:
+		'"I''m just not sure if I''m ready," you mumble shyly.'
+		if npc_finance[$boy] = 2 and npc_caretaker[$boy] ! 1 and npc_assertive[$boy] ! -1:
+			gs 'sex_ev_virgin', 'buy_virginity1'
+		elseif npc_caretaker[$boy] = 1:
 			'"Well... we don''t have to if you''re not ready. We can do something else."'
 			act'If that''s really okay':
 				sex_ev['no_sex'] = 1
@@ -510,22 +526,251 @@ if $ARGS[0] = 'bj_instead':
 	end}
 end
 
-if $ARGS[0] = 'safe_day_no_condoms1':
-	if stat['safe_day'] = 1:
-		act'It <i>is</i> a safe day...':
-			sex_ev['safe_day'] = 1
-			cla & *nl
-			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
+
+if $ARGS[0] = 'buy_virginity1':
+	sex_ev['buy_virginity'] = 5
+	'"Would this change your mind?" He picks up his wallet and pulls several large notes from it.'
+	'"W-what?" you gasp in surprise.'
+	'"5000 <b>₽</b>," he says. "5000 <b>₽</b> to let me take your virginity."'
+	act'No way!':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"What?! No way!" You gape at <<$npc_firstname[$boy]>> in horror, snapping your legs closed. "What on earth kind of offer is that?"'
+		gs'sex_ev_virgin', 'buy_virginity_bigger_offer'
+	end
+	
+	act'I''m not a hooker!':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"What the fuck?" You snap your legs closed as you gape at <<$npc_firstname[$boy]>>''s audacity. "What do you think I am? Some kind of hooker?"'
+		'"Only if you say yes," he smirks.'
+		
+		gs'sex_ev_virgin', 'not_for_sale'
+		
+		gs'sex_ev_virgin', 'buy_virginity_consider'
+	end
+	
+	gs'sex_ev_virgin', 'buy_virginity_consider'
+end
+
+if $ARGS[0] = 'not_for_sale':
+	act'Not for sale':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"I''m not for sale!" you snap.'
+		'"Well, let me know if you change your mind," <<$npc_firstname[$boy]>> smirks as he moves the cash to a bedside table. "But that''s fine. We can still have fun without losing your virginity. Why don''t we just do this instead?"'
+		*nl
+		if npc_pussyeater[$boy] = 1:
+			'He gently pushes you onto your back and spreads your knees apart with his hands, dipping his head between your thighs...'
+			act'Get eaten out':gs 'sex_ev_foreplay', 'pussy_lick'
+		else
+			'He puts a firm hand on your shoulder and pushes you to your knees. His <<$npc_dick_desc[$boy]>> cock dangles before you as he moves his hand to your head and pulls your face toward it.'
+			act'Suck him off':gt 'sex_ev_foreplay', 'bj_sub1'
 		end
-	elseif stat['probably_safe_day'] = 1:
-		act'It''s <i>probably</i> a safe day...':
-			sex_ev['probably_safe_day'] = 1
-			cla & *nl
-			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
+	end
+end
+
+if $ARGS[0] = 'buy_virginity_bigger_offer':
+	sex_ev['buy_virginity'] = 10
+	'"Fine. 10,000 <b>₽</b> then."'
+	'He counts out twice as many notes and casually tosses them on the bed.'
+	'"Let me fuck you and 10,000 <b>₽</b> are yours right now."'
+	gs'sex_ev_virgin', 'not_for_sale'
+	gs'sex_ev_virgin', 'buy_virginity_consider'
+end
+
+if $ARGS[0] = 'buy_virginity_consider':
+	act'Consider it':
+		cla & *nl
+		'<i>Well...</i>'
+		*nl
+		'You chew your lip as you start to consider it.'
+		*nl
+		'<i><<sex_ev[''buy_virginity'']>>,000 <b>₽</b> is a lot of money...</i>'
+		gs'sex_ev_virgin', 'not_for_sale'
+		gs'sex_ev_virgin', 'buy_virginity_accept'
+	end
+end
+
+if $ARGS[0] = 'buy_virginity_accept':
+	act'Take the money (reluctant)':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"I guess that seems fair..." you say. You hesitantly pick up the cash, a heavy weight in your heart as you put it into your purse.'
+		gs'sex_ev_virgin', 'buy_virginity_accept2'
+	end
+	
+	act'Take the money (surprised)':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"Well..." you say, hesitantly picking up the cash. "If you''re really willing to pay this much then..."'
+		'You quickly take the money and slip it into your bag.'
+		gs'sex_ev_virgin', 'buy_virginity_accept2'
+	end
+	
+	act'Take the money (eager)':
+		cla & *clr
+		$sex_ev['bed_room']
+		'Your eyes go wide for a moment and then you quickly snatch the cash as if afraid he''ll suddenly change his mind.'
+		'"Damn! If you''re gonna pay this much, then yeah I''ll let you fuck me!" you say, giddy as you slip the money into your bag.'
+		gs'sex_ev_virgin', 'buy_virginity_accept2'
+	end
+end
+
+if $ARGS[0] = 'buy_virginity_accept2':
+	act'Continue':
+		cla & *clr
+		$sex_ev['bed_room']
+		money += sex_ev['buy_virginity'] * 1000
+		sex_ev['prostitution'] = 1
+		sex_ev['force_initiative'] = 2
+		sex_ev['must_fuck'] = 1
+		gs 'sex_ev_condoms', 'setup'
+		'No sooner have you finished than <<$npc_firstname[$boy]>> firmly grabs you by the shoulders and pushes you onto the bed.'
+		if npc_risktaker[$boy] > 0 and npc_no_condoms[$boy] ! 1:
+			!! npc_no_condoms[$boy] must = 1 because if he has the trait he won''t even ask
+			gs 'sex_ev_virgin', 'no_condom_offer'
+		else
+			act'Continue':cla & gs 'sex_ev_condoms', 'condoms'
 		end
 	end
 end
 
+
+if $ARGS[0] = 'no_condom_offer':
+	'"I''ll throw in another five grand right now if we can do it without a condom," he says.'
+	act'Too far':
+		sex_ev['condom'] = 1
+		cla & *nl
+		'"That''s too far," you say, shaking your head.'
+		'"Damn," he says ruefully.'
+		gs 'sex_ev_condoms', 'condoms'
+	end
+	
+	act'Don''t push it':
+		sex_ev['condom'] = 1
+		cla & *nl
+		'"Don''t push it," you say, giving him a nasty glare.'
+		'"You''re cute when you''re mad," he snickers back.'
+		gs 'sex_ev_condoms', 'condoms'
+	end
+	
+	act'Agree (hesitant)':
+		money += 5000
+		sex_ev['paid_no_condom'] = 1
+		sex_ev['no_condom'] = 1
+		cla & *nl
+		'"O-okay," you stammer. <<$npc_firstname[$boy]>> doesn''t even hesitate and immediately pulls out another 5,000 <b>₽</b> and slaps it on the bedside table.'
+		'"This is gonna feel so good," he grins.'
+		*nl
+		if stat['safe_day'] = 1:
+			'<i>It should be a safe day anyways...</i> you think to yourself nervously.'
+		elseif stat['probably_safe_day'] = 1:
+			'<i>It shouldn''t be <b>too</b> risky today...</i> you think to yourself nervously.'
+		elseif stat['dangerous_day'] = 1:
+			'<i>What am I thinking?!</i> you think to yourself panickedly. <i>It''s a danger day today! I could get pregnant!</i>'
+		end
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'Agree (eager)':
+		money += 5000
+		sex_ev['paid_no_condom'] = 1
+		sex_ev['no_condom'] = 1
+		cla & *nl
+		'"It''s your money," you say with a smirk and a shrug. "I won''t say no if you want to give me more."'
+		'<<$npc_firstname[$boy]>> doesn''t even hesitate and immediately pulls out another 5,000 <b>₽</b> and slaps it on the bedside table.'
+		'"This is gonna feel so good," he grins as he gets into position.'
+		*nl
+		if stat['safe_day'] = 1:
+			'<i>It should be a safe day anyways...</i> you think to yourself.'
+		elseif stat['probably_safe_day'] = 1:
+			'<i>It shouldn''t be <b>too</b> risky today...</i> you think to yourself.'
+		end
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'Cash up front':
+		money += 5000
+		sex_ev['paid_no_condom'] = 1
+		sex_ev['no_condom'] = 1
+		cla & *nl
+		'"Only if you pay me up front," you say. <<$npc_firstname[$boy]>> doesn''t even hesitate and immediately pulls out another 5,000 <b>₽</b> and slaps it on the bedside table.'
+		'"All yours," he grins he grins as he gets into position.'
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'But you can''t come inside':
+		cla & *nl
+		sex_ev['paid_no_condom'] = 1
+		sex_ev['no_condom'] = 1
+		if $npc_cum_pref[$boy] ! 'creampie':
+			money += 5000
+			'"Only if you promise not to come inside me," you say. <<$npc_firstname[$boy]>> doesn''t even hesitate and immediately pulls out another 5,000 <b>₽</b> and slaps it on the bedside table.'
+			'"This is gonna feel so good," he grins as he gets into position.'
+			act'Continue':gt'sex_ev_virgin', 'his_choice'
+		else
+			gs'sex_ev_virgin', 'paid_creampie_offer'
+		end
+	end
+end
+
+if $ARGS[0] = 'paid_creampie_offer':
+	'"But that''s the best part," he grins back. "Fine. Another 10,000 <b>₽</b> total if you let me come inside you."'
+	act'Too far':
+		cla & *nl
+		'"That''s too far," you say, shaking your head. "I can''t let you come inside me without a condom."'
+		'"Damn," he says ruefully. "Guess I''ll just take what I can get then."'
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'Don''t push it':
+		cla & *nl
+		'"Don''t push it," you say, giving him a nasty glare. "No condoms is one thing, but now it just sounds like you''re trying to knock me up."'
+		if npc_childfree[$boy] = 1:
+			'"Wouldn''t dream of it," he snickers, getting into position.. "I hate kids."'
+		else
+			'"What if I am?" he snickers, getting into position.'
+		end
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'Agree (hesitant)':
+		money += 10000
+		sex_ev['paid_free_creampies'] = 1
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"I can''t believe I''m letting you do this..." you say reluctantly and <<$npc_firstname[$boy]>> doesn''t even hesitate, immediately pulling out another 10,000 <b>₽</b> and slaps it on the bedside table.'
+		'"This is gonna feel so good," he grins.'
+		*nl
+		if stat['safe_day'] = 1:
+			'<i>It should be a safe day anyways...</i> you think to yourself nervously.'
+		elseif stat['probably_safe_day'] = 1:
+			'<i>It shouldn''t be <b>too</b> risky today...</i> you think to yourself nervously.'
+		elseif stat['dangerous_day'] = 1:
+			'<i>What am I thinking?!</i> you think to yourself panickedly. <i>It''s a danger day today! I could get pregnant!</i>'
+		end
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+	
+	act'Agree (eager)':
+		money += 10000
+		sex_ev['paid_free_creampies'] = 1
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"For <i>another</i> 10 grand?" you say eyes sparkling. "Go ahead! Come inside me as much as you want!"'
+		'<<$npc_firstname[$boy]>> doesn''t even hesitate and immediately pulls out another 10,000 <b>₽</b> and slaps it on the bedside table.'
+		'"This is gonna feel so good," he grins as he gets into position.'
+		*nl
+		if stat['safe_day'] = 1:
+			'<i>It should be a safe day anyways...</i> you think to yourself nervously.'
+		elseif stat['probably_safe_day'] = 1:
+			'<i>It shouldn''t be <b>too</b> risky today...</i> you think to yourself nervously.'
+		end
+		act'Continue':gt'sex_ev_virgin', 'his_choice'
+	end
+end
+
 if $ARGS[0] = 'his_choice':
 	sex_ev['his_choice_virg'] = 1
 	gs'sex_ev_sex', 'speed_select'
@@ -534,8 +779,6 @@ if $ARGS[0] = 'his_choice':
 			gt'sex_ev_virgin', 'miss_virg_norm1'
 		elseif $npc_fav_pos[$boy] = 'doggy':
 			gt'sex_ev_virgin', 'doggy_virg_norm1'
-		elseif $npc_fav_pos[$boy] = 'cowgirl':
-			gt'sex_ev_virgin', 'cowgirl_virg_norm1'
 		else
 			gt'sex_ev_virgin', 'miss_virg_norm1'
 		end
@@ -641,11 +884,15 @@ if $ARGS[0] = 'miss_virg_norm1':
 	sex_ev['virgin'] = 1
 	sex_ev['speed'] = 1
 	if sex_ev['condom'] ! 1: sex_ev['no_condom'] = 1
-	gs'arousal', 'vaginal',1,'no_orgasm_msg'
+	gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	if $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
+		gs 'pain', 3, 'vaginal', 'stretch'
+		sex_ev['big_cock_virgin'] = 1
+	end
 	gs'stat'
 	$sex_ev['position'] = 'miss'
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/enter1.mp4"></video></center>'
-	'<<$npc_firstname[$boy]>> presses his cock inside you slowly, centimeter by centimeter. It fills you up, stretching your walls until you feel it bump against your hymen. He doesn''t stop though, and keeps pushing until you feel him tear straight through your maidenhood, eliciting a gasp from your mouth. Whether in excitement or pain, you aren''t really sure.'
+	'<<$npc_firstname[$boy]>> presses his cock inside you slowly, centimeter by centimeter. It fills you up, stretching your walls until you feel it bump against your hymen. He doesn''t stop though, and keeps pushing until... you feel him tear straight through your maidenhood, eliciting a gasp from your mouth. Whether in excitement or pain, you aren''t really sure.'
 	'"You okay?"'
 	act'It hurts':
 		$sex_ev['virgin_react'] = 'hurt'
@@ -661,6 +908,18 @@ if $ARGS[0] = 'miss_virg_norm1':
 		$sex_ev['virgin_react'] = 'mmm'
 		gs'sex_ev_virgin', 'miss_virg_norm1.1'
 	end
+	
+!!	if alko > 6:
+		
+!!	end
+	
+	
+	if $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
+		act'He''s big!':
+			$sex_ev['virgin_react'] = 'big'
+			gs'sex_ev_virgin', 'miss_virg_norm1.1'
+		end
+	end
 end
 
 if $ARGS[0] = 'miss_virg_norm1.1':
@@ -689,9 +948,9 @@ end
 
 if $ARGS[0] = 'miss_virg_kiss':
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/kiss1.mp4"></video></center>'
-	gs'arousal', 'vaginal',1,'no_orgasm_msg'
-	gs'arousal', 'kiss',2,'no_orgasm_msg'
-	gs'arousal', 'kiss',-10,'no_orgasm_msg'
+	gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'kiss',2, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'kiss',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	sex_ev['kiss'] = 1
 	if npc_no_kiss[$boy] = 1:
 		'Unable to contain yourself, you forget your rules and reach up, pulling <<$npc_firstname[$boy]>>''s face down to press it against yours. Your eyes roll back in your head, feeling the thrust of his cock in your pussy and the invasion of his tongue in your mouth. You moan into his mouth and he moans back.'
@@ -716,7 +975,7 @@ if $ARGS[0] = 'miss_virg_hard1':
 	!! sex_ev['boy_cum'] = 2
 	sex_ev['virgin'] = 1
 	$orgasm_or = 'no'
-	gs'arousal', 'vaginal',1,'rough', 'no_orgasm_msg'
+	gs'arousal', 'vaginal',1,'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	sex_ev['speed'] = 3
 	sex_ev['fuck_enjoyment'] = -1
 	gs'stat'
@@ -770,7 +1029,7 @@ if $ARGS[0] = 'miss_virg_hard2':
 	cla & *clr
 	$sex_ev['pos_speed'] = 'miss2'
 	gs'sex_ev_sex', 'fuck_arousal_code'
-	gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+	gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> picks up the pace as you command and you instinctively arch your back, getting him to thrust deeper into you. The heightened pace feels even better than it did when he was being gentle and you moan loudly with intense pleasure.'
 	*nl
@@ -786,7 +1045,7 @@ if $ARGS[0] = 'miss_virg_hard2_2':
 	cla & *clr
 	$sex_ev['pos_speed'] = 'miss3'
 	gs'sex_ev_sex', 'fuck_arousal_code'
-	gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+	gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/rough1.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> picks up the pace as you command and you groan loudly, face contorting in a mixture of pain and pleasure. Maybe sensing something within you, he reaches up and grabs a fistful of your hair, using it to pull himself into you even harder.'
 	*nl
@@ -802,7 +1061,7 @@ if $ARGS[0] = 'doggy_virg_norm1':
 	sex_ev['virgin'] = 1
 	$sex_ev['pos_speed'] = 'doggy1'
 	$orgasm_or = 'no'
-	gs'arousal', 'vaginal',1,'no_orgasm_msg'
+	gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	gs'stat'
 	$sex_ev['position'] = 'doggy'
 	$sex_ev['pos_speed'] = 'doggy1'
@@ -878,7 +1137,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 	end
 	act'Scream':
 		cla & *clr
-		gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
+		gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 !!		gs 'pain', 2, 'breasts', 'stretch'
 		gs'stat'
 		'<center><video autoplay loop src="images/shared/sex/vag/doggy/laying_down1.mp4"></video></center>'
@@ -886,7 +1145,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 		'<<$npc_firstname[$boy]>> fucks you roughly and without mercy or restraint. It hurts so much. Every time his cock slams back in to you, you feel like you''re going to die. It''s like your pussy is being torn in half and you wonder if you''re going to piss blood after this. He lets all of his weight rest on top of you, driving the breath from your lungs. You can''t even scream. All you can do is squirm beneath <<$npc_firstname[$boy]>> as he pounds your virgin pussy over and over again.'
 		act'Endure it':
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *nl
 			'The next few minutes pass by in a torturous blur. You have no idea how much time actually passes by, only that every second of it is filled with pain, tears, and prayer that it will end after the next thrust.'
@@ -916,8 +1175,8 @@ if $ARGS[0] = 'doggy_virg_hard2':
 	cla & *clr
 	$sex_ev['pos_speed'] = 'doggy2'
 	$orgasm_or = ''
-	gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
-	gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/med2.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> picks up the pace as you command and you start to push your hips back in times with his. The sound of your ass being clapped echoes off the walls. The heightened pace feels even better than it did when he was being gentle and you moan loudly with intense pleasure.'
 	*nl
@@ -933,8 +1192,8 @@ if $ARGS[0] = 'doggy_virg_hard2_2':
 	cla & *clr
 	$sex_ev['pos_speed'] = 'doggy3'
 	$orgasm_or = ''
-	gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
-	gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/rough1.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> picks up the pace as you command and you groan loudly, face contorting in a mixture of pain and pleasure. Maybe sensing something within you, he reaches up and grabs a fistful of your hair, using it to pull himself into you even harder.'
 	*nl
@@ -962,7 +1221,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 		'"Mhmm," you nod. With a deep breath, you lift yourself up slightly and bounce straight down, tearing through your virginity.'
 		act'<b>!!!!</b>':
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal', 1,'no_orgasm_msg'
+			gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
@@ -971,7 +1230,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 			'"It''s okay," <<$npc_firstname[$boy]>> says, assuring you, putting his hands on your hips. "Take it slow, alright?"'
 			act'Take his advice':
 				cla & *clr
-				gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
 				'You nod in response, taking deep breaths trying to adjust to feeling this... <i>thing</i> impaling you, filling you up, stretching you to your limits. Once you feel ready, you start to move.'
@@ -985,7 +1244,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 			act'Go hard, power through':
 				cla & *clr
 				$sex_ev['pos_speed'] = 'cowgirl3'
-				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				if sex_ev['condom'] = 1:
 					'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/condom1.mp4"></video></center>'
@@ -1010,7 +1269,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 		'"Come on already!" <<$npc_firstname[$boy]>> doesn''t wait for a response and thrusts his hips up, sending his cock tearing through your virginity.'
 		act'<b>!!!!</b>':
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal', 1,'no_orgasm_msg'
+			gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
@@ -1021,7 +1280,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 			*nl
 			act'Ride him':
 				cla & *clr
-				gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				if sex_ev['condom'] = 1:
 					'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/condom1.mp4"></video></center>'
@@ -1036,7 +1295,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 				cla & *clr
 				$sex_ev['pos_speed'] = 'cowgirl3'
 				$orgasm_or = 'no'
-				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				if sex_ev['condom'] = 1:
 					'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/condom1.mp4"></video></center>'
@@ -1057,7 +1316,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 		'You nod back at him and take a deep breath. You lift yourself up slightly, and then force yourself straight down, tearing through your virginity.'
 		act'<b>!!!!</b>':
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal', 1,'no_orgasm_msg'
+			gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/blood1.jpg"></center>'
@@ -1066,7 +1325,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 			'"Keep moving, it''ll get better," <<$npc_firstname[$boy]>> says, assuring you, putting his hands on your hips.'
 			act'Take his advice':
 				cla & *clr
-				gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
 				'You nod in response and clench your jaw, slowly lifting yourself up before sliding back down on his cock. You slowly go up and down a few more times when you feel something running down your thighs. It takes you a moment, as you don''t feel very aroused right now so you figure it can''t be your juices. And then you realize; it''s blood. The last mark of your virginity.'
@@ -1078,7 +1337,7 @@ if $ARGS[0] = 'cowgirl_virg_norm1':
 			act'Go hard, power through':
 				cla & *clr
 				$sex_ev['pos_speed'] = 'cowgirl3'
-				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
+				gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
 				gs'stat'
 				if sex_ev['condom'] = 1:
 					'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/condom1.mp4"></video></center>'
@@ -1100,8 +1359,8 @@ end
 
 if $ARGS[0] = 'cowgirl_virg_hard1':
 	$orgasm_or = ''
-	gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
-	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'vaginal',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	sex_ev['speed'] = 2
 	$sex_ev['pos_speed'] = 'cowgirl2'
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med3.mp4"></video></center>'
@@ -1116,8 +1375,8 @@ if $ARGS[0] = 'cowgirl_virg_hard2':
 	sex_ev['speed'] = 3
 	!! sex_ev['boy_cum'] = 2
 	$orgasm_or = 'no'
-	gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
-	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
+	gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	gs'arousal', 'vaginal',-10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard2.mp4"></video></center>'
 	'With no warning other than a sudden cry, you throw yourself down on <<$npc_firstname[$boy]>>''s cock with as much force as you can. The impact reverberates through you flaring both the pain and the pleasure inside of your cunt. You raise yourself up and impale yourself again and again and again until you''re riding him like a bucking stallion. Tears stream down your face and protracted groans of exertion escape from behind your teeth, clenched in a fierce grin. Your pussy hurts so much, and you never want this pain to end.'
 	act'Continue':cla & gs'sex_ev_cum', 'fuck_cum'
@@ -1389,10 +1648,10 @@ end
 
 if $ARGS[0] = 'hurt_react2':
 	'He keeps pushing inside, eliciting more grunts of discomfort from you, until he finally stops moving. You wriggle uncomfortably beneath him. Having a penis inside you is <i>not</i> what you expected. It fills you completely and you can feel it pressing against the walls of your pussy, straining against them and forcing them to stretch. That feeling leaves you like you''re being torn in half and you wonder why any girl would ever say she enjoys sex.'
-	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood. The final sign of the loss of your virginity.'
+	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood from your torn hymen. You''ve officially lost your virginity.'
 	*nl
 	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you nod for him to move again.'
-	'"Okay. You can keep going," you grimance, hoping this horrible experience ends soon.'
+	'"Okay. You can keep going," you grimace, hoping this horrible experience ends soon.'
 end
 
 if $ARGS[0] = 'fine_react1':
@@ -1403,9 +1662,9 @@ end
 
 if $ARGS[0] = 'fine_react2':
 	'He keeps pushing inside, eliciting more grunts of discomfort from you, until he finally stops moving and you think he''s fully inside you. Having a penis inside you is a decidedly strange experience. You can feel his cock pressing against your pussy, stretching it to its limits and straining against them. You feel "full", and you can''t think of another way to describe it at the moment.'
-	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood. The final sign of the loss of your virginity.'
+	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood from your torn hymen. You''ve officially lost your virginity.'
 	*nl
-	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you nod for him to move again.'
+	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you signal for him to move again.'
 	'"Okay. You can keep going," you nod.'
 end
 
@@ -1417,12 +1676,33 @@ end
 
 if $ARGS[0] = 'mmm_react2':
 	'He keeps pushing inside, eliciting more grunts of discomfort from you, until he finally stops moving and you think he''s fully inside you. Having a penis inside you is a decidedly strange experience. You can feel his cock pressing against your pussy, stretching it to its limits and straining against them. You feel "full", and you can''t think of another way to describe it at the moment.'
-	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood. The final sign of the loss of your virginity.'
+	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood from your torn hymen. You''ve officially lost your virginity.'
 	*nl
-	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you nod for him to move again.'
+	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you signal for him to move again.'
 	'"Okay. You can keep going," you nod.'
 end
 
+if $ARGS[0] = 'big_react1':
+	cla & *nl
+	'"<i>Ahh~!</i>" you gasp, feeling breathless as <<$npc_firstname[$boy]>> begins to penetrate you. "You''re really <i>-ah-</i> big-!"'
+	if npc_caretaker[$boy] = 1:
+		'"Sorry about that," he mumbles shyly. "Maybe not the best guy to lose your virginity too. Just hold on a little longer. I''m almost all the way in."'
+	elseif npc_arrogant[$boy] = 1:
+		'"You picked a great cock to lose your virginity to," he grins, forcing more of his <<$npc_dick_desc[$boy]>> shaft inside you.'
+	else
+		'"Just a little more," he says. "I''m almost all the way in."'
+	end
+end
+
+if $ARGS[0] = 'big_react2':
+	'You barely stifle another gasp as <<$npc_firstname[$boy]>> finishes pushing the entire length of his <<$npc_dick_desc[$boy]>> cock into your pussy. It makes you feel stuffed, like your stomach is <i>bulging</i> with it inside you. Your pussy is crying in protest and sharp pains lance through your uncomfortably stretched sex.'
+	*nl
+	'"Let''s just take a minute. Give you some time to adjust," <<$npc_firstname[$boy]>> says. Just after he says that, you feel something running down the curve of your thigh. <i>What is tha-</i> you start to wonder before it hits you; it''s blood from your torn hymen. You''ve officially lost your virginity.'
+	*nl
+	'After a minute or two of letting <<$npc_firstname[$boy]>>''s cock stretch your pussy, you nod for him to move again.'
+	'"Okay. You can keep going," you grunt out.'
+end
+
 if $ARGS[0] = 'virgin_enjoyment':
 	if sex_ev['speed_change'] = 1:
 		act'... still find it painful':
@@ -1430,7 +1710,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 			sex_ev['virgin_hurt'] = 1
 			cla & *nl
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			pcs_horny -= 50
 			gs'stat'
 			'... still find it really painful.'
@@ -1444,7 +1724,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 			sex_ev['virgin_numb'] = 1
 			cla & *nl
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal', 1,'no_orgasm_msg'
+			gs'arousal', 'vaginal', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			minut += rand(3,4)
 			gs'stat'
 			'... still don''t really enjoy it...'
@@ -1458,7 +1738,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 			sex_ev['virgin_good'] = 1
 			$orgasm_or = ''
 			cla & *nl
-			gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'... start to feel really good...'
 			*nl
@@ -1478,9 +1758,10 @@ if $ARGS[0] = 'virgin_enjoyment':
 			!! sex_ev['boy_cum'] = 2
 			cla & *nl
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
+			gs'arousal', 'vaginal', rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			minut += rand(3,4)
 			gs'stat'
+!!			'Something <i>tears</i> inside you '
 			'<i>... this is really painful.</i>'
 			*nl
 			if $sex_ev['pos_speed'] = 'cowgirl3':
@@ -1501,7 +1782,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 			!! sex_ev['boy_cum'] = 2
 			cla & *nl
 			$orgasm_or = 'no'
-			gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'<i>... you aren''t really enjoying this...</i>'
 			*nl
@@ -1518,8 +1799,8 @@ if $ARGS[0] = 'virgin_enjoyment':
 			sex_ev['virgin_good'] = 1
 			cla & *nl
 			$orgasm_or = ''
-			gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
-			gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'<i>... this is starting to feel really good...</i>'
 			*nl
@@ -1565,8 +1846,8 @@ if $ARGS[0] = 'virgin_enjoyment':
 			sex_ev['virgin_pain_good'] = 1
 			cla & *nl
 			$orgasm_or = ''
-			gs'arousal', 'vaginal',rand(4,8),'no_orgasm_msg'
-			gs'arousal', 'vaginal',-15,'no_orgasm_msg'
+			gs'arousal', 'vaginal',rand(4,8), 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			gs'arousal', 'vaginal',-15, 'no_orgasm_msg', $sex_ev['prostitution_flag']
 			gs'stat'
 			'The initial pain you felt is still there, but somehhow it''s evolved. <<$npc_firstname[$boy]>>''s cock is slick with your blood cock and every time moves inside you, it feels like your vagina is going to split in half. It reaches deep inside you, like a knife stabbing into your cervix. And it feels <i>so good</i>.'
 			*nl

locations/sex_ev_wakeup.qsrc

@@ -0,0 +1,1199 @@
+# sex_ev_wakeup
+
+if $ARGS[0] = 'start':
+	sex_ev['morning_after'] = 1
+	if sex_ev['lover_left'] = 1:gt'sex_ev_wakeup', 'wake_alone'
+	if sex_ev['sleep_fuck'] = 1:gt'sex_ev_wakeup', 'sleep_fuck_wake'
+	if (npc_earlyriser[$boy] = 1 or hour >= 7) and (rand(1,10) < npc_sexdrive[$boy]/3):
+!!		if ($npc_cum_pref[$boy] = 'facial' or npc_humor[$boy] = 2) and rand(1,2) = 2:
+			gs'sex_ev_wakeup', 'cumshot_wakeup1'
+!!		else
+!!			gt'sex_ev_sex', 'wakeup_fondling'
+!!		end
+	else
+		'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
+		if budilnikOn = 0:
+			!!{	if hangover = daystart:
+				'A loud sound pierces your consciousness like a spear through the brain, bringing you out of sleep. You wake up blearily, head <i>pounding</i> with an awful hangover, as you look around in bewilderment at what is making that awful sound, only to find it is your phone alarm going off.'
+				act'<i>Ugh, my head</i>':gt'sex_ev_morning', 'hangover'
+			else}
+				'A loud sound disrupts your sleep. As you slowly crack open your eyes, you see the illuminated screen of your phone, displaying your morning alarm and asking if you want to snooze it.'
+				act'<i>Yawn</i>':gt'sex_ev_wakeup', 'yawn_wake'
+				gs'sex_ev_wakeup', 'kiss_wake'
+		!!	end
+		else
+		!!{	if hangover = daystart:
+				'A sharp lance of pain pierces your consciousness, bringing you out of sleep. You wake up blearily, head <i>pounding</i> with an awful hangover.'
+				act'<i>Ugh, my head</i>':gt'sex_ev_morning', 'hangover'
+			else}
+				if $sex_ev['loc'] = 'pc_home':
+					'Your mind stirs and you slowly come to consciousness, snuggled under your covers with <<$npc_firstname[$boy]>>''s arms wrapped around you.'
+				elseif $sex_ev['loc'] = 'npc_home':
+					'Your mind stirs and you slowly come to consciousness, tucked under the covers of <<$npc_firstname[$boy]>>''s bed.'
+				else
+					'Your mind stirs and you slowly come to consciousness, snuggled under the covers with <<$npc_firstname[$boy]>>''s arms wrapped around you.'
+				end
+				act'<i>Yawn</i>':gt'sex_ev_wakeup', 'yawn_wake'
+				gs'sex_ev_wakeup', 'kiss_wake'
+		!!	end
+		end
+		
+		gs'sex_ev_wakeup', 'late_for_school'
+		
+!!		if sex_ev['pass_out'] = 1:
+			
+		gs'sex_ev_wakeup', 'after_sleepfuck_wake'
+		
+		gs'sex_ev_wakeup', 'guilt_start'
+		
+		gs'sex_ev_wakeup', 'forgot_bc_pill'
+		
+!!		gs'sex_ev_wakeup', 'stop_hooking_up'
+	end
+end
+
+if $ARGS[0] = 'wake_alone':
+	'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
+	if budilnikOn = 0:
+		!!{	if hangover = daystart:
+			'A loud sound pierces your consciousness like a spear through the brain, bringing you out of sleep. You wake up blearily, head <i>pounding</i> with an awful hangover, as you look around in bewilderment at what is making that awful sound, only to find it is your phone alarm going off.'
+		else}
+			'A loud sound disrupts your sleep. As you slowly crack open your eyes, you see the illuminated screen of your phone, displaying your morning alarm and asking if you want to snooze it.'
+			*nl
+			'You groggily tap it a few times before finally getting it to turn off.'
+			act'Continue':gt'sex_ev_wakeup', 'wake_alone2'
+	!!	end
+	else
+	!!{	if hangover = daystart:
+			'A sharp lance of pain pierces your consciousness, bringing you out of sleep. You wake up blearily, head <i>pounding</i> with an awful hangover.'
+			act'<i>Ugh, my head</i>':gt'sex_ev_morning', 'hangover'
+		else}
+			'Your mind stirs and you slowly come to awareness that it''s morning and you''re snuggled under the covers.'
+			act'Continue':gt'sex_ev_wakeup', 'wake_alone2'
+	!!	end
+	end
+end
+
+if $ARGS[0] = 'wake_alone2':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/romance/misc/wake_alone1.mp4"></video></center>'
+	'It''s only then that you sit up in bed and realize that <<$npc_firstname[$boy]>> is gone.'
+	*nl
+	'You vaguely remember passing out last night. He must have left after you fell asleep. Or early this morning.'
+	*nl
+	'Either way, now it''s just... you.'
+	act'Continue':gt'sex_ev_leave', 'exit'
+end
+
+!!{
+if $ARGS[0] = 'hangover':
+
+	'He wakes up at the same time as you'
+	:loopwakeup3
+	if sex_ev['hangover'] = 1:
+		act'I need coffee':
+			cla & *nl
+			'"I desperately need coffee," you wince, rubbing your brow as if will somehow make your blindingly painful headache go away.'
+			'"Me too." <<$npc_firstname[$boy]>> says, seemingly in the same state.'
+
+		end
+
+		act'Can I use your shower?':
+
+
+		end
+
+		act'I need coffee and a shower'
+
+
+		end
+
+	else
+
+
+	end
+	if sex_ev['im_hungover'] = 0:
+		act'I''m so hungover':
+			cla & *clr
+			sex_ev['im_hungover'] = 1
+			$sex_ev['bed_room']
+			'"I''m so hungover right now," you groan.'
+			'"Same..."'
+		end
+	end
+end}
+
+if $ARGS[0] = 'sleep_fuck_wake':
+	if daystage = 2:
+		'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep4.jpg"></center>'
+	end
+	
+	'Your mind stirs and you slowly come to consciousness. The first thing you notice...'
+	*nl
+	if cum_loc['vagina'] > sex_ev['sleep_cum_vagina']:
+		'<i>Is that cum leaking out of your pussy?</i>'
+	elseif cum_loc['face'] > sex_ev['sleep_cum_face']:
+		'<i>Is there cum on my face?</i>'
+	elseif cum_loc['tits'] > sex_ev['sleep_cum_tits']:
+		'<i>Is there cum on my tits?</i>'
+	elseif cum_loc['stomach'] > sex_ev['sleep_cum_stomach']:
+		'<i>Is that cum on me?</i>'
+!!	else
+!!		'<i>Was <<$npc_firstname[$boy]>> wearing a condom when you went to sleep last night?</i>'
+	end
+	act'Continue':
+		cla & *clr
+		if cum_loc['vagina'] > sex_ev['sleep_cum_vagina']:
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
+			'You pull aside the covers and discover, yes, it is indeed fresh cum dripping from your pussy.'
+		elseif cum_loc['face'] > sex_ev['sleep_cum_face']:
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial35.jpg"></center>'
+			'You blink carefully, running your hand across your cheek to discover, yes, there is indeed fresh cum on your face.'
+		elseif cum_loc['tits'] > sex_ev['sleep_cum_tits']:
+			'<center><img <<$set_imgh>> src="images/pc/body/cum/cumtits/cumtits8.jpg"></center>'
+			'You sit up, looking down to discover, yes, there is indeed fresh cum on your tits.'
+		elseif cum_loc['stomach'] > sex_ev['sleep_cum_stomach']:
+			'<center><img <<$set_imgh>> src="images/pc/body/cum/cumbelly/cumbelly10.jpg"></center>'
+			'You sit up, looking down to discover, yes, there is indeed fresh cum on your belly.'
+!!		else
+!!			'<i>Was <<$npc_firstname[$boy]>> wearing a condom when you went to sleep last night?</i>'
+		end
+		
+		act'Did you fuck me in my sleep?':
+			cla & *nl
+			'"... did you fuck me while I was sleeping last night?" you ask.'
+			act'Just wondered':
+				cla & *nl
+				'"Was just wondering," you reply.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+			
+			act'Explains the dream':
+				cla & *nl
+				'"Well that explains the weird dreams I was having," you say.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+			if npc_sleep_sex_okay[$boy] = 0:
+				'"Yeah. Got horny and you wouldn''t wake up."'
+				act'Don''t make a habit out of it':
+					cla & *nl
+					'"It was fine this time," you say. "But don''t make a habit out of it."'
+					'"No promises," <<$npc_firstname[$boy]>> smirks mischievously.'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'Wake me up next time':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 1
+					'"Wake me up next time," you say. "Maybe I want to get some too."'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'That''s fine':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"That''s fine," you say. "A guy''s gotta take care of his needs, doesn''t he?"'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'Sleep orgasms are the best':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"Feel free to do it again," you grin. "I have the best orgasms when I''m sleeping."'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+			else
+				'"Yeah," he grins.'
+				if npc_sleep_sex_okay[$boy] = -1:
+					act'Get mad':
+						cla & *nl
+						'You glare daggers at him.'
+						'"If I weren''t in a rush to get up, I''d rip your head off."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+					
+					act'Let it slide':
+						cla & *nl
+						'"No," you say. "But I can''t do much about it now."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+				else
+					act'Sleep orgasms are the best':
+						cla & *nl
+						npc_sleep_sex_okay[$boy] = 2
+						'"I love it when you fuck me in my sleep," you grin. "I have the best orgasms."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+				end
+			end
+		end
+		
+		act'Someone had fun last night':
+			cla & *nl
+			'"Somebody had fun last night," you muse, looking over at <<$npc_firstname[$boy]>> who is also waking.'
+			if npc_sleep_sex_okay[$boy] = 0:
+				'"Yeah. Got horny while you were asleep. Is that okay?"'
+				act'Ask next time':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 1
+					'"Just ask next time," you smirk.'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'That''s fine':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"That''s fine," you smirk. "A guy''s gotta take care of his needs, doesn''t he?"'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'Sleep orgasms are the best':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"Feel free to do it again," you grin. "I have the best orgasms when I''m sleeping."'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+			else
+				'"Yeah," he grins. "That okay?"'
+				if npc_sleep_sex_okay[$boy] = -1:
+					act'Get mad':
+						cla & *nl
+						'"No," you say, glaring daggers at him. "If I weren''t in a rush to get up, I''d rip your head off."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+					
+					act'Let it slide':
+						cla & *nl
+						'"No," you say irritably. "But I can''t do much about it now."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+				else
+					act'Of course':
+						cla & *nl
+						'"Of course it is," you smile. "I said you could."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+					
+					act'Sleep orgasms are the best':
+						cla & *nl
+						npc_sleep_sex_okay[$boy] = 2
+						'"Feel free to do it again," you grin. "I have the best orgasms when I''m sleeping."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+				end
+			end
+		end
+		
+		act'Thanks for not waking me':
+			cla & *nl
+			'"Thanks for not waking me," you yawn pleasantly. You roll your hips as you do, noting that your pussy <i>definitely</i> feels used. "I really needed the sleep."'
+			'"Thanks for letting me fuck you," he grins.'
+			'"Any time," you smile.'
+			gs'sex_ev_morning', 'morning_menu1'
+		end
+	end
+end
+
+if $ARGS[0] = 'late_for_school':
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 7:
+		act'School!':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/wakeup2.mp4"></video></center>'
+			'Your eyes snap open as the cold clarity of shock washes over you and frantically grab your phone.'
+			*nl
+			gs 'shortgs', 'calendar_display'
+			*nl
+			'Oh <i>fuck!</i> You need to get to school!'
+			if $sex_ev['loc'] ! 'pc_home':
+				gs'sex_ev_wakeup', 'late_school_not_at_home'
+			else
+				act'Get up!':
+					
+					'"I need to go," you say, hurriedly hauling <<$npc_firstname[$boy]>> out of your bed. "And so do you."'
+					if npc_latesleeper[$boy] = 1:
+						minut += rand(2,3)
+						'<<$npc_firstname[$boy]>> groggily starts gathering his clothes as you impatiently try to get him to go faster, constantly checking the clock to see how much time he''s wasting. When he''s <i>finally</i> dressed you rush <<$npc_firstname[$boy]>> to the door and shove him out and slam it shut, racing to get ready for class.'
+					else
+						minut += 1
+						'At your command, <<$npc_firstname[$boy]>> starts throwing his clothes on while you impatiently keep checking the clock. Thankfully it''s not more than a minute before he''s fully dressed and you rush him out the door and slam it behind him, racing to get ready for class.'
+					end
+					gs 'stat'
+					act'Continue':gs'sex_ev_leave', 'exit'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'late_school_not_at_home':
+	act'<i>Get dressed!</i>':
+		cla & *clr
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+		gs'clothing', 'wear_last_worn'
+		gs'underwear', 'wear'
+		'Scrambling from the bed, you start grabbing your clothes and throwing them on as fast as you can.'
+		if PCloStyle2 = 4:
+			!! you were wearing your school uniform last night
+			'You probably don''t have time for a shower, but at least you don''t have to run home and change clothes, you think gratefully to yourself as your pull on your discarded uniform from last night.'
+		else
+			'You need to get home and change into your uniform! You''re not sure if you have time for a shower, but you definitely <i>need</i> to get your uniform!'
+		end
+
+		'"Hey, what''s wrong?" <<$npc_firstname[$boy]>> says, turning over and squinting at you with sleepy eyes.'
+		act'I need to be somewhere!':
+			cla & *nl
+			'"I''m gonna be late for something!" you say hurriedly. "Gotta go!"'
+			'With one last quick check, you make sure all your clothes are in place and rush out the door, leaving <<$npc_firstname[$boy]>> and your night together behind you.'
+			act'Leave':gs'sex_ev_leave', 'exit'
+		end
+
+		act'I''m gonna be late for school!':
+			cla & *nl
+			if PCloStyle2 = 4:
+				!! you were wearing your school uniform last night
+				'"I need to go! I''m going to be late for school!" you huff, pulling your skirt up and buttoning your shirt as fast as you can. It''s a bit wrinkled from laying in a pile all night, but it''ll do in a pinch.'
+			else
+				'"I need to go! I''m going to be late for school!" you huff. "I need to go home! I don''t have my uniform! Shit! <i>Fuck!</i>"'
+			end
+			if npc_car[$boy] = 1 and npc_selfish[$boy] ! 1:
+				'"You need a ride? I can drop you off in my car."'
+				act'No thanks':
+					cla & *clr
+					$sex_ev['bed_room']
+					'"No, I''ll be okay. But thanks for the offer."'
+					*nl
+					'With one last quick check, you make sure all your clothes are in place and call, "See you later!" over your shoulder as you rush out the door.'
+					act'Leave':gs'sex_ev_leave', 'exit'
+				end
+
+				act'That''d be great':
+					cla & *clr
+					$sex_ev['bed_room']
+					'"Really?" you perk up. "That''d be great!"'
+					'"Let me just get dressed."'
+					'You collect your things while he throws on some clothes and grabs his keys, then both of you head outside and climb into his car.'
+					'"Where do you want me to take you?" he asks'
+					act'Take me home':sex_ev['give_lift'] = 1 & gt'sex_ev_morning', 'give_lift'
+					act'Take me to school':sex_ev['give_lift'] = 2 & gt'sex_ev_morning', 'give_lift'
+				end
+
+				if npc_residence[$boy] = 1:
+					act'I can walk':
+						cla & *clr
+						$sex_ev['bed_room']
+						'"That''s okay," you shake your head. "I live right around the corner, I can just walk. But thanks for the offer."'
+						gs'sex_ev_leave', 'hurry_leave'
+					end
+				end
+
+				act'Can''t let people see':
+					cla & *clr
+					$sex_ev['bed_room']
+					'You hesitate for a moment, considering it.'
+					*nl
+					'"No," you shake your head. "I don''t want someone seeing me get out of your car. Rumors spread like fire at my school. I can''t risk it."'
+					gs'sex_ev_leave', 'hurry_leave'
+				end
+			else
+				'With one last quick check, you make sure all your clothes are in place and grab the rest of your things. "See you later!" you call over your shoulder as you rush out the door.'
+				gs'sex_ev_leave', 'hurry_leave'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'yawn_wake':
+	cla & *clr
+	$sex_ev['bed_room']
+	'You open your mouth wide, yawning loudly and stretching your arms back as the covers fall off of you.'
+	*nl
+	if npc_earlyriser[$boy] = 1:
+		if sex_ev['boy_make_breakfast'] = 1:
+			if npc_apt_type[$boy] = 2 and $sex_ev['loc'] ! 'pc_home' and $sex_ev['loc'] ! 'family_home':
+				'<<$npc_firstname[$boy]>> is already up, doing something in his kitchen area and the smell of coffee and fresh food wafts over to you in bed.'
+			else
+				'The bed next to you is empty but the smell of coffee and cooked grains and proteins waft through the apartment.'
+			end
+			*nl
+			'Checking your phone, the time reads:'
+		else
+			gs'sex_ev_morning', 'npc_morning_shower_desc'
+			*nl
+			'Checking your phone, the time reads:'
+		end
+	elseif npc_latesleeper[$boy] = 1:
+		'<<$npc_firstname[$boy]>> is still completely passed out beside you, your movement not interrupting his snoring in the slightest.'
+		sex_ev['boy_asleep'] = 1
+	else
+		'Your movement causes <<$npc_firstname[$boy]>> to stir as well, blinking his eyes open. Reaching down, you grab your phone and switch on the display.'
+	end
+	gs'shortgs', 'calendar_display'
+	if sex_ev['boy_make_breakfast'] = 1 and $sex_ev['loc'] ! 'hotel_room':
+		act'Finish waking up':gs'sex_ev_morning', 'breakfast_in_bed'
+		if npc_apt_type[$boy] > 2:
+			act'Go find <<$npc_firstname[$boy]>>':gs'sex_ev_morning', 'breakfast_search'
+		end
+	else
+		gs'sex_ev_morning', 'morning_menu1'
+	end
+end
+
+if $ARGS[0] = 'kiss_wake':
+	if npc_earlyriser[$boy] ! 1:
+		act'Kiss <<$npc_firstname[$boy]>>':
+			cla & *clr
+			gs'arousal', 'kiss', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+			sex_ev['boy_asleep'] = 0
+			npc_rel[$boy] += 1
+			'<center><img <<$set_imgh>> src="images/shared/sex/kiss/bed1.jpg"></center>'
+			'You roll over onto <<$npc_firstname[$boy]>>, resting your breasts on his chest as you straddle him.'
+			'"Good <i>-mmmph-</i> morning," you murmur, planting a kiss on his lips.'
+			if cum_loc['face'] > 0:
+				'"Ugch~! What the fuck is that?" he sputters, shaking his head in disgust.'
+				act'Didn''t wash my face':
+					cla & *nl
+					'"It''s your cum," you say. "Didn''t get to wash it off after you cumshot me last night."'
+					'"Couldn''t you have washed it off before you kissed me?"'
+					gs'sex_ev_morning', 'morning_menu1'
+					act'Give <<$npc_firstname[$boy]>> a blowjob':
+						gs'arousal', 'bj', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+						cla & *clr
+						'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+						'"Let me make it up to you," you smile, throwing back the covers and wrapping your lips around his morning wood.'
+						gs'sex_ev_wakeup', 'bj_wake'
+					end
+				end
+				
+				act'His fault':
+					cla & *nl
+					'"It''s your fault," you say. "You''re the one who plastered my face last night."'
+					'"Couldn''t you have washed it off before you kissed me?"'
+					gs'sex_ev_morning', 'morning_menu1'
+					act'Give <<$npc_firstname[$boy]>> a blowjob':
+						gs'arousal', 'bj', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+						cla & *clr
+						'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+						'"Let me make it up to you," you smile, throwing back the covers and wrapping your lips around his morning wood.'
+						gs'sex_ev_wakeup', 'bj_wake'
+					end
+				end
+				
+				act'Oops, forgot':
+					cla & *nl
+					'"Oops," you say. "Forgot I fell asleep last night with your cum on my face."'
+					'"Ugh! How do you forget something like that?"'
+					gs'sex_ev_morning', 'morning_menu1'
+					act'Give <<$npc_firstname[$boy]>> a blowjob':
+						gs'arousal', 'bj', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+						cla & *clr
+						'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+						'"Let me make it up to you," you smile, throwing back the covers and wrapping your lips around his morning wood.'
+						gs'sex_ev_wakeup', 'bj_wake'
+					end
+				end
+			else
+				'"Morning," he smiles back.'
+				gs'sex_ev_morning', 'morning_menu1'
+				act'Give <<$npc_firstname[$boy]>> a blowjob':
+					gs'arousal', 'bj', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+					'You break the kiss from <<$npc_firstname[$boy]>>''s lips and start trailing them down his neck and then his chest and then his stomach and soon you have your lips wrapped around his morning wood.'
+					gs'sex_ev_wakeup', 'bj_wake'
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'bj_wake':
+	sex_ev['boy_asleep'] = 0
+	gs'arousal', 'bj', 1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
+	if npc_end_free_time <= hour + 2:
+		sex_ev['npc_late_work'] = 1
+		'"Nngh," he grunts as you start sucking his cock. "I''m gonna be late for work..."'
+		act'Too bad (stop)':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+			'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips.'
+			'"Too bad," you smirk, teasing his cock with your hand while you savour his taste. "Guess it''ll have to wait until later."'
+			gs'sex_ev_morning', 'morning_menu1'
+		end
+		
+		act'I''ll be fast':
+			sex_ev['morning_fuck'] = 1
+			if sex_ev['cum_count'] >= npc_sexdrive[$boy] + sex_ev['extra_cum']: sex_ev['extra_cum'] += npc_sexdrive[$boy]
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+			'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips to speak.'
+			'"Don''t worry," you say, working his cock with your hand as a smirk spreads across your lips. "I''ll be fast."'
+			'And you wrap your lips back around his shaft.'
+			act'Continue':gt'sex_ev_foreplay', 'bj_dom2'
+		end
+	else
+		act'Stop':
+			npc_rel[$boy] -= 3
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+			'You pull away, working his cock with your hand.'
+			'"Just making sure you''re fully awake," you grin, letting go with one more teasing jerk.'
+			'"Ungh, you teasing bitch," he grumbles.'
+			gs 'sex_ev_morning', 'morning_menu1'
+		end
+		if $npc_fav_pos[$boy] = 'blowjob' or rand(1,10) < npc_sexdrive[$boy] or sex_ev['boy_asleep'] = 0:
+			'"Nngh... that feels great..." he moans sleepily.'
+			act'Want me to keep going?':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+				'"Want me to keep going?" you ask pulling your lips away with a teasing pop.'
+				'"Fuck yes," he groans and you get back to work.'
+				act'Continue':gt'sex_ev_foreplay', 'bj_dom2'
+			end
+			
+			act'Keep sucking':
+				cla & *nl
+				'"Mmmm," you hum around the cock in your mouth, sending shivers through his body that you can feel between your lips. You never stop sucking.'
+				act'Continue':gt'sex_ev_foreplay', 'bj_dom2'
+			end
+		else
+			'"Nngh... Hey... what are you doing...?" he groans sleepily.'
+			act'Best wakeup in the world':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+				'"Just giving you the best wakeup call in the world," you grin pulling your lips away with a teasing pop. "Want me to stop?"'
+				'"Fuck no," he groans and you get back to work.'
+				act'Continue':gt'sex_ev_foreplay', 'bj_dom2'
+			end
+			
+			act'Guess':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+				'"Nngh... Hey... what are you doing...?" he groans sleepily.'
+				'You pull your lips away with a pop and stare <<$npc_firstname[$boy]>> straight in the eye.'
+				*nl
+				'"Guess."'
+				*nl
+				'Without waiting for a response you resume running your tongue up and down his shaft and peppering it with kisses before swallowing it whole again.'
+				act'Continue':gt'sex_ev_foreplay', 'bj_dom2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'after_sleepfuck_wake':
+	if sex_ev['sleep_fuck'] = 2:
+		act'Nice night':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk4.jpg"></center>'
+			'"That was nice," you smile sleepily at <<$npc_firstname[$boy]>>. "Our little mid-night romp I mean. Slept like a baby after. How about you?"'
+			if npc_humor[$boy] = 3:
+				'"I would say that fucking you always puts me to sleep, but that feels like sending the wrong message," he smiles back.'
+			else
+				'"I sleep better after a good fuck too," he grins.'
+			end
+			gs'sex_ev_morning', 'morning_menu1'
+		end
+	end
+end
+
+!! ------------------------------------ Morning Sex Stuff -------------------------------------------------------
+
+
+if $ARGS[0] = 'cumshot_wakeup1':
+	'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake1.mp4"></video></center>'
+	'You gasp as you are suddenly awakened by the shock of liquid splashing across your skin. Your eyes flutter open just in time to see another spurt of cum exit <<$npc_firstname[$boy]>>''s cock and hit you square in the face.'
+	act'What the fuck!':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake2.mp4"></video></center>'
+		'"What the fuck are you doing?!" you exclaim, sputtering as strands of semen dribble last your lips.'
+		'"You were so hot lying there," <<$npc_firstname[$boy]>> snickers, a lewd grin smeared across his face. "I got hard just looking at you."'
+		'"So you thought it would be a good idea to cum on my face?!"'
+		'"Come on, don''t be like that. Here, clean me off. Get the rest out." He lowers his cock, pushing it towards your lips.'
+		gs'sex_ev_wakeup', 'cumshot_wakeup_clean1'
+	end
+	
+	act'Take it in stride':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake2.mp4"></video></center>'
+		'You sputter briefly as some of the salty sperm slips past your lips, but can''t help but feel amusement when you see the lewd satisfaction on <<$npc_firstname[$boy]>>''s face.'
+		act'Guess that means no morning BJ':
+			cla & *nl
+			'"Guess that means it''s too late for a morning blowjob," you snicker.'
+			'"No it''s not," he grins back and pushes his cock towards your lips.'
+			gs'sex_ev_wakeup', 'cumshot_wakeup_clean2'
+		end
+		
+		act'At least I haven''t put on makeup':
+			cla & *nl
+			'"At least I haven''t put on my makeup yet," you giggle.'
+			'"Clean me off too," he insists, pushing his cock towards your lips.'
+			gs'sex_ev_wakeup', 'cumshot_wakeup_clean2'
+		end
+	end
+	
+	if npc_cumshot_wake[$boy] > 0:
+		act'Again?! (annoyed)':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake2.mp4"></video></center>'
+			'"Ugh, again?!" you moan, allowing the salty sperm to slip into your mouth.'
+			'"You know you love it. Come here, clean me off," he says, pushing his cock towards your lips.'
+			gs'sex_ev_wakeup', 'cumshot_wakeup_clean1'
+		end
+	end
+	npc_cumshot_wake[$boy] += 1
+end
+
+if $ARGS[0] = 'cumshot_wakeup_clean1':
+	act'No way':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"Ugh!" you grimace, turning your head away from the offending cock. "No way. I''m not giving you a blowjob as a reward for being a pervert."'
+		gs'sex_ev_morning', 'morning_menu1'
+	end
+	
+	act'Acquiesce':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake3.mp4"></video></center>'
+		gs 'arousal', 'bj', 1, 'sub'
+		gs 'cum_call', 'mouth_swallow', $boy, 1, 0, 5
+		'Before you can make any more protest, <<$npc_firstname[$boy]>>''s cock pushes into your mouth. Your eyes accuse him of being a jerk but your lips suck obediently, drawing the last drops of cum from his shaft.'
+		gs'sex_ev_morning', 'morning_menu1'
+	end
+end
+
+if $ARGS[0] = 'cumshot_wakeup_clean2':
+	act'No way':
+		cla & *clr
+		$sex_ev['bed_room']
+		'"Nuh uh!" you giggle, turning your head away from his tip. "One face shot is all you get No double dipping."'
+		gs'sex_ev_morning', 'morning_menu1'
+	end
+	
+	act'Acquiesce':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/sleep/cumshot_wake3.mp4"></video></center>'
+		gs 'arousal', 'bj', 1, 'sub'
+		gs 'cum_call', 'mouth_swallow', $boy, 1, 0, 5
+		'"Oh fiiiine," you say, mock frowning as <<$npc_firstname[$boy]>>''s cock pushes past your lips and you subserviently suck out the last drops of cum from it.'
+		gs'sex_ev_morning', 'morning_menu1'
+	end
+end
+
+
+!! ------------------------------------ Misc Stuff -------------------------------------------------------
+
+if $ARGS[0] = 'forgot_bc_pill':
+	if pilldaychk < daystart - 1 and birth_control['using_bc'] = 1:
+		act'Forgot your birth control':
+			$temp_loc = 'sex_ev_morning'
+			sex_ev['forgot_bc'] = 1
+			cla & *clr
+			if npc_earlyriser[$boy] ! 1:
+				'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
+				'You bolt upright as a horrible realization jolts through your mind.'
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+				'You jolt awake as a horrible realization jumps through your mind.'
+			end
+			*nl
+			'<i>I forgot to take my birth control!</i>'
+
+			act'Panic':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+				'Panic begins to set in as you sit up, your breathing already at the edge of hyperventilation.'
+				*nl
+				if sex_ev['creampie_count'] > 3:
+					'Not only did you forget your birth control, but <<$npc_firstname[$boy]>> came inside you last night too. <i>A lot.</i> How could you fuck up like this?'
+				elseif sex_ev['creampie_count'] > 0:
+					'Not only did you forget your birth control, but <<$npc_firstname[$boy]>> came inside you last night too. How could you fuck up like this?'
+				else
+					if pharmacy_timers['birth_control'] > 0:
+						'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, but this breaks your streak. Aunt Luda said you need to take it every day or it won''t work. So if you take it now, does that mean you''re still not safe?'
+					else
+						'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, but this breaks your streak. Are you still safe if you skip a day?'
+					end
+				end
+				if mc_inventory['morning_after_pill'] > 0:
+					*nl
+					if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+						'Wait, don''t you have that morning after pill Aunt Luda gave you?'
+					else
+						'Wait, don''t you have a morning after pill in your bag?'
+					end
+				end
+				gs'sex_ev_wakeup', 'forgot_bc_pill2'
+			end
+			
+			act'Calm down':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+				'You sit up and start taking big deep breaths, forcing yourself to calm down and try to approach the situation logically.'
+				act'You can take a morning after pill':
+					cla & *nl
+					if sex_ev['creampie_count'] > 0:
+						if sex_ev['creampie_count'] > 5:
+							'Okay, so <<$npc_firstname[$boy]>> came inside you last night... <i>A lot.</i> But you can still take a morning after pill. Maybe it''ll be okay.'
+						elseif sex_ev['creampie_count'] > 1:
+							'Okay, so <<$npc_firstname[$boy]>> came inside you last night... More than once... A <i>few</i> times. But you can still take a morning after pill. Maybe it''ll be okay.'
+						elseif sex_ev['creampie_count'] = 1:
+							'Okay, so <<$npc_firstname[$boy]>> came inside you last night... But only once. That''s not too bad, right? Maybe you can still take a morning after pill. Maybe it''ll be okay.'
+						end
+						if mc_inventory['morning_after_pill'] > 0:
+							*nl
+							if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+								'Actually, you have the one Aunt Luda gave you. For emergencies she said...'
+							else
+								'Actually, you have one in your bag. You could take it right now.'
+							end
+						end
+					else
+						if pharmacy_timers['birth_control'] > 0:
+							'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, so you''re not in any real danger of getting pregnant right this second. But this breaks your streak. Aunt Luda said you need to take it every day or it won''t work. So if you take it now, does that mean you''re still not safe?'
+						else
+							'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, so you''re not in any real danger of getting pregnant right this second. But does this mean you''ll need to wait a few days to build up the birth control in your system again? If you take your next pill now, does that mean you''re still not safe?'
+						end
+					end
+					gs'sex_ev_wakeup', 'forgot_bc_pill2'
+				end
+				
+				if stat['dangerous_day'] ! 1:
+					act'You''re not fertile right now':
+						cla & *nl
+						if sex_ev['creampie_count'] > 0:
+							if sex_ev['creampie_count'] > 5:
+								'Okay, so <<$npc_firstname[$boy]>> came inside you last night... <i>A lot.</i> But it''s not the fertile stage of your cycle. You should be fine, right?'
+							elseif sex_ev['creampie_count'] > 1:
+								'Okay, so <<$npc_firstname[$boy]>> came inside you last night... More than once... A <i>few</i> times. But it''s not the fertile stage of your cycle. You should be fine, right?'
+							elseif sex_ev['creampie_count'] = 1:
+								'Okay, so <<$npc_firstname[$boy]>> came inside you last night... But only once. And it''s not the fertile stage of your cycle. You should be fine, right?'
+							end
+						else
+							if pharmacy_timers['birth_control'] > 0:
+								'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, so you''re not in any real danger of getting pregnant right this second. But this breaks your streak. Aunt Luda said you need to take it every day or it won''t work. So if you take it now, does that mean you''re still not safe?'
+							else
+								'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, so you''re not in any real danger of getting pregnant right this second. But does this mean you''ll need to wait a few days to build up the birth control in your system again? If you take your next pill now, does that mean you''re still not safe?'
+							end
+						end
+						gs'sex_ev_wakeup', 'forgot_bc_pill2'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'forgot_bc_pill2':
+	act'Continue':
+		cla & *clr
+		$sex_ev['bed_room']
+		if npc_earlyriser[$boy] = 1:
+			!! for later: create option for him to burst in with breakfast in bed
+			gs'sex_ev_morning', 'npc_morning_shower_desc'
+			gs'sex_ev_morning', 'morning_menu1'
+		elseif npc_latesleeper[$boy] = 1:
+			'<<$npc_firstname[$boy]>> is still asleep next to you snoring softly, completely ignorant to the situation.'
+			gs'sex_ev_morning', 'morning_menu1'
+		else
+			'<<$npc_firstname[$boy]>> stirs next to you.'
+			if npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1 and rand(1,3) = 3:
+				'"Hey." He yawns, glancing over at you before blinking, a look of concern on his face. "What''s up? Something wrong?"'
+				act'Don''t tell him':
+					cla & *nl
+					'"It''s nothing," you mumble, flashing a smile to pretend like everything is fine.'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+				
+				act'Tell him':
+					cla & *nl
+					'"I forgot my birth control yesterday," you sigh. "I fucked up. I''m sorry."'
+					gs'sex_ev_talk', 'forgot_bc_talk'
+				end
+				
+				if mc_inventory['morning_after_pill'] > 0:
+					act'Take your morning after pill':
+						gs 'medical_din', 'morning_after_pill_function'
+						cla & *nl
+						'"I forgot my birth control yesterday," you sigh, opening the packaging on your plan B and popping it into your mouth. "Don''t worry, I''m taking a morning after pill right now. I''m just mad at myself for being so stupid."'
+						gs'sex_ev_morning', 'morning_menu1'
+					end
+				end
+			else
+				'"Hey," he stretches, looking over at you. "You just wake up too?"'
+				act'Yeah':
+					cla & *nl
+					'"Yeah," you mumble, trying to keep a straight face while you shove down your shameful feelings.'
+					gs'sex_ev_morning', 'morning_menu1'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'stop_hooking_up':
+	if $sex_ev['type'] = 'hookup':
+		if something_or_other = 1:
+		
+		else
+			if stat['hangover'] = 1:
+				act'Another drunken hookup':
+				
+				end
+			else
+				act'Another random hookup':
+				
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'fucked_ex':
+	if $npc_rel_type[$boy] = 'ex_boyfriend':
+		act'Ugh, I fucked him again':
+			'<i>Fuck,</i> you sigh internally. <i>I said I was going to stop sleeping with him...</i>'
+			
+			'<i>Fuck,</i> you sigh internally. <i>I can''t believe I fucked him again...</i>'
+		end
+	end
+end
+if $ARGS[0] = 'guilt_init':
+	if sex_ev['guilt_check'] = 0:
+		sex_ev['guilt_check'] = 1
+		if pcs_lover + pcs_girlfriends > 0 and $boy ! 'one_of_svetas_lovers': sex_ev['guilt_count'] += 1
+		if sex_ev['buy_virginity'] > 0 and sex_ev['fuck_count'] > 0: sex_ev['guilt_count'] += 1
+		if sex_ev['prostitution'] = 1: sex_ev['guilt_count'] += 1
+	end
+end
+
+if $ARGS[0] = 'guilt_start':
+	if sex_ev['guilt_check'] = 0: gs'sex_ev_wakeup', 'guilt_init'
+	if sex_ev['guilt_count'] > 0:
+		act'Guilt':
+			cla & *clr
+			sex_ev['guilt'] = 1
+			if npc_earlyriser[$boy] ! 1:
+				'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
+				'You bolt upright as a lance of guilt pierces your chest.'
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+				'You jolt awake as a lance of guilt pierces your chest.'
+			end
+
+			if $boy ! 'one_of_svetas_lovers':
+				if pcs_lover - pcs_girlfriends > 0:
+					act'Your boyfriend':$sex_ev['cheat'] = 'boyfriend' & gs'sex_ev_wakeup', 'cheat_guilt1'
+				end
+				if pcs_girlfriends > 0:
+					act'Your girlfriend': $sex_ev['cheat'] = 'girlfriend' & gs'sex_ev_wakeup', 'cheat_guilt1'
+				end
+				
+				if juliaQW['date'] = 1:
+					act'Julia': $sex_ev['cheat'] = 'Julia' & gs'sex_ev_wakeup', 'cheat_guilt1'
+				end
+			end
+			gs'sex_ev_wakeup', 'guilt_prostitution1'
+		end
+	end
+end
+
+if $ARGS[0] = 'cheat_guilt1':
+	cla & *nl
+	if $sex_ev['cheat'] = 'boyfriend' or $sex_ev['cheat'] = 'girlfriend':
+		'<i>My <<$sex_ev[''cheat'']>>...</i> you think.'
+	else
+		'<i><<$sex_ev[''cheat'']>>...</i> you think.'
+	end
+	act'Wallow':
+		cla & *clr
+		if stat['bf_cheated_on'] <= 10:
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+			'Throwing your legs over the side of the bed, you sit up, hands at your sides, taking panicked breaths in your guilt.'
+			*nl
+			if $sex_ev['cheat'] = 'boyfriend' or $sex_ev['cheat'] = 'girlfriend':
+				'<i>I just cheated on my <<$sex_ev[''cheat'']>>...</i>'
+			else
+				'<i>I just cheated on <<$sex_ev[''cheat'']>>...</i> you think.'
+			end
+			*nl
+			'Your thoughts wander through your night with <<$npc_firstname[$boy]>>...'
+			*nl
+			if sex_ev['bj'] > 0:'<i>Sucking his cock...</i>'
+			if sex_ev['fuck'] > 0:
+				if sex_ev['virgin'] = 1:
+					'<i>You gave him your virginity...</i>'
+				elseif $sex_ev['loc'] = 'npc_home':
+					'<i>Fucking him on his bed...</i>'
+				elseif $sex_ev['loc'] = 'pc_home':
+					'<i>Fucking him on your bed...</i>'
+				elseif $sex_ev['loc'] = 'hotel_room':
+					'<i>Fucking him in this hotel room...</i>'
+				end
+				
+				if sex_ev['out_of_condoms'] = 1 and sex_ev['condom_count'] > 3:
+					'<i>You did it so many times you ran out of condoms...</i>'
+				elseif sex_ev['no_condom'] = 1:
+					'<i>You didn''t even use condoms...</i>'
+				end
+			end
+			if sex_ev['creampie_orgasm'] = 1:
+				'<i>You came together, orgasming as he filled you with his cum...</i>'
+			elseif sex_ev['creampie_orgasm'] >= 3:
+				'<i>How many times did you come together? How many orgasms came being filled with his cum...?</i>'
+			elseif sex_ev['simultaneous_orgasm_count'] = 1:
+				'<i>You had a simultaneous orgasm...</i>'
+			elseif sex_ev['simultaneous_orgasm_count'] >= 3 and sex_ev['no_condom'] ! 1:
+				'<i>How many times did you come together? How many orgasms came as he filled the condom inside you...?</i>'
+			else
+				if sex_ev['orgasm_count'] > 5:
+					'<i>He made you come so many times...</i>'
+				elseif sex_ev['orgasm_count'] > 0:
+					'<i>How he made you come...</i>'
+				end
+			
+				if sex_ev['creampie_count'] > 3:
+					'<i>He filled you with his cum...</i>'
+				elseif sex_ev['creampie_count'] > 0:
+					'<i>And he came inside you...</i>'
+				end
+			end
+			
+			if $sex_ev['cum_choice'] = 'face': '<i>And he came on your face...</i>'
+			if $sex_ev['cum_choice'] = 'mouth': 
+				'<i>And he came in your mouth...</i>'
+				if sex_ev['swallow'] = 1:'<i>You even swallowed...</i>'
+			end
+			
+			if $sex_ev['prostitution_flag'] = 'prostitution':
+				*nl
+				'<i>And what for? Money...?</i>'
+			end
+			*nl
+			'You feel sick to your stomach...'
+		else
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+			'You sit up, throwing your legs over the side of the bed as the shame flows through you.'
+			'It''s nothing you haven''t felt before. This isn''t the first time you''ve cheated. It''s not the second time. It''s not even the tenth time. You''ve lost count by now. But somehow, the crippling guilt always feels the same.'
+		end
+		gs'sex_ev_wakeup', 'cheat_guilt_excuses'
+	end
+end
+
+if $ARGS[0] = 'cheat_guilt_excuses':
+	act'It''s not your fault':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+		if $sex_ev['cheat'] = 'Julia' or $sex_ev['cheat'] = 'girlfriend':
+			'<i>It''s not my fault,</i> you try to rationalize. <i>I have needs. Sexual needs. Strap-ons and dildos and fingering aren''t enough for me. My body wants dick. <b>He</b> preyed on that. <b>He</b> seduced me. I''m a victim here...</i>'
+		else
+			'<i>It''s not my fault,</i> you try to rationalize. <i>I have needs. Sexual needs. He preyed on that. He seduced me. I''m a victim here...</i>'
+		end
+		
+		*nl
+		'All your excuses ring hollow in your ears.'
+		gs'sex_ev_wakeup', 'cheat_guilt2'
+	end
+	
+	act'It''s just sex':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+		if $sex_ev['cheat'] = 'Julia':
+			'<i>It''s just sex,</i> you try to rationalize. <i>It''s not like I''m falling in love with <<$npc_firstname[$boy]>> or anything. I just really needed some cock, which <<$sex_ev[''cheat'']>> obviously doesn''t have. Strap-ons and dildos aren''t the same. It''s not cheating. It''s just sex.</i>.'
+		elseif $sex_ev['cheat'] = 'girlfriend':
+			'<i>It''s just sex,</i> you try to rationalize. <i>It''s not like I''m falling in love with <<$npc_firstname[$boy]>> or anything. I just really needed some cock, which my girlfriend obviously doesn''t have. Strap-ons and dildos aren''t the same. It''s not cheating. It''s just sex.</i>.'
+		else
+			'<i>It''s just sex,</i> you try to rationalize. <i>It''s not like I''m falling in love with <<$npc_firstname[$boy]>> or anything. It''s not cheating. It''s just sex.</i>.'
+		end
+		'<i>It''s just sex...</i>'
+		*nl
+		'Only you can decide whether or not you believe yourself.'
+		gs'sex_ev_wakeup', 'cheat_guilt2'
+	end
+	
+	act'You''re a whore':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock3.mp4"></video></center>'
+		'You scold yourself internally, screaming insults that impale your own soul.'
+		*nl
+		if arrsize('$fuckbuddy') > 5:
+			'<i>One lover isn''t enough for you? Not even two? You need to have a whole stable to satisfy you? You filthy cock-hungry whore!</i>'
+		elseif arrsize('$fuckbuddy') > 1:
+			'<i>You slut! You can''t keep your legs closed. Just how much cock do you need? You''re nothing but a filthy whore...</i>'
+		else
+			'<i>You slut! What''s wrong with you? A committed relationship isn''t enough to satisfy you? Can''t keep your legs closed? You''re nothing but a filthy whore...</i>'
+		end
+		*nl
+		if stat['bf_cheated_on'] > 10:
+			'You breathe deeply, letting the pain take its course, waiting for it to subside. It''s nothing you haven''t felt before...'
+		end
+		act'Continue':gt'sex_ev_wakeup', 'cheat_guilt3'
+	end
+end
+
+if $ARGS[0] = 'cheat_guilt2':
+	*nl
+	if stat['bf_cheated_on'] <= 10:
+		'The guilt doesn''t go away.'
+	else
+		'You breathe deeply, letting the pain take its course, waiting for it to subside. It''s nothing you haven''t felt before...'
+	end
+	act'Continue':gt'sex_ev_wakeup', 'cheat_guilt3'
+end
+
+if $ARGS[0] = 'cheat_guilt3':
+	'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+	if npc_earlyriser[$boy] = 1:
+		!! for later: create option for him to burst in with breakfast in bed
+		if $sex_ev['loc'] = 'player_home':
+			sex_ev['npc_morning_shower'] = 1
+			'The bed next to you is empty but you can hear water running through the wall. <<$npc_firstname[$boy]>> must be in the shower.'
+		else
+			gs'sex_ev_morning', 'npc_morning_shower_desc'
+		end
+		gs'sex_ev_morning', 'morning_menu1'
+	elseif npc_latesleeper[$boy] = 1:
+		if $sex_ev['type'] = 'hookup':
+			'<<$npc_firstname[$boy]>>, the guy from last night, is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
+		else
+			'<<$npc_firstname[$boy]>> is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
+		end
+		gs'sex_ev_morning', 'morning_menu1'
+	else
+		'<<$npc_firstname[$boy]>> stirs next to you.'
+		if npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1 and rand(1,3) = 3:
+			'"Hey." He yawns, glancing over at you before blinking, a look of concern on his face. "What''s up? Something wrong?"'
+			act'It''s nothing':
+				cla & *nl
+				'"It''s nothing," you mumble, trying to keep a straight face while you shove down your shameful feelings.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+			
+			!!{
+			if npc_know_cheat[$boy] = 0:
+				act'Tell him you''re cheating':
+				
+				end
+			elseif npc_know_cheat[$boy] = 1:
+				act'Thinking about your <<$sex_ev[''cheat'']>>':
+				
+				end
+			end}
+		else
+			'"Hey," he stretches, looking over at you. "You just wake up too?"'
+			act'Yeah':
+				cla & *nl
+				'"Yeah," you mumble, trying to keep a straight face while you shove down your shameful feelings.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'guilt_prostitution1':
+	if sex_ev['buy_virginity'] > 0 and sex_ev['fuck_count'] > 0:
+		gs'sex_ev_wakeup', 'guilt_virginity1'
+	elseif sex_ev['prostitution'] = 1 and NOT_DISABLED = 1:
+		if stat['prostitution_count'] = 0:
+			act'You sold yourself':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+				'You sit up, taking deep breaths as the guilt and shame course through you.'
+				
+			end
+		else
+			act'You sold yourself again':
+			
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'guilt_virginity1':
+	
+	act'You sold your virginity':
+		cla & *nl
+		'<i>I sold my virginity last night...</i> you think.'
+		act'Sit up':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+			'You sit up, taking deep breaths as the guilt and shame course through you.'
+			*nl
+			'<i>I sold my virginity to a complete stranger...</i> you think to yourself again.'
+			*nl
+			'You took his money and spread your legs...'
+			
+			if sex_ev['paid_no_condom'] = 1: 'You let him talk you into doing it without a condom...!'
+			if sex_ev['paid_free_creampies'] = 1: 'You even let him come inside you...!'
+			*nl
+			'Something so important and you just gave it away...'
+			*nl
+			'For what? Money...?'
+			gs 'sex_ev_wakeup', 'guilt_virginity2'
+		end
+	end
+end
+
+if $ARGS[0] = 'guilt_virginity2':
+	act'Shame':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock3.mp4"></video></center>'
+		'<i>You''re nothing but a filthy whore...</i>'
+		*nl
+		'The moment as you think it, you can''t escape. Shame fills your entire body and you can barely breathe as the thought buries itself in your heart and you can''t help but think it over and over and over again.'
+		gs 'sex_ev_wakeup', 'guilt_virginity_end'
+	end
+	
+	act'Your mother':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock3.mp4"></video></center>'
+		'<i>You <b>filthy</b> whore!</i>'
+		*nl
+		'The moment as you think it, you can''t escape. Shame fills your entire body and you can barely breathe as the image of your mother condemning you buries itself in your heart and you can''t help but think it over and over and over again.'
+		gs 'sex_ev_wakeup', 'guilt_virginity_end'
+	end
+end
+
+if $ARGS[0] = 'guilt_virginity_end':
+	act'Continue':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock3.mp4"></video></center>'
+		if npc_earlyriser[$boy] = 1:
+			!! for later: create option for him to burst in with breakfast in bed
+			if $sex_ev['loc'] = 'player_home':
+				sex_ev['npc_morning_shower'] = 1
+				'The bed next to you is empty but you can hear water running through the wall. <<$npc_firstname[$boy]>> must be in the shower.'
+			else
+				gs'sex_ev_morning', 'npc_morning_shower_desc'
+			end
+			gs'sex_ev_morning', 'morning_menu1'
+		elseif npc_latesleeper[$boy] = 1:
+			if $sex_ev['type'] = 'hookup':
+				'<<$npc_firstname[$boy]>>, the guy from last night, is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
+			else
+				'<<$npc_firstname[$boy]>> is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
+			end
+			gs'sex_ev_morning', 'morning_menu1'
+		else
+			'You feel movement in the bed and turn to see <<$npc_firstname[$boy]>> stirring next to you.'
+			'"Last night was great," he smiles.'
+			
+			act'Hide your feelings':
+				cla & *nl
+				'"Y-yeah," you stammer, trying to keep a straight face while you shove down your shameful feelings.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+
+			act'Fake smile':
+				cla & *nl
+				'"Yeah! I had a really good time!" you say, giving him back a bright smile with all of your dark feelings barricaded behind it.'
+				gs'sex_ev_morning', 'morning_menu1'
+			end
+		end
+	end
+end
+
+
+--- sex_ev_wakeup ---------------------------------

locations/shop.qsrc

@@ -399,6 +399,8 @@ if $shoplocation= 'cosmetics':
 end
 
 if $shoplocation = 'hardware':
+	$loc_s = 'shop'
+	$args_s = 'hardware'
 	*clr & cla
 	'<center><table><TR BGCOLOR="' + $bgcolor + '"><TD><b>Hardware Department</b></TD></TR></table></center>'
 	$backimage= 'images/locations/shared/store/shop3.jpg'
@@ -418,13 +420,13 @@ if $shoplocation = 'hardware':
 		''
 	end
 
-	gs 'item_cart', 'shoppping_aisle', 'uni'
+	gs 'item_cart', 'shoppping_aisle', 'hardware'
 	gs 'stat'
 	gs 'themes', 'indoors'
 
 	act 'Leave the hardware department':$backimage = '' & gt 'shop', 'start'
 
-	'You see fabric suitable for sewing on the counter. It''s sold in large squares costing 50 <b>₽</b> each. You have <<mc_inventory[''sewing_fabric'']>> squares of fabric.'
+	'<center><table><TR BGCOLOR="' + $bgcolor + '"><TD>You see fabric suitable for sewing on the counter. It''s sold in large squares costing 50 <b>₽</b> each. You have <<mc_inventory[''sewing_fabric'']>> squares of fabric.</TD></TR></table></center>'
 	if pod_whore_countQW > 15 and paint_blue = 0 and money >= 200:
 		act 'Buy paint to cover graffiti (200 <b>₽</b>)':
 			money -= 200
@@ -521,6 +523,8 @@ end
 
 !! Household appliances
 if $shoplocation = 'tech':
+	$loc_s = 'shop'
+	$args_s = 'tech'
 	*clr & cla
 	'<center><table><TR BGCOLOR="' + $bgcolor + '"><TD><b>household appliance Department</b></TD></TR></table></center>'
 	$backimage= 'images/locations/shared/store/shop5.jpg'

locations/shop_materinstvo.qsrc

@@ -29,24 +29,22 @@ if $ARGS[0] = 'items':
 	*clr & cla
 	$loc = 'shop_materinstvo'
 	$loc_arg = 'items'
+	$loc_s = 'shop_materinstvo'
+	$args_s = 'items'
 	$menu_loc = 'shop_materinstvo'
 	$menu_arg = 'items'
 	menu_off = 0
 	gs 'stat'
-	'<center><b><font color="maroon">Mommy Style</font></b></center>'
-	'<center><img src="images/locations/city/citycenter/mall/mommy/shop1.jpg"></center>'
+	'<center><table><TR BGCOLOR="' + $bgcolor + '"><TD><b>Mommy Style</b></TD></TR></table></center>'
+	$backimage = 'images/locations/city/citycenter/mall/mommy/shop1.jpg'
 
 !! This section is commented out until we can add function
-	*pl '<center><table align="center" width=80%>'
-	*p func ('$stock_item', 12, 'Morning Sickness Pills', 80, 'ms_pill', $curloc)
-	*p func ('$single_stock_item', 1, 'Pregnancy Ball', 2475, 'preg_ball', $curloc)
-	*p func ('$single_stock_item', 1, 'Pregnancy Brace', 975, 'preg_brace', $curloc)
-	*p func ('$single_stock_item', 1, 'Pregnancy Pillow', 2475, 'preg_pillow', $curloc)
-	*p '</table></center>'
+!! Items here are not doing anything
+	gs 'item_cart', 'shoppping_aisle', 'mothershop' 
 	gs 'stat'
 	gs 'themes', 'indoors'
 
-	act 'Return': gt 'shop_materinstvo', 'start'
+	act 'Return':$backimage = '' & gt 'shop_materinstvo', 'start'
 end
 
 if $ARGS[0] = 'clothes':

locations/shortgs.qsrc

@@ -894,11 +894,6 @@ end
 !! example: func('shortgs' 'roll', 'lucky' 0, 5)
 !! example: func('shortgs' 'roll', 'unlucky' 0, 100, 5)
 if $ARGS[0] = 'roll':
-	if ARGS[4] < 2:
-		n = 2
-	else
-		n = ARGS[4]
-	end
 	temp_roll = rand(ARGS[2], ARGS[3])
 	i = 1
 	:roll
@@ -909,7 +904,7 @@ if $ARGS[0] = 'roll':
 			temp_roll = temp_rand
 		end
 		i += 1
-	if i < n: jump 'roll'
+	if i < ARGS[4]: jump 'roll'
 	result = temp_roll
 	killvar 'temp_roll'
 	killvar 'temp_rand'