glife_t/locations/EvOtelMan

# EvOtelMan
$din_otel_man_end = {
	act 'Brush up':
		cls
		minut += 15
		gs 'stat'
		'Have you started to brush up. <<$bname>> stretched and rolled over on the bed. "It was great <<$name>>."'

		if cumface > 0:cumface = 0 & 'You found napkins and wiped off the face of the sperm.'
		if cumanus > 0:'Have you tried to wipe the cum with his buttocks, but how could you not wiped out of your anus still leaking sperm.'

		act 'Leave':gt 'vokzalG'

	end
}

$din_otel_man_blow = {
	act 'Squat':
		cls
		bj += 1
		if boynumBlock = 0:guy += 1
		if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
		sub += 1
		minut += 10
		bmBJ[Tboynum] += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/bj.jpg"></center>'
		'You squatted in front of the man and took his cock hand. Slightly moving the skin on the penis you licked the head. Your nimble tongue began to caress hot and hard cock male. <<$bname>> said "<<$name>>, I will soon be over."'

		act 'Suck':
			cls
			cumlip += 1
			minut += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/bj2.jpg"></center>'
			'You lips wrapped around his cock and started sucking carefully clasping his solid shaft <<$liptalk2>>. <<$bname>> groans and you feel like your mouth hits the jet of sperm.'

			act 'Sucking swallowing sperm':
				cls
				swallow += 1
				water -= 10
				minut += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/bj3.jpg"></center>'
				'You continued to suck cock and swallow cum sperm gets into your mouth. Semen was so much that you do not have time to swallow everything and it flows out of your mouth over the penis. Finally <<$bname>> ceases to finish and you get the dick out of your mouth smelling sperm. In the mouth, the taste of nasty cumshot obliznuvshis you realize that your <<$liptalk3>> wet with semen.'
				dynamic $din_otel_man_end
			end

			act 'Remove the mouth':
				cls
				cumface += 1
				facial += 1
				minut += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/bj4.jpg"></center>'
				'You remove a member from his mouth and jet of sperm immediately slapped you in the face. You shut his eyes for fear that the sperm gets into your eyes and feel as another spurt of hot Cum landed on your face.'
				dynamic $din_otel_man_end
			end
		end

		act 'Substitute ass':
			cls
			minut += 30
			cumanus += 1
			$boy = $bname
			bmANAL[Tboynum] += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/anal.jpg"></center>'
			dynamic $sexstart
			dynamic $analsex
			dynamic $din_otel_man_end
		end

		act 'Lie on your back.':
			cls
			minut += 30
			!!sex += 1
			$boy = $bname
			bmSEX[Tboynum] += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/sex.jpg"></center>'
			'You lay on your back. <<$bname>> lay on top and spread your legs.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			dynamic $din_otel_man_end
		end
	end
}

$din_otel_man_beforesex = {
	if horny < 75 and vagina = 0 and sex = 0 or dom > 0 and vagina = 0 and sex = 0:
		act 'I have a girl and a bank of virginity':
			cls
			minut += 5
			gs 'stat'
			tiprandeom = rand(0, 2)

			if tiprandeom < 2:
				'You have admitted that you are a man and a girl would want to keep their virginity. The man smiled and said that sex can be engaged and remaining girl. <<$bname>> took a cock from his pants.'
				dynamic $din_otel_man_blow

				if dom > 0:
					act 'Not even hope':
						cls
						sub += 1
						gs 'stat'
						'You laughed and refused to man. <<$bname>> scratching his head, "You want me to give you Piatihatki?"'

						act 'Come on':
							cls
							money += 500
							gs 'stat'
							'You reached your palm and the man gave you five hundred rubles.'
							dynamic $din_otel_man_blow
						end

						act 'Leave':gt 'vokzalG'

					end
				end
			elseif tiprandeom = 2:
				'<center><img src="images/qwest/alter/Ev/otel.jpg"></center>'
				'<<$bname>> interested, "Really? Are you a virgin? Piatihatki I will give you, if you show me your pussy"'

				if dom > 0:
					act 'Not even hope':
						cls
						sub += 1
						gs 'stat'
						'You laughed and refused to man. <<$bname>> scratching his head, "Well then, can pososesh? Piatihatki I''ll give you."'

						act 'Come on':
							cls
							money += 500
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/otel.jpg"></center>'
							'You reached your palm and the man gave you five hundred rubles.'
							dynamic $din_otel_man_blow
						end

						act 'Leave':gt 'vokzalG'
					end
				end

				act 'Show':
					cls
					sub += 1
					money += 500
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/kiska.jpg"></center>'
					'You undressed and showed her pussy man. He considered with interest you. "Cool. Listen. I''ll give you five pieces if you let me be your first boyfriend."'

					act 'Agree.':
						cls
						minut += 30
						!!sex += 1
						$boy = $bname
						bmSEX[Tboynum] += 1
						money += 5000
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/sex.jpg"></center>'
						'You stretched palm and man shaking hands you counted five thousand. After that <<$bname>> threw you on the bed and spread your legs.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						dynamic $din_otel_man_end
					end

					if dom > 0:
						act 'No, I''m going to stay a virgin until marriage':
							cls
							sub += 1
							gs 'stat'
							'You laughed and refused to man. <<$bname>> scratching his head, "Well then, can pososesh? Piatihatki I''ll give you."'

							act 'Come on':
								cls
								money += 500
								gs 'stat'
								'You reached your palm and the man gave you five hundred rubles.'
								dynamic $din_otel_man_blow
							end

							act 'Leave':gt 'vokzalG'
						end
					end

					act 'Leave':gt 'vokzalG'
				end
			end
		end
	end

	if dom >= 5 and StoryLine > 0:
		act 'Breeding for loot':
			cls
			sub += 1
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/otel.jpg"></center>'
			'You looked at the clock. "Well, we had a good time, but perhaps I''ll go. And then swear the nurse will not give money for lunch then." <<$bname>> You smiled, "I''ll give you three, it will suffice you for lunch?"'

			act 'Agree to have sex for money.':
				cls
				minut += 30
				!!sex += 1
				guy += 1
				$boy = $bname
				bmSEX[Tboynum] += 1
				money += 3000
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/sex.jpg"></center>'
				'You stretched palm and man shaking hands you counted three thousand. After that <<$bname>> threw you on the bed and spread your legs.'
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum
				dynamic $din_otel_man_end
			end

			if dom > 0:
				act 'Oral sex is the maximum':
					cls
					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/otel.jpg"></center>'
					'You laughed and denied the men said that blowjob is the maximum for which he can rely. <<$bname>> scratching his head, "No problem, I''ll give you Piatihatki."'

					act 'Come on':
						cls
						money += 500
						gs 'stat'
						'You reached your palm and the man gave you five hundred rubles.'
						dynamic $din_otel_man_blow
					end

					act 'Leave':gt 'vokzalG'
				end
			end
		end
	end

	act 'Next.':
		cls
		minut += 30
		!!sex += 1

		if boynumBlock = 0:guy += 1
		if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1

		$boy = $bname
		bmSEX[Tboynum] += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/sex.jpg"></center>'
		'<<$bname>> threw you on the bed and spread your legs.'
		dynamic $sexstart
		dynamic $sexstart2
		dynamic $sexcum
		dynamic $din_otel_man_end
	end
	 if dom > 0:dynamic $din_otel_man_blow
}
music_on = 0
minut += 15
gs 'tboyopr'
gs 'stat'

if DPtipe = 1:
	'A man walked up to standing next to the club and exchange a taxi driver with him a few words turned to you. "<<$name>> go." You with the man got into a taxi and quickly drove to the hotel. The man led you to your room.'
	act 'Walk into the room':
		cls
		BeInOtel += 1
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/otel.jpg"></center>'
		'The room was quite decent. The man went to the fridge and began to spread on the table. Misted bottle of whiskey servilat banking caviar, fruit plate. Laying everything on the table, the man tripped you a chair on which you sat. He sat in the chair next to you and poured whiskey glasses. "Well, let''s drink to <<$name>> acquaintance. I''m so glad to have met such a beautiful and wonderful girl like you."'

		act 'Have a drink':
			cls
			horny += 20
			alko += 2
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
			'You drank with the man and he got up from his chair walked up to you. His lips began to kiss your hands and began to pull off your clothes.'
			dynamic $din_otel_man_beforesex
		end
	end
end

if DPtipe = 2:
	'A man walked up to standing next to the club and exchange a taxi driver with him a few words turned to you. "<<$name>> go." You with the man got into a taxi and quickly drove to the hotel. The man led you to your room.'
	act 'Walk into the room':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
		'You entered the room and closed the door barely a man as he stared at you with a kiss, and his hands began to fumble through your body trying to steal your clothes.'

		dynamic $din_otel_man_beforesex
	end
end

--- EvOtelMan ---------------------------------