# etoexhib
CLOSE ALL
$metkaM = $ARGS[0]
$locM = $CURLOC

if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/solar1.jpg"></center>'
	'You walk into the room with the solarium. The room is quiet and with dim lights, seems like there is nobody in the solarium except for the administrator. You look at the door.'

	act 'Close the door':
		cla
		*clr
		'<center><img src="images/etogame/solar8.jpg"></center>'
		'You locked the door and stripped naked, arranging yourself in the solarium, lying on your stomach.'

		act 'Next':
			cla
			*clr
			manna += 10
			gs 'stat'
			'<center><img src="images/etogame/solar9.jpg"></center>'
			'You are tanned and relaxed. Satisfied, you go out of the solarium and dressed out into the hall salon.'

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

	act 'Leave the door slightly open':
		cla
		*clr
		manna += 10
		horny += 10
		gs 'stat'
		'<center><img src="images/etogame/solar1.jpg"></center>'
		'You decide to fool around a bit and leave the door for the room open. You start to slowly undress, when you take your bra off and exposes your breasts, long chills run through your bare back. Now, all of a sudden, anybody could go inside the room and see my breasts, what they would think of me?'

		act 'Undress':
			cla
			*clr
			horny += 10
			gs 'stat'
			'<center><img src="images/etogame/solar2.jpg"></center>'
			'You continue to undress and now your ass is naked bare. Suddenly, you have a feeling that someone is watching you. Your breath quickens, and waves of excitement run thought your body. If someone is really spying on you, you need to strip sexy as possible . You do not know why, it just orders from your feminine nature.'

			act 'Undress everything':
				cla
				*clr
				horny += 10
				gs 'stat'
				'<center><img src="images/etogame/solar4.jpg"></center>'
				'You undressed and went naked into the solarium. There is just a person on the door looking at you. Of curiosity, you attach your legs and bent them to the side , peering into the darkness of the slightly open door. You can actually see and hear the shadow sniffing. There is no doubt, someone is obviously watching you. From the realization that someone is watching you, and that you are lying completely naked, your body begins to tremble. There is a pleasant feeling in the abdomen. You get so excited to the point that you start to spread your legs in different directions. To the joy of the mysterious stranger.'

				act 'Spread your legs ':
					cla
					*clr
					horny += 10
					gs 'stat'
					'<center><img src="images/etogame/solar5.jpg"></center>'
					'"I spread my legs as lustful bitch. What did he think of me. Maybe he´s not alone, and all the staff had already escaped to look at me. Lord, and suddenly they shoot me on camera, and tomorrow I´ll be all over the internet." - Thoughts rushing through your head, but the excitement is high and there is no strength to stay.'

					act 'Masturbate':
						cla
						*clr
						horny += 20
						gs 'stat'
						'<center><img src="images/etogame/solar6.jpg"></center>'
						'You start furiously rubbing your pussy to finally finish your shameless adventure. Gradually, you get excited to such an extent that you can not hold back anymore. You start to moan and push your labia with your fingers, showing your pussy to a stranger in all it''s glory.'

						act 'Next':
							cla
							*clr
							orgasm += 1
							horny -= 50
							manna += 200
							if exhibi = 2:exhibi = 3
							gs 'stat'
							'<center><img src="images/etogame/solar7.jpg"></center>'
							'Finally, you cover yourself in a powerful orgasms and you became exhausted. Also,you can not hear the sniff any more, it seems the secret observer finished with you.'
							''
							'Gradually you come to your senses, get dressed,and get out of the booth.'

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

if $ARGS[0] = 'pos2':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1dachi.jpg"></center>'
	'You walked through the alleys. Basically,this society is not very populated. Occasionally there are gardeners picking around the region. You hear the clank of a saw somewhere in the outskirts of the forest. At the end of the alley is an artificial reservoir. There are some areas with houses for sale.'

	if etoexhib = 0:'You do not know anybody here and the truckers do not developed any opinion about you.'
	if etoexhib = 10:'Start at <a href="exec:gt ''etoexhib'', ''pos9''">clang saws</a>.'

	act 'Go to the forest':gt 'etoexhib', 'pos3'
	act 'Go down to the lake':gt 'etoexhib', 'pos16'

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos3':
	cla
	*clr
	minut += 5
	gs 'stat'
	foresrand = rand(1, 100)
	'<center><img src="images/etogame/1fores.jpg"></center>'
	'Livstvenny forest.'

	if foresrand < 30:
		cla
		*clr
		'<center><img src="images/etogame/1fores.jpg"></center>'
		'Greenwood forest.'
		'You can see the mushroom picker far way from you.'

		act 'Get his attention':gt 'etoexhib', 'pos4'
	elseif foresrand > 90 and exhibi > 2:
		cla
		*clr
		'<center><img src="images/etogame/1fores.jpg"></center>'
		'Greenwood forest.'

		act 'Undress':gt 'etoexhib', 'pos5'
	end

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos4':
	cla
	*clr
	minut += 5
	gs 'stat'
	'You are waving for the mushroom-picker and he stopped looking at you.'

	act 'Show your pussy':
		cla
		*clr
		minut += 5
		horny += sub

		if exhibi = 2:exhibi = 3

		gs 'stat'
		'<center><img src="images/etogame/2fores.jpg"></center>'
		'Smiling, you show the mushroom-picker your pussy. He stops in his tracks and stares at you, not knowing wha''s happening.'

		act 'Leave':gt 'dachi'
	end
end

if $ARGS[0] = 'pos5':
	cla
	*clr
	minut += 5
	horny += sub

	if exhibi = 3:exhibi = 4

	gs 'stat'
	'<center><img src="images/etogame/3fores.jpg"></center>'
	'I stripped down to goal and went for a walk in the woods. His heart was pounding in my chest. Fresh air, gentle warm breeze caresses me. Summer ... sun warms me. When it was, I thought that freeze quickly, but baking hot summer sun prompted that I´m wrong. Thought at all. I is not lost. Clothing left on earth, and if I do not find you! Here are collected only pickers. But if I povstechayu them? Which is a shame! Stumbled on a good clearing. The wind died.'

	act 'Next':
		cla
		*clr
		'<center><img src="images/etogame/4fores.jpg"></center>'
		'Lie down and soak in a meadow naked. So anyone not met. Good or bad - it was nice, though a little extreme. Well, all I plan fulfilled. You need to go back and find the clothes.'

		act 'Leave':gt 'dachi'
	end
end

if $ARGS[0] = 'pos6':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><img src="images/etogame/rodnik.jpg"></center>'
	'Spring water.'

	act 'Have a drink':
		if water >= 20:
			'You are not thirsty.'
		elseif water < 20:
			water += 20
			cumspclnt = 2
			gs 'cum_cleanup'
			fbreath = 0
			'You gladly drank spring water.'
		end

		act 'Leave':gt 'dachi'
	end
end

if $ARGS[0] = 'pos7':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><img src="images/etogame/stolbik.jpg"></center>'
	'Also funny inscriptions on the column and have useful information.'
	'Aunt Nina 3 alley sells goat milk 300 rubles/liter'

	if money >= 300 and energy < 70:
		act 'Buy milk':
			cla
			*clr
			money -= 300
			minut += 30
			frost = 0
			health += 10
			manna += 20
			gs 'stat'
			fat += 1
			energy += 40
			water += 40
			'You gladly drank goat''s milk.'

			act 'Leave':gt 'dachi'
		end
	elseif money >= 300:
		'You feel too full to drink such thick and creamy milk at the moment.'
	end

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos8':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><img src="images/etogame/dachakuz.jpg"></center>'
	'Neighbor''s cottage.'

	if etoexhib < 10:
		act 'Apply neighbors':
			cla
			*clr
			minut += 15
			etoexhib = 10
			gs 'stat'
			'<center><img src="images/etogame/kuzmich.jpg"></center>'
			'You:-Hello! <<$name>>, I´m your new neighbor, we are familiar with.'
			'Neighbour:- Hello. I''m all Kuzmich. So be neighbors.'
			'<font color="magenta"> You:- Can you help me, you know my whole garden was overgrown with weeds. And so I would like to bring it up</font>.'
			'Kuzmich:- Well, hire local men. They''ll all plowed. Bestolku still stagger through the alleys.'

			act 'Leave':gt 'dachi'
		end

		act 'Leave':gt 'dachi'
	end

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos9':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><img src="images/etogame/dachastroy.jpg"></center>'
	'Country house under construction. By construction workers go and drag the board.'

	act 'Ask workers to excavation':
		cla
		*clr
		minut += 15
		gs 'stat'
		'<center><img src="images/etogame/dachastroy.jpg"></center>'
		'You:-Hello! I need to dig up the garden. You take? And how much will it cost?'
		'Work:- shoveled. 3000 agree.'

		act 'Agree':
			cls
			etoexhib = 11
			gs 'stat'
			'<center><img src="images/etogame/dachastroy.jpg"></center>'
			'You agreed with the workers that they will put in order your vegetable garden.'

			act 'Leave':gt 'dachi'
		end

		act 'Leave':gt 'dachi'
	end

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos10':
	cla
	*clr
	minut += 30
	horny += 10
	temp = daystart
	etoexhib = 12
	gs 'stat'
	'<center><img src="images/etogame/dachabust.jpg"></center>'
	'You went out into the garden and going to work, asked:'
	'- Well, boys? How´s it going?'
	'- Normally, the hostess. We make the best possible way.'

	act 'Leave':gt 'dachamy'
end

if $ARGS[0] = 'pos11':
	cla
	*clr
	minut += 15
	etoexhib = 13
	horny += 10
	temp = daystart
	gs 'stat'
	'<center><img src="images/etogame/dachaex.jpg"></center>'
	'You pretend to hang clothes to dry. You can see that through the mall on the site to swarm your neighbor Kuzmich and stole glances at you. Lightly knotted robe is not able to hide your appetizing forms. But, you do not hide them, and give your neighbor enjoy the beauty.'

	act 'Go home':gt 'dachamy'
end

if $ARGS[0] = 'pos12':
	cla
	*clr
	minut += 15
	horny += 10
	gs 'stat'
	'<center><img src="images/etogame/dachabust2.jpg"></center>'
	'Going out in the garden, you heard talk of workers and decided to overhear him.'
	'- A landlady is hot. Saw her in her robe paced the kitchen garden - just fire!'
	'- I would vdul!'
	'- Yeah, okay. Dreaming. This city bitch you can not handle!'
	'- I''m telling you, she needed a good fuck, and that''s what it is in our backwoods forgot!'
	'- Okay, good tryndet.'

	act 'Approach to work':
		cla
		*clr
		minut += 15
		gs 'stat'
		'<center><img src="images/etogame/dachabust3.jpg"></center>'
		'You:- General Hello! I see the work is progressing, but somehow slow. Nimble need guys!'
		'Work:- So after we had no advance work. Motivation need hostess.'

		act 'Disagree':
			cls
			etoexhib = 15
			temp = daystart
			gs 'stat'
			'<center><img src="images/etogame/dachabust3.jpg"></center>'
			'<font color="magenta">You:- While all do, do not get anything</font>.'

			act 'Leave':gt 'dachi'
		end

		act 'Accept and give half the amount':
			cls
			money -= 1500
			etoexhib = 14
			temp = daystart
			gs 'stat'
			'<center><img src="images/etogame/dachabust3.jpg"></center>'
			'Well, here''s a half. But in order for tomorrow morning is all finished.'

			act 'Leave':gt 'dachi'
		end
	end

	act 'Leave':gt 'dachi'
end

if $ARGS[0] = 'pos13':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/etogame/dachagang.jpg"></center>'
	'You get up in the middle of the vegetable garden and begin to undress.'
	'The guys eyes on the forehead climb from such a spectacle.'
	'- <font color="magenta"> Boys, you did a good job and deserve a reward!</font>'

	act 'Undress completely':
		cla
		*clr
		gs 'stat'
		'<center><img src="images/etogame/dachagang1.jpg"></center>'
		'You stripped naked and stand podmanivaya to his guys.'
		'- <font color="magenta"> Well, I do 100% percent discount?</font>'

		act 'Surrender':
			cla
			*clr
			minut += 120
			etoexhib = 16
			horny += 50
			gang += 1
			spafinloc = 4
			gs 'cum_manage'
			spafinloc = 12
			gs 'cum_manage'
			vagina += 1
			gs 'stat'
			'<center><img src="images/etogame/dachagang4.jpg"></center>'
			'Boys pounced on you and after a brief caresses have become eagerly in all holes.'
			horand = rand(1, 100)

			if horand > horny:horny += 10 & 'You were not satisfied'
			if horand <= horny:set horny = 0 & orgasm += 1 & 'You covered orgasm'

			'When it was over, you raised your clothes, put on shorts and ran into the house.'

			act 'Next':gt 'dachain'
		end
	end
end

if $ARGS[0] = 'pos14':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/etogame/dachagang2.jpg"></center>'
	'Drunk guys have surrounded you on all sides.'
	'- Look, here is our princess! You´re just in time for beauty, and come on guys, our hostess present to love!'
	'You:- <font color="magenta">What are you doing?/font> '

	act 'Next':
		cla
		*clr
		gs 'stat'
		'<center><img src="images/etogame/dachagang3.jpg"></center>'
		'The Guys grabbed you and they started to undress and grope you.'

		act 'Surrender':
			cla
			*clr
			minut += 120
			etoexhib = 16
			horny += 50
			gang += 1
			spafinloc = 4
			gs 'cum_manage'
			spafinloc = 12
			gs 'cum_manage'
			vagina += 1
			gs 'stat'
			'<center><img src="images/etogame/dachagang4.jpg"></center>'
			'Boys pounced on you and after a brief caresses have become eagerly in all holes.'
			horand = rand(1, 100)

			if horand > horny:horny += 10 & 'You were not satisfied'
			if horand <= horny:set horny = 0 & orgasm += 1 & 'You covered orgasm'

			'When it was over, you took your clothes, put on shorts and ran into the house.'

			act 'Next':gt 'dachain'
		end
	end
end

if $ARGS[0] = 'pos15':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/etogame/rinokplug.jpg"></center>'
	'You feel good, even the heady scent of expensive men''s toilet water. Abdomen instantly "zazudelo" passed through the body heat of excitement.'
	'Rear guy standing with a purpose - he was an amateur feel ladies and now intended to touch your ass.'
	'A hand in the meantime turned and lay a hand on one of the halves of your ass.'

	act 'Move away':gt 'rinok', 'start'

	act 'Stand':
		cla
		*clr
		minut += 10
		orgasm += 1
		horny = 0

		gs 'stat'
		'<center><img src="images/etogame/butplag.jpg"></center>'
		'Fart guy "victim" showed no displeasure, and his actions were closed from others, people were spitting at him, groaning under the heat.'
		'He moved his hand to the other, "bun", stopped in the middle, a little below. Little by little began to squeeze her ass in his hands. "Victim" did not react. Then he began to push his fingers through the fabric skirt depth to tubercle between the legs.'
		'He felt that the "victim" was startled, but not surprise. He was also experienced, he realized that the lady was excited and already "floats".'
		'You really sailed. You were already are beyond themselves. You want a guy climbed under her skirt and put cock ... Sensations captured you, excitement overwhelmed. You to keep from start to groan and moan ...'
		'A man, meanwhile, pulled her skirt up, got a hand to cut and skillful movement got under her skirt. His hand was on the low damp with sweat ass and fingers touched anal tube between his legs.'
		'You even slightly shaken; nobody noticed in the crush, besides the tempter. He paused a little, seems shocked by the fact that the girl here and so can walk around without panties on the market and with a stopper in the ass.'
		'In my head you have circled all, you were at the peak of the excitation; a little more - and you''ll end up.'
		'The guy certainly was not enough. He penetrated into the vagina with your fingers, and began their input and output. And then you began to tremble, made a few noisy, deep breaths, and fingers guy stood out moisture.'
		'- Wow! ... - The guy did not expect such a reaction from the ladies, and even struhnul that it can "kindle".'
		'Indeed, one woman approaching retirement age asked you:'
		'- Devonki, you feel bad?'
		'- No, thank you, everything is gone - gather strength answered you.'
		'Apparently startled woman pervert. As for you, no one stood.'

		act 'Next':gt 'rinok', 'start'
	end
end

if $ARGS[0] = 'pos16':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Lake</font></b></center>'
	'<center><img src="images/etogame/lake.jpg"></center>'

	if temper >= 20 and bikini > 0 and hour >= 6 and hour <= 20:
		act 'Swim with a swimsuit':
			cla
			*clr
			cumspclnt = 4
			gs 'cum_cleanup'
			minut += 60
			sweat = -3
			manna += 5
			willpower += 5

			if stren < 30:stren += 1

			'<center><img src="images/pics/swim.jpg"></center>'
			'You swim in the lake, the water refreshes and invigorates.'

			act 'Get out of the water':gt 'etoexhib', 'pos16'
		end
	end

	if temper >= 20 and hour >= 6 and hour <= 20:
		act 'Swim naked':
			cla
			*clr
			cumspclnt = 4
			gs 'cum_cleanup'
			minut += 60
			sweat = -3
			manna += 5
			willpower += 5
			horny += 10

			if stren < 30:stren += 1

			'<center><img src="images/etogame/lakenude.jpg"></center>'
			'You swim in the lake completely naked, the water refreshes and invigorates you.'

			act 'Get out of the water':gt 'etoexhib', 'pos16'
		end
	end

	act 'Return to the alley':gt 'etoexhib', 'pos2'
end

if $ARGS[0] = 'pos17':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">community center</font></b></center>'

	if hour >= 9 and hour < 20:
		'<center><img src="images/etogame/dk.jpg"></center>'
		'On Fridays, Saturdays and Sundays from 20.00 to 23.00 dances. Entrance 25 rubles.'
	elseif hour >= 20 and hour <= 23:
		'<center><img src="images/etogame/dk_night.jpg"></center>'
		'At the entrance to the recreation center full of young people, the guys are just standing and smoking, joking and someone looking out for. Girls in groups of 2-3 people, discussing something, someone just thumps in the bushes.'

		act 'Sign in here':money -= 25 & minut += 15 & gt 'etoexhib', 'pos18'
	end

	act 'Go back to the train station':gt 'gorodok'
end

if $ARGS[0] = 'pos18':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Disco</font></b></center>'

	if hour < 23:
		temp = rand(1, 100)

		if temp >= 1 and temp < 35:
			minut += 30
			'<center><img src="images/etogame/club_yaho.jpg"></center>'
			'On the dance floor full of people. All dancing and having fun.'

			act 'Dance':
				cla
				*clr
				minut += 30
				fat -= 1

				if dance < 50 and agil >= dance:dance += 1

				manna += 10
				willpower += 10
				frost = 0
				'<center><img src="images/etogame/club_dance.jpg"></center>'
				'The music is quite old, but catchy. And you''ll have fun circling dance, paying no attention to anyone.'

				act 'Next':gt 'etoexhib', 'pos18'
			end

			act 'Next':gt 'etoexhib', 'pos18'
		elseif temp >= 35 and temp < 65:
			minut += 30
			'<center><img src="images/etogame/club_pusto.jpg"></center>'
			'On the dance floor is unoccupied. Cold and sad. You ucazhivaetes free space.'

			if temp >= 35 and temp < 65:
				'Here and there some kid running around with a camera and takes a picture of girls.'

				act 'Pose for the photographer':
					cla
					*clr
					gs 'stat'

					if alko < 3 and vnesh >= 20 and vnesh < 120:
						'<center><img src="images/etogame/club_foto.jpg"></center>'
						'You poziruete for "beginner" photographer, trying to look as attractive as possible.'

						act 'Next':gt 'etoexhib', 'pos18'
					elseif alko < 3 and vnesh >= 120:
						temp = rand(1, 2)

						if temp = 1:'<center><img src="images/etogame/club_foto1.jpg"></center>'
						if temp = 2:'<center><img src="images/etogame/club_foto2.jpg"></center>'

						'You poziruete for a novice photographer, trying to look as attractive as possible.'

						act 'Next':gt 'etoexhib', 'pos18'
					end

					if horny > 10 and alko > 1:
						'<center><img src="images/etogame/club_glam.jpg"></center>'
						'You push your foot on the table. You thought that photo was so erotic.'
					end
				end

				act 'Next':gt 'etoexhib', 'pos18'
			end
		elseif temp >= 65 and temp <= 100:
			minut += 30
			'<center><img src="images/etogame/club_yaho1.jpg"></center>'
			'On the dance floor full of people. All dancing and having fun.'

			act 'Dance':
				cla
				*clr
				minut += 30
				fat -= 1

				if dance < 50 and agil >= dance:dance += 1

				manna += 10
				willpower += 10
				frost = 0
				'<center><img src="images/etogame/club_dance.jpg"></center>'
				'The music is quite old, but catchy. And you''ll have fun circling dance, paying no attention to anyone.'

				act 'Next':gt 'etoexhib', 'pos18'
			end

			act 'Next':gt 'etoexhib', 'pos18'
		end
	else
		'The Club closes, The lights go off, the music fades and everyone begins to diverge.'
	end

	act 'Go outside':gt 'etoexhib', 'pos17'
end

if $ARGS[0] = 'pos19':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Reception</font></b></center>'
	'<center><img src="images/etogame/ptu_holl.jpg"></center>'
	'Lyceum entrance hall. It''s pretty clean and quiet. There is a desk and office for the personnel department. On the wall hangs a timetable.'

	if workPTU = 2:
		cls
		manna -= 100
		workPTU = 1
		teachlevel = 0
		gs 'stat'
		'<center><b><font color="maroon">Direction</font></b></center>'
		'<center><img src="images/etogame/ptu_angdir.jpg"></center>'
		'What a shame, <<$name>>! You are a disgrace to the honourable profession of teaching! You have no place in our ranks! Take your documents and leave, you are fired!'

		act 'Next':gt 'etoexhib', 'pos20'

		exit
	end

	if teachlevel = 0:'You could not teach yourself out of a paper bag, you are embarrassingly terrible at teaching.'
	if teachlevel >= 1 and teachlevel < 10:'You do not deserve to be a teacher.'
	if teachlevel >= 10 and teachlevel < 20:'You are only as good as a young, inexperienced intern.'
	if teachlevel >= 20 and teachlevel < 30:'You already have a certain reputation.'
	if teachlevel >= 30 and teachlevel < 50:'You are a respectable teacher.'
	if teachlevel >= 50 and teachlevel < 70:'The other teachers turn to you for advice.'
	if teachlevel >= 70 and teachlevel < 90:'Your experience and knowledge is known outside the Lyceum.'
	if teachlevel >= 90:'You are the personification of education.'

	if workPTU > 2:
		act 'Go to the corridor on this floor':gt 'etoexhib', 'pos22'
		act 'Go to the second floor corridor':gt 'etoexhib', 'pos23'
		act 'Go to the third floor corridor':gt 'etoexhib', 'pos24'
	elseif workPTU ! 1:
		act 'Visit the personnel department.':
			if workPTU > 2:
				cla
				*clr
				minut += 5
				gs 'stat'
				'<center><b><font color="maroon">Personnel department</font></b></center>'
				'<center><img src="images/etogame/ptu_cadr.jpg"></center>'

				act 'Resign':
					cla
					workPTU = 0
					'You have resigned and no longer work her.'

					act 'Leave the personnel department':gt 'etoexhib', 'pos19'
				end

				act 'Leave the personnel department':gt 'etoexhib', 'pos19'
			elseif workPTU = 0:
				cla
				*clr
				minut += 15
				gs 'stat'
				'<center><b><font color="maroon">Personnel department</font></b></center>'
				'<center><img src="images/etogame/ptu_cadr.jpg"></center>'
				'"Hello!" Welcomes the personnel woman. She tells you that they need a certified teacher. Working days are Monday to Saturday from 14.00 to 16.00. Payment 300 rubles per day, plus a room in a hostel. Terms of piecework, because for full salary, at the moment, there is no free bets. Strict dress code, business. Also not recommended for bright makeup, strong perfume.'

				if diplom = 0 and fakediplom < 0:
					'You are told that you can not take a job without a diploma of higher pedagogical education.'
					fakediplom = 2
				elseif diplom = 1 or fakediplom = 1:
					act 'Pass an interview for a job':
						cla
						*clr
						minut += 60
						gs 'stat'
						'<center><b><font color="maroon">Human Resource Department</font></b></center>'
						'<center><img src="images/etogame/ptu_cadr.jpg"></center>'
						'You have passed oral interview, left a copy of diploma and other documents in the personnel department, where you are told that you can take to work.'

						act 'Employability teacher':
							cla
							workPTU = 3
							teachlevel = 16
							'You brought the work book and said that you could go to work the next business day.'

							act 'Exit to Hall':gt 'etoexhib', 'pos19'
						end
					end
				end

				act 'Exit to Hall':gt 'etoexhib', 'pos19'
			end
		end
	end

	act 'On the street':gt 'etoexhib', 'pos20'
end

if $ARGS[0] = 'pos20':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">High School</font></b></center>'
	'<center><img src="images/etogame/lizey.jpg"></center>'
	'On the door hangs a listing:"Vocational School students is on the basis of 11 years of schooling in the field of:(a comprehensive list). Besides, conducted training of the employees of enterprises. The college created optimal conditions for personal and professional formation of students, there is a modern material base. "'

	if workPTU > 2:'Sport <a href="exec:gt ''etoexhib'', ''pos21''">space.</a>'

	if teachlevel > 0 and teachlevel < 10:workPTU = 2

	act 'Enter the Lyceum':gt 'etoexhib', 'pos19'
	act 'Leave':gt 'gorodok'
end

if $ARGS[0] = 'pos21':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Playground</font></b></center>'
	'<center><img src="images/etogame/stadion.jpg"></center>'
	'You see all that remains of a football field. Pathetic. Nevertheless, the guys are still having fun playing football here.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		gs 'stat'
		'<center><img src="images/etogame/ptu_fight.jpg"></center>'
		'You see a group of girls, mock bedridden man.'

		act 'Intercede for Man':
			cls
			teachlevel += 1
			'- What are you doing? Immediately stop, I''ll call the police! Throws at you girls. And they snort:"Asshole, are to blame!" leave the guy alone.'
			'You a good example by helping the helpless man. This will positively impact your reputation.'

			act 'Next':gt 'etoexhib', 'pos21'
		end

		act 'Disregard':gt 'etoexhib', 'pos21'
	end

	act 'Back':gt 'etoexhib', 'pos20'
end

if $ARGS[0] = 'pos22':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Corridor (1st floor)</font></b></center>'
	'<center><img src="images/etogame/ptu_1korr.jpg"></center>'
	'On the first floor there are honey. office, gym, dining room and classes.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		horny += 5
		gs 'stat'
		'<center><img src="images/etogame/PTU_rand.jpg"></center>'
		'Olga L. you met a teacher of foreign languages. Hmm, she is wearing a pretty sexy, and that''s against the rules.'

		act 'Next':gt 'etoexhib', 'pos22'
	end

	act 'Go inside the gym':gt 'etoexhib', 'pos33'
	act 'Go inside the medical office':gt 'etoexhib', 'pos36'
	act 'Go inside the dining room':gt 'etoexhib', 'pos37'
	act 'Go inside the hall':gt 'etoexhib', 'pos19'
end

if $ARGS[0] = 'pos23':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Corridor (2nd floor)</font></b></center>'
	'<center><img src="images/etogame/ptu_2korr.jpg"></center>'
	'On this floor there are classrooms, the principal''s office, library and teacher''s toilet.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		horny += 10
		gs 'stat'
		'<center><img src="images/etogame/ptu_korr1.jpg"></center>'
		'One of the students sitting on the windowsill. You will be looking at her revealing outfits and cheeky behavior.'

		act 'Next':gt 'etoexhib', 'pos23'
	end

	act 'Account Director':gt 'etoexhib', 'pos28'
	act 'Go in the library':gt 'etoexhib', 'pos38'
	act 'Go to The toilet':gt 'etoexhib', 'pos39'
	act 'Go inside the hall':gt 'etoexhib', 'pos19'
end

if $ARGS[0] = 'pos24':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Corridor (3rd floor)</font></b></center>'
	'<center><img src="images/etogame/ptu_3korr.jpg"></center>'
	'On this floor there is a class of optional subjects.'

	if hour >= 9 and hour <= 13:act 'Go in class':gt 'etoexhib', 'pos25'
	if hour >= 14 and hour < 15:act 'A lesson':gt 'etoexhib', 'pos26'
	if hour >= 15 and hour <= 18:act 'Go in class':gt 'etoexhib', 'pos25'
	if hour >= 7 and hour <= 20:act 'Teacher':gt'etoexhib','pos24tk'

	act 'Go inside the hall':gt 'etoexhib', 'pos19'
end

if $ARGS[0] = 'pos24tk':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	*clr
	gs'stat'
	minut +=10
	'<center><b><font color = maroon>Teacher</font></b></center>'
	'<center><img src="images/etogame/ptu_tk.jpg"></center>'
	'A place where all the teachers employed in the classroom.'
	'On the wall near the front door hanging <a href="exec:GT ''mirror'',''start''">mirror</a>.'
	'In one corner stands a small old sofa.'

	$prositdirizv = {
		cls
		cla
		gs'stat'
		set izvad = 1
		set pzptu = 1
		'<center><img src="images/etogame/ptu_angdir.jpg" ></center>'
		'You stand on kalani to the Director apologize for his actions.'
		'The Director tells you, what you need will come to her study in free time.'
		act 'Escape':gt'etoexhib','pos24'
	}

	act 'Lie down on the couch':
		cla
		minut += 30

		if son < 90:
		son += 10
		else
		son = 100
		end
		'I`m relaxing on the couch.'

		act 'Pull':gt'etoexhib','pos24tk'
	end

   	if hour >= 14 and hour <= 15:
		temp = RAND(1,100)
		if temp >= 90:
			cls
			minut += 6
			manna -= 10
			willpower -= 10
			gs'stat'
			'<center><img src="images/etogame/ptu_angdir.jpg"></center>'
			'- <<$name>> M., you go where? You know in General, what is happening now in your class, you are obliged now to be? And I can tell you, there confusion, walking and, pardon the expression, Orgy. Go immediately to class, reassure and teach the lesson though remaining time as expected.'
			if DOM < SUB and izvad = 0:
				cla
				*clr
				minut = minut + 5
				gs'stat'
				'<center><img src="images/etogame/ptu_angdir.jpg"></center>'
				'You <a href="exec:dynamic $prositdirizv">ask</a> forgiveness of Directors  .'
				exit
			elseif DOM > SUB and izvad = 0:
				cla
				*clr
				minut = minut + 5
				gs'stat'
				'<center><img src="images/etogame/ptu_angdir.jpg"></center>'
				'You agree with my error, say, that in the future this will not happen again  .'
				act 'Escape':gt'etoexhib','pos24' & teachlevel -= 3
				exit
			end		
		end	
	end

	if hour >= 9 and hour <= 12:
		temp = RAND(1,100)
		if temp >= 90:
			cla
			*clr
			minut += 60
			teachlevel += 2
			gs'stat'
			'<center><img src="images/etogame/21ptu.jpg"></center>'
			'You are approached by a student and asked you to work out with her.'
			act 'Do':gt'etoexhib','pos24tk'
		end
	end

	act 'In the corridor':gt'etoexhib','pos24'
end

if $ARGS[0] = 'pos25':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Cabinet</font></b></center>'
	'<center><img src="images/etogame/ptu_klass.jpg"></center>'
	'Your class.'
	if workPTU = 3:
		cls
		hour = 14
		workPTU = 4
		gs 'stat'

		'<center><img src="images/etogame/PTU_starosta.jpg"></center>'
		'Ina:- Hello, <<$name>>! (Meet you Robski Inna - Mayor 657 groups and round excellent student)'
		'Ina:- Today you look so chic!'
		'You:- Thank you, Ina.'

		act 'Next':gt 'etoexhib', 'pos25'
	elseif workPTU = 4 and gor_dorm = 4:
		cls
		hour = 14
		gor_dorm = 5
		gs 'stat'

		'<center><img src="images/etogame/cera_nerd2.jpg"></center>'
		'you see, that Eugene Isenberg (botany and Zauchka) on the nose that-is written.'
		'Do_You: - Hello, Zhenya! '
		'Zhenya: - hello, Svetlana! (He blushed a little and looks at the floor)'
		'Do_You: - Zhenya, where you think-then smeared nose, to hold a mirror.'
		'(Jack looks in the mirror and pull you became red as a lobster)'
		'Zhenya: - This is what we played with the boys, excuse_me, thank_you... (He began to rub his nose hard)'
		'(It seems classmates make fun of this guy, it would be necessary as-something to cheer.)'
		'Do_You: - Do not worry you so, tell better how are you doing? Girl you got? Each young man your age is a girl.'
		'Zhenya: - No_I_Am_Not, I am not acquainted with the girls, they always throw me... hurt my feelings.'
		'Do_You: - well, What do you like, can be a hobby? The_Movies, game?'
		'Zhenya: - (Then he picked up noticeably and began to talk to you about your favorite fighters and shooters.)'
		'Do_You: - Fair_Enough, i have to go. It was nice to chat.'
		'(Jack looks at you with burning eyes.)'

		act 'Further':gt 'etoexhib', 'pos25'
	end
	if teachlevel > 10: act 'Read the school magazine':gt 'etoexhib', 'pos90'

	act 'Get out into the corridor':gt 'etoexhib', 'pos24'
end

if $ARGS[0] = 'pos26':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Cabinet</font></b></center>'
	if pzptu = 0:
		'<center><img src="images/etogame/PTU_lesson0.jpg"></center>'
		'You went to class and ready to start exercising. Pupils, divided into groups, They talk to each other, who-the laughs, who-chatting on the phone, who-then buried in the plate. Generally regular youth.'

		act 'Post activity':
			cla
			minut = 0
			hour = 14
			gt'etoexhib','pos27'
		end
	end

	if pzptu = 1:
		'<center><img src="images/etogame/PTU_lesson1xl.jpg"></center>'
		'You went to class and were stunned by what they saw, in class Tsaritsa the madness and mayhem. '

		act 'Post activity':
			cla
			minut += 5
			pzptu = 0
			gt'etoexhib','pos27'
		end	
	end
end

if $ARGS[0] = 'pos27':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Cabinet</font></b></center>'
	'<center><img src="images/etogame/lesson1.jpg"></center>'
	'Pupils their seats and listen to you.'

	if horny > 30:
		temp = rand(1, 100)

		if temp >= 95:
			act 'Sexually raise pencil!':
				cls
				horny += 40
				minut += 60
				teachlevel -= 5
				gs 'stat'
				'<center><b><font color="maroon">Cabinet</font></b></center>'
				'<center><img src="images/etogame/ptu_karandash.jpg"></center>'
				'Pacing between rows, you go down on his haunches, pretending to pick up a fallen pencil. However, sitting in the back row overlooking your legs under her skirt. By the eyes widened as one of the guys, you know what it''s done.'
				if tanga = 0:
					temp = RAND(1,100)
					if temp >= 90:
						manna = manna - 5
						teachlevel -= 2
						'You heard a barely audible whisper  - "In the Glu! <<$name>>... goes without panties and shaved pussy!"'
						'You feel, the face begins to burn with shame after what you heard.'
						'All further part of the lesson is in the struggle with his conscience and trying to convey the material to students.'
						act'Further':gt'etoexhib','pos27'
					end
				end

				act 'Next':gt 'etoexhib', 'pos27'
			end
		elseif temp >= 85 and temp < 90:
			act 'Climb on the table':
				cls
				horny += 40
				minut += 60
				teachlevel -= 2
				gs 'stat'
				'<center><b><font color="maroon">Cabinet</font></b></center>'
				'<center><img src="images/etogame/ptu_urok1.jpg"></center>'
				'Explaining the stuff you like the statute, sit on the edge of the table. In this case, the entire class overlooks your feet.'

				act 'Next':gt 'etoexhib', 'pos27'
			end
		elseif temp >= 75 and temp < 80:
			act '"Drop" the chalk':
				cls
				horny += 40
				minut += 60
				teachlevel -= 5
				gs 'stat'
				'<center><b><font color="maroon">Cabinet</font></b></center>'
				'<center><img src="images/etogame/ptu_rak.jpg"></center>'
				'Explaining stuff you accidentally, drop the chalk. At the same time, you pick it up so that any pornstar obzaviduetsya. First, you cant, but realizing that the chalk does not get it, get down on all fours, with his ass as if someone podmanivaya. Those who sat nearby, witnessed an unforgettable show.'
				if tanga = 0:
					temp = RAND(1,100)
					if temp >= 90:
						manna = manna - 5
						teachlevel -= 2
						'You heard a barely audible whisper  - "In the Glu! <<$name>>... goes without panties and shaved pussy!"'
						'You feel, the face begins to burn with shame after what you heard.'
						'All further part of the lesson is in the struggle with his conscience and trying to convey the material to students.'
						act'Further':gt'etoexhib','pos27'
					end
				end

				act 'Next':gt 'etoexhib', 'pos27'
			end
		elseif temp >= 65 and temp < 70:
			act 'Sexy sit at a table':
				cls
				horny += 40
				minut += 60
				teachlevel -= 2
				gs 'stat'
				'<center><b><font color="maroon">Cabinet</font></b></center>'
				'<center><img src="images/etogame/ptu_nastol.jpg"></center>'
				'Explaining the stuff you like the statute, sit on the edge of the table. In this case, the entire class overlooks your feet.'

				act 'Next':gt 'etoexhib', 'pos27'
			end
		elseif temp >= 55 and temp < 60:
			act 'Show stocking':
				cls
				horny += 40
				minut += 60
				teachlevel -= 2
				gs 'stat'
				'<center><b><font color="maroon">Cabinet</font></b></center>'
				'<center><img src="images/etogame/ptu_urok2.jpg"></center>'
				'When you came to the student to show a presentation, you kakby casually crossed his legs, showing student elastic stockings. Immediately after answering the poor man otprasilsya the toilet. Fingering neboys.'

				act 'Next':gt 'etoexhib', 'pos27'
			end
		end
	end

	if hour < 16:
		act 'Teach':
			cls
			minut += 60
			manna -= 5

			if intel < 80:intel += 1
			if $clothingworntype = 'office' and (mop = 1 or mop = 2) and teachlevel < 70:teachlevel += 1
			if mop = 4:teachlevel -= 1

			money += 150
			gs 'stat'
			'<center><img src="images/etogame/lesson.jpg"></center>'
			'You spend a lesson. Students listen to you carefully.'

			act 'Next':gt 'etoexhib', 'pos27'
		end
	elseif hour >= 16:
		act 'Finish your lesson':
			cla
			'The lesson ends and the students rush to leave the classroom.'

			act 'Leave':
				cla
				minut += 5
				gt 'etoexhib', 'pos24'
			end
		end
	end

	act 'Get out of the class':gt 'etoexhib', 'pos24'
end

if $ARGS[0] = 'pos28':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Direction</font></b></center>'
	'<center><img src="images/etogame/PTU_dir.jpg"></center>'
	if izvad = 0:
		'- Welcome, <<$name>>! Hope you like to work for us. If you have any questions for me, I''m listening.'
	end

	if izvad = 1:
		'- Hello again, <<$name>>.'
	end

	act 'Leave the office':gt 'etoexhib', 'pos23'
end

if $ARGS[0] = 'pos33':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Gym</font></b></center>'
	'<center><img src="images/etogame/sportzal.jpg"></center>'
	'Gym for team sports.'

	act 'Women´s Shower':gt 'etoexhib', 'pos34'
	act 'Men´s shower':gt 'etoexhib', 'pos35'
	act 'Go to the hall':gt 'etoexhib', 'pos19'
end

if $ARGS[0] = 'pos34':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Women''s Shower</font></b></center>'
	'<center><img src="images/etogame/ptu_jen.jpg"></center>'
	'Shower.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		minut += 15
		horny += 20
		gs 'stat'
		'<center><b><font color="maroon">Women''s Shower</font></b></center>'
		'<center><img src="images/etogame/ptu_dush.jpg"></center>'
		'- Oh! <<$name>>, leave, please, we''re not dressed! - Two girls screamed, taking a shower.'

		act 'Next':gt 'etoexhib', 'pos33'
	end

	act 'Take a shower':gt 'ptu_dush', 'pos1'
	act 'Go to the hall':gt 'etoexhib', 'pos33'
end

if $ARGS[0] = 'pos35':
	cla
	*clr
	minut += 15
	teachlevel -= 1
	gs 'stat'
	'<center><b><font color="maroon">Men''s shower</font></b></center>'
	'<center><img src="images/etogame/ptu_muz.jpg"></center>'
	'Shower for the boys. You should not be here. This will affect your reputation.'

	act 'Go to the hall':gt 'etoexhib', 'pos33'
end

if $ARGS[0] = 'pos36':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Doctor</font></b></center>'
	'<center><img src="images/etogame/ptu_medkab.jpg"></center>'
	'There is first aid, medical examinations and vaccinations carried out.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		minut += 15
		horny += 10
		gs 'stat'
		'<center><b><font color="maroon">Doctor</font></b></center>'
		'<center><img src="images/etogame/ptu_med1.jpg"></center>'
		'When you went into the medical room, nurses were entertained that fotkali herself in her robe and seductive poses. But then lay out these pictures Go to the social network.'

		act 'Next':gt 'etoexhib', 'pos36'
	end

	act 'In the corridor (1 Floor)':gt 'etoexhib', 'pos22'
end

if $ARGS[0] = 'pos37':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Dining</font></b></center>'
	'<center><img src="images/etogame/bukli_stol.jpg"></center>'
	'You can have dinner or a snack.'
	temp = rand(1, 100)

	if temp >= 90:
		act 'Say hello to the Director':
			cls
			minut += 15
			teachlevel += 1
			gs 'stat'
			'<center><b><font color="maroon">Dining</font></b></center>'
			'<center><img src="images/etogame/ptu_stoldir.jpg"></center>'
			'You met a director of the institution. You politely greeted her nezabyvaya pay a compliment.'

			act 'Next':gt 'etoexhib', 'pos37'
		end
	end

	act 'Buy lunch (100 rubles)':
		money -= 100
		gs 'food', 'm_meal'
		gt 'etoexhib', 'pos37'
	end

	act 'In the corridor (1 Floor)':gt 'etoexhib', 'pos22'
end

if $ARGS[0] = 'pos38':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Library</font></b></center>'
	'<center><img src="images/etogame/ptu_lib.jpg"></center>'
	'Here, students receive textbooks and books. Also has a computer lab with Internet access.'
	temp = rand(1, 100)

	if temp >= 90:
		cls
		minut += 15
		horny += 10
		gs 'stat'
		'<center><b><font color="maroon">Library</font></b></center>'
		'<center><img src="images/etogame/ptu_ups.jpg"></center>'
		'You have become a casual witness as librarian lighted his seductive crotch. But in the hall were people wondering it intentionally or accidentally?'

		act 'Next':gt 'etoexhib', 'pos38'
	end

	if gor_dorm = 5:
		act 'Search the Web "Tetrodotoxin"':
			cls
			minut += 120
			gor_dorm = 6
			gs 'stat'

			'<center><img src="images/etogame/ptu_comp.jpg"></center>'
			'all_Things, that you could find about this stuff, is that it is used in experimental and Pharmacology.'

			act 'Further':gt 'etoexhib', 'pos38'
		end
	end

	act 'Go to the hallway':gt 'etoexhib', 'pos23'
end

if $ARGS[0] = 'pos39':
	cla
	*clr
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Women''s WC</font></b></center>'
	'<center><img src="images/etogame/ptu_toilet_w.jpg"></center>'
	'WC, which in theory, only teachers can use.'

	if tanga = 1:
		act 'Remove underwear':tanga = 0 & gt $locM,$metkaM
	end

	if tampon > 0 and mesec > 0 and isprok = 0:
		act 'Change swab':
			cla
			*clr
			tampon = tampon - 1
			isprok = 1
			minut = minut + 5
			manna = manna - 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You have changed the swab.'
			act 'Finish':gt $locM,$metkaM
		end
	end

	temp = rand(1, 100)

	if temp >= 90:
		cls
		minut += 15
		horny += 10
		gs 'stat'
		'<center><b><font color="maroon">Women''s WC</font></b></center>'
		'<center><img src="images/etogame/ptu_zanato.jpg"></center>'
		'Oops! Sorry, the door was supposed to be closed.'

		act 'Next':gt 'etoexhib', 'pos39'
	end

	act 'Go to the Hallway':gt 'etoexhib', 'pos23'
end

if $ARGS[0] = 'pos40':
	cla
	*clr
	minut += 60
	gs 'stat'

	'<center><b><font color="maroon">Town</font></b></center>'
	'<center><img src="images/etogame/dom_gor.jpg"></center>'
	'Room in a hostel, Dedicated to you College, in poor condition, but still better than nothing. In the courtyard there clothesline and a shed for storage of junk. strangely only, that is almost invisible tenants, usually crammed to capacity hostel.'

	if gor_dorm > 0:act 'To the room':gt 'dom_gor'
	if gor_dorm = 0:act 'Commandant':gt 'comendant', 'pos1'
	if gor_dorm = 2:act 'Search commandant':gt 'comendant', 'pos3'
	if gor_dorm >= 3:act 'Inspect the barn':gt 'etoexhib', 'pos43'

	act 'Get_Away':gt 'gorodok'
end

if $ARGS[0] = 'pos41':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 10
	gs 'stat'

	'<center><b><font color="maroon">Shared Bathroom</font></b></center>'
	'<center><img src="images/etogame/comm_vann.jpg"></center>'
	'Bathroom just in a terrible state, dirty walls, a mess on the floor, old plumbing, and virtually no water flows. Of the pipe comes a strange odor, but there are so many, if only I were smarter.'

	if shampoo = 0:'The_Curse, how to wash if you do not shampoo?'

	if dirtbelo > 0 and poroshok > 0:
		act 'Wash clothes':
			cla
			*clr
			minut += dirtbelo * 5
			clrbelo += dirtbelo
			poroshok -= 1
			dirtbelo = 0
			manna = manna - 10
			'<center><img src="images/etogame/stir.jpg"></center>'
			'You soaked clothes in the basin and poured the powder there, then you become a wash clothes, until it finally became clear.'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end

	if shampoo > 0:
		act 'Take a shower (0:15)':
			cla
			*clr
			shampoo -= 1
			minut += 15
			horny += 1
			hapri = 0
			mop = 1
			sweat = -3

			if tanga = 1:
				clrbelo -= 1
				dirtbelo += 1
			end

			dynamic $showerdin

			if frost > 0:frost = 0

			'<center><img src="images/pics/dush.jpg"></center>'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end

	dynamic $bteeth
	dynamic $tampon
	dynamic $quickwash
	dynamic $wearpan
	dynamic $basin

	if leghair > 0 and stanok > 0 or lobok > 0 and stanok > 0:
		act 'Shave their legs and crotch (0:30)':
			cla
			*clr
			minut += 30
			leghair = -5
			lobok = -5
			horny += 10
			stanok -= 2

			!'
			if obdysh = 1 and obbritinvent = 0:
				britrand = rand(0,5)

				if britrand = 5:gt 'vann', 'brit1'
			end
			'!

			'<center><img src="images/pics/shave.jpg"></center>'
			'You rinsed the razor, blade which will suffice for <<stanok>> time.'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end
	
	if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0:'<a href="exec:dynamic $pirManage">Manage Piercings</a>'

	if fillimplant = 1 and siliconeBag >= 1:'<a href="exec:cls & siliconeBag -= 1 & silicone += 10 & gt $curloc">Inject silicone into breast implants.</a>'
	if fillimplant = 1 and silicone >= 20:'<a href="exec:cls & silicone -= 10 & gt $curloc">Drain silicone from breast implants.</a>'

	if intel > 50 and gor_dorm = 1:act 'Inspect pipes':gt 'etoexhib', 'pos42'

	act 'Back in the room':gt 'dom_gor'
end

if $ARGS[0] = 'pos42':
	cla
	*clr
	minut += 10
	gor_dorm = 2
	gs 'stat'
	'<center><b><font color="maroon">Rusty pipes</font></b></center>'
	'<center><img src="images/etogame/comm_tru.jpg"></center>'
	'All pipes are rusted through, this is a clear violation of the Commandant. Besides that, What smells of pipe-then chemistry.'

	act 'Back in the room':gt 'dom_gor'
end

if $ARGS[0] = 'pos43':
	cla
	*clr
	minut += 10

	if gor_dorm = 3:gor_dorm = 4

	gs 'stat'
	'<center><b><font color="maroon">Shed hostel</font></b></center>'
	'<center><img src="images/etogame/gor_saray.jpg"></center>'
	'In addition to an incredible amount of junk. On the floor-then chemistry, on one of the cans you see the sign of chemical hazards and the inscription "Tetrodotoxin". It is better not to touch.'
	'Hmm.. Is there a place dangerous chemicals. It is necessary to find out more about this stuff.'

	act 'Back in the room':gt 'dom_gor'
end

if $ARGS[0] = 'pos49':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Shared Bathroom</font></b></center>'
	'<center><img src="images/etogame/vann_gor.jpg"></center>'
	'Bathroom in the dorm.'

	if shampoo = 0:'The_Curse, how to wash if you do not shampoo?'

	if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0:'<a href="exec:dynamic $pirManage">Manage Piercings</a>'

	if dirtbelo > 0 and poroshok > 0:
		act 'Wash clothes':
			cla
			*clr
			minut += dirtbelo * 5
			clrbelo += dirtbelo
			poroshok -= 1
			dirtbelo = 0
			manna -= 10
			'<center><img src="images/etogame/stir.jpg"></center>'
			'You soaked clothes in the basin and poured the powder there, then you become a wash clothes, until it finally became clear.'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end

	dynamic $bteeth
	dynamic $tampon
	dynamic $quickwash
	dynamic $wearpan
	dynamic $basin

	if shampoo > 0:
		act 'Take a shower (0:15)':
			cla
			*clr
			shampoo -= 1
			minut += 15
			horny += 1
			hapri = 0
			mop = 1
			sweat = -3

			if clrbelo > 0 and tanga = 1:
				clrbelo -= 1
				dirtbelo += 1
			elseif clrbelo = 0 and tanga = 1:
				tanga = 0
				dirtbelo += 1
			end

			dynamic $showerdin

			if frost > 0:frost = 0

			'<center><img src="images/pics/dush.jpg"></center>'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end

	if leghair > 0 and stanok > 0 or lobok > 0 and stanok > 0:
		act 'Shave their legs and crotch (0:30)':
			cla
			*clr
			minut += 30
			leghair = -5
			lobok = -5
			horny += 10
			stanok -= 2

			!'
			if obdysh = 1 and obbritinvent = 0:
				britrand = RAND(0,5)
				if britrand = 5:gt 'vann', 'brit1'
			end
			'!

			'<center><img src="images/pics/shave.jpg"></center>'
			'You rinsed the razor, blade which will suffice for <<stanok>> time.'

			act 'Finish':gt 'etoexhib', 'pos41'
		end
	end

	act 'To the room':gt 'dom_gor'
end
if $ARGS[0] = 'pos50':
	cla
	*clr
	minut += 5
	gs 'stat'
	'As you cloud hear voices, you went straight to a group of teenagers who have gathered here to smoke, chat and drink beer. There were 7 people of young ages, from 18 to 20 years. They watched you with interest are waiting to see what you will say.'
	'You obviously did not expect that they would be so many in the dark. You start to severely chastise them for what they are doing,they can start a fire, complaining, so they do not come here again, and that they should immediately get out of here. The teens looked between each other and then laughed.'
	'You began to back away, but you couldn''t. You are surrounded by all sides and began to look at their disgusting ways. You feel uneasy. The teens began to harass you, touch your clothes, and one of them standing behind you, pulled up your blouse. Showing your breasts in a bra. The Laughter strengthens and insults rained down on you from all sides.'
	'You have tried to take your clothes back but the teenagers around you constantly pushed and pulled you in different directions. You begged to let you go, to say that you will never come here again and stuff. But teenagers only laughed and has openly pinned you. You suddenly felt from behind that someone''s hands got down to your pants and pulled sharply to force them out, going together with the other clothes. And another bastard pulled your bra and the rest of your clothes.'
	'Now you are standing in front of them completely naked. They have began to push you off into the depths of the attic, and only now you''ve seen a huge old sofa with broken legs. Going to the couch you stopped and tried again to soften the teenagers, but they do not even pay attention to it. They have abruptly pushed you on the couch. The teenagers began to unbutton their jeans. First approached a powerfully built man, he shoved your shoulders and dropped you on your back, he unceremoniously also roughly spread your legs, he lays on the top of you, and abruptly penetrates you.'

	act 'Next':
		cla
		*clr
		'<center><img src="images/etogame/cherdak1.jpg"></center>'
		'He fucks you in a fast and intense pace. After he finishes, his place is taken second guy, and the same thing happened as with the first. After you fucked it all of them, one by one. And also those who wanted one more time.'

		act 'Next':
			cla
			*clr
			minut += 120
			horny += 50
			gang += 1
			spafinloc = 4
			gs 'cum_manage'
			spafinloc = 12
			gs 'cum_manage'
			vagina += 1
			gs 'stat'
			'<center><img src="images/etogame/cherdak0.jpg"></center>'
			'After the last person came in your mouth, the teens buttoned their pants and left, loudly laughing, and discussing what just happened. You pick up your clothes, get dressed, and slowly walked to your apartment.'
			horand = rand(1, 100)

			if horand > horny:horny += 10 & 'You were not satisfied'
			if horand <= horny:horny = 0 & orgasm += 1 & 'You had an orgasm'

			act 'Go to the apartment':gt 'korr'
		end
	end
end

if $ARGS[0] = 'pos51':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/podezd.jpg"></center>'
	'Entrance to the 5-floors building in which you live. The lock on the door leading to the attic is broken.'

	if sosedQW = 0:
		'<br>Suddenly in the stairwell you are faced with a young guy who is climbing up the stairs. He runs into you and is noticeably embarrassed.<font color="#1589FF">"I''m sorry, I did not see you there. You''ve moved into apartment 69, right?"</font>'

		act 'Yes, I live in the apartment 69':
			cls
			sosedQW = 1
			minut += 5
			gs 'stat'
			'You nod, confirming that you live in apartment 69. The guy looks visibly delighted and says, <font color="#1589FF">"Wonderful. I lived there before Petrovich. He tormented the whole building. By the way I´m Timothy, and you are?"</font> '

			act '<<$name>>':
				cls
				gs 'stat'
				'<font color="magenta">My name is <<$name>></font>> - you say. He nodded his head and began to get the key to open the door of the apartment 68. "Very nice. I live in the next apartment." The guy opened the door and on the threshold appeared the curious face of an elderly woman. She pointed her sharp nose at you and began to curiously look you. Timothy entered the apartment and said irritably, "Mom, stop hanging around the front door!" and closed the door.'

				act '....':gt 'etoexhib', 'pos51'
			end
		end

		exit
	elseif sosedQW > 0 and hour >= 16 and sosedDay ! daystart:
		sosedrand = rand(0, 100)

		if sosedrand >= 70:'Your neighbor, <a href="exec:Gt ''Timofei''">Timothy</a>, is in the hallway. He''s smoking a cigarette, flicking the ashes into a jar.'
	end

	act 'Go to the street':
		cls

		if $clothingworntype = 'nude':
			'<b><font color="red">You need to get dressed.</font></b>'
			xgt $curloc
		elseif sick > 72:
			'<b><font color="red">You are too ill to walk to the street.</font></b>'
			xgt $curloc
		else
			xgt 'street'
		end
	end

	act 'Go to attic':gt 'etoexhib', 'pos52'
	act 'Go home':gt 'korr'
end

if $ARGS[0] = 'pos52':
	cls
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/cherdak.jpg"></center>'
	'A flight of stairs that leads to the roof through the attic. It''s Dark and scary. This is clearly no place for a decent girl.'
	temp = rand(1, 100)
	if temp > 90:'In the depths of the attic you hear a group of <a href="exec:gt ''etoexhib'', ''pos50''">teens</a> talking. It seems they do not notice you.'

	act 'Go to the roof':
		cla
		*clr
		gs 'stat'
		gt 'etoexhib', 'pos53'
	end

	act 'Go to the hallway':gt 'etoexhib', 'pos51'
end

if $ARGS[0] = 'pos53':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cls
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/roof.jpg"></center>'
	'The roof of your apartment building.'

	act 'Change into a bikini':gt 'changingroom', 'view_swim_list'

	if temper >= 20 and $clothingworntype = 'swimwear' and hour >= 6 and hour <= 20:
		act 'Sunbathe (1:00)':
			cla
			*clr
			minut += 60
			sweat += 1
			manna += 5
			'<center><img src="images/etogame/zagar1.jpg"></center>'

			if krem = 0:
				tan += 1
				'You lie down to sunbathe.'
			elseif krem > 0:
				krem -= 1
				tan += 3
				'You put the sunblock on your body and lied down on the roof to sunbathe.'
			end

			act 'Get Up':gt 'etoexhib', 'pos53'
		end
	end

	act 'Go to the attic':
		if $clothingworntype = 'swimwear':
			cla
			'You need to get dressed in regular clothing first.'
			act'Return':gt 'etoexhib', 'pos53'
		else
			gt 'etoexhib', 'pos52'
		end
	end
end

if $ARGS[0] = 'pos54':
	cla
	*clr
	minut+=5
	gs 'stat'

	'<center><img src="images/etogame/spy.jpg"></center>'
	'suspicious man. one_can_see, that he constantly looks. Occasionally, approach it any-some people and that-he has taken. after looking carefully, you understand, it sells gas station checks. everything is clear, trades forged documents. Possible and I find that he-something useful.'

	if fakepassport = 2 or fakediplom = 2:
		!only notify player 1 time after events triggered
		if fakepassport = 2:
			fakepassport = 0
			'He tells you, that a passport with fake age will cost you 3,000 rubles'
		end

		if fakediplom = 2:
			fakediplom = 0
			'He told you, that a diploma of bachelor degree will cost you 100,000 rubles'
		end
	end

	if age < 18 and fakepassport ! 1 and money > 3000:
		act 'Buy fake passport (3,000 rubles)':
			cla
			*clr
			minut += 10
			money -= 3000
			fakepassport = 1

			'<center><img src="images/etogame/spy.jpg"></center>'
			'You bought a fake passport, which claims you are an adult.'

			act 'Leave':gt 'vokzal'
		end
	end

	if diplom = 0 and fakediplom ! 1 and money > 100000:
		act 'Buy fake diploma (100,000 rubles)':
			cla
			*clr
			minut += 10
			money -= 100000
			fakediplom = 1

			'<center><img src="images/etogame/spy.jpg"></center>'
			'You bought a fake diploma.'

			act 'Leave':gt 'vokzal'
		end
	end

	act 'Leave':
		cls
		gt 'vokzal'
	end
end

if $ARGS[0] = 'pos90':
	cla
	*clr
	minut += 5
	gs 'stat'

	'<center><img src="images/etogame/memory.jpg"></center>'
	'Your school magazine.'

	if teachlevel > 40 and gor_dorm = 6:
		act 'Lonely Heart':
			cla
			*clr
			minut += 120
			gor_dorm = 7

			'<center><img src="images/etogame/ptu_tech.jpg"></center>'
			'Once, biting in the teacher asked you to Eugene A., chemistry teacher.'
			'- <<$nickname>>, you are always so attractive. There must be a lot of you know men.'
			'- I think I understand what you''re? Want to someone-introduce a.'
			'- Do not get me wrong, I know soon 30, and married so no one takes. Yes, men in our backwoods.'
			'- I_See, do so skinte mail me your most beautiful pictures, a bit of erotica will not prevent. And I will find you a good husband on a dating site.'
			'- erotica! oh, you think, it is necessary?'
			'- it is necessary, men at the sight of a beautiful female body lose their heads.'
			'- Ok, I''ll try to take a picture as possible erotic.'

			act 'Finish':gt 'etoexhib', 'pos24'
		end
	end

	act 'Leave':
		cls
		gt 'etoexhib', 'pos24'
	end
end

if $ARGS[0] = 'pos91':
	cla
	*clr
	minut += 5
	gor_dorm = 8
	gs 'stat'

	'<center><img src="images/etogame/ptu_tech.jpg"></center>'
	'- good afternoon, Svetlana! As you requested, I tried to take a picture as possible erotic. I hope I do not overdo it. Or maybe vice versa, photo does not quite erotic. So_Please, email me, if anything-is not.'

	act 'See next photo':
		cla
		*clr
		minut += 5

		'<center><img src="images/etogame/ptu_tech1.jpg"></center>'
		'Wow, her stunning figure.'

		act 'See next photo':
			cla
			*clr
			minut += 5

			'<center><img src="images/etogame/ptu_tech2.jpg"></center>'
			'wow, Eugene A.! Hmm... But she wanted to send even more candid photos, is for dating site! Apparently the girl quite desperate.'
			'Now you can go to the site and help her find the man of her dreams.'
			'or'
			'But with these photos I require it, whatever I want!'

			act 'Go to the site':gt 'Komp', 'znak'
		end
	end

	act 'Exit the browser':gt 'Komp', 'start'
end

--- etoexhib ---------------------------------

