|
@@ -1,17 +1,12 @@
|
|
|
# foto
|
|
|
!!2021/04/15
|
|
|
if $ARGS[0] = 'start':
|
|
|
- $loc = 'foto'
|
|
|
- $loc_arg = 'start'
|
|
|
-
|
|
|
+ *clr & cla
|
|
|
close all
|
|
|
+ menu_off = 0
|
|
|
+ gs 'shortgs', 'setloc', 'foto', 'start'
|
|
|
$location_type = 'indoors'
|
|
|
if model['status'] = 0:gt 'foto', 'studio'
|
|
|
- *clr & cla
|
|
|
-
|
|
|
- $menu_loc = 'foto'
|
|
|
- $menu_arg = 'start'
|
|
|
- menu_off = 0
|
|
|
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
if studio_strip = 0:
|
|
@@ -24,7 +19,7 @@ if $ARGS[0] = 'start':
|
|
|
foto['documentary'] = rand(1,100)
|
|
|
act 'Leave': gt'city_center'
|
|
|
act'Strip down':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
'<center><video autoplay loop src="images/locations/city/citycenter/photo/fullstrip.mp4"></video></center>'
|
|
|
studio_strip += 1
|
|
@@ -94,7 +89,7 @@ if $ARGS[0] = 'start':
|
|
|
lastwornpantynumber['foto'] = pantywornnumber
|
|
|
$lastwornbratype['foto'] = $braworntype
|
|
|
lastwornbranumber['foto'] = brawornnumber
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
inhib_exp += 2
|
|
|
if studio_strip_talk = 0:
|
|
@@ -129,7 +124,7 @@ if $ARGS[0] = 'start':
|
|
|
lastwornbranumber['foto'] = brawornnumber
|
|
|
end
|
|
|
gs 'stat'
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip3.mp4"></video></center>'
|
|
|
inhib_exp += 1
|
|
@@ -170,14 +165,14 @@ end
|
|
|
if $ARGS[0] = 'studio':
|
|
|
if hour < 3:gt 'foto', 'studio_closing'
|
|
|
|
|
|
- $loc_arg = 'studio'
|
|
|
- $menu_loc = 'foto'
|
|
|
- $menu_arg = 'studio'
|
|
|
+ *clr & cla
|
|
|
menu_off = 0
|
|
|
+ gs 'shortgs', 'setloc', 'foto', 'studio'
|
|
|
+ $location_type = 'indoors'
|
|
|
practice_session = 0
|
|
|
- *clr & cla
|
|
|
killvar '$modelopt'
|
|
|
|
|
|
+
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
gs 'themes', 'indoors'
|
|
@@ -313,14 +308,11 @@ if $ARGS[0] = 'studio':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'bathroom':
|
|
|
- $loc_arg = 'bathroom'
|
|
|
- $menu_loc = 'foto'
|
|
|
- $menu_arg = 'bathroom'
|
|
|
- $locM = 'foto'
|
|
|
- $locM_arg = 'bathroom'
|
|
|
+ *clr & cla
|
|
|
menu_off = 0
|
|
|
- gs'stat'
|
|
|
- cla & *clr
|
|
|
+ gs 'shortgs', 'setloc', 'foto', 'bathroom'
|
|
|
+ $location_type = 'bathroom'
|
|
|
+ gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models<<rand(1,2)>>.jpg"></center>'
|
|
|
'A gaggle of models crowd the <a href="exec:gt ''mirror'',''start''">mirrors</a> and sinks, loudly chatting, giggling, and generally gossiping about life in the city and the studio.'
|
|
|
*nl
|
|
@@ -341,34 +333,36 @@ if $ARGS[0] = 'bathroom':
|
|
|
end
|
|
|
end
|
|
|
if AlexandriaQW = 1:
|
|
|
- act'Listen to the gossip':
|
|
|
- *clr & cla
|
|
|
+ act'Listen to the gossip':
|
|
|
+ *clr & cla
|
|
|
AlexandriaQW = 2
|
|
|
gs 'stat'
|
|
|
- '<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models.jpg"></center>'
|
|
|
- 'You are trying to find the "McGuffin" that Tatiana told you was somewhere in the agency and that was cursing the place, but you haven''t had much luck... until now. You feel a magic tingle and snoop on an interesting titbit.'
|
|
|
- '"Oh my god! You need to meet this girl! She is an incredible mass... massa... masse... Damn! She is good with her hands!"'
|
|
|
- '"Sorry, I don''t swing that way. Well... except on my boyfriend''s birthday."'
|
|
|
- '"Huh?! No! Well... maybe? I mean that she can help you with your boob pains!"'
|
|
|
- '"You mean my BACK pains? Are you feeling alright? You sound a little off today."'
|
|
|
- '"What? Yes! I''m feeling great! You <i>must</i> meet her! She''s a redhead named Tatiana! She hangs out back there, in the room where we store the... umm... the things that we use for the shoots!"'
|
|
|
- '"You mean the props room?"'
|
|
|
- 'Okay, that''s a clue! Maybe you should search the props room?'
|
|
|
- act 'Continue': gt 'foto', 'bathroom'
|
|
|
- end
|
|
|
- else
|
|
|
- act 'Listen to the gossip': gt 'foto_models', 'model_chatter'
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models.jpg"></center>'
|
|
|
+ 'You are trying to find the "McGuffin" that Tatiana told you was somewhere in the agency and that was cursing the place, but you haven''t had much luck... until now. You feel a magic tingle and snoop on an interesting titbit.'
|
|
|
+ '"Oh my god! You need to meet this girl! She is an incredible mass... massa... masse... Damn! She is good with her hands!"'
|
|
|
+ '"Sorry, I don''t swing that way. Well... except on my boyfriend''s birthday."'
|
|
|
+ '"Huh?! No! Well... maybe? I mean that she can help you with your boob pains!"'
|
|
|
+ '"You mean my BACK pains? Are you feeling alright? You sound a little off today."'
|
|
|
+ '"What? Yes! I''m feeling great! You <i>must</i> meet her! She''s a redhead named Tatiana! She hangs out back there, in the room where we store the... umm... the things that we use for the shoots!"'
|
|
|
+ '"You mean the props room?"'
|
|
|
+ 'Okay, that''s a clue! Maybe you should search the props room?'
|
|
|
+ act 'Continue': gt 'foto', 'bathroom'
|
|
|
+ end
|
|
|
+ else
|
|
|
+ act 'Listen to the gossip': gt 'foto_models', 'model_chatter'
|
|
|
end
|
|
|
if AlexandriaQW = 2:
|
|
|
- act'Search the props'' room':gt 'tatiana_missions', 'mission2A'
|
|
|
+ act'Search the props'' room':gt 'tatiana_missions', 'mission2A'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'showers':
|
|
|
- $loc_arg = 'showers'
|
|
|
- gs'stat'
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
+ gs 'shortgs', 'setloc', 'foto', 'showers'
|
|
|
+ $location_type = 'bathroom'
|
|
|
+ gs 'stat'
|
|
|
+
|
|
|
krystal['shower_sex'] = rand(1,7)
|
|
|
if krystal['shower_sex'] = 7 and krystal['status'] >= 3:gt 'model_krystal','krystalshower'
|
|
|
|
|
@@ -380,10 +374,11 @@ if $ARGS[0] = 'showers':
|
|
|
|
|
|
act 'Go to the studio floor':pcs_shave['free_razor'] = 0 & gt 'foto', 'studio'
|
|
|
|
|
|
- if mc_inventory['shampoo'] > 0:
|
|
|
+ if mc_inventory['shampoo'] <= 0:
|
|
|
+ '<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
|
|
|
+ else
|
|
|
act 'Take a shower (0:15)':
|
|
|
- cla
|
|
|
- *clr
|
|
|
+ *clr & cla
|
|
|
minut += 15
|
|
|
pcs_horny += 1
|
|
|
pcs_hairbsh = 0
|
|
@@ -395,8 +390,7 @@ if $ARGS[0] = 'showers':
|
|
|
if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
|
|
|
if pcs_horny >= 40:
|
|
|
act 'Use the showerhead on your pussy':
|
|
|
- cla
|
|
|
- *clr
|
|
|
+ *clr & cla
|
|
|
$orgasm_or = 'no'
|
|
|
gs 'arousal', 'clit_vibe', -5, 'masturbate', 'exhibitionism'
|
|
|
$orgasm_or = 'no'
|
|
@@ -455,8 +449,6 @@ if $ARGS[0] = 'showers':
|
|
|
dynamic $brit
|
|
|
act 'Get out of the shower':gt 'foto', 'showers'
|
|
|
end
|
|
|
- else
|
|
|
- '<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
|
|
|
end
|
|
|
'<a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
|
|
|
if mesec > 0 and isprok = 0:
|
|
@@ -493,14 +485,11 @@ if $ARGS[0] = 'showers':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'makeup':
|
|
|
- gs'stat'
|
|
|
*clr & cla
|
|
|
- $locM = 'foto'
|
|
|
- $locM_arg = 'makeup'
|
|
|
- $loc_arg = 'makeup'
|
|
|
- $menu_loc = 'foto'
|
|
|
- $menu_arg = 'makeup'
|
|
|
menu_off = 0
|
|
|
+ gs 'shortgs', 'setloc', 'foto', 'makeup'
|
|
|
+ $location_type = 'indoors'
|
|
|
+ gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
|
|
|
'The backstage area where you and the other girls put on your makeup.'
|
|
|
act 'Back to the studio': gt 'foto', 'studio'
|
|
@@ -521,7 +510,7 @@ if $ARGS[0] = 'makeup':
|
|
|
act'Do your own makeup': menu_off = 1 & gt 'mirror', 'start'
|
|
|
|
|
|
act'Go to the makeup artists (0:30)':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
minut += 30
|
|
|
pcs_hairbsh = 1
|
|
@@ -552,7 +541,10 @@ end
|
|
|
|
|
|
|
|
|
if $ARGS[0] = 'manager_talk':
|
|
|
+ *clr & cla
|
|
|
+ menu_off = 1
|
|
|
minut += 1
|
|
|
+ gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
|
|
|
'You approach the manager''s desk.'
|
|
|
'"Something I can help you with <<$model[''firstname'']>>?"'
|
|
@@ -627,7 +619,7 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'hiring_ask':
|
|
|
act 'Ask about working as a glamor model':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
minut += 1
|
|
|
gs 'stat'
|
|
@@ -713,7 +705,7 @@ if $ARGS[0] = 'hiring_ask':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'interview':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
if anushkaQW['model_referral'] = 1: 'You walk up to the front desk and say Anushka sent you. You only have to wait a few minutes before somebody arrives to interview you.'
|
|
@@ -739,7 +731,7 @@ if $ARGS[0] = 'interview':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'interview2':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
if pcs_inhib > 40:
|
|
|
gs 'willpower', 'skill', 'pcs_inhib', 'easy'
|
|
@@ -889,7 +881,7 @@ if $ARGS[0] = 'job_decline':
|
|
|
if foto_weight >= 25:
|
|
|
'"I''m sorry," he says shaking his head. "You did lose weight, I''ll give you that, but it''s not quite enough for our requirements. But you''ve made progress. Give it a few more weeks of effort and come back again. We can still use you if you''re within the limit."'
|
|
|
act'Sigh':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'You sigh in disappointment as you pick your clothes back up and start to get dressed again. Still more weight to lose? Now what are you going to do? Keep trying or give up?'
|
|
|
gs 'clothing', 'wear_last_worn'
|
|
@@ -902,7 +894,7 @@ if $ARGS[0] = 'job_decline':
|
|
|
'The man''s words sting heavily at your confidence and you cover yourself in shame by instinct. He still continues to eye you up and down and you squirm as his gaze roams your breasts, stomach, and pussy.'
|
|
|
'"That being said, I can still see that you have some potential. So go running, start working out. If you lose some weight, I could see you getting another shot at working here in the future."'
|
|
|
act'React solemnly':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'You glumly pick your clothes up off the floor and get dressed before leaving. As you do, you stop at the door and look back in.'
|
|
|
'<i>Is this it for me? Am I ever going to be able to lose enough weight to work here?</i>'
|
|
@@ -915,7 +907,7 @@ if $ARGS[0] = 'job_decline':
|
|
|
end
|
|
|
|
|
|
act'React determinedly':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'You nod at him, feeling a bit dejected but more determined than ever. You get dressed with purpose and head to the door. As you do, you think to yourself...'
|
|
|
'<i>I will be able to do this! I''ll get in shape and I''ll work here one day! I''m not going to lose my shot at this!</i>'
|
|
@@ -1029,7 +1021,7 @@ if $ARGS[0] = 'job_offer':
|
|
|
elseif age_truth = 1:
|
|
|
if fotofit ! 1:
|
|
|
act '"Oh. Okay..."':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'You put your clothes back on, slightly annoyed as you get ready to leave. If he knew you were underage, why did he have you strip in the first place?!'
|
|
|
gs 'clothing', 'wear_last_worn'
|
|
@@ -1040,7 +1032,7 @@ if $ARGS[0] = 'job_offer':
|
|
|
end
|
|
|
|
|
|
act 'Plead':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
|
|
|
fakepassport = 2
|
|
|
fotofakepassport = 2
|
|
@@ -1150,7 +1142,7 @@ end
|
|
|
|
|
|
|
|
|
if $ARGS[0] = 'model_name1':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'"A few more things to fill out your profile. Did you want to have a model name or a pseudonym? Or would you prefer to use your real name?"'
|
|
|
gs 'foto', 'model_name2'
|
|
@@ -1171,7 +1163,7 @@ if $ARGS[0] = 'model_name2':
|
|
|
|
|
|
if model['ask_model_name'] = 0:
|
|
|
act'Why would I?':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'"Why would I want to use a fake name?" you ask. "Is there a reason I should?"'
|
|
|
'"Not <i>should</i>," he explains. "But some girls like to have a little distance from their personal lives. Or they use it to sound more professional or to stand out more. A name like ''Elena Ivanova'' isn''t exactly uncommon."'
|
|
@@ -1184,7 +1176,7 @@ if $ARGS[0] = 'model_name3':
|
|
|
$model['firstname'] = input("What is the first name of your model persona?")
|
|
|
$model['nickname'] = input("What is the shortened version or nickname of your model persona?")
|
|
|
$model['lastname'] = input("What is the last name of your model persona?")
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
|
|
|
'"<<$model[''firstname'']>>..." he mutters, slowly typing. "<<$model[''lastname'']>>... Okay, there. Is this correct?"'
|
|
|
'He turns the screen around so you can see what he wrote.'
|
|
@@ -1224,7 +1216,7 @@ if $ARGS[0] = 'model_profile':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'pay_type':
|
|
|
- cla & *clr
|
|
|
+ *clr & cla
|
|
|
'<center><b><font color="maroon">Photographer</font></b></center>'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
|
|
|
'"One last question. How do you want to be paid? Cash on the spot or direct deposit into your bank account?"'
|
|
@@ -1349,8 +1341,7 @@ if $ARGS[0] = 'microcamera_ask':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'blackm':
|
|
|
- *clr
|
|
|
- cla
|
|
|
+ *clr & cla
|
|
|
menu_off = 1
|
|
|
gs 'stat'
|
|
|
|
|
@@ -1494,19 +1485,19 @@ if $ARGS[0] = 'underwear':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'cikl':
|
|
|
- if modelfoto['erotic'] >= 10 or (modelfoto['erotic'] > modelfoto['fashion'] and modelfoto['erotic'] > modelfoto['fitness'] and modelfoto['erotic'] > modelfoto['glamour'] and modelfoto['erotic'] > modelfoto['lingerie'] and modelfoto['erotic'] > modelfoto['catalog'] and modelfoto['erotic'] > modelfoto['nude']):
|
|
|
+ if modelfoto['erotic'] >= 10 or (modelfoto['erotic'] > modelfoto['fashion'] and modelfoto['erotic'] > modelfoto['fitness'] and modelfoto['erotic'] > modelfoto['glamour'] and modelfoto['erotic'] > modelfoto['lingerie'] and modelfoto['erotic'] > modelfoto['catalog'] and modelfoto['erotic'] > modelfoto['nude']):
|
|
|
$model['type'] = 'erotic'
|
|
|
- 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'] :
|
|
|
+ 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'] :
|
|
|
$model['type'] = 'artistic nude'
|
|
|
- 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'] :
|
|
|
+ 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'] :
|
|
|
$model['type'] = 'fitness'
|
|
|
- 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'] :
|
|
|
+ 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'] :
|
|
|
$model['type'] = 'glamour'
|
|
|
- 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'] :
|
|
|
+ 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'] :
|
|
|
$model['type'] = 'lingerie'
|
|
|
- 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'] :
|
|
|
+ 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'] :
|
|
|
$model['type'] = 'fashion'
|
|
|
- elseif modelfoto['catalog'] > 0:
|
|
|
+ elseif modelfoto['catalog'] > 0:
|
|
|
$model['type'] = 'catalog'
|
|
|
end
|
|
|
!! if model = 1 and week = 1 and model['job_reset'] ! daystart: model_job_week = 0 & model['job_reset'] = daystart
|