glife/locations/park_walkevents.qsrc

# park_walkevents

if $ARGS[0] = 'empty':
	menu_off = 1
	pcs_mood += 10
	gs 'stat'
	'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'

	act 'Finish your walk':gt 'city_park', 'start'

	exit
end

if $ARGS[0] = '1':
	menu_off = 1
	gs 'stat'

	if hour > 7 and hour < 21:
		*clr & cla
		'Hidden by a tree''s shadow, you notice a man standing there, he watches you and when you look back at him he shouts "Whore!" at you.'

		act 'Silently leave':gt 'city_park', 'start'

		act 'Tell him to shut up':
			cla
			'"Shut your trap, jackass." You''re surprised when you see him quickly running away.'

			act 'Leave':gt 'city_park', 'start'
		end

		exit
	elseif suchunt = 1:
		cla
		'From the shadow of the tree, a guy walks out...'
		'He comes up to you, grabs you, and, through gritted teeth says, "Com''ear Bitch", dragging you into the bushes.'
		'He never notices your little smile as you anticipate the meal to come.'
		suchunt = 0
		scfwon = 1
		suchuntday = daystart
		act 'Continue': gt 'succubus', 'RapistFight'
	else
		'From the shadow of the tree, a guy walks out...'
		'He comes up to you, grabs you, and, through gritted teeth says, "Com''ear Bitch", dragging you into the bushes.'
		gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
		gs 'boyStat', $npclastgenerated
		act 'Fight him':
			*clr & cla

			gs 'fight','initFight'

			gs 'fight_npcdata', 'rapist'

			gt 'fight', 'start'
		end

		act 'Try to run away':
			if pcs_run < 10:
				peshimraperand = rand(0, 11)
			elseif pcs_run < 30:
				peshimraperand = rand(0, 20)
			elseif pcs_run < 50:
				peshimraperand = rand(0, 30)
			elseif pcs_run < 70:
				peshimraperand = rand(0, 40)
			elseif pcs_run < 90:
				peshimraperand = rand(0, 50)
			elseif pcs_run < 110:
				peshimraperand = rand(0, 60)
			elseif pcs_run < 130:
				peshimraperand = rand(0, 70)
			elseif pcs_run < 150:
				peshimraperand = rand(0, 80)
			elseif pcs_run < 170:
				peshimraperand = rand(0, 90)
			else
				peshimraperand = 11
			end

			if peshimraperand <= 10:
				cla
				'You try to run away, but you''re not quick enough and he catches you. He drags you back into the bushes.'
				!!Going to set something as an option later for a Succubus who is Sub to just go with it.
				if succubusQW >= 4:
					act 'Continue': gt 'succubus', 'RapistFight'
				else
					act 'Continue':gt 'city_park', 'rape1'
				end
			else
				cla
				minut += 60
				'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost running for an hour, you finally catch your breath and the rapist is nowhere to be seen.'

				act 'Further':
					cls
					locbegrand = rand(0, 4)

					if locbegrand = 0:gt 'city_park', 'start'
					if locbegrand = 1:gt 'city_residential'
					if locbegrand = 2:gt 'city_center'
					if locbegrand = 3:gt 'city_industrial'
					if locbegrand = 4:gt 'city_lake', 'start'
				end
			end
		end

		if succubusQW = 5:
			!!Used if this was a random encounter instead of active hunting
			act 'Lure him in and feed (this can take a lot of time)':
				cla
				'You wait until he has dragged you almost to the bushes before turning on him.'
				act 'Continue': gt 'succubus', 'RapistFight'
			end
		end

		exit
	end
end

if $ARGS[0] = '2':
	menu_off = 1
	gs 'stat'
	gs 'dinsexFX'

	if pcs_apprnc >= 120 and parkday = daystart:
		*clr & cla
		'You see a man sitting under a tree drinking beer. It''s the guy who fucked you here in the park a while ago. He looks at you and his sudden grin tells you that he remembers who you are.'

		act 'Leave':gt 'city_park', 'start'

		exit
	elseif pcs_apprnc >= 120 and parkday ! daystart and parkslut > 0:
		*clr & cla
		'From the bench under one of the trees a guy comes up to you. It''s the guy who fucked you here in the park a while back. He smiles and asks you "Hello again beautiful girl, do you mind if we do it once again?"'

		act 'Walk away':gt 'city_park', 'start'

		act '"I don''t mind it all"':
			cla
			'The guy laughs "Unfortunately, I doubt it''ll be as much fun as the first time, but why don''t you bend over this bench right here?"'

			gs 'willpower', 'sex', 'resist', 'hard'
			if will_cost <= pcs_willpwr:
				act '"Not this time, I''m afraid" (<<will_cost>> Willpower)':
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					gt 'city_park', 'start'
				end
			else
				act 'Not this time, I''m afraid (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end

			act 'Bend over the bench':
				cla & *clr
				money += 500
				gs 'boyStat', 'A121'
				parkday = daystart

				picrand = rand(1, 6)
				'<center><img <<$set_imgh>> src="images/locations/shared/park/sex/bench/dogging<<picrand>>.jpg"></center>'
				'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrust in and out of you.'

				gs 'cum_call', '', 'Guy from the park'
				gs 'arousal', 'vaginal', 20, 'prostitution'
				gs 'arousal', 'end'
				gs 'stat'

				act 'Leave':gt 'city_park', 'start'
			end
		end

		exit
	elseif pcs_apprnc >= 120 and parkday ! daystart and parkslut = 0:
		*clr & cla
		'A man appears from the shadows and approaches you, "Good evening beautiful lady, would you like to earn 2,000 <b>₽</b>?" he asks you.'

		act 'Ask him how to do it':
			cla
			'"What do I have to do?", you ask. He smiles, "Let us go over there." and points over to the bench in a somewhat secluded part of the park.'

			gs 'willpower', 'sex', 'resist', 'hard'
			if will_cost <= pcs_willpwr:
				act 'Fuck off, asshole (<<will_cost>> Willpower)':
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					gt 'city_park', 'start'
				end
			else
				act 'Fuck off, asshole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end

			act 'Follow him':
				cla
				*clr
				money += 2000
				gs 'boyStat', 'A121'
				parkday = daystart

				if parkslut = 0:parkslut = 1 & guy += 1

				picrand = rand(1, 6)
				'<center><img <<$set_imgh>> src="images/locations/shared/park/sex/bench/dogging<<picrand>>.jpg"></center>'
				'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrust in and out of you.'

				gs 'cum_call', '', 'Guy from the park'
				gs 'arousal', 'vaginal', 20, 'prostitution'
				gs 'arousal', 'end'

				act 'Leave':gt 'city_park', 'start'
			end
		end

		act 'Leave':gt 'city_park', 'start'

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = '3':
	menu_off = 1
	*clr & cla
	gs 'stat'
	'As you walk through the park, you hear moans and groans coming out of the bush close to one of the paths.'

	act 'Continue walking':gt 'city_park', 'start'

	act 'Peek':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/shfoto.jpg"></center>'
		'You take a peek through the bushes and see three guys fucking one woman. It seems like she''s really enjoying it.'

		gs 'arousal', 'voyeur_sex', 10
		gs 'arousal', 'end'
		gs 'stat'

		act 'Leave':gt 'city_park', 'start'

		if pcs_horny >= 50:
			act 'Pry':
				cla
				'You hide behind a tree to get a better look at the group action.'

				gs 'arousal', 'voyeur_sex', 10
				gs 'arousal', 'end'
				gs 'stat'

				if pcs_horny >= 75:
					'This sight really excites you and you can feel your pussy moisten.'
				else
					'While this is quite the sight to enjoy, you think it''s better not to get caught, so you silently move away.'
				end

				act 'Leave':gt 'city_park', 'start'
			end
		end

		if mc_inventory['tech_hidden_cam'] = 1 or mc_inventory['tech_camera'] = 1:
			act 'Take a photo':
				cla
				gs 'exp_gain', 'photoskl',2

				if mc_inventory['tech_hidden_cam'] = 1:fotoparkrand = rand(0, 10)
				if mc_inventory['tech_hidden_cam'] = 0:fotoparkrand = rand(0, 1)

				if fotoparkrand > 0:
					minut += 30
					shantfoto += 1
					'As you hide behind a tree, you start to take photos of them and watch them until they''re done. Once they are you silently move away and decide to find out who she was. Blackmailing her would be a nice source of income, you think to yourself.'

					act 'Back to the park':gt 'city_park', 'start'
				end

				if fotoparkrand = 0:
					'You hide behind the tree and start taking pictures. Somehow you get carried away and one of the perpetrators noticed you. He slowly walks up behind you, grabs you and takes you to the others.'
					'"Look what I''ve found. We''ve got ourselves a new volunteer." says the guy while holding you tightly.'
					killvar '$boy'
					gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
					gs 'boyStat', $npclastgenerated
					gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
					gs 'boyStat', $npclastgenerated,'1'
					gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
					gs 'boyStat', $npclastgenerated,'2'

					act 'Try to talk your way out':
						cla
						'You try to talk your way out, but they just laugh at you, pitying you for even trying. Then one of the guys forces you onto your knees as they prepare to rape you.'

						if mc_inventory['tech_hidden_cam'] = 1:
							mc_inventory['tech_hidden_cam'] = 0
							*nl
							'<font color="red">One of the other guys takes your camera and smashes it against a rock</font>'
						else
							*nl
							'<font color="red">One of the other guys takes your camera and smashes it against a rock</font>'
							mc_inventory['tech_camera'] = 0
						end

						act 'Further':gt 'paysex', 'start'
					end

					act 'Try to run away':
						cla
						if pcs_run < 10:
							peshimraperand = rand(0, 11)
						elseif pcs_run < 30:
							peshimraperand = rand(0, 20)
						elseif pcs_run < 50:
							peshimraperand = rand(0, 30)
						elseif pcs_run < 70:
							peshimraperand = rand(0, 40)
						elseif pcs_run < 90:
							peshimraperand = rand(0, 50)
						elseif pcs_run < 110:
							peshimraperand = rand(0, 60)
						elseif pcs_run < 130:
							peshimraperand = rand(0, 70)
						elseif pcs_run < 150:
							peshimraperand = rand(0, 80)
						elseif pcs_run < 170:
							peshimraperand = rand(0, 90)
						else
							peshimraperand = rand(0, 100)
						end

						if peshimraperand < 11:
							rape += 1
							guy += 3
							'You try to run away, but you''re not fast enough and one of them eventually catches up with you. He drags you back into the bushes and forces you onto your knees, preparing to rape you.'

							if mc_inventory['tech_hidden_cam'] = 1:
								mc_inventory['tech_hidden_cam'] = 0
								*nl
								'<font color="red">The other guys soon catch up, and one of them takes your camera and smashes it against a rock</font>'
							else
								*nl
								'<font color="red">The other guys soon catch up, and one of them takes your camera and smashes it against a rock</font>'
								mc_inventory['tech_camera'] = 0
							end

							act 'Further':gt 'paysex', 'start'
						elseif peshimraperand > 10:
							'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost an hour of running, you finally stop to catch your breath. Your would-be rapists are nowhere to be seen.'
							locbegrand = rand(0, 4)

							if locbegrand = 0:
								act 'Take a look around to see where you are':gt 'city_park', 'start'
							elseif locbegrand = 1:
								act 'Take a look around to see where you are':gt 'city_residential'
							elseif locbegrand = 2:
								act 'Take a look around to see where you are':gt 'city_center'
							elseif locbegrand = 3:
								act 'Take a look around to see where you are':gt 'city_industrial'
							elseif locbegrand = 4:
								act 'Take a look around to see where you are':gt 'city_lake', 'start'
							end
						end
					end
				end
			end

			act 'Back to the park':gt 'city_park', 'start'
		end

		exit
	end
end

if $ARGS[0] = '4':
	menu_off = 1
	gs 'stat'

	if parkblackmail = 0:
		*clr & cla
		'On one of the parks open grass area, you see a group of young people enjoying a barbecue. As you walk past them, one of the guys comes up to you and asks if you would like to join them.'

		act 'Decline and continue your walk':gt 'city_park', 'start'

		act 'Agree and join them':
			cla
			minut += 30
			gs 'drugs', 'alcohol', 'vodka'
			gs 'stat'
			'You had fun drinking with the guys and girls. One of the guys comes up behind you while you''re at the table and puts his arms around your waist, then presses himself against your ass. <i>...God, he''s HUGE. It feels like a big sausage against your lower back... damn, why do I suddenly feel so hot.</i> You begin to wonder if you''ve been drinking too fast.'
			'Shortly after, one of the guy gropes your breast and pushes you against the closest tree. You softly moan as he massages your breasts. You can feel his stiff cock poking your belly. Then he asks you in a rather harsh tone, "You like this slut, don''t you?"'

			act 'Tell him to get away':
				cla
				'You sharply tell him to let you go. Surprised, he takes a step back, and you move away from the tree.'

				act 'Leave':
					cla
					*clr
					'You turn to leave, but the guy quickly catches up to you. He grabs your ass, spins you around to face him, and orders "On your knees, quickly, bitch!"'

					gs 'willpower', 'rape', 'resist', 'hard'
					if will_cost <= pcs_willpwr:
						act 'Kick him in the his nuts and walk away (<<will_cost>> Willpower)':
							*clr & cla
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							gt 'city_park', 'start'
						end
					else
						act 'Kick him in the his nuts and walk away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
					end

					act 'Do as he tells you':
						cla
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/parkbj.jpg"></center>'
						'Too drunk to resist further, you quickly do as he says. He drops his pants to his knees and abruptly thrusts his big dick into your mouth. You quickly forget about everything else and start hungrily sucking him off. His big, juicy, fragrant cock is driving you mad. He gathers your hair behind your head to make sure it doesn''t get in the way. After a little while he pulls his delicious cock out of your mouth, but it''s immediately replaced by a guy you didn''t even notice approach.'
						'His cock is so big, you can barely breath and are on the verge of fainting. More men gather around you and take out their cocks for you to suck on. They call you many names, but ''Slut'' burns itself into your memory, so often it''s used. You suck them off one by one, giving two other cocks a hand job. You try to swallow as much cum as possible, maybe it''s due to you being drunk, but the taste is just overwhelming to you. One of them removes your top, so everyone can enjoy the sight of your beautiful breasts.'
						'His cock even bigger than the last guy''s, and the excitement it gives you is almost overpowering. The other guys gather around and hurl insults at you, mocking you for sucking strangers. You suck each of them off too, one by one, while stroking others, a cock in each hand. Every guy you blow cums in your mouth, and you swallow every time. Someone pulls down your top, letting your boobs spill out. You feel a cock slap against your chest as someone takes the opportunity to give himself a titfuck.'
						'"Fuck, slut, suck faster!" orders one of the guys.'

						i = 0
						:park_blowbang
							gs 'npcgeneratec', 0, 'stranger', rand(19,23)
							gs 'boyStat', $npclastgenerated
							gs 'arousal', 'bj', 10, 'gangbang', 'sub', 'humiliation', 'deepthroat', 'rape'
							gs 'arousal', 'hj', -10, 'gangbang', 'sub', 'humiliation', 'rape'
							gs 'arousal', 'titjob', -10, 'gangbang', 'sub', 'humiliation', 'rape'
							i += 1
						if i < 6:jump 'park_blowbang'
						gs 'stat'

						act '"Guys, be quieter... someone might hear"':
							cla
							'"Guys, be quieter... someone might hear," you try to warn them while coughing.'
							'One the guys bitch-slaps you, "Shut up slut. You''re not here to talk."'
							'"Stop talking and work your mouth, bitch. You''re here to suck, not to lecture us." another one adds.'

							gs 'pain', 5, 'cheeks', 'slap'
							gs 'stat'

							act 'Okay':
								cla & *clr

								if parkblackmail = 0:guy += 2 & parkblackmail = 1 & parkday = daystart

								'"Okay, boys," you say around the cock in your mouth.'
								'You drunkenly wonder why they insist on talking so loud. But when you open your eyes, you see two of the girls from the group with a camera.'
								'With a growl, the guy fucking your chest finally comes - and comes a lot. Your breasts are completely coated with semen. You start to feel an overpowering need to make the guy currently in your mouth cum as well. You put your hands on his ass and pull him toward you, forcing his cock down your own throat, forgetting about the cameras and onlookers. You feel like an insatiable whore as you deepthroat him, swallowing his large head as far as you can manage.'
								'The second guy took you by the hair as roughly started to face fuck you. He grabs your hair, calling you "whore" and a "cocksucker" as he forced your head deeper his cock, and at the last second roughly jerks your head backwards to cum all over your face. He covers you with an incredible amount of sperm.'
								'That you were ashamed goes without saying, you just swallowed six strangers'' cum and took two others'' loads all over you.'

								i = 0
								:park_blowbang2
									gs 'npcgeneratec', 0, 'stranger', rand(19,23)
									gs 'boyStat', $npclastgenerated
									gs 'cum_call', 'mouth_swallow', $boy
									gs 'arousal', 'bj', 3, 'gangbang', 'sub', 'humiliation', 'deepthroat'
									i += 1
								if i < 6:jump 'park_blowbang2'

								gs 'npcgeneratec', 0, 'stranger', rand(19,23)
								gs 'boyStat', $npclastgenerated
								gs 'cum_call', 'face', $boy
								gs 'npcgeneratec', 0, 'stranger', rand(19,23)
								gs 'boyStat', $npclastgenerated
								gs 'cum_call', 'breasts', $boy
								gs 'arousal', 'titjob', 2, 'gangbang', 'sub', 'humiliation'

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

								act 'Go home':gt 'city_park', 'start'
							end
						end
					end
				end
			end
		end

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = '5':
	menu_off = 1
	gs 'stat'
	!!'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'

	act 'Finish your walk':gt 'city_park', 'start'

	if yaq = 0 and func('uniutil', 'student', 'enrolled'):
		*clr & cla
		minut += 20
		gs 'stat'
		'As you''re walking and pondering, a man walks up to you. He introduces himself as Yaroslav and asks if you would like to earn some money.'

		act '"No, thanks"':gt 'city_park', 'start'

		act '"I''m listening"':
			cla
			'"My house is a bit dirty and I''m looking for someone who would like to keep it clean for me," he says. "All you have to do is to dust and clean everything. My house isn''t too big so it should be quite manageable."'

			gs 'willpower', 'misc', 'self', 'hard'
			if will_cost <= pcs_willpwr:
				act 'Turn him down (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'self'
					gs 'stat'
					gt 'city_park', 'start'
				end
			else
				act 'Turn him down (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end

			act 'Agree':
				cla
				'"Alright, but what''s in for me?" you ask him.'
				'"I''d pay you 2,000 <b>₽</b>,", he answers. "By the way, I haven''t asked you for your name yet."'
				'"I''m <<$pcs_nickname>>.", you tell him.'
				'He nods, smiles, and tells you it''s a cute name. Then he gives you his card and judging by the address, it''s somewhere in the city center.'

				act 'Ask him when to come by':
					cla
					yaq += 1
					'"When would you like me to come by?" you ask Yaroslav.'
					'"No hurry, just come by when you''ve got some free time, but I''m usually home in the evening, so there''s just that." he answers.'
					'"Alright, thank you and see you soon I guess.", you say and walk away.'

					act 'Finish your walk':gt 'city_park', 'start'
				end
			end
		end

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

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

	if ublyudokparkivent = 0:
		cls
		'As you were deep in your own thoughts, walking through the park, you''ve strayed of the normal path, realizing you''ve ended up in a somewhat shady area of it. Standing between two trees you notice a man waving at you.'

		act 'Walk away':gt 'city_park', 'start'

		act 'Walk up to him':
			*clr & cla
			ublyudokparkivent = 1
			gs 'pain', 8, 'head', 'hit'
			gs 'stat'
			'You walk up to him, asking what he wants. He says, he would like to show you something. As you approach, and lean in he quickly hits you over the back head and everything fades to black.'

			act 'Wake up':
				cla & *clr
				minut += 30
				gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
				gs 'boyStat', $npclastgenerated
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/1.jpg"></center>'
				'"Ouch...", you say groggily as you wake up.'
				'"I thought you would never wake up.", a deep voice says. He grabs you by the hair and pulls you up, then takes his huge knife and holds it to your face. "Look pretty, if you don''t resist, this might be a pleasurable experience for you," he tells you, "Now take off your clothes, you won''t need them for now."'

				act 'Take off your clothing':gt 'park_walkevents', '6a'
			end
		end

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = '6a':
	menu_off = 1
	*clr & cla
	minut += 10
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/2.jpg"></center>'
	'He''s huge and intimidating, you decide it''s better to do as he tells you, so can get out of the situation alive, hence you take off your clothes and a cold breeze makes your nipples rock-hard immediately.'
	'The man is quite enjoying himself, licking his lips as he keeps on observing you taking off your clothes.'

	act 'Now what?':
		cla & *clr
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/3.jpg"></center>'
		'You shiver a bit as you stand in front of him, almost looking nonchalantly what now.'
		'"Good girl," he says and orders you to bend over. You oblige and present your bum to him. He then closely ''inspects'' it, by spreading your ass cheeks apart. You yelp when you feel his finger is entering your cunt.'

		gs 'arousal', 'vaginal_finger', 5, 'sub', 'humiliation'
		gs 'stat'

		act 'Obey':
			cla & *clr
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/4.jpg"></center>'
			'"The two of us are going to have a lot of fun together, so prepare yourself and make you tight little twat moist for me", he tells you and you begin to rub your clit. He unbuttoned his pants, took out his cock and started to stroke it, while listening to your soft moans.'

			gs 'arousal', 'vaginal_finger', 5, 'sub', 'humiliation'
			gs 'stat'

			act 'Go on...':
				cla & *clr
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/5.jpg"></center>'
				'Even though you hate to admit it, you feel quite turned on and start moaning louder.'
				'"Come over here and suck me,", he orders you, holding his rock-hard cock in his hand. The man grabbed you by the hair and throws you onto the ground in front of him.'
				'As you''re laying on the ground he yells out, "Open your mouth slut!"'
				'As soon as you open the mouth, he grabs your head and began furiously thrusting his fat cock into your throat.'

				gs 'arousal', 'bj', 5, 'sub', 'humiliation', 'rough', 'rape'
				gs 'stat'

				act 'Suck him off':gt 'park_walkevents', '6b'
			end
		end
	end
end

if $ARGS[0] = '6b':
	menu_off = 1
	*clr & cla
	'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/6.jpg"></center>'
	'His odor is quiet strong and his cock smells quite foul and tastes slightly salty. You try your best to disconnect yourself from the foul taste but with every thrust you''re reminded of it, making you feel nauseous, barely able to hold it in.'

	gs 'arousal', 'bj', 5, 'sub', 'humiliation', 'rough', 'rape'
	gs 'stat'

	act 'Stay focused':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/7.jpg"></center>'
		'It doesn''t take long before he presses himself down your throat, having you deepthroat his cock all the way down to his balls.'
		'You gag once he''s all the way down, but he doesn''t seem to care, and only lets out a chuckle as he hears you struggle.'

		gs 'arousal', 'bj', 5, 'sub', 'humiliation', 'rough', 'rape', 'deepthroat'
		gs 'stat'

		act 'Keep going':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/8.jpg"></center>'
			'All of a sudden he pulls out and your mouth makes a pop sound as his cock leaves your mouth.'
			'"You''re quite the cocksucker, but I''d rather use a different hole instead," he says as he shoves three of his fingers deep inside you. It''s very painful, and as your pussy stretches, you scream from the pain.'

			gs 'pain', 7, 'vaginal', 'stretch'
			gs 'arousal', 'vaginal_finger', 5, 'sub', 'humiliation', 'rough', 'rape'
			gs 'stat'

			act 'Masturbate':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/9.jpg"></center>'
				'"Too much? I thought whores like you could take it," he mocks you.'
				'You look pleadingly at him as he grabs you by the throat and tells you to masturbate by yourself. You start of gently touching yourself, while he turns his back to you and begins searching for something.'
				'You''re too afraid to stop as he glances at you from time to time and it doesn''t take long before you switch over to rubbing your clit as he returns with a rope.'

				gs 'arousal', 'clit_finger', 5, 'sub', 'humiliation'
				gs 'stat'

				act 'Keep going':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/10.jpg"></center>'
					'Worried, you continue playing with yourself while he ties you up, leaving only the hand you''re masturbating with free. You keep on petting yourself for a while, letting him watch, until he tells you to stop and ties your last arm. "Hope you''ve made yourself wet enough," he whispers.'
					'He smiles as he grabs his fat cock and pushes it into you. You try to twitch and kick, but as you''re tied up you get nowhere. Without any hesitation he keeps thrusting himself into you as you continue trying to squirm.'

					gs 'arousal', 'clit_finger', -5, 'sub', 'humiliation'
					gs 'arousal', 'vaginal', 5, 'sub', 'humiliation', 'rough', 'rape'
					gs 'stat'

					act 'Stop resisting':
						cla & *clr

						'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/11.jpg"></center>'
						'For every thrust he goes deeper into you and with a violent thrust he reaches your cervix and you squeal as he smirks. He continues thrusting and by now you don''t even know if you''re enjoying yourself or if you''re in pain.'
						'You keep on screaming but to no avail, he''s pulled you deep into the woods and no one can hear your screams. Realizing this, you give up and let him have his way with you.'
						'He picks up his pace and after a while you can feel his cock swell. He abruptly shoves his cock deep into you and you feel a hot jet of sperm fill your vagina with a warm, slippery fluid.'

						gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'humiliation', 'rape'
						gs 'cum_call'
						gs 'stat'

						act 'Did he just cum in me?':
							*clr & cla
							minut += 5
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/12.jpg"></center>'
							'He''s smirking as he pulls out, "Wow... what a great fuck you were," he says between his panting.'
							'"Could you let me go now? You''ve finished with what you wanted." you plead.'
							'He laughs, "Not yet my dear," he takes two fingers and shoves them into you again. You yelp as they enter and he begins to dig around a little. "Before I let you go I want you to taste me," he diabolically laughs.'

							act 'Lick his fingers': gt 'park_walkevents', '6c'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = '6c':
	cla & *clr
	pcs_mood -= 15
	minut += 20
	spafinloc = 9
	gs 'cum_manage'
	'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/rape/13.jpg"></center>'
	'He pulls out his fingers and you can feel the remainder of his sperm flowing down your thighs. He stands up and brings his cum covered fingers towards you, "Be a good slut and taste this." as he shoves his fingers into your mouth.'
	'Even his cum tastes quite foul and you try your best to cleaning his dirty fingers with your tongue as quickly as possible. You''re forced to swallow the cum and you almost puke as you''re doing it.'
	'After a while he removes his fingers and starts cutting the ropes. You''ve finally been released and before he gets any other ideas you quickly get dressed and run away from him.'

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

	act'Go to the police station':
		minut += rand(30,60)
		gs'stat'
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/shared/street/alleynight.jpg"></center>'
		if $loc = 'pav_commercial' or $loc = 'pav_residential':
			'You decide you need to file a report, in hopes that someone will catch the monster that did this to you. You slowly limp your way towards the train depot and the police station that resides next to it.'
		else
			'You decide you need to file a report, in hopes that someone will catch the monster that did this to you. You slowly limp your way towards the city center and the police station that resides in it.'
		end
		act 'Continue': gt 'police_station', 'rape_report'
	end

	act'Don''t go':
		minut += 2
		gs'stat'
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/shared/street/alleynight.jpg"></center>'
		'For a brief moment you consider telling the police what happened, but emotion wells up inside you and you''re immediately filled with thoughts of disgust and shame. It doesn''t make sense. It''s not like you wanted this to happen. But still. The idea of sharing what happened to you, even to the police... You already feel filthy from what happened tonight. You don''t want to feel even worse. The only thing you want is to go home.'
		*nl
		'You slowly limp away, clutching your arms around your belly, trying your best to leave the events of tonight in the alley behind you...'
		act'Leave': gt 'city_park', 'start'
	end
end

if $ARGS[0] = '7':
	menu_off = 1
	gs 'stat'

	if pusher = 0:
		'A young boy wearing a hooded jacket walks up to you and tells you in a conspiratorial voice, "Hey girl, I''ve got some cocaine, want to try it? Completely free, I promise. Lovely thing, instantly clears the brain, the mood goes bananas and your body feels as it''s never been healthier. "'

		gs 'willpower', 'drugs', 'resist', 'hard'
		if will_cost <= pcs_willpwr:
			act 'Leave (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				gt 'city_park', 'start'
			end
		else
			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		act 'Yes':
			cla
			pusher = 1
			gs 'drugs', 'cocaine', 1

			'You''ve never been interested and you''ve never tried it before, but you''re tempted as it''s free. The opportunity is too good to pass on, so you nod your head and the dealer takes out a little bag filled with white powder. He spreads it on your hand and tells you to snort it.'
			'You nod and snort the white powder. It instantly hits you and you''re feeling on top of the world.'
			'The guy looks at you and says, "Good shit, right? If you like it, come see me again, it only costs 2,000 <b>₽</b>."'

			act 'Leave':gt 'city_park', 'start'

			exit
		end
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = '8':
	menu_off = 1
	gs 'stat'
	vnerand = rand(0, 1200)

	if pcs_lover < 3 and vnerand <= pcs_apprnc:
		*clr & cla
		gs 'npcgeneratec', 0
		gs 'boyStat', $npclastgenerated
		'A guy with <<$boybody_pref>>, <<$boybod>> body and <<$boyface>> hair approaches you. He''s wearing <<$boyClo>>.'
		'The guy introduces himself as <<$boydesc>> and asks for your number.'

		act 'Give him your number':
			cla
			gs 'boyfrend', 'start'
			stopboy = 0
			'<<$loverdesc[lover_number]>> writes it in his phone and walks away from you smiling.'

			act 'Finish your walk':gt 'city_park', 'start'
		end

		act 'Leave':gt 'city_park', 'start'

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = '9':
	menu_off = 1
	gs 'stat'

	if arrsize('pcs_lovers') >= 1:
		lover_number = rand(0, arrsize('pcs_lovers') - 1)
		cls
		'As you walk through the park, you notice <<$loverdesc[lover_number]>> walking towards you.'

		act 'Leave': loverrelation[lover_number]-= 1 & gt 'city_park', 'start'

		if boyonce[lover_number] = 0 or SUB = 0:
			act 'Nice to talk':
				cla
				loverrelation[lover_number] += 2
				minut += 15
				'<<$loverdesc[lover_number]>> is happy about meeting you randomly and gives you a big hug. You have a nice short talk and kiss goodbye as you part ways again.'

				act 'Finish your walk':gt 'city_park', 'start'
			end
		elseif boyonce[lover_number] = 1 and SUB > 0:
			'<<$loverdesc[lover_number]>> is happy to see you, quickly grabbing you by the hand leading you into a more secluded area of the park.'

			act 'Follow <<$loverdesc[lover_number]>>.':
				if loverGender[lover_number] = 0: gt 'event', 'city_park'
				if loverGender[lover_number] = 1:
					$telsob = '<<$loverdesc[lover_number]>>'
					gt 'parksvid'
				end
			end
		elseif boyonce[lover_number] = 1:
			'<<$loverdesc[lover_number]>> is happy to see you, quickly grabbing you by the hand, wanting to lead you to a secluded area of the park.'

			act 'Offer to sit on the bench':
				if loverGender[lover_number] = 0: gt 'event', 'city_park'
				if loverGender[lover_number] = 1:
					$telsob = '<<$loverdesc[lover_number]>>'
					gt 'parksvid'
				end
			end

			act 'Nice talk':
				cla
				loverrelation[lover_number] += 5
				minut += 15
				'<<$loverdesc[lover_number]>> is happy about meeting you randomly and gives you a big hug. You have a nice short talk and kiss goodbye as you part ways again.'

				act 'Finish your walk':gt 'city_park', 'start'
			end
		end

		exit
	else
		gt 'park_walkevents', 'empty'
	end
end

if $ARGS[0] = 'running_image':
	cla & *clr
	if month >= 11 or month <= 3:
		if daystage = 2 or daystage = 3:
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog1.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jogn1.jpg"></center>'
		end
	else
		if daystage = 2 or daystage = 3:
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog2.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jogn2.jpg"></center>'
		end
	end
end


if $ARGS[0] = 'run_cooldown_image':
	cla & *clr
	if month >= 11 or month <= 3:
		if daystage = 2 or daystage = 3:
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog_cool1.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog_cooln1.jpg"></center>'
		end
	else
		if daystage = 2 or daystage = 3:
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog_cool2.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jog_cooln1.jpg"></center>'
		end
	end
end

if $ARGS[0] = 'run':
	if hour <= 5 or hour >= 23: exit

	if PCloSport = 0:
		'You could jog around the park if you were wearing sports clothes and shoes.'
	else
		act 'Jog through the park (1:00)':
			if daystage = 2 or daystage = 3:
				*clr & cla
				menu_off = 1
				gs 'stat'
				gs 'park_walkevents', 'running_image'
				'You go for a nice long jog through the park.'
				act 'Run':
					if daybegskver = daystart:
						gs 'exercise', 'tier1', 30, 'run'
					else
						gs 'exercise', 'tier2', 30, 'run'
					end
					daybegskver = daystart
					if rand(1,20) > pcs_hotcat:
						gt 'park_walkevents', 'run_end'
					else
						cla & *clr
						gs 'park_walkevents', 'running_image'
						'About halfway through your run, you hear a whistle pierce the air.'
						act'Turn':
							cla & *clr
							gs 'npcgeneratec', 0, '', rand(18, 45)
							gs 'boyStat', $npclastgenerated
							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_generic/<<lover_picrand[$boy]>>.jpg"></center>'
							temp['catcall'] = rand(1,3)
							'Turning your head instinctively at the sound, you see a guy lowering his fingers from his mouth, a wide grin on his face.'
							if temp['catcall'] = 1:
								'"Hey sexy! Why don''t you come run back to my place so I can fuck your brains out!"'
							elseif temp['catcall'] = 2:
								'"You got a killer rack gorgeous! Look at those tits! Lemme put my face between them!'
							elseif temp['catcall'] = 3:
								'"Wooooeee! That ass! I wanna take it home with me and make it mine!"'
							end

							act'Ignore him':
								cla & *clr
								gs 'park_walkevents', 'running_image'
								'You roll your eyes but otherwise ignore him, continuing to run until his hollering is nothing but a distant buzz behind you. And soon enough, there''s no hollering at all.'
								act 'Finish your run': gt 'park_walkevents', 'run_end'
							end

							act'Ignore him (annoyed)':
								cla & *clr
								temp['catcall'] = 4
								gs 'park_walkevents', 'running_image'
								'You grit your teeth and try to ignore him, continuing to run past while he shouts lewd remarks about your body and what he''d like to do to it. Even once he''s far behind you, you can''t stop thinking about it, seething internally and grinding your teeth.'
								*nl
								'Fuck! Who does he think he is? Are you just a piece of meat to him? Fuck that guy and fuck everybody like him!'
								act 'Finish your run': gt 'park_walkevents', 'run_end'
							end

							act'Walk up to him':
								cla & *clr
								!! IMAGE HERE
								'Slowing down, your jog reduces to a walk until you stop right in front of the guy.'
								'"You serious?" you puff.'
								'"Serious about you," he snickers before making a kissy face at you. "I''m <<$npc_firstname[$npclastgenerated]>>. What''s your name?"'
								act'You''re a piece of shit':
									cla & *nl
									temp['catcall'] = 4
									'"You''re a real piece of shit, you know that?" you huff. "You think that girls like this kind of thing? Ugly fucks like you calling out lewd shit about their bodies?"'
									'"I don''t think they like it, I know they <i>love</i> it. Come on, I''m just being nice, giving you some nice compliments. No need to be such a bitch about it."'
									'"Ugh, fuck you!" You spit at his shoes and break back into a run, trying to get as far away as possible.'
									'"You know I would baby! Just come back here and we''ll make it happen!" the guy shouts after you.'
									act 'Finish your run': gt 'park_walkevents', 'run_end'
								end

								act'Wanna fuck?':
									cla & *nl
									'"<<$pcs_nickname>>." you say flatly. "Nice to meet you. But really. You mean all that stuff you said? Cause if you''re serious, we could go back to your place and get it on. I could go for a good fuck right now."'
									if rand(1,2) = 1:
										'He blinks in surprise but recovers quickly. "I mean, hell yeah. If you''re offering."'
										'"You''re the one who offered," you shrug. "Now hurry up and lead the way."'
										'He quickly heads out of the park and towards an apartment complex, you follow all the way.'
										act 'Go to his place':
											gs 'npcpreservec', $npclastgenerated
											$npclastgenerated = $npclastsaved
											$hookup['pickup'] = 'park_run'
											gt 'sex_ev_start', 'hookup_npc_home_start'
										end
									else
										'"Uhhh..." he blinks in surprise and begins sputtering. "Well I- You''re uhmm... It''s just-"'
										'"Ugh," you roll your eyes. "What a waste of fucking time. Limp dick loser." You don''t spare him another thought and break back into a run, leaving him and your disappointment behind.'
										act 'Finish your run': gt 'park_walkevents', 'run_end'
									end
								end
							end
						end
					end
				end
				if pcs_inhib >= 35 or exhibitionist_lvl > 0:
					act 'Expose your breasts':
						if daybegskver = daystart:
							gs 'exercise', 'tier1', 30, 'run'
						else
							gs 'exercise', 'tier2', 30, 'run'
						end
						*clr & cla
						inhib_exp += 2
						gs 'arousal', 'flash', 5
						gs 'arousal', 'end'
						gs 'stat'
						if rand(0,1) = 0:
							'<center><img <<$set_imgh>> src="images/locations/shared/park/flash'+rand(3,4)+'.jpg"></center>'
						else
							'<center><video autoplay loop src="images/locations/shared/park/flash'+rand(1,2)+'.mp4"></video></center>'
						end
						'Halfway through your run, you pull up your top and expose your breasts. The cool air against your warm skin causes you to shiver, and almost immediately your nipples start to harden, a mixed reaction from the air hitting them and your growing excitement.'
						*nl
						gs 'park_walkevents', 'run_reactions'
					end
				end
			else
				cla & *clr
				if $region = 'pav':
					gs'pav_park', 'park_image'
				else
					'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park.jpg"></center>'
				end
				if $daystage['desc'] = 'sunset':
					'It''s getting dark soon. Are you sure it''s such a good idea to go running right now?'
				elseif $daystage['desc'] = 'early_night':
					'It''s pretty dark out. Are you sure it''s such a good idea to go running right at night?'
				elseif $daystage['desc'] = 'mid_night':
					'It''s very dark out. Are you sure it''s such a good idea to go running so late at night?'
				elseif $daystage['desc'] = 'pre_dawn':
					'It''s still dark out. Are you sure it''s such a good idea to go running so early in the morning?'
				end

				act'Maybe not':
					cla & *nl
					'On second thought, maybe a young girl like yourself <i>shouldn''t</i> go running in the dark...'
					act 'Continue': gt $loc, $loc_arg
				end

				act'It''ll be fine':
					!! if running late at night
					*clr & cla
					menu_off = 1
					fat -= rand(0,4)
					gs 'sweat', 'add', 5
					gs 'stat'
					gs 'park_walkevents', 'running_image'
					'You ignore your instincts and start jogging through the park.'
					act 'Run':
						if daybegskver = daystart:
							gs 'exercise', 'tier1', 30, 'run'
						else
							gs 'exercise', 'tier2', 30, 'run'
						end
						daybegskver = daystart
						if rand(0, 24) < 7 and cheatVars['random_rapists'] ! 1:
							!! if rand(1,3) = 1: gangrape, else single rapist
							!! not added yet because don''t have single rapist event written yet
							$temp['rape_type'] = 'gang'
							cla & *clr
							'<center><img <<$set_imgh>> src="images/pc/activities/exercises/running/park_jogn1.jpg"></center>'
							'About halfway through your run, you hear a branch snap to your left. You turn to see a shadow crouching in the bushes, but before you can react, arms grip you from behind and a dirty hand clamps over your mouth. Your eyes go wide with fear as several more shapes emerge from the darkness, moving towards you.'
							*nl
							'"Well well well, what do we have here?" a gravely voice says from behind you. "A tasty little treat for us to enjoy?"'
							act 'Scream': gt'rape_events', 'park_rape_struggle_start'
							act 'Fight!': gt'rape_events', 'fight_init'
						else
							gt 'park_walkevents', 'run_end'
						end
					end
					if pcs_inhib >= 35 or exhibitionist_lvl > 0:
						act 'Expose your breasts':
							if daybegskver = daystart:
								gs 'exercise', 'tier1', 30, 'run'
							else
								gs 'exercise', 'tier2', 30, 'run'
							end
							*clr & cla
							inhib_exp += 1
							gs 'arousal', 'flash', 5
							gs 'arousal', 'end'
							gs 'stat'
							if rand(0,1) = 0:
								'<center><img <<$set_imgh>> src="images/locations/shared/park/flash'+rand(3,4)+'.jpg"></center>'
							else
								'<center><video autoplay loop src="images/locations/shared/park/flash'+rand(1,2)+'.mp4"></video></center>'
							end
							'Halfway through your run, you pull up your top and expose your breasts. The cool night air against your warm skin causes you to shiver and almost immediately your nipples start to harden.'
							*nl
							if rand(0, 24) < 7 and cheatVars['random_rapists'] ! 1:
								act'Continue':
									!! if rand(1,3) = 1: gangrape, else single rapist
									!! not added yet because don''t have single rapist event written yet
									$temp['rape_type'] = 'gang'
									cla & *clr
									'<center><img <<$set_imgh>> src="images/shared/misc/jumped.jpg"></center>'
									'You''re just thinking to yourself how exciting it is to bare your breasts even when no one is around when suddenly arms grip you from behind and a dirty hand clamps over your mouth. Your eyes go wide with fear as several more shapes emerge from the darkness, moving towards you.'
									*nl
									'"Well well well, what do we have here?" a gravely voice says from behind you as another hand begins to paw your exposed breasts. "A little slut looking for some fun?"'
									act 'Scream': gt'rape_events', 'park_rape_struggle_start'
									act 'Fight!': gt'rape_events', 'fight_init'
								end
							else
								gs 'park_walkevents', 'run_reactions'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'run_reactions':
	cla
	menu_off = 1
	if hour >= 20:
		'With it being so late, there isn''t anyone in the park to see you, but it doesn''t matter, the thrill and pleasure is still there. When you''re finished, you make sure to pull your top back down.'
		gs 'arousal', 'flashlite', 10
		gs 'arousal', 'end'
		gs 'stat'
	else
		if rand(0,1) = 0:
			'Despite it being daytime, you manage to go unnoticed during your run, but you still find yourself aroused and excited from the thought of being seen by a stranger or someone you know. When you''re finished, you make sure to pull your top back down.'
			gs 'arousal', 'flashlite', 10
			gs 'arousal', 'end'
			gs 'stat'
		else
!!I plan to add a chance for one of the guys to follow sveta and corner her, which can end in a consensual blowjob or rape.
			'You come across a group of gopniks loitering in a circle, empty beer bottles scattered around them. They''re loudly talking among themselves, but as you near the group, one of them notices you and quickly interrupts his friends to point you out to everyone.'
			'You can''t help but smile slightly as you watch them rush to stand and then fight over getting to the front so they can see you better. As you run by, some start to clap and whistle while a few shout at you.'
			*nl
			'"Is this real or am I fucking dreaming?!"'
			*nl
			'"You need a running partner, babe? I can go all day, every day!"'
			*nl
			'"Just another crazy slut."'
			*nl
			'You continue your run until their catcalling can''t be heard anymore.'
			gs 'arousal', 'flashlite', 10
			gs 'arousal', 'end'
			gs 'stat'
		end
	end
	*nl
	'You feel great after your jogging session. A bit sweaty, but also that you''ve managed to improve your stamina as you even feel a bit slimmer.'
	act 'Finish your run': gt $loc, $loc_arg
end

if $ARGS[0] = 'run_end':
	gs 'park_walkevents', 'run_cooldown_image'
	if temp['catcall'] = 4:
		pcs_mood -= 30
		'After about a full hour of running, you finally start to slow down, breathing tiredly. Under normal circumstances, you might be in the middle of your runner''s high but that guy in the middle of your jog just soured the whole thing. You feel exhausted and angry and you just want to go home.'
	else
		'About an hour after you started, you call your run to a halt, breathing tiredly. You feel exhausted in a good way. A bit sweaty, but also that you''ve managed to improve your stamina as you even feel a bit slimmer.'
	end
	if daybegskver = daystart:
		gs 'exercise', 'tier1', 30, 'run'
	else
		gs 'exercise', 'tier2', 30, 'run'
	end
	act 'Continue': gt $loc, $loc_arg
end

if $ARGS[0] = 'find_baby':
	menu_off = 1
	if hour >= 8 and hour <= 20 and park_baby_found < 1:
		pcs_mood += 10
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park_baby/park_woods.jpg"></center>'
		'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'
		'Your thoughts are interrupted by a weak noise coming from a small forest in the park.'
		act 'Investigate':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park_baby/park_baby_a.jpg"></center>'
			'After searching and following the noises you end up finding an abandoned baby in the park. You approach it and can hear weak cries coming from it.'
			'You pull it from the crib an see that it is a boy. The baby boy isn''t moving much as he seems really weak.'
			park_baby_found = 1
			if lactation['active'] > 0:
				'His small almost dry mouth makes little smacking movements.'
			end
			'What do you want to do?'
			if lactation['active'] > 0:
				act 'Breastfeed him':
					gs 'stat'
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park_baby/park_baby_bf.jpg"></center>'
					'You sit down on a nearby bench and get a breast out.'
					if kid <= 0:
						'Something feels weird in your breast, a pulling tension goes through it from the base to the nipple.'
					end
					'The boy is in your arms and you lead your nipple into his small dry mouth. You can feel the small lips clamping weakly onto your nipple, only light suction coming from the mouth.'
					'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park_baby/feeding_01.jpg"></center>'
					temp_var = func('lact_lib','$get_breastmilk_time', 7, 30)
					if temp_var > 10:
						'<br>The baby boys weak suckling isn''t getting better with time. He is suckling on your nipple for almost 10 minutes and his condition isn''t getting better.'
						milkedvolume = func('lact_lib','$get_breastmilk', 7, 10)
						milkedvolume = 0
						minut += temp_var
						if pcs_mood < 20:
							act 'Leave him here':
								*clr & cla
								'You look around, someone probably left him here for good. You put him back into the crib and leave the baby behind, finishing your walk.'
								act 'Finish your walk': gt $loc, $loc_arg
							end
						end
						act 'Bring him to the hospital':
							*clr & cla
							'<center><b><font color="maroon">Clinic</font></b></center>'
							'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
							'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
							'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they will take care of him.'
							minut += 30
							act 'Finish': gt 'city_clinic', 'start'
						end
						!!if pcs_mood > 80:
						!!	  act 'Take him with you':
						!!end
					else
						'<br>The baby boys weak suckling is getting better with time. After around <<temp_var>> minutes his sucking is getting more intense.'
						milkedvolume = func('lact_lib','$get_breastmilk', 7, temp_var)
						milkedvolume = 0
						minut += temp_var
						act 'Continue to breastfeed him':
							*clr & cla
							gs 'stat'
							'You adjust yourself a bit as you continue to breastfeed the baby. He opens his mouth more to suck in your areola, starting to chew on it. You can feel how it causes your breast to leak more milk. His small hands grabbing up, holding onto your nutrious breast.'
							'<center><img <<$set_imgh>> src="images/locations/city/centralpark/park_baby/feeding_02.jpg"></center><br>'
							temp_var = func('lact_lib','$get_breastmilk_time', 2, 120)
							if temp_var > 30:
								'You try to breastfeed him for 30 minutes but you can''t satisfy his needs even after switching breasts. He doesn''t seem to get enough milk from your breasts.'
								milkedvolume = func('lact_lib','$get_breastmilk', 2, 30)
								milkedvolume = 0
								minut += 30
								if pcs_mood < 20:
									act 'Leave him here':
										*clr
										cla
										'You look around, someone probably left him here for good. You put him back into the crib and leave the baby behind, finishing your walk.'
										act 'Finish your walk': gt $loc, $loc_arg
									end
								end
								act 'Bring him to the hospital':
									*clr & cla
									'<center><b><font color="maroon">Clinic</font></b></center>'
									'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
									'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
									'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they will take care of him.'
									minut += 35
									act 'Finish': gt 'city_clinic', 'start'
								end
								!!if pcs_mood > 80:
								!!	  act 'Take him with you':
								!!end
							else
								if temp_var = 1:
									if (lactation['breastmv']/120000) < 2:
										'You breastfeed him for one minute. During feeding you have to switch breasts as he is drinking alot, but your breasts make enough milk to satisfy his needs.'
									else
										'You breastfeed him for one minute. Your breasts make so much milk you don''t even have to switch breasts during feeding. He seems fully satisfied when you''re done.'
									end
								else
									if (lactation['breastmv']/120000) < 2:
										'You breastfeed him for <<temp_var>> minutes. During feeding you have to switch breasts as he is drinking alot, but your breasts make enough milk to satisfy his needs.'
									else
										'You breastfeed him for <<temp_var>> minutes. Your breasts make so much milk you don''t even have to switch breasts during feeding. He seems fully satisfied when you''re done.'
									end
								end
								if age < 18 and kid <= 0:
									'As you notice how you were able to fully breastfeed a baby, even if you never had kids yourself, you start to feel proud and confident of yourself, smiling and nodding. This raises your mood as you feel more like a woman now.'
									pcs_mood += 20
								elseif age >= 18 and kid <= 0:
									'As you notice how you were able to fully breastfeed a baby, even if you never had kids yourself, you start to feel proud and confident of yourself, smiling and nodding. This raises your mood a bit.'
									pcs_mood += 10
								else
									'You feel satisfied after the breastfeeding and smile at the baby. Your mood rises a bit.'
									pcs_mood += 10
								end
								milkedvolume = func('lact_lib','$get_breastmilk', 2, temp_var)
								milkedvolume = 0
								minut += temp_var
								if pcs_mood < 20:
									act 'Call an ambulance and leave.':
										*clr & cla
										minut += 10
										'You call an ambulance. It takes them 10 minutes to get here. They take the baby with them and thank you for the report.'
										act 'Finish your walk': gt $loc, $loc_arg
									end
								end
								act 'Bring him to the hospital':
									*clr & cla
									'<center><b><font color="maroon">Clinic</font></b></center>'
									'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
									'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
									'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they will take care of him.'
									minut += 35
									act 'Finish': gt 'city_clinic', 'start'
								end
								!!if pcs_mood > 80:
								!!	  act 'Take him with you':
								!!end
							end
						end
						if pcs_mood < 20:
							act 'Call an ambulance and leave.':
								*clr & cla
								minut += 10
								'You call an ambulance. It takes them 10 minutes to get here. They take the baby with them and thank you for the report.'
								act 'Finish your walk': gt $loc, $loc_arg
							end
						end
						act 'Bring him to the hospital':
							*clr & cla
							'<center><b><font color="maroon">Clinic</font></b></center>'
							'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
							'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
							'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they will take care of him.'
							minut += 35
							act 'Finish': gt 'city_clinic', 'start'
						end
						!!if pcs_mood > 80:
						!!	  act 'Take him with you':
						!!end
					end
				end
			end
			act 'Bring him to the hospital':
				*clr & cla
				'<center><b><font color="maroon">Clinic</font></b></center>'
				'<center><img <<$set_imgh>> src="images/locations/shared/clinic/poli.jpg"></center>'
				'You take the baby and walk to the hospital in the residential area of St. Petersburg.'
				'They take him at the reception and you explain what happened. A nurse takes the baby away and the receptionist assures you that they will take care of him.'
				minut += 30
				act 'Finish': gt 'city_clinic', 'start'
			end
			if pcs_mood < 20:
				act 'Call an ambulance and leave.':
					*clr & cla
					minut += 10
					'You call an ambulance. It takes them 10 minutes to get here. They take the baby with them and thank you for the report.'
					act 'Finish your walk': gt $loc, $loc_arg
				end
			end
			!!if pcs_mood > 80:
			!!	  act 'Take him with you':
			!!end
		end
		act 'Finish your walk':gt 'city_park', 'start'
	else
		gt 'park_walkevents', 'empty'
	end
end


--- park_walkevents ---------------------------------