|
@@ -21,7 +21,7 @@ if $ARGS[0] = 'start':
|
|
|
exit
|
|
|
end
|
|
|
|
|
|
- 'Manager''s office open.'
|
|
|
+ 'The manager''s office is open.'
|
|
|
|
|
|
act 'Go to the manager': gt 'pornstudio', 'manager'
|
|
|
|
|
@@ -68,7 +68,7 @@ if $ARGS[0] = 'start':
|
|
|
if konvert = 0:
|
|
|
workDolg = 200000
|
|
|
workDolgDay = 7
|
|
|
- 'Digging through your things you begin to panic. No envelope. You search again, but to your despair, you can''t find it. You stand there, unable to speak.'
|
|
|
+ 'Digging through your things, you begin to panic. No envelope. You search again, but to your despair, you can''t find it. You stand there, unable to speak.'
|
|
|
'The manager grabs his phone and makes a call. You can''t hear exactly what he is saying because your heart is beating so loud, but he soon hangs up.'
|
|
|
'"You are very lucky that the boss is in a good mood. He has given you one week to recover his losses."'
|
|
|
'"You have until next Friday evening to bring me 200,000 <b>₽</b>. Do this and we''re done, you will never work for us again.'
|
|
@@ -184,18 +184,18 @@ if $ARGS[0] = 'pa':
|
|
|
if k < 14:jump 'repeating'
|
|
|
if ftypecount[1] = ftypecount[0]:
|
|
|
if ftypecount[0] = ftypecount[2]:
|
|
|
- 'You are known from your <<$ftypecount[0]>>, <<$ftypecount[1]>> and <<$ftypecount[2]>> scenes.'
|
|
|
+ 'You are known for your <<$ftypecount[0]>>, <<$ftypecount[1]>> and <<$ftypecount[2]>> scenes.'
|
|
|
else
|
|
|
- 'You are known from your <<$ftypecount[0]>> and <<$ftypecount[1]>> scenes.'
|
|
|
+ 'You are known for your <<$ftypecount[0]>> and <<$ftypecount[1]>> scenes.'
|
|
|
end
|
|
|
else
|
|
|
- 'You are known from your <<$ftypecount[0]>> scenes.'
|
|
|
+ 'You are known for your <<$ftypecount[0]>> scenes.'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if film < 10 and porn_fame < 10:
|
|
|
|
|
|
- '"By the way, if you wanted, I could completely remove them from our systems - for a good price of course." the guy whispers.'
|
|
|
+ '"By the way, if you wanted, I could completely remove them from our systems - for the right price of course." the guy whispers.'
|
|
|
|
|
|
act 'Tell me more':
|
|
|
cla
|
|
@@ -262,7 +262,7 @@ if $ARGS[0] = 'delivery':
|
|
|
workDisk = 1
|
|
|
minut += 15
|
|
|
gs 'stat'
|
|
|
- 'You slip into a jeep by the entrance, and are driven to the sauna.'
|
|
|
+ 'You slip into a car by the entrance, and are driven to the sauna.'
|
|
|
|
|
|
if saunasex = 1:
|
|
|
'You recall going to this sauna. You had some pretty energetic sex here.'
|
|
@@ -272,8 +272,8 @@ if $ARGS[0] = 'delivery':
|
|
|
'This sauna is located near your home. You find it strange that you didn''t notice it before.'
|
|
|
end
|
|
|
|
|
|
- 'You go to the sauna, and are introduced to the local managers. It is explained to you who you need to deliver to, and reminded that it is necessary to return the envelope the same day you receive it.'
|
|
|
- '"Don''t forget to use secure transport. We''ll see you on Fridays and don''t fuck up."'
|
|
|
+ 'You go to the sauna, and are introduced to the local managers. It is explained to you who you need to deliver to, and are reminded that it is necessary to return the envelope the same day you receive it.'
|
|
|
+ '"Don''t forget to use secure transport. We''ll see you on Fridays. <i>Don''t</i> fuck up."'
|
|
|
|
|
|
act 'Leave':bomzQW = 2 & gt 'city_residential'
|
|
|
end
|
|
@@ -402,10 +402,10 @@ if $ARGS[0] = 'manager':
|
|
|
! Your first ever movie offer
|
|
|
if firstoffer = 0:
|
|
|
firstoffer = 1
|
|
|
- '"So, you''re the new girl? As luck would have it, we are looking for a brand new girl for our next shoot. It''s called ''Girls Jerk Guys #36''."'
|
|
|
+ '"So, you''re the new girl? As luck would have it, we''re looking for a brand new girl for our next shoot. It''s called ''Girls Jerk Guys #36''."'
|
|
|
'"For 500 <b>₽</b>, you have to jerk a guy off and have him cum on your tits."'
|
|
|
else
|
|
|
- '"Hello. Since you are brand new, all I can offer is an introductory movie called ''Girls Jerk Guys #36''."'
|
|
|
+ '"Hello. Since you''re brand new, all I can offer you is an introductory movie called ''Girls Jerk Guys #36''."'
|
|
|
'"For 500 <b>₽</b>, you have to jerk a guy off and have him cum on your tits."'
|
|
|
end
|
|
|
|
|
@@ -770,13 +770,13 @@ if $ARGS[0] = 'first':
|
|
|
menu_off = 1
|
|
|
gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/casting/casting0.jpg"></center>'
|
|
|
- 'You sit down on the sofa and greet the boss. "I see it''s your first time with us. Do you want to be a porn star?'
|
|
|
+ 'You sit down on the sofa and greet the boss. "I see it''s your first time with us. So, you want to be a porn star?'
|
|
|
|
|
|
if pcs_inhib < 40 and (money <= 500 and karta <= 500 and home_owned[2] = 0) or (narkoman = 1 or SLomka > 0):
|
|
|
- 'While you do not feel confident enough showing off your body, you are desperate for money, and are willing to do anything to earn it.'
|
|
|
+ 'While you don''t feel confident enough showing off your body, you are desperate for money, and are willing to do anything to earn it.'
|
|
|
act 'Continue': gt 'pornstudio', 'yes'
|
|
|
elseif pcs_inhib < 40:
|
|
|
- 'You do not feel confident enough to start a career in porn. You should gain some confidence showing off your body first.'
|
|
|
+ 'You don''t feel confident enough to start a career in porn. You should gain some confidence showing off your body first.'
|
|
|
act 'Leave': gt 'pornstudio', 'start'
|
|
|
else
|
|
|
act 'Continue': gt 'pornstudio', 'yes'
|
|
@@ -788,7 +788,7 @@ if $ARGS[0] = 'yes':
|
|
|
menu_off = 1
|
|
|
gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/casting/casting0.jpg"></center>'
|
|
|
- 'You sit down on the sofa and greet the boss. "I see it''s your first time with us. Do you want to be a porn star?"'
|
|
|
+ 'You sit down on the sofa and greet the boss. "I see it''s your first time with us. So, you want to be a porn star?"'
|
|
|
act 'Yes':
|
|
|
cla
|
|
|
minut += 5
|
|
@@ -823,7 +823,7 @@ if $ARGS[0] = 'yes':
|
|
|
|
|
|
act 'Grab your clothes and run out': gt 'pornstudio', 'start'
|
|
|
|
|
|
- act 'Lie down on the sofa and spread your legs':
|
|
|
+ act 'Lie down':
|
|
|
cla & *clr
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
@@ -860,7 +860,7 @@ if $ARGS[0] = 'yes':
|
|
|
|
|
|
if $pfname <= 0:$pfname = '<<$pcs_nickname>> BimboStar'
|
|
|
|
|
|
- '"<<$pfname>>, wonderful name. Now listen. Before shooting starts, you have to pass the medical examination. If we find any sign of a sexually transmitted disease, you are out, no exceptions."'
|
|
|
+ '"<<$pfname>>, wonderful name. Now listen. Before shooting starts, you have to pass a medical examination. If we find any sign of a sexually transmitted disease, you are out, no exceptions."'
|
|
|
'"There we go, you''re now registered. We are quite big in the industry, shooting about four films a day, so you can choose what you to be in. Anal or gangbang, it''s your choice, just remember to take care of your health. If you get sick or something, just cancel the shoot. You can do this up to the day of the shooting."'
|
|
|
'"Come see me when you want a contract. And welcome to the world of pornography...<<$pfname>>."'
|
|
|
|
|
@@ -921,7 +921,7 @@ if $ARGS[0] = 'medical':
|
|
|
!! pornvnesh uses the same calc as pcs_apprnc except the clothing bonus is hard coded (to 900 and then reduced) and the glasses penalty is removed
|
|
|
pornvnesh = pcs_apprncbase + (pcs_apprncbase * 3 / 5) + mopkoef + (pcs_hairbsh * 10) + lipbalmKoef + (pcs_breath * 5) - sweatKoef - dyevmod - hairkoef - legkoef
|
|
|
'A skinny white-haired woman is waiting for you in the dressing room.'
|
|
|
- 'You take a thorough shower, carefully washing yourself, and get an enema too. You then get your hair and make-up done.'
|
|
|
+ 'You take a thorough shower before getting an enema. You then get your hair and make-up done.'
|
|
|
|
|
|
act 'Go to the set': gt 'pornfilm', '<<pf>>'
|
|
|
end
|
|
@@ -1011,9 +1011,9 @@ if $ARGS[0] = 'postvideo':
|
|
|
if succubusflag = 1:
|
|
|
!! May add a check to clear unprotfilm based on sucpcinfo (the PC knows Succubae are immune to STD''s)
|
|
|
if pfcash > 0:
|
|
|
- $tmp = '"I almost can''t believe <i>they</i> paid <i>me</i> <<pfcash>><b>₽</b> for a wonderful meal!"'
|
|
|
+ $tmp = '"I almost can''t believe they paid me <<pfcash>><b>₽</b> for such a wonderful meal!"'
|
|
|
else
|
|
|
- $tmp = '"And they think I''m doing this for free, when really they''re paying in other coin!"'
|
|
|
+ $tmp = '"And they think I''m doing this for free. If only they knew they were paying me in another way..."'
|
|
|
end
|
|
|
'You let slip a satisfied smirk and think to yourself, <<$tmp>>'
|
|
|
elseif knowpreg = 0 and thinkpreg = 0 and pillcon2 < 1000:
|
|
@@ -1021,7 +1021,7 @@ if $ARGS[0] = 'postvideo':
|
|
|
!! Left "ppreg" pending its eventual use
|
|
|
if ppreg = 0:
|
|
|
if pfcash > 0:
|
|
|
- $tmp = ' Was <<pfcash>> <b>₽</b> worth the risk of getting impregnated by a porn actor you''ll probably never see again?'
|
|
|
+ $tmp = ' Was <<pfcash>> <b>₽</b> worth the risk of getting impregnated by a seedy porn actor you''ll probably never see again?'
|
|
|
else
|
|
|
$tmp = 'You didn''t even get paid to risk pregnancy! You''ll likely never see the guy again.'
|
|
|
end
|
|
@@ -1104,7 +1104,7 @@ if $ARGS[0] = '1':
|
|
|
act 'Continue':
|
|
|
*clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/film_0.jpg"></center>'
|
|
|
- '"Then she shoots the scenes, an interesting and exciting process. The films we shoot...'
|
|
|
+ '"Then she shoots the scenes, an interesting and exciting process that can take hours. The films we shoot...'
|
|
|
|
|
|
act 'Continue':
|
|
|
*clr & cla
|
|
@@ -1114,9 +1114,9 @@ if $ARGS[0] = '1':
|
|
|
act 'How and where it is all sold?':
|
|
|
*clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/pierre_2.jpg"></center>'
|
|
|
- '"We have guys at the sauna in the residential area and in the sex shop. We''re thinking of moving in on the university as well- and not just selling our films there. We could possibly shoot a few films on campus. If they helped us, it would be good for profits, entitle us to dividends and more."'
|
|
|
+ '"We mostly sell it digitally on our premium websites, but we have guys at the sauna in the residential area and in the sex shop for those who want to buy physically. We''re thinking of moving in on the university as well- and not just selling our films there. We could possibly shoot a few films on campus. If they helped us, it would be good for profits, entitle us to dividends and more."'
|
|
|
|
|
|
- act 'Is it legal?':
|
|
|
+ act 'Is that legal?':
|
|
|
*clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/ment_0.jpg"></center>'
|
|
|
'"It doesn''t matter since we bribe the cops. Maybe in the future you will be able to help us with that? In the meantime, I''ve told you everything you need to know."'
|
|
@@ -1163,7 +1163,7 @@ if $ARGS[0] = '2':
|
|
|
gs 'stat'
|
|
|
|
|
|
if pcs_apprnc < carrar:
|
|
|
- '"You don''t have what it takes, sorry."'
|
|
|
+ '"You don''t have what it takes. Sorry."'
|
|
|
elseif pcs_apprnc >= carrar:
|
|
|
actr = 1
|
|
|
|