Reduced pay for acting jobs

locations/casting.qsrc

@@ -149,7 +149,7 @@ if $ARGS[0] = 'BackShowerGirl':
 	audition['roletype'] = 3
 	$audition['type'] = 'titty'
 	$costuming['outfit'] = 'nude'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15 * rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15 * rand(0,roletype))
 	'Uninhibited girls wanted for the role of <b>Background Shower Girl.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -167,7 +167,7 @@ if $ARGS[0] = 'SpringBreakFlasher':
 	$audition['type'] = 'titty'
 !!	acting['costume_unique'] = 1
 	audition['roletits'] = 4
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	'Big boobed girl wanted for the role of <b>Spring Break Flasher.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -183,7 +183,7 @@ end
 if $ARGS[0] = 'Cadaver':
 	audition['roletype'] = 3
 	$costuming['outfit'] = 'nude'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	gs'casting','audition_schedule'
 	'Young pretty girl wanted for the role of <b>Dead Girl 2</b>'
 	gs'casting','details'
@@ -203,7 +203,7 @@ if $ARGS[0] = 'DildoGirl':
 	$costuming['type'] = 'panties'
 	$costuming['panties'] = 'cheap'
 	costuming['pantynumber'] = 31
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	'Big boobed girl wanted for the role of <b>Dildo Girl.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -220,7 +220,7 @@ if $ARGS[0] = 'NakedLockerGirl':
 	audition['roletype'] = 3
 	$audition['type'] = 'titty'
 	$costuming['outfit'] = 'nude'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	'Young pretty girl wanted for the role of <b>Naked Locker Girl.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -242,7 +242,7 @@ if $ARGS[0] = 'UndressingLockerGirl':
 	costuming['pantynumber'] = 13
 	$costuming['pantytype'] = 'thong'
 	$costuming['pantydrawer'] = 'filled with thongs. She picks one out and'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15 * rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15 * rand(0,roletype))
 	'Big boobed girls wanted for the role of <b>Undressing Locker Girl.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -260,7 +260,7 @@ if $ARGS[0] = 'ModestCheerleader':
 	$audition['type'] = 'face_check'
 	$costuming['type'] = 'normal'
 	$costuming['outfit'] = 'cheerleader'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15 * rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15 * rand(0,roletype))
 	'Pretty girls wanted for the role of <b>Modest Cheerleader.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -279,7 +279,7 @@ if $ARGS[0] = 'UnderwearCheerleader':
 	$costuming['type'] = 'normal'
 	$costuming['outfit'] = 'underwear'
 	$costuming['underwear'] = 'kats'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15 * rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15 * rand(0,roletype))
 	'Pretty girls wanted for the role of <b>Underwear Cheerleader.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -299,7 +299,7 @@ if $ARGS[0] = 'ToplessCheerleader':
 	$costuming['panties'] = 'kats'
 	$costuming['pantytype'] = 'normal'
 	$costuming['pantydrawer'] = 'to pull out a random pair of panties'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	'Young pretty girl wanted for the role of <b>Topless Cheerleader 3.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -316,7 +316,7 @@ if $ARGS[0] = 'HotShowerGirl':
 	audition['roletype'] = 3
 	$audition['type'] = 'titty'
 	$costuming['outfit'] = 'nude'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	'Young pretty girl wanted for the role of <b>Hot Shower Girl.</b>'
 	gs'casting','general_details'
 	act 'Return':
@@ -333,7 +333,7 @@ if $ARGS[0] = 'WerewolfGirl':
 	audition['roletype'] = 3
 	$audition['type'] = 'titty'
 	$costuming['outfit'] = 'nude'
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	audition['roletits'] = 4
 	'Big boobed girl wanted for the role of <b>Werewolf Victim.</b>'
 	gs'casting','general_details'
@@ -354,7 +354,7 @@ if $ARGS[0] = 'DinerWaitress':
 	audition['room'] = rand(1,5)
 	audition['requirement'] = 50
 !!	acting['costume_unique'] = 1
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	acting['scenecount'] = 2
 	gs'casting','audition_schedule'
 	'Casting season two of "The Line", a television police drama. Pretty girls wanted for the role of <b>Diner Waitress.</b>'
@@ -379,7 +379,7 @@ if $ARGS[0] = 'HotBartender':
 	audition['room'] = rand(1,5)
 	audition['requirement'] = 50
 !!	acting['costume_unique'] = 1
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	acting['scenecount'] = 3
 	gs'casting','audition_schedule'
 	'Casting for the role of <b>Vera:</b> Female, 18-25'
@@ -406,7 +406,7 @@ if $ARGS[0] = 'SluttyClubGirl':
 	audition['requirement'] = 60
 !!	acting['costume_unique'] = 1
 	audition['unique'] = 1
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	acting['scenecount'] = 1
 	gs'casting','audition_schedule'
 	'Casting "Snare: The Seventh Seduction", a feature length horror film. Pretty girls wanted for the role of <b>Slutty Club Girl (Day Player):</b> Female, 18-30'
@@ -433,7 +433,7 @@ if $ARGS[0] = 'YulyaGavrikov':
 	audition['number'] = 1
 	audition['room'] = rand(1,5)
 	acting['filmdays'] = 40
-	acting['pay'] = (audition['roletype'] + 1) * 800 + (15*rand(0,roletype))
+	acting['pay'] = (audition['roletype'] + 1) * 200 + (15*rand(0,roletype))
 	gs'casting','audition_schedule'
 	'Casting "Unashamed,"for the lead female role of <b>Yulya Gavrikov (Lead):</b> Female, 18-25'
 	*nl