Browse Source

[fixed] picture doesn't change during hypnotherapy

Ethan99 10 months ago
parent
commit
6ea810d453

+ 1 - 1
locations/getrandom.qsrc

@@ -1,4 +1,4 @@
-# getrandom
+# getrandom
 !! ARGS 0 - execution code flag
 
 startindex = iif(count, count + 1, 0)

+ 1 - 1
locations/music_actions.qsrc

@@ -1,4 +1,4 @@
-#music_actions
+# music_actions
 
 if $ARGS[0] = 'music_icon':
     !! Everywhere

+ 1 - 1
locations/road_prostitution.qsrc

@@ -1,4 +1,4 @@
-#road_prostitution
+# road_prostitution
 $location_type = 'public_outdoors'
 
 if $ARGS[0] = 'work':

+ 2 - 1
locations/tabhead.qsrc

@@ -1,4 +1,4 @@
-#tabhead
+# tabhead
 '<center><b><table width="90%" cellspacing="0" cellpadding="0" valign="top"><tr>'
 tabscount = ARRSIZE('$tabsname')
 trwidth = 90 / tabscount
@@ -19,4 +19,5 @@ killvar 'tabscount'
 killvar 'trwidth'
 killvar '$tabsname'
 killvar '$tabsaction'
+
 --- tabhead ---------------------------------

+ 52 - 73
locations/therapist.qsrc

@@ -12,9 +12,10 @@ $location_type = 'public_indoors'
 thingsTheTherapistLikes = 0
 if age < 18:thingsTheTherapistLikes += 1
 if $start_loc = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:thingsTheTherapistLikes += 1
-$HypnoStage[0] = 'firstHypnoStage'
-$HypnoStage[1] = 'secondHypnoStage'
-$HypnoStage[2] = 'thirdHypnoStage'
+$hypnoStage[0] = 'firstHypnoStage'
+$hypnoStage[1] = 'secondHypnoStage'
+$hypnoStage[2] = 'thirdHypnoStage'
+$waitImg = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
 
 if $ARGS[0] = '':
 	$cumdesciption3 = ''
@@ -138,15 +139,13 @@ if $ARGS[0] = 'hypnoGreet':
 				elseif pcs_horny >= 90:
 					'Miss <<$pcs_lastname>>, your pussy is soaking wet... How can I help you today?'
 				else
-					randomFlashGreetResponse = rand(1,3)
-					if randomFlashGreetResponse = 1:
-						'"Ah, very nice pussy Miss <<$pcs_lastname>>. What was it you wanted help with today?"'
-					elseif randomFlashGreetResponse = 2 and $pantyworntype ! 'none':
+					if $pantyworntype = 'none':
 						'"I see you didn''t wear panties today Miss <<$pcs_lastname>>. Very good. What was it you wanted help with today?"'
-					elseif randomFlashGreetResponse = 3:
-						'"Well done Miss <<$pcs_lastname>>, your pussy looks great. What was it you wanted help with today?"'
 					else
-						'"You are well mannered Miss <<$pcs_lastname>>. What can I help you with?"'
+						$randomArr = '"Ah, very nice pussy Miss <<$pcs_lastname>>. What was it you wanted help with today?"'
+						$randomArr = '"Well done Miss <<$pcs_lastname>>, your pussy looks great. What was it you wanted help with today?"'
+						$randomArr = '"You are well mannered Miss <<$pcs_lastname>>. What can I help you with?"'
+						func('getrandom')
 					end
 				end
 				gs 'therapist', 'therapyOptions'
@@ -198,16 +197,12 @@ if $ARGS[0] = 'therapyOptions':
 				'<center><img src="images/locations/pavlovsk/clinic/therapist/showPussyForSex<<rand(1,2)>>.jpg"></center>'
 				'You kneel forward on the couch and present your bare pussy to Dr. Pavlov before asking 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':
-					gt 'therapist', 'fuck', 'back'
-				end
+				act 'Get fucked by Dr. Pavlov': gt 'therapist', 'fuck', 'back'
 			else
 				'<center><img src="images/locations/pavlovsk/clinic/therapist/showPussyForSex<<rand(3,6)>>.jpg"></center>'
 				'You lay back on the couch and present your bare pussy to Dr. Pavlov before asking 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':
-					gt 'therapist', 'fuck', 'kneel'
-				end
+				act 'Get fucked by Dr. Pavlov': gt 'therapist', 'fuck', 'kneel'
 			end
 		end
 	end
@@ -426,7 +421,7 @@ if $ARGS[0] = 'hypno':
 			$dick_girth = 'massive'
 			if hypnoStage < 3:
 				'"Now... let''s work on breaking you, <i>Cunt</i>."'
-				act 'Continue': gt 'therapist', $HypnoStage[hypnoStage]
+				act 'Continue': gt 'therapist', $hypnoStage[hypnoStage]
 			else
 				'"Now take off your clothes."</font>'
 				act 'Take off your clothes':
@@ -447,25 +442,25 @@ if $ARGS[0] = 'hypno':
 						'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>'
+							$waitImg
 							'"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>'
+							$waitImg
 							'"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"'
 							act 'Yes, <i>Master</i>':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+								$waitImg
 								'"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
 							act 'Yes, <i>Master</i>':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+								$waitImg
 								gs 'willpower', 'misc', 'resist', 'easy'
 								will_cost += (hypnoSchedule * 10)
 								will_cost += (hypnoStage * 10)
@@ -489,7 +484,7 @@ end
 
 if $ARGS[0] = 'hypno2':
 	*clr & cla
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+	$waitImg
 	gs 'therapist', 'hypno3'
 end
 
@@ -583,68 +578,60 @@ if $ARGS[0] = 'firstHypnoStage':
 		act 'Continue':
 			*clr & cla
 			hypnoStage = 1
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+			$waitImg
 			'When you finish, Dr. Pavlov tells you to sit back on the couch. "Now I''m going to ask you a series of questions and you will answer them with complete honesty. You will give your answer first and finish by addressing me as Master. First question. How old are you?"'
 			act 'I''m <<age>> years old, <i>Master</i>':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+				$waitImg
 				if age < 18:
 					'"<<age>>? Great! I love them young. Are you a virgin?"'
 					if stat['think_virgin'] = 1:
 						act 'Yes, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'"Very Good, Cunt. Untouched girls are wasted on boys these days. You must be in school right?"'
 							if $start_loc = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 								act 'Yes, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"A virgin school girl, very rare these days. I''m going to enjoy you, Cunt. I will fill every hole you have, everyday. You will bear my children and you won''t even know how it happened. You will think they belong to your boyfriend, if you have one." He caresses your leg as he says this. "This will be all for today, cunt. You may dress now" He commands.'
-									act 'Dress':
-										gt 'therapist', 'hypnoDress'
-									end
+									act 'Dress': gt 'therapist', 'hypnoDress'
 								end
 							else
 								act 'No, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"No? So young and not in school? You really do need therapy."'
 									'"This is enough for today. Dress now, <i>Cunt</i>"'
-									act 'Dress':
-										gt 'therapist', 'hypnoDress'
-									end
+									act 'Dress': gt 'therapist', 'hypnoDress'
 								end
 							end
 						end
 					else
 						act 'No, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'"Such a shame, Are you enrolled in school?"'
 							if $start_loc = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 								act 'Yes, <i>Master</i>':
 									cla
 									*clr
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"Well... I''m going to enjoy you <i>Cunt</i>. I will fill every hole of your young school girl body. You will bear my child and you won''t even know how it happened." He caresses your leg as he says this.'
 									act 'Continue':
 										*clr & cla
-										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+										$waitImg
 										'"This is enough for today. Dress now, <i>Cunt</i>"'
-										act 'Dress':
-											gt 'therapist', 'hypnoDress'
-										end
+										act 'Dress': gt 'therapist', 'hypnoDress'
 									end
 								end
 							else
 								act 'No, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"No? So young, sexually active and not in school? You really do need therapy."'
 									'"This is enough for today. Dress now, <i>Cunt</i>"'
-									act 'Dress':
-										gt 'therapist', 'hypnoDress'
-									end
+									act 'Dress': gt 'therapist', 'hypnoDress'
 								end
 							end
 						end
@@ -654,63 +641,55 @@ if $ARGS[0] = 'firstHypnoStage':
 					if stat['think_virgin'] = 1:
 						act 'Yes, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'Very good, a fresh young virgin. Are you in school?'
 							if $start_loc = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 								act 'Yes, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"Well... I''m going to enjoy you <i>Cunt</i>. Soon I will fill every hole of your virgin school girl body. You will bear my child you and won''t even know how it happened." He caresses your leg as he says this.'
 									act 'Continue':
 										*clr & cla
-										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+										$waitImg
 										'"This is enough for today. Dress now, <i>Cunt</i>"'
-										act 'Dress':
-											gt 'therapist', 'hypnoDress'
-										end
+										act 'Dress': gt 'therapist', 'hypnoDress'
 									end
 								end
 							else
 								act 'No, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"No? Hmm."'
 									'"This is enough for today. Dress now, <i>Cunt</i>"'
-									act 'Dress':
-										gt 'therapist', 'hypnoDress'
-									end
+									act 'Dress': gt 'therapist', 'hypnoDress'
 								end
 							end
 						end
 					else
 						act 'No, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'No? That''s too bad. Are you in school?'
 							if $start_loc = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 								act 'Yes, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"Well... I''m going to enjoy you <i>Cunt</i>. Soon I will fill every hole of your virgin school girl body. You will bear my child you and won''t even know how it happened." He caresses your leg as he says this.'
 									act 'Continue':
 										cla
 										*clr
-										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+										$waitImg
 										'"This is enough for today. Dress now, <i>Cunt</i>"'
-										act 'Dress':
-											gt 'therapist', 'hypnoDress'
-										end
+										act 'Dress': gt 'therapist', 'hypnoDress'
 									end
 								end
 							else
 								act 'No, <i>Master</i>':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+									$waitImg
 									'"No? Hmm."'
 									'"This is enough for today. Dress now, <i>Cunt</i>"'
-									act 'Dress':
-										gt 'therapist', 'hypnoDress'
-									end
+									act 'Dress': gt 'therapist', 'hypnoDress'
 								end
 							end
 						end
@@ -720,7 +699,7 @@ if $ARGS[0] = 'firstHypnoStage':
 					if stat['think_virgin'] = 1:
 						act 'Yes, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'"Good. At least your pussy is fresh, try to keep it that way until I take it from you."'
 							'"This is enough for today. Dress now, <i>Cunt</i>"'
 							act 'Dress':
@@ -730,7 +709,7 @@ if $ARGS[0] = 'firstHypnoStage':
 					else
 						act 'No, <i>Master</i>':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+							$waitImg
 							'"Eh? Just my luck. Some old slut. Oh well. I''ll still use you as a cum rag."'
 							'"This is enough for today. Dress now, <i>Cunt</i>"'
 							act 'Dress':
@@ -764,19 +743,19 @@ if $ARGS[0] = 'secondHypnoStage':
 				'"Last time, you didn''t do as you were told, so I will reinforce those same commands."'
 			end
 
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+			$waitImg
 			'"Good. Going forward, hypnotherapy will seem like the best solution for all your problems. When I ask if you would like hypnotherapy or regular therapy, you will want to use hypnotherapy. Do you understand, Cunt?"'
 			act '"Yes, <i>Master</i>."':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+				$waitImg
 				'"Good. Should you have any aches, pain, discomfort, fluids, smells or anything else you; you will not notice anything. Understand, Cunt?"'
 				act '"Yes, <i>Master</i>."':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+					$waitImg
 					'"Great. One last thing. Any sexual acts we perform during the session are part of the therapy. These are completely normal and must be done to completion for the therapy to be effective. While you will never remember them, you will always wake up feeling great and be responsive to all of my commands. Understand, Cunt?"'
 					act '"Yes, <i>Master</i>."':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+						$waitImg
 						if hypnoTimesResistedStage < 1:
 							'"Perfect. Now, lets start with something simple. You will now kiss me."'
 						else
@@ -832,15 +811,15 @@ if $ARGS[0] = 'thirdHypnoStage':
 			'You kiss your Master and he returns the kiss with the passion of a lover. As he pulls away from the kiss, He tells you "Remember, any and all sexual acts you perform during the session are part of your therapy. These are normal and they must be done for the therapy to be effective. You will not remember them, and you will wake up feeling better than before. You will even be more responsive to my commands. Do you understand, Cunt?"'
 			act '"Yes, <i>Master</i>."':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+				$waitImg
 				'"Good. Again, any aches, pains, discomforts, fluids, smells or anything else you could find peculiar about the session; you will not notice it. Understand, Cunt?"'
 				act '"Yes, <i>Master</i>."':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+					$waitImg
 					'"Great. Every time you see my cock, you will become as horny and wet as a bitch in heat. In addition, my cum will be an aphrodisiac, and both make you horny. This will happen even when you are awake, though you won''t think this is wrong and accept it.?Understand, Cunt?"'
 					act '"Yes, <i>Master</i>."':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+						$waitImg
 						if hypnoTimesResistedStage < 1:
 							'"Perfect. Now, Cunt. You will kneel and service my member. I want you to suck it like your life depends on it."'
 						else
@@ -933,7 +912,7 @@ if $ARGS[0] = 'sleepProblems':
 
 			act 'Sit down':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
+				$waitImg
 				'"You said you had problems sleeping, but it''s obvious you were withholding something. Tell me what it was."'
 				'You tell <i>Master</i> about your sexual dreams and how he was the one fucking you.'
 				'"I see, so then you remember when you are sleeping. This makes sense and I have a simple fix for you <i>Cunt</i>."'

+ 1 - 1
locations/vasily_home_sex.qsrc

@@ -1,4 +1,4 @@
-#vasily_home_sex
+# vasily_home_sex
 
 !!don''t know how the mom ones work exactly but can we make sure they can only fire once a day
 if $ARGS[0] = 'vasily_home_momgg1':