Browse Source

[added] Therapist hotel visit that was submitted befoer feature lock

Kevin_Smarts 1 year ago
parent
commit
d976acda84
4 changed files with 201 additions and 1 deletions
  1. 1 0
      glife.qproj
  2. 20 0
      locations/pav_hotel.qsrc
  3. 62 1
      locations/therapist.qsrc
  4. 118 0
      locations/therapist_hotel.qsrc

+ 1 - 0
glife.qproj

@@ -1018,6 +1018,7 @@
 		<Location name="pav_clinic"/>
 		<Location name="therapist"/>
 		<Location name="therapist_reminder"/>
+		<Location name="therapist_hotel"/>
 		<Location name="gevent"/>
 		<Location name="pav_park"/>
 		<Location name="pav_park_sex"/>

+ 20 - 0
locations/pav_hotel.qsrc

@@ -134,6 +134,26 @@ else
 	end
 end
 
+if therapist_key = 2 and week = 6 and hour > 19 and pcs_traits['commando_lvl'] = 3 and therapist_key[1] ! daystart:
+	therapist_key[1] = daystart
+	gs 'willpower', 'misc', 'resist', 'medium'
+
+	act 'Visit the therapist': gt 'therapist_hotel', 'start'
+
+	if will_cost <= pcs_willpwr:
+		act 'Don''t visit the therapist':
+			gs 'willpower', 'pay', 'medium'
+			gt 'pav_hotel'
+		end
+	else
+		act 'Don''t visit the therapist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+	exit
+end
+
+
+
+
 if hour >= 12 and hour < 20 and proshotelopen = 1: '<a href="exec:gt ''pav_hotel'',''Pavlin''">Pavlin</a> is sitting in the lobby looking around for fresh prey.'
 
 if hour >= 12 and hour <= 13 and GermanQW > 0: 'Next to the reception desk, you see a door labeled <a href="exec:minut += 1 & gt ''pav_hotelAdmin''">"Administration"</a>. That must be where the hotel manager works. The door is currently open.'

+ 62 - 1
locations/therapist.qsrc

@@ -1707,7 +1707,68 @@ if $ARGS[0] = 'hypnoRandom':
 			'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/schoolBlow<<rand(3,4)>>.mp4"></video></center>'
 			'As instructed, you use your mouth to clean off <i>Master''s</i> cock.'
 
-			act 'Continue':
+			if therapist_key = 0:
+				act 'Continue':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/sittingClothed.jpg"></center>'
+					therapist_key = 1
+					'You finish getting dressed and the doctor hands you something. It''s a keychain with a single key, a tiny bunny plush, and a hotel marker. "I want you to show up to this room every Saturday night. There you will find me, waiting for you. Once a week, you will be my wife. You will do whatever I ask of you and you will do it without question. This will all be automatic for you. You will not be under hypnosis for this and you will do it because you WANT to do it" he says. "Soon, you will be my wife for real and when that day comes, you must know what is expected of you, Understand?" he states.'
+
+					act 'Yes, Master':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/sittingClothed.jpg"></center>'
+						therapist_key = 2
+						'"I understand, Master, I will be your wife every Saturday night and into Sunday morning"'
+						'"Thats my girl, Heres the key, See you soon" he then places a kiss on your lips. "But remember, if you come to the clinic, you will go under upon seeing me and wont remember anything" You nod as you walk out the door.'
+						act 'Continue':
+						gt 'therapist', 'hypnoEnd'
+					end
+
+					gs 'willpower', 'misc', 'resist', 'hard'
+					[Willpower Check] [No, Master]
+
+					if will_cost <= pcs_willpwr:
+						act 'No, master':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/sittingClothed.jpg"></center>'
+							gs 'willpower', 'pay', 'hard'
+							'"Thats a pitty, Well, I will ask you again in time, lets hope you say yes then" he says and turns to his desk to write something down before standing up to show you to the door, giving you a kiss and groping as you leave.'
+							act 'Continue':
+							gt 'therapist', 'hypnoEnd'
+						end
+					else
+						act 'No, master (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+				end
+			elseif therapist_key = 1:
+				'You finish getting dressed and the doctor asks you something that you think you have heard before, "I want you to show up to this room every Saturday night. There you will find me, waiting for you. Once a week, you will be my wife. You will do whatever I ask of you and you will do it without question. This will all be automatic for you. You will not be under hypnosis for this and you will do it because you WANT to do it" he says. "Soon, you will be my wife for real and when that day comes, you must know what is expected of you, Understand?" he states.'
+				act 'Yes, Master':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/sittingClothed.jpg"></center>'
+					therapist_key = 2
+					'"I understand, Master, I will be your wife every Saturday night and into Sunday morning"'
+					'"Thats my girl, Heres the key, See you soon" he then places a kiss on your lips. "But remember, if you come to the clinic, you will go under upon seeing me and wont remember anything" You nod as you walk out the door.'
+					act 'Continue':
+					gt 'therapist', 'hypnoEnd'
+				end
+
+				gs 'willpower', 'misc', 'resist', 'hard'
+				[Willpower Check] [No, Master]
+
+				if will_cost <= pcs_willpwr:
+					act 'No, master':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/sittingClothed.jpg"></center>'
+						gs 'willpower', 'pay', 'hard'
+						'"Thats a pitty, Well, I will ask you again in time, lets hope you say yes then" he says and turns to his desk to write something down before standing up to show you to the door, giving you a kiss and groping as you leave.'
+						act 'Continue':
+						gt 'therapist', 'hypnoEnd'
+					end
+				else
+					act 'No, master (<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 'Continue':
 				gt 'therapist', 'hypnoEnd'
 			end
 		end

+ 118 - 0
locations/therapist_hotel.qsrc

@@ -0,0 +1,118 @@
+# therapist_hotel
+
+if $ARGS[0] = 'start':
+	CLOSE ALL
+	$loc = 'therapist_hotel'
+	$loc_arg = 'start'
+	$menu_loc = 'therapist_hotel'
+	$menu_arg = 'start'
+	menu_off = 0
+	$location_type = 'private_indoors'
+	minut+= 5
+
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/room.jpg"></center>'
+	'Upon entering the room you hear the shower running which gives you a moment to look around the large suite. To start off, it looks lived in. There is a small kitchen in the corner with a mini fridge and a small portable stove with a tea kettle on it letting off some steam, letting the owner of the room know the water is soon to be ready. There is a laptop, open, on the desk with lots of papers lying around it, as if someone is transcribing them into digital form. There is one book on the bed, open and face down, as if someone was reading it.'
+
+	'Suddenly the water in the shower stopped!'
+
+	act 'Wait': gt 'therapist_hotel', 'event'
+	gs 'willpower', 'misc', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'RUN!!!':
+			gs 'willpower', 'pay', 'medium'
+			gt 'pav_hotel'
+		end
+	end
+end
+
+if $ARGS[0] = 'event':
+	*clr & cla
+	menu_off = 1
+	minut+= 2
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/arrive.jpg"></center>'
+	'When the man walks out of the shower in a heavy bathrobe, your mind becomes blank and you enter the black room.' 'The Therapist walks over to you to check your panties as he makes sure you are not wearing any. Once he realizes this, he moves you over to the bed. "Welcome to my home," he says. "I''ve lived here since I divorced my wife, just waiting for the divorce to become official." He sits down in front of you. "So, when that happens, you will be my wife, but we need to make you want that, so this is the next part of your training." He continues.'
+	act 'Continue':
+		minut+= 2
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.room.better1.jpg"></center>'
+		'"Every Saturday, you will show up here and we will do some more training. You can still meet me at the clinic but here?" He smiles and moves in to kiss you. "You will be trained to be my wife, in all facets. Now, please take a shower and come out naked when you are done.'
+		act 'Continue':
+			minut+= 2
+			*clr & cla
+			$lastwornclothingtype['therapist'] = $clothingworntype
+			lastwornclothingnumber['therapist'] = clothingwornnumber
+			$lastwornpantytype['therapist'] = $pantyworntype
+			lastwornpantynumber['therapist'] = pantywornnumber
+			$lastwornbratype['therapist'] = $braworntype
+			lastwornbranumber['therapist'] = brawornnumber
+			dynamic $showerdin
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/naked.jpg"></center>'
+			'After you shower, you walk out of the bathroom and stand naked before him. "Good, a clean wife makes a happy husband" he says and walks up to you and kisses you while fondling your chest. "Now, your first order, When you enter this room, you will willingly do what I want without question, do you understand, wife?" he says changing your name from Cunt to Wife.'
+			act 'Yes, Master': gt 'therapist_hotel', 'post_shower'
+
+			gs 'willpower', 'misc', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'No, Master':
+					minut+= 5
+					gs 'willpower', 'pay', 'medium'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/thrapist/pavlov.jpg"></center>'
+					'"Then get out of here until you do"'
+					'He guides you out of the door and closes it behind you.'
+					act 'Continue': gt 'pav_hotel'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'post_shower':
+	minut+= 2
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/bj.jpg"></center>'
+	'"Let''s start off slow. As your husband, you have to keep me calm," he points to under the desk. When he says "get under there", you move under the desk and look at him before he sits in his chair and imprisons you. You just sit there for what feels like a couple of hours before he opens his robe and moves your face to his cock. Knowing what he wants you start to suck on his cock. You only hear, "Don''t stop, even if i cum, you keep my cock in your mouth" and he goes back to whatever he''s doing.'
+	gs 'arousal', 'bj', 60, 'sub'
+	gs 'stat'
+	act 'Continue':
+		minut+= 2
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/sex.jpg"></center>'
+		'You spend most of the day here, getting cum in your mouth and throat while he works. Once he pulls his cock from your mouth, and then pulls you from under the desk, you can see its already night time. "Get on the bed, on your back, I want to breed you as a reward tonight before we sleep"'
+		gs 'arousal', 'bj', 120, 'sub'
+		gs 'stat'
+		act 'Thank you, Master':
+			minut+= 2
+			*clr & cla
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/thrapist/sex2.jpg"></center>'
+			'You stand up and move to the bed and looking up at your therapist as he climbs on top of you and pushes himself inside you. He has his way with your body, fondling your chest, sucking your nipples, kissing and sucking on your neck. He enjoys your body until he cums deep inside you. Unlike back in the clinic, he stays inside you as he pulls a blanket over you and himself before falling asleep.'
+			gs 'arousal', 'vaginal', 20, 'sub'
+			gs 'cum_call', 0, 'A186', 2, 0, 15000, 60
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Sleep':
+				gs 'sleep', 'simple'
+				gt 'therapist_hotel', 'morning'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'morning':
+	dynamic $showerdin
+	gs 'clothing', 'wear', $lastwornclothingtype['therapist'], lastwornclothingnumber['therapist']
+	gs 'panties', 'wear', $lastwornpantytype['therapist'], lastwornpantynumber['therapist']
+	gs 'bras', 'wear', $lastwornbratype['therapist'], lastwornbranumber['therapist']
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.room.better1.jpg"></center>'
+	'You wake up alone in a hotel room. You are naked and dripping of cum. You ask yourself, "What did I do last night?" after the hypnosis ends. You only remember sleeping with someone and having sex with them, but you have no idea who. You finally use the shower in the room, dress in what you wore the day before and leave the room.'
+end
+
+--- therapist_hotel ---------------------------------
+