ソースを参照

Renamed poli to city_clinic

Netuttki 4 年 前
コミット
5eaece4db0
2 ファイル変更97 行追加97 行削除
  1. 92 92
      locations/city_clinic.qsrc
  2. 5 5
      locations/parkivent.qsrc

+ 92 - 92
locations/poli.qsrc → locations/city_clinic.qsrc

@@ -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 ---------------------------------
 

+ 5 - 5
locations/parkivent.qsrc

@@ -963,7 +963,7 @@ if $ARGS[0] = 'find_baby':
 							'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
 							'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they are taking care of him.'
 							minut += 30
-							act 'Finish': gt 'poli', 'start'
+							act 'Finish': gt 'city_clinic', 'start'
 						end
 						!!if pcs_mood > 80:
 						!!	  act 'Take him with you':
@@ -999,7 +999,7 @@ if $ARGS[0] = 'find_baby':
 									'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
 									'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they are taking care of him.'
 									minut += 35
-									act 'Finish': gt 'poli', 'start'
+									act 'Finish': gt 'city_clinic', 'start'
 								end
 								!!if pcs_mood > 80:
 								!!	  act 'Take him with you':
@@ -1046,7 +1046,7 @@ if $ARGS[0] = 'find_baby':
 									'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
 									'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they are taking care of him.'
 									minut += 35
-									act 'Finish': gt 'poli', 'start'
+									act 'Finish': gt 'city_clinic', 'start'
 								end
 								!!if pcs_mood > 80:
 								!!	  act 'Take him with you':
@@ -1068,7 +1068,7 @@ if $ARGS[0] = 'find_baby':
 							'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
 							'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they are taking care of him.'
 							minut += 35
-							act 'Finish': gt 'poli', 'start'
+							act 'Finish': gt 'city_clinic', 'start'
 						end
 						!!if pcs_mood > 80:
 						!!	  act 'Take him with you':
@@ -1083,7 +1083,7 @@ if $ARGS[0] = 'find_baby':
 				'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
 				'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they are taking care of him.'
 				minut += 30
-				act 'Finish': gt 'poli', 'start'
+				act 'Finish': gt 'city_clinic', 'start'
 			end
 			if pcs_mood < 20:				
 				act 'Call an ambulance and leave.':