[changed] some if conditions in the clinics

locations/gpoli.qsrc

@@ -1760,8 +1760,8 @@ if $ARGS[0] = 'reception':
 	'You walk up to the reception and ask for help with your problem'
 	'The receptionist looks you up and down and tells you to visit the maternity ward. Someone over there would be able to help you.'
 	pcs_know_mward = 1
-	act 'Go to maternity ward (0:05)': gt 'gpoli', 'maternity_ward'
 	act 'Leave': gt 'gpoli'
+	act 'Go to maternity ward (0:05)': gt 'gpoli', 'maternity_ward'
 end
 
 if $ARGS[0] = 'maternity_ward_donation':
@@ -1876,8 +1876,11 @@ if $ARGS[0] = 'std_check':
 		'He continues: "You have genital herpes. Unfortunately, the complete cure for this disease is very expensive and we can''t cure it here. On the upside, herpes is dormant most of the time and is quite manageable, if you take good care of your body. When it is dormant, taking vitamins regularly will make sure it won''t show itself."'
 				
 		if Gerpes >= 3:
-			if GerpesNapr = 0:GerpesNapr = 3 & '"Your herpes is currently active. I''m going to put you on a course of herpes shots, in order to suppress it into its dormant state. You''ll need a total of 3 injections (no more than 1 a day), each injection will cost 450 <b>₽</b>."'
-			if GerpesNapr > 0:'You need to see the nurse for your herpes drug injection.'
+			if GerpesNapr = 0:
+				GerpesNapr = 3 & '"Your herpes is currently active. I''m going to put you on a course of herpes shots, in order to suppress it into its dormant state. You''ll need a total of 3 injections (no more than 1 a day), each injection will cost 450 <b>₽</b>."'
+			elseif GerpesNapr > 0:
+				'You need to see the nurse for your herpes drug injection.'
+			end
 		else
 			'Your herpes is currently in a dormant state.'
 		end
@@ -1891,8 +1894,11 @@ if $ARGS[0] = 'std_check':
 
 	if TriperOnce = 1:
 		'He continues: "We found gonorrhea. Fortunately, we can cure this disease."'
-		if TriperNapr = 0:TriperNapr = 5 & '"I''m going to put you on a course of gonorrhea injections. You''ll need a total of 5 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>."'
-		if TriperNapr > 0:'You need to see the nurse for your gonorrhea injections.'
+		if TriperNapr = 0:
+			TriperNapr = 5 & '"I''m going to put you on a course of gonorrhea injections. You''ll need a total of 5 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>."'
+		elseif TriperNapr > 0:
+			'You need to see the nurse for your gonorrhea injections.'
+		end
 	end
 
 	if KandidozOnce = 1:

locations/poli.qsrc

@@ -617,41 +617,47 @@ if $ARGS[0] = 'stdcheck':
 							end
 						end
 					else
-						if venera > 0:'The doctor frowns and tells you that the test did not go well.'
-
-						if GerpesOnce = 1:
-							'You have genital herpes. The cure for this disease is very expensive but it is only active some of the time.'
-
-							if Gerpes >= 3:
-								if GerpesNapr = 0:GerpesNapr = 3 & 'I''m going to put you on a course of herpes shots. You''ll need a total of 3 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>.'
-								if GerpesNapr > 0:'You need to see the nurse for your herpes injections.'
-
-							else
-								'Your herpes are in an inactive stage, take vitamins and it won''t show itself.'
+						if venera > 0:
+							'The doctor frowns and tells you that the test did not go well.'
+						
+							if GerpesOnce = 1:
+								'You have genital herpes. The cure for this disease is very expensive but it is only active some of the time.'
+								if Gerpes >= 3:
+									if GerpesNapr = 0:
+										GerpesNapr = 3 & 'I''m going to put you on a course of herpes shots. You''ll need a total of 3 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>.'
+									elseif GerpesNapr > 0:
+										'You need to see the nurse for your herpes injections.'
+									end
+								else
+									'Your herpes are in an inactive stage, take vitamins and it won''t show itself.'
+								end
 							end
-						end
 
-						if SifacOnce = 1:
-							sifNapr = 1
-							'You have syphilis. The cure for this disease used to be expensive. However, this deadly disease can now be with a single shot.'
-							'The injection will cost 1,000 <b>₽</b>, you need to see the nurse for your syphilis injection.'
-						end
+							if SifacOnce = 1:
+								sifNapr = 1
+								'You have syphilis. The cure for this disease used to be expensive. However, this deadly disease can now be with a single shot.'
+								'The injection will cost 1,000 <b>₽</b>, you need to see the nurse for your syphilis injection.'
+							end
 
-						if TriperOnce = 1:
-							'We found gonorrhea. In principle, this disease is curable.'
-							if TriperNapr = 0:TriperNapr = 5 & 'I''m going to put you on a course of gonorrhea injections. You''ll need a total of 5 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>'
-							if SifNapr > 0:'You need to see the nurse for your gonorrhea injections.'
-						end
+							if TriperOnce = 1:
+								'We found gonorrhea. In principle, this disease is curable.'
+								if TriperNapr = 0: 
+									TriperNapr = 5 & 'I''m going to put you on a course of gonorrhea injections. You''ll need a total of 5 injections (no more than 1 a day), each injection will cost 750 <b>₽</b>'
+								elseif TriperNapr > 0:
+									'You need to see the nurse for your gonorrhea injections.'
+								end
+							end
 
-						if KandidozOnce = 1:
-							'You have an yeast infection. The cure for this disease is very expensive, but it''s not that harmful and can easily be suppressed.'
+							if KandidozOnce = 1:
+								'You have an yeast infection. The cure for this disease is very expensive, but it''s not that harmful and can easily be suppressed.'
 
-							if KandidNapr = 0:KandidNapr = 1 & 'You can buy pills in the pharmacy.'
-							if Kandidoz < 30:'Your thrush is currently in remission, take vitamins, and it will stay that way.'
+								if KandidNapr = 0:KandidNapr = 1 & 'You can buy pills in the pharmacy.'
+								if Kandidoz < 30:'Your thrush is currently in remission, take vitamins, and it will stay that way.'
+							end
+						else
+							'Doctor is pleased that you do not have a sexually transmitted disease.'
 						end
 
-						if venera <= 0:'Doctor is pleased that you do not have a sexually transmitted disease.'
-
 						act 'Leave':gt 'poli', 'stdclinic'
 					end
 				end