make father less random

locations/dinfather.qsrc

@@ -13,10 +13,7 @@ if $ARGS[0] =  'father act 1':
 			'<center><img <<$set_imgh>> src="images/shared/sex/exhibitionism/fatherim30.jpg"></center>'
 			'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -41,10 +38,7 @@ if $ARGS[0] =  'father act 2':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
 			'Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead it gently, letting out a barely audible moan.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -68,10 +62,7 @@ if $ARGS[0] =  'father act 3':
 			
 			'You, while pretending to not notice, slowly spread your legs as you talk.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -142,9 +133,7 @@ if $ARGS[0] =  'father 4':
 		gs 'dinfather', 'father 3'
 	elseif talkrand < 20:
 		'You relax and share funny stories with your stepfather.'
-		if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = rand(1,8)
-		if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = rand(1,4)
-		if npc_rel['A28']>=80:FatherMolest = rand(1,2)
+		FatherMolest = 1
 		if FatherMolest=1:
 			gs 'dinfather', 'father act 1'
 			gs 'dinfather', 'father act 2'
@@ -167,10 +156,7 @@ if $ARGS[0] =  'gar_act1':
 			'<center><img <<$set_imgh>> src="images/shared/sex/exhibitionism/fatherim30.jpg"></center>'
 			'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -196,10 +182,7 @@ if $ARGS[0] =  'gar_act2':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
 			'Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead it gently, letting out a barely audible moan.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -224,10 +207,7 @@ if $ARGS[0] =  'gar_act3':
 			gs 'stat'
 			'You, while pretending to not notice, slowly spread your legs as you talk.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -257,10 +237,7 @@ if $ARGS[0] =  'watchtv_act1':
 			
 			'Soon after you join your stepfather on the couch to watch TV, you feel a bit sleepy. You snuggle up against your stepfather''s chest and close your eyes.'
 
-			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+			fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -280,11 +257,11 @@ if $ARGS[0] =  'watchtv_act1':
 					TouchedByFather = 1
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim18.jpg"></center>'
 					'Biting your lip, you lie quietly on the chest of your stepfather and enjoy his caresses, restraining your moans. Slowly but surely he focuses more on your nipples, pinching them and tugging at them. You do your best to stay quiet, but it''s getting more and more difficult. Then you hear him let out a chuckle, and he whispers "<<$pcs_nickname>>, I know you''re not sleeping."'
-					if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
+!					if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg"></center>'
 						'You open your eyes and notice the large bulge in his pants. As you turn your head and give him a sweet smile, you put your hand on the bulge and gently start to pet it. Your stepfather, without hesitation, unbuttons his pants and pulls out his dick. You, also without hesitation, lower your head and give it a lick.'
 						act 'Get down on your knees':gs 'fathersex',  'fatherblow4'
-					end
+!					end
 					act 'Move away':gt $loc, $metka
 				end
 			elseif fatherWantsToTouch=2:
@@ -300,11 +277,11 @@ if $ARGS[0] =  'watchtv_act1':
 					pcs_ass+=1
 					if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim17.jpg"></center>' & 'Not noticing any reluctance from you, your stepfather continues his kneading and then slides his hands underneath your clothes. His sexual preference is abundantly clear: he immediately searches out your tight asshole, and gently rubs his finger against it. Unable to help yourself you begin to gyrate your hips to mimic his movements, trying to stifle your moans. He notices anyway: the pressure of his finger against your sphincter grows, and his decisive actions make you realize he has no intentions of stopping there. When his finger penetrates you, you can''t hold back your moans any longer. He chuckles and whispers: "I knew you were awake all along <<$pcs_nickname>>, just relax and enjoy."'
 					if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim16.jpg"></center>' & 'When his hand slips under your clothes, you feel his fingers feeling around for a second, grasping for something that isn''t there. He was clearly expecting panties, and is confused by the lack of them. When he realizes you''re not wearing any his actions grow bolder, and soon feel two fingers rubbing up against your asshole with the intention of going in. You adjust your hips slightly to grant him easier access, which he recognizes as a sign of consent and increases the pressure on your sphincter, pushing his two fingers in slowly but surely.'
-					if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
+!					if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg"></center>'
 						'You open your eyes and notice the large bulge in his pants. As you turn your head and give him a sweet smile, you put your hand on the bulge and gently start to pet it. Your stepfather, without hesitation, unbuttons his pants and pulls out his dick. You, also without hesitation, lower your head and give it a lick.'
 						act 'Get down on your knees': gs 'fathersex',  'fatherblow4'
-					end
+!					end
 					act 'Move away':gt $loc, $metka
 				end
 			end
@@ -322,10 +299,7 @@ if $ARGS[0] =  'watchtv_act2':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
 		'Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead them gently, letting out a barely audible moan.'
 
-		if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+		fatherLust = 1
 		if fatherLust>=2:
 			pcs_horny -= RAND(1,5)
 			gs 'stat'
@@ -344,10 +318,7 @@ if $ARGS[0] =  'watchtv_act3':
 		gs 'arousal', 'end'
 		gs 'stat'
 		'You, while pretending to not notice, slowly spread your legs as you talk.'
-		if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+		fatherLust = 1
 		if fatherLust>=2:
 			pcs_horny -= RAND(1,5)
 			gs 'stat'
@@ -415,9 +386,7 @@ if $ARGS[0] =  'watchtv4':
 		gs 'dinfather', 'watchtv3'
 	else
 		'You relax and talk about the show you''re watching with your stepfather, cuddling up snugly against him.'
-		if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = RAND (1,8)
-		if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = RAND (1,4)
-		if npc_rel['A28']>=80:FatherMolest = RAND (1,2)
+		FatherMolest = 1
 		if FatherMolest=1:
 			gs 'dinfather', 'watchtv_act1'
 			if pcs_horny >= 60 or TouchedByFather=1: gs 'dinfather', 'watchtv_act2'
@@ -441,10 +410,7 @@ $d_fatherdrunk_act[1]={
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim33.jpg"></center>'
 		'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing uncle Misha with an amazing view of your <<$titsize>> breasts.'
 
-		if pcs_apprnc + (npc_rel['A28']/10) < 60:mishalust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:mishalust = Rand (1,4)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:mishalust = Rand (1,2)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 200:mishaLust = 1
+		mishaLust = 1
 			if mishaLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -467,10 +433,7 @@ $d_fatherdrunk_act[2]={
 		pcs_horny += RAND(1,5)
 		'Even though you''re horny and want the guys to notice you, they are paying more attention to their booze and their conversation. You can change that. Making sure it doesn''t break, you ''accidentally'' drop your bottle and bend over to pick it up without bending your knees, giving them a spectacular view of your ass. You make a show of trying to reduce the spillage, wiping the floor while staying in your current position.'
 
-		if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+		fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'
@@ -508,10 +471,7 @@ $d_fatherdrunk_act[3]={
 		pcs_horny += RAND(1,5)
 		'You, pretending to not notice, slowly spread your legs while you talk with the guys.'
 
-		if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-		if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+		fatherLust = 1
 			if fatherLust>=2:
 				pcs_horny -= RAND(1,5)
 				gs 'stat'