|
@@ -1,13 +1,13 @@
|
|
|
-# poli
|
|
|
+# city_clinic
|
|
|
$location_type = 'public_indoors'
|
|
|
|
|
|
if $ARGS[0] = 'start':
|
|
|
CLOSE all
|
|
|
- $sexloc = 'poli'
|
|
|
- $loc = 'poli'
|
|
|
+ $sexloc = 'city_clinic'
|
|
|
+ $loc = 'city_clinic'
|
|
|
$metka = 'start'
|
|
|
$location_type = 'indoors'
|
|
|
- $menu_loc = 'poli'
|
|
|
+ $menu_loc = 'city_clinic'
|
|
|
$menu_arg = 'start'
|
|
|
menu_off = 0
|
|
|
*clr & cla
|
|
@@ -33,18 +33,18 @@ if $ARGS[0] = 'start':
|
|
|
*nl
|
|
|
if pcs_gpolimilkdonation >= 2 and lactation['active'] > 0 and lact_ev['pcs_knows_milkbank'] < 1 and lactation['pc_aware'] > 0:
|
|
|
*nl
|
|
|
- '<a href="exec: minut += 5 & gt ''poli'', ''milk_reception''">Ask</a> at the reception if there is the possibilty for breast milk donation'
|
|
|
+ '<a href="exec: minut += 5 & gt ''city_clinic'', ''milk_reception''">Ask</a> at the reception if there is the possibilty for breast milk donation'
|
|
|
elseif pcs_gpolimilkdonation < 2 and lactation['active'] > 0 and lact_ev['pcs_knows_milkbank'] < 1 and lactation['pc_aware'] > 0:
|
|
|
*nl
|
|
|
- 'At the reception a small <a href="exec: minut += 5 & gt ''poli'', ''milk_advertisement''">advertisement</a> catches your eye.'
|
|
|
+ 'At the reception a small <a href="exec: minut += 5 & gt ''city_clinic'', ''milk_advertisement''">advertisement</a> catches your eye.'
|
|
|
end
|
|
|
|
|
|
- if workhosp = 1 and hour >= 8 and hour <= 9 and week < 6:act 'Begin your work day':gt 'poli', 'beginwork'
|
|
|
+ if workhosp = 1 and hour >= 8 and hour <= 9 and week < 6:act 'Begin your work day':gt 'city_clinic', 'beginwork'
|
|
|
|
|
|
act 'Leave the clinic': minut += 5 & gt 'city_residential'
|
|
|
- act 'Go see a cosmetic surgeon':gt 'poli','cosmetic1'
|
|
|
+ act 'Go see a cosmetic surgeon':gt 'city_clinic','cosmetic1'
|
|
|
if lact_ev['pcs_knows_milkbank'] >= 1:
|
|
|
- act 'Go to the breast milk donation office': minut += 5 & gt 'poli','milk_donation_room'
|
|
|
+ act 'Go to the breast milk donation office': minut += 5 & gt 'city_clinic','milk_donation_room'
|
|
|
end
|
|
|
|
|
|
if pcs_health < (pcs_vital * 10 + pcs_stren * 5) or pain['total'] > 10:
|
|
@@ -55,13 +55,13 @@ if $ARGS[0] = 'start':
|
|
|
gs 'medical_din','healthTreatment'
|
|
|
gs 'stat'
|
|
|
|
|
|
- if hosprand = 0:gt 'poli', '0'
|
|
|
- if hosprand = 1:gt 'poli', '1'
|
|
|
- if hosprand = 2:gt 'poli', '2'
|
|
|
+ if hosprand = 0:gt 'city_clinic', '0'
|
|
|
+ if hosprand = 1:gt 'city_clinic', '1'
|
|
|
+ if hosprand = 2:gt 'city_clinic', '2'
|
|
|
'The doctor guides you to a bed and tells you to lie down, after which he gives you a combined painkiller, steroid and vitamin shot.'
|
|
|
'You feel drowsy for a little while, but afterwards you feel a lot better. The shot sped up your aching body''s recovery by a lot, meaning the pain probably won''t come back nearly as strongly when the shot wears off, and should aid your health recovery over the coming days.'
|
|
|
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -72,19 +72,19 @@ if $ARGS[0] = 'start':
|
|
|
minut += 60
|
|
|
pcs_mood = 100
|
|
|
|
|
|
- if hosprand = 0:gt 'poli', '0'
|
|
|
- if hosprand = 1:gt 'poli', '1'
|
|
|
- if hosprand = 2:gt 'poli', '2'
|
|
|
+ if hosprand = 0:gt 'city_clinic', '0'
|
|
|
+ if hosprand = 1:gt 'city_clinic', '1'
|
|
|
+ if hosprand = 2:gt 'city_clinic', '2'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
|
|
|
'You lie down on the therapist''s couch and tell him all about your troubles. You immediately feel much better, but the therapist seems to be in a state of shock.'
|
|
|
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
gs 'medical_din', 'birth_control'
|
|
|
|
|
|
- act 'Go to the STD clinic':gt 'poli', 'stdclinic'
|
|
|
+ act 'Go to the STD clinic':gt 'city_clinic', 'stdclinic'
|
|
|
|
|
|
if money >= 15000 and preg = 1 and pregchem < 1863 and knowpreg = 1:
|
|
|
act 'Get an abortion (15,000 <b>₽</b>)':
|
|
@@ -99,7 +99,7 @@ if $ARGS[0] = 'start':
|
|
|
minut += 60
|
|
|
gs 'stat'
|
|
|
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -148,7 +148,7 @@ if $ARGS[0] = 'start':
|
|
|
gs 'cum_cleanup', 'reset'
|
|
|
dynamic $d_cycreport_choice
|
|
|
gs 'stat'
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -159,14 +159,14 @@ if $ARGS[0] = 'start':
|
|
|
polisickday = daystart
|
|
|
terrnd = rand(0, 1)
|
|
|
|
|
|
- if terrnd = 0:gt 'poli', 'drPP'
|
|
|
- if terrnd = 1:gt 'poli', 'ninel'
|
|
|
+ if terrnd = 0:gt 'city_clinic', 'drPP'
|
|
|
+ if terrnd = 1:gt 'city_clinic', 'ninel'
|
|
|
end
|
|
|
else
|
|
|
act 'See Dr. Ninel':
|
|
|
*clr & cla
|
|
|
polisickday = daystart
|
|
|
- gt 'poli', 'ninel2'
|
|
|
+ gt 'city_clinic', 'ninel2'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -179,7 +179,7 @@ if $ARGS[0] = 'start':
|
|
|
|
|
|
if ninelrand = 0:
|
|
|
'At the reception desk you are told that Dr. Ninel is in her office.'
|
|
|
- act 'Go to Dr. Ninel':gt 'poli', 'ninel3'
|
|
|
+ act 'Go to Dr. Ninel':gt 'city_clinic', 'ninel3'
|
|
|
elseif ninelrand = 1:
|
|
|
'At the reception desk you are told that Dr. Ninel can''t see you today.'
|
|
|
act 'Leave the clinic': minut += 5 & gt 'city_residential'
|
|
@@ -193,11 +193,11 @@ if $ARGS[0] = 'start':
|
|
|
if cumcondslip > 0 and cumcondslip_aware > 0:
|
|
|
act 'See a Doctor':
|
|
|
*clr & cla
|
|
|
- gt 'poli', 'drPP'
|
|
|
+ gt 'city_clinic', 'drPP'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if katjob > 0:act 'Visit the chief doctor': gt 'poli', 'glavdoc'
|
|
|
+ if katjob > 0:act 'Visit the chief doctor': gt 'city_clinic', 'glavdoc'
|
|
|
|
|
|
if pcs_teeth > -1:
|
|
|
act 'Go to the dentist':
|
|
@@ -291,7 +291,7 @@ if $ARGS[0] = 'start':
|
|
|
glassqw = 2
|
|
|
glass = 1
|
|
|
blizoruk += 1
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -304,7 +304,7 @@ if $ARGS[0] = 'start':
|
|
|
|
|
|
if glass = 1:'The doctor adds, there is also the option to buy glasses for 4,500 <b>₽</b>.'
|
|
|
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
|
|
|
if glass = 1:
|
|
|
if money >= 4500:
|
|
@@ -316,7 +316,7 @@ if $ARGS[0] = 'start':
|
|
|
gs 'stat'
|
|
|
'You buy a new, more stylish pair of glasses.'
|
|
|
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
else
|
|
|
*nl
|
|
@@ -334,7 +334,7 @@ if $ARGS[0] = 'start':
|
|
|
glass = 0
|
|
|
gs 'stat'
|
|
|
'You undergo laser eye surgery. Your eyesight is much better now.'
|
|
|
- act 'Return to the entrance':gt 'poli', 'start'
|
|
|
+ act 'Return to the entrance':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
else
|
|
|
*nl
|
|
@@ -361,9 +361,9 @@ if $ARGS[0] = 'stdclinic':
|
|
|
' Complete cure for yeast infection - 15,000 <b>₽</b>.'
|
|
|
' Treatment requires hospitalization on first Monday of each month.'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
|
|
|
- if money >= 1000: act 'Take STD test (1,000 <b>₽</b>)': gt 'poli', 'stdcheck'
|
|
|
+ if money >= 1000: act 'Take STD test (1,000 <b>₽</b>)': gt 'city_clinic', 'stdcheck'
|
|
|
|
|
|
if GerpesNapr > 0 and money >= 450 and GerpesUkolDay ! daystart:
|
|
|
act 'Get herpes shot (450 <b>₽</b>). You need <<GerpesNapr>> more injections to complete the treatment.':
|
|
@@ -377,7 +377,7 @@ if $ARGS[0] = 'stdclinic':
|
|
|
'You see the nurse and she gives you a painful injection in your ass.'
|
|
|
|
|
|
if GerpesNapr = 0:Gerpes = -10 & 'You have completed the treatment.'
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -394,7 +394,7 @@ if $ARGS[0] = 'stdclinic':
|
|
|
|
|
|
if TriperNapr = 0:TriperOral = 0 & TriperOralSigns = 0 & Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'You have completed the treatment.'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -413,7 +413,7 @@ if $ARGS[0] = 'stdclinic':
|
|
|
|
|
|
'"That''s it, you might still feel a bit off but the infection is now cured".'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -433,7 +433,7 @@ if $ARGS[0] = 'stdclinic':
|
|
|
'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
|
|
|
'After a long recovery, you have been completely cured of your herpes.'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -450,7 +450,7 @@ if $ARGS[0] = 'stdclinic':
|
|
|
'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
|
|
|
'After a long recovery, you have been completely cured of your thrush.'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -490,16 +490,16 @@ if $ARGS[0] = 'stdcheck':
|
|
|
'The doctor, unfazed, speaks in a calm voice: "Oh, you noticed that huh? The camera is there for your safety as well as mine, miss. I''ve been accused of molestation before."'
|
|
|
'"Then it hit me: people on the internet pay good money to see my examinations! Two birds with one stone, right?" he continues. After a moment of silence he adds with a wicked grin: "Okay... since you spotted the camera, I''ll offer you a choice. If you give me 10.000 <b>₽</b> I''ll delete the footage, as if you were never here. I''d be losing a lot of income, so that''s only fair."'
|
|
|
'Before you can reply he adds: "Or if you don''t mind being watched by a few thousand people who you''ll probably never meet anyway, I can give you... 3000 <b>₽</b> to keep quiet. It''s your call."'
|
|
|
- act 'Pay him to delete the footage':gt 'poli', 'ven1'
|
|
|
- act 'Take the bribe':gt 'poli', 'ven2'
|
|
|
+ act 'Pay him to delete the footage':gt 'city_clinic', 'ven1'
|
|
|
+ act 'Take the bribe':gt 'city_clinic', 'ven2'
|
|
|
act 'Threaten to report him':
|
|
|
*clr & cla
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/bg28qy97.jpg"></center>'
|
|
|
'The doctor brings his face very close to yours and hisses: "Look at where you are, bitch! You better shut your fucking mouth right now, I can make you disappear just like THAT and everyone would be none the wiser!" He snaps his fingers for emphasis. "I made you a very generous offer, don''t make me regret that. An unfortunate ''complication'' is easy to arrange..."'
|
|
|
'Then he becomes his calm self again and sighs: "Anyway, let''s forget what you just said and start over. Are you going to compensate me for having to delete the footage?"'
|
|
|
- act 'Pay him to delete the footage':gt 'poli', 'ven1'
|
|
|
- act 'Take the bribe':gt 'poli', 'ven2'
|
|
|
- act 'Try to escape':gt 'poli', 'ven3'
|
|
|
+ act 'Pay him to delete the footage':gt 'city_clinic', 'ven1'
|
|
|
+ act 'Take the bribe':gt 'city_clinic', 'ven2'
|
|
|
+ act 'Try to escape':gt 'city_clinic', 'ven3'
|
|
|
end
|
|
|
end
|
|
|
else
|
|
@@ -544,7 +544,7 @@ if $ARGS[0] = 'stdcheck':
|
|
|
'Doctor is pleased that you do not have a sexually transmitted disease.'
|
|
|
end
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'stdclinic'
|
|
|
+ act 'Leave':gt 'city_clinic', 'stdclinic'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -560,7 +560,7 @@ if $ARGS[0] = 'ven1':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/gy93cr29.jpg"></center>'
|
|
|
'You lie down, almost crying, mulling over the doctor''s words again and again in your head. You know it is not fair, but you can''t allow these images to go public and decide to pay him to delete the footage.'
|
|
|
'You pull the money from your wallet and give it to him, hoping he''ll keep true to his word...'
|
|
|
- act 'Return to the lobby':gt'poli','start'
|
|
|
+ act 'Return to the lobby':gt'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'ven2':
|
|
@@ -571,7 +571,7 @@ if $ARGS[0] = 'ven2':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/gy93cr29.jpg"></center>'
|
|
|
'You lie down, almost crying, mulling over the doctor''s words again and again in your head. After a while you decide that you want the money... you probably won''t be recognized, and even if you do: you can always pretend you didn''t know you were being filmed?'
|
|
|
'The doctor seems somewhat surprised to hear your answer, but gives you the money as promised. He grins: "Don''t worry, most of my subscribers don''t live in the city. Maybe a hundred, tops... what are the odds of you running into one of them the coming weeks?"'
|
|
|
- act 'Leave his office':gt'poli','start'
|
|
|
+ act 'Leave his office':gt'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'ven3':
|
|
@@ -1076,13 +1076,13 @@ if $ARGS[0] = 'glavdoc':
|
|
|
'You shake his hand and sort out the paperwork with the personnel department afterwards. Whatever Kat told them must''ve worked, none of them ask any questions about your credentials!'
|
|
|
'Five minutes later when you leave the office, you''re holding a shiny new employee pass and a booklet with relevant information.'
|
|
|
|
|
|
- act 'Return to the lobby':gt 'poli', 'start'
|
|
|
+ act 'Return to the lobby':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if workhosp = 1:act 'Quit your job':gt 'poli', 'discharge'
|
|
|
+ if workhosp = 1:act 'Quit your job':gt 'city_clinic', 'discharge'
|
|
|
|
|
|
- act 'Return to the lobby':gt 'poli', 'start'
|
|
|
+ act 'Return to the lobby':gt 'city_clinic', 'start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'beginwork':
|
|
@@ -1097,7 +1097,7 @@ if $ARGS[0] = 'beginwork':
|
|
|
gt 'WorkHosp', 'start'
|
|
|
end
|
|
|
|
|
|
- act 'Quit your job':gt 'poli', 'discharge'
|
|
|
+ act 'Quit your job':gt 'city_clinic', 'discharge'
|
|
|
|
|
|
end
|
|
|
|
|
@@ -1128,7 +1128,7 @@ if $ARGS[0] = '0':
|
|
|
gs 'willpower', 'sex', 'resist'
|
|
|
gs 'willpower', 'pay', 'resist'
|
|
|
gs 'stat'
|
|
|
- gt 'poli', 'start'
|
|
|
+ gt 'city_clinic', 'start'
|
|
|
end
|
|
|
else
|
|
|
act 'Stop him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
@@ -1156,7 +1156,7 @@ if $ARGS[0] = '1':
|
|
|
gs 'willpower', 'sex', 'resist', 'hard'
|
|
|
gs 'willpower', 'pay', 'resist'
|
|
|
gs 'stat'
|
|
|
- gt 'poli', 'start'
|
|
|
+ gt 'city_clinic', 'start'
|
|
|
end
|
|
|
else
|
|
|
act 'Storm out (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
@@ -1179,7 +1179,7 @@ if $ARGS[0] = '2':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex3.jpg"></center>'
|
|
|
'Going to the office you catch a nurse kneeling before the doctor with his cock in her mouth.'
|
|
|
|
|
|
- act 'Leave':gt 'poli', 'start'
|
|
|
+ act 'Leave':gt 'city_clinic', 'start'
|
|
|
|
|
|
act 'Walk in':
|
|
|
*clr & cla
|
|
@@ -1193,7 +1193,7 @@ if $ARGS[0] = '2':
|
|
|
gs 'willpower', 'cuni', 'resist'
|
|
|
gs 'willpower', 'pay', 'resist'
|
|
|
gs 'stat'
|
|
|
- gt 'poli', 'start'
|
|
|
+ gt 'city_clinic', 'start'
|
|
|
end
|
|
|
else
|
|
|
act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
@@ -1236,68 +1236,68 @@ if $ARGS[0] = 'cosmetic1':
|
|
|
'String implants slowly absorb your body fluids and grow larger over time. We can also drain it for you if it becomes too large.'
|
|
|
*nl
|
|
|
if money >= 80000 and lashair = 0:
|
|
|
- '<a href="exec:gt ''poli'', ''electrolysis''">Electrolysis</a> laser hair removal of legs and pubic area - 80,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''electrolysis''">Electrolysis</a> laser hair removal of legs and pubic area - 80,000 <b>₽</b>'
|
|
|
else
|
|
|
'Electrolysis - laser hair removal of legs and pubic area - 80,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 25000 and pcs_lip < 4:
|
|
|
- '<a href="exec:gt ''poli'', ''lipPlus''">Lip enlargement surgery</a> - 25,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''lipPlus''">Lip enlargement surgery</a> - 25,000 <b>₽</b>'
|
|
|
else
|
|
|
'Lip enlargement surgery - 25,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 30000 and pcs_lip ! 0:
|
|
|
- '<a href="exec:gt ''poli'', ''lipMin''">Lip reduction surgery</a> - 30,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''lipMin''">Lip reduction surgery</a> - 30,000 <b>₽</b>'
|
|
|
else
|
|
|
'Lip reduction surgery - 30,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 90000 and pcs_eyesize < 3:
|
|
|
- '<a href="exec:gt ''poli'', ''eyePlus''">Eye enlargement surgery</a> - 90,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''eyePlus''">Eye enlargement surgery</a> - 90,000 <b>₽</b>'
|
|
|
else
|
|
|
'Eye enlargement surgery - 90,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 90000 and pcs_eyesize ! 0:
|
|
|
- '<a href="exec:gt ''poli'', ''eyeMin''">Eye reduction surgery</a> - 90,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''eyeMin''">Eye reduction surgery</a> - 90,000 <b>₽</b>'
|
|
|
else
|
|
|
'Eye reduction surgery - 90,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 75000 and salo > 40:
|
|
|
- '<a href="exec:gt ''poli'', ''lyposuction''">Liposuction</a> - 75,000 <b>₽</b>'
|
|
|
+ '<a href="exec:gt ''city_clinic'', ''lyposuction''">Liposuction</a> - 75,000 <b>₽</b>'
|
|
|
else
|
|
|
'Liposuction - 75,000 <b>₽</b>'
|
|
|
end
|
|
|
''
|
|
|
if money >= 90000 and silicone ! 0:
|
|
|
- '<a href="exec:brSurTemp = 0 & stringimplant = 0 & fillimplant = 0 & gt ''poli'', ''bImplantA''">Remove breast implants</a> - 90,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 0 & stringimplant = 0 & fillimplant = 0 & gt ''city_clinic'', ''bImplantA''">Remove breast implants</a> - 90,000 <b>₽</b>'
|
|
|
else
|
|
|
'Remove breast implants - 90,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 170000 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 10 & gt ''poli'', ''bImplantA''">Get small breast implants</a> - 170,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 10 & gt ''city_clinic'', ''bImplantA''">Get small breast implants</a> - 170,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get small breast implants - 170,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 180000 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 20 & gt ''poli'', ''bImplantA''">Get medium breast implants</a> - 180,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 20 & gt ''city_clinic'', ''bImplantA''">Get medium breast implants</a> - 180,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get medium breast implants - 180,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 190000 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 30 & gt ''poli'', ''bImplantA''">Get large breast implants</a> - 190,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 30 & gt ''city_clinic'', ''bImplantA''">Get large breast implants</a> - 190,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get large breast implants - 190,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 200000 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 40 & gt ''poli'', ''bImplantA''">Get XXL breast implants</a> - 200,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 40 & gt ''city_clinic'', ''bImplantA''">Get XXL breast implants</a> - 200,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get XXL breast implants - 200,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 200000 and silicone = 0 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 20 & fillimplant = 1 & gt ''poli'', ''bImplantA''">Get fillable implants</a> - 200,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 20 & fillimplant = 1 & gt ''city_clinic'', ''bImplantA''">Get fillable implants</a> - 200,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get fillable implants - 200,000 <b>₽</b>'
|
|
|
end
|
|
|
if money >= 250000 and silicone = 0 and fillimplant = 0 and stringimplant = 0:
|
|
|
- '<a href="exec:brSurTemp = 20 & stringimplant = 1 & gt ''poli'', ''bImplantA''">Get string implants</a> - 250,000 <b>₽</b>'
|
|
|
+ '<a href="exec:brSurTemp = 20 & stringimplant = 1 & gt ''city_clinic'', ''bImplantA''">Get string implants</a> - 250,000 <b>₽</b>'
|
|
|
else
|
|
|
'Get string implants - 250,000 <b>₽</b>'
|
|
|
end
|
|
@@ -1309,7 +1309,7 @@ if $ARGS[0] = 'cosmetic1':
|
|
|
'Buy silicone bag - 500 <b>₽</b>'
|
|
|
end
|
|
|
|
|
|
- act 'Go back':gt 'poli','start'
|
|
|
+ act 'Go back':gt 'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'electrolysis':
|
|
@@ -1323,7 +1323,7 @@ if $ARGS[0] = 'electrolysis':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/electrolysis.jpg"></center>'
|
|
|
'The surgeon has you strip completely and lie down on the table. Over next few hours you are treated by a laser over and over again. When the treatment is finished and you get up from the table, your skin feels silky smooth.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'lipPlus':
|
|
@@ -1337,7 +1337,7 @@ if $ARGS[0] = 'lipPlus':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'lipMin':
|
|
@@ -1351,7 +1351,7 @@ if $ARGS[0] = 'lipMin':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'eyePlus':
|
|
@@ -1365,7 +1365,7 @@ if $ARGS[0] = 'eyePlus':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'eyeMin':
|
|
@@ -1379,7 +1379,7 @@ if $ARGS[0] = 'eyeMin':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'lyposuction':
|
|
@@ -1394,7 +1394,7 @@ if $ARGS[0] = 'lyposuction':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'bImplantA':
|
|
@@ -1428,7 +1428,7 @@ if $ARGS[0] = 'bImplantA':
|
|
|
'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
|
|
|
'By the time you wake up again, the procedure is complete.'
|
|
|
|
|
|
- act 'Continue':gt 'poli', 'cosmetic1'
|
|
|
+ act 'Continue':gt 'city_clinic', 'cosmetic1'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'milk_advertisement':
|
|
@@ -1442,7 +1442,7 @@ if $ARGS[0] = 'milk_advertisement':
|
|
|
'You are not sure why this cought your attention.'
|
|
|
end
|
|
|
if lact_ev['pcs_knows_milkbank'] < 1: lact_ev['pcs_knows_milkbank'] = 1
|
|
|
- act 'Go back':gt 'poli','start'
|
|
|
+ act 'Go back':gt 'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'milk_reception':
|
|
@@ -1452,7 +1452,7 @@ if $ARGS[0] = 'milk_reception':
|
|
|
'She waves into a general direction down the hallway.'
|
|
|
'Nurse at the reception: There should be a sign on the door, it is only a small room.'
|
|
|
if lact_ev['pcs_knows_milkbank'] < 1: lact_ev['pcs_knows_milkbank'] = 1
|
|
|
- act 'Go back':gt 'poli','start'
|
|
|
+ act 'Go back':gt 'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'milk_donation_room':
|
|
@@ -1460,7 +1460,7 @@ if $ARGS[0] = 'milk_donation_room':
|
|
|
gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/milkbank/milkbank_door.jpg"></center>'
|
|
|
'There is a door with a sign on it, indicating this is the office for the milk donation.'
|
|
|
- act 'Go back':gt 'poli','start'
|
|
|
+ act 'Go back':gt 'city_clinic','start'
|
|
|
if lactation['pc_aware'] > 0 and hour < 10 or hour > 19:
|
|
|
'The door seems to be locked, nobody is here.'
|
|
|
'There is a sign that reads "Opening hours are 10:00 to 19:00 daily.'
|
|
@@ -1538,15 +1538,15 @@ if $ARGS[0] = 'milk_donation_room':
|
|
|
lact_ev['poli_sample_vol'] = lact_ev['poli_milkedvolume']
|
|
|
lact_ev['poli_milkedvolume'] = 0
|
|
|
lact_ev['pcs_milkbank_firsttime'] = 1
|
|
|
- act 'Leave':gt 'poli','start'
|
|
|
+ act 'Leave':gt 'city_clinic','start'
|
|
|
end
|
|
|
else
|
|
|
!! if rand(1,100) > 98:
|
|
|
- !! gt 'poli','milk_bank_guy'
|
|
|
+ !! gt 'city_clinic','milk_bank_guy'
|
|
|
!! else
|
|
|
- !! gt 'poli','milk_bank'
|
|
|
+ !! gt 'city_clinic','milk_bank'
|
|
|
!! end
|
|
|
- gt 'poli','milk_bank'
|
|
|
+ gt 'city_clinic','milk_bank'
|
|
|
end
|
|
|
end
|
|
|
else
|
|
@@ -1556,7 +1556,7 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'milk_bank_guy':
|
|
|
'content not finished yet'
|
|
|
- act 'Leave':gt 'poli','start'
|
|
|
+ act 'Leave':gt 'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'milk_bank':
|
|
@@ -1590,7 +1590,7 @@ if $ARGS[0] = 'milk_bank':
|
|
|
'Paid money: <<((lact_ev[''poli_totalmilkdonated'']/50)*100)>><b>₽</b>'
|
|
|
'<br>----------------------------------------'
|
|
|
end
|
|
|
- act 'Leave': gt 'poli', 'milk_donation_room'
|
|
|
+ act 'Leave': gt 'city_clinic', 'milk_donation_room'
|
|
|
end
|
|
|
if lactation['active'] > 0:
|
|
|
act 'Donate breast milk':
|
|
@@ -1607,18 +1607,18 @@ if $ARGS[0] = 'milk_bank':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/milkbank/pumping_room.jpg"></center>'
|
|
|
'The employee leads you into one of the free rooms and invites you to sit down.'
|
|
|
'She prepares the breast pump and signales you to prepare yourself.'
|
|
|
- act 'continue': gt 'poli','milk_donation'
|
|
|
+ act 'continue': gt 'city_clinic','milk_donation'
|
|
|
end
|
|
|
act 'Don''t follow her':
|
|
|
*clr & cla
|
|
|
menu_off = 1
|
|
|
gs 'stat'
|
|
|
'You: Ah Sorry! I forgot something and can''t donate now.'
|
|
|
- act 'Leave':gt 'poli', 'milk_donation_room'
|
|
|
+ act 'Leave':gt 'city_clinic', 'milk_donation_room'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
- act 'Leave':gt 'poli','start'
|
|
|
+ act 'Leave':gt 'city_clinic','start'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'milk_donation':
|
|
@@ -1685,9 +1685,9 @@ if $ARGS[0] = 'milk_donation':
|
|
|
if lactation['breastmv'] > lactation['breastmm']/2 and lactation['breastmv'] >= 100000:
|
|
|
'The employee looks at your breasts'
|
|
|
'Nurse: It seems there is still some milk left, do you want to donate more?'
|
|
|
- act 'have your breasts pumped again': gt 'poli','milk_donation'
|
|
|
+ act 'have your breasts pumped again': gt 'city_clinic','milk_donation'
|
|
|
else
|
|
|
- act 'ask to donate more': gt 'poli','milk_donation'
|
|
|
+ act 'ask to donate more': gt 'city_clinic','milk_donation'
|
|
|
end
|
|
|
act 'enough for today':
|
|
|
*clr & cla
|
|
@@ -1700,19 +1700,19 @@ if $ARGS[0] = 'milk_donation':
|
|
|
end
|
|
|
act 'leave':
|
|
|
lact_ev['poli_milkedvolume'] = 0
|
|
|
- gt 'poli', 'milk_donation_room'
|
|
|
+ gt 'city_clinic', 'milk_donation_room'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
elseif lact_ev['poli_donationsessioncount'] > 0:
|
|
|
'Sorry Ms. <<$pcs_lastname>>, we are closing now.'
|
|
|
'You put on your top, and the employee hands you <<lact_ev[''poli_donatemoney'']>><b>₽</b> for your donated breast milk.'
|
|
|
- act 'Leave':minut += 5 & gt 'poli', 'milk_donation_room'
|
|
|
+ act 'Leave':minut += 5 & gt 'city_clinic', 'milk_donation_room'
|
|
|
else
|
|
|
'The milk donation service is closed. It''s open every day between 10:00 and 19:00.'
|
|
|
- act 'Leave':minut += 5 & gt 'poli', 'milk_donation_room'
|
|
|
+ act 'Leave':minut += 5 & gt 'city_clinic', 'milk_donation_room'
|
|
|
end
|
|
|
end
|
|
|
|
|
|
---- poli ---------------------------------
|
|
|
+--- city_clinic ---------------------------------
|
|
|
|