[changed] various updates including therapist adjustments

locations/sex_ev_after.qsrc

@@ -1148,7 +1148,7 @@ if $ARGS[0] = 'cum_clean':
 				end
 			end
 			
-			if mc_inventory['makeup_wipes'] > 0:
+            if mc_inventory['makeup_wipes'] > 0:
 				act'Use your wipes':
 					gs'sex_ev_after', 'wipe_menu'
 					act'Clean everything':
@@ -1853,7 +1853,7 @@ if $ARGS[0] = 'birth_control_pill_take':
 		act'Take your birth control':
 			birth_control['message_skip'] = daystart
 			sex_ev['bc_take'] = 1
-			gs 'din_bad', 'quick_takepill'
+			gs'fertility','birth_control', 1
 			cla & *clr
 			$sex_ev['bed_room']
 			if birth_control['remind_hour'] > 0 and hour >= birth_control['remind_hour'] and hour <= birth_control['remind_hour'] + 1 and tabletkiday ! daystart and sex_ev['bc_take'] ! 1:

locations/sex_ev_condoms.qsrc

@@ -45,7 +45,6 @@ if $ARGS[0] = 'condoms':
 			gs 'sex_ev_condoms', 'reenable_condoms1'
 			gs 'sex_ev_condoms', 'no_more_free_creampies1'
 			gs 'sex_ev_condoms', 'already_creampie1'
-			gs 'sex_ev_condoms', 'lube_up1'
 		elseif npc_bareback[$boy] = 2 and sex_ev['no_condom'] ! 1 and sex_ev['condom'] ! 1:
 			'"Is it safe?" <<$npc_firstname[$boy]>> asks. "Can we go bareback?"'
 			gs 'sex_ev_condoms', 'bareback_check'
@@ -466,6 +465,7 @@ if $ARGS[0] = 'npc_condom_put_on':
 		'You bob your head up and down a few times for good measure before coming up and flashing a grin.'
 		gs 'sex_ev_sex', 'position_choose'
 	end
+	gs 'sex_ev_sex', 'lube_up_condom1'
 end
 
 if $ARGS[0] = 'condom_conscious_npc':
@@ -521,25 +521,20 @@ if $ARGS[0] = 'npc_out_of_condoms':
 	gs 'sex_ev_condoms', 'pc_skip_the_condom'
 	if mc_inventory['normal_condoms'] > 0:
 		act'Use one of your condoms':
-			sex_ev['using_pc_condoms'] = 1
-			gs 'sex_ev_condoms', 'pc_use_condoms'
+			gs 'sex_ev_condoms', 'pc_condom_use_stats'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/misc/condom_put.jpg"></center>'
-			if mc_inventory['normal_condoms'] > 1:
-				'"That''s okay, I''ve got some."'
-			elseif mc_inventory['normal_condoms'] = 1:
-				'"That''s okay, I''ve got one."'
-			end
+			iif(mc_inventory['normal_condoms'] = 1, '"That''s okay, I''ve got one."', '"That''s okay, I''ve got some."')
 			'You reach into your bag and pull out a condom, rolling it onto his cock.'
 			gs 'sex_ev_sex', 'position_choose'
 		end
 
 		act'Use one of your condoms (mouth)':
 			sex_ev['using_pc_condoms'] = 1
-			gs 'sex_ev_condoms', 'pc_use_condoms'
+			gs 'sex_ev_condoms', 'pc_condom_use_stats'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/misc/condom_mouth.mp4"></video></center>'
-			'"That''s okay, I''ve got some."'
+			iif(mc_inventory['normal_condoms'] = 1, '"That''s okay, I''ve got one."', '"That''s okay, I''ve got some."')
 			'You reach into your bag and pull out a condom, rolling it onto his cock with your mouth.'
 			gs 'sex_ev_sex', 'position_choose'
 		end
@@ -1056,9 +1051,7 @@ if $ARGS[0] = 'no_condom2.1':
 	if mc_inventory['normal_condoms'] > 0:
 		act'I''ve got some':
 			cla & *clr
-			mc_inventory['normal_condoms'] -= 1
-			sex_ev['condom'] = 1
-			sex_ev['must_fuck'] = 1
+			gs 'sex_ev_condoms', 'pc_condom_use_stats'
 			'<center><img <<$set_imgh>> src="images/shared/sex/misc/condom_put.jpg"></center>'
 			'"I''ve got some right here," you say, pulling a rubber from your bag and tearing it open.'
 			'You smile at <<$npc_firstname[$boy]>> as you roll it onto his cock for him.'
@@ -2301,12 +2294,6 @@ if $ARGS[0] = 'trying_for_baby':
 	end
 end
 
-if $ARGS[0] = 'lube_up1':
-	if mc_inventory['lubricant'] > 0:
-	
-	end
-end
-
 if $ARGS[0] = 'virgin_condom1':
 	act'Wait for him':
 		sex_ev['condom'] = 1
@@ -2486,7 +2473,7 @@ if $ARGS[0] = 'virgin_condom_ask2':
 	if mc_inventory['normal_condoms'] > 0:
 		act'Get one from your bag':
 			sex_ev['using_pc_condoms'] = 1
-			gs 'sex_ev_condoms', 'pc_use_condoms'
+			gs 'sex_ev_condoms', 'pc_condom_use_stats'
 			cla & *clr
 			$sex_ev['bed_room']
 			if mc_inventory['normal_condoms'] > 1:

locations/sex_ev_cum.qsrc

@@ -1830,12 +1830,12 @@ if $ARGS[0] = 'cum_inside':
 					sex_ev['orgasm_count'] += 1
 					sex_ev['creampie_orgasm'] += 1
 					'<<$npc_firstname[$boy]>>''s cum pours into you and you gasp as you get sent over the edge and trigger your own climax. The two of come together, each of your orgasms fuelling the other''s until eventually they''ve run their course and both of you lay there panting.'
+					gs 'sex_ev_cum', 'cum_inside_pull_away'
+					gs 'sex_ev_reactions', 'react_menu'
 				else
 					gs 'sex_ev_cum', 'hypno_creampie_orgasm_fail'
 				end
 !!				act'Continue':cla & gs'sex_ev_sex', 'sex_end'
-				gs 'sex_ev_cum', 'cum_inside_pull_away'
-				gs'sex_ev_reactions', 'react_menu'
 			end
 			
 !!{			if hypnoHardToCum = 0:
@@ -1851,7 +1851,7 @@ if $ARGS[0] = 'cum_inside':
 					'You gasp as the sensation triggers your own climax and get sent over the edge yourself. The two of come together, each of your orgasms fuelling the other''s until eventually they''ve run their course and both of you lay there panting.'
 					act'Continue':cla & gs'sex_ev_sex', 'sex_end'
 					gs 'sex_ev_cum', 'cum_inside_pull_away'
-					gs'sex_ev_reactions', 'react_menu'
+					gs 'sex_ev_reactions', 'react_menu'
 				end
 			end}
 			
@@ -2970,12 +2970,12 @@ end
 if $ARGS[0] = 'hypno_creampie_orgasm_fail':
 	cla & *clr
 	if $sex_ev['position'] = 'miss':
-		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/miss1.mp4"></video></center>'
 		$orgasm_or = 'no'
 		sex_ev['hypno_anti_orgasm'] += 1
 		sex_ev['hypno_came_together'] = 1
 		gs 'sex_ev_sex', 'fuck_arousal_cum_code'
 		gs'stat'
+		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie1.mp4"></video></center>'
 		if sex_ev['creampie_force'] = 0:
 			'<<$npc_firstname[$boy]>> holds you tight and you gasp as his cum pours into you. It feels so good! It''s driving you crazy! You''re gonna-!'
 			*nl
@@ -2987,6 +2987,8 @@ if $ARGS[0] = 'hypno_creampie_orgasm_fail':
 		end
 		*nl
 		'But despite all your best efforts, his orgasm dies down inside you before you find yours. And you just... <i>can''t...</i> <i><b>come...</b></i>'
+		gs 'sex_ev_cum', 'cum_inside_pull_away'
+		gs 'sex_ev_reactions', 'react_menu'
 	elseif $sex_ev['position'] = 'doggy':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/doggy5.mp4"></video></center>'
 		$orgasm_or = 'no'
@@ -2998,6 +3000,9 @@ if $ARGS[0] = 'hypno_creampie_orgasm_fail':
 		'Suddenly, your arousal slams up against a brick wall. Frustratingly, <i>tantalizingly</i> close. <<$npc_firstname[$boy]>> continues pulsing inside you and the sensation is indescribably good. Your insides scream for release! Your pussy clenches, squeezes, and squirms around <<$npc_firstname[$boy]>>''s cock, trying to seek it.'
 		*nl
 		'But despite all your best efforts, his orgasm dies down inside you before you find yours. And you just... <i>can''t...</i> <i><b>come...</b></i>'
+		
+		gs 'sex_ev_cum', 'cum_inside_pull_away'
+		gs 'sex_ev_reactions', 'react_menu'
 	elseif $sex_ev['position'] = 'cowgirl':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cowgirl2.mp4"></video></center>'
 		$orgasm_or = 'no'
@@ -3018,18 +3023,18 @@ if $ARGS[0] = 'hypno_creampie_orgasm_fail':
 			*nl
 			'Suddenly, your arousal slams up against a brick wall. Frustratingly, <i>tantalizingly</i> close. But climax refuses to come. <<$npc_firstname[$boy]>> continues pulsing inside you and the sensation is indescribably good. Your insides scream for release! In a desperate panic, you start frantically riding <<$npc_firstname[$boy]>> again, even as he''s still coming. He groans loudly and your pussy clenches, squeezes, and squirms around his cock, milking him for every drop, desperately trying to orgasm!'
 		end
-	end
-	act'Continue':
-		cla & *clr
-		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cowgirl1.mp4"></video></center>'
-		'But no matter what you try, his orgasm dies down inside you before you find yours. His cum seeps from your pussy around his already softening shaft.'
-		*nl
-		'And you just... <i>can''t...</i> <i><b>come...</b></i>'
-		if sex_ev['creampie_surprise'] = 1:
-			gs'sex_ev_cum', 'creampie_surprise_react'
-		else
-			gs 'sex_ev_cum', 'cum_inside_pull_away'
-			gs'sex_ev_reactions', 'react_menu'
+		act'Continue':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cowgirl1.mp4"></video></center>'
+			'But no matter what you try, his orgasm dies down inside you before you find yours. His cum seeps from your pussy around his already softening shaft.'
+			*nl
+			'And you just... <i>can''t...</i> <i><b>come...</b></i>'
+			if sex_ev['creampie_surprise'] = 1:
+				gs'sex_ev_cum', 'creampie_surprise_cum_together'
+			else
+				gs 'sex_ev_cum', 'cum_inside_pull_away'
+				gs'sex_ev_reactions', 'react_menu'
+			end
 		end
 	end
 end

locations/sex_ev_doggy.qsrc

@@ -33,9 +33,11 @@ if $ARGS[0] = 'doggy_start':
 		act'Continue':
 			!!sex_ev['cock_inserted'] = 1
 			cla
-			if sex_ev['fuck_count'] = 0:
+			if ar_vag_lube = 0:
 				!!if npc_rough_lover[$boy] = 1:
 				if rand(0,1) = 1:
+					vaginal_slip = 6
+					ar_vag_lube = 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.'
@@ -48,6 +50,7 @@ if $ARGS[0] = 'doggy_start':
 					end
 					
 					act'Enjoy':
+						gs'arousal', 'foreplay', -8
 						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.'
@@ -67,15 +70,13 @@ if $ARGS[0] = 'doggy_start':
 						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.'
-						if mc_inventory['lubricant'] > 0:'"I have lube you know!" you growl back.'
+						if lubri > 0:'"I have lube you know!" you growl back.'
 						gs'sex_ev_doggy', 'doggy_insert_slow'
 						!!gs'sex_ev_doggy', 'doggy_goto'
 					end
 					
 					act'You like it dirty':
 						gs'arousal', 'foreplay', -15
-						vaginal_slip = 8
-						ar_vag_lube = 1
 						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.'

locations/sex_ev_pillow_talk.qsrc

@@ -675,7 +675,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 sex_ev['bareback_pillowtalk'] = 0 and npc_bareback[$boy] = 0:
+	if sex_ev['no_condom'] = 1 and ( sex_ev['condom'] = 1 or sex_ev['npc_insist_no_condom'] = 1 or sex_ev['dont_need_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
@@ -684,7 +684,7 @@ if $ARGS[0] = 'better_without':
 			if sex_ev['npc_insist_no_condom'] = 1 or sex_ev['dont_need_condom'] = 1:
 				'"By the way," you say, looking at <<$npc_firstname[$boy]>>. "You were right. It was better without the condom."'
 			else
-				'"By the way," you say, looking at <<$npc_firstname[$boy]>>. "It was nice without the condom."'
+				'"It was so much better without the condom," you smile softly at <<$npc_firstname[$boy]>>.'
 			end
 			if npc_childfree[$boy] = 1:
 				gs'sex_ev_talk', 'boy_accidental_creampie'
@@ -715,7 +715,7 @@ if $ARGS[0] = 'better_without':
 					'"I told you we didn''t need one," he says smugly.'
 					gs'sex_ev_pillow_talk', 'topic_route'
 				else
-					'"Yeah..." he smiles back.'
+					'"It was really good," he smiles back.'
 					gs'sex_ev_pillow_talk', 'topic_route'
 				end
 			else
@@ -756,12 +756,16 @@ if $ARGS[0] = 'better_without':
 					if sex_ev['dont_need_condom'] = 1:
 						'"Told you we didn''t need one," he laughs.'
 					else
-						'"Told you we didn''t need one," he laughs.'
+						'"It was really good," he smiles back.'
+						act'Continue': cla & gs'sex_ev_pillow_talk', 'topic_route'
 					end
-					act'You were right':
-						cla
-						'"I guess not," you say, smiling back.'
-						gs'sex_ev_pillow_talk', 'topic_route'
+					
+					if sex_ev['dont_need_condom'] = 1:
+						act'You were right':
+							cla
+							'"I guess not," you say, smiling back.'
+							gs'sex_ev_pillow_talk', 'topic_route'
+						end
 					end
 
 					gs'sex_ev_pillow_talk', 'thank_no_creampie'

locations/sex_ev_reactions_creampie.qsrc

@@ -337,7 +337,7 @@ if $ARGS[0] = 'creampie_unhappy':
 end
 
 if $ARGS[0] = 'creampie_cum_together_react':
-	if sex_ev['came_together'] = 2:
+	if sex_ev['came_together'] = 2 and sex_ev['hypno_came_together'] ! 1:
 		act'Did we come together?':
 			sex_ev['came_together'] = 3
 			if sex_ev['did_we_cum_together'] = 1:

locations/sex_ev_sex.qsrc

@@ -114,6 +114,7 @@ if $ARGS[0] = 'sex_pre':
 	if sex_ev['no_condom'] ! 0:
 		gs 'sex_ev_sex', 'position_choose'
 	end
+	gs 'sex_ev_sex', 'lube_up_bb1'
 	gs 'sex_ev_condoms', 'condoms'
 end
 
@@ -233,6 +234,39 @@ if $ARGS[0] = 'he_choose_position':
 !!	end
 end
 
+if $ARGS[0] = 'lube_up_bb1':
+	!! lubing up with no condom
+	if mc_inventory['lubricant'] > 0 and ar_vag_lube = 0 and sex_ev['no_condom'] = 1:
+		act'Lube up':
+			mc_inventory['lubricant'] -= 1
+			ar_vag_lube = 1
+			vaginal_slip = 8
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
+			'"Wait," you say, pausing as you dig into your bag and come up with your tube of lubricant. "Let''s get you lubed up first."'
+			'Squeezing out a generous dollop into your palm, you take hold of <<$npc_firstname[$boy]>>''s cock and run your hand up and down his <<$npc_dick_desc[$boy]>> shaft. Within seconds, it''s slick and slippery.'
+			'"I bet you''ll just slide right into me now," you grin.'
+			gs 'sex_ev_sex', 'position_choose'
+		end
+	end
+end
+
+if $ARGS[0] = 'lube_up_condom1':
+	if mc_inventory['lubricant'] > 0 and ar_vag_lube = 0 and sex_ev['condom'] = 1 and sex_ev['no_condom'] = 0:
+		act'Lube up':
+			mc_inventory['lubricant'] -= 1
+			ar_vag_lube = 1
+			vaginal_slip = 8
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
+			'"Hang on, I''ve got something," you say, digging into your bag while <<$npc_firstname[$boy]>> puts on the condom. Moments later, you come up with a tube of lubricant. "Let''s get you lubed up."'
+			'Squeezing out a generous dollop into your palm, you take hold of <<$npc_firstname[$boy]>>''s cock and run your hand up and down the condom covering his <<$npc_dick_desc[$boy]>> shaft. Within seconds, the rubbery coat is slick and slippery.'
+			'"Always lube your condoms," you grin.'
+			gs 'sex_ev_sex', 'position_choose'
+		end
+	end
+end
+
 if $ARGS[0] = 'rand_position':
 	cla
 	if sex_ev['must_fuck'] = 1:
@@ -902,7 +936,7 @@ if $ARGS[0] = 'birth_control_take':
 				end
 			end
 			sex_ev['bc_take'] = 1
-			gs 'din_bad', 'quick_takepill'
+			gs'fertility','birth_control', 1
 			gs 'stat'
 			act'Take it shyly':
 				cla & *clr