[added] Pain to the tongue piercing in the city cafe and a cut off for refusing the therapist.

locations/kafe.qsrc

@@ -754,8 +754,7 @@ if $ARGS[0] = 'workPred':
 					*clr & cla
 					pirsA = 1
 					PirsA1_owned = 1
-					! WD: Unused ~ 'pirsday'
-					! pirsday = day
+					gs 'pain', 6, 'tongue', 'pierce'
 					'<center><img <<$set_imgh>> src="images/pc/body/piercings/a1.jpg"></center>'
 					'You are called to one of the clients, you go to the table and notice that in front of you are the real criminals.'
 					'When you get to the table, the leader tells you to come closer to him. As soon as you do, you are grabbed very hard and painfully by the neck.'

locations/therapist.qsrc

@@ -190,38 +190,9 @@ if $ARGS[0] = 'hypno':
 			'"Yes, <i>Master</i>."'
 			'"Perfect! Now take off your clothes."</font>'
 		gs 'stat'
-		if hypnotime < 1:
-			act 'Refuse':
-				minut += 5
-				cla
-				if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
-				'<font color=brown>'
-				if hypnostrength <=5:
-					'Your body tenses and you shake your head as you reject Dr. Pavlov''s suggestion to remove your clothing. 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.'
-					'"Hmmm," Dr. Pavlov muses, "Your will is quite strong, it may take some time to break you - but you will break."'
-					act 'Wake up':gt 'therapist', 'hypnoEnd'
-				elseif hypnostrength <=10:
-					'Your body tenses and you frown as you resist Dr. Pavlov''s suggestion to strip. The doctor frowns but orders you to forget the idea of undressing, for now. You relax as you comply with his order to forget.'
-					'"Soon you will be unable to resist me, my dear." he murmurs as he lightly traces the shape of your breast through your clothes, "Then we will have some fun."'
-					act 'Wake up':gt 'therapist', 'hypnoEnd'
-				elseif hypnostrength <=15:
-					'Your brow wrinkles and you frown as you fight the doctor''s suggestion and he quickly tells you to forget that he asked. As the command fades from your memory, you relax once more.'
-					'"It would appear that you are not yet ready to play, but it won''t be long now, <i>Cunt</i>." Dr. Pavlov mutters in mild frustration.'
-					act 'Wake up':gt 'therapist', 'hypnoEnd'
-				else
-					'You frown slightly as your hands start to move towards your waist to unfasten your clothes then return to your side before once again beginning to move. Your frown deepens and Dr. Pavlov tells you to forget the command before the conflict awakens you. You relax once more as the doctor sighs in frustration.'
-					'"We are very close to a breakthrough, my little <i> Cunt </i>." he whispers in your ear as he caresses your breasts making your nipples stiffen, "You won''t resist me much longer and then you''ll be mine to enjoy."'
-					act 'Wake up':gt 'therapist', 'hypnoEnd'
-				end
-			end
-		else
-			! Dont know what $ARGS[0] would be appropriate here.. technically youre resisting stripping down, but it eventually ends up as some form of sex... The whole point is that once you give in youre under his control.
-			gs 'willpower', 'sex', 'resist'
-			! adding a modifier for hypnotime? (more influence - harder checks?)
-			will_cost += hypnotime
-			if will_cost <= pcs_willpwr:
-				act 'Refuse (<<will_cost>> Willpower)':
-					gs 'willpower', 'pay', 'resist'
+		if hypnostrengh <= 30:
+			if hypnotime < 1:
+				act 'Refuse':
 					minut += 5
 					cla
 					if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
@@ -245,7 +216,38 @@ if $ARGS[0] = 'hypno':
 					end
 				end
 			else
-				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				! Dont know what $ARGS[0] would be appropriate here.. technically youre resisting stripping down, but it eventually ends up as some form of sex... The whole point is that once you give in youre under his control.
+				gs 'willpower', 'sex', 'resist'
+				! adding a modifier for hypnotime? (more influence - harder checks?)
+				will_cost += hypnotime
+				if will_cost <= pcs_willpwr:
+					act 'Refuse (<<will_cost>> Willpower)':
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						cla
+						if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
+						'<font color=brown>'
+						if hypnostrength <=5:
+							'Your body tenses and you shake your head as you reject Dr. Pavlov''s suggestion to remove your clothing. 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.'
+							'"Hmmm," Dr. Pavlov muses, "Your will is quite strong, it may take some time to break you - but you will break."'
+							act 'Wake up':gt 'therapist', 'hypnoEnd'
+						elseif hypnostrength <=10:
+							'Your body tenses and you frown as you resist Dr. Pavlov''s suggestion to strip. The doctor frowns but orders you to forget the idea of undressing, for now. You relax as you comply with his order to forget.'
+							'"Soon you will be unable to resist me, my dear." he murmurs as he lightly traces the shape of your breast through your clothes, "Then we will have some fun."'
+							act 'Wake up':gt 'therapist', 'hypnoEnd'
+						elseif hypnostrength <=15:
+							'Your brow wrinkles and you frown as you fight the doctor''s suggestion and he quickly tells you to forget that he asked. As the command fades from your memory, you relax once more.'
+							'"It would appear that you are not yet ready to play, but it won''t be long now, <i>Cunt</i>." Dr. Pavlov mutters in mild frustration.'
+							act 'Wake up':gt 'therapist', 'hypnoEnd'
+						else
+							'You frown slightly as your hands start to move towards your waist to unfasten your clothes then return to your side before once again beginning to move. Your frown deepens and Dr. Pavlov tells you to forget the command before the conflict awakens you. You relax once more as the doctor sighs in frustration.'
+							'"We are very close to a breakthrough, my little <i> Cunt </i>." he whispers in your ear as he caresses your breasts making your nipples stiffen, "You won''t resist me much longer and then you''ll be mine to enjoy."'
+							act 'Wake up':gt 'therapist', 'hypnoEnd'
+						end
+					end
+				else
+					act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
 			act 'Take off your clothes':
 				if hypnosexing = 0: hypnosexing = 1 & hidden_guy += 1