glife/locations/oral

# oral
if $ARGS[0] = 'start':
	frost = 0
	'You little fingers caress <<dick>> centimeter term then cupped his mouth and began to suck.'

	if harakBoy = 0:'<<$nameV>> closed his eyes in pleasure and enjoying the caress of your lips.'
	if harakBoy = 1:'<<$nameV>> staring you in the face until your lips glide over his hard dick.'
	if harakBoy = 2:
		if mop > 1:set mop = 0

		set hapri = 0
		set throat += 1
		'<<$nameV>> to take you by the hair and began to fuck you in the mouth, from blows to the throat member you tears flowed from his eyes.'
	end

	set horny += throat + SUB + VAF - DOM

	if horny >= 100:
		set VAF += 1
		set orgasm += 1
		set horny = 20
		set manna += 15
		set willpower += 15
		set lipkoef += 1

		if lipkoef > 50:
			set lipkoef = 0
			set lip += 1
		end

		'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
	end

	'Finally <<$nameV>> groaned and you realize that now he will start to finish.'
end

if $ARGS[0] = '0':
	set horny += throat + SUB + VAF - DOM

	if horny >= 100:
		set VAF += 1
		set orgasm += 1
		set horny = 20
		set manna += 15
		set willpower += 15
		set lipkoef += 1

		if lipkoef > 50:
			set lipkoef = 0
			set lip += 1
		end

		'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
	end
end
--- oral ---------------------------------