# orgazm
if $ARGS[0] = 'start':
	set protect = 0
	set vidageday -= 1
	frost = 0

	if tabletki <= 0 and prezik > 0 and prosta = 0:
		set prezik -= 1
		set protect = 1
		'You gave the guy a condom and he dressed him in silence.'
	end

	if tabletki >= 0 and prezik > 0 and prosta > 0:
		set prezik -= 1
		set protect = 1
	end

	if tabletki <= 0 and prezik > 0:
		set prezik -= 1
		set protect = 1
	end

	if mesec > 0:
		!periods, orgasm is not possible
		set horny = 0
		set manna -= 10
		set willpower -= 10
		'Do you monthly and while yet a member of the rams you, vaginal blood flows slowly. Painful sensations and pleasant. You moan while strong <<dick>> centimeter dick fuck your pussy.'
	end

	if mesec <= 0 and vagina > 0:
		!no monthly
		!horny - excitement
		!vagina - the elasticity of the vagina
		!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!dick - penis Man
		!orgazm - Total coefficient of pleasure
		!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
		set smazka = horny / 10
		set prinat = smazka + vagina

		if dick >= prinat * 2:
			!member of the critical features more years
			if silavag = 0:set orgazm = 0
			if silavag = 1:set orgazm = 1
			if silavag = 2:set orgazm = 2
		end

		if dick < prinat*2 and dick > prinat:
			!member more options gg
			if silavag = 0:
				if horny >= 100:set orgazm = 5
				if horny >= 90 and horny < 100:set orgazm = 4
				if horny >= 80 and horny < 90:set orgazm = 3
				if horny >= 70 and horny < 80:set orgazm = 2
				if horny >= 60 and horny < 70:set orgazm = 1
				if horny < 60:set orgazm = 0
			end

			if silavag = 1:
				if horny >= 90:set orgazm = 5
				if horny >= 80 and horny < 90:set orgazm = 4
				if horny >= 70 and horny < 80:set orgazm = 3
				if horny >= 60 and horny < 70:set orgazm = 2
				if horny >= 50 and horny < 60:set orgazm = 1
				if horny < 50:set orgazm = 0
			end

			if silavag = 2:
				if horny >= 80:set orgazm = 5
				if horny >= 70 and horny < 80:set orgazm = 4
				if horny >= 60 and horny < 70:set orgazm = 3
				if horny >= 50 and horny < 60:set orgazm = 2
				if horny >= 40 and horny < 50:set orgazm = 1
				if horny < 40:set orgazm = 0
			end
		end

		if dick <= prinat and dick >= vagina:
			!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:set orgazm = 5
				if horny >= 60 and horny < 80:set orgazm = 4
				if horny >= 40 and horny < 60:set orgazm = 3
				if horny < 40:set orgazm = 2
			end

			if silavag = 1:
				if horny >= 70:set orgazm = 5
				if horny >= 50 and horny < 70:set orgazm = 4
				if horny >= 30 and horny < 50:set orgazm = 3
				if horny < 30:set orgazm = 2
			end

			if silavag = 2:
				if horny >= 60:set orgazm = 5
				if horny >= 40 and horny < 60:set orgazm = 4
				if horny >= 20 and horny < 40:set orgazm = 3
				if horny < 20:set orgazm = 2
			end
		end

		if dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:set orgazm = 5
				if horny >= 90 and horny < 100:set orgazm = 4
				if horny < 90:set orgazm = 6
			end

			if silavag = 1:
				if horny >= 90:set orgazm = 5
				if horny >= 80 and horny < 90:set orgazm = 4
				if horny < 80:set orgazm = 6
			end

			if silavag = 2:
				if horny >= 80:set orgazm = 5
				if horny >= 70 and horny < 80:set orgazm = 4
				if horny < 70:set orgazm = 6
			end
		end

		if orgazm = 0:
			set horny = 0
			set manna -= 15
			set willpower -= 15
			'You groaned in pain when <<$nameV>> you entered, tears flowed from her eyes and between her legs feeling as if you drove a red-hot rod. You cry and moan until strong <<dick>> centimeter dick fuck your pussy.'
		end

		if orgazm = 1:
			set horny -= 10
			set manna -= 10
			set willpower -= 10
			'You bite my lip in pain when <<$nameV>> you entered, between the legs painful. You are frowning and moaning in pain while strong <<dick>> centimeter dick fucks your pussy.'
		end

		if orgazm = 2:
			set horny -= 5
			set manna -= 5
			set willpower -= 5
			'You winced at the sudden pain when <<$nameV>> you entered, between the legs pain that gradually become calm and quite tolerable. Are you trying to get aroused while strong <<dick>> centimeter dick fucks your pussy, but you do not go out.'
		end

		if orgazm = 3:
			!set horny += 5
			set manna += 5
			set willpower += 5
			'You startled by the feeling that your pussy is stretched when <<$nameV>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy.'
		end

		if orgazm = 4:
			!set horny += 10
			set manna += 10
			set willpower += 10
			'You startled by the feeling that your pussy is stretched when <<$nameV>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then feeling a little decrease and remain until the end.'
		end

		if orgazm = 5:
			set horny = 0
			set manna += 15
			set willpower += 15
			set orgasm += 1
			'You flinched from a pleasant feeling when your pussy rastyagivatsya start taking a dick. Between the legs becomes very warm and pleasant, when strong <<dick>> centimeter dick fuck your pussy. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then the feeling came down on you and your whole body cover hot waves of orgasm, you can not help screaming pleasure writhing on edge.'
		end

		if orgazm = 6:
			set horny += 5
			set manna += 5
			set willpower += 5
			'You feel as a member enters your pussy when <<$nameV>> you entered. Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then feeling a little decrease and remain until the end.'
		end

		if vagina <= dick:set vagina += 1
	end

	if vagina = 0 and mesec <= 0:
		set horny = 0
		set manna -= 15
		set willpower -= 15
		set vagina += 1
		'You bite my lip in pain and tears gushed from his eyes when <<$nameV>> you entered, breaking your hymen. You moan while weeping and strong <<dick>> centimeter dick fucks your bloody pussy.'
	end

	if protect ! 1:
		!unprotected sex
		set finrand = rand(0, 1)

		if finrand = 0:
			!inside
			set cumpussy += 1
			'<<$nameV>> groaned and you feel like jet of sperm hit you inside your body.'

			if tabletki <= 0 and mesec <= 0:
				gs 'preg'
				set manna -= 15
				set willpower -= 15
				'Hell, because after all, you can fly, you thought with horror.'
			end
		end

		if finrand = 1:
			!out
			if pose = 0:
				set cumbelly += 1
				'<<$nameV>> groaned and removing a member of you finished your stomach.'
			end

			if pose = 1:
				set cumass += 1
				'<<$nameV>> groaned and removing a member of you finished on your ass.'
			end
		end
	end

	if protect = 1:
		set protect = 0
		'<<$nameV>> groaned and you realized that he had finished in the condom.'
	end

	set pose = 0
end

--- orgazm ---------------------------------