瀏覽代碼

Merge remote-tracking branch 'Thavus/master'

# Conflicts:
#	glife-notepad++
#	glife.qproj
Kevin_Smarts 2 年之前
父節點
當前提交
2987e24b31

+ 1 - 8
glife.qproj

@@ -406,12 +406,6 @@
 		<Location name="korr"/>
 		<Location name="housecall"/>
 	</Folder>
-	<Folder name="House">
-		<Location name="city_house_res_misc"/>
-		<Location name="city_house_res_bedr"/>
-		<Location name="city_house_res_bathr"/>
-		<Location name="city_house_res_kitch"/>
-	</Folder>
 	<Folder name="Block">
 		<Location name="pav_complex"/>
 		<Location name="pav_complexb2"/>
@@ -615,7 +609,7 @@
 		<Location name="motherkafeboss"/>
 		<Location name="pav_clinic"/>
 		<Location name="therapist"/>
-		<Location name="pavlov_home"/>
+		<Location name="therapist_reminder"/>
 		<Location name="gevent"/>
 		<Location name="pav_park"/>
 		<Location name="gopskver"/>
@@ -985,7 +979,6 @@
 		<Location name="uni_lessons"/>
 		<Location name="uni_lessons1"/>
 		<Location name="uni_lessonsev1"/>
-		<Location name="uni_exams1"/>
 		<Location name="uni_library"/>
 		<Location name="unicoursework"/>
 		<Location name="uniutil"/>

+ 3 - 2
locations/Cum_Manage.qsrc

@@ -898,8 +898,9 @@ if $ARGS[0] = 'cum_stat_display':
 				end
 				$icon_txtiscum = $txtiscum
 				if j <= 4 and trt_cumeater = 1 and $txtiscum = 'cum': $txtiscum = '<a href="exec:gs ''cum_manage'', ''cumeater'', <<i>>"><font color=#0064FF>' + $txtiscum + '</font></a>'
-				$txtiscum += ' from '
-				$icon_txtiscum += ' from '
+				if $txtperson ! '':
+					$txtperson = ' from ' + $txtperson
+				end
 				if i = 0 and j = 4 and vibratorIN = 0 and pcs_vag*10 < cumvolume['<<i>>:<<j>>'] and cumvolume['<<i>>:<<j>>'] >= 20:
 					$stat_cum_text += '<BR><b><font color="red">' + $txtamount + 'amounts of ' + $txtiscum + $txtperson + 'is ' + $txtproxy + $txtloc + iif($pantyworntype ! 'none', ' into your panties.', ' down your legs.')+'</font></b>'
 					if $stat_cum_msg ! '': $stat_cum_msg += '<br>'

+ 1 - 0
locations/arousal.qsrc

@@ -753,6 +753,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 	orgasm_buildup += stim['total']
 
 !! This is determining if Sveta will orgasm
+
 	if $orgasm_or ! 'no' and $ARGS[0] ! 'flashlite' and $ARGS[0] ! 'flash' and orgasm_flag['trigger'] ! 0:
 		if $orgasm_or = 'yes' or $orgasm_or = 'custom':
 			gs 'orgasm', $ARGS[0]

+ 16 - 7
locations/bras.qsrc

@@ -197,15 +197,24 @@ if $ARGS[0] = 'view_bra_item':
 			else
 				if metka_bras = 0:
 					act 'Wear':
-						if CloBra = 1:
-							msg'You cannot wear a bra with this top'
-						else
-							gs 'bras', 'wear', $ARGS[2], ARGS[3]
-
-							if $ARGS[1] = 'wardrobe':
+						if hypnoBra > 0:
+							cla
+							*clr
+							'You pick up the bra and think about trying it on... but then you change your mind and put it back. You don''t really like wearing bras.'
+							act 'Continue':
 								gt 'wardrobe', 'main'
+							end
+						else
+							if CloBra = 1:
+								msg'You cannot wear a bra with this top'
 							else
-								gt $loc, $loc_arg
+								gs 'bras', 'wear', $ARGS[2], ARGS[3]
+
+								if $ARGS[1] = 'wardrobe':
+									gt 'wardrobe', 'main'
+								else
+									gt $loc, $loc_arg
+								end
 							end
 						end
 					end

+ 15 - 0
locations/cikl.qsrc

@@ -1985,6 +1985,21 @@ if rand(0,1) = 0:
 else
 	momclean2 = 25
 end
+
+!!-------------Therapist Route schedule variables----------------------------------------------------------------------
+!! 23 = kitchen
+!! 24 = Living room
+!! 25 = bathroom
+!! 26 = Master''s room
+if therapistWantsSlave > 0:
+	annaclean1 = rand(23,26)
+	if rand(0,1) = 0:
+		momclean2 = 23
+	else
+		momclean2 = 25
+	end
+end
+
 !!------------------------------------------------------------------------------------------------------------
 
 !!---------- School related schedule -------------------------------------------------------------------------

+ 0 - 3
locations/gschool_grounds.qsrc

@@ -141,9 +141,6 @@ if $ARGS[0] = 'main':
 
 	if week < 6 and hour >= 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and SchoolBlock = 0 and suspended['on'] ! 1:
 		if PCloStyle2 = 4 or Enable_sforma = 1:
-			if therapistday ! daystart and hypnosexing > 0 and hour >= 5 and hour < 9:
-				gt 'therapist', 'beforeSchool'
-			end
 			if hour = 6:
 				if minut < 30:
 					'It''s too early for school now.'

+ 15 - 0
locations/orgasm.qsrc

@@ -3,6 +3,21 @@
 !This is intended to be hidden and the stats and calculations should not appear in game.
 
 
+if hypnoHardToCum = 1 and rand(1,9) > 2 and $orgasm_or ! 'custom':
+	orgasm_buildup -= 70
+	i = rand(0,3)
+	if i = 0:
+		'You feel an orgasm building up, the warmth in you abdomen, the tell tale tingles but it just stops and you feel calm again.'
+	elseif i = 1:
+		'You feel an orgasm building up, but then nothing. Your pussy is still hungry and needy but you feel like you are no closer to release than when you started.'
+	elseif i = 2:
+		'Gradually the pleasurable sensations spread throughout you are close so close, but nothing except even hornier than before.'
+	elseif i = 3:
+		'You moan with pleasure, ridding the edge of an orgasm... but instead of being hit by bliss you just feel an emptiness like your prize was stolen. Why? You need this.'
+	end
+	exit
+end
+
 orgasm_buildup -= 70
 if orgasm_flag['masturbate'] = 1:
 	orgasm_masturbate += 1

+ 7 - 1
locations/pav_residential.qsrc

@@ -136,7 +136,13 @@ else
 end
 !!end of code changes.
 
-if kanikuli = 0 and StoryLine > 0 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 7 and hour < 9: act '<b>Go to school</b>': minut += 2 & gt 'gschool_grounds', 'main'
+if kanikuli = 0 and StoryLine > 0 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 7 and hour < 9: 
+	if hypnoSchoolGirl <= 0:
+		act '<b>Go to school</b>': minut += 2 & gt 'gschool_grounds', 'main'
+	else
+		act '<b>Go to school</b>': minut += 2 & gt 'therapist', 'beforeSchool'
+	end
+end
 
 if InvitationToDimkaNYparty = 1 and month = 12 and day = 31 and hour > 14 and hour <= 18:
 	act '<b>Go to the New Year''s party at Dimka''s house</b>': killvar 'InvitationToDimkaNYparty' & minut += 30 & gt 'sny', '3'

+ 34 - 49
locations/pavlov_home.qsrc

@@ -4,38 +4,37 @@ if $ARGS[0] = 'PavlovHome':
 	*clr & cla
 	minut += 1
 	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/hallway.jpg"></center>'
-	'Text.'	
-	act '<b>Leave Anushka''s apartment</b>': gt 'pav_complex','start'
-	act 'Master''s Bedroom': gt 'home_template','bedroom'
-	act 'Bathroom': gt 'home_template','bathroom'
-	act 'spare room': gt 'home_templatebr','second_bedroom'
-	act 'Living room': gt 'home_template','livingroom'
-	act 'Kitchen': gt 'home_template','kitchen'
-	act 'Parents room': gt 'home_template','parents_bedroom'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlovhome/hallway.jpg"></center>'
+	'The hallway of your Master''s home. '	
+	act '<b>Leave Master''s Home</b>': gt 'pav_complex','start'
+	act 'Master''s Bedroom': gt 'pavlov_home','bedroom'
+	act 'Bathroom': gt 'pavlov_home','bathroom'
+	act 'spare room': gt 'pavlov_home','second_bedroom'
+	act 'Living room': gt 'pavlov_home','livingroom'
+	act 'Kitchen': gt 'pavlov_home','kitchen'
 end	
 
 if $ARGS[0] = 'bedroom':	
 	*clr & cla
-	$loc = 'home_template'
+	$loc = 'pavlov_home'
 	$loc_arg = 'bedroom'
 	$location_type = 'private'
 	$locclass = 'bedr'
 	!! The two variables below this are needed only if a mirror is called in that room, to help return you here after done
-	$locM = 'home_template'
+	$locM = 'pavlov_home'
 	locM_arg = 'bedroom'
 	minut += 1
 	gs'stat'
 	'<center><b><font color = maroon>Master''s Bedroom</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/bedroom.jpg"></center>'
-	'text <a href="exec:gt ''mirror'', ''start''">mirrors</a>, and she even has a packed <a href="exec:gt ''home_template'', ''Shoe Closet''">shoe closet</a>.'
-	act 'Leave room':gt 'home_template', 'hallway'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlovhome/bedroom.jpg"></center>'
+	'text <a href="exec:gt ''mirror'', ''start''">mirrors</a>, and she even has a packed <a href="exec:gt ''pavlov_home'', ''Shoe Closet''">shoe closet</a>.'
+	act 'Leave room':gt 'pavlov_home', 'hallway'
 end	
 
 if $ARGS[0] = 'kitchen':	
-	$loc = 'home_template'
+	$loc = 'pavlov_home'
 	$loc_arg = 'kitchen'
-	$menu_loc = 'home_template'
+	$menu_loc = 'pavlov_home'
 	$menu_arg = 'kitchen'
 	$locclass = 'kitr'
 	menu_off = 0
@@ -44,10 +43,10 @@ if $ARGS[0] = 'kitchen':
 	gs 'stat'
 	gs 'kit_din'
 	'<center><b><font color = maroon>Kitchen</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/kitchen.jpg"></center>'
-	'The room is <<$hypnoKitchenDirtiness>>, and there are dishes on most of the available surfaces. The wood floor is not polished and only covers the areas being used. You''re surprised by the lack of a dining table.'
-	act 'Leave':gt 'home_template','hallway'
-	act 'Look in the fridge': gt 'home_template', 'fridge'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlovhome/kitchen.jpg"></center>'
+	'The room is <<$hypnoKitchenDirtiness>>, and there are dishes on most of the available surfaces.'
+	act 'Leave':gt 'pavlov_home','hallway'
+	act 'Look in the fridge': gt 'pavlov_home', 'fridge'
 	dynamic $fill_bottle
 	dynamic $driwater
 end
@@ -90,7 +89,7 @@ if $ARGS[0] = 'fridge':
 	if anushbeer_count > 0 and anushvodka_count > 0 and anushsup_count > 0:$r_pusto = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/holod'+rand(1,3)+'.jpg"></center>'
 	'You open the fridge and see:<<$anush_vodka>><<$anush_beer>><<$anush_sup>><<$r_pusto>>'
 
-	act 'Close the refrigerator': gt 'home_template', 'kitchen'
+	act 'Close the refrigerator': gt 'pavlov_home', 'kitchen'
 	if anushbeer_count > 0:
 		act 'Have a beer':
 			*clr & cla
@@ -102,7 +101,7 @@ if $ARGS[0] = 'fridge':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/beer'+rand(1,3)+'.jpg"></center>'
 			'You take a bottle of beer from the fridge and drink it, which quenches your thirst.'
 
-			act 'Continue': gt 'home_template', 'fridge'
+			act 'Continue': gt 'pavlov_home', 'fridge'
 		end
 	end
 	if anushvodka_count > 0:
@@ -115,7 +114,7 @@ if $ARGS[0] = 'fridge':
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/vodka'+rand(1,2)+'.jpg"></center>'
 			'You pour some vodka in a glass and drink it. You shiver as you feel the warm, burning sensation slowly slide down your gullet.'
-			act 'Put the bottle back in the fridge': gt 'home_template', 'fridge'
+			act 'Put the bottle back in the fridge': gt 'pavlov_home', 'fridge'
 
 			act 'Drink more vodka':
 				*clr & cla
@@ -130,7 +129,7 @@ if $ARGS[0] = 'fridge':
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/vodka'+rand(1,2)+'.jpg"></center>'
 					'You pour yourself another glass and drain it in one gulp. Wow, that stuff is strong!'
 				end
-				act 'Continue': gt 'home_template', 'fridge'
+				act 'Continue': gt 'pavlov_home', 'fridge'
 			end
 		end
 	end
@@ -155,7 +154,7 @@ if $ARGS[0] = 'fridge':
 			gs 'cum_cleanup'
 			pcs_breath = 0
 			'It seems to be leftovers from a ready to make meal. You wonder if anyone here knows how to cook.'
-			act 'Continue': gt 'home_template', 'fridge'
+			act 'Continue': gt 'pavlov_home', 'fridge'
 		end
 	end
 end	
@@ -164,16 +163,16 @@ if $ARGS[0] = 'Livingroom':
 	*clr & cla
 	minut += 1
 	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/livingroom.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlovhome/livingroom.jpg"></center>'
 	'text'
 	
-	act 'Hallway':gt 'home_template', 'hallway'
+	act 'Hallway':gt 'pavlov_home', 'hallway'
 end		
 
 if $ARGS[0] = 'bathroom':
-	$loc = 'home_template'
+	$loc = 'pavlov_home'
 	$loc_arg = 'bathroom'
-	$locM = 'home_template'
+	$locM = 'pavlov_home'
 	$locM_arg ='bathroom'
 	$location_type = 'bathroom'
 	$bathtype = 'bathtub shower'
@@ -182,13 +181,13 @@ if $ARGS[0] = 'bathroom':
 	minut += 1
 	gs 'stat'
 	'<center><h4><font color="maroon">Bathroom</font></h4></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home_template/bathroom.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlovhome/bathroom.jpg"></center>'
 	'The bathroom has seen better days. It looks like it hasn''t been cleaned for quite some time, with mold growing in the corners of the walls and floor.'
 	'The toilet sits along the far wall. There''s also a bathtub with an old plastic shower curtain hanging from a rod above it. It also seems that the latch on the door is broken.'
 	'You can do your hair and makeup in the <a href="exec:gt ''mirror'', ''start''">mirror</a> above the sink.'
 	*nl
 	if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0:'<a href="exec:dynamic $pirManage">Manage Piercings</a>'
-	act 'Leave the bathroom': gt 'home_template','hallway'
+	act 'Leave the bathroom': gt 'pavlov_home','hallway'
 	act 'Take a shower':
 		*clr & cla
 		menu_off = 1
@@ -201,7 +200,7 @@ if $ARGS[0] = 'bathroom':
 		act 'Take a selfie':
 			gs 'telefon', 'Phone_selfie_image_bathing', 'shower'
 		end
-		act 'Get out of the shower': gt 'home_template','bathroom'
+		act 'Get out of the shower': gt 'pavlov_home','bathroom'
 		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		killvar 'temp'
 	end
@@ -212,32 +211,18 @@ if $ARGS[0] = 'bathroom':
 	gs 'din_van', 'prvt_pee'
 end
 
-if $ARGS[0] = 'parents_bedroom':	
-	$loc = 'home_template'
-	$loc_arg = 'parents_bedroom'
-	$location_type = 'private'
-	$locclass = 'bedr'
-	*clr & cla
-	minut += 1
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/parentsroom.jpg"></center>'
-	'text'
-	
-	act 'Hallway':gt 'home_template', 'hallway'
-end	
-
 if $ARGS[0] = 'second_bedroom':	
-	$loc = 'home_template'
+	$loc = 'pavlov_home'
 	$loc_arg = 'second_bedroom'
 	$location_type = 'private'
 	$locclass = 'bedr'
 	*clr & cla
 	minut += 1
 	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/home_template/spareroom.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/pavlov_home/spareroom.jpg"></center>'
 	'text'
 	
-	act 'Hallway':gt 'home_template', 'hallway'
+	act 'Hallway':gt 'pavlov_home', 'hallway'
 end	
 
 

+ 254 - 0
locations/pavlov_schedule.qsrc

@@ -0,0 +1,254 @@
+# family_schedule
+
+!!Each action will use '<name>loc' ie. annaloc
+
+annaloc = 0
+pavlovloc = 0
+
+!!---MOM--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
+
+!!annaloc [11] = daystart check in salon
+!!indorf = 1 means mom is in the village
+!!annaloc['athome'] = 1 means anna is at home and awake
+if indorf = 0:
+	if week <= 5:
+		if hour < 5 or (hour = 5 and minut < 30):
+			!!Asleep
+			annaloc = 1
+			annaloc['athome'] = 0
+		elseif hour = 5 and minut < 45:
+			!!shower
+			annaloc = 2
+			annaloc['athome'] = 1
+		elseif hour < 6:
+			!! Giving Pavlov head.
+			annaloc = 3
+			annaloc['athome'] = 1
+		elseif hour = 6 or (hour = 7 and minut < 30):
+			annaloc = 4
+			annaloc['athome'] = 1
+			if hour = 6 and minut <= 40:
+				!! Make Breakfast
+				annaloc['kitchen_action'] = 1
+			elseif hour = 6 and minut < 45:
+				!! Set breakfast table
+				annaloc['kitchen_action'] = 2
+			elseif (hour = 6 and minut >= 45) or (hour = 7 and minut <= 15):
+				!! breakfast
+				annaloc['kitchen_action'] = 3
+			else
+				!! Clean up breakfast table
+				annaloc['kitchen_action'] = 4
+			end
+		elseif hour = 7 or (hour = 8 and minut < 30):
+			!!Cleaning random room in the house
+			!!variable set in cikl
+			annaloc = annaclean1
+			annaloc['athome'] = 1
+		elseif (week <= 5 and hour < 16):
+			!! Hands out fliers for therapy
+			annaloc = 9
+			annaloc['athome'] = 0
+		elseif hour = 16 and minut < 50 and week < 5:
+			!!Buying groceries for dinner and other stuff needed for home at the supermarket
+			annaloc = 7
+			annaloc['athome'] = 0
+		elseif hour < 17 and week <= 5:
+			!! Walking home
+			annaloc = 8
+			annaloc['athome'] = 0
+		elseif hour < 18:
+			!! Making dinner
+			annaloc = 11
+			annaloc['athome'] = 1
+		elseif hour = 18 and minut <= 30:
+			!! dinner
+			annaloc = 12
+			annaloc['athome'] = 1
+		elseif hour < 19:
+			!! Cleaning dinner table/Doing dishes
+			annaloc = 13
+			annaloc['athome'] = 1
+		elseif hour < 20:
+			if week = 1:
+				!! Visiting Luda on mondays for 3 hours
+				annaloc = 20
+				annaloc['athome'] = 0
+			else
+				!! (cleaning the bathroom, sweeping, mopping, dusting, watching TV, taking a bath, etc in different rooms)
+				annaloc = annaclean2
+				annaloc['athome'] = 1
+			end
+		elseif hour < 22:
+			if week = 1:
+				!! Visiting Luda on mondays for 3 hours
+				annaloc = 20
+				annaloc['athome'] = 0
+			elseif week < 5:
+				!! Watches TV with Vladimir
+				annaloc = 19
+				annaloc['athome'] = 1
+			else
+				!! Watches TV alone
+				annaloc = 19
+				annaloc['athome'] = 1
+			end
+		else
+			!! Asleep (Small chance she and step dad have sex before sleep 22:00-22:59)
+			annaloc = 1
+			annaloc['athome'] = 0
+		end
+	else
+		if hour < 5 or (hour = 5 and minut < 30):
+			!! Asleep
+			annaloc = 1
+		elseif hour = 5 and minut < 45:
+			!! Shower
+			annaloc = 2
+			annaloc['athome'] = 1
+		elseif hour < 6:
+			!! Getting dressed in her room, if Sveta knocks she''ll ask you to wake Kolka 
+			annaloc = 3
+			annaloc['athome'] = 1
+		elseif hour = 6 or (hour = 7 and minut < 30):
+			annaloc = 4
+			annaloc['athome'] = 1
+			if hour = 6 and minut <= 40:
+				!! Make Breakfast
+				annaloc['kitchen_action'] = 1
+			elseif hour = 6 and minut < 45:
+				!! Set breakfast table - ask Sveta to do it if she comes into the kitchen at that time
+				annaloc['kitchen_action'] = 2
+			elseif hour = 6 or (hour = 7 and minut <= 15):
+				!! Family breakfast
+				annaloc['kitchen_action'] = 3
+			else
+				annaloc['kitchen_action'] = 4
+				!! Clean up breakfast table
+			end
+		elseif hour < 11:
+			!!Cleaning random room in the house
+			annaloc = momclean1
+			annaloc['athome'] = 1
+		elseif hour = 11 and minut < 30:
+			!!Traveling - takes the car to town/walks to church
+			annaloc = 14
+			annaloc['athome'] = 0
+		elseif hour < 12 or (hour = 12 and minut < 30):
+			!! Gets her nails done/hair cut at the salon or such things - On Sunday goes to the church during these hours
+			annaloc['athome'] = 0
+			if week = 6:
+				!! Salon
+				annaloc = 15
+			else
+				!!Church
+				annaloc = 16
+			end
+		elseif hour = 12 or (hour = 13 and minut < 30) and week = 6:
+			!!Church
+			annaloc = 16
+		elseif hour < 14:
+			!! Walks around different shops, looking at and buying stuff - On Sunday goes to church during these hours
+			annaloc = 15
+			annaloc['athome'] = 0
+		elseif hour < 17:
+			!!Helping out Sergey/Luda, going to Kolka''s games?
+			annaloc = rand(14,15)
+			annaloc['athome'] = 0
+		elseif hour < 18:
+			!! Making dinner
+			annaloc = 11
+			annaloc['athome'] = 1
+		elseif hour = 18 and minut <= 30:
+			!!Family dinner
+			annaloc = 12
+			annaloc['athome'] = 1
+		elseif hour < 19:
+			!! Cleaning dinner table/Doing dishes
+			annaloc = 13
+			annaloc['athome'] = 1
+		elseif hour < 21:
+			!!Says she goes to see her sister, in reality sometimes sees her sister or fucks around with different people. - Sunday goes to evening mass
+			annaloc['athome'] = 0
+			if week = 6:
+				!!Slutting around?
+				annaloc = 17
+			else
+				!!Church - Mass
+				annaloc = 18
+			end
+		elseif hour < 22:
+			if week = 7:
+				!! Watches TV with Vladimir
+				annaloc = 19
+				annaloc['athome'] = 1
+			else
+				!! Watches TV alone
+				annaloc = 19
+				annaloc['athome'] = 1
+			end
+		else
+			!! Asleep (Small chance she and step dad have sex before sleep 22:00-22:59)
+			annaloc = 1
+			annaloc['athome'] = 0
+		end
+	end
+end
+
+!!----PAVLOV------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
+!!pavlovout = 1 means pavlov is out of the house
+if pavlovout = 0:
+	if hour < 6 or (hour = 6 and minut < 15):
+		!! Asleep
+		pavlovloc = 1
+		pavlovloc['athome'] = 0
+	elseif hour = 6 and minut < 30:
+		!! Shower
+		pavlovloc = 2
+		pavlovloc['athome'] = 1
+	elseif (hour = 6 and minut >= 30) or (hour = 7 and minut <= 15):
+		!! waiting for breakfast
+		pavlovloc = 3
+		pavlovloc['athome'] = 1
+	elseif hour < 8:
+		!!Reads paper in kitchen
+		pavlovloc = 4
+		pavlovloc['athome'] = 1
+	elseif hour = 8 and minut < 30:
+		!!Watching TV
+		pavlovloc = 10
+		pavlovloc['athome'] = 1
+	elseif hour = 8 and minut < 45:
+		!! get dressed
+		pavlovloc = 5
+		pavlovloc['athome'] = 1
+	elseif hour < 17 or (hour = 17 and minut < 45):
+		!! Work (includes lunch time)
+		pavlovloc = 6
+		pavlovloc['athome'] = 0
+	elseif hour < 18:
+		!! waiting in kitchen for dinner
+		pavlovloc = 7
+		pavlovloc['athome'] = 1
+	elseif hour = 18 and minut <= 30:
+		!! dinner time
+		pavlovloc = 8
+		pavlovloc['athome'] = 1
+	elseif hour < 19 or (hour = 19 and minut < 15):
+		!! Fucking anna in bedroom.
+		pavlovloc = 9
+		pavlovloc['athome'] = 1
+	elseif hour < 21 or (hour = 21 and minut < 45):
+		!! Watch tv in living room
+		pavlovloc = 10
+		pavlovloc['athome'] = 1
+	elseif hour < 22:
+		!! Take shower
+		pavlovloc = 11
+		pavlovloc['athome'] = 1
+	else
+		!! Asleep
+		pavlovloc = 1
+		pavlovloc['athome'] = 0
+	end
+end

+ 5 - 0
locations/stat.qsrc

@@ -1227,5 +1227,10 @@ 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:
+	remindedtherapyday = daystart
+	gt 'therapist_reminder'
+end
+
 --- stat ---------------------------------
 

+ 24 - 16
locations/stat_display.qsrc

@@ -233,33 +233,41 @@ else
 	$stat_sleep_msg = ''	
 end
 
+if courthearing_date - 1 = daystart:
+	$stat_court_msg = 'You have a court hearing tomorrow between 07:00 and 11:00. The court is located in the city center of St. Petersburg.'
+	$stat_court_tooltip = 'Court hearing tomorrow (07:00 and 11:00).'
+elseif courthearing_date = daystart and hour < 11:
+	$stat_court_msg = 'You have a court hearing today between 07:00 and 11:00. The court is located in the city center of St. Petersburg.'
+	$stat_court_tooltip = 'Court hearing today (07:00 - 11:00).'
+else
+	$stat_court_msg = ''
+end
+
+if therapistday ! daystart and hypnoSchedule = 1 and hour < 18:
+	$stat_hypno_msg = 'You have a meeting scheduled with your therapist today at 18:00.'
+elseif therapistday ! daystart and hypnoSchedule = 1 and hour < 19 and hour > 18:
+	$stat_hypno_msg = 'You have a meeting scheduled with your therapist right now.'
+else
+	$stat_hypno_msg = ''
+end
+
 if hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum >= timeTresh:
-	$stat_hypno_msg = 'You really miss the feeling of sperm in your body, you are strangely craving it. You should talk to your therapist about it.'
+	$stat_hypno_msg += ' You really miss the feeling of sperm in your body, you are strangely craving it. You should talk to your therapist about it.'
 	$stat_hypno_tooltip = 'Talk to your therapist.'
 elseif hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum < timeTresh:
-	$stat_hypno_msg = 'You feel like talking to your therapist. You miss your sessions.'
+	$stat_hypno_msg += ' You feel like talking to your therapist. You miss your sessions.'
 	$stat_hypno_tooltip = 'Maybe visit your therapist.'
 elseif hypnoAddict > 0 and hypnoWithdrawal = 2 and missCum >= timeTresh:
-	$stat_hypno_msg = 'You want some sperm inside of you NOW! You have to talk to your therapist, immediately.'
+	$stat_hypno_msg += ' You want some sperm inside of you NOW! You have to talk to your therapist, immediately.'
 	$stat_hypno_tooltip = 'Talk to your therapist, immediately.'
 elseif hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum < timeTresh:
-	$stat_hypno_msg = 'You need to talk to your therapist. You feel unbalanced without your sessions.'
+	$stat_hypno_msg += ' You need to talk to your therapist. You feel unbalanced without your sessions.'
 	$stat_hypno_tooltip = 'Talk to your therapist.'
 elseif hypnoAddict > 0:
-	$stat_hypno_msg = 'You miss the feeling of sperm in your body, and you feel moody.'
+	$stat_hypno_msg += ' You miss the feeling of sperm in your body, and you feel moody.'
 	$stat_hypno_tooltip = 'Maybe visit your therapist.'
 else
-	$stat_hypno_msg = ''
-end
-
-if courthearing_date - 1 = daystart:
-	$stat_court_msg = 'You have a court hearing tomorrow between 07:00 and 11:00. The court is located in the city center of St. Petersburg.'
-	$stat_court_tooltip = 'Court hearing tomorrow (07:00 and 11:00).'
-elseif courthearing_date = daystart and hour < 11:
-	$stat_court_msg = 'You have a court hearing today between 07:00 and 11:00. The court is located in the city center of St. Petersburg.'
-	$stat_court_tooltip = 'Court hearing today (07:00 - 11:00).'
-else
-	$stat_court_msg = ''
+	$stat_hypno_tooltip = 'Maybe visit your therapist.'
 end
 
 if frost > 0 and frost < 6:

+ 6 - 0
locations/telefon.qsrc

@@ -391,6 +391,12 @@ if $ARGS[0] = 'SvetaCallsNPC':
 
 	'"Yes, I''m listening," says a voice from the speaker.'
 
+	act 'Ask to meet':
+		cla
+		'"Let''s meet up."'
+		act 'Continue':gt 'telefon', 'NPCCallsForDate', Call4Date["ContactIndex"]
+	end
+
 	if month > 5 and temper > 20 and sunWeather = 1:
 		act 'Invite to the park':
 			cla

+ 234 - 68
locations/therapist.qsrc

@@ -21,6 +21,91 @@ if $ARGS[0] = '':
 	'The room looks like a study room, appearing warm and inviting. There is a desk with a chair at one end of the room, but it appears to be seldom used. On the desk, there is an older <a href="exec: VIEW ''images/locations/pavlovsk/clinic/therapist/pavlovfamily.jpg''">photograph of Dr. Pavlov''s family</a> in which he appears to be about two decades younger.'
 	'"Come in, Miss <<$pcs_lastname>>! Please, tell me what can I help you with today?"'
 	gs 'stat'
+
+	gs 'therapist', 'hypnoGreet'
+end
+
+if $ARGS[0] = 'hypnoGreet':
+	if hypnoFlashGreet = 1 and hypnoAskFuck = 0:
+		act 'Show Dr. Pavlov your bare pussy':
+			cla
+			*clr
+			'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/showPussy<<rand(1,6)>>.jpg"></center>'
+			'You show your bare pussy to Dr. Pavlov and wait for his response.'
+			'...'
+			if pcs_horny >= 75:
+				'Miss <<$pcs_lastname>>, your pussy is very wet... How can I help you today?'
+			else
+				randomFlashGreetResponse = rand(1,3)
+				if randomFlashGreetResponse = 1:
+					'"Ah, very nice pussy Miss <<$pcs_lastname>> and what was it you wanted help with today?"'
+				elseif randomFlashGreetResponse = 2 and $pantyworntype ! 'none':
+					'"I see you didn''t wear panties today Miss <<$pcs_lastname>>, very good, and what was it you wanted help with today?"'
+				elseif randomFlashGreetResponse = 3:
+					'"Well done Miss <<$pcs_lastname>>, your pussy looks great, and what was it you wanted help with today?"'
+				end
+			end
+
+			gs 'therapist', 'therapyOptions'
+		end
+	elseif hypnoAskFuck = 1:
+		act 'Show Dr. Pavlov your bare pussy and ask him to fuck you':
+			cla
+			*clr
+			if rand(0,1) = 0:
+				'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/showPussy<<rand(1,1)>>.jpg"></center>'
+				'You kneel forward on the couch and present your bare pussy to Dr. Pavlov. You ask him to fuck you.'
+				''
+				'He wastes no time and quickly has his dick out, positioned to penetrate your pussy.'
+				act 'Get fucked by Dr. Pavlov':
+					cla
+					*clr
+					gs 'arousal', 'vaginal', 20, 'unaware'
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolDoggy<<rand(1,4)>>.mp4"></video></center>'
+					'Dr. Pavlov spends some time fucking your pussy.'
+					''
+					'After some time, he pulls out of you. "Alright Miss <<$pcs_lastname>>, lets get to your session. Sit down and tell me what you need."'
+
+					act 'Sit down':
+						cla
+						*clr
+						'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/sett.jpg"></center>'
+						''
+						gs 'therapist', 'therapyOptions'
+					end
+				end
+			else
+				'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/showPussy<<rand(3,6)>>.jpg"></center>'
+				'You lay back on the couch and present your bare pussy to Dr. Pavlov. You ask him to fuck you.'
+				''
+				'He wastes no time and quickly has his dick out, positioned to penetrate your pussy.'
+				act 'Get fucked by Dr. Pavlov':
+					cla
+					*clr
+					gs 'arousal', 'vaginal', 20, 'unaware'
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolFuckCouchBack<<rand(1,3)>>.mp4"></video></center>'
+					'Dr. Pavlov spends some time fucking your pussy.'
+					''
+					'After some time, he pulls out of you. "Alright Miss <<$pcs_lastname>>, lets get to your session. Sit down and tell me what you need."'
+
+					act 'Sit down':
+						cla
+						*clr
+						'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/sett.jpg"></center>'
+						''
+						gs 'therapist', 'therapyOptions'
+					end
+				end
+			end
+		end
+	else
+		gs 'therapist', 'therapyOptions'
+	end
+end
+
+if $ARGS[0] = 'therapyOptions':
 	if hypnoStage < 2:
 		act 'Change your mind and leave':gt $loc
 	end
@@ -98,8 +183,9 @@ if $ARGS[0] = '':
 			end
 		else
 			gs 'willpower', 'misc', 'resist', 'easy'
-			will_cost += (hypnoSchoolGirl * 10)
+			will_cost += (hypnoSchedule * 10)
 			will_cost += (hypnoStage * 10)
+			will_cost += hypnoTime * 3
 			if will_cost <= pcs_willpwr:
 				act 'Just talk (<<will_cost>> Willpower)':
 					cls
@@ -142,8 +228,9 @@ if $ARGS[0] = '':
 				end
 			else
 				gs 'willpower', 'misc', 'resist', 'easy'
-				will_cost += (hypnoSchoolGirl * 10)
+				will_cost += (hypnoSchedule * 10)
 				will_cost += (hypnoStage * 10)
+				will_cost += hypnoTime * 3
 				if will_cost <= pcs_willpwr:
 					act 'Just talk (<<will_cost>> Willpower)':
 						cls
@@ -186,8 +273,9 @@ if $ARGS[0] = '':
 			end
 		else
 			gs 'willpower', 'misc', 'resist', 'easy'
-			will_cost += (hypnoSchoolGirl * 10)
+			will_cost += (hypnoSchedule * 10)
 			will_cost += (hypnoStage * 10)
+			will_cost += hypnoTime * 3
 			if will_cost <= pcs_willpwr:
 				act 'Just talk (<<will_cost>> Willpower)':
 					cls
@@ -227,8 +315,9 @@ if $ARGS[0] = '':
 			end
 		else
 			gs 'willpower', 'misc', 'resist', 'easy'
-			will_cost += (hypnoSchoolGirl * 10)
+			will_cost += (hypnoSchedule * 10)
 			will_cost += (hypnoStage * 10)
+			will_cost += hypnoTime * 3
 			if will_cost <= pcs_willpwr:
 				act 'Just talk (<<will_cost>> Willpower)':
 					cls
@@ -447,13 +536,6 @@ if $ARGS[0] = 'hypno':
 					end
 				end
 				'While you do this, Dr. Pavlov opens up his pants and takes out his dick, slowly masturbating as he watches you. After a while, he stops and motions you closer to him.'
-				
-				if hypnoPanty = 1 and rand(1,2) = 1:
-					hypnoPanty = 2
-					'<br><font color="brown">"From now on, when you come in for therapy you will feel that it is common courtesy to show your therapist your bare pussy. You will think this is perfectly normal behavior. It is simply the polite thing to do.</font> Understand, <i>Cunt</i>?"'
-					'"Yes, <i>Master</i>."'
-					'"Good, now ..."<br>'
-				end
 
 				'"Come here, <i>Cunt</i>, <<$hypnoact>>"</font>'
 			end
@@ -1131,17 +1213,17 @@ if $ARGS[0] = 'hypnoFuck':
 	if PCloStyle2 = 4:
 		if randpos = 0:
 		!on your back
-			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolFuckCouchBack<<rand(1,2)>>.mp4"></video></center>'
+			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolFuckCouchBack<<rand(1,3)>>.mp4"></video></center>'
 			$hypnofuck = 'You walk to him, and he takes your hand and pushes you onto your back.<br>"You look beautiful. I will fuck your tight hole raw," he says. "You will enjoy it even if it''s painfull. Unfortunately, my wife lost all of her appeal, so I have to satisfy myself with your wet cunt."<br>He grabs your legs and gently pushes them apart then, kneeling between them, he forces his dick into your folds.'
 			$hypnofuck2 = 'He pounds deep into your body, and the hard surface does not make it comfortable for you. You wince a few times while his balls rhythmically slap your ass as he is laboring above you. You feel his sweat dripping down on your tits as you spread your legs as wide as possible to give him as much access as possible.'
 		elseif randpos = 1:
 		!on your back, couch
-			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolFuckCouchBack<<rand(1,2)>>.mp4"></video></center>'
+			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolFuckCouchBack<<rand(1,3)>>.mp4"></video></center>'
 			$hypnofuck = 'You walk to him, but he changes his mind.<br>"No, lie back on the couch, I will fuck you there."<br>Doing as he says, you watch him as he walks up to you and looks down on your naked body, examining you possessively.<br>"You have a beautiful body. Unfortunately, my wife lost all of her appeal, so I have to satisfy myself with girls like you."<br>He grabs your legs and gently pushes them apart then, kneeling between them, he forces his dick into your body.'
 			$hypnofuck2 = 'He pounds you deep into the couch, his balls rhythmically slapping your ass as he labors above you. You feel his sweat dripping down on your tits as you spread your legs as wide as possible to give him as much access as possible.'
 		elseif randpos = 2:
 		!kneel, couch
-			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolDoggy<<rand(1,3)>>.mp4"></video></center>'
+			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolDoggy<<rand(1,4)>>.mp4"></video></center>'
 			$hypnofuck = '"Stop, just kneel on the couch. I want to fuck you from behind."<br>You turn back, kneeling on the couch and placing your hands on the backrest, and wait for <i>Master</i> to take your body. You soon feel his hands touching your breasts, your neck, your back and your legs, playing a little with your pussy.<br>"Good girl, stay like this."<br>He pushes his fingers into your pussy, playing with your clit for a few minutes, causing you to get aroused.'
 			$hypnofuck2 = 'You cry out from the pain as he starts to fuck you, fast, deep and hard, without any regard for the fact that his girth is massive and you need some adjustment time.'
 		else
@@ -1226,6 +1308,7 @@ if $ARGS[0] = 'hypnoFuck':
 		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampie<<rand(1,3)>>.mp4"></video></center>'
 		'"Oh yes, my little <i>Cunt</i>, I am so close! I will blow a huge wad of sperm in your tight pussy! And you won''t even know about it!"<br><<$therapistDoneFuckingDesc0>> <<$therapistDoneFuckingDesc1>> <<$therapistDoneCumDesc1>>'
 		'Finally he is done, and he pulls out of you. <<$therapistDoneFuckingDesc3>>'
+		therapistFuckedPussy = 1
 		therapistFuckedPussyStage += 1
 		act 'Continue':
 			cls
@@ -1290,15 +1373,17 @@ if $ARGS[0] = 'hypnoDress':
 	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.</font>'
-	elseif $pantyworntype = 'none' and hypnoPanty < 1:
-		'"Get dressed, <i>Cunt</i>. I see you didn''t wear underwear. Very good, you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
+	elseif $pantyworntype = 'none' and hypnoPanty > 0:
+		'"Get dressed, <i>Cunt</i>. I see you didn''t wear underwear. Very good."'
 		'He watches you getting dressed with a small smile on his face.'
-		hypnoPanty = 1
 		bedPanty = 2
 	elseif $pantyworntype ! 'none' and hypnoPanty < 1:
 		'"Get dressed, <i>Cunt</i>, but forget the underwear. You didn''t wear any when you came, and you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
 		'He watches you getting dressed with a small smile on his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
-		gs 'underwear', 'remove'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/removePanties.jpg"></center>'
+		gs 'panties', 'dispose'
+
+		'He chucks your panties into the garbage.'
 		hypnoPanty = 1
 		bedPanty = 2
 	else
@@ -1319,19 +1404,6 @@ if $ARGS[0] = 'hypnoEnd':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
 	'<font color=brown>"All right, <i>Cunt</i>, now listen to me. You will not remember any of this. You do not feel any discomfort from any of our activities, and you do not notice anything related to what happened here. No taste, no smell, no aches, no fluids. Nothing. You will not respond to Cunt while you are Awake, just while you are Under. You will wake up feeling good, but responsive to all of my commands. Understand, <i>Cunt</i>?"</font>'
 	'"Yes, <i>Master</i>."'
-	if therapistFuckedPussyStage = 1:
-		therapistFuckedPussyStage += 1
-		tabletki = 1
-		tabletkiold = 0
-		tabletkifert = 1
-		tabletkirej = 0
-		tabletkifake = 0
-		tabletkisug = 0
-		tabletkicheck = 1
-		'<font color=brown>"Good. Although you won''t consciously know my cum is inside of you, you will subconsciously feel it. Everytime I cum inside of you, your body will crave my seed more. You will keep your pussy clenched so my cum doesn''t leak out."</font>'
-		'<font color=brown>Also, take these." He hands you a package of pills. "You will take one every day. If you have any birth control pills, you will throw them away. You won''t think about buying more. You won''t notice anything wrong with this and you will think these are simply normal birth control pills. Understand, <i>Cunt</i>?"</font>'
-		'"Yes, <i>Master</i>."'
-	end
 	if therapistFuckedPussyStage > 1 and pillsleft[5] < 5 and tabletkifert ! 1:
 			'<font color=brown>"You are probably low on pills by now." he hands you a new box of unknown pills. "Continue taking them just like before, Understand, <i>Cunt</i>?"</font>'
 			'"Yes, <i>Master</i>."'
@@ -1344,13 +1416,6 @@ if $ARGS[0] = 'hypnoEnd':
 			tabletkicheck = 1
 	end
 
-	if hypnoStage = 3 and hypnoSchoolGirl = 0 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0:
-		''
-		'Now that I''ve sufficiently broken your resistence, it''s time we have you come in before school. <font color=brown>"From now on, you will come directly to my office before school and you will feel that you <b>need</b> my hypnotism treatment.</font> And soon, I will have you walking in to school with your pussy full of my cum."'
-		''
-		hypnoSchoolGirl = 1
-	end
-
 	'"Now, you are sitting in the black room. Stand up, and start walking through the door. As you close the door of the black room, you forget..."'
 	'...'
 	'...'
@@ -1402,8 +1467,9 @@ if $ARGS[0] = 'hypnoEnd':
 			'The doctor smiles jovially, his hand on your waist as he slowly escorts you out of his office. Something seems a bit strange about this, but you figure it''s nothing.'
 		elseif pc_hypno_rand_end = 4:
 			'The doctor smiles jovially, his hand on your hip as he slowly escorts you out of his office. You aren''t sure why, but something about what''s happening right now is strange, but you can''t remember why.'
-		end
-			'"Please, visit me again if you have any further problems, I will be glad to help!" says Dr. Pavlov as a goodbye, taking your hands in his, patting them, then closing his door.'
+		End
+		''
+		'"Please, visit me again if you have any further problems, I will be glad to help!" says Dr. Pavlov as a goodbye, taking your hands in his, patting them, then closes his door.'
 		'What a nice old man, you think to yourself.'
 	else
 		hypnoAddict = 2
@@ -1416,6 +1482,7 @@ if $ARGS[0] = 'hypnoEnd':
 		'"Miss <<$pcs_lastname>>, how do you feel right now?"'
 		'Without hesitation, you reply, "I feel wonderful, Dr. Pavlov."'
 		'"Good, just as expected," nods the doctor as he escorts you out of his office.'
+		''
 		if therapistFuckedMouth = 1:
 			'You certainly do not notice that your mouth tastes like sperm. In fact, something tastes great.'
 		else
@@ -1473,33 +1540,137 @@ if $ARGS[0] = 'hypnoEnd':
 	if therapistFuckedPussy > 0 and rand(1,2) = 1:
 		'A bit of cum dribbles from your well fucked cunt. You involuntarily clench your pussy; your body trying to keep more from leaking out.'
 	end
-	if cameFromSchool = 0:
-		act 'Leave':gt $loc
-	else
-		act 'Leave':gt 'therapist', 'toSchool'
-	end
+
+	act 'Leave':gt $loc
 end
 
-if $ARGS[0] = 'beforeSchool':
-	cameFromSchool = 1
-	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/schoolWalk.mp4"></video></center>'
-	''
-	'You were heading to school, but realized you need to stop by the clinic to see your therapist first.'
+if $ARGS[0] = 'hypnoRandom':
+	newHypno = 0
+	! sveta will now have scheduled sessions
+	if hypnoStage >= 3 and hypnoSchedule = 0:
+		cla
+		*clr
+		newHypno = 1
+		''
+		'Now that I''ve sufficiently broken your resistence, it''s time we set you up on a more regular schedule. <font color=brown>"From now on, you will feel that you <b>need</b> my hypnotism treatment. You believe that you have scheduled therapy sessions every day at 18:00.</font>"'
+		''
+		hypnoSchedule = 1
+	end
+	if therapistFuckedPussyStage = 1:
+		cla
+		*clr
+		newHypno = 1
+		therapistFuckedPussyStage += 1
+		tabletki = 1
+		tabletkiold = 0
+		tabletkifert = 1
+		tabletkirej = 0
+		tabletkifake = 0
+		tabletkisug = 0
+		tabletkicheck = 1
+		'<font color=brown>"Good. Although you won''t consciously know my cum is inside of you, you will subconsciously feel it. Everytime I cum inside of you, your body will crave my seed more. You will keep your pussy clenched so my cum doesn''t leak out."</font>'
+		'<font color=brown>Also, take these." He hands you a package of pills. "You will take one every day. If you have any birth control pills, you will throw them away. You won''t think about buying more. You won''t notice anything wrong with this and you will think these are simply normal birth control pills. Understand, <i>Cunt</i>?"</font>'
+		'"Yes, <i>Master</i>."'
+	end
+	! sveta will now hate wearing panties.
+	if hypnoPanty ! 1:
+		cla
+		*clr
+		newHypno = 1
+		'"Listen <i>Cunt</i><font color=brown>You do not like to wear panties. You enjoy the thought that people may notice that you do not wear them, maybe catch a glimpse of your naked pussy or ass. You won''t even think of putting them on anymore."'
+		if $pantyworntype ! 'none':
+			'He commands you to strip off your panties and hand them to him. You do so without question.'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/removePanties.jpg"></center>'
+			gs 'panties', 'dispose'
 
-	act 'Walk to the clinic':gt 'therapist'
-end
+			'He chucks your panties into the garbage.'
+		else
+			'"I see you are already bare. Good. <font color=brown>Keep it that way.</font>"'
+		end
 
-if $ARGS[0] = 'toSchool':
-	cameFromSchool = 0
-	if therapistFuckedMouth = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/schoolWalk.mp4"></video></center>'
-	else 
-		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/toSchool.mp4"></video></center>'
+		hypnoPanty = 1
+		bedPanty = 2
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
 	end
-	''
-	'Feeling refreshed, you make your way back to school.'
+	! sveta will now hate wearing bras.
+	if hypnoBra ! 1 and rand(1,2) = 1:
+		cla
+		*clr
+		newHypno = 1
+		'"Listen <i>Cunt</i><font color=brown>You do not like to wear bras. You enjoy the thought that people may notice that you do not wear them, maybe see the outline of your nipples. You won''t even think of putting them on anymore."'
+		if $pantyworntype ! 'none':
+			'He commands you to strip off your bra and hand it to him. You do so without question.'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/removePanties.jpg"></center>'
+			gs 'bras', 'dispose'
+
+			'He chucks your bra into the garbage.'
+		else
+			'"I see you are already not wearing one. Good. <font color=brown>Keep it that way.</font>"'
+		end
 
-	act 'Walk to school':gt 'gschool_grounds', 'main'
+		hypnoBra = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	! sveta will now think it''s common courtesy to show her pussy to pavlov as a greeting.
+	if hypnoFlashGreet ! 1 and rand(1,2) = 1:
+		cla
+		*clr
+		'<br><font color="brown">"From now on, when you come in for therapy you will feel that it is common courtesy to show me your bare pussy. You will think this is perfectly normal behavior. It is simply the polite thing to do. Any comments I make about your bare pussy will also be normal.</font> Understand, <i>Cunt</i>?"'
+		'"Yes, <i>Master</i>."'
+		'"Good ..."<br>'
+		newHypno = 1
+		hypnoFlashGreet = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	! sveta now thinks it''s normal for pavlov to touch her innapropriatly
+	if hypnoTouchWhenever ! 1 and rand(1,2) = 1:
+		cla
+		*clr
+		newHypno = 1
+		hypnoTouchWhenever = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	! sveta will now think it''s normal to give pavlov a kiss as goodbye
+	if hypnoKissGoodbye ! 1 and rand(1,2) = 1:
+		cla
+		*clr
+		newHypno = 1
+		hypnoKissGoodbye = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	! sveta will have a much harder time cumming without pavlov''s cock
+	if hypnoHardToCum ! 1:
+		cla
+		*clr
+		newHypno = 1
+		hypnoHardToCum = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	! sveta will ask pavlov to fuck her instead of therapy
+	if hypnoAskFuck ! 1 and hypnoHardToCum = 1 and hypnoKissGoodbye = 1 and hypnoTouchWhenever = 1 and hypnoFlashGreet = 1 and hypnoNoBra = 1:
+		cla
+		*clr
+		newHypno = 1
+		hypnoAskFuck = 1
+		act 'Continue':
+			gt 'therapist', 'hypnoEnd'
+		end
+	end
+	if newHypno = 0:
+		gt 'therapist', 'hypnoEnd'
+	end
 end
 
 if $ARGS[0] = 'hypnoPerv':
@@ -1637,13 +1808,8 @@ if $ARGS[0] = 'hypnoPerv':
 		! TODO something else should happen here if he already made you his slave. Right now it just flips back to the end so you can continue.
 		gt 'therapist', 'hypnoEnd'
 	else
-		if cameFromSchool = 0:
-			$numHypnoProst = 'some guys'
-			numHypnoProst = rand(4,6)
-		else
-			$numHypnoProst = 'a guy'
-			numHypnoProst = 1
-		end
+		$numHypnoProst = 'some guys'
+		numHypnoProst = rand(4,6)
 		'"Today, you will make me some money. Go out to the gas station and ask men to fuck you for money. A girl like you probably isn''t worth much, so just take whatever they are willing to pay. Return here with the money once you''ve fucked <<$numHypnoProst>>. Understand, <i>Cunt</i>?"'
 		'"Yes, <i>Master</i>." You turn and start to leave the room completely naked.'
 		'"Stop! You stupid bitch. If you walk out there naked you''ll just end up in jail and I''ll make nothing. Here put this on." He hands you a small bundle of clothes and some high heels.'

+ 85 - 0
locations/therapist_reminder.qsrc

@@ -0,0 +1,85 @@
+# therapist_reminder
+cla
+
+if $ARGS[0] = '':
+    reminderCount += 1
+    '<center><img <<$set_imgh>> src="images/pc/reactions/forget.jpg"></center>'
+    ''
+    'You remember that you have an appointment with your therapist today at 18:00. It''s already <<hour>>:<<minut>>. You should go now.'
+    if reminderFreebee < 4:
+        gs 'willpower', 'misc', 'resist', 'easy'
+        will_cost += (hypnoTime * 2)
+        if will_cost <= pcs_willpwr:
+            act 'Return to what you were doing (<<will_cost>> Willpower)':
+                cla
+                pcs_mood -= rand(10,20)
+                gs 'stat'
+                '<center><img <<$set_imgh>> src="images/pc/reactions/sad.jpg"></center>'
+                ''
+                'You feel bad about missing your appointment, but you have other things to do now. You tell yourself that you''ll see him again as soon as possible.'
+                act 'Continue':
+                    gt '<<$menu_loc>>', '<<$menu_arg>>'
+                end
+            end
+        else
+            act 'Return to what you were doing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+        end
+    else
+        act 'Return to what you were doing (<<will_cost>> Willpower)':
+            cla
+            reminderMult = reminderCount
+            if reminderCount > 10: reminderMult = 10
+            reminderMoodCostLow = func('shortgs','sqrt', 30*reminderMult)
+            reminderMoodCostHigh = func('shortgs','sqrt', 90*reminderMult)
+            pcs_mood -= rand(reminderMoodCostLow, reminderMoodCostHigh)
+            gs 'stat'
+            '<center><img <<$set_imgh>> src="images/pc/reactions/sad.jpg"></center>'
+            ''
+            'You feel bad about missing your appointment, but you have other things to do now. You tell yourself that you''ll see him again as soon as possible.'
+            act 'Continue':
+                gt '<<$menu_loc>>', '<<$menu_arg>>'
+            end
+        end
+    end
+    act 'Go see your therapist':
+        if $region = 'city_center':
+            minut += 30
+        elseif $region = 'city_industrial':
+            minut += 45
+        elseif $region = 'city_island':
+            minut += 45
+        elseif $region = 'city_lake':
+            minut += 45
+        elseif $region = 'city_park':
+            minut += 45
+        elseif $region = 'city_redlight':
+            minut += 45
+        elseif $region = 'city_residential':
+            minut += 45
+        elseif $region = 'gad_forest':
+            minut += 45
+        elseif $region = 'gad_village':
+            minut += 30
+        elseif $region = 'puskin':
+            minut += 35
+        elseif $region = 'pav_commercial':
+            minut += 5
+        elseif $region = 'pav_lake':
+            minut += 15
+        elseif $region = 'pav_park':
+            minut += 10
+        elseif $region = 'pav_residential':
+            minut += 10
+        else
+            minut += 5
+        end
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/schoolWalk.jpg"></center>'
+        'You walk to your therapist''s office.'
+
+        act 'Continue':
+            gt 'therapist'
+        end
+    end
+end
+
+--- therapist_reminder ---------------------------------

二進制
tools/Player-video/plugins/plugins.dat