# balkon2

menu_off = 1

if $ARGS[0] = 'kurit':
	cla
	*clr
	minut += 10
	gs 'drugs', 'smoke'
	pcs_sleep += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/kurit.jpg"></center>'
	'You put the cigarette in your mouth and tightly squeeze it with your lips as you light it. You inhale the smoke by taking a deep breath and holding it in your mouth for a moment. You continue on enjoying the cigarette as it diminishes...'

	act 'Throw the cigarette butt over the railing...':gt 'balkon', 'start'
end

if $ARGS[0] = 'demo1':
	cla
	*clr
	sosedBalDay = daystart
	gs 'stat'
	'<center><font size="5" color="maroon"><b>Balcony</b></font></center>'

	if $pantyworntype ! 'none':
		'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_underwear3.jpg"></center>'
		gs 'arousal', 'flashlite', 5, 'exhibitionism'
	else
		'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_naked3.jpg"></center>'
		gs 'arousal', 'flash', 5, 'exhibitionism'
	end

	'<center>You defiantly pose on the balcony, to the delight of your neighbor. He eagerly looks at you while furiously masturbating. 5 minutes later he cums and returns to his apartment.</center>'
	
	gs 'arousal', 'end'
	gs 'stat'

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

if $ARGS[0] = 'palec1':
	cla
	*clr
	pcs_horny += rand(10,30)
	minut += 1
	sosedBalDay = daystart
	gs 'stat'

	if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/pc/reactions/fuckyou_underwear.jpg"></center>'
	if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/pc/reactions/fuckyou_naked.jpg"></center>'

	'<center>You flip off the neighbor. As he''s been found out he quickly heads back indoors.</center>'

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

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

	! WD: Uninitialised ~ 'alcohol' USE 'alko'
	if alko < 12:
		if $clothingworntype = 'nude':
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_naked2.jpg"></center>'
		elseif $pantyworntype ! 'none':
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_underwear2.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_dressed2.jpg"></center>'
		end

		act 'Enjoy the view':
			cls
			if hour >= 8 and hour <= 19:
				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bal1.jpg"></center>'
			else
				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bal2.jpg"></center>'
			end

			'You look at the beautiful landscape from your balcony. The view is fantastic and you feel more relaxed.'

			act 'Further':gt 'balkon', 'start'
		end
	else
		'This was probably a bad decision, you feel a bit light headed as you had no idea that your apartment was so high. You don''t feel comfortable standing on your balcony while being drunk...'

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

if $ARGS[0] = 'sosed':
	cla
	*clr
	minut += 1
	gs 'stat'
	'<center><b><font color="maroon">Balcony</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sosed.jpg"></center>'
	'<center>You notice your neighbor to the left standing on his balcony. As he notices that you''re naked he begins staring at you…</center>'
	
	if exhibitionist_lvl > 0:
		act 'Show off your body':gt 'balkon2', 'demo1'
		gs 'willpower', 'exhib', 'self'
		if will_cost <= pcs_willpwr:
			act 'Flip him off (<<will_cost>> Willpower)':
				gs 'willpower', 'exhib', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				gt 'balkon2', 'palec1'
			end
		else
			act 'Flip him off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	else
		gs 'willpower', 'exhib', 'self'
		if will_cost <= pcs_willpwr:
			act 'Show off your body (<<will_cost>> Willpower)':
				gs 'willpower', 'exhib', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				gt 'balkon2', 'demo1'
			end
		else	
			act 'Show off your body (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Flip him off ':gt 'balkon2', 'palec1'
	end
	
end

!!!Probably CV edition
if $ARGS[0] = 'masopt':
	cla
	*clr
	gs 'stat'
	if pcs_inhib < 30:inhib_exp += rand(1,3)
	pcs_mood += 15
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_dildo.jpg"></center>'

	if dildo = 1:
		act 'Rub your clit with the dildo':
			cla
			*clr
			pcs_vag += rand(0, 2)

			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_dildo<<rand(1, 2)>>.jpg"></center>'

			'You begin to rub yourself, having your hand moving in small circles as you feel your wetness growing. Feeling aroused enough you take out your dildo and begin teasing your clit by gently rubbing the area.'
			'As you stop teasing yourself, you slowly push the head inside your vagina. You slowly begin to fuck yourself picking up the pace. The feeling of your inside being stretched out is great and you let out a quiet wimp as you keep on playing with the dildo.'
			$orgasm_or = 'yes'
			$orgasm_txt = 'After pleasuring yourself intensely with the dildo for a few minutes and as you reach orgasm you try to keep your voice down as you don''t want to get exposed.'
			
			gs 'arousal', 'vaginal_dildo', 10, 'exhibitionism'
			gs 'arousal', 'end'
			gs 'stat'
			
			act 'Finish':gt 'balkon', 'start'
		end

		act 'Play with your ass':
			cla
			*clr
			pcs_ass += rand(0, 2)
			'<center><video autoplay loop src="images/locations/city/residential/apartment/sex/balcony_anal1.mp4"></video></center>'
			'You begin rubbing yourself building up a wetness between your legs. As you''re playing with your clit your horniness takes over and you begin fantasizing on using a different hole today...'
			'As you keep inserting your fingers inside the vagina, it keeps building up a wetness making your fingers wet and slippery. As you pull out your fingers you begin brushing one of your fingers against the sphincter, giving yourself a little tickle.'
			'Before you know it you take a deep breath and insert one of your finger in your anus, probing it as it gives you a jolting sensation...'
			
			gs 'arousal', 'anal_finger', 5, 'exhibitionism'
			gs 'stat'

			act 'Use the dildo':
				cla
				*clr
				'<center><video autoplay loop src="images/locations/city/residential/apartment/sex/balcony_anal2.mp4"></video></center>'
				'As you''re pleasuring yourself inserting the finger in and out, you grab your dildo and begin sucking on it, trying to lube it as much as you can.'
				'Not being able to contain yourself you remove the dildo from your mouth and slowly insert it into your anus. At first you feel discomfort but the amazing feeling as the dildo penetrates makes you forget all about it.'
				'As your anus eases you start to pump away the dildo at a faster speed. The sexual pleasure you''re experiencing is greater than anything you''ve ever known would be possible to feel.'
				
				$orgasm_or = 'yes'
				$orgasm_txt = 'Within seconds an orgasm overwhelms you in a long, slow, intense wave after wave of pure pleasure.'
				
				gs 'arousal', 'anal_dildo', 5, 'exhibitionism'
				gs 'arousal', 'end'
				gs 'stat'

				act 'Go back':gt 'balkon', 'start'
			end
		end
	end

	act 'Masturbate':
		cla
		*clr
		pcs_vag += rand(0, 1)
		gt 'balkon2', 'finger'
	end
end

if $ARGS[0] = 'finger':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-1.jpg"></center>'
	'Standing naked in the open is making you aroused. Feeling embolded you engulfing your fingers into your mouth preparing them for what''s to come.'
	
	gs 'arousal', 'foreplay', 2, 'exhibitionism', 'masturbate'
	gs 'stat'

	act 'Rub your clit':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-2.jpg"></center>'
		'As the fingers are coated in saliva, you run your fingers down your body not stopping before your juicy puffed pussy lips. You take your fingers and slowly begin rubbing your clit as you feel the first surge of pleasure consuming you.'
		$orgasm_or = 'no'
		gs 'arousal', 'clit_finger', 3, 'masturbate', 'exhibitionism'
		gs 'stat'

		act 'Insert fingers':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-3.jpg"></center>'
			'As you play with yourself you begin to rub your clit a little bit faster. By now your clit is swelling with desire, and as you can''t ignore it anymore, you take your middle finger and insert it into your vagina.' 
			'As you ease into it you shut your eyes by the pleasant feeling as you speed up your hand movements.'
			
			$orgasm_or = 'no'
			gs 'arousal', 'vaginal_finger', 5, 'masturbate', 'exhibitionism'
			gs 'stat'

			act 'Open your eyes':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-4.jpg"></center>'
				if exhibitionist_lvl > 0:
					gs 'arousal', 'flash', 2
					'As you open your eyes, you lock eyes with one of your neighbors peering out the window in the house across...'
					'You can''t help but smile as there''s someone enjoying the show...'
					
					act 'Give him a show':gt 'balkon2', 'finger_solo'					
				else
					$orgasm_or = 'yes'
					$orgasm_txt = 'Overtaken by the thrill of the risk of being caught in such a compromising act and the diligent work of your skilled fingers brings you to an intense orgasm. Before you know it you grip the railing for support as your juices squirt hard out of you.'
					'The orgasm is so intense that you''re seeing stars and it almost feels like you''re going to pass out. Somehow you manage to keep your composure as you quickly head back inside as you feel too exposed.'
					
					gs 'arousal', 'clit_finger', 2, 'masturbate'
					gs 'arousal', 'end'
					gs 'stat'

					act 'Head back inside':dynamic $brodils
				end
			end
		end
	end
end

if $ARGS[0] = 'finger_solo':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-5.jpg"></center>'
	'Ignoring everything around you, you re-focus on yourself once again. You begin teasing yourself, pressing your fingers on your already throbbing clit. It doesn''t take long before you slide your fingers inside the pussy, as you begin to squirm by the sensation.'

	$orgasm_or = 'no'
	gs 'arousal', 'clit_finger', 3, 'masturbate', 'exhibitionism'
	gs 'stat'

	act 'Keep it up':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-6.jpg"></center>'
		'Slowly pacing the speed your fingers enter your pussy, you begin to feel you tight walls becoming wet and sticky with your own juices as it drips onto the ground while your mind is obsessed by the feeling that you need to increase the pace."'

		$orgasm_or = 'no'
		gs 'arousal', 'vaginal_finger', 3, 'masturbate', 'exhibitionism'
		gs 'stat'

		act 'Faster':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-7.jpg"></center>'
			'You pick up the pace as you begin fantasizing about being taken like this in the open... You use your finger frantically as it slides in and out of your vagina with ease.'

			$orgasm_or = 'no'
			gs 'arousal', 'vaginal_finger', 3, 'masturbate', 'exhibitionism'
			gs 'stat'

			act 'Faster':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-8.jpg"></center>'
				'You are way too horny to pace yourself now, as you use one more finger to stretch out your inside, expanding the pleasant feeling. While trying your hardest to keep as quiet as possible, the walls begin to crumble as you begin moaning making sure that your closest neighbours can hear you.'

				$orgasm_or = 'no'
				gs 'arousal', 'vaginal_finger', 3, 'masturbate', 'exhibitionism'
				gs 'stat'

				act 'Just a little more':
					cla
					*clr
					'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-9.jpg"></center>'
					'By now you''re loudly moaning not caring if anyone hears you as your fingers inside are hitting your g-spot. You make one last effort and pump your vagina as you feel a...'

					$orgasm_or = 'no'
					gs 'arousal', 'vaginal_finger', 3, 'masturbate', 'exhibitionism'
					gs 'stat'

					act 'Climax':
						cla
						*clr
						'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_orgasm.jpg"></center>'
						
						$orgasm_or = 'yes'
						$orgasm_txt = 'Within seconds your toes curl as you feel a wave of ecstasy sweeping all over your body, your legs and hands are shaking in delight of a possibility that someone might have noticed you.'
						'After a few moments you withdraw your fingers from your stretched vagina, still pulsating from the intense orgasm.'
						gs 'arousal', 'vaginal_finger', 3, 'masturbate', 'exhibitionism'
						gs 'arousal', 'end'
						gs 'stat'

						act 'Get dressed':
							cla
							*clr
							minut += 5
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_mas1-10.jpg"></center>'
							'As you come to your senses you can hear some of your neighbours applauding your performance. You decide giving them one last show as you stand up and suck the sticky cream slowly from your fingers, savouring the memory.'
							'As you finish you give everyone a playful wave as you get dressed.'

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

--- balkon2 ---------------------------------