glife/locations/pav_clinic.qsrc

# pav_clinic

if $ARGS[0] = '':
	CLOSE ALL
	clr
	$loc = 'pav_clinic'
	$location_type = 'indoors'
	$menu_loc = 'pav_clinic'
	$menu_arg = ''
	menu_off = 0
	frost = 0
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">Clinic</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'

	if (lactation['active'] > 0 or thinkpreg = 1 or knowpreg = 1) and pcs_know_mward <= 0:	'<br><br>A sign catches your attention. It reads <a href="exec: minut += 5 & gt ''pav_clinic'', ''maternity_ward''">"Maternity ward"</a>.'

	if pcs_ask_mward_help >= 1 and pcs_know_mward <= 0: '<br><br><a href="exec: minut += 5 & gt ''pav_clinic'', ''reception''">Ask</a> at the reception for help with your breasts.'

	act 'Leave':minut += 5 & gt 'pav_commercial'

	if preg = 2:
		act 'Give birth':
			*clr & cla
			menu_off = 1
			if kid > 0:minut += rand(300,660) else minut += rand(120,480)
			'<center><img <<$set_imgh>> src="images/locations/shared/clinic/birthing.jpg"></center>'
			'You lay on the bed and your feet are put in stirrups.'
			'Your contractions get closer and closer, and after some time (and a lot of swearing) you finally give birth.'
			:multikidloop
				minut += rand(30,90)
				sterilewb += 1
				nextbaby = arrpos('$kidname', 'unborn')
				kid += 1
				BabyEmbryo -= 1
				daykid[nextbaby] = day
				monthkid[nextbaby] = month
				yearkid[nextbaby] = year
				if polkid[nextbaby] = 0:$polreb[nextbaby] = 'girl' & '"Congratulations it''s a girl. What is her name?"'
				if polkid[nextbaby] = 1:$polreb[nextbaby] = 'boy' & '"Congratulations it''s a boy. What is his name?"'

				wait 350
				$kidname[nextbaby] = input("Enter your <<$polreb[nextbaby]>>''s name")
				'The doctors clean up <<$kidname[nextbaby]>>.'
				if $kidname[nextbaby] = '':
					if polkid[nextbaby] = 0:$kidname[nextbaby] = 'Masha'
					if polkid[nextbaby] = 1:$kidname[nextbaby] = 'Misha'
				end
			if BabyEmbryo > 0:'You do not have much time to stare at your <<$polreb[nextbaby]>>, because you are having an another contraction. Your next baby is coming!' & jump 'multikidloop'
			preg = 0
			!! RecovH has a decay of 1.1/hour or ~ 27/day, the recovery period is ~6-10 weeks
			RecovH = rand(1175,1875)
			pregbirthdate = daystart
			thinkpreg = 0
			knowpreg = 0
			knowpregrecover = 1
			vidage += 1
			pregtalk = 0
			pcs_pregtalk = 0
			pregTalkFamily = 0
			npc_pregtalk['A16'] = 0
			npc_pregtalk['A34'] = 0
			npc_pregtalk['A29'] = 0
			pregchem = 0
			cycle = 4
			gs 'cum_cleanup', 'reset'
			dynamic $d_cycreport_choice
			gs 'stat'
			act 'Leave':gt $curloc
		end
	end

	if hour >= 6 and hour <= 21:
		if gpoliuborka = 0:
			act 'Read the job listing':
				*clr & cla
				menu_off = 1
				minut += 5
				gpoliuborka = 1
				gs 'stat'
				'You notice a piece of paper on the wall near the entrance to the clinic, it''s a job listing. It reads: "Cleaner wanted! One hour per day, any time between 14:00 and 21:00. Payment: 100 <b>₽</b>."'

				act 'Move away':gt 'pav_clinic'
			end
		elseif gpoliuborka = 1 and hour >= 8 and hour <= 21:
			act 'Ask the head doctor about the job':
				*clr & cla
				menu_off = 1
				gpoliuborka = 2
				minut += 15
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
				'Since the door is opened, you assume you''re allowed to enter the head doctor''s office. When you knock on the wooden door frame, the head doctor looks up from his work. He''s wearing a white coat, and looks at you sternly through his glasses as he asks: "Yes, can I help you?"'
				'You answer: "Hello sir. I see you''re looking for a cleaner, and I would like to apply."'
				'He looks at you, thinking for a second before he opens a desk drawer and pulls out a form. He hands you the form and says: "I see. Fill this out, please."'
				'You nod and fill out the form, indicating that you''re applying for the part-time cleaning job vacancy. He quickly checks to make sure you filled everything out correctly, and then gives you a satisfied smile when he sees you did. He says: "It looks like everything in order, miss <<$pcs_lastname>>. Please follow me, I''ll show you where we keep our cleaning supplies."'
				'You follow him to the maintenance closet, where he shows you the cleaning supplies you would need. He shakes your hand and wishes you a good day before returning to his office, assuming you will find your own way out.'

				act 'Leave':gt 'pav_clinic'
			end
		elseif gpoliuborka > 1 and hour >= 14 and hour <= 21 and gpolicleanday ! daystart:
			act 'Work as a cleaner for 100 <b>₽</b> (1:00)':
				*clr & cla
				menu_off = 1
				gpolicleanday = daystart
				minut += 60
				pcs_mood -= 15
				money += 100
				gs 'sweat', 'add', 10
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
				'As instructed, you take a mop and a bucket from the maintenance closet and begin by cleaning the corridors throughout the clinic. Once you''re done with that, you enter the examination rooms and offices one by one, occasionally hearing a softly muttered curse from a doctor when you interrupt their work. Nevertheless, you work quickly and the doctors don''t give you any trouble while you clean the floors of the rooms.'

				act 'Finish cleaning':gt 'pav_clinic'

				ginrand = rand(0, 1)

				if Gspravka < 10 and ginrand = 0:
					'When you clean the floor of the gynaecologist''s examination room, he leaves the room to let you do your work in peace. You''re alone now.'
					!! TODO: This check means that even when Sveta is 40 years old, and moved out, if she can go to her parents home, 
					!! mom wants a referral? Maybe it would be more sensible to check if that is her current home.
					if pcs_vag > 0 and motherKnowSpravka = 0 and func('homes_properties', 'has_access', 'parents_home'):
						act 'Forge a referral to give to your mother':
							*clr & cla
							Gspravka = 30
							GspravkaT = 1
							Gspassed = 1
							forge_referral = 1
							gs 'stat'
							'You see a pile of unused referral forms and think to yourself: "I may not be a virgin any more, but <<$npc_nickname[''A29'']>> doesn''t need to know that!"'
							'After you make sure no one is in the corridor, you quickly walk to the desk, take one of the empty referral forms and press his stamp onto it. You can do the rest later. You quickly hide it under your clothes and get back to cleaning, after carefully putting everything back the way you found it.'
							'Later, when you''re cleaning the office of a doctor who you know is not in today, you lock the door for a moment and carefully fill out the form. You take your time, doing your best to mimic your gynaecologist''s handwriting. You nod happily and mutter to yourself: "This looks good, <<$npc_nickname[''A29'']>> will have no clue it''s forged! That''ll get me off the hook for at least one more month..."'

							act 'Finish cleaning':gt 'pav_clinic'
						end
					end
				end
			end
		end

		if (pcs_teeth > -1 and (dentistday < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
			act 'Go to the dentist':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/shared/clinic/dentist.jpg"></center>'
				menu_off = 1
				minut += 15
				gs 'stat'
			
				if pcs_brace = 1:
					pcs_brace = 0
					pcs_teeth -= 1
					'The dentist spends 15 minutes to take of you brace and clean up. You look at the mirror afterward and you teeth are '+iif(pcs_teeth = 0, 'now straight', 'straighter, but can still use some more work.')
					gs 'AppearanceSystem', 'UpdateBaseAppearnce'
					gs 'stat'
				else
					if pcs_missing_teeth = 1:
						zubpay = 30000
						'The dentist examines you and says, it will cost you <<3000>> <b>₽</b> to replace your tooth'
					elseif pcs_missing_teeth > 1:
						zubpay = pcs_missing_teeth * 30000
						'The dentist examines you and says, it will cost you <<pcs_missing_teeth * 30000>> <b>₽</b> to fill the gaps'
					elseif pcs_teeth = 0:
						zubpay = 3000
						'The dentist examines you and says, it will cost you <<3000>> <b>₽</b> to brighten and polish your teeth.'
					elseif pcs_teeth > 0:
						zubpay = 4500
						'The dentist examinees you and says, it will cost you <<4500>><b>₽</b> to straighten your teeth and you will have to wear a brace for three months and he can''t promise they will be completely straight after one treatment.'
					end

					if money < zubpay and karta < zubpay:
						*nl
						'You do not have enough money to fix your teeth.'
					else
						if money >= zubpay:
							act 'Sort out your teeth (cash)':
								*clr & cla
								money -= zubpay
								minut += 60
								if pcs_missing_teeth > 0:
									pcs_missing_teeth = 0
									'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
								elseif pcs_teeth > 0:
									dentistday = daystart + 180
									pcs_brace = 1
									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
								else
									dentistday = daystart + 90
									pcs_teeth = -1
									'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
								end
								gs 'AppearanceSystem', 'UpdateBaseAppearnce'
								gs 'stat'

								act 'Leave the clinic': minut += 5 & gt 'pav_commercial'
							end
						end
						if karta >= zubpay:
							act 'Sort out your teeth (card)':
								*clr & cla
								karta -= zubpay
								minut += 60
								if pcs_missing_teeth > 0:
									pcs_missing_teeth = 0
									'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
								elseif pcs_teeth > 0:
									dentistday = daystart + 180
									pcs_brace = 1
									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
								else
									pcs_teeth = -1
									dentistday = daystart + 90
									'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
								end
								gs 'AppearanceSystem', 'UpdateBaseAppearnce'
								gs 'stat'

								act 'Leave the clinic': minut += 5 & gt 'pav_commercial'
							end
						end
					end
				end
				act 'Leave the clinic': minut += 5 & gt 'pav_commercial'
			end
		end

		if glassqw = 1:
			act'Visit the optometrist (0:35)':
				*clr & cla
				menu_off = 1
				minut += 35
				gs'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/optometrist.jpg"></center>'
				'The optometrist takes you through a series of tests, to measure the condition of your eyes.'
				'He looks at you as if he has bad news for you, and says in a soothing voice: "Well, you probably already expected this, but your vision has deteriorated significantly. You''re going to need glasses to be able to read. The prescription I''m writing for you is for a simple set of rimmed glasses, you can pick those up at the front desk before you leave. Of course you can get a different pair elsewhere if you want better looking ones, the details for which ones you need are on your prescription. You can also get laser vision correction if you really don''t want to use glasses, but I''m going to be honest with you: that''s a very expensive procedure."'
				pcs_nerd += 1
				glassqw = 2
				glass = 1
				blizoruk += 1
				act 'Leave':gt $curloc
			end
		end

		if glass > 0:
			act 'Go to the optometrist':
				*clr & cla
				menu_off = 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/optometrist.jpg"></center>'
				'The optometrist examines your eyes and says that he can perform laser eye surgery for 75,000 <b>₽</b>. Of course, reading books can cause your eyesight to deteriorate again.'

				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 'pav_clinic'

				if glass = 1:
					if money < 4500 and karta < 4500:
						*nl
						'You can not afford the more stylish glasses.'
					else
						if money >= 4500:
							act 'Buy glasses (4,500 <b>₽</b>) (cash)':
								cls
								money -= 4500
								minut += 60
								glass = 2
								gs 'stat'
								'You buy a new, more stylish pair of glasses.'

								act 'Return to the entrance':gt 'pav_clinic'
							end
						end
						if karta >= 4500:
							act 'Buy glasses (4,500 <b>₽</b>) (card)':
								cls
								karta -= 4500
								minut += 60
								glass = 2
								gs 'stat'
								'You buy a new, more stylish pair of glasses.'

								act 'Return to the entrance':gt 'pav_clinic'
							end
						end
					end
				end

				if glass ! 0:
					if money < 75000 and karta < 75000:
						*nl
						'You can not afford the laser eye correction surgery. (75,000 <b>₽</b>)'
					else
						if money >= 75000:
							act 'Pay for laser correction (75,000 <b>₽</b>) (cash)':
								cls
								money -= 75000
								minut += 60
								blizoruk = 0
								glass = 0
								gs 'stat'
								'You undergo laser eye surgery. Your eyesight is much better now.'
								act 'Return to the entrance':gt 'pav_clinic'
							end
						end
						if karta >= 75000:
							act 'Pay for laser correction (75,000 <b>₽</b>) (card)':
								cls
								karta -= 75000
								minut += 60
								blizoruk = 0
								glass = 0
								gs 'stat'
								'You undergo laser eye surgery. Your eyesight is much better now.'
								act 'Return to the entrance':gt 'pav_clinic'
							end
						end
					end
				end
			end
		end

		if pcs_health < (pcs_vital * 10 + pcs_stren * 5) or pain['total'] > 10:
			act 'See a Doctor about your health (1:00)':
				cla
				menu_off = 1
				minut += 60
				gs 'medical_din','healthTreatment'
				gs 'stat'
				'After a quick discussion about your health, the doctor gives you an injection with a strange pink fluid, a combined painkiller, steroid and vitamin shot which not only helps the pain but speeds your recovery too, permanently reducing your current pain and increasing your health. You immediately feel much better, and should recover health faster over the coming days.'

				act 'Leave':gt 'pav_clinic'
			end
		end

		if therapistday ! daystart: act 'Visit the therapist (1:00)': gt 'therapist'

		if pcs_know_mward > 0: act 'Visit the maternity ward (0:05)': gt 'pav_clinic', 'maternity_ward'

		gs 'medical_din', 'birth_control'

		act 'Go to the sexual health clinic': gt 'pav_clinic', 'sexual_health'

		if sick >= 1:
			act 'Visit the doctor for your sickness':
				cla
				menu_off = 1
				minut += 15
				sick = 0
				gs 'stat'
				'The doctor quickly examines you, and establishes that you caught a cold. He prescribes you some pills, and suggests you dress warmer when going outdoors so it doesn''t come back.'

				act 'Leave':gt $curloc
			end
		end

		if (fame['pav_slut'] >= 250 or fame['pav_prostitute'] >= 125 or guy > 10 or unprotfilm or whoreQW > 1 or bordelslutty > 0 or cumcondslip_aware > 0 or (daystart - daylastperiod > 42) or Triper > 2 or Gerpes >= 3 or Sifilis >= 21 or Kandidoz > 30) and gynodaystart ! daystart:
			act 'Visit your gynaecologist (1,000 <b>₽</b>)':
				*clr & cla
				menu_off = 1
				gynodaystart = daystart
				minut += 5
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_1.jpg"></center>'
				'You decide to have a check-up with your gynaecologist. Given your sexual history, you can''t be too careful.'
				if docKnow = 0:
					if fame['pav_slut'] >= 250 and fame['pav_prostitute'] < 125:
						$gyn1 = 'He looks at you with some concern, but still has to ask: "Rumor in town says that you''re a prostitute?"'
						$gyn2 = '"Doctor, the whole town knows! And knows my body, if you know what I mean... well, maybe they know Sonia''s better," you laugh despite yourself.'
					elseif unprotfilm:
						$gyn1 = 'He looks at you with some concern, but still has to ask: "Are you by any chance <<$pfname>>?" He doesn''t say how he''s familiar with the name, but you can probably guess.'
						$gyn2 = '"I hope not, but who knows?"'
					elseif whoreQW > 1 or bordelslutty > 0 or fame['pav_prostitute'] >= 125:
						$gyn1 = 'He looks at you with some concern, but still has to ask: "Rumor in town says that you''re a prostitute?"'
						$gyn2 = '"I don''t think so, I only do business down in St. Petersburg, but who knows?"'
					else
						$gyn1 = 'He looks at you with some concern, but still has to ask: "Why are you visiting me? Are you worried by something about your sexual history?"'
						$gyn2 = '"I hope not, but who knows?"'
					end

					'He looks up from his desk when you enter his office and recognizes you immediately: "Ah, hello <<$pcs_nickname>>. Did you come for a check-up?"'
					'You nod and take a seat: "Hello, Dr. Petrovich. Yes, I''m here for a check-up."'
					$gyn1
					'You smile at him: "It''s true, Dr. Petrovich. I am."'
					'He rubs his hand over his chin, and continues: "Does your mother know?"'
					$gyn2
					'The gynaecologist nods, and motions for you to stand up: "Very well, let''s see how you''re doing then. Undress for me, please."'
				elseif docKnow = 1:
					if fame['pav_slut'] >= 25 or unprotfilm or whoreQW > 1 or bordelslutty > 0 or fame['pav_prostitute'] >= 125:
						$gyn1 = 'He looks at you with some concern, asking: "Are you still in the business?"'
						$gyn2 = 'In a way, you feel touched that he is so concerned for his patients. You don''t mind answering his question, and say: "Doctor, you know how it is... I do it because studies are expensive, because clothing is expensive. Because my family could also use the help, financially. And most of all: because I love having sex. I might as well get paid to do it, right?"'
					else
						$gyn1 = 'He looks at you with some concern, asking: "Are you still seeing a lot of men?"'
						$gyn2 = 'In a way, you feel touched that he is so concerned for his patients. You don''t mind answering him, and you might as well be frank: "Doctor, I really just love having sex. I don''t even care about getting paid, it just seems like I can''t ever get enough dick. You understand, right?"'
					end
					'He looks up from his desk when you enter his office and recognizes you immediately: "Ah, hello <<$pcs_nickname>>. Back for another check-up?"'
					'You nod and take a seat: "Hello, Dr. Petrovich. Yes, I''m here for a check-up."'
					$gyn1
					'"Yes, doctor. I am," you tell him.'
					'He rubs his hand over his chin, and continues: "If I may be so bold... why?"'
					$gyn2
					'The gynaecologist smirks, but nods: "I understand. It''s not my place to judge, anyway. Let''s see how you''re doing. Undress for me, please."'
				end

				act 'Take off your clothes':
					*clr & cla
					minut += 5
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_3.jpg"></center>'
					'You quickly take off your clothes so your gynaecologist can examine you, and neatly fold them before putting them aside.'
					act 'Sit in the chair':
						*clr & cla
						minut += 5
						docKnow = 1
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_4.jpg"></center>'
						'Once you''re nude, you have a seat in the gynaecologist''s chair and spread your legs in the stirrups.'
						'For the next few minutes, the doctor gives you a thorough check-up. He spends a bit more time on your asshole than he probably should, but then again - maybe he''s just being thorough.'
						$gpoli_sick = ''

						if cumcondslip > 0:
							$gpoli_sick = 'are suffering from toxic shock from a spent condom in your body. I removed it as soon as I found it. If you were feeling sick, it should slowly subside.'
							cumcondslip = 0
							gs 'cum_cleanup', 'cleanloc', 17
						end

						if preg > 0:
							thinkpreg = 1
							knowpreg = 1
							$gpoli_sick = 'are pregnant'
						end

						if venera > 0 or Kandidoz > 10:
							if $gpoli_sick ! '':$gpoli_sick = $gpoli_sick + ', and you have a sexually transmitted disease'
							if $gpoli_sick = '':$gpoli_sick = 'have a sexually transmitted disease'
						end

						if $gpoli_sick = '':
							'The doctor smiles when he gives you the good news: "You''re perfectly healthy."'
							'You feel very relieved, and thank him profusely: "Thank you doctor, that is great news. Thanks again for the check-up."'
							'He nods, and waves his hand: "It''s all good. Just don''t forget to use protection, it''s still dangerous out there."'
						else
							'The doctor frowns when he gives you the bad news: "I''m afraid I found something irregular. You <<$gpoli_sick>>."'
							if venera > 0 or Kandidoz > 10: gs 'pav_clinic', 'std_check'
						end
						'The doctor stands beside you while he helps you move your legs from the stirrups, and asks with a confident smile on his face: "So <<$pcs_nickname>>... how are you going to repay me for the examination?"'

						if money >= 1000:
							act 'Offer him money':
								*clr & cla
								minut += 5
								gs 'stat'

								'You smile, knowing this question would come. You tell him: "I can pay. How much do I owe you?"'
								'He returns your smile, and jovially says: "<<$pcs_nickname>>, only for you: 1,000 <b>₽</b>."'

								act 'Pay him (1,000 <b>₽</b>)':
									*clr & cla
									minut += 5
									money -= 1000

									'You gladly pay him the 1,000 <b>₽</b> and thank him again.'
									'He counts out your money and puts it away as he says: "Any time, <<$pcs_nickname>>. Make sure you tell your friends about me, if they need a check-up!"'
									act 'Leave':gt $curloc
								end
							end
						end

						act 'Offer him your body':
							*clr & cla
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_6.jpg"></center>'
							'You slowly put your hands on his groin with a cheeky grin, and to your surprise feel that his cock is already fully erect. Looks like this was the payment option he was hoping you would go for!'
							'You massage it through his pants for a moment, and when you notice no objections from him you drop to your knees. He pulled his erection free from his pants, and you guide his stiff cock to your mouth with your hand. The look in his eyes is one you recognize from some of your customers - it''s the look of a man who''s going to demand a lot from you, to get his money''s worth. Oh boy.'
							'You lick the tip of his cock teasingly. It''s a nice cock for sure, and the thought of servicing it even turns you on a little. Just because you''re repaying him for something he did for you, that doesn''t mean you can''t enjoy yourself too...'
							'You slowly envelop his cock with your mouth, and begin to suck the head. After a minute or two you feel his hand at the back of your head. You want to raise your head and ask him what he wants, but he forces you to stay where it is and slowly pushes his hips forward, making you take more and more of his rod inside your mouth.'

							gs 'arousal', 'bj', 5, 'sub'
							gs 'stat'

							act 'Give him a blowjob':
								if venera > 0:gt 'pav_clinic', 'gynoblow'
								*clr & cla
								if gpoli_doctorhavesex = 0:gpoli_doctorhavesex = 1 & guy += 1
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_7.jpg"></center>'
								'When you try to move your head, it has nowhere to go. The doctor''s erection is in front of you, about half-way in your mouth now. Behind you, his powerful arm is keeping you in place. You decide to give him what he wants and stop resisting, slowly feeling him thrust his cock further and further into your mouth. At first it''s easy, but his thick cock makes breathing more difficult the further it goes down.'
								'At one point it feels like he''s just fucking your throat carelessly, and you nearly gag when he pushes his dick all the way down your throat and holds it there for a few seconds. When he pulls back, it is fully coated with your saliva.'
								'You gasp for breath while he pulls you up, and hear him say: "Should be slick enough... it''s time to go deeper."'
								'You wonder what he means by that as he turns you around, and has you lean over against his chair. Once he''s certain you''re stable, he lets go of you and rubs the tip of his cock against your clitoris. It feels... quite nice, actually.'

								gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
								gs 'stat'

								act 'Continue':
									*clr & cla
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_8.jpg"></center>'
									'You moan, feeling some of your wetness running down your leg as Dr. Petrovich keeps rubbing his cock against your clit. He sure knows his way around a woman''s body!'
									'For a moment you close your eyes and just give in to the pleasure. Before you know it you feel something push against your labia, and your vaginal walls are being stretched by his thick dick entering you. It''s still very slick from the blowjob you gave him earlier, and you can''t help but groan louder when it slides in.'

									gs 'arousal', 'vaginal', 5, 'sub'
									gs 'stat'

									act 'Have sex with him':
										*clr & cla
										pcs_vag += 1
										gs 'boyStat', 'A68'
										cumprecheck = 1
										gs 'cum_manage'
										gs 'stat'
										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_9.jpg"></center>'
										'You feel like you''re in heat when he slowly begins to thrust his cock in and out of you. When he realizes you can take him easily, he steadily increases the pace and fucks you harder and harder. You involuntarily moan with his thrusts, fully giving yourself to this man.'
										'Dr. Petrovich lightly slaps your ass a few times, and you groan louder. He''s making you feel so good! After a few minutes you can''t take it any more, and you try to stifle your moans so you don''t scream the whole clinic together while you have a thunderous orgasm. Your legs buckle under your weight and give way, but fortunately he pulled his dick out of you on time and catches you in his powerful arms. He carries you to a table and puts you down on top of it, with your legs spread towards him.'
										'He immediately guides his cock back into you while your body quivers, still not fully recovered from the orgasm you just had.'

										$orgasm_or = 'yes'
										gs 'arousal', 'vaginal', 5, 'sub'
										gs 'stat'

										act 'Sex on the table':
											*clr & cla
											gs 'stat'
											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_10.jpg"></center>'
											'He picks up the pace again and fucks you hard and fast like before. Your body no longer listens to you, and you find yourself eagerly bucking your hips against his thrusts. You feel that tingle starting up inside you again... if he keeps this up, you''re going to cum all over his cock again in no time!'
											'The doctor smiles at you while he pulls his dick out, and says: "I bet I could give you another type of orgasm... one that you maybe never had before. Wait here, I''ll be right back."'
											'You kind of hear him say something, but at the same time you''re still too stuck in your own world to realize what he just said. When the high from your orgasm wears off, you look around the room. Where did he go?'
											'Just when you were about to get off the table, he returns with a big jar of lubricant in his hand and a latex glove on one hand. He motions for you to turn around, which you obediently do.'
											'Several of his gloved fingers dip inside the jar, and when he pulls it up you see the lubricant slowly dripping from them. He puts them against your tight sphincter, and spreads some of the lube over it before thrusting three fingers in.'
											'"Ouch!" You cry out when you feel his fingers stretch out your poor asshole... you were not counting on that! It hurts a bit, and you feel a bit uncomfortable when he pulls his fingers away and spreads more lubricant all over his cock. Before you can object, you feel the thick head of his cock pushing past your sphincter, stretching you out even further.'

											gs 'arousal', 'vaginal', 5, 'sub'
											gs 'arousal', 'foreplay', 5, 'sub'
											gs 'arousal', 'anal_finger', 5, 'sub'
											minut -= 5
											gs 'stat'

											act 'Anal sex':
												*clr & cla
												pcs_ass += 1
												gs 'stat'
												'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_11.jpg"></center>'
												'You want to pull away from him, but you''re trapped between Dr. Petrovich and a wall. He slowly moves his hips, letting you get used to the size of his thick rod inside your tight little butt. It still stings a lot. Despite your best efforts you can''t relax your anus, only slowly getting used to the size of him.'
												'When he begins to speed up you nearly cry, and groan loudly with every thrust.'
												'He softly mutters: "This won''t do, you''re going to alarm the entire clinic if you keep screaming like that!"'
												'He takes his penis out of your ass, and you feel relieved. And, to be honest, rather turned on. It didn''t feel very good yet, but in a way you want it to. Maybe after a few more minutes?'
												'"Come on, get on the floor," he says after he throws his coat down. He spreads some more lubricant over his gloved fingers, and smears it over your slightly sore butthole. Guess he''s not done with that yet...'

												gs 'arousal', 'anal', 5, 'sub'
												gs 'stat'

												act 'Sex on the floor':
													*clr & cla
													gs 'stat'
													'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_12.jpg"></center>'
													'To your surprise he ignores your butt for now, and drives his penis into your cunt instead. He fucks you with short, rough strokes... almost as if he''s fucking the annoyance out of his system. It doesn''t feel very pleasant at first, but soon you begin to moan and enjoy the feeling again when your body relaxes.'
													'When he notices you''re gasping faster, he quickly pulls his cock out of your snatch and rams it inside your asshole in one fluent motion. You cry out loud, partially from the pain, and partially because you''re frustrated... you were so close! Despite the discomfort and pain you''re experiencing from his dick in your ass, you rub your clitoris... partially hoping it will take your mind off the pain, and partially hoping you can still get that orgasm you were so close to.'

													gs 'arousal', 'vaginal', 5, 'sub', 'rough'
													gs 'stat'

													act 'Anal':
														*clr & cla
														gs 'stat'
														'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_13.jpg"></center>'
														'Now that you''re so aroused, the anal sex doesn''t hurt quite as much. You furiously rub your clit while he pounds your stretched asshole roughly, slowly losing your mind when a second orgasm hits you. Dr. Petrovich must feel your anus contracting around his cock when you cum with it inside you.'
														'He was close as well, and after you ride out your orgasm he gives it a few more thrusts before he pulls out and moves his hips towards your face. He grabs you by the hair and guides his cock towards your mouth, and you obediently open your mouth to let it in.'

														$orgasm_or = 'yes'
														gs 'arousal', 'anal', 5, 'sub', 'rough'
														gs 'stat'

														act 'Let him cum in your mouth':
															*clr & cla
															minut += 5
															pcs_horny += 5
															gs 'boyStat', 'A68'
															gs 'cum_call', 'mouth_swallow', $boy, 1
															gs 'stat'
															'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_14.jpg"></center>'
															'You feel too tired to object, even if you wanted to. You have no choice but to take his load in your mouth, and obediently let him shoot all his sperm inside you. As a nice touch, you show it all to him before swallowing his load and licking your lips. He moves his slowly softening dick towards your mouth once more, letting you suck and lick it clean.'
															'Then he lets out a satisfied sigh and begins to put his clothes back on, as if nothing happened.'

															act 'Get dressed too':
																*clr & cla
																minut += 5
																pcs_horny += 5
																gs 'stat'
																'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_15.jpg"></center>'
																'You follow his example, and also put your clothes back on.'
																'When you''re both fully dressed again, he has a wide grin on his face: "Well now, one good turn deserves another. Considering your line of work, I suggest you come visit me at least once a week."'
																'You happily agree with him: "That''s true. Thank you doctor, I will make sure to refer my friends to you if they ever need a check-up too."'

																gs 'arousal', 'end'
																gs 'stat'

																act 'Leave':gt $curloc
															end
														end
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end

		if narkoman = 1 and mid($start_type,1,2) = 'sg':
			act 'Seek help for your weakness and pain':
				*clr & cla
				menu_off = 1
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_1.jpg"></center>'
				if gpoli_doctorhavesex = 1:
					'You go to the doctor for help with your addiction, since you trust him enough to know he won''t tell your mother.'
					'"Hi <<$pcs_nickname>>. What brings you in today?" Dr. Petrovich says with a smile.'
					'"Hello, Doctor. I''m feeling weak and I hurt all over," you reply.'
					'"Well, let''s take a look, shall we?" the doctor replies as you get up to stand by the examination table.'
				else
					'You go to the doctor for help with your addiction.'
					'"Hello, young lady. I''m Dr. Petrovich. Do you have specific complaints, or are you simply here for a check-up?" the doctor asks as he comes into the examination room.'
					'"Hello sir. I''m feeling really weak and shaky and I hurt all over," you explain.'
					'"Let''s take a look, shall we?" the doctor replies and gestures for you to stand next to the examination table.'
				end

				act 'Continue':
					*clr & cla
					minut += 5
					gs 'stat'
					'You tell the doctor about the white powder you''ve been sniffing while he checks your temperature, blood pressure and pulse.'
					'"Lift your shirt so we can have a listen," he tells you as he warms his stethoscope by breathing on it.'
					'You lift your shirt and bra above your breasts as instructed and the doctor presses the stethoscope to various places on your chest. He places his left hand on your tummy to steady you as he listens to your heart and breathing, occasionally bringing the stethescope to his mouth to rewarm it. The hand on your tummy moves in small circles that slip steadily lower until his finger tips slip just below the waistband of your clothes. Unlike any other doctor you have seen before, Dr. Petrovich listens by pressing the stethescope against your boobs. Does that even work?'
					'He also warms it more often now, and it feels moist and warm on your nipples. To your embarrassment, you could feel your nipples begin to get hard. You''re not quite sure, but you''re fairly sure Dr. Petrovich was just having fun for the last few minutes of that examination.'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_2.jpg"></center>'
					'He nods: "Well, so far everything is OK."'
					'You notice that there is a certain sparkle in his eyes when he looks at your <<$titsize>> breasts with interest. You feel embarrassed at your nipples hardening even further, and try to think of bad things. You silently think to yourself: "My mother is watching! My mother is watching!"'
					'To your relief, the tingle you started to feel in your pussy goes away.'
					'The doctor tells you as he steps towards the door: "Please undress and sit down in that chair. I will be back momentarily." Then he leaves.'

					act 'Reluctantly take your clothes off':
						*clr & cla
						minut += 10
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_3.jpg"></center>'
						'You sigh. Is this guy even a doctor? He was way too eager with your boobs, and you suspect he has other reasons to want you naked.'
						'Nevertheless, you feel terrible and really need this check-up. You reluctantly begin to take your clothes off.'
						act 'Sit in the chair':
							*clr & cla
							minut += 5
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_4.jpg"></center>'
							'You quickly undress and climb into the chair. The leather-like surface feels strangely warm on your bottom, and it takes you a moment to realize that it is heated. You fidget nervously as you wait for the doctor to return.'
							'After what seems like hours, the doctor comes back into the room. You notice his face seems redder than it was and his hair seems to be a little damp. He has also taken off the apron-like smock he had on before. He continues with his examination, taking your hands and arms and massaging the joints and flexing them. He does the same with your feet and legs. To your surprise, he also examines your ass and pussy, easing his gloved fingers into first your pussy and then your asshole. He even speads your lips apart and pushes the hood back to expose your clitoris which he gently massages for a moment before suddenly getting to his feet with a deep sigh, his eyes lingering on your exposed pussy for a moment too long before he seems to give himself a little shake. You''re glad he stopped when he did... if he had kept doing that, you would''ve gotten wet for sure!'
							$gpoli_sick = ''

							if cumcondslip > 0:
								$gpoli_sick = 'are suffering from toxic shock from a spent condom in your body. I removed it as soon as I found it. If you were feeling sick, it should slowly subside.'
								cumspclnt = 8
								gs 'cum_cleanup'
							end

							if preg > 0:
								thinkpreg = 1
								knowpreg = 1
								$gpoli_sick = 'are pregnant'
							end

							if venera > 0 or Kandidoz > 10:
								if $gpoli_sick ! '':$gpoli_sick = $gpoli_sick + ', and you have a sexually transmitted disease'
								if $gpoli_sick = '':$gpoli_sick = 'have a sexually transmitted disease'
							end

							if $gpoli_sick = '':
								'"Well, other than the fact that you are addicted to cocaine, you are completely healthy. Truth be told, you have a very mature body for a girl your age." At these words you see the corners of his mouth twitch, and you think his trousers look a little tighter in his crotch area than before. "But that''s not what you are here for. Now please get dressed again while I write a note for your mother. I''m not allowed to give you the cure to your addiction without her permission."'
								'Your heart begins to race when you hear that, your mother can''t find out! She would kill you if she finds out what you have been up to!'
								'You quickly blurt: "Wait! Could you please just give me the shot without telling her? Please?"'
								'He looks at you sternly and shakes his head: "I''m sorry <<$pcs_nickname>>, but you are not an adult. I need her permission to treat you, those are the rules."'
							else
								'"Well <<$pcs_nickname>>, you have a problem. You <<$gpoli_sick>> as well as being addicted to cocaine. I''ll have to write a note for your mother, I can''t treat you without her permission."'
								if venera > 0 or Kandidoz > 10: gs 'pav_clinic', 'std_check'
								'Your heart begins to race when you hear that, your mother can''t find out! She would kill you if she finds out what you have been up to!'
								'You quickly blurt: "Wait! Could you please just give me the cure without telling her? Please?"'
								'He looks at you sternly and shakes his head: "I''m sorry <<$pcs_nickname>>, but you are not an adult. I need her permission to treat you. You''ve been a very bad girl, you know..."'
							end

							act 'Offer him money':gt 'pav_clinic', 'spravka_money_pale'
							act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange_pale'
						end
					end
				end
			end
		end
		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and Gspravka < 3 and motherKnowSpravka = 0 and func('homes_properties', 'has_access', 'parents_home'): act 'Go to the gynaecologist for a referral': gt 'pav_clinic', 'referral'
	else
		'The clinic is closed. It''s open every day between 06:00 and 21:00.'
	end
end

if $ARGS[0] = 'sexual_health':
	*clr & cla
	menu_off = 1
	minut += 1
	gs 'stat'
	'<center><b>Sexual Health Clinic</b></center>'
	*nl
	'<center>STD Test - 1,000 <b>₽</b></center>'
	'<center>For treatments, see the nurse</center>'

	act 'Leave':gt 'pav_clinic'

	if money >= 1000:
		act 'Get tested for STDs (1,000 <b>₽</b>) (cash)':
			money -= 1000
			gs 'pav_clinic', 'std_test'
		end
	end

	if karta >= 1000:
		act 'Get tested for STDs (1,000 <b>₽</b>) (card)':
			karta -= 1000
			gs 'pav_clinic', 'std_test'
		end
	end

	if GerpesNapr > 0 and GerpesUkolDay ! daystart:
		if money < 450 and karta < 450: *nl & 'You cannot afford your herpes shot.'

		if money >= 450:
			act 'Get herpes shot (1,000 <b>₽</b>) (cash). You need <<GerpesNapr>> more injections to complete the treatment.':
				money -= 450
				gs 'pav_clinic', 'herpes_shot'
			end
		end

		if karta >= 450:
			act 'Get herpes shot (1,000 <b>₽</b>) (card). You need <<GerpesNapr>> more injections to complete the treatment.':
				karta -= 450
				gs 'pav_clinic', 'herpes_shot'
			end
		end
	end

	if TriperNapr > 0 and TriperUkolDay ! daystart:
		if money < 750 and karta < 750: *nl & 'You cannot afford your gonorrhea shot.'

		if money >= 750:
			act 'Get gonorrhea shot (750 <b>₽</b>) (cash). You need <<TriperNapr>> more injections to complete the treatment.':
				money -= 750
				gs 'pav_clinic', 'gonorrhea_shot'
			end
		end

		if karta >= 750:
			act 'Get gonorrhea shot (750 <b>₽</b>) (card). You need <<TriperNapr>> more injections to complete the treatment.':
				karta -= 750
				gs 'pav_clinic', 'gonorrhea_shot'
			end
		end
	end

	if SifNapr = 1:
		if money < 1000 and karta < 1000: *nl & 'You cannot afford your syphilis shot.'

		if money >= 1000:
			act 'Get syphilis shot (1,000 <b>₽</b>) (cash)':
				money -= 1000
				gs 'pav_clinic', 'syphilis_shot'
			end
		end

		if karta >= 1000:
			act 'Get syphilis shot (1,000 <b>₽</b>) (card)':
				karta -= 1000
				gs 'pav_clinic', 'syphilis_shot'
			end
		end
	end
end

if $ARGS[0] = 'std_test':
	minut += 60
	gs 'stat'
	'The doctor has you provide some blood and urine, before examining you. Then he sends you out to wait in the waiting room while you wait for the test results to come back.'

	if venera > 0 or Kandidoz > 10:
		'The doctor calls you back to his office after a while, and says with a slight frown: "I''m afraid I have some bad news."'
		gs 'pav_clinic', 'std_check'
	else
		'The doctor is pleased to announce that you do not have a sexually transmitted disease.'
	end

	act 'Leave':gt 'pav_clinic'
end

if $ARGS[0] = 'herpes_shot':
	*clr & cla
	minut += 15
	GerpesUkolDay = daystart
	GerpesNapr -= 1
	gs 'stat'
	'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 'pav_clinic'
end

if $ARGS[0] = 'gonorrhea_shot':
	*clr & cla
	minut += 15
	TriperUkolDay = daystart
	TriperNapr -= 1
	gs 'stat'
	'You see the nurse and she gives you a painful injection in your ass.'

	if TriperNapr = 0:TriperOral = 0 & TriperOralSigns = 0 & Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'You have completed the treatment.'

	act 'Leave':gt 'pav_clinic'
end

if $ARGS[0] = 'syphilis_shot':
	*clr & cla
	minut += 60
	SifNapr = 0
	SifacOnce = 0
	Sifilis = 0
	Venera -= 1
	gs 'stat'
	'You see the nurse and she gives you a painful injection in your ass.'

	'"That''s it, you might still feel a bit off but the infection is now cured".'

	act 'Leave':gt 'pav_clinic'
end

if $ARGS[0] = 'referral':
	menu_off = 1
	if pcs_vag = 0:
		*clr & cla
		minut = minut + 15
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gin.jpg"></center>'
		'You quickly undress and climb into the chair, spreading your legs and resting them in the stirrups. The leather-like surface feels strangely warm on your bottom, and it takes you a moment to realize that it is heated. The gynaecologist examines your vagina carefully with a speculum, and silently mumbles something to himself.'
		Gspravka = 30
		GspravkaT = 1
		Gspassed = 1

		'He confirms that you are still a virgin, and tells you to get dressed again while he prepares your referral. While you put your clothes back on, he fills out the form at his desk and stamps it before handing it to you. This should keep your mother happy for another month...'
		act 'Leave':gt $curloc
	else
		*clr & cla
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_1.jpg"></center>'
		if stat['think_virgin'] = 1 and pcs_vag > 0:
			'You quickly undress and climb into the chair, spreading your legs and resting them in the stirrups. The leather-like surface feels strangely warm on your bottom, and it takes you a moment to realize that it is heated. The gynaecologist examines your vagina carefully with a speculum, and silently mumbles something to himself.'
			act 'Have the check-up': gt 'pav_clinic', 'referral2'
		else
			'You''re a bit nervous as you enter the gynaecologist''s office. Your mother expects you to get a referral from him that states you''re still a virgin, except there''s one small problem... you''re not a virgin any more! Maybe you can work something out with him?'
			if gpoliuborka = 2:
				'"Hi <<$pcs_nickname>>. What brings you in today?" Dr. Petrovich says with a smile.'
				'"Hello, doctor. It''s time for my monthly check-up again. My mother needs a referral from you to make sure I''m still a virgin," you reply.'
				'"Ah, yes. For... school, right? Let''s take a look," the doctor replies with a chuckle as you are already on your way to stand by the examination table, like last time.'
			else
				'"Hello, young lady. I''m Dr. Petrovich. Do you have specific complaints, or are you simply here for a check-up?" the doctor asks as he comes into the examination room.'
				'"Hello sir. I''m here for my monthly referral. My mother needs one from you to establish I''m still a virgin. It''s for school," you explain.'
				'"For... school?" he asks, a tad confused. Then he snaps out of it and replies: "Anyway... let''s take a look, shall we?" as he gestures for you to stand next to the examination table.'
			end

			act 'Have the check-up':
				*clr & cla
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_2.jpg"></center>'
				'The doctor breathes on his stethoscope to warm it up and says: "Lift your shirt, please."'
				'Lift your shirt? What does that have to do with your virginity?'
				'He sees your hesitation, and reassures you: "I''m just doing some basic check-ups while you''re here anyway. Now... your shirt, please?"'
				'That makes sense. You expose your <<$titsize>> breasts to him when you lift your shirt up, and he examines you. You''re no medical professional, but you''re fairly sure he''s not supposed to put the stethoscope on your boob like that! Nevertheless... you need him to give you that referral, and calling him out on it will definitely not help your cause.'
				'You decide to humour him and just let him play with your boobs for several minutes, after which he nods happily and says: "Everything seems to be in order."'
				'There is an eager sparkle in his eyes when he looks at your bare breasts. The pervert!'
				'He continues: "Now get undressed and have a seat in the chair, please. You can put your feet in the stirrups."'
				act 'Undress':
					*clr & cla
					minut += 5
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_3.jpg"></center>'
					'You reluctantly take your clothes off, trying to put off the moment as long as you can. You know he will find out about your secret in a moment. Nevertheless, you don''t have any other option. Maybe you''ll get lucky and he won''t notice?'
					act 'Sit in the chair': gt 'pav_clinic', 'referral2'
				end
			end

			act 'Admit you''re no virgin':
				*clr & cla
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_1.jpg"></center>'
				if gpoliuborka = 2:
					'You pause for a second, and then decide to just confess. He was going to find out anyway during the examination.'
					'Hesitantly you say: "Mister Petrovich, I have something to ask of you. You see, I... I''m no longer a virgin."'
					'He nods understandingly: "I see." That''s probably not the first time one of his patients told him that.'
					'You continue: "But... my <<$npc_nickname[''A29'']>> thinks I''m still a virgin, and I would really like to keep it that way. Could you please help me?"'
					'He looks puzzled for a second, and his eyes widen when he realizes what you''re asking of him: "You mean... fake your referral? That''s fraud! Do you have any idea how much trouble I could end up in if I do that?"'
				else
					'You pause for a second, and then decide to just confess. He was going to find out anyway during the examination.'
					'Hesitantly you say: "Mister Petrovich, I have something to ask of you. You see, I... I''m no longer a virgin."'
					'He nods understandingly: "I see." That''s probably not the first time one of his patients told him that.'
					'You continue: "But... my <<$npc_nickname[''A29'']>> thinks I''m still a virgin, and I would really like to keep it that way. Could you please help me?"'
					'He nods again and says: "I see what you''re getting at. I might be able to help you, but I''m running a big risk by doing that. What''s in it for me?"'
				end

				act 'Offer him money':gt 'pav_clinic', 'spravka_money'
				act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange'
				act 'Just accept the referral as is':gt 'pav_clinic', 'badend'
			end
		end
	end
end

if $ARGS[0] = 'referral2':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_4.jpg"></center>'
	'Once you''re nude, you have a seat in the gynaecologist''s chair and spread your legs in the stirrups.'
	'For the next few minutes, the doctor gives you a thorough check-up. He spends a bit more time on your asshole than he probably should, but then again - maybe he''s just being thorough.'
	$gpoli_sick = ''
	if preg > 0:
		thinkpreg = 1
		knowpreg = 1
		$gpoli_sick = 'are pregnant'
	end

	if venera > 0 or Kandidoz > 10:
		if $gpoli_sick ! '':$gpoli_sick = $gpoli_sick + ', and you have a sexually transmitted disease'
		if $gpoli_sick = '':$gpoli_sick = 'have a sexually transmitted disease'
	end

	if $gpoli_sick = '':
		'"Well, you are completely healthy. However, you are also no longer a virgin." At these words you see the corners of his mouth twitch, and you think his trousers look a little tighter in his crotch area. "Please get dressed again while I write out the referral for your mother."'
		if stat['think_virgin'] = 1:
			'Your heart begins to race when you hear that, your mother can''t find out! How could this have happened you''ve never even had sex!'
		else
			'Your heart begins to race when you hear that, your mother can''t find out! She would kill you if she finds out what you have been up to!'
		end
		'You quickly blurt: "Wait! Could you please just write down that I''m still a virgin, so I don''t get in trouble? Please?"'
		'He looks at you sternly and shakes his head: "I''m sorry <<$pcs_nickname>>, I can''t do that, that''s fraud! Do you have any idea how much trouble I could get into?"'
	else
		'The doctor frowns when he gives you the results: "I''m afraid I have some bad news, <<$pcs_nickname>>. You <<$gpoli_sick>>.'
		if venera > 0 or Kandidoz > 10: gs 'pav_clinic', 'std_check'
		'You''re also not a virgin any more, obviously."'
		if stat['think_virgin'] = 1:
			'Your heart begins to race when you hear that, your mother can''t find out! How could this have happened you''ve never even had sex!'
		else
			'Your heart begins to race when you hear that, your mother can''t find out! She would kill you if she finds out what you have been up to!'
		end
		'You quickly blurt: "Wait! Could you please just write down that I''m still a virgin, so I don''t get in trouble? Please?"'
		'He looks at you sternly and shakes his head: "I''m sorry <<$pcs_nickname>>, but you are not an adult. I need her permission to treat you. And I can''t lie on a referral... that''s fraud! Do you have any idea how much trouble I could get into?"'
	end

	act 'Offer him money':gt 'pav_clinic', 'spravka_money'
	act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange'
	act 'Just accept the referral as is':gt 'pav_clinic', 'badend'
end

if $ARGS[0] = 'gynoblow':
	*clr & cla
	if gpoli_doctorhavesex = 0:gpoli_doctorhavesex = 1 & guy += 1
	if $ARGS[1] = 'referral_blow':
		Gspravka = 30
		GspravkaT = 1
		Gspassed = 1
		forge_referral = 1
	end
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_7.jpg"></center>'
	'When you try to move your head, it has nowhere to go. The doctor''s erection is in front of you, about half-way in your mouth now. Behind you, his powerful arm is keeping you in place. You decide to give him what he wants and stop resisting, slowly feeling him thrust his cock further and further into your mouth. At first it''s easy, but his thick cock makes breathing more difficult the further it goes down.'
	'At one point it feels like he''s just fucking your throat carelessly, and you nearly gag when he pushes his dick all the way down your throat and holds it there for a few seconds. When he pulls back, it is fully coated with your saliva.'
	'You gasp for breath while he pulls you up, and hear him say, "That''s it, take it all!."'
	'He carries roughly pleasuring himself with your mouth until you realize he is about to cum.'

	gs 'arousal', 'bj', 10, 'sub', 'rough', 'deepthroat'
	gs 'stat'

	act 'Let him cum in your mouth':
		*clr & cla
		minut += 5
		pcs_horny += 5
		gs 'boyStat', 'A68'
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_14.jpg"></center>'
		'You feel too tired to object, even if you wanted to. You have no choice but to take his load in your mouth, and obediently let him shoot all his sperm inside you. As a nice touch, you show it all to him before swallowing his load and licking your lips. He moves his slowly softening dick towards your mouth once more, letting you suck and lick it clean.'
		'Then he lets out a satisfied sigh and begins to put his clothes back on, as if nothing happened.'

		act 'Get dressed too':
			*clr & cla
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_15.jpg"></center>'
			'You follow his example, and also put your clothes back on.'
			'When you''re both fully dressed again, he has a wide grin on his face: "Well now, one good turn deserves another. Considering your line of work, I suggest you come visit me at least once a week, but first go and see my colleague and get yourself cured."'
			'You happily agree with him: "That''s true. Thank you doctor, I will make sure to refer my friends to you if they ever need a check-up too."'

			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'pav_clinic'
		end
	end
end

if $ARGS[0] = 'badend':
	*clr & cla
	minut += 5
	gs 'stat'
	Gspravka = 30
	GspravkaT = 2
	if dildo_gyno_check = 1:dildo_gyno_fail = 1
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gin.jpg"></center>'
	*nl
	'You sigh, understanding that there''s nothing you can (or would be willing to) do to change his mind. Your gynaecologist takes an empty form from the pile and fills it out, stating that you are not a virgin. He presses his stamp onto it and offers it to you with a disappointed look in his eyes.'
	'Dejectedly, you take it from him and get ready to leave. How are you going to tell your mother?'
	if $loc = 'kuhrPar':
		act 'Leave': gt 'mother', 'referral'
	else
		act 'Leave': gt 'pav_clinic'
	end
end

if $ARGS[0] = 'spravka_arrange':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_1.jpg"></center>'
	if gpoliuborka = 2:
		'You really need this, but you understand you''re not in a good position to negotiate. Nevertheless, you try to plea your case and beg: "Please, Dr. Petrovich. I don''t have any money to offer you, but I really need that referral! My mother would kill me! Please?"'
		'He has a wolfish grin on his face as he gets up from his chair and walks over to you, putting his hands on your shoulders. He softly says in a soothing voice: "Well, if you really need it that badly... I think we can work out a deal. It''d just be between us, no one else has to know."'
		'You become hopeful, even though you feel a bit uncomfortable. You carefully ask: "Erm... okay, that''s great! What kind of deal are you thinking of?"'
		'The doctor continues in his soothing voice: "You see, <<$pcs_nickname>>... my wife is away on a business trip, she won''t be home for weeks. I''m a man with needs, and my job is very stressful as you can imagine. I need you to help me relax... relieve the tension, so to speak. What do you think? Do you think you can help me with that?"'
		'His grip on your shoulders intensifies a little, and he massages you while you think it over. You''re perfectly clear on what he wants from you now... but is it really worth it?'
	else
		'You really need this, but you understand you''re not in a good position to negotiate. Nevertheless, you try to plea your case and beg: "Please, Dr. Petrovich. I really need that referral! My mother would kill me! Please?"'
		'He has a wolfish grin on his face as he gets up from his chair and walks over to you. He softly says: "Well, if you really need it that badly... we all have needs. I bet we could work something out."'
		'You softly mutter: "But... what if..."'
		'He looks at you playfully and asks: "What if what?"'
		'You continue: "What if I have no money?"'
		'He smiles jovially at you as he reaches out for you. He puts his hands on your shoulders and you automatically give in to him, slowly letting him push you down to your knees.'
		'He smirks at you and mutters: "I understand why you are no longer a virgin, you little minx! So eager to please..."'
		'Your face is at the same level as his crotch, and he slowly undoes his pants and drops them to his ankles. His erect cock is pointing at you eagerly, a bead of precum slowly dripping down from it. You can tell he wants you badly.'
		gs 'willpower', 'bj', 'resist', 'hard'
		if will_cost <= pcs_willpwr:
			act 'Grab a referral form and run out of the room (<<will_cost>> Willpower)':
				*clr & cla
				Gspravka = 30
				GspravkaT = 1
				Gspassed = 1
				forge_referral = 1
				gs 'willpower', 'bj', 'resist', 'hard'
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				'This is your chance! You quickly grab a nearly filled out form from his desk and run out of his examination room. Dr. Petrovich pulls up his pants again but doesn''t even follow you, knowing this would be way too awkward to explain to anyone else in the clinic. Looks like you win this one!'
				'A while later, you fill out the rest of the form and nod to yourself as you think: "This should get <<$npc_nickname[''A29'']>> off my back for another month..."'
				act 'Leave':gt 'pav_clinic'
			end
		else
			act 'Grab a referral form and run out of the room (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
	act 'You really don''t want your mother to find out...':
		*clr & cla
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_6.jpg"></center>'
		'You take another deep breath, and slowly put your hands on his groin. To your surprise you feel that his cock is already fully erect. Looks like this was the payment option he was hoping you would go for!'
		'You massage it through his pants for a moment, and drop to your knees. He pulled his erection free from his pants while you were dropping to your knees, and you guide his stiff cock to your mouth with your hand. If you want that referral to work out for you, you''re going to have to work for it.'
		'You lick the tip of his cock teasingly. It''s a nice cock for sure, and the thought of servicing it even turns you on a little. Just because he more or less blackmailed you into doing this, that doesn''t mean you can''t enjoy yourself at the same time...'
		'You slowly envelop his cock with your mouth, and begin to suck the head. After a minute or two you feel his hand at the back of your head. You want to raise your head and ask him what he wants, but he forces you to stay where it is and slowly pushes his hips forward, making you take more and more of his rod inside your mouth.'
		act 'Give him a blowjob':
			if venera > 0:gt 'pav_clinic', 'gynoblow', 'referral_blow'
			*clr & cla
			if gpoli_doctorhavesex = 0:gpoli_doctorhavesex = 1 & guy += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_7.jpg"></center>'
			'You want to move back, but there is nowhere to go. His stiff cock is in front of you, and his powerful hand on the back of your head pulling you in closer. The masculine smell of his throbbing cock fills your nose as you breathe and you have to admit, it excites you!'
			'He begins to relax a little, letting you pull back until just the tip of his cock is between your lips. Then he pulls your head closer again, forcing his cock deeper each time. At first you''re okay, but at a certain point you can''t keep up any more and gag on his cock when he thrusts it in deep again. From the sadistic grin on his face you can tell he quite enjoys you gagging on his cock, and he suggests: "Try breathing through your nose, might be easier."'
			'You do as he says, and it does indeed make things a bit easier.'
			'Soon he is fucking your mouth, your saliva drooling down his shaft and over his hairy balls. The air of the office is filled with wet slurps and snorts as he pounds his cock into your mouth deeper and deeper, sometimes making you gag involuntarily as the head of his cock slips down your throat. With a sudden thrust, you can feel his curly pubic hair against your lips as he forces his cock down your throat as far as it''ll go. You panic as you can''t breathe, but Dr. Petrovich just as suddenly pulls his dick out of your mouth again. Thankfully, you get a chance to catch your breath.'
			'"I think that got me lubed up properly," Dr. Petrovich says with a lusty voice. You can tell he is very excited now, and are not sure you want to find out what happens next. Nevertheless, you''re too far in to back down now. He urges you: "Come on, now it''s time to go deep."'
			'"What do you mean?" you start to ask but get your answer almost immediately as Dr. Petrovich raises you from the floor, and bends you over the chair. You can''t help but let out a moan as he begins to rub the head of his slippery cock against your engorged clitoris. You didn''t realize how excited you were getting while you were sucking his cock!'

			gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
			gs 'stat'

			act 'Continue':
				*clr & cla
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_8.jpg"></center>'
				'You can feel your arousal rising when his body touches yours. As Dr. Petrovich keeps massaging your clitoris with his cockhead, you can feel your juices start to leak from your swollen pussy and run down your quivering thighs. You can hear the wet squelching, as he plows his throbbing cock between your soaking wet pussy lips. You close your eyes for a moment as you feel him push against your sopping wet cunt... it feels so good!'
				'Your tender flesh resists for a moment, but then surrenders. You feel the walls of your vagina stretch open, letting the invader in. You let out a passionate groan as he fills you up completely.'

				gs 'arousal', 'vaginal', 5, 'sub'
				gs 'stat'

				act 'Let him fuck you':
					*clr & cla
					pcs_vag += 1
					gs 'boyStat', 'A68'
					cumprecheck = 1
					gs 'cum_manage'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_9.jpg"></center>'
					'Your body feels like it''s getting hotter and hotter, beads of sweat forming on your forehead and upper lip. With every thrust Dr. Petrovich fucks you faster and harder, and you can feel your excitement growing too. Involuntarily you start to moan and gasp for air. You groan louder as you become more aroused. His hard hot member penetrates you ever deeper, without giving you any pause.'
					'You silently think to yourself: "I hope the room is soundproofed..." as the sound of his body slapping wetly against yours and your cries of passion and his animalistic grunts fill the room.'
					'You can no longer control yourself and have a thunderous orgasm as the doctor keeps fucking you relentlessly. Waves of bliss sear your nerves and your mouth opens in a silent scream, as you are consumed with pleasure.'
					'Suddenly, Dr. Petrovich pulls his dick out of you and you almost fall to the floor. He catches you with his powerful arms right on time, and lowers you on a table where once again feel his cock slide into your quivering vagina.'

					$orgasm_or = 'yes'
					gs 'arousal', 'vaginal', 5, 'sub'
					gs 'stat'
					act 'Sex on the table':
						*clr & cla
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_10.jpg"></center>'
						'Again he starts with short thrusts but soon picks up the pace. Your body is no longer under your control as you feel your hips rising to meet his thrusts, an electric shock coursing through your body. Everything ceases to exist, except for the wonderful feeling of his hard throbbing shaft moving in and out of your <<age>> year old pussy. Again, you feel the overwhelming power of an orgasm come closer and closer.'
						'"You come so quickly, <<$pcs_nickname>>," he pants in your ear. "I will be right back, we are not done yet. Just wait here."'
						'You only vaguely heard what he said, but as convulsions continued to beat your senses after your orgasm, you''re not sure what is next. These current sensations leave you puzzled... do you want him to fuck you more? Do you want it to be over? You just can''t tell.'
						'Just when you were about to get off the table, he returns with a big jar of lubricant in his hand and a latex glove on one hand. He motions for you to turn around, which you obediently do.'
						'Several of his gloved fingers dip inside the jar, and when he pulls it up you see the lubricant slowly dripping from them. He puts them against your tight sphincter, and spreads some of the lube over it before thrusting three fingers in.'
						'Ouch! You let out a painful sob when you feel his fingers stretch out your poor asshole... you were not counting on that! It hurts a bit, and you feel a bit uncomfortable when he pulls his fingers away and spreads more lubricant all over his cock. Before you can object, you feel the thick head of his cock pushing past your sphincter, stretching you out even further.'

						gs 'arousal', 'vaginal', 5, 'sub'
						gs 'arousal', 'foreplay', 5, 'sub'
						gs 'arousal', 'anal_finger', 5, 'sub'
						minut -= 5
						gs 'stat'

						act 'He fucks your ass':
							*clr & cla
							pcs_ass += 1
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_11.jpg"></center>'
							'You want to pull away, but you''re trapped between him and a wall. He slowly moves his hips, letting you get used to the size of his thick rod inside your tight little butt. It still stings a lot. Despite your best efforts you can''t relax your anus, only slowly getting used to the size of him.'
							'When he begins to speed up you nearly cry, and groan loudly with every thrust.'
							'He softly mutters: "This won''t do, you''re going to alarm the entire clinic if you keep screaming like that!"'
							'He takes his penis out of your ass, and you feel relieved. And, to be honest, rather turned on! It didn''t feel very good yet, but in a way you want it to. Maybe after a few more minutes?'
							'"Come on, get on the floor," he says after he throws his coat down. He spreads some more lubricant over his gloved fingers, and smears it over your slightly sore butthole. Guess he''s not done with that hole yet...'

							gs 'arousal', 'anal', 5, 'sub'
							gs 'stat'

							act 'Sex on the floor':
								*clr & cla
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_12.jpg"></center>'
								'To your surprise he ignores your butt for now, and drives his penis into your cunt instead when he gets down behind you. He fucks you with short, rough strokes... almost as if he''s fucking the annoyance out of his system. It doesn''t feel very pleasant at first, but soon you begin to moan and enjoy the feeling again when your body begins to relax.'
								'When he notices you''re gasping faster, he quickly pulls his cock out of your snatch and rams it inside your asshole in one fluent motion. You cry out loud, partially from the pain, and partially because you''re frustrated... you were so close! Despite the discomfort and pain you''re experiencing from his dick in your ass, you rub your clitoris... partially hoping it will take your mind off the pain, and partially hoping you can still get that orgasm you were so close to.'

								gs 'arousal', 'vaginal', 5, 'sub', 'rough'
								gs 'stat'

								act 'Anal again':
									*clr & cla
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_13.jpg"></center>'
									'Now that you''re so aroused, the anal sex doesn''t hurt quite as much. You furiously rub your clit while he pounds your stretched asshole roughly, slowly losing your mind when a second orgasm hits you. Dr. Petrovich must feel your anus contracting around his cock when you cum with it inside you.'
									'He was close as well, and after you ride out your orgasm he gives it a few more thrusts before he pulls out and moves his hips towards your face. He grabs you by the hair and guides his cock towards your mouth, and you obediently open your mouth to let it in.'

									$orgasm_or = 'yes'
									gs 'arousal', 'anal', 5, 'sub', 'rough'
									gs 'stat'

									act 'Let him cum in your mouth':
										*clr & cla
										minut += 5
										pcs_horny += 5
										gs 'boyStat', 'A68'
										gs 'cum_call', 'mouth_swallow', $boy, 1
										gs 'stat'
										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_14.jpg"></center>'
										'You feel too tired to object, even if you wanted to. You have no choice but to take his load in your mouth, and obediently let him shoot all his sperm inside you. As a nice touch, you show it all to him before swallowing his load and licking your lips. He moves his slowly softening dick towards your mouth once more, letting you suck and lick it clean.'
										'Then he lets out a satisfied sigh and begins to put his clothes back on, as if nothing happened.'

										act 'Get dressed':
											*clr & cla
											minut += 5
											gs 'stat'
											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_15.jpg"></center>'
											'You follow his example, and also put your clothes back on.'
											'When you''re both fully dressed again, he has a wide grin on his face: "Well now, one good turn deserves another."'
											'He takes place behind his desk and quickly writes out your referral, stating that you''re still a virgin. He offers it to you: "I believe this is yours. Now if you don''t mind, I have other patients to attend to."'
											'You feel cheap for a moment, when you accept the referral. Nevertheless, you''re off the hook for another month... that''s worth something, right?'
											Gspravka = 30
											GspravkaT = 1
											Gspassed = 1
											forge_referral = 1
											gs 'arousal', 'end'
											gs 'stat'
											if $loc = 'kuhrPar':
												act 'Leave': gt 'mother', 'referral'
											else
												act 'Leave': gt 'pav_clinic'
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
	gs 'willpower', 'bj', 'resist'
	if will_cost <= pcs_willpwr:
		act 'You can''t do that (<<will_cost>> Willpower)':
			cla
			gs 'willpower', 'bj', 'resist'
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			'You frown. You really don''t want to have sex with him, sex is what got you into this whole mess in the first place! You try one more time: "I can''t do that doctor. Please, show some compassion... could you give me a break, just this once? I just need some time to figure out how to tell my <<$npc_nickname[''A29'']>> about all this!"'
			'His gaze is stone cold, without any sign of compassion. He says in an even tone: "So be it. Sorry <<$pcs_nickname>>, but that''s not how it works. I''m running a big enough risk as it is. If you''re not helping me, I''m not helping you."'
			act 'Try to negotiate': gt 'pav_clinic', 'spravka_arrange'
			act 'Just accept the referral as is': gt 'pav_clinic', 'badend'
		end
	else
		act 'You can''t do that (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end

if $ARGS[0] = 'spravka_money':
	*clr & cla
	minut += 5
	gs 'stat'

	if gpoliuborka = 2:
		'You don''t want to have sex with him! Having sex is what got you in this mess in the first place.'
		'You think fast, and blurt out: "I can pay! Would that referral be the same if I were to pay you for your time? I could pay you well!"'
		'The doctor strokes his chin as he thinks, and offers: "<<$pcs_nickname>>, I don''t know... I''m not here for the money. However, a private patient wouldn''t count as a minor, so I would have no obligation to tell your mother."'
		'He continues: "The standard consultancy fee is 2,000 <b>₽</b>."'
		if money >= 2000:
			act 'Pay him the 2,000 <b>₽</b> (cash)':
				*clr & cla
				minut += 5
				money -= 2000
				gs 'stat'
				Gspravka = 30
				GspravkaT = 1
				Gspassed = 1
				forge_referral = 1
				'Without giving it much thought, you say: "Deal!"'
				'It''s not cheap, but this way you get another month to think of a solution before your mother finds out you are not a virgin. Dr. Petrovich takes your money and fills out a form, stating you are a virgin. He stamps it and hands it to you, and you carefully put it in your pocket while thanking him.'
				act 'Leave':gt 'pav_clinic'
			end
		end
		if karta >= 2000:
			act 'Pay him the 2,000 <b>₽</b> (card)':
				*clr & cla
				minut += 5
				karta -= 2000
				gs 'stat'
				Gspravka = 30
				GspravkaT = 1
				Gspassed = 1
				forge_referral = 1
				'Without giving it much thought, you say: "Deal!"'
				'It''s not cheap, but this way you get another month to think of a solution before your mother finds out you are not a virgin. Dr. Petrovich produces a card reader and you make the payment, then fills out a form stating you are a virgin. He stamps it and hands it to you, and you carefully put it in your pocket while thanking him.'
				act 'Leave':gt 'pav_clinic'
			end
		end
		act 'Just accept the referral as is':gt 'pav_clinic', 'badend'
		act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange'
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_5.jpg"></center>'
		'You carefully suggest: "Well, what if I give you money?"'
		'Dr. Petrovich seems insulted by this suggestion, and angrily says: "Enough! I am a professional doctor, I swore an oath! You can''t bribe me, it would go against everything I stand for!"'
		'"Please? I could really use your help... please..." you beg as tears begin to fill your eyes. You sob: "I don''t know what else to do..."'
		'He shakes his head resolutely and eyes you up and down as he says: "I would like to help a pretty young girl in need, but taking a bribe could get me struck off the Medical Register."'
		'He lets those words linger in the air for a while, talking in a tone as if he''s not opposed to helping you. He''s resolute about not accepting money though, and is pausing to see if you will suggest something else instead.'
		act 'Just accept the referral as is':gt 'pav_clinic', 'badend'
		act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange'
	end
end

if $ARGS[0] = 'spravka_money_pale':
	*clr & cla
	minut += 5
	gs 'stat'

	if gpoli_doctorhavesex = 0:
		'You really don''t want him to inform your mother... perhaps you can bribe him? You carefully suggest: "Could you overlook my age if I were to pay you for your time?"'
		'He tries to reject you, but doesn''t sound very convincing as he says: "<<$pcs_nickname>>, I don''t know... I didn''t become a doctor for the money."'
		'A gleam of greed appears in his eyes, you definitely have his attention. He offers: "However, a private patient wouldn''t count as a minor, so I would have no obligation to tell anyone anything. It would be like you were never here!"'
		'He continues: "The normal consultancy fee is 2,000 <b>₽</b>."'
		if money >= 2000:
			act 'Pay him the 2,000 <b>₽</b> (cash)':
				*clr & cla
				minut += 5
				money -= 2000
				pcs_horny += 5
				gs 'stat'
				'The doctor carefully counts the money, and then goes and prepares an injection from a bottle marked "0.45% Sodium Chloride Injection USP". You swallow nervously as he fills a rather large looking needle with the unfamiliar chemical.'
				gs 'pav_clinic', 'spravka_money_pale2'
			end
		end
		if karta >= 2000:
			act 'Pay him the 2,000 <b>₽</b> (card)':
				*clr & cla
				minut += 5
				karta -= 2000
				pcs_horny += 5
				gs 'stat'
				'The doctor picks up his card reader and you make the payment, then goes and prepares an injection from a bottle marked "0.45% Sodium Chloride Injection USP". You swallow nervously as he fills a rather large looking needle with the unfamiliar chemical.'
				gs 'pav_clinic', 'spravka_money_pale2'
			end
		end
		act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange_pale'
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/gpoli_5.jpg"></center>'
		'"Well, what if I give you money? I can pay you!" you suggest in desperation.'
		'Dr. Petrovich seems insulted by this suggestion, and angrily says: "Enough! I am a medical professional, I swore an oath! You can''t bribe me, that would go against everything I stand for!"'
		'"Please? I could really use your help... please..." you beg as tears begin to fill your eyes. You sob: "I don''t know what else to do!"'
		'He shakes his head resolutely and eyes you up and down as he says: "I would like to help a pretty young girl in need, but taking a bribe could get me struck off the Medical Register."'
		'He lets those words linger in the air for a while, talking in a tone as if he''s not opposed to helping you. He''s resolute about not accepting money though, and is pausing to see if you will suggest something else.'
		act 'Try to negotiate':gt 'pav_clinic', 'spravka_arrange_pale'
	end
end

if $ARGS[0] = 'spravka_money_pale2':
	'He tells you to bend over. He seems to have some problems finding the correct spot for the shot and you feel his hand squeezing your ass cheeks in several spots. What''s taking him so long?'
	'For a moment you you''re afraid he has to stick the needle in your asshole, as he even rubs you there. Fortunately, he finally settles on a location and swabs it with some disinfectant.'
	'You feel a sharp pinch, then the feeling of a cold liquid being injected into your ass cheek. It isn''t as bad as you thought it was going to be, but you''re still relieved when it''s over.'
	'"There, all done," the doctor says with a satisfied tone. He warns you: "It could take up to 30 days for the symptoms to fully disappear. Just be sure not to snort any more, or the cure will not work."'
	act 'Leave':gt 'pav_clinic'
end

if $ARGS[0] = 'spravka_arrange_pale':
	*clr & cla
	minut += 5
	gs 'stat'
	if gpoli_doctorhavesex = 1:
		'"Can I, I mean, can we, er... how... is there something I can do for you? My mother really can''t find out!" you sob in desperation. You''re in terror at the thought of what your mother would do if she knew.'
		'The doctor knows he has you cornered, and drives his point home: "Well, <<$pcs_nickname>>, you really need this treatment. I think I can offer you a different option. It would stay between us, of course," he says as he puts his hand on your shoulder.'
		'"What do I have to do?" you ask. Deep down inside, you feel like you already know the answer.'
		'The doctor decides to be straight with you, and says: "You see, <<$pcs_nickname>>... my wife is away on a business trip as usual, she won''t be home for weeks. I''m a man with needs, and my job is very stressful as you can imagine. I need you to help me relax... relieve the tension, so to speak. So, I''m going to fuck you. I''m going to fuck you any way I want. If you do good, you''ll get your medicine and I won''t tell your <<$npc_nickname[''A29'']>>. Deal?"'
		'You knew it was coming, but you''re baffled by his audacity. He stares you down while several thoughts race through your mind... you really need this treatment, but is it worth it?'
	else
		'"Can I, I mean, can we, er... how... is there something I can do for you? My mother really can''t find out!" you sob in desperation. You''re in terror at the thought of what your mother would do if she knew.'
		'The doctor knows he has you cornered, and suggests: "We all need things, <<$pcs_nickname>>. If you help me with my needs, I can help you with yours."'
		'He continues: "You see, <<$pcs_nickname>>... my wife is away on a business trip, she won''t be home for weeks. I''m a man with needs, and my job is very stressful as you can imagine. I need you to help me relax... relieve the tension, so to speak. What do you say?"'
		'"What do you..." you hesitate. You know exactly what he''s suggesting, but you can''t say it.'
		'The doctor puts his hands on your hips and smiles at you confidently as he says: "A beautiful girl like you always has other options."'
		'He gropes your <<$titsize>> boobs for a while, before he moves his hands to his trousers and undoes his belt.'
		gs 'willpower', 'bj', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Run out of the office (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'bj', 'resist'
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				'In a panic, you grab your clothes and run out of the office. You know you can''t talk about this with anyone... if you say anything, Dr. Petrovich would tell your <<$npc_nickname[''A29'']>> about your addiction. You quickly get dressed again in an empty examination room, wondering how you''re going to get out of this mess now.'
				if $loc = 'kuhrPar':
					act 'Leave': gt 'mother', 'referral'
				else
					act 'Leave':gt 'pav_clinic'
				end
			end
		else
			act 'Run out of the office (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
	act 'Do what you have to do':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_6.jpg"></center>'
		'You sigh and slowly slide down from chair, kneeling in front of the doctor. He undoes his trousers and lets them drop to his ankles, exposing his semi-hard penis. You grasp it in your hand and reluctantly begin to lick his member while rubbing your hand up and down the shaft. As his cock begins to get harder, you become fascinated by the changes to his manhood. You find yourself starting to get involved in pleasuring him... maybe this won''t be so bad after all. To your surprise, you think you might even be starting to enjoy the feel and taste of his hot flesh. You move your hand faster, still licking his now fully erect cock and his breathing slightly accelerates. You think maybe that''s it, maybe he''s about to come...'
		'But, no. Instead the doctor lays his hand on the back of your head. You want to raise your head to see what he wants, but instead he pulls you towards his groin and your <<$pc_desc[''lips'']>> lips begin to stretch over his slippery cockhead.'

		gs 'arousal', 'hj', 5, 'sub'
		gs 'stat'

		act 'Give him a blowjob':
			if venera > 0:gt 'pav_clinic', 'gynoblow'
			*clr & cla
			if gpoli_doctorhavesex = 0:gpoli_doctorhavesex = 1 & guy += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_7.jpg"></center>'
			'You want to move away, but there is nowhere to go. His stiff cock is in front of you, and his powerful hand on the back of your head is pulling you in closer. The masculine smell of his throbbing cock fills your nose as you breathe and you have to admit, it excites you!'
			'He begins to relax a little, letting you pull back until just the tip of his cock is between your lips. Then he pulls your head closer again, forcing his cock deeper each time. At first you''re okay, but at a certain point you can''t keep up any more and gag on his cock when he thrusts it in deep again. From the sadistic grin on his face you can tell he quite enjoys you gagging on his cock, and he suggests: "Try breathing through your nose, might be easier."'
			'You do as he says, and it does indeed make things a bit easier.'
			'Soon he is fucking your mouth, your saliva drooling down his shaft and over his hairy balls. The air of the office is filled with wet slurps and snorts as he pounds his cock into your mouth deeper and deeper, sometimes making you gag as the head of his cock slips down your throat. With a sudden thrust, you can feel his curly pubic hair against your lips as he forces his cock all the way down your throat. You panic as you can''t breathe, but Dr. Petrovich just as suddenly pulls his dick out of your mouth again. Thankfully, you get a chance to catch your breath.'
			'"I think that got me lubed up properly," Dr. Petrovich says with a lusty voice. You can tell he is very excited now, and are not sure you want to find out what happens next. Nevertheless, you''re too far in to back down now. He urges you: "Come on, now it''s time to go deep."'
			'"What do you mean?" you start to ask but get your answer almost immediately as Dr. Petrovich raises you from the floor, and bends you over the chair. You can''t help but let out a moan as he begins to rub the head of his slippery cock against your engorged clitoris. You didn''t realize how excited you were getting while you were sucking his cock!'

			gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
			gs 'stat'

			act 'Continue':
				*clr & cla
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_8.jpg"></center>'
				'You can feel your arousal rising when his body touches yours. As Dr. Petrovich keeps massaging your clitoris with his cockhead, you can feel your juices start to leak from your swollen pussy and run down your quivering thighs. You can hear the wet squelching, as he plows his throbbing cock between your soaking wet pussy lips. You close your eyes for a moment as you feel him push against your sopping wet cunt... it feels so good!'
				'Your tender flesh resists for a moment, but then surrenders. You feel the walls of your vagina stretch open, letting the invader in. You let out a passionate groan as he fills you up completely.'

				gs 'arousal', 'vaginal', 5, 'sub'
				gs 'stat'

				act 'Let him fuck you':
					*clr & cla
					pcs_vag += 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_9.jpg"></center>'
					'Your body begins to get hotter and hotter, beads of sweat forming on your forehead and upper lip. With every thrust Dr. Petrovich fucks you faster and harder, and you can feel your excitement growing too. Involuntarily you start to moan and gasp for air. You groan louder and louder as you become more aroused. His hard hot member penetrates you ever deeper, without giving you any pause.'
					'You silently think to yourself: "I hope the room is soundproofed..." as the sound of his body slapping wetly against yours and your cries of passion and his animalistic grunts fill the room.'
					'You can no longer control yourself and have a thunderous orgasm as the doctor keeps fucking you relentlessly. Waves of bliss sear your nerves and your mouth opens in a silent scream, as you are consumed with pleasure.'
					'Suddenly, Dr. Petrovich pulls his dick out of you and you almost fall to the floor. He catches you right on time in his powerful arms, and lowers you on a table where you once again feel his cock slide into your quivering vagina.'

					$orgasm_or = 'yes'
					gs 'arousal', 'vaginal', 5, 'sub', 'rough'
					gs 'stat'

					act 'Sex on the table':
						*clr & cla
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_10.jpg"></center>'
						'Again he starts with short thrusts but soon picks up the pace. Your body is no longer under your control as you feel your hips rising to meet his thrusts, an electric shock coursing through your body. Everything ceases to exist, except for the wonderful feeling of his hard throbbing shaft moving in and out of your <<age>> year old pussy. Again, you feel the overwhelming power of an orgasm come closer and closer.'
						'"You come so quickly, <<$pcs_nickname>>," he pants in your ear. "I will be right back, we are not done yet. Just wait here."'
						'You only vaguely heard what he said, but as convulsions continued to beat your senses after your orgasm, you''re not sure what is next. These current sensations leave you puzzled... do you want him to fuck you more? Do you want it to be over? You just can''t tell.'
						'Just when you were about to get off the table, he returns with a big jar of lubricant in his hand and a latex glove on one hand. He motions for you to turn around, which you obediently do.'
						'Several of his gloved fingers dip inside the jar, and when he pulls it up you see the lubricant slowly dripping from them. He puts them against your tight sphincter, and spreads some of the lube over it before thrusting three fingers in.'
						'Ouch! You let out a painful sob when you feel his fingers stretch out your poor asshole... you were not counting on that! It hurts a bit, and you feel a bit uncomfortable when he pulls his fingers away and spreads more lubricant all over his cock. Before you can object, you feel the thick head of his cock pushing past your sphincter, stretching you out even further.'

						gs 'arousal', 'vaginal', 5, 'sub'
						gs 'arousal', 'foreplay', 5, 'sub'
						gs 'arousal', 'anal_finger', 5, 'sub'
						minut -= 5
						gs 'stat'

						act 'He fucks your ass':
							*clr & cla
							pcs_ass += 1
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_11.jpg"></center>'
							'You want to pull away, but you''re trapped between him and a wall. He slowly moves his hips, letting you get used to the size of his thick rod inside your tight little butt. It still stings a lot. Despite your best efforts you can''t relax your anus, only slowly getting used to the size of him.'
							'When he begins to speed up you nearly cry, and groan loudly with every thrust.'
							'He softly mutters: "This won''t do, you''re going to alarm the entire clinic if you keep screaming like that!"'
							'He takes his penis out of your ass, and you feel relieved. And, to be honest, rather turned on! It didn''t feel very good yet, but in a way you want it to. Maybe after a few more minutes?'
							'"Come on, get on the floor," he says after he throws his coat down. He spreads some more lubricant over his gloved fingers, and smears it over your slightly sore butthole. Guess he''s not done yet...'

							gs 'arousal', 'anal', 5, 'sub'
							gs 'stat'

							act 'Sex on the floor':
								*clr & cla
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_12.jpg"></center>'
								'To your surprise he ignores your butt for now, and drives his penis into your cunt instead when he gets down behind you. He fucks you with short, rough strokes... almost as if he''s fucking the annoyance out of his system. It doesn''t feel very pleasant at first, but soon you begin to moan and enjoy the feeling again when your body begins to relax.'
								'When he notices you''re gasping faster, he quickly pulls his cock out of your snatch and rams it inside your asshole in one fluent motion. You cry out loud, partially from the pain, and partially because you''re frustrated... you were so close! Despite the discomfort and pain you''re experiencing from his dick in your ass, you rub your clitoris... partially hoping it will take your mind off the pain, and partially hoping you can still get that orgasm you were so close to.'

								gs 'arousal', 'vaginal', 5, 'sub', 'rough'
								gs 'stat'

								act 'Anal again':
									*clr & cla
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_13.jpg"></center>'
									'Now that you''re so aroused, the anal sex doesn''t hurt quite as much. You furiously rub your clit while he pounds your stretched asshole roughly, slowly losing your mind when a second orgasm hits you. Dr. Petrovich must feel your anus contracting around his cock when you cum with it inside you.'
									'He was close as well, and after you ride out your orgasm he gives it a few more thrusts before he pulls out and moves his hips towards your face. He grabs you by the hair and guides his cock towards your mouth, and you obediently open your mouth to let it in.'

									$orgasm_or = 'yes'
									gs 'arousal', 'anal', 5, 'sub', 'rough'
									gs 'stat'

									act 'Let him cum in your mouth':
										*clr & cla
										minut += 5
										pcs_horny += 5
										gs 'boyStat', 'A68'
										gs 'cum_call', 'mouth_swallow', $boy, 1
										gs 'stat'
										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_14.jpg"></center>'
										'You feel too tired to object, even if you wanted to. You have no choice but to take his load in your mouth, and obediently let him shoot all his sperm inside you. As a nice touch, you show it all to him before swallowing his load and licking your lips. He moves his slowly softening dick towards your mouth once more, letting you suck and lick it clean.'
										'Then he lets out a satisfied sigh and begins to put his clothes back on, as if nothing happened.'

										act 'Get dressed':
											*clr & cla
											minut += 5
											gs 'stat'
											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/gyno/sex/gpoli_15.jpg"></center>'
											'You follow his example, and also put your clothes back on.'
											'When you''re both fully dressed again, he has a wide grin on his face. He tells you: "Well now, one good turn deserves another. Wait here, I''ll go get your shot."'
											'He goes and prepares an injection from a bottle marked "0.45% Sodium Chloride Injection USP". You swallow nervously as he fills a rather large looking syringe with the unfamiliar chemical.'
											'He tells you to bend over and uncover your ass. He seems to have some problems finding the correct spot for the shot and you feel his hand squeezing your ass cheeks in several spots. What''s taking him so long?'
											'For a moment you''re afraid he''s going to stick the needle in your used asshole, as he even rubs you there. Fortunately, he finally decides on a spot on your ass cheek and he swabs it with disinfectant before aiming the syringe at it.'
											'You feel a sharp pinch, then the feeling of a cold liquid being injected into your ass cheek. It isn''t as bad as you thought it was going to be, but you''re still relieved when it''s over.'
											'"There, all done," the doctor says with a satisfied tone. He warns you: "It could take up to 30 days for the symptoms to fully disappear. Just be sure not to snort any more, or the cure will not work."'
											'You quietly mumble: "Thank you doctor," as you straighten your clothes.'

											gs 'arousal', 'end'
											gs 'stat'
											act 'Leave':gt 'pav_clinic'
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'maternity_ward':
	pcs_know_mward = 1
	$menu_arg = $ARGS[0]
	menu_off = 0
	*clr & cla
	gs 'stat'
	minut += 5
	lact_ev['gpoli_temp_var'] = 0
	if hour >= 6 and hour <= 20:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/mward.jpg"></center>'
		'<center>You are at the maternity ward. There are alot of babies and nurses taking care of them.</center>'
		act 'Leave':gt 'pav_clinic'
		if lactation['active'] > 0 and pcs_gpolimilkdonation = 3:
			act 'Talk to the nurse (0:05)':
				gs 'stat'
				*clr & cla
				menu_off = 1
				minut += 5
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/old_nurse.jpg"></center>'
				'Nurse: Hello <<$pcs_firstname>>, how can I help you?'
				act 'Leave': gt 'pav_clinic', 'maternity_ward'
				act 'Donate your breast milk (0:15)':
					*clr & cla
					lact_ev['gpoli_milkedvolume'] = 0
					pcs_gpoli_donationsessioncount = 0
					!!if rand(0,100) = 95 and orphanfeed = 0:
					!!	orphanfeed = 1
					!!end
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
					'You talk to the old nurse and she leads you into the quiet room.'
					!!if orphanfeed = 1:
					!!	'It seems like there is a crib with a baby inside in this room, too.'
					!!end
					act 'Have your breasts pumped':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
						'You sit down and take off your top.'
						if lactation['breastmv'] > lactation['breastmm']*8/10:
							'The nurse looks surprised at your engorged breasts'
							'Nurse: Oh dear! These look painfully full. I hope the pumping will make you feel better.'
						end
						if pain['nipples'] >= 60:
							'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
							'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit more of the yellowish cream from the tin.'
							'She applies the cream to your nipples. It feels nice on your nipples and they hurt less.'
							pain['nipples'] -= 20
						else
							'The nurse grabs the nipple balm and applies it to your nipples. It feels nice on your nipples as she rubs it in.'
						end
						lactation['nipple_cream_applied'] = 1
						act 'Continue':	gt 'pav_clinic', 'maternity_ward_donation'
					end
				end
				act 'Check your file (0:05)':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/formular.jpg"></center>'
					'The nurse hands you a file on how much you have donated so far.'
					'<br>----------------------------------------'
					'Analyzed milksample measurements'
					'Volume in ml: <<mward_donatesv/10>>ml'
					'Fat in %: <<mward_donatesf/10>>.<<mward_donatesf mod 10>>%'
					'Lactose in %: <<mward_donatess/10>>.<<mward_donatess mod 10>>%'
					'<br>----------------------------------------'
					if pcs_gpoli_totalmilkdonation_count > 0:
						'Total breast milk donation statistics'
						if pcs_gpoli_totalmilkdonation < 100:
							'Donated milk volume in liter: <<pcs_gpoli_totalmilkdonation/1000>>.0<<pcs_gpoli_totalmilkdonation mod 1000>>l'
						else
							'Donated milk volume in liter: <<pcs_gpoli_totalmilkdonation/1000>>.<<pcs_gpoli_totalmilkdonation mod 1000>>l'
						end
						'Donation count: <<pcs_gpoli_totalmilkdonation_count>>'
						'Average milk volume per donation in ml: <<pcs_gpoli_totalmilkdonation/pcs_gpoli_totalmilkdonation_count>>'
						'Paid money: <<((pcs_gpoli_totalmilkdonation/50)*100)>><b>₽</b>'
						'<br>----------------------------------------'
					end
					act 'Leave': gt 'pav_clinic', 'maternity_ward'
				end
				!!act 'Mammography (1:00)':
				!!
				!!end
			end
		end
		if lactation['active'] > 0 and lactation['breastmv'] > lactation['breastmm']/8 and pcs_gpolimilkdonation <= 2:
			'<br><br><center>One of the nurses looks at you suspiciously.<center>'
			act 'Talk to the nurse (0:05)':
				*clr & cla
				menu_off = 1
				minut += 5
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/old_nurse.jpg"></center>'
				if preg >= 0 and pregtimes > 0 and pcs_gpolimilkdonation <= 0 and lactation['pc_aware'] > 0:
					'You walk up to the nurse'
					'You: Uhm, Hello...'
					'Nurse: Which one is yours?'
					'You: Mine? I don''t understand...'
					'The nurse looks at your face then down at your breast and then back at your face.'
					'Nurse: Well, you are obviously lactating, so you came here to breastfeed your offspring?'
					'She concludes on you, giving you a rised eyebrow.'
				elseif preg = 0 and pregtimes = 0 and pcs_gpolimilkdonation <= 0 and lactation['pc_aware'] > 0:
					'You walk up to the nurse'
					'You: Uhm, Hello...'
					'The nurse looks you up and down, rising an eyebrow on you.'
					'Nurse: You don''t look like you ever had a child, how come you are lactating?'
					'You are surprised by the sudden and precise analysis of the nurse.'
					'You: How... how do you know?'
					'Nurse: I''ve been working here for ages. Trust me... I can tell by the smell. Now why are you lactating?'
				elseif preg = 0 and pregtimes = 0 and pcs_gpolimilkdonation <= 0 and lactation['pc_aware'] <= 0:
					'You walk up to the nurse'
					'You: Uhm, Hello...'
					'The nurse looks you up and down, rising an eyebrow on you.'
					'Nurse: You don''t look like you ever had a child, how come you are lactating?'
					'You are confused by her comment and tilt your head at her clueless.'
					'You: Huh? What are you talking about?'
					'The nurse points at your breasts, circling around the pen in her hand.'
					'Nurse: Your breasts... You obviously have milk in them. Trust me, I''ve been working here for ages and now how lactating breasts look like.'
					'You look shocked at her, then down at your cleavage, no idea how to react.'
					'You: This can''t be, I''ve never been pregnant... I mean... why should I be lactating?'
					'The nurse eyes you up and down again, frowning a bit worried. Then she get''s up and reaches her hand out to you.'
					'Nurse: Come with me and we have this checked, okay?'
				elseif preg >= 0 and pregtimes > 0 and pcs_gpolimilkdonation <= 0 and lactation['pc_aware'] <= 0:
					'You walk up to the nurse'
					'You: Uhm, Hello...'
					'Nurse: Which one is yours?'
					'You: Mine? I don''t understand...'
					'The nurse looks at your face then down at your breast and then back at your face.'
					'Nurse: Well, you are obviously lactating, so you came here to breastfeed your offspring?'
					'She concludes on you, giving you a rised eyebrow.'
					'You look at her, then down at your cleavage, no idea how to react.'
					'You: This can''t be, I mean... why should I be lactating?'
					'The nurse eyes you up and down again, frowning a bit worried. Then she get''s up and reaches her hand out to you.'
					'Nurse: Come with me and we have this checked, okay?'
				elseif pcs_gpolimilkdonation <= 0:
					'You walk up to the nurse'
					'You: Uhm, Hello...'
					'Nurse: Which one is yours?'
					'You: Mine? I don''t understand...'
					'The nurse looks at your face then down at your breast and then back at your face.'
					'Nurse: Well, you are obviously lactating, so you came here to breastfeed your offspring?'
					'She concludes on you, giving you a rised eyebrow.'
				else
					'You walk up to the nurse'
					'You: Hello...'
					'Nurse: Ah, it is you again...'
					'She looks you up and down'
					if pcs_gpolimilkdonation = 1 and preg = 0 and pregtimes = 0 and lactation['pc_aware'] <= 0:
						'Nurse: So... changed your mind and want me to have it checked?'
					elseif pcs_gpolimilkdonation = 1 and preg = 0 and pregtimes = 0 and lactation['pc_aware'] > 0:
						'Nurse: So, why are you lactating again?'
					elseif pcs_gpolimilkdonation = 2:
						'Nurse: So, did you clear your mind up and want donate your breast milk?'
					else
						'Nurse: What do you want?'
					end
				end
				if pcs_gpolimilkdonation < 1: pcs_gpolimilkdonation = 1
				if pcs_gpolimilkdonation < 2:
					if lactation['pc_aware'] <= 0:
						act 'Accept her offer':
							*clr & cla
							minut += 10
							pcs_gpolimilkdonation = 2
							lact_ev['gpoli_milkedvolume'] = (func('lact_lib','$get_breastmilk', 5, 1))/100
							lact_ev['gpoli_milkedvolume'] = 0
							lactation['pc_aware'] = 1
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
							'The nurse leads you into a room. It is quiet in here. There is a chair a table and a breast pump.'
							'You sit down and the nurse invites you to take off your top.'
							'Reluctantly, you pull up your shirt and present your breasts to her.'
							'<br><center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center><br>'
							'She reaches up her hands and professionally weights your breasts a bit. Then she grabs up at your areolas and presses them down.'
							'To your surprise white drops start to develop on your nipples. The nurse gives it another squeeze and suddenly little streams of white liquid jet out of your nipples.'
							'You: Oh my god!'
							'<center><img <<$set_imgh>> src="images/pc/body/tits/lactate_start.jpg"></center>'
							'The nurse looks up at you with a caring expression.'
							'Nurse: No worries, this can happen from time to time.'
							'You are still surprised and perplexed by what you are seeing.'
							'You: I am lactating!'
							'The nurse takes a small wet wipe and cleans your breasts, then signaling that you can cover yourself up.'
							'Nurse: You know, we always need breast milk here. You should think about donating your milk. We will even compensate you for your efforts.'
							'She nods and cleans her hands.'
							'Nurse: But I think, you should leave for now, so you can get used to your new ability...'
							'She opens the door to let you out of the room'
							act 'Leave': gt 'pav_clinic'
						end
					else
						act 'Explain yourself':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/old_nurse.jpg"></center>'
							if preg = 0 and pregtimes = 0:
								pcs_gpolimilkdonation = 2
								if lactation['induced'] = 1:
									'You: Erm... I used a breast pump on myself...'
									'You blush a bit from embarresment, while telling it to her.'
								else
									'You: I don''t really now... it just started some day.'
									'You explain, blushing from embarresment.'
								end
								'The nurse nods at you professionally, then pulls some paper together, while she looks really thoughful. She then looks up at you and starts to speak.'
								'Nurse: Have you ever thought of donating your breast milk?'
								'You: Donating?'
								'Nurse: Yes, donating. We would pump your breasts and collect the milk. We can use the milk for the mothers that are not able to breastfeed yet. We also offer a bit of money for your donated breast milk.'
								'You look at her with wide eyes.'
								'Nurse: So, what do you think?'
								pcs_gpolimilkdonation = 2
								act 'Give it a try (0:15)':
									*clr & cla
									minut += 15
									pcs_gpolimilkdonation = 3
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
									'The nurse leads you into a room. It is quiet in here. There is a chair a table and a breast pump.'
									'You sit down and the nurse invites you to take off your top.'
									if pain['nipples'] >= 60 and pcs_knows_nipplecream <= 0:
										'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
										'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
										'You: What is that?'
										'The nurse looks up at you.'
										'Nurse: This is nipple balm. It helps with sore nipples during pumping. Don''t you now this?'
										'You nod your head and watch as the nurse applies the cream to your nipples. The cream feels nice on your nipples and they hurt less.'
										pain['nipples'] -= 20
										'You: Where do I get this stuff?'
										'Nurse: You can buy it in the pharmacy...'
										pcs_knows_nipplecream = 1
										'The nurse finishes rubbing you nipples with the nipple balm.'
									elseif pain['nipples'] >= 60 and pcs_knows_nipplecream > 0:
										'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
										'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
										'She applies the cream to your nipples. It feels nice on your nipples and they hurt less.'
										pain['nipples'] -= 20
									else
										'The nurse grabs the nipple balm and applies it to your nipples. It feels nice on your nipples as she rubs it in.'
									end
									lactation['nipple_cream_applied'] = 1
									'Nurse: Okay, I am going to pump a bit milk off first, to check the quality and if you are able to donate enough. So this time you won''t get paid for your milk.'
									'You nod and pull up your shirt. The nurse takes the pumps and puts them on your breasts. She flicks a switch and you can feel your nipples being sucked in with force. The pump slowly working your nipples.'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pumping.jpg"></center>'
									lact_ev['gpoli_milkedvolume'] = (func('lact_lib','$get_breastmilk', 4, 15))/100
									lactation['breastpumped'] = 1
									pcs_orphanfeed = 0
									if lact_ev['gpoli_milkedvolume'] >= 1000:
										'Your breasts are able to fill both small bottles easily. The nurse nods at you confidently.'
										'Nurse: Yes, it seems you are able to make good amount of milk. You could breastfeed a baby with no issue.'
									elseif lact_ev['gpoli_milkedvolume'] >= 500 and lact_ev['gpoli_milkedvolume'] < 1000:
										'Your breasts are not able to fill both small bottles. The nurse rises an eyebrow on you.'
										'Nurse: Okay... it seems you are able to make enough milk for a 50ml donation, but you could have trouble to breastfeed a baby properly.'
									else
										'You have trouble to fill the bottles to the first mark. The nurse shakes her head disappointed.'
										'Nurse: Mhmm... your breasts don''t seem to make enough milk. You can still come here and get yourself pumped, but we need at least 50ml for a valid donation.'
									end
									'The nurse detaches the pump and allows you to dress up again.'
									if lact_ev['gpoli_milkedvolume'] > 500:
										mward_donatesv = 500
									else
										mward_donatesv = lact_ev['gpoli_milkedvolume']
									end
									if salo > 40:
										mward_donatesf = 60
									elseif salo > 20:
										mward_donatesf = 45
									elseif salo > 15:
										mward_donatesf = 20
									else
										mward_donatesf = 10
									end
									if pcs_energy > 30:
										mward_donatess = rand(69,80)
									elseif sick > 1:
										mward_donatess = rand(0,45)
									else
										mward_donatess = rand(45,69)
									end
									act 'Leave':gt 'pav_clinic'
								end
								act 'Refuse to donate':
									*clr & cla
									'You refuse to donate your breast milk. The nurse looks disappointed in you as you leave.'
									act 'Leave':gt 'pav_clinic'
								end
							else
								pcs_gpolimilkdonation = 2
								'You: Well... I don''t have a kid here... I was just looking around for a bit'
								'You look a bit awkward at the nurse as you try to explain yourself.'
								'The nurse nods at you professionally, then pulls some paper together, while she looks really thoughful. She then looks up at you and starts to speak.'
								'Nurse: Have you ever thought of donating your breast milk?'
								'You: Donating?'
								'Nurse: Yes, donating. We would pump your breasts and collect the milk. We can use the milk for the mothers that are not able to breastfeed yet. We also offer a bit of money for your donated breast milk.'
								'You look at her with wide eyes.'
								'Nurse: So, what do you think?'
								pcs_gpolimilkdonation = 2
								act 'Give it a try (0:15)':
									*clr & cla
									minut += 15
									pcs_gpolimilkdonation = 3
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
									'The nurse leads you into a room. It is quiet in here. There is a chair a table and a breast pump.'
									'You sit down and the nurse invites you to take off your top.'
									if pain['nipples'] >= 60 and pcs_knows_nipplecream <= 0:
										'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
										'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
										'You: What is that?'
										'The nurse looks up at you.'
										'Nurse: This is nipple balm. It helps with sore nipples during pumping. Don''t you now this?'
										'You nod your head and watch as the nurse applies the cream to your nipples. The cream feels nice on your nipples and they hurt less.'
										pain['nipples'] -= 20
										'You: Where do I get this stuff?'
										'Nurse: You can buy it in the pharmacy...'
										pcs_knows_nipplecream = 1
										'The nurse finishes rubbing you nipples with the nipple balm.'
									elseif pain['nipples'] >= 60:
										'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
										'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
										'She applies the cream to your nipples. It feels nice on your nipples and they hurt less.'
										pain['nipples'] -= 20
									else
										'The nurse grabs the nipple balm and applies it to your nipples. It feels nice on your nipples as she rubs it in.'
									end
									lactation['nipple_cream_applied'] = 1
									'Nurse: Okay, I am going to pump a bit milk off first, to check the quality and if you are able to donate enough. So this time you won''t get paid for your milk.'
									'You nod and pull up your shirt. The nurse takes the pumps and puts them on your breasts. She flicks a switch and you can feel your nipples being sucked in with force. The pump slowly working your nipples.'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pumping.jpg"></center>'
									lact_ev['gpoli_milkedvolume'] = (func('lact_lib','$get_breastmilk', 4, 15))/100
									lactation['breastpumped'] = 1
									pcs_orphanfeed = 0
									if lact_ev['gpoli_milkedvolume'] >= 1000:
										'Your breasts are able to fill both small bottles easily. The nurse nods at you confidently.'
										'Nurse: Yes, it seems you are able to make good amount of milk. You could breastfeed a baby with no issue.'
									elseif lact_ev['gpoli_milkedvolume'] >= 500 and lact_ev['gpoli_milkedvolume'] < 1000:
										'Your breasts are not able to fill both small bottles. The nurse rises an eyebrow on you.'
										'Nurse: Okay... it seems you are able to make enough milk for a 50ml donation, but you could have trouble to breastfeed a baby properly.'
									else
										'You have trouble to fill the bottles to the first mark. The nurse shakes her head disappointed.'
										'Nurse: Mhmm... your breasts don''t seem to make enough milk. You can still come here and get yourself pumped, but we need at least 50ml for a valid donation.'
									end
									'The nurse detaches the pump and allows you to dress up again.'
									if lact_ev['gpoli_milkedvolume'] > 500:
										mward_donatesv = 500
									else
										mward_donatesv = lact_ev['gpoli_milkedvolume']
									end
									if salo > 40:
										mward_donatesf = 60
									elseif salo > 20:
										mward_donatesf = 45
									elseif salo > 15:
										mward_donatesf = 20
									else
										mward_donatesf = 10
									end
									if pcs_energy > 30:
										mward_donatess = rand(69, 80)
									elseif sick > 1:
										mward_donatess = rand(0,45)
									else
										mward_donatess = rand(45, 69)
									end
									act 'Leave':gt 'pav_clinic'
								end
								act 'Refuse to donate':
									*clr & cla
									'You refuse to donate your breast milk. The nurse looks disappointed in you as you leave.'
									act 'Leave':gt 'pav_clinic'
								end
							end
						end
					end
				elseif pcs_gpolimilkdonation = 2:
					act 'Offer to donate your breast milk (0:15)':
						*clr & cla
						minut += 15
						pcs_gpolimilkdonation = 3
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
						'The nurse smiles and gets up, then she leads you into a room. It is quiet in here. There is a chair a table and a breast pump.'
						'You sit down and the nurse invites you to take off your top.'
						if pain['nipples'] >= 60 and pcs_knows_nipplecream <= 0:
							'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
							'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
							'You: What is that?'
							'The nurse looks up at you.'
							'Nurse: This is nipple balm. It helps with sore nipples during pumping. Don''t you now this?'
							'You shake your head and watch as the nurse applies the cream to your nipples. The cream feels nice on your nipples and they hurt less.'
							pain['nipples'] -= 20
							'You: Where do I get this stuff?'
							'Nurse: You can buy it in the pharmacy...'
							pcs_knows_nipplecream = 1
							'The nurse finishes rubbing you nipples with the nipple balm.'
						elseif pain['nipples'] >= 60:
							'<center><img <<$set_imgh>> src="images/pc/body/nipples/sore_nipple.jpg"></center>'
							'The nurse looks at your sore nipples and frowns a bit. She then grabs a small tin, and takes a bit of the yellowish cream from the tin.'
							'She applies the cream to your nipples. It feels nice on your nipples and they hurt less.'
							pain['nipples'] -= 20
						elseif pcs_knows_nipplecream <= 0:
							'The nurse grabs a small tin and takes a bit of yellowish cream from it.'
							'You: What is that?'
							'The nurse looks up at you.'
							'Nurse: This is nipple balm. It helps during pumping and prevents nipple soreness. Don''t you now this?'
							'You shake your head and watch as the nurse applies the cream to your nipples. The cream feels nice on your nipples.'
							'You: Where do I get this stuff?'
							'Nurse: You can buy it in the pharmacy...'
							pcs_knows_nipplecream = 1
							'The nurse finishes rubbing you nipples with the nipple balm.'
						else
							'The nurse grabs the nipple balm and applies it to your nipples. It feels nice on your nipples as she rubs it in.'
						end
						lactation['nipple_cream_applied'] = 1
						'Nurse: Okay, I am going to pump a bit milk off first, to check the quality and if you are able to donate enough.'
						'You nod and pull up your shirt. The nurse takes the pumps and puts it on your breasts. She flicks a switch and you can feel your nipples being sucked in with force. The pump slowly working your nipples.'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pumping.jpg"></center>'
						lact_ev['gpoli_milkedvolume'] = (func('lact_lib','$get_breastmilk', 4, 15))/100
						lactation['breastpumped'] = 1
						pcs_orphanfeed = 0
						if lact_ev['gpoli_milkedvolume'] >= 1000:
							'Your breasts are able to fill both small bottles easily. The nurse nods at you confidently.'
							'Nurse: Yes, it seems you are able to make good amount of milk. You could breastfeed a baby with no issue.'
						elseif lact_ev['gpoli_milkedvolume'] >= 50 and lact_ev['gpoli_milkedvolume'] < 1000:
							'Your breasts are not able to fill both small bottles. The nurse rises an eyebrow on you.'
							'Nurse: Okay... it seems you are able to make enough milk for a donation, but you could have trouble to breastfeed a baby properly.'
						else
							'You have trouble to fill the bottles to the first mark. The nurse shakes her head disappointed.'
							'Nurse: Mhmm... your breasts don''t seem to make enough milk. You can still come and be pumped, but we need at least 50ml for a valid donation.'
						end
						'The nurse detaches the pump and allows you to dress up again.'
						if lact_ev['gpoli_milkedvolume'] > 500:
							mward_donatesv = 500
						else
							mward_donatesv = lact_ev['gpoli_milkedvolume']
						end
						if salo > 40:
							mward_donatesf = 60
						elseif salo > 20:
							mward_donatesf = 45
						elseif salo > 15:
							mward_donatesf = 20
						else
							mward_donatesf = 10
						end
						if pcs_energy > 30:
							mward_donatess = rand(69, 80)
						elseif sick > 1:
							mward_donatess = rand(0,45)
						else
							mward_donatess = rand(45, 69)
						end
						act 'Leave':gt 'pav_clinic'
					end
				end
				act 'Leave':gt 'pav_clinic'
			end
		end
	else
		'The clinic is closed. It''s open every day between 06:00 and 21:00.'
		act 'Leave':minut += 5 & gt 'pav_commercial'
	end
end

if $ARGS[0] = 'reception':
	*clr & cla
	menu_off = 1
	minut += 2
	gs 'stat'
	'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 'Leave': gt 'pav_clinic'
	act 'Go to maternity ward (0:05)': gt 'pav_clinic', 'maternity_ward'
end

if $ARGS[0] = 'maternity_ward_donation':
	*clr & cla
	menu_off = 1
	gs 'stat'
	if hour >= 6 and hour <= 20:
		lactation['nipple_cream_applied'] = 1
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pumping.jpg"></center>'
		'The nurse attaches the pumps and switches them on.'
		if lactation['breastmv'] >= 0:
			'Your nipples are worked by the pumps, pumping your milk out, first draining at your collected milk resevoir. You feel the pressure in your breasts easing down.'
		else
			'Your nipples are worked by the pumps, pumping your milk out, you feel the pressure in your breasts easing down. Then your breasts tingle from the milk production as the pump demands more of your milk.'
		end
		act 'Continue':
			*clr & cla
			lact_ev['gpoli_milkedvolume'] = func('lact_lib','$get_breastmilk', 4, 15)
			lactation['breastpumped'] = 1
			'After 15 minutes, the nurse detaches the pumps from your breasts.'
			if lact_ev['gpoli_milkedvolume'] => 50000:
				lact_ev['gpoli_temp_var'] = (lact_ev['gpoli_milkedvolume']/50000)
				pcs_gpoli_donationsessioncount += lact_ev['gpoli_temp_var']
				pcs_gpoli_totalmilkdonation_count += 1
				pcs_gpoli_totalmilkdonation += (lact_ev['gpoli_temp_var']*50)
				if lact_ev['gpoli_temp_var'] >= 12:
					'She looks astonished at the marvelous amounts of milk you made as she stores away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
					'Nurse: <<$pcs_firstname>>, this is so much milk, I think a cow would be jealous!'
					'She laughts heartily and you blush a bit.'
				elseif lact_ev['gpoli_temp_var'] >= 10:
					'She looks amazed at the copious amounts of milk you made as she stores away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
					'Nurse: Oh dear, where do you store all this milk in your breast...?'
				elseif lact_ev['gpoli_temp_var'] >= 8:
					'She looks surprised at the large amount of milk you made as she stores away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
					'Nurse: Dear, this is really much milk...'
				elseif lact_ev['gpoli_temp_var'] >= 6:
					'She looks pleasantly satisfied at you as she puts away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
					'Nurse: Oh, this is pretty much milk.'
				elseif lact_ev['gpoli_temp_var'] >= 4:
					'She looks satisfied at you as she puts away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
					'Nurse: This is a good amount of milk.'
				elseif lact_ev['gpoli_temp_var'] >= 2:
					'She looks satisfied at you as she puts away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
				elseif lact_ev['gpoli_temp_var'] = 1:
					'She looks satisfied at you as she puts away one bottle with 50ml of your breast milk.'
				else
					'She looks satisfied at you as she puts away the <<lact_ev[''gpoli_temp_var'']*50>>ml of your breast milk in <<lact_ev[''gpoli_temp_var'']>> bottles.'
				end
			elseif lact_ev['gpoli_milkedvolume'] < 50000 and lact_ev['gpoli_milkedvolume'] > 0:
				'She looks at you a bit disappointed.'
				'Nurse: Mhmm... I am sorry, but this isn''t enough milk for a valid donation. You only made <<lact_ev[''gpoli_milkedvolume'']/1000>>ml of breast milk.'
			else
				'She looks at you disappointed.'
				'Nurse: Mhmm... I am sorry, but this isn''t enough milk for a valid donation. You made no breast milk at all.'
			end
			lact_ev['gpoli_milkedvolume'] = 0
			if pcs_gpoli_donationsessioncount > 0:
				mward_donatemoney = (pcs_gpoli_donationsessioncount*100)
			else
				mward_donatemoney = 0
			end
			lactation['nipple_cream_applied'] = 0
			minut += 15
			if lactation['breastmv'] > lactation['breastmm']/2 and lactation['breastmv'] >= 100000:
				'The nurse looks at your breasts'
				'Nurse: Looks like you could go for another pumping... shall we?'
				act 'Have your breasts pumped again': gt 'pav_clinic', 'maternity_ward_donation'
			else
				act 'Ask to donate more': gt 'pav_clinic', 'maternity_ward_donation'
			end
			act 'Enough for today':
				*clr & cla
				gs 'stat'
				if pcs_gpoli_donationsessioncount > 0:
					money += mward_donatemoney
					'You put on your top, and the nurse hands you <<mward_donatemoney>><b>₽</b> for your donated breast milk.'
				else
					'You put on your top'
				end
				act 'Leave':
					lact_ev['gpoli_milkedvolume'] = 0
					gt 'pav_clinic', 'maternity_ward'
				end
			end
		end
	elseif pcs_gpoli_donationsessioncount > 0:
		'Sorry <<$pcs_firstname>>, we are closing now.'
		'You put on your top, and the nurse hands you <<mward_donatemoney>><b>₽</b> for your donated breast milk.'
		act 'Leave':minut += 5 & gt 'pav_commercial'
	else
		'The clinic is closed. It''s open every day between 06:00 and 21:00.'
		act 'Leave':minut += 5 & gt 'pav_commercial'
	end
end

if $ARGS[0] = 'std_check':
	if GerpesOnce = 1:
		'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>."'
			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
	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:
		'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>."'
		elseif TriperNapr > 0:
			'You need to see the nurse for your gonorrhea injections.'
		end
	end

	if KandidozOnce = 1:
		'He continues: "You have yeast infection. Unfortunately, the complete cure for this disease is very expensive and we can''t cure it here. On the upside, yeast infection is not that harmful and can be treated easily to the point where it won''t trouble you. When it is dormant, taking vitamins regularly will make sure it won''t show itself."'

		if KandidNapr = 0:KandidNapr = 1 & '"The pills are available at the pharmacy, across the street."'
		if Kandidoz < 30:'Your yeast infection is currently in remission. If you take vitamins daily, it will stay that way.'
	end
end

--- pav_clinic ---------------------------------