glife/locations/039_ParkKafe

# ParkKafe

if $args[0] = 'food':
	if money < 100:
	'You do not have enough money for the cafe.'
	act 'Leave': gt 'park','start'
	exit
	end
set health += 10
set money -= 100
set manna += 5
set willpower += 5

	if energy >= 30:
	set fat += 5
	'You can no longer have.'
	end

	if energy >= 20 and energy < 30:
	set fat += 3
	set energy += 10
	'You pushed through the power of a meal.'
	end

	if energy < 20:
	set energy += 20
	set fat += 1
	'You gladly ate the food.'
	end

	if water >= 20:
	'Tea in you no longer climbs.'
	end

	if water < 20:
	'You gladly drank a mug of tea.'
	set water += 20
	end


'You sat at the table in summer cafe. Soon you brought your order.'
cla
Set arand = RAND(1,7)
if arand = 1: 'You look around and notice the cafe visitors strolling company <a href="exec: GT ''ParkKafe'',''youth''">Youth</a>'
if arand = 2: 'You look around and notice the cafe visitors sitting alone young <a href="exec: GT ''ParkKafe'',''guy''">Man</a>'
if arand = 3: 'You are viewing a cafe visitors and students notice campaign <a href="exec: GT ''ParkKafe'',''negros''">Africans</a>'
if arand = 4: 'You look around and notice the cafe visitors <a href="exec: GT ''ParkKafe'',''woman''">woman</a> imperious form'
if arand = 5: 'You look around and notice the cafe visitors solid <a href="exec: GT ''ParkKafe'',''man''">man</a> aged'
if arand = 6: 'You are viewing a cafe visitors and notice two <a href="exec: GT ''ParkKafe'',''Armenians''">Genocide</a> sitting at the table'
if arand = 7: 'You are viewing a cafe visitors and notice two <a href="exec: GT ''ParkKafe'',''boys''">sporty guys</a> sitting at the table and beer pschih'

act 'Leave': gt 'park','start'
end

if $ARGS[0] = 'boys':
cla
Set rrand = RAND(1,2)
	if rrand = 1:
	'You´re looking at them intently, but they think you do not notice.'
	act 'Go home': gt 'park','start'
	end
	if rrand = 2:
		if parkara > 0:
		'Jora Senya notice you, but continued to drink beer with friends.'
		act 'Leave': gt 'park','start'
		end
		if parkara = 0:
		'Your views were seen guys and one of them rolled up to you and asked to join them.'
		act 'Leave': gt 'park','start'
			act 'Drink beer with the guys':
			cla
			'You guys drank a glass of beer for guys ordered another. One of the guys that you quietly slipped it into the glass. You get drunk and you guys took in the nearest woods.'
			Set deyrand = RAND(1,2)
				if deyrand = 1:
				if parkara = 0: Set guy += 2 & Set parkara = 1
				Set sex += 1
				Set bj += 2
				Set cumlip += 2
				'Guys put you on your knees and take out their members. you do not understand what is going on at once both start sucking cock.'
				'<center><img src="images\klof\022.jpg"></center>'
				Set horand = RAND(1,100)
				if horand <= bj: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
				if horand > bj: Set horny += 10 & 'You were not satisfied'
				'They end up in your mouth, you swallow sperm greed'
				act 'Become acquainted': gt 'parkkafe','klof 1'
				end

				if deyrand = 2:
				if parkara = 0: Set guy += 2 & Set parkara = 1
				Set sex += 1
				set cumpussy += 1
				set vagina += 1
				set gang += 1
				Set cumass += 1
				anus += 1
				anal += 1
				'Guy fucks you in the pussy. Another time, too, does not lose his penis and shoves you in the ass.'
				'<center><img src="images\klof\004.jpg"></center>'
				Set horand = RAND(1,100)
				if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
				if horand > horny: Set horny += 10 & 'You were not satisfied'
				'One of them ends up in you, and the other is discharged you on your ass.'
				act 'Become acquainted': gt 'parkkafe','klof 1'
				end
			end
		end
	end
end

if $ARGS[0] = 'klof 1':
cla
*clr
set minut += 5
set klofQW = 1
clr
gs 'stat'
'<center><img src="images\klof\11 1.jpg"></center>'
'In rose from the grass in front of the guys legs and hands were shaking from sex between her legs itched all. "Did you like it baby?" asked one of the guys.'
act 'Yes': gt 'event','klof 2'
act 'Leave': gt 'park','start'
end




if $ARGS[0] = 'Armenians':
cla
Set rrand = RAND(1,2)
	if rrand = 1:
	'You´re looking at them intently, but they think you do not notice.'
	act 'Go home': gt 'park','start'
	end

	if rrand = 2:
	'Your views were seen by Armenians and one of them rolled to your table with a bottle of champagne.'
	act 'Leave': gt 'park','start'
		act 'Drink together':
		cla
		*clr
		'You drank champagne with Armenian. His friend moved smoothly for your table. You drank and made merry. You get drunk and Armenians took you into the back room cafe.'
		Set deyrand = RAND(1,2)
			if deyrand = 1:
			if parkarman = 0: Set guy += 2 & Set parkarman = 1
			Set bj+= 2
			Set cumlip += 2
			'Armenians put you on your knees and take out their mighty members. They dvoem poke them in your face, you start to suck at once both members.'
			'<center><img src="images\pics2\ara.jpg"></center>'
			Set horand = RAND(1,100)
			if horand <= bj: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
			if horand > bj: Set horny += 10 & 'You were not satisfied'
			'They end up in your mouth with laughter and go'
			act 'Leave': gt 'park','start'
			end

			if deyrand = 2:
			if parkarman = 0: Set guy += 2 & Set parkarman = 1
			Set sex += 1
			Set bj+= 1
			set gang += 1
			Set cumlip += 1
			Set cumass += 1
			vagina += 1
			'Armenians bend over you and puts you one cock in her mouth. Another time, too, does not lose his penis and shoves you into the vagina.'
			'<center><img src="images\pics2\ara2.jpg"></center>'
			Set horand = RAND(1,100)
			if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
			if horand > horny: Set horny += 10 & 'You were not satisfied'
			'One of them ends up in your mouth and swallow all causes, and the other is discharged you on your ass.'
			act 'Leave': gt 'park','start'
			end
		end
	end
end

if $ARGS[0] = 'man':
cla
set mrand = RAND(1,2)
if mrand = 1: 'You glanced surreptitiously at respectable man, but it seems you did not notice.'
act 'Leave': gt 'park','start'
	if mrand = 2:
	cla
	'A man walks up to you and invites you to dance.'
		act 'Dance':
		cla
		'He dances well and confidently leads you during the dance. After the dance, you sit down at a table with a man, he orders an expensive wine and various snacks, you relax with gallant compliments showered on you.'
		'Cavalier offers to go to the sauna.'
			act 'In the sauna':
			cla
			if saunasex = 0: Set saunasex = 1 & Set guy += 1
			Set sex += 1
			!Set oral += 1
			Set cumlip += 1
			Set cumass += 1
			set horny = 0
			vagina += 1
			'<center><img src="images\pics2\sauna.jpg"></center>'
			'In the sauna you two completely naked, have fun and enjoying yourself, gradually turns into a very passionate sex'
			if horny > 75: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
			if horny <= 75: Set horny += 10 & 'You were not satisfied'
			act 'Leave': gt 'street'
			end
		end
	act 'Leave': gt 'park','start'
	end

end

if $ARGS[0] = 'woman':
cla
'You glanced surreptitiously at the imperious woman, but it seems you did not notice.'
act 'Leave': gt 'park','start'
end

if $ARGS[0] = 'youth':
cla
Set rrand = RAND(1,2)
if rrand = 1:
'You looked at the campaign secretly laughing youth, but they seem to have overlooked.'
act 'Leave': gt 'park','start'
end
	if rrand = 2:
	'To you tipsy man approached and invited you to the company.'
	act 'Leave': gt 'park','start'
		act 'Company':
		cla
		'You sat at the table where walking cheerful and noisy group of young people, it was very fun and late night parties kompashka went to continue the fun at the apartment'
		act 'Leave': gt 'park','start'
			act 'To go along with all':
			cla
			*clr
			'<center><img src="images\pics2\Student.jpg"></center>'
			'You continued to splash out on the flat. Most went home, but the girl was left alone, and six guys. Guys started to kiss a girl and she sat on his knees in front of them boys got members, girl stroking their hands, and guys masturbate members on the girl´s face'
			act 'Leave': gt 'park','start'
				act 'Kneel down next to the girl in the lap of the guys':
				cla
				*clr
				set hour += 6
				if hour >= 22: Set hour = 22 & Set minut = 0
				set son -= 10
				if son < 02: Set son = 2

				if studentsex = 0: Set studentsex = 1 & Set guy += 6
				Set bj += 6
				Set cumlip += 6
				set swallow += 6
				'<center><img src="images\pics2\Student2.jpg"></center>'
				'Boys jerking off on your face, and you Girl caressed and kissed members finally the boys began to lower you in their mouths. Your co-worker also nakonchal mouthful, she turns to you with a mouth full of sperm and wants to kiss you.'
					act 'Kissing Girl':
					cla
					*clr
					'<center><img src="images\pics2\Student3.jpg"></center>'
					'You kiss a girl, you both mouthfuls of sperm and you are sharing it with a kiss, you finally get tired and you both swallow cum in your mouths.'
					act 'Leave': gt 'street'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'negros':
cla
Set rrand = RAND(1,2)
	if rrand = 1 or afra >= 1:
	'You glanced surreptitiously at the Africans, but they seem to have overlooked.'
	act 'Leave': gt 'park','start'
	end
	if rrand = 2 and afra = 0:
	Set afra = 1
	Set obs = 1
	'To fit your table a few Africans, they behave not quite restrained, talk a lot in English, grabs you by the back and chest. One of the Africans who introduced DeMarcus tells you that they are students from Africa and live in the dorm, so he tells you how to get to the hostel and find them.'
	act 'Leave': gt 'park','start'
	end
end

if $ARGS[0] = 'guy':
cla
Set rrand = RAND(1,2)
	if rrand = 1 or gosh = 1:
	'You secretly looked at the young boy, but it seems you did not notice.'
	act 'Leave': gt 'park','start'
	end
	if rrand =2 or gosh = 1:
	'You secretly looked at the young boy. Gosh it, but it seems you did not notice.'
	act 'Leave': gt 'park','start'
	end
	if rrand = 2 and gosh = 0:
	Set gosh = 1
	Set obs = 1
	'For your table fit young man and introduces himself as Gosha, you become acquainted with him, he is a student and lives in obschege. Ghosh tells you how to get to the hostel and how to find it.'
	act 'Leave': gt 'park','start'
	end
end
--- ParkKafe ---------------------------------