glife/locations/020_orgazm

# orgazm
if $ARGS[0] = 'start':
!set protect = 0
set vidageday -= 1
frost = 0
	if tabletki <= 0 and prezik > 0 and prosta = 0 and NoCondomUse = 0 and usecondom = 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 and NoCondomUse = 0 and usecondom = 0:
	set prezik -= 1
	set protect = 1
	end

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

	if mesec > 0:
	!месячные, оргазм не возможен
	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:
	!месячных нет
	!horny - возбужденность
	!vagina - эластичность вагины
	!silavag - умение парня 0-неумеха, 1-середняк 2-ебарь
	!dick - размер члена парня
	!orgazm - коэфициент удовольствия Итог
	!0 - очень больно, 1 - больно, 2 - не приятно, 3 - так себе, 4 - недооргазм 5 - оргазм
	set smazka = horny/10
	set prinat = smazka + vagina
		if dick >= prinat * 2:
		!член критично больше возможностей гг
			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:
		!член больше возможностей гг
			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:
		!член меньше возможностей гг
			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:
	!не защищенный секс
	set finrand = RAND(0,1)
		if finrand = 0:
		!внутрь
		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:
		!наружу
			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 ---------------------------------