some fixes for the therapist

locations/therapist.qsrc

@@ -39,6 +39,8 @@ if $ARGS[0] = 'hypnoGreet':
 				'"I''m sorry Dr. Pavlov... I don''t know what I was thinking. I-"'
 				'He interupts you and commands you to strip off your panties and hand them to him.'
 				act 'Give Dr. Pavlov your panties':
+					cla
+					*clr
 					'<center><img src="images/locations/pavlovsk/clinic/therapist/removePanties.jpg"></center>'
 					gs 'panties', 'dispose'
 
@@ -912,7 +914,7 @@ if $ARGS[0] = 'thirdHypnoStage':
 					cla
 					*clr
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/waiting<<rand(1,2)>>.jpg"></center>'
-					'"Great. <font color=brown>Any time you see my cock, you will become horny and your pussy will become wet like a bitch in heat. In addition, my cum will taste and smell pleasant. Both the tast and smell will make you horny. These will happen even when you are awake, but you won''t think anything is wrong with these feelings.</font> Understand, <i>Cunt</i>?"'
+					'"Great. <font color=brown>Any time you see my cock, you will become horny and your pussy will become wet like a bitch in heat. In addition, my cum will taste and smell pleasant. Both the taste and smell will make you horny. These will happen even when you are awake, but you won''t think anything is wrong with these feelings.</font> Understand, <i>Cunt</i>?"'
 					act '"Yes, <i>Master</i>."':
 						cla
 						*clr
@@ -1078,7 +1080,7 @@ if $ARGS[0] = 'hypnoResist':
 	if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
 	'<font color=brown>'
 	if hypnoTimesResistedStage = 0:
-		'Your body tenses, and you shake your head as you reject Dr. Pavlov''s suggestion to <<$ARGS[1]>>. Seeing that you might awaken, he quickly tells you to forget the idea of undressing. As the suggestion fades from your memory, you once again relax.'
+		'Your body tenses, and you shake your head as you reject Dr. Pavlov''s suggestion to <<$ARGS[1]>>. Seeing that you might awaken, he quickly tells you to forget the command he gave you. As the suggestion fades from your memory, you once again relax.'
 		'"Hmmm," Dr. Pavlov muses, "Your will is quite strong, it may take some time to break you - but you will break."'
 	elseif hypnoTimesResistedStage = 1:
 		'Your body tenses, and you frown as you resist Dr. Pavlov''s suggestion to <<$ARGS[1]>>. The doctor frowns but orders you to forget the idea, for now. You relax as you comply with his order to forget.'
@@ -2307,8 +2309,8 @@ if $ARGS[0] = 'hypnoProstitute':
 						end
 					end
 				else
-					if hypnoProstRubles[1] > 100: hypnoProstRubles[1] -= rand(1,9) * 10
-					if hypnoProstRubles[1] < 100: hypnoProstRubles[1] = 100
+					if hypnoProstRubles[2] > 100: hypnoProstRubles[2] -= rand(1,9) * 10
+					if hypnoProstRubles[2] < 100: hypnoProstRubles[2] = 100
 					hypnoMoney += hypnoProstRubles[2]
 					'As you are waiting, you see the business man from before pumping gas again. He notices you and walks over. He presses a wad of bills into your hands. "Come on now, I''d like to fuck you again."'
 					act 'Go with him':
@@ -2332,21 +2334,41 @@ if $ARGS[0] = 'hypnoProstitute':
 					hypnoProstDates[3] = daystart
 					hypnoProstRubles[3] = 1300
 					'As you are waiting... you see a homeless man picking through garbage in the dumpster by the gas station. He notices you standing by yourself and walks over to you.'
-					'"Excust me, you got a few rubles to spare?"'
+					'"Excuse me, you got a few rubles to spare?"'
 					'Looking at him, you see that he looks like he hasn''t bathed in weeks and then you smell it. The stench coming from him is horrendous. He gives you a toothy grin and you see that many of his teeth are rotten.'
 					act 'Ask him if he''d like to fuck you':
-
-					end
-					act 'Ask if he''d like to have bare sex':
-						
+						'"Would you like to fuck me?" You ask.'
+						'"Fuck you?" he repeats. "Yea I wanna fuck you!" He grabs you by the arm and pulls you over by the dumpster, practically dragging you.'
+						act 'Continue':
+							jump 'hypnoProstGuy3Start1'
+						end
 					end
 					act 'Show him your bare pussy and ask if he''d like to fuck it':
 						'You pull your skirt up and show him your bare pussy. "Would you like to fuck this?"'
 						'He looks at your bare pussy dumbly, then back up at your face, then back down to your bare pussy again.'
-						'Then his eyes go wide and he grabs you by the arm and pulls you over by the dumpster. "Yea I wanna fuck you! Little slut! Get over here!"'
+						'Then his eyes go wide and he grabs you by the arm and pulls you over by the dumpster, practically dragging you. "Yea I wanna fuck you! Little slut! Get over here!"'
+						act 'Continue':
+							:hypnoProstGuy3Start1
+
+						end
 					end
 				else
-
+					if hypnoProstRubles[2] > 100: hypnoProstRubles[2] -= rand(1,9) * 10
+					if hypnoProstRubles[2] < 100: hypnoProstRubles[2] = 100
+					hypnoMoney += hypnoProstRubles[2]
+					'As you are waiting, the homeless man from before comes walking up to you. He grabs you by the arm and starts pulling you over towards the garbage bins to the side of the gas station. Mostly out of sight.'
+					act 'Go with him':
+						'Shoving you aggressivly against the garbage bin, the homeless man pulls his cock out and says he''s going to fuck you.'
+						act '"Yes sir. How would you like to fuck me?"':
+							jump 'hypnoProstSex2'
+						end
+						act 'Place your hands against the dumpster and spread your legs.':
+							jump 'hypnoProstSex2'
+						end
+						act 'Lay on your back and spread your legs.':
+							jump 'hypnoProstSex2'
+						end
+					end
 				end
 			end
 		elseif hypnoProstRand = 4:

locations/therapist_reminder.qsrc

@@ -7,13 +7,34 @@ if $ARGS[0] = '':
     '<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)':
+    if $region = 'pav_commercial' or $region = 'pav_lake' or $region = 'pav_park' or $region = 'pav_residential':
+        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':
                 cla
-                pcs_mood -= rand(10,20)
+                *clr
+                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>'
                 ''
@@ -22,11 +43,31 @@ if $ARGS[0] = '':
                     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
+        act 'Go see your therapist':
+            cla
+            *clr
+            if $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><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/schoolWalk.mp4"></video></center>'
+            'You walk to your therapist''s office.'
+    
+            act 'Continue':
+                gt 'therapist'
+            end
         end
     else
-        act 'Return to what you were doing (<<will_cost>> Willpower)':
+        '... But you realize you are much to far away, there''s no way you can make it on time.'
+        act 'Return to what you were doing':
             cla
             *clr
             reminderMult = reminderCount
@@ -37,53 +78,12 @@ if $ARGS[0] = '':
             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.'
+            'You feel terrible about missing your appointment. 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':
-        cla
-        *clr
-        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><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/schoolWalk.mp4"></video></center>'
-        'You walk to your therapist''s office.'
-
-        act 'Continue':
-            gt 'therapist'
-        end
-    end
 end
 
 --- therapist_reminder ---------------------------------