瀏覽代碼

Merge remote-tracking branch 'hornguy6/master'

KevinSmarts 3 年之前
父節點
當前提交
9cf131ec89

+ 1 - 0
glife.qproj

@@ -796,6 +796,7 @@
 		<Location name="foto_shoot"/>
 		<Location name="foto_events"/>
 		<Location name="foto_events2"/>
+		<Location name="foto_model_documentary"/>
 		<Location name="foto_albums"/>
 		<Location name="foto_models"/>
 		<Location name="foto_models2"/>

+ 1 - 1
locations/KatjaHomeTalk.qsrc

@@ -191,7 +191,7 @@ if $ARGS[0] = '':
 				act 'Further':gt 'KatjaHomeTalk'
 			end
 
-			if npc_sex['A14'] = 1:
+			if npc_sex['A14'] > 0:
 				act 'Offer to take a walk in the Park':
 					minut += 15
 					KatjaHorny += 5

+ 8 - 1
locations/cikl.qsrc

@@ -76,7 +76,14 @@ if (film > 0 or pornstack = 1) and pfilmNO = 0 and pfilmSTOP = 0:
 	gs 'pornschedule', 'schedule'
 end
 
-!!modelling job check
+!!------------------------------------------------------------------------------------------------------------
+!!	Job Stuff
+!!------------------------------------------------------------------------------------------------------------
+
+!! masseuse paycheck
+if masseuse['weeks_pay'] > 0 and week = 5:masseuse['paycheck'] = 1
+
+!!modelling check
 if model_week ! (daystart - week) / 7:model_job_week = 0
 
 !!acting strings to set available jobs

+ 32 - 0
locations/family_schedule.qsrc

@@ -9,6 +9,7 @@ kolloc = 0
 
 !!---ANYA---------------------------------------
 !! sister_indorf = 1 means Anya is in the village
+!! anyaloc['athome'] = 1 means Anya is at home, awake, and not in an event (like having sex with Roma)
 if sister_indorf = 0:
 	if week <= 5:
 		if (hour < 6) or (hour = 6 and minut < 45):
@@ -17,24 +18,32 @@ if sister_indorf = 0:
 		elseif hour = 7 and minut < 15:
 			!!Family breakfast
 			anyaloc = 2
+			anyaloc['athome'] = 1
 		elseif hour = 7 and minut < 30:
 			!!Helping mom clean up
 			anyaloc = 3
+			anyaloc['athome'] = 1
 		elseif hour < 8:
 			!!In Bedroom getting ready
 			anyaloc = 4
+			anyaloc['athome'] = 1
 		elseif hour = 8 and minut < 20:
 			!!Shower*
 			anyaloc = 5
+			anyaloc['athome'] = 1
+			if vanrPar_suction_dildo > 0:anyaQW['bathroom_dildos'] = vanrPar_suction_dildo
 		elseif hour = 8 and minut < 30:
 			!!Walk to work
 			anyaloc = 6
+			anyaloc['athome'] = 0
 		elseif hour < 16:
 			!!Work
 			anyaloc = 7
+			anyaloc['athome'] = 0
 		elseif hour = 16 and minut < 10:
 			!!Walk home from work
 			anyaloc = 8
+			anyaloc['athome'] = 0
 		elseif hour < 18:
 			if sisboyday + 1 = daystart:
 				!! Roma visiting
@@ -42,6 +51,11 @@ if sister_indorf = 0:
 			else
 				!!Personal activities: Relaxing in bedroom 9, working out at the community center 10
 				anyaloc = func('shortgs', 'rand_pick', '', 9, 10)
+				if anyaloc = 9:
+					anyaloc['athome'] = 1
+				else
+					anyaloc['athome'] = 0
+				end
 			end
 		elseif sisboyday + 1 = daystart and hour = 18:
 			!!in bedroom with Roma
@@ -49,67 +63,85 @@ if sister_indorf = 0:
 		elseif hour = 18 and minut < 30:
 			!!Family dinner
 			anyaloc = 12
+			anyaloc['athome'] = 1
 		elseif hour < 22:
 			!!Goes out to hang out with friends 13/Roma 14 (this could be random so sometimes she stays home to give Sveta more time to talk to her 15)
 			anyaloc = func('shortgs', 'rand_pick', '', 13, 14, 15)
+			if anyaloc = 15:anyaloc['athome'] = 1
 		else
 			!!In her room
 			anyaloc = 15
+			anyaloc['athome'] = 1
 		end
 	else
 		if week = 7 and hour < 2:
 			!!Goes to a party
 			anyaloc = 24
+			anyaloc['athome'] = 0
 		elseif week = 7 and hour = 2 and minut < 20:
 			!!In her room drunk after party
 			anyaloc = 26
+			anyaloc['athome'] = 0
 		elseif hour < 9:
 			!!Asleep
 			anyaloc = 1
 		elseif hour = 9 and minut < 20:
 			!!Eat something in kitchen
 			anyaloc = 16
+			anyaloc['athome'] = 1
 		elseif hour = 9 and minut < 40:
 			!!Shower*
 			anyaloc = 5
+			anyaloc['athome'] = 1
 		elseif hour < 10:
 			!!In Bedroom
 			anyaloc = 4
+			anyaloc['athome'] = 1
 		elseif hour < 16:
 			if temp > 15 and sunWeather = 1:
 				!!On nice days goes to the beach
 				anyaloc = 17
+				anyaloc['athome'] = 0
 			else
 				!!Stays at home
 				anyaloc = 19
+				anyaloc['athome'] = 1
 			end
 		elseif hour = 16 and minut < 15:
 			!!Walk to community center
 			anyaloc = 20
+			anyaloc['athome'] = 0
 		elseif hour = 17 and minut < 45:
 			!!Works out at the community center
 			anyaloc = 21
+			anyaloc['athome'] = 0
 		elseif hour < 18:
 			!!Walk home
 			anyaloc = 22
+			anyaloc['athome'] = 0
 		elseif hour = 18 and minut < 30:
 			!!Family dinner
 			anyaloc = 12
+			anyaloc['athome'] = 1
 		elseif hour < 19:
 			if week = 7:
 				!!helps mom clean up after dinner
 				anyaloc = 23
+				anyaloc['athome'] = 1
 			else
 				!!Goes to a party
 				anyaloc = 24
+				anyaloc['athome'] = 0
 			end
 		else
 			if week = 7:
 				!!in her room 
 				anyaloc = 15
+				anyaloc['athome'] = 1
 			else
 				!!Goes to a party
 				anyaloc = 24
+				anyaloc['athome'] = 0
 			end
 		end
 	end

+ 36 - 20
locations/foto.qsrc

@@ -16,7 +16,7 @@ if $ARGS[0] = 'start':
 
 	close all
 	$location_type = 'indoors'
-	if model = 0:gt'foto','studio'
+	if model['status'] = 0:gt'foto','studio'
 	*clr & cla
 
 	$menu_loc = 'foto'
@@ -29,8 +29,9 @@ if $ARGS[0] = 'start':
 	else
 		'Entering the studio, you head to the back room to strip down.'
 	end
-	special_model = rand(30,1400)
-	special_skill_model = rand(30,500)
+	special_model['status'] = rand(30,1400)
+	special_skill_model['status'] = rand(1,500)
+	foto['documentary'] = rand(1,100)
 	act'Strip down':
 		cla & *clr
 		menu_off = 1
@@ -146,8 +147,8 @@ if $ARGS[0] = 'studio':
 	killvar '$modelopt'
 
 	if special_model < min(city_modelling, 700) and modelfoto_topless > 0 and hour < 15 and fame_model_event < daystart:gt 'foto_events','fame'
-	if special_skill_model < pcs_mdlng and modelfoto_nip > 0 and hour < 15 and skill_model_event < daystart:gt 'foto_events','skill'
-
+	if special_skill_model < pcs_mdlng and modelfoto_nip > 0 and skill_model_event < daystart:gt 'foto_events','skill'
+	if foto['documentary'] >= 95 and $pantyworntype = 'none':gt'foto_model_documentary','1st_documentary'
 	minut += 5
 	gs 'stat'
 	gs 'themes', 'indoors'
@@ -182,12 +183,12 @@ if $ARGS[0] = 'studio':
 
 	'<center><b><font color="maroon">Photography studio</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-	if model = 0:
+	if model['status'] = 0:
 		'You step into a large warehouse. Scattered throughout, you see large lights brightening a myriad of sets designed to look like different rooms or locations. As you look farther inside, you spot people move between or on the sets. Among them are beautiful women, some wearing fancy dresses or expensive underwear, and shockingly, some of them are nude. Those that stand on sets are surrounded by crews of people wearing black with cameras and other equipment. Strangely, every single woman you see who is not on a set is completely naked.'
 		'It appears you are in some kind of photography studio. Just near the door you came in is a reception desk, out of place due to the fact that it simply sits in the middle of the room. A man sits behind it in the light of a desk lamp, doing something on a computer.'
 		*nl
 		'Farther along, you can see what appear to be <a href="exec:gt ''foto_albums'',''model_portraits''">photo albums</a> that sit on a shelf.'
-	elseif model = 1:
+	elseif model['status'] = 1:
 		'You step onto the main floor of the studio, standing amongst the various sets and photographers who are working those sets. Sitting by the door is a <a href="exec:gs ''shortgs'',''img msg'',''images/locations/city/citycenter/photo/dress_code.jpg''">sign</a> to remind models of the dress code.'
 		*nl
 		'Farther along are the studio''s collection of <a href="exec:gt ''foto_albums'',''model_portraits''">photo albums</a> of their top 10 models. '
@@ -261,7 +262,7 @@ if $ARGS[0] = 'studio':
 		act 'Leave': minut += 1 & gt 'city_center'
 	end
 
-	if model = 1:
+	if model['status'] = 1:
 		act 'Leave':
 			*clr & cla
 			menu_off = 1
@@ -280,13 +281,13 @@ if $ARGS[0] = 'studio':
 				act 'Leave': minut += 1 & gt 'city_center'
 			end
 		end
-	elseif model = 0:
+	elseif model['status'] = 0:
 		act 'Leave': minut += 1 & gt 'city_center'
 	end
 
 	if parkblackmail = 2: act 'Look around for the blackmailer':gt 'foto', 'blackm'
 	
-	if model = 0:
+	if model['status'] = 0:
 		act 'Ask about working as a glamor model':
 			cla & *clr
 			menu_off = 1
@@ -340,7 +341,12 @@ if $ARGS[0] = 'studio':
 					'He hands you back your fake passport, smiling.'
 					*nl
 					'"Welcome to Aphrodite."'
-					model = 1
+					model['status'] = 1
+					if age < 18:
+						model['age'] = 18
+					else
+						model['age'] = age
+					end
 					model['start_year'] = year
 					act'Leave the studio':gt'city_center'
 					act'Head to the back':gt'foto','start'
@@ -410,18 +416,18 @@ if $ARGS[0] = 'studio':
 		*nl
 		'There is no way anyone is going to want to see pictures of you while your std is so obvious, you should see a doctor.'
 	end
-	if model = 1:act 'Go to the showers':gt'foto','showers'
-	if model = 1:act 'Go to your makeup station':gt'foto','makeup'
+	if model['status'] = 1:act 'Go to the showers':gt'foto','showers'
+	if model['status'] = 1:act 'Go to your makeup station':gt'foto','makeup'
+end
+
+if $ARGS[0] = 'model_profile':
+	
+
 end
 
 if $ARGS[0] = 'gave_passport':
 	*clr & cla
 	menu_off = 1
-	if age < 18:
-		model['age'] = 18
-	else
-		model['age'] = age
-	end
 	'<center><b><font color="maroon">Photographer</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	''
@@ -429,7 +435,12 @@ if $ARGS[0] = 'gave_passport':
 	'He hands you back your fake passport, smiling.'
 	*nl
 	'"Welcome to Aphrodite."'
-	model = 1
+	model['status'] = 1
+	if age < 18:
+		model['age'] = 18
+	else
+		model['age'] = age
+	end
 	model['start_year'] = year
 	act'Leave the studio':gt'city_center'
 	act'Head to the back':gt'foto','start'
@@ -656,6 +667,11 @@ if $ARGS[0] = 'job_offer':
 		act'Show him your passport':
 			cla
 			*nl
+			if age < 18:
+				model['age'] = 18
+			else
+				model['age'] = age
+			end
 			model['age'] = age
 			'He takes it and studies it for a moment, looking back and forth between you and the document. "Okay, that confirms you''re <<age>> and we''ll put you into the database later."'
 			'"When you''re ready, speak to a photographer about work. We work on freelance basis. For our lower level models or new hires like you, we can really only afford to pay you for two shoots a week, but you can still come in any time if you want to get some practice to work on your modelling skills. Those photos will be ours to keep and use, but it will help you to build your portfolio. If your popularity increases, we might have some special work and extra jobs for you so it''s not just twice a week."'
@@ -1178,7 +1194,7 @@ if $ARGS[0] = 'practicemodel':
 	gs'stat'
 	*clr & cla
 	minut += 5
-	if model = 0:model = 1
+	if model['status'] = 0:model['status'] = 1
 	gs 'stat'
 	'<center><b><font color="maroon">Photographer</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'

+ 236 - 98
locations/foto_events.qsrc

@@ -4,30 +4,52 @@ menu_off = 1
 
 if $ARGS[0] = 'fame':
 	*clr & cla
+	modelpay = (pcs_mdlng/2 * 10) + ((min(city_modelling, 700) + pcs_apprnc)/2)
+	:reroll_1
 	special_model = 2000
 	special_skill_model = 2000
 	fame_model_event = daystart
-	if first_fame_event < 1:gt'foto_events','topless1'
-	mdlng_fame_event = rand(1,3)
-	if mdlng_fame_event = 1:gt'foto_events','pool1'
-	if mdlng_fame_event = 2 and pcs_agil < 40:
-		gt'foto_events','pool1'
+	if first_fame_event < 1:
+		gt'foto_events','topless1'
+	else
+		mdlng_fame_event = rand(1,3)
+		if mdlng_fame_event = 1 and sunWeather = 1 and daystage < 3:
+			gt'foto_events','pool1'
+		elseif mdlng_fame_event = 2 and pcs_agil >= 40:
+			gt'foto_events','tennis'
+		elseif mdlng_fame_event = 2 and sunWeather = 1 and daystage < 3:
+			gt'foto_events','pool1'
+		elseif mdlng_fame_event = 3:
+			gt'foto_events2','champagne1'
+		else
+			jump 'reroll_1'
+		end
 	end
-	if mdlng_fame_event = 3:gt'foto_events2','champagne1'
-	if mdlng_fame_event = 2 and pcs_agil >= 40:gt'foto_events','tennis'
 end
 
 if $ARGS[0] = 'skill':
+	modelpay = (pcs_mdlng/2 * 10) + ((min(city_modelling, 700) + pcs_apprnc)/2)
+	:reroll_2
 	special_model = 2000
 	special_skill_model = 2000
 	skill_model_event = daystart
 	*clr & cla
 	mdlng_skill_event = rand(1,5)
-	if mdlng_skill_event = 1:gt'foto_events','topless2'
-	if mdlng_skill_event = 2:gt'foto_events','beach2'
-	if mdlng_skill_event = 3:gt'foto_events','pool2'
-	if mdlng_skill_event = 4:gt'foto_events','runway2'
-	if mdlng_skill_event = 5:gt'foto_events','wet'
+	if mdlng_skill_event = 1 and sunWeather = 1 and daystage < 3:
+		gt'foto_events','topless2'
+	elseif mdlng_skill_event = 2 and sunWeather = 1 and daystage < 3:
+		gt'foto_events','beach2'
+	elseif mdlng_skill_event = 3 and sunWeather = 1 and daystage < 3:
+		gt'foto_events','pool2'
+!!	elseif mdlng_skill_event = 4:
+!!		gt'foto_events','runway1'
+	elseif mdlng_skill_event = 4 and daystage > 2:
+		gt'foto_events','runway2'
+	elseif mdlng_skill_event = 5:
+		gt'foto_events','wet'
+	else
+		jump 'reroll_2'
+	end
 end
 
 !!------------------------------------------------------------------- Special Events ------------------------------------------------------------------
@@ -394,45 +416,60 @@ if $ARGS[0] = 'fashion_persuasion':
 	elseif foto_persuade = 1:
 		'"You know, that offer to do a fashion shoot is still open you know. We really think you have what it takes! Want to give it a try?"'
 	end
+	if foto['suborn'] >= 5:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	elseif foto['suborn'] >= 3:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+	elseif foto['suburn'] > 0:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+	else
+		will_cost = 0
+	end
 	
-	act'No thanks':
-		cla & *clr
-		foto_persuade = 1
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-		'"Thanks for the offer, but I think I''d be more comfortable just sticking to the catalogues for now."'
-		'"Oh. Okay..."'
-		'The manager seems disappointed by your answer.'
-		'"So clothing or swimsuits today?"'
-		act'Clothing':
-			modelfoto_catalog += 1
-			cla & *clr
-			mdlng_exp += rand(2,5)
-			minut += 120
-			money += 450
-			'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion3.mp4"></video></center>'
-			'You spend two hours modelling for the online catalogs of retail clothing stores, wearing various different dresses but the same expression. It''s boring but it still gets you paid.'
-			*nl
-			'You recieve 450 <b>₽</b> for the job.'
-			act 'Leave':gt 'foto', 'end'
-		end
-		act'Swimsuits':
-			modelfoto_catalog += 1
+	if will_cost <= pcs_willpwr:
+		act'No thanks (<<will_cost>> Willpower)':
 			cla & *clr
-			mdlng_exp += rand(2,5)
-			minut += 120
-			money += 450
-			'<center><video autoplay loop src="images/locations/city/citycenter/photo/bikini<<rand(3,5)>>.mp4"></video></center>'
-			bikinicatalog += 1
-			'You change in and out of various different bikinis, modelling them with the same pose and expression for use in online and department store catalogs.'
-			*nl
-			'You recieve 450 <b>₽</b> for the job.'
-			act 'Leave':gt 'foto', 'end'
+			foto_persuade = 1
+			foto['suborn'] += 1
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+			'"Thanks for the offer, but I think I''d be more comfortable just sticking to the catalogues for now."'
+			'"Oh. Okay..."'
+			'The manager seems disappointed by your answer.'
+			'"So clothing or swimsuits today?"'
+			act'Clothing':
+				modelfoto_catalog += 1
+				cla & *clr
+				mdlng_exp += rand(2,5)
+				minut += 120
+				money += 450
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion3.mp4"></video></center>'
+				'You spend two hours modelling for the online catalogs of retail clothing stores, wearing various different dresses but the same expression. It''s boring but it still gets you paid.'
+				*nl
+				'You recieve 450 <b>₽</b> for the job.'
+				act 'Leave':gt 'foto', 'end'
+			end
+			act'Swimsuits':
+				modelfoto_catalog += 1
+				cla & *clr
+				mdlng_exp += rand(2,5)
+				minut += 120
+				money += 450
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/bikini<<rand(3,5)>>.mp4"></video></center>'
+				bikinicatalog += 1
+				'You change in and out of various different bikinis, modelling them with the same pose and expression for use in online and department store catalogs.'
+				*nl
+				'You recieve 450 <b>₽</b> for the job.'
+				act 'Leave':gt 'foto', 'end'
+			end
 		end
+	else
+		act'No thanks (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	
 	act'Yes':
 		cla & *clr
 		foto_persuade = 2
+		foto['suborn'] = 0
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 		'"That sounds really good actually! I''ll do it!"'
 		'The manager smiles wide at you.'
@@ -454,11 +491,20 @@ if $ARGS[0] = 'lingerie_persuasion':
 		'"We can do a fashion shoot today if you like, but the studio would still really love to see you do that lingerie shoot. What do you say?"'
 	end
 	
-	gs 'willpower', 'skill', 'pcs_inhib', 'resist'
+	if foto['suborn'] >= 5:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	elseif foto['suborn'] >= 3:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+	elseif foto['suburn'] > 0:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+	else
+		will_cost = 0
+	end
 	if will_cost <= pcs_willpwr:
 		act'No thanks (<<will_cost>> Willpower)':
 			cla & *clr
 			foto_persuade = 1
+			foto['suborn'] += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Thanks for the offer, but I think I''ll keep on doing regular fashion shoots for now."'
 			'"Oh. Okay..."'
@@ -471,6 +517,7 @@ if $ARGS[0] = 'lingerie_persuasion':
 	if foto_persuade = 2 and pcs_inhib < 20:
 		act'I guess so':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Well... I guess it turned out well last time..."'
 			'The manager smiles wide at you.'
@@ -481,6 +528,7 @@ if $ARGS[0] = 'lingerie_persuasion':
 		act'Yes':
 			cla & *clr
 			foto_persuade = 2
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"That sounds really good actually! I''ll do it!"'
 			'The manager smiles wide at you.'
@@ -506,10 +554,19 @@ if $ARGS[0] = 'glamour_persuasion':
 	end
 	
 	if foto_persuade = 3:
-		gs 'willpower', 'skill', 'pcs_inhib', 'resist'
+		if foto['suborn'] >= 5:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+		elseif foto['suborn'] >= 3:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+		elseif foto['suburn'] > 0:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+		else
+			will_cost = 0
+		end
 		if will_cost <= pcs_willpwr:
 			act'No thanks (<<will_cost>> Willpower)':
 				cla & *clr
+				foto['suborn'] += 1
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 				'"Thanks for the offer, but I think I''ll stick to the lingerie shoot today."'
 				'"Oh. Okay."'
@@ -522,6 +579,7 @@ if $ARGS[0] = 'glamour_persuasion':
 			act'I guess I could try it...':
 				cla & *clr
 				foto_persuade = 2
+				foto['suborn'] = 0
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 				'"I guess I could try it..."'
 				'"Great! Thank you so much <<$pcs_firstname>>! Just go to this set and we''ll set somebody up for you."'
@@ -530,6 +588,7 @@ if $ARGS[0] = 'glamour_persuasion':
 		else
 			act'Yes, I''m ready':
 				cla & *clr
+				foto['suborn'] = 0
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 				'"You know what? Yeah, I think I''ll give it a try today. I think I''m ready."'
 				'The manager smiles wide at you.'
@@ -538,11 +597,20 @@ if $ARGS[0] = 'glamour_persuasion':
 			end
 		end
 	else
-		gs 'willpower', 'skill', 'pcs_inhib', 'resist'
+		if foto['suborn'] >= 5:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+		elseif foto['suborn'] >= 3:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+		elseif foto['suburn'] > 0:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+		else
+			will_cost = 0
+		end
 		if will_cost <= pcs_willpwr:
 			act'No thanks (<<will_cost>> Willpower)':
 				cla & *clr
 				foto_persuade = 1
+				foto['suborn'] += 1
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 				'"Thanks for the offer, but I think I''ll stick to the lingerie shoot today."'
 				'"Oh. Okay..."'
@@ -570,6 +638,7 @@ if $ARGS[0] = 'glamour_persuasion':
 						act'No (<<will_cost>> Willpower)':
 							cla & *clr
 							foto_persuade = 3
+							foto['suborn'] += 1
 							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 							'"No, I''m not doing anything like that. I''m just going to stick to my lingerie shoot today."'
 							'"Oh, okay. That''s fine <<$pcs_firstname>>. Maybe another time."'
@@ -581,6 +650,7 @@ if $ARGS[0] = 'glamour_persuasion':
 					act'That''s not so bad...':
 						cla & *clr
 						foto_persuade = 4
+						foto['suborn'] = 0
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 						'"That''s not so bad I guess... I''m already doing lingerie so that''s not much of a difference."'
 						'"Yes, exactly! Think of it just like that. Thanks for this <<$pcs_firstname>>. Just go to this set and we''ll set somebody up for you."'
@@ -594,6 +664,7 @@ if $ARGS[0] = 'glamour_persuasion':
 			if foto_persuade = 2 and pcs_inhib < 45:
 				act'I guess so':
 					cla & *clr
+					foto['suborn'] = 0
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 					'"Well... I guess it turned out well last time... I could give it a try..."'
 					'The manager smiles wide at you.'
@@ -604,6 +675,7 @@ if $ARGS[0] = 'glamour_persuasion':
 				act'I guess I could try it...':
 					cla & *clr
 					foto_persuade = 2
+					foto['suborn'] = 0
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 					'"I guess I could try it..."'
 					'"Great! Thank you so much <<$pcs_firstname>>! Just go to this set and we''ll set somebody up for you."'
@@ -612,6 +684,7 @@ if $ARGS[0] = 'glamour_persuasion':
 			else
 				act'Yes':
 					cla & *clr
+					foto['suborn'] = 0
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 					'"That sounds really good actually! I''ll do it!"'
 					'The manager smiles wide at you.'
@@ -639,11 +712,20 @@ if $ARGS[0] = 'trans_persuasion':
 		'"Hey <<$pcs_firstname>>, the staff have been talking again. I know I asked before, but I was wondering if you might be more comfortable now. Is it possible that you might consider doing a transparent clothing shoot today instead of a basic glamour one? No pressure if not, but I just wanted to check and see if you''re ready."'
 	end
 	
-	gs 'willpower', 'skill', 'pcs_inhib', 'resist'
+	if foto['suborn'] >= 5:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	elseif foto['suborn'] >= 3:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+	elseif foto['suburn'] > 0:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+	else
+		will_cost = 0
+	end
 	if will_cost <= pcs_willpwr:
 		act'No thanks (<<will_cost>> Willpower)':
 			cla & *clr
 			foto_persuade = 1
+			foto['suborn'] += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Thanks for the offer, but I think I''ll stick to the basic glamour shoot today."'
 			'"Oh. Okay..."'
@@ -656,6 +738,7 @@ if $ARGS[0] = 'trans_persuasion':
 	if foto_persuade > 1 and foto_persuade < 4 and pcs_inhib < 45:
 		act'I guess so':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Well... I guess it turned out well last time..."'
 			'The manager smiles wide at you.'
@@ -666,6 +749,7 @@ if $ARGS[0] = 'trans_persuasion':
 	elseif foto_persuade = 1 or foto_persuade = 4:
 		act'I guess I could try':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Well... I guess I could give it a try..."'
 			'The manager smiles wide at you.'
@@ -676,6 +760,7 @@ if $ARGS[0] = 'trans_persuasion':
 		
 		act'Yes, I''m ready':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"You know what? I think I <i>am</i> ready. I''ll give it a try."'
 			'The manager smiles wide at you.'
@@ -686,6 +771,7 @@ if $ARGS[0] = 'trans_persuasion':
 	else
 		act'Yes':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"That sounds really good actually! I''ll do it!"'
 			'The manager smiles wide at you.'
@@ -708,11 +794,20 @@ if $ARGS[0] = 'topless_persuasion':
 		'"Hey <<$pcs_firstname>>, you seem to be doing really well with the transparent shoots, just like we thought. I know that initially took some convincing, but we got here didn''t we? Now, I was wondering if you''d like to try go a step further just like before and take the whole top off? You''ve never done a topless shoot and it isn''t much different from what we''re doing now. Our rates for topless shoots are better and you''ll get a lot more exposure than what you''re doing now. Want to try it?"'
 	end
 	
-	gs 'willpower', 'skill', 'pcs_inhib', 'resist'
+	if foto['suborn'] >= 5:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	elseif foto['suborn'] >= 3:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+	elseif foto['suburn'] > 0:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+	else
+		will_cost = 0
+	end
 	if will_cost <= pcs_willpwr:
 		act'No thanks (<<will_cost>> Willpower)':
 			cla & *clr
 			foto_persuade = 1
+			foto['suborn'] += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Thanks for the offer, but I think I''ll stick to what I''m doing for now."'
 			'"Oh. Okay..."'
@@ -729,6 +824,7 @@ if $ARGS[0] = 'topless_persuasion':
 	if foto_persuade = 2 and pcs_inhib < 50:
 		act'I guess so':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Well... I guess you''re right, it isn''t that much different. I suppose I can give it a shot..."'
 			'The manager smiles wide at you.'
@@ -739,6 +835,7 @@ if $ARGS[0] = 'topless_persuasion':
 	elseif foto_persuade = 1:
 		act'Yes, I''m ready':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"You know what? Yeah, I think I''ll give it a try today. I think I <i>am</i> ready!"'
 			'The manager smiles wide at you.'
@@ -749,6 +846,7 @@ if $ARGS[0] = 'topless_persuasion':
 	else
 		act'Yes':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"That sounds really good actually! Let''s do it!"'
 			'The manager smiles wide at you.'
@@ -771,11 +869,20 @@ if $ARGS[0] = 'nude_persuasion':
 		'"Hey <<$pcs_firstname>>, I''ve got a new offer from the studio for you. They''ve really loved your willingness to try new things like with the past shoots and all and they wanted to know if you would like to step it up to the final level. Would you be willing to do a full frontal nude shoot with us? As a special bonus, the studio said they''re willing to double your pay for your full debut. I have to say, this is a great offer. What do you think of it?"'
 	end
 	
-	gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	if foto['suborn'] >= 5:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+	elseif foto['suborn'] >= 3:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+	elseif foto['suburn'] > 0:
+		gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+	else
+		will_cost = 0
+	end
 	if will_cost <= pcs_willpwr:
 		act'No thanks (<<will_cost>> Willpower)':
 			cla & *clr
 			foto_persuade = 1
+			foto['suborn'] += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Thanks for the offer, that''s really kind, but I think I''ll stick to what I''m doing for now."'
 			'"Oh. Okay..."'
@@ -794,6 +901,7 @@ if $ARGS[0] = 'nude_persuasion':
 	if foto_persuade = 2 and pcs_inhib < 60:
 		act'Wow! I... I guess I''ll take it':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Wow! That''s a really amazing offer! I mean... well to be honest, I''m not sure if I''m ready for that but... I guess, I''ll do it if the studio really believes in me so much."'
 			'The manager smiles wide at you.'
@@ -802,9 +910,11 @@ if $ARGS[0] = 'nude_persuasion':
 			foto_persuade = 5
 			act'Do the nude shoot':gt'foto_shoot','nude'
 		end
-	elseif foto_persuade = 1 and pcs_inhib < 60:
+	end
+	if foto_persuade = 1 and pcs_inhib < 60:
 		act'Well... I guess':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Well..." You mull it over a little bit more, still unsure of yourself. "I mean, I... I guess I can give it a try."'
 			'The manager smiles wide at you. "Thank you so much for your courage <<$pcs_firstname>>."'
@@ -816,22 +926,23 @@ if $ARGS[0] = 'nude_persuasion':
 	elseif foto_persuade = 1:
 		act'Yes, I''m ready':
 			cla & *clr
+			foto['suborn'] = 0
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"You know what? I think I''m ready to do it today! I''ll do the nude shoot," you say, smiling. "And I''ll take the bonus."'
 			'The manager laughs showing you his clipboard. "Go to this set here and everything is already set up for you."'
 			foto_persuade = 5
 			act'Do the nude shoot':gt'foto_shoot','nude'
 		end
-	else
-		act'Wow! Yes!':
-			cla & *clr
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-			'"Wow! That''s a really amazing offer! That''s so generous! Yes! I''ll absolutely do it!"'
-			'The manager smiles wide at you.'
-			'"Great! Then go to this set here and the photographer will be ready for you."'
-			foto_persuade = 5
-			act'Do the nude shoot':gt'foto_shoot','nude'
-		end
+	end
+	act'Wow! Yes!':
+		cla & *clr
+		foto['suborn'] = 0
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+		'"Wow! That''s a really amazing offer! That''s so generous! Yes! I''ll absolutely do it!"'
+		'The manager smiles wide at you.'
+		'"Great! Then go to this set here and the photographer will be ready for you."'
+		foto_persuade = 5
+		act'Do the nude shoot':gt'foto_shoot','nude'
 	end
 end
 
@@ -1320,19 +1431,7 @@ if $ARGS[0] = 'designer_wedding':
 	end
 end
 
-!!if $ARGS[0] = 'documentary':
-!!	cla & *clr
-!!	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-!!	'"Documentary?" you ask. "What do you mean documentary? What''s this about?"'
-!!	'"It''s not a modelling job, but someone''s going around asking about life as a model and in the industry. They want to interview some of the models here. Point a camera at them, ask them a few questions, put it on the internet and stuff. The pay is about that of a standard nude shoot but it''s also likely to increase your profile more than the average nude shoot, how many people who''ve seen your face, know your name. Could be good for increasing your reputation or popularity."'
-!!	'"Hmmm..."'
-!!	act'Back to the list':gt'foto_events','list'
-!!	act'I''d like to do this one':
-!!		cla
-!!		*nl
-!!		specialjob7 = 0
-!!
-!!end
+
 
 
 
@@ -1414,7 +1513,7 @@ end
 if $ARGS[0] = 'topless1.1':
 	*clr & cla
 	pcs_hairbsh = 1
-	pcs_makeup = 2
+	pcs_makeup = 5
 	pcs_lipbalm += 8
 	gs 'underwear', 'wear'
 	gs 'stat'
@@ -1551,7 +1650,7 @@ if $ARGS[0] = 'pool1':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
 					pcs_hairbsh = 1
-					pcs_makeup = 2
+					pcs_makeup = 5
 					pcs_lipbalm += 8
 					'You go over to your station and touch up your makeup, make sure it''s perfect. You see a few of the other girls who are participating in the shoot doing the same. Soon, everyone is ready and you all pile into a shuttle and drive to the shooting location.'
 					'As promised, as soon as you all arrive, they''re ready to start.'
@@ -1652,7 +1751,7 @@ if $ARGS[0] = 'tennis':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
 					pcs_hairbsh = 1
-					pcs_makeup = 2
+					pcs_makeup = 5
 					pcs_lipbalm += 8
 					'You go over to your station and see what they left for you. You see sneakers and a skirt, a visor and a sweat band, and a racket. There is a noticable lack of top or underwear. They didn''t tell you this was going to be a topless shoot, but you guess you shouldn''t be that surprised.'
 					'You pull up the skirt and put on your makeup before heading over to the set.'
@@ -1700,8 +1799,7 @@ if $ARGS[0] = 'topless2':
 		act'"What''s up?"':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-			'"You''ve been doing well around here lately. We were going to do a sunny penthouse topless pool shoot off site. Wanted to know if you wanted to be our girl and get paid for an job this week? It''ll take an extra hour though so if you''re busy we can always grab one of the other girls. How ''bout it? You want in?"'
-			
+			'"Are you free right now? We were going to do a sunny penthouse topless pool shoot off site but one of the girls who was scheduled for it cancelled on us. Wanted to know if you wanted to take her place? It''ll be about 3 hours. You want in?"'
 			gs 'willpower', 'exhib', 'resist'
 			if will_cost <= pcs_willpwr:
 				act'"No thanks" (<<will_cost>> Willpower)':
@@ -1728,7 +1826,7 @@ if $ARGS[0] = 'topless2':
 					*clr & cla
 					minut += 30
 					pcs_hairbsh = 1
-					pcs_makeup = 2
+					pcs_makeup = 5
 					pcs_lipbalm += 8
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
 					'You head over to your makeup station to get yourself sorted out before getting changed and jumping in the van with the rest of the crew.'
@@ -1775,8 +1873,7 @@ if $ARGS[0] = 'beach2':
 		act'"What''s up?"':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-			'"Hey <<$pcs_firstname>>, Looking to get an extra job in this week? We were planning on doing a topless beach shoot today. It''s a five hour job if you include the travel time but we''ll pay you extra on top of what you''d normally get as a bit of compensation. So, do you want it?'
-
+			'"Hey <<$pcs_firstname>>, we''re looking for girls to do a topless beach shoot today. It''s a five hour job if you include the travel time but we''ll pay you extra on top of what you''d normally get as a bit of compensation. So, do you want it?"'
 			gs 'willpower', 'exhib', 'resist'
 			if will_cost <= pcs_willpwr:
 				act'"No thanks" (<<will_cost>> Willpower)':
@@ -1803,7 +1900,7 @@ if $ARGS[0] = 'beach2':
 					*clr & cla
 					minut += 30
 					pcs_hairbsh = 1
-					pcs_makeup = 2
+					pcs_makeup = 5
 					pcs_lipbalm += 8
 					gs 'underwear', 'wear'
 					gs 'stat'
@@ -1860,7 +1957,7 @@ if $ARGS[0] = 'pool2':
 		act'"What''s up?"':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-			'"Hey <<$pcs_firstname>>, we were thinking about doing a topless pool shoot. It''s offsite so it''ll be an extra hour or two but it''s also an extra payday if you want it. So? Do you want it?'
+			'"Hey <<$pcs_firstname>>, we were thinking about doing a topless pool shoot. It''s offsite so it''ll be an extra hour or two but it''s also an extra payday if you want it. So? Do you want it?"'
 
 			gs 'willpower', 'exhib', 'resist'
 			if will_cost <= pcs_willpwr:
@@ -1882,7 +1979,7 @@ if $ARGS[0] = 'pool2':
 			act'"Sure"':
 				*clr & cla
 				pcs_hairbsh = 1
-				pcs_makeup = 2
+				pcs_makeup = 5
 				pcs_lipbalm += 8
 				minut += 30
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
@@ -1917,6 +2014,21 @@ if $ARGS[0] = 'pool2':
 	end
 end
 
+if $ARGS[0] = 'runway1':
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+	'"<<$pcs_firstname>>!"'
+	'As you walk out of the changing room you hear someone call your name.'
+	act'Turn around':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+		'As you turn you see a photographer running towards you, waving you over. You walk over to talk to him.'
+		act'"What''s up?"':
+			*clr & cla
+			
+		end
+	end
+end
+
 
 if $ARGS[0] = 'runway2':
 	*clr & cla
@@ -1933,7 +2045,6 @@ if $ARGS[0] = 'runway2':
 			'Hey <<$pcs_firstname>>, listen. We have an emergency situation and we''re looking for whoever is available. A clothing studio we sometimes shoot for is having a fashion show tonight but for some reason something''s gone wrong and they''re missing models."'
 			'"Missing models?" you gasp. "You mean like they''ve disappeared or something?"'
 			'He looks confused for a second and says, "What? No! Just for whatever reason, they don''t have enough models for tonight. I don''t know if it''s because some of them got sick or had an accident or if they just planned poorly and were supposed to have more than they hired. In any case, we need people to jump in tonight. It''s going to be an all day thing though. We can''t have anymore hiccups so if you agree you''ll have to stay here until the show starts and then the show itself runs until 22:00 tonight. We know it''s a big commitment so if you do we''re willing to shell out a ton of money to make this work. We''re talking a three grand bonus on top of your normal variety shoot rate. Can we count on you for tonight?"'
-
 			gs 'willpower', 'exhib', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
 				act'"I''m sorry, I can''t be out that late" (<<will_cost>> Willpower)':
@@ -1977,7 +2088,7 @@ if $ARGS[0] = 'runway2':
 				act'Continue':
 					*clr & cla
 					'<center><video autoplay loop src="images/locations/city/citycenter/photo/runway_waiting.mp4"></video></center>'
-					'Eventually the photographer succeeds in rounding up as many models including one really new girl who looks like it might have been her first day here when the photographer found her. You''re all sat down on a line of chairs and told to wait for the studio to do your makeup and wardrobe.'
+					'Eventually the photographer succeeds in rounding up as many models including girl who looks like it might have been her first day here when the photographer found her. You''re all sat down on a line of chairs and told to wait for the studio to do your makeup and wardrobe.'
 					act'Continue':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
@@ -1988,27 +2099,54 @@ if $ARGS[0] = 'runway2':
 						'The runway crew shows up and immediately moves you to the makeup station to get your hair and everything done. They really shovel it on for this. A bit different to the subtle makeup you normally put on for modelling.'
 						'They put you into the clothes that they''ve decided you''re going to be modelling and you wait for the show to begin.'
 						act'Continue':
-							hour = 20
-							modelpayfin = 6000 + (modelpay * 3) + (50*rand(0,7))
-							city_modelling += 30
-							pav_modelling += rand(0,city_modelling)/5
+							hour += 1
+							modelpayfin = 500 + (city_modelling * 10) + (modelpay * 3) + (50*rand(0,7))
+							city_modelling += rand(10,30)
+							pav_modelling += rand(0,city_modelling)/8
 							mdlng_exp += rand(8,10)
 							modelfoto_nip += 1
+							gs'stat'
 							*clr & cla
-							'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/skill_runway.mp4"></video></center>'
-							'As soon as they send you down the runway you realize something''s gone wrong. The loose cleavage of the dress you''re wearing is too loose. With the kind of purposeful steps you''re taking and your breasts jiggling underneath, the fabric falls to the sides and your breasts are left completely exposed. You try your best to recover but the dress is just too loose and skimpy and no matter what you do your breasts end up coming loose.'
-							'With nothing left to it and not wanting to make a big deal out of it and ruin the show, you put on your best model smile and just get through the rest of your walk.'
+							model['runway_outfit'] = rand(1,5)
+							if model['runway_outfit'] = 1:
+								'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/runway/1.mp4"></video></center>'
+								'As soon as they send you down the runway you realize something''s gone wrong. The loose cleavage of the dress you''re wearing is <i>too</i> loose. With the kind of purposeful steps you''re taking and your breasts jiggling underneath, the fabric falls to the sides and your breasts are left completely exposed. You try your best to recover but the dress is just too loose and skimpy and no matter what you do your breasts end up coming loose.'
+								'With nothing left to it and not wanting to make a big deal out of it and ruin the show, you put on your best model smile and just get through the rest of your walk.'
+							elseif model['runway_outfit'] = 2:
+								'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/runway/2.mp4"></video></center>'
+								'One of the problems with being a model is that you don''t get to actually choose the clothing you''re going to wear.'
+								*nl
+								'In this case, it''s really nothing more than panties with a backless and transparent mesh top that completely exposes your breasts. You aren''t sure what the intention of the designer was, but you know that modesty wasn''t part of it. But you smile and show off the outfit and your body anyways, posing briefly before walking back.'
+							elseif model['runway_outfit'] = 3:
+								'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/runway/3.mp4"></video></center>'
+								'The outfit you''re dressed in is a leopard print jumpsuit will bellbottoms. The outrageous pattern aside, it doesn''t show much skin and as a result, you find it easy to work your body to show off the outfit instead of your own assets. With a smile, a pose, and a wink, you get it done and begin your walk back.'
+							elseif model['runway_outfit'] = 4:
+								'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/runway/4.mp4"></video></center>'
+								if tits >= 3:
+									'As you walk forward, you can''t help but wonder if the girl this outfit was designed for a girl with small breasts. It''s tight around your chest and you can feel it riding up with every step. In the short the time it takes you to get to the end of the runway, the top has risen so much that your nipples are just barely still hidden by its hem. Within a few steps on the way back you need to pull it back in place. But at least once the walk is finished you''ll finally be able to let your sweater puppies free.'
+								elseif tits >= 2:
+									'As you walk forward, you can''t help but wonder if the girl this outfit was designed for a girl with smaller breasts than you. Or maybe even a girl who is completely flat. Even around your humble bosom, you can feel the material straining against your chest and it rides up with every step you take forward. In the short the time it takes you to get to the end of the runway, the top has risen so much that your nipples are just barely still hidden by its hem. Within a few steps on the way back you need to pull it back in place. But at least once the walk is finished you''ll finally be able to take this thing off and breathe normally again.'
+								else
+									'As you walk forward, you can''t help but wonder what idiot designed this outfit. Even with your virtually flat chest, your body strains against the material. You can feel it riding up with every step you take forward. In the short the time it takes you to get to the end of the runway, the top has risen so much that your nipples are just barely still hidden by its hem. Within a few steps on the way back you need to pull it back in place. But at least once the walk is finished you''ll finally be able to take this thing off and breathe normally again.'
+								end
+							elseif model['runway_outfit'] = 5:
+								'<center><video autoplay loop src="images/locations/city/citycenter/photo/skill/runway/5.mp4"></video></center>'
+								'The outfit you''re placed in really has you wondering again if fashion is really about art and style or if it''s just about putting women in exposed situations.'
+								*nl
+								'It''s hard not to wonder when the outfit is nothing more than a pink swimsuit bottom with wide overall type straps that only exist to cover up your nipples.'
+							end
 							act'Continue':
 								*clr & cla
-								hour = 22
+								hour += 1
 								money += modelpayfin
 								modelfotomoney += modelpayfin
+								gs'stat'
 								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 								if StoryLine = 1 and age < 18:
-									'Two hours later, the show is over and you''re left naked in the studio, counting the <<modelpayfin>> <b>₽</b> you''ve been paid and musing over the happenings of the night. Your fame has almost certainly increased by a large margin thanks to your professional composure during the wardrobe malfunction and that''s great. But at the same time, this kind of thing has the tendency to circle around and you <i>really</i> hope nobody in Pavlovsky hears about this...'
+									'Another hour later, the show is over, the clothes are taken back, and you''re left naked in the studio, counting the <<modelpayfin>> <b>₽</b> you''ve been paid and musing over the happenings of the night. Working the runway isn''t too bad. But at the same time, this kind of thing has the tendency to circle around and you <i>really</i> hope nobody in Pavlovsk hears about this...'
 									act'Back in the studio':gt'foto','studio'
 								else
-									'Two hours later, the show is over and you''re left naked in the studio, counting the <<modelpayfin>> <b>₽</b> you''ve been paid and musing over the happenings of the night. Your fame has almost certainly increased by a large margin thanks to your professional composure. You''re proud of yourself that you held it together like that and you''re excited to see what opportunities this added fame might bring.'
+									'Another hour later, the show is over and you''re left naked in the studio, counting the <<modelpayfin>> <b>₽</b> you''ve been paid and musing over the happenings of the night. Working the runway isn''t too bad.'
 									act'Back in the studio':gt'foto','studio'
 								end
 							end
@@ -2065,14 +2203,14 @@ if $ARGS[0] = 'wet':
 						*clr & cla
 						minut += 120
 						pcs_hairbsh = 1
-						pcs_makeup = 2
+						pcs_makeup = 5
 						pcs_lipbalm += 8
 						'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/wet.mp4"></video></center>'
 						'You put on your makeup and follow him over to the water proof set in the studio and spend the next two hours shrieking and giggling as you get blasted with water while photographed nude.'
 						'He wasn''t kidding! That water is cold!'
 						act'Continue':
 							cla
-							modelpayfin = 3000 + (modelpay * 2) + (50*rand(0,7))
+							modelpayfin = 1000 + (modelpay * 2) + (50*rand(0,7))
 							modelfoto_nip += 1
 							modelfoto_topless += 1
 							modelfoto_nude += 1

+ 1176 - 0
locations/foto_model_documentary.qsrc

@@ -0,0 +1,1176 @@
+# foto_model_documentary
+
+
+!! ----------------------------------------------------------------------------------------------------
+!!
+!! ------------------------------- First Time Model Documentary ---------------------------------------
+!!
+!! ----------------------------------------------------------------------------------------------------
+if $ARGS[0] = '1st_documentary':
+	if foto['1st_documentary'] = 1:gt'foto_events2','2nd_documentary'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+	'You step out of the locker room and almost run head first into one of the managers.'
+	'"Woah!" you say, jumping back. "What are you doing going into the girls locker room?"'
+	'"Oh <<$pcs_firstname>>, glad I caught you before you wandered off somewhere else in the studio. I was just going to see if anyone else showed up today. We''re looking for volunteers to participate in some interviews for a documentary."'
+	'"Documentary?" you ask. "What about?"'
+	'"There''s some people here today who are making a film about models, their lives, and about working here. They want to capture girls working here in their usual working environment so you wouldn''t dressing up or anything, just interviewed as in the studio approved dress code."'
+	*nl
+	'<i>You mean naked...</i> you think to yourself.'
+	*nl
+	'"They''re paying the equivalent of a two hour nude shoot for every model that participates. Do you want in?"'
+	
+	if modelfoto_nip < 1:
+		act'No way! I''ve never been naked on camera before!':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+			'"No way! I''ve never been naked on camera before!"'
+			'"Oh, yeah that''s right. Sure you don''t want this to be your first time?"'
+			'"They''re doing them right now and they said it will only take a few minutes. Might be good for your profile. People are always more interested when they see the personality behind a pretty face. It could give your popularity as a model a big boost."'
+
+			if pcs_inhib < 30:
+				gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+			elseif pcs_inhib < 45:
+				gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+			elseif pcs_inhib < 60:
+				gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+			else
+				will_cost = 0
+			end
+			if will_cost <= pcs_willpwr:
+				act'Still no':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"Ehhh, still no."'
+					'"Alright, that''s fine. I just wanted to double check."'
+					'With that, he pays you no more mind and ducks past into the locker room, presumably to ask other girls who are in there if they want to participate.'
+					act'Go to the set':gt'foto','studio'
+				end
+			else
+				act 'Still no (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			act'I guess I could...':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+				'"I guess I could... If it''s really that good for my profile..."'
+				'"Alright! Just go over to set <<rand(1,50)>> and tell a production assistant you''re one of the volunteers. They''re set up in there for the day." He points you in the direction of the right set and ducks into the locker room, presumably to ask other girls who are in there if they want to participate.'
+				act'Go to the set':gt'foto_model_documentary','documentary_1'
+			end
+		end
+	end
+	
+	act'No thanks, not interested':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+		'"Ehh, no thanks. The pay sounds nice, but I''m just not interested."'
+		'"You sure? They''re doing them right now and they said it will only take a few minutes. Might be good for your profile. People are always more interested when they see the personality behind a pretty face. It could give your popularity as a model a big boost."'
+		if pcs_inhib < 30:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+		elseif pcs_inhib < 45:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+		elseif pcs_inhib < 60:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+		else
+			will_cost = 0
+		end
+		if will_cost <= pcs_willpwr:
+			act'Still no':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+				'"Ehhh, still no."'
+				'"Alright, that''s fine. I just wanted to double check. Not like it''s the agency is the one paying anything," he laughs, ducking into the locker room, presumably to ask other girls who are in there if they want to participate.'
+				act'Go to the set':gt'foto','studio'
+			end
+		else
+			act 'Still no (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		
+		act'I guess I could...':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+			'"I guess I could... If it''s really that good for my profile..."'
+			'"Alright! Just go over to set <<rand(1,50)>> and tell a production assistant you''re one of the volunteers. They''re set up in there for the day." He points you in the direction of the right set and ducks into the locker room, presumably to ask other girls who are in there if they want to participate.'
+			act'Go to the set':gt'foto_model_documentary','documentary_1'
+		end
+	end
+	
+	act'No thanks, I''m here to model':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+		'"Ehh, no thanks. I''m here to model, not do interviews."'
+		'"You sure? They''re doing them right now and they said it will only take a few minutes. Might be good for your profile. People are always more interested when they see the personality behind a pretty face. Exposure is important for a model too."'
+		if pcs_inhib < 30:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'easy'
+		elseif pcs_inhib < 45:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'medium'
+		elseif pcs_inhib < 60:
+			gs 'willpower', 'skill', 'pcs_inhib', 'resist', 'hard'
+		else
+			will_cost = 0
+		end
+		if will_cost <= pcs_willpwr:
+			act'Still no':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+				'"Ehhh, still no."'
+				'"Alright, that''s fine. I just wanted to double check. Not like it''s the agency is the one paying anything," he laughs, ducking into the locker room, presumably to ask other girls who are in there if they want to participate.'
+				act'Go to the set':gt'foto','studio'
+			end
+		else
+			act 'Still no (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		
+		act'I guess I could...':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+			'"I guess I could... If you really think it''ll help my career."'
+			'"Alright! Just go over to set <<rand(1,50)>> and tell a production assistant you''re one of the volunteers. They''re set up in there for the day." He points you in the direction of the right set and ducks into the locker room, presumably to ask other girls who are in there if they want to participate.'
+			act'Go to the set':gt'foto_model_documentary','documentary_1'
+		end
+	end
+
+!!	if storyline = 1 and age < 18:
+!!		act'No thanks (don''t want people to find out)':
+!!			cla & *clr
+!!			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+!!			'"Ehh, no thanks. I''m here to model, not do interviews."'
+!!		end
+!!	end
+	
+	act'Sure, I''ll take part':
+		cla
+		*nl
+		specialjob7 = 0
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+		'"Sure, I''ll take part," you say.'
+		'"Alright, just go over to set <<rand(1,50)>> and tell a production assistant you''re one of the volunteers. They''re set up in there for the day."'
+		act'Go to the set':gt'foto_model_documentary','documentary_1'
+	end
+end
+
+if $ARGS[0] = 'documentary_1':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+	'You head over to where you were directed and see a group of people standing around several video cameras set up with lights shining on an empty set.'
+	'Walking over to them you say, "Hi, I''m one of the models who volunteered to be interviewed. Is this the right place?"'
+	'"Sure is," a woman with a notepad says. "We just got done with the last girl, why don''t you just jump in now."'
+	act'Stand on set':
+		minut += rand(2,4)
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+		'They put you in the middle of the set and spend a few minutes getting the lighting right and fiddling with camera settings. Then the woman who spoke to you before calls out to you.'
+		'"Okay, we''re all set. Ready?"'
+		'You nod.'
+		'"Okay, first question then. What''s your name, how old are you, and what is your job?"'
+		act'I''m <<$pcs_firstname>>':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			if age >= 18:
+				if modelfoto_erotic > 0:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m an erotic model at Aphrodite photography."'
+				elseif modelfoto_nude > modelfoto_fashion and modelfoto_nude > modelfoto_fitness and modelfoto_nude > modelfoto_glamour and modelfoto_nude > modelfoto_lingerie and modelfoto_nude > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m an artistic nude model at Aphrodite photography."'
+				elseif modelfoto_fitness > modelfoto_fashion and modelfoto_fitness > modelfoto_nude and modelfoto_fitness > modelfoto_glamour and modelfoto_fitness > modelfoto_lingerie and modelfoto_fitness > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m a fitness model at Aphrodite photography."'
+				elseif modelfoto_glamour > modelfoto_fashion and modelfoto_glamour > modelfoto_nude and modelfoto_glamour > modelfoto_fitness and modelfoto_glamour > modelfoto_lingerie and modelfoto_glamour > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m a glamour model at Aphrodite photography."'						
+				elseif modelfoto_lingerie > modelfoto_fashion and modelfoto_lingerie > modelfoto_nude and modelfoto_lingerie > modelfoto_fitness and modelfoto_lingerie > modelfoto_glamour and modelfoto_lingerie > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m a lingerie model at Aphrodite photography."'						
+				elseif modelfoto_fashion > modelfoto_lingerie and modelfoto_fashion > modelfoto_nude and modelfoto_fashion > modelfoto_fitness and modelfoto_fashion > modelfoto_glamour and modelfoto_fashion > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m a fashion model at Aphrodite photography."'
+				else
+					'"My name is <<$pcs_firstname>>. I''m <<age>> years old, and I''m a catalog model at Aphrodite photography."'
+				end
+			else
+				if modelfoto_erotic > 0:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m an erotic model at Aphrodite photography."'
+				elseif modelfoto_nude > modelfoto_fashion and modelfoto_nude > modelfoto_fitness and modelfoto_nude > modelfoto_glamour and modelfoto_nude > modelfoto_lingerie and modelfoto_nude > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m an artistic nude model at Aphrodite photography."'
+				elseif modelfoto_fitness > modelfoto_fashion and modelfoto_fitness > modelfoto_nude and modelfoto_fitness > modelfoto_glamour and modelfoto_fitness > modelfoto_lingerie and modelfoto_fitness > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m a fitness model at Aphrodite photography."'
+				elseif modelfoto_glamour > modelfoto_fashion and modelfoto_glamour > modelfoto_nude and modelfoto_glamour > modelfoto_fitness and modelfoto_glamour > modelfoto_lingerie and modelfoto_glamour > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m a glamour model at Aphrodite photography."'
+				elseif modelfoto_lingerie > modelfoto_fashion and modelfoto_lingerie > modelfoto_nude and modelfoto_lingerie > modelfoto_fitness and modelfoto_lingerie > modelfoto_glamour and modelfoto_lingerie > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m a lingerie model at Aphrodite photography."'
+				elseif modelfoto_fashion > modelfoto_lingerie and modelfoto_fashion > modelfoto_nude and modelfoto_fashion > modelfoto_fitness and modelfoto_fashion > modelfoto_glamour and modelfoto_fashion > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m a fashion model at Aphrodite photography."'
+				elseif modelfoto_catalog > 0:
+					'"My name is <<$pcs_firstname>>. I''m <<model[''age'']>> years old, and I''m a catalog model at Aphrodite photography."'
+				end
+			end
+			*nl
+			gs 'foto_model_documentary','documentary_2'
+		end
+		
+		act'I''m <<$pcs_nickname>>':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			if age >= 18:
+				if modelfoto_erotic > 0:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m an erotic model at Aphrodite photography."'
+				elseif modelfoto_nude > modelfoto_fashion and modelfoto_nude > modelfoto_fitness and modelfoto_nude > modelfoto_glamour and modelfoto_nude > modelfoto_lingerie and modelfoto_nude > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m an artistic nude model at Aphrodite photography."'
+				elseif modelfoto_fitness > modelfoto_fashion and modelfoto_fitness > modelfoto_nude and modelfoto_fitness > modelfoto_glamour and modelfoto_fitness > modelfoto_lingerie and modelfoto_fitness > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a fitness model at Aphrodite photography."'
+				elseif modelfoto_glamour > modelfoto_fashion and modelfoto_glamour > modelfoto_nude and modelfoto_glamour > modelfoto_fitness and modelfoto_glamour > modelfoto_lingerie and modelfoto_glamour > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a glamour model at Aphrodite photography."'
+				elseif modelfoto_lingerie > modelfoto_fashion and modelfoto_lingerie > modelfoto_nude and modelfoto_lingerie > modelfoto_fitness and modelfoto_lingerie > modelfoto_glamour and modelfoto_lingerie > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a lingerie model at Aphrodite photography."'
+				elseif modelfoto_fashion > modelfoto_lingerie and modelfoto_fashion > modelfoto_nude and modelfoto_fashion > modelfoto_fitness and modelfoto_fashion > modelfoto_glamour and modelfoto_fashion > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a fashion model at Aphrodite photography."'
+				elseif modelfoto_catalog > modelfoto_fashion and modelfoto_catalog > modelfoto_fitness and modelfoto_catalog > modelfoto_glamour and modelfoto_catalog > modelfoto_lingerie:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a catalog model at Aphrodite photography."'
+				else
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<age>> years old, and I''m a model at Aphrodite photography."'
+				end
+			else
+				if modelfoto_erotic > 0:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m an erotic model at Aphrodite photography."'
+				elseif modelfoto_nude > modelfoto_fashion and modelfoto_nude > modelfoto_fitness and modelfoto_nude > modelfoto_glamour and modelfoto_nude > modelfoto_lingerie and modelfoto_nude > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m an artistic nude model at Aphrodite photography."'
+				elseif modelfoto_fitness > modelfoto_fashion and modelfoto_fitness > modelfoto_nude and modelfoto_fitness > modelfoto_glamour and modelfoto_fitness > modelfoto_lingerie and modelfoto_fitness > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a fitness model at Aphrodite photography."'
+				elseif modelfoto_glamour > modelfoto_fashion and modelfoto_glamour > modelfoto_nude and modelfoto_glamour > modelfoto_fitness and modelfoto_glamour > modelfoto_lingerie and modelfoto_glamour > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a glamour model at Aphrodite photography."'
+				elseif modelfoto_lingerie > modelfoto_fashion and modelfoto_lingerie > modelfoto_nude and modelfoto_lingerie > modelfoto_fitness and modelfoto_lingerie > modelfoto_glamour and modelfoto_lingerie > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a lingerie model at Aphrodite photography."'
+				elseif modelfoto_fashion > modelfoto_lingerie and modelfoto_fashion > modelfoto_nude and modelfoto_fashion > modelfoto_fitness and modelfoto_fashion > modelfoto_glamour and modelfoto_fashion > modelfoto_catalog:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a fashion model at Aphrodite photography."'
+				elseif modelfoto_catalog > modelfoto_fashion and modelfoto_catalog > modelfoto_fitness and modelfoto_catalog > modelfoto_glamour and modelfoto_catalog > modelfoto_lingerie:
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a catalog model at Aphrodite photography."'
+				else
+					'"My name is <<$pcs_firstname>>, but my friends call me <<$pcs_nickname>>. I''m <<model[''age'']>> years old, and I''m a model at Aphrodite photography."'
+				end
+			end
+			*nl
+			gs 'foto_model_documentary','documentary_2'
+		end
+	end
+end
+
+if $ARGS[0] = 'documentary_2':
+	minut += 2
+	gs 'stat'
+	'"Why did you decide to become a model?"'
+	act'I thought it seemed fun':
+		foto_documentary['question_2'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I just thought it seemed like fun," you giggle. "You know, dressing up in clothes, striking poses, people taking pictures. It sounded interesting, so I thought I''d give it a try."'
+		'"No big special reason, just wanted to enjoy yourself?"'
+		'"Pretty much, yeah."'
+		*nl
+		gs 'foto_model_documentary','documentary_3'
+	end
+	
+	act'I''ve always wanted to be a model':
+		foto_documentary['question_2'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/9.mp4"></video></center>'
+		'"I think I actually always wanted to be a model," you say. "It seemed... glamorous. You see supermodels in the magazines you read when you''re growing up and you see how beautiful they look and the clothes they''re wearing and you just kinda naturally wish you were them. Then you grow up a little more and you see they''re wealthy, and they''re famous, and that they''ve practically got it all! Who wouldn''t want to be one?"'
+		'"So you would say that this was sort of your dream job?"'
+		'"Yeah, I''d say that."'
+		*nl
+		gs 'foto_model_documentary','documentary_3'
+	end
+	
+	act'I just wanted some extra cash':
+		foto_documentary['question_2'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"To be honest, I''m really just here to make some money," you say. "It doesn''t take up too much time per week and the pay''s pretty good, so it''s a pretty easy way of getting some extra cash in your pocket."'
+		'"Ahh, so you aren''t that passionate about modelling, it''s just something you do to get by, is that right?"'
+		'"Well, more like I wanted to be able to buy nice things."'
+		'You laugh and the interviewer laughs with you.'
+		*nl
+		gs 'foto_model_documentary','documentary_3'
+	end
+	
+	act'I was desperate and needed money':
+		foto_documentary['question_2'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/11.mp4"></video></center>'
+		'"To be honest, I was really desperate and needed the money," you say. "I was seriously in need at the time so it didn''t really matter what I did, I just needed fast cash. I heard about this place and that they paid well depending on the kind of work you did so I signed up."'
+		'"Ahh, so you aren''t that passionate about modelling, it''s just something you do to get by, is that right?"'
+		'"Yeah, pretty much that."'
+		*nl
+		gs 'foto_model_documentary','documentary_3'
+	end
+	
+	act'I love attention':
+		foto_documentary['question_2'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I love the attention!" you smile. "I like it when people notice me. Maybe I''m a little narcissistic but it''s thrilling for me to see my own face on the cover of a magazine or to hear people talking about me. I just like being seen."'
+		'"So you became a model because you''re an attention seeker?"'
+		'"Exactly!"'
+		*nl
+		gs 'foto_model_documentary','documentary_3'
+	end
+	if Exhibitionist_lvl > 0:
+		act'It turns me on':
+			foto_documentary['question_2'] = 6
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"Because it turns me on!"'
+			'The inteviewer pauses for a moment.'
+			'"Because it... turns you on?" she asks, seemingly a little surprised at your response.'
+			'"Yeah," you grin. "Knowing that other people are out there looking at my naked body is just... <i>exciting!</i> They could be jerking off to pictures of me right now. I get wet just thinking about it!"'
+			'"Ahh. I see." She clears her throat.'
+			*nl
+			gs 'foto_model_documentary','documentary_3'
+		end
+	end
+end
+
+if $ARGS[0] = 'documentary_3':
+	minut += 2
+	gs 'stat'
+	'"So, would you say that this is something you''re actively pursuing as a career? Why or why not?"'
+	act'This is just temporary':
+		foto_documentary['question_3'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/11.mp4"></video></center>'
+		'"I don''t think so," you say. "It''s been good working here but I don''t think I could ever make a career out of it. It''s just not what I want out of life, you know?"'
+		'The interviewer nods understandingly.'
+		*nl
+		gs 'foto_model_documentary','documentary_4'
+	end
+	
+	act'I want to be the number one model in the city':
+		foto_documentary['question_3'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"I want to be the number one model in the city," you say confidently.'
+		'"Wow! High reaching goals huh? Just about the prestige or is personal achivement?"'
+		act'Prestige':
+			foto_documentary['question_3.2'] = 1
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			'"Prestige. I want this to be the thing that I''m known for decades from now."'
+			'"You want your own Wankepidia page?" the interviewer smiles at you.'
+			'"Yeah," you smile back. "That''s exactly what I want."'
+			*nl
+			gs 'foto_model_documentary','documentary_4'
+		end
+		
+		act'Personal':
+			foto_documentary['question_3.2'] = 2
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+			'"Personal I suppose. I guess I just want to prove it to myself that I can do it. If I can become the number one model in the city, maybe I can do anything."'
+			'The interviewer nods understandingly.'
+			*nl
+			gs 'foto_model_documentary','documentary_4'
+		end
+	end
+	
+	act'No, I hate dieting':
+		foto_documentary['question_3'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"No," you say. "I hate dieting too much."'
+		'The interviewer lets out a bark of laugher.'
+		'"Calorie counting isn''t for you?"'
+		act'No!':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"No!" you laugh with her. "I don''t know how some of these other girls do it. They work out regularly, eat only celery and yogurt to keep flat tummies, and all I can think about is the next time I can eat something with melted cheese on it!"'
+			*nl
+			gs 'foto_model_documentary','documentary_4'
+		end
+	end
+	
+	act'As long as it pays the bills':
+		foto_documentary['question_3'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/7.mp4"></video></center>'
+		'"I wouldn''t say no I suppose. I''ll keep working here as long as it keeps paying the bills or I find something better I guess."'
+		'The interviewer nods understandingly.'
+		*nl
+		gs 'foto_model_documentary','documentary_4'
+	end
+	
+	act'Yes! I love this job!':
+		foto_documentary['question_3'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"Yes!" you say. "I love this job! I could do this for the rest of my life! Or as long as I''m young and pretty and they''ll let me stay," you laugh.'
+		'The interviewer smiles at your genuine excitment.'
+		*nl
+		gs 'foto_model_documentary','documentary_4'
+	end
+	
+	act'I''m not sure yet':
+		foto_documentary['question_3'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/2.mp4"></video></center>'
+		'"I don''t know..." you say, rubbing your chin. "It''s not bad working here, but I don''t know if it''s something I want to keep doing for the rest of my life. I guess I''m still thinking about it."'
+		'The interviewer nods understandingly.'
+		*nl
+		gs 'foto_model_documentary','documentary_4'
+	end
+end
+
+if $ARGS[0] = 'documentary_4':
+	minut += 2
+	gs 'stat'
+	'"How confident would you say you are in your body? Has your confidence changed since you started working here?"'
+	act'I''m actually really shy':
+		foto_documentary['question_4'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/4.mp4"></video></center>'
+		'"I''m actually really quite shy," you say. "I get easily embarrassed by showing my body off."'
+		'"But you''re a model! You''re talking to us completely naked without any problems."'
+		'"I wouldn''t say without <i>any</i> problems," you giggle nervously, face turning red. "I''m good at willpowering my way through things that are embarrassing. I can deal with it in the moment but it still is embarrassing when I''m doing it."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+	
+	act'It used to be worse but I''m still a little shy':
+		foto_documentary['question_4'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/3.mp4"></video></center>'
+		'"It used to be a lot worse," you start off. "I''m definitely not as shy about my body as I used to be but it can still be embarrassing from time to time. Working here has certainly changed the way I think about myself though."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+	
+	act'I used to be shy but now I''m not':
+		foto_documentary['question_4'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"I used to be shy, but I''ve moved past that now," you smile to yourself. "At the beginning I would cringe when the camera came out. And the idea of anybody seeing my boobs was hard to deal with. I used to put my hands over them when I came out of the locker rooms. It''s almost weird to think back on those times. I can''t imagine being embarrassed by somebody looking at me now."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+	
+	act'I haven''t been shy since I was little':
+		foto_documentary['question_4'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/3.mp4"></video></center>'
+		'"It''s been a long time since I was shy," you say, thinking back. "I don''t think I''ve been embarrassed about the way that I look since I was a little girl, way before I started working here. By the time I was a teenager I was already comfortable in my own skin. Working here hasn''t really changed that."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+	
+	act'I''ve never been shy':
+		foto_documentary['question_4'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I''ve never been shy," you laugh. "Never really cared what anyone else thought of my body or the way I looked. I am who I''ve always been and I love that about myself."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+	
+	
+	act'I''m fucking hot and I know it':
+		foto_documentary['question_4'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"Look, I am fucking <i>hot</i> and I know it," you say. "I knew it before I was a model and I definitely know it now that I am one."'
+		*nl
+		gs 'foto_model_documentary','documentary_5'
+	end
+end
+
+if $ARGS[0] = 'documentary_5':
+	minut += 2
+	gs 'stat'
+	'"This actually leads into our next question. We understand that Aphrodite has a strict dress code policy here. How do you feel about it? Do you think it has helped you as a model?"'
+	act'It sucks':
+		foto_documentary['question_5'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"It sucks!" you complain. "Having to be naked all the time is uncomfortable and weird. Why can''t we just wear clothes like normal and change in and out of the stuff they want us to? I don''t think it helps at all, just makes being around the studio more awkward."'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'It''s really embarrassing':
+		foto_documentary['question_5'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"It''s really embarrassing," you say. "As I said before, I can be kind of shy about my body, so having to be naked all the time except when you''re doing a shoot is really uncomfortable for me. Everything is on display all the time and when people talk to me I just want to cover up."'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I''m not very comfortable with it':
+		foto_documentary['question_5'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"I''m not very comfortable with it," you start. "First of all, everything is just on display all the time except when you''re doing clothing shoots. So that by itself is a little discomforting. But also it''s not physically very comfortable either. If you haven''t noticed they keep it pretty cold in here. They said it has something to do with balancing temperature because of all the heat from the lights, but when I''m just walking around the studio my nipples are always freezing."'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I got used to it eventually':
+		foto_documentary['question_5'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I wasn''t really comfortable with it when I first joined but I got used to it after a while," you say. "At this point it''s just kind of automatic, I don''t even really think about it anymore. I just come to work and get undressed."'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I think it really helped me':
+		foto_documentary['question_5'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"I think it actually really helped," you say. "I was so shy when I started working here. I was embarrassed by the idea of people seeing my body, of being naked in front of others. But after a while, you''re kind of forced to become accustomed to it. When I started to realize that people weren''t staring and girls weren''t judging me, my inhibitions began to fade away. And based on how the other models acted, I started to see that confidence was sexy. The dress code was a big part of that. Wear nothing but your own skin for hours on end and you''ll be surprised how quickly you get comfortable with it."'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I don''t really mind it':
+		foto_documentary['question_5'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"I don''t really mind it," you say. "It is what it is. Other places have work uniforms, why not here?"'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I love it!':
+		foto_documentary['question_5'] = 7
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I love it! Society cares so much about being ''proper'' and not being ''indecent'', but I don''t feel that way about myself. I like my body and I like being naked. So having that as a work uniform here is great!"'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	act'I think it promotes camaraderie':
+		foto_documentary['question_5'] = 8
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I think it actually helps build camaraderie between the models," you say. "You know, whatever our background, wherever we came from, whatever reason we have for being here, we''re all women at the end of the day. And being forced to be yourself—completely yourself without even a scrap of clothing to hide behind—really causes you to be genuine with each other. It''s a sort of intimacy, but not like a sexual one. In some ways I feel like it created a sisterhood here. Like that one movie, except we would have a different name. ''The Sisterhood Without Pants,'' maybe," you laugh.'
+		*nl
+		gs 'foto_model_documentary','documentary_6'
+	end
+	
+	
+!!	if Exhibitionist_lvl > 0:
+!!		act'It gets me wet':
+!!			foto_documentary['question_5'] = 8
+!!			cla & *clr
+!!			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+!!			
+!!			
+!!			gs 'foto_model_documentary','documentary_6'
+!!		end
+!!	end
+end
+
+if $ARGS[0] = 'documentary_6':
+	minut += 2
+	gs 'stat'
+	'"Okay, now for some questions about your life outside the studio. What''s a hobby of yours?"'
+	act'Reading':
+		foto_documentary['question_6'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"I like to read. There''s nothing more relaxing to me than a good book."'
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+	
+	act'Sports':
+		foto_documentary['question_6'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I love sports!"'
+		'"So you''re an athletic girl?"'
+		'"Oh yeah! I always feel better when my body is in motion. Nothing like working up a good sweat."'
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+	
+	act'Dancing':
+		foto_documentary['question_6'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/5.mp4"></video></center>'
+		'"I like to dance. It feels good when I let my body flow to music, whether choreographed or just on the spot."'
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+	
+	act'I''m a foodie':
+		foto_documentary['question_6'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"It''s a little embarrassing being a model and all... but I''m a real foodie," you say. "I love trying new and different kinds of food, seeing what unexpected combinations work surprisingly well together. That''s what makes life worth living.'
+		if foto_documentary['question_3'] = 3:
+			'"I guess this must be why you hate dieting so much," the interviewer laughs.'
+			'"Seriously!"'
+		end
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+	
+	act'Going clubbing':
+		foto_documentary['question_6'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I like going clubbing," you say. "Go out with the girls, maybe meet a guy, buy drinks and have good times! Best way to spend a Saturday night!"'
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+	
+	act'Having sex (clean answer)':
+		foto_documentary['question_6'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"Actually... one of my favorite things to do is have sex." The interviewer''s mouth drops with a smile at the candid nature of your answer.'
+		'You smile back. "It feels good, makes me feel sexy, and after a really good roll in the hay it leaves me with a spring my step. It''s what I like the most in life, does that count as a hobby?"'
+		'"Sure does," the interviewer replies. "Can''t say I disagree with you either. Just curious though, do you prefer hook ups like with strangers? Or sex in a stable relationship like with a boyfriend?"'
+		act'Hook ups':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			'"Hook ups. I like meeting a guy and sleeping with him on the first date. It''s fun seeing the differences between guys and what they''re good at. Is that slutty?" you laugh.'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		if husband > 0:
+			act'With my husband':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+				'"With my husband actually," you say. "I''m married. Nothing is better than making love to him."'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+		else
+			act'With <b>my</b> boyfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+				'"With my boyfriend," you say. "He just knows my body so well! Spending the time investing in a relationship is the only way to get that." She nods at your sage advice.'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+			
+			act'With <b>a</b> boyfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/9.mp4"></video></center>'
+				'"I would say... with a boyfriend. I''m single for the moment, but spending the time to let someone get to know you and what turns you on really is the best. You''ll never get that kind of satisfaction randomly sleeping around." She nods at your sage advice.'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+		end
+		
+		act'Why not girlfriends?':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			'"Why not girlfriends?" you smile with a twinkle in your eye. "Who said I liked sleeping with men the most?"'
+			'The interviewer meets your eyes and blushes deeply before clearing her throat and flipping to the next page of her clipboard.'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'Group sex':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/4.mp4"></video></center>'
+			'"My favorite is actually with multiple partners," you say shyly. The interviewer gives you a <i>very</i> interested look. "Let''s just say that one set of body parts is not enough for me to feel satisfied..."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+	end
+	
+	act'Having sex (slutty answer)':
+		foto_documentary['question_6'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"Fucking!" you giggle. The interviewer pauses a moment.'
+		'"Excuse me?"'
+		'"Fucking! You know, sex. I <i>love</i> having sex. Just that feeling of a cock inside you is, mmph! Definitely my favorite hobby!"'
+		'"Ah, okayyy," she replies. "And out of curiousity, do you prefer your sex in hook ups or in stable relationships like with a boyfriend?"'
+		act'Hook ups':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"Hook ups. I <i>always</i> fuck on the first date and I like having sex with new people. It''s almost like a game for me, seeing how many guys I can sleep with." you laugh. "Right now my record''s at <<guy+temp>>."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		if husband > 0:
+			act'With my husband':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+				'"With my husband actually," you say. "I''m married. I love getting fucked by him. He knows every centimeter of my body, nobody knows how to make me cum like he does."'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+		else
+			act'With <b>my</b> boyfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+				'"With my boyfriend," you say. "He just knows my body so well! I never feel better than I do after he fucks me."'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+			
+			act'With <b>a</b> boyfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+				'"I would say... with a boyfriend. I''m single for the moment, which is a bit of a problem, but there''s nothing better than getting fucked by a guy who knows every part of your body. Unfortunately, most guys don''t have that information instinctively. It takes time for them to really learn how to make you cum."'
+				'She nods with eyebrows raised, as if surprised by your answer.'
+				*nl
+				gs 'foto_model_documentary','documentary_7'
+			end
+		end
+		
+		act'Why not girlfriends?':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+			'"Why not girlfriends?" you smile with a twinkle in your eye. "I like eating pussy just as much as I like getting eaten."'
+			'The interviewer blushes deeply, clearing her throat and flipping to the next page of her clipboard.'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'Group sex':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"My favorite is actually group sex," you giggle. The interviewer''s jaw drops.'
+			'"It''s more fun when I get to use more holes," you grin.'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+	end
+	
+	act'Masturbating':
+		foto_documentary['question_6'] = 7
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I actually really like masturbating," you giggle.'
+		'"Sorry...?" The interviewer asks, eyes wide.'
+		'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate...'
+		act'... in my room':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"I actually really like masturbating," you giggle.'
+			'"Sorry...?" The interviewer asks, eyes wide.'
+			'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate in my room. Just me, my fingers, and plenty of orgasms." Her jaw drops.'
+			'"What can I say?" you shrug. "It''s... relaxing..."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'... with my dildo':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"I actually really like masturbating," you giggle.'
+			'"Sorry...?" The interviewer asks, eyes wide.'
+			'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate with my dildo. Just me, a rubber dick, and plenty of orgasms. Her jaw drops.'
+			'"What can I say?" you shrug. "It''s... relaxing..."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'... in the shower':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"I actually really like masturbating," you giggle.'
+			'"Sorry...?" The interviewer asks, eyes wide.'
+			'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate in the shower. The combination of the steam and a good pulsing showerhead is a girl''s best friend," you say with a smirk.'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'... in the bath':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"I actually really like masturbating," you giggle.'
+			'"Sorry...?" The interviewer asks, eyes wide.'
+			'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate in the tub. It can be hard to do but if you can get your hips underneath the faucet..." you bite your lip. "Well... let''s just say it hits all the right spots..."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end
+		
+		act'... with my shower dildo':
+			cla & *clr
+			'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+			'"I actually really like masturbating," you giggle.'
+			'"Sorry...?" The interviewer asks, eyes wide.'
+			'"Masturbating! Honestly, my interests are pretty all over the place so I don''t know if any of those really classify as hobbies, but the one thing I do all the time is masturbate with my shower dildo. Nice steamy room, hot water, a shower head to use for vibrations, a nice rubber dick to fill me up, oh man. I could spend hours in there."'
+			*nl
+			gs 'foto_model_documentary','documentary_7'
+		end		
+	end
+	
+	act'Nothing in particular':
+		foto_documentary['question_6'] = 8
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I... I don''t actually have any hobbies in particular."'
+		'"Really? No hobbies at all?"'
+		'"Not really," you shrug. "I guess I just... get by at the moment."'
+		*nl
+		gs 'foto_model_documentary','documentary_7'
+	end
+end
+
+if $ARGS[0] = 'documentary_7':
+	minut += 2
+	gs 'stat'
+	'"What is your ideal date?"'
+	act'A quiet night in':
+		foto_documentary['question_7'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"My ideal date is... a quiet night in. Nothing fancy, just a nice cooked meal or maybe some takeout, a bit of wine maybe, some cuddling on the couch, just time spent being comfortable and relaxed with another person. That kind of feeling, isn''t that what romance is all about?"'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+	
+	act'Something fun with lots of activities':
+		foto_documentary['question_7'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"My ideal date is something with a lot of activities involved. I really like having fun and having stuff to do, so... like playing games at a carnival, or a day at the beach, or going through a haunted house or an escape room type of thing. That''s the kind of stuff I''d want to do if somebody asked me out on a date."'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+	
+	act'Dinner and a movie':
+		foto_documentary['question_7'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/9.mp4"></video></center>'
+		'"My ideal date is probably... dinner and a movie. It''s a little cliche, but I like it. You know? A bit of time chatting and eating together and then some time to just hang out watching something, maybe holding hands during it. It gives us stuff to talk about too, you know?"'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+	
+	act'A long walk with scenery':
+		foto_documentary['question_7'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"My ideal date is basically just a long walk. Somewhere nice like the park or along a lake, just someplace peaceful with beautiful scenery. We could talk quietly, hold hands while we walk, just <i>be</i> with each other."'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+	
+	act'Something thrilling':
+		foto_documentary['question_7'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I would love to do something thrilling on a date. Like roller coaster rides at an amusement park or jetskiing on the lake or even skydiving out of a plane! I love experiencing that rush and being able to share that with another person only makes it that much more special."'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+	
+	act'A romantic evening that ends in sex':
+		foto_documentary['question_7'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I think for me, my ideal date is a romantic evening that ends with great sex. The sex is a big part of it, sure, but without the build up its nothing. A fancy restaurant in expensive clothing, wine and chocolates, starring at each other and taking in how beautiful the other person looks. All of these things just building, building, building our desire. And at the end of the night, when we''re at our limit, that''s when we let our inhibitions go. Hands get handsy, tongues get invasive, and every touch becomes passionate and expressive. And after we''re done we can bask in the afterglow of the evening and in each other''s presence," you smile.'
+		'"<i>Just</i> those things?" the interviewer smiles back.'
+		'"And... in the afterglow of our orgasms too," you admit.'
+		*nl
+		gs 'foto_model_documentary','documentary_8'
+	end
+end
+
+if $ARGS[0] = 'documentary_8':
+	minut += 2
+	gs 'stat'
+	'"For our next question, do you have any guilty pleasures?"'
+	act'Eating things I shouldn''t':
+		foto_documentary['question_8'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/3.mp4"></video></center>'
+		'"My guilty pleasure is eating things that I really shouldn''t be. Whether that be excessive amounts of chocolate or an extra scoop of ice cream or an entire bag of crisps, sometimes it''s so tempting I can''t help but give in. And I feel really bad about it after because I know I need to maintain my figure but it''s <i>so</i> satisfying in the moment."'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+	
+	act'Day drinking':
+		foto_documentary['question_8'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I have this bad habit where I like to drink during the day sometimes. Like, I know I shouldn''t because it''s probably messing up my liver and affecting the way I interact with people, but sometimes, I just need some alcohol to be able to kick back and relax. So I''d say that''s my guilty pleasure."'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+	
+	act'Binge watching':
+		foto_documentary['question_8'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/5.mp4"></video></center>'
+		'"I''d have to say my guilty pleasure is binge watching TV series. It''s so bad because I''ll just lose hours and hours of time but when that ''play next'' button is right there, I need to know what happens next! I lose whole weekends doing that!"'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+	
+	act'Bad romcoms':
+		foto_documentary['question_8'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/4.mp4"></video></center>'
+		'"My guilty pleasure is bad romantic comedies. I know they''re cheesy, I know that the problems could be solved if the characters just listened to each other, but I can''t help myself. They''re just so cute!"'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+	
+	act'Social media':
+		foto_documentary['question_8'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"My guilty pleasure has to be social media. One minute I''m saying I''m just going to take a quick scroll through Twatter, next thing I know I''ve been reading the feeds for an hour. It''s a huge time sink and a huge problem for productivity."'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+	
+	act'Sleeping in':
+		foto_documentary['question_8'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I''d say that my guilty pleasure is having a lie in. There''s so much that needs to get done during the day, but sometimes I can''t help but whack the off button on my alarm clock and curl back up under my covers, wake up at noon instead of <<timer>>. It feels good to sleep in, but I always regret it when I realize how much stuff I could have gotten done if I had just gotten up when I was supposed to."'
+		*nl
+		gs 'foto_model_documentary','documentary_9'
+	end
+end
+
+if $ARGS[0] = 'documentary_9':
+	minut += 2
+	gs 'stat'
+	'"What do you wear to bed?"'
+	act'Underwear':
+		foto_documentary['question_9'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"Just my usual underwear. Some panties and a bra. Maybe it''s a little weird to wear a bra to bed, but it''s just comfortable for me.'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+	
+	act'Panties':
+		foto_documentary['question_9'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"Just a pair of panties. I get hot at night so I don''t wear a top but keeping my panties on keeps anything leaking out during the night and staining the sheets."'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+	
+	act'I sleep naked':
+		foto_documentary['question_9'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"I sleep naked," you say. "Au naturel. Is there any better way to sleep than just your skin and your covers?"'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+	
+	act'Negligee':
+		foto_documentary['question_9'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I wear a negligee when I sleep. It''s sexy, it''s classy, and if I need to get up for anything (or anyone) I''m still presentable."'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+	
+	act'A big t-shirt and panties':
+		foto_documentary['question_9'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/8.mp4"></video></center>'
+		'"Oh, just a big t-shirt and a pair of panties. My boobs have get cold so having an extra layer on under the covers is nice."'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+	
+	act'Just a big t-shirt':
+		foto_documentary['question_9'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"Just an oversized t-shirt usually. I have a favorite night shirt that I wear, it''s soft and roomy and it''s comfortable to sleep in."'
+		'"Just that?"'
+		'"Just that. Panties are too hot for my hips. I like to feel the breeze," you smirk.'
+		*nl
+		gs 'foto_model_documentary','documentary_10'
+	end
+end
+
+if $ARGS[0] = 'documentary_10':
+	minut += 2
+	gs 'stat'
+	'"What''s your ideal morning?"'
+	act'Early morning with exercise':
+		foto_documentary['question_10'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		'"I like to get up early," you say. "There''s just something motivating about getting an early start to the day. After that I do some exercises. Some yoga, some body weight exercises, maybe go for a run or something like that. Just something that starts off my day active and right. Then a nice hot shower and I''m ready for the day."'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Early morning to do chores':
+		foto_documentary['question_10'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/12.mp4"></video></center>'
+		'"I like to get up early and do my chores."'
+		'"Your ideal morning is doing chores?"'
+		'"It''s just a matter of maintaining structure and routine in my life. It keeps my life orderly. Making sure the laundry is pressed and my bed is made and the dishes are clean, it all puts my mind at ease. So I like doing it. And it gives me momentum to do everything else I need to accomplish later. By starting with chores, I make everything else a little easier."'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Early morning with a light breakfast':
+		foto_documentary['question_10'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"Getting an early start is important to me. Making sure my body is ready for the day you know? So I like to get up early and have a light breakfast, some scrambled eggs or maybe a salad. Nothing too heavy that will weigh me down, just give me energy for the rest of morning."'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Anything involving coffee':
+		foto_documentary['question_10'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"My ideal morning is anything that involves coffee. You give me a cup of coffee when I wake up, I will marry you."'
+		'The interviewer smiles as she writes something down in her notes and you get the feeling she''s a kindred spirit in this regard.'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Anything involving coffee (slightly crude/slutty)':
+		foto_documentary['question_10'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		'"My ideal morning is anything that involves coffee. Seriously, I will suck you off if you bring me a cup of coffee in bed."'
+		'The interviewer supresses a smile as she writes something down with eyebrows upraised. You get the feeling she knows what you mean but is a bit surprised by your choice of words.'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Sleeping in followed by brunch':
+		foto_documentary['question_10'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/3.mp4"></video></center>'
+		'"My ideal morning is one where I get to sleep in late, have a nice lazy morning, and then have brunch at the end of it. Like pancakes with jam or maybe an omlette or smoked salmon and cream cheese, oh! Or french toast and an egg quiche. If I could start every day like that I would be <i>sooooo</i> happy."'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+	
+	act'Wakeup sex':
+		foto_documentary['question_10'] = 7
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		'"My ideal morning starts with sex," you say. "Nothing to get your day going like a good orgasm right? If I wake up and somebody''s balls deep in me, that day is already a good day."'
+		'"Ahuh... Funny, someone else said something similar..." the interviewer says flipping back on her clipboard a few pages.'
+		*nl
+		gs 'foto_model_documentary','documentary_11'
+	end
+end
+
+if $ARGS[0] = 'documentary_11':
+	minut += 2
+	act'Finish interview':gt'foto_model_documentary','documentary_end'
+	gs 'stat'
+!!{	'"What''s would you like to receive as a present?"'
+	act'Early morning with exercise':
+		foto_documentary['question_11'] = 1
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/10.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'Early morning to do chores':
+		foto_documentary['question_11'] = 2
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/7.mp4"></video></center>'
+		'"'
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'Early morning with a light breakfast':
+		foto_documentary['question_11'] = 3
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'Anything involving coffee':
+		foto_documentary['question_11'] = 4
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'Anything involving coffee (slightly crude/slutty)':
+		foto_documentary['question_11'] = 5
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/6.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'Sleeping in followed by brunch':
+		foto_documentary['question_11'] = 6
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/3.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end
+	
+	act'':
+		foto_documentary['question_11'] = 7
+		cla & *clr
+		'<center><video autoplay loop src="images/locations/city/citycenter/photo/special/interview/1.mp4"></video></center>'
+		''
+		*nl
+		gs 'foto_model_documentary','documentary_12'
+	end}
+end
+
+if $ARGS[0] = 'documentary_end':
+	foto['documentary'] = 0
+	minut += 10
+	modelpay = (pcs_mdlng/2 * 10) + min(city_modelling, 700) + pcs_apprnc
+	modelpayfin = 600 + (modelpay * 2) + (15*rand(0,5))
+	mdlng_exp += rand(9,10)
+	if pcs_inhib < 55: gs 'willpower','pay','self'
+	gs 'fame', 'city', 'modelling', rand(20,40)
+	gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/4
+	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(3,10)
+	inhib_exp += rand(1,3)
+	money += modelpayfin
+	modelfotomoney += modelpayfin
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+	'"Well, that''s the end of the interview. Thank you so much for your time and for answering our questions! I''m sure the viewers will love what you had to say."'
+	'"No problem! You were a very good interviewer."'
+	*nl
+	'After exchanging a few more pleasantries, they hand you an envelope filled with bills that count out to <<modelpayfin>> <b>₽</b> and call the next girl in from the side.'
+	
+!!	foto['1st_documentary'] = 1
+	
+	act'Leave':gt'foto','studio'
+end
+
+
+
+!! ----------------------------------------------------------------------------------------------------
+!!
+!! ----------------------------- Model Documentary Follow Ups -----------------------------------------
+!!
+!! ----------------------------------------------------------------------------------------------------
+if $ARGS[0] = '2nd_documentary':
+
+
+end
+
+--- foto_model_documentary ---------------------------------

+ 11 - 11
locations/foto_shoot.qsrc

@@ -10,7 +10,7 @@
 
 if $ARGS[0] = 'model':
 	menu_off = 1
-	if model = 0:model = 1
+	if model['status'] = 0:model['status'] = 1
 	*clr & cla
 	minut += 5
 	modelpay = (pcs_mdlng/2 * 10) + ((min(city_modelling, 700) + pcs_apprnc)/2)
@@ -557,7 +557,7 @@ if $ARGS[0] = 'fashion':
 	if fashionshoot = 1:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion/<<rand(1,5)>>.mp4"></video></center>'
 	else
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fashion/<<rand(1,14)>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fashion/<<rand(1,31)>>.jpg"></center>'
 	end
 	'You dress up in the latest in fashion wear and spend the next two hours posing for the photographer.'
 	*nl
@@ -609,7 +609,7 @@ if $ARGS[0] = 'lingerie':
 	if shoot = 1:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie/<<rand(1,5)>>.mp4"></video></center>'
 	else
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/lingerie/<<rand(1,11)>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/lingerie/<<rand(1,37)>>.jpg"></center>'
 	end
 	'You put on some high end lingerie and spend the next two hours striking various poses for a photographer for use in fashion magazines.'
 	*nl
@@ -633,7 +633,7 @@ if $ARGS[0] = 'sexy':
 	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(1,6)
 	inhib_exp += rand(0,1)
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/sexy/<<rand(1,20)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/sexy/<<rand(1,48)>>.jpg"></center>'
 	'You dress up in sexy clothes and spend the next two hours posing for the photographer.'
 	*nl
 	'After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
@@ -654,7 +654,7 @@ if $ARGS[0] = 'transparent':
 	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(3,8)
 	inhib_exp += rand(0,2)
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/seethru/<<rand(1,10)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/seethru/<<rand(1,26)>>.jpg"></center>'
 	'You put on a transparent top and spend the next two hours in various poses for the photographer, a flash highlighting your breasts with every click of the camera.'
 	*nl
 	'After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
@@ -683,7 +683,7 @@ if $ARGS[0] = 'trans_ling':
 	if rand(0,1) = 1:
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/ling_trans/<<rand(1,3)>>.mp4"></video></center>'
 	else
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/ling_trans/<<rand(1,12)>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/ling_trans/<<rand(1,26)>>.jpg"></center>'
 	end
 	'You put on some very lacy, very transparent underwear and get to posing, your nipples often showing through the thin fabric.'
 	*nl
@@ -710,7 +710,7 @@ if $ARGS[0] = 'topless':
 	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(3,8)
 	inhib_exp += rand(0,2)
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topless/<<rand(1,27)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topless/<<rand(1,57)>>.jpg"></center>'
 	'You spend two hours striking various posing with topless breasts, listening to instruction while the photographer takes pictures of you.'
 	*nl
 	'After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
@@ -734,7 +734,7 @@ if $ARGS[0] = 'tasteful':
 	gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/4
 	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(3,10)
 	inhib_exp += rand(0,2)
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/tastenude/<<rand(1,14)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/tastenude/<<rand(1,28)>>.jpg"></center>'
 	'Already naked, you step onto the set and begin the shoot immediately.'
 	*nl
 	'You spend two hours posing confidently for a photographer taking pictures of you, often being asked to carefully position your hands or legs in ways that tastefully hides your pussy and nipples. These images, though incredibly provocative, are still somehow considered to be conservative enough to be allowed on the front cover of fashion, sports, and other tabloid magazines. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
@@ -758,7 +758,7 @@ if $ARGS[0] = 'topless_nude':
 	gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/4
 	if city_modelling > 200: gs 'fame', 'city', 'modelling', rand(3,10)
 	inhib_exp += rand(1,3)
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topnude/<<rand(1,40)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topnude/<<rand(1,79)>>.jpg"></center>'
 	'Already naked, you step onto the set and begin the shoot immediately.'
 	*nl
 	'You spend two hours posing confidently for a photographer taking pictures of you, often using props, hands, legs, or shadow to shield your pussy while simultaneously teasing the would-be readers of what they cannot see. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'			
@@ -791,7 +791,7 @@ if $ARGS[0] = 'nude':
 		*nl
 		'You spend two hours posing confidently for a photographer taking pictures of you that fully expose your breasts and pussy. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
 	else
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/bnude/<<rand(1,12)>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/bnude/<<rand(1,20)>>.jpg"></center>'
 		'Already naked, you step onto the set and begin the shoot immediately.'
 		*nl
 		'You spend two hours posing confidently for a photographer taking pictures of you, your <<$pcdesc_pubes>> pussy providing a nice contrast to the rest of your smooth body. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
@@ -826,7 +826,7 @@ if $ARGS[0] = 'erotic':
 	gs 'fame', 'city', 'porn', rand(5,15)
 	gs 'fame', 'pav', 'porn', rand(0,15)
 	if pcs_inhib < 60:inhib_exp += rand(1,3)
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/erotic/<<rand(1,10)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/erotic/<<rand(1,19)>>.jpg"></center>'
 	if $pantyworntype ! 'none':
 		
 	else

+ 1 - 1
locations/gLakeNudeEvent.qsrc

@@ -113,7 +113,7 @@ if $args[0] = 'gLakeNude_sex2':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_13.jpg"></center>'
-				'You can tell that the fit young guy doen''t lack for endurance as he furiously fucks his sweet girlfriend for several more minutes. As he continues pounding into her, you begin to hear both of their breathing becoming less regular, more frantic.'
+				'You can tell that the fit young guy doesn''t lack for endurance as he furiously fucks his sweet girlfriend for several more minutes. As he continues pounding into her, you begin to hear both of their breathing becoming less regular, more frantic.'
 				gs 'arousal', 'voyeur_sex', 5
 				gs 'stat'
 				act 'Further':

+ 26 - 2
locations/gschool_socialchg1.qsrc

@@ -545,9 +545,21 @@ if $ARGS[0] = 'tChristina':
 		gs 'fame', 'pav', 'sex', 3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/talknaked.jpg"></center>'
 		'"What are the two of you up to?" you ask Christina ignoring Lina as you walk up to them.'
-		'"I''m trying to get this lazy ass to perform better..." Then Christina stops talking as she turns to face you and sees you are completely naked. She bursts out laughing. "Oh my god, what a fucking slut you are." Lina joins in laughing at you as well, as they both point and laugh at you being naked. Christina pulls out her phone and starts taking pictures of you with her phone. You start to blush as you realize what this means, while Christina keeps taking your picture as she talks. "I am going to send these to everyone, they are going to love seeing these."'
+		'"I''m trying to get this lazy ass to perform better..." Then Christina stops talking as she turns to face you and sees you are completely naked. She bursts out laughing. "Oh my god, what a fucking slut you are." Lina joins in laughing at you as well, as they both point and laugh at you being naked. Christina pulls out her phone and starts taking pictures of you with her phone. You start to blush as you realize what this means, while Christina keeps taking your picture as she talks.'
+		*nl
+		'"I am going to send these to everyone, they are going to love seeing these."'
 		act 'Run off': socialchg['christina_day'] = daystart & gt 'gLake'
 		act 'Beg her not to': gt 'gschool_socialchg1', 'beg_christina'
+		act 'I don''t care':
+			socialchg['christina_day'] = daystart
+			socialchg['christina_dont_care'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/talknaked2.jpg"></center>'
+			'"I don''t care," you shrug, looking down at yourself. "I''m not ashamed of my body. I like the way I look."'
+			'"And the boys are going to <i>love</i> the way you look," she guffaws back. Christina snaps several more pictures and inspects them before smiling to herself in satisfaction. "See you at school, slut. That''s enough of a break. Start running fatass!"'
+			'She begins shouting at Lina pushing her to start sprinting down the beach, slapping her ass when she deems she isn''t moving fast enough. Soon enough you''re left alone on the beach again.'
+			act'Continue':gt'gLake'
+		end
 	end
 end
 
@@ -586,7 +598,9 @@ if $ARGS[0] = 'tLina':
 		gs 'fame', 'pav', 'sex', 3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/talknaked.jpg"></center>'
 		'"What are you two up to?" you ask Lina ignoring Christina as you walk up to them.'
-		'Lina is just about to answer but gets interrupted by Christina, "Who told you that you could speak?!..." Then Christina stops talking as she turns to face you and sees you are completely naked. She bursts out laughing. "Oh my god, what a fucking slut you are." Lina joins in laughing at you as well, as they both point and laugh at you being naked. Christina pulls out her phone and starts taking pictures of you with her phone. You start to blush as you realize what this means, while Christina keeps taking your picture as she talks. "I am going to send these to everyone, they are going to love seeing these."'
+		'Lina is just about to answer but gets interrupted by Christina, "Who told you that you could speak?!..." Then Christina stops talking as she turns to face you and sees you are completely naked. She bursts out laughing. "Oh my god, what a fucking slut you are." Lina joins in laughing at you as well, as they both point and laugh at you being naked. Christina pulls out her phone and starts taking pictures of you with her phone. You start to blush as you realize what this means, while Christina keeps taking your picture as she talks.'
+		*nl
+		'"I am going to send these to everyone, they are going to love seeing these."'
 		gs 'willpower', 'misc', 'self', 'medium'
 		if will_cost <= pcs_willpwr:
 			act 'Kick her ass (<<will_cost>> Willpower)':
@@ -598,6 +612,16 @@ if $ARGS[0] = 'tLina':
 		end	
 		act 'Run off': socialchg['christina_day'] = daystart & gt 'gLake'
 		act 'Beg her not to': gt 'gschool_socialchg1', 'beg_christina'
+		act 'I don''t care':
+			socialchg['christina_day'] = daystart
+			socialchg['christina_dont_care'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/talknaked2.jpg"></center>'
+			'"I don''t care," you shrug, looking down at yourself. "I''m not ashamed of my body. I like the way I look."'
+			'"And the boys are going to <i>love</i> the way you look," she guffaws back. Christina snaps several more pictures and inspects them before smiling to herself in satisfaction. "See you at school, slut. That''s enough of a break. Start running fatass!"'
+			'She begins shouting at Lina pushing her to start sprinting down the beach, slapping her ass when she deems she isn''t moving fast enough. Soon enough you''re left alone on the beach again.'
+			act'Continue':gt'gLake'
+		end
 	end
 end
 

+ 36 - 47
locations/katjaEv.qsrc

@@ -262,7 +262,7 @@ if $ARGS[0] = '6':
 
 		exit
 	elseif katjaDeystRand = 1:
-		if npc_sex['A14'] = 1:
+		if npc_sex['A14'] > 0:
 			if KatjaSlut <= 150:
 				'Katja invites you to take a walk in the park.'
 
@@ -1121,7 +1121,7 @@ if $ARGS[0] = 'kathan1':
 			react_exp += 1
 			icesktng_exp += 1
 			minut += 30
-			mood +=10
+			pcs_mood +=10
 			npc_rel['A14'] += 1
 			gs 'stat'
 
@@ -1185,7 +1185,7 @@ if $ARGS[0] = 'kathan1':
 						'Before you can react, Christina has returned at full speed, scraping the lake''s frozen surface with her skates and showering you with dirty ice, before turning and leaving while laughing. Seriously? Finally, you stand with Katja''s help. It seems that, at least for a while, you have lost interest in skating. It is time to look for something else to do.'
 						gs 'stat'
 
-						act 'Continue':mood -=10 & gt 'katjaEv','kathan'
+						act 'Continue':pcs_mood -=10 & gt 'katjaEv','kathan'
 					end
 				end
 
@@ -1271,7 +1271,7 @@ end
 if $ARGS[0] = 'kathan2':
 	*clr & cla
 	minut += 30
-	mood +=10
+	pcs_mood +=10
 	npc_rel['A14'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/KS9.jpg"></center>'
@@ -1353,14 +1353,14 @@ if $ARGS[0] = 'kathan3':
 			'You and Katja can only look with utter prepotency towards the crestfallen girls as they retreat to treat their men. This has been fun, but it is time to look for something else to do.'
 			gs 'stat'
 
-			act 'Continue':mood +=10 & gt 'katjaEv','kathan'
+			act 'Continue':pcs_mood +=10 & gt 'katjaEv','kathan'
 		else
 			'"Oh Crap! Vanya!"'
 			'You scream sadly when, after many falls, kicks (This is hockey!) and bloodied noses, your team loses. Vanya lies on the ground tired, and you can only walk towards him with the Meynolds to try to cheer the crestfallen boy as the bitch squad giggle at your defeat.'
 			'Vicky embraces her poor boyfriend and whispers something into his ear that makes the jock smile sheepishly and get up, suddenly grab the redhead and quickly leave as a smiling Vicky winks an eye towards you. Well, it is time to look for something else to do.'
 			gs 'stat'
 
-			act 'Continue':mood -=10 & gt 'katjaEv','kathan'
+			act 'Continue':pcs_mood -=10 & gt 'katjaEv','kathan'
 		end
 	end
 
@@ -1437,7 +1437,7 @@ if $ARGS[0] = 'kathan5':
 	minut += 30
 	npc_rel['A14'] += 1
 	KatjaHorny += 5
-	mood += 10
+	pcs_mood += 10
 	pcs_makeup = 1
 	cumspclnt = 4 & gs 'cum_cleanup'
 
@@ -1509,7 +1509,7 @@ if $ARGS[0] = 'kathan6':
 	minut += 30
 	npc_rel['A14'] += 1
 	KatjaHorny += 5
-	mood += 10
+	pcs_mood += 10
 	if pcs_sweat < 35 : gs 'sweat', 'add', 5
 	pcs_tan = pcs_tan + 3
 	gs 'stat'
@@ -1548,7 +1548,7 @@ if $ARGS[0] = 'kathan7':
 	minut += 30
 	npc_rel['A14'] += 1
 	KatjaHorny += 5
-	mood += 10
+	pcs_mood += 10
 	gs 'stat'
 
 	act 'Swim': gt 'katjaEv','kathan5'
@@ -1657,7 +1657,7 @@ if $ARGS[0] = 'kathan9':
 			if $clothingworntype = 'nude' and KatjaSlut <= 20: KatjaSlut += 5
 			npc_rel['A14'] += 1
 			npc_rel['A3'] +=1
-			mood += 10
+			pcs_mood += 10
 			KatjaHorny += 5
 			gs 'stat'
 			'<center><b><h4><font color="green"><<"Ivan Prokhorov">></font></h4></b></center>'
@@ -1682,8 +1682,7 @@ if $ARGS[0] = 'kathan9':
 
 				act '"Hey Ivan! You know, we are REALLY bored!"':
 					*clr & cla
-					gs 'arousal', 'kiss', '5'
-					group += 1
+					gs 'arousal', 'kiss', 5, 'group'
 					gs 'stat'
 					'<center><b><h4><font color="green"><<"Ivan Prokhorov">></font></h4></b></center>'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/KL9.jpg"></center>'
@@ -1694,9 +1693,9 @@ if $ARGS[0] = 'kathan9':
 
 					act 'Who is going to do the honors?':
 						*clr & cla
-						gs 'arousal', 'voyeur', '5'
-						KatjaThroat+=1
 						gs 'boyStat', 'A3'
+						gs 'arousal', 'voyeur', 5
+						KatjaThroat+=1
 						gs 'stat'
 
 						if KatjaHorny >= 40:
@@ -2227,13 +2226,11 @@ end
 if $ARGS[0] = 'kathan13':
 	*clr & cla
 	menu_off = 1
-	gs 'arousal', 'vaginal_finger_give', '5', 'exhibitionism'
-	gs 'arousal', 'cuni', '5', 'exhibitionism'
 	$orgasm_or = 'yes'
+	gs 'arousal', 'vaginal_finger_give', 5, 'exhibitionism', 'lesbian'
+	gs 'arousal', 'cuni', 5, 'exhibitionism', 'lesbian'
 	pcs_mood += 10
-	girl += 1
-	lesbian += 1
-	npc_sex['A14'] += 1
+	if npc_sex['A14'] = 0: girl += 1 & npc_sex['A14'] += 1
 	gs 'fame', 'pav', 'sex', rand(0,2)
 	gs 'stat'
 
@@ -2287,7 +2284,7 @@ if $ARGS[0] = 'kathan14':
 	npc_rel['A14'] += 1
 	minut += 30
 	grupvalue[1] += 1
-	if chrsm <= 45:chrsm_exp += 1
+	if pcs_chrsm <= 45:chrsm_exp += 1
 	gs 'stat'
 
 	if random_event <= 5:
@@ -2492,7 +2489,7 @@ if $ARGS[0] = 'kathan15':
 	npc_rel['A16'] += 1
 	minut += 30
 	grupvalue[1] += 1
-	if chrsm <= 45:chrsm_exp += 1
+	if pcs_chrsm <= 45:chrsm_exp += 1
 	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/KWS12.jpg"></center>'
@@ -3244,22 +3241,19 @@ if $ARGS[0] = 'TamVal':
 								'Too shocked and aroused, Katja lets you lie her on the bed, take away her panties, and go down on her. She has lost any reservation to be heard, and her moans fill the room. Your assault on her pussy, united to the arousal your touch has brought, makes her happily thrash all over the bed.'
 								'You feel it when Katja raises her hips and a long guttural grunt escape her lips. She orgasms, and in that instant, a sympathetic link triggers, letting her energy flow towards you. Katja moans again and again as your feeding triggers orgasm after orgasm.'
 								'Finally, exhausted, Katja lies on the bed, cuddling against you. For the next few minutes she doesn''t say anything, and in fact, seems to be on the brink of dozing off. You begin to pick up your clothes. It is probably best if you leave now.'
-								gs 'arousal', 'vaginal_finger_give', '10'
-								gs 'arousal', 'cuni_give', '10'
+								gs 'arousal', 'vaginal_finger_give', 10, 'lesbian'
+								gs 'arousal', 'cuni_give', 10, 'lesbian'
 								pcs_mood += 20
 								KatjaSlut += 20
 								npc_rel['A14'] += 5
-								npc_sex['A14'] = 1
+								if npc_sex['A14'] = 0: girl += 1 & npc_sex['A14'] = 1
 								KatjaOTN = 1
-								minut -= 5
 								npcbrokehymen = 1
 								KatjaLust += 20
 								sexnutrition += 25 * scfeed
 								suclezsex = lesbian
 								succubxp += 6
 								sucabslez = 1
-								girl += 1
-								lesbian += 1
 								gs 'stat'
 
 								act 'Time to leave': gt 'katjaEv','TamVal_2'
@@ -3430,19 +3424,14 @@ end
 
 if $ARGS[0] = 'katnatsex1':
 	*clr & cla
-	gs 'arousal', 'voyeur', '10', 'lesbian'
-	girl += 2
-	lesbian += 1
-	group += 1
+	gs 'arousal', 'voyeur', 10, 'lesbian', 'group'
 	NatbelQW['training'] += 1
 	KatjaSlut += 10
 	npc_rel['A14'] += 5
-	npc_sex['A14'] += 1
+	if npc_sex['A14'] = 0: girl += 1 & npc_sex['A14'] += 1
 	npc_rel['A16'] += 5
-	npc_sex['A16'] += 1
-	
+	if npc_sex['A16'] = 0: girl += 1 & npc_sex['A16'] += 1
 	gs 'stat'
-
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS6.jpg"></center>'
 	'"Ok Slut, this is what is going to happen. You see cute little Katja here? Well, you are coming with us and will eat her pussy like there is no tomorrow. Do that and I will condone some of your debt. Understood?"'
 	'Natasha looks at you, but doesn''t retort, She just looks to Katja for a moment and then nods. Yeah! Total control!'
@@ -3482,11 +3471,11 @@ if $ARGS[0] = 'katnatsex1':
 
 			gs 'willpower', 'cuni', 'force', 'hard'
 			if will_cost <= pcs_willpwr:
-				act 'Force the girls to eat you':
+				act 'Force the girls to eat you (<<will_cost>> Willpower)':
 					*clr & cla
 					KatjaDom += 5
-					gs 'arousal', 'cuni', '10', 'lesbian'
 					$orgasm_or = 'yes'
+					gs 'arousal', 'cuni', 10, 'lesbian'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS10.jpg"></center>'
 
@@ -3506,8 +3495,8 @@ if $ARGS[0] = 'katnatsex1':
 			act 'Your turn!':
 				*clr & cla
 				KatjaDom += 5
-				gs 'arousal', 'cuni', '10', 'lesbian'
 				$orgasm_or = 'yes'
+				gs 'arousal', 'cuni', 10, 'lesbian'			
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS10.jpg"></center>'
 
@@ -3567,11 +3556,11 @@ if $ARGS[0] = 'katnatsex1':
 
 			gs 'willpower', 'cuni', 'force', 'hard'
 			if will_cost <= pcs_willpwr:
-				act 'Force the girls to eat you':
+				act 'Force the girls to eat you (<<will_cost>> Willpower)':
 					*clr & cla
 					KatjaDom += 5
-					gs 'arousal', 'cuni', '10', 'lesbian'
 					$orgasm_or = 'yes'
+					gs 'arousal', 'cuni', 10, 'lesbian'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS10.jpg"></center>'
 
@@ -3588,11 +3577,11 @@ if $ARGS[0] = 'katnatsex1':
 				act 'Force the girls to eat you (<font color="red"><<will_cost>> Willpower</font>)': Msg '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
-		act 'You!':
+		act 'You':
 			*clr & cla
 			KatjaDom += 5
-			gs 'arousal', 'cuni', '10', 'lesbian'
 			$orgasm_or = 'yes'
+			gs 'arousal', 'cuni', 10, 'lesbian'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS10.jpg"></center>'
 			'You shove Natasha away and jump on the redhead who, faking surprise, lets your tongue ravage her mouth.'
@@ -3623,12 +3612,12 @@ if $ARGS[0] = 'katnatsex1':
 		end
 	end
 
-	act 'You!':
+	act 'You':
 		menu_off = 1
 		*clr & cla
 		KatjaDom += 5
-		gs 'arousal', 'cuni', '10', 'lesbian'
 		$orgasm_or = 'yes'
+		gs 'arousal', 'cuni', 10, 'lesbian'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS10.jpg"></center>'
 		'You shove Natasha away and jump on the redhead who, faking surprise, lets your tongue ravage her mouth.'
@@ -3659,7 +3648,7 @@ if $ARGS[0] = 'katnatsex1':
 				act 'help Katja with Natasha':
 					*clr & cla
 					gs 'willpower', 'pay', 'self'
-					gs 'arousal', 'kiss', '10', lesbian
+					gs 'arousal', 'kiss', 10, lesbian
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS11.jpg"></center>'
 
@@ -3711,7 +3700,7 @@ end
 if $ARGS[0] = 'katnatsex2':
 	*clr & cla
 	minut += 10
-	gs 'arousal', 'voyeur', '5', 'lesbian'
+	gs 'arousal', 'voyeur', 5, 'lesbian'
 	NatbelQW['Debt'] -= 500
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/KWS9.jpg"></center>'
@@ -3728,7 +3717,7 @@ end
 if $ARGS[0] = 'katnatsex3':
 	*clr & cla
 	minut += 10
-	gs 'arousal', 'voyeur', '5', 'lesbian'
+	gs 'arousal', 'voyeur', 5, 'lesbian'
 	NatbelQW['Debt'] = 0
 	npc_rel['A14'] -= 5
 	gs 'stat'

+ 8 - 9
locations/katjaEvDin.qsrc

@@ -185,7 +185,6 @@ if $ARGS[0] = 'dildo':
 	act 'Strap it on':
 		*clr & cla
 		minut += 3
-		lesbian += 1
 		gs 'boystat', 'D<<strapnumber>>', 'b'
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/strapon.jpg"></center>'
@@ -207,8 +206,7 @@ if $ARGS[0] = 'shower_kiss':
 	'Katja gently hugs you with one hand and kisses you on the lips, you feel her soft palm on your naked pussy and her thin finger finds your clitoris and begins to rub it.'
 
 	gs 'arousal', 'kiss', 5, 'lesbian', 'dom'
-	gs 'arousal', 'vaginal_finger', 5, 'lesbian', 'dom'
-	minut -= 5
+	gs 'arousal', 'vaginal_finger', -5, 'lesbian', 'dom'
 	gs 'stat'
 
 	if KatjaSlut >= 10:
@@ -253,7 +251,7 @@ if $ARGS[0] = 'shower_kiss':
 	gs 'willpower', 'cuni', 'resist', 'hard'
 	if will_cost <= pcs_willpwr:
 		act 'Remove her hands (<<will_cost>> Willpower)':
-			cls
+			*clr & cla
 			minut += 5
 			pcs_horny += 10
 			KatjaDom -= 1
@@ -401,7 +399,6 @@ if $ARGS[0] = 'kuni_dom':
 	menu_off = 1
 	KatjaSlut += 1
 	KatjaLust += 1
-	lesbian += 1
 	katjahorny = 0
 
 	if npc_sex['A14'] = 0:npc_sex['A14'] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
@@ -514,13 +511,15 @@ if $ARGS[0] = 'kuni_dom':
 								'She keeps picking up speed, soon the sounds of the skin from her hips slapping against your butt can be heard over your moaning. She seems to lose herself in the act. She stops paying attention to you. You don''t even think she would notice if you orgasmed. After a long time she starts panting. You can tell she is starting to get physically tired and worn out.'
 
 								gs 'arousal', 'anal_strap', 5, 'lesbian', 'sub', 'rough'
-								gs 'stat'
-
-								if pcs_horny = 100:
-									analorgasm += 1
+								
+								if pcs_horny >= 100:
 									$orgasm_or = 'yes'
 									$orgasm_txt = 'It is then that your orgasm hits you, it is sudden and amazingly intense.'
+									gs 'arousal', 'anal_strap', -1, 'lesbian', 'sub', 'rough'
 								end
+																
+								gs 'stat'
+								
 								'Yet she doesn''t slow down her furious pace. Finally unable to keep it up anymore she collapses on your back. You can feel the sweat from her body on your back and her heavy breathing in your ear. As she rests, half leaning against and half laying on you, with the dildo still buried it''s full length up your ass.'
 								'You take the time to rest and relax yourself coming down from the amazing fucking you just received. A few moments later she kisses your back and your neck, before getting off you and pulling the dildo out slowly. Getting up yourself, you see her taking the harness off and tossing it aside. You notice that her thighs are slick with sweat and her own juices. Once it is off and you are facing her, she grabs you by the neck and gives you a passionate, deep, long kiss. Finally breaking the kiss "My god <<$pcs_nickname>> that was amazing. I hope I didn''t hurt you too much and you enjoyed it as much as I did. No wonder boys fuck us like that, that was amazing."'
 								'She says as she falls back on her bed laying on her back, still breathing hard and looking at you with a somewhat possessive look. You lay down next to her. "It was wonderful, I''m glad you enjoyed it too, even if you were a little rough at times." She leans over and gives you another kiss. "Sorry <<$pcs_nickname>> if I was to rough, but that was beyond description, we are going to have to do that again." The two of you lay quietly for a while, basking in the aftermath. You know something in your relationship has changed and you think for the better. After a while you get up and get dressed, you need to get going.'

+ 3 - 1
locations/korrPar.qsrc

@@ -113,7 +113,9 @@ if momloc = 1:
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/pc/activities/spy/peep3.jpg"></center>'
 				if momvladroom = 1:
-					'You knock on the door and you hear your <<$npc_nickname[''A29'']>> say. "Go set the table." Which is followed by a few murmuring of voices and you think your mother giggling.'
+					'You knock on the door and you hear your <<$npc_nickname[''A29'']>> say, "<<$pcs_nickname>>? Is that you? Go set the table."'
+					*nl
+					'A moment of silence later, you faintly hear hushed voices and you <i>think</i> the sound of your mother giggling.'
 
 					act 'Leave':gt 'korrPar'
 					gs 'willpower', 'voyeur', 'self', 'medium'

+ 13 - 2
locations/masseuse_work.qsrc

@@ -899,7 +899,8 @@ end
 
 if $ARGS[0] = '5':
 	cla & *clr
-	'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/fuck<<rand(1,20)>>.mp4"></video></center>'
+	masseuse['position'] = rand(1,20)
+	'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/fuck<<masseuse[''position'']>>.mp4"></video></center>'
 	'You spend the entire session being thoroughly enjoyed by your client, fucking in any and every position he could possibly want you in. The sound of flesh slapping against flesh is deafening, the only other thing being able to be heard is the groan of your voice as you are pounded relentlessly until he cums.'
 	act'Cum':gt'masseuse_work','5.1'
 	act'Next position':gt'masseuse_work','5'
@@ -910,7 +911,17 @@ if $ARGS[0] = '5.1':
 	if rand(0,1) = 1:
 		gs'cum_call','','massage client'
 		gs'stat'
-		'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie<<rand(1,5)>>.mp4"></video></center>'
+		if masseuse['position'] = 1:
+			'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie<<rand(1,5)>>.mp4"></video></center>'
+		elseif masseuse['position'] >= 2 and masseuse['position'] <= 7:
+			'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie1.mp4"></video></center>'
+		elseif masseuse['position'] >= 8 and masseuse['position'] <= 13:
+			'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie<<rand(2,3)>>.mp4"></video></center>'
+		elseif masseuse['position'] <= 15:
+			'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie4.mp4"></video></center>'
+		else
+			'<center><video autoplay loop src="images/locations/city/citycenter/mall/salon/work/sex/creampie5.mp4"></video></center>'
+		end
 		if pcs_horny >= 90:
 			$orgasm_or = 'yes'
 			'Eventually, the client starts cumming. He keeps hammering you and grunts hard, and you can feel his semen spurt deeper inside you with every thrust. The sensation causes you to orgasm as well, groaning with pleasure right alongside him. At some point the client finishes ejaculating and removes his cock from your pussy, his cum flowing out after.'

+ 1 - 1
locations/mey_vika_events.qsrc

@@ -368,7 +368,7 @@ if $ARGS[0] = 'near_school':
 	$location_type = 'event'
 	vicky_afterschool = daystart
 
-	if week mod 2 = 0:
+	if (cheerleadingQW['quest_stage'] > 1 and (week = 1 or week = 3)) or (cheerleadingQW['quest_stage'] < 2 and (week = 2 or week = 4)):
 		'<br>You see Vicky Meynold leaving the school area holding hands with Vanya.'
 
 		if mey_vika['mey_vika_qw'] = 0:

+ 1 - 1
locations/pav_pharmacy.qsrc

@@ -256,7 +256,7 @@ if $ARGS[0] = 'buy_birth_control':
 			gaptekfirstbirthcontrol = 1
 			minut += 2
 			'"Hi Aunt Luda. Can I buy some birth control pills?"'
-			'"I guess it runs in the family," she chuckles, leading you over to the family planning counter. "Maybe we all carry a slut gene or something. Come on, I''ll show you what we have." As she hands you a box of pills she adds, "You might consider condoms too since you seem to have a lot of partners, to protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
+			'"I guess it runs in the family," she chuckles, leading you over to the family planning counter. "Maybe we all carry a slut gene or something. Come on, I''ll show you what we have." As she hands you a box of pills she adds, "You might consider condoms too to protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
 		else
 			'"Hi Aunt Luda, I need some more birth control pills."'
 			'"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'

+ 2 - 0
locations/saveupdater.qsrc

@@ -857,11 +857,13 @@ end
 !!model age addition
 
 if model['age'] = 0 and model > 0:
+	model['status'] = 1
 	if age >= 18:
 		model['age'] = age
 	else
 		model['age'] = 18
 	end
+	model = 0
 end
 
 --- saveupdater ---------------------------------

+ 56 - 20
locations/selfplay.qsrc

@@ -614,7 +614,7 @@ if $ARGS[0] = 'shower_bathtub_suction_dildo_ride':
 	pcs_horny += 20
 	gs 'boyStat','D2'
 	gs 'stat'
-	'<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo.mp4"></video></center>'
+	'<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo1.mp4"></video></center>'
 	if dildo_timer = 0:
 		dildo_timer = 1
 		dildo_start_minute = minut
@@ -635,8 +635,13 @@ if $ARGS[0] = 'shower_bathtub_suction_dildo_ride':
 		if $loc = 'vanrPar':
 			'<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
 			*nl
-			'You bounce up and down on your dildo, allowing yourself to sofly moan in pleasure, fairly certain that the sound of the shower ought to cover up most of your voice. Maybe it''s just the steam but you feel like you''re enjoying yourself a lot more than you might otherwise.'
-			$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Gasping, quivering, and clenching, you ride out your orgasm while impaled on your bathtub dildo doing your best not to allow your voice escape and let your family know what you''ve been up to.'
+			if indorf = 1:
+				'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and the fact that your family is gone for the weekend.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Gasping, quivering, and clenching, you cry out loudly and ride out your orgasm while your voice echos back at you off the walls.'
+			else
+				'You bounce up and down on your dildo, allowing yourself to sofly moan in pleasure, fairly certain that the sound of the shower ought to cover up most of your voice. Maybe it''s just the steam but you feel like you''re enjoying yourself a lot more than you might otherwise.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Gasping, quivering, and clenching, you ride out your orgasm while impaled on your bathtub dildo doing your best not to allow your voice escape and let your family know what you''ve been up to.'
+			end
 		else
 			'<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
 			*nl
@@ -680,7 +685,7 @@ if $ARGS[0] = 'bath_bathtub_suction_dildo_ride':
 	pcs_horny += 20
 	gs 'boyStat','D2'
 	gs 'stat'
-	'<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo.mp4"></video></center>'
+	'<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo2.mp4"></video></center>'
 	if dildo_timer = 0:
 		dildo_timer = 1
 		dildo_start_minute = minut
@@ -697,23 +702,36 @@ if $ARGS[0] = 'bath_bathtub_suction_dildo_ride':
 	elseif dildo_start_minute = minut and dildo_start_hour = hour:
 		'Pulling yourself out of the bath, you decide it''s time for a different kind of relaxation and ease down onto your bathtub mounted rubber cock.'
 		if $loc = 'vanrPar':
-			'<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
+			'<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
+			*nl
+			if indorf = 1:
+				'You bounce up and down on your dildo, creating sloshes in the bathwater with your motion and moaning loudly, taking advantage of the fact your family is gone for the weekend.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your dildo, crying out in a loud voice that echos off the bathroom walls.'
+			else
+				'<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
 			*nl
-			'You bounce up and down on your dildo, creating ripples in the bathwater with your motion. In a very tiny voice, you let out small moans, doing your best but unable to completely hold it.'
-			$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your bathtub dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
+				'You bounce up and down on your dildo, creating ripples in the bathwater with your motion. In a very tiny voice, you let out small moans, doing your best but unable to completely hold it.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your bathtub dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
+			end
 		else
 			'<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
 			*nl
 			'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
-			
 			$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. You cry out loudly in climax, caught in the euphoric bliss of release, before it slowly winds down.'
 		end
 	else
 		if $loc = 'vanrPar':
-			'<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
-			*nl
-			'You continue bouncing up and down on your dildo, unwilling to finish your shower while you''re still enjoying yourself. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
-			$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your bathtub dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
+			if indorf = 1:
+				'<i>Ahh~! Aaahhhh~! Ahhhh~! Aaaaahhhh~!</i>'
+				*nl
+				'You continue bouncing up and down on your dildo, unwilling to finish your shower while you''re still enjoying yourself. Maybe it''s just the steam in the room but your body feels like its on fire right now and you can''t help but cry out loudly, so happy your family is gone for the weekend.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you groan loudly and ride out your orgasm while impaled on your dildo.'
+			else
+				'<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
+				*nl
+				'You continue bouncing up and down on your dildo, unwilling to finish your shower while you''re still enjoying yourself. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
+			end
 		else
 			'<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
 			*nl
@@ -766,11 +784,21 @@ if $ARGS[0] = 'shower_bathtub_wall_dildo_fuck':
 		if $loc = 'vanrPar':
 			'Using the wall of the tub as leverage, you breathe hard as you push your ass back and forth on the dildo mounted on the wall. Hot water from the shower rains down and steam fills the air and you to play tag with the bathtub wall, repeatedly tapping it with the back of your ass while your pussy gets stuffed with rubber.'
 			*nl
-			'<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
-			*nl
-			'Though whimpers and gasps escape your lips, you do your best to keep your voice under control so your family doesn''t catch you masturbating in the shower.'
-			
-			$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam your ass all the way to the wall and climax hard all over your dildo. Your walls squeeze tight and you can perfectly feel the shape of the entire rubber cock inside you. Legs shaking and knees trying not to buckle, you ride out your orgasm while impaled on your shower dildo, taking gasping breaths instead of screaming and letting your family know what you''ve been up to.'
+			if indorf = 1:
+				'<b>thump</b><b>thump</b><b>thump</b><b>thump'
+				*nl
+				'<i>Ahh~! Aaahhhh~! Ahhhh~! Aaaaahhhh~!</i>'
+				*nl
+				'The echos of your moans and your ass bounce off the shower walls as you happily take advantage of the fact your family is away for the weekend.'
+				
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam your ass all the way to the wall and climax hard all over your dildo. Your walls squeeze tight and you can perfectly feel the shape of the entire rubber cock inside you. Legs shaking and knees trying not to buckle, you ride out your orgasm while impaled on your shower dildo, screaming out an orgasm that can probably be heard from your room.'
+			else
+				'<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
+				*nl
+				'Though whimpers and gasps escape your lips, you do your best to keep your voice under control so your family doesn''t catch you masturbating in the shower.'
+				
+				$orgasm_txt = 'Pleasure and heat build between your legs until finally you slam your ass all the way to the wall and climax hard all over your dildo. Your walls squeeze tight and you can perfectly feel the shape of the entire rubber cock inside you. Legs shaking and knees trying not to buckle, you ride out your orgasm while impaled on your shower dildo, taking gasping breaths instead of screaming and letting your family know what you''ve been up to.'
+			end
 		else
 			'<b>thump</b><b>thump</b><b>thump</b><b>thump'
 			*nl
@@ -782,9 +810,17 @@ if $ARGS[0] = 'shower_bathtub_wall_dildo_fuck':
 		end
 	else
 		if $loc = 'vanrPar':
-			'<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
-			*nl
-			'You''re not done yet. The shower keeps raining down on you just as you keep fucking your wall mounted dildo, making squelching noises as you occassionally slide it up and down with the force of your thrusts. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
+			if indorf = 1:
+				'<b>thump</b><b>thump</b><b>thump</b><b>thump'
+				*nl
+				'<i>Ahh~! Aaahhhh~! Ahhhh~! Aaaaahhhh~!</i>'
+				*nl
+				'The shower keeps raining down on you just as you keep fucking your wall mounted dildo, making squelching noises as you occassionally slide it up and down with the force of your thrusts. Loud gasps escape your lips and you are so happy your family isn''t here right now.'
+			else
+				'<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
+				*nl
+				'You''re not done yet. The shower keeps raining down on you just as you keep fucking your wall mounted dildo, making squelching noises as you occassionally slide it up and down with the force of your thrusts. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
+			end
 		else
 			'<i><b>thump</b></i> <i><b>thump</b></i> <i><b>thump</b></i> <i><b>thump</b></i>'
 			'<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'

+ 21 - 0
locations/stat.qsrc

@@ -1130,5 +1130,26 @@ if insleep = 0: gs 'stat_display'
 gs 'family_schedule'
 
 
+!!--------------------------Job Checks For Icons--------------------------------
+
+if (acting['shoot_day'] = daystart and actress_cast = 1) or (audition['day'] = daystart):
+	acting['icon'] = 1
+else
+	acting['icon'] = 0
+end
+
+if model_job_week < 2 and model['status'] = 1:
+	model['icon'] = 1
+else
+	model['icon'] = 0
+end
+
+if pfilmday[0] > 0:
+	pornstar['icon'] = 1
+else
+	pornstar['icon'] = 0
+end
+
+
 --- stat ---------------------------------
 

+ 26 - 4
locations/stat_display.qsrc

@@ -999,7 +999,29 @@ if cheatStatusIcons = 0:
 
 	if $stat_school_icon_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_school_icon_msg"><img title="<<$stat_school_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/school.png"></a></td>'
 
-	if work > 0 or model > 0 or pornstack > 0: $statusIconBarTab += '<td><a href="exec: gt ''journal'', ''records''"><img title="You have a job. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/work.png"></a></td>'
+	if work > 0: $statusIconBarTab += '<td><a href="exec: gt ''journal'', ''records''"><img title="You have a job. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/work.png"></a></td>'
+	
+	if model['icon'] = 1: 
+		if model['status'] > 0 and model_week < (daystart - week) / 7 and model_job_week = 1:
+			$stat_model_msg = 'You can get paid for 1 more modeling job this week.'
+		elseif model['status'] > 0 and model_week < (daystart - week) / 7 and model_job_week < 1:
+			$stat_model_msg = 'You can get paid for 2 modeling jobs this week.'
+		end
+		$statusIconBarTab += '<td><a href="exec: msg $stat_model_msg"><img title="<<$stat_model_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/model_'+iif(night_mode ! 3 and (($location_type = 'public_outdoors' and daystage = 5) or night_mode = 1 or night_mode = 2), 'white', 'black')+'.png"></a></td>'
+	end
+	
+	if pornstar['icon'] = 1 and pornstar['icon_disable'] ! daystart:
+       if hour < 11:
+            $stat_porn_msg = 'You are starring in a porno today at 10:00.' 
+            $statusIconBarTab += '<td><a href="exec: msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/porn_'+iif(night_mode ! 3 and (($location_type = 'public_outdoors' and daystage = 5) or night_mode = 1 or night_mode = 2), 'white', 'black')+'.png"></a></td>'
+        elseif hour >= 11 and hour < 13:
+            $stat_porn_msg = 'You''re late for your shoot at the porn studio!' 
+            $statusIconBarTab += '<td><a href="exec: msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/porn_red.png"></a></td>'    
+        else
+            $stat_porn_msg = 'You missed a scheduled porn shoot!' 
+            $statusIconBarTab += '<td><a href="exec: pornstar['icon_disable'] = daystart & msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/porn_red.png"></a></td>'
+        end
+    end
 
 	if $stat_bfgf_msg_0 ! '': $statusIconBarTab += '<td><a href="exec: $stat_bfgf_msg_0"><img title="<<$stat_bfgf_tooltip_0>>" height = <<set_siconht>> src="images/system/icon/status_icons/date.png"></a></td>'
 	
@@ -1890,11 +1912,11 @@ if enable_extra_msg = 1:
 		end
 	end
 
-	if model > 0 and model_week = (daystart - week) / 7 and model_job_week >= 2:
+	if model['status'] > 0 and model_week = (daystart - week) / 7 and model_job_week >= 2:
 		$stat_msg += '<BR><b>You have no more modeling jobs available this week.</b>'
-	elseif model > 0 and model_week < (daystart - week) / 7 and model_job_week = 1:
+	elseif model['status'] > 0 and model_week < (daystart - week) / 7 and model_job_week = 1:
 		$stat_msg += '<BR><b>You can get paid for 1 more modeling job this week.</b>'
-	elseif model > 0 and model_week < (daystart - week) / 7 and model_job_week < 1:
+	elseif model['status'] > 0 and model_week < (daystart - week) / 7 and model_job_week < 1:
 		$stat_msg += '<BR><b>You can get paid for 2 modeling jobs this week.</b>'
 	end
 

+ 5 - 0
locations/vanrPar.qsrc

@@ -21,6 +21,11 @@ if $ARGS[0] = '':
 	'A shower, toilet, sink, <a href="exec:gt ''mirror'',''start''">mirror</a>, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, and even a bath tub.'
 	
 	gs'selfplay','suction_dildo'
+	if motherQW['bathroom_dildos'] > 0 and motherknowsdildo = 1:
+		'<i>Huh? Where''d my dildos go? I thought I- oh shit! Mom probably took them again...</i>'
+	elseif motherQW['bathroom_dildos'] > 0 and vanrPar_suction_dildo = 0:
+		'<i>Huh? Where''d my dildos go? I thought I left them right here...</i>'
+	end
 	
 	if vanr_lock = 0:
 		if fullmorrout = 1: