glife/locations/015_dinSex

# dinSex
$universalklient = {
	if klient_needs = 0:$klientwanttext = 'blow job'
	if klient_needs = 1:$klientwanttext = 'sex'
	if klient_needs = 2:$klientwanttext = 'anal'
	'<center><img src="images\etogame\park2.jpg"></center>'
	'You told the client that <<$klientwanttext>> will cost <<ProsMoney * 100>> rubles.'
	dynamic $dinprostable

	if vnpr >= 0:
		if ProsMoney = 1:
			clientPRyes = 1
		end

		if ProsMoney > 1:
			if KlientMON >= ProsMoney:
				if vnpr >= klienVNPR:
					clientPRyes = 1
				else

					clientPRyes = 0
				end
			end

			if KlientMON < ProsMoney:
				if vnpr >= klienVNPR:
					torgklirand = RAND(0,1)

					if torgklirand = 0:
						clientPRyes = 0
					end

					if torgklirand = 1:
						'Client grins and offers <<KlientMON*100>> per job.'

						act 'Agree':
							cla
							clientPRyes = 1
							ProsMoney = KlientMON
							dynamic $dinklient
						end

						act 'Refuse': gt 'prostitute','start'
						exit
					end
				else

					clientPRyes = 0
				end
			end
		end
	end

	if vnpr < 0: clientPRyes = 0
	dynamic $dinklient
}

$dinprostable = {
	vnpr = 0
	if vidage >= 40: vnpr -= 20
	if vidage >= 35 and vidage < 40: vnpr -= 10
	if vidage >= 30 and vidage < 35: vnpr -= 5
	if vidage >= 25 and vidage < 30: vnpr += 1
	if vidage >= 20 and vidage < 25: vnpr += 5
	if vidage >= 18 and vidage < 20: vnpr += 10
	if vidage < 18: vnpr += 15

	if vnesh = -10: vnpr -= 100
	if vnesh < 5 and vnesh>-10: vnpr -= 10
	if vnesh >= 5 and vnesh < 15: vnpr -= 5
	if vnesh >= 15 and vnesh < 30: vnpr += 1
	if vnesh >= 30 and vnesh < 50: vnpr += 5
	if vnesh >= 50: vnpr += 10

	if cumSUM > 0: vnpr -= 10

	if mop = 0: vnpr -= 10
	if mop = 1: vnpr -= 1
	if mop = 2: vnpr += 1
	if mop = 3: vnpr += 5
	if mop = 4: vnpr += 10

	if leghair <= 0: vnpr += 1
	if leghair > 0: vnpr -= 5

	if lobok > 0: vnpr -= 5
	if lobok <= 0: vnpr += 1

	if tan > 0: vnpr += 1

	if curly > 0: vnpr += 1

	if sweat > 0: vnpr -= 10

	if hapri = 0: vnpr -= 1

	if lip = 4: vnpr += 1

	!максимум 40
	!минимум -161
}


$dinklient = {
	if clientPRyes = 1:
		'Client you head nods and opens the door of his car.'
		if klient_needs = 0: dynamic $din_prost_bj
		if klient_needs = 1: dynamic $din_prost_sex
		if klient_needs = 2: dynamic $din_prost_anal
	end

	if clientPRyes = 0:
		'Client meticulously examined you and said, "No, fuck." After that, he started the car and drove away.'
		act 'Leave': gt 'prostitute','start'
	end
}


$din_prost_bj       = {
	act 'Get into the client machine':
		vidageday  -= 5
		set $nameV  = 'stranger'
		set $boy    = 'Client'
		set slutty += 1
		set dick    = RAND(12,21)
		set money  += ProsMoney * 100
		gt 'blowPR','start'
	end
}


$din_prost_sex = {
	act 'Get into the client machine':
		vidageday  -= 10
		set $nameV  = 'stranger'
		set $boy    = 'Client'
		set dick    = RAND(12,21)
		set money  += ProsMoney * 100
		set prosti  = 1
		set slutty += 1
		gt 'blowPR','start'
	end
}


$din_prost_anal = {
	act 'Get into the client machine':
		vidageday      -= 20
		gs 'boy'
		set prosti      = 2
		set analprotect = 0
		set slutty     += 1
		gt 'blowPR','start'
	end
}


$dinrandbj = {
	tperbjran = RAND(0,3)
	if tperbjran = 0:$tperbj = 'You cupped his <<$liptalk>> <<dick>> centimeter member.'
	if tperbjran = 1:$tperbj = 'You cupped his <<$liptalk>> purple head <<dick>> centimeter member'
	if tperbjran = 2:$tperbj = 'You spent your <<$liptalk>> on the head <<dick>> centimeter member and absorbed it into his mouth'
	if tperbjran = 3:$tperbj = '<<dick>> centimeter dick rested you in your <<$liptalk>>you have slightly opened them and let the dick in your mouth.'
	if tperbjran = 4:$tperbj = ''
	if tperbjran = 5:$tperbj = ''
	tperbjran2 = RAND(0,2)
	if tperbjran2 = 0:$tperbj2 = 'Your mouth is filled quickly turned slightly salty and hard cock which you started to suck.'
	if tperbjran2 = 1:$tperbj2 = 'In your mouth went hard and hot cock sucking you started'
	if tperbjran2 = 2:$tperbj2 = 'Hard cock filling your whole mouth, cupping his lips every move you to absorb his throat.'
	if tperbjran2 = 3:$tperbj2 = ''
	if tperbjran2 = 4:$tperbj2 = ''
	if tperbjran2 = 5:$tperbj2 = ''
	'<<$tperbj>>. <<$tperbj2>>'
}


$dinrandswallow = {
	tperswalrand = RAND(0,2)
	if tperswalrand = 0:$tperswal = 'Suddenly your mouth shot a jet of viscous semen.'
	if tperswalrand = 1:$tperswal = 'Cock twitched and jet of sperm flew between your lips into your mouth.'
	if tperswalrand = 2:$tperswal = 'Your mouth filled with sperm when dick between your lips began to finish.'
	tperswalrand2 = RAND(0,2)
	if tperswalrand2 = 0:$tperswal2 = 'Your mouth quickly filled with warm sperm and you feel its sharp taste.'
	if tperswalrand2 = 1:$tperswal2 = 'Cum filled your mouth and began to run down your <<$liptalk2>>'
	if tperswalrand2 = 2:$tperswal2 = 'Hot seed quickly filled mouth making your working experience the whole gamut and sharp tart taste of sperm.'
	tperswalrand3 = RAND(0,2)
	if tperswalrand3 = 0:$tperswal3 = 'You gulped and swallowed the sperm located in your working her mouth. In the mouth, the taste of semen left and felt her scent.'
	if tperswalrand3 = 1:$tperswal3 = 'You swallow warm cum fills your mouth and licked her <<$liptalk3>> licking the remnants of the seed with them.'
	if tperswalrand3 = 2:$tperswal3 = 'You swallowed viscous semen filling your mouth working, and then licked.'
	'<<$tperswal>> <<$tperswal2>> <<$tperswal3>>'
}


$dinrandfacial = {
}


$venerasiak = {
	if NoSTD = 0:
		tipvenerarand = RAND(0,10)

		if prezik > 0:
			venrand = RAND(0,1000)
			if venrand = 1000: dynamic $veneradinitog
		end

		if prezik <= 0:
			venrand = RAND(0,100)
			if venrand >= 80: dynamic $veneradinitog
		end
	end
}


$veneradinitog = {
	if tipvenerarand >= 8:
		!герпес
		set gerprand = RAND(0,100)

		if gerprand > 90:
			if GerpesOnce = 0: set GerpesOnce = 1
			Venera += 1
			Gerpes += 1
		end
	end

	if tipvenerarand = 7:
		!сифилис
		venerarand = RAND(0,100)

		if venerarand > 95:
			Venera += 1
			if SifacOnce = 0: SifacOnce = 1
			Sifilis += 1
		end
	end

	if tipvenerarand >= 5 and tipvenerarand < 7:
		!гонорея/трипер
		venerarand = RAND(0,100)

		if venerarand > 95:
			Venera += 1
			if TriperOnce = 0: TriperOnce = 1
			Triper += 1
		end
	end

	if tipvenerarand < 5:
		!кандидоз/молочница
		venerarand = RAND(0,100)

		if venerarand > 85:
			if KandidozOnce = 0: KandidozOnce = 1
			Kandidoz += 1
		end
	end
}


$sexstart = {
	set protect    = 0
	set vidageday -= 1

	if prezik > 0 and NoCondomUse = 0:
		!if tabletki <= 0 and prezik > 0 and NoCondomUse = 0:
		set prezik -= 1
		set protect = 1
		'<<$boy>> you took a condom and put it on his <<dick>> centimeter member.'
	end
}


$sexstart2 = {
	frost = 0

	if mesec > 0:
		!Menstruation makes orgasm impossible
		set horny = 0
		set manna -= 10
		set willpower -= 10
		'Mentruation blood slowly flows from your vagina while he fucks you. I´t feels painful and also pleasant. You moan while his <<dick>> centimeter dick fucks your pussy.'
	end

	if mesec <= 0 and vagina > 0:
		!No Menstruatsion
		!horny - excitement
		!vagina - vagina elasticity
		!silavag - male skill: 0-clumsy, 1-middle, 2-stud
		!dick - his penis size
		!orgazm - what kind of orgasm
		!0 - very painful, 1 - hurts, 2 - unpleasant, 3 - so-so, 4 - little orgasm, 5 - orgasm
		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:
			!член больше возможностей гг
			tempval = silavag * 10
			if horny >= (100 - tempval): set orgazm = 5
			if horny < (100 - tempval): set orgazm = 4
			if horny < (90 - tempval): set orgazm = 3
			if horny < (80 - tempval): set orgazm = 2
			if horny < (70 - tempval): set orgazm = 1
			if horny < (60 - tempval): set orgazm = 0
		end

		if dick <= prinat and dick >= vagina:
			!член меньше возможностей гг
			tempval = silavag * 10
			if horny >= (80 - tempval): set orgazm = 5
			if horny < (80 - tempval): set orgazm = 4
			if horny < (60 - tempval): set orgazm = 3
			if horny < (40 - tempval): set orgazm = 2
		end

		if dick <= prinat and dick < vagina:
			tempval = silavag * 10
			if horny >= (100 - tempval): set orgazm = 5
			if horny < (100 - tempval): set orgazm = 4
			if horny < (90 - tempval): set orgazm = 6
		end

		if orgazm = 0:
			vgape = 3
			vgapetime      = totminut
			set horny      = 0
			set manna     -= 15
			set willpower -= 15
			'You groaned in pain when <<$boy>> entered, tears flowed from your eyes and it feel like someone drove a red-hot rod in your vagina. You cry and moan while his <<dick>> centimeter dick fucks your pussy.'
		end

		if orgazm = 1:
			if vgape < 2: vgape = 2
			vgapetime      = totminut
			set horny     -= 10
			set manna     -= 10
			set willpower -= 10
			'You bite your lip in pain when <<$boy>> entered, it is very painful. You are (! frowning !) and moaning in pain while his <<dick>> centimeter dick fucks your pussy.'
		end

		if orgazm = 2:
			if vgape < 1: vgape = 1
			vgapetime      = totminut
			set horny     -= 5
			set manna     -= 5
			set willpower -= 5
			'You winced at the sudden pain when <<$boy>> entered, it hurt but it gradually become quite tolerable. You trying to get aroused while his <<dick>> centimeter dick fucks your pussy, but you did not manage.'
		end

		if orgazm = 3:
			set manna     += 5
			set willpower += 5
			'You are startled by the feeling when your pussy is stretched as <<$boy>> entered. It feels good when his <<dick>> centimeter dick fucks your pussy.'
		end

		if orgazm = 4:
			set manna     += 10
			set willpower += 10
			'You are startled by the feeling when your pussy is stretched as <<$boy>> entered. It feels good when his <<dick>> centimeter dick fucks your pussy. (! Pritnoe gradually grow warm and throbbing 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 is stretched by his dick. It feels good when his <<dick>> centimeter dick fucks your pussy. (! Pritnoe gradually grow warm and throbbing in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm !), you scream with pleasure.'
		end

		if orgazm = 6:
			set horny     += 5
			set manna     += 5
			set willpower += 5
			'You feel as his penis enters your pussy. (! Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Pritnoe gradually grow warm and throbbing 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 started to flow from your eyes when <<$boy>> entered, breaking your hymen. You moan while crying and his <<dick>> centimeter dick fucks your bloody pussy.'
	end
	if vagina < dick: vagina += 1
	sex += 1
}


$sexstart3 = {
	frost = 0
	if mesec > 0:
		!месячные, оргазм не возможен
		set horny      = 0
		set manna     -= 10
		set willpower -= 10
		'Do you monthly and while until you jump on the penis from the vagina slowly follows the blood. Painful sensations and pleasant. You moan while strong <<dick>> centimeter penis enters you.'
	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:
			if vgape < 3: vgape = 3
			vgapetime      = totminut
			set horny      = 0
			set manna     -= 15
			set willpower -= 15
			'You groaned in pain when sat on and felt like a member of <<$boy>> has entered into you. Tears streamed from his eyes and between my legs feeling as if you drove a red-hot rod. You shed tears while <<dick>> centimeter penis enters you.'
		end

		if orgazm = 1:
			if vgape < 2: vgape = 2
			vgapetime      = totminut
			set horny     -= 10
			set manna     -= 10
			set willpower -= 10
		'You bite my lip in pain when we got on the penis and felt like <<$boy>> entered into you, between your legs painful. You are frowning and moaning in pain while jumping on strong <<dick>> centimeter penis.'
		end

		if orgazm = 2:
			if vgape < 1: vgape = 1
			vgapetime      = totminut
			set horny     -= 5
			set manna     -= 5
			set willpower -= 5
			'You winced at the sudden pain when sat on and felt like a member of <<$boy>> has entered into you, between your legs pain that gradually become calm and quite tolerable. Are you trying to get aroused while jumping on strong <<dick>> centimeter term trahayaschim 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 sat on and felt like a member of <<$boy>> has entered into you. Between the legs gets a little nice when you jump on strong <<dick>> centimeter penis.'
		end

		if orgazm = 4:
			!set horny    += 10
			set manna     += 10
			set willpower += 10
			'You startled by the feeling that your pussy is stretched when sat on and felt like a member of <<$boy>> has entered into you. Between the legs gets a little nice when you jump on strong <<dick>> centimeter penis. Pritnoe gradually grow warm and throbbing 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 you jump on the strong <<dick>> centimeter penis. Pritnoe gradually grow warm and throbbing in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm, you involuntarily scream with pleasure writhing on elde.'
		end

		if orgazm = 6:
			set horny     += 5
			set manna     += 5
			set willpower += 5
			'You feel as a member enters your pussy when sat on and felt like a member of <<$boy>> has entered into you. Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Pritnoe gradually grow warm and throbbing 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 my eyes when we got on the penis and felt like <<$boy>> entered in you break your hymen. You Weep and moan until you jump on strong <<dick>> members of his bloody centimeter pussy.'
	end

	if vagina < dick: vagina += 1
	sex += 1
}


$sexudo = {
	set protect    = 0
	set vidageday -= 1
	frost          = 0

	if prezik > 0 and NoCondomUse = 0:
		!if tabletki <= 0 and prezik > 0 and NoCondomUse = 0:
		set prezik -= 1
		set protect = 1
		'<<$boy>> you took a condom and put it on your <<dick>> centimeter member.'
	end


	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:
		if vgape < 3: vgape = 3
		vgapetime         = totminut
		set horny         = 0
		set manna        -= 15
		set willpower    -= 15
		'You groaned in pain when <<$boy>> 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:
		if vgape < 2: vgape = 2
		vgapetime        = totminut
		set horny        -= 10
		set manna        -= 10
		set willpower    -= 10
		'You bite my lip in pain when <<$boy>> 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:
		if vgape < 1: vgape = 1
		vgapetime         = totminut
		set horny        -= 5
		set manna        -= 5
		set willpower    -= 5
		'You winced at the sudden pain when <<$boy>> 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 <<$boy>> 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 <<$boy>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy. Pritnoe gradually grow warm and throbbing 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. Pritnoe gradually grow warm and throbbing in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm, you involuntarily scream with pleasure writhing on elde.'
		end

		if orgazm = 6:
			set horny     += 5
			set manna     += 5
			set willpower += 5
			'You feel as a member enters your pussy when <<$boy>> you entered. Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Pritnoe gradually grow warm and throbbing 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 <<$boy>> you entered, breaking your hymen. You moan while weeping and strong <<dick>> centimeter dick fucks your bloody pussy.'
	end
	if vagina < dick: vagina += 1
	sex += 1

}


$sexcum = {
	frost = 0

	if protect ! 1:
		!Unprotected sex
		set finrand = RAND(0,1)

		if finrand = 0:
			!Inside
			set cumpussy += 1
			'<<$boy>> groaned and you feel a jet of sperm fill your pussy.'

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

		if finrand = 1:
			!Out

			if pose = 0:
				set cumbelly += 1
				'<<$boy>> groaned and after pulling out came on your stomach.'
			end

			if pose = 1:
				set cumass += 1
				'<<$boy>> groaned and after pulling out came on your ass.'
			end
		end
	end

	if protect = 1:
		set protect = 0
		'<<$boy>> groaned and you realized that he had came in the condom.'
	end
	set pose = 0
}


$analsex = {
	frost = 0
	if analplugin = 1:
		!WD: No Anal Lube if Anal Plug
		!analpluginbonus = 10
		lubonus    = 10
		analplugin = 0
		'<<$boy>> has pulled out of your ass plug'
	end

	if dick >=anus: set anus += 3
	'<<$boy>> began to massage your anus with his fingers.'

	if (lubonus = 0 and lubri > 0):
		lubri   -= 1
		lubonus += RAND(1,5)
		'You squeezed anal lube on your hand and began to smear it in your ass.'
		'Then you gave it to him and he smeared it on his dick'
	end

	if anus < 10: 'When he entered three fingers in your ass you groaned in pain.'
	if anus >= 10: 'He started to stretch your anus with three fingers.'
	'<<$boy>> pulled his fingers out of your ass and you felt his hard cock near your hole.'
	if anus + lubonus + 7 < dick: 'You screamed and bit your lip from a sharp pain when his <<dick>> centimeter dick entered your ass.'
	if anus + lubonus + 7 >= dick: 'You moaned when his <<dick>> centimeter dick entered your ass.'
	'<<$boy>> stopped for a moment, giving your ass time to adjust to his cock in it, and then started to slowly move, stretching your anus.'

	if anus + lubonus + 7 < dick:
		if mop > 1: set mop = 0
		horny -= 20
		manna -= 20
		if agape < 3: agape = 3
		agapetime = totminut
		'You cried and bit your lip when <<dick>> centimeter cock began to fuck your ass on (! full force !). Your ass felt like it was on fire and all you wanted was that this torture was over quickly.'

	elseif (anus + lubonus + 2 < dick) and (anus + lubonus + 7 >= dick):
		horny += 10
		if anal >= 10 and orgasm > 0: manna += 20

		if horny < 70:
			if agape < 2 and lubonus = 0: agape = 2
			if agepe < 2 and lubonus > 0: agape = 1
			agapetime = totminut
			'You started to moan rhythmically in time with the his cock movements inside you. You feel like your anus is stretched when his penis enters you.'
		end

		if horny >= 70:
			!if anal>=10 and orgasm>0:
			!manna+=20
			if agape < 1 and lubonus = 0: agape = 1
			agapetime = totminut
			'Slight pain with far exceeds your arousal and you moan rhythmically in time with the movements of a member within you'
			!'You moan in pleasure while his dick moves inside your ass.'
		end

	!anus + lubonus + 2 >= dick
	else
		horny += 20
		if anal >= 10 and orgasm > 0: manna += 20

		if horny < 70:
			if agape < 1 and lubonus = 0: agape = 1
			agapetime = totminut
			'You actively podmahivat guy and moans in time with the movement members inside you.'
		end

		if horny >= 70: 'Dick in your ass gives you an indescribable pleasure and you will enjoy every second of this sex.'
	end

	lubonus = 0
	!'Through some time man groaned and you feel like your ass fills a pleasant warmth.'
	anal += 1
}
--- dinSex ---------------------------------