[change] increased therapy compulsory visit window and added check if baby is actually his. Also made orgasm during session easier, same as hotel

locations/stat.qsrc

@@ -1076,7 +1076,7 @@ else
 	pornstar['icon'] = 0
 end
 
-if therapistday ! daystart and remindedtherapyday ! daystart and hypnoSchedule = 1 and (hour >= 18 and (minut > 45 or hour >= 19)) and (hour < 20 and (minut < 15 or hour < 19)) and menu_off = 0 and workDolg = 0:
+if therapistday ! daystart and remindedtherapyday ! daystart and hypnoSchedule = 1 and hour >= 18 and hour < 21 and menu_off = 0 and workDolg = 0:
 	remindedtherapyday = daystart
 	gt 'therapist_reminder'
 end

locations/therapist.qsrc

@@ -554,6 +554,7 @@ if $ARGS[0] = 'hypno':
 				end
 
 			else
+				if hypnoHardToCum = 1: hypnoHardToCum = 2
 				'"Now take off your clothes."</font>'
 				act 'Take off your clothes':
 					hypnoStripped = 1
@@ -574,44 +575,45 @@ if $ARGS[0] = 'hypno':
 					if func('body_din','pregnancyVisibility', 0, 'nude') = 1 and HypnoPregNoticed = 0:
 						HypnoPregNoticed = 1
 						'After stripping off your clothes, the doctor takes a look at you and smiles at your pregnant stomach. He kneels before you and kisses your belly, sending a shiver up your spine. "Seeing you pregnant is a beautiful sight" he exclaims. "Is it mine?" he asks'
-
-						act 'Yes, <i>Master</i>':
-							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
-							'"Yes Master, It is yours" you say "Good, If anyone asks, you got raped and that''s how you think you got pregnant. One day you will learn that the child is mine, but for now, the child belongs to some random person on the street" he says and leads you to the couch to start the session.'
-							*nl
-							act 'Continue': gt 'therapist', 'hypno2'
-						end
-
-						act 'No, <i>Master</i>':
-							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
-							'"No, Master, It belongs to (Brother/Fedor/Boyfriend) "Thats upsetting." he says. "Since you did allow someone else to get you pregnant, I must punish you" he says and bends you over his desk, takes off his belt and starts to whip your bare ass with it. "You will not feel this pain when you wake up, but you will feel that you shouldn''t let anyone else but me get you pregnant. Do you understand, Cunt"'
-
+						if $ChildFath[arrsize('$ChildFath')-1] = 'A186':
 							act 'Yes, <i>Master</i>':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
-								'"All right, Now please lay on the couch so we can get started" he says putting his belt back on his pants but placing it unbuckled.'
+								'"Yes Master, It is yours" you say "Good, If anyone asks, you got raped and that''s how you think you got pregnant. One day you will learn that the child is mine, but for now, the child belongs to some random person on the street" he says and leads you to the couch to start the session.'
 								*nl
 								act 'Continue': gt 'therapist', 'hypno2'
 							end
-
-							act 'Yes, <i>Master</i>':
+						else
+							act 'No, <i>Master</i>':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+								'"No, Master, It belongs to (Brother/Fedor/Boyfriend) "Thats upsetting." he says. "Since you did allow someone else to get you pregnant, I must punish you" he says and bends you over his desk, takes off his belt and starts to whip your bare ass with it. "You will not feel this pain when you wake up, but you will feel that you shouldn''t let anyone else but me get you pregnant. Do you understand, Cunt"'
 
-								gs 'willpower', 'misc', 'resist', 'easy'
-								will_cost += (hypnoSchedule * 10)
-								will_cost += (hypnoStage * 10)
-								will_cost += hypnoTime * 3
-								if will_cost <= pcs_willpwr:
-									'"I love the baby''s father too much" you say and he sighs. We will have to do some more theopy to break you of that. You must only love me. Get on the couch with me.'
+								act 'Yes, <i>Master</i>':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									'"All right, Now please lay on the couch so we can get started" he says putting his belt back on his pants but placing it unbuckled.'
+									*nl
+									act 'Continue': gt 'therapist', 'hypno2'
+								end
 
-								else
-									'"I... Yes, sir" you say. "I will not have unprotected sex with anyone except you," you explain. "Good Girl" he gives you a kiss before having you sit on the couch to start the session.'
+								act 'Yes, <i>Master</i>':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+
+									gs 'willpower', 'misc', 'resist', 'easy'
+									will_cost += (hypnoSchedule * 10)
+									will_cost += (hypnoStage * 10)
+									will_cost += hypnoTime * 3
+									if will_cost <= pcs_willpwr:
+										'"I love the baby''s father too much" you say and he sighs. We will have to do some more theopy to break you of that. You must only love me. Get on the couch with me.'
+
+									else
+										'"I... Yes, sir" you say. "I will not have unprotected sex with anyone except you," you explain. "Good Girl" he gives you a kiss before having you sit on the couch to start the session.'
+									end
+									*nl
+									act 'Continue': gt 'therapist', 'hypno2'
 								end
-								*nl
-								act 'Continue': gt 'therapist', 'hypno2'
 							end
 						end
 					end
@@ -1799,6 +1801,7 @@ if $ARGS[0] = 'hypnoAnal':
 end
 
 if $ARGS[0] = 'hypnoDress':
+	if hypnoHardToCum = 2: hypnoHardToCum = 1
 	if hypnoTime < 10:
 		'"Get dressed, <i>Cunt</i>. Do it erotically, as much as you can."'
 		'He watches you getting dressed with a small smile on his face.'
@@ -2309,7 +2312,7 @@ if $ARGS[0] = 'hypnoRandom':
 		act 'Continue':	gt 'therapist', 'hypnoEnd'
 
 	! sveta will have a much harder time cumming without pavlov''s cock
-	elseif hypnoHardToCum ! 1:
+	elseif hypnoHardToCum < 1:
 		*clr & cla
 		hypnoHardToCum = 1
 		hypnoRandomCounter = 0