glife/locations/saunawhore

# saunawhore
saunaWorkKlient = 1
guy += 1
slutty += 1
bj += 1
dynamic $venerasiak
gs 'boy'
$boy = 'Client'
whorerand = rand(1, 22)
minut += 15
SaunaWhore += 1
workDolg2 = 0
gs 'stat'
'<center><img src="images/sauna/bj<<whorerand>>.jpg"></center>'
'You take your client in to the sauna, where you both undress.'
'You fall to your knees in front of the client and take his flaccid cock in your mouth. You work your magic and his member quickly rises to <<dick>> centimeters fully erect.'
'You carefully clasping his dick and sucking with your <<$liptalk>> you feel every movement of his hard cock in your mouth and throat.'

if dick <= 12:
    'His member is not very large and you constantly poke you nose into his curly pubes sucking his dick to the base and his hairy balls hit you on the chin.'
elseif dick > 12 and dick <= 15:
    'With each movement the member pokes into your throat and you choke a little diligently working the full length.'
elseif dick > 15:
    'This dick is too big for your mouth and you suck it as far as your mouth will allow, taking it down your the neck then removing it to free your airway and licking the head admiringly.'
end
!!dynamic $saunadinsexbefore
if dick > 15:saunarand = rand(0, 100)

if dick > 15 and saunarand > 90:
	'Client wants you to give him a deep blowjob.'

	act 'Deepthroat':
		cls
		minut += 45
		sweat += 1
		mop = 0
		throat += 1
		gs 'stat'
		whorerand = rand(1, 34)
		'<center><img src="images/sauna/deep<<whorerand>>.jpg"></center>'
		'You deeply absorb the dick into your mouth, it rests in your throat, you try to stretch your throat and swallow the cock. It becames hard to breathe and you start crying, drooling and snot dribbles from your nose, you pull the member out of your throat and take a rest.'
		'Then you begin again and wrap your mouth around the <<dick>> centimeter member pushing against your throat help it to adapt and you can find the space in which to swallow the member. Your is throat burning with fire and your eyes are flowing with tears, snot runs from your nose down the face, the client finally groans and finishes in the condom.'

		act 'Take the money from the client and go':money += 1500 & saunaWorkNow = 1 & gt 'saunawork'
	end

else
	'The client has had enough of your mouth and wants sex.'

	act 'Further':
		cls

		if rand(0, 100) <= 80 and mesec = 0:
			cls
			minut += 45
			sex += 1
			pose = 0
			sweat += 1
			gs 'stat'
			whorerand = rand(1, 23)
			'<center><img src="images/sauna/sex<<whorerand>>.jpg"></center>'
			'The customer places you in a pose.'

			if prezik <= 0:prezik += 1 & workDolg2 = 50 & 'You take a condom out of the big box, knowing this will cost you 50 <b>₽</b>.'

			gs 'orgazm', 'start'

			act 'Take the money from the client and go':money += 1000 & money -= workDolg2 & saunaWorkNow = 1 & gt 'saunawork'
		else
			cls
			minut += 45
			sweat += 1
			gs 'stat'
			whorerand = rand(1, 23)
			'<center><img src="images/sauna/anal<<whorerand>>.jpg"></center>'
			'The client wants you in the ass, you smear lube on your ass and turning, offer it to the client.'

			if prezik <= 0:prezik += 1 & workDolg2 = 50

			lubonus = 5
			dynamic $analsex
			'Finally client groans and finishes in a condom.'
			prezik -= 1

			act 'Take the money from the client and go':money += 2000 & money -= workDolg2 & saunaWorkNow = 1 & gt 'saunawork'
		end
	end
end

--- saunawhore ---------------------------------