# blowPR
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 1
	guy += 1
	bj += 1
	throat += 1
	prosta += 1
	!!son -= 1
	zpprand = rand(0, 100)

	if zpprand >= 70:dynamic $venerasiak

	gs 'stat'
	'<center><img src="images/img/prost/bj.jpg"></center>'
	'Your hand slid crotch guy and unzipped his pants. You shoved his hand into his pants and pulled out his cock.'

	if prezik > 0:act 'Wear a condom on the penis mouth.':gt 'blowPR', '1'
	if prezik = 0:act 'Mark cock in her mouth.':gt 'blowPR', '2'
end

if $ARGS[0] = '1':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	prezik -= 1
	gs 'stat'
	picrand = rand(1, 7)
	'<center><img src="images/img/prost/bjp<<picrand>>.jpg"></center>'
	'You pulled his lips a condom on the penis'

	if prosti = 0:
		'Your lips slide down the barrel client until he cums in a condom'

		act 'Leave.':gt $locSex, $metkaSex
	elseif prosti = 1:
		'Client sufficiently warmed up and you can continue.'

		act 'Further.':gt 'NormPR', '1'
	elseif prosti = 2:
		'Client sufficiently warmed up and you can continue.'

		act 'Further.':gt 'AnalPR', '1'
	end
end

if $ARGS[0] = '2':
	$metka = $ARGS[0]
	$loc = $CURLOC

	cla
	clr
	*clr
	dynamic $venerasiak
	minut += 5
	gs 'stat'
	picrand = rand(8, 13)
	'<center><img src="images/img/prost/bjp<<picrand>>jpg"></center>'
	'You clasped lips member.'

	act 'Suck':gt 'blowPR', '12'
end

if $ARGS[0] = '12':
	$metka = $ARGS[0]
	$loc = $CURLOC
	*clr
	cla

	if prosti = 0:
		bjrand = rand(0, 100)

		if bj <= 15 and bjrand > 0 and bjrand <= 50:
			'You clumsy movements suck dick customer until he cums in your mouth, making you wince from the unpleasant taste of sperm.'
			cumlip += 1
			'<center><img src="images/img/prost/bjm.jpg"></center>'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bj > 15 and bjrand > 0 and bjrand <= 50:
			cumlip += 1
			'<center><img src="images/img/prost/bjm2.jpg"></center>'
			'Your trained sponge glide up and down, bringing pleasure to the customer. Very soon you will feel the taste of his seed that you swallow with delight to the last drop.'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bjrand > 50 and bjrand <= 80 and bj <= 15 and mop = 1:
			cumface += 1
			'<center><img src="images/img/prost/bjf.jpg"></center>'
			'You clumsy movements suck dick client suddenly you he pulls his dick, ending on your face, you do not have time to blink, a little sperm gets you in the eye, but, despite the burning, you can not cry, you can only smile.'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bjrand > 50 and bjrand <= 80 and bj <= 15 and mop > 1:
			cumface += 1
			mop = 0
			'<center><img src="images/img/prost/bjf.jpg"></center>'
			'You clumsy movements suck dick client suddenly you he pulls his dick, ending on your face, you do not have time to blink, a little sperm gets you in the eye, but, despite the burning, you can not cry, you can only smile.'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bjrand > 50 and bjrand <= 80 and bj > 15:
			cumface += 1
			'<center><img src="images/img/prost/bjf2.jpg"></center>'
			'Your trained sponge glide up and down, bringing pleasure to the customer as soon as the client has released your mouth, you realize that your face is now flooded with sperm. You have time, tilt the head back with her eyes closed, heavy drops falling on your chin, forcing to smile at the thought of not smeared makeup.'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bjrand > 80 and bjrand <= 100 and bj <= 15:
			cumfrot += 1
			'<center><img src="images/img/prost/bjt2.jpg"></center>'
			'You clumsy movements suck dick client, it stretches hands to your chest trying to expose it. You moaned, letting him know that was not the deal. Dissatisfied client continued to have you in my mouth. You have already relaxed, as a client, pushing, pulled wet from saliva member. His eyes closed, you feel like a drop of sperm not fall on your face and chest! Surprised you open your eyes in horror when he saw in the semen-stained clothing, and pretty smiling customer.'

			act 'Leave.':gt $locSex, $metkaSex
		elseif bjrand > 80 and bjrand <= 100 and bj > 15:
			money += 500
			'<center><img src="images/img/prost/bjt.jpg"></center>'
			'Your trained sponge glide up and down, bringing pleasure to the customer. He stretches his hands to your chest did not patiently trying to expose her, you understand everything without words. Exposing boobs you become even more carefully to work his mouth when he was already on the brink, you have stepped back sharply, slipping back with the member in a moment became a client shoot sperm on your carefully when substituted hemisphere. Left happy, he handed you another Piatihatki.'

			act 'Leave.':gt $locSex, $metkaSex
		end
	elseif prosti = 1:
		'Client sufficiently warmed up and you can continue.'

		act 'Further.':gt 'NormPR', '2'
	elseif prosti = 2:
		'Client sufficiently warmed up and you can continue.'

		act 'Further.':gt 'AnalPR', '2'
	end
end

--- blowPR ---------------------------------
