# start
killall
close all
!addqst 'car.qsp'
usehtml = 1
debug = 1
showstat 0
showobjs 0
showinput 0
disablescroll = 1
!nosave 0
$ongload = 'loadg'
$ongsave = 'saveg'
$onnewloc = 'LOCA'
$onobjsel = 'onobjsel'
$counter = 'counter'
$usercom = 'inputProcessing'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
$fname = 'Tahoma'
fsize = 12
$version = '0.2.5e (Minor G & M bugfix) (If you haven''t updated your image library recently, you may need to do so for hairstyles to work properly)'

*nl
*nl
'<hr align="left" color="red" size="3" width="1200">'
'<center><h2>Girl Life [English Community Version]</h2></center>'
*nl
'<center>This is game is based on the russian game ЭТО by DeGross.</center>'
*nl
'<hr align="left" color="red" size="3" width="1200">'
*nl
'<center>Version <b><<$version>></b></center>'
*nl
*nl
'<center><font color="red"><b>Children under 18 years are strictly forbidden to play</b></font></center>'
*nl
*nl
'This game is about the simulated life of a woman containing elements of RPG, strategy, porn and magical combat.'
'You may choose what kind of life the character will leave according to your play style, conscience or even personal beliefs.'
'We will try to avoid rights and wrongs during the game.'


!!!! Recent Version Tracking Block !!!!!
*nl
'Recent Version Tracking:'
*nl
"0.2.5e"
'- Fixed bug making G & M officewear un-buyable'
'- Fixed bang-less buns not calling images correctly'
'- Updated start-selection screen to be actually <i>relevant</i>'
*nl
'0.2.5d:'
'- Fixed a bug that prevented you to work as a Prostitute at the street near the park'
'- Created subfolders for the different hairstyles. It makes it easier to find missing pictures or replace them. (Image library update!)'
*nl
'0.2.5c (released by TFGS-User centerflag982, accidently named 0.2.5b aswell):'
'- Fixed a bug, that prevented your from removing your pigtails.'
*nl
'0.2.5b (released by TFGS-User Maruda):'
'- Added the Hairsalon in the Citycenter and the Barbershop in the small town.'
'- Fixed a bug with the tailor, who bought some of your clothes instead of resizing them.'
*nl
'0.2.5a:'
'- Fixed a bug, which didn''t allow you to see your breasts.'
'- Fixed a bug, which caused a DEBUG-Error to appear at the tailor and the nightclub.'
*nl
'0.2.5:'
'- Added a lot more hairstyles'
'-- For the numberphiles between you, there are 216 ways to style your hair, 175 have pictures.'
'-- Cheat Menu to tinker around with your hair, it also tells you how your current hair looks.'
'- Added the Hairsalon in the Mall'
'- Added the Barbershop in the small town, cheaper & faster than the hairsalon, but doesn''t do braided hair'
'- While I''m not a native english speaker, I tried to fix some of the broken english'
'-- Done in following locations: street, down, Nord, club, park'
'- Additional conditions to get into the club.'
'-- Jeans, Shorts, Pants and Kis-Clothes can get you in.'
'--- Jeans, Shorts and Pants require a certain level of looks/beauty (vnesh) to get you in.'
'---- When you wear a skirt or shorts, you now should make sure, you shaved your legs. The folks guarding the entrance don''t like hairy legs.'
'- Excluded the rape events at the home street for now.'
'- VIP-Card price at the night club lowered from 50.000 to 10.000 rubles, as the price of one card stood in no, for me at least, comprehensible relation to other prices.'
'- The park is now a central park, from where you can walk to the others citys districts if you so desire.'
'-- Homestreet -> Park => roughly 20 Minute Walk'
'-- City Center -> Park => roughly 48 Minute Walk'
'-- Northern District -> Park => roughly an hour of walking.'
'--- Once you are in the park, it takes the same amount of time to get to another respectable area.'
'- Excluded the direction argument ''prost'' inside the location ''park'', as nothing links to it (anymore). Prostitution itself takes place in a location called ''prostitute''. ''prost'' seems to be the remnant of an older version of ETO. It should be safe to remove, if no gamebreaking bugs appear.'
'- TFGS-user "kevlar" pointed out a bug in the fitness studio, you get a Debug-Message once you win the amateur fight. This bug occured due to a spelling mistake and has been fixed.'

!!!! Recent Version Tracking Block !!!!!
StoryLine = 0
MagikDostup = 0
$name = 'Michael'
$surname = 'Kuznetsov'
age = 35
vidage = 35
year = 2010
month = 5
week = 1
hour = 7
day = 25
!!body
rost = 186
fat = 130
dick = 0
energy = 15
water = 15
son = 16
!!stats
stren = 160
speed = 50
agil = 50
vital = 160
intel = 50
will = 100
react = 50
health = vital * 10
willpower = intel * 5 + will * 5
manna = (intel * magik) + vital * 5
BDSMfilm = 0
pornstudio = 0
pfilmSTOP = 0
money = 1500
opPRE = 1
tanga = 1
clrbelo = 1

GameUpdate = 1
update_2014_08_28 = 1
act '<center><b>Start</b></center>':
	cla
	gt 'begin'
end

if music_on = 0:
	inited = 1
	music_on = 1
	volume = 100
	$music_theme = 'sukizaebali'
	gs 'init_music'
end

! WD: Set variable to store Image needed HTML code
set $ImageNeededPlacholder = '<center><img src="images/community/Image_needed.png"></center>'
--- start ---------------------------------
# gameover
'<center><b><font color="maroon">GAME OVER</font></b></center>'

if over = 1:
	gs 'stat'
	'You died'
elseif over = 2:
	'<center><img src="images/etogame/over.jpg"></center>'
	'You''re mad and started to run around town naked screaming "I am a man!". You quickly alerted the police and you were taken to a metal hospital. There you got put in a straitjacket and placed in a room with soft walls. You spent the rest of your days in happy delusions about your family and about being a man again. But the delusions never became reality.'
	*nl
	'Hint:'
	'When your mood falls, your mind weakens and finally breaks. Do not forget, it is difficult for a normal man to come to terms with the fact that he is now a woman. In order to keep your mood and psyche at an acceptable level make sure you are of healthy weight, have at least a TV and visit the psychotherapist. Strengthening your will and intellect also increases the maximum value of your mood, such that the harmful effects will not be as devastating.'
elseif over = 3:
	'You have died of starvation. A stupid way to die, but apparently it''s one of the consequences of anorexia.'
elseif over = 4:
	'You died from complications in childbirth.'
elseif over = 5:
	'You tried to jump, but immediately found themselves in a strange place around some dilapidated walls with obscene graffiti, you could not move do not cry, when suddenly the door opened and entered what that fat guy, he undid his pants and turned his back to you situated above you your ass. Here you''ve got it, witch kept her promise and turned you into a jerk at the station.'
	'So you spent the rest of your days swallowing shit until 50 years later, the train station is not started to repair and you just broke and took the pieces to the dump.'
elseif over = 6:
	'You suddenly feel a sharp piercing pain in the abdomen, then another and another. "Greetings to you from the boys" says a figure with downcast eyes while it moves away. You realize you are standing in a puddle of your own blood, and have multiple stab wounds in your stomach. The last thing you saw was the fast approaching land.'
elseif over = 7:
	'The last thing you saw was a police baton, flying into your face. You were beaten to death, and your early surmise was written in as an accident.'
elseif over = 8:
	'<center><img src="images/qwest/sosed/crackwhore7.jpg"></center>'
	'"At some point in time you can turn off this path ?" - you are trying to understand, mouth open under another batch of golden rain or Cum. And, without finding an answer, regularly swallow all.'
end
act 'End?':gt 'gameover', 'endscreen'

if $ARGS[0] = 'endscreen':
	showstat 0
	showobjs 0
	showinput 0
	fcolor = RGB(255,255,255)
	bcolor = RGB(0,0,0)
	lcolor = RGB(106,90,205)
	cls
	cla

	if over = 8:
		*nl & *nl
		'<center><h1>end</h1></center>'
		'<center><h1>Open-ended - heroin whore!</h1></center>'
		*nl & *nl
		'<center><img src="images/qwest/sosed/crackwhore8.jpg"></center>'
	else
		*nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl
		'<center><h1>end</h1></center>'
	end

	act 'Main menu':gt 'start'
	act 'Upload preservation':opengame
	act 'Download the latest cars-preservation':gt 'gameover', 'load_autosave'
end

if $ARGS[0] = 'Load autosave':
	if StoryLine = 0:
		opengame 'autosave.sav'
	else
		opengame 'autosave_alt.sav'
	end
end

--- gameover ---------------------------------
# begin
'<center><b><font color="maroon">CHOOSE GAME START</font></b></center>'
*nl
'<b>Original Start:</b>'
'You are Michael Kuznetsov, a fairly average, 35 year old businessman whose life is about to be turned inside out. Features magic and an (incomplete) over-arching plot. Beware of unintelligible translations.'
*nl
'<b>Alternate Start:</b>'
'You are a 15-year-old small-town girl about to start her first year of high school. Name and starting stats are customizable, no magic and no major ''plot'' other than <i>life</i>. Not to say that your classmates and family don''t have their own stories, though!'

act '<center><b>Original start</b></center>':
	cla
	music_on = 0
	showstat 1
	showobjs 1
	addobj 'Player'
	gt 'roomPRE'
end

act '<center>Original start (skip intro)</center>':
	music_on = 0
	gs 'begin1'
	gt 'street'
end

act '<center><b>Start the alternative game</b></center>':
	cla
	gt 'alterStart'
end

--- begin ---------------------------------
# begin1
showstat 1
showobjs 1
$name = 'Svetlana'
$surname = 'Lebedev'
!!!0.2.6 addition
$nickname = 'Svetski'
!!!
$name = input("What is your first name?")

if $name = '':$name = 'Svetlana'

$surname = input("What is your last name?")

if $surname = '':$surname = 'Lebedev'

!!!0.2.6 addition
$nickname = input("What is your nick name?")

if $nickname = '':$nickname = 'Svetski'
!!!

age = 18
vidage = 16
year = 2010
month = 5
week = 3
hour = 13
!!body
rost = 170
fat = 60
salo = 60
dick = 0
energy = 15
water = 15
son = 16
!!stats
stren = 10
strenbuf = 10
speed = 10
agil = 10
agilbuf = 10
vital = 10
vitalbuf = 10
intel = 10
will = 10
react = 10
magik = 0
health = vital * 10 + stren * 5
willpower = intel * 5 + will * 5
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
nastjaQW = 0
money = 16500
vidageday = 300
housrA = 1
sarafan[1] = 1
sarafanH[1] = 30
lobok = 3
leghair = 3
mop = 1
housr = 1
tanga = 1
!!!!!!!!!!!!!! Maruda Hair Mod
hairlength = 165
!!!!!!!!!!!!!! Maruda Hair Mod
hcol = 1
clr
gs 'stat'
jeans[1] = 1
jeansH[1] = 100
jeansB[1] = 70
gs 'clothing', 'wear', 'jeans', 1
cltarelka = 1
fairy = 10
eda = 5
clrbelo = 2
poroshok = 5
shampoo = 5
clr
gs 'stat'
opPRE = 0
daystart = 0

addobj 'Character'
addobj 'See'
addobj 'Others'
addobj 'Menu'

--- begin1 ---------------------------------
# onobjsel
$din_show_tits = {
	view
	view 'images/body/t<<tits>>.jpg'
}

$objdescrip = {
	clr
	pl 'Your name is <<$name>> <<$surname>>.'
	pl 'You are <<age>> <<$letgoda>>, but looking at you, people would guess you are <<vidage>> <<$letgoda2>>.'

	!!!0.2.6 extension
	if StoryLine > 0:
		pl 'Friends and family sometimes call you <<$nickname>>'
	else
		pl 'Friends sometimes call you <<$nickname>>'
	end
	!!!

	if birthday > 0 and birthmonth > 0:pl 'Your date of birth is <<birthday>>.0<<birthmonth>>.<<birthyear>>, the'

	pl 'You are <<rost>> cm tall, you weigh <<ves>> pounds.'
	pl '<<$body>>'
	pl '<a href="exec:dynamic $objbody"><<grudi>> - <<talia>> - <<bedra>> </a>, <a href="exec:dynamic $din_show_tits">the size of your breasts are <<tits>></a>, the difference between your hips and your waist is <<bedra-talia>> cm'
	pl '<<$anus>>'
	pl '<<$vnesh>>'
	pl '<<$hair>>'
	pl '<<$lip>>'
	pl '<<$throat>>'
	pl '<<$skin>>'
	pl '<<$glaza>>'
	pl '<<$mop>>'
	pl '<<$leghair>>'
	pl '<<$lobok>>'
	pl '<<$vagina>>'
	nl

	if salo = 0 and musle > 0 and dounspell = 0:pl '<b><font color="red">You are showing signs undernourishment. You should probably eat more and more often.</font></b>'
	if salo = 0 and musle = 0 and dounspell = 0:pl '<b><font color="red">You are dangerously malnourished, which has led to a loss in muscle mass. You''re in a critical condition and likely to pass out!</font></b>'
	if curly > 0:pl 'Your curls are good for another <<curly>> days.'
	if zub = 1:$zuba = ' tooth'
	if zub >= 2:$zuba = ' teeth'
	if zub > 0:pl 'You have <<zub>><<$zuba>>.'

	!!pl 'vnesh <<vnesh>>'
	!!pl 'curlykoef <<curlykoef>> a maximum of 1'
	!!pl 'tits <<tits>> A maximum of 6'
	!!pl 'lip <<lip>> a maximum of 4'
	!!pl 'tanKoef <<tanKoef>> a maximum of 1'
	!!pl 'skin <<skin>> a maximum of 4'
	!!pl 'mop <<mop>> a maximum of 4'
	!!pl 'resnic <<resnic>> a maximum of 2'
	!!pl 'glaraz <<glaraz>> a maximum of 3'
	!!pl 'bodykoef <<bodykoef>> a maximum of 8'
	!!pl 'legkoef <<legkoef>> a maximum of 3'
	!!pl 'lobkoef <<lobkoef>> a maximum of 3'
	!!pl 'odevnesh <<odevnesh>> a maximum of 15'
	!!pl 'sweat <<sweat>> the maximum 0'
	!!pl 'hapri <<hapri>> a maximum of 1'

	!!!!!!!! Maruda Hair Mod
	if hairlength > 41 and hscrunch >= 1:
		if hscrunchw = 0 and hpingripw = 0:pl 'As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & dynamic $objdescrip">ponytail</a>. You have <<hscrunch>> scrunchies left.'
		if hscrunchw = 1:pl 'Remove the <a href="exec:hscrunchw = 0 & dynamic $objdescrip">scrunchie</a> to get rid of the ponytail.'
	end

	if hairlength > 41 and hpingrip >= 1:
		if hscrunchw = 0 and hpingripw = 0:pl 'You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & dynamic $objdescrip">updo your hair</a>. You have <<hpingrip>> hair accessories at your disposal.'
		if hpingripw = 1:pl 'Let your hair <a href="exec:hpingripw = 0 & dynamic $objdescrip">flow free</a>.'
	end

	if hairlength > 80 and hscrunch >= 2:
		if hscrunchw = 0 and hpingripw = 0:pl 'You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & dynamic $objdescrip">pigtails</a>.'
		if hscrunchw = 2:pl '<a href="exec:hpigtail = 0 & hscrunchw = 0 & dynamic $objdescrip">Remove</a> your scrunchies and let your hair flow free again.'
	end

	if hscrunch < 1:hscrunchw = 0
	if hpingrip < 1:hpingripw = 0
	if hscrunch < 2:hpigtail = 0
	!!!!!!!! Maruda Hair Mod
}

$objskills = {
	clr
	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1remake
	!!if salo > musle * 4:$fat = 'You have a chubby disposition'
	!!if salo <= musle * 4 and fat > musle * 2:$fat = 'You have a soft curvy body that still carries an elastic finesse.'
	!!if salo <= musle * 2 and fat > musle:$fat = 'You have an average body showing signs that you take care of yourself.'
	!!if salo <= musle and fat >= musle / 2:$fat = 'Your body is slim and trim. You probably workout often '
	!!if salo < musle / 2:$fat = 'Your body is a prayer to the god of fitness! Your skin is taught against your lithe musculature.'

	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
	pl 'Attractiveness <<vnesh>>'
	pl 'Power <<stren>>'
	pl 'Speed ​​<<speed>>'
	pl 'Agility <<agil>>'
	pl 'Endurance <<vital>>'
	pl 'Intelligence <<intel>>'
	pl 'Willpower <<will>>'
	pl 'Reaction <<react>>'
	pl '<<$fat>>'
	!!pl 'Bezstydstvo <<shameless>>'

	if SUB > 0:pl 'Subordination <<SUB>>'
	if DOM > 0:pl 'Dominance <<DOM>>'

	!!pl 'Muscles <<$musle>>'

	if magik > 0:pl 'Magic <<magik>>'
	if Jab > 0:pl 'Jab - <<Jab>>'
	if Punch > 0:pl 'Power Strikes - <<Punch>>'
	if Kik > 0:pl 'Kicks - <<Kik>>'
	if KikDef > 0:pl 'Protection against - <<KikDef>>'
	if beg > 0:pl 'Skill Run - <<beg>>'
	if volleyboll > 0:pl 'Skill volleyball - <<volleyboll>>'
	if oficiant > 0:pl 'Skills waitresses - <<oficiant>>'
	if vokal > 0:pl 'Vocal skills <<vokal>>'
	if dance > 0:pl 'Skill Dance - <<dance>>'
	if dancePRO > 0:pl 'Regular dancing skilllevel - <<dancePRO>>'
	if stripdance > 0:pl 'Striptease skilllevel - <<stripdance>>'
	if poledance > 0:pl 'Poledancing skilllevel- <<poledance>>'
	if shoot > 0:pl 'Shooting Accuracy - <<shoot>>'
	if kid = 1:pl 'You have a child, <<$polreb[1]>> name <<$kidname[1]>>. Born <<daykid[1]>>.<<monthkid[1]>>.<<yearkid[1]>>y. Age <<kidage[1]>>'
	if workPTU > 1:pl 'Reputation teachers <<teachlevel>>'

	if SchoolAtestat = 0 and StoryLine > 0:
		if Suspeh >= 90:pl 'You are an A+ student.'
		if Suspeh >= 80 and Suspeh < 90:pl 'You are a bright student, just not the top of your class.'
		if Suspeh >= 70 and Suspeh < 80:pl 'You are an above average student, but you have to work hard to keep up.'
		if Suspeh >= 60 and Suspeh < 70:pl "You are the typical average student. You're good in the fields you like, but can't be bothered with the rest."
		if Suspeh >= 50 and Suspeh < 60:pl 'You''re not very good in school, you wish you could be somewhere else and your grades show it.'
		if Suspeh >= 40 and Suspeh < 50:pl 'You are not cut out for school, you skip out most of the time. You wonder how you''re going to manage to get passing grades.'
		if Suspeh < 40:pl 'You are the class nitwit. You''re still not sure how you got this far in the first place.'

		if schoolprogul > 1:pl 'Absenteeism in school <<schoolprogul>>'
	end
}

$objstatistika = {
	clr
	if opPRE = 0:pl 'It has been <<daystart>> the game has started.'
	if BuyHous = 2 and ArendHouseSL >0:pl 'You have rented an apartment in the residential area <<ArendHouseSL>> days.'

	if KikWinPro > 0 or KikLossPro > 0 or KikDrawPro > 0:
		pl 'Professional Kickboxing Record:Win (Victory KO) - Loss (Defeat KO) - Draw'
		pl '<<KikWinPro>> (<<KikWinProKO>>KO) - <<KikLossPro>> (<<KikLossProKO>>KO) - <<KikDrawPro>>'
		nl
	end

	if Win > 0 or Loss > 0:pl 'Wins in fights <<Win>>, losses in fights <<Loss>>' & nl
	if KisameDead = 1:pl 'You killed Kisame.'& nl
	if razradKik > 0:pl '<<$razradKik>>'

	if KikWinAm > 0 or KikLossAm > 0 or KikDrawAm > 0:
		pl 'Amateur Kickboxing Record:Win (Victory KO) - Loss (Defeat KO) - Draw'
		pl '<<KikWinAm>> (<<KikWinAmKO>>KO) - <<KikLossAm>> (<<KikLossAmKO>>KO) - <<KikDrawAm>>'
		nl
	end

	if razradKik > 0:
		if razradKik = 1:$razradKik = 'You''re ranked III in amateur kickboxing'
		if razradKik = 2:$razradKik = 'You''re ranked II in amateur kickboxing'
		if razradKik = 3:$razradKik = 'You''re ranked I in amateur kickboxing'
		if razradKik = 4:$razradKik = 'You are a candidate for the title of Master in Kickboxing'
		if razradKik = 5:$razradKik = 'You have the title of Master Kickboxer'

		nl
	end

	if kolsorev > 0:pl 'You have participate <<kolsorev>> in a running race'
	if bronzebeg > 0:pl '<<bronzebeg>> - bronze medals on the run'
	if silverbeg > 0:pl '<<silverbeg>> - silver medals for event'
	if goldbeg > 0:pl '<<goldbeg>> - gold medals in running'
	if razradbegEB > 0:pl '<<razradbegEB>> times bronze medalist of European Championship'
	if razradbegES > 0:pl '<<razradbegES>> fold vice champion of Europe'
	if razradbegEG > 0:pl '<<razradbegEG>> time European champion.'

	if razradbeg > 0:
		if razradbeg = 1:pl 'You have third sports category for event'
		if razradbeg = 2:pl 'You 2nd sports category for event'
		if razradbeg = 3:pl 'You 1st sports category for event'
		if razradbeg = 4:pl 'You have the title of Candidate Master of Sports for event'
		if razradbeg = 5:pl 'You have the title of Master of Sports in the run'
		if razradbeg >= 6:pl 'You have the title of International Master of Sports for event'

		nl
	end

	if nastjaQW > 0:pl 'Friendship with Nastya <<nastjaqw>>'
	if kat > 0:pl 'Friendship with Kate <<kat>>'
	if vika > 0:pl 'Friendship with Vika <<vika>>'
	if Irina > 0:pl 'Friendship with Irene <<Irina>>'
	if Tamara > 0:pl 'Friendship with Tamara <<Tamara>>'
	if alla > 0:pl 'Friendship with Alla <<alla>>'
	if masha > 0:pl 'Friendship with Masha <<masha>>'
	if Givi > 0:pl 'Friendship Givi K. <<Givi>>'
	if Ashot > 0:pl 'Friendship with Ashot <<Ashot>>'
	if Dmitry > 0:pl 'Friendship with Dima <<Dmitry>>'
	if afra > 0:pl 'Friendship with blacks <<afra>>'
	!!!WD: Formatting
	if (Irina + Givi + Ashot + Tamara + Dmitry + afra + gosh + vika + kat + nastjaqw + tanya) > 0:nl
	!!!
	if exhibi > 0:pl 'Experienced exhibitionism <<exhibi>>'
	if maxdamage > 0:pl 'The impact force on the dynamometer <<maxdamage>> kN' & nl
	if modelfoto > 0:pl 'You filmed naked <<modelfoto>> times'

	if stripdancesum > 0:pl '<<stripdancesum>> times dancing in the stripclub'
	if profiDanceTime > 0:pl 'You danced <<profiDanceTime>> professionally.'
	if SchoolAtestat = 1:pl 'You have finished school.'
	if diplom = 1:pl 'You graduated.'
	if teachlevel > 0:pl 'Your credibility as a teacher is <<teachlevel>>'
	!!!WD:FORMATING
	if (exhibi + maxdamage + modelfoto + stripdancesum + profiDanceTime + SchoolAtestat + diplom + teachlevel) > 0:nl
	!!!
	if mastr > 0:pl 'Masturbated <<mastr>> time'
	if throat > 0:pl '<<$throat>>'
	if vagina > 0:pl '<<$vagina>>'
	if vagina = 0 and sex = 0:pl 'You are a virgin.'
	if anus > 0:pl '<<$anus>>'
	nl

	if GorSlut > 0:
		if GorSlut = 1:pl 'In the town you are known as a flirt.'
		if GorSlut = 2:pl 'In the town you are known to have sucked a few cocks.'
		if GorSlut = 3:pl 'In the town you are known as a great cocksucker.'
		if GorSlut = 4:pl 'In the town you are known to have fucked several boys.'
		if GorSlut = 5:pl 'In the town you are known the slut that would do anything.'
		if GorSlut = 6:pl 'In the town you are known as a prostitute who will take money for most extreme sex acts.'

		nl
	end

	if guy > 0:pl 'You had <<guy>> guys.'
	if divorced > 0:pl 'You have <<divorced>> husbands.'
	if suprdolg > 0:pl 'Performed conjugal duty to her husband <<suprdolg>> time'
	if gang > 0:pl 'Group sex <<gang>> times'
	if sex > 0 and sexa = 0:pl 'Vaginal sex <<sex>> times.'
	if sex > 0 and sexa > 0:pl 'Vaginal sex <<sex>> times from them <<sexa>> times with her boyfriend.'

	if bj > 0:
		if gloryhole = 0 and balls = 0 and bja = 0:pl 'Blowjob done <<bj>> times.'
		if gloryhole = 0 and balls = 0 and bja > 0:pl 'Blowjob done <<bj>> times, of which <<bja>> times her boyfriend'
		if gloryhole > 0 and balls = 0 and bja = 0:pl 'Blowjob done <<bj>> times, of which you <<gloryhole>> time suck strangers through a hole in the wall.'
		if gloryhole > 0 and balls = 0 and bja > 0:pl 'Blowjob done <<bj>> times, of which you <<gloryhole>> time suck strangers through a hole in the wall. Just one <<bja>> times her boyfriend'
		if gloryhole = 0 and balls > 0 and bja = 0:pl 'Blowjob done <<bj>> times, sucked balls <<balls>> times.'
		if gloryhole = 0 and balls > 0 and bja > 0:pl 'Blowjob done <<bj>> times, sucked balls <<balls>> times. Just one <<bja>> times her boyfriend'
		if gloryhole > 0 and balls > 0 and bja = 0:pl 'Blowjob done <<bj>> times, of which you <<gloryhole>> time suck strangers through a hole in the wall. Sucked balls <<balls>> times.'
		if gloryhole > 0 and balls > 0 and bja > 0:pl 'Blowjob done <<bj>> times, of which you <<gloryhole>> time suck strangers through a hole in the wall. Sucked balls <<balls>> times. Just one <<bja>> times her boyfriend'
	end

	if hj > 0:
		if hja = 0:pl 'Guys jerking off <<hj>> times'
		if hja > 0:pl 'Guys jerking off <<hj>> times from them <<hja>> times masturbate her boyfriend'
	end

	if hump > 0:pl 'About you wanker member <<hump>> times'
	if rape > 0:pl 'You have been raped <<rape>> times'

	if anal > 0:
		if anala = 0:pl 'Anal <<anal>> times'
		if anala > 0:pl 'Anal <<anal>> times from them <<anala>> times with her boyfriend'
	end

	if kuni > 0:pl 'You did cunnilingus <<kuni>> times'
	if pegging > 0:pl 'Pegging <<pegging>> times'
	if spank > 0:pl 'You ran your ass <<spank>> times'
	!!!WD:FORMATING
	if (guy + divorced + suprdolg + gang + sex + bj + hj + hump + rape + anal + kuni + pegging + spank) > 0:nl
	!!!

	if slutty > 0:
		if bordelslutty = 0:pl 'Sold your love <<slutty>> time.'
		if bordelslutty > 0:pl 'Sold your love <<slutty>> times, including in a brothel <<bordelslutty>> times.'
	end

	if pfilmSTOP = 1:
		pl 'In the porn industry you were known by the name of <<$pfname>>. You have retired from the porn business.'
	elseif film > 0:
		pl 'In the porn industry you are known by the name of <<$pfname>>. You starred in porn <<film>> times.'
		pl '<<$pfilmhistory>>'
		nl
	end

	if orgasm > 0:pl 'Experienced orgasm <<orgasm>> times.'
	if analorgasm > 0 :pl 'You''ve had <<analorgasm>> anal orgasms.'
	if swallow > 0:pl 'Sperm swallowed <<swallow>> times.'
	if facial > 0:pl 'You have taken <<facial>> facials.'
	if frot > 0:pl 'Come on you truck <<frot>> times.'
	if VAF > 0:pl 'Vaflizm <<VAF>>.'
	if zoo > 0:pl 'Having sex with animals <<zoo>> times.'
	if pee > 0:pl 'You pissing <<pee>> times.'
	if swallowpee > 0:pl 'You swallow urine <<swallowpee>> time.'
	!!!WD:FORMATING
	if (slutty + pfilmSTOP + film + orgasm + analorgasm + swallow + facial + frot + VAF + zoo + pee) > 0:nl
	!!!
	if girl > 0:pl 'You have <<girl>> girls.'
	if lesbian > 0:pl 'You do lecbiyskim sex <<lesbian>> times.'
	if sexfuta > 0:pl 'You''ve had sex with tgirls <<sexfuta>> times.'
}

$din_exhibiTakeOffBimbo = {
	cloth_vid = 0
	gs 'stat'
	'You removed the outfit bimbo'
}

$din_exhibiHideNewCloth = {
	exhibiHideNewCloth = 1
	gs 'stat'
}

$din_cheat_work = {
	if cheatWork = 0:
		cheatWork = 1
		dynamic $din_cheat_menu_permanent
		exit
	elseif cheatWork = 1:
		cheatWork = 0
		dynamic $din_cheat_menu_permanent
	end
}
$din_cheat_hapri = {
	if cheatHapri = 0:
		cheatHapri = 1
		gs 'stat'
		dynamic $din_cheat_menu_permanent
		exit
	else
		cheatHapri = 0
		dynamic $din_cheat_menu_permanent

	end
}

$din_cheat_klisma = {
	if cheatKlisma = 0:
		cheatKlisma = 1
		dynamic $din_cheat_menu_permanent
		exit
	elseif cheatKlisma = 1:
		cheatKlisma = 0
		dynamic $din_cheat_menu_permanent
	end
}
$din_cheat_nomakeup = {
	if cheatNomakeup = 0:
		cheatNomakeup = 1
		dynamic $din_cheat_menu_permanent
		exit
	else
		cheatNomakeup = 0
		dynamic $din_cheat_menu_permanent
	end
}

$din_cheat_Nosweat = {
	if cheatNosweat = 0:
		cheatNosweat = 1
		dynamic $din_cheat_menu_permanent
		exit
	else
		cheatNosweat = 0
		dynamic $din_cheat_menu_permanent
	end
}

$din_cheat_NoEat = {
	if cheatNoEat = 0:
		cheatNoEat = 1
		dynamic $din_cheat_menu_permanent
		exit
	else
		cheatNoEat = 0
		dynamic $din_cheat_menu_permanent
	end
}

$din_cheat_age = {
	age = input("How old are you in years?")

	if age <= 15:age = 15

	dynamic $din_cheat_menu_look
}

$din_cheat_agel = {
	vidage = input("How old do you want to look?")

	if vidage <= 14:vidage = 14

	dynamic $din_cheat_menu_look
}

$din_cheat_money = {
	money = input("How much money do you want to have?")

	if money < 0:money = 0

	dynamic $objcheat_menu
}

$din_cheat_menu_permanent = {
	gs 'stat'
	clr

	if cheatWork = 0:$cheatWork = 'TURNED_OFF'
	if cheatWork = 1:$cheatWork = '<b>ON</b>'
	if cheatHapri = 0:$cheatHapri = 'TURNED_OFF'
	if cheatHapri = 1:$cheatHapri = '<b>ON</b>'
	if cheatKlisma = 0:$cheatKlisma = 'TURNED_OFF'
	if cheatKlisma = 1:$cheatKlisma = '<b>ON</b>'
	if cheatNomakeup = 0:$cheatNomakeup = 'TURNED_OFF'
	if cheatNomakeup = 1:$cheatNomakeup = '<b>ON</b>'
	if cheatNosweat = 0:$cheatNosweat = 'TURNED_OFF'
	if cheatNosweat = 1:$cheatNosweat = '<b>ON</b>'
	if cheatNoEat = 0:$cheatNoEat = 'TURNED_OFF'
	if cheatNoEat = 1:$cheatNoEat = '<b>ON</b>'

	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''
	pl '<a href="exec:dynamic $din_cheat_work">Disable the requirement of labor</a>: <<$cheatWork>>'
	pl '<a href="exec:dynamic $din_cheat_hapri">always combed</a>: <<$cheatHapri>>'
	pl '<a href="exec:dynamic $din_cheat_klisma">Always do an enema</a>: <<$cheatKlisma>>'
	pl '<a href="exec:dynamic $din_cheat_nomakeup">Cosmetics never smeared</a>: <<$cheatNomakeup>>'
	pl '<a href="exec:dynamic $din_cheat_Nosweat">Never sweat</a>: <<$cheatNosweat>>'
	pl '<a href="exec:dynamic $din_cheat_NoEat">Never eat or drink</a>: <<$cheatNoEat>>'
}

$din_cheat_menu_look = {
	gs 'stat'
	clr

	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''
	pl '<a href="exec:dynamic $din_cheat_menu_param">Show design parameters of the body</a>'
	pl ''
	pl '<a href=>now you <<age>> years_old</a>'

	if age >= 0:pl '<a href="exec:dynamic $din_cheat_age">change age</a>'

	pl '<a href=>You look for <<vidage>> years_old</a>'

	if vidage >= 0:pl '<a href="exec:dynamic $din_cheat_agel">Change the visibility of age</a>'

	pl ''
	pl '<<$lip>>'

	if lip < 4:pl '<a href="exec:lip += 1 & dynamic $din_cheat_menu_look">augment the lips</a>'
	if lip > 0:pl '<a href="exec:lip -= 1 & dynamic $din_cheat_menu_look">reduce lips</a>'

	pl ''
	pl '<<$skin>>'

	if skin < 4:pl '<a href="exec:skin += 1 & dynamic $din_cheat_menu_look">improve the skin</a>'
	if skin > 0:pl '<a href="exec:skin -= 1 & dynamic $din_cheat_menu_look">worsen the skin</a>'
	if tan >= 0:pl '<a href="exec:tan += 10 & dynamic $din_cheat_menu_look">become sunburnt</a>'
	if tan > 0:pl '<a href="exec:tan = 0 & dynamic $din_cheat_menu_look">remove tan</a>'

	pl ''
	pl '<<$glaza>>'

	if resnic < 2:pl '<a href="exec:resnic += 1 & dynamic $din_cheat_menu_look">Enlarge eyelashes</a>'
	if resnic > 0:pl '<a href="exec:resnic -= 1 & dynamic $din_cheat_menu_look">reduce eyelashes</a>'
	if glaraz < 3:pl '<a href="exec:glaraz += 1 & dynamic $din_cheat_menu_look">Increase the size of the eye</a>'
	if glaraz > 0:pl '<a href="exec:glaraz -= 1 & dynamic $din_cheat_menu_look">Reduce the size of the eye</a>'

	pl ''

	if salo ! fat:pl '<a href="exec:fat = salo & dynamic $din_cheat_menu_look">balance the fat</a>'
	if salo > 0:pl '<a href="exec:salo -= 5 & fat = salo & dynamic $din_cheat_menu_look">reduce fat</a>'
	if salo > 0:pl '<a href="exec:salo = 0 & fat = salo & dynamic $din_cheat_menu_look">reset fat</a>'

	pl 'fat (<<salo>>): <a href="exec:salo += 5 & fat = salo & dynamic $din_cheat_menu_look">+5</a> <a href="exec:salo += 10 & fat = salo & dynamic $din_cheat_menu_look">+10</a> <a href="exec:salo += 25 & fat = salo & dynamic $din_cheat_menu_look">+25</a> <a href="exec:salo += 50 & fat = salo & dynamic $din_cheat_menu_look">+50</a>'
	pl ''
	pl '<a href="exec:dynamic $din_cheat_menu_tatoo">Tattoo Removal</a>'
}
$din_cheat_menu_param = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>Cheat menu</b></a> - <a href="exec:dynamic $din_cheat_menu_look"><b>Outward Appearance</b></a></center>'
	pl ''
	pl '<<strenbuf>> - strenbuf'
	pl '<<vitalbuf>> - vitalbuf'
	pl '<<vmeat>> - vmeat'
	pl '<<vfat>> - vfat'
	pl '<<Kves>> - Kves'
	pl '<<krost>> - krost'
	pl '<<ves>> - ves'
	pl '<<talia>> - talia - Waist measurement in cm'
	pl '<<grudi>> - grudi - Chest measurement in cm'
	pl '<<bedra>> - bedra'
	pl '<<titK>> - tits'
	pl '<<silicone>> - silicone'
	pl '<<grudi>> - <<talia>> - <<bedra>>, breast size <<tits>>, the difference between the hips and waist <<bedra-talia>> cm'
	pl 'Indicator muscularity <<musle>> - musle, <<salo>> - salo <<salo * 2>> - salo * 2 <<fat>> - fat'
}

$din_cheat_menu_tatoo = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a> - <a href="exec:dynamic $din_cheat_menu_look"><b>Outward Appearance</b></a></center>'
	pl ''

	if tatlip = 0:pl 'You do not have tattoos on his lips</a>'
	if tatlip >= 1:pl '<a href="exec:tatlip = 0 & dynamic $din_cheat_menu_tatoo">Flatten with a tattoo of lips</a>'
	if tatplech = 0:pl 'You do not have tattoos on their shoulders</a>'
	if tatplech >= 1:pl '<a href="exec:tatplech = 0 & dynamic $din_cheat_menu_tatoo">Flatten with a shoulder tattoo</a>'
	if tatback = 0:pl 'You have not got a tattoo on her back</a>'
	if tatback >= 1:pl '<a href="exec:tatback = 0 & dynamic $din_cheat_menu_tatoo">Flatten with the back tattoo</a>'
	if tatupb = 0:pl 'You do not have tattoos on the lower back</a>'
	if tatupb >= 1:pl '<a href="exec:tatupb = 0 & dynamic $din_cheat_menu_tatoo">Reduce a tattoo with lumbar</a>'
	if tatvag = 0:pl 'You do not have a tattoo in the groin</a>'
	if tatvag >= 1:pl '<a href="exec:tatvag = 0 & dynamic $din_cheat_menu_tatoo">Reduce a tattoo with groin</a>'
	if tatleg = 0:pl 'You do not have a tattoo on the ankle</a>'
	if tatleg >= 1:pl '<a href="exec:tatleg = 0 & dynamic $din_cheat_menu_tatoo">Flatten with a tattoo ankle</a>'
}
$din_cheat_menu_stats = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>Cheat menu</b></a></center>'
	pl ''
	pl 'Power (<<stren>>): <a href="exec:stren += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:stren += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:stren += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:stren += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:stren -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:stren -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:stren -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:stren -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Speed (<<speed>>): <a href="exec:speed += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:speed += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:speed += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:speed += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:speed -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:speed -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:speed -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:speed -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Agility (<<agil>>): <a href="exec:agil += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:agil += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:agil += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:agil += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:agil -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:agil -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:agil -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:agil -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Reaction (<<react>>): <a href="exec:react += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:react += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:react += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:react += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:react -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:react -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:react -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:react -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Endurance (<<vital>>): <a href="exec:vital += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:vital += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:vital += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:vital += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:vital -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:vital -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:vital -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:vital -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Will (<<will>>): <a href="exec:will += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:will += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:will += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:will += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:will -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:will -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:will -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:will -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl 'Intelligence (<<intel>>): <a href="exec:intel += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:intel += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:intel += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:intel += 25 & dynamic $din_cheat_menu_stats">+25</a> <a href="exec:intel -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:intel -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:intel -= 10 & dynamic $din_cheat_menu_stats">-10</a> <a href="exec:intel -= 25 & dynamic $din_cheat_menu_stats">-25</a>'
	pl ''
	pl 'Dominance (<<dom>>): <a href="exec:dom += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:dom += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:dom += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:dom -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:dom -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:dom -= 10 & dynamic $din_cheat_menu_stats">-10</a>'
	pl 'Submission (<<sub>>): <a href="exec:sub += 1 & dynamic $din_cheat_menu_stats">+1</a> <a href="exec:sub += 5 & dynamic $din_cheat_menu_stats">+5</a> <a href="exec:sub += 10 & dynamic $din_cheat_menu_stats">+10</a> <a href="exec:sub -= 1 & dynamic $din_cheat_menu_stats">-1</a> <a href="exec:sub -= 5 & dynamic $din_cheat_menu_stats">-5</a> <a href="exec:sub -= 10 & dynamic $din_cheat_menu_stats">-10</a>'
	pl ''

	if beg >= 0:pl '<a href="exec:beg += 25 & dynamic $din_cheat_menu_stats">The_Run: <<beg>></a>'
	if volleyboll >= 0:pl '<a href="exec:volleyboll += 25 & dynamic $din_cheat_menu_stats">volleyball: <<volleyboll>></a>'

	pl ''

	if dance >= 0:pl '<a href="exec:dance += 25 &dynamic $din_cheat_menu_stats">dancing: <<dance>></a>'
	if dancePRO >= 0:pl '<a href="exec:dancePRO += 25 & dynamic $din_cheat_menu_stats">Prof.. dancing: <<dancePRO>></a>'
	if stripdance >= 0:pl '<a href="exec:stripdance += 25 &dynamic $din_cheat_menu_stats">striptease: <<stripdance>></a>'
	if poledance >= 0:pl '<a href="exec:poledance += 25 & dynamic $din_cheat_menu_stats">Dancing in the six: <<poledance>></a>'

	pl ''

	if Jab >= 0:pl '<a href="exec:jab += 25 & dynamic $din_cheat_menu_stats">Jeb: <<jab>></a>'
	if Punch >= 0:pl '<a href="exec:punch += 25 & dynamic $din_cheat_menu_stats">power Strokes: <<punch>></a>'
	if Kik >= 0:pl '<a href="exec:kik += 25 & dynamic $din_cheat_menu_stats">kicks: <<kik>></a>'
	if KikDef >= 0:pl '<a href="exec:kikdef += 25 & dynamic $din_cheat_menu_stats">protection: <<kikdef>></a>'
	if vokal > 0:pl '<a href="exec:vokal += 25 & dynamic $din_cheat_menu_stats">vocal skills: <<vokal>></a>'

	pl ''

	if workPTU > 1:pl '<a href="exec:teachlevel += 10 & dynamic $din_cheat_menu_stats">Reputation teachers: <<teachlevel>></a>'
	if suspeh >= 0:pl '<a href="exec:suspeh += 10 & dynamic $din_cheat_menu_stats">improve their academic performance: <<suspeh>></a>'
	if schoolprogul >= 0:pl '<a href="exec:schoolprogul = 0 & dynamic $din_cheat_menu_stats">reset Absenteeism: <<schoolprogul>></a>'

	pl ''
	pl '<b>Test options</b> are present in the mechanism of the game, but not involved in the game quests.'

	if mutagenP = 0:pl 'Mutagen force <a href="exec:mutagenP = 1 & stren = 150 & dynamic $din_cheat">1st Level</a>'
	if mutagenP = 1:pl 'Mutagen force <a href="exec:mutagenP = 2 & stren = 200 & dynamic $din_cheat">level 2</a>'
	if mutagenP = 2:pl 'Mutagen force <a href="exec:mutagenP = 3 & stren = 250 & dynamic $din_cheat">level 3</a>'
	if mutagenP > 0:pl 'Mutagen force <a href="exec:mutagenP = 0 & stren = 100 & dynamic $din_cheat">Zero</a>'
	if mutagenV = 0:pl 'Mutagen endurance <a href="exec:mutagenV = 1 & vital = 150 & dynamic $din_cheat">1st Level</a>'
	if mutagenV = 1:pl 'Mutagen endurance <a href="exec:mutagenV = 2 & vital = 200 & dynamic $din_cheat">level 2</a>'
	if mutagenV = 2:pl 'Mutagen endurance <a href="exec:mutagenV = 3 & vital = 250 & dynamic $din_cheat">level 3</a>'
	if mutagenV > 0:pl 'Mutagen endurance <a href="exec:mutagenV = 0 & vital = 100 & dynamic $din_cheat">Zero</a>'
	if mutagenA = 0:pl 'Mutagen Agility <a href="exec:mutagenA = 1 & agil = 150 & dynamic $din_cheat">1st Level</a>'
	if mutagenA = 1:pl 'Mutagen Agility <a href="exec:mutagenA = 2 & agil = 200 & dynamic $din_cheat">level 2</a>'
	if mutagenA = 2:pl 'Mutagen Agility <a href="exec:mutagenA = 3 & agil = 250 & dynamic $din_cheat">level 3</a>'
	if mutagenA > 0:pl 'Mutagen Agility <a href="exec:mutagenA = 0 & agil = 100 & dynamic $din_cheat">Zero</a>'
}

$din_cheat_menu_reputation = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''

	if nastjaQW >= 0:pl '<a href="exec:nastjaQW += 10 & dynamic $din_cheat_menu_reputation">Friendship with Nastya: <<nastjaQW>></a>'
	if kat >= 0:pl '<a href="exec:kat += 10 & dynamic $din_cheat_menu_reputation">Friendship with Kate: <<kat>></a>'
	if vika >= 0:pl '<a href="exec:vika += 10 & dynamic $din_cheat_menu_reputation">Friendship with Vika: <<vika>></a>'
	if Irina >= 0:pl '<a href="exec:Irina += 10 & dynamic $din_cheat_menu_reputation">Friendship with Irina: <<Irina>></a>'
	if Tamara >= 0:pl '<a href="exec:Tamara += 10 & dynamic $din_cheat_menu_reputation">Friendship with Tamara: <<Tamara>></a>'
	if alla >= 0:pl '<a href="exec:alla += 10 & dynamic $din_cheat_menu_reputation">Friendship with Alla: <<alla>></a>'
	if masha >= 0:pl '<a href="exec:masha += 10 & dynamic $din_cheat_menu_reputation">Friendship with Masha: <<masha>></a>'
	if Givi >= 0:pl '<a href="exec:Givi += 10 & dynamic $din_cheat_menu_reputation">Friendship with Givi Karapetovich: <<Givi>></a>'
	if Ashot >= 0:pl '<a href="exec:Ashot += 10 & dynamic $din_cheat_menu_reputation">Friendship with Ashot: <<Ashot>></a>'
	if Dmitry >= 0:pl '<a href="exec:Dmitry += 10 & dynamic $din_cheat_menu_reputation">Friendship with Dima: <<Dmitry>></a>'
	if afra >= 0:pl '<a href="exec:afra += 10 & dynamic $din_cheat_menu_reputation">Friendship with blacks: <<afra>></a>'

	pl ''

	if GorSlut > 0:pl 'In the town you are known as <<$gnikname>> (<<GorSlut>>)'
	if GorSlut = 0:pl 'You have a good reputation in the town (0)'
	if GorSlut ! 1:pl '<a href="exec:GorSlut = 1 & dynamic $din_cheat_menu_reputation">Back reputation "davalka" (1)</a>'
	if GorSlut ! 2:pl '<a href="exec:GorSlut = 2 & dynamic $din_cheat_menu_reputation">Back reputation "vaflersha" (2)</a>'
	if GorSlut ! 3:pl '<a href="exec:GorSlut = 3 & dynamic $din_cheat_menu_reputation">Back reputation "Total huesoska" (3)</a>'
	if GorSlut ! 4:pl '<a href="exec:GorSlut = 4 & dynamic $din_cheat_menu_reputation">Back reputation "Total hole" (4)</a>'
	if GorSlut ! 5:pl '<a href="exec:GorSlut = 5 & dynamic $din_cheat_menu_reputation">Back reputation "lowered slut" (5)</a>'
	if GorSlut ! 6:pl '<a href="exec:GorSlut = 6 & dynamic $din_cheat_menu_reputation">Back reputation "prostitute" (6)</a>'
	if GorSlut > 0:pl '<a href="exec:GorSlut = 0 & dynamic $din_cheat_menu_reputation">Clear reputation in town (0)</a>'
	if opusk > 0 or sipovka > 0 or rozetka > 0:pl '<a href="exec:opusk = 0 & sipovka = 0 & rozetka = 0 & dynamic $din_cheat_menu_reputation">Clear reputation with Gopnik</a>'
}

$din_cheat_menu_documents = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''

	if diplom = 0:pl '<a href="exec:diplom = 1 & dynamic $din_cheat_menu_documents">Get Diploma</a>'
	if diplom = 1:pl 'You already have a diploma'
	if secrdiplom = 0:pl '<a href="exec:secrdiplom = 1 & dynamic $din_cheat_menu_documents">Get Secretarial Diploma</a>'
	if secrdiplom = 1:pl 'You already have a diploma Secretary'
	if masash < 10:pl '<a href="exec:masash = 10 & dynamic $din_cheat_menu_documents">Get Certificate Masseur</a>'
	if masash >= 10:pl 'You already have a certificate masseur'
	if prava = 0:pl '<a href="exec:prava = 1 & dynamic $din_cheat_menu_documents">Get the right</a>'
	if prava = 1:pl 'Do you already have rights'
}

$din_cheat_menu_time = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''
	pl 'Right_Now <<$week>> <<day>> the_number, <<$month>>, <<year>> a_year.'
	pl '<a href="exec:dynamic $din_cheat_menu_week">Select Day of the Week</a>'
	pl '<a href="exec:day += 1 & dynamic $din_cheat_menu_time">+1 The_Day</a>'
	pl '<a href="exec:day -= 1 & dynamic $din_cheat_menu_time">-1 The_Day</a>'
	pl '<a href="exec:dynamic $din_cheat_menu_month">select Month</a>'
	pl '<a href="exec:year += 1 & dynamic $din_cheat_menu_time">+1 The_Year</a>'
	pl '<a href="exec:year -= 1 & dynamic $din_cheat_menu_time">-1 The_Year</a>'
}

$din_cheat_menu_week = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a> - <a href="exec:dynamic $din_cheat_menu_time"><b>period_Of</b></a></center>'
	pl ''
	pl 'Right_Now <<$week>> <<day>> the_number, <<$month>>, <<year>> a_year.'
	pl '<a href="exec:week = 1 & dynamic $din_cheat_menu_time">Monday</a>'
	pl '<a href="exec:week = 2 & dynamic $din_cheat_menu_time">Tuesday</a>'
	pl '<a href="exec:week = 3 & dynamic $din_cheat_menu_time">Wednesday</a>'
	pl '<a href="exec:week = 4 & dynamic $din_cheat_menu_time">Thursday</a>'
	pl '<a href="exec:week = 5 & dynamic $din_cheat_menu_time">Friday</a>'
	pl '<a href="exec:week = 6 & dynamic $din_cheat_menu_time">Saturday</a>'
	pl '<a href="exec:week = 7 & dynamic $din_cheat_menu_time">Sunday</a>'
}

$din_cheat_menu_month = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a> - <a href="exec:dynamic $din_cheat_menu_time"><b>period_Of</b></a></center>'
	pl ''
	pl 'Right_Now <<$week>> <<day>> the_number, <<$month>>, <<year>> a_year.'
	pl '<a href="exec:month = 1 & dynamic $din_cheat_menu_time">January</a>'
	pl '<a href="exec:month = 2 & dynamic $din_cheat_menu_time">February</a>'
	pl '<a href="exec:month = 3 & dynamic $din_cheat_menu_time">March</a>'
	pl '<a href="exec:month = 4 & dynamic $din_cheat_menu_time">April</a>'
	pl '<a href="exec:month = 5 & dynamic $din_cheat_menu_time">May</a>'
	pl '<a href="exec:month = 6 & dynamic $din_cheat_menu_time">June</a>'
	pl '<a href="exec:month = 7 & dynamic $din_cheat_menu_time">July</a>'
	pl '<a href="exec:month = 8 & dynamic $din_cheat_menu_time">August</a>'
	pl '<a href="exec:month = 9 & dynamic $din_cheat_menu_time">September</a>'
	pl '<a href="exec:month = 10 & dynamic $din_cheat_menu_time">October</a>'
	pl '<a href="exec:month = 11 & dynamic $din_cheat_menu_time">November</a>'
	pl '<a href="exec:month = 12 & dynamic $din_cheat_menu_time">December</a>'
}

$din_cheat_menu_magic = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $objcheat_menu"><b>cheat menu</b></a></center>'
	pl ''
	pl '<a href="exec:magik += 1 & dynamic $din_cheat_menu_magic">is_magical: <<magik>></a>'
	pl ''

	if spelltuman = 0:pl '<a href="exec:spelltuman = 1 & dynamic $din_cheat_menu_magic">Cover the area fog</a>'
	if spellklon = 0:pl '<a href="exec:spellklon = 1 & dynamic $din_cheat_menu_magic">Substitute itself clone</a>'
	if spellstun = 0:pl '<a href="exec:spellstun = 1 & dynamic $din_cheat_menu_magic">paralyze the enemy</a>'
	if spellweap = 0:pl '<a href="exec:spellweap = 1 & dynamic $din_cheat_menu_magic">Invest in energy weapons (requires weapons)</a>'
	if spellwind = 0:pl '<a href="exec:spellwind = 1 & dynamic $din_cheat_menu_magic">blow away the fog</a>'
	if spellklon2 = 0:pl '<a href="exec:spellklon2 = 1 & dynamic $din_cheat_menu_magic">Substitute itself clones (3 pieces)</a>'
	if spellenergo = 0:pl '<a href="exec:spellenergo = 1 & dynamic $din_cheat_menu_magic">Create weak energy shield</a>'
	if spellinit = 0:pl '<a href="exec:spellinit = 1 & dynamic $din_cheat_menu_magic">Write a slight deceleration time</a>'
	if spellhel = 0:pl '<a href="exec:spellhel = 1 & dynamic $din_cheat_menu_magic">Battle Heal</a>'

	if spellfire0 = 0 or spellfire2 = 0 or spellfire3 = 0 or spellfire4 = 0 or spellfire5 = 0:
		pl ''
		pl '<b>Elements of Fire Spells:</b></a>'
	end

	if spellfire0 = 0:pl '<a href="exec:spellfire0 = 1 & dynamic $din_cheat_menu_magic">Flame</a>'
	if spellfire2 = 0:pl '<a href="exec:spellfire2 = 1 & dynamic $din_cheat_menu_magic">The release of fire</a>'
	if spellfire3 = 0:pl '<a href="exec:spellfire3 = 1 & dynamic $din_cheat_menu_magic">fire barrier</a>'
	if spellfire4 = 0:pl '<a href="exec:spellfire4 = 1 & dynamic $din_cheat_menu_magic">firestorm</a>'
	if spellfire5 = 0:pl '<a href="exec:spellfire5 = 1 & dynamic $din_cheat_menu_magic">Flame Shield</a>'

	if spellele0 = 0 or spellele2 = 0 or spellele3 = 0 or spellele4 = 0 or spellele5 = 0:
		pl ''
		pl '<b>Elements Lightning Spells:</b></a>'
	end

	if spellele0 = 0:pl '<a href="exec:spellele0 = 1 & dynamic $din_cheat_menu_magic">discharge</a>'
	if spellele2 = 0:pl '<a href="exec:spellele2 = 1 & dynamic $din_cheat_menu_magic">lightning</a>'
	if spellele3 = 0:pl '<a href="exec:spellele3 = 1 & dynamic $din_cheat_menu_magic">electric barrier</a>'
	if spellele4 = 0:pl '<a href="exec:spellele4 = 1 & dynamic $din_cheat_menu_magic">Dance of thousands of birds</a>'
	if spellele5 = 0:pl '<a href="exec:spellele5 = 1 & dynamic $din_cheat_menu_magic">dancing sphere</a>'

	if spellert0 = 0 or spellert2 = 0 or spellert3 = 0 or spellert4 = 0 or spellert5 = 0:
		pl ''
		pl '<b>Spells Earth Elements:</b></a>'
	end

	if spellert0 = 0:pl '<a href="exec:spellert0 = 1 & dynamic $din_cheat_menu_magic">quicksand</a>'
	if spellert2 = 0:pl '<a href="exec:spellert2 = 1 & dynamic $din_cheat_menu_magic">active protection</a>'
	if spellert3 = 0:pl '<a href="exec:spellert3 = 1 & dynamic $din_cheat_menu_magic">abyss</a>'
	if spellert4 = 0:pl '<a href="exec:spellert4 = 1 & dynamic $din_cheat_menu_magic">absolute protection</a>'
	if spellert5 = 0:pl '<a href="exec:spellert5 = 1 & dynamic $din_cheat_menu_magic">Sando</a>'

	if spellwind0 = 0 or spellwind2 = 0 or spellwind3 = 0 or spellwind4 = 0 or spellwind5 = 0:
		pl ''
		pl '<b>Spells with wind energy:</b></a>'
	end

	if spellwind0 = 0:pl '<a href="exec:spellwind0 = 1 & dynamic $din_cheat_menu_magic">wind gust</a>'
	if spellwind2 = 0:pl '<a href="exec:spellwind2 = 1 & dynamic $din_cheat_menu_magic">terrifying pressure</a>'
	if spellwind3 = 0:pl '<a href="exec:spellwind3 = 1 & dynamic $din_cheat_menu_magic">vacuum sphere</a>'
	if spellwind4 = 0:pl '<a href="exec:spellwind4 = 1 & dynamic $din_cheat_menu_magic">vacuum shells</a>'
	if spellwind5 = 0:pl '<a href="exec:spellwind5 = 1 & dynamic $din_cheat_menu_magic">devouring vacuum</a>'

	if spellwater0 = 0 or spellwater2 = 0 or spellwater3 = 0 or spellwater4 = 0 or spellwater5 = 0:
		pl ''
		pl '<b>Water Elemental spells:</b></a>'
	end

	if spellwater0 = 0:pl '<a href="exec:spellwater0 = 1 & dynamic $din_cheat_menu_magic">creek manna</a>'
	if spellwater2 = 0:pl '<a href="exec:spellwater2 = 1 & dynamic $din_cheat_menu_magic">flooding</a>'
	if spellwater3 = 0:pl '<a href="exec:spellwater3 = 1 & dynamic $din_cheat_menu_magic">blister</a>'
	if spellwater4 = 0:pl '<a href="exec:spellwater4 = 1 & dynamic $din_cheat_menu_magic">Water shark missile</a>'
	if spellwater5 = 0:pl '<a href="exec:spellwater5 = 1 & dynamic $din_cheat_menu_magic">The Great Flood'
}

$din_cheat_dynamic = {
	$dynamicCommand = input("Enter command to execute.")
	if $dynamicCommand = '':exit
	dynamic $dynamicCommand
}

$objcheat_menu = {
	gs 'stat'
	clr
	pl '<center><a href="exec:gs ''stat''"><b>Get out of the cheat menu</b></a></center>'
	pl ''
	pl '<a href="exec:dynamic $din_cheat_menu_permanent"><b>permanent</b></a>'
	pl '<a href="exec:dynamic $din_cheat_menu_look"><b>Appearance</b></a>'
	pl '<a href="exec:dynamic $din_cheat_menu_stats"><b>Characteristics of</b></a>'
	pl '<a href="exec:dynamic $din_cheat_menu_reputation"><b>Relationships and Reputation</b></a>'
	pl '<a href="exec:dynamic $din_cheat_menu_documents"><b>documents</b></a>'
	pl '<a href="exec:dynamic $din_cheat_menu_time"><b>manipulation of time</b></a>'

	if StoryLine = 0:pl '<a href="exec:dynamic $din_cheat_menu_magic"><b>Magic</b></a>'

	pl ''
	pl '<a href="exec:health = vital * 10 + stren * 5 + 1000 & willpower = intel * 5 + will * 5 + 1000 & manna = (intel * magik) + magik * 100 + vital * 10 + rikudo & dynamic $objcheat_menu">Complete recovery, manna, reason.</a>'
	pl '<a href="exec:dynamic $din_cheat_money">Change the amount of money</a>'
	pl '<a href="exec:money = 0 & dynamic $din_cheat">Zero the money</a>'

	pl ''
	pl '<a href="exec:dynamic $din_cheat_dynamic">Dynamic Input Command</a>'
}
$objmagic = {
	clr

	if magik = 0:
		pl 'You are unable to use magic.'
	else
		pl 'Available to you <<manna>> units of manna.'
		!!' Rikudo forces available to you <<rikudo>> units'
		nl
		pl '<b>BASIC SPELL:</b>' & nl
		if spelltuman > 0:pl 'Cover the area fog, a great way to hide their actions from the attacking enemy and not a bad way to increase the chance to dodge enemy attacks, as he can not see you in your fog (mana cost of 10 units)' & nl
		if spellklon > 0:pl 'Substitute itself clone powerful way to avoid enemy attacks substituting itself clone opponent gets to clone and not on you, he just wasted power (mana cost of 15 units)' & nl
		if spellstun > 0:pl 'Paralyze a great way to stop the enemy, he will not be able to defend and attack. (Cost 20 mana units)' & nl
		if spellweap > 0 and weapon > 0:pl 'Invest in energy weapons'
		if spellwind > 0:pl 'Blow away the fog, mist spell any scattering over the battlefield.' & nl
		if spellklon2 > 0:pl 'Substitute themselves clones (3 pieces), the enemy will not be able to get to you until you destroy all of your clones. (Cost 45 mana units)' & nl
		if spellenergo > 0:pl 'Create weak energy shield spell protects against all attacks of the physical nature, even if the enemy attack exceeds the capabilities of the shield and the shield will be destroyed by the first blow, you can still protect yourself from the damage (cost 50 mana units)' & nl
		if spellinit > 0:pl 'Create weak deceleration time powerful spell allowing you to move faster, you can snatch the initiative with this spell that would strike another spell to increase your chance to hit too, because you will move very quickly (cost 60 mana units)' & nl
		if spellhel > 0:pl 'Martial treatment restores or adds 400 health units in exchange for 400 units of manna.' & nl
		if stihia = 1:pl 'SPELL elements of fire' & nl
		if spellfire1 = 1:pl 'Flame. Inflicts little damage. (Cost 10 mana)' & nl
		if spellfire2 = 1:pl 'Release of fire. A damage. (100 mana cost)' & nl
		if spellfire3 = 1:pl 'Fire barrier, creates a shield of 750 units. (150 mana cost)' & nl
		if spellfire4 = 1:pl 'Firestorm. Causes great damage to an enemy difficult to dodge. (250 mana cost)' & nl
		if spellfire5 = 1:pl 'Flame Shield creates a shield of 2,500 units. (500 mana cost)' & nl
		if stihia = 2:pl 'SPELL element of lightning' & nl
		if spellele1 = 1:pl 'Discharge. Inflicts very little damage. (Cost 10 mana)' & nl
		if spellele2 = 1:pl 'Lightning. Inflicts above average. (100 mana cost)' & nl
		if spellele3 = 1:pl 'Electrical barrier creates a shield of 1,500. (150 mana cost)' & nl
		if spellele4 = 1:pl 'Dance of thousands of birds. Inflicts very high damage. (250 mana cost)' & nl
		if spellele5 = 1:pl 'Plyaschuschaya sphere creates a shield of 5,000 units. (500 mana cost)' & nl

		if stihia = 3:pl 'SPELL Element Earth' & nl
		if spellert1 = 1:pl 'Quicksand trap catches the enemy in quicksand and causes little damage. (Cost 10 mana)' & nl
		if spellert2 = 1:pl 'Active protection, creates a protective sphere of earth, stone and sand 2,500 mana and health protection, this protection is self-healing in 10 moves absorbing units 20 mana per turn. (100 mana cost)' & nl
		if spellert3 = 1:pl 'Abyss earth asunder underfoot enemy inflicting damage above average and depriving him of the ability to move. (150 mana cost)' & nl
		if spellert4 = 1:pl 'Absolute protection, creates a huge protective sphere of the earth, which regenerates itself every move and attack the enemy. (250 mana cost)' & nl
		if spellert5 = 1:pl 'Sando, two huge plates come out of the ground and collapse crushing the enemy inflicting massive damage and depriving him of his ability to move. 500 mana cost.' & nl
		if stihia = 4:pl 'Spells with wind energy' & nl
		if spellwind1 = 1:pl 'A gust of wind, causing very little damage and destroy clones and fog, it is very difficult to dodge. (Cost 10 mana)' & nl
		if spellwind2 = 1:pl 'Horrendous pressure, causing moderate damage and destroying clones and fog, it is very difficult to dodge. (100 mana cost)' & nl
		if spellwind3 = 1:pl 'Vacuum sphere, creates a shield of 1,500. (150 mana cost)' & nl
		if spellwind4 = 1:pl 'Vacuum shells do more damage and destroy clones and fog, it is very difficult to dodge. (250 mana cost)' & nl
		if spellwind5 = 1:pl 'Devouring vacuum sucks shield enemy destroying it whatever strength he was not. (500 mana cost)' & nl
		if stihia = 5:pl 'SPELL elements of water' & nl
		if spellwater1 = 1:pl 'Creek manna causes very little damage and absorbs a lot of mana. Cost 10 mana.' & nl
		if spellwater2 = 1:pl 'Flooding, causing moderate damage and absorbs manna above average. 100 mana cost.' & nl
		if spellwater3 = 1:pl 'Water bubble creates a protective sphere of water 1,500 protection from all influences, this protection is self-healing in 10 moves absorbing units 20 mana per turn. (150 mana cost)' & nl
		if spellwater4 = 1:pl 'Water shark missile, causing great damage and absorbs a lot of mana. Cost 250 mana.' & nl
		if spellwater5 = 1:pl 'Great flood, the water creates a huge sphere that absorbs enemy and deflating manna from it and handing it to provide increased protection. 500 mana cost.' & nl
	end
}

$objbody = {
	if musle >= salo:
		!!muscular type
		if bedra < 60:view 'images/body/fit.jpg'
		if bedra >= 60 and bedra < 70:view 'images/body/fit1.jpg'
		if bedra >= 70 and bedra < 80:view 'images/body/fit2.jpg'
		if bedra >= 80 and bedra < 90:view 'images/body/fit3.jpg'
		if bedra >= 90 and bedra < 100:view 'images/body/fit4.jpg'
		if bedra >= 100 and bedra < 110:view 'images/body/fit5.jpg'
		if bedra >= 110 and bedra < 120:view 'images/body/fit6.jpg'
		if bedra >= 120:view 'images/body/fit7.jpg'
	else
		!!bold type
		! Updated to be consistent with current images
		if bedra < 60:
			view 'images/body/fat.jpg'
		elseif bedra < 70:
			view 'images/body/fat1.jpg'
		elseif bedra < 80:
			view 'images/body/fat2.jpg'
		elseif bedra < 90:
			view 'images/body/fat3.jpg'
		elseif bedra < 100:
			view 'images/body/fat4.jpg'
		elseif bedra < 110:
			view 'images/body/fat5.jpg'
		elseif bedra < 120:
			view 'images/body/fat6.jpg'
		else
			view 'images/body/fat7.jpg'
		end
	end
}

$objtattoos = {
	$tatlipdi = {
		view 'images/Body/tatlip<<tatlip>>.jpg'
	}

	$tatpledi = {
		view 'images/body/tatplech<<tatplech>>.jpg'
	}

	$tatbackdi = {
		view 'images/body/tatb<<tatback>>.jpg'
	}

	$tatupbdi = {
		view 'images/body/tatupb<<tatupb>>.jpg'
	}

	$tatvagdi = {
		view 'images/body/tatvag<<tatvag>>.jpg'
	}

	$tatlegdi = {
		view 'images/body/tatleg<<tatleg>>.jpg'
	}

	clr

	if tatlip > 0:pl '<a href="exec:dynamic $tatlipdi">tattoo on the lip</a>.'
	if tatplech > 0:pl '<a href="exec:dynamic $tatpledi">tattoo on the shoulders</a>'
	if tatback > 0:pl '<a href="exec:dynamic $tatbackdi">tattoo on the back</a>'
	if tatupb > 0:pl '<a href="exec:dynamic $tatupbdi">tattoo on the lower back</a>'
	if tatvag > 0:pl '<a href="exec:dynamic $tatvagdi">Tattoos in the groin</a>'
	if tatleg > 0:pl '<a href="exec:dynamic $tatlegdi">tattoo on the legs</a>'
	if tatvag = 0 and tatlip = 0 and tatplech = 0 and tatback = 0 and tatupb = 0 and tatleg = 0:pl 'You pristine pure body. Not in terms of corruption, but in terms of tattoos.'
}

$objpirsing = {
	$dipirsA = {
		view 'images/body/pirsA.jpg'
	}

	$dipirsB = {
		view 'images/body/pirsB.jpg'
	}

	$dipirsC = {
		view 'images/body/pirsC.jpg'
	}

	$dipirsD = {
		view 'images/body/pirsD.jpg'
	}

	$dipirsE = {
		view 'images/body/pirsE.jpg'
	}

	$dipirsF = {
		view 'images/body/pirsF.jpg'
	}

	$dipirsG = {
		view 'images/body/pirsG.jpg'
	}

	$dipirsN = {
		view 'images/body/pirsN.jpg'
	}

	clr

	if pirsA = 1:pl 'Your tongue pierced and there is inserted a small bar that is constantly felt in the mouth. <a href="exec:dynamic $dipirsA">view</a>'
	if pirsB = 1:pl 'You pierced lower lip and there vdet ring. <a href="exec:dynamic $dipirsB">view</a>'
	if pirsC = 1:pl 'On your ears hang earrings. <a href="exec:dynamic $dipirsC">view</a>'
	if pirsD = 1:pl 'You have a small ring in the nose. <a href="exec:dynamic $dipirsD">view</a>'
	if pirsE = 1:pl 'In your eyebrow barbell inserted. <a href="exec:dynamic $dipirsE">view</a>'
	if pirsF = 1:pl 'You have pierced nipples and inserted them in small metal rod. <a href="exec:dynamic $dipirsF">view</a>'
	if pirsG = 1:pl 'You pierced lips on the vagina and there inserted rings. <a href="exec:dynamic $dipirsG">view</a>'
	if pirsN = 1:pl 'You pierced navel, and there is inserted rod. <a href="exec:dynamic $dipirsN">view</a>'
}

$objobnovit = {
	gs 'stat'
}

$objbloknot = {
	clr
	pl '<center><b><font color="maroon">Diary</font></b></center>'
	if housr > 0:pl 'I live in a two-room apartment in a residential area. Payment for the apartment is taken automatically in the amount of 3,000 rubles each 25e number. Plus a light bill.' & nl
	if work > 0 or stripwork > 0 or workPTU > 2:pl '<center><font color="maroon">-- My Job --</font></center>'
	if workPTU > 2:pl 'I work as a teacher in the Lyceum. Working days Mon-Sat from 14.00 to 16.00. Salary 300 rubles / day. Dress code - office, strict. The road from the apartment to the Lyceum takes 2 hours and 10 minutes.' & nl
	if (work = 1 or cheatWork = 1) and workKafe > 0:pl 'I work as a waitress in a cafe. Need to come to work with 11 to 12 working days, Tuesday, Wednesday, Thursday. At work every day you get tips from customers and automatically transferred to the 25th salary number.' & nl
	if (work = 1 or cheatWork = 1) and workhosp > 0:pl 'I work as a nurse in the clinic. Need to come to work from 8 to 9 on weekdays. Salary is automatically transferred to the 25th number.' & nl
	if (work = 1 or cheatWork = 1) and worksalon > 0:pl 'I work as a masseuse in the cabin. Need to come to work from 9 to 10 working days, Monday, Wednesday and Friday. Salary is automatically transferred to the 25th number.' & nl
	if (work = 1 or cheatWork = 1) and workhosp > 0:pl 'I work as a secretary in the office. Need to come to work until 9 on weekdays. Salary is automatically transferred to the 25th number.' & nl
	if (work = 1 or cheatWork = 1) and tanwork > 0:pl 'I work as a governess at Tani. Salary is automatically transferred to the 25th number.' & nl
	if (work = 1 or cheatWork = 1) and young_shop_work = 1:pl 'I work in a store saleswoman Keys Pussy. Need to come to work in 15 workdays all except Saturday and Sunday. Salary is issued once a week on Fridays.' & nl

	if workrin = 1:pl 'I work in a tent on the market Arthur clothing saleswoman. Work on Tuesdays, Thursdays and Saturdays, come at 8 o´clock. Salary depends on the sales.' & nl
	if stripwork >= 1:pl 'I work as a stripper, schedule a free, on any day from 15 up to 2 nights. Salary only tip.' & nl
	if bumtolik = 4:pl 'Service for the Homeless is located in the Northern Region.' & nl
	if bumtolik = 5:pl 'You volunteer to help the homeless service. Office hours 9 prior_to 17, Weekend Saturday and Sunday.' & nl

	if husband > 0 or kid > 0 :'<center><font color="maroon">-- My Family --</font></center>'
	if husband > 0:pl 'I ve been married for <<husbanday>> days. My husband <<$husName>> <<$husBody>> <<$husFat>> <<$husHair>>. Member <<husDick>> Relationships <<husband>>' & nl
	if kid > 0:pl 'I have a child <<$kidname[kidDiary]>>, age <<kid[kidDiary]>> days.' & nl
	if $bfsex > 0:pl '<<$bfsex>>'
	if bfA > 1:pl 'My current boyfriend, <<$boyA>>, is a <<$boybodyA>> <<$boybodA>> <<$boyfaceA>>. He is usually <<$boyCloA>> Our relationship is <<bfA>> and we have met <<dayA>> times.' & nl
	if harakBoyA = 0 and bfA > 1:pl 'He is calm and self-possessed character.' & nl
	if harakBoyA = 1 and bfA > 1:pl 'He is cheerful and sociable nature.' & nl
	if harakBoyA = 2 and bfA > 1:pl 'He is irascible and very rigid.' & nl
	if bfB > 1:pl 'Another boyfriend, <<$boyB>>, is a <<$boybodyB>> <<$boybodB>> <<$boyfaceB>>. He is usually <<$boyCloB>>. Our relationship is <<bfB>> and we have met <<dayB>> times.' & nl
	if bfC > 1:pl 'My third boyfriend, <<$boyC>>, is a <<$boybodyC>> <<$boybodC>> <<$boyfaceC>>. He is usually <<$boyCloC>>. Our relationship is <<bfC>> and we have met <<dayC>> times.' & nl

	gs 'Menu.Create', 'zapisMenu'
	gs 'Menu.Add', 'zapisMenu', 'Recording from today', '', 'MenuLoc', 'zapisosn'
	gs 'Menu.Add', 'zapisMenu', 'To record on 1th line', '', 'MenuLoc', 'zapis'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 1th line', '', 'MenuLoc', 'ot'
	gs 'Menu.Add', 'zapisMenu', 'To record on 2th line', '', 'MenuLoc', 'zapis2'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 2th line', '', 'MenuLoc', 'ot2'
	gs 'Menu.Add', 'zapisMenu', 'To record on 3th line', '', 'MenuLoc', 'zapis3'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 3th line', '', 'MenuLoc', 'ot3'
	gs 'Menu.Add', 'zapisMenu', 'To record on 4th line', '', 'MenuLoc', 'zapis4'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 4th line', '', 'MenuLoc', 'ot4'
	gs 'Menu.Add', 'zapisMenu', 'To record on 5th line', '', 'MenuLoc', 'zapis5'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 5th line', '', 'MenuLoc', 'ot5'
	gs 'Menu.Add', 'zapisMenu', 'To record on 6th line', '', 'MenuLoc', 'zapis6'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 6th line', '', 'MenuLoc', 'ot6'
	gs 'Menu.Add', 'zapisMenu', 'To record on 7th line', '', 'MenuLoc', 'zapis7'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 7th line', '', 'MenuLoc', 'ot7'
	gs 'Menu.Add', 'zapisMenu', 'To record on 8th line', '', 'MenuLoc', 'zapis8'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 8th line', '', 'MenuLoc', 'ot8'
	gs 'Menu.Add', 'zapisMenu', 'To record on 9th line', '', 'MenuLoc', 'zapis9'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 9th line', '', 'MenuLoc', 'ot9'
	gs 'Menu.Add', 'zapisMenu', 'To record on 10th line', '', 'MenuLoc', 'zapis10'
	gs 'Menu.Add', 'zapisMenu', 'With a red line 10th line', '', 'MenuLoc', 'ot10'
	gs 'Menu.Create', 'disMenu'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 1st row', '', 'MenuLoc', 'diszapis'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 2nd row', '', 'MenuLoc', 'diszapis2'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 3rd row', '', 'MenuLoc', 'diszapis3'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 4th row', '', 'MenuLoc', 'diszapis4'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 5th row', '', 'MenuLoc', 'diszapis5'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 6th row', '', 'MenuLoc', 'diszapis6'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 7th row', '', 'MenuLoc', 'diszapis7'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 8th row', '', 'MenuLoc', 'diszapis8'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 9th row', '', 'MenuLoc', 'diszapis9'
	gs 'Menu.Add', 'disMenu', 'Delete an entry from the 10th row', '', 'MenuLoc', 'diszapis10'

	pl '<a href="exec:gs ''Menu.Call'', ''zapisMenu''">Make an entry</a> or <a href="exec:gs ''Menu.Call'', ''disMenu''">delete the record</a>'
	pl '<<$zapisOsn>>'
	pl '<<$zapis>>'
	pl '<<$zapis2>>'
	pl '<<$zapis3>>'
	pl '<<$zapis4>>'
	pl '<<$zapis5>>'
	pl '<<$zapis6>>'
	pl '<<$zapis7>>'
	pl '<<$zapis8>>'
	pl '<<$zapis9>>'
	pl '<<$zapis10>>'
}

$objavariya = {
	'<center><b>YOU HAVE JUST BEEN USED EMERGENCY LEAVE BLANK SCREEN Bagan</b></center>'
	*nl
	'<center><b>not use this feature without a good reason, can cause STABLE ERROR THAT WILL RUIN YOUR CONSERVATION</b></center>'
	*nl

	if StoryLine = 1:gt 'gorodok'

	gt 'street'
}

$objnewmenu = {
	killobj
	oldobjmenu = 0
	addobj 'Character'
	addobj 'See'
	addobj 'Others'
	addobj 'Menu'
}

$objoldmenu = {
	killobj
	oldobjmenu = 1
	addobj '<font color="green">Character</font>'
	addobj 'Skills'
	addobj 'Statistics'

	if magik > 0:addobj 'The_Magic'

	addobj 'Face'
	addobj 'Body'
	addobj 'Clothing'
	addobj 'Tattoos'
	addobj 'Piercing'

	if mobila > 0:addobj 'Phone'

	addobj 'Diary'
	addobj 'Emergency exit'
	addobj 'Update'
	addobj 'Menu'
	addobj 'New Menu'
	addobj 'Cheat menu'

	if disable_autosave = 1:
		addobj 'Enable autosave'
	else
		addobj 'Disable autosave'
	end
}

$objautosave = {
	if oldobjmenu = 0:
		if disable_autosave = 1:
			disable_autosave = 0
		else
			disable_autosave = 1
		end
	elseif oldobjmenu = 1:
		if disable_autosave = 1:
			disable_autosave = 0
			delobj 'Enable autosave'
			addobj 'Disable autosave'
		else
			disable_autosave = 1
			delobj 'Disable autosave'
			addobj 'Enable autosave'
		end
	end

	gs 'stat'
}
$menu_character[0] = 'Description:$menu_descrip'
$menu_character[1] = 'Characteristics:$menu_skills'
$menu_character[2] = 'Usage:$menu_statistika'

if magik > 0:$menu_character[3] = 'Magic:$menu_magic'

$menu_lookon[0] = 'Face:$menu_face'
$menu_lookon[1] = 'Body:$menu_body'
$menu_lookon[2] = 'Clothing:$menu_clothes'
$menu_lookon[3] = 'Tattoos:$menu_tattoos'
$menu_lookon[4] = 'Piercing:$menu_pirs'

$menu_other[0] = 'Update:$menu_obnovit'
$menu_other[1] = 'Diary:$menu_bloknot'
$menu_other[2] = 'Emergency exit:$menu_avariya'
$menu_other[3] = 'Old menu:$menu_addoldmenu'
$menu_other[4] = 'Cheat menu:$menu_cheat'

if disable_autosave = 1:
	$menu_other[5] = 'Enable autosave:$menu_autosave'
else
	$menu_other[5] = 'Disable autosave:$menu_autosave'
end

if mobila > 0:$menu_other[6] = 'Phone:$menu_mobila'

!!old menu: beginning
if $selobj = '<font color="green">Character</font>':dynamic $objdescrip
if $selobj = 'Skills':dynamic $objskills
if $selobj = 'Statistics':dynamic $objstatistika
if  magik > 0:if $selobj = 'Magic':dynamic $objmagic
if $selobj = 'Face':view FUNC('$face_image')
if $selobj = 'Body':dynamic $objbody
!!if $selobj = 'Clothing':dynamic $objclothes
if $selobj = 'Tattoos':dynamic $objtattoos
if $selobj = 'Piercing':dynamic $objpirsing
if $selobj = 'Diary':dynamic $objbloknot
if $selobj = 'Emergency exit':dynamic $objavariya
if $selobj = 'Update':gs 'stat'
if $selobj = 'New Menu':dynamic $objnewmenu
if $selobj = 'Cheat menu':dynamic $objcheat_menu

if disable_autosave = 1:
	if $selobj = 'Enable autosave':dynamic $objautosave
else
	if $selobj = 'Disable autosave':dynamic $objautosave
end
!!old menu: end
!!The new menu: beginning
if $selobj = 'Character':menu '$menu_character'
if $selobj = 'See':menu '$menu_lookon'
if $selobj = 'Others':menu '$menu_other'
!!The new menu: end

if $selobj = 'Player':
	clr
	pl 'Your name <<$name>> <<$surname>>. You <<age>> years. <<$vneshPRE>>'
	pl 'You have short black hair and flashing starting gray, small brown eyes and willed jaw covered by blue Shaved bristle.'
	pl 'Growth <<rost>> cm, weight 100 kg.'
end

if $selobj = 'Menu':
	clr
	gs 'Menu.Create', 'mainMenu'
	gs 'Menu.Add', 'mainMenu', 'status bar', '', 'MenuMainLoc', '0'
	gs 'Menu.Add', 'mainMenu', 'text notation', '', 'MenuMainLoc', '1'
	gs 'Menu.Call', 'mainMenu'
end

unselect

--- onobjsel ---------------------------------

# scale.table
!'
"Scale rendering using the table:"

$func('scale.table', 275, 420) + ' 275 / 420'
$func('scale.table', 400, 420) + ' 400 / 420'
$func('scale.table', 420, 420) + ' 420 / 420'
$func('scale.table', 157, 420) + ' 157 / 420'
$func('scale.table', 42, 420) + ' 42 / 420'
$func('scale.table', 0, 420) + ' 0 / 420'

'!

!!-----scale.table------
args[0] = args[0] & ! the current value of the parameter
args[1] = args[1] & ! the maximum value

if args[2] = 0:args[2] = 200 & ! Span (tables) pixels. default 350 px
if $ARGS[3] = "":$ARGS[3] = "FF0000" & ! the color of the filled part of the scale in the format RRGGBB. default - red

$ARGS['table'] = '<table width="<<args[2]>>" border="0" cellspacing="0" cellpadding="0"><tr>'
args['x'] = (args[0] * 100) / args[1]
args['empty'] = 100 - args['x']

if args['x'] > 0:
	$ARGS['table'] += '<td width="<<args['x']>>%" bgcolor="#' + $ARGS[3] + '">&nbsp;</td>'
elseif args['empty'] > 0:
	$ARGS['table'] + = "<td width="<<args['empty']>>%" bgcolor="#888888">&nbsp;</td>"
end

$ARGS['table'] += '</tr></table>'
$result = $ARGS['table']

--- scale.table ---------------------------------

# counter
if music_on <> music_on_prev or $music_theme <> $music_theme_prev:
	close $cur_theme[track[$music_theme_prev]]
	music_on_prev = music_on
	$music_theme_prev = $music_theme

	if $music_theme <> '':
		copyarr 'cur_theme', 'tracklist_<<$music_theme>>'
		track[$music_theme] = track[$music_theme] - 1

		if track[$music_theme] < 0:track[$music_theme] = arrsize('cur_theme')
	end
end

if music_on = 1 and $music_theme <> '':
	if no isplay ($cur_theme[track[$music_theme]]):
		track[$music_theme] += 1

		if arrsize('cur_theme') <= track[$music_theme]:track[$music_theme] = 0
	end

	play $cur_theme[track[$music_theme]], volume
end

if race_start = 1:
	bcolor = rgb(255, 255, 255)
	refint
	*clr

	if race_hit = 0:
		race_miss += 1
		race_hit = 1
	elseif $race1[race_row] <> ' ' and race_row > 0:
		race_hit = 0
	end

	'<center><b><<$car>></b></center>'
	!!interior of the vehicle and the line route
	*pl $showcar
	*p $race1[race_row]

	if $race1[race_row] = '<center>-------FINISH--------</center>':
		race_start = 0
		!!return timer
		settimer 500
		wait 2000
		$metka = 'finish'
		$loc = 'RACE_COUNT'
		gt $loc, $metka
	end

	race_row += 1
end

--- counter ---------------------------------
# init_music
$tracklist_start[0] = 'music/start.mp3'
$tracklist_pivbar[0] = 'music/pivbar.mp3'
$tracklist_kafe[0] = 'music/kafe.mp3'
$tracklist_kafe[1] = 'music/kafe1.mp3'
$tracklist_gdis[0] = 'music/komb.mp3'
$tracklist_gnewyear[0] = 'music/newyear.mp3'
$tracklist_sukizaebali[0] = 'music/suki.mp3'
$tracklist_club[0] = 'music/club.mp3'
$tracklist_club[1] = 'music/club1.mp3'
$tracklist_club[2] = 'music/club2.mp3'
$tracklist_club[3] = 'music/club3.mp3'
$tracklist_club[4] = 'music/club4.mp3'
$tracklist_fight[0] = 'music/fight.mp3'
$tracklist_fight[1] = 'music/fight1.mp3'
$tracklist_orochimaru[0] = 'music/orochimaru.mp3'

if club = 1:
	clubrand = rand(0, 5)

	if clubrand = 0:
		$tracklist_club[0] = 'music/club.mp3'
	elseif clubrand = 1:
		$tracklist_club[0] = 'music/club1.mp3'
	elseif clubrand = 2:
		$tracklist_club[0] = 'music/club2.mp3'
	elseif clubrand = 3:
		$tracklist_club[0] = 'music/club3.mp3'
	elseif clubrand = 4:
		$tracklist_club[0] = 'music/club4.mp3'
	elseif clubrand = 5:
		$tracklist_club[0] = 'music/club5.mp3'
	end
end

--- init_music ---------------------------------
# loadg

! WD: Set variable to store Image needed HTML code
if $ImageNeededPlacholder = '':
	set $ImageNeededPlacholder = '<center><img src="images/community/Image_needed.png"></center>'
end

--- loadg ---------------------------------
# LOCA

--- LOCA ---------------------------------
# saveg

--- saveg ---------------------------------
# inputProcessing

--- inputProcessing ---------------------------------
# clothing

$clothing_list_line = {
	!! a single line in a clothing list (wardrobe, etc)
	!! ARGS 0 - action type (wardrobe, sell)
	!! ARGS 1 - clothing type
	!! ARGS 2 - clothing index

	$RESULT = FUNC('$clothing_name', $ARGS[1], ARGS[2])
	if $ARGS[1] ! 'vatnik' and $ARGS[1] ! 'ero' and $ARGS[1] ! 'sforma':
		$RESULT += ' (strength ' + dyneval '$RESULT += <<$ARGS[1]>>H[<<ARGS[2]>>]'

		if $ARGS[1] ! 'yoga' and $ARGS[1] ! 'sarafan':
			$RESULT += ', hip size ' + dyneval '$RESULT += <<$ARGS[1]>>B[<<ARGS[2]>>]'
		end

		$RESULT += ')'
	end
	$RESULT += ' <a href="exec:gt ''clothing'', ''view_clothing_item'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">View</a>'
}

if $ARGS[0] = 'view_clothing_list':
	!! ARGS 0 - view_clothing_list
	!! ARGS 1 - action type (wardrobe, sell, resize)
	!! ARGS 2 - brothel flag (brothel)

	act 'Leave':gt $loc, $metka

	if $ARGS[1] = 'wardrobe':
		if $clothingworntype ! 'nude':act 'Strip':gs 'clothing', 'strip' & gt $loc, $metka
		if bikini = 1:'On the top shelf is a swimsuit'
		if $clothingworntype ! 'vatnik':dyneval($clothing_list_line, $ARGS[1], 'vatnik', 0)
		if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and $clothingworntype ! 'sforma':dyneval($clothing_list_line, $ARGS[1], 'sforma', 0)
	end

	i = 1
	:loopjeans
		if jeans[i] = 1 and ($clothingworntype ! 'jeans' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'jeans', i)
		i += 1
		if i = 6:i = 201
	if i <= 297:jump 'loopjeans'

	i = 1
	:loopyoga
		if yoga[i] = 1 and ($clothingworntype ! 'yoga' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'yoga', i)
		i += 1
	if i <= 18:jump 'loopyoga'

	i = 1
	:loopsarafan
		if sarafan[i] = 1 and ($clothingworntype ! 'sarafan' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'sarafan', i)
		i += 1
	if i <= 3:jump 'loopsarafan'

	i = 1
	:loopshort
		if short[i] = 1 and ($clothingworntype ! 'short' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'short', i)
		i += 1
		if i = 6:i = 201
	if i <= 256:jump 'loopshort'

	i = 1
	:loopskirt
		if skirt[i] = 1 and ($clothingworntype ! 'skirt' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'skirt', i)
		i += 1
		if i = 6:i = 201
	if i <= 273:jump 'loopskirt'

	i = 1
	:loopdress
		if dress[i] = 1 and ($clothingworntype ! 'dress' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'dress', i)
		i += 1
		if i = 25:i = 201
	if i <= 225:jump 'loopdress'

	i = 1
	:loopprofi
		if profi[i] = 1 and ($clothingworntype ! 'profi' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'profi', i)
		i += 1
		if i = 3:i = 201
	if i <= 208:jump 'loopprofi'

	i = 1
	:looppants
		if pants[i] = 1 and ($clothingworntype ! 'pants' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'pants', i)
		i += 1
		if i = 6:i = 201
	if i <= 346:jump 'looppants'

	i = 1
	:looplatex
		if latex[i] = 1 and ($clothingworntype ! 'latex' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'latex', i)
		i += 1
	if i <= 2:jump 'looplatex'

	i = 1
	:loophooker
		if hooker[i] = 1 and ($clothingworntype ! 'hooker' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'hooker', i)
		i += 1
	if i <= 5:jump 'loophooker'

	i = 1
	:loopodekis
		if odekis[i] = 1 and ($clothingworntype ! 'odekis' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'odekis', i)
		i += 1
	if i <= 10:jump 'loopodekis'

	i = 1
	:loopnewclo
		if newclo[i] = 1 and ($clothingworntype ! 'newclo' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'newclo', i)
		i += 1
	!! NOTE: 131 is the school uniform and is handled separately
	if i <= 130:jump 'loopnewclo'

	if $ARGS[2] = 'brothel':
		''
		'<b>Brothel clothing</b>'
		i = 1
		:loopero
			if $clothingworntype ! 'ero' or clothingwornnumber ! i:dyneval($clothing_list_line, $ARGS[1], 'ero', i)
			i += 1
		if i <= 18:jump 'loopero'
	end
end

if $ARGS[0] = 'view_clothing_item':
	!! ARGS 0 - view_clothing_item
	!! ARGS 1 = action type (wardrobe, shop, sell, resize)
	!! ARGS 2 - clothing type
	!! ARGS 3 - clothing index
	!! ARGS 4 - price for shop

	cla
	'<center><img src="<<FUNC(''$clothing_image'',  $ARGS[2], ARGS[3])>>"></center>'
	FUNC('$clothing_name', $ARGS[2], ARGS[3])

	if $ARGS[1] ! 'shop' and $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'ero':
		$RESULT = '(strength '
		dynamic '$RESULT += <<$ARGS[2]>>H[<<ARGS[3]>>]'
		if $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
			$RESULT += ', hip size '
			dynamic '$RESULT += <<$ARGS[2]>>B[<<ARGS[3]>>]'
		end
		$RESULT += ')'
		'<<$RESULT>>'
	end

	if $ARGS[1] = 'shop':
		if dyneval('RESULT = <<$ARGS[2]>>[<<ARGS[3]>>]') = 1:
			'You already own this item.'
		else
			'Price: <<ARGS[4]>>'
			act 'Leave': gt $loc, $metka
			if money >= ARGS[4]:
				act 'Buy':
					money -= ARGS[5]
					dynamic $ARGS[2] + '[<<ARGS[3]>>] = 1'
					if $ARGS[2] = 'yoga':
						dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 80'
					elseif $ARGS[2] = 'odekis':
						dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 100'
					elseif $ARGS[2] = 'dress':
						dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 160'
					elseif $ARGS[2] = 'hooker':
						dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 200'
					else
						dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 60'
					end
					dynamic $ARGS[2] + 'B[<<ARGS[3]>>] = bedra'
					gt $loc, $metka
				end
			end
		end
	elseif $ARGS[1] = 'wardrobe':
		act 'Leave in closet':gt 'clothing', 'view_clothing_list', $ARGS[1]

		if $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'ero':
			!! if the clothing is worn out
			if dyneval('RESULT = <<$ARGS[2]>>H[<<ARGS[3]>>]') <= 0:
				'This item is worn and is not suitable for further wear.'
				exit
			end

			!! if the clothing is a type that checks for hip size
			if $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
				!! if the hipsize is too far from your hipsize
				dynamic 'RESULT = <<$ARGS[2]>>B[<<ARGS[3]>>]'
				if RESULT < bedra - 8:
					'This item is too small for you to wear.'
					exit
				elseif RESULT > bedra + 8:
					'This item is too large for you to wear.'
					exit
				end
			end
		end

		act 'Wear':gs 'clothing', 'wear', $ARGS[2], ARGS[3] & gt 'clothing', 'view_clothing_list', $ARGS[1]
	elseif $ARGS[1] = 'sell':
		act 'Keep item':gt 'clothing', 'view_clothing_list', $ARGS[1]

		!! value is based on the strength remaining
		dynamic 'RESULT = <<$ARGS[2]>>H[<<ARGS[3]>>]'
		if RESULT > 45:
			'You can sell this item for 500 rubles.'
			act 'Sell':
				dynamic '<<$ARGS[2]>>[<<ARGS[3]>>] = 0'
				money += 500
				gt 'clothing', 'view_clothing_list', $ARGS[1]
			end
		elseif RESULT > 30:
			'You can sell this item for 300 rubles.'
			act 'Sell':
				dynamic '<<$ARGS[2]>>[<<ARGS[3]>>] = 0'
				money += 300
				gt 'clothing', 'view_clothing_list', $ARGS[1]
			end
			elseif RESULT > 0:
			'You can sell this item for 100 rubles.'
			act 'Sell':
				dynamic '<<$ARGS[2]>>[<<ARGS[3]>>] = 0'
				money += 100
				gt 'clothing', 'view_clothing_list', $ARGS[1]
			end
		else
			'This item is too worn to have any sale value.'
		end
	elseif $ARGS[1] = 'resize':
		act 'Leave item alone':gt 'clothing', 'view_clothing_list', $ARGS[1]

		if $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
			if dyneval('RESULT = <<$ARGS[2]>>B[<<ARGS[3]>>]') ! bedra and money >= 500:
				'You can have this resized for 500 rubles.'
				act 'Resize':
					money -= 500
					dynamic '<<$ARGS[2]>>B[<<ARGS[3]>>] = bedra'
					gt 'clothing', 'view_clothing_list', $ARGS[1]
				end
			end
		end
	end
end

if $ARGS[0] = 'strip':
	if cumfrot > 0:cumfrot = 0
	$lastwornclothingtype = $clothingworntype
	lastwornclothingnumber = clothingwornnumber
	$clothingworntype = 'nude'
	clothingwornnumber = 0
	glamur = 0
	sport = 0
	ski = 0
	ofclo = 0
	sexual = 0
	odevnesh = 0
end

if $ARGS[0] = 'wear':
	!! ARGS 0 - action
	!! ARGS 1 - clothing type name
	!! ARGS 2 - clothing index

	gs 'clothing', 'strip'

	$clothingworntype = $ARGS[1]
	clothingwornnumber = ARGS[2]

	if $clothingworntype = 'vatnik':
		odevnesh = -10
	elseif $clothingworntype = 'sforma':
		sexual = 1
		odevnesh = 5
	elseif $clothingworntype = 'jeans':
		odevnesh = 1
	elseif $clothingworntype = 'yoga':
		sport = 1
		odevnesh = 1
	elseif $clothingworntype = 'sarafan':
		ski = 1
		odevnesh = 1
	elseif $clothingworntype = 'short':
		odevnesh = 2
	elseif $clothingworntype = 'skirt':
		ski = 1
		odevnesh = 5
	elseif $clothingworntype = 'dress':
		glamur = 1
		odevnesh = 10
	elseif $clothingworntype = 'profi':
		ofclo = 1
		odevnesh = 5
	elseif $clothingworntype = 'pants':
		odevnesh = 3
	elseif $clothingworntype = 'latex':
		odevnesh = 1
	elseif $clothingworntype = 'hooker':
		odevnesh = 1
	elseif $clothingworntype = 'odekis':
		glamur = 1
		sexual = 1
		odevnesh = 5
	elseif $clothingworntype = 'newclo':
		sexual = 1
		odevnesh = 5
		if clothingwornnumber < 90:ski = 1
	elseif $clothingworntype = 'ero':
		odevnesh = 10
	end
end

if $ARGS[0] = 'wear_last_worn':
	gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
end

--- clothing ---------------------------------

# $clothing_name
!! returns the name of the clothing
!! ARGS 0 - clothing type
!! ARGS 1 - clothing index

if $ARGS[0] = 'vatnik':
	$RESULT = 'Tattered, rustic jacket'
elseif $ARGS[0] = 'sforma':
	$RESULT = 'School uniform'
elseif $ARGS[0] = 'jeans':
	if ARGS[1] <= 5:$RESULT = 'Jeans <<ARGS[1]>>'
	if ARGS[1] = 201:$RESULT = 'Blue jeans with a grey tank top and a turquise hoodie'
	if ARGS[1] = 202:$RESULT = 'Skin tight low-rise, dark blue jeans with a tight, purple tank top'
	if ARGS[1] = 203:$RESULT = 'Skin tight dark blue jeans with a white tank top and a red hoodie'
	if ARGS[1] = 204:$RESULT = 'Tight, torn light blue jeans with a bright purple T-Shirt, which has a deep, U-cut neckline'
	if ARGS[1] = 205:$RESULT = 'Skin tight, low-rise and torn dark blue jeans with a white tank top and a black leather jacket'
	if ARGS[1] = 206:$RESULT = 'Tight, low-rise dark blue jeans with a black tank top'
	if ARGS[1] = 207:$RESULT = 'Skin tight, low-rise light blue jeans with a very short white tank top'
	if ARGS[1] = 208:$RESULT = 'Skin tight blue jeans and a black tank top, which has a glittery pattern. It also has knee high boots'
	if ARGS[1] = 209:$RESULT = 'Skin tight grey jeans and a neckholding brown top'
	if ARGS[1] = 210:$RESULT = 'Light blue jeans with a white T-Shirt'
	if ARGS[1] = 211:$RESULT = 'Skin tight, high rise dark grey jeans and a grey top, which has the American flag on it'
	if ARGS[1] = 212:$RESULT = 'Tight blue jeans, with a black leather belt and a pink-white stripped hoodie'
	if ARGS[1] = 213:$RESULT = 'Skin tight light grey jeans and a loose black T-Shirt'
	if ARGS[1] = 214:$RESULT = 'Skin tight grey jeans, a green T-Shirt and a puple-black striped hoodie'
	if ARGS[1] = 215:$RESULT = 'High rise, light blue jeans and a black halter top'
	if ARGS[1] = 216:$RESULT = 'Skin tight dark blue jeans and a shiny sliver blouse, with a deep U-shaped cleavage'
	if ARGS[1] = 217:$RESULT = 'Tight blue jeans and a breght red-black striped T-Shirt, with a deep cleavage'
	if ARGS[1] = 218:$RESULT = 'High rise, skin tight blue jeans and a short grey see-through shirt'
	if ARGS[1] = 219:$RESULT = 'Skin tight blue jeans and a white halter top'
	if ARGS[1] = 220:$RESULT = 'Light blue jeans and a loose black top, with writing in white saying "Sex Instructor"'
	if ARGS[1] = 221:$RESULT = 'Skin tight, light blue jeans and a white halter top under a blue-white blouse'
	if ARGS[1] = 222:$RESULT = 'High rise, dark blue jeans and a golden bikini top'
	if ARGS[1] = 223:$RESULT = 'High rise, dark blue jeans and a backless pink top'
	if ARGS[1] = 224:$RESULT = 'High rise, light blue jeans and a backless silver top'
	if ARGS[1] = 225:$RESULT = 'Skin tight, light blue jeans, with a white belt and a short and tight glittery golden halter top'
	if ARGS[1] = 226:$RESULT = 'High rise, dark blue jeans and a short black halter top'
	if ARGS[1] = 227:$RESULT = 'High rise, skin tight blue jeans and a loose fitting flesh colored top'
	if ARGS[1] = 228:$RESULT = 'Skin tight, light blue high rise jeans and a tight white tank top'
	if ARGS[1] = 229:$RESULT = 'Skin tight, light blue jeans and a pink halter top'
	if ARGS[1] = 230:$RESULT = 'Skin tight, white high rise jeans and a loose fitting black-white striped top'
	if ARGS[1] = 231:$RESULT = 'Skin tight, high rise light blue jeans, a tight fitting top in beige and a beige wool vest'
	if ARGS[1] = 232:$RESULT = 'Skin tight, dark blue jeans, with a small brown belt and a white T-Shirt'
	!! 233 - 235 do not exist
	if ARGS[1] = 236:$RESULT = 'High rise, light blue jeans and a black tank top'
	if ARGS[1] = 237:$RESULT = 'Low rise, dark blue jeans and a beige vest'
	if ARGS[1] = 238:$RESULT = 'High rise, skin tight, dark blue jeans and a short, yellow top'
	if ARGS[1] = 239:$RESULT = 'High rise, skin tight, dark blue jeans, with a brown belt and a denim blue denim shirt'
	if ARGS[1] = 240:$RESULT = 'Low rise, blue jeans and a white shirt'
	if ARGS[1] = 241:$RESULT = 'High rise, skin tight, blue jeans, with a white-grey belt and a white tank top'
	!! 242 does not exist
	if ARGS[1] = 243:$RESULT = 'Blue jeans and a grey "Smiley" T-Shirt, with a very deep cleavage'
	if ARGS[1] = 244:$RESULT = 'High rise, skin tight, light blue jeans and a short white tank top'
	if ARGS[1] = 245:$RESULT = 'High rise, skin tight, dark blue jeans, with a small blue belt and a white shirt, with a deep cleavage'
	if ARGS[1] = 246:$RESULT = 'Light blue jeans and a black neckhalter top'
	if ARGS[1] = 247:$RESULT = 'High rise, skin tight, light blue jeans and a dark blue neckhalter top'
	if ARGS[1] = 248:$RESULT = 'High rise, skin tight, dark blue jeans, with a small beige belt, a tight, red camisole and a beige blouse'
	if ARGS[1] = 249:$RESULT = 'High rise, skin tight, light blue jeans, a short white camisole under a short black hoodie'
	if ARGS[1] = 250:$RESULT = 'Skin tight, blue jeans, a light blue denim blouse under a blue denim jacket'
	if ARGS[1] = 251:$RESULT = 'Tight, blue denim jeans and a black T-Shirt'
	if ARGS[1] = 252:$RESULT = 'High rise, blue jeans, with a brown belt and a short, light pink T-Shirt'
	if ARGS[1] = 253:$RESULT = 'Skin tight, light blue jeans and a short, tight, neon-pink top'
	if ARGS[1] = 254:$RESULT = 'High rise, skin tight, blue jeans, with a black leather belt and a green shirt, with a very revealing cleavage'
	if ARGS[1] = 255:$RESULT = 'Tight, light blue jeans and a short, beige shirt'
	if ARGS[1] = 256:$RESULT = 'Blue jeans and a white tank top, with a deep cleavage'
	if ARGS[1] = 257:$RESULT = 'High rise, skin tight, light blue jeans, with a black leather belt and a white T-Shirt'
	if ARGS[1] = 258:$RESULT = 'Tight, dark grey pants and a dark blue shirt, with a deep cleavage'
	if ARGS[1] = 259:$RESULT = 'High rise, tight, light blue jeans and a white tank top'
	if ARGS[1] = 260:$RESULT = 'High rise, skin tight, light blue jeans and a short white top'
	if ARGS[1] = 261:$RESULT = 'High rise, skin tight, white denim jeans and a short, red tube-top'
	if ARGS[1] = 262:$RESULT = 'High rise, tight, light blue jeans and a leopard patterend tube top'
	if ARGS[1] = 263:$RESULT = 'High rise, skin tight, blue jeans aand a white-yellow top'
	if ARGS[1] = 264:$RESULT = 'Low rise, skin tight, light blue jeans and a short, pink camisole'
	if ARGS[1] = 265:$RESULT = 'Tight, white denim pants and a short, red camisole'
	if ARGS[1] = 266:$RESULT = 'High rise, skin tight, dark blue jeans, with a black leather belt and a tight, thin, black halter top'
	if ARGS[1] = 267:$RESULT = 'High rise, skin tight, blue jeans, with a small brown belt and a short white camisole'
	if ARGS[1] = 268:$RESULT = 'High rise, tight, light blue jeans and a black tank top'
	if ARGS[1] = 269:$RESULT = 'High rise, skin tight, blue jeans and a short, tight, light grey T-Shirt'
	if ARGS[1] = 270:$RESULT = 'Tight, dark blue jeans and a grey T-Shirt'
	if ARGS[1] = 271:$RESULT = 'Skin tight, blue jeans and a black shirt, with a revealing cleavage'
	if ARGS[1] = 272:$RESULT = 'High rise, skin tight, dark blue jeans, with a grey belt and a colourful T-Shirt'
	if ARGS[1] = 273:$RESULT = 'Tight, blue jeans and a grey camisole, with a very revealing cleavage'
	if ARGS[1] = 274:$RESULT = 'High rise, tight, blue jeans and a white tube top'
	if ARGS[1] = 275:$RESULT = 'High rise, skin tight, torn, blue jeans and a very tight, very short, black camisole, with a very revealing cleavage'
	if ARGS[1] = 276:$RESULT = 'Tight, light blue jeans and a blue short, with a revealing cleavage'
	!! 277 does not exist
	if ARGS[1] = 278:$RESULT = 'High rise, skin tight, dark blue jeans and a white tank top, with a revealing cleavage, under a red, leather jacket'
	if ARGS[1] = 279:$RESULT = 'High rise, skin tight, blue jeans and a short, blue neckhalter top'
	if ARGS[1] = 280:$RESULT = 'High rise, tight, blue jeans and black top, with lacy parts'
	if ARGS[1] = 281:$RESULT = 'High rise, tight, light blue jeans and a short, black camisole'
	if ARGS[1] = 282:$RESULT = 'High rise, skin tight dark blue jeans and stripped, white-grey T-Shirt'
	if ARGS[1] = 283:$RESULT = 'High rise, tight, light blue jeans, with a white-grey belt and a light brown top'
	!! 284 does not exist
	if ARGS[1] = 285:$RESULT = 'Skin tight, dark blue jeans and a brown tank top'
	if ARGS[1] = 286:$RESULT = 'Blue jeans and a skin tight, black latex T-Shirt'
	if ARGS[1] = 287:$RESULT = 'High rise, skin tight, light blue jeans, with a small brown belt and a short, colorful top'
	!! 288 does not exist
	if ARGS[1] = 289:$RESULT = 'Skin tight, dark blue jeans and a tight fitting, light brown camisole'
	if ARGS[1] = 290:$RESULT = 'High rise, skin tight, black leather pants and a purple camisole'
	if ARGS[1] = 291:$RESULT = 'Skin tight, grey jeans and a white tank top, under a neon-orange jacket'
	if ARGS[1] = 292:$RESULT = 'High rise, skin tight, blue jeans and a short, black T-Shirt'
	if ARGS[1] = 293:$RESULT = 'High rise, skin tight, blue jeans and a short, white tank top under a colorful blouse'
	if ARGS[1] = 294:$RESULT = 'High rise, skin tight, blue jeans and a tight, grey top'
	if ARGS[1] = 295:$RESULT = 'High rise, skin tight, blue jeans and a shirt, red top, with a very deep and revealing cleavage'
	!! 296 does not exist
	if ARGS[1] = 297:$RESULT = 'Tight, light blue jeans and a white camisole'
elseif $ARGS[0] = 'yoga':
	if ARGS[1] <= 18:$RESULT = 'Sportswear <<ARGS[1]>>'
elseif $ARGS[0] = 'sarafan':
	if ARGS[1] = 1:$RESULT = 'Colorful, free sundress'
	if ARGS[1] = 2:$RESULT = 'Bright, free sundress'
	if ARGS[1] = 3:$RESULT = 'Simple dress of cheap fabric'
elseif $ARGS[0] = 'short':
	if ARGS[1] = 1:$RESULT = 'Black shorts with a purple T-shirt'
	if ARGS[1] = 2:$RESULT = 'Black shorts with striped jersey'
	if ARGS[1] = 3:$RESULT = 'Black shorts with a black T-shirt'
	if ARGS[1] = 4:$RESULT = 'Pink shorts with pink tops'
	if ARGS[1] = 5:$RESULT = 'Sexy white shorts'
	if ARGS[1] = 201:$RESULT = 'Light blue denim shorts, a black belt and a cropped, white tank top'
	if ARGS[1] = 202:$RESULT = 'Blue denim shorts and a grey tank top'
	if ARGS[1] = 203:$RESULT = 'Blue denim shorts and a black tank top'
	if ARGS[1] = 204:$RESULT = 'Blue denim shorts and a cropped, white tank top'
	if ARGS[1] = 205:$RESULT = 'Light blue denim shorts with a frilly, white tank top, which has a discreet color pattern'
	if ARGS[1] = 206:$RESULT = 'Light blue denim shorts, a light brown belt and a dark grey tank top'
	if ARGS[1] = 207:$RESULT = 'Loose grey shorts with a white tank top'
	if ARGS[1] = 208:$RESULT = 'Tight grey shorts with a white tank top'
	if ARGS[1] = 209:$RESULT = 'Dark blue denim shorts with a pink bikini top'
	if ARGS[1] = 210:$RESULT = 'Light blue denim shorts and a white bikini top, which has a pinkish colored pattern'
	if ARGS[1] = 211:$RESULT = 'Very short, blue denim shorts and a light pink shirt'
	if ARGS[1] = 212:$RESULT = 'Light blue denim shorts with a white shirt'
	if ARGS[1] = 213:$RESULT = 'Dark blue shorts and black leggings with a bright pink shirt'
	if ARGS[1] = 214:$RESULT = 'Very short, dark blue denim shorts with a grey T-Shirt'
	if ARGS[1] = 215:$RESULT = 'Loose, light blue denim shorts with a tight, brown shirt'
	if ARGS[1] = 216:$RESULT = 'Loose, blue denim shorts with a light grey T-Shirt, which a deep U-Style neckline'
	if ARGS[1] = 217:$RESULT = 'Light blue denim shorts with a white top'
	if ARGS[1] = 218:$RESULT = 'Light blue denim shorts with a halterless, pink top'
	if ARGS[1] = 219:$RESULT = 'Blue denim shorts with a grey tank top'
	if ARGS[1] = 220:$RESULT = 'Very short, white shorts and a white top'
	if ARGS[1] = 221:$RESULT = 'Tight, white denim shorts with a short, but colorful tank top'
	if ARGS[1] = 222:$RESULT = 'White shorts with a tight, light brown T-Shirt'
	if ARGS[1] = 223:$RESULT = 'Black shorts with a turquise belt and short, black-turquoise T-Shirt'
	if ARGS[1] = 224:$RESULT = 'Blue shorts with a short, blue T-Shirt'
	if ARGS[1] = 225:$RESULT = 'Dark blue denim shorts and sheer, beige blouse'
	if ARGS[1] = 226:$RESULT = 'Light blue denim shorts, a dark blue tank top and a white vest'
	if ARGS[1] = 227:$RESULT = 'Very short, tight, black shorts with a yellow belt and a yellow hoodie'
	if ARGS[1] = 228:$RESULT = 'Very short, tight, black shorts and a orange-white vest'
	if ARGS[1] = 229:$RESULT = 'Very short denim shorts and a tight, short white T-shirt, which a deep U-shaped cutting'
	if ARGS[1] = 230:$RESULT = 'Tight, light blue denim shorts and a loose fitting blue top'
	if ARGS[1] = 231:$RESULT = 'Very short blue denim shorts, with a brown belt and a frilly, light blue neckhalter top'
	if ARGS[1] = 232:$RESULT = 'Dark blue denim shorts, with a large, light brown belt and a blue halter top, which has a deep U-shaped cutting'
	if ARGS[1] = 233:$RESULT = 'Blue denim shorts and a short white halter top, which you can see slightly through and it has a deep U-shaped neckline'
	if ARGS[1] = 234:$RESULT = 'Cropped dark blue denim short and a back free, light pink halter'
	if ARGS[1] = 235:$RESULT = 'Light blue denim shorts and a light brown top'
	if ARGS[1] = 236:$RESULT = 'Cropped blue denim shorts and a bright pink shirt, which has a very deep V-shaped cutting'
	if ARGS[1] = 237:$RESULT = 'Short yellow-black hotpants and a white tank top'
	if ARGS[1] = 238:$RESULT = 'Cropped white shorts and a light pink tank top'
	if ARGS[1] = 239:$RESULT = 'Cropped blue denim shorts and a loose fitting red halter top'
	if ARGS[1] = 240:$RESULT = 'Very short, cropped blue denim shorts and a red patterend blouse'
	if ARGS[1] = 241:$RESULT = 'Cropped light blue shorts and a very revealing white top'
	if ARGS[1] = 242:$RESULT = 'Light blue denim shorts, with a brown belt and a pink top'
	!! 243 does not exist
	if ARGS[1] = 244:$RESULT = 'Cropped black denim shorts, with a studded black belt, a black tank top and a black leather vest'
	if ARGS[1] = 245:$RESULT = 'Short black hotpants and a white halter top'
	if ARGS[1] = 246:$RESULT = 'Light blue denim shorts, with a brown belt and a blue top, with a V-shaped cleavage'
	if ARGS[1] = 247:$RESULT = 'Light blue denim shorts and a loose fitting tank top'
	if ARGS[1] = 248:$RESULT = 'Light blue denim shorts, with a yellow belt and a tight yellow halter top'
	if ARGS[1] = 249:$RESULT = 'Very short blue denim shorts and a very short, but cute top'
	if ARGS[1] = 250:$RESULT = 'Yellow hotpants and a short blue halter top'
	if ARGS[1] = 251:$RESULT = 'White hotpants and a tight fitting white top, which has a deep U-shaped neckline'
	if ARGS[1] = 252:$RESULT = 'Cropped light blue denim shorts, a very short yellow halter top and a light blue blouse'
	if ARGS[1] = 253:$RESULT = 'Light blue denim shorts, a pink bikini top, which is under a red, flower-patterned see-through top'
	!! 254 does not exist
	if ARGS[1] = 255:$RESULT = 'Blue denim shorts and a white shirt'
	if ARGS[1] = 256:$RESULT = 'Light blue denim shorts, with a brown snake-skin belt and a short dark brown T-Shirt'
elseif $ARGS[0] = 'skirt':
	if ARGS[1] = 1:$RESULT = 'White skirt with a colorful blouse'
	if ARGS[1] = 2:$RESULT = 'Black leather skirt with a red sweater'
	if ARGS[1] = 3:$RESULT = 'White skirt with striped blouse'
	if ARGS[1] = 4:$RESULT = 'White skirt with a colorful blouse'
	if ARGS[1] = 5:$RESULT = 'Black leather skirt with a red blouse'
	if ARGS[1] = 201:$RESULT = 'Orange-beige micro skirt and a top with a deep V-shaped cutting'
	if ARGS[1] = 202:$RESULT = 'Black plaid mirco skirt and a grey T-Shirt, that has a deep V-cut neckline'
	if ARGS[1] = 203:$RESULT = 'Light brown mini skirt with a tight dark brown short'
	if ARGS[1] = 204:$RESULT = 'Light blue skirt with a tight fitting white top'
	if ARGS[1] = 205:$RESULT = 'Dark blue denim micro skirt and a pink tank top'
	if ARGS[1] = 206:$RESULT = 'Red patterned plaid micro skirt and a cute T-Shirt'
	if ARGS[1] = 207:$RESULT = 'Light blue flower patterned high-waisted skirt and a short bright pink shirt'
	if ARGS[1] = 208:$RESULT = 'White mini skirt with a blue tank top'
	if ARGS[1] = 209:$RESULT = 'White flare mini skirt with a yellow top'
	if ARGS[1] = 210:$RESULT = 'Blue denim mini skirt with a cropped light blue top'
	if ARGS[1] = 211:$RESULT = 'Tight white mini skirt with buckles on the side and a red polkadot patterned blouse'
	if ARGS[1] = 212:$RESULT = 'Blue denim skirt with a sliver belt and a tight grey neckhaltered top'
	if ARGS[1] = 213:$RESULT = 'Light purple flare skirt with a see through yellow top. Get a nice vintage look with the right pantyhose and heels'
	if ARGS[1] = 214:$RESULT = 'Dark grey flared micro skirt and a bright pink pullover'
	if ARGS[1] = 215:$RESULT = 'High-waisted turquise pencil mini skirt and a very short purple top'
	if ARGS[1] = 216:$RESULT = 'Dark blue pencil mini skirt, a white shirt with a white ribbon at the end of the V-shaped cutting and a small beige colored jacket'
	if ARGS[1] = 217:$RESULT = 'High-waisted black leather skirt and a white T-Shirt, which has a high U-shaped cutting'
	if ARGS[1] = 218:$RESULT = 'Dark blue flare skirt and a green T-Shirt'
	if ARGS[1] = 219:$RESULT = 'Blue denim mini skirt and a trendy T-Shirt, with a high V-shaped cutting'
	!! 220 does not exist
	if ARGS[1] = 221:$RESULT = 'White mini skirt and a blue patterend halter top'
	if ARGS[1] = 222:$RESULT = 'Blue denim mini skirt and a beige colored top, which is kept together by knots'
	if ARGS[1] = 223:$RESULT = 'Purple mini skirt, a purple top and a black leather jacket'
	if ARGS[1] = 224:$RESULT = 'Light blue flare skirt and a dark purple shirt, with a V-shaped cutting'
	if ARGS[1] = 225:$RESULT = 'Purple patterned flared micro skirt and a pink tank top'
	if ARGS[1] = 226:$RESULT = 'High-waisted grey pencil skirt and a black tank top'
	if ARGS[1] = 227:$RESULT = 'Tight red micro skirt with a flower patterned belt and a white blouse with a very deep V-shaped cutting'
	if ARGS[1] = 228:$RESULT = 'Red-Black colored pattern on a flared micro skirt and a white blouse under a black top'
	if ARGS[1] = 229:$RESULT = 'Tight purple mini skirt and a white see-through blouse'
	if ARGS[1] = 230:$RESULT = 'Dark blue denim mini skirt and a light blue tank top'
	!! 231 does not exist
	if ARGS[1] = 232:$RESULT = 'Flower patterned flared micro skirt and a black top with a very deep V-shaped cutting'
	if ARGS[1] = 233:$RESULT = 'Pink micro skirt and a black top with a U-Shaped cutting'
	if ARGS[1] = 234:$RESULT = 'White mini skirt with a very tight light pink shirt'
	if ARGS[1] = 235:$RESULT = 'Dark blue denim micro skirt and a red shirt'
	!! 236 does not exist
	if ARGS[1] = 237:$RESULT = 'Light pink micro skirt and a short white top, with a very deep V-shaped cutting'
	if ARGS[1] = 238:$RESULT = 'Black pencil skirt and a loose white top'
	if ARGS[1] = 239:$RESULT = 'Blue denim flared skirt and a blue flower patterend halter top'
	if ARGS[1] = 240:$RESULT = 'Light blue denim skirt, a black tank top and a small black leather jacket'
	!! 241 does not exist
	if ARGS[1] = 242:$RESULT = 'Beige pencil skirt and a black tank top under a black blouse and a black belt, which closes the blouse'
	if ARGS[1] = 243:$RESULT = 'Dark green flared skirt and a short white shirt under a short black leather-like vest'
	!! 244 does not exist
	if ARGS[1] = 245:$RESULT = 'Tight pink micro skirt and a grey tank top, with a deep U-shaped cutting under a denim jacket'
	if ARGS[1] = 246:$RESULT = 'Black flared micro skirt and a red tank top, with a small black ribbon at the end of the very deep U-shaped cutting, under a bright pink jacket'
	if ARGS[1] = 247:$RESULT = 'White denim mini skirt and dark purple T-Shirt with a very deep V-shaped cutting'
	if ARGS[1] = 248:$RESULT = 'Black leather mini skirt and a black T-Shirt, which has a U-shaped cutting'
	if ARGS[1] = 249:$RESULT = 'Black leather mini skirt and a very tight light pink T-Shirt with a deep U-shaped cutting'
	if ARGS[1] = 250:$RESULT = 'Black pencil mini skirt and a dark purple T-Shirt'
	if ARGS[1] = 251:$RESULT = 'Light blue denim micro skirt and a white halter top, which has a deep U-shaped cutting'
	if ARGS[1] = 252:$RESULT = 'White micro skirt and a pink-white flower patterend halterless top'
	if ARGS[1] = 253:$RESULT = 'Pink mini skirt and a cute light pink T-Shirt'
	if ARGS[1] = 254:$RESULT = 'Light blue denim micro skirt and a very short light yellow top, which is secured by a knot between the breasts'
	if ARGS[1] = 255:$RESULT = 'Black flared micro skirt and a black blouse, with a deep V-shaped cutting by default'
	if ARGS[1] = 256:$RESULT = 'Black pencil mini skirt and a grey halter top, which has a deep U-shaped cutting'
	if ARGS[1] = 257:$RESULT = 'White pencil mini skirt and a light green loose top, which a very deep but not very revealing V-shaped cutting'
	if ARGS[1] = 258:$RESULT = 'Grey flared micro skirt and a dark brown halter top, which has a deep U-shaped neckline'
	if ARGS[1] = 259:$RESULT = 'Light blue denim mini skirt and a white-blue striped leaf patterned tank top beneath a cute dark blue jacket'
	if ARGS[1] = 260:$RESULT = 'Light blue denim mini skirt and a cropped white halter top, which has a nice V-shaped cutting'
	if ARGS[1] = 261:$RESULT = 'Glittery grey pencil mini skirt and a dark blue shirt'
	if ARGS[1] = 262:$RESULT = 'Striped flared mini skirt, a light pink slightly see-through halter top and a brown belt as accessory'
	if ARGS[1] = 263:$RESULT = 'High waisted black pencil skirt and a white T-Shirt'
	if ARGS[1] = 264:$RESULT = 'Blue denim mini skirt and a white T-Shirt, which has a deep U-shaped cutting'
	if ARGS[1] = 265:$RESULT = 'White flared mini skirt and a grey T-Shirt'
	if ARGS[1] = 266:$RESULT = 'Light blue micro skirt and a tight white tank top'
	if ARGS[1] = 267:$RESULT = 'Flared blue micro skit and a light yellow halter top, which provides a great view to anyone, due to its deep cutting'
	if ARGS[1] = 268:$RESULT = 'Dark blue flared mini skirt and a cropped white T-Shirt, which has a deep V-shaped cutting'
	if ARGS[1] = 269:$RESULT = 'Tight white pencil skirt, with a golden belt and tight turquoise colored neckhaltered top'
	if ARGS[1] = 270:$RESULT = 'Pink flared micro skirt and a white T-shirt, which has a few black lines to decorate it'
	if ARGS[1] = 271:$RESULT = 'Stripe patterend White-Black-Red flared mini skirt and a beige shirt, which has a very deep V-shaped cutting'
	if ARGS[1] = 272:$RESULT = 'Light blue denim micro skirt and a green tank top, which has a deep U-shaped cutting'
	if ARGS[1] = 273:$RESULT = 'Red flared mini skirt and an orange T-shirt. It has a red belt as accessory to bind around the waist. It makes you look like Velma'
elseif $ARGS[0] = 'dress':
	if ARGS[1] = 1:$RESULT = 'Black dress'
	if ARGS[1] = 2:$RESULT = 'Yellow dress'
	if ARGS[1] = 3:$RESULT = 'Blue dress'
	if ARGS[1] = 4:$RESULT = 'Black short dress'
	if ARGS[1] = 5:$RESULT = 'Red long dress'
	if ARGS[1] = 6:$RESULT = 'Red polka dot dress'
	if ARGS[1] = 7:$RESULT = 'Brown dress'
	if ARGS[1] >= 8 and ARGS[1] <= 24:$RESULT = 'Dress <<ARGS[1]>>'
	if ARGS[1] = 201:$RESULT = 'Tight beige halter dress and beige-golden heels'
	if ARGS[1] = 202:$RESULT = 'Very short flower-style dress and pink pumps with golden heels'
	if ARGS[1] = 203:$RESULT = 'Glittery pink neckhalter dress'
	if ARGS[1] = 204:$RESULT = 'Tight wine red dress with a deep V cut'
	if ARGS[1] = 205:$RESULT = 'Tight bright red dress with a sheer black back'
	if ARGS[1] = 206:$RESULT = 'Grey green dress'
	if ARGS[1] = 207:$RESULT = 'Black lounge dress, including black heels'
	if ARGS[1] = 208:$RESULT = 'Glittery black dress with deep V cut'
	if ARGS[1] = 209:$RESULT = 'Tight black dress with thigh high boots'
	if ARGS[1] = 210:$RESULT = 'Tight bright blue dress'
	if ARGS[1] = 211:$RESULT = 'Glittery, black dress, with a deep V-shaped cleavage'
	if ARGS[1] = 212:$RESULT = 'Black dress, which has parts made of a see-trough material'
	if ARGS[1] = 213:$RESULT = 'White-beige dress, with a deep cleavage'
	if ARGS[1] = 214:$RESULT = '2-part dress, with a short, tight skirt and a form-fitting top'
	if ARGS[1] = 215:$RESULT = 'Form-fittig black dress'
	if ARGS[1] = 216:$RESULT = 'Short, white dress'
	if ARGS[1] = 217:$RESULT = 'Dark blue dress with a revealing cleavage'
	if ARGS[1] = 218:$RESULT = 'Wine red dress, which has several lace parts'
	if ARGS[1] = 219:$RESULT = 'Red-blue-white dress'
	if ARGS[1] = 220:$RESULT = 'Black dress, with a revealing cleavage'
	if ARGS[1] = 221:$RESULT = 'Form-fitting, pink-grey dress'
	if ARGS[1] = 222:$RESULT = 'Pink dress'
	if ARGS[1] = 223:$RESULT = 'Long, glittery red dress, with a deep cleavage'
	if ARGS[1] = 224:$RESULT = 'Long, formal dress in blue'
	if ARGS[1] = 225:$RESULT = 'Long, formal dress in red'
elseif $ARGS[0] = 'profi':
	if ARGS[1] <= 2:$RESULT = 'Office Clothes <<ARGS[1]>>'
	if ARGS[1] >= 201 and ARGS[1] <= 208:$RESULT = 'Office Clothes <<ARGS[1]>>'
elseif $ARGS[0] = 'pants':
	if ARGS[1] = 1:$RESULT = 'Tight black leggings with black top'
	if ARGS[1] = 2:$RESULT = 'Tight black leggings with a red blouse'
	if ARGS[1] = 3:$RESULT = 'Purple skinny leggings with black top'
	if ARGS[1] = 4:$RESULT = 'Tight black leggings with black short top'
	if ARGS[1] = 5:$RESULT = 'White skinny jeans with a black top'
	if ARGS[1] = 201:$RESULT = 'Glittery silver leggings with a silver neckhalter top'
	if ARGS[1] = 202:$RESULT = 'Shiny silver leggings and a short white tube top'
	if ARGS[1] = 203:$RESULT = 'Shiny beige leggings and a frilly white T-Shirt, which people are able to see through'
	if ARGS[1] = 204:$RESULT = 'Grey leggings with a black tank top and a short black leather jacket'
	if ARGS[1] = 205:$RESULT = 'Black leggings with a light blue top, which provides a great view due to it very deep U-Shaped cutting'
	if ARGS[1] = 206:$RESULT = 'Shiny black leggings with a shiny silver top'
	if ARGS[1] = 207:$RESULT = 'Black leggings with a pink top'
	if ARGS[1] = 208:$RESULT = 'Tight blue leggings with a black tank top'
	!! 209 does not exist
	if ARGS[1] = 210:$RESULT = 'Tight grey leggings with discreet leopard pattern, a white blouse and a light brown jacket'
	if ARGS[1] = 211:$RESULT = 'Shiny black leggings, with a studded belt and a black T-Shirt'
	if ARGS[1] = 212:$RESULT = 'Shiny black leggings and a black-white striped camisole under a dark grey jacket'
	if ARGS[1] = 213:$RESULT = 'Black leggings and a white blouse'
	if ARGS[1] = 214:$RESULT = 'Black leggings and a short dark blue T-Shirt'
	if ARGS[1] = 215:$RESULT = 'Patterned blue leggings and a colorful tank top'
	if ARGS[1] = 216:$RESULT = 'Black leggings and a white tank top'
	if ARGS[1] = 217:$RESULT = 'Light pink leggings and a black tank top under a short grey hoodie'
	if ARGS[1] = 218:$RESULT = 'Grey leggings and a white neckhalter top'
	if ARGS[1] = 219:$RESULT = 'Black leggings and a pink T-Shirt'
	if ARGS[1] = 220:$RESULT = 'White leggings and a short, white tube top'
	if ARGS[1] = 221:$RESULT = 'Shiny, grey leggings and a short, blue blouse'
	if ARGS[1] = 222:$RESULT = 'Leopard patterned leggings and a short, red top'
	if ARGS[1] = 223:$RESULT = 'Beige pants and an oliv T-Shirt'
	if ARGS[1] = 224:$RESULT = 'Pants 224'
	!! 225 does not exist
	if ARGS[1] = 226:$RESULT = 'Dark blue leggings and a black shirt'
	if ARGS[1] = 227:$RESULT = 'Grey leggings and a loose fitting, pink T-Shirt'
	if ARGS[1] = 228:$RESULT = 'Black leggings and a very short, black camisole'
	!! 226 does not exist
	if ARGS[1] = 230:$RESULT = 'Grey leggings, with a black leather belt and a black top'
	if ARGS[1] = 231:$RESULT = 'Blue leggings and a very short, blue top'
	if ARGS[1] = 232:$RESULT = 'Shiny black leggings and a short, black neckhalter top'
	if ARGS[1] = 233:$RESULT = 'Thin, grey leggings and a white T-Shirt'
	if ARGS[1] = 234:$RESULT = 'Shiny, black leggings and a black top'
	if ARGS[1] = 235:$RESULT = 'Shiny, patterned leggings and a black tank top'
	if ARGS[1] = 236:$RESULT = 'Grey leggings and a light purple T-Shirt'
	if ARGS[1] = 237:$RESULT = 'Dark blue leggings and a black top'
	if ARGS[1] = 238:$RESULT = 'Grey leggings and a light pink top'
	if ARGS[1] = 239:$RESULT = 'Grey leggings and a grey top'
	if ARGS[1] = 240:$RESULT = 'Dark grey leggings, with colorful stripes and a white T-Shirt'
	if ARGS[1] = 241:$RESULT = 'Grey leggings and a blue hoodie'
	if ARGS[1] = 242:$RESULT = 'White leggings and a white bikini top'
	if ARGS[1] = 243:$RESULT = 'White leggings and a orange-red top'
	if ARGS[1] = 244:$RESULT = 'Black leggings and a white camisole, with a deep cleavage'
	if ARGS[1] = 245:$RESULT = 'White leggings and a very short black tube top'
	if ARGS[1] = 246:$RESULT = 'Grey leggings and a black T-Shirt'
	if ARGS[1] = 247:$RESULT = 'Black leggings and a short, black-white tank top'
	if ARGS[1] = 248:$RESULT = 'Dark grey leggings and a white tube top'
	if ARGS[1] = 249:$RESULT = 'Shiny black leggings and a black leather jacket'
	if ARGS[1] = 250:$RESULT = 'Shiny brown leggings and a white T-Shirt'
	if ARGS[1] = 251:$RESULT = 'White leggings and a short, white tube-top'
	if ARGS[1] = 252:$RESULT = 'Wine red leggings and a dark blue denim jacket'
	if ARGS[1] = 253:$RESULT = 'Thin, white leggings and a white top'
	if ARGS[1] = 254:$RESULT = 'Light brown leggings and a blue denim jacket'
	if ARGS[1] = 255:$RESULT = 'White leggings and a very short, black tube top'
	if ARGS[1] = 256:$RESULT = 'Shiny red leggings and a white blouse'
	if ARGS[1] = 257:$RESULT = 'Black leggings and a light brown shirt'
	if ARGS[1] = 258:$RESULT = 'Shiny black leggings and a black top'
	if ARGS[1] = 259:$RESULT = 'Dark blue leggings and a green tube top'
	if ARGS[1] = 260:$RESULT = 'Blue leggings and a black shirt'
	if ARGS[1] = 261:$RESULT = 'Light blue leggings and a red-black T-Shirt'
	if ARGS[1] = 262:$RESULT = 'Black leggings and a white T-Shirt, with deep cleavage'
	if ARGS[1] = 263:$RESULT = 'Grey leggings and a white top'
	if ARGS[1] = 264:$RESULT = 'Black pants, with a black studded leather belt and a short, black top'
	if ARGS[1] = 265:$RESULT = 'Brown leggings and a light pink top, with a deep cleavage'
	if ARGS[1] = 266:$RESULT = 'Shiny, black leggings and a grey shirt'
	if ARGS[1] = 267:$RESULT = 'Dark blue leggings and a short, black top'
	if ARGS[1] = 268:$RESULT = 'Blue leggings and a short, white top'
	if ARGS[1] = 269:$RESULT = 'Blue leggings and a beige camisole'
	if ARGS[1] = 270:$RESULT = 'Black leggings and a black tube top'
	if ARGS[1] = 271:$RESULT = 'Blue pants and a short, white nackhalter top'
	!! 272 does not exist
	if ARGS[1] = 273:$RESULT = 'Black leggings and a beige tank top, under a blue shirt'
	if ARGS[1] = 274:$RESULT = 'Light blue leggings and a short, white T-Shirt'
	if ARGS[1] = 275:$RESULT = 'Wine red leggings and a short black shirt'
	if ARGS[1] = 276:$RESULT = 'Black leggings and a short black shirt'
	if ARGS[1] = 277:$RESULT = 'Shiny, pink leggings and a white jacket'
	if ARGS[1] = 278:$RESULT = 'Black leggings and a very short, black camisole'
	if ARGS[1] = 279:$RESULT = 'Shiny, golden leggings and a shiny, golden top'
	if ARGS[1] = 280:$RESULT = 'Grey leggings and a short, blue tube top'
	if ARGS[1] = 281:$RESULT = 'Shiny, black leggings and a red top'
	if ARGS[1] = 282:$RESULT = 'Dark grey leggings and a grey tank top, under a grey jacket'
	if ARGS[1] = 283:$RESULT = 'White leggings and a black camisole, with a deep cleavage, under a short, black leather jacket'
	if ARGS[1] = 284:$RESULT = 'Black leggings and a grey neckhalter top'
	if ARGS[1] = 285:$RESULT = 'White leggings and a white top'
	if ARGS[1] = 286:$RESULT = 'White leggings and a short white camisole, under a blue jacket'
	if ARGS[1] = 287:$RESULT = 'Black leggings and a black top'
	if ARGS[1] = 288:$RESULT = 'Black leggings and a short, light blue denim vest'
	if ARGS[1] = 289:$RESULT = 'Patterned, black-white leggings and a loose fitting golden top'
	if ARGS[1] = 290:$RESULT = 'Black leather pants and a wine red tank top'
	if ARGS[1] = 291:$RESULT = 'Dark blue leggings adn a dark blue shirt'
	if ARGS[1] = 292:$RESULT = 'Black leggings and a black shirt'
	if ARGS[1] = 293:$RESULT = 'Wine red leggings and a short, blue tank top'
	if ARGS[1] = 294:$RESULT = 'Light grey leggings and a very short, blue top'
	if ARGS[1] = 295:$RESULT = 'Wine red leggings and a loose fitting, dark blue tank top'
	if ARGS[1] = 296:$RESULT = 'Black leggings and a red-white striped shirt'
	if ARGS[1] = 297:$RESULT = 'Shiny black leggings and a short, wine red top'
	if ARGS[1] = 298:$RESULT = 'White leggings and a neon-green top'
	if ARGS[1] = 299:$RESULT = 'Pink leggings and a purple top'
	if ARGS[1] = 300:$RESULT = 'Grey leggings and a white blouse'
	if ARGS[1] = 301:$RESULT = 'Shiny black leggings and a pink fishnet top'
	if ARGS[1] = 302:$RESULT = 'Black leggings and a white-black top'
	if ARGS[1] = 303:$RESULT = 'Red leggings and a black top'
	if ARGS[1] = 304:$RESULT = 'Black leggings and a white top'
	if ARGS[1] = 305:$RESULT = 'Shiny black leggings and a very short white-black top'
	if ARGS[1] = 306:$RESULT = 'Thin, white pants and a short, red top'
	if ARGS[1] = 307:$RESULT = 'Grey leggings and a black shirt'
	!! 308 does not exist
	if ARGS[1] = 309:$RESULT = 'Black leggings and a white-black striped top, with a very revealing cleavage'
	!! 310 does not exist
	if ARGS[1] = 311:$RESULT = 'Shiny beige leggings and a black top, with a deep cleavage'
	if ARGS[1] = 312:$RESULT = 'White leggings and a very short, white tube top, under a loose fitting blue top'
	if ARGS[1] = 313:$RESULT = 'Black leggings and a black camisole, with a deep cleavage'
	if ARGS[1] = 314:$RESULT = 'Skin tight, white pants and a beige top'
	if ARGS[1] = 315:$RESULT = 'Grey leggings and a white top, with a deep cleavage'
	if ARGS[1] = 316:$RESULT = 'Dark grey leggings and a black top'
	if ARGS[1] = 317:$RESULT = 'Dark grey leggings and a grey T-Shirt'
	if ARGS[1] = 318:$RESULT = 'Thin, shiny, black leggings and a black top'
	if ARGS[1] = 319:$RESULT = 'Black leggings and a short, black-white striped shirt'
	if ARGS[1] = 320:$RESULT = 'Thin, white pants and a short white top'
	if ARGS[1] = 321:$RESULT = 'Shiny black leggings and a very short, shiny black camisole under a black leather jacket'
	if ARGS[1] = 322:$RESULT = 'Shiny black leggings and a black tank top, under a brown leather vest'
	if ARGS[1] = 323:$RESULT = 'Pants 323'
	if ARGS[1] = 324:$RESULT = 'Black leggings, with holes and a leopard patterned shirt, with some cleavage'
	if ARGS[1] = 325:$RESULT = 'Shiny black leggings and a colourful top'
	if ARGS[1] = 326:$RESULT = 'Shiny black leggings and a very short, black tube top'
	if ARGS[1] = 327:$RESULT = 'Shiny black leggings and a black top, with a very revealing cleavage'
	if ARGS[1] = 328:$RESULT = 'Black leggings and a long, black T-Shirt under a black leather jacket'
	if ARGS[1] = 329:$RESULT = 'Shiny black leggings and a long, wine red top'
	if ARGS[1] = 330:$RESULT = 'Shiny black leggings and a very revealing dark blue camisole'
	if ARGS[1] = 331:$RESULT = 'Black leggings and a long, grey T-Shirt, under a black leather jacket'
	if ARGS[1] = 332:$RESULT = 'Shiny black leggings and a black leather jacket'
	if ARGS[1] = 333:$RESULT = 'Shiny black leggings and a very short, white top'
	if ARGS[1] = 334:$RESULT = 'Black leggings and a white T-Shirt, under a floral patterned blouse'
	if ARGS[1] = 335:$RESULT = 'Black leggings and a white T-Shirt, under a black leather jacket'
	if ARGS[1] = 336:$RESULT = 'Shiny black leggings and a white-black striped shirt, under a light blue jacket'
	if ARGS[1] = 337:$RESULT = 'Shiny red leggings and a white top, under a brown vest'
	if ARGS[1] = 338:$RESULT = 'Shiny black leggings and a white T-Shirt, under a red jacket'
	if ARGS[1] = 339:$RESULT = 'Shiny black leggings and a white-black striped T-Shirt, under a blue denim jacket'
	!! 340 does not exist
	if ARGS[1] = 341:$RESULT = 'Black leggings and a black T-Shirt, under a blue denim vest'
	if ARGS[1] = 342:$RESULT = 'Shiny black leggings and a white T-Shirt'
	if ARGS[1] = 343:$RESULT = 'Black leggings and a very short, black camisole under a black leather jacket'
	if ARGS[1] = 344:$RESULT = 'Black leggings and a black camisole, under a black leather jacket'
	if ARGS[1] = 345:$RESULT = 'Shiny black leggings and a black shirt, under a black leather jacket'
	if ARGS[1] = 346:$RESULT = 'Blue jeggings and a tight, red camisole, with a revealing cleavage'
elseif $ARGS[0] = 'latex':
	if ARGS[1] = 1:$RESULT = 'Black latex bodysuit'
	if ARGS[1] = 2:$RESULT = 'Purple latex dress'
elseif $ARGS[0] = 'hooker':
	if ARGS[1] <= 5:$RESULT = 'Prostitute outfit <<ARGS[1]>>'
	if ARGS[1] >= 201 and ARGS[1] <= 205:$RESULT = 'Prostitute outfit <<ARGS[1]>>'
elseif $ARGS[0] = 'odekis':
	if ARGS[1] <= 10:$RESULT = 'Youth outfit <<ARGS[1]>>'
elseif $ARGS[0] = 'newclo':
	if ARGS[1] <= 130:$RESULT = 'Fashionista outfit <<ARGS[1]>>'
elseif $ARGS[0] = 'ero':
	if ARGS[1] = 1:$RESULT = 'Mesh jacket with white denim skirt'
	if ARGS[1] = 2:$RESULT = 'Net blue dress'
	if ARGS[1] = 3:$RESULT = 'Transparent white dress'
	if ARGS[1] = 4:$RESULT = 'Small transparent white dress'
	if ARGS[1] = 5:$RESULT = 'Latex corwith skirt'
	if ARGS[1] = 6:$RESULT = 'Short transparent black dress'
	if ARGS[1] = 7:$RESULT = 'Net black dress'
	if ARGS[1] = 8:$RESULT = 'Long transparent black dress'
	if ARGS[1] = 9:$RESULT = 'Transparent leopard dress'
	if ARGS[1] = 10:$RESULT = 'Black top with mesh stockings'
	if ARGS[1] = 11:$RESULT = 'Net black jacket with black shorts'
	if ARGS[1] = 12:$RESULT = 'Transparent red dress'
	if ARGS[1] = 13:$RESULT = 'Transparent pink shorts with top'
	if ARGS[1] = 14:$RESULT = 'Small mesh black dress'
	if ARGS[1] = 15:$RESULT = 'The little black skirt with transparent top'
	if ARGS[1] = 16:$RESULT = 'Net white dress'
	if ARGS[1] = 17:$RESULT = 'Little pink skirt with transparent top'
	if ARGS[1] = 18:$RESULT = 'Something net'
end

if $RESULT = '':$RESULT = 'Missing clothing name for <<$ARGS[0]>> <<ARGS[1]>>'

--- $clothing_name ---------------------------------

# $clothing_image
!! get the image for clothing
!! ARGS 0 - clothing group name
!! ARGS 1 - clothing index

if $ARGS[0] = 'vatnik':$RESULT = 'images/clothes/vatnik.jpg'
if $ARGS[0] = 'sforma':$RESULT = 'images/clothes/newclo/131.jpg'
if $ARGS[0] = 'jeans':$RESULT = 'images/clothes/jeans<<ARGS[1]>>.jpg'
if $ARGS[0] = 'yoga':$RESULT = 'images/clothes/yoga<<ARGS[1]>>.jpg'
if $ARGS[0] = 'sarafan':$RESULT = 'images/clothes/sarafan<<ARGS[1]>>.jpg'
if $ARGS[0] = 'short':$RESULT = 'images/clothes/short<<ARGS[1]>>.jpg'
if $ARGS[0] = 'skirt':$RESULT = 'images/clothes/skirt<<ARGS[1]>>.jpg'
if $ARGS[0] = 'dress':$RESULT = 'images/clothes/dress<<ARGS[1]>>.jpg'
if $ARGS[0] = 'profi':$RESULT = 'images/clothes/profi<<ARGS[1]>>.jpg'
if $ARGS[0] = 'pants':$RESULT = 'images/clothes/pants<<ARGS[1]>>.jpg'
if $ARGS[0] = 'latex':$RESULT = 'images/clothes/latex<<ARGS[1]>>.jpg'
if $ARGS[0] = 'hooker':$RESULT = 'images/clothes/hooker<<ARGS[1]>>.jpg'
if $ARGS[0] = 'odekis':$RESULT = 'images/clothes/k<<ARGS[1]>>.jpg'
if $ARGS[0] = 'newclo':$RESULT = 'images/clothes/newclo/<<ARGS[1]>>.jpg'
if $ARGS[0] = 'ero':$RESULT = 'images/img/dress/ero<<ARGS[1]>>.jpg'
end

--- $clothing_image ---------------------------------

# body
if analplugIN = 0:
	if anus = 0:anpic = 0 & $anus = 'You have a virgin <a href="exec:view''images/picb/0.jpg''">anus</a>.'
	if anus > 0 and anus <= 5:anpic = 1 & $anus = 'Your <a href="exec:view''images/picb/1.jpg''">anus</a> is barely used, but you wouldn''t really see that.'
	if anus > 5 and anus <= 10:anpic = 2 & $anus = 'Your <a href="exec:view''images/picb/2.jpg''">anus</a> has the shape of an asterisk.'
	if anus > 10 and anus <= 15:anpic = 3 & $anus = 'Your <a href="exec:view''images/picb/3.jpg''">anus</a> is now slightly parted, has it has been used quite often.'
	if anus > 15 and anus <= 25:anpic = 4 & $anus = 'Your <a href="exec:view''images/picb/4.jpg''">anus</a> look like a wide hole, anyone will definitely think that the only thing you do is anal sex.'
	if anus > 25 and anus <= 35:anpic = 5 & $anus = 'Your <a href="exec:view''images/picb/5.jpg''">anus</a> doesn''t fully close on its own anymore. You could put a fist through it and it wouldn''t stretch at all.'
	if anus > 35:anpic = 6 & $anus = 'Your <a href="exec:view''images/picb/6.jpg''">anus</a> is almost completely wrecked. Even with conscious effort it''s hard to close it.' & $anustipe = 'destroyed'
else
	$anus = 'Your <a href="exec:view''images/picb/analplug.jpg''">anus</a> is currently filled with your butt plug.'
end

if throat = 0:thpic = 0 & $throat = 'You chaste <a href="exec:view''images/picb/th0.jpg''">mouth</a>.' & $throattipe = 'absolutely unusual'
if throat > 0 and throat <= 5:thpic = 1 & $throat = 'You inexperienced <a href="exec:view''images/picb/th1.jpg''">mouth</a>.' & $throattipe = 'virgin'
if throat > 5 and throat <= 10:thpic = 2 & $throat = 'You work her mouth and sensitive <a href="exec:view''images/picb/th2.jpg''">throat</a>.' & $throattipe = 'sensitive'
if throat > 10 and throat <= 15:thpic = 3 & $throat = 'You have experienced mouth and slightly stretched <a href="exec:view''images/picb/th3.jpg''">throat</a>.' & $throattipe = 'slightly stretched'
if throat > 15 and throat <= 25:thpic = 4 & $throat = 'You capacious mouth and trained <a href="exec:view''images/picb/th4.jpg''">throat</a>.' & $throattipe = 'stretched'
if throat > 25 and throat <= 35:thpic = 5 & $throat = 'Your deep tin <a href="exec:view''images/picb/th5.jpg''">throat</a> may adopt any member.' & $throattipe = 'tinned'
if throat > 35:thpic = 6 & $throat = 'You completely absent gag reflex, Your razebannaya <a href="exec:view''images/picb/th6.jpg''">throat</a> like a bottomless pit' & $throattipe = 'bottomless'

if vagina = 0:puspic = 0 & $vagina = 'You virgin <a href="exec:view''images/picb/vag0.jpg''">membrane</a>.' & $vaginatipe = 'virgin'
if vagina > 0 and vagina <= 5:puspic = 1 & $vagina = 'Your pussy <a href="exec:view''images/picb/vag1.jpg''">pussy</a> has a tiny hole.' & $vaginatipe = 'narrow'
if vagina > 5 and vagina <= 10:puspic = 2 & $vagina = 'You close, similar to the slit <a href="exec:view''images/picb/vag2.jpg''">vagina</a>.' & $vaginatipe = 'close'
if vagina > 10 and vagina <= 15:puspic = 3 & $vagina = 'You have a slightly stretched elastic <a href="exec:view''images/picb/vag3.jpg''">vagina</a>.' & $vaginatipe = 'tight'
if vagina > 15 and vagina <= 25:puspic = 4 & $vagina = 'You have a well-developed <a href="exec:view''images/picb/vag4.jpg''">vagina</a>.' & $vaginatipe = 'developed'
if vagina > 25 and vagina <= 35:puspic = 5 & $vagina = 'Between the legs you have not closed a hefty <a href="exec:view''images/picb/vag5.jpg''">dyren</a>' & $vaginatipe = 'broken-down'
if vagina > 35:puspic = 6 & $vagina = 'The fact that you have in place pussy, more like <a href="exec:view''images/picb/vag6.jpg''">well</a> with deep Mariana Trench' & $vaginatipe = 'dimensionless'
!!!!!!!!!!!!!!!!
!!!!!SIZE AND WEIGHT!!!
!!!!!!!!!!!!!!!!
if dounspell = 0:
	strenbuf = stren
	vitalbuf = vital
	vmeat = (strenbuf + vitalbuf) / 8
	vfat = salo / 10
	Kves = vmeat + vfat
	krost = rost - 130
	ves = Kves + krost - (agilbuf / 10)
	talia = ves - (agilbuf / 10)
	grudi = talia + 10 + vfat + silicone
	grutal = talia
	bedra = talia + 15 + (vmeat / 2) + vfat
	titK = grudi - talia
	if (bedra - talia) > 45 and musle < salo:
		if ves < 70:koefvesbt = 0
		if ves >= 70:koefvesbt = ves - 70

		koefbt = koefvesbt + ((bedra - talia) - 45)
		talia += koefbt
	end

	if titK <= 10:tits = 0
	if titK > 10 and titK <= 15:tits = 1
	if titK > 15 and titK <= 20:tits = 2
	if titK > 20 and titK <= 25:tits = 3
	if titK > 25 and titK <= 30:tits = 4
	if titK > 30 and titK <= 35:tits = 5
	!!!Probably CV edition
	if titK > 35 and titK <= 40:tits = 6
	if titK > 40 and titK <= 45:tits = 7
	if titK > 45 and titK <= 50:tits = 8
	if titK > 50 and titK <= 55:tits = 9
	if titK > 55:tits = 10
	!!!
else
	fat = 0
	bedra = bedraDoun
	talia = TaliaDoun
	grudi = talia + 14 + silicone
	ves = TaliaDoun
	titK = grudi - talia

	if titK <= 10:tits = 0
	if titK > 10 and titK <= 15:tits = 1
	if titK > 15 and titK <= 20:tits = 2
	if titK > 20 and titK <= 25:tits = 3
	if titK > 25 and titK <= 30:tits = 4
	if titK > 30 and titK <= 35:tits = 5
	!!!Probably CV edition
	if titK > 35 and titK <= 40:tits = 6
	if titK > 40 and titK <= 45:tits = 7
	if titK > 45 and titK <= 50:tits = 8
	if titK > 50 and titK <= 55:tits = 9
	if titK > 55:tits = 10
	!!!
end

!!! Maruda Hair Mod
if hairlength <= 80:
	hpigtail = 0
	hscrunchw = 0
	hpingripw = 0
	curly = 0
	hbraids = 0
	if hairlength <= 30 and hbangs = 1:hbangs = 0
end

if hairlength > 400:
	hpingripw = 0
	hbraids = 0
end

if hairlength > 400 and hpigtail >= 1:
	hscrunchw = 0
	hpigtail = 0
end

if hbraids >= 1:
	curly = 0
	hscrunchw = 0
	hpingripw = 0
	hbangs = 0
	hpigtail = 0
end

if hapri = 0:$hapri = '<b>tangled</b>, you should comb it, to keep it healthy'
if hapri = 1:$hapri = 'neatly arranged'

if curly <= 0:$curly = 'straight, slightly wavy '
if curly > 0:$curly = 'curly '

if hbangs <= 0:$hbangs = ''
if hbangs > 0:$hbangs = ', with a fringe covering your forehead'

if hscrunchw <= 0:$hscrunch = ''
if hscrunchw = 1:$hscrunch = ' A hair-tie holds your hair in place with a ponytail.'

if hpingripw <= 0:$hpingrip = ''
if hpingripw > 0:$hpingrip = 'The Hair-pins holds your hair in place with an updo-hairstyle.'

if hscrunchw <= 0:$hpigtail = ''
if hscrunchw = 2:$hpigtail = ' Two scrunchies holds your hair in place with a twin-tail pigtail style.'

if hbraids <= 0:$hbraids = ''
if hbraids > 0:$hbraids = ' You have your hair beautifully braided.'

if hcol = 0:$hcol = 'black'
if hcol = 1:$hcol = 'brown'
if hcol = 2:$hcol = 'red'
if hcol = 3:$hcol = 'blonde'

if hairlength <= 30:$hair = 'You have a very short <<$hcol>> hair. It doesn''t cover your ears, with some masculine complexions, someone might mistake you for a man. Nonetheless, some people like this style, as it''s easy to take care off.'
if hairlength > 30 and hairlength <= 80:$hair = 'You have a short <<$hcol>> hair, which may cover your ears to the the earlobes. It''s a modern, yet classy, hairstyle. Currently your hair is <<$hapri>>.'
if hairlength > 80 and hairlength <= 160:$hair = 'You have a <<$curly>><<$hcol>> hair<<$hbangs>>. Your hair goes down to your chin line and can be considered of a medium length, it fits almost all face shapes. Your hair is at the moment <<$hapri>>.<<$hscrunch>><<$hpingrip>><<$hpigtail>>'
if hairlength > 160 and hairlength <= 260:$hair = 'You have a <<$curly>><<$hcol>> hair<<$hbangs>>. Your hair reaches your shoulders, with several strains going beyond. Currently your hair is <<$hapri>>.<<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
if hairlength > 260 and hairlength <= 400:$hair = 'You have a <<$curly>><<$hcol>> hair<<$hbangs>>. As your hair reaches your bra-strapline, hairdressers would consider this a rather long hair style, yet beautiful styles are created with this length. Your hair is <<$hapri>>.<<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
if hairlength > 400:$hair = 'You have a very long <<$hcol>> hair<<$hbangs>>, that goes beyond your bra-strapline. Rapunzel would be jealous. Your hair is currently <<$hapri>>.<<$hscrunch>><<$hbraids>>'
!!if hcol = 0 and curly <= 0:$hair = 'You have a <<$hapri>> straight, black hair.'
!!if hcol = 1 and curly <= 0:$hair = 'You have a <<$hapri>> straight, brown hair.'
!!if hcol = 2 and curly <= 0:$hair = 'You have a <<$hapri>> straight, red hair.'
!!if hcol = 3 and curly <= 0:$hair = 'You have a <<$hapri>> straight, blonde hair.'
!!if hcol = 0 and curly > 0:$hair = 'You have a <<$hapri>> curly, black hair.'
!!if hcol = 1 and curly > 0:$hair = 'You have a <<$hapri>> curly, brown hair.'
!!if hcol = 2 and curly > 0:$hair = 'You have a <<$hapri>> curly red hair.'
!!if hcol = 3 and curly > 0:$hair = 'You have a <<$hapri>> curly blonde hair.'
!!if hcol = 0:$hair = 'You have a <<$hapri>> <<$curly>>, black hair.'
!!if hcol = 1:$hair = 'You have a <<$hapri>> <<$curly>>, brown hair.'
!!if hcol = 2:$hair = 'You have a <<$hapri>> <<$curly>>, red hair.'
!!if hcol = 3:$hair = 'You have a <<$hapri>> <<$curly>>, blonde hair.'
!!! Maruda Hair Mod

if lip > 4:lip = 4
if lip > 4:lip = 4
if lip < 0:lip = 0

if lipbalmstat > 0:
	if lip = 0:$lipbalmstat = ' shiny'
	if lip = 1:$lipbalmstat = ' shiny'
	if lip = 2:$lipbalmstat = ' brilliant and juicy'
	if lip = 3:$lipbalmstat = ' juicy'
	if lip = 4:$lipbalmstat = ' glossy'
else
	$lipbalmstat = ''
end

if pirsA = 1:$pirsA = 'When you talk, your conversation partner can get a glance at your tongue piercing.'
if pirsA = 0:$pirsA = ''
if pirsB = 1:$pirsB = 'You lower lip is pierced by a ring.'
if pirsB = 0:$pirsB = ''
if lip = 0:$lip = 'You have thin <<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips' & $lip1 = 'thin'
if lip = 1:$lip = 'You have normal <<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'soft lips' & $liptalk2 = 'soft lips' & $liptalk3 = 'soft lips' & $lip1 = 'normal'
if lip = 2:$lip = 'You have plump <<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips' & $lip1 = 'plump'
if lip = 3:$lip = 'You have big, pouting, <<$lipbalmstat>> full lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'pouting lips' & $liptalk2 = 'pouting lips' & $liptalk3 = 'pouting lips' & $lip1 = 'pouting'
if lip = 4:$lip = 'You have thick <<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thick lips' & $liptalk2 = 'her thick lips' & $liptalk3 = 'thick lips' & $lip1 = 'large thick'
if tan <= 0:$tan = 'pale'
if tan > 0:$tan = 'Tanned'
if skin > 4:skin = 4
if skin < 0:skin = 0
if pirsC = 1:$pirsC = 'Your ears are pierced and you are wearing earrings.'
if pirsC = 0:$pirsC = ''
if pirsD = 1:$pirsD = 'Into your nose is a nosering inserted.'
if pirsD = 0:$pirsD = ''
if pirsE = 1:$pirsE = 'Your eyebrow is pierced and a rod is sticking through it.'
if pirsE = 0:$pirsE = ''
if skin = 0:$skin = 'Your <<$tan>> skin is rough and covered with pimples and blackheads. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'very bad'
if skin = 1:$skin = 'Your <<$tan>> skin rough and has a few pimples. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'bad'
if skin = 2:$skin = 'Your <<$tan>> skin is clear of acne but still slightly rough. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'normal'
if skin = 3:$skin = 'You have <<$tan>>, smooth and well-groomed skin. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'good'
if skin = 4:$skin = 'You have <<$tan>>, very smooth skin, which almost feels like silk, when touching it. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'excellent'
if glacol = 0:$glacol = 'brown'
if glacol = 1:$glacol = 'gray'
if glacol = 2:$glacol = 'green'
if glacol = 3:$glacol = 'blue'
if resnic > 2:resnic = 2
if resnic = 0:$resnic = 'with short eyelashes'
if resnic = 1:$resnic = 'normal eyelashes'
if resnic = 2:$resnic = 'with long eyelashes'
if brow = 0 and browper = 0:$brow = 'little neat eyebrows'
if brow > 0 and browper = 0:$brow = 'groomed eyebrows' & brokoef = 1
if browper > 0:$brow = 'permanent tattooed eyebrows' & brokoef = 2
if glass <= 0:$glass = '' & glassvnesh = 0
if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10
!!!CV edition: from glassvnesh = 5 to glassvnesh = 0
if glass = 2:$glass = ' Do you wear glasses.' & glassvnesh = 0
!!!
if glaraz > 3:glaraz = 3
if glaraz = 0:$glaza = 'You have little <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 1:$glaza = 'You have a medium-sized <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 2:$glaza = 'You have large <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 3:$glaza = 'You have a huge <<$glacol>> eyes that almost look like they''re out of anime, <<$resnic>> and <<$brow>>.<<$glass>>'

if mop = 0:$mop = '<b><font color="red">Your makeup is smeared all over your face</font></b>'
if mop = 1:$mop = 'You''re not wearing any kind of makeup'
if mop = 2:$mop = 'Your makeup is very light, just with a very few touch-ups here and there'
if mop = 3:$mop = 'You have "everyday"-like makeup applied'
if mop = 4:$mop = 'You have thick makeup, possible a bit too flashy for daytime wear'

if leghair <= 0:legkoef = 3 & $leghair = 'You have smooth legs.'
if leghair > 0 and leghair <= 2:legkoef = 0 & $leghair = 'You can not see with your eyes but you have hair rough to touch on your leg.'
if leghair > 2 and leghair <= 5:legkoef = 0 & $leghair = 'You clearly have visible thin hairs on the legs.'
if leghair > 5:legkoef = 0 & $leghair = 'You have long hair standing out on your legs.'

if pirsG = 1:$pirsG = 'There are several piercings hanging from the lips of your vagina.'
if pirsG = 0:$pirsG = ''

if lobok <= 0:lobkoef = 3 & $lobok = 'You have a smoothly <a href="exec:view''images/picb/pussy.jpg''">shaved pussy</a>. <<$pirsG>>'
if lobok > 0 and lobok <= 2:lobkoef = 0 & $lobok = 'You have a light but visible hair above your <a href="exec:view''images/picb/spussy.jpg''">crotch</a>. <<$pirsG>>'
if lobok > 2:lobkoef = 0 & $lobok = 'You have a full delta of thick <a href="exec:view''images/picb/hpussy.jpg''">pubic hair</a>. <<$pirsG>>'

bodytipe = bedra - talia

if bodytipe < 20:bodykoef = 0
if bodytipe >= 20 and bodytipe < 25:bodykoef = 2
if bodytipe >= 25 and bodytipe < 30:bodykoef = 4
if bodytipe >= 30 and bodytipe < 35:bodykoef = 8
if bodytipe >= 35:bodykoef = 4

if tan > 0:
	tanKoef = 1
else
	tanKoef = 0
end

if curly > 0:
	curlykoef = 1
else
	curlykoef = 0
end

if sweat <= 0:
	sweatKoef = 0
else
	sweatKoef = sweat * 5
end

if lipbalmstat > 0:
	lipbalmKoef = 1
else
	lipbalmKoef = 0
end

if vidage < 21:vidagebonus = 0
if vidage >= 21 and vidage < 26:vidagebonus = 1
if vidage >= 26 and vidage < 30:vidagebonus = 3
if vidage >= 30 and vidage < 34:vidagebonus = 6
if vidage >= 34 and vidage < 36:vidagebonus = 9
if vidage >= 36 and vidage < 38:vidagebonus = 12
if vidage >= 38 and vidage < 40:vidagebonus = 16
if vidage >= 40 and vidage < 45:vidagebonus = 25
if vidage >= 45:vidagebonus = 50

if age < 18:leghair = -5

!!CV edition: tits and lobkoef (pubic hair) removed from calc, replaced with flat bonus of 9 (6 tits, 3 hair)
vnesh = (9 + curlykoef + lip + tanKoef + skin + mop + resnic + glaraz + bodykoef + legkoef + odevnesh + hapri + bonusZ + lipbalmKoef) - sweatKoef + vidagebonus - (zub * 2) + tatKeof - glassvnesh
!!!

if vnesh < 0:vnesh = 0

if StrongNarkota <= 0:
	if SNarkTimes >= 3 and SLomka = 0:SLomka = 1
	if Gerpes >= 3 or Sifilis >= 21 or Triper > 2:vnesh = -10
end

if StrongNarkota > 0:
	if SLomka > 0:SLomka = 0

	manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
end

if vnesh = -10:$vnesh = 'Your looks is even worse than terrible. It''s terribad. No one want to see or talk to you and avoid you at any cost necessary.'
if vnesh < 5 and vnesh> - 10:$vnesh = 'Your looks is terrible. People try to avoid looking and talking to you.'
if vnesh >= 5 and vnesh < 15:$vnesh = 'You''re a wallflower. Barely anyone notices you.'
if vnesh >= 15 and vnesh < 30:$vnesh = 'You have good looks. Men and women like to take a glance at you.'
if vnesh >= 30 and vnesh < 50:$vnesh = 'You have a simply stunning appearence. Other girls are a bit jealous and guys constantly check you out.'
if vnesh >= 50:$vnesh = 'Your appearence is divine! No one is able to take his or her eyes off of you.'

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!BODY
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
musle = strenbuf + vitalbuf

if musle >= salo:
	!!muscular type
		if bedra < 60:$body = 'You are very thin and virtually there is no fat on your body,your muscles appear through the skin.'
		if bedra >= 60 and bedra < 70:$body = 'You are really thin and there is little fat on your body ,your muscles appear through the skin.'
		if bedra >= 70 and bedra < 80:$body = 'You are and there is little fat on your body ,your muscles appear through the skin.'
		if bedra >= 80 and bedra < 90:$body = 'You are thin and there is little fat on your body ,your muscles appear through the skin.'
		if bedra >= 90 and bedra < 100:$body = 'You are thin and there is little fat on your body . Large muscles appear through your skin.'
		if bedra >= 100 and bedra < 110:$body = 'You have little fat on your body, Large muscles appear through your skin.'
		if bedra >= 110 and bedra < 120:$body = 'You have little fat on your body. Massive muscles appear through your skin.'
		if bedra >= 120:$body = 'You have little fat on your body. Massive muscles appear through your skin.'
	else
		!!bold type
		if bedra < 60:$body = 'You are very lean and you have virtually no muscle.'
		if bedra >= 60 and bedra < 70:$body = 'You have a very thin body with a small soft booty and virtually you have no muscle.'
		if bedra >= 70 and bedra < 80:$body = 'You have a very skinny body.'
		if bedra >= 80 and bedra < 90:$body = 'You have a slender body.'
		if bedra >= 90 and bedra < 100:$body = 'You have a curvy body.'
		if bedra >= 100 and bedra < 110:$body = 'You have a chubby body.'
		if bedra >= 110 and bedra < 120:$body = 'You have a plump body.'
		if bedra >= 120:$body = 'You are very fat.'
	end

	$fat = $body

--- body ---------------------------------
# cikl
if curly > 0:curly -= 1

sweat += 1

if tan > 0:tan -= 1
if tabletki > 0:tabletki -= 1

leghair += 1
lobok += 1

if suhbelo > 0:suhbelo2 = suhbelo & suhbelo = 0

manna -= 10

!'
if salo > fat:
	salo -= 1
	fat += 1
else
	salo += 1
	fat -= 1
end

if strenbuf > stren:strenbuf -= 1
if strenbuf < stren:strenbuf += 1
if vitalbuf > vital:vitalbuf -= 1
if vitalbuf < vital:vitalbuf += 1
if agilbuf > agil:agilbuf -= 1
if agilbuf < agil:agilbuf += 1
'!
if anus > 1:
	if anusK < 0:anusK = 0
	if anusK < 3:anusK += 1
	if anusK >= 3:anus -= 1 & anusK = 0
end
if vagina > 10:
	if vaginaK < 0:vaginaK = 0
	if vaginaK < 6:vaginaK += 1
	if vaginaK >= 6:vaginaK = 0 & vagina -= 1
end

lipkoef -= 1
!!!!!!!!!!!!
!!!jobs!!!
!!!!!!!!!!!!
if isprok = 1:isprok = 0 & 'You threw away your used tampon.'

!!CYCLE 28 days 4 days mentsruatsiya
if preg = 0:
	if mesec > 0:mesec -= 1
	if mesec = 0:cikl += 1
	if cikl >= 23 and preg ! 1:mesec = 4 & cikl = 0
elseif preg = 1 and pregtime < 280:
	pregtime += 1

	if pregtimes = 0:pregtimes = 1
elseif preg = 1 and pregtime = 280 and hourpreg ! hour:
	hourpreg = hour
	'<center><b>A sharp pain ran through your stomach, and something flows down your legs. Snap, you water broke! You have to get to the clinic fast!</b></center>'
elseif preg = 1 and pregtime > 280:
	cla
	*clr
	over = 4
	'<center><b>A horrible pain shots through your body.</b></center>'
	xgt 'gameover'
	exit
end

if StoryLine = 0:
	if horny < 100:horny += vagina
else
	if vagina = 0:
		razeba = 0

		if horny > 0 and horny <= 50:horny -= 10
		if horny > 50:horny -= 25
	elseif vagina > 0:
		if pregtimes = 0:
			if age < 18:
				razeba = 1

				if horny > 0 and horny <= 50:horny -= 5
				if horny > 50 and horny < 80:horny -= 10
				if horny >= 80:horny -= 20
			elseif age >= 18 and age < 21:
				razeba = 2

				if horny > 0 and horny <= 50:horny -= 1
				if horny > 50 and horny < 80:horny -= 5
				if horny >= 80:horny -= 10
			elseif age >= 21 and age < 25:
				razeba = 3

				if horny > 0 and horny <= 50:horny += 1
				if horny > 50 and horny < 80:horny -= 1
				if horny >= 80:horny -= 5
			elseif age >= 25 and age < 30:
				razeba = 4

				if horny > 0 and horny <= 50:horny += 5
				if horny > 50 and horny < 80:horny += 1
				if horny >= 80:horny -= 5
			elseif age >= 30:
				razeba = 5

				if horny > 0 and horny <= 50:horny += 10
				if horny > 50 and horny < 80:horny += 5
				if horny >= 80:horny += 1
			end
		elseif pregtimes > 0:
			if preg = 0:
				razeba = 5

				if horny > 0 and horny <= 50:horny += 10
				if horny > 50 and horny < 80:horny += 5
				if horny >= 80:horny += 1
			elseif preg > 0:
				razeba = 6

				if horny < 100:horny += pregtime / 10
			end
		end
	end
end

if horny < 0:horny = 0

if musle >= salo and stren >= 10 and vital >= 10 and dounspell = 0:
	!!Fall muscularity
	if downmusl >= 5:
		downmusl = 0
		stren -= 1
		vital -= 1
		fat += 4
		salo += 4
	else
		downmusl += 1
	end
end

!!! Maruda Hair Mod
!!! Max. Hair length 600mm, or 60cm, which should be somewhere in the lower back area.
!!! Hair grows 1mm each day, it takes 20 months (1 month = 30 days) to regrow the hair from 0.
if hairlength < 601:hairlength += 1

if hscrunch > 0:
	hscrunchrand = rand(1, 100)

	if hscrunchrand <= 8:hscrunch -= 1
end
!!! Maruda Hair Mod

gs 'starenie'

--- cikl ---------------------------------
# dina
gs 'dinSex'
gs 'dinBoroda'

$d_read_porn = {
	act 'Read the porn magazine':
		cls
		'<center><img src="images/qwest/alter/porn.jpg"></center>'

		if pornMagazine = 1:
			'<font color="magenta">Boring</font>, you''ve memorized this magazine by heart, you think that is time to buy a new one.'
		else
			pornMagazine -= 1
			horny += 10
			minut += 5
			gs 'stat'
			'You are flipping through the porno magazine, reading the stories and looking at the pictures and a small excitement begins to cover your body.'
		end

		act 'Put away':gt $curloc
	end
}

!!!WD: Doesn''t exists anymore in 1.0.5
$sitr_tread_d = {
	cla
	*clr
	minut += 15
	treadmillday = day
	agil += 2
	sweat += 1
	beg += 1
	manna -= 1
	fat -= 2

	'<center><img src="images/etogame/fit3.jpg"></center>'
	'You''ve spent fifteen minutes running in the treadmill.'

	act 'Leave':gt $curloc
}
!!!

$sitrobrd = {
	cla
	*clr
	minut += 15
	obruchday = day
	agil += 1
	sweat += 1
	manna -= 1
	fat -= 1
	'<center><img src="images/etogame/obruch.gif"></center>'
	'You develop your dexterity by using the hula hoop.'

	act 'Leave':gt $curloc
}

$sitryogd = {
	cla
	*clr
	minut += 15
	bookYogday = day
	will += 1
	manna += 5

	if $clothingworntype ! 'nude':
		'<center><img src="images/community/yoga_dressed.jpg"></center>'
	elseif tanga = 1:
		'<center><img src="images/community/yoga_underwear.jpg"></center>'
	else
		'<center><img src="images/community/yoga_naked.png"></center>'
	end

	'You meditate for fifteen minutes, developing your will.'

	act 'Leave':gt $curloc
}

$sitrskakd = {
	cla
	*clr
	minut += 15
	skakday = day
	speed += 1
	sweat += 1
	manna -= 1
	fat -= 1

	if $clothingworntype ! 'nude':
		'<center><img src="images/community/rope_dressed.jpg"></center>'
	elseif tanga = 1:
		'<center><img src="images/community/rope_underwear.jpg"></center>'
	else
		'<center><img src="images/community/rope_naked.jpg"></center>'
	end

	'You''re rope jumping for fifteen minutes, developing your speed.'

	act 'Leave':gt $curloc
}

$sitrpressd = {
	cla
	*clr
	minut += 15
	pressday = day
	vital += 1
	sweat += 1
	manna -= 1
	fat -= 1

	if $clothingworntype ! 'nude':
		'<center><img src="images/community/abdominal_dressed.jpg"></center>'
	elseif tanga = 1:
		'<center><img src="images/community/abdominal_underwear.jpg"></center>'
	else
		'<center><img src="images/community/abdominal_naked.jpg"></center>'
	end

	'You do a series of abdominal exercises for fifteen minutes, developing your endurance.'

	act 'Leave':gt $curloc
}

$sitrpushd = {
	cla
	*clr
	minut += 15
	pushday = day
	stren += 1
	sweat += 1
	manna -= 1
	fat -= 1

	if $clothingworntype ! 'nude':
		'<center><img src="images/community/push_dressed.jpg"></center>'
	elseif tanga = 1:
		'<center><img src="images/community/push_underwear.jpg"></center>'
	else
		'<center><img src="images/community/push_naked.jpg"></center>'
	end
	'You do push-ups for fifteen minutes, developing your strength.'
	pushnum = rand(stren / 10, stren / 5)
	'<br>You managed to do <<pushnum>> push-ups. Your previous record is <<pushrecord>>.'

	if pushrecord < pushnum:pushrecord = pushnum & 'This is a new record!'

	act 'Leave':gt $curloc
}

$gladbelo = {
	cla
	*clr
	minut += suhbelo2 * 3
	clrbelo += suhbelo2
	suhbelo2 = 0
	manna -= 10
	elektro += 10

	if $clothingworntype ! 'nude':
		'<center><img src="images/community/iron_dressed.jpg"></center>'
	elseif tanga = 1:
		'<center><img src="images/community/iron_underwear.jpg"></center>'
	else
		'<center><img src="images/community/iron_naked.jpg"></center>'
	end

	'You iron your underwear.'

	act 'Leave':gt $curloc
}

$showerdin = {
	cumpussy = 0
	cumbelly = 0
	cumass = 0
	cumanus = 0
	cumlip = 0
	cumface = 0
}

!!WD: Kioks event replaced with new code from Przemar!Przemar:** KIOSK ** ver 02
!!Przemar:IMAGE NEEDED 'Man punched you and say " Go away bitch your mouth full of sperm " at this rate you needed to wait 4 hours and paid 200 rubles'
!!WD:"SUB >= 15" for act - Will need balancing / playtesting
$kiosksig = {
	cls
	gs 'stat'
	'<center><img src="images/community/kiosk.jpg"></center>'
	'A pack of cigarettes costs 50 rubles.'
	*pl

	if money >= 50:
		if hour >= 12 and hour <= 15:
			'<center><img src="images/community/queue.jpg"></center>'
			'There''s a long line in front of the kiosk.'

			act 'Wait in line and buy cigarettes (30 Minutes)':
				minut += 30
				siga += 20
				money -= 50
				gt $curloc

				act 'Leave':gt $curloc
			end

			if exhibi >= 4:
				act 'Flash both your tits and your pussy':
					cls
					gs 'stat'
					minut += 10
					siga += 20
					money -= 50

					if kioskflash = 0:
						exhibi += 1
						kioskflash = 1
					end
					'<center><img src="images/community/flash_tits_pus.jpg"></center>'
					'The people in front of you are shocked, as they see you flashing your tits and your pussy. As a small thank you, some of them let you move further up in the line.'

					act 'Buy and leave':gt $curloc
				end
			end

			if exhibi >= 3:
				act 'Flash your pussy':
					cls
					gs 'stat'
					minut += 10
					siga += 20
					money -= 50

					if kioskflash = 0:
						exhibi += 1
						kioskflash = 1
					end

					if lobok >= 2:'<center><img src="images/community/flash_hairy.jpg"></center>'
					if lobok <= 2:'<center><img src="images/community/flash_nohairy.jpg"></center>'

					'The people in front of you are shocked, as they see you flashing your pussy. As a small thank you, some of them let you move further up in the line.'

					act 'Buy and leave':gt $curloc
				end
			end

			if exhibi >= 2:
				act 'Flash your tits':
					cls
					gs 'stat'
					minut += 10
					siga += 20
					money -= 50

					if kioskflash = 0:
						exhibi += 1
						kioskflash = 1
					end

					'<center><img src="images/community/flash_tits.jpg"></center>'
					'The people in front of you are shocked, as they see you flashing your tits. As a small thank you, some of them let you move further up in the line.'

					act 'Buy and leave':gt $curloc
				end
			end

			if SUB >= 15:
				act 'Suggest to blow someone in front of you':
					cls
					gs 'stat'
					minut += 10
					siga += 20
					money -= 50
					throat += 1
					bj += 1

					if cumlip = 0:
						'<center><img src="images/community/kiosk_blowjob.jpg"></center>'
						'A man agrees to your suggestion and let you move in front of him.'

						act 'Cum on your face':
							cls
							'<center><img src="images/body/cumface.jpg"></center>'
							'The man cums on your face.'
							cumface += 1

							act 'Go away and buy cigarettes':gt $curloc
						end

						act 'Cum on your mouth':
							cls
							'<center><img src="images/etogame/cumlip.jpg"></center>'
							'The man cums inside your mouth.'
							cumlip += 1

							act 'Go away and buy cigarettes':gt $curloc
						end
					else
						!!Przemar:IMAGE NEEDED
						$ImageNeededPlacholder
						!! '<center><img src="images/community/Image_needed.png"></center>'

						'Man punched you and say <font color="#0D42C0"> " Go away bitch, your mouth is full of sperm "</font> - in this case you are needed to wait 4 hours and pays 200 rubles.'
						minut += 240
						siga += 20
						money -= 200

						act 'Leave':gt $curloc
					end
				end
			end
		else
			act 'Buy a pack of cigarettes':
				siga += 20
				money -= 50
				minut += 5
				gt $curloc
			end
		end
	else
		'You don''t have enough money to buy cigarettes.'
	end

	act 'Leave':gt $curloc

	exit
}

$budilnik = {
	'<b><center><font size = 4><font color="black"> Clock</font></center></b>'
	'Clock wound <<alarm1>> hours <<alarm2>> minutes'
	'<b><center><font size = 3><font color="black"> Hours Minutes</font></center></b>'
	'<center><a href="exec:alarm1 = 01 & gt $curloc">01</a> <a href="exec:alarm1 = 02 & gt $curloc">02</a><a href="exec:alarm1 = 03 & gt $curloc">03</a><a href="exec:alarm1 = 04 & gt $curloc">04</a><a href="exec:alarm1 = 05 & gt $curloc">05</a></center>'
	'<center><a href="exec:alarm1 = 06 & gt $curloc">06</a> <a href="exec:alarm1 = 07 & gt $curloc">07</a><a href="exec:alarm1 = 08 & gt $curloc">08</a><a href="exec:alarm1 = 09 & gt $curloc">09</a><a href="exec:alarm1 = 10 & gt $curloc">10</a><a href="exec:alarm2 = 00 & gt $curloc">00</a><a href="exec:alarm2 = 05 & gt $curloc">05 ( 3)<a href="exec:alarm2 = 10 & gt $curloc">10</a><a href="exec:alarm2 = 15 & gt $curloc">15</a></center>'
	'<center><a href="exec:alarm1 = 11 & gt $curloc">11</a> <a href="exec:alarm1 = 12 & gt $curloc">12</a><a href="exec:alarm1 = 13 & gt $curloc">13</a><a href="exec:alarm1 = 14 & gt $curloc">14</a><a href="exec:alarm1 = 15 & gt $curloc">15</a><a href="exec:alarm2 = 20 & gt $curloc">20</a><a href="exec:alarm2 = 25 & gt $curloc">25 ( 3)<a href="exec:alarm2 = 30 & gt $curloc">30</a><a href="exec:alarm2 = 35 & gt $curloc">35</a></center>'
	'<center><a href="exec:alarm1 = 16 & gt $curloc">16</a> <a href="exec:alarm1 = 17 & gt $curloc">17</a><a href="exec:alarm1 = 18 & gt $curloc">18</a><a href="exec:alarm1 = 19 & gt $curloc">19</a><a href="exec:alarm1 = 20 & gt $curloc">20</a><a href="exec:alarm2 = 40 & gt $curloc">40</a><a href="exec:alarm2 = 45 & gt $curloc">45 ( 3)<a href="exec:alarm2 = 50 & gt $curloc">50</a><a href="exec:alarm2 = 55 & gt $curloc">55</a></center>'
	'<center><a href="exec:alarm1 = 21 & gt $curloc">21</a> <a href="exec:alarm1 = 22 & gt $curloc">22</a><a href="exec:alarm1 = 23 & gt $curloc">23</a><a href="exec:alarm1 = 00 & gt $curloc">00</a></center>'
}

$margoroomdiDush = {
	cls
	minut += 15
	QWdogreiqTimer = 7
	QWdogReiq = 2
	gs 'stat'
	'You undress and starts to follow Margaret into the shower.You didn''t really had time for a bath since Margaret pulls yours lips for a kiss.'

	act '<font color="magenta">Lick my nipples</font>':
		cls
		minut += 15
		horny += 50

		if MargoSex = 0:MargoSex = 1 & girl += 1

		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo2.jpg"></center>'
		'Margaret has taken your swollen nipples into her mouth. She began to lick them and their sharp little edges'

		act 'Carry her out':gt 'korr'
	end

	act '<font color="magenta">Lick my pussy</font>':
		cls
		minut += 15
		horny += 20

		if MargoSex = 0:MargoSex = 1 & girl += 1

		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo3.jpg"></center>'
		'Margaret kneels down and starts to lick your pussy. Her tongue makes your body get crossed through by a pleasant body wave.'

		if horny >= 90:horny = 0 & orgasm += 1 & 'You covered orgasm.'

		act 'Carry her out':gt 'korr'
	end

	act '<font color="magenta">Lick my ass</font>':
		cls
		minut += 15
		horny += 20
		if MargoSex = 0:MargoSex = 1 & girl += 1
		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo4.jpg"></center>'
		'Margo quickly began to lick your ass, causing a pleasant sensation all over the body, To Margaret this was not enough, so she slowly inserted a finger into your ass and began to make rhythmic movements.'

		if horny >= 99:horny = 0 & orgasm += 1 & 'You covered orgasm.'

		act 'Carry her out':gt 'korr'

		if anus > 15 and horny > 0:
			act '<font color="magenta">Stick your hand in the ass</font>':
				cls
				minut += 15
				horny += 60
				anus += 5
				gs 'stat'
				'<center><img src="images/zoo/margo5.jpg"></center>'
				'First she inserts one finger, then two, three and so on,eventually she shoved her entire hand completely. She quickly found herself in the depths of your ass. It''s unbelievable. Margaret penetrated deeper and deeper and you were in the seventh heaven.That is incredibly good. Your ass accepted her flexible hand. She starts massaging inside you like a real mistress, causing you to moan loudly and wagging your ass with pleasure.'

				if horny >= 90:horny = 0 & analorgasm += 1 & 'You covered orgasm.'

				act 'Carry her out':gt 'korr'
			end
		end
	end
}

$margoroomdi3 = {
	cls
	minut += 15
	gs 'stat'
	'You start to undress and go to the shower following Margaret. You do not have time to really get into the bath since Margaret pulls your lips with a kiss.'

	act 'Lick my nipples':
		cls
		minut += 15
		horny += 50

		if MargoSex = 0:MargoSex = 1 & girl += 1

		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo2.jpg"></center>'
		'Margaret took your swollen nipples into his mouth on the next, taking them to lick and nibble on their sharp little teeth'

		act 'Walk into a room':dynamic $margoroomdi2
	end

	act 'Lick my vagina':
		cls
		minut += 15
		horny += 20

		if MargoSex = 0:MargoSex = 1 & girl += 1

		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo3.jpg"></center>'
		'Margaret kneels down and starts to lick your pussy. Her tongue makes your body get crossed through by a pleasant body wave.'

		if horny >= 90:horny = 0 & orgasm += 1 & 'You have an orgasm.'

		act 'Walk into a room':dynamic $margoroomdi2
	end

	act 'Lick my ass':
		cls
		minut += 15
		horny += 20

		if MargoSex = 0:MargoSex = 1 & girl += 1

		lesbian += 1
		gs 'stat'
		'<center><img src="images/zoo/margo4.jpg"></center>'
		'Margo quickly began to lick your ass, causing a pleasant sensation all over the body, To Margaret this was not enough, so she slowly inserted a finger into your ass and began to make rhythmic movements.'

		if horny >= 99:horny = 0 & orgasm += 1 & 'You have an orgasm.'

		act 'Walk into a room':dynamic $margoroomdi2

		if anus > 15 and horny > 0:
			act 'Stick me in the ass hand':
				cls
				minut += 15
				horny += 60
				anus += 5
				gs 'stat'
				'<center><img src="images/zoo/margo5.jpg"></center>'
				'First she inserts one finger, then two, three and so on,eventually she shoved her entire hand completely. She quickly found herself in the depths of your ass. It''s unbelievable. Margaret penetrated deeper and deeper and you were in the seventh heaven.That is incredibly good. Your ass accepted her flexible hand. She starts massaging inside you like a real mistress, causing you to moan loudly and wagging your ass with pleasure.'
				if horny >= 90:horny = 0 & orgasm += 1 & 'You covered orgasm.'

				act 'Walk into a room':dynamic $margoroomdi2
			end
		end
	end
}

$margoroomdi2 = {
	cls
	minut += 15
	gs 'stat'
	'-I''m ready:Margaret says entering the hall'
	'very good start, you answer Margaret.'

	act 'Suck in males':
		cls
		minut += 15
		horny += 30
		gs 'stat'
		'<center><img src="images/zoo/margo6.jpg"></center>'
		'Margot leans towards male and settled for an excellent start to suck him. Finally a member of the dog in the alert.'

		act 'Insert dog dick in her ass.':
			cls
			minut += 15
			horny += 30
			gs 'stat'
			'<center><img src="images/zoo/anal.jpg"></center>'
			'Maragrita becomes chetverenki on and you naprvlyaete cock into her anus, pochuvstovat that hoditsya anus cable nachel rhythmic action 2 times faster, Margaret already squealed as the most natural bitch.'
			'Margaret suddenly sobbed and then abruptly as nadtyazhno groaned and rolled her eyes with tears.'
			'Margaret, what happened, you got closer.'
			'<<$name>> it stuck in me-quite said Margaret and licked her lips, feeling unusual, something to push against the walls of the anus and turns odnovremnno painful and pleasant, I did not yet ispytovala.'
			'yes, unusual and pleasant feelings, then I completely agree Stobie, just do not make any sudden movements and jerk dog can break you, your wonderful ass-vyreshili show some care towards Margaret.'
			'<<$name>> you know I looked so there zooporno girl 19 years pools overlook 3 hours 17 males, then she ate moved Margaret licked her lips:this will trenirovatsya that would kill her record.'
			'Rit, you like a little video is certainly postonovochnoe-skeptical otveteli you no light on this video my father personally for himself zakazaval Margaret tried to change position but the dog viciously zarychla and Margaita left-poytki be freed so that not what postovki.'
			'unexpected knot in anus Margaret opal, and a member of the dog with a strange sound "PSCs" vyskochil.Iz ass Margarets flowed sperm peremeshku blood.'
			'Ohrenet Margaret delighted, I now will often proktikovat zoo, bath, and all I''m going home.'

			act 'Walk-in shower with Margaret':dynamic $margoroomdiDush
		end
	end
}

$margoroomdi = {
	cls
	minut += 15
	gs 'stat'
	'YOU a little bit ajar and look after her but nothing happens Margaret just moetsya.Vy mark that she beautiful body.'

	act 'Walk into a room':dynamic $margoroomdi2
}

$margokafedin = {
	cls
	minut += 15
	gs 'stat'
	'<center><img src="images/zoo/margo.jpg"></center>'
	'You are going to summon the waitress but here comes the Cafe Margaret, you noticing it immediately comes to your table.'
	'Hi sorry that lingered unforeseen circumstances Margaret sits at a table.'

	if MargoSex = 0:
		'And so ochem you wanted to talk to me? Once you took the bull by the horns.'
		'About zoosekse, you''re practicing it?-Asked Margaret.'
		'Yeah, no, you shit?-YOU decided to show a bit of character.'
		'I like the zoo-last words Margaret said not very confident - and I would like to try.'
		'Do you have a dog? - Her words you amused, causing slight smirk.'
		'In that case there is, I live with my parents and they are not allowed to start a dog - those words Margaret sighed sadly.'
		'And you want to go under my dog? - You''ve already undisguised sarcasm.'
		'Well, yes - Margaret missed your sarcasm on deaf ears'
	else
		'You sat at the table with Margot and she admitted that she liked with the dog and she wants more.'
	end

	act 'Disassemble itself (Go)':gt 'street'

	if husbandMark <= 0 and husband <= 0:
		act 'Come then to me':
			cls
			minut += 15
			gs 'stat'
			'You and Margaret rose from the table and went to your home. Already in the apartment Margaret went into the shower.'

			act 'Peek into the soul':dynamic $margoroomdi
			act 'Wait in the room':dynamic $margoroomdi2

			if horny >= 50:act 'Login to Margaret in shower':dynamic $margoroomdi3
		end
	end
}

$butikreiqdi = {
	cls
	minut += 5
	gs 'stat'
	'Starting to turn your head, you think nobody noticed, but your actions have attracted the saleswoman. The seller is a young girl in a little too narrow shirt with the logo of the Botique, not enough that her shirt was so tight, she had to unbutton the top button (Fashion-YOU think whether it is men´s boutique shirt would be understandable, but in the female? what is and what for the administration is thinking?) she came up to you a little bit inconsistent and quickly asked:'
	'Seller:Can i help you with anything?'

	act 'No, thank you':gt 'butik', 'start'
	act 'Silently leave':gt 'down'

	act 'Staring at her breasts':
		cls
		minut += 5
		horny += 50
		gs 'stat'
		'Seeing that the novice saleswoman and that you are most likely her first client, you decided to go for it.You only opened your mouth to say some harsh sentence, your eyes rested on her chest. The Bra together with the shirt successfully emphasized breasts, and even though it was visible only the upper part of the chest, your imagination has completed everything for you. (<font color="magenta">You wonder how her nipples are?</font> the thought surprinsingly flashed in your brain)'
		'<font color="magenta">Yes, You can give me a few minutes of your time.</font> You said.'
		'Your words made an impression on the saleswoman, she was embarrassed and blushed slightly.'
		'<font color="#FF8732">Yes, yes, yes - frequently it is: what is the dress color you like? shape neckline of the dress? you want more freedom to dress? or turn? you want to highlight your perfect figure?</font>'
		'<font color="magenta">Stop, stop, - you''re still a person and not an impersonal being, firstly tell me, how would you like me to address you?</font> Your words made an impression on the girl, she yavna flattered by your words. '
		'<font color="#FF8732">Irina</font> - says the girl, and then corects: <font color="#FF8732"> Saleswoman Rimma.</font>'
		'<font color="magenta">I can call you Rima?</font> You ask - <font color="magenta">I''m <<$name>></font>.'
		'<font color="#FF8732">Yes, of course as you see fit </font>, responds Rimma ,smiling shyly.'

		act 'Choose a dress with Rimma':
			cls
			minut += 5
			gs 'stat'

			if hapri = 1 and mop > 1 and leghair <= 0 and sweat <= 0 and curly > 0 and glamur > 0:
				'You choose things evaluate them together with Rimma and just hang out.'
				'<font color="magenta">Rima, where is the dressing room?</font> - You ask suddenly.'
				'<font color="#FF8732">Come with me</font> - Rima didn''t notice that the invisible barrier between you is lost: the seller and the buyer.'

				act 'Go inside the dressing room':
					cls
					minut += 5
					gs 'stat'
					'You and Rimma went together into the dressing room.'

					act 'You did not like the dress':
						cls
						minut += 5
						gs 'stat'
						'As a result, you are spending time iwhile you head wonder in two thoughts:Rima, and her mysterious and curious body.'
						'As you go home suddenly again you feel eyes on you'

						act 'Ignore':gt 'down'

						act 'Look around':
							cls
							minut += 5
							gs 'stat'
							'You started to turn my head sharply looking around.'
							'You notice that the girl looks at you.'

							act 'Approach her':
								cls
								minut += 5
								gs 'stat'
								'YOU silently come and rest against a girl look:'
								nl
								'Good afternoon, it is pronounced, you do not remember me?'
								'Good day, she says, you do not remember me?'
								'The girl does not respond to your sharpness'
								'In principle, there is no out of the situation that you had?-Must-not the girl answers'
								'What is the situation where when? You will not hide anger.'
								'Yes, in a vacant lot where you are "fun" with a dog-girl replied with a grin.'

								act 'Yes you ohereli! (Go)':gt 'down'

								act 'Extort taken in head? What do you want?':
									cls
									minut += 5
									QWdogReiq = 2
									QWdogreiqTimer = 7
									gs 'stat'
									'Decided to blackmail me? Clitoris with one hand plucking another rented? And how much do you want? Viciously proiznositi you:think yourself a damn how much it wants.'
									'Again, your words vyzymele action on devushku.skloniv head to the side, she asked:Tantrum over?'
									'You told her irritably that have not even begun to hysteria.'
									'NO, you''re still on the nerves let''s meet next week, suddenly the girl is pronounced.'
									'let''s you usalo shook his head.'
									'that''s fine my name is margaret and says the girl looks at you expectantly.'
									'<<$name>>-you reply.'
									'Prior to the meeting, said margaret and leaves.'

									act 'Leave':gt 'down'
								end
							end
						end
					end

					act 'Take the panties off in front of Rimma.':
						cls
						minut += 5
						gs 'stat'
						'You have removed your panties in front Rimma and noticed how her cheeks glowed, and breathing quickned.'

						act 'Do you like me?':
							cls
							minut += 5
							orgasm += 1
							horny = 0
							lesbian += 1

							if RimmaSex = 0:RimmaSex = 1 & girl += 1

							rimmaday = day
							gs 'stat'
							'<center><img src="images/zoo/primer.jpg"></center>'
							'<font color="magenta">Rimma, do you like me? </font> ou asked quietly'
							'<font color="#FF8732">yes, very much </font> Rimma answers with excitation'
							'<font color="magenta">Then lick me </font> you demand'
							'Rimma kneels down and begins to kiss you body, not very skillfully at the beginning, starting with timidly kissing your belly that turned into a more confident licking and covering all of your body.Rima achieved making you pussy very wet.She starts Kissing and licking your crotch little by little bit it. The unexpectedness made the body flow into a sweet languor. '
							'Odour which you smell, Rimma for a few seconds looked up from petting.'
							'After putting the right palm gently on the pubis, Rimma fingers spread you wet lips, poking her tongue and run it inside.'
							'A Soft reciprocating action of the tongue and on the clitoris excited you and caused a mild spasm. Rima suddenly begun to tongue prss on your clitoris.The body is already weak and no longer obey the brain,only trying to not moan fot he whole store.'
							'Suddenly, Your body began to shake and was covered in soft wave of spasms, with the last spasm you came.You let a loud moan out while you knelt down.'
							'You are in a easy prostration, and the body is on a pleasant stasis.'

							act 'Exit out of the dressing':
								cls
								minut += 5
								QWdogReiq = 2
								QWdogreiqTimer = 7
								gs 'stat'
								'Rima took you to the door.'
								'<font color="#FF8732"><<$name>>, you liked it? </font> Rima asked, blushing.'
								'<font color="magenta">What do you think? I crave for more, Do you want to continue?</font>'
								'<font color="#FF8732">No, I can''t,i have waiting parents at home </font> = Rimma teels you looking upset '
								'<font color="magenta">Then how about next week?</font> you offer'
								'<font color="#FF8732">let''s do it </font> Rima looks very happy.'
								'You go home, suddenly you hear a woman''s voice behind you:'
								'<font color="#808000">Goodnight</font>- said the strange stranger.'
								'Looking closely you recognize her as girl with the vacant lot.'
								'<font color="magenta">Hi</font>-you cheerfully answered, <font color="magenta">it was you that was observing me the entire time ?</font>'
								'<font color="#808000">Yes</font>, she smiled in response,<font color="#808000"> I saw you in the boutique, but i didn''t dare to approach you that time, so i decided to wait outside for you.</font>'
								'<font color="magenta">But why did you wait?</font>'
								'<font color="#808000">Now it''s too late, Meet me next week so we can talk</font> - awaiting you response while she is looking at you'
								'<font color="magenta">Let''s meet them </font> - you easily agreed -<font color="magenta">By way I''m <<$name>></font>'
								'<font color="#808000">Margaret </font>'

								act 'Leave':gt 'down'
							end
						end
					end
				end
			else
				'You and Rimma search for a dress, but couldn''t find one. You leave and Rimma is a little sad saying goodbye to you'

				act 'Leave':gt 'down'
			end
		end
	end
}

$polactdog = {
	cls
	streetdogday = day

	!!if QWdogReiq = 0:QWdogReiq = 1 & QWdogreiqTimer = 7

	zoo += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/zoo/first.jpg"></center>'
	'After looking around and making sure that no one has you take off clothes:'
	'Soft dog stuck but also rough tongue and began oblizovat pussy, rhythmic action of the dog''s entire body went soft wave excitation, causing a light moan involuntarily.'
	'A few minutes later the dog stops licking and nachinaetsya attempts to capture his bitch, the better to make you stand on chetverenki.Kobel habitual movement on skakivaet you:'

	act 'Send a member of the vagina':
		cls
		minut += 10
		orgasm += 3
		horny = 0
		vagina += 3
		gs 'stat'
		'<center><img src="images/zoo/vag.jpg"></center>'
		'You turned to him and began to massage his bag, from which it seemed member, you began to masturbate him, he grew up before our eyes, turning into a formidable club 27sm.Vzyav his penis in her hand, you sent him a little and entered, he did the rest himself, he abruptly pushed and member went hungry pussy. You groaned the first blow, and after three strikes you were already fully strung on a member. Dog began to fuck long but strong strokes, stringing each time member to the hilt with a single blow. Member of the dog almost completely out, left 2 cm, and he abruptly pushed it to its full length with a member of the champ went into the vagina, sex lips tightly wraps it in vozvrate.Orgazmy followed one another, surging waves. Dog all gained pace and more come on, gripped his paws pounding cock in the depths of the vagina.'

		act '....':
			cls
			minut += 10
			cumpussy += 1
			gs 'stat'
			'<center><img src="images/zoo/vag2.jpg"></center>'
			'You pushed the legs stronger and rested his hands on the ground, becoming more comfortable for males pose pussy greedily swallowing every centimeter of this member, milking him, squeezed along the entire length. Pussy burning and dripping with love juice, selection trickled down his thighs and dripped to the ground. Come on dog became more violent and stronger. Soon he nachel grow site and you began to push her ass towards the penis, trying to swallow it more. Pussy walls you feel that his cock began to grow, and he drove his cock to the base and a little faded. His unit was expanded in pussy, pushing her wall, and binds tightly knot. The dog began to attempt to be freed but the member firmly stuck in her pussy, and she squeezed it tight at the bottom and ringlet not released until it is to pump sperm bitch. You screamed when the sperm hit, filling your pussy completely, his hot sperm that burned inside. A member of the finished and throbbing in your depths, pussy milked him of his boy sucked every last drop. Cum began to flow in the legs trickle. You were completely filled with his sperm. Dog cranked and started back to you pressed it to her a few minutes and stood with him in the castle with a knot in his dick pizde.Kogdaya little opal and you could be released from the site, you fell to the ground, and it flowed from pussy cum, filling all around.'

			if QWdogReiq > 0:act 'Leave':gt 'korr'
			if QWdogReiq = 0:act 'Leave':dynamic $dogreiqdi
		end
	end

	act 'Send dick in the ass':
		cls
		minut += 10
		orgasm += 3
		horny = 0
		anus += 3
		gs 'stat'
		'<center><img src="images/zoo/anal.jpg"></center>'
		'Kneeling in the excited state, a member of the Dog came into the ass. Anus was ajar because of the uncomfortable position and strongly relaxed muscles and his cock slipped inside ass very easily. Sharp rhythmic movements dostovlyaet both pain and pleasure, orgasm followed orgasm. But then he went completely sharp movement in the anus sphincter tightly wraps it, thereby sealing the anus completely.'

		act '....':
			cls
			minut += 10
			cumanus += 1
			gs 'stat'
			'<center><img src="images/zoo/anal2.jpg"></center>'
			'You felt as he started down the liquid inside ass. Having stood in the castle a few minutes, but the ball on his penis did not decrease and bored dog stand, began to pull out of the anus growling his penis. In pain you started yelling, feeling his huge cock rips anus into 2 parts. Then listen distinctive sound "chpok" and his cock popped out of ass torn from which gushed down the belly of his sperm mixed with secretions from the anus.'

			if QWdogReiq > 0:act 'Leave':gt 'korr'
			if QWdogReiq = 0:act 'Leave':dynamic $dogreiqdi
		end
	end
}

$dogreiqdi = {
	cls
	QWdogReiq = 1
	QWdogreiqTimer = 7
	minut += 10
	gs 'stat'
	'<center><img src="images/zoo/girl.jpg"></center>'
	'Vstatv with knees and adjusting shalt you kissed a dog and went home, recovering himself after intercourse, difficulty rising, adjusting his clothes you notice the girl. Girl with curiosity and excitement explicitly looked for all your shows. The girl opens her mouth and wants to say that, but each razvorachevaetsya and escapes. You stay in a mild surprise but also the fact that you were looking for you filed. He called the dog you went home.'

	act 'Leave':gt 'korr'
}

$youriqwest = {
	act 'Go with Yuri':
		cls
		jouryQwNo = 0
		minut += 30
		gs 'stat'
		'You walked down the street with Yuri, came to the metro, where you went in the car and drove in silence with him in the northern part of the city. Coming out of the subway Yuri led you in the direction of new buildings, all the way you walked in silence and Yuri looked tense. Finally you come to a new nine-story, Yuri opened the front door and you walked in the entrance. Yuri called the elevator and you have arrived at his pad.'

		act 'Enter the apartment':
			cla
			minut += 30
			gs 'stat'
			'You entered a small cozy, one-bedroom apartment. Catches the eye is that lives here, albeit very neat, but a bachelor.'
			'Yuri led you into the hall and seated on a chair. He went into the kitchen and brought champagne with grapes and put it on the table between the two chairs. He sat in a nearby chair and turned on the music control.'
			'It was noticeable that Yuri is not as it can not come up with topics for conversation. The conversation did not jell and finally Yuri resolutely stood up and going to hand you filed "Shall we dance?"'

			act 'Dance with Yuri':
				cla
				minut += 10
				horny += 50
				gs 'stat'
				'You already rather plucked a bit of champagne and you covered intoxication and what that sweet bliss. You took his hand with a smile and Yuri standing with a chair out into the middle of the room. Yuri walked up to you and hugging, began to dance with you. His hands gently glided over your body. You embraced the excitement and you also began to stroke Yuri hands. Yuri pressed to you and how you feel through the fabric, your stomach rests on his hard cock.'

				act 'Touch his crotch':
					cla
					minut += 10
					gs 'stat'
					'You practically without any intention slid his hand over the body of George and stayed on his crotch feeling his standing member. Yuri stifled a sigh from your touch.'

					act 'Unbutton his pants':
						cla
						minut += 10
						gs 'stat'
						'You undid his pants and his hands in his pants to Yuri groped his hard, as if an iron dick and got him out of his pants. His head was hidden under the skin, which fits closely to the head, you prick the skin on the penis revealing crimson, hard head.'

						act 'Squat down and take in the mouth':
							cls
							guy += 1
							jourySex = 1
							bj += 1
							minut += 10
							gs 'stat'
							'<center><img src="images/qwest/youri/bjdance.jpg"></center>'
							'Little hand caressed member Yuri you squatted in front of him and your face was right on standing against the member. You cupped his purple head <<$liptalk>> and started to suck dick. Your lips slid across the smooth and hot cock sucking it. Yuri was moaning and looked down into your eyes. Finally, he choked hissed, "Come to bed."'
							gs 'oral', '0'

							act 'Go to bed':
								cls
								minut += 10
								$nameV = 'Yuri'
								$boy = $nameV
								dick = 18
								silavag = 2
								pose = 1
								gs 'stat'
								'<center><img src="images/qwest/youri/sex.jpg"></center>'
								'The bed Yuri helped you to undress and put you on all fours ready to enter you.'
								dynamic $sexstart
								'You feel like something solid Bound you pussy.'
								dynamic $sexstart2
								'Yuri rammed so hard you that you broke and fell onto the bed feeding.'

								act 'Moan':
									cls
									minut += 10
									pose = 1
									gs 'stat'
									'<center><img src="images/qwest/youri/sex1.jpg"></center>'
									'Yuri is not paying attention, the fact that you fell on the bed feeding continued to thrust his cock in you.'
									'He furiously pecked your body and you besspomoschno groaned under him, feeling his cock ramming your insides, pushing his every move.'
									dynamic $sexcum
									'Yuri froze on you kiss on the cheek and went to the bathroom.'

									act 'Go to the bathroom':
										cls
										minut += 10
										horny += 10
										gs 'stat'
										'<center><img src="images/qwest/youri/van.jpg"></center>'
										'You went into the bathroom, where is bathed Yuri, he invited you wash with it. You shrug wearily climbed into the shower.'
										'Yuri began to lather you and you feel like a member of his soft rubbing against your hip began to harden suffused with blood, and rising.'

										act 'Kiss Yuri':
											cls
											minut += 10
											horny += 10
											gs 'stat'
											'<center><img src="images/qwest/youri/shower.jpg"></center>'
											'Yuri attracted you to her and started to kiss you. You already got tired, but the situation excites you and you responded to caress Yuri, too, began to stroke his body.'

											act 'Sucking dick':
												cls
												minut += 10
												horny += 10
												bj += 1
												gs 'stat'
												'<center><img src="images/qwest/youri/shower1.jpg"></center>'
												'Yuri put you in the bathroom on his haunches and put his still soft dick in your mouth. You started to suck cock, which rose directly in your mouth, filling it. Soon the cock was like a steel and Yuri began to moan. Finally he took a member of your mouth and prepared to stop.'
												gs 'oral', '0'

												act 'Substitute person':
													cls
													minut += 10
													horny += 10
													cumface += 1
													facial += 1
													gs 'stat'
													'<center><img src="images/qwest/youri/shower2.jpg"></center>'
													'Cum Yuri slapped you in the face, but it was not much and the flow soon stopped.'

													act 'Take a shower':
														cla
														*clr
														minut += 15
														sweat = -3
														horny += 1
														hapri = 1
														mop = 1
														cumpussy = 0
														cumbelly = 0
														cumass = 0
														cumlip = 0
														cumface = 0
														cumanus = 0
														gs 'stat'
														'<center><img src="images/pics/dush.jpg"></center>'
														'Finally you could get here before the shower and clean up. You showered and went out into the hall prichesyvatsya. There have been expecting you, Yuri, who again was nervous and it was immediately clear that he wants you to show the door.'

														act 'Leave':gt 'nord'
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
}

--- dina ---------------------------------
# dinBoroda
$borodachNo = {
	act 'I had enough':
		cla
		minut += 15
		gs 'stat'
		'You refused to drink and started to leave. The guard began to persuade you to stay with him and continue. '

		if SUB < 10:act 'Leave':dom += 1 & gt 'clener', 'start'
		dynamic $borodachDrink
	end
}

$borodachNo2 = {
	act 'I have to go now':
		cla
		minut += 15
		gs 'stat'
		'You gather your things and started to leave, yet Sasha began to persuade you to stay with him and continue.'

		if DOM > 0 and horny < 50:act 'Leave':dom += 1 & gt 'clener', 'start'
		dynamic $borodachSex
	end
}
$borodachDrink = {
	act 'Another drink':
		cla
		minut += 15
		horny += 20
		gs 'stat'
		'You drank and ate some more cheeses, you just realized that you are sharply drunk. The Hand of the guard does not stopping caressing your ass.'
		dynamic $borodachNo2
		dynamic $borodachSex
	end
}

$borodachSex = {
	act 'Relax':
		cla

		if borodachSex = 0:borodachSex = 1 & guy += 1

		minut += 5
		horny += 5
		gs 'stat'
		'You ease down and began to enjoy hands caressing you. Sasha has openly embraced and started kissing you.'
		'His hands slid under your clothes, unbuttoning and removing it. Soon he got to your chest and began to suck your nipples.'

		act 'Lie down on the sofa':
			cls
			minut += 5
			horny += 20
			gs 'stat'
			borodachSexDay = day
			sex += 1
			minut += 30
			pose = 0
			$nameV = 'Sasha'
			$boy = $nameV
			dick = 15
			silavag = 0
			'<center><img src="images/picV/vag.jpg"></center>'
			'<<$nameV>> put you on the sofa, spread your legs and pullled out his <<dick>> centimeter dick, fingers began to caress your pussy, preparing to be entered.'
			gs 'orgazm', 'start'

			act 'Leave':gt 'street'
		end
	end
}

$ohrhj = {
	act 'Masturbate him':
		cla
		minut += 15
		horny += dom
		gs 'stat'
		hj += 1
		'You started stroking his cock with your delicate hands. Quickly Sasha groaned, "I will finish soon."'
		dynamic $ohrbj
		dynamic $ohrhjcum
		dynamic $ohrsex
	end
}

$ohrhjcum = {
	act 'Masturbate him more':
		cls
		minut += 15
		horny += dom
		borodachSexDay = day
		gs 'stat'
		'<center><img src="images/qwest/ohrannik/hjcum.jpg"></center>'
		'Sasha groaned and his cock began to ejaculate a jet of sperm in your palm.'

		act 'Leave':gt 'street'
	end
}

$ohrbj = {
	act 'Suck him':
		cls
		minut += 15
		horny += 5
		gs 'stat'
		bj += 1
		picrand = rand(1, 5)
		'<center><img src="images/qwest/ohrannik/bj<<picrand>>.jpg"></center>'

		'You wrapped your <<$liptalk>> around his strong and warm 15 centimeter and quickly began to suck the head, caressing with the tongue and lips. Sasha groaned, "I´m going to come."'
		dynamic $ohrbjcum
		dynamic $ohrsex
	end
}

$ohrbjcum = {
	act 'Grip even harder the lips':
		cls
		minut += 15
		horny += 5 + vaf
		cumlip += 1
		gs 'stat'
		picrand = rand(1, 5)
		'<center><img src="images/qwest/ohrannik/bjcum<<picrand>>.jpg"></center>'
		'You redouble your efforts sucking the hard cock with your <<$liptalk>>. Hot sperm hits your mouth, then again and again. You continued to suck ignoring the fact that you have a mouth full of vigorous sperm. Finally the stream dried up.'
		gs 'oral', '0'

		act 'Swallow sperm':
			cls
			minut += 15
			horny += 5
			vaf += 1
			borodachSexDay = day
			gs 'stat'
			picrand = rand(1, 3)
			'<center><img src="images/qwest/ohrannik/swallow<<picrand>>.jpg"></center>'
			'You have opened your mouth filling with sperm that you swallowed it.'

			act 'Leave':gt 'street'
		end

		act 'Spit sperm':
			cls
			minut += 15
			horny += 5

			if vaf > 0:vaf -= 1

			borodachSexDay = day
			gs 'stat'
			'<center><img src="images/qwest/ohrannik/spit.jpg"></center>'
			'You have opened your mouth filling with sperm, that you spat into the sink.'

			act 'Leave':gt 'street'
		end
	end
}

$ohrsex = {
	act 'Sex':
		cls
		minut += 5
		horny += 20
		gs 'stat'
		borodachSexDay = day
		sex += 1
		minut += 30
		pose = 0
		$nameV = 'Sasha'
		dick = 15
		silavag = 0
		'<center><img src="images/picV/vag.jpg"></center>'
		'<<$nameV>> put you on the sofa, spread your legs and pull out his <<dick>> centimeter dick. Fingers began to caress your pussy, preparing her to be entered.'
		gs 'orgazm', 'start'

		act 'Leave':gt 'street'
	end
}

rikudootvet = 1415

--- dinBoroda ---------------------------------
# dinSex

$dinrandbj = {
	tperbjran = rand(0, 3)

	if tperbjran = 0:$tperbj = 'Your <<$liptalk>> wraps around his <<dick>> centimeter member'
	if tperbjran = 1:$tperbj = 'Your <<$liptalk>> clasps his purple head <<dick>> centimeter member'
	if tperbjran = 2:$tperbj = 'You held your <<$liptalk>> on the head of his <<dick>> centimeter member and pulled into your mouth'
	if tperbjran = 3:$tperbj = 'The <<dick>> centimeter dick rested 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 quickly turned and was filled by a slightly salty and hard cock, which you started to suck.'
	if tperbjran2 = 1:$tperbj2 = 'The <<dick>> cock inside your mouth went hard and hot, and you started sucking'
	if tperbjran2 = 2:$tperbj2 = 'The hard cock around your <<$liptalk>> is filling your whole mouth and with every move it"s going down your 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 is shot with a jet of viscous semen.'
	if tperswalrand = 1:$tperswal = 'The cock twitched and jets of sperm flew between your lips into your mouth.'
	if tperswalrand = 2:$tperswal = 'Your mouth has been filled with sperm when your lips began to close between the dick.'

	tperswalrand2 = rand(0, 2)

	if tperswalrand2 = 0:$tperswal2 = 'Your mouth is quickly filled with warm sperm and you feel it"s sharp taste.'
	if tperswalrand2 = 1:$tperswal2 = 'Your mouth is filled with cum and began to run down your <<$liptalk2>>'
	if tperswalrand2 = 2:$tperswal2 = 'Hot seed quickly filled your mouth making you experience the whole scale and sharp tart taste of sperm.'

	tperswalrand3 = rand(0, 2)

	if tperswalrand3 = 0:$tperswal3 = 'You gulped and swallowed the sperm located in your mouth. In the mouth, the taste of semen stayed and felt his scent.'
	if tperswalrand3 = 1:$tperswal3 = 'You swallow the warm cum that fills your mouth and licks the remnants of the seed with your <<$liptalk3>>.'
	if tperswalrand3 = 2:$tperswal3 = 'You swallow the viscous semen that is filling your mouth, and then licks.'

	'<<$tperswal>> <<$tperswal2>> <<$tperswal3>>'
}

$dinrandfacial = {

}

$venerasiak = {
	tipvenerarand = rand(0, 10)

	if prezik > 0:
		venrand = rand(0, 1000)

		if venrand = 1000:dynamic $veneradinitog
	else
		venrand = rand(0, 100)

		if venrand >= 80:dynamic $veneradinitog
	end
}

$veneradinitog = {
	if tipvenerarand >= 8:
		!!herpes
		gerprand = rand(0, 100)

		if gerprand > 90:
			if GerpesOnce = 0:GerpesOnce = 1

			Venera += 1
			Gerpes += 1
		end
	elseif tipvenerarand = 7:
		!!syphilis
		venerarand = rand(0, 100)

		if venerarand > 95:
			Venera += 1

			if SifacOnce = 0:SifacOnce = 1

			Sifilis += 1
		end
	elseif tipvenerarand >= 5 and tipvenerarand < 7:
		!!gonorrhea/triper

		venerarand = rand(0, 100)

		if venerarand > 95:
			Venera += 1

			if TriperOnce = 0:TriperOnce = 1

			Triper += 1
		end
	elseif tipvenerarand < 5:
		!!candidiasis/thrush

		venerarand = rand(0, 100)

		if venerarand > 85:
			if KandidozOnce = 0:KandidozOnce = 1

			Kandidoz += 1
		end
	end
}

$sexstart = {
	protect = 0
	vidageday -= 1

	if prezik > 0:
		prezik -= 1
		protect = 1
		'<<$boy>> took your condom and put it on his <<dick>> centimeter member.'
	end
}

$sexstart2 = {
	frost = 0

	if mesec > 0:
		!!Menstruation makes orgasm impossible
		horny = 0
		manna -= 10
		willpower -= 10
		'Menstruation 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.'
	elseif 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, 6- little orgasm
		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		 end

		if oragazm = 5:
			preOrg += 1

			if razeba < 4:
				if silavag = 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					oragazm = 4
				end
			elseif razeba = 4:
				if silavag = 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				end
			elseif razeba >= 5:
				if silavag = 2:
					orgrand = rand(0, 50)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				end
			end
		end

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

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

			vgapetime = totminut
			horny -= 5
			manna -= 5
			willpower -= 5
			'You winced at the sudden pain when <<$boy>> entered, it hurted but it gradually become quite tolerable. You are trying to get aroused while his <<dick>> centimeter dick fucks your pussy, but you did not succeed.'
		elseif orgazm = 3:
			manna += 5
			willpower += 5
			'You are startled by feeling that your pussy is stretching when <<$boy>> entered you. It feels good when his <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 4:
			!horny += 10
			manna += 10
			willpower += 10
			'You are startled by feeling that your pussy is stretching as <<$boy>> entered you. It feels good when his strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and pulsations is increasing in the abdomen, then the feeling decreases a little and remained until the end.'
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 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.Gradually a pleasant warmth and pulsations is increasing in the lower abdomen,the feeling then descend and your entire body covered with hot waves of orgasm, you scream with pleasure.'
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel as his penis enters your pussy.You feel nice between your legs , but his <<dick>> inches dick is significantly less than your pussy and not enough for you. Gradually a pleasant warmth and pulsations is increasing in the abdomen, then the feeling a decreases a little and remained until the end.'
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You have bitten your <<$liptalk>> 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:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		willpower -= 10
		'You have your period and blood slowly follows from the vagina while you jump on his dick.Having painful and pleasants sensations . You moan while his strong <<dick>> centimeter penis fucks you.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - excitement
		!!vagina - the elasticity of the vagina
		!!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!!dick - penis Man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		end

		if oragazm = 5:
			preOrg += 1

			if razeba < 4:
				if silavag = 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					oragazm = 4
				end
			elseif razeba = 4:
				if silavag = 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				end
			elseif razeba >= 5:
				if silavag = 2:
					orgrand = rand(0, 50)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				end
			end
		end
		if orgazm = 0:
			if vgape < 3:vgape = 3

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

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

			vgapetime = totminut
			horny -= 5
			manna -= 5
			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 the pain gradually become calm and quite tolerable.You are trying to get aroused and still jumping on his sturdy and strong <<dick>> centimeter to fuck your pussy, but you do not succeed.'
		elseif orgazm = 3:
			!!horny += 5
			manna += 5
			willpower += 5
			'You are startled by the feeling that your pussy is stretched when sat on and felt like a cock of <<$boy>> has entered into you. Between the legs you get a little nice feeling when you jump on a strong <<dick>> centimeter penis.'
		elseif orgazm = 4:
			!!horny += 10
			manna += 10
			willpower += 10
			'You are startled by the feeling that your pussy is stretched when you sat on and felt like a member of <<$boy>> has entered into you. Between the legs gets a little nice feeling when you jump on strong <<dick>> centimeter penis.Gradually a pleasant warmth and pulsations is increasing in the abdomen, then the feeling a decreases a little and remained until the end.'
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 1
			'You flinched from a pleasant feeling when your pussy stretched starting on taking a dick. Between the legs becomes very warm and pleasant when you jump on the strong <<dick>> centimeter penis. Gradually a pleasant warmth and pulsations is increasing in the abdomen, the feelingthen descend to you and your entire body covered hot waves of orgasm, you involuntarily scream with pleasure writhing on edge.'
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel as his penis enters your pussy.You feel nice between your legs , but his <<dick>> inches dick is significantly less than your pussy and not enough for you. Gradually a pleasant warmth and pulsations is increasing in the abdomen, then the feeling a decreases a little and remained until the end.'
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You have bitten your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boy>> entered, breaking your hymen. You Weep and moan while you jump on strong <<dick>> centimeter dick with your bloody pussy.'
	end

	if vagina < dick:vagina += 1

	sex += 1
}

$sexstart4 = {
	frost = 0

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna = manna - 10
		willpower = willpower - 10
		'You are menstruated and yet he rams his dick into you, vaginal blood flows slowly. You have both painfull and pleasant sensations. You moan while a strong <<dick>> centimeter dick fucks your pussy.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - excitement
		!!vagina - the elasticity of the vagina
		!!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!!dick - penis Man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm

		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
				if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		end

		if oragazm = 5:
			preOrg += 1

			if razeba < 4:
				if silavag = 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					oragazm = 4
				end
			elseif razeba = 4:
				if silavag = 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				end
			elseif razeba >= 5:
				if silavag = 2:
					orgrand = rand(0, 50)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				end
			end
		end

		if orgazm = 0:
			vgape = 3
			vgapetime = totminut
			horny = 0
			manna -= 15
			willpower -= 15
			'You groaned in pain when <<$boy>> penetrated, tears flowed from your eyes, and between the legs you had a feeling as if you drove a red-hot rod into your pussy. You cry and moan while a strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 1:
			if vgape < 2:vgape = 2

			vgapetime = totminut
			horny -= 10
			manna -= 10
			willpower -= 10
			'You bit your lip in pain when <<$boy>> penetrated, you feel pain between the legs. You are frowning and moaning in pain while a strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 2:
			if vgape < 1:vgape = 1

			vgapetime = totminut
			horny -= 5
			manna -= 5
			willpower -= 5
			'You flinched at the sudden pain when <<$boy>> penetrated, feeling pain between the legs, which gradually settle down and become quite tolerable. You are trying to be excited while a strong <<dick>> centimeter dick fucks your pussy, but you could not succeed.'
		elseif orgazm = 3:
			!!horny = horny + 5
			manna += 5
			willpower += 5
			'You flinched from the feeling that your pussy is being stretched, when <<$boy>> penetrated. You have a little nice sensation between the legs while a strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 4:
			!!horny = horny + 10
			manna += 10
			willpower += 10
			'You flinched from the feeling that your pussy is beign stretched when <<$boy>> penetrated. You have a little nice sensation between the legs while a strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and pulsations is increasing in the abdomen, then the feeling a decreases a little and remained until the end. '
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 1
			'You are startled by a pleasant sensation when your pussy is stretched and start taking a dick. You have a very warm and pleasant feeling between the legs when a strong <<dick>> centimeter dick fucks your pussy. Gradually a very warm and throbbing feeling grow in the lower abdomen, then feeling descend into you and your entire body was covered into hot waves of orgasm, you involuntarily shout of pleasure writhing on edge. '
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel as a dick gets into your pussy, when <<$boy>> penetrated. You have a nice feeling between your legs, but a <<dick>> centimeters dick is too small for your pussy. Gradually a pleasant warmth and throbbing feeling grow in the lower abdomen, then feeling slightly reduced and remain until the end. '
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You bit your lip in pain and tears streamed from your eyes when <<$boy>> penetrated, breaking your hymen. You are weeping and moaning while a strong <<dick>> centimeter dick fucks your bloody pussy.'
	end

	if vagina < dick:vagina += 1

	!!sex += 1
}
$sexudo = {
	protect = 0
	vidageday -= 1
	frost = 0

	if tabletki <= 0 and prezik > 0:
		prezik -= 1
		protect = 1
		'<<$boy>> took a condom and put it on his <<dick>> centimeter cock.'
	end

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		willpower -= 10
		'You are menstruated and yet he rams his dick inside you, menstruation blood flows slowly. You have both painful and pleasant sensations. You moan while his strong <<dick>> centimeter dick fucks your pussy.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - arousal
		!!vagina - elasticy of the vagina
		!!silavag - skill man 0-sad sack, 1-middle pleasant 2-stud
		!!dick - рenis man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it hurts, 2 - not nice, 3 - so-so, 4 - needoorgazm 5 - orgasm
		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		end

		if oragazm = 5:
			preOrg += 1

			if razeba < 4:
				if silavag = 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					oragazm = 4
				end
			elseif razeba = 4:
				if silavag = 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(50, 300)

					if orgrand > preOrg:oragazm = 4
				end
			elseif razeba >= 5:
				if silavag = 2:
					orgrand = rand(0, 50)

					if orgrand > preOrg:oragazm = 4
				elseif silavag < 2:
					orgrand = rand(0, 100)

					if orgrand > preOrg:oragazm = 4
				end
			end
		end
		if orgazm = 0:
			horny = 0
			manna -= 15
			willpower -= 15

			if vgape < 3:vgape = 3

			vgapetime = totminut
			'You groaned in pain when <<$boy>> entered inside you, tears flowed from your eyes, and you have a feeling between your legs as if you drove a red-hot rod inside your pussy. You cry and moan while his strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 1:
			horny -= 10
			manna -= 10
			willpower -= 10

			if vgape < 2:vgape = 2

			vgapetime = totminut
			'You bite your lip in pain when <<$boy>> put his dick inside you, having a painful feeling between your legs. You are frowning and moaning in pain while his strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 2:
			horny -= 5
			manna -= 5
			willpower -= 5

			if vgape < 1:vgape = 1

			vgapetime = totminut
			'You winced at the sudden pain when <<$boy>> entered your pussy, feeling pain between your legs, that gradually become calm and quite tolerable. You were trying to get aroused while strong <<dick>> centimeter dick fucks your pussy, but you could not succeed.'
		elseif orgazm = 3:
			!!horny += 5
			manna += 5
			willpower += 5
			'You are startled by the feeling that your pussy is being stretched when <<$boy>> penetrated. Having a little pleasant feeling between the legs when his strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 4:
			!!horny += 10
			manna += 10
			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. Gradually a pleasant warmth and pulsations is increasing in the lower abdomen, then the feeling decreases a little and remained until the end.'
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 1
			'You flinched from a pleasant feeling when your pussy stretched and start taking a dick. Your pussy becomes very warm and pleasant when his strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and pulsations is increasing in the lower abdomen, the feeling then descend and your entire body covered with hot waves of orgasm, you scream with pleasure writhing on edge.'
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel when <<$boy>> entered you. You feel nice between your legs , but his <<dick>> inches dick is significantly less than your pussy and not enough for you. Gradually a pleasant warmth and pulsations is increasing in the lower abdomen, then the feeling decreases a little and remained until the end.'
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You bite your lip in pain and tears gushed from your eyes when <<$boy>> entered you, breaking your hymen. You moan while weeping as his strong <<dick>> centimeter dick fucks your bloody pussy.'
	end

	if vagina < dick:vagina += 1

	sex += 1
}

$sexcum = {
	frost = 0

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

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

			gs 'preg'
			manna -= 15
			willpower -= 15

			if preg = 0 or preg = 1 and pregtime < 7:'Damn, (! because after all, you can fly, you thought with horror. !)'
			if preg = 1 and pregtime >= 7:'You chuckled to yourself, well at least you cannot get pregnant.'
		elseif finrand = 1:
			!!Out

			if pose = 0:
				cumbelly += 1
				'<<$boy>> groaned and after pulling out his dick, he came on your stomach.'
			elseif pose = 1:
				cumass += 1
				'<<$boy>> groaned and after pulling out his dick, he came on your ass.'
			end

			narrand = rand(0, 100)

			if narrand = 0:gs 'preg'
		end
	elseif protect = 1:
		protect = 0
		'<<$boy>> groaned and you realized that he had came in the condom.'
		prezrand = rand(0, 100)

		if prezrand = 0:
			'Pulling out of you and looking at his dick, <<$boy>> said "Hmm, condom burst"'
			gs 'preg'
		end
	end

	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 your ass plug'
	end

	if dick >= anus:anus += 3

	'<<$boy>> began to massage your anus with his fingers.'

	!!!WD: Replaced
	!!if lubri > 0:
	!!!
	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:'He inserted three fingers into your ass and 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 + 10 < dick:'You screamed and bit your lip from a sharp pain when his <<dick>> centimeter dick entered your ass.'
	if anus + lubonus + 10 >= 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 + 2 < dick:
		if mop > 1: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:
		horny += 10

		if agape < 2 and lubonus = 0:agape = 2

		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.'

		if horny >= 100:
			if anal >= 10 and orgasm > 0:
				manna += 20

				if agape < 1 and lubonus = 0:agape = 1 & agapetime = totminut

				'You moan in pleasure while his dick moves inside your ass.'
			end
		end
	end

	lubonus = 0
	!!'Through some time <<$boy>> groaned and you feel like your ass fills a pleasant warmth.'
	anal += 1
}
$analsex2 = {
	frost = 0

	if analplugin = 1:
		!!!WD:No Anal Lube if Anal Plug
		!!analpluginbonus = 10
		lubonus = 10
		!!!
		analplugin = 0
		'<<$boy>> pulled your butt plug out of your narrow and tight ass, '
	end

	if dick >= anus:anus += 3

	'<<$boy>> began to massage your anus with his fingers.'

	!!!WD: Replaced
	!!if lubri > 0:
	!!!
	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 the guy a tube and he smeared his cock lubricated.'
	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.'

	!!!WD: Added lubonus
	if anus + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when his <<dick>> centimeter dick entered your ass.'
	if anus + lubonus + 10 >= 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 + 2 < dick:
		if mop > 1: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:
		horny += 10

		if agape < 2 and lubonus = 0:agape = 2

		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.'

		if horny >= 100:
			if anal >= 10 and orgasm > 0:
				manna += 20

				if agape < 1 and lubonus = 0:agape = 1 & agapetime = totminut

				'You moan in pleasure while his dick moves inside your ass.'
			end
		end
	end

	lubonus = 0
	!!'Through some time <<$boy>> groaned and you feel like your ass fills a pleasant warmth.'
	!!anal += 1
}

$analsexrude = {
	frost = 0

	if analplugin = 1:
		!!!WD:No Anal Lube if Anal Plug
		!!analpluginbonus = 10
		lubonus = 10
		!!!
		analplugin = 0
		'You moan in pleasure while his dick moves inside your ass.'
	end

	if dick >= anus:anus += 3

	'<<$boy>> tucked into your anus finger, then the second .'
	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 priests and you feel his hard cock ran into your hole.'

	if anus + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when his <<dick>> centimeter dick entered your ass.'
	if anus + lubonus + 10 >= 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 + 2 < dick:
		if mop > 1: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:
		horny += 10

		if agape < 2 and lubonus = 0:agape = 2

		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.'

		if horny >= 100:
			if anal >= 10 and orgasm > 0:
				manna += 20

				if agape < 1 and lubonus = 0:agape = 1

				agapetime = totminut
				'You moan in pleasure while his dick moves inside your ass.'
			end
		end
	end

	lubonus = 0
	cumanus += 1
	'Through some time <<$boy>> groaned and you feel like your ass fills a pleasant warmth.'
	anal += 1
}

--- dinSex ---------------------------------
# dinSex2
$d_vag_sex_dildo = {
	frost = 0

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		willpower -= 10
		'You are menstruated and yet you tuck a <<dick>> centimeter dildo, vaginal blood flows slowly.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - excitement
		!!vagina - the elasticity of the vagina
		!!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!!dick - penis Man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm

		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			orgazm = 0
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if horny >= 100:orgazm = 5
			if horny >= 90 and horny < 100:orgazm = 4
			if horny >= 80 and horny < 90:orgazm = 3
			if horny >= 70 and horny < 80:orgazm = 2
			if horny >= 60 and horny < 70:orgazm = 1
			if horny < 60:orgazm = 0
		elseif dick <= prinat and dick >= vagina:
			!Member fewer opportunities gg
			if horny >= 80:orgazm = 5
			if horny >= 60 and horny < 80:orgazm = 4
			if horny >= 40 and horny < 60:orgazm = 3
			if horny < 40:orgazm = 2
		elseif dick <= prinat and dick < vagina:
			if horny >= 100:orgazm = 5
			if horny >= 90 and horny < 100:orgazm = 4
			if horny < 90:orgazm = 6
		end

		if oragazm = 5:
			preOrg += 1

			if razeba < 4:
				oragazm = 4
			elseif razeba = 4:
				orgrand = rand(50, 300)

				if orgrand > preOrg:oragazm = 4
			elseif razeba >= 5:
				orgrand = rand(0, 100)

				if orgrand > preOrg:oragazm = 4
			end
		end

		if orgazm = 0:
			vgape = 3
			vgapetime = totminut
			horny = 0
			manna -= 15
			willpower -= 15
			'You groaned in pain when stuck into itself <<dick>> inch dildo, tears flowed from the eyes and between the legs feeling as if you drove a red-hot rod.'
		elseif orgazm = 1:
			if vgape < 2:vgape = 2

			vgapetime = totminut
			horny -= 10
			manna -= 10
			willpower -= 10
			'You bit her lip in pain when stuck into itself <<dick>> inch dildo, between the legs pain.'
		elseif orgazm = 2:
			if vgape < 1:vgape = 1

			vgapetime = totminut
			horny -= 5
			manna -= 5
			willpower -= 5
			'You flinched at the sudden pain when stuck into itself <<dick>> inch dildo, but the pain between her legs slowly calm down and become quite tolerable. Are you trying to be excited while moving <<dick>> inch dildo in your pussy, but you will not go out.'
		elseif orgazm = 3:
			manna += 5
			willpower += 5
			'You flinched from feeling, your pussy stretched, when a thrust <<dick>> inch dildo. Between the legs becomes a little nice, when you fuck themselves with dildos.'
		elseif orgazm = 4:
			manna += 10
			willpower += 10
			'You flinched from feeling, your pussy stretched, when a thrust <<dick>> inch dildo. Between the legs becomes a little nice, when you fuck themselves with dildos. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 1
			'You startled by the pleasant sensation, when your pussy rastyagivatsya start taking a dildo. Between the legs becomes very warm and pleasant, when strong <<dick>> inch dildo moves in your pussy. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling descend on you and your entire body covered hot waves of orgasm, you involuntarily shout of pleasure writhing on dildo.'
		elseif orgazm = 6:
			horny += (hornyboost/10) - (hornydamp/10) + 5
			manna += 5
			willpower += 5
			'You feel like dildo penetrates your pussy. Between her legs nice, but much less Dildo your pussy and <<dick>> centimeters for you little. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of.'
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You bit her lip in pain and tears streamed from his eyes when <<dick>> inch dildo went in you, break your hymen. You cried out in pain and was taken out of themselves bloody dildo.'
	end

	if vagina < dick:vagina += 1
}

$d_analsex_dildo = {
	frost = 0

	if analplugin = 1:
		!!!WD:No Anal Lube if Anal Plug
		!!analpluginbonus = 10
		lubonus = 10
		!!!
		analplugin = 0
		'You pulled out your butt plug.'
	end

	if dick >= anus:anus += 3

	'You began to massage your anus with your fingers.'

	if lubri > 0:
		lubri -= 1
		lubonus += rand(1, 5)
		'You squeezed anal lube on your hand and began to smear it in your ass.'
	end

	if anus < 10:'When you entered three fingers in your ass you groaned in pain.'
	if anus >= 10:'You started to stretch your anus with three fingers.'

	'You pulled your fingers out of your ass and he placed a dildo near your hole.'

	!!!WD: Added lubonus
	if anus + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when his <<dick>> centimeter dildo entered your ass.'
	if anus + lubonus + 10 >= dick:'You moaned when his <<dick>> centimeter dildo entered your ass.'
	!!!

	'You stopped for a moment, giving your ass time to adjust to the dildo in it, and then started to slowly move, stretching your anus.'

	if anus + lubonus + 2 < dick:
		if mop > 1:mop = 0

		horny -= 20
		manna -= 20

		if agape < 3:agape = 3

		agapetime = totminut
		'Your ass pierced a sharp pain when you started moving in her ass <<dick>> centimeter dildo.'
	elseif anus + lubonus + 2 >= dick:
		horny += 10

		if agape < 2 and lubonus = 0:agape = 2

		agapetime = totminut
		'You started to moan rhythmically in time with the <<dick>> centimeter dildo movements inside you. You feel like your anus is stretched when his dildo enters you.'

		if horny >= 100:
			if anal >= 10 and orgasm > 0:
				manna += 20

				if agape < 1 and lubonus = 0:agape = 1 & agapetime = totminut

				'You moan in pleasure while his dildo moves inside your ass.'
			end
		end
	end

	lubonus = 0
}

if $ARGS[0] = 'd_strapon_vag':
	frost = 0

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		willpower -= 10
		'You have monthly and while yet <<$boy>> drives in your pussy <<dick>> cm strap, vaginal blood flows slowly.'
	elseif vagina > 0:
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
		prinat = (horny / 10) + vagina

		if dick >= prinat * 2:
			orgazm = 0
		elseif dick > prinat:
			if horny >= 100:
				orgazm = 5
			elseif horny >= 90:
				orgazm = 4
			elseif horny >= 80:
				orgazm = 3
			elseif horny >= 70:
				orgazm = 2
			elseif horny >= 60:
				orgazm = 1
			else
				orgazm = 0
			end
		elseif dick >= vagina:
			if horny >= 80:
				orgazm = 5
			elseif horny >= 60:
				orgazm = 4
			elseif horny >= 40:
				orgazm = 3
			else
				orgazm = 2
			end
		else
			if horny >= 100:
				orgazm = 5
			elseif horny >= 90:
				orgazm = 4
			else
				orgazm = 6
			end
		end

		if orgazm = 5:
			preOrg += 1

			if razeba < 4:
				orgazm = 4
			elseif razeba = 4:
				if rand(50, 300) > preOrg:orgazm = 4
			else
				if rand(0, 100) > preOrg:orgazm = 4
			end
		end

		if orgazm = 0:
			vgape = 3
			vgapetime = totminut
			horny = 0
			manna -= 15
			willpower -= 15
			'You groaned in pain when <<$boy>> stuck in you <<dick>> cm strap, tears flowed from the eyes and between the legs feeling as if you drove a red-hot rod.'
		elseif orgazm = 1:
			if vgape < 2:vgape = 2

			vgapetime = totminut
			horny -= 10
			manna -= 10
			willpower -= 10
			'You bit your lip in pain when <<$boy>> stuck in you <<dick>> cm strap, between the legs pain.'
		elseif orgazm = 2:
			if vgape < 1:vgape = 1

			vgapetime = totminut
			horny -= 5
			manna -= 5
			willpower -= 5
			'You flinched at the sudden pain when <<$boy>> stuck in you <<dick>> cm strap, but the pain between her legs slowly calm down and become quite tolerable. Are you trying to be excited until <<$boy>> moves <<dick>> inch strap-on in your pussy, but you will not go out.'
		elseif orgazm = 3:
			manna += 5
			willpower += 5
			'You flinched from feeling, your pussy stretched, when <<$boy>> stuck in you <<dick>> cm strap. Between the legs becomes a little nice, when <<$boy>> you fucking threesome.'
		elseif orgazm = 4:
			manna = manna + 10
			willpower = willpower + 10
			'You flinched from feeling, your pussy stretched, when <<$boy>> stuck in you <<dick>> cm strap. Between the legs becomes a little nice, when <<$boy>> fuck you using the strap. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			vaginalOrgasm += 1
			'You startled by the pleasant sensation, when your pussy began to stretch taking a strapon. Between the legs becomes very warm and pleasant, when strong <<dick>> inch strap moves in your pussy. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling descend on you and your entire body covered hot waves of orgasm, you involuntarily shout of pleasure writhing on dildo. '
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel like strap penetrates your pussy. Between her legs nice, but much less than the strap and your pussy <<dick>> centimeters for you little. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You bit her lip in pain and tears streamed from his eyes when <<dick>> inch strap came in you, break your hymen. You cried out in pain and <<$boy>> You took out a bloody strap.'
	end

	if vagina < dick:vagina += 1
end

if $ARGS[0] = 'd_strapon_anal':
	frost = 0

	if analplugin = 1:
		!!!WD:No Anal Lube if Anal Plug
		!!analpluginbonus = 10
		lubonus = 10
		!!!
		analplugin = 0
		'You pulled your butt plug out of your ass.'
	end

	if dick >= anus:anus += 3

	'<<$boy>> apart your buttocks massaged anus fingers, first one, then two.'

	if lubri > 0:
		lubri -= 1
		lubonus += rand(1, 5)
		'You squeezed anal lubricant in his hand and began to spread his ass. after that <<$boy>> oiled strapon.'
	end

	if anus < 10:'When your ass you entered three fingers involuntarily groaned in pain.'
	if anus >= 10:'Then <<$boy>> introduced you to three fingers and began to stretch the anus.'

	'<<$boy>> pulled his fingers out of your priests and put the strap to your the hole.'

	!!!WD: Added lubonus
	if anus + lubonus + 10 < dick:'You screamed and bit his lip from a sharp pain when <<dick>> cm apart strap your ass you entered.'
	if anus + lubonus + 10 >= dick:'You groaned when Fullness <<dick>> cm apart strap your ass you entered.'
	!!!

	'<<$boy>> paused for a moment, giving your ass adapt to hang around in her strapon, then began to drive them insistently, stretching your anus.'

	if anus + lubonus + 2 < dick:
		if mop > 1:mop = 0

		horny -= 20
		manna -= 20

		if agape < 3:agape = 3

		agapetime = totminut
		'Your ass pierced a sharp pain when <<$boy>> began to fuck your ass with the help of <<dick>> cm strap.'
	elseif anus + lubonus + 2 >= dick:
		horny += 10

		if agape < 2 and lubonus = 0:agape = 2

		agapetime = totminut
		'You started moaning rhythmically in time with the movements <<dick>> centimeter strap inside you. You feel like your anus is stretched when the strap is moving inside the ass.'

		if horny >= 100:
			if anal >= 10 and orgasm > 0:
				manna += 20

				if agape < 1 and lubonus = 0:agape = 1 & agapetime = totminut

				'You get a little nice when the strap is moving inside your ass and you moan with pleasure.'
			end
		end
	end

	lubonus = 0
end

$doublepenetration = {
	frost = 0
	smazka = horny / 10
	prinat = smazka + vagina

	if dick > prinat:
		!!member more options gg
		if vgape < 3:vgape = 3

		vgapetime = totminut
		DPvag = 2
	elseif dick <= prinat and dick >= vagina:
		!!Member fewer opportunities gg
		if vgape = 2:vgape = 3
		if vgape < 2:vgape = 2

		vgapetime = totminut
		DPvag = 1
	elseif dick < vagina:
		if vgape = 2:vgape = 3

		if vgape = 1:vgape = 2
		if vgape < 1:vgape = 1

		vgapetime = totminut
		DPvag = 0
	end

	if lubri > 0:
		lubri -= 1
		lubonus += rand(1, 5)
	end

	if anus + lubonus + 5 < dick2:
		if agape < 3:agape = 3

		agapetime = totminut
		DPass = 2
	elseif anus+lubonus < dick2 and anus+lubonus+5 >= dick2:
		if agape = 2:agape = 3

		if agape < 2:agape = 2

		agapetime = totminut
		DPass = 1
	elseif anus +lubonus >= dick2:
		if agape = 2:agape = 3
		if agape = 1:agape = 2
		if agape < 1:agape = 1

		agapetime = totminut
		DPass = 0
	end

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		willpower -= 10
		'Do you monthly and you do not hurt until nice and <<dick>> inch dick rams your vagina bleeding. At the same time you like your chustvuete <<$anustipe>> ass fucks the second term -long <<dick2>> centimeters.'
	end

	totPAIN = DPvag + DPass + agape + vgape - 2

	if totPAIN = 0:
		'Feelings merge together when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. Abdomen burns pleasant light spreading heat throughout the body.'
		bonusManna = manna * 100 / mannamax
		DPplus = (vaginalOrgasm * 10) + horny + bonusManna
		DPminus = rand(250, 350)

		if DPplus > DPminus:
			vaginalOrgasm += 1
			DPorgasm += 1
			orgasm += 1
			manna = mannamax
			horny = 0
			'Suddenly you covered orgasm and you do not remember myself moan and scream until your muscles are reduced frantically around two members of the inside of your body.'
		end
	elseif totPAIN = 1:
		'Feelings merge together when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. hurt a little, but still very nice chustvovat all the free holes are filled by members.'
	elseif totPAIN = 2:
		horny /= 2
		manna /= 2
		'You chustvuete themselves so, as if that''s just about ready to burst from overflowing when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. Feeling very strange, in a tangle of mixed pain, pleasure and painful overcrowding.'
	elseif totPAIN = 3:
		manna /= 4
		horny /= 4

		if mop > 1:mop = 0

		'You hurt and sometimes sharp bursts of pain makes you groan when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. You chustvuete itself ready to burst, your ass and pussy feels merged into one pretty painful lump. Your eyes are not arbitrarily veiled veil of tears.'
	elseif totPAIN >= 4:
		manna = 0
		horny = 0
		willpower /= 2

		if mop > 1:mop = 0

		'You squeals and tears stream pouring out of your eyes from the terrible pain, your entire abdomen and the priest gives a sharp pain while you fuck <<$boy>> her vagina <<dick>> centimeter and a member of the <<$boy2>> almost tearing your <<$anustipe>> his anus <<dick2>> centimeter instrument.'
	end

	if vagina < dick:vagina += 1
	if anus < dick2:anus += 1

	gs 'stat'
}

--- dinSex2 ---------------------------------
# din2
$din_street_cum = {
	if cumfrot > 0 or cumface > 0:
		if hour >= 7 and hour <= 21:
			manna -= 10
			'Passers puzzled turn around staring at you. Some pictures on the phone you do not entirely hiding and giggling at you. You clearly noticeable sperm.'
		end
	end
}

$d_read_book = {
	act 'Read the book':
		cls
		gs 'stat'
		'<center><img src="images/pics/book.jpg"></center>'

		if f_book <= 0 and fantasybook <= 0 and w_book = 0 and womanbook = 0:'You scratch your head looking at already read the book "Eh, even read nothing, a walk or something on the market for a new book?"'

		if f_book > 0:
			if fantasybook <= 0:fantasybook = 5 & f_book -= 1

			'You still <<f_book>> do not read fantasy novels.'
		end

		if fantasybook > 0:
			act 'Read fantasy book. There are <<fantasybook * 100>> more pages to read (1:00)':
				cls
				fantasybook -= 1

				if fantasybook = 0:totalbook += 1

				minut += 60

				if nerdism > 0:
					lastread = totminut
					lastreadday = daystart
					nerdism += 1
					blizoruk += 1
				end

				gs 'stat'
				'<center><img src="images/pics/book.jpg"></center>'

				if nerdism > 0:
					manna += 100

					if stren > 1:stren -= 1
					if vital > 5:vital -= 1
					'Within an hour you enthusiastically read the book completely live in what is happening.'
				else
					manna += 10
					'Within an hour you read the book.'
				end

				act 'close this book':gt $loc
			end
		end

		if w_book > 0:
			if womanbook <= 0:womanbook = 5 & w_book -= 1

			'You still <<w_book>> not read the novel female.'
		end

		if womanbook > 0:
			act 'Read Women''s Novel. There are <<womanbook * 100>> more pages to read (1:00)':
				cls
				womanbook -= 1

				if womanbook = 0:totalbook += 1
				minut += 60

				if nerdism > 0:
					lastread = totminut
					lastreadday = daystart
					nerdism += 1
					blizoruk += 1
				end

				gs 'stat'
				'<center><img src="images/pics/book.jpg"></center>'

				if nerdism > 0:
					manna += 100
					horny += 10

					if stren > 1:stren -= 1
					if vital > 5:vital -= 1

					'Within an hour you enthusiastically read the book completely live in what is happening.'
				else
					manna += 10
					horny += 3
					'Within an hour you read the book.'
				end

				act 'Close this book':gt $loc
			end
		end

		act ' Close this book':gt $loc
	end
}

$d_slut_horny = {
	you_slut += 1

	!!if you_slut < 10:end

	if you_slut >= 10 and you_slut < 20:
		horny += 1
	elseif you_slut >= 20 and you_slut < 30:
		horny += 2
	elseif you_slut >= 30 and you_slut < 40:
		horny += 3
	elseif you_slut >= 40 and you_slut < 50:
		horny += 4
	elseif you_slut >= 50 and you_slut < 60:
		horny += 5
	elseif you_slut >= 60 and you_slut < 70:
		horny += 6
	elseif you_slut >= 70 and you_slut < 80:
		horny += 7
	elseif you_slut >= 80 and you_slut < 90:
		horny += 8
	elseif you_slut >= 90 and you_slut < 100:
		horny += 9
	elseif you_slut >= 100:
		horny += 10
	end
}

--- din2 ---------------------------------
# MenuLoc
if $ARGS[0] = 'ot':
	$zapis += ''
	gs 'stat'
end

if $ARGS[0] = 'ot2':
	$zapis2 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot3':
	$zapis3 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot4':
	$zapis += ''
	gs 'stat'
end

if $ARGS[0] = 'ot5':
	$zapis5 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot6':
	$zapis6 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot7':
	$zapis7 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot8':
	$zapis8 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot9':
	$zapis9 += ''
	gs 'stat'
end

if $ARGS[0] = 'ot10':
	$zapis10 += ''
	gs 'stat'
end

if $ARGS[0] = 'zapisosn':
	$zapisOsn += '<<day>> <<$month>>. <<$week>>. '
	$zapisOsn += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis':
	$zapis += input("What do you want to record?")
	gs 'stat'
end


if $ARGS[0] = 'zapis2':
	$zapis2 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis3':
	$zapis3 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis4':
	$zapis4 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis5':
	$zapis5 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis6':
	$zapis6 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis7':
	$zapis7 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis8':
	$zapis8 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis9':
	$zapis9 += input("What do you want to record?")
	gs 'stat'
end

if $ARGS[0] = 'zapis10':
	$zapis10 += input("What do you want to record?")
	gs 'stat'
end


if $ARGS[0] = 'diszapis':
	$zapis = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis2':
	$zapis2 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis3':
	$zapis3 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis4':
	$zapis4 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis5':
	$zapis5 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis6':
	$zapis6 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis7':
	$zapis7 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis8':
	$zapis8 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis9':
	$zapis9 = ''
	gs 'stat'
end

if $ARGS[0] = 'diszapis10':
	$zapis10 = ''
	gs 'stat'
end

--- MenuLoc ---------------------------------
# MenuMainLoc
if $ARGS[0] = '0':
	ETOmenu = 0
	gs 'stat'
end

if $ARGS[0] = '1':
	ETOmenu = 1
	gs 'stat'
end

--- MenuMainLoc ---------------------------------
# oral
if $ARGS[0] = 'start':
	frost = 0
	'You little fingers caress <<dick>> centimeter term then cupped his mouth and began to suck.'

	if harakBoy = 0:
		'<<$nameV>> closed his eyes in pleasure and enjoying the caress of your lips.'
	elseif harakBoy = 1:
		'<<$nameV>> staring you in the face until your lips glide over his hard dick.'
	elseif harakBoy = 2:
		if mop > 1:mop = 0

		hapri = 0
		throat += 1
		'<<$nameV>> to take you by the hair and began to fuck you in the mouth, from blows to the throat member you tears flowed from his eyes.'
	end

	horny += throat + SUB + VAF - DOM

	if horny >= 100:
		VAF += 1
		orgasm += 1
		horny = 20
		manna += 15
		willpower += 15
		lipkoef += 1

		if lipkoef > 50:
			lipkoef = 0
			lip += 1
		end

		'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
	end

	'Finally <<$nameV>> groaned and you realize that now he will start to finish.'
end

if $ARGS[0] = '0':
	horny += throat + SUB + VAF - DOM

	if horny >= 100:
		VAF += 1
		orgasm += 1
		horny = 20
		manna += 15
		willpower += 15
		lipkoef += 1

		if lipkoef > 50:
			lipkoef = 0
			lip += 1
		end

		'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
	end
end
--- oral ---------------------------------
# orgazm
if $ARGS[0] = 'start':
	protect = 0
	vidageday -= 1
	frost = 0

	if tabletki <= 0 and prezik > 0 and prosta = 0:
		prezik -= 1
		protect = 1
		'You gave the guy a condom and he dressed him in silence.'
	elseif tabletki >= 0 and prezik > 0 and prosta > 0:
		prezik -= 1
		protect = 1
	elseif tabletki <= 0 and prezik > 0:
		prezik -= 1
		protect = 1
	end

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		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.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - excitement
		!!vagina - the elasticity of the vagina
		!!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!!dick - penis Man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		end

		if orgazm = 0:
			horny = 0
			manna -= 15
			willpower -= 15
			'You groaned in pain when <<$nameV>> you entered, tears flowed from her eyes and between her legs feeling as if you drove a red-hot rod. You cry and moan until strong <<dick>> centimeter dick fuck your pussy.'
		elseif orgazm = 1:
			horny -= 10
			manna -= 10
			willpower -= 10
			'You bite my lip in pain when <<$nameV>> you entered, between the legs painful. You are frowning and moaning in pain while strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 2:
			horny -= 5
			manna -= 5
			willpower -= 5
			'You winced at the sudden pain when <<$nameV>> you entered, between the legs pain that gradually become calm and quite tolerable. Are you trying to get aroused while strong <<dick>> centimeter dick fucks your pussy, but you do not go out.'
		elseif orgazm = 3:
			!!horny += 5
			manna += 5
			willpower += 5
			'You startled by the feeling that your pussy is stretched when <<$nameV>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy.'
		elseif orgazm = 4:
			!!horny += 10
			manna += 10
			willpower += 10
			'You startled by the feeling that your pussy is stretched when <<$nameV>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then feeling a little decrease and remain until the end.'
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			'You flinched from a pleasant feeling when your pussy rastyagivatsya start taking a dick. Between the legs becomes very warm and pleasant, when strong <<dick>> centimeter dick fuck your pussy. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then the feeling came down on you and your whole body cover hot waves of orgasm, you can not help screaming pleasure writhing on edge.'
		elseif orgazm = 6:
			horny += 5
			manna += 5
			willpower += 5
			'You feel as a member enters your pussy when <<$nameV>> you entered. Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Gradually a pleasant warmth and ripple grow in the lower abdomen, and then feeling a little decrease and remain until the end.'
		end

		if vagina <= dick:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		vagina += 1
		'You bite my lip in pain and tears gushed from his eyes when <<$nameV>> you entered, breaking your hymen. You moan while weeping and strong <<dick>> centimeter dick fucks your bloody pussy.'
	end

	if protect ! 1:
		!!unprotected sex
		finrand = rand(0, 1)

		if finrand = 0:
			!!inside
			cumpussy += 1
			'<<$nameV>> groaned and you feel like jet of sperm hit you inside your body.'

			if tabletki <= 0 and mesec <= 0:
				gs 'preg'
				manna -= 15
				willpower -= 15
				'Hell, because after all, you can fly, you thought with horror.'
			end
		elseif finrand = 1:
			!!out
			if pose = 0:
				cumbelly += 1
				'<<$nameV>> groaned and removing a member of you finished your stomach.'
			elseif pose = 1:
				cumass += 1
				'<<$nameV>> groaned and removing a member of you finished on your ass.'
			end
		end
	elseif protect = 1:
		protect = 0
		'<<$nameV>> groaned and you realized that he had finished in the condom.'
	end

	pose = 0
end

--- orgazm ---------------------------------
# preg
if mesec = 0 and preg = 0 and tabletki = 0:
!!no monthly
	pregrand = rand(0, 100)

	if pregrand >= 93:
		$father = $boy
		preg = 1
	end

	if tabletki > 0:
		pregrand = rand(0, 200)

		if pregrand = 0:
			$father = $boy
			preg = 1
		end
	end
end

--- preg ---------------------------------
# starenie
if $clothingworntype ! 'vatnik' and $clothingworntype ! 'sforma' and $clothingworntype ! 'ero':
	dynamic '<<$ARGS[2]>>H[<<ARGS[3]>>] -= 1'
end

--- starenie ---------------------------------
# stat
clr
view
gs 'dinSex2'

if nippain = 2:
	if nippainday + 5 < daystart:
		$nippain = 'You have greatly hurt nipples.'
		nippain = 1
		nippainday = daystart
	elseif nippainday + 5 >= daystart:
		$nippain = 'You have greatly hurt nipples.'
	end
elseif nippain = 1:
	if nippainday + 5 < daystart:
		$nippain = ''
		nippain = 0
	elseif nippainday + 5 >= daystart:
		$nippain = 'You have a little sore nipples.'
	end
end

if painpub = 2:
	if painpubday + 5 < daystart:
		$painpub = 'You have very sore vagina.'
		painpub = 1
		painpubday = daystart
	elseif painpubday + 5 >= daystart:
		$painpub = 'You have very sore vagina.'
	end
elseif painpub = 1:
	if painpubday + 5 < daystart:
		$painpub = ''
		painpub = 0
		painpubday = daystart
	elseif painpubday + 5 >= daystart:
		$painpub = 'You have a little sore vagina.'
	end
end

if year = 2011 and katjaPreg = 0 and month >= 2:katjaPreg = 1

if analplay >= 2 and anus <= 10:anus += 1 & analplay = 0
if analplay >= 4 and anus <= 15:anus += 1 & analplay = 0
if analplay >= 8 and anus <= 20:anus += 1 & analplay = 0

musle[1] = musle
flex[1] = agil
stamina[1] = vital * 3
wipo[1] = will
intel[1] = intel
krasota[1] = vnesh
rost[1] = rost
salo[1] = salo
fat[1] = fat
Bteh[1] = bteh
Uteh[1] = uteh
Zteh[1] = zteh
!!flex[0] = agil
!!stamina[0] = vital * 3
!!krasota[0] = vnesh
!!wipo[0] = will

if nopornowrestling = 0:
	nopornowrestling = 1
	NPCnum = 30
	NPCnow = 1
	!!shag = 1
	gs 'npc'
	NoView = 1
	NPCrost = 30
	gs 'generation'
	NoView = 1
	NPCrost = 30
	gs 'generation'
	NoView = 1
	NPCrost = 30
	gs 'generation'
	NoView = 1
	NPCrost = 30
	gs 'generation'
	NoView = 1
	NPCrost = 30
	gs 'generation'

	$nikname[1] = 'schoolgirl'
	!!musle[0] = 100
	!!flex[0] = agil
	!!stamina[0] = vital * 3
	!!wipo[0] = will
	!!intel[0] = 10
	!!krasota[0] = vnesh
	!!rost[0] = 165
	!!salo[0] = 100
	!!fat[0] = 100
	!!$nikname[1] = 'steel Virgo'
	!!musle[1] = 100
	!!flex[1] = 100
	!!stamina[1] = 300
	!!wipo[1] = 50
	!!intel[1] = 10
	!!krasota[1] = 10
	!!rost[1] = 165
	!!salo[1] = 100
	!!fat[1] = 100
end

!!!CV edition
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Automatic Stuff
if AutoMakeupType < 2: AutoMakeupType = 2

if AutoHapri = 1 and greben > 0 and hapri = 0 and InSleep = 0:
	minut += 3
	hapri = 1
	'You brush your hair.'
end

if AutoMakeup = 1 and kosmetitka > 0 and mop = 1 and InSleep = 0 and (AutoMakeupSleep = 1 or (AutoMakeupSleep = 0 and HasWashed = 0)):
	mop = AutoMakeupType

	if $CurLoc = 'vanr' or $CurLoc = 'vanrPar' or bag > 0:
		if kosmetica < 3 and mop = 4: mop = 3
		if kosmetica < 2 and mop = 3: mop = 2

		if kosmetica < 1 and mop ! 1:
			mop = 1
			'You have no make-up left.'
		else
			if mop = 2:
				'You apply just enough make-up to touch up a few spots.'
				minut += 3
				kosmetica -= 1
				'You lightly summed eyes and a little lipstick.'
			end
			if mop = 3:
				'You apply an amount of make-up, that should pass as an everyday-like setup.'
				minut += 5
				kosmetica -= 2
				'You lipstick, summed up the eyes and eyelids.'
			end
			if mop = 4:
				'You apply an amount of make-up, that others usually wear, when they go out.'
				minut += 10
				vidageday -= 1
				kosmetica -= 3
				'You densely nakrasili eyes, imposed shadows and mascara , nakrasili lip contour pencil and lipstick.'
			end
		end
	else
		if kosmetitka < 3 and mop = 4: mop = 3
		if kosmetitka < 2 and mop = 3: mop = 2
		if kosmetitka < 1 and mop ! 1:
			mop = 1
			'You have no make-up left.'
		else
			if mop = 2:
				'You apply just enough make-up to touch up a few spots.'
				minut += 3
				kosmetitka -= 1
				'You lightly summed eyes and a little lipstick.'
			end
			if mop = 3:
				'You apply an amount of make-up, that should pass as an everyday-like setup.'
				minut += 5
				kosmetitka -= 2
				'You lipstick, summed up the eyes and eyelids.'
			end
			if mop = 4:
				'You apply an amount of make-up, that others usually wear, when they go out.'
				minut += 10
				vidageday -= 1
				kosmetitka -= 3
				'You densely nakrasili eyes, imposed shadows and mascara , nakrasili lip contour pencil and lipstick.'
			end
		end
	end
end

if AutoVibrator = 1 and vibrator = 1 and vibratorIN=0:
	if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
		minut += 5
		vibratorIN = 1

		if vagina < 30:vagina += 2
		'You bend over the sink and inserted the vibrator in your pussy.'
	end
end

if AutoEnema = 1 and klismaday ! day:
	if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
		minut += 5
		klismaday = day
		klismaday1 = 1
		'You give yourself an enema and clean your intestines. Your ass is now ready for anal sex.'
	end
end

if AutoButtPlug = 1 and AutoEnema = 1 and analplug = 1 and analplugIN = 0:
	if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
		minut += 5
		analplugIN = 1
		plugday = daystart

		if anus < 10:anus = anus + 5
		if anus >= 10 and anus < 20:anus += rand(1, 2)
		if anus >= 20 and anus < 30:anus += rand(0, 1)

		if butpluguse > 0:
			'You bent over and inserted the butt plug.'
		else
			butpluguse = 1
			'"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'
		end
	end
end

if lipbalm > 0 and lipbalmstat <= 0 and AutoLipBalm = 1:
	minut -= 10
	lipbalm -= 1
	lipkoef += rand(5, 15)

	if lipkoef > 50:
		lipkoef = 0
		lip += 1
	end

	lipbalmstat += 8
	'You apply a lip balm, to moisterize them.'
end

if AutoVitamins = 1 and vitamin > 0 and vitaminday ! day:
	minut += 5
	vitaminday = day
	vitamin -= 1
	frost = 0
	skinvan += 1

	if KandidozOnce = 1:Kandidoz -= 2
	if GerpesOnce = 1:Gerpes -= 2
	if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)
	if skinvan = 20:skinvan = 0 & skin += 1
end
!!!

!!!CHEATS!!!
if cheatWork = 1:work = 0
if cheatWorkKiskis = 1:young_shop_miss = 0
if cheatHapri = 1:hapri = 1
if cheatKlisma = 1:klismaday = day & klismaday1 = 1

if cheatNomakeup = 1:
	if mop = 0:mop = 1
end

if cheatNosweat = 1 and sweat ! -3:sweat = -3

if cheatNoEat = 1:
	if energy ! 19:energy = 19
	if water ! 19:water = 19
end
!!!!!!!!!!!!

if alko > 0 and frost > 0:frost = 0
if lernSkill >= 8:intel += 1 & lernSkill = 0
if lern >= 10:intel += 1 & lern = 0
if GorSlut = 1:$gnikname = 'flirt'
if GorSlut = 2:$gnikname = 'easy A'
if GorSlut = 3:$gnikname = 'cocksucker'
if GorSlut = 4:$gnikname = 'sex addict'
if GorSlut = 5:$gnikname = 'slut'
if GorSlut = 6:$gnikname = 'talking pussy'
if GorSlut >= 2:KatjaKnowBJ = 1
if GorSlut >= 1 or preg > 0:KatjaKnowSex = 1
if GorSlut > 6: GorSlut = 6
if film > 0 and kompromatLife < 10:
 !pornoaktrissa
	if kompromatLife < 10:kompromatLife = 10

	$kompromatFoto = 'This photo is a screenshot from one of the porn movies you were part of.'
end

if fotoyousuck = 1 and kompromatLife < 9:
	!!sucked in a couple of guys and was sfotografirovanna
	if kompromatLife < 9:kompromatLife = 9

	$kompromatFoto = 'These pictures show you sucking two cocks at the same time.'
end

if fotoCFNMsex > 0 and kompromatLife < 8:
	kompromatLife = 8
	$kompromatFoto = 'In this photo you see yourself getting fucked from behind by a random guy. This must have been taken in the stripclup.'
end

if fotoCFNMblowjobCum > 0 and kompromatLife < 7:
	!!cum on face in the strip club
	kompromatLife = 7
	$kompromatFoto = 'In this photo you are sitting infront of a guy, kissing his cock. There seems to be cum in your face. This photo must have been taken in the stripclub.'
end

if fotoCFNMblowjob > 0 and kompromatLife < 6:
	!!sucked in front of everyone
	kompromatLife = 6
	$kompromatFoto = 'In this photo you are giving a guy a blowjob. You can spot a group of women in the background and it seems like this photo was taken in the stripclub.'
end

if stripdancesum > 0 and kompromatLife < 2:
	!!stripper
	if kompromatLife < 2:kompromatLife = 2

	$kompromatFoto = 'In this photo you are dancing on a pole, obviously someone photographed you, while you were on stage at the stripclub.'
end

if modelfoto > 0 and kompromatLife < 1:
	!!photo model
	if kompromatLife < 1:kompromatLife = 1

	$kompromatFoto = 'These are photos of you being naked, when you were taking pictures at the model agence.'
end

shameless = guy + bj + anal + hj + ((slutty + gang) * 2)
moneySUM = money + karta + stolmoney
cumSUM = cumbelly + cumpussy + cumass + cumlip + cumface + cumfrot + cumanus
gs 'dina'
gs 'din2'

if husbizvradd > 5:izvratH = 1
if husbharmin > 10:harakHusb = 0
if clrbelo <= 0:clrbelo = 0 & tanga = 0

if husband = 0:
	husbizvradd = 0
	husbharmin = 0
	husbandMark = 0
	houseslut = 0
end

if SNarkvnesh = 0:SNarkvnesh = 1

if SNarkTimes >= SNarkvnesh * 25:
	SNarkvnesh += 1
	vidage += 1
end

if gopota >= 20 and gnewQW = 1:gnewQW = 2
if workDisk = 4 and week > 5:workDisk = 1
if workDisk = 3 and week > 5:workDiskAtkPlayer = 1

VeneraN = 0

if VeneraOnce > 0:VeneraOnce = 0
if SifacOnce = 1:VeneraN += 1
if GerpesOnce = 1:VeneraN += 1
if TriperOnce = 1:VeneraN += 1

Venera = VeneraN

if fat < 0:fat = 0
if vokal < 0:vokal = 0
if vokal > 100:vokal = 100
if dance > 100:dance = 100
if stripdance > 100:stripdance = 100
if poledance > 100:poledance = 100
!'
if libonce = 0:
	libonce = 1
	addqst 'lib/otg_lib_menu_eng.qsp'
end

if youngshoponce = 0:
	youngshoponce = 1
	addqst 'youngshop.qsp'
end

if qwestonce = 0:
	qwestonce = 1
	addqst 'qwest/qwest.qsp'
end
'!

if bfa < 0:bfa = 0
if painQW = 0:painweather = 6
if beg < 0:beg = 0
if beg > 2000:beg = 2000
if oficiant > 100:oficiant = 100
if vagina > 36:vagina = 36
if throat > 36:throat = 36
if anus > 36:anus = 36
if Jab > 120:Jab = 120
if Punch > 120:Punch = 120
if Kik > 120:Kik = 120
if KikDef > 120:KikDef = 120
if nark >= 30 and narkoman = 0:
	narkoman = 1
elseif nark = 0 and narkoman = 0:
	narkoman = 0
end

boxing = Jab + Punch + Kik + KikDef

if boxing > 100:boxing = 100
if stren > 100 and mutagenP = 0:stren = 100
if speed > 100 and mutagenS = 0:speed = 100
if agil > 100 and mutagenA = 0:agil = 100
if react > 100 and mutagenR = 0:react = 100
if vital > 100 and mutagenV = 0:vital = 100
if will > 100 and mutagenW = 0:will = 100
if intel > 100 and mutagenI = 0 and student = 0 and diplom = 0:intel = 100
if stren > 150 and mutagenP = 1:stren = 150
if speed > 150 and mutagenS = 1:speed = 150
if agil > 150 and mutagenA = 1:agil = 150
if react > 150 and mutagenR = 1:react = 150
if vital > 150 and mutagenV = 1:vital = 150
if will > 150 and mutagenW = 1:will = 150
if intel > 150 and mutagenI = 1 and student = 0 and diplom = 0:intel = 150
if stren > 200 and mutagenP = 2:stren = 200
if speed > 200 and mutagenS = 2:speed = 200
if agil > 200 and mutagenA = 2:agil = 200
if react > 200 and mutagenR = 2:react = 200
if vital > 200 and mutagenV = 2:vital = 200
if will > 200 and mutagenW = 2:will = 200
if intel > 200 and mutagenI = 2 and student = 0 and diplom = 0:intel = 200
if stren > 250 and mutagenP = 3:stren = 250
if speed > 250 and mutagenS = 3:speed = 250
if agil > 250 and mutagenA = 3:agil = 250
if react > 250 and mutagenR = 3:react = 250
if vital > 250 and mutagenV = 3:vital = 250
if will > 250 and mutagenW = 3:will = 250
if intel > 250 and mutagenI = 3 and student = 0 and diplom = 0:intel = 250
if intel > 250:intel = 250
if MagikDostup = 0:
	!!!CV edition: Moved the statement after each orgasm stage to it''s own string
	$levelUpString = '<b>Do you feel like that might be revealed within you and you gushed magic, lifting you to a new energy level.</b>'

	if orgasm >= 1 and magik < 1:magik = 1 & glaraz += 1 & rikudo += 500 & pl $levelUpString
	if orgasm >= 2 and magik < 2:magik = 2 & resnic += 1 & rikudo += 500 & pl $levelUpString
	if orgasm >= 4 and magik < 3:magik = 3 & glaraz += 1 & rikudo += 500 & pl $levelUpString
	if orgasm >= 8 and magik < 4:magik = 4 & resnic += 1 & rikudo += 500 & pl $levelUpString
	if orgasm >= 16 and magik < 5:magik = 5 & glaraz += 1 & rikudo += 500 & pl $levelUpString
	if orgasm >= 32 and magik < 6:magik = 6 & resnic += 1 & rikudo += 1000 & pl $levelUpString
	if orgasm >= 64 and magik < 7:magik = 7 & glaraz += 1 & rikudo += 1000 & pl $levelUpString
	if orgasm >= 100 and magik < 8:magik = 8 & rikudo += 1000 & pl $levelUpString
	if orgasm >= 200 and magik < 9:magik = 9 & rikudo += 1000 & pl $levelUpString
	if orgasm >= 300 and magik < 10:magik = 10 & rikudo += 2000 & pl $levelUpString
	if orgasm >= 400 and magik < 11:magik = 11 & rikudo += 4000 & pl $levelUpString
	if orgasm >= 500 and magik < 12:magik = 12 & rikudo += 4000 & pl $levelUpString
	if orgasm >= 600 and magik < 13:magik = 13 & rikudo += 4000 & pl $levelUpString
	if orgasm >= 700 and magik < 14:magik = 14 & rikudo += 4000 & pl $levelUpString
	if orgasm >= 800 and magik < 15:magik = 15 & rikudo += 8000 & pl $levelUpString
	if orgasm >= 900 and magik < 16:magik = 16 & rikudo += 8000 & pl $levelUpString
	if orgasm >= 1000 and magik < 17:magik = 17 & rikudo += 8000 & pl $levelUpString
	if orgasm >= 1100 and magik < 18:magik = 18 & rikudo += 8000 & pl $levelUpString
	if orgasm >= 1200 and magik < 19:magik = 19 & rikudo += 8000 & pl $levelUpString
	if orgasm >= 1300 and magik < 20:magik = 20 & rikudo += 16000 & pl $levelUpString
	if orgasm >= 1400 and magik < 20:magik = 21 & rikudo += 21000 & pl $levelUpString
	!!!
end

if SUB >= DOM and DOM > 0:SUB = SUB - DOM & DOM = 0
if DOM >= SUB and SUB > 0:DOM = DOM - SUB & SUB = 0
if horny < 0:horny = 0
if health > vital * 10 + stren * 5:health = vital * 10 + stren * 5
if willpower > intel * 5 + will * 5:willpower = intel * 5 + will * 5
if manna > (intel * magik) + magik * 100 + vital * 10 + rikudo:manna = intel * magik + magik * 100 + vital * 10 + rikudo

mannamax = (intel * magik) + magik * 100 + vital * 10 + rikudo
!!musle = strenbuf + vitalbuf

if vidageday <= 0:
	vidageday = 360
	vidage += 1
end

!!!!!!!!!!!
!!!TIME!!!
!!!!!!!!!!!

if nminut ! minut:
	!!totminut playing time in minutes
	totminut += minut
	nminut = minut
end

if vgape > 0:
	if vgape = 3:
		if manna > mannamax / 4:manna = mannamax / 4
	elseif vgape = 2:
		if manna > mannamax / 2:manna = mannamax / 2
	end

	if vgapetime + 2500 <= totminut:
		if vgape = 1:vgape = 0
		if vgape = 2:vgape = 1 & vgapetime = totminut
		if vgape = 3:vgape = 2 & vgapetime = totminut
	end
end
if agape > 0:
	if agape = 3:
		if manna > mannamax / 6:manna = mannamax / 6
	elseif agape = 2:
		if manna > mannamax / 3:manna = mannamax / 3
	end

	if agapetime + 5760 <= totminut:
		if agape = 1:agape = 0
		if agape = 2:agape = 1 & agapetime = totminut
		if agape = 3:agape = 2 & agapetime = totminut
		if anus > 1:anus -= 1
	end
end

if sec >= 60:
	:loopsec
	minut += 1
	sec -= 60

	if sec >= 60:jump 'loopsec'
end

if minut >= 60:
	:loopmin
	if SbrosNerdism = 1:nerdism = will / 10 + orgasm
	if nerdism < 0:nerdism = 0
	if obkvsdam > 0:obkvsdam = rand(2, 5)
	hour += 1
	energy -= 1
	water -= 1
	son -= 1
	minut -= 60

	if alko > 0 and alkoblock = 0:
		if alko >= 4:
			if beg > 0:beg -= 1
			if volleyboll > 0:volleyboll -= 1

			if alko >= 6:
				if stren > 10:stren -= 1 & salo += 3
				if vital > 10:vital -= 1 & salo += 3
				if intel > 10:intel -= 1

				alko -= alko / 2
			end
		end

		alko -= 1
	end

	!!!!!!!!!!!!!
	!!!Avtoboy!!!
	!!!!!!!!!!!!!
	if hour >= 8 and hour <= 23 and NPCnum > 10:
		:markturnirotbort
		xf = 0
		:markturnirotbortt
		xf += 1
		turnirFighter[xf] = rand(2, NPCnum)

		if xf < 2:jump 'markturnirotbortt'
		if turnirFighter[1] = turnirFighter[2]:jump 'markturnirotbort'

		a = turnirFighter[1]
		i = turnirFighter[2]
		NoView = 1
		gs 'Autofight'
	end
	!!!!!!!!!!!!!

	if shame > 0:shame -= 1 & manna -= 5
	if smoker >= 20:smokerNeed += 1
	if smokerNeed > 10 and InSleep = 0:manna -= manna * 10/100
	if smokerNeed > 300:smokerNeed = 0 & smoker = 0
	if StrongNarkota > 0:StrongNarkota -= 1
	if SLomka > 0:SLomka += 1 & manna -= 500
	if SLomka > 100 and StrongNarkota <= 0:SLomka = 0 & SNarkTimes = 0

	if narkoman = 1 and narkday ! day:
		health -= 5
		willpower -= 5
		manna -= 10
	end

	if tanga = 0 and ski =0 or glamur = 0 and tanga = 0:mosolpred += 1

	if mosolpred >= 10:
		mosol += 1
		mosolpred -= 10
	end

	if mosol >= 50:
		manna -= 5
	end

	if energy >= 25:energy -= 5 & fat += 1

	if tanga = 1 and mosol > 0:mosol -= 1
	if lipbalmstat > 0:lipbalmstat -= 1
	if sickstage = 1:sick += 1 & sicktimer += 1
	if sickstage = 1 and sicktimer >= 80:sicktimer = 0 & sickstage = 2
	if sickstage = 2 and sick > 0:sick -= 1
	if sickstage = 2 and sick <= 0:sick = 0 & sickstage = 0
	if perkice > 0:perkice -= 1
	if frost > 0:frost -= 1

	if KGOLpers > 0:
		if KGHP < KGHPMAX:KGHP += 10
		if KGManna < KGMannaMax:KGManna += 10
	end

	if minut >= 60:jump 'loopmin'
end

if hour >= 24:
	if pirs_pain_ton > 0:pirs_pain_ton -= 1
	if artempower <= 0:artempower = 3
	if brow > 0 and browper = 0:brow -= 1

	if shorthair = 1:
		shorthairday += 1

		if shorthairday >= 45:shorthairday = 0 & shorthair = 0
	end

	if KatjaOTN > 0:
		if KatjaHorny > 0 and KatjaLust < 40:KatjaHorny -= rand(1, 3)
		if KatjaLust >= 40:KatjaHorny += rand(1, 3)
		if KatjaHorny < 0:KatjaHorny = 0
		if KatjaHorny >= 100:KatjaHorny = 0 & KatjaMastr += 1 & KatjaLust += 1
	end

	if volleysostav > 0:trenerepa -= 1

	if birthday = day and birthmonth = month:
		!!birthday
		age += 1
		vidage += 1
	end

	if horny > hornyStat:
		hornyStat = horny
		if pirsA > 0:horny += 1
		if pirsB > 0:horny += 1
		if pirsC > 0:horny += 1
		if pirsD > 0:horny += 1
		if pirsE > 0:horny += 1
		if pirsF > 0:horny += 5
		if pirsG > 0:horny += 5
		if pirsN > 0:horny += 1
	end

	if horny < hornyStat:hornyStat = horny

	!!!!!!!!!!!!!!!
	!!!generation!!!
	!!!!!!!!!!!!!!!
	if NPCnum < 290:
		NPCnow = NPCnum
		NPCnum += rand(1, 3)
		gs 'npc'
	end

	if NPCnum >= 290 and NPCnum < 300:
		NPCnow = NPCnum
		NPCnum += 1
		gs 'npc'
	end

	!!!!!!!!!!!!!!!
	if kanikuli = 0:Suspeh -= 1

	dmishaevent = 0

	if BuyHous = 2 and ArendHouseSL <= 0:ArendHouseSL = 0 & BuyHous = 0 & housr = 0
	if BuyHous = 2 and ArendHouseSL > 0:ArendHouseSL -= 1
	if Gspravka <= 0 and GspravkaT > 0:GspravkaT = 0 & Gspravka = 0
	if GspravkaT > 0:Gspravka -= 1
	if IvanPodstavaQW = 2 and PodpiskaNeviezd = 30:IvanPodstavaQW = 3
	if IvanPodstavaQW = 2 and PodpiskaNeviezd > 0 and PodpiskaNeviezd < 30:PodpiskaNeviezd += 1

	if salo > fat:
		salo -= 1
		fat += 1
	elseif salo < fat:
		salo += 1
		fat -= 1
	end

	if strenbuf > stren:strenbuf -= 1
	if strenbuf < stren:strenbuf += 1
	if vitalbuf > vital:vitalbuf -= 1
	if vitalbuf < vital:vitalbuf += 1
	if agilbuf > agil:agilbuf -= 1
	if agilbuf < agil:agilbuf += 1
	if husband > 0 and husbandrink ! 11:husbandrink = rand(0, 10)

	inWorkYoungShop = 0
	husbandsexday = 0
	borsexkol = 0
	givisexday = 0

	if shantsr > 0:
		pay = shantsr * 5000
		karta += pay
		shantsr = 0
	end

	if shantbog > 0:
		:shantftb
		shantftbgrand = rand(0, 10)
		if shantftbgrand > 2:
			shantpopala += 1
			shantbog -= 1
			if shantbog > 0:jump 'shantftb'
		elseif shantftbgrand <= 2:
			karta += 30000
			shantbog -= 1
			if shantbog > 0:jump 'shantftb'
		end
	end

	petersexday = 0
	klismaday1= 0
	:loop
	day += 1
	daystart += 1
	week += 1
	hour -= 24

	!!RFP
	if SifacOnce = 1:Sifilis += 1
	if GerpesOnce = 1:Gerpes += 1
	if TriperOnce = 1:Triper += 1
	if KandidozOnce = 1:Kandidoz += 1
	if beg >= 100 and beg < 1000:beg -= 1
	if beg >= 1000 and beg < 1500:beg -= 2
	if beg >= 1500 and beg < 2000:beg -= 3
	if beg >= 2000:beg -= 4

	vidageday -= 1
	if workDolgDay > 0:workDolgDay -= 1
	if QWdogreiqTimer > 0:QWdogreiqTimer -= 1
	if husband > 0:husbanday += 1
	if kid > 0:kid += 1
	if husband > 10 and husbanday > 0:husband -= 15
	if fingal > 0:fingal -= 1

	if husbandMark = 1 and husband <= 10:
		husbizvradd = 0
		husbharmin = 0
		husbandMark = 0
		husband = 0
		divorced += 1

		if KFOnLineReaga > 0:KFOnLineReaga -= 1

		'<b><font color="red">Your husband has filed for a divorce.</font></b>'
	end

	gs 'cikl'

	if nark > 0:nark -= 1
	if pregtime > 10:fat += 1
	if hour >= 24:jump 'loop'
end

!!payments
if day = 25:
	if PersSecWork = 1 and PersSecWorkTimes > 0 and paydaybistrosec = 0:
		Pay = PersSecWorkTimes * 2500
		PersSecWorkTimes = 0
		money += Pay
		paydaybistrosec = 1
		'<b><font color="green">You have received <<pay>> rubles salary for your job as a secretary on your bank account.</font></b>'
	end

	if workKafe = 1 and paydayKafe = 0:
		paydayKafe = 1
		pay = smenaKafe * 600
		money += pay
		smenaKafe = 0
		'<b><font color="green">You have received <<pay>> rubles salary for your job as a waitress in a cafe on your bank account.</font></b>'
	end

	if workhosp = 1 and nopaypoly = 0:
		pay = smena * 1000
		money += pay
		smena = 0
		nopaypoly = 1
		'<b><font color="green">You have received <<pay>> rubles salary for your work in the clinic on your bank account.</font></b>'
	end

	if worksalon = 1 and nopaysalon = 0:
		pay = smena * 800
		money += pay
		smena = 0
		nopaysalon = 1
		'<b><font color="green">You have received <<pay>> rubles salary for your work in a beauty salon on your bank account.</font></b>'
	end

	if tanwork = 1 and nopaytanwork = 0:
		nopaytanwork = 1
		money += 25000
		'<b><font color="green">You have received a salary of 25,000 rubles for your work as a house maid on your bank account.</font></b>'
	end

	if workSec = 1 and paydaySec = 0:
		paydaySec = 1
		pay = sekDay * 800

		if officebestslut >= 3:pay += 20000
		karta += pay
		sekDay = 0
		'<b><font color="green">You have received <<pay>> rubles salary for your job as a secretary on your bank account.</font></b>'
	end

	if husband > 0 and paydayHusb = 0:
		paydayHusb = 1

		if husbFin = 0:huspay = 15000
		if husbFin = 1:huspay = 25000
		if husbFin = 2:huspay = 40000

		money += huspay
		'<b><font color="green">Your husband has sent you <<huspay>> rubles to your bank account.</font></b>'
	end

	if stipuha = 1 and stipuhaday = 0:stipuhaday = 1 & money += 1200 & '<b><font color="green">You have received 1,200 rubles scholarship.</font></b>'
	if housr = 1 and haday = 0:haday = 1 & money -= 3000 & '<b><font color="red">You paid 3,000 rubles for your apartment.</font></b>'

	if housr = 1 and electroday = 0:
		electroday = 1
		if elektro >= 800:elektro = 800 + rand(0, 100)

		money -= elektro
		'<b><font color="red">You paid <<elektro>> for electricity.</font></b>'
	end

	if housr = 1 and kabel > 0 and kabelday = 0:kabelday = 1 & money -= 300 & '<b><font color="red">You have paid 300 rubles for cable TV.</font></b>'
end

if day ! 25:
	if paydayHusb = 1:paydayHusb = 0
	if workKafe = 1 and paydayKafe = 1:paydayKafe = 0
	if workSec = 1 and paydaySec = 1:paydaySec = 0
	if housr = 1 and haday = 1:haday = 0
	if housr = 1 and electroday = 1:electroday = 0
	if housr = 1 and kabel > 0 and kabelday = 1:kabelday = 0
	if stipuhaday = 1:stipuhaday = 0
	if nopaytanwork = 1:nopaytanwork = 0
	if nopaypoly = 1:nopaypoly = 0
	if nopaysalon = 1:nopaysalon = 0
	if paydaybistrosec = 1:paydaybistrosec = 0
end

if sdaday = day and sdamonth = month and housr = 0:
	housr = 1
	'<b><font color="red">The term of your residental apartment lease expired.</font></b>'
end

if month = 1 or month = 3 or month = 5 or month = 7 or month = 8 or month = 10 or month = 12:
	!!31
	if day > 31:day -= 31 & month += 1
elseif month = 2:
	!!28
	if day > 28:day -= 28 & month += 1
elseif month = 0:
	month = 1

	if day > 31:day -= 31 & month += 1
elseif month = 13:
	month = 1

	if day > 31:day -= 31 & month += 1
else
	!!30
	if day > 30:day -= 30 & month += 1
end

!'
if day > 30:
	day -= 30
	month += 1
end
'!

if day = 0:day = 1

if week > 7:
	:loopweek
	week -= 7
	husbandrink = 0

	if military = 1:military = 0

	if week > 7:jump 'loopweek'
end

if week = 1:$week = 'Monday'
if week = 2:$week = 'Tuesday'
if week = 3:$week = 'Wednesday'
if week = 4:$week = 'Thursday'
if week = 5:$week = 'Friday'
if week = 6:$week = 'Saturday'
if week = 7:$week = 'Sunday'

if month = 0:month = 1
if month = 13:month = 1 & year += 1
If month = 1:$month = 'January' & $mons = 'January'
If month = 2:$month = 'February' & $mons = 'February'
If month = 3:$month = 'March' & $mons = 'Martha'
If month = 4:$month = 'April' & $mons = 'April'
If month = 5:$month = 'May' & $mons = 'May'
If month = 6:$month = 'June' & $mons = 'June'
If month = 7:$month = 'July' & $mons = 'July'
If month = 8:$month = 'August' & $mons = 'August'
If month = 9:$month = 'September' & $mons = 'September'
If month = 10:$month = 'October' & $mons = 'October'
If month = 11:$month = 'November' & $mons = 'November'
If month = 12:$month = 'December' & $mons = 'December'
if minut < 10:$nilmin = '0'
if minut >= 10:$nilmin = ''
if kid > 0:
	if year > yearkid[1] and markyear[1] ! year:
		if monthkid[1] = month and daykid[1] = day:
			markyear[1] = year
			kidage[1] += 1
		end
	end
end
!!moodlet
!!mannamax
!!totminut

if Mud >= totminut:
	manna = mannamax
	$mud = 'You feel buoyed.'
else
	$mud = ''
end

if nerdism > 0:
	if lastreadday = daystart:
		!!<font color="green">You are completely healthy shine and a healthy glow.</font>
		manna = mannamax
		SbrosNerdism = 0
		$mudnerd = '<font color="green">You are lost in a fantasy after reading the book.</font>'
	end

	if lastreadday + 1 = daystart:
		!!manna = mannamax
		SbrosNerdism = 0
		$mudnerd = '<font color="black">You a little bored and want to again plunge into a book.</font>'
	end
	if lastreadday + 2 = daystart:
		SbrosNerdism = 0

		if manna > mannamax / 2:manna -= 10

		$mudnerd = '<font color="red">Do you really want something to read.</font>'
	end

	if lastreadday + 3 <= daystart:
		if manna > mannamax / 10:manna -= 10

		SbrosNerdism = 1
		$mudnerd = '<font color="red"><b>You terribly want at least something to read!!!</b></font>'
	end

	!!$mudnerd += 'lastread<<lastread>> totminut<<totminut>> <<totminut - lastread>>'
else
	SbrosNerdism = 0
	$mudnerd = ''
end

!!!!!!!!!!!!!!!!!!!
!!!end OF TIME!!!
!!!!!!!!!!!!!!!!!!!
subage = 0
:metakasubage
subage += 10

if subage + 10 < age:
	jump 'metakasubage'
else
	subage = age - subage
end

if subage = 0 or subage >= 5:
	$letgoda = 'years'
elseif subage = 1:
	$letgoda = 'year'
else
	$letgoda = 'year'
end

subagevne = 0
:metakasubagevne
subagevne += 10

if subagevne + 10 < vidage:
	jump 'metakasubagevne'
else
	subagevne = vidage - subagevne
end

if subagevne ! 1:
	$letgoda2 = 'years'
else
	$letgoda2 = 'year'
end

!!!!!!!!!!!!!
!!!ENERGY!!!
!!!!!!!!!!!!!
if son < 0:
	son = 0
	manna -= 5
end

if energy < 0:
	energy = 0
	health -= 1

	if fat = 0 and stren + vital > 0:
		stren -= 1
		vital -= 1
		energy += 2
	elseif fat = 0 and stren + vital <= 0:
		over = 3
		gt 'gameover'
		exit
	elseif fat > 0:
		fat -= 1
		energy += 2
	end
end

if water < 0:
	water = 1
	health -= 5
	willpower -= 1
end

if manna <= 0:
	manna = 1
	health -= 5
	willpower -= 5
	!!fat += 1
end

if health < 0:
	over = 1
	gt 'gameover'
	exit
end

if willpower < 0 and StoryLine = 0:
	over = 2
	gt 'gameover'
	exit
end

if saloonce = 0 and opPRE = 0:
	saloonce = 1
	salo = fat
	strenbuf = stren
	vitalbuf = vital
	agilbuf = agil
end

gs 'body'
!!!!!!!!!!!!!
if health = vital * 10 + stren * 5:$health = '<font color="green">You are very healthy.</font>'
if willpower = intel * 5 + will * 5:$willpower = '<font color="green">Your mind is clear.</font>'
if manna = intel * magik + magik * 100 + vital * 10 + rikudo:$manna = '<font color="green">You are in a good mood.</font>'

if health < vital * 10 + stren * 5 and health >= (vital * 10 + stren * 5) * 75 / 100:$health = '<font color="blue">You are healthy.</font>'
if health < (vital * 10 + stren * 5) * 75 / 100 and health >= (vital * 10 + stren * 5) * 50 / 100:$health = '<font color="brown">you are not healthy.</font>'
if health < (vital * 10 + stren * 5) * 50 / 100 and health >= (vital * 10 + stren * 5) * 25 / 100:$health = '<font color="red">You are sick.</font>'
if health < (vital * 10 + stren * 5) * 25 / 100:$health = '<font color="red">You are on the verge of death.'
if willpower < intel * 5 + will * 5 and willpower >= (intel * 5 + will * 5) * 75 / 100:$willpower = '<font color="blue">You are mostly in thought.</font>'
if willpower < (intel * 5 + will * 5) * 75 / 100 and willpower >= (intel * 5 + will * 5) * 50 / 100:$willpower = '<font color="brown">You are depressed.</font>'
if willpower < (intel * 5 + will * 5) * 50 / 100 and willpower >= (intel * 5 + will * 5) * 25 / 100:$willpower = '<font color="red">You are in depression.</font>'
if willpower < (intel * 5 + will * 5) * 25 / 100:$willpower = '<font color="red">You are on the verge of madness.</font>'
if manna < intel * magik + magik * 100 + vital * 10 + rikudo and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100:$manna = '<font color="blue">You have a normal mood.</font>'
if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100:$manna = '<font color="brown">You are in a bad mood.</font>'
if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:$manna = '<font color="red">You are in a terrible mood.</font>'
if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:$manna = '<font color="red">Your mood is below any skirting and urban sanitation.</font>'
if energy >= 20:$energy = '<font color="green">You couldn''t eat one more bite.</font>'
if energy < 20 and energy >= 10:$energy = '<font color="blue">You''re not really hungry, but a small snack would be very welcome.</font>'
if energy < 10 and energy >= 2:$energy = '<font color="brown">You are hungry.</font>'
if energy < 2:$energy = '<font color="red">You are very hungry.</font>'

if water >= 20:$water = '<font color="green">You are not thirtsy at all.</font>'
if water < 20 and water >= 10:$water = '<font color="blue">You are slightly thirsty.</font>'
if water < 10 and water >= 2:$water = '<font color="brown">You are thirsty.</font>'
if water < 2:$water = '<font color="red">You are very thirsty.</font>'

if son >= 20:$son = '<font color="green">You are well rested.</font>'
if son < 20 and son >= 10:$son = '<font color="blue">You are slightly tired.</font>'
if son < 10 and son >= 2:$son = '<font color="brown">You are tired.</font>'
if son < 2:$son = '<font color="red">You are very tired.</font>'

$din_shame = {
	!!dynamic din_shame
	!!shame += 1
	!!if shame >= 5:shame = 4 & shameless += 1
	!!if shame >= 4:$shame = '<font color="red"><b>of your cheeks blaze zalivshego them blush with shame.</b></font>'
	!!if shame = 3:$shame = '<font color="red">Your cheeks are red from the blush of shame.</font>'
	!!if shame = 2:$shame = '<font color="brown">You nemnog opokrasneli shame.</font>'
	!!if shame = 1:$shame = '<font color="green">You''re a little confused.</font>'
	!!if shame <= 0:$shame = '<font color="green">You''re a little confused.</font>'
	!!gs 'stat'
}

!!if shame >= 5:shame = 4 & shameless += 1
!!if shame >= 4:$shame = '<font color="red"><b>of your cheeks blaze zalivshego them blush with shame.</b></font>'
!!if shame = 3:$shame = '<font color="red">Your cheeks are red from the blush of shame.</font>'
!!if shame = 2:$shame = '<font color="brown">You nemnog opokrasneli shame.</font>'
!!if shame = 1:$shame = '<font color="green">You''re a little confused.</font>'
!!if shame <= 0:$shame = '<font color="green">You''re a little confused.</font>'

$holyday = ''
kanikuli = 0

if (month = 10 and day >= 27) or (month = 11 and day <= 4):$holyday = '<b>Autumn holidays.</b>' & kanikuli = 1
if (month = 12 and day >= 29) or (month = 1 and day <= 13):$holyday = '<b>Winter Break.</b>' & kanikuli = 2
if (month = 3 and day >= 25):$holyday = '<b>Spring Break.</b>' & kanikuli = 3
if (month = 5 and day >= 25) or month = 6 or month = 7 or month = 8:$holyday = '<b>Summer holidays.</b>' & kanikuli = 4
if month = 1 and day = 1:$holyday = '<b>New Year!</b>' & kanikuli = 5

if hour >= 8 and hour < 16 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and schoolProgulDay ! day:
	!!absence from school
	schoolprogul += 1
	schoolProgulDay = day
end

!!!!!!!!!!!!!!!!!!!!!
!!!Beginning Description!!!
!!!!!!!!!!!!!!!!!!!!!
!!pl 'time <b><<hour>></b> hours <b><<$nilmin>><<minut>></b> minutes'
!!pl 'At_The_Moment <<day>> <<$month>> <<year>>year, <<$week>>.'

if hour < 10:
	if minut > 9 :
		pl '<b> 0<<hour>>:<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
	else
		pl '<b> 0<<hour>>:0<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
	end
else
	if minut > 9 :
		pl '<b> <<hour>>:<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
	else
		pl '<b> <<hour>>:0<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
	end
end

pl '<b><<money>></b> rubles in your wallet.'
if karta > 0:pl '<b><<karta>></b> rubles in your bank account.'
if stolmoney > 0:pl '<b><<stolmoney>></b> rubles in your table drawer.'

if StoryLine > 0 and SchoolAtestat = 0:pl '<<$holyday>>'
if birthday = day and birthmonth = month:pl '<b>Today is your birthday.</b>'
!!if shame > 0:pl '<<$shame>>'

pl '<b><<$manna>></b>'

if horny >= 90:pl '<font color="#FF1493">It takes an incredible amount of willpower not to touch yourself all the time.</font>'
if horny >= 50 and horny < 90:pl '<font color="#DB7093">You have trouble focusing at times, as your mind drifts to sex.</font>'

if ETOmenu = 1:
	pl '<b><<$health>></b>'
	pl '<b><<$willpower>></b>'
	pl '<b><<$energy>></b>'
	pl '<b><<$water>></b>'
	pl '<b><<$son>></b>'
else
	a = horny
	!!a1 = horny
	gs 'indik', '2'
	pl '<<$ind>> Arousal'
	healthmax = (vital * 10 + stren * 5)
	a = health * 100 / healthmax
	a1 = health
	gs 'indik', '1'
	pl '<<$ind>> Health'
	willpowermax = intel * 5 + will * 5
	a = willpower * 100 / willpowermax
	a1 = willpower
	gs 'indik', '1'
	pl '<<$ind>> Willpower'
	a = manna * 100 / mannamax
	a1 = manna
	gs 'indik', '1'
	pl '<<$ind>> Mood'
	a = energy * 4
	a1 = energy
	gs 'indik', '1'
	pl '<<$ind>> Hunger'

	a = water * 5
	a1 = water
	gs 'indik', '1'
	pl '<<$ind>> Thirst'
	a = son * 4
	a1 = son
	gs 'indik', '1'
	pl '<<$ind>> Sleep'
end

$smoker = {
	siga -= 1
	smoker += 1
	smokeHour = hour
	smokeDay = day
	smokeminut = minut + 5
	smokeNeed = 0
	manna += 100
	wipo += 100
	if energy < 20:energy += 3
	gs 'stat'
}

if $mud ! '':pl '<font color="green"><b><<$mud>></b></font>'
if siga <= 0 and smoker >= 20:pl '<font color="red"><b>You have run out of cigarettes.</b></font>'

if smokeNeed > 0 and siga > 0 and smoker >= 20:
	pl '<a href="exec:dynamic $smoker"><font color="red"><b>You want to smoke. You have <<siga>> cigarettes left</b></font></a>'
elseif siga > 0 and smoker >= 20:
	pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left</b></font></a>'
end

if siga > 0 and smoker < 20:
	if smokeHour = hour and smokeday = day and smokeminut >= minut:
	else
		pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left</b></font></a>'
	end
end

if smokeHour = hour and smokeday = day and smokeminut >= minut:pl '<font color="green">You are smoking a cigarette</font>'
if pirs_pain_ton > 0:
	if pirs_pain_ton = 1:pl '<font color="red">You have aches language and it is a little swollen.</font>'
	if pirs_pain_ton = 2:pl '<font color="red">You often aches language and it is noticeably swollen.</font>'
	if pirs_pain_ton > 2:pl '<font color="red"><b>Do you have a sore tongue, he was very swollen and almost tossed in the mouth.</b></font>'
end

if nippain > 0:pl '<font color="red"><b><<$nippain>></b></font>'
if painpub > 0:pl '<font color="red"><b><<$painpub>></b></font>'
if opPRE = 0:pl '<<$mop>> and your hair is <<$hapri>>.'
if sweat = 1:pl '<font color="brown">You''re sweating.</font>'
if sweat = 2:pl '<font color="red">You are a little smelly.</font>'
if sweat = 3:pl '<font color="red">You stink.</font>'
if sweat > 3:pl '<b><font color="red">You stink.</font></b>'
if isprok = 0 and mesec > 0 and preg = 0:pl '<b><font color="red">You are bleeding between your legs, urgently need a tampon.</font></b>'
if isprok = 1 and mesec > 0 and preg = 0:pl 'You are having your period.'
if preg = 1 and pregtime = 280:pl '<b><font color="red">You urgently need to go to the hospital</font></b>'
if preg = 1:rodtime = 280 - pregtime
if preg = 1 and pregtime < 280 and pregtime > 6:pl '<b><font color="blue">You have been pregnant for <<pregtime>> days. Days until delivery <<rodtime>></font></b>'
if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:pl '<b><font color="red">You have a work shift as a waitress in a cafe</font></b>'
if hour >= 8 and hour < 9 and week < 5 and workSec >= 1:pl '<b><font color="red">You have a work shift as a secretary</font></b>'
if PersSecWork = 1 and week < 6 and hour < 10 and hour >= 5:pl '<b><font color="red">You have a work shift as a secretary</font></b>'

$cumeater = {
	cumlip += 1
	vaf += 1
	cumbelly = 0
	gs 'stat'
	'You have collected sperm from fingers and licked their stomach felt tart taste of semen.'
}
$cumeater2 = {
	cumlip += 1
	vaf += 1
	cumpussy = 0
	gs 'stat'
	'You have collected sperm from fingers pussy and licked them feeling tart taste of semen.'
}
$cumeater3 = {
	cumlip += 1
	vaf += 1
	cumass = 0
	gs 'stat'
	'You have collected sperm from fingers and licked their buttocks felt tart taste of semen.'
}
$cumeater4 = {
	cumlip += 1
	vaf += 1
	cumface = 0
	gs 'stat'
	'You have collected fingers semen from her face and licked them feeling tart taste of semen.'
}
$cumeater5 = {
	cumlip += 1
	vaf += 1
	cumfrot = 0
	gs 'stat'
	'You have collected sperm from fingers and licked their clothes felt tart taste of semen.'
}

$cumeater6 = {
	cumlip += 1
	vaf += 1
	cumanus = 0
	gs 'stat'
	'You have collected fingers semen out of the anus and lick their feeling tart taste of semen.'
}

!!'<a href="exec:view''images/body/cumface.jpg''">лицо</a>'
!!'<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face</font></b></a>'
!!'<a href="exec:view''images/body/cumass.jpg''"><b><font color="red">Your ass</font></b></a>'

if cumbelly > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumbelly.jpg''">stomach</a> is smeared with sperm.</font></b>'
if cumbelly > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumbelly.jpg''"><b><font color="red">Your stomach</font></b></a> <a href="exec:dynamic $cumeater"><b><font color="red">is smeared with sperm.</font></b></a>'

if cumpussy > 0 and swallow < 10:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumpussy.jpg''">pussy</a>.</font></b>'
if cumpussy > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumpussy.jpg''"><b><font color="red"><a href="exec:dynamic $cumeater2">Sperm slowly flows</a> from your pussy</font></b></a>.'

if cumass > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumass.jpg''">ass</a> is smeared with semen.</font></b>'
if cumass > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumass.jpg''"><b><font color="red">Your ass</font></b></a> <a href="exec:dynamic $cumeater3"><b><font color="red">is smeared with semen.</font></b></a>'
if cumlip > 0:pl '<b><font color="red">Your mouth smells like sperm.</font></b>'
if cumface > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumface.jpg''">face</a> and hair are smeared with sperm.</font></b>'
if cumface > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face</font></b></a> <a href="exec:dynamic $cumeater4"><b><font color="red">and hair are smeared with sperm.</font></b></a>'
! WD: Move missing Image ~ "cumfrot.jpg" from "images\picb" to "images\Body"
if cumfrot > 0 and swallow < 10:pl '<b><font color="red">You have semen stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>'
if cumfrot > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumfrot.jpg''"><b><font color="red">You have <a href="exec:dynamic $cumeater5"><b><font color="red">semen stains</font></b></a> on your clothes</font></b></a>.'
if cumanus > 0 and swallow < 10:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'
if cumanus > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumanal.jpg''"><b><font color="red"><a href="exec:dynamic $cumeater6">Sperm slowly flows</a> from your ass</font></b></a>.'
if vgape = 3:pl '<b><font color="red">You have very sore vagina, you can hardly even walk, while trying to keep your feet apart.</font></b>'
if vgape = 2:pl '<b><font color="red">You have a sore vagina and you can hardly keep your feet together.</font></b>'
if vgape = 1:pl '<b><font color="red">You have a slightly sore vagina.</font></b>'
if agape = 3:pl '<b><font color="red">You have very sore anus and it emits blood.</font></b>'
if agape = 2:pl '<b><font color="red">You have a sore anus.</font></b>'
if agape = 1:pl '<b><font color="red">You have a slightly sore and itchy anus.</font></b>'
if Gerpes >= 3:pl '<b><font color="red">On your lips sores. All signs of genital herpes.</font></b>'
if Gerpes < 10 and Gerpes >= 5:pl '<b><font color="red">Your pussy flushed and highly itchy. This genital herpes.</font></b>'
if Gerpes >= 10:pl '<b><font color="red">On your pussy sores appeared. This genital herpes.</font></b>'
if Gerpes >= 20:pl '<b><font color="red">cover your ass sores of genital herpes.</font></b>'
if Sifilis >= 21 and Sifilis < 50:pl '<b><font color="red">You have jumped big, hard sore on the lip.</font></b>'
if Sifilis >= 50:pl '<b><font color="red">syphilitic rash covers your whole body.</font></b>'
if Triper > 2:pl '<b><font color="red">From the vaginal white discharge come out strong and stinging when urinating. Just out of the vagina hard and nasty smells.</font></b>'
if Kandidoz > 30:pl '<b><font color="red">Do you thrush.</font></b>'
if SLomka > 0:pl '<b><font color="red">You are very bad and hurt all the bones. Do you break-up</font></b>'
if narkday ! day and narkoman = 1:pl '<b><font color="red">You are very bad and hurt all the bones. Urgently need pale lady</font></b>'
if fingal > 0:pl '<b><font color="red">You have a black eye on the face.</font></b>'
if cloth_vid = 1:
	pl '<b><a href="exec:dynamic $din_exhibiTakeOffBimbo">You are dressed in the image bimbo</a></b>'
end
if exhibi >= 4 and exhibiHideNewCloth ! 1:
	pl '<b><a href="exec:dynamic $din_exhibiHideNewCloth">You have opened a new outfit ready</a></b>'
end
if tanga = 0 and ski = 1 or tanga = 0 and glamur = 1:
	pl '<b><font color="red">blush of shame fills your face, you do not put her panties and now from under your short skirt sparkles sometimes naked ass.</font></b>'
elseif tanga = 0 and ski = 0 and glamur = 0 and opPRE = 0 and $clothingworntype ! 'nude':
	pl '<b><font color="red">you do not put panties.</font></b>'
end
if mosol >= 30 and mosol < 50:pl '<b><font color="red">Pisya flushed and itchy, it seems you are rubbed by clothing.</font></b>'
if mosol >= 50:pl '<b><font color="red">Pisya hurts and each step is given through the pain, she Crimson and visible scuffs from walking without underwear.</font></b>'
if analplugIN = 1:pl '<b><font color="red">You have inserted your butt plug into your ass.</font></b>'
if vibratorin = 1:pl '<b><font color="red">You have inserted your vibrator into your vagina.</font></b>'
if young_shop_work = 1 and hour = 14 and week < 6:pl '<b><font color="red">At 15 o''clock you have to be at work in the shop Keys Pussy.</font></b>'
if young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0:young_shop_miss += 1 & pl '<b><font color="red">You squandered work.</font></b>'

if workrin = 1:
	if week = 2 or week = 4 or week = 6:
		if hour = 7:pl '<b><font color="red">At 8 o''clock you work on the market.</font></b>'
		if hour = 8:pl '<b><font color="red">You need to work on the market.</font></b>'
	end
end

if frost > 0 and frost <= 5:pl '<b><font>You have a little chilly.</font></b>'
if frost > 5 and frost < 11:pl '<b><font color="red">Are you cold.</font></b>'
if frost >= 11:pl '<b><font color="red">You are very cold.</font></b>'
if sick = 1:pl '<b><font color="red">you that is not good, tickle in the throat and a little runny nose.</font></b>'
if sick > 1 and sick < 24:pl '<b><font color="red">you chills. You flowing from the nose and throat was raw, you cough and sneeze - it looks like you got cold.</font></b>'
if sick >= 24 and sick < 48:pl '<b><font color="red">You have a fever. You clogged nose, it hurts to swallow - throat aches. You continually cough and sneeze - it looks like you prosudilis.</font></b>'
if sick >= 48 and sick < 72:pl '<b><font color="red">You have a high fever. You have a stuffy nose, sore head and throat, coughing badly you - it sounds like you got a strong cold. Maybe it''s the flu.</font></b>'
if sick >= 72:pl '<b><font color="red">you toss in the heat. You have a stuffy nose, headache and aching all the bones. Your throat is inflamed and very sore. You heavily with anguish cough - it sounds like you are seriously ill. Maybe it''s a sore throat.</font></b>'
if $mudnerd ! '':pl '<<$mudnerd>>'
if hour < meethour and svidanieA = 1:pl '<<$boyA>> will be waiting for you near your home at <<meethour>> hours'
if hour = meethour and svidanieA = 1:pl '<b><font color="red"><<$boyA>> is waiting for you around the house.</font></b>'
if meetday < daystart and svidanieA = 1:bfA -= 10 & svidanieA = 0
if StrongNarkota > 20:pl '<b><font color="red">You are stoned.</font></b>'

if alko > 0:
	if alko < 3:pl '<b><font color="red">You''re a little dizzy.</font></b>'
	if alko >= 3 and alko < 6:pl '<b><font color="red">You''re drunk.</font></b>'
	if alko >= 6:pl '<b><font color="red">You''re wasted.</font></b>'
end
if day = 29 and month = 12 and year = 2010 and StoryLine = 1:
	if hour >= 5 and hour <= 14:pl 'At 14 o''clock a New Year''s party will be held.'
end
gs 'din_bad'

if bag > 0:pl '<a href="exec:dynamic $d_bag"><b>Handbag</b></a>'

!!zero checks marriage
proverka1 = 0
proverka2 = 0
proverka3 = 0
proverka4 = 0
proverka5 = 0

!!clothing repair, for old saved.
if remdrop = 0:
	remdrop = 1

	if jeans = 1:jeans[1] = 1 & jeansH[1] = 50 & jeansB[1] = bedra
	if jeans2 = 1:jeans[2] = 1 & jeansH[2] = 50 & jeansB[2] = bedra
	if jeans3 = 1:jeans[3] = 1 & jeansH[3] = 50 & jeansB[3] = bedra
	if jeans4 = 1:jeans[4] = 1 & jeansH[4] = 50 & jeansB[4] = bedra
	if jeans5 = 1:jeans[5] = 1 & jeansH[5] = 50 & jeansB[5] = bedra
	if yoga = 1:yoga[1] = 1 & yogaH[1] = 50
	if yoga2 = 1:yoga[2] = 1 & yogaH[2] = 50
	if yoga3 = 1:yoga[3] = 1 & yogaH[3] = 50
	if yoga4 = 1:yoga[4] = 1 & yogaH[4] = 50
	if yoga5 = 1:yoga[5] = 1 & yogaH[5] = 50
	if yoga6 = 1:yoga[6] = 1 & yogaH[6] = 50
	if yoga7 = 1:yoga[7] = 1 & yogaH[7] = 50
	if yoga8 = 1:yoga[8] = 1 & yogaH[8] = 50
	if yoga9 = 1:yoga[9] = 1 & yogaH[9] = 50
	if yoga10 = 1:yoga[10] = 1 & yogaH[10] = 50
	if yoga11 = 1:yoga[11] = 1 & yogaH[11] = 50
	if yoga12 = 1:yoga[12] = 1 & yogaH[12] = 50
	if yoga13 = 1:yoga[13] = 1 & yogaH[13] = 50
	if yoga14 = 1:yoga[14] = 1 & yogaH[14] = 50
	if yoga15 = 1:yoga[15] = 1 & yogaH[15] = 50
	if yoga16 = 1:yoga[16] = 1 & yogaH[16] = 50
	if yoga17 = 1:yoga[17] = 1 & yogaH[17] = 50
	if yoga18 = 1:yoga[18] = 1 & yogaH[18] = 50
	if sarafan = 1:sarafan[1] = 1 & sarafanH[1] = 50
	if sarafan2 = 1:sarafan[2] = 1 & sarafanH[2] = 50
	if short = 1:short[1] = 1 & shortH[1] = 50 & shortB[1] = bedra
	if short2 = 1:short[2] = 1 & shortH[2] = 50 & shortB[2] = bedra
	if short3 = 1:short[3] = 1 & shortH[3] = 50 & shortB[3] = bedra
	if short4 = 1:short[4] = 1 & shortH[4] = 50 & shortB[4] = bedra
	if short5 = 1:short[5] = 1 & shortH[5] = 50 & shortB[5] = bedra
	if skirt = 1:skirt[1] = 1 & skirtH[1] = 50 & skirtB[1] = bedra
	if skirt2 = 1:skirt[2] = 1 & skirtH[2] = 50 & skirtB[2] = bedra
	if skirt3 = 1:skirt[3] = 1 & skirtH[3] = 50 & skirtB[3] = bedra
	if skirt4 = 1:skirt[4] = 1 & skirtH[4] = 50 & skirtB[4] = bedra
	if skirt5 = 1:skirt[5] = 1 & skirtH[5] = 50 & skirtB[5] = bedra
	if dress = 1:dress[1] = 1 & dressH[1] = 100 & dressB[1] = bedra
	if dress2 = 1:dress[2] = 1 & dressH[2] = 100 & dressB[2] = bedra
	if dress3 = 1:dress[3] = 1 & dressH[3] = 100 & dressB[3] = bedra
	if dress4 = 1:dress[4] = 1 & dressH[4] = 100 & dressB[4] = bedra
	if dress5 = 1:dress[5] = 1 & dressH[5] = 100 & dressB[5] = bedra
	if dress6 = 1:dress[6] = 1 & dressH[6] = 100 & dressB[6] = bedra
	if dress7 = 1:dress[7] = 1 & dressH[7] = 100 & dressB[7] = bedra
	if dress8 = 1:dress[8] = 1 & dressH[8] = 100 & dressB[8] = bedra
	if dress9 = 1:dress[9] = 1 & dressH[9] = 100 & dressB[9] = bedra
	if dress10 = 1:dress[10] = 1 & dressH[10] = 100 & dressB[10] = bedra
	if dress11 = 1:dress[11] = 1 & dressH[11] = 100 & dressB[11] = bedra
	if dress12 = 1:dress[12] = 1 & dressH[12] = 100 & dressB[12] = bedra
	if dress13 = 1:dress[13] = 1 & dressH[13] = 100 & dressB[13] = bedra
	if dress14 = 1:dress[14] = 1 & dressH[14] = 100 & dressB[14] = bedra
	if dress15 = 1:dress[15] = 1 & dressH[15] = 100 & dressB[15] = bedra
	if dress16 = 1:dress[16] = 1 & dressH[16] = 100 & dressB[16] = bedra
	if dress17 = 1:dress[17] = 1 & dressH[17] = 100 & dressB[17] = bedra
	if dress18 = 1:dress[18] = 1 & dressH[18] = 100 & dressB[18] = bedra
	if dress19 = 1:dress[19] = 1 & dressH[19] = 100 & dressB[19] = bedra
	if dress20 = 1:dress[20] = 1 & dressH[20] = 100 & dressB[20] = bedra
	if dress21 = 1:dress[21] = 1 & dressH[21] = 100 & dressB[21] = bedra
	if dress22 = 1:dress[22] = 1 & dressH[22] = 100 & dressB[22] = bedra
	if dress23 = 1:dress[23] = 1 & dressH[23] = 100 & dressB[23] = bedra
	if dress24 = 1:dress[24] = 1 & dressH[24] = 100 & dressB[24] = bedra
	if profi = 1:profi[1] = 1 & profiH[1] = 50 & profiB[1] = bedra
	if profi2 = 1:profi[2] = 1 & profiH[2] = 50 & profiB[2] = bedra
	if pants = 1:pants[1] = 1 & pantsH[1] = 50 & pantsB[1] = bedra
	if pants2 = 1:pants[2] = 1 & pantsH[2] = 50 & pantsB[2] = bedra
	if pants3 = 1:pants[3] = 1 & pantsH[3] = 50 & pantsB[3] = bedra
	if pants4 = 1:pants[4] = 1 & pantsH[4] = 50 & pantsB[4] = bedra
	if pants5 = 1:pants[5] = 1 & pantsH[5] = 50 & pantsB[5] = bedra
	if latex = 1:latex[1] = 1 & latexH[1] = 50 & latexB[1] = bedra
	if latex2 = 1:latex[2] = 1 & latexH[2] = 50 & latexB[2] = bedra
	if hooker = 1:hooker[1] = 1 & hookerH[1] = 50 & hookerB[1] = bedra
	if hooker2 = 1:hooker[2] = 1 & hookerH[2] = 50 & hookerB[2] = bedra
	if hooker3 = 1:hooker[3] = 1 & hookerH[3] = 50 & hookerB[3] = bedra
	if hooker4 = 1:hooker[4] = 1 & hookerH[4] = 50 & hookerB[4] = bedra
	if hooker5 = 1:hooker[5] = 1 & hookerH[5] = 50 & hookerB[5] = bedra
	if dressel1 = 1:odekis[1] = 1 & odekisH[1] = 50 & odekisB[1] = bedra
	if odekis1 = 1:odekis[2] = 1 & odekisH[2] = 50 & odekisB[2] = bedra
	if odekis2 = 1:odekis[3] = 1 & odekisH[3] = 50 & odekisB[3] = bedra
	if odekis3 = 1:odekis[4] = 1 & odekisH[4] = 50 & odekisB[4] = bedra
	if odekis4 = 1:odekis[5] = 1 & odekisH[5] = 50 & odekisB[5] = bedra
	if odekis5 = 1:odekis[6] = 1 & odekisH[6] = 50 & odekisB[6] = bedra
	if odekis6 = 1:odekis[7] = 1 & odekisH[7] = 50 & odekisB[7] = bedra
	if odekis7 = 1:odekis[8] = 1 & odekisH[8] = 50 & odekisB[8] = bedra
	if odekis8 = 1:odekis[9] = 1 & odekisH[9] = 50 & odekisB[9] = bedra
	if odekis9 = 1:odekis[10] = 1 & odekisH[10] = 50 & odekisB[10] = bedra
end

--- stat ---------------------------------
# din_bad
$d_salf = {
	clr
	salfetka -= 1
	pl '<a href="exec:gs ''stat''"><b>Throw out tissue</b></a>'

	if cumface > 0:pl '<a href="exec:cumface -= 1 & gs ''stat''"><b>Wipe your face</b></a>'
	if cumfrot > 0:pl '<a href="exec:cumfrot -= 1 & gs ''stat''"><b>Wipe clothing</b></a>'
	if mop ! 1:pl '<a href="exec:mop = 1 & gs ''stat''"><b>Wipe cosmetics</b></a>'
}

$d_kosmetitka = {
	clr
	pl '<a href="exec:gs ''stat''"><b>Close makeup bag</b></a>'

	if kosmetitka >= 1:pl '<a href="exec:mop = 2 & kosmetitka -= 1 & gs ''stat''"><b>Light make-up</b></a>'
	if kosmetitka >= 2:pl '<a href="exec:mop = 3 & kosmetitka -= 2 & gs ''stat''"><b>Natural make-up</b></a>'
	if kosmetitka >= 3:pl '<a href="exec:mop = 4 & kosmetitka -= 3 & gs ''stat''"><b>Heavy make-up</b></a>'
}

$d_bag = {
	clr
	pl '<a href="exec:gs ''stat''"><b>Close bag</b></a>'

	if salfetka > 0:pl 'You have <<salfetka>> wet wipes. <a href="exec:dynamic $d_salf"><b>Take tissue</b></a>'
	if kosmetitka > 0 and mop = 1:pl 'You have portable makeup bag. Cometic applications left <<kosmetitka>>. <a href="exec:dynamic $d_kosmetitka"><b>Put on makeup</b></a>'
	if kosmetitka > 0 and mop ! 1:pl 'You have portable makeup bag. Cometic applications left <<kosmetitka>>.'
	if greben > 0 and hapri = 0:pl 'You have a hairbrush. <a href="exec:hapri = 1 & gs ''stat''"><b>Brush your hair</b></a>'
	if greben > 0 and hapri = 1:pl 'You have a hairbrush.'
	if prezik > 0:pl 'You have <<prezik>> condoms.'
	if tabletki > 0:pl 'You have <<tabletki>> birth control pills.'
	if bottle > 0:pl 'You have a bottle of water. <a href="exec:bottle = 0 & water = 20 & cumlip = 0 & gs ''stat''"><b>Drink</b></a>'
	if buterbrod > 0:pl 'You have a sandwich. <a href="exec:buterbrod = 0 & energy += 20 & cumlip = 0 & salo += 1 & gs ''stat''"><b>Eat</b></a>'
	if wine = 1:pl 'You have a bottle of wine'
}

--- din_bad ---------------------------------
# statBat
clr

if tobiPic = 1:pl '<center><img src="images/picBat/tobi.jpg"></center>'
if kisamePic = 1:pl '<center><img src="images/picBat/kisame.jpg"></center>'
if sasoriPic = 1:pl '<center><img src="images/picBat/sasori.jpg"></center>'
if konanPic = 1:pl '<center><img src="images/picBat/konan.jpg"></center>'
if kakuzuPic = 1:pl '<center><img src="images/picBat/kakuzu.jpg"></center>'
if hidanPic = 1:pl '<center><img src="images/picBat/hidan.jpg"></center>'
if itachiPic = 1:pl '<center><img src="images/picBat/itachi.jpg"></center>'
if deidaraPic = 1:pl '<center><img src="images/picBat/deidara.jpg"></center>'
if zetsuPic = 1:pl '<center><img src="images/picBat/zetsu.jpg"></center>'
if orotimaruPic = 1:pl '<center><img src="images/picBat/orotimaru.jpg"></center>'
if painPic = 1:pl '<center><img src="images/picBat/pain.jpg"></center>'
if pain2Pic = 1:pl '<center><img src="images/picBat/pain2.jpg"></center>'
if pain3Pic = 1:pl '<center><img src="images/picBat/pain3.jpg"></center>'
if pain4Pic = 1:pl '<center><img src="images/picBat/pain4.jpg"></center>'
if pain5Pic = 1:pl '<center><img src="images/picBat/pain5.jpg"></center>'
if pain6Pic = 1:pl '<center><img src="images/picBat/pain6.jpg"></center>'

--- statBat ---------------------------------
# statPRE
gs 'stat'

$vneshPRE = 'You are a strong man with broad shoulders and big muscles slightly swollen with fat.'

--- statPRE ---------------------------------
# time
If month = 1 and pogodaday ! day:
	pogodaday = day
	temper = rand(-30, 8)

	if temper <= 0:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear.'
		else
			$osadki = 'Goes fluffy snow.'
		end
	else
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear the snow begins to melt some places forming slush.'
		else
			$osadki = 'Wet snow falls, which immediately melts forming slush.'
		end
	end

	$pogoda = 'On the street there is snow, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 2 and pogodaday ! day:
	pogodaday = day
	temper = rand(-35, 8)

	if temper <= 0:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Cloudy and windy.'
		else
			$osadki = 'It''s snowing.'
		end
	else
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear the snow begins to melt some places forming slush.'
		else
			$osadki = 'Wet snow falls, which immediately melts forming slush.'
		end
	end

	$pogoda = 'On the street there is snow, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 3 and pogodaday ! day:
	pogodaday = day
	temper = rand(-20, 17)

	if temper <= 0:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear and cloudless.'
		else
			$osadki = 'It''s snowing.'
		end
	else
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear the snow begins to melt some places forming slush.'
		else
			$osadki = 'Wet snow falls, which immediately melts forming slush.'
		end
	end

	$pogoda = 'On the street there is snow, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 4 and pogodaday ! day:
	pogodaday = day
	temper = rand(2, 20)
	osadki = rand(0, 10)

	if osadki < painweather:
		if hour >= 7 and hour <= 20:
			$osadki = 'Clear.'
		else
			$osadki = 'Clear.'
		end
	else
		$osadki = 'Rain.'
	end

	$pogoda = 'On the street the snow melts, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 5 and pogodaday ! day:
	pogodaday = day
	temper = rand(7, 25)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Rain.'
	end

	$pogoda = 'From puddles in the street rastaevshego snow, dirt and debris all around seem after winter, something where new grass pleases the eye with its greenery, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 6 and pogodaday ! day:
	pogodaday = day
	temper = rand(15, 35)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Rain.'
	end

	$pogoda = 'On the street the green grass, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 7 and pogodaday ! day:
	pogodaday = day
	temper = rand(20, 40)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Warm rain comes.'
	end

	$pogoda = 'Green grass on the street, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 8 and pogodaday ! day:
	pogodaday = day
	temper = rand(20, 35)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Warm rain comes.'
	end

	$pogoda = 'Outdoors green grass, where some are already visible yellowing leaves, temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 9 and pogodaday ! day:
	pogodaday = day
	temper = rand(10, 30)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Rain.'
	end

	$pogoda = 'Street zhuhnet grass, visible yellow leaves, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 10 and pogodaday ! day:
	pogodaday = day
	temper = rand(2, 20)
	osadki = rand(0, 10)

	if osadki < painweather:
		$osadki = 'Clear.'
	else
		$osadki = 'Goes cold rain.'
	end

	$pogoda = 'On the street faded grass, falling yellow leaves, mud and puddles around, temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 11 and pogodaday ! day:
	pogodaday = day
	temper = rand(-20, 17)

	if temper <= 0:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear and cloudless.'
		else
			$osadki = 'It''s snowing.'
		end
	else
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear the snow begins to melt some places forming slush.'
		else
			$osadki = 'Cold rain.'
		end
	end

	$pogoda = 'The street is dirty and thin snow cover, temperature <<temper>> degrees Celsius. <<$osadki>>'
end

If month = 12 and pogodaday ! day:
	pogodaday = day
	temper = rand(-30, 8)
	if temper <= 0:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Cloudy and windy.'
		else
			$osadki = 'Goes fluffy snow.'
		end
	else:
		osadki = rand(0, 10)

		if osadki < painweather:
			$osadki = 'Clear the snow begins to melt some places forming slush.'
		else
			$osadki = 'Wet snow falls, which immediately melts forming slush.'
		end
	end

	$pogoda = 'On the street there is snow, the temperature <<temper>> degrees Celsius. <<$osadki>>'
end

pl '<<$pogoda>>'

if osadki >= painweather and umbrella = 0:
	if mop > 1:
		mop = 0
		'You do not have an umbrella.'
	end

	if hapri = 1:
		hapri = 0

		if curly > 0:curly -= 1

		'You do not have an umbrella.'
	end
end

if isprok = 0 and mesec > 0 and preg = 0:
	'<b><font color="red">You have the blood flowing in the legs and staining the linen clothes.</font></b>'

	if clrbelo > 0:clrbelo -= 1

	sweat += 1
	manna -= 10
	willpower -= 10
	gs 'starenie'
end

!!!0.2.6 extension: Optimized a bit of code
if vibratorin = 1:horny += rand(1, 5)
!!!

if hour = 0:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(0, 0, 0)
elseif hour = 1:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(5, 5, 5)
elseif hour = 2:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(10, 10, 10)
elseif hour = 3:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(30, 15, 15)
elseif hour = 4:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(60, 20, 20)
elseif hour = 5:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(100, 40, 40)
elseif hour = 6:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(200, 100, 100)
elseif hour = 7:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 150, 150)
elseif hour = 8:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 200, 200)
elseif hour = 9:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 245, 245)
elseif hour = 10:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 250, 250)
elseif hour = 11:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
elseif hour = 12:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
elseif hour = 13:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
elseif hour = 14:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 250, 250)
elseif hour = 15:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 245, 245)
elseif hour = 16:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 240, 240)
elseif hour = 17:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 230, 230)
elseif hour = 18:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 220, 220)
elseif hour = 19:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 210, 210)
elseif hour = 20:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 200, 200)
elseif hour = 21:
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(250, 150, 150)
elseif hour = 22:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(25, 25, 25)
elseif hour = 23:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(5, 5, 5)
end

if temper <= 0:
	if palto = 1:bonusZ = -3
	if palto = 2:bonusZ = 0
	if palto = 3:bonusZ = 3

	if temper < -10 and palto = 1:
		frost += 1
		if energy < 5:frost += 1
		if tanga = 0:frost += 1
		if sweat > 0:frost += 1
	elseif temper < -20 and palto = 2:
		frost += 1
		if energy < 5:frost += 1
		if sweat > 0:frost += 1
	elseif temper< -30 and palto = 3:
		frost += 1
	end

	if palto <= 0:
		if temper < -10:frost += 1
		if temper < -20:frost += 2
		if temper < -30:frost += 5
	end

	if frost >= 12:sick += 1
	if sick > 0 and sickstage = 0:sickstage = 1
end

--- time ---------------------------------
# kid
if $ARGS[0] = 'start':
	clr
	gs 'stat'

	if kid > 0:
		kidIteration = 1
		kidSelected = 0
		!kidLoops = 0
		:loop
		if polkid[kidIteration] = 0:
			$kidPosPro[kidIteration] = 'her'
		else
			$kidPosPro[kidIteration] = 'his'
		end

		"Your child, a <<$polreb[kidIteration]>> named <<$kidname[kidIteration]>>. The child''s date of birth is <<daykid[kidIteration]>>-<<monthkid[kidSelected]>>-<<yearkid[kidSelected]>>. The child''s age is <<kidage[kidIteration]>>"
		if kidage[kidIteration] < 1: '<<$kidname[kidIteration]>> is a baby lying in <<$kidPosPro[kidIteration]>> crib.'
		if kidage[kidIteration] >= 1 and kidage[kidIteration] < 7:

		if hour >= 9 and hour <= 21:
			'<<$kidname[kidIteration]>> is playing with toys.'
			else
				'<<$kidname[kidIteration]>> is alseep in <<$kidPosPro[kidIteration]>> crib.'
			end
		end

		if kidage[kidIteration] >= 7 and kidage[kidIteration] < 18:
			if hour >= 21 or hour <= 8:
				'<<$kidname[kidIteration]>> is alseep in <<$kidPosPro[kidIteration]>> bed.'
			else
				'<<$kidname[kidIteration]>> watching TV.'
			end
		end

		''
		kidIteration += 1
		!!kidLoops += 1

		if kidIteration <= numkid:
			jump 'loop'
		end
	end

	act 'Leave.':
		cla
		gt 'sitr'
	end
end

--- kid ---------------------------------


# subkid
if kid > 0:
	kidIteration = 1
	kidSelected = 0
	kidLoops = 0
	:loop
	kidSelected[kidLoops] = kidIteration
	pl '<a href="exec:kidSelected = kidSelected[kidLoops]& gt ''kid'',''start'' ">In the crib lies <<$kidname[kidIteration]>>.</a>'
	kidIteration += 1
	kidLoops += 1

	if kidIteration <= numkid:jump 'loop'
end

--- subkid ---------------------------------
# alterStart
StoryLine = 1
MagikDostup = 1
umbrella = 1
birthday = 5
birthmonth = 3
$name = 'Svetlana'
$surname = 'Lebedev'
!!!0.2.6 addition
$nickname = 'Svetski'
!!!
age = 15
vidage = 14
!!age = 17
!!vidage = 16
year = 2009
!!month = 8
week = 6
hour = 10
!!day = 30
month = 3
day = 9
!!!!!!!!!!!!!!!
!!month = 3
!!day = 9
!!week = 6
!!hour = 10
!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!
month = 8
day = 29
week = 5
hour = 9
birthyear = year - age
!!body
rost = 170
fat = 60
salo = 60
dick = 0
energy = 15
water = 15
son = 16
!!stats
stren = 10
strenbuf = 10
speed = 10
agil = 10
agilbuf = 10
vital = 10
vitalbuf = 10
intel = 10
will = 10
react = 10
magik = 0
health = vital * 10 + stren * 5
willpower = intel * 5 + will * 5
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
nastjaQW = 0
money = 50
vidageday = 300
housrA = 0
sarafan[1] = 1
sarafanH[1] = 30
lobok = 3
leghair -= 5
mop = 1
housr = 0
tanga = 1
jeans[1] = 1
jeansH[1] = 100
jeansB[1] = 70
gs 'clothing', 'wear', 'jeans', 1
cltarelka = 0
fairy = 0
eda = 0
clrbelo = 10
poroshok = 0
shampoo = 0
tampon = 20
opPRE = 0
daystart = 0
yoga[15] = 1
yogaH[15] = 100
dress[5] = 1
dressH[5] = 100
dressB[5] = 70
palto = 1
$palto = 'Chinese wear'
glacol = 1
glaraz = 2
hcol = 1
lip = 2
father = 50
mother = 50
sister = 50
brother = 50
Suspeh = 75
$npcName[1] = 'Dimka'
$npcSurName[1] = 'Nosov'
$npcText[1] = 'Dimka is a cute guy and all the girls adore him.'
grupNPC[1] = 50
npcPol[1] = 0
grupTipe[1] = 3
$npcGo[1] = '<a href="exec:numnpc = 1 & gt ''Snpc''"><<$npcName[1]>> <<$npcSurName[1]>></a>'
$npcName[2] = 'Artem'
$npcSurName[2] = 'Chebotarev'
$npcText[2] = 'Artem is a typical nerd, but not a bad looking one.'
grupNPC[2] = 50
npcPol[2] = 0
grupTipe[2] = 1
$npcGo[2] = '<a href="exec:numnpc = 2 & gt ''Snpc''"><<$npcName[2]>> <<$npcSurName[2]>></a>'
$npcName[3] = 'Ivan'
$npcSurName[3] = 'Prokhorov'
$npcText[3] = 'Ivan is an excellent athlete, who is able to succeed in any sport.'
grupNPC[3] = 50
npcPol[3] = 0
grupTipe[3] = 2
$npcGo[3] = '<a href="exec:numnpc = 3 & gt ''Snpc''"><<$npcName[3]>> <<$npcSurName[3]>></a>'
$npcName[4] = 'Igor'
$npcSurName[4] = 'Kruglov'
$npcText[4] = 'Igor Kruglov is a friend of Dimka and they are always together.'
grupNPC[4] = 50
npcPol[4] = 0
grupTipe[4] = 3
$npcGo[4] = '<a href="exec:numnpc = 4 & gt ''Snpc''"><<$npcName[4]>> <<$npcSurName[4]>></a>'
$npcName[5] = 'Fedor'
$npcSurName[5] = 'Kozlov'
$npcText[5] = 'Fedor is not a bad athlete and he''s best friends with Ivan.'
grupNPC[5] = 50
npcPol[5] = 0
grupTipe[5] = 2
$npcGo[5] = '<a href="exec:numnpc = 5 & gt ''Snpc''"><<$npcName[5]>> <<$npcSurName[5]>></a>'
$npcName[6] = 'Petka'
$npcSurName[6] = 'Klyuyev'
$npcText[6] = 'Petka is a nerd and can''t see beyond his textbook.'
grupNPC[6] = 50
npcPol[6] = 0
grupTipe[6] = 1
$npcGo[6] = '<a href="exec:numnpc = 6 & gt ''Snpc''"><<$npcName[6]>> <<$npcSurName[6]>></a>'
$npcName[7] = 'Lesco'
$npcSurName[7] = 'Tsarev'
$npcText[7] = 'Everyone at school always bullies Lesco about anything and everything.'
grupNPC[7] = 50
npcPol[7] = 0
grupTipe[7] = -1
$npcGo[7] = '<a href="exec:numnpc = 7 & gt ''Snpc''"><<$npcName[7]>> <<$npcSurName[7]>></a>'
$npcName[8] = 'Svyatoslav'
$npcSurName[8] = 'Warriors'
$npcText[8] = 'Svyatoslav is a athletic guy, who is persistently engaged in sports.'
grupNPC[8] = 50
npcPol[8] = 0
grupTipe[8] = 2
$npcGo[8] = '<a href="exec:numnpc = 8 & gt ''Snpc''"><<$npcName[8]>> <<$npcSurName[8]>></a>'
$npcName[9] = 'Vitek'
$npcSurName[9] = 'Cats'
$npcText[9] = 'Vitek is aggressive and a strong guy, who considers himself a gangsta. But his personality is pretty much see-through. Lena is his twin-sister.'
grupNPC[9] = 50
npcPol[9] = 0
grupTipe[9] = 4
$npcGo[9] = '<a href="exec:numnpc = 9 & gt ''Snpc''"><<$npcName[9]>> <<$npcSurName[9]>></a>'
$npcName[10] = 'Dan'
$npcSurName[10] = 'Ryzhov'
$npcText[10] = 'Dan is a tall and skinny guy who communicates to others with contempt and is always ready to expand on the concept. Also, according to him, Dan knows the boys to clear the area, which if anything, harness oneself for it.'
grupNPC[10] = 50
npcPol[10] = 0
grupTipe[10] = 4
$npcGo[10] = '<a href="exec:numnpc = 10 & gt ''Snpc''"><<$npcName[10]>> <<$npcSurName[10]>></a>'
$npcName[11] = 'Bob'
$npcSurName[11] = 'Shulgin'
$npcText[11] = 'Bob is always with Dan and Vic, mostly watching their six, but Vitek makes continously fun of him.'
grupNPC[11] = 50
npcPol[11] = 0
grupTipe[11] = 4
$npcGo[11] = '<a href="exec:numnpc = 11 & gt ''Snpc''"><<$npcName[11]>> <<$npcSurName[11]>></a>'
$npcName[12] = 'Julia'
$npcSurName[12] = 'Milov'
$npcText[12] = 'Julia is a diligent and silent girl. She''s a really nerdy and almost no one talks to her.'
grupNPC[12] = 50
npcPol[12] = 1
grupTipe[12] = 1
$npcGo[12] = '<a href="exec:numnpc = 12 & gt ''Snpc''"><<$npcName[12]>> <<$npcSurName[12]>></a>'
$npcName[13] = 'Lariska'
$npcSurName[13] = 'Gruzdeva'
$npcText[13] = 'Lariska is a very sportive girl, but is very dependent on other people''s opinions.'
grupNPC[13] = 50
npcPol[13] = 1
grupTipe[13] = 2
$npcGo[13] = '<a href="exec:numnpc = 13 & gt ''Snpc''"><<$npcName[13]>> <<$npcSurName[13]>></a>'
$npcName[14] = 'Katja'
$npcSurName[14] = 'Meynold'
$npcText[14] = 'Katja is a hot, but impulsive girl. Vick is her twin-sister.'
grupNPC[14] = 50
npcPol[14] = 1
grupTipe[14] = 3
$npcGo[14] = '<a href="exec:numnpc = 14 & gt ''Snpc''"><<$npcName[14]>> <<$npcSurName[14]>></a>'
$npcName[15] = 'Vicky'
$npcSurName[15] = 'Meynold'
$npcText[15] = 'Vicky is a very sensible girl. Katja is her twin sister.'
grupNPC[15] = 50
npcPol[15] = 1
grupTipe[15] = 3
$npcGo[15] = '<a href="exec:numnpc = 15 & gt ''Snpc''"><<$npcName[15]>> <<$npcSurName[15]>></a>'
$npcName[16] = 'Natasha'
$npcSurName[16] = 'Belova'
$npcText[16] = 'Natasha is an excellent student, but she barely speaks to anyone.'
grupNPC[16] = 50
npcPol[16] = 1
grupTipe[16] = 1
$npcGo[16] = '<a href="exec:numnpc = 16 & gt ''Snpc''"><<$npcName[16]>> <<$npcSurName[16]>></a>'
$npcName[17] = 'Inna'
$npcSurName[17] = 'Devyatova'
$npcText[17] = 'Inna is a tall and pretty girl, her sweet smile hides her arrogance.'
grupNPC[17] = 50
npcPol[17] = 1
grupTipe[17] = 3
$npcGo[17] = '<a href="exec:numnpc = 17 & gt ''Snpc''"><<$npcName[17]>> <<$npcSurName[17]>></a>'
$npcName[18] = 'Christina'
$npcSurName[18] = 'Zvereva'
$npcText[18] = 'Christina tall and strong girl. She''s a great athlete and has leadership abilities who, together with her tenacity and intelligence make it a very serious figure.'
grupNPC[18] = 50
npcPol[18] = 1
grupTipe[18] = 2
$npcGo[18] = '<a href="exec:numnpc = 18 & gt ''Snpc''"><<$npcName[18]>> <<$npcSurName[18]>></a>'
$npcName[19] = 'Lina'
$npcSurName[19] = 'Starov'
$npcText[19] = 'Lina is an athlete who does anything Christina wants.'
grupNPC[19] = 50
npcPol[19] = 1
grupTipe[19] = 2
$npcGo[19] = '<a href="exec:numnpc = 19 & gt ''Snpc''"><<$npcName[19]>> <<$npcSurName[19]>></a>'
$npcName[20] = 'Lena'
$npcSurName[20] = 'Kotova'
$npcText[20] = 'She''s the twin-sister to Vitek. She is aggressive too and best of friends with Lera. Both tend to smoke in the bathrooms on a regular basis.'
grupNPC[20] = 50
npcPol[20] = 1
grupTipe[20] = 4
$npcGo[20] = '<a href="exec:numnpc = 20 & gt ''Snpc''"><<$npcName[20]>> <<$npcSurName[20]>></a>'
$npcName[21] = 'Lera'
$npcSurName[21] = 'Tsarev'
$npcText[21] = 'Lera comes from a poor family, she quickly made friends with Lena and both are regulary smoking on the toilets.'
grupNPC[21] = 50
npcPol[21] = 1
grupTipe[21] = 4
$npcGo[21] = '<a href="exec:numnpc = 21 & gt ''Snpc''"><<$npcName[21]>> <<$npcSurName[21]>></a>'
$npcName[22] = 'Bella'
$npcSurName[22] = 'Artamonov'
$npcText[22] = 'Bella is a beautiful and arrogant girl.'
grupNPC[22] = 50
npcPol[22] = 1
grupTipe[22] = 2
$npcGo[22] = '<a href="exec:numnpc = 22 & gt ''Snpc''"><<$npcName[22]>> <<$npcSurName[22]>></a>'
$npcName[23] = 'Albina'
$npcSurName[23] = 'Barlovskaya'
$npcText[23] = 'Albina from a wealthy family and always knew how to look good and dress well.'
grupNPC[23] = 50
npcPol[23] = 1
grupTipe[23] = 3
$npcGo[23] = '<a href="exec:numnpc = 23 & gt ''Snpc''"><<$npcName[23]>> <<$npcSurName[23]>></a>'
$npcName[24] = 'Pauline'
$npcSurName[24] = 'Sebagotulina'
$npcText[24] = 'Pauline like pain in the ass who does not let her sit still, she and dvoechnitsa hooligan.'
grupNPC[24] = 50
npcPol[24] = 1
grupTipe[24] = 4
$npcGo[24] = '<a href="exec:numnpc = 24 & gt ''Snpc''"><<$npcName[24]>> <<$npcSurName[24]>></a>'
$npcName[25] = 'Sonia'
$npcSurName[25] = 'Ivanko'
!!$npcText[25] = 'Sonia once inadvertently drunk and fucked her in a circle Witek Kotov and his friends. After that, the girls shunned Sonya, and the boys thought she was a whore. Local gopota regularly drove to Sonia proposals have sex.'
$npcText[25] = 'Sonia an ordinary girl.'
grupNPC[25] = 50
npcPol[25] = 1
grupTipe[25] = 0
$npcGo[25] = '<a href="exec:numnpc = 25 & gt ''Snpc''"><<$npcName[25]>> <<$npcSurName[25]>></a>'

$din_alter_start_ev = {
	cls
	'When you were 13 years old, your period started like most other girls in your class. Your breasts started to grow and your armpit and pubic hair began to sprout. Your skin became covered with acne. When you finished 9th class, you did not drop out of school, and continued to study in the 10th grade.''You''re about to start 10th grade (placeholder until someone comes up with a less terrible intro than was here before)'

	'The summer holiday ends soon and you will go to your new class to start your first of the two years you''re going to study.'
	!!'You weaned these two classes and you only have a few months before graduation.'

	act 'Start the game':
		showstat 1
		showobjs 1
		health = vital * 10 + stren * 5 + 1000
		willpower = intel * 5 + will * 5 + 1000
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		addobj 'Character'
		addobj 'See'
		addobj 'Others'
		addobj 'Menu'
		gt 'bedrPar'
	end
}

clr
gs 'stat'
'You were born in <<birthyear>>.'
'Your mother and father, Natasha Mikhail <<$surname>>, were quite young and probably didn''t know how to protect themselves.'
'You have a sister, Anja, who is 2 years older than you.'
'You do not remember your real father because your parents divorced when you were still too young to remember. Your mom found another man and they had your little brother Nick.'
$name = input("What is your first name?")

if $name = '':$name = 'Svetlana'

$surname = input("What is your last name?")

if $surname = '':$surname = 'Lebedev'

!!!0.2.6 addition
$nickname = input("What is your nick name?")

if $nickname = '':$nickname = 'Svetski'
!!!

act 'Further':
	cls

	'In the kindergarten where you went everything was fine, but you don''t remember it. When you were 7 years old, you finished kindergarten and went to school.'

	act 'You are completely obsessed with books.':
		cls
		clr
		stren = 1
		vital = 5
		agil = 1
		fat = 10
		salo = 10
		dressB[5] = bedra
		jeansB[1] = bedra
		tan = 0
		blizoruk = 300
		glass = 1
		Suspeh = 55
		!!!!!!!!!!!!!! Maruda Hair Mod
		hairlength = 90
		hcol = 0
		hpingrip = 10
		hpingripw = 1
		!!!!!!!!!!!!!! Maruda Hair Mod
		nerdism = 100
		fantasybook = 5
		gs 'stat'
		'You spent virtually all your free time at home reading books. While you''ve definitely learned a decent bit from them, you''ve always been rather frail as a result, and too many nights of trying to read in poor light have taken a toll on your eyesight.'

		act 'Further':dynamic $din_alter_start_ev
	end

	act 'You are a good student':
		cls
		clr
		fat = 150
		salo = 150
		intel = 50
		Suspeh = 110
		!!!!!!!!!!!!!! Maruda Hair Mod
		hairlength = 162
		hcol = 0
		hpingrip = 10
		hpingripw = 1
		!!!!!!!!!!!!!! Maruda Hair Mod
		dressB[5] = bedra
		jeansB[1] = bedra
		mother = 100
		money += 2000
		tan = 30
		gs 'stat'
		'In school, you put a lot of effort to be an excellent pupil. You didn''t make any friends because you weren''t engaged in sports, but you have excellent grades and your mom is very proud of you.'

		act 'Further':dynamic $din_alter_start_ev
	end

	act 'You are actively engaged in volleyball':
		cls
		clr
		stren = 25
		vital = 25
		speed = 25
		agil = 25
		fat = 20
		salo = 20
		volleyboll = 70
		beg = 40
		gsAboVolley = 120
		dom = 10
		!!!!!!!!!!!!!! Maruda Hair Mod
		hairlength = 97
		hcol = 3
		hscrunch = 10
		hscrunchw = 0
		!!!!!!!!!!!!!! Maruda Hair Mod
		dressB[5] = bedra
		jeansB[1] = bedra
		tan = 30
		gs 'stat'
		'You spent all your free time training your volleyball skills. Because of that you weren''t that good in school and had less friends.'

		act 'Further':dynamic $din_alter_start_ev
	end

	act 'You spent time outdoors':
		cls
		clr
		stren = 10
		vital = 10
		agil = 20
		fat = 30
		salo = 30
		dom = 50
		!!!!!!!!!!!!!! Maruda Hair Mod
		hairlength = 19
		hcol = 2
		!!!!!!!!!!!!!! Maruda Hair Mod
		dressB[5] = bedra
		jeansB[1] = bedra
		tan = 30
		gs 'stat'
		'You spent almost all your free time outdoors playing with other girls and boys. As a result, you know how to get yourself out of trouble. You aren''t interested in School and sports.'

		act 'Further':dynamic $din_alter_start_ev
	end

end

--- alterStart ---------------------------------
# event
if $ARGS[0] = 'klof 2':
	cla
	*clr
	minut += 5
	cla
	*clr
	gs 'stat'
	'<center><img src="images/klof/15 1.jpg"></center>'
	'Well baby come to us and get more entertainment, and if you will behave and you can earn more'
	'- Okay, guys leave address.'

	act 'Get dressed':gt 'event', 'klof 3'
	!!act 'Move away':gt 'park', 'start'
end

if $ARGS[0] = 'klof 3':
	cla
	*clr
	minut += 5
	klofQW = 2
	clr
	gs 'stat'
	'<center><"klof/15 1.jpg"></center>'
	'You suddenly gripped interest and you asked:'
	'- Ryabyata help you earn money?'
	'- Of course, come in tomorrow after 10 hours of talk (said with a grin guy).'
	'(It turned out that they live in the house next door)'

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

if $ARGS[0] = 'park':
	cla
	*clr
	!!'<center><img src="images/picVA/event.jpg"></center>'
	'You find a quiet, deserted dead end against the wall and start to kiss, but you want more.'

	act 'Masturbate.':gt 'event', 'hand'
	act 'Suck.':gt 'event', 'blow'
	act 'Sex.':gt 'event', 'sex'
end

if $ARGS[0] = 'hand':
	cla
	*clr
	hj += 1
	DOM += 1
	bfa += 1
	'<center><img src="images/picVA/event.jpg"></center>'
	'Without breaking the kiss you deftly unzips pants <<$boyA>> and start it nadrachivat <<dickA>> centimeter friend. Unable to withstand such pressure it ends right on the ground.'

	act 'Complete walk':gt 'park', 'start'
end

if $ARGS[0] = 'blow':
	cla
	*clr
	bfa += 2
	bj += 1
	'<center><img src="images/picVA/event1.jpg"></center>'
	'You get up on his knees, unzips his pants partner and member of the dip sharply in his mouth, looking up at his relaxed face. After a few minutes the face <<$boyA>> tenses in anticipation of orgasm'

	act 'Continue to suck.':
		cla
		swallow += 1
		cumlip += 1
		!!'<center><img src="images/picV/swallow.jpg"></center>'
		'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boyA>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

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

	act 'Remove the mouth.':
		cla

		if harakBoyA = 0:
			!!'<center><img src="images/picV/hand.jpg"></center>'
			'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
		elseif harakBoyA = 1:
			tiprand = rand(0, 3)

			if tiprand < 3:
				!!'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
			elseif tiprand = 3:
				facial += 1
				cumface += 1
				!!'<center><img src="images/picV/facial.jpg"></center>'
				'You took out a member and at this point <<$boyA>> is dead right on your face, covering it with warm and sticky cum.'
			end
		elseif harakBoyA = 2:
			facial += 1
			cumface += 1
			!!'<center><img src="images/picV/facial.jpg"></center>'
			'<<$boyA>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
		end

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

if $ARGS[0] = 'sex':
	cla
	*clr
	'<center><img src="images/picVA/event2.jpg"></center>'
	sex += 1
	bfa += 3
	pose = 1
	$nameV = $boyA
	dick = dickA
	silavag = silavagA
	'<center><img src="images/picV/dog.jpg"></center>'
	'"You find clean pjatochek and tightens pants, shaking her ass invitingly. <<$boyA>> pushes you, putting cancer and dramatically enters you."'
	gs 'orgazm', 'start'

	act 'Complete walk':gt 'park', 'start'
end

if $ARGS[0] = 'dima':
	cla
	*clr
	clr
	gs 'stat'
	'Seeing that you are considering it, the man went to you.'
	'he came up to you and asked politely:'
	'-Girl, I''m sorry, but can you invite? Just you, I see lonely.'

	act 'No':gt 'shop', 'start'

	act 'Where invite?':
		cla
		'Where invite? you asked.'
		'Understand us and his wife arrived boyfriend and I thought you could join us, sit down, let''s talk. You won''t be bored, I promise!'

		act 'No':gt 'shop', 'start'

		act 'Yes':
			cla
			*clr
			minut += 60
			'"That''s fine, My name is Dmitry."'
			'You stretched out your hand to him - "<<$name>>".'
			'It was a man in his forties, of medium height, fairly strong build, dark short hair, nose slightly aquiline. You were talking about the weather, and all sorts of other things. Finally Dima told you to come, he brought you into their home. The house was a two-story, quite pretty. In the living room there was a man with a beer bottle in hand.'
			'"Oh Dimon, and I''m already bored I do not know what to do", he said and added, "What a beautiful woman you have brought with you tonight, this lovely girl will really brighten up this evening?". His eyes looking all over your body and stopping on your breasts.'
			'"<<$name>> meet Aleksei, my friend. Wife is not home yet, she went to her mother, the train should arrive at 24.00, Luda should be here soon and we will be at full strength" told me Dima smiling.'
			'"Aleksei, you can simply call me Alex" introduced his friend. He was slightly taller than Dima and looked a little older. Dark-haired with blue eyes, rather handsome man. You thought to yourself, "What am I doing here?" Probably, there is no wife, not yet too late to get out of here! But Dmitry put his arm around your waist and led you to the kitchen. "Alex, you have organized the table without me, well done!" told Dmitry. "Yes, have a seat in the middle <<$name>>, you will be with us until one, we will look after you" said Alex while helping you sit. On the table were plates with a snacks and a bottle of vodka. Dima poured vodka. You asked:'
			'"I generally do not drink vodka. Maybe you have something poslabzhe?"'

			act 'Excuse me I have to go':gt 'street'
			act 'Drink vodka':gt 'event', 'dima2'
		end
	end

end

if $ARGS[0] = 'dima2':
	cla
	*clr
	minut += 60
	clr
	gs 'stat'
	'You drink once, then again, and again, until you are a little tipsy. Men took turns to tell entertaining stories, you had a lot of fun. The wife did not come of course, but you''ve never thought to ask about it. Dima turned on the music, and invited you to dance. Alexei protested:'
	'"I do not want to miss one, you can join me?!"'
	'You smiled back. Dima immediately began to grope your ass, you danced slowly, he held you close to himself, so that you felt his erect penis, he pressed it against your crotch. Alexei came up from behind, grabbed your shoulders and his hands began to slowly lower to your chest. Drunk and the presence of two excited men had an effect. You shamelessly twisted your hips, pushing your ass against Alexei''s penis and then to Dima''s penis. Alexei caressed and squeezed your breasts, pinching your nipples through the fabric, Dima began caressing your pussy through clothes. You softly moaned with excitement. Then the men began to undress you. You stood between the two men in panties and terribly desired each of them.'
	'"You''re beautiful. Look Alex, what kind of lustful bitch I have brought!"'
	'"Yes, good friend. You will be our whore today. Want us to fuck you?" asked Alex.'
	'"Yes, this whore is already wet and she''s waiting for us to fuck her!" Dima roughly pushed aside your panties and began to thrust his fingers in your pussy.'

	act 'Moan with pleasure':gt 'event', 'dima3'
end

if $ARGS[0] = 'dima3':
	cla
	*clr
	minut += 10
	clr
	gs 'stat'
	'They took you to the bedroom. In an instant, your amorous gentlemen turned into some kind of loons, and you into a whore. But you admit it is great pleasure. In the bedroom stood a large bed, men unzipped their pants and took out their huge cocks.'
	'"Go on start sucking, I see that you cannot wait" said Alex.'

	act 'Kneel down':gt 'event', 'dima4'
end

if $ARGS[0] = 'dima4':
	cla
	clr
	*clr
	minut += 10
	guy += 2
	bj += 2
	throat += 1
	gs 'stat'
	'<center><img src="images/qwest/dima.jpg"></center>'
	'They stood next to the bed, you knelt down and took first Alex''s dick in your mouth the Dima. You sucked and licked the heads, then started swallowing their cocks. Dima took you by the chin, spit in his mouth and began to whip her cheeks, then sat down on the bed, grabbed you by the hair and began to roughly fuck you in the mouth, periodically pohlestyvaya cheeks. "Come on bitch, cocksucker" - he spoke to you, tears flowing down your cheeks, he humiliated you and called you names. And tougher skewer your mouth on his dick. You tried to please him. And Alex put you on your knees, ripped your panties, put my fingers in pussy and ass began to lubricate your holes with his spit, then directed his penis and roughly entered your ass.'

	act 'Scream in pain':gt 'event', 'dima5'
end

if $ARGS[0] = 'dima5':
	cla
	clr
	*clr
	minut += 10
	group += 1
	throat += 1
	anus += 1
	cumass += 1
	cumlip += 1
	orgasm += 1
	gs 'stat'
	'<center><img src="images/qwest/dima1.jpg"></center>'
	'You wanted to scream, but near my mouth was Dima''s cock, you uttered incomprehensible sounds. Swallowing cock deep into your throat. Your anus burning in pain, Alex fucks you in the ass and Dima is fucking your mouth.'
	'"Slut we will fuck you all night in all holes" said Alex.'
	'The room was full of fucking noises. You have experienced an orgasm. Dima sometimes pulled his dick from your mouth spit in your mouth and started fucking your mouth again. And Alex started beating your ass, with every thrust his balls beat against your pussy, bringing you to all new pleasures. "Fuck me boys, I''ll do whatever you want" you thought to yourself. Dima stiffened and said:'
	'"Swallow all that! Understood, bitch!"'
	'And cum began to pour down your throat, you almost choked by swallowing it. You swallowed it all and licked his cock.'
	'"Come on Alex, stretch this slut."'
	'Alex also started to cum, his sperm was hot inside. He pulled out his dick and ordered:'
	'"Lick it, bitch."'

	act 'Lick':gt 'event', 'dima6'
end

if $ARGS[0] = 'dima6':
	cla
	clr
	*clr

	if mop > 1:mop = 0

	minut += 10
	cumlip += 1
	gs 'stat'
	'<center><img src="images/qwest/dima2.jpg"></center>'
	'You turned around and took in his dick in your mouth and began to suck it thoroughly. When finished we all went together to the kitchen and started drinking again.'
	'"Did you like how we fucked you?"'

	act 'Very much':gt 'event', 'dima7'
end

if $ARGS[0] = 'dima7':
	cla
	clr
	*clr
	minut += 10
	group += 1
	vagina += 1
	anus += 1
	cumpussy += 1
	cumass += 1
	gs 'stat'
	'<center><img src="images/qwest/dima3.jpg"></center>'
	'"And you a proper slut now, will will fuck you from both sides" said Dima.'
	'Dima squeezing your chest and biting your nipples and Alex began greasing your ass. You slowly got up and went back into the bedroom. Alex lay back, you sat down, sending his dick in your pussy yourself, fucking, he pulled himself to kiss you, you bent down and Dima roughly entered your ass. As you had two huge dicks in you, you started moaning. "More, more, fuck me, I''m your whore! Fuck my hole!" You cried. It was amazing delight having two dicks in your holes, two strangers fucked you and you moaned as the last whore. And asked them to not stop. You were finishing and finishing. They finished almost simultaneously right into you. You got up and went back to the kitchen, with cum flowing from your ass and pussy. You could hardly walk.'
	'"Alex, you have two more days, and I will come back next week, you can have this bitch to yourself, you will fuck her?"'
	'"Of course leave. Only need to properly spank her for her obedience."'
	'Dima said:'
	'"Do what you want, I need to go to work in the morning, I''m going to sleep."'
	'Alex went for a belt, grabbed you by your hand and led you into the hall. Dima went to sleep.'

	act 'Don''t ... I''ll do whatever you want!':gt 'event', 'dima8'
end

if $ARGS[0] = 'dima8':
	cla
	clr
	*clr
	spank += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/dima4.jpg"></center>'
	'"Not necessary" you begged with tears in your eyes, "I will do whatever you want."'
	'"Sure you do, but we need to spank you for the future."'
	'He put you doggy-style on the floor and started beating your ass with the belt, you cried and begged him to stop. Ass burning with pain. Each hit was getting more painful.'
	'"Get up bitch!" he tied your hands with the belt, "suck my dick before bedtime."'

	act 'Suck':gt 'event', 'dima9'
end

if $ARGS[0] = 'dima9':
	cla
	clr
	*clr
	minut += 30
	throat += 1
	bj += 1
	gs 'stat'
	'<center><img src="images/qwest/dima5.jpg"></center>'
	'Lech took you by the head and started to fuck in the mouth, it did not last very long. His dick was bigger and went deep in his throat, he held your hair. Then he still finished, you tied to a radiator and fell on the sofa bed.'

	act 'Cry from the battery':gt 'event', 'dima10'
end

if $ARGS[0] = 'dima10':
	cla
	clr
	*clr
	minut += 30
	dimaQW = 2
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'You lay hands tied at the battery and wept. Ass on fire after undergoing whipping. Drunken peasants went to bed. Finally you hear the mighty snoring.'

	act 'Leave':gt 'street'
	act 'Fall asleep':gt 'event', 'dima11'
end

if $ARGS[0] = 'dima11':
	cla
	clr
	*clr
	minut += 480
	datster = 1
	bj += 1
	gs 'stat'
	'<center><img src="images/qwest/dima7.jpg"></center>'
	'You awoke from the fact that someone grabbed you by the hair and began shamelessly fuck you in the mouth.'
	'"Hungy, I bet?", your recognize Dima''s voice, "Breakfast must be earned!"'

	act 'Suck':gt 'event', 'dima12'
end

if $ARGS[0] = 'dima12':
	cla
	clr
	*clr
	minut += 10
	throat += 1
	bj += 1
	swallow += 1
	gs 'stat'
	'<center><img src="images/qwest/dima8.jpg"></center>'
	'You felt his cock stiffened and began to wring out streams of warm sperm. As soon as he finished with a contented sigh - came Lech besprikoslovno tone ordered to lick his balls to shine, otherwise no breakfast you can not see'
	act 'Dutifully fulfill':gt 'event', 'dima13'
	act 'Comply with the enthusiasm':gt 'event', 'dima14'

	act 'Try to bite':gt 'event', 'dima31'
end

if $ARGS[0] = 'dima13':
	cla
	clr
	*clr
	minut += 5
	balls += 1
	gs 'stat'
	'<center><img src="images/qwest/dima9.jpg"></center>'
	'You lick and suck shaved Lehina balls, but he did not enjoy it. After a couple of minutes, he slaps you across the face and says:'
	'"What is this bullshit? I''ll teach you how to perform!"'

	act 'Look down':gt 'event', 'dima39'
end

if $ARGS[0] = 'dima14':
	cla
	clr
	*clr
	minut += 10
	balls += 1
	throat += 1
	bj += 1
	swallow += 1
	gs 'stat'
	'<center><img src="images/qwest/dima9.jpg"></center>'
	'Do you remember anything seen before, and try to repeat the same thing. Your tongue and lips lick and kiss each millimeter, thoroughly moisturizing the delicate skin. Then gradually move on to Lehina member and swallow whole, he immediately pushes you on the head and rapidly discharged in your throat, not letting up until his cock stops shudder convulsed'

	act 'Swallow':gt 'event', 'dima15'
end

if $ARGS[0] = 'dima15':
	cla
	clr
	*clr
	minut += 30
	runrnd = rand(0, 10)

	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'Dima unties you from the battery, throws you a bundle and tells him to go to the bathroom to freshen up. Meanwhile They Lehoy discussing something'

	act 'Try to escape':
		if runrnd < 9:
			gt 'event', 'dima18'
		else
			gt 'street'
		end
	end

	act 'Go to the bathroom':gt 'event', 'dima16'
end

if $ARGS[0] = 'dima16':
	cla
	clr
	*clr
	minut += 30
	lobkoef = 3
	legkoef = 3
	cumpussy = 0
	cumbelly = 0
	cumass = 0
	cumlip = 0
	cumface = 0
	cumfrot = 0
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'In convolution you find mesh bodysuit that you will wear. In the bathroom you wash off with a thick layer of sperm itself and clean shave vegetation where it should not be, and then apply the war paint on his face.'

	act 'Wear net':gt 'event', 'dima19'
	act 'Do not wear out of the tub':gt 'event', 'dima17'
end

if $ARGS[0] = 'dima17':
	cla
	clr
	*clr
	dom += 2
	minut += 30
	runrnd = rand(0, 10)
	lobkoef = 3
	legkoef = 3
	cumpussy = 0
	cumbelly = 0
	cumass = 0
	cumlip = 0
	cumface = 0
	cumfrot = 0
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'In the bathroom you wash off with a thick layer of sperm itself and clean shave vegetation where it should not be, but do not dress mesh. You come out of the bathroom in the buff, in spite of instructions'

	act 'Look at the guys with the call':
		if runrnd < 9:
			gt 'event', 'dima18'
		else
			gt 'event', 'dima21'
		end
	end
end

if $ARGS[0] = 'dima18':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'"Oh Well bitch disobedient! Thought, you can do what you want? Fuck thou nobody here, and you will do what you tell us!" - With these words Lech sprinkled in your face some spray and you passed out'

	act 'Fall asleep':gt 'event', 'dima49'
end

if $ARGS[0] = 'dima19':
	clr
	minut += 5
	gs 'stat'
	'"Here, boy, think you already vnikla what to do?"'

	act 'Men serve on the highest level':gt 'event', 'dima20'
end

if $ARGS[0] = 'dima20':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'"Here, boy, think you already vnikla what to do?"'

	act 'Men serve on the highest level':gt 'event', 'dima21'
end

if $ARGS[0] = 'dima21':
	cla
	clr
	*clr
	hour += 3
	dimaQW = 2
	gs 'stat'
	'<center><img src="images/qwest/dima3.jpg"></center>'
	'You long to fuck in various poses, some of which would be the envy of the ardent lovers of kinky sex. After all this, you release'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'dima30':
	cla
	clr
	*clr
	hour += 3
	dimaQW = 2
	gs 'stat'
	'I confess, I am a sinner, a writer from me worthless, and all my dark little thoughts went to the recent arrival of women. If there are interesting ideas/scenarios to continue - fling in a personal, zabubenyu'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'dima31':
	cla
	clr
	*clr
	minut += 30
	dimaQW = 2
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'You squeeze teeth, but Lech lightning grabs your face and jaw power disconnects.'
	'-Bitch, what are you up to?!'
	'You get a strong blow to the face and lose consciousness.'

	act 'Wake up':gt 'event', 'dima32'
end

if $ARGS[0] = 'dima32':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_180.jpg" ></center>'
	'You came from a bright light batter on the eyes. My mouth was dry. Something just did not allow you to close your mouth. Body ached.'
	'Oh, awake! And here I figured out how to re-educate you! - Lech said.'
	'You looked around. It seems that while you were unconscious, you threw some clothes and took him outside. Metallic taste in the mouth. Hands tied behind their backs.'
	'-And now, bitch, I''ll show you what a "safe sex."'
	'With these words, Lech put you on your knees in front of him, pulled out his penis and sent to you in the mouth.'

	act 'Resist':gt 'event', 'dima33'

	If Kik > 50:
		act 'Kick':gt 'event', 'dima37'
	end
end
if $ARGS[0] = 'dima33':
	cla
	clr
	*clr
	minut += 10
	throat += 1
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_183.jpg" ></center>'
	'Despite your attempts to resist, gave Lech and put your head in your mouth his dick. Device in the mouth did not give you close it, so you attempt to push him. But a ride failed. It seems that the device was securely fastened, and your movements of the tongue only provoke Lech.'
	'- Oh, I see you like "safe sex"? Come on, do not stop!'

	act 'continue to please':gt 'event', 'dima38'
	act 'Stop tongue movement':gt 'event', 'dima34'
end
if $ARGS[0] = 'dima34':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_187.jpg" ></center>'
	'Lech realized that you are not going to continue his humor:'
	'-Yesterday you did it with pleasure! Okay, so we''re still nowhere would come. A lesson that the mouth should be open, you''ve learned!'
	'With these words he pulled his cock, lifted your hair and led her down.'
	'You are trapped in an empty underground passage. Lech took the gag out of your mouth, and you were finally able to close it. Then your eyes closed bandage. Lech slightly bent you and povernull back to him.'

	act 'stand still':gt 'event', 'dima35'
end
if $ARGS[0] = 'dima35':
	cla
	clr
	*clr
	minut += 30
	vagina += 1
	rape += 1
	cumface += 1
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_301.jpg" ></center>'
	'Lech smash you entered. Happened on the stairs has brought you, and now he easily slid publishing squish. After a while you covered orgasm.'
	'-So I had to start the morning. And no risk! - Said Lech, increasing the tempo.'
	'Suddenly he stopped, turned sharply and put you on your knees. You hurt hit the marble floor, and felt something warm began to beat and run down your face.'
	'-Your Stuff for the urn. I hope you learned a lesson - with these words Lech loosened the straps on your hands, and you heard postpones steps.'

	act 'Recover':gt 'event', 'dima36'
end

if $ARGS[0] = 'dima36':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_352.jpg" ></center>'
	'After sitting in that position for a few minutes, you started releasing hands. When you succeed, you tore the bandage from his face, wiped her face with sperm and pushed as far as possible. Looking around, you notice an urn, which lie in your stuff. You get dressed and get out of the transition.'

	act 'Leave':gt 'street'
end
if $ARGS[0] = 'dima37':
	cla
	clr
	*clr
	minut += 30
	money = 0
	gs 'stat'
	'<center><img src="images/etogame/Kik.jpg"></center>'
	'Things in the fitness center were not in vain. You manage to hit Lech foot so that it falls and loses consciousness. You start to run, and only remove staying far enough, and start looking for a way to free your hands. Eye catches you pointed stone, and when your hands are free, you remove the gag from his mouth, and finally, you can close it. Teeth creak from the dust that nabilas in the mouth while running. Dress trampled and torn in places, but still able to cover your body. You manage to find the right direction, and after a while you find yourself close to the supermarket, which met Dima. Then you realize that Lehi left all your money.'

	act 'Relax':gt ' street'
end
if $ARGS[0] = 'dima38':
	cla
	clr
	*clr
	minut += 30
	bj += 1
	cumlip += 1
	throat += 1
	gs 'stat'
	'<center><img src="images/picQW/10028_TommyPistolJacquelineBlackLady_184.jpg" ></center>'
	'You begin to carefully caress member Lehi language, while trying to periodically swallow it as deep as possible. Limiting device in the mouth of your abilities and you seemed to be an eternity before you managed to get to Lech finish.'
	'Yes, now a lesson learned. I think in the future you will have no problems. After all, am I right? - He said, clutching your hair.'
	'You nodded. Lech then loosened the ties on your hands and pointing to the bushes, said:'
	'-There you will find your things.'
	'After Lech retired, you free your hands, mouth, and find their stuff in the specified location.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'dima39':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet085.jpg" ></center>'
	'Lech suits you and inserts the mouth gag. Then displays the apartment, and you take the bus to the center. It is surprisingly empty.'
	'-Look, I''ve remembered you yesterday tried, and I thought maybe you just do not get enough sleep today? Can correct the mistake right there?'

	act 'Beckon':gt 'event', 'dima40'
	act 'Refuse':gt 'event', 'dima45'
end
if $ARGS[0] = 'dima40':
	cla
	clr
	*clr
	minut += 30
	vagina += 2
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet113.jpg" ></center>'
	'-That''s great - with these words Lech pulls you dress, pulls already got stronger member and skewer you.'
	'You start to move rhythmically, but rough road knocks you adding new sensations.'

	act 'change of station':gt 'event', 'dima41'
end

if $ARGS[0] = 'dima41':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet154.jpg" ></center>'
	'You park between the seats, and Lech adjusts rear, removing the gag with the words:'
	'-You do me now not going to disappoint?'
	'Looks like Lehi not like sex on the go, and he stops and asks the driver to stop the bus between stops in the park area. The driver did not mind, he stops, and you leave the transport. Looks like he''s noticed your nakedness, and you feel his gaze until Lehoy hiding among the trees.'
	'Soon you will find a clearing near the road.'
	'-And now prove that morning showed not all that is capable of!'

	act 'To kneel':gt 'event', 'dima42'
end

if $ARGS[0] = 'dima42':
	cla
	clr
	*clr
	minut += 30
	bj += 1
	cumlip += 1
	throat += 1
	cumface += 1
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet231.jpg" ></center>'
	'I knelt down, you start diligently to please Lech then completely swallowing, then fully releasing member. Your diligence now could envy the best porn actress. Not surprisingly, soon Lech breathing hard, and finished removing the member on your face.'
	'-That''s clever - he said - because you can, whenever you want! Think about your ability to have to learn everything!'
	'Lech ties your hands, naked and takes you on the road. Put you on your knees, he took a marker and wrote on your stomach "Cum" and the up arrow, and said:'
	'- I am away for a couple of hours when I come back, bring your stuff. And yet you sit here and boast about his skill.'

	act 'wait for the return':gt 'event', 'dima43'
	act 'Leave':gt 'event', 'dima44'
end

if $ARGS[0] = 'dima43':
	cla
	clr
	*clr
	minut += 50
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet263.jpg" ></center>'
	'You decided to wait for the return of Lehi. The first 15 minutes passed quietly. On the road was deserted. But then began the most unpleasant pastime in your life. Passed a crowd of young people to notice you. They took a few photos, obsmeyali you, and losing interest gone. You seemed like an eternity held grandmother told me about morality, and that in its time, this was unacceptable. There were other personality, which you tried not to think.'
	'When Lech returned, he untied you handed your things, and said that he was sorry about his imminent departure from the city as would be very happy new "rendezvous" with you.'
	'You got dressed, took their belongings and hurriedly left his company.'

	act 'Go to the yard':gt 'street'
end
if $ARGS[0] = 'dima44':
	cla
	clr
	*clr
	minut += 15
	money = 0
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet264.jpg" ></center>'
	'You decide that sit covered with sperm, naked on the road - too humiliating for you. When Lech hidden from view, you go up, grab his clothes, left nearby, and run into the grounds. Unfortunately your purse he prehvatil ssoboy. Eye catches you pointed stone, and when your hands are free, you carefully wipe the traces of semen from her face. You manage to find the right direction, and after a while you find yourself close to the supermarket, where you met Dima'

	act 'Relax':gt ' street'
end
if $ARGS[0] = 'dima45':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/13606_ZenzaRaggiNikiSweet084.jpg" ></center>'
	'How you want. So you will get new experience. Lots of new experiences! And I benefit - Lech said, smiling.'
	'After that he was silent all the way until you have passed the desired stop. Lech brought you out of the bus and led to sex shops.'
	'-There you are - you are greeted by a girl. She unceremoniously grabs you and leads to the back room. There she undresses and connects you.'
	'-And now for me - the girl you brought to the stairs.'

	act 'Go to the basement':gt 'event', 'dima46'
end

if $ARGS[0] = 'dima46':
	cla
	clr
	*clr
	minut += 5
	throat += 1
	cumlip += 1
	swallow += 1
	bj += 1
	gloryhole += 1
	gs 'stat'
	'<center><img src="images/picQW/15933_MarkDavisDonnaAnnika_447.jpg" ></center>'
	'When you went down, the girl has got you in a dark room with a round hole in one wall. Almost immediately, there is a hole in someone''s penis.'
	'-Nigh - commanded girl.'
	'After your failure, it grabbed you by the neck, and pressed to the opening force.'
	'Attempts to shove dick out of your mouth, just very excited stranger behind the wall, and not stand a minute it ends. Because your head is firmly against, you are not able to spit, and are forced to swallow.'
	'-Your companion got the money for a certain number of customers. Next she right, or should I stay and check?'

	act 'agree to suck':gt 'event', 'dima47'
	act 'refuse to continue':gt 'event', 'dima48'
end

if $ARGS[0] = 'dima47':
	cla
	clr
	*clr
	minut += 50
	throat += 5
	cumlip += 8
	swallow += 8
	bj += 8
	gloryhole += 8
	vagina += 1
	money += 1000
	gs 'stat'
	'<center><img src="images/picQW/15933_MarkDavisDonnaAnnika_494.jpg" ></center>'
	'Here-and miraculously, - she said, - I call your friend, even if it is followed. And you do not get distracted - with these words the girl pointed to the hole, which has a new member.'
	'You obediently bent over and began to please the next stranger. You tried. Men erupted one after another.'
	'Looks like you got so carried away that have not heard, as Lech walked into the room.'
	'The realization that you are not alone in the room at that moment came when he forcefully entered you.'
	'You decided not to get distracted, and continued to suck, regardless of ramming you from behind Lech.'
	'When the man you served, finished, you as before, swallowed, and were ready to accept the new, but the hole remained empty. It seems that money received Lehoy you worked.'
	'Lehi efforts were not lost, and soon you shook in orgasm. Almost immediately, he pulled out his penis, and expanding you poked your face. You are already in a couple of habitual movements could make him cum.'
	'Once you have cleaned his cock, he came out of the booth and you a few minutes to recover. Oklemavshis you out of the room. At the door of the girl you met, which led you to this basement. She took you to the restroom, where you could wash your face and rinse your mouth. When you are out, she handed you a package with your things, and a few notes, adding that it is you asked me to tell your friend, for a job well done. You dressed.'

	act 'Get Outside' :gt 'nord'
end

if $ARGS[0] = 'dima48':
	cla
	clr
	*clr
	minut += 50
	throat += 5
	cumlip += 8
	swallow += 8
	bj += 8
	gloryhole += 8
	gs 'stat'
	'<center><img src="images/picQW/15933_MarkDavisDonnaAnnika_481.jpg" ></center>'
	'It seems that the girl did not satisfy your refusal.'
	'-Do you want to good, then continue on the poor.'
	'With these words, the girl again summed up your head to the hole.'
	'When it has a new member, she put it to you in the mouth, and began to drive your head. The impression that she fucks a stranger behind the wall of your head. It took more time, but this ended in your mouth. At this time, she shrank your head into the wall without letting you spit on the floor. This was repeated several times.'
	'When the last "client" disappeared into the hole, she let go of your head, and left the room. Very soon she returned to your dealer. You dressed up, and she put you out of the room.'

	act 'Get Outside' :gt 'nord'
end

if $ARGS[0] = 'dima49':
	cla
	clr
	*clr
	minut += 50
	gs 'stat'
	'<center><img src="images/picQW/10022_ParisTommy_021.jpg" ></center>'
	'You came to the middle of a square. Your hands were chained to a pole, and things found in a step away from you. In the mouth gag. In the distance there were people, but no one dared to approach you. And their okriknut you too could not. So it took about an hour. Similarly, you could not tell. Your legs are tired, but his hands behind his back did not give you the opportunity to sit down.'
	'Suddenly you notice that some guy is coming to you.'
	'-Do you need help? - He asked'

	act 'Nod':gt 'event', 'dima50'
end

if $ARGS[0] = 'dima50':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/picQW/10022_ParisTommy_028.jpg" ></center>'
	'The guy came closer, keep your hands and pulled the gag out of his mouth.'
	'He helped collect your things, and offered to withdraw from the area as soon as possible. Was very close to the river, and he offered you a dress under the bridge.'
	'When you went down, the guy said:'
	'- Can you repay the savior?'

	act 'Suck':gt 'event', 'dima51'

	if agil < 50:
		act 'Send':gt 'event', 'dima52'
	else
		act 'Send':gt 'event', 'dima53'
	end
end

if $ARGS[0] = 'dima51':
	cla
	clr
	*clr
	minut += 5
	throat += 1
	cumlip += 1
	swallow += 1
	cumface += 1
	bj += 1
	gs 'stat'
	'<center><img src="images/picQW/10022_ParisTommy_088.jpg" ></center>'
	'You knew immediately that hints at the guy. Kneeling, you rastegnula fly guy, and went to work. Barely a couple of minutes, the guy began to finish. When finished, he said goodbye to you, and quickly departed.'

	act 'Freshen up' :gt 'nord'
end

if $ARGS[0] = 'dima52':
	cla
	clr
	*clr
	minut += 20
	throat += 2
	cumlip += 1
	swallow += 2
	cumface += 1
	bj += 2
	money = 0
	gs 'stat'
	'<center><img src="images/picQW/10022_ParisTommy_308.jpg" ></center>'
	'Enraged your refusal, the guy pushes you, grabs your stuff, throwing them into the river, and you have time to grab clothes, but handbag goes to the bottom with your savings and keys.'
	'When you go up to the bridge, from the air as there are few guys. They grab you and tie your hands. Judging by their actions, they are watching you from the square.'
	'When you find yourself on your lap, they lowered his pants. It seems you have no choice. You start to appease them.'
	'When you finish with the last guys free your hands and run away.'
	'Back in the present, you will find the right direction, and after a while find yourself far from the supermarket, which met Dima'

	act 'Relax':gt ' street'
end


if $ARGS[0] = 'dima53':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/clothes/skirt1.jpg"></center>'
	'Enraged your refusal, the guy pushes you, but you stand firmly on his feet. Realizing that you do not mess, the guy runs away.'

	act 'Freshen up' :gt 'nord'
end

if $ARGS[0] = 'scoreslut1':
	cla
	clr
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'You woke up, tied hands of the battery. From the sofa looked expectantly at you Dima.'

	act 'Frightened look':gt 'event', 'scoreslut2'
	act 'Trying to escape':gt 'event', 'scoreslut3'
end

if $ARGS[0] = 'scoreslut2':
	cla
	clr
	*clr
	SUB = SUB + 2
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'"Woke up, bitch? We''ll say?"'

	act 'Frightened look':gt 'event', 'dima30'
end

if $ARGS[0] = 'scoreslut3':
	cla
	clr
	*clr
	SUB = SUB + 2
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/dima6.jpg"></center>'
	'"Oh, you kicking"'

	act 'Frightened look':gt 'event', 'dima30'
end

if $ARGS[0] = 'lesbi':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'Woman staring at you, caught your eye. Appreciatively examining you, she smiled and held fast to his lips tongue.'

	act 'Turn':gt 'butik', 'start'
	act 'Become acquainted':gt 'event', 'lesbi1'
end

if $ARGS[0] = 'lesbi1':
	cla
	clr
	*clr
	minut += 5
	lesbiQW = 1
	gs 'stat'
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'You came to the woman. She looked at you with a twinkle in his eye, "I Natalya Petrovna, and you''re nothing on my card, call me anything as we descend in an interesting place." After that the woman comes out of the boutique graceful and confident gait.'

	act 'Move away':gt 'butik', 'start'
end

if $ARGS[0] = 'lesbi2':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'- Malyavki? yes I have had more guys than you! you misbehaved.'
	'- Guys? YES they can twist as you want, if sicki, yes cute little face. Did you ever ever tried to force'
	'another girl to live so that she is ready to do anything for your attention?'
	if lesbian > 0:'- Nuu .. no .. I do not understand this - you mumbled. The girl I tried, but that so ..'
	if lesbian = 0:'- Nuu .. no .. I do not understand this - you mumbled. I''m a woman and some really did not try ..'

	act 'Move away':gt 'park', 'start'
	act 'Ask teach':gt 'event', 'lesbi3'
end

if $ARGS[0] = 'lesbi3':
	cla
	clr
	*clr
	minut += 5
	lesbiQW = 2
	gs 'stat'
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'You suddenly gripped interest how does it make the other girls so you read? Can ask this woman to teach me.'
	'Then you can find yourself very docile simpleton that will make your small chores and help you escape'
	'from the guys. And deciding you asked:'
	'- And can you teach me that?'
	'- Teach? - She asked in surprise. - Teach .. hmm .. let''s try! - The lady said with a grin. - Come back tomorrow at 10 am in my'
	'apartment (oddly enough, it turned out that she lives on the floor below you'

	act 'Go in turmoil':gt 'park', 'start'
end

--- event ---------------------------------
# frot
if $ARGS[0] = 'a':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frot.jpg"></center>'
	'You feel that you abuts something solid in the ass, stir you realize that you have risen between the buttocks rests member.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/picV/frot1.jpg"></center>'
		'The guy standing behind no matter how vznachay Regarding your buttocks his hand and pressed harder you as a member to the ass.'

		act 'Go to another place':gt 'frot', 'fin'

		act 'Disregard':
			cla
			*clr
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/picV/frot2.jpg"></center>'
			'You feel like a man behind you got penis and began to rub them on your ass clinging to you and squeezing your buttocks with his hands.'

			act 'Go to another place':gt 'frot', 'fin'

			act 'Disregard':
				cla
				*clr
				horny += 10
				frot += 1
				cumfrot += 1
				SUB += 5
				gs 'starenie'
				clr
				gs 'stat'
				'<center><img src="images/picV/frot3.jpg"></center>'
				'Man jerked back and you feel like something warm and viscous flowed over you. Guy finished you on your ass, then he moved on to another place.'

				act 'Get out of the car':gt 'frot', 'fin2'
			end
		end
	end
end

if $ARGS[0] = 'b':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frot.jpg"></center>'
	'You feel that you abuts something solid in the ass, stir you realize that you have risen between the buttocks rests member.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/picV/frot1.jpg"></center>'
		'The guy standing behind your buttocks squeezes hands and even more pressed his cock you to the ass.'

		act 'Go to another place':gt 'frot', 'fin'

		act 'Disregard':
			cla
			*clr
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/picV/frotA1.jpg"></center>'
			'The man lifted her skirt and you started to caress your bare buttocks with his strong hands.'

			act 'Disregard':
				cla
				*clr
				horny += 10
				clr
				gs 'stat'
				'<center><img src="images/picV/frotA2.jpg"></center>'
				'Man lowered your panties between your naked buttocks slid his hand that caressed your wet pussy.'

				act 'Disregard':
					cla
					*clr
					horny += 10
					clr
					gs 'stat'
					horny += 10
					frot += 1
					cumfrot += 1
					SUB += 1
					gs 'starenie'
					clr
					gs 'stat'
					'<center><img src="images/picV/frot3.jpg"></center>'
					'The man pulled on below your skirt at your panties down on your knees and took his hand your hand. He forced you to take your dick with your hand. You cupped hot and hard cock and began stroking it. After you feel like a man cums on your skirt.'

					act 'Get out of the car':gt 'frot', 'fin2'
				end
			end
		end
	end
end

if $ARGS[0] = 'c':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frotP.jpg"></center>'
	'You feel like a man standing behind you started poking his hand in his pants you.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/picV/frotP1.jpg"></center>'
		'You become a nice addition to the stranger under pants caresses your ass, suddenly you see how he pulled out a small pair of scissors to cut the ribbon wants your bra.'

		act 'Go to another place':gt 'frot', 'fin'

		act 'Disregard':
			cla
			*clr
			horny += 10
			clrbelo -= 1
			SUB += 1
			clr
			gs 'stat'
			'<center><img src="images/picV/frotP2.jpg"></center>'
			'Man cut the ribbon of your bra and pulled it off with you. Freeing you from bra he began to fondle your breasts'

			act 'Enjoy':
				cla
				*clr
				horny += 10
				clr
				gs 'stat'
				'<center><img src="images/picV/frotP3.jpg"></center>'
				'Man you bent forward and began to caress your ass, you feel that his hands clutching your pants trying to break them.'

				act 'Go to another place':gt 'frot', 'fin'

				act 'Allow it to':
					cla
					*clr
					SUB += 1
					horny += 10
					clr
					gs 'stat'
					horny += 10
					!!frot += 1
					cumfrot += 1
					SUB += 5
					gs 'starenie'
					gs 'starenie'
					gs 'starenie'
					gs 'starenie'
					gs 'starenie'
					clr
					gs 'stat'
					'<center><img src="images/picV/frotP4.jpg"></center>'
					'Man ripped your pants between your legs, thereby exposing your wet pussy.'

					act 'Allow it to':
						cla
						*clr
						SUB += 1
						horny += 10
						guy += 1
						sex += 1
						vagina += 1
						clr
						gs 'stat'
						'<center><img src="images/picV/frotP5.jpg"></center>'
						'He turned you around to face him and cocked up your leg came into your sweaty pussy with his hard cock.'

						if horny >= 100:
							horny = 0
							manna += 15
							willpower += 15
							orgasm += 1
							'You started to cum almost immediately as he entered you.'
						else
							'You cover the wild excitement of sex with a stranger in a public place.'
						end


						act 'Further':
							cla
							*clr
							horny += 10
							frot += 1
							cumfrot += 1
							frot += 1
							cumpussy += 1
							gs 'preg'
							SUB += 1
							gs 'stat'
							'<center><img src="images/picV/frotP6.jpg"></center>'
							'Stranger is not pulling out of your pussy juices flowing term ends right inside. You feel like you beat jet of sperm into the uterus.'

							act 'Get out of the car':gt 'frot', 'fin2'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'd':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frotP.jpg"></center>'
	'You feel like a man standing behind you started poking his hand in his pants you.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/picV/frotD.jpg"></center>'
		'The man pulled the pants off you leaving you with a bare ass in a crowded subway car, he took your hand and made you take his penis with his hand.'

		act 'Go to another place':gt 'frot', 'fin'

		act 'Stroking his cock':
			cla
			*clr
			horny += 10
			hj += 1
			cumass += 1
			SUB += 1
			frot += 1
			clr
			gs 'stat'
			'<center><img src="images/picV/frotD1.jpg"></center>'
			'You caress his fingers and rubbing his dick on your bare skin, stiffened and member of it on your bare ass began splashing sperm. After the man was satisfied, you pulled his pants right on the running water from your buttocks sperm.'

			act 'Get out of the car':gt 'frot', 'fin2'
		end
	end
end

if $ARGS[0] = 'e':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frotP.jpg"></center>'
	'You feel like a man standing behind you started poking his hand in his pants you.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 60
		clr
		gs 'stat'
		'<center><img src="images/picV/frotE.jpg"></center>'
		'The man pulled the pants off you leaving you with a bare ass in a crowded subway car, you feel like you gets his hand between her legs and starts to masturbate your pussy.'

		!!act 'Go to another place':gt 'frot', 'fin'
		if horny >= 90:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			'You can no longer tolerate and you cover powerful orgasm. Your legs give way.'

			act 'Squat':
				cla
				*clr
				horny += 10
				SUB += 1
				clr
				gs 'stat'
				'<center><img src="images/picV/frotE1.jpg"></center>'
				'You could no longer stand and squatted. The man pulled a member who was standing right in front of your face and you took his head began to direct your face to the member.'

				act 'Take by mouth':
					cla
					*clr
					horny += 10
					bj += 1
					guy += 1
					!!cumface += 1
					SUB += 1
					frot += 1
					clr
					gs 'stat'
					'<center><img src="images/picV/frotE2.jpg"></center>'
					'Man held his cock you lips a few times then sent a purple head between your lips, you obediently opened his mouth and took it hard cock. You sit on their haunches in the middle of a crowded subway car and sucks dick from a stranger.'

					act 'Continue to suck':
						cla
						*clr
						horny += 10
						!!bj += 1
						!!guy += 1
						cumface += 1
						facial += 1
						SUB += 1
						!!frot += 1
						clr
						gs 'stat'
						'<center><img src="images/picV/frotE3.jpg"></center>'
						'The man pulls his cock out of your mouth and ends at your lips, hot cum dripping on your lips chin.'

						act 'Sit on the floor':
							cla
							*clr
							horny += 10 + SUB + VAF
							cumlip += 1
							swallow += 1
							SUB += 5
							gs 'stat'
							'<center><img src="images/picV/frotE4.jpg"></center>'
							'Male fingers collects sperm from your face and puts them into your mouth, and you dutifully licked them and swallow sperm.'

							act 'Get out of the car':gt 'frot', 'fin2'
						end
					end
				end
			end

			exit
		else
			'You are very nervous and you thought comes to mind to masturbate his penis.'

			act 'Stroking his cock':
				cla
				*clr
				horny += 10
				hj += 1
				cumass += 1
				SUB += 1
				frot += 1
				clr
				gs 'stat'
				'<center><img src="images/picV/frotD1.jpg"></center>'
				'You caress his fingers and rubbing his dick on your bare skin, stiffened and member of it on your bare ass began splashing sperm. After the man was satisfied, you pulled his pants right on the running water from your buttocks sperm.'

				act 'Get out of the car':gt 'frot', 'fin2'
			end
		end
	end
end

if $ARGS[0] = 'd1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/picV/frotD2.jpg"></center>'
	'You feel like a man standing behind you become bullying your skirt.'

	act 'Go to another place':gt 'frot', 'fin'

	act 'Disregard':
		cla
		*clr
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/picV/frotD.jpg"></center>'
		'The man pulled the pants off you leaving you with a bare ass in a crowded subway car, he took your hand and made you take his penis with his hand.'

		act 'Go to another place':gt 'frot', 'fin'

		act 'Stroking his cock':
			cla
			*clr
			horny += 10
			hj += 1
			cumass += 1
			SUB += 1
			frot += 1
			clr
			gs 'stat'
			'<center><img src="images/picV/frotD1.jpg"></center>'
			'You caress his fingers and rubbing his dick on your bare skin, stiffened and member of it on your bare ass began splashing sperm. After the man was satisfied, you pulled his pants right on the running water from your buttocks sperm.'

			act 'Get out of the car':gt 'frot', 'fin2'
		end
	end
end

if $ARGS[0] = 'fin':
	cla
	'You barely squeezed in another place, away from the horny idiot. After a while you come to your station'
	act 'Get out of the car':gt 'metro', 'start'
end

if $ARGS[0] = 'fin2':
	gt 'metro', 'start'
end

--- frot ---------------------------------
# kisameQW
if $ARGS[0] = 'start':
	cla
	horny += 20
	clr
	gs 'stat'
	'<center><img src="images/qwest/kisame1.jpg"></center>'
	'You swim in the pool, underwater turns Kisame constantly touching your body. He rips off your swimsuit and pushes you to the bottom of the pool.'
	'Kisame plunges to you and pushing your feet.'

	act 'Trying to push him away':
		cla
		*clr
		horny += 60
		sweat = -3
		manna += 5
		willpower += 5
		clr
		gs 'stat'
		'<center><img src="images/qwest/kisame2.jpg"></center>'
		'Kisame despite your attempts to resist pushing your feet in your mouth bites a piece of his tongue gets you into the vagina and caresses you like. You feel on top of the world.'

		act 'Submit':
			cla
			*clr
			horny += 60
			sweat = -3
			manna += 5
			willpower += 5
			guy += 1
			sex += 1
			vagina += 1

			if KisameSex = 0:KisameSex = 1 & guy += 1

			clr
			gs 'stat'
			'<center><img src="images/qwest/kisame3.jpg"></center>'
			'Kisame playing with you like a toy, he swam under you and skewer your pussy on his cock. You simultaneously on the verge of orgasm and fainting from suffocation. You hear the voice of Kisame, you can breathe underwater. He hard fucks you in the pussy and you can not breathe and soak up water. Suddenly, instead of water in your lungs misses completely normal air.'
			'Sighing you immediately covers orgasm, you can be bent in convulsions of pleasure. Kisame also ends up in you.'

			act 'Further':gt 'kisameQW', 'after'
		end

		act 'Attack (Kisame mag10)':
			cla
			*clr
			'<center><img src="images/qwest/kisameV.jpg"></center>'
			horny += 60
			$nameV = 'Kisame'
			!!stats
			strenV = 300
			speedV = 100
			agilV = 100
			reactV = 100
			vitalV = 200
			intelV = 100
			willV = 50
			!!skills
			magikV = 10
			boxingV = 100
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * magikV + magikV * 100 + vitalV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 5
			kisamePic = 1
			KisaFight = 1
			klonV = 5
			!!defenceV = 10000
			if spellavtoklon = 1:klon = 3
			if spellbefshild = 1:defence = 500

			gt 'fight', 'start'
			'You kicked in the face Kisame. He showed his teeth, and his appearance began to change through instantaneous he was already blue gills on the face and shark teeth. He whispered with a smile, "You wanna play baby? Let''s play!"'

			act 'Fight':gt 'fight', 'start'
		end
	end
end

if $ARGS[0] = 'after':
	cla
	horny += 20
	clr
	gs 'stat'
	'<center><img src="images/qwest/kisameV.jpg"></center>'
	'Kisame transformed lightning in senee akulopodobnoe creature. He smiled and said, "Thank you baby." With these words he slapped you on the ass and went to the men''s locker room.'

	act 'Find a swimsuit and go in the locker room':gt 'bass', 'start'
end

--- kisameQW ---------------------------------
# lesbidomhouse
gs 'stat'

if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	lesrand = rand(1, 3)
	clr
	gs 'stat'

	if lesrand = 1:
		'You called, but the door no one answered you. To re-call too, no one responded'

		act 'Leave':gt 'street'
	else
		'You rang the doorbell several times. Once you opened the third.'

		act 'Stop by':gt 'lesbidomhouse', 'ev1'
		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = 'ev1':
	cla
	*clr
	minut += 5
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'Rang the doorbell.'
	'You do not open and you want to leave, but the desire to learn povelevaniyu girls overpower you and you called again.'
	'And finally you have opened.'
	'-Hello - told <<$name>>'
	'Ah, it''s you, the lady said dismissively, come.'

	act 'Stop by':gt 'lesbidomhouse', 'ev2'
end

if $ARGS[0] = 'ev2':
	cla
	*clr
	minut += 5
	'<center><img src="images/etogame/irinaroom.jpg"></center>'
	'You looked around the apartment was very clean, but it did not cause comfort.'
	'How something is not cozy at you - you said, and immediately met with a cold stare ladies.'
	'You become very uncomfortable.'
	'-Sorry - you said'
	'Nothing, you have to get used to this situation. After all, what would make a girl, you need to make her feel uncomfortable, weak, defenseless.'
	'-Well, I remember that. I never asked your name.'
	'- Call me Mistress.'

	act 'Agree':gt 'lesbidomhouse', 'ev4'

	if sub < 30 and horny < 75:
		act 'Brawl':gt 'lesbidomhouse', 'ev3'
	end
end

if $ARGS[0] = 'ev3':
	cla
	*clr
	minut += 5
	lesbiQW = -1

	if dom > 0:dom += 5
	if sub > 0:sub -= 5

	'<center><img src="images/qwest/pnx.jpg"></center>'
	'You''ve decided that she wants to make you a slave and nothing more, so you yell at the woman and went'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev4':
	cla
	*clr
	minut += 5
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'You think she wants to make you a slave, not to teach. But still did not say anything.'
	'-good hostess. And where do we start my training?'
	'-The first thing is not to hurry. You should know well the victim. For example, to begin with, have a drink and rub in credibility. With this'
	'and start, you''ll be the object on which I''ll show you all my tricks.'

	act 'Play on':gt 'lesbidomhouse', 'ev5'
end

if $ARGS[0] = 'ev5':
	cla
	*clr
	minut += 5
	'<center><img src="images/qwest/zst.jpg"></center>'
	'You agreed, went into the room where there were already cooked drinking and snack.'

	act 'Drink':gt 'lesbidomhouse', 'ev6'
end

if $ARGS[0] = 'ev6':
	cla
	*clr
	hour += 23
	minut += 5
	lesbiQW = 3
	'<center><img src="images/qwest/zst.jpg"></center>'
	'You started drinking and soon your stiffness and uncertainty disappeared and you began to tell his adventures Mistress, '
	'how much you guys have many times given in the ass as otsasali and drinking even told that sex was even'
	'unfamiliar guys in clubs and other park and your adventures.'
	'End drunk you decided to go home. The hostess did not accompany you, but you were so drunk that scored it.'

	if oral >= anal and oral >= sex:
		callnm = 1
	elseif anal >= oral and anal >= sex:
		callnm = 2
	elseif sex >= oral and sex >= anal:
		callnm = 3
	elseif vaf >= 100:
		callnm = 4
	end

	act 'Go home':gt 'korr'
end

if $ARGS[0] = 'start1':
	cla
	*clr
	minut += 5
	lesrand = rand(1, 3)
	clr
	gs 'stat'

	if lesrand = 1:
		'You called, but the door no one answered you. To re-call too, no one responded'

		act 'Leave':gt 'street'
	end

	if lesrand >= 2:
		'You rang the doorbell several times. Once you opened the third.'

		act 'Stop by':gt 'lesbidomhouse', 'ev7'
		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = 'ev7':
	cla
	*clr
	minut += 5
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'You decided to go to, hmmm, Mistress? find out whether there was something to be ashamed of yesterday and what lesson you should train'
	'had to endure? as you remember little from that day.'

	act 'Hello':gt 'lesbidomhouse', 'ev8'
end

if $ARGS[0] = 'ev8':
	cla
	*clr
	minut += 5

	if callnm = 1:
		$callnm = 'nipple'
	elseif callnm = 2:
		$callnm = 'analschitsa'
	elseif callnm = 3:
		$callnm = 'davalka'
	elseif callnm = 4:
		$callnm = 'spermoedka'
	end

	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'-Hello, Mistress.'
	'Hi <<$callnm>>'

	'-as you call me? - You were taken aback. And blushed, because the hostess told the truth.'
	'-This is lesson number 2. Humiliate their target. Use what you learned about it.'

	act 'Ask not to call you that':gt 'lesbidomhouse', 'ev9'
end

if $ARGS[0] = 'ev9':
	cla
	*clr
	minut += 5

	if callnm = 1:
		$callnm = 'nipple'
	elseif callnm = 2:
		$callnm = 'analschitsa'
	elseif callnm = 3:
		$callnm = 'davalka'
	elseif callnm = 4:
		$callnm = 'spermoedka'
	end

	'-No, you should feel on their skin all <<$callnm>>'
	'-Continue training. If what you know about the girl, touches her, I believe that it''s yours. Make it do what it'
	'loves most.'
	'-but if she loves anal and eblyu members or suck and swallow cum, I''ll make her do it? I havent a member and I do not'
	'any thread is fantasy feet.'
	'On this account, do not worry, I''ll give you (maybe) a special strap, he may issue streams of sperm.'

	act 'Try to ask':gt 'lesbidomhouse', 'ev10'
end

if $ARGS[0] = 'ev10':
	cla
	*clr
	minut += 5
	'On and I did not know about these, you can try it on?'
	'-Not yet, I told you, first you try everything on myself.'
	'-Well - you said uncertainly.'
	'-Proceed.'

	act 'Start':gt 'lesbidomhouse', 'ev10a'
end

if $ARGS[0] = 'ev10a':
	cla
	*clr
	minut += 35
	horny = 95
	'<center><img src="images/qwest/lesbi2.jpg"></center>'

	if callnm = 1 or callnm = 4:
		'Hostess beginning you have. First, it made you suck plastic cock and then shoved a plastic dick in your throat and began shamelessly fuck you there. You were close to the peak of pleasure as hostess suddenly stopped.'
	elseif callnm = 2:
		'The hostess sat down to have you. First, it made you suck plastic cock then you deployed and began mercilessly fuck your pussy. You were close to the peak of pleasure as hostess suddenly stopped.'
	elseif callnm = 3:
		'The hostess sat down to have you. First, it made you suck plastic cock then you deployed and began mercilessly nasilovt your ass. You were close to the peak of pleasure as hostess suddenly stopped.'
	end

	act 'Indignant':gt 'lesbidomhouse', 'ev11'
end

if $ARGS[0] = 'ev11':
	cla
	*clr
	minut += 5
	lesbiqw = 4
	sub += 2
	lesbian += 1

	if ldmistresex = 0:ldmistresex = 1 & girl += 1

	lesbiday = day
	'Well, I''m almost finished - you moaned.'
	'-Next lesson - do not let the girl that she has not earned it. Want to come? Please lick my pussy.'
	'You started with a zeal to lick pussy Mistress, resignedly and without question.'
	'After due pleasure hostess put her hand on your head and let down your tongue to her anus.'

	act 'Protest':gt 'lesbidomhouse', 'ev12'
	act 'Lick ass':gt 'lesbidomhouse', 'ev13'
end

if $ARGS[0] = 'ev12':
	cla
	*clr
	minut += 5
	'Fu, he''s not washed, then callas - you started to step back.'
	'Requirements should not be easy, otherwise the girl will not be so submissive. But then it will wait for a very good encouragement.'
	act 'Leave':
		lesbiQW = -1
		gt 'street'
	end

	act 'Lick ass':gt 'lesbidomhouse', 'ev13'
end

if $ARGS[0] = 'ev13':
	cla
	*clr
	asslick += 1
	minut += 5
	energy += 1
	'<center><img src="images/qwest/lesbi3.jpg"></center>'
	'You reluctantly began to lick the anus Mistress. You almost puked, but more excitement and a desire to know what kind of reward awaits her after forced you to continue.'
	'Mistress of all shuddered, grabbing you by the hair. She finished.'
	'-Well, what reward awaits me, Mistress?'
	'-No ...'

	act 'Uncomprehending look':gt 'lesbidomhouse', 'ev14'

	act 'Leave':
		lesbiQW = -1
		gt 'street'
	end
end

if $ARGS[0] = 'ev14':
	cla
	*clr
	lesbiQW = 5
	'<center><img src="images/qwest/lesbi9.jpg"></center>'
	'-Chtoooo? You told me then that will be rewarded!'
	'-This is another lesson, the girl can not give awards at once. She must understand that to get something not so easy. All go.'
	'I''ll meet you tomorrow!'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev15':
	cla
	*clr
	lesbiday = day
	minut += 30

	if callnm = 1:
		$callnm = 'nipple'
	elseif callnm = 2:
		$callnm = 'analschitsa'
	elseif callnm = 3:
		$callnm = 'davalka'
	elseif callnm = 4:
		$callnm = 'spermoedka'
	end

	'-Come, <<$callnm>>'
	'-Hello, Mistress.'
	'-Well, you know what to do to get the reward.'

	act 'Lick Mistress':gt 'lesbidomhouse', 'ev16'
end

if $ARGS[0] = 'ev16':
	cla
	*clr
	minut += 5
	asslick += 1
	horny += 20
	energy += 1
	'<center><img src="images/qwest/lesbi4.jpg"></center>'
	'You began to lick pussy Mistress first and then unwashed anus ... you could not understand why, but you start to like it.'
	'When the hostess enjoyed in abundance, she stood up and said:'
	'-Well, slut, and now it''s time to reward you.'
	'-And what is the reward? - <<$name>> did not even resent her so called, just so she felt.'
	'Get up-cancer.'

	act 'Do as told':gt 'lesbidomhouse', 'ev17'
end

if $ARGS[0] = 'ev17':
	cla
	*clr
	minut += 5
	horny = 95
	'<center><img src="images/qwest/lesbi5.jpg"></center>'
	'You, in anticipation of bliss, got on all fours and relaxed.'
	'First pussy entered one finger and began to move her.'
	'then the second.'
	'Him third.'
	'You started having fun ... and were on the verge, as in pussy entered the fourth finger.'
	'Vagina start to move apart more and you hit the pain, you cried.'
	'But if he had not heard the hostess, she began to insert whole hand.'
	'You screamed in pain again and were ready to jump to his feet.'

	act 'Yell and go':gt 'lesbidomhouse', 'ev18'
	act 'Meekly tolerate':gt 'lesbidomhouse', 'ev19'
end

if $ARGS[0] = 'ev18':
	cla
	*clr
	horny = 0
	minut += 5
	lesbiQW = 6
	'<center><img src="images/qwest/pnx.jpg"></center>'
	'-Fuck you, pervert crappy!! and is a reward for your fucking ass! Fuck you!'
	'You grabbed clothes and rushed naked in his apartment.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev19':
	cla
	*clr
	minut += 5
	lesbiQW = 7
	sub += 5
	vagina += 5
	lesbian += 1
	horny = 5
	orgasm += 1
	'<center><img src="images/qwest/lesbi6.jpg"></center>'
	'You were wildly painful, but you, no matter what, suffered pain. Even the tears gushed from his eyes. But the hostess continued to move his hand, and you did not even know that your pussy can get into a fist. But in the end, you even felt like it, and you hit an orgasm.'

	act 'Leave':gt 'street'
	act 'Thank mistress':gt 'lesbidomhouse', 'ev20'
end

if $ARGS[0] = 'ev20':
	cla
	*clr
	lesbiQW = 8
	minut += 3
	'<center><img src="images/qwest/lesbi4.jpg"></center>'
	'You have got to the vagina mistress, so thank her for such a powerful orgasm, which she grinned and said:'
	'"And you''re a quick study, <<$name>> Do you just learn, or you just like to do whatever you ordered?"'

	act 'Indignant':gt 'lesbidomhouse', 'ev18'
	act 'Silently licking pussy':gt 'lesbidomhouse', 'ev21'
end

if $ARGS[0] = 'ev21':
	cla
	*clr
	lesbiQW = 9
	sub += 5
	lesbian += 1
	minut += 30
	'<center><img src="images/qwest/lesbi4.jpg"></center>'
	'After a few minutes of work vvash skillful tongue, Mistress shuddered in orgasm. You said nothing, got up and went home'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev22':
	cla
	*clr
	minut += 5
	horny += 50
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'By thought, "fuck this bitch." But after all the stairs, remembered how dirty ass licked and how do you like it ...'
	'Damn, she used me, and not taught ... And to hell with it ..'
	'thought you decided to visit pervert, but just to lick her.'
	'-Mistress, I came here this .. well .. in general ..'
	'-Like to obey me? - The hostess asked - well, but you insulted me. This is not good!'
	'-I am ready to lick his guilt in front of you ... but without it, your fisting ..'
	'-That would be little need to do something else!'
	'I hope no-battering?'
	'-do not worry.'

	act 'Correct their actions':gt 'lesbidomhouse', 'ev23'
end

if $ARGS[0] = 'ev23':
	cla
	*clr
	lesbiday = day
	lesbiQW = 8
	sub += 1
	lesbian += 1
	minut += 30
	asslick += 1
	'<center><img src="images/qwest/lesbi7.jpg"></center>'
	'You have again started to lick Mistress of all places and you will definitely like it.'

	if sub < 50 or vaf < 100:'"What does it mean to me" - you thought'

	'-Well, now on his knees and open your mouth - Hostess said.'

	act 'Get on your knees and open your mouth':gt 'lesbidomhouse', 'ev24'
end

if $ARGS[0] = 'ev24':
	cla
	*clr
	minut += 5
	pee += 1
	swallowpee +=1
	sweat = 2
	orgasm += 1
	horny += 5
	water += 1
	'<center><img src="images/qwest/lesbi8.jpg"></center>'
	'Mistress stood over you and start writing your mouth. Urine hit all over the face, mouth and body.'
	'You covered indescribable orgasm seems like you become obey.'
	'Thank you once again licked pussy dripping with drops of urine. Pocle this hostess pointed to the door.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev25':
	cla
	*clr
	minut += 5
	horny += 25
	'<center><img src="images/qwest/lesbi.jpg"></center>'
	'You came to the hostess for a new portion of fisting, but she said that you did very poorly, without thanking her, and so do not get anything.'
	'Strange, but such a ban have filed nly'

	act 'Learn how to make amends':gt 'lesbidomhouse', 'ev26'
end

if $ARGS[0] = 'ev26':
	cla
	*clr
	minut += 5
	horny += 25
	'<center><img src="images/qwest/lesbi10.jpg"></center>'
	'To start the hostess took off panties (smell of a dirty hit out of the vagina), and ordered you to do regular work tab.'

	act 'Lick':gt 'lesbidomhouse', 'ev23'
end

if $ARGS[0] = 'ev28':
	cla
	*clr
	minut += 5
	horny += 25
	lesbiday = day
	energy += 1
	'<center><img src="images/qwest/lesbi11.jpg"></center>'
	'You came to the hostess for a new portion of feces and golden rain, among other things - her pussy licked'
	lrnd = rand(1, 10)

	if lrnd > 7:
		'During all these perversions you covered orgasm'
		orgasm += 1
	elseif lrnd <= 7:
		horny += 75
		'Unfortunately, you do not get an orgasm, but very excited.'
	end

	pee += 1
	swallowpee += 1
	asslick += 1
	sweat = 2
	lesbian += 1
	lesbimeet += 1

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev29':
	cla
	*clr
	minut += 5
	horny += 25
	'<center><img src="images/qwest/lesbi3.jpg"></center>'
	'You came to the hostess once again to lick her all that you can, but she said that she had a small gift for such a nice girl like you, but the tongue to start work will still have to'

	act 'Do what you came for':gt 'lesbidomhouse', 'ev23'
end

--- lesbidomhouse ---------------------------------
# mainQW
minut += 15
'<center><img src="images/qwest/main.jpg"></center>'
'(Karin) - "Hmm, strange. Seems I begin to understand what was happening. Get in the car, you''ll go check."'
'You sat in the back seat black jeep. Juugo sat behind the wheel, and Karin village near you. Karin began to feel you. "Interesting. I understand you had an orgasm and orgasm during part of the force Rikudo, male power, transformed into your power."'
!!'(Karin) -'

act 'I am now a magician?':
	cla
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'(You) - I am now a magician?'
	'(Karin) - Yeah, and you''re still the world champion on the run, you also have the legs and still you juggler, you also have hands. You catch? Mag is the person administering the magic power you have it there, but it does not manage you know how.'

	act 'So teach me!':
		cla
		'(You) - So teach me!'
		'(Karin) - Teach? I am in life nobody taught magic. Besides, I do not battle mage. I rather magical gift. I feel better all the magic, and at any distance. Plus fly and can modify organic life forms. But understand, to a greater extent is a gift, not learning. I''m just learning honed his gift.'
		'(You) - Well, at least what it is you can teach me.'
		'(Karin) - Just the basics.'
		'(Juugo) - come, come out, ladies.'
		'You got out and slammed the door. Gone to the lane of metal doors. They opened Juugo and Karin missed you forward.'

		act 'Enter the door':
			cla
			*clr
			health = vital * 10
			willpower = intel * 5 + will * 5
			manna = (intel * magik) + vital * 5 + rikudo
			clr
			gs 'stat'
			'<center><img src="images/qwest/lab.jpg"></center>'
			'The building was the laboratory. A wide variety of stands and equipment racks with different flasks and bottles.'
			'(Karin) - Welcome to my lab. Here I explore and live. Undressed and lie down on the couch, I will search for you.'
			act 'Lie on the couch':
				cla
				*clr
				clr
				gs 'stat'
				minut += 30
				killobj
				if oldobjmenu = 0:
					addobj 'Character'
					addobj 'See'
					addobj 'Others'
					addobj 'Menu'
				else
					addobj '<font color="green">Character</font>'
					addobj 'Skills'
					addobj 'Statistics'
					addobj 'Magic'
					addobj 'Face'
					addobj 'Body'
					addobj 'Clothing'
					addobj 'Tattoos'
					addobj 'Piercing'
					addobj 'Diary'
					addobj 'Emergency exit'
					addobj 'Update'
					addobj 'Menu'
					addobj 'New Menu'
					addobj 'Cheat Menu'

					if disable_autosave = 1:
						addobj 'enable autosave'
					else
						addobj 'disable autosave'
					end
				end

				'<center><img src="images/qwest/main1.jpg"></center>'
				'You undressed and lay down on the couch, Karin began to examine you. She dabbed what that charms to you and use a variety of devices. Cherz half hour examination, she sighed and told you to get dressed.'
				'You got up from the couch and dressed. You asked Karin "So what? Teach me anything else?"'
				'(Karin) - Okay. But only in theory. Listen closely and listen hard, I will not repeat. To begin to tell about magic. Magical energy in Asian culture it is called chakra is produced by all living organisms. This vital energy, deprived her body begins to slowly die. Striking symptom of the lack of magical energy is in a bad mood. In itself it can not kill, but it undermines the mind, body and the mind exhausting, eventually either the body does not survive, or mind.'
				'That is magical energy there in the grass, and trees, and people do not have it in dead matter. It is the energy of life itself, what awakens the lifeless living. She and you have been and there, the body protects itself by itself, prohibiting use this energy. This exhausts the body and can kill him. Mages are able to simply bypass the body''s defenses and separating themselves from the magical energy to convert it into what that action. The main task of a magician is the maximum their potential and learn to draw your energy as much as possible. But mages can not scoop up more energy than they contain. In something you''re lucky you came in as much energy as none magician asked. You just need to learn how to use it. As I have understood, your orgasms are capable of handling energy Rikudo in his own. But each new stage will be harder given. Maybe there are some ways to recycle what Rikudo energy in your own. But most importantly, your magical energy supply is almost exhausted, unlike other magicians. You know, you''re theoretically the most powerful magician in the world, as the Rikudo was the strongest in history. Perhaps there is art of magic that can only work with the force Rikudo. Most likely in the scrolls are in the dungeon were just what that spells.'
				'(You) - Igor! Igor took one of the scrolls!'
				'(Karin) - Just do not think I''ll be for you to solve your problems. If you want to look for his own Igor.'
				'(You) - I have no idea where he lives. May pay a visit to the trench.'
				'(Karin) - Do you think the Order of Dawn retreated from such findings? Hey, I see you do not quite understand what the Order of Dawn. This is not what that whipping boys. There all the magicians of the highest level. Neither I nor Juugo no good even hold a candle to any of them. Any one of them with us razotret Juugo without straining. They force their combat experience and unique technology. Do not mess with these guys, they are pros in their field. Their main business of destruction of other magicians and capture demons.'
				'(You) - What else for demons?'
				'(Karin) - Demons demons, creatures come to us from other worlds. Possible and Rikudo was a demon, but demons unlike him being though with terrible force, but blunt and aggressive. Something like beasts woven from pure magic.'
				'(You) - a fig. Hey, you can turn me back into a man?'
				'(Karin) - Can. But I will not. You have no idea how much energy it took me, I squeezed myself to dry and Juugo. I barely had enough energy. Now I do not have enough of her physically on the energy consumption of such mad I lost four of her forever. And there''s more to consider now that your body begins to prisposablivatsya magic and I have even harder. This will be possible only if you Bleed is magical at least level 10 and pass me all your energy forever. I can make you again the same, but you''ll never be a magician, this path will be forever closed to you.'
				'(Karin) - You are not to look too far into the future. Develop your body, learn to fight, copy magical force coaches mind. Gradually everything will rise to the location at which all should be.'

				act 'Leave':gt 'down'
			end
		end
	end
end

--- mainQW ---------------------------------
# tobiQW
if $ARGS[0] = 'start':
	cla
	*clr
	tobiQW = 1
	minut += 60
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(Toby) - Mishan Hi, how''s it going?'
	'You just dumbfounded surprise in your bedroom is Toby and he obviously knows who you are.'

	act 'How did you find me?':gt 'tobiQW', '1'
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - How did you find me?'
	'(Toby) - Oh, okay, not that it was difficult. Our organization is not always strongly underestimate. Even the owner Karin miscalculated.'

	act 'The owner Karin?':gt 'tobiQW', '2'
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - The owner Karin?'
	'(Toby) - Oh, holy simplicity. Of course, Karin saved you from the evil Toby and teach you magic. She Horoshoo and ugly Toby bad. What naivety. Karin is a pawn in someone else''s game.'
	'(Toby) - sit down, we have a long conversation to kill you I''m not going, if built, would not you sharpen fritters.'
	'You sat down on the bed. Toby began to talk.'
	'(Toby) - When I took the amulet is not taking you, I miscalculated, I did not know that the power passed to you. When I returned to the room, you were gone, there was no trace of who is clearly very well cleaned up all traces. This someone is not weaker than me. Remember this fact, Karin silenok not enough so close to me.'
	'(Toby) - The next day I find out about your alleged death. And here the owner Karin made his biggest mistake.'
	'(You) - what? Everything seems to go smoothly.'
	'(Toby) - Yes, all passed smoothly, we waited for the funeral of the body and then it got. Perfect copy, master work, Karin can not do it, but I did not even know about its existence.'
	'(Toby) - But the owner Karin though knows a lot about the Order of Dawn, but still not enough. He did not know that Payne has the ability to find the souls of the dead and bring them back to life. We got the body for life and it turned out that this man has nothing to do with you. Someone just took a passerby in the street, he created your appearance and killed him. Payne also has the ability to see everything in a person, even when he is born, and the eyes of this man, unfortunately it kills guinea spell. Payne saw everything.'
	'(You) - Nifiga yourself is that even for such Payne?'
	'(Toby) - Payne, the true owner of all that is in the tomb. He is a true master of the force that is in you. He avatar Rikudo, the living embodiment of God, capable of destroying the city in one motion, raise the dead, to see through people, to change their body as he pleases, to have as many bodies at the same time, control the weather, gravity, live in several worlds, to see whole continents his eyes so that even the mouse does not slip from his sight, and God knows what he owns, it is incomprehensible even to me.'
	'You shake your head, puzzled. This very cool guy Payne has managed the same way for him to pass me.'

	act 'So who''s the boss and that Karin does he want?':gt 'tobiQW', '3'
end

if $ARGS[0] = '3':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - So who''s the boss and that Karin does he want?'
	'(Toby) - This is the fun part! But to continue in order. When Payne checked memory corpse depicting you, he did not see the face of magician, but I heard his voice, vile snake hiss, it could only be Orochimaru.'
	'(You) - Orochimaru? Never heard of such a thing.'
	'(Toby) - not surprising. He was not looking for that would head off to tear only dead mages and lazy. But his name did not even try to say out loud, and then suddenly courted him on his head, he is a real threat to the powerful magicians. We were once close friends with him, he was in the Dawn.'
	'(Toby) - He is an exceptionally gifted magician, a very wise, ancient and immortal sorcerer. Owns nearly all the possible techniques of magic, many of his techniques beyond comprehension.'
	'(Toby) - But Orochimaru pay dearly for immortality. There is no eternal life without eternal fee for it. His real body has long been dead, he lives in the wrong bodies. These bodies are called donor vessels, they receptacle of his soul. Vessels but do not live long, only three or four years, then the vessel rejects soul Orochimaru. And Orochimaru is limited by the strength of the vessel.'
	'(Toby) - So, after examination of the body, it became clear you out from under our nose led Orochimaru. We began to stalk him, Payne can differentiate amongst all that is in the rain, it was he who sheds it so often. We tracked down Orochimaru manner he once showed his face snake in the rain. But there was no sign that he took power himself. We have concluded that, as before, you alive, Orochimaru technology allow crank most unexpected focus.'
	'(You) - Since you tracked me and why I need Orochimaru.'
	'(Toby) - Ah youth stupid. Yes Orochimaru wants to make your body a vessel for the soul. He trained with the help of Karin and you developed, what would your body came into full force, do not forget, its level is tied to the strength of the vessel.'
	'(Toby) - Karin spit at you like, it develops your body for what would be her master Orochimaru could use it as a new vessel. Do you even know what fate has prepared for you, Karin? You just erase your place and take Orochimaru.'
	'You think "Damn, I''m in between a rock and a hard place Toby as Orochimaru, and what to do now?"'
	'(Toby) - To change your floor Orochimaru made you useless for Payne and me, we do not need you or do not need. Frankly, we spit on you now. I continued to look for you, but out of a desire to razobratsya situation. Understand Orochimaru plans to this effect.'
	'(Toby) - I had to use and Zetsu as a spy, and that would force Payne track all magicians, we found Karin, but it is not known to us, but we found Juugo, and only then we will know exactly what he represents. He experiment Orochimaru.'
	'(Toby) - Then Payne saw you. How do you go to Karin and she teaches you, Paine saw as you leap through the levels magicity. Any magician decades to grow your current level. How old are you this time it took? You were practicing a technique for an hour, and magicians for years they are taught. It became clear that you imagine yourself out. So I came to visit you.'

	act 'And you can not make me a man again?':gt 'tobiQW', '4'
end

if $ARGS[0] = '4':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - And you can not make me a man again?'
	'Toby shook his head.'
	'(Toby) - Do not think that magicians are all the same, if one could that something else can accurately. No, I have no idea how Orochimaru did what he did to you. And it was he, not Karin. Did not you surprised that she even treat you can not? It is too weak for such tricks with the body.'
	'(Toby) - And now to the point. Yeah, you''re not interested in us, we really can not take your power now. But this does not mean that we just give up such a powerful vessel Orochimaru.'
	'(Toby) - I would have already tried to kill Orochimaru, or sent Payne to do it, I think Payne would have easily killed him in battle. The problem is that Orochimaru is too great and he is able to avoid fighting.'
	'(Toby) - We can not corny podobratsya him for what would kill him.'

	act 'I doubt that I could do it':gt 'tobiQW', '5'
end

if $ARGS[0] = '5':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - I doubt that I could do it'
	'(Toby) - I have no doubt. You can not do it. But we are of you and do not require this. We want to drive Orochimaru trapped.'
	'(Toby) - You prodolzhish as if nothing had happened with Karin will learn. We will prepare you parallel that you could cope with Karin and Juugo. When the time comes, you go and kill Karin and Juugo. If it makes any of the Dawn who, Orochimaru all understand, and so he will try to grab you myself. He needs you as a vessel, and so it just did not unhook from you.'
	'(Toby) - Here we are, and will lay the ancient serpent, put a point in its history. Well, how''s the plan?'

	act 'And if I refuse?':gt 'tobiQW', '6'
end

if $ARGS[0] = '6':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - And if I refuse?'
	'(Toby) - Then I''m sorry, nothing personal, but I''m going to kill you right now. Orochimaru did not want you to give me, I do not want to give it you.'

	act 'If Orochimaru die, I''ll always be a woman?':gt 'tobiQW', '7'
end

if $ARGS[0] = '7':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - If Orochimaru die, I''ll always be a woman?'
	'(Toby) - In any case, you''ll always be a woman. Orochimaru never will refuse the temptation to take power into their own hands Rikudo and return you to your previous form will mean for him to give this power to me, to which he would not, even under pain of death.'

	act 'What about Tsukuemi? Is that true?':gt 'tobiQW', '8'
end

if $ARGS[0] = '8':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - What about Tsukuemi? Is that true?'
	'(Toby) - I have no idea what you wove Karin. Just tell the truth. Our Order of Dawn is not a rigid structure, rather we minded. Payne and I have to make strategic decisions, and the rest for various reasons they operate.'
	'(Toby) - We are all united by one goal, maintaining Tsukuemi in working order, for this we have to regularly catch demons in other worlds and fill them Tsukuemi force. It is heavy and rewarding work. And we do it for the sake of humanity that would have existed.'
	'(Toby) - Yes, you heard right, we do it for the sake of people. We remember the days when people knew about magic, it was a time of constant war, humanity choking blood. Magee went to war at the age of 6 - 10 years old, survived to at least 16 units. All fought against all. Violence begets violence. Me in 7 years during the battle crushed the right side of the face. I lost an eye and became compelled to hide what''s left of my face behind the mask. I went mighty magician, who was later killed. Everyone I knew and loved, killed, and I could not do anything about it. You just can not imagine a world in which almost all magicians with forces capable of destroying entire cities. Banal drunken brawl in a bar wrapped in a bloody mess with thousands of victims. People ran wild and destroy each other. Mankind fell on the edge of a precipice. Then I decided to put an end to this massacre not died.'
	'(Toby) - I founded the Order of Dawn. In the beginning we were just mercenaries, we needed money, we have taken in order only very strong mages, then I met Payne, he also wanted to stop the eternal war mages. We combined usliya captured demons and I created Tsukuemi.'
	'(Toby) - Tsukuemi makes people not believe in magic, it makes forget about it. Gradually reduced the number of magicians. And finally forgot about magic at all.'
	'(Toby) - Of course, this situation is not like the other magicians. Therefore, we are in a constant struggle. At Dawn has no friends, only enemies. We took upon themselves the burden and bear your cross for mankind as a whole.'

	act 'You''re going to teach me?':gt 'tobiQW', '9'
end

if $ARGS[0] = '9':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - What about Tsukuemi? Is that true?'
	'(Toby) - I have no idea what you wove Karin. Just tell the truth. Our Order of Dawn is not a rigid structure, rather we minded. Payne and I have to make strategic decisions, and the rest for various reasons they operate.'
	'(Toby) - We are all united by one goal, maintaining Tsukuemi in working order, for this we have to regularly catch demons in other worlds and fill them Tsukuemi force. It is heavy and rewarding work. And we do it for the sake of humanity that would have existed.'
	'(Toby) - Yes, you heard right, we do it for the sake of people. We remember the days when people knew about magic, it was a time of constant war, humanity choking blood. Magee went to war at the age of 6 - 10 years old, survived to at least 16 units. All fought against all. Violence begets violence. Me in 7 years during the battle crushed the right side of the face. I lost an eye and became compelled to hide what''s left of my face behind the mask. I threw a dying friend, but I''m not dead, I went mighty magician, who was later killed. Everyone I knew and loved, killed, and I could not do anything about it. Then I decided to put an end to this massacre not died.'
	'(Toby) - I founded the Order of Dawn. In the beginning we were just mercenaries, we needed money, we have taken in order only very strong mages, then I met Payne, he also wanted to stop the eternal war mages. We combined usliya captured demons and I created Tsukuemi.'
	'(Toby) - Tsukuemi makes people not believe in magic, it makes forget about it. Gradually reduced the number of magicians. And finally forgot about magic at all. I stripped the magic world of magic. People are not ready for this level of forces.'
	'(Toby) - Of course, this situation is not like the other magicians. Therefore, we are in a constant struggle. At Dawn has no friends, only enemies but we still have a whole bunch of magicians who managed to avoid the influence Tsukuemi example preserved a Hidden Order Foliage, they at every opportunity we try to insert a stick in the wheel. But we shouldered this burden voluntarily accept his cross for the sake of humanity as a whole, and not wanting to assert themselves a handful of magicians. Particularly zealous mages going to seize power we consume, those who try to intrude into the work Tsukuemi we also consume. Others do not touch until they climb on the rampage. Well, except for the order hidden in the foliage, with them we did not reconcilable war.'

	act 'You''re going to teach me?':gt 'tobiQW', '10'
end


if $ARGS[0] = '10':
	cla
	*clr
	'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
	'(You) - You''re gonna teach me?'
	'(Toby) - With this, there is something which challenges. My techniques you can not learn. They are too high. Payne forces generally something otherworldly, what can you''ll be able to learn something from him, but not now. I wish that you would teach Kakuzu. But he has a very nasty character. He will not teach you for free, even if I asked. He is the oldest of living on the planet, and the most greedy, I will ask him what he would have taught you, but not anger him, and he will kill you, no joke. I''m not just saying that Kakuzu most harmful of all the old man living, he did not just kill his teammates. I forgive him everything only from the fact that he owns the only light at the same time by all schools of magic.'
	'(Toby) - Here is harmful to this old man, I want you to send. Find him in the northern region. Here''s a piece of paper with his address. And I have to go.'
	'After these words around the eye Toby creates a vortex in which it pulled into seconds.'

	act 'Get out of bed':gt 'bedr'

	act 'Try to sleep':gt 'bed2', 'dosip'
end

--- tobiQW ---------------------------------
# cafe2
if $ARGS[0] = 'beginning':
	cla
	*clr
	'<<$boybody>> <<$boybod>> <<$boyface>>, introduced as <<$boy>>.'
	deyst = rand(1, 100)

	if deyst <= 25:
		'<<$boy>> has invited you to dance.'

		act 'Dance':gt 'Cafe2', 'dance'
		act 'Otshit':gt 'street'
	elseif deyst > 25 and deyst <= 50:
		'<<$boy>> sat down at your table and ordered a drink and a snack.'

		act 'Drink':gt 'Cafe2', 'booze'
		act 'Otshit':gt 'street'
	elseif deyst > 50 and deyst <= 75:
		'<<$boy>> has invited you to join the party on which he walks.'

		act 'Agree':gt 'Cafe2', 'kompashka'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst > 75:
		'<<$boy>> began to stick to you and try to take pictures. <<$boy>> offered to go with him to the toilet.'

		act 'Agree':gt 'Cafe3', 'toilet'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	end
end

if $ARGS[0] = 'dance':
	cla

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

	minut += 3
	gs 'stat'
	'<center><img src="images/etogame/dance.jpg"></center>'
	deyst = rand(1, 100)

	if deyst <= 25:
		'During the dance <<$boy>> you confidently and correctly conducted and not molested. His strong hands held tightly your waist. Finally the song ended.'

		act 'Finish the dance':gt 'Cafe2', 'dance2'
	elseif deyst > 25 and deyst <= 80:
		horny += 5
		clr
		gs 'stat'

		if dick > 15 and dick < 18:
			$didanc = 'During the dance, you feel like something hard between his legs pressed against your stomach.'
		elseif dick >= 18:
			$didanc = 'During the dance, you feel his cock pushing against your stomach hardens and grows, you feel that he''s a big, vskidku about <<dick>> centimeters.'
		elseif dick <= 15:
			$didanc = ''
		end

		'During the dance <<$boy>> gently hugged you and stroking your back down to the hips. His strong hands pressed against your fragile body to him, pressing your soft breasts <<tits>> the size of his body. <<$didanc>> Finally, the song ends.'

		act 'Finish the dance':gt 'Cafe2', 'dance2'
	elseif deyst > 80:
		horny += 8
		clr
		gs 'stat'
		'During the dance <<$boy>> paw is the ass, you clung to his vzhimaya your tender flesh in his and wants to kiss you.'

		act 'Kiss':
			cla

			if lip = 0:$lipdance = 'thin lips'
			if lip = 1:$lipdance = 'lips'
			if lip = 2:$lipdance = 'plump lips'
			if lip = 3:$lipdance = 'plump lips'
			if lip = 4:$lipdance = 'thick lips'

			'<<$boy>> your kisses <<$lipdance>> pushing them and poking his wet tongue in your mouth.'

			act 'Chew language':
				cla
				horny += 8

				if lip = 0:$lipdance = 'thin lips'
				if lip = 1:$lipdance = 'lips'
				if lip = 2:$lipdance = 'plump lips'
				if lip = 3:$lipdance = 'plump lips'
				if lip = 4:$lipdance = 'thick lips'

				if dick > 15 and dick < 18:
					$didanc = 'pants it becomes firm and <<$boy>> is pressed to your stomach its embarked member.'
				elseif dick >= 18:
					$didanc = 'his cock pushing against your stomach hardens and grows, it''s big, vskidku about <<dick>> centimeters.'
				elseif dick <= 15:
					$didanc = 'in his pants that is uvilichivaetsya'
				end

				'You started passionately suck tongue kissing a guy and his own <<$lipdance>>. You feel like <<$didanc>>'
				'Finally the song ends and you break the kiss.'
				deyst = rand(1, 100)

				if deyst <= 75:
					'Keeping your waist and hold <<$boy>> offers to go to his home.'

					act 'Agree':gt 'Cafe3', 'house'

					if horny < 75:
						act 'Otshit':gt 'street'
					end
				elseif deyst > 75:
					'Keeping your waist and hold <<$boy>> offers to go to the toilet and continue.'

					act 'Agree':gt 'Cafe3', 'toilet'

					if horny < 75:
						act 'Otshit':gt 'street'
					end
				end
			end

			act 'Avoid kissing':
				cla
				horny += 8

				if lip = 0:$lipdance = 'thin lips'
				if lip = 1:$lipdance = 'lips'
				if lip = 2:$lipdance = 'plump lips'
				if lip = 3:$lipdance = 'plump lips'
				if lip = 4:$lipdance = 'thick lips'

				if dick > 15 and dick < 18:
					$didanc = 'pants it becomes firm and <<$boy>> is pressed to your stomach its embarked member.'
				elseif dick >= 18:
					$didanc = 'his cock pushing against your stomach hardens and grows, it''s big, vskidku about <<dick>> centimeters.'
				elseif dick <= 15:
					$didanc = 'in his pants that is uvilichivaetsya'
				end

				'You behave passively and try to clean your mouth away from the annoying guy first, but it takes him a little and you feel his hands firmly squeeze your ass, then his hands raised above and it takes you to his chest. You feel like <<$didanc>>'
				'Finally the song ends and you break his arms.'
				deyst = rand(1, 100)

				if deyst <= 75:
					'Keeping your waist and hold <<$boy>> offers to go to his home.'

					act 'Agree':gt 'Cafe3', 'house'

					if horny < 75:
						act 'Otshit':gt 'street'
					end
				elseif deyst > 75:
					'Keeping your waist and hold <<$boy>> offers to go to the toilet and continue.'

					act 'Agree':gt 'Cafe3', 'toilet'

					if horny < 75:
						act 'Otshit':gt 'street'
					end
				end
			end
		end

		if horny < 75:
			act 'Stop dancing and leave':gt 'street'
		end
	end
end

if $ARGS[0] = 'dance2':
	cla
	deyst = rand(1, 70)

	if deyst >= vnesh:
		'The dance ended, and <<$boy>> kiss you goodbye'

		act 'Say goodbye':gt 'kafe', 'start'
	elseif deyst < vnesh:
		'The dance ended, and <<$boy>> suggested to go to him'

		act 'Agree':gt 'Cafe3', 'house'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	end
end

if $ARGS[0] = 'booze':
	cla
	minut += 30
	gs 'stat'
	'You drink with a guy, and <<$boy>> tells a lot of interesting and interested in you.'
	deyst = rand(1, 100)

	if deyst < 75:
		'It seems you''ve had enough and should go home. <<$boy>> kiss you goodbye'

		act 'Say goodbye':gt 'kafe', 'start'
	elseif deyst >= 75 and deyst < 95:
		'It seems you''ve had enough and should go home. <<$boy>> suggested to go to him'

		act 'Agree':gt 'Cafe3', 'house'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst >= 95:
		'You drank to pig squeal and <<$boy>> began to stick to you. He kissed you and caressed, and then offered to go with him to the toilet.'

		act 'Agree':gt 'Cafe3', 'toilet'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	end
end

if $ARGS[0] = 'kompashka':
	cla
	minut += 30
	gs 'stat'
	'You drink in society guys and girls. <<$boy>> obschaetsya and flirts with you.'
	deyst = rand(1, 100)


	if deyst < 60:
		'Think you''ve had enough and should go home. <<$boy>> kiss you goodbye'

		act 'Say goodbye':gt 'kafe', 'start'
	elseif deyst >= 60 and deyst < 90:
		'Think you''ve had enough and should go home. <<$boy>> suggested to go to him'

		act 'Agree':gt 'Cafe3', 'house'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst >= 90:
		'You drank to pig squeal and <<$boy>> began to stick to you. He kissed you and caressed, and then offered to go to rest with the company.'

		act 'Agree':gt 'Cafe3', 'kompashka'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	end
end

--- cafe2 ---------------------------------
# cafe3
if $ARGS[0] = 'house':
	cla
	*clr
	money += 100
	minut += 15
	gs 'stat'
	'<<$boy>> pay your bill and hailed a taxi.'
	'You sat down with him in the backseat of the car. <<$boy>> put his hand on your knee and began stroking it getting higher to your pussy.'

	act 'Enjoy caresses':
		cla
		minut += 15
		horny += 15
		gs 'stat'
		dynamic $venerasiak
		'<<$boy>> made it to your pussy and started to caress her fingers.'

		act 'Try to remove his hands':
			cla
			minut += 15
			horny += 10
			gs 'stat'
			'You tried to remove his hands from the crotch guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'

			act 'Come':gt 'BDsex', 'start'
		end

		act 'Hands caress his cock':
			cla
			minut += 15
			horny += 10
			gs 'stat'
			'You got into the pants to the guy and got him <<dick>> centimeter members began to caress his hands.'
			derand = rand(0, 100)

			if derand >= 95:
				'<<$boy>> groaned and took you by the neck began to move your face to its members.'

				act 'Take by mouth':
					cla
					*clr
					minut += 15
					horny += 10
					guy += 1
					bj += 1
					gs 'stat'
					'<center><img src="images/studia/car.gif"></center>'
					'You bent bringing her face to the groin guy and his lips wrapped around his cock started sucking him.'
					gs 'oral', '0'
					'Finally the guy filled your mouth with his hot sperm that you had nowhere to go and you swallow it. The taxi stopped. And <<$boy>> you put it out on the street.'
					swallow += 1
					cumlip += 1

					act 'Leave':gt 'street'
				end

				act 'Try to remove his hands':
					cla
					minut += 15
					horny += 10
					gs 'stat'
					'You tried to remove his hands from his head guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'

					act 'Come':gt 'BDsex', 'start'
				end
			else
				act 'Come':gt 'BDsex', 'start'
			end
		end
	end

	act 'Try to remove his hands':
		cla
		minut += 15
		horny += 10
		gs 'stat'
		'You tried to remove his hands from the crotch guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'

		act 'Come':gt 'BDsex', 'start'
	end
end

if $ARGS[0] = '0':
	cla
	*clr
	$nameV = $boy
	minut += 15
	gs 'stat'
	deyst = rand(1, 100)

	if deyst < 70:
		:vag
		'<<$boy>> puts you on the bed and undressed.'
		deysts = rand(1, 3)

		if deysts = 1:
			guy += 1
			sex += 1
			vagina += 1
			picrand = rand(1, 5)
			'<center><img src="images/pics/vagmis<<picrand>>.jpg"></center>'

			pose = 0
			gs 'orgasm', 'start'

			'<<$boy>> pushes your legs and enters you.'
			!!'Dick like a hammer hammer inside you, you are very nice and you are ready to finish.'

			act 'Leave':gt 'street'
		elseif deysts = 2:
			guy += 1
			sex += 1
			vagina += 1
			cumass += 1
			'<<$boy>> cancer puts you and enters you'
			!!'<<$boy>> pushes your legs and enters you.'
			picrand = rand(1, 5)

			pose = 1
			gs 'orgasm', 'start'

			act 'Leave':gt 'street'
		elseif deysts = 3:
			guy += 1
			sex += 1
			cumass += 1
			'<<$boy>> lays down on the bed and puts you over the top, you feel his penis enters you'
			'His cock went in you and you started to jump on his elde.'
			picrand = rand(1, 5)
			'<center><img src="images/pics/vagcow<<picrand>>.jpg"></center>'
			pose = 0
			gs 'orgasm', 'start'

			act 'Leave':gt 'street'
		end
	elseif deyst >= 70 and deyst < 85:
		'<<$boy>> tells you that he wants you to suck it'

		act 'Refuse':gt 'cafe3', '0'

		act 'Take by mouth':
			guy += 1
			bj += 1
			throat += 1
			vaf += 1
			picrand = rand(1, 10)
			'<center><img src="images/pics/bj<<picrand>>.jpg"></center>'
			'<<$boy>> pulls his dick'
			'You took his penis in her mouth and began to suck.'
			'<<$boy>> moans and that''s to finish.'

			act 'Remove the member of his mouth':
				*clr
				cla
				bjrand = rand(1, 100)

				if bjrand < 50 and vaf > 100:'You have time to take out of his mouth and a member <<$boy>> commits past you.'
				if bjrand >= 50 or vaf <= 100:cumface += 1 & '<<$boy>> ends up on your face.'

				picrand = rand(1, 5)

				if bjrand >= 50 or repa = 6:'<center><img src="images/pics/facial<<picrand>>.jpg"></center>'

				'You try to wipe off the face of the sperm, but the sperm erased bad.'

				act 'Leave':gt 'street'
			end

			act 'Suck on':
				*clr
				cla
				vaf += 1

				picrand = rand(1, 10)
				'<center><img src="images/pics/cum<<picrand>>.jpg"></center>'
				'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'
				act 'Swallow':
					cla
					vaf += 2
					cumlip += 1
					'<<$boy>> looks like you swallow sperm.'

					act 'Leave':gt 'street'
				end

				act 'Spit out':
					cla
					'You go into the bathroom and there spits cum'

					act 'Leave':gt 'street'
				end
			end
		!!act 'Leave':gt 'street'
		end
	elseif deyst >= 85:
		'<<$boy>> tells you that he wants you in the ass otimet'

		act 'Refuse':gt 'cafe3', '0'

		act 'Agree':
			cla
			guy += 1
			anal += 1
			anus += 1

			if lubri > 0:lubri = lubri - 1

			cumass += 1
			picrand = rand(1, 10)
			'<center><img src="images/pics/anal<<picrand>>.jpg"></center>'
			'<<$boy>> puts you cancer and lubricates your ass somehow cream. You feel like that it boils down to you in tight anus.'
			'Sharp pain in the anus smenyaetsya easy to treat. <<$boy>> you fucked in the ass smoothly, that would not break anything.'
			'You feel like your anus is filled with what that warm liquid. You bring yourself up in the bathroom and get dressed.'

			act 'Leave':gt 'street'
		end
	end
end

if $ARGS[0] = 'toilet':
	cla
	$nameV = $boy
	dynamic $venerasiak
	'You went to the toilet with a guy. <<$boy>> you began to kiss and caress. Then he offered you suck at it.'

	act 'Refuse':
		cla
		guy += 1
		sex += 1
		cumass += 1
		vagina += 1
		'<center><img src="images/pics/vagtualet.jpg"></center>'
		'You abandoned your hot lover but is not confused, he turned you back to him and bent.'
		'You feel that <<$boy>> bared your ass and something solid upiraetsya your vagina'
		'You fuck cancer in the outhouse.'
		gs 'orgazm', 'start'

		act 'Leave':gt 'street'
	end

	act 'Take by mouth':
		cla
		vaf += 1
		guy += 1
		bj+= 1
		throat += 1
		picrand = rand(1, 10)
		'<center><img src="images/pics/bj<<picrand>>.jpg"></center>'
		'<<$boy>> pulls his dick'
		'You took his penis in her mouth and began to suck.'
		'<<$boy>> moans and that''s to finish.'

		act 'Remove the member of his mouth':
			cla
			*clr
			bjrand = rand(1, 100)

			if bjrand < 50 and vaf < 100:'You have time to take out of his mouth and a member <<$boy>> commits past you.'
			if bjrand >= 50 or vaf >= 100:cumface += 1 & '<<$boy>> ends up on your face.'

			picrand = rand(1, 5)

			if bjrand >= 50 or repa = 6:'<center><img src="images/pics/facial<<picrand>>.jpg"></center>'

			act 'Leave':gt 'street'
		end

		act 'Suck on':
			cla
			*clr
			vaf += 2
			picrand = rand(1, 10)
			'<center><img src="images/pics/cum<<picrand>>.jpg"></center>'
			'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'
			act 'Swallow':
				cla
				vaf += 1
				cumlip += 1
				swallow += 1
				'<<$boy>> looks like you swallow sperm.'

				act 'Leave':gt 'street'
			end

			act 'Spit out':
				cla
				'You go into the bathroom and there spits cum'

				act 'Leave':gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'kompashka':
	cla
	dynamic $venerasiak
	picrand = rand(1, 15)
	'<center><img src="images/pics/gang<<picrand>>.jpg"></center>'
	'You edete somewhere with the guys on the car. You''re drunk and you pat on the back seat just two guys. Finally, the machine stops and you take out of the car.'
	'Undress you, and you feel like you are part of a member, you are trying to say something, at this point you inserted with cock in her mouth.'
	'You ripped into all the cracks, and even more than once. Heavily drunk and you can not concentrate and remember details. What that vague feeling throughout the body, hands, members. Then you dovezli and thrown at the entrance.'
	guy += 3
	sex += 1
	bj+= 1
	anal += 1
	throat += 1
	cumlip += 1
	cumface += 1
	cumbutt += 1
	cumass += 1
	cumpussy += 1
	rape += 1
	gang += 1
	vagina += 1
	anus += 1

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'coffee':
	cla
	dynamic $venerasiak
	$nameV = $boy
	minut += 30
	gs 'stat'
	picrand = rand(1, 5)
	'<center><img src="images/pics/vagmis<<picrand>>.jpg"></center>'
	'<<$boy>> agree to your proposal. You brought him home, there''s a long embraced and continued to snuggle on the bed. <<$boy>> you entered with full force.'
	pose = 0
	gs 'orgasm', 'start'
	guy += 1
	sex += 1
	vagina += 1

	act 'Wash':gt 'Vanr'
end

--- cafe3 ---------------------------------
# ParkKafe
if $ARGS[0] = 'food':
	if money < 100:
		'You do not have enough money for the cafe.'
		act 'Leave':gt 'park', 'start'
		exit
	end

	cla
	health += 10
	money -= 100
	manna += 5
	willpower += 5

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		fat += 1
		'You gladly ate the food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	elseif water < 20:
		water += 20
		'You gladly drank a mug of tea.'
	end

	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'', ''the_boy''">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'', ''guys''">sporty guys</a> sitting at the table and beer pschih'

	'You sat at the table in summer cafe. Soon you brought your order.'
	act 'Leave':gt 'park', 'start'
end

if $ARGS[0] = 'guys':
	cla

	if rand(0, 1) = 0:
		'You''re looking at them intently, but they think you do not notice.'

		act 'Go home':gt 'park', 'start'
	else
		act 'Leave':gt 'park', 'start'

		if parkara > 0:
			'Jora Senya notice you, but continued to drink beer with friends.'
		else
			'Your views were seen guys and one of them rolled up to you and asked to join them.'

			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.'
				if rand(0, 1) = 0:
					if parkara = 0:guy += 2 & parkara = 1
					sex += 1
					bj += 2
					cumlip += 2
					'<center><img src="images/klof/022.jpg"></center>'
					'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.'

					if rand(1, 100) <= bj:
						horny = 0
						orgasm += 1
						'You orgasmed.'
					else
						horny += 10
						'You were not satisfied'
					end

					'They end up in your mouth, you swallow sperm greed'

					act 'Become acquainted':gt 'parkkafe', 'klof 1'
				else
					if parkara = 0:guy += 2 & parkara = 1

					sex += 1
					cumpussy += 1
					vagina += 1
					gang += 1
					cumass += 1
					anus += 1
					anal += 1
					'<center><img src="images/klof/004.jpg"></center>'
					'Guy fucks you in the pussy. Another time, too, does not lose his penis and shoves you in the ass.'

					if rand(1, 100) <= bj:
						horny = 0
						orgasm += 1
						'You orgasmed.'
					else
						horny += 10
						'You were not satisfied'
					end

					'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
	minut += 5
	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

	if rand(0, 1) = 0:
		'You''re looking at them intently, but they think you do not notice.'

		act 'Leave':gt 'park', 'start'
	else
		'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.'

			if rand(0, 1) = 0:
				if parkarman = 0:guy += 2 & parkarman = 1
				bj+= 2
				cumlip += 2
				'<center><img src="images/pics2/ara.jpg"></center>'
				'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.'

				if rand(1, 100) <= bj:
					horny = 0
					orgasm += 1
					'You orgasmed.'
				else
					horny += 10
					'You were not satisfied'
				end

				'They end up in your mouth with laughter and go'

				act 'Leave':gt 'park', 'start'
			else
				if parkarman = 0:guy += 2 & parkarman = 1

				sex += 1
				bj+= 1
				gang += 1
				cumlip += 1
				cumass += 1
				vagina += 1
				'<center><img src="images/pics2/ara2.jpg"></center>'
				'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.'

				if rand(1, 100) <= bj:
					horny = 0
					orgasm += 1
					'You orgasmed.'
				else
					horny += 10
					'You were not satisfied'
				end

				'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

	if rand(0, 1) = 0:
		'You glanced surreptitiously at respectable man, but it seems you did not notice.'

		act 'Leave':gt 'park', 'start'
	else
		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:saunasex = 1 & guy += 1

				sex += 1
				!!oral += 1
				cumlip += 1
				cumass += 1
				! WD: breaks horny test below ~ 
				!horny = 0
				vnesh += 1
				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'

				! WD: fix horny test logic stop both trigger
				if horny > 75:
					horny = 0
					orgasm += 1 
					'You covered orgasm'
				! if horny <= 75:
				else
					horny += 10
					'You were not satisfied'
				end

				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

	if rand(0, 1) = 0:
		'You looked at the campaign secretly laughing youth, but they seem to have overlooked.'

		act 'Leave':gt 'park', 'start'
	else
		'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
					hour = 22
					son = 0

					if studentsex = 0:studentsex = 1 & guy += 6

					bj += 6
					cumlip += 6
					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

	if rand(0, 1) = 0 or afra >= 1:
		'You glanced surreptitiously at the Africans, but they seem to have overlooked.'

		act 'Leave':gt 'park', 'start'
	else
		afra = 1
		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] = 'the_boy':
	cla

	if rand(0, 1) = 0 and gosh = 0:
		'You secretly looked at the young boy, but it seems you did not notice.'

		act 'Leave':gt 'park', 'start'
	else
		if gosh = 1:
			'You secretly looked at the young boy. Gosh it, but it seems you did not notice.'

			act 'Leave':gt 'park', 'start'
		else
			gosh = 1
			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
end

--- ParkKafe ---------------------------------
# roomPRE
clr
gs 'statPRE'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Apartment</font></b></center>'
'<center><img src="images/picPRE/room.jpg"></center>'

if pre = 0:
	pre = 1
	'Alarm rang. Wife Luda sluggishly rolled over. Habitual movement you have it turned off. God, how can you not want to work. Okay, enough rassusolivat.'

	act 'Go to the bathroom':
		cla
		*clr
		minut += 30
		clr
		gs 'statPRE'
		'<center><img src="images/picPRE/self.jpg"></center>'
		'Quietly, that would not wake up daughter, you have gone to the bathroom and began to brush up.'

		act 'Leave the apartment':
			cla
			*clr
			minut += 5
			clr
			gs 'statPRE'
			'<center><img src="images/picPRE/carPRE1.jpg"></center>'
			'In the parking lot near the house was your car. You went to her and pressed a button on the key fob opening the central locking and removing the alarm.'

			act 'Go to work':
				cla
				*clr
				minut += 25
				clr
				gs 'statPRE'
				'<center><img src="images/picPRE/carPRE.jpg"></center>'
				'You got behind the wheel, started the car and drove to work. On the road, as was always going to jam you and dragged themselves on something like a traffic jam to the office.'

				act 'Park at the office':
					cla
					*clr
					minut += 60
					clr
					gs 'statPRE'
					'<center><img src="images/picPRE/officePRE.jpg"></center>'
					'You put the car to the parking lot near the office and went into the building. Greeted with a security guard and went upstairs to his office.'
					'To you the director''s secretary came and brought you travel documents. You looked at her. "Did I go to business trip?" you asked. "Probably yes. Vsyevolodovitch ears stands in the morning, what that PE in the construction industry. More I do not know." Oksana said. You have prepared travel documents, now we have to sign the director.'

					act 'By Director':
						cla
						*clr
						minut += 20
						clr
						gs 'statPRE'
						'<center><img src="images/picPRE/man.jpg"></center>'
						'Going to the office of the Director, you greeted him and submitting papers to sign sat in the chair. Roman Gromov ran the text and paper podmahnul wide authoritative stroke.'
						'"Glavbukh probably already in place, go get travel. While I make a few calls, and then come back to me, discuss your trip." director said thoughtfully.'

						act 'Go to the chief accountant for travel':
							cla
							*clr
							minut += 30
							money += 15000
							clr
							gs 'statPRE'
							'<center><img src="images/picPRE/glavbuh.jpg"></center>'
							'Marina was already in his office, you have filed her application, she grumbled a bit, but has given you money. Did you get their names in the statements, and came out of her office.'

							act 'Go to the director':
								cla
								*clr
								minut += 15
								clr
								gs 'statPRE'
								'<center><img src="images/picPRE/man.jpg"></center>'
								'When you entered the director Roman Gromov gestured you to a chair, and he continued to talk on the phone.'
								'"Yes, I understand. Utryasem Once all the questions so I will immediately send you Michael, my deputy. Tell workers that they output. Igor, a guard at the pit and let no one there no fuss, take care that would nobody got wind, you know, may prohibit the construction and this can not be allowed. Okay, let''s be engaged. " Roman hung up.'
								'He turned and spoke to you. "Tonight, during operations in the pit at our complex construction workers stumbled upon what that space. Backhoe struck the wall there. Okay Igor was close by and realized stop the excavations. Damn, is not clear on what we would encounter. Maybe abandoned bunker or something . But in any case there is any voids under pits and further construction of the complex may not be possible. So what you need as quickly as possible to go to the construction site. Understand that there''s what. Zanochuesh in hotel. general, solve itself, according to circumstances. "'

								act 'I should at least meet':
									cla
									*clr
									minut += 5
									clr
									gs 'statPRE'
									'<center><img src="images/picPRE/man.jpg"></center>'
									'"I though we should get" had begun to pull you bagpipes, but the director interrupted you. "Michael, do not you catch up? We scored credits on the ears on this construction, we still have not even agreed on a construction project, and we dig a pit. You understand, moreover, that if a foundation pit of emptiness, we can not continue to build and find ourselves on the brink of ruin, so we can still what important object destroyed while still on trial zagremit. situation must be addressed urgently. This force majeure. I have to be here to catch in which case someone should grease the time, so you go . "'

									act 'Okay, then I will not waste any more time':gt 'roadPRE'
								end
							end
						end
					end
				end
			end
		end
	end
end

--- roomPRE ---------------------------------
# roadPRE
minut += 5
clr
gs 'statPRE'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><img src="images/picPRE/carPRE.jpg"></center>'
'Once in the car you will immediately dial the phone your wife Luda. Explained the situation to her and finished the conversation went to the construction of the complex.'

act 'Ride':
	cla
	*clr
	minut += 500
	clr
	gs 'statPRE'
	'<center><img src="images/picPRE/kotPRE.jpg"></center>'
	'You''ve been traveling on the highway and tired, but before the rest in a hotel, you need to visit the pit. So you come to the site. Igor called and he said to run you protection on the scene.'
	'Putting the car you saw that coming to you, Igor.'

	act 'Say hello to Igor':
		cla
		*clr
		minut += 15
		clr
		gs 'statPRE'
		'<center><img src="images/picPRE/igor.jpg"></center>'
		'You are greeted with Igor. He was obviously concerned about the situation and so without much delay led you to the enclosure in the pit, around which hovered dejectedly guard.'
		'"I made a staircase that would descend into the break. Air there, I already checked threw a burning piece of paper. It''s not like a bunker or a natural cave, but rather what that ancient catacombs." said Igor until you waded through the mud to failure.'
		'You came to the hole in the ground and looked back. Floor-five meters, you thought. "Vidisha Michael seems certainly to a natural cave, but it''s not too pravilnae form. Well, go down?" said Igor.'

		act 'Descend':
			cla
			*clr
			minut += 15
			clr
			gs 'statPRE'
			'<center><img src="images/picPRE/dunPRE.jpg"></center>'
			'You took a powerful torch Igor until the guard lowered a staircase in failure. Igor then first started down there. Behind him, you went down on an aluminum ladder into the cave.'
			'The cave musty and gloomy, but you can breathe and not bad lantern illuminates the walls. You sent a beam into the corridor and saw in the distance something like a door.'
			'"Damn. Now just any historians ponabegut here with your stupid research." Igor muttered.'
			'You came to the door and saw her what that drawings like characters.'

			act 'Open the door':
				cla
				*clr
				minut += 15
				clr
				gs 'statPRE'
				'<center><img src="images/picPRE/dunPRE1.jpg"></center>'
				'Leaning against the door you managed to open it. "Your mother. Mish, look here. This same human bones." Igor said nervously.'
				'Looking around that a lot of which poked his finger Igor you are convinced that it is really a bunch of bones and skull on top. "Tomb, I suppose." Igor muttered looking bone.'

				act 'Go further':
					cla
					*clr
					minut += 15
					clr
					gs 'statPRE'
					'<center><img src="images/picPRE/dunPRE2.jpg"></center>'
					'Going further, you have found a dilapidated gallery. In the gallery walls were stone recess in which lay the dusty scrolls of something resembling pergamet.'
					'Igor took one of the rolls and spread it. "The hell it is not clear what that cuneiform. Ka I''ll take with me, what I find something special on ancient languages, even decipher" said Igor'
					'Have you noticed a door in the wall and opened it.'

					act 'Enter the room':
						cla
						*clr
						minut += 15
						clr
						gs 'statPRE'
						'<center><img src="images/picPRE/dunPRE3.jpg"></center>'
						'The room on the stone dais in the center stood a variety of vessels. You have come to see them trying to figure out what exactly is you came.'
						'Looking at the room you notice a strange little sculpture standing at the top of the stone elevations with vessels.'

						act 'Mark sculpture':
							cla
							*clr
							energy = 21
							water = 21
							son = 21
							minut += 15
							magik = 1
							manna = (intel * magik) + vital * 5
							clr
							gs 'statPRE'
							'<center><img src="images/picPRE/amuletPRE.jpg"></center>'
							'You picked up a strange sculpture and began to examine her. This is clearly something very ancient. Holding the amulet, you realize that it''s warm, almost hot and instinctively felt like some sort of strange power comes into you.'
							'You feel a surge of strength. As if there was a long road. Do you even have a drink and did not want to.'
							'Igor entered the room holding a piece of parchment. "Hmm. Interesting little room. On what is not clear, we came. And most importantly, what we do with this find. Whether destroy and build complex, or public."'

							act 'You''ve got to think and consult with the chief':
								cla
								*clr
								minut += 15
								clr
								gs 'statPRE'
								'<center><img src="images/picPRE/dunPRE3.jpg"></center>'
								'"You''ve got to think and consult with the chief." you said thrusting a strange amulet in his pocket.'
								'"Well, here''s for sure you can not call the boss, let''s get out of this crypt." Igor said grimly.'

								act 'Come to the surface':
									cla
									*clr
									minut += 15
									clr
									gs 'statPRE'
									'<center><img src="images/picPRE/kotPRE.jpg"></center>'
									'You got together with Igor and climbed up ladders to the surface. Igor said, "It''s late, go to the hotel. Sozvonishsya there and with Vsyevolodovitch."'

									act 'Go to the hotel.':gt 'otelPRE'
								end
							end
						end
					end
				end
			end
		end
	end
end

--- roadPRE ---------------------------------
# otelPRE
minut += 30
clr
gs 'statPRE'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
money -= 3000
'<center><img src="images/picPRE/otelPRE.jpg"></center>'
'You uneventful found sparkling lights Hotels and putting the car went to the bar to get a room.'
'Availability in a hotel was only a double room you have paid in full, what would you have settled inadvertently nobody.'

act 'Up to the room.':
	cla
	*clr
	minut += 5
	clr
	gs 'statPRE'
	'<center><img src="images/picPRE/otelPRE1.jpg"></center>'
	'You lay on the bed. They began to speculate on what happened. And what a mysterious amulet you find there. After it you feel just wonderful.'

	act 'Call the director.':
		cla
		*clr
		minut += 30
		clr
		gs 'statPRE'
		'<center><img src="images/picPRE/otelPRE1.jpg"></center>'
		'You dialed the number of Roman Vsevolodovicha and after a few rings, he responded. You said that under some sort of foundation pit ancient tomb, bones, what - what vessels, scrolls. Director pokumekali a little while and decided to stop the construction. He instructed while you stay, watch and wait for further instructions.'

		act 'Go to bed.':
			cla
			*clr
			minut += 600
			clr
			gs 'statPRE'
			'<center><img src="images/picPRE/otelPRE1.jpg"></center>'
			'You lay on the bed and fell asleep. You dream of as vidili amulet what that force was a ghost and gives you than what unimaginable. You vidili moon his bloody eye looks at the world and people see the world not as it is. Suddenly, in a dream, you feel that the room who that is.'

			act 'Open your eyes.':
				cla
				*clr
				minut += 5
				clr
				gs 'statPRE'
				'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
				'Opening his eyes, you will see a black figure beside him. A man in a long black coat with an orange mask on the face in which there was only one hole for the eyes. A man came up to you and asked, "Where is the statue?"'

				act 'Who are you?':
					cla
					*clr
					minut += 5
					clr
					gs 'statPRE'
					'<center><img src="images/picPRE/tobiPRE.jpg"></center>'
					'"Who are you?" you asked puzzled. "Listen, man, do not look for problems currently on level ground, give the statue and close construction. This place belongs to us." stranger said in a firm voice.'
					'You''re thinking, who is this, and what it all means. "I see no small show of force, we do not reach an agreement." the man said, and at this point you feel as if you saw a stranger through and felt a burning desire to give him a statue.'

					act 'Give him a statue':
						cla
						*clr
						minut += 5
						clr
						gs 'statPRE'
						'<center><img src="images/picPRE/otelPRE1.jpg"></center>'
						'You got out of bed and gave him a statue. The man picked it up, turned around and then his eyes like a whirlwind formed tightening it in your eyes the same as in the funnel. A few seconds and the man disappeared. You rubbed his eyes, "what the hell is going on here. Do I have dreamed it. No, I do not like a lunatic that would walk around the room in a dream, and the statue was gone." you pondered.'
						'At this point, knock on the door. You came to the door and asked who was there. A woman''s voice from behind the door you said that the hotel receptionist and she wants to talk to you on an urgent matter.'

						act 'Answer the door':
							cla
							*clr
							minut += 5
							clr
							gs 'statPRE'
							'<center><img src="images/picPRE/karinPRE.jpg"></center>'
							'You opened the door and entered the room not much confident step woman with red hair and glasses. She walked into the room quickly examined the situation and finally stopped his eyes on you.'
							'"Michael? Correctly I suppose?" You nodded. "Last night you found what the place and took out something very valuable and powerful." said the girl stroking your eyes.'

							act 'Listen, comrade came here already on this issue.':
								cla
								*clr
								minut += 5
								clr
								gs 'statPRE'
								'<center><img src="images/picPRE/karinPRE.jpg"></center>'
								'You embraced a mild irritation that these idiots can not even agree among themselves who come and take away the statue? So you girl blurted, "Listen, you have already started to bother me. That one will come with this damn statue, another administrator as well."'
								'She looked at you with surprise. How? I had already come up to someone? Who was it?'

								act 'Share':
									cla
									*clr
									minut += 5
									clr
									gs 'statPRE'
									'<center><img src="images/picPRE/karinPRE.jpg"></center>'
									'"What is a man in a black cloak with red clouds and orange mask with one hole for the eyes. He already took the statue." you answered.'
									'Girl''s face fell. "Curse. Ahead. Okay Michael, we will continue in another place. Juugo, Vyazhi it." said the girl at the door.'
									'Came into the room a tall man.'

									act 'Prepare to fight':
										cla
										*clr
										minut += 5
										clr
										gs 'statPRE'
										'<center><img src="images/picPRE/jugoPRE.jpg"></center>'
										'The man across the right side of his face was visible tattoo. Red hair stood on end.'
										$nameV = 'Juugo'
										!!stats
										strenV = 600
										speedV = 60
										agilV = 60
										reactV = 50
										vitalV = 200
										intelV = 50
										willV = 50
										!!skills
										magikV = 100
										boxingV = 100
										shootV = 100
										!!parameters
										healthV = vitalV * 10 + strenV * 5
										mannaV = intelV * 10 + magikV * 10
										willpowerV = willV * 10
										BonusAtakV = 0
										BonusDefV = 0
										!!Programme of Action
										program = 0
										jugoFight = 1

										act 'Fight':gt 'fight', 'start'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- otelPRE ---------------------------------
# karinPRE
minut += 120
nudity = 0
clr
gs 'statPRE'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><img src="images/picPRE/karinPRE.jpg"></center>'
'You woke up in what is not a familiar place, standing near you is the same red-haired girl. "And woke up. I told this jerk Juugo that he would have treated you more careful. But does he listen to you. As a result, I had you pull from the world, he almost did not kill you."'
'"But there are pros, while you lay unconscious, I researched a little you. Amulet of Power passed to you. As you pull it out have no idea. This way bad news for you. Toby, well, that guy in the mask. He ''ve probably realized that the amulet worked and gave his power and now he''s looking for you. "'

act 'What''s going on?':
	cla
	*clr
	minut += 5
	clr
	gs 'statPRE'
	'<center><img src="images/picPRE/karinPRE.jpg"></center>'
	'"What''s all the hell''s going on?" you interrupted the girl and tried to move his hand, but you were tied to the bed.'
	'"Um, okay, I''ll start from the beginning." said the girl. "Magic exists and is real. Earlier the world was not the same range were magicians and this can not be a surprise to anyone. Day when everything changed. Order of Dawn, whose head came to see you in person. That masked man named Toby. So this award captured several demons and use their power zakolodoval moon. Now the whole world lives in illusions moon and sends Toby directly. Someone may rebel by illusion, but it is powerful mages, but most of the world has simply forgotten about magic and went to live in an illusory world, which they believe only a reality. "'
	'"Recently there was a powerful burst of magical energy, which even caused a malfunction Tsukuemi. Tsukuemi so called spell of illusion imposed on the moon. How can you guess magicians felt this surge. He walked out of that cave you found. Apparently surge occurred in the time of activation amulet. Who is this amulet hunting began. Mages of all stripes are looking for such a thing mad force capable disrupt Tsukuemi.'
	'As you know, Toby wants to protect your order from destruction Tsukuemi. And perhaps due to the force of the amulet to strengthen it. Tsukuemi weakens over time. "'

	act 'The whole world is an illusion Corrupts this Toby?':
		cla
		*clr
		minut += 5
		clr
		gs 'statPRE'
		'<center><img src="images/picPRE/karinPRE.jpg"></center>'
		'"The whole world is an illusion that Toby sent down?" you asked. The girl nodded. "Yes. But only an illusion specific. Around all quite material. Magical nature only has escaped the attention of the person. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people will see how I threw a grenade or shot from a flamethrower. Once the human mind meets miracle triggered Tsukuemi and begins to affect the mind, forbidding him to perceive how the miracle miracle, hence any little green men, UFOs, poltergeists, samovozgaraniya, mind on the impact Tsukuemi forced to look for exits in the form of all rave at the sight of a miracle, if the mind can not cope with the influence Tsukuemi, then the person can go crazy and then no one would believe him. "'

		act 'And who are you?':
			cla
			*clr
			minut += 5
			clr
			gs 'statPRE'
			'<center><img src="images/picPRE/karinPRE.jpg"></center>'
			'"And who are you?" you asked. The girl smiled. "I? I Karin. Mag, but certainly not a magician Toby. More I specialize in the treatment of, for mutations, changes in the body. I have little combat techniques, so that would certainly grab you, I used the services of Juugo. Mutant He, his mutation caused by the magical nature. His terrible physical strength which is very hard to resist. It can bear fists goal. But this power, combined with the effects Tsukuemi driving him crazy. We cooperate with it, I keep it in a state of sanity, and it performs my orders. "'

			act 'Why do you need?':
				cla
				*clr
				minut += 5
				clr
				gs 'statPRE'
				'<center><img src="images/picPRE/karinPRE.jpg"></center>'
				'"Why do you need me?" you asked. The girl replied. "Hmm, obviously mine. When I lock you, I was hoping to get this effect. But now the situation has changed. Amulet vobschem became useless. Power passed to you. But it''s bad news for you. If you think that once you force amulet, so you can do anything. Figa with two. Naked without the ability to force anything. Toby and easily beat your will and forced to obey, and Juugo beat you like a puppy. Not so simple with this force. You yourself become amulet in force contained but you use it you can not do. "'

				act 'What is this amulet? Where did he come from?':
					cla
					*clr
					minut += 5
					clr
					gs 'statPRE'
					'<center><img src="images/picPRE/karinPRE.jpg"></center>'
					'"And what is this amulet? Where did he come from?" you asked. Karin thought. "Most likely this is what is the trick Rikudo, the ancient magician stunning force. I do not know precisely. Similarly only know that the amulet was created in a special way, he could give his force only one in whom there is no magic. And he could give effect only man. Rather it was what that amulet Rikudo for emergency restoration force at the time when she had finished.'
					'You know, you''re already dead. In your footsteps is Toby and his gang of thugs and bastards. When he finds you, he will turn you inside out, but you would get out of force. Apply your strength in the form in which it exists is the same as a call Toby and tell you where nahodishsya. Tsukuemi on you can no longer act, so you probably saw Toby moves. Times, and he was there where he wanted, convenient and fast. "'
					'Karin thought. "You know. I do not want to give you Toby. And I think I know how to bring down the trail this bloodhound. Rikudo Power only works if it is in a man''s body. You''re a man and she works there, regardless of your will. Enormous effort I should destroy and dispel traces of this force that would hide our place position. "'

					act 'Uh, I do not understand, what do you suggest?':
						cla
						*clr
						minut += 5
						clr
						gs 'statPRE'
						'<center><img src="images/picPRE/karinPRE.jpg"></center>'
						'"Uh, I do not understand, what do you suggest?" you asked. Karin giggled. "I''ll make you a pretty, young girl and Toby never find you. Well, no, there is another way, I''m just going to stop your heart and your strength will dissolve in nature, and you will die. Toby Giving you I''m not going. And admit killing you do not want. Maybe with time udastsja something sensible to do with your strength. "'

						act 'Hey, I do not want to be a woman, then I have a family, wife, daughter.':
							cla
							*clr
							minut += 5
							clr
							gs 'statPRE'
							'<center><img src="images/picPRE/karinPRE.jpg"></center>'
							'"Hey, I do not want to be a woman, then I have a family, wife, daughter, " you are afraid. Karin smiled sadly. "Here the choice is simple, either you die or you live without a penis. Never understood men, so that they are shaking their rattles around. During his family not to worry. I''ll arrange everything. You will be dead for all the tragedy, but what to do, but Toby unhooked. I''ll erase your memory of the family, will be only the ghostly memories, you can not even remember where you zhil.Tselikom erase the memory I will not leave you in prevratishsya useless vegetable. "'

							act 'There must be another way!':
								cla
								*clr
								minut += 5
								clr
								gs 'statPRE'
								'<center><img src="images/picPRE/karinPRE.jpg"></center>'
								'"There must be another way!" you panicked. Karin became serious. "Do not argue. But is the only way available to me. Now go to sleep." said Karin putting your hand on his chest.'

								act 'Sleep':gt 'sleepPRE'
							end
						end
					end
				end
			end
		end
	end
end

--- karinPRE ---------------------------------
# sleepPRE
minut += 120
day += 1
week += 1
!!clr
!!gs 'stat'
killobj
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
$name = 'Svetlana'
$surname = 'Lebedev'
!!!0.2.6 addition
$nickname = 'Svetski'
!!!
age = 18
vidage = 16
year = 2010
!!month = 6
!!week = 5
!!hour = 8
!!Body
rost = 170
fat = 60
salo = 60
dick = 0
energy = 15
water = 15
son = 16
!!Stats
stren = 10
strenbuf = 10
speed = 10
agil = 10
agilbuf = 10
vital = 10
vitalbuf = 10
intel = 10
will = 10
react = 10
magik = 0
health = vital * 10 + stren * 5
willpower = intel * 5 + will * 5
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo

!!etogame
nastjaQW = 0
!!etogame

!!!!!!!!!!!!!! Maruda Hair Mod
hairlength = 17
hcol = 1
!!!!!!!!!!!!!! Maruda Hair Mod

vidageday = 300
housrA = 1
sarafan[1] = 1
sarafanH[1] = 30
lobok = 3
leghair = 3
mop = 1
housr = 1
tanga = 1
clr
gs 'stat'
jeans[1] = 1
jeansH[1] = 100
jeansB[1] = 70
gs 'clothing', 'wear', 'jeans', 1
cltarelka = 1
fairy = 10
eda = 5
clrbelo = 2
poroshok = 5
shampoo = 5
clr
gs 'stat'
'<center><img src="images/picPRE/karinPRE.jpg"></center>'
'"You''re awake? Rather woke up." Karin said looking into your eyes.'

act 'Look at yourself':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	'<center><img src="images/picPRE/povPRE.jpg"></center>'
	'"Fuck, " you said and shut his mouth. Voice was too feminine. Karin giggled. "The first time I changed the gender of the person. Therefore waited with curiosity how you''d react to his new body. Masterpiece. Course in something I miscalculated, for example due to sharply increased hormonal status you went pimples on the face. Failed to change the eyes and lips, but your body will be much easier to change than the body of an ordinary woman, you will be easier to gain weight, lose weight, can change facial features. Nothing, you live now in the women''s clothing. Yes, you are quite normal woman, you can fly. "'
	'You angrily looked at Karin, "You think I''m here and so turned into a woman and immediately ran to find eldu which can jump? I''m still the same old tridtsatipyati man."'
	'"Well, yes. Do not argue." Karin agreed. "Actually, it''s your life and only you decide what to do with it. Yeah, I already took care of alibi. Today you in his car fell into the pit and died, now just on the TV show." With these words, Karin pressed a button on the remote and the TV has earned.'
	$name = input("What is your first name?")

	if $name = '':$name = 'Svetlana'

	$surname = input("What is your last name?")

	if $surname = '':$surname = 'Lebedev'

	!!!0.2.6 addition
	$nickname = input("What is your nickname?")

	if $nickname = '':$nickname = 'Svetski'
	!!!

	act 'Watch TV':
		cla
		*clr
		minut += 5
		clr
		gs 'stat'
		'<center><img src="images/picPRE/car2.jpg"></center>'
		'On TV is reporting that as a businessman who arrived on a mission yesterday afternoon breaking the fence fell into the pit. Businessman died in hospital without regaining consciousness.'
		'You dumbfounded looked at Karin. She smiled enigmatically, "Well, I still magician and something that I can. Toby Now even lose track forever. Whoever killed in BMW, at the time of death was perfect your copy of Energy and to fillings in his teeth. Yeah, here''s the documents on apartment, passport, passport. Now you <<$name>> <<$surname>>, 18 years old girl in the city nobody knows you, but you at least have an apartment in the property. This is a gift to you from Juugo. Now get up, you''ve got to go to his new home and equip a new life. "'
		'Entered the room Juugo redhead with a tattoo on his face. He looked at you and said, "I''ll take you."'

		act 'Go with Juugo':
			cla
			*clr
			minut += 5
			clr
			gs 'stat'
			'<center><img src="images/picPRE/jugoPRE.jpg"></center>'
			'Juugo silently carried you to the garage and there you sat in a huge black jeep. Juugo sat behind the wheel and raced around the track. You silently speculated about what you do now.'
			'Juugo is not looking at you said. "I''m sorry I beat you so much. I can not control himself during a fight. You were a little grow larger and for a second I thought you might be dangerous for me, so I hit with full force." You looked at him. "Forget it, listen Juugo that I do now?" Juugo nodded and said, "Well, I would advise you to start to buy food at the store, all sorts of washing powders, detergents, dish and laundry. The apartment has a little something of course, but not enough. There''s even no TV. Then get a job. Podaleku not from your house there is a restaurant, she works with 12, every day except Monday. approach a master, he will take the job for you, it just requires a waitress. Do not forget to monitor the health status, mood and mind. Now your mind is very weak, you can not survive and go crazy. You need to eat well, sleep regularly, have fun, do not generally become despondent, but then ended his days in a madhouse. Karin We do not seek, you will not find in the first place, and secondly, if you give us need you, we ourselves will find you. "'
			'You arrived at the five-story home Khrushchev era buildings. Juugo stopped the car and pointed a finger at the entrance. "Your apartment number 69, are the key. Go. Thing to remember is you it''s not unusual, but not give up, keep an eye on the health and life will improve. How ever I look in on you."'

			act 'Out of the car':
				cla
				opPRE = 0
				daystart = 0
				addobj 'Character'
				addobj 'See'
				addobj 'Others'
				addobj 'Menu'
				gt 'street'
			end
		end
	end
end

--- sleepPRE ---------------------------------
# fight
if $ARGS[0] = 'start':
	cla
	inFight = 1
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	gs 'defence'
	gs 'statBat'

	if SasoriBody > 2 and healthV <= 0 or SasoriBody > 2 and mannaV <= 0 or SasoriBody > 2 and willpowerV <= 0:
		SasoriBody -= 1
		gs 'priziv', 'sasori'
		'<b><font color="red">Doll crumbled into parts, and immediately entered into battle other doll Sasori.</font></b>'
		'<b><font color="red">You''ve heard the sonorous voice Sasori "I have a lot of dolls, you can not win."</font></b>'
	elseif SasoriBody = 2 and healthV <= 0 or SasoriBody = 2 and mannaV <= 0 or SasoriBody = 2 and willpowerV <= 0:
		SasoriBody -= 1
		gs 'priziv', 'sasori1'
		'<b><font color="red">Last doll crumbled into pieces and entered the fight Sasori himself.</font></b>'
	end

	if stunV > 0 and SasoriBody > 1:
		stunV = 0
		'<b><font color="red">Doll began to move again.</font></b>'
	end

	if stunV > 0 and SasoriBody = 1:
		stunV = 0
		'<b><font color="red">again moves Sasori.</font></b>'
	end

	if GedoMazo = 1 and healthV <= 0 or GedoMazo = 1 and mannaV <= 0 or GedoMazo = 1 and willpowerV <= 0:
		GedoMazo = 2
		barierV = 0
		'<b><font color="green"><<$nameV>> fell to the ground turning into ashes</font></b>'
		gs 'priziv', 'tobi'
		'<b><font color="green"><<$nameV>> attacked you</font></b>'
	end

	if health <= 0 and heart = 0 and izanagi = 0:
		'<b><font color="red">you lose</font></b>'
		xgt 'ender', 'loss'
		exit
	elseif healthV <= 0 and heartV = 0 and izanagiV = 0:
		'<b><font color="green"><<$nameV>> lost</font></b>'
		xgt 'ender', 'win'
		exit
	elseif manna <= 0 and heart = 0 and izanagi = 0:
		'<b><font color="red">you lose</font></b>'
		xgt 'ender', 'loss'
		exit
	elseif mannaV <= 0 and heartV = 0 and izanagiV = 0:
		'<b><font color="green"><<$nameV>> lost</font></b>'
		xgt 'ender', 'win'
		exit
	elseif willpower <= 0 and heart = 0 and izanagi = 0:
		'<b><font color="red">you lose</font></b>'
		xgt 'ender', 'loss'
		exit
	elseif willpowerV <= 0 and heartV = 0 and izanagiV = 0:
		'<b><font color="green"><<$nameV>> lost</font></b>'
		xgt 'ender', 'win'
		exit
	end

	if izanagiV > 0 and healthV <= 0 or izanagiV > 0 and mannaV <= 0 or izanagiV > 0 and willpowerV <= 0:
		izanagiV -= 1
		'<b><font color="red"><<$nameV>> simply disappeared</font></b>'
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * magikV + magikV * 100 + vitalV * 10
		willpowerV = willV * 10
		stunV = 0

		if program = 6 and izanagiOnce = 0:izanagiOnce = 1 & unmaterialV = 40 & tobizanagi = 0

		'<b><font color="red"><<$nameV>> was in front of you completely healthy. He folded his hands and Arcanum said Izanagi - perfect illusion.</font></b>'
		'<b><font color="red">One of his eyes closed for ever, paying for it with a spell.</font></b>'
	elseif heartV > 0 and healthV <= 0 or heartV > 0 and mannaV <= 0 or heartV > 0 and willpowerV <= 0:
		heartV -= 1
		'<b><font color="red"><<$nameV>> staggered and his heart burst</font></b>'
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * magikV + magikV * 100 + vitalV * 10
		willpowerV = willV * 10
		stunV = 0
		'<b><font color="red"><<$nameV>> stood up and rushed into the fray. He has run another heart.</font></b>'
	elseif izanagi > 0 and health <= 0 or izanagi > 0 and manna <= 0 or izanagi > 0 and willpower <= 0:
		izanagi -= 1
		'<b><font color="green">You are gone</font></b>'
		health = vital * 10 + stren * 5
		willpower = intel * 5 + will * 5
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		stun = 0
		zerkaloV = 0
		poisonV = 0
		bloodV = 0
		'<b><font color="green">Immediately before the enemy appeared completely healthy.</font></b>'
	elseif heart > 0 and health <= 0 or heart > 0 and manna <= 0 or heart > 0 and willpower <= 0:
		heart -= 1
		zerkaloV = 0
		poisonV = 0
		bloodV = 0
		'<b><font color="green">Your heart gave out and snapped.</font></b>'
		health = vital * 10 + stren * 5
		willpower = intel * 5 + will * 5
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		stun = 0
		'<b><font color="green">You''re not dead, you run another heart.</font></b>'
	end

	gs 'before'
	'<b>= = = = = = = = = = = = (ROUND <<round>>) = = = = = = = = = = = =</b>'
	'<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, manna <b><font color="blue"><<mannaV>></font></b>, the force will <b>(9 )<<willpowerV>></font></b>'

	if defenceV > 0:'<b><font color="red">Protection <<defenceV>> units</font></b>'
	if defenceMV > 0:'<b><font color="red">Protection of manna <<defenceMV>> units</font></b>'
	if defenceWV > 0:'<b><font color="red">will protection <<defenceWV>> units</font></b>'

	'Your life <b><font color="red"><<health>></font></b>, the manna <b><font color="blue"><<manna>></font></b>, willpower <b><font color="green"><<willpower>></font> ( 5)'

	if defence > 0:'<b><font color="green">Protection <<defence>> units</font></b>'
	if defenceM > 0:'<b><font color="green">Protection from the effects of manna <<defenceM>> units</font></b>'
	if defenceW > 0:'<b><font color="green">Protection from the effects at will <<defenceW>> units</font></b>'
	if defenceAct > 0:'<b><font color="green"><<defenceAct>> moves the regeneration of protection</font></b>'
	if defenceActM > 0:'<b><font color="green"><<defenceActM>> moves the protection from the effects of regeneration manna</font></b>'
	if unmaterial > 0:'<b><font color="green">, Left <<unmaterial>> moves not materiality.</font></b>'

	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
	gs 'init'

	if hod = 0:
		!!Player attacks
		'<font color="green">You can attack</font>'

		if gun > 0:
			!!Boomstick
			if bulletIn > 0:
				'<<bulletIn>> load cartridges in gun'

				act 'Shoot a gun':
					cla
					bulletIn -= 1
					gunpower = 150
					buu = 1
					gunpricel = 1
					Gcrime += 1
					gt 'strelba'
				end
			elseif bulletIn <= 0:
				if bullet = 0:
					'Ammunition for the gun ran.'
				elseif bullet > 0:
					'<<bullet>> ammunition for the pistol'

					act 'Reload':
						cla

						if bullet < 7:
							bulletIn = bullet
							bullet = 0
							'You loaded any remaining bullets in the gun.'
						end

						if bullet >= 7:
							bullet -= 7
							bulletIn = 7
							'You loaded 7m rounds in the gun.'
						end

						act 'Further':gt 'fight', 'sta'
					end
				end
			end
		end

		if Mgun > 0:
			!!Boomstick
			if mbulletIn > 0:
				'<<mbulletIn>> load cartridges in the machine'

				act 'Of single machine':
					cla
					mbulletIn -= 1
					buu = 1
					gunpower = 300
					gunpricel = 2
					Gcrime += 1
					gt 'strelba'
				end

				if mbulletIn >= 3:
					act 'A short burst of machine':
						cla
						mbulletIn -= 3
						buu = 3
						gunpower = 300
						gunpricel = 1
						Gcrime += buu
						gt 'strelba'
					end

					act 'Long queue of machine':
						cla
						buu = mbulletIn
						mbulletIn = 0
						gunpower = 300
						gunpricel = 0
						Gcrime += buu
						gt 'strelba'
					end
				end
			elseif mbulletIn <= 0:
				if mbullet = 0:
					'Cartridges for machine run out.'
				elseif mbullet > 0:
					'<<mbullet>> ammunition for the machine'

					act 'Reload':
						cla

						if mbullet < 7:
							mbulletIn = mbullet
							mbullet = 0
							'You loaded all the remaining cartridges in the machine.'
						end

						if mbullet >= 30:
							mbullet -= 30
							mbulletIn = 30
							'You loaded the 30 rounds in the machine.'
						end

						act 'Further':gt 'fight', 'sta'
					end
				end
			end
		end

		if tragun > 0:
			!!Travmatik
			if tbulletIn > 0:
				'Travmatik charged'

				act 'Shoot a gun':
					cla
					tbulletIn -= 1
					gunpower = 50
					buu = 1
					gunpricel = 0
					gt 'strelba'
				end
			elseif tbulletIn <= 0:
				if tbullet = 0:
					'Cartridges for travmatika ended.'
				elseif tbullet > 0:
					'<<tbullet>> cartridges for travmatika'

					act 'Reload':
						cla

						if tbullet >= 1:
							tbullet -= 1
							tbulletIn = 1
							'You loaded a cartridge in travmatik.'
						end

						act 'Further':gt 'fight', 'sta'
					end
				end
			end
		end

		act 'Physical Attack':xgt 'boxing'

		if magik > 0:
			act 'Magical Attack':gt 'magik'
		end
	elseif hod = 1:
		!!Enemy attacks
		'<font color="red"><<$nameV>> attacks</font>'

		act 'Further':xgt 'enemy', 'start'
	end
end

if $ARGS[0] = 'sta':
	cla
	damTip = 0
	damTipM = 0
	damTipV = 0
	damTipMV = 0
	magweapbonus = 0
	magweapbonusV = 0
	bonusSh = 0
	bonusShV = 0
	eleSh = 0
	eleShV = 0
	poisonAV = 0
	hidanAtk = 0
	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
	'<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, manna <b><font color="blue"><<mannaV>></font></b>, the force will <b>(9 )<<willpowerV>></font></b>'

	if defenceV > 0:'<b><font color="red">Protection <<defenceV>> units</font></b>'
	if defenceMV > 0:'<b><font color="red">Protection of manna <<defenceMV>> units</font></b>'
	if defenceWV > 0:'<b><font color="red">will protection <<defenceWV>> units</font></b>'

	'Your life <b><font color="red"><<health>></font></b>, the manna <b><font color="blue"><<manna>></font></b>, willpower <b><font color="green"><<willpower>></font> ( 5)'

	if defence > 0:'<b><font color="green">Protection <<defence>> units</font></b>'
	if defenceM > 0:'<b><font color="green">Protection from the effects of manna <<defenceM>> units</font></b>'
	if defenceW > 0:'<b><font color="green">Protection from the effects at will <<defenceW>> units</font></b>'
	if defenceAct > 0:'<b><font color="green"><<defenceAct>> moves the regeneration of protection</font></b>'
	if defenceActM > 0:'<b><font color="green"><<defenceActM>> moves the protection from the effects of regeneration manna</font></b>'
	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'

	act 'Further':gt 'fight', 'start'
end

--- fight ---------------------------------
# strelba
!!gunpricel = 0 no sighting
!!gunpricel = 1 sighting
!!gunpricel = 2 very accurate
!!gunpower Weapon damage
!!buu the number of shots
!!shoot shooting skills
:markstrelba
!!Reita hit
buurand = rand(0, 100)

if buu = 0:xgt 'fight', 'sta'

if shoot = 0:
	if gunpricel = 0:
		if buurand = 100:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 100:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 95:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 95:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 90:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 90:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot > 0 and shoot < 20:
	if gunpricel = 0:
		if buurand >= 95:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 95:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 90:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 90:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 85:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 85:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
end

if shoot >= 20 and shoot < 40:
	if gunpricel = 0:
		if buurand >= 90:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 90:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 85:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 85:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 80:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 80:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 40 and shoot < 60:
	if gunpricel = 0:
		if buurand >= 85:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 85:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 80:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 80:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 75:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 75:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 60 and shoot < 80:
	if gunpricel = 0:
		if buurand >= 80:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 80:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 75:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 75:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 70:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 70:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 80 and shoot < 100:
	if gunpricel = 0:
		if buurand >= 75:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 75:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 70:
			damage = gunpower
			jump 'markstelokpopal'
		end

		if buurand < 70:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 65:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 65:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 100 and shoot < 150:
	if gunpricel = 0:
		if buurand >= 70:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 70:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 65:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 65:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 60:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 60:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 150 and shoot < 200:
	if gunpricel = 0:
		if buurand >= 65:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 65:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 60:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 60:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 55:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 55:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 200 and shoot < 300:
	if gunpricel = 0:
		if buurand >= 60:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 60:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 55:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 55:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 45:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 45:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 300 and shoot < 400:
	if gunpricel = 0:
		if buurand >= 55:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 55:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 50:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 50:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 45:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 45:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 400 and shoot < 500:
	if gunpricel = 0:
		if buurand >= 50:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 50:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 45:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 45:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 40:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 40:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
elseif shoot >= 500:
	if gunpricel = 0:
		if buurand >= 45:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 45:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 1:
		if buurand >= 40:
			damage = gunpower
			jump 'markstelokpopal'
		elseif buurand < 40:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	elseif gunpricel = 2:
		if buurand >= 35:
			damage = gunpower
			jump 'markstelokpopal'
		end

		if buurand < 35:
			buu -= 1
			'bloomer'
			jump 'markstrelba'
		end
	end
end

:markstelokpopal
!!if hit
!!Calculation of damage
if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
	if dospehV > 0:damage -= dospehDefV & dospehEnV -= 1
	if damage < 0:damage = 0

	healthV -= damage
	Gcrimein += 1
	'<b><font color="green">harmed <<damage>> units</font></b>'

	if zerkaloV > 0:
		zerkaloV -= 1
		health -= damage
		'<b><font color="red"><<$nameV>> reflected damage and you got <<damage>> points of damage</font></b>'
	end

	if buu = 0:xgt 'fight', 'sta'
	if buu > 0:buu -= 1 & jump 'markstrelba'
end

if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
	defenceV -= damage
	'<b><font color="green">Protection enemy harmed <<damage>> units</font></b>'

		if buu = 0:xgt 'fight', 'sta'
		if buu > 0:buu -= 1 & jump 'markstrelba'
end

if klonV > 0 and unmaterialV <= 0:
	klonV -= 1
	'<b><font color="green">Clone destroyed enemy, he still had <<KlonV>> clones</font></b>'

	if buu = 0:xgt 'fight', 'sta'
	if buu > 0:buu -= 1 & jump 'markstrelba'
end

if unmaterialV > 0:
	unmaterialV -= 1
	'<b><font color="red">Your bullet went straight through the opponent''s body. <<$nameV>> none Materials</font></b>'

	if buu = 0:xgt 'fight', 'sta'
	if buu > 0:buu -= 1 & jump 'markstrelba'
end

if barierV > 0:
	!!meniteta barrier for damange
	if barierV >= damage:
		'<b><font color="red"><<$nameV>> easily withstood hit</font></b>'

		if buu = 0:xgt 'fight', 'sta'
		if buu > 0:buu -= 1 & jump 'markstrelba'
	elseif barierV < damage:
		healthV -= damage
		Gcrimein += 1
		'<b><font color="green">harmed <<damage>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected damage and you got <<damage>> points of damage</font></b>'
		end
	end

	if buu = 0:xgt 'fight', 'sta'
	if buu > 0:buu -= 1 & jump 'markstrelba'
end

--- strelba ---------------------------------
# before
!!Miscalculation of events at the beginning of round.
!!Who protection, clones
knife = 0
knifeV = 0
BonusAtak = 0
BonusDef = 0
BonusAtakV = 0
BonusDefV = 0
!!stunner = 0
!!stunnerV = 0
kisamePro = 0
round += 1

if tuman > 0:'<font color="green">The battlefield covers your fog. Apparently, he still hold <<tuman>> moves.</font>'
if tumanV > 0:'<font color="red">The battlefield fog covers the enemy. Apparently, he still hold <<tumanV>> moves.</font>'
if stun > 0:'<font color="red">Are you still unable to move.</font>'
if stunV > 0:'<font color="green"><<$nameV>> is still unable to move.</font>'
if unmaterialV > 0:
	unmaterialV -= 1
	mannaV -= 20
end

if unmaterial > 0:
	unmaterial -= 1
	manna -= 20
	'<font color="green">You do not stand another materiality maximum <<unmaterial>> moves.</font>'
end

if klon > 0:'<font color="green">You <<klon>> clones that will protect you in case of attack.</font>'

if poison > 0:
	healthV -= poison
	'<font color="green"><<$nameV>> becomes poisoned and <<poison>> units of life.</font>'
	poison -= 1
end

if poisonV > 0:
	health -= poisonV
	'<font color="red">You are poisoned and lose <<poisonV>> units of life.</font>'
	poisonV -= 1
end

if blood > 0:
	healthV -= blood
	'<font color="green"><<$nameV>> becomes <<blood>> units of life from bleeding.</font>'
	blood -= 1

	if blood < 0:blood = 0
end

if bloodV > 0:
	health -= bloodV
	'<font color="red">You lose <<bloodV>> units of life from bleeding.</font>'
	bloodV -= 1

	if bloodV < 0:bloodV = 0
end

if dospehEnV <= 0 and dospehV > 0:
	dospehEnV = 0
	dospehV = 0
	dospehDefV = 0
	dospehVesV = 0
	'<font color="green">Armor enemy destroyed.</font>'
end

if dospehEn <= 0 and dospeh > 0:
	dospehEn = 0
	dospeh = 0
	dospehDef = 0
	dospehVes = 0
	'<font color="red">Your armor destroyed.</font>'
end

if initBonusA > 0:initBonusA = 0

--- before ---------------------------------
# init
!!calculation initiatives
!!Be sure to check for mills
!!hod variable responsible for who will attack
!!hod = 0 player attacks hod = 1 enemy attacks
!!<font color="red"><<$name>></font>

if GedoMazo = 1 and stunV > 0:stunV = 0 & mannaV -= 1000 & '<font color="red"><<$nameV>> with a deafening roar, emits large amounts of energy allowing you to attack him again.</font>'

initi = react * 20 / 100
initi -= dospehVes

if initi < 0:initi = 0

init = rand(react - initi, react + initi) + initBonus
initiV = reactV * 20 / 100
initiV -= dospehVesV

if initiV < 0:initiV = 0

initV = rand(reactV - initiV, reactV + initiV) + initBonusV

if hodtime >= 3 and stun = 0 and stunV = 0 and initBonus = 0:
	!!the player has already attacked three times
	'<font color="red"><<$nameV>> took the initiative</font>'
	hod = 1
	hodtime = 0
	exit
elseif hodtimeV >= 3 and stun = 0 and stunV = 0 and initBonusV = 0:
	!!the enemy attacked three times already
	'<font color="green">You took the lead</font>'
	hod = 0
	hodtimeV = 0
	exit
end

if stun = 0 and stunV = 0 and hodtime < 3 and hodtimeV < 3 or stun = 0 and stunV = 0 and initBonus > 0 or stun = 0 and stunV = 0 and initBonusV > 0:
	!!both are not in the camp
	if tuman = 0 and tumanV = 0:
		!!No fog
		if init > initV:
			!!Initiative tackler
			'<font color="green">You took the initiative</font>'
			hod = 0
			hodtime += 1
			exit
		elseif init < initV:
			!!Initiative has captured the enemy
			'<font color="red"><<$nameV>> took the initiative</font>'
			hod = 1
			hodtimeV += 1
			exit
		elseif init = initV:
			hod = rand(0, 1)

			if hod = 0:'<font color="green">You hardly seized the initiative</font>'
			if hod = 1:'<font color="red"><<$nameV>> hardly took the initiative</font>'
			exit
		end
	elseif tuman > 0:
		!!Fog player
		tuman -= 1
		initV = reactV - initiV

		if init > initV:
			!!Initiative tackler
			'<font color="green">In your fog <<$nameV>> does not have time for you and you took the initiative</font>'
			hod = 0
			hodtime += 1
			exit
		elseif init < initV:
			!!Initiative has captured the enemy
			'<font color="red">In spite of your fog <<$nameV>> took the initiative</font>'
			hod = 1
			hodtimeV += 1
			exit
		elseif init = initV:
			hod = rand(0, 1)

			if hod = 0:'<font color="green">You hardly seized the initiative in spite of your fog</font>'
			if hod = 1:'<font color="red"><<$nameV>> in spite of your fog still took the initiative</font>'

			exit
		end
	elseif tumanV > 0:
		!!Fog enemy
		tumanV -= 1
		init = react - initi

		if init > initV:
			!!Initiative tackler
			'<font color="green">In spite of the fog, you took the initiative</font>'
			hod = 0
			hodtime += 1
			exit
		elseif init < initV:
			!!Initiative has captured the enemy
			'<font color="red"><<$nameV>> use your fog easily captures initiative</font>'
			hod = 1
			hodtimeV += 1
			exit
		elseif init = initV:
			hod = rand(0, 1)

			if hod = 0:'<font color="green">You hardly seized the initiative in spite of the fog</font>'
			if hod = 1:'<font color="red"><<$nameV>> use your fog took the initiative</font>'

			exit
		end
	end
end

if stun > 0:
	!!Player in the camp
	stun -= 1
	hod = 1

	if tuman > 0:tuman -= 1
	if tumanV > 0:tumanV -= 1

	'<font color="red">You can not move, and <<$nameV>> easily captures initiative</font>'
	exit
elseif stunV > 0:
	!!The enemy in the camp
	stunV -= 1
	hod = 0

	if tuman > 0:tuman -= 1
	if tumanV > 0:tumanV -= 1

	'<font color="green"><<$nameV>> can not move and you can easily grab the initiative</font>'
	exit
end

--- init ---------------------------------
# boxing
!!The choice of a physical attack
if weapon = 0:
	act 'Fist':
		cla
		!!gs 'atak'
		xgt 'atak', 'player'
	end
end

if weapon > 0:
	if weaponTipe = 1:$weap = 'sword'
	if weaponTipe = 2:$weap = 'mace'
	if weaponTipe = 3:$weap = 'ax'

	act 'Strike <<$weap>>':
		cla
		!!gs 'atak'
		xgt 'atak', 'player'
	end
end

if kunai > 0:
	'You have <<kunai>> throwing knives.'

	act 'Throw a knife':
		cla
		knife = input ("How to throw a knife?")

		if knife > kunai:
			knife = kunai
			kunai = 0
		elseif knife <= kunai:
			kunai -= knife
		end

		'<font color="green">You are flashed <<knife>> knives.</font>'
		xgt 'atak', 'player'
	end
end

if magik > 0:
	act 'Magical Attack':gt 'magik'
end

--- boxing ---------------------------------
# magik

!!Selecting a magic attack
if round >= 0:
	if spelltuman > 0:'Cover terrain fog <a href="exec:gt ''spell'', ''tuman''">create the spell</a>'
	if spellklon > 0:'Substitute itself clone <a href="exec:gt ''spell'', ''klon''">create the spell</a>'
	if spellstun > 0:'Paralyze the enemy <a href="exec:gt ''spell'', ''stun''">create the spell</a>'
	if spellweap > 0 and weapon > 0:'Invest in energy weapons <a href="exec:gt ''spell'', ''weap''">create the spell</a>'
	if spellwind > 0:'Blow the mist <a href="exec:gt ''spell'', ''wind''">create the spell</a>'
	if spellklon2 > 0:'Substitute themselves clones (3 pieces) <a href="exec:gt ''spell'', ''klon2''">to create a spell</a>'
	if spellenergo > 0:'Create weak energy shield <a href="exec:gt ''spell'', ''energo''">create the spell</a>'
	if spellinit > 0:'Create weak deceleration time <a href="exec:gt ''spell'', ''init''">create the spell</a>'
	if spellhel > 0:'Treat yourself to <a href="exec:gt ''spell'', ''hel''">create the spell</a>'
	if spellhand > 0:'Striking hand <a href="exec:gt ''spell'', ''hand''">create the spell</a>'
	if spellreset > 0 or spellunmat > 0:'<b><font color="red">POWER Rikudo</font></b>'
	if spellreset> 0:'Power Rikudo "podcherpnut collected energy" <a href="exec:gt ''spell'', ''reset''">to create a spell</a>'
	if spellunmat > 0:'Power Rikudo "not material" <a href="exec:gt ''spell'', ''unmat''">to create a spell</a>'
	if spellfire1 > 0:'<b><font color="red">SCHOOL FIRE</font></b>'
	if spellfire1 > 0:'The Flame <a href="exec:gt ''spell'', ''fire1''">create the spell</a>'

	if round >= 3:
		if spellfire2 > 0:'Release of fire <a href="exec:gt ''spell'', ''fire2''">create the spell</a>'
		if spellfire3 > 0:'Fire barrier <a href="exec:gt ''spell'', ''fire3''">create the spell</a>'
	end

	if round >= 6:
		if spellfire4 > 0:'Firestorm <a href="exec:gt ''spell'', ''fire4''">create the spell</a>'
		if spellfire5 > 0:'Flame Shield <a href="exec:gt ''spell'', ''fire5''">create the spell</a>'
	end

	if spellele1 > 0:'<b><font color="red">SCHOOL OF ELECTRICITY</font></b>'
	if spellele1 > 0:'Rank <a href="exec:gt ''spell'', ''ele1''">to create a spell</a>'

	if round >= 3:
		if spellele2 > 0:'Lightning <a href="exec:gt ''spell'', ''ele2''">create the spell</a>'
		if spellele3 > 0:'Electric barrier <a href="exec:gt ''spell'', ''ele3''">create the spell</a>'
	end

	if round >= 6:
		if spellele4 > 0:'Dance of thousands of birds <a href="exec:gt ''spell'', ''ele4''">create the spell</a>'
		if spellele5 > 0:'Plyaschuschaya scope <a href="exec:gt ''spell'', ''ele5''">create the spell</a>'
	end

	if spellert1 > 0:'<b><font color="red">SCHOOL LAND</font></b>'
	if spellert1 > 0:'Quicksand <a href="exec:gt ''spell'', ''ert1''">create the spell</a>'

	if round >= 3:
		if spellert2 > 0:'Active Protection <a href="exec:gt ''spell'', ''ert2''">create the spell</a>'
		if spellert3 > 0:'The Abyss <a href="exec:gt ''spell'', ''ert3''">create the spell</a>'
	end

	if round >= 6:
		if spellert4 > 0:'Absolute protection <a href="exec:gt ''spell'', ''ert4''">to create a spell</a>'
		if spellert5 > 0:'Sando <a href="exec:gt ''spell'', ''ert5''">create the spell</a>'
	end

	if spellwind1 > 0:'<b><font color="red">SCHOOL WIND</font></b>'
	if spellwind1 > 0:'Gust <a href="exec:gt ''spell'', ''wind1''">create the spell</a>'

	if round >= 3:
		if spellwind2 > 0:'Horrendous pressure <a href="exec:gt ''spell'', ''wind2''">create the spell</a>'
		if spellwind3 > 0:'Vacuum protective sphere <a href="exec:gt ''spell'', ''wind3''">create the spell</a>'
	end

	if round >= 6:
		if spellwind4 > 0:'Vacuum Rockets <a href="exec:gt ''spell'', ''wind4''">create the spell</a>'
		if spellwind5 > 0:'Devouring vacuum <a href="exec:gt ''spell'', ''wind5''">create the spell</a>'
	end

	if spellwater1 > 0:'<b><font color="red">SCHOOL WATER</font></b>'
	if spellwater1 > 0:'Creek manna <a href="exec:gt ''spell'', ''water1''">create the spell</a>'

	if round >= 3:
		if spellwater2 > 0:'Flooding <a href="exec:gt ''spell'', ''water2''">create the spell</a>'
		if spellwater3 > 0:'Blister <a href="exec:gt ''spell'', ''water3''">create the spell</a>'
	end

	if round >= 6:
		if spellwater4 > 0:'Water shark missile <a href="exec:gt ''spell'', ''water4''">create a spell</a>'
		if spellwater5 > 0:'Great Flood <a href="exec:gt ''spell'', ''water5''">create the spell</a>'
	end
end

act 'Physical Attack':gt 'boxing'

--- magik ---------------------------------
# enemy
!!Calculation of the enemy''s attack
if $ARGS[0] = 'start':
	cla
	!in this block is selected on the basis of the variable program enemy attacks
	if program = 0:
		!Action Programme simple attacker fizuhoy
		xgt 'enemy', 'fighter'
	elseif program = 1:
		!Action Programme fizuha and knives
		xgt 'enemy', 'fighter2'
	elseif program = 2:
		!Action Programme fizuha, knives, fog
		xgt 'enemy', 'fighter3'
	elseif program = 3:
		!Action Programme fizuha, knives, fog, Clones
		xgt 'enemy', 'fighter4'
	elseif program = 4:
		!Action Programme fizuha, knives, fog, Clones, paralysis
		xgt 'enemy', 'fighter5'
	elseif program = 5:
		!Action Programme Kisame
		xgt 'enemy', 'kisame'
	elseif program = 6:
		!Action Programme Toby
		xgt 'enemy', 'tobi'
	elseif program = 7:
		!Action Programme Toby
		xgt 'enemy', 'gedomazo'
	elseif program = 8:
		!program of action firearms
		xgt 'enemy', 'gun'
	elseif program = 9:
		!Action Programme Sasori
		xgt 'enemy', 'sasori'
	elseif program = 10:
		!Action Programme Conan
		xgt 'enemy', 'konan'
	elseif program = 11:
		!Action Programme Hidan
		xgt 'enemy', 'hidan'
	end
end

if $ARGS[0] = 'hidan':
	cla

	if zerkaloV > 0:barierV = 0
	if zerkaloV <= 0:barierV = 5500
	if healthV < vitalV * 10 + strenV * 5:healthV = vitalV * 10 + strenV * 5

	if zerkaloV > 0:
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * magikV + magikV * 100 + vitalV * 10
		willpowerV = willV * 10
		health -= 400
		manna -= 500
		'<b><font color="red"><<$nameV>> yells "RITUAL BEGINS!" and stands in a circle inscribed in blood on the ground.</font></b>'
		'<b><font color="red">He stabs himself and you feel like the pain pierces the body.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif zerkaloV <= 0 and defence > 0:
		damTipV = 5000
		bonusShV = 100
		hidanAtk = 1
		'<b><font color="red"><<$nameV>> yells "Your existence offends DZHASHINA MY GOD!" and throws you in his scythe trehlezviynuyu driving it by a line.</font></b>'

		if klon > 0:klon = klon / 2 & '<b><font color="red"><<$nameV>> yells "Mraz I slaughter YOU LIKE A PIG!"</font></b>'

		xgt 'atakA1', 'atak'
		exit
	elseif zerkaloV <= 0 and defence <= 0:
		damTipV = 300
		bonusShV = 100
		hidanAtk = 1
		'<b><font color="red"><<$nameV>> yells "You will die a blasphemer!" and throws you in his scythe trehlezviynuyu driving it by a line.</font></b>'

		if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from the blow spit. <<$nameV>> yells "I IMMORTAL Ravager! And YOU SHIT!"</font></b>'
		if tuman > 0:tuman = 0 & '<b><font color="red"><<$nameV>> yells "You´re pathetic in their vain attempts SPRYATATSYA FROM ME!"</font></b>'

		xgt 'atakA1', 'atak'
		exit
	end
end

if $ARGS[0] = 'konan':
	cla

	if round < 6:
		mannaV -= 10
		damTipV = 500
		'<b><font color="red"><<$nameV>> adds signs hands and you are flying sheets of paper.</font></b>'

		if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from hitting the paper.</font></b>'

		xgt 'atakA1', 'atak'
		exit
	elseif round >= 6:
		if unmaterialV > 5 and defence > 0:
			mannaV -= 250
			damTipV = 15000
			bonusShV = 100
			'<b><font color="red"><<$nameV>> takes to the air on the white wings and pulled out from her wings paper falls on you in a flood of flying with terrible speed paper swords.</font></b>'

			if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from hitting the paper.</font></b>'

			xgt 'atakA1', 'atak'
			exit
		elseif unmaterialV > 5 and defence <= 0:
			mannaV -= 20
			damTipV = 450
			'<b><font color="red"><<$nameV>> creates a paper boomerangs that fly in your direction.</font></b>'
			xgt 'atakA1', 'atak'
			exit
		elseif defenceV <= 0 and unmaterialV <= 5:
			mannaV -= 250
			defenceV += 3000
			defenceMV += 3000
			defenceWV += 3000
			'<b><font color="red">Conan shoots up to its paper wings like an angel. Around it starts spinning paper creating her protection.</font></b>'
			xgt 'fight', 'sta'
			exit
		elseif unmaterialV <= 2 and konanD < 3:
			mannaV -= 150
			konanD += 1
			'<b><font color="red">Conan stops meditating in the air.</font></b>'
			xgt 'fight', 'sta'
			exit
		elseif konanD >= 3:
			mannaV -= 250
			konanD = 0
			unmaterialV = 20
			'<b><font color="red">Conan crumbles in the air for thousands of sheets of paper.</font></b>'
			xgt 'fight', 'sta'
			exit
		end
	end
end

if $ARGS[0] = 'sasori':
	cla

	if SasoriBody > 1:damTipV = 1000
	if SasoriBody = 1:damTipV = 2000

	poisonAV = 1
	defenceV += 10
	defenceMV += 20
	defenceWV += 50
	mannaV -= 10

	if SasoriBody = 1 and defence > 0:
		defSasori = defence * 20 / 100
		defence -= defSasori
		'<b><font color="red">of rain falls on top of steel needles greatly weaken your defenses.</font></b>'
	end

	'<b><font color="red"><<$nameV>> shoots at you the whole cloud of poisonous spines.</font></b>'

	if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from the blow needle.</font></b>'

	xgt 'atakA1', 'atak'
end

if $ARGS[0] = 'gedomazo':
	cla

	if klon <= 0 and tuman <= 0:
		magweapbonusV = 5000
		'<b><font color="red"><<$nameV>> with a furious roar of effort on you for its huge stone fist.</font></b>'
		xgt 'atak', 'enemy'
		exit
	elseif klon > 0 or tuman > 0:
		klon = 0
		tuman = 0
		mannaV -= 500
		'<b><font color="red"><<$nameV>> makes a terrible roar and air shock wave sweeps over the battlefield.</font></b>'
		xgt 'fight', 'sta'
		exit
	end
end

if $ARGS[0] = 'tobi':
	cla

	!!program attacks Toby
	if unmaterialV <= 0 and IzanagiV = 0 and GedoMazo = 0:
		*clr
		'<b><font color="red"><<$nameV>> fingers to his lips and said quietly, "KUCHIE SAINT BUT JITSU."</font></b>'
		'<b><font color="red">you will see Huge stone statue of a demon, and you rushed to the attack.</font></b>'
		GedoMazo = 1
		$nameV = 'Gedo Mazo'
		!!stats
		strenV = 1000
		speedV = 100
		agilV = 90
		reactV = 100
		vitalV = 5000
		intelV = 50
		willV = 50
		!!skills
		magikV = 1
		boxingV = 100
		shootV = 100
		!!parameters
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * magikV + magikV * 100 + vitalV * 10
		willpowerV = willV * 10
		BonusAtakV = 0
		BonusDefV = 0
		!!Programme of Action
		barierV = 1500
		program = 7
		xgt 'fight', 'start'
		exit
	elseif unmaterialV <= 2 and IzanagiV = 0 and GedoMazo > 0 and TobiStena = 0:
		mannaV -= 500
		TobiStena = 1
		defenceV += 25000
		'<b><font color="red"><<$nameV>> makes Arcanum and reinforcing the skin blackens his body and creating protection of 25,000 units.</font></b>'
		barierV = 2000
		xgt 'fight', 'sta'
		exit
	elseif unmaterialV <= 2 and IzanagiV = 0 and GedoMazo > 0 and TobiStena = 1:
		mannaV += 6000
		TobiStena = 2
		'<b><font color="red"><<$nameV>> makes the magic sign and you feel like it´s magical energy increases sharply.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif stun > 0:
		magweapbonusV = 2000
		'<b><font color="red"><<$nameV>> triumphantly said, "Now you´re dead."</font></b>'
		'<b><font color="red">He grabs you by the throat and lifts his hand in the air.</font></b>'
		'<b><font color="red">His fingers like steel and they squeeze your throat with terrible force.</font></b>'
		xgt 'atak', 'enemy'
		exit
	elseif defence >= 5000:
		defence = 0
		defenceM = 0
		defenceActPar = 0
		defenceActParM = 0
		defenceAct = 0
		defenceActM = 0
		defAtk = 0
		mannaV -= 100
		stunV = 1
		'<b><font color="red"><<$nameV>> close your eyes and you saw of him as a tear ran down a drop of blood.</font></b>'
		'<b><font color="red">He opened his eyes become completely red with black veins and said Amaterasu</font></b>'
		'<b><font color="red">In your face rushed black devouring flames destroy your lightning protection.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif tuman > 0:
		tumanV += tuman
		tuman = 0
		'<b><font color="red"><<$nameV>> adds the magic signs your hands and mist coming under his control enveloping the review of you.</font></b>'
		'<b><font color="red">He will attack you.</font></b>'
		xgt 'atak', 'enemy'
		exit
	elseif unmaterialV > 0 and klon <= 0:
		stunnerV = 1
		mannaV -= 20
		magweapbonusV = 800
		'<b><font color="red"><<$nameV>> attacks you gathered the manna in the hand.</font></b>'
		xgt 'atak', 'enemy'
		exit
	elseif unmaterialV > 0 and klon > 0:
		klon = 0
		stunV = 1
		'<b><font color="red"><<$nameV>> adds signs hands and all your clones just turn into steam.</font></b>'
		xgt 'atak', 'enemy'
		exit
	elseif unmaterialV <= 0 and tobizanagi < 2:
		mannaV -= 250
		tobizanagi += 1
		!!unmaterialV = 10
		'<b><font color="red"><<$nameV>> adds the characters by hand.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif unmaterialV <= 0 and tobizanagi = 2:
		mannaV -= 250
		tobizanagi = 0
		unmaterialV = 20
		stunV = 1
		'<b><font color="red"><<$nameV>> folds his hands and marks around his eyes twisted vortex.</font></b>'
		xgt 'fight', 'sta'
		exit
	end
end

if $ARGS[0] = 'kisame':
	cla
	!!program attack Kisame

	if defenceV <= 0 and kisamePro = 0:
		kisamePro = 1
		mannaV -= 150
		defenceV += 1500
		defenceMV += 1500
		defenceWV += 1500
		defenceActParV = 500
		defenceActParMV = 500
		defenceActV = 10
		defenceActMV = 10
		'<b><font color="red"><<$nameV>> adds the marks around his hands and formed water sphere protecting it from damage.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif defenceV <= 1000 and kisamePro > 0:
		mannaV -= 500
		defenceV += 5000
		defenceMV += 5000
		defenceWV += 5000
		defenceActParV = 500
		defenceActParMV = 500
		defenceActV = 10
		defenceActMV = 10
		defAtkMV = 10
		'<b><font color="red"><<$nameV>> adds the marks and the space around the hands begins pogruzhatsya water.</font></b>'

		if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from hitting the water.</font></b>'

		xgt 'fight', 'sta'
		exit
	elseif defenceV > 1000:
		kisamerand= rand(0, 3)

		if kisamerand= 0:
			klonV += 3
			'<b><font color="red"><<$nameV>> adds the characters by hand.</font></b>'
			xgt 'fight', 'sta'
			exit
		elseif kisamerand> 0:
			mannaV -= 250
			damTipV = 1500
			damTipMV = 2500
			bonusShV = 50
			'<b><font color="red"><<$nameV>> adds the characters in the hands and fly sharks have created from the water.</font></b>'

			if klon > 0:klon = 0 & '<b><font color="red">Your clones turned into steam from hitting the water.</font></b>'

			xgt 'atakA1', 'atak'
			exit
		end
	end

	'<b><font color="red"><<$nameV>> attacks.</font></b>'
	xgt 'enemy', 'fighter'
end

if $ARGS[0] = 'gun':
	cla
	!!program directly attack
	!!gs 'atak'
	damTipV = 1500
	'<b><font color="red"><<$nameV>> shoots at you.</font></b>'
	xgt 'atakA1', 'atak'
end

if $ARGS[0] = 'fighter':
	cla
	!!program directly attack
	!!gs 'atak'
	xgt 'atak', 'enemy'
end

if $ARGS[0] = 'fighter2':
	cla
	!!program directly attack
	deystrand = rand(0, 1)

	if deystrand = 0:
		xgt 'atak', 'enemy'
	elseif deystrand = 1:
		knifeV = rand(1, 3)
		'<b><font color="red"><<$nameV>> have a throws <<knifeV>> the blades</font></b>'
		xgt 'atak', 'enemy'
	end
end

if $ARGS[0] = 'fighter3':
	cla

	!!program directly attack
	if tuman = 0 and tumanV < 5 and mannaV > 10:
		mannaV -= 10
		tumanV += 10
		'<b><font color="red"><<$nameV>> produces a fog on the battlefield.</font></b>'
		xgt 'fight', 'sta'
		exit
	end

	deystrand = rand(0, 1)

	if deystrand = 0:
		xgt 'atak', 'enemy'
	elseif deystrand = 1:
		knifeV = rand(1, 3)
		'<b><font color="red"><<$nameV>> have a throws <<knifeV>> the blades</font></b>'
		xgt 'atak', 'enemy'
	end
end

if $ARGS[0] = 'fighter4':
	cla

	!!program directly attack
	if tuman = 0 and tumanV < 5 and mannaV > 10:
		mannaV -= 10
		tumanV += 10
		'<b><font color="red"><<$nameV>> produces a fog on the battlefield.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif klonV < 1 and mannaV > 15:
		mannaV -= 15
		klonV += 1
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
		exit
	end

	deystrand = rand(0, 1)

	if deystrand = 0:
		xgt 'atak', 'enemy'
	elseif deystrand = 1:
		knifeV = rand(1, 3)
		'<b><font color="red"><<$nameV>> have a throws <<knifeV>> the blades</font></b>'
		xgt 'atak', 'enemy'
	end
end

if $ARGS[0] = 'fighter5':
	cla

	!!program directly attack
	if tuman = 0 and tumanV < 5 and mannaV > 10:
		mannaV -= 10
		tumanV += 10
		'<b><font color="red"><<$nameV>> produces a fog on the battlefield.</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif klonV < 1 and mannaV > 15:
		mannaV -= 15
		klonV += 1
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
		exit
	elseif stun < 1 and manna > 20:
		stunnerV = 1
		mannaV -= 20
		'<b><font color="red"><<$nameV>> attacks you Gouge.</font></b>'
		xgt 'atak', 'enemy'
	end

	deystrand = rand(0, 1)

	if deystrand = 0:
		xgt 'atak', 'enemy'
	elseif deystrand = 1:
		knifeV = rand(1, 3)
		'<b><font color="red"><<$nameV>> have a throws <<knifeV>> the blades</font></b>'
		xgt 'atak', 'enemy'
	end
end

--- enemy ---------------------------------
# atak
if $ARGS[0] = 'player':
	cla
	tip = 0
	strenA = stren
	speedA = speed
	agilA = agil
	vitalA = vital
	!!skills
	boxingA = boxing
	!!parameters
	healthA = health
	BonusA = BonusAtak
	strenD = strenV
	speedD = speedV
	agilD = agilV
	vitalD = vitalV
	!!skills
	boxingD = boxingV
	!!parameters
	healthD = healthV
	initBonusA = initBonus
	initBonus = 0
	initBonusV = 0
	BonusD = BonusDefV

	if stunV <= 0:
		xgt 'atak', 'popad'
	else
		'<b><font color="green"><<$nameV>> can not move a critical hit</font></b>'
		xgt 'atak', 'uronKrit'
	end
end

if $ARGS[0] = 'enemy':
	cla
	tip = 1
	strenA = strenV
	speedA = speedV
	agilA = agilV
	vitalA = vitalV
	!!skills
	boxingA = boxingV
	!!parameters
	healthA = healthV
	BonusA = BonusAtakV
	strenD = stren
	speedD = speed
	agilD = agil
	vitalD = vital
	!!skills
	boxingD = boxing
	!!parameters
	healthD = health
	BonusD = BonusDef
	initBonusA = initBonusV
	initBonus = 0
	initBonusV = 0

	if stun <= 0:
		xgt 'atak', 'popad'
	else
		'<b><font color="red">You can not move a critical hit</font></b>'
		xgt 'atak', 'uronKritV'
	end
end

if $ARGS[0] = 'popad':
	cla
	!!payment hit dodge
	poSp = speedA * 20 / 100
	uvAg = agilD * 20 / 100
	poBox = boxingA * 20 / 100
	uvBox = boxingD * 20 / 100
	popad = rand(boxingA - poBox, boxingA + poBox) + rand(speedA - poSp, speedA + poSp) + BonusA + initBonusA
	uvorot = rand(boxingD - uvBox, boxingD + uvBox) + rand(agilD - uvAg, agilD + uvAg) + BonusD
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			if tip = 0:
				!!attack players
				'<b><font color="green">critical hits</font></b>'
				xgt 'atak', 'uronKrit'
			else
				!!attack the enemy
				'<b><font color="red">critical hits</font></b>'
				xgt 'atak', 'uronKritV'
			end
		elseif popad < uvorot + uvorKoef:
			!!normal hit
			if tip = 0:
				!!attack players
				'<b><font color="green">Contact</font></b>'
				xgt 'atak', 'uron'
			else
				!!attack the enemy
				'<b><font color="red">Contact</font></b>'
				xgt 'atak', 'uronV'
			end
		end
	elseif popad <= uvorot:
		if popad + popKoef <= uvorot:
			!!critical blunder
			if tip = 0:
				!!attack players
				'<b><font color="red">CRITICAL SLIP</font></b>'
				xgt 'atak', 'uronKritV'
			else
				!!attack the enemy
				'<b><font color="green">CRITICAL SLIP</font></b>'
				xgt 'atak', 'uronKrit'
			end
		elseif popad + popKoef > uvorot:
			!!bloomer
			if tip = 0:
				!!attack players
				'<b><font color="red">is washed</font></b>'
				xgt 'fight', 'sta'
			else
				!!attack the enemy
				'<b><font color="green">is washed</font></b>'
				xgt 'fight', 'sta'
			end
		end
	end
end

if $ARGS[0] = 'uronKrit':
	cla
	damage = rand(stren, stren * 2) + weapbonus + magweapbonus

	if knife > 0:
		knibon = knife + 1
		knife = 0
		damage = damage * knibon
		knibon = 0
		'<b><font color="green">your opponent flies throwing knife</font></b>'
	end

	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
		if dospehV > 0:damage -= dospehDefV & dospehEnV -= 1
		if damage < 0:damage = 0

		healthV -= damage

		if weaponTipe = 1:bloodV += rand(weapon / 4, weapon / 2)
		if weaponTipe = 2:stun += rand(1, 2)
		if weaponTipe = 3:bloodV += rand(weapon / 4, weapon / 2)

		if stunner > 0:
			stunner = 0
			stunV = rand(3, 6)
			'<b><font color="green">You are paralyzed the enemy <<stunV>> moves.</font></b>'
		end

		'<b><font color="green">Apply Done <<damage>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	elseif defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
		defenceV -= damage
		'<b><font color="green">Protection of the enemy harmed <<damage>> units</font></b>'
		xgt 'fight', 'sta'
	elseif klonV > 0 and unmaterialV <= 0:
		klonV -= 1
		'<b><font color="green">Destroyed clone enemy, he still had <<KlonV>> clones</font></b>'
		xgt 'fight', 'sta'
	elseif unmaterialV > 0:
		unmaterialV -= 1
		'<b><font color="red">Your shot went straight through the opponent''s body. <<$nameV>> is not material</font></b>'
		xgt 'fight', 'sta'
	elseif barierV > 0:
		!!imeniteta barrier for damage
		if barierV >= damage:
			'<b><font color="red"><<$nameV>> easily withstood your butt</font></b>'
			xgt 'fight', 'sta'
		elseif barierV < damage:
			healthV -= damage

			if weaponTipe = 1:bloodV += rand(weapon / 4, weapon / 2)
			if weaponTipe = 2:stun += rand(1, 2)
			if weaponTipe = 3:bloodV += rand(weapon / 4, weapon / 2)

			if stunner > 0:
				stunV = rand(3, 6)
				'<b><font color="green">You are paralyzed the enemy <<stunV>> moves.</font></b>'
			end

			'<b><font color="green">Apply Done <<damage>> units</font></b>'

			if zerkaloV > 0:
				zerkaloV -= 1
				health -= damage
				'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uron':
	cla
	stKo = stren * 20 / 100
	damage = rand(stren - stKo, stren + stKo) + weapbonus + magweapbonus

	if knife > 0:
		knibon = knife + 1
		knife = 0
		damage = damage * knibon
		knibon = 0
		'<b><font color="green">your opponent flies throwing knife</font></b>'
	end

	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
		if dospehV > 0:damage -= dospehDefV & dospehEnV -= 1
		if damage < 0:damage = 0

		healthV -= damage

		if stunner > 0:
			stunner = 0
			stunV = rand(1, 3)
			'<b><font color="green">You are paralyzed the enemy <<stunV>> moves.</font></b>'
		end

		'<b><font color="green">Apply Done <<damage>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	elseif defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
		defenceV -= damage
		'<b><font color="green">Protection of the enemy harmed <<damage>> units</font></b>'
		xgt 'fight', 'sta'
	elseif klonV > 0 and unmaterialV <= 0:
		klonV -= 1
		'<b><font color="green">Destroyed clone enemy, he still had <<KlonV>> clones</font></b>'
		xgt 'fight', 'sta'
	elseif unmaterialV > 0:
		unmaterialV -= 1
		'<b><font color="red">Your shot went straight through the opponent''s body. <<$nameV>> is not material</font></b>'
		xgt 'fight', 'sta'
	elseif barierV > 0:
		!!imeniteta barrier for damage
		if barierV >= damage:
			'<b><font color="red"><<$nameV>> easily withstood your butt</font></b>'
			xgt 'fight', 'sta'
		elseif barierV < damage:
			healthV -= damage
			if stunner > 0:
				stunV = rand(1, 3)
				'<b><font color="green">You are paralyzed the enemy <<stunV>> moves.</font></b>'
			end

			'<b><font color="green">Apply Done <<damage>> units</font></b>'

			if zerkaloV > 0:
				zerkaloV -= 1
				health -= damage
				'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKritV':
	cla
	damage = rand(strenV, strenV * 2) + weapbonusV + magweapbonusV

	if knifeV > 0:
		knibonV = knifeV + 1
		knifeV = 0
		damage = damage * knibonV
		knibonV = 0
		'<b><font color="red">you throwing knife flies</font></b>'
	end

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage

		if weaponTipeV = 1:blood += rand(weaponV / 4, weaponV / 2)
		if weaponTipeV = 2:stunV += rand(1, 2)
		if weaponTipeV = 3:blood += rand(weaponV / 4, weaponV / 2)

		if stunnerV > 0:
			stunnerV = 0
			stun = rand(3, 6)
			'<b><font color="red"><<$nameV>> paralyzed you to <<stun>> moves.</font></b>'
		end

		'<b><font color="red">You harmed <<damage>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			healthV -= damage
			'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	elseif defence > 0 and klon <= 0 and unmaterial <= 0:
		defence -= damage
		'<b><font color="red">Protection of your harmed <<damage>> units</font></b>'
		xgt 'fight', 'sta'
	elseif klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone, you have more <<Klon>> clones</font></b>'
		xgt 'fight', 'sta'
	elseif unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Strike the enemy flew right through your body. YOU is not material</font></b>'
		xgt 'fight', 'sta'
	elseif barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstood the impact of the opponent</font></b>'
			xgt 'fight', 'sta'
		else
			health -= damage

			if weaponTipeV = 1:blood += rand(weaponV / 4, weaponV / 2)
			if weaponTipeV = 2:stunV += rand(1, 2)
			if weaponTipeV = 3:blood += rand(weaponV / 4, weaponV / 2)

			if stunnerV > 0:
				stun = rand(3, 6)
				'<b><font color="red"><<$nameV>> paralyzed you to <<stun>> moves.</font></b>'
			end

			'<b><font color="red">You harmed <<damage>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronV':
	cla
	stKo = strenV * 20/100
	damage = rand(strenV - stKo, strenV + stKo) + weapbonusV + magweapbonusV

	if knifeV > 0:
		knibonV = knifeV + 1
		knifeV = 0
		damage = damage * knibonV
		knibonV = 0
		'<b><font color="red">you throwing knife flies</font></b>'
	end

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage

		if stunnerV > 0:
			stunnerV = 0
			stun = rand(3, 6)
			'<b><font color="red"><<$nameV>> paralyzed you to <<stun>> moves.</font></b>'
		end

		'<b><font color="red">You harmed <<damage>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			healthV -= damage
			'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	elseif defence > 0 and klon <= 0 and unmaterial <= 0:
		defence -= damage
		'<b><font color="red">Protection of your harmed <<damage>> units</font></b>'
		xgt 'fight', 'sta'
	elseif klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone, you have more <<Klon>> clones</font></b>'
		xgt 'fight', 'sta'
	elseif unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Strike the enemy flew right through your body. YOU is not material</font></b>'
		xgt 'fight', 'sta'
	elseif barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstood the impact of the opponent</font></b>'
			xgt 'fight', 'sta'
		else
			health -= damage

			if stunnerV > 0:
				stun = rand(3, 6)
				'<b><font color="red"><<$nameV>> paralyzed you to <<stun>> moves.</font></b>'
			end

			'<b><font color="red">You harmed <<damage>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

--- atak ---------------------------------
# atakA

if $ARGS[0] = 'atak':
	cla
	!!payment hit dodge
	poSp = speed * 20 / 100
	uvAg = agilV * 20 / 100
	poBox = react * 20 / 100
	uvBox = reactV * 20 / 100
	popad = rand(react - poBox, react + poBox) + rand(speed - poSp, speed + poSp) + bonusSh
	uvorot = rand(reactV - uvBox, reactV + uvBox) + rand(agilV - uvAg, agilV + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="green">critical hits</font></b>'
			xgt 'atakA', 'uronKrit'
		elseif popad < uvorot + uvorKoef:
			!!normal hit
			!!attack the enemy
			'<b><font color="green">Contact</font></b>'
			xgt 'atakA', 'uron'
		end
	else
		'<b><font color="red">is washed</font></b>'
		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKrit':
	cla
	damKoef = damTip * 20 / 100

	damage = rand(damTip + damKoef, damTip + damKoef * 2)

	if damTipM > 0:
		damKoefM = damTipM * 20 / 100
		damageM = rand(damTipM + damKoefM, damTipM + damKoefM * 2)
	end

	xgt 'atakA', 'damage'
end

if $ARGS[0] = 'uron':
	cla
	damKoef = damTip * 20 / 100
	damage = rand(damTip - damKoef, damTip + damKoef)

	if damTipM > 0:
		damKoefM = damTipM * 20 / 100
		damageM = rand(damTipM - damKoefM, damTipM + damKoefM)
	end

	xgt 'atakA', 'damage'
end

if $ARGS[0] = 'damage':
	cla

	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
		if dospehV > 0:damageV -= dospehDefV & dospehEn -= 1
		if damage < 0:damage = 0

		healthV -= damage

		if damTipM > 0:
			mannaV -= damageM
			manna += damageM
			'<b><font color="green">you have ingested <<damageM>> units of manna from the enemy.</font></b>'
		end

		!!manna -= damageM

		if eleSh > 0:
			stunV = rand(eleSh, eleSh * 3)
			'<b><font color="green"><<$nameV>> paralyzed <<stunV>> rounds</font></b>'
		end

		'<b><font color="green">You have caused damage <<damage>> units</font></b>'
		!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
		!!damSum = damage + damageM
		!!defence -= damSum
		defenceV -= damage
		'<b><font color="green">You have caused damage <<damage>> Protection of the enemy units</font></b>'
		xgt 'fight', 'sta'
	end

	if klonV > 0 and unmaterialV <= 0:
		klonV -= 1
		'<b><font color="green">Destroyed enemy clone</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterialV > 0:
		unmaterialV -= 1
		'<b><font color="red">Your shot went through the opponent''s body. Opponents do not materials</font></b>'
		xgt 'fight', 'sta'
	end

	if barierV > 0:
		!!imeniteta barrier for damage
		if barierV >= damage:
			'<b><font color="red"><<$nameV>> easily withstood your butt</font></b>'
			xgt 'fight', 'sta'
		else
			!!manna -= damageM
			!!health -= damage
			damage -= barierV
			healthV -= damage

			if damTipM > 0:
				mannaV -= damageM
				manna += damageM
				'<b><font color="green">you have ingested <<damageM>> units of manna from the enemy.</font></b>'
			end

			if eleSh > 0:
				stunV = rand(eleSh, eleSh * 3)
				'<b><font color="green"><<$nameV>> paralyzed <<stunV>> rounds</font></b>'
			end

			'<b><font color="green">You have caused damage <<damage>> units</font></b>'
			!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkaloV > 0:
				zerkaloV -= 1
				health -= damage
				'<b><font color="red">Enemy reflected damage and you got <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'atakW':
	cla
	!!payment hit dodge
	poSp = speed * 20 / 100
	uvAg = agilV * 20 / 100
	poBox = react * 20 / 100
	uvBox = reactV * 20 / 100
	popad = rand(react - poBox, react + poBox) + rand(speed - poSp, speed + poSp)
	uvorot = rand(reactV - uvBox, reactV + uvBox) + rand(agilV - uvAg, agilV + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
		!!Crete, very direct hit
			'<b><font color="red">critical hits</font></b>'
			xgt 'atakA', 'uronKritW'
		else
			!!normal hit
			'<b><font color="red">Contact</font></b>'
			xgt 'atakA', 'uronW'
		end
	else
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKritW':
	cla
	damKoef = damTip * 20 / 100
	damage = rand(damTip + damKoef, damTip + damKoef * 2)
	damKoefM = damTipM * 20 / 100
	damageM = rand(damTipM + damKoefM, damTipM + damKoefM * 2)
	xgt 'atakA', 'damageW'
end

if $ARGS[0] = 'uronW':
	cla
	damKoef = damTip * 20 / 100
	damage = rand(damTip - damKoef, damTip + damKoef)
	damKoefM = damTipM * 20 / 100
	damageM = rand(damTipM - damKoefM, damTipM + damKoefM)
	xgt 'atakA', 'damageW'
end

if $ARGS[0] = 'damageW':
	cla

	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
		if dospehV > 0:damageV -= dospehDefV & dospehEn -= 1
		if damage < 0:damage = 0

		healthV -= damage
		mannaV -= damageM
		'<b><font color="green">You are harmed <<damage>> units</font></b>'
		'<b><font color="green">You have caused damage to the enemy manna <<damageM>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
		damSum = damage + damageM
		defenceV -= damSum
		!!defenceV -= damage
		'<b><font color="green">You have caused damage <<damSum>> Protection of the enemy units</font></b>'
		xgt 'fight', 'sta'
	end

	if klonV > 0 and unmaterialV <= 0:
		klonV -= 1
		'<b><font color="green">Destroyed enemy clone</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterialV > 0:
		unmaterialV -= 1
		'<b><font color="red">Your shot went through the opponent''s body. Opponents do not materials</font></b>'
		xgt 'fight', 'sta'
	end

	if barierV > 0:
		!!imeniteta barrier for damage
		if barierV >= damage:
			'<b><font color="red"><<$nameV>> easily withstood your butt</font></b>'
			xgt 'fight', 'sta'
		else
			mannaV -= damageM
			healthV -= damage
			!!healthV -= damage
			'<b><font color="green">You have caused damage <<damage>> units</font></b>'
			'<b><font color="green">You have caused damage to the enemy manna <<damageM>> units</font></b>'

			if zerkaloV > 0:
				zerkaloV -= 1
				health -= damage
				'<b><font color="red">Enemy reflected damage and you got <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

--- atakA ---------------------------------
# atakA1
if $ARGS[0] = 'atak':
	cla
	!!payment hit dodge
	poSp = speedV * 20 / 100
	uvAg = agil * 20 / 100
	poBox = reactV * 20 / 100
	uvBox = react * 20 / 100
	popad = rand(reactV - poBox, reactV + poBox) + rand(speedV - poSp, speedV + poSp) + bonusShV
	uvorot = rand(react - uvBox, react + uvBox) + rand(agil - uvAg, agil + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="red">critical hits</font></b>'
			xgt 'atakA1', 'uronKrit'
		else
			!!normal hit
			!!attack the enemy
			'<b><font color="red">Contact</font></b>'
			xgt 'atakA1', 'uron'
		end
	else
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKrit':
	cla
	damKoef = damTipV * 20 / 100
	damage = rand(damTipV + damKoef, damTipV + damKoef * 2)

	if damTipMV > 0:
		damKoefM = damTipMV * 20 / 100
		damageM = rand(damTipMV + damKoefM, damTipMV + damKoefM * 2)
	end

	xgt 'atakA1', 'damage'
end

if $ARGS[0] = 'uron':
	cla
	damKoef = damTipV * 20 / 100
	damage = rand(damTipV - damKoef, damTipV + damKoef)

	if damTipMV > 0:
		damKoefM = damTipMV * 20 / 100
		damageM = rand(damTipMV - damKoefM, damTipMV + damKoefM)
	end

	xgt 'atakA1', 'damage'
end

if $ARGS[0] = 'damage':
	cla

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage

		if hidanAtk = 1:
			hidanAtk = 0
			zerkaloV += 50
			bloodV += 50
			'<b><font color="red"><<$nameV>> drink your blood.</font></b>'
		end

		if damTipMV > 0:
			manna -= damageM
			manna += damageM
			'<b><font color="red"><<$nameV>> absorbed <<damageM>> units of manna you.</font></b>'
		end

		if poisonAV = 1:
			poisonV = 50
			'<b><font color="red"><<$nameV>> have poisoned the needles hit.</font></b>'
		end

		!!manna -= damageM
		if eleShV > 0:
			stun = rand(eleShV, eleShV * 3)
			'<b><font color="red">You are paralyzed <<stunV>> rounds</font></b>'
		end

		'<b><font color="red"><<$nameV>> damage caused you <<damage>> units</font></b>'
		!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			healthV -= damage
			'<b><font color="green">You are repelled damage and <<$nameV>> received <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defence > 0 and klon <= 0 and unmaterial <= 0:
		!!damSum = damage + damageM
		!!defence -= damSum
		defence -= damage
		'<b><font color="red">Protection of your harmed <<damage>> units</font></b>'
		xgt 'fight', 'sta'
	end

	if klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Strike the enemy passed through you. YOU is not material</font></b>'
		xgt 'fight', 'sta'
	end

	if barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstood the impact of the opponent</font></b>'
			xgt 'fight', 'sta'
		else
			!!manna -= damageM
			!!health -= damage
			health -= damage

			if damTipM > 0:
				manna -= damageM
				mannaV += damageM
				'<b><font color="green">you have ingested <<damageM>> units of manna from the enemy.</font></b>'
			end

			if eleShV > 0:
				stun = rand(eleShV, eleShV * 3)
				'<b><font color="green"><<$nameV>> paralyzed <<stunV>> rounds</font></b>'
			end

			if poisonAV = 1:
				poisonV = 50
				'<b><font color="red"><<$nameV>> have poisoned the needles hit.</font></b>'
			end

			'<b><font color="red">you have caused damage <<damage>> units</font></b>'
			!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="green">You are repelled enemy damage and received <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'atakW':
	cla
	!!payment hit dodge
	poSp = speedV * 20 / 100
	uvAg = agil * 20 / 100
	poBox = reactV * 20 / 100
	uvBox = react * 20 / 100
	popad = rand(reactV - poBox, reactV + poBox) + rand(speedV - poSp, speedV + poSp)
	uvorot = rand(react - uvBox, react + uvBox) + rand(agil - uvAg, agil + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="red">critical hits</font></b>'
			xgt 'atakA1', 'uronKritW'
		else
			!!normal hit
			'<b><font color="red">Contact</font></b>'
			xgt 'atakA1', 'uronW'
		end
	else
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKritW':
	cla
	damKoef = damTipV * 20 / 100
	damage = rand(damTipV + damKoef, damTipV + damKoef * 2)
	damKoefM = damTipMV * 20 / 100
	damageM = rand(damTipMV + damKoefM, damTipMV + damKoefM * 2)
	xgt 'atakA1', 'damageW'
end

if $ARGS[0] = 'uronW':
	cla
	damKoef = damTipV * 20 / 100
	damage = rand(damTipV - damKoef, damTipV + damKoef)
	damKoefM = damTipMV * 20 / 100
	damageM = rand(damTipMV - damKoefM, damTipMV + damKoefM)
	xgt 'atakA1', 'damageW'
end

if $ARGS[0] = 'damageW':
	cla

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage
		manna -= damageM
		'<b><font color="green">You are harmed <<damage>> units</font></b>'
		'<b><font color="green">You have caused damage to the enemy manna <<damageM>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			health -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defence > 0 and klon <= 0 and unmaterial <= 0:
		damSum = damage + damageM
		defence -= damSum
		!!defenceV -= damage
		'<b><font color="green">You have caused damage <<damSum>> Protection of the enemy units</font></b>'
		xgt 'fight', 'sta'
	end

	if klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="green">Destroyed enemy clone</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterial > 0:
		unmaterial -= 1
		'<b><font color="red">Your shot went through the opponent''s body. Opponents do not materials</font></b>'
		xgt 'fight', 'sta'
	end

	if barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="red"><<$nameV>> easily withstood your butt</font></b>'
			xgt 'fight', 'sta'
		else
			manna -= damageM
			health -= damage
			!!healthV -= damage
			'<b><font color="green">You have caused damage <<damage>> units</font></b>'
			'<b><font color="green">You have caused damage to the enemy manna <<damageM>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="red">Enemy reflected damage and you got <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

--- atakA1 ---------------------------------
# atakB
if $ARGS[0] = 'atak':
	cla
	!!payment hit dodge
	poSp = speed * 20 / 100
	uvAg = agilV * 20 / 100
	poBox = react * 20 / 100
	uvBox = reactV * 20 / 100
	popad = rand(react - poBox, react + poBox) + rand(speed - poSp, speed + poSp) + bonusSh
	uvorot = rand(reactV - uvBox, reactV + uvBox) + rand(agilV - uvAg, agilV + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="green">critical hits</font></b>'
			gs 'atakB', 'uronKrit'
		else
			!!normal hit
			!!attack the enemy
			'<b><font color="green">Contact</font></b>'
			gs 'atakB', 'uron'
		end
	else
		'<b><font color="red">is washed</font></b>'
	end
end

if $ARGS[0] = 'uronKrit':
	cla
	damDef = defence / 100
	damKoef = damDef * 20 / 100
	damage = rand(damDef + damKoef, damDef + damKoef * 2)
	gs 'atakB', 'damage'
end

if $ARGS[0] = 'uron':
	cla
	damDef = defence / 100
	damKoef = damDef * 20 / 100
	damage = rand(damDef - damKoef, damDef + damKoef)
	gs 'atakB', 'damage'
end

if $ARGS[0] = 'damage':
	cla

	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
		if dospehV > 0:damageV -= dospehDefV & dospehEn -= 1
		if damage < 0:damage = 0

		healthV -= damage
		!!manna -= damageM

		if eleSh > 0:
			stunV = rand(eleSh, eleSh * 3)
			'<b><font color="green"><<$nameV>> paralyzed <<stunV>> rounds</font></b>'
		end

		'<b><font color="green">You have caused damage <<damage>> units</font></b>'
		!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkaloV > 0:
			zerkaloV -= 1
			defence -= damage
			'<b><font color="red"><<$nameV>> reflected the damage and your defense has received <<damage>> points of damage</font></b>'
		end

		!!xgt 'fight', 'sta'
	end

	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
		!!damSum = damage + damageM
		!!defence -= damSum
		defenceV -= damage
		'<b><font color="green">caused damage to your defense <<damage>> Protection of the enemy units</font></b>'
		!!xgt 'fight', 'sta'
	end

	if klonV > 0 and unmaterialV <= 0:
		klonV -= 1
		'<b><font color="green">Destroyed enemy clone</font></b>'
		!!xgt 'fight', 'sta'
	end

	if unmaterialV > 0:
		unmaterialV -= 1
		'<b><font color="red">Blow your protection passed through the body of the opponent. Opponents do not materials</font></b>'
		!!xgt 'fight', 'sta'
	end

	if barierV > 0:
		!!imeniteta barrier for damage
		if barierV >= damage:
			'<b><font color="red"><<$nameV>> easily withstood kick your protection</font></b>'
			!!xgt 'fight', 'sta'
		elseif barierV < damage:
			!!manna -= damageM
			!!health -= damage
			healthV -= damage

			if eleSh > 0:
				stunV = rand(eleSh, eleSh * 3)
				'<b><font color="green"><<$nameV>> paralyzed <<stunV>> rounds</font></b>'
			end

			'<b><font color="green">caused damage to your defense <<damage>> units</font></b>'
			!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkaloV > 0:
				zerkaloV -= 1
				defence -= damage
				'<b><font color="red">Enemy reflected damage and your defense received <<damage>> points of damage</font></b>'
			end
		end

		!!xgt 'fight', 'sta'
	end
end

--- atakB ---------------------------------
# atakB1

if $ARGS[0] = 'atak':
	cla
	!!payment hit dodge
	poSp = speedV * 20 / 100
	uvAg = agil * 20 / 100
	poBox = reactV * 20 / 100
	uvBox = react * 20 / 100
	popad = rand(reactV - poBox, reactV + poBox) + rand(speedV - poSp, speedV + poSp) + bonusShV
	uvorot = rand(react - uvBox, react + uvBox) + rand(agil - uvAg, agil + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="green">critical hits</font></b>'
			gs 'atakB1', 'uronKrit'
		else
			!!normal hit
			!!attack the enemy
			'<b><font color="green">Contact</font></b>'
			gs 'atakB1', 'uron'
		end
	else
		'<b><font color="red">is washed</font></b>'
	end
end

if $ARGS[0] = 'uronKrit':
	cla
	damDef = defenceV / 100
	damKoef = damDef * 20 / 100
	damage = rand(damDef + damKoef, damDef + damKoef * 2)
	gs 'atakB1', 'damage'
end

if $ARGS[0] = 'uron':
	cla
	damDef = defenceV / 100
	damKoef = damDef * 20 / 100
	damage = rand(damDef - damKoef, damDef + damKoef)
	gs 'atakB1', 'damage'
end

if $ARGS[0] = 'damage':
	cla

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDefV & dospehEn -= 1
		if damage < 0:damage = 0
		health -= damage
		!!manna -= damageM

		if eleShV > 0:
			stun = rand(eleShV, eleShV * 3)
			'<b><font color="red">Protection of the enemy paralyze you <<stun>> rounds</font></b>'
		end

		'<b><font color="red">Protection of the enemy caused you damage <<damage>> units</font></b>'
		!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			defenceV -= damage
			'<b><font color="green">You are reflected damage from the defense and protection of the enemy received <<damage>> points of damage</font></b>'
		end

		!!xgt 'fight', 'sta'
	end

	if defence > 0 and klon <= 0 and unmaterial <= 0:
		!!damSum = damage + damageM
		!!defence -= damSum
		defence -= damage
		'<b><font color="red">your defense harmed <<damage>> units from the defense</font></b>'
		!!xgt 'fight', 'sta'
	end

	if klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone</font></b>'
		!!xgt 'fight', 'sta'
	end

	if unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Beat the defense went through you. YOU is not material</font></b>'
		!!xgt 'fight', 'sta'
	end

	if barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstand the impact of the defense</font></b>'
			!!xgt 'fight', 'sta'
		else
			!!manna -= damageM
			!!health -= damage
			health -= damage

			if eleShV > 0:
				stun = rand(eleShV, eleShV * 3)
				'<b><font color="red">Protection of the enemy paralyze you <<stun>> rounds</font></b>'
			end

			'<b><font color="red">You have harmed <<damage>> units from the defense</font></b>'
			!!'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				defenceV -= damage
				'<b><font color="green">You are repelled enemy damage and protection received <<damage>> points of damage</font></b>'
			end
		end

		!!xgt 'fight', 'sta'
	end
end

--- atakB1 ---------------------------------
# atakM

if $ARGS[0] = 'atakVmanna':
	cla
	!!payment hit dodge
	poSp = speedV * 20 / 100
	uvAg = agil * 20 / 100
	poBox = reactV * 20 / 100
	uvBox = react * 20 / 100
	popad = rand(reactV - poBox, reactV + poBox) + rand(speedV - poSp, speedV + poSp)
	uvorot = rand(react - uvBox, react + uvBox) + rand(agil - uvAg, agil + uvAg)
	uvorKoef = uvorot * 50 / 100
	popKoef = popad * 50 / 100

	if popad > uvorot:
		if popad >= uvorot + uvorKoef:
			!!Crete, very direct hit
			'<b><font color="red">critical hits</font></b>'
			xgt 'atakM', 'uronKritV'
		else
			!!normal hit
			!!attack the enemy
			'<b><font color="red">Contact</font></b>'
			xgt 'atakM', 'uronV'
		end
	else
		'<b><font color="green">is washed</font></b>'
		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronKritV':
	cla
	damage = rand(1000, 2000)
	damageM = rand(1000, 2000)

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage
		manna -= damageM
		'<b><font color="red">caused damage your health <<damage>> units</font></b>'
		'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			healthV -= damage
			'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defence > 0 and klon <= 0 and unmaterial <= 0:
		damSum = damage + damageM
		defence -= damSum
		'<b><font color="red">Protection of your harmed <<damSum>> units</font></b>'
		xgt 'fight', 'sta'
	end

	if klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone, you have more <<Klon>> clones</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Strike the enemy flew right through your body. YOU is not material</font></b>'
		xgt 'fight', 'sta'
	end

	if barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstood the impact of the opponent</font></b>'
			xgt 'fight', 'sta'
		else
			manna -= damageM
			health -= damage
			'<b><font color="red">You harmed <<damage>> units</font></b>'
			'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

if $ARGS[0] = 'uronV':
	cla
	damage = rand(500, 1000)
	damageM = rand(500, 1000)

	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
		if dospeh > 0:damage -= dospehDef & dospehEn -= 1
		if damage < 0:damage = 0

		health -= damage
		manna -= damageM
		'<b><font color="red">caused damage your health <<damage>> units</font></b>'
		'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

		if zerkalo > 0:
			zerkalo -= 1
			healthV -= damage
			'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
		end

		xgt 'fight', 'sta'
	end

	if defence > 0 and klon <= 0 and unmaterial <= 0:
		damSum = damage + damageM
		defence -= damSum
		'<b><font color="red">Protection of your harmed <<damSum>> units</font></b>'
		xgt 'fight', 'sta'
	end

	if klon > 0 and unmaterial <= 0:
		klon -= 1
		'<b><font color="red">destroy your clone, you have more <<Klon>> clones</font></b>'
		xgt 'fight', 'sta'
	end

	if unmaterial > 0:
		unmaterial -= 1
		'<b><font color="green">Strike the enemy flew right through your body. YOU is not material</font></b>'
		xgt 'fight', 'sta'
	end

	if barier > 0:
		!!imeniteta barrier for damage
		if barier >= damage:
			'<b><font color="green">You can easily withstood the impact of the opponent</font></b>'
			xgt 'fight', 'sta'
		else
			manna -= damageM
			health -= damage
			'<b><font color="red">You harmed <<damage>> units</font></b>'
			'<b><font color="red">caused damage your manna <<damageM>> units</font></b>'

			if zerkalo > 0:
				zerkalo -= 1
				healthV -= damage
				'<b><font color="green">You are repelled damage and <<$nameV>> to give <<damage>> points of damage</font></b>'
			end
		end

		xgt 'fight', 'sta'
	end
end

--- atakM ---------------------------------
# spell
if $ARGS[0] = 'reset':
	cla
	!!Creating fog
	'Accumulated manna <<mannaReset>> units.'

	act 'Absorb accumulated manna':
		cla
		*clr
		manna += mannaReset
		mannaRe= 0
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:act 'Magical attacks':gt 'magik'
end

if $ARGS[0] = 'unmat':
	cla
	!!Creating fog
	'You can become incorporeal for 30 moves, in exchange for 3,000 units Rikudo forces. This part of the force will be lost to you forever after using spells.'
	'Not materiality allows you to skip through your body without getting any impact damage, while slightly reduced longevity spells.'

	if rikudo >= 3000:
		act 'Become a disembodied':
			cla
			*clr
			unmaterial = 31
			rikudo += 3000
			mannaRe= 0
			xgt 'fight', 'sta'
		end
	else
		'You have too little strength Rikudo for this spell.'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'tuman':
	cla
	!!Creating fog
	if tumanV > 0:
		'It is not possible to impose your fog on the existing fog enemy.'
	else
		'Create a fog on the battlefield, the enemy closing review. Cost 10 mana.'

		act 'Create a fog (10 mana)':
			cla
			*clr
			manna -= 10
			tuman += 10
			gt 'fight', 'sta'
		end
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'klon':
	cla
	'You can create a clone exactly copying you, and themselves to escape from the enemy. 15 mana cost 1 clone.'

	act 'Create a clone':
		cla
		*clr
		manna -= 15
		klon += 1
		gt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'stun':
	cla
	'You need to touch up the enemy, then he will be paralyzed. Cost 20 mana.'

	act 'Paralytic stroke':
		cla
		*clr
		manna -= 20
		stunner = 1
		xgt 'atak', 'player'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'weap':
	cla
	'You can invest in the magical power of the weapon increasing its damage. Cost 20 mana.'

	act 'Invest energy':
		cla
		*clr
		manna -= 20
		magweapbonus = weapbonus * 4
		xgt 'atak', 'player'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind':
	cla
	'Corrupts wind that would blow away the fog. Cost 40 mana.'

	act 'Apply':
		cla
		*clr
		manna -= 40
		tumanV = 0
		tuman = 0
		'<b><font color="green">You sent against the wind on the battlefield and destroyed fog.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'klon2':
	cla
	'You can create three clones exactly copying you, and themselves to escape from the enemy. 45 mana cost 3 clone.'

	act 'Create clones':
		cla
		*clr
		manna -= 45
		klon += 3
		gt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'energo':
	cla
	'You can create an energy shield to protect against attacks on health. 100 units of protection costs 50 mana.'

	act 'Create energy shield':
		cla
		*clr
		manna -= 50
		defence += 100
		'<b><font color="green">You have imposed energy shield, you now have <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'init':
	cla
	'You can create a slight slowing of time to get the advantage in speed of reaction and seize the initiative. Costs 60 mana.'

	act 'Create a slowdown':
		cla
		*clr
		manna -= 60
		initBonus = 120
		'<b><font color="green">You put the manna in the amplification reaction.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'hel':
	cla
	!!Creating fog
	'Cure yourself or add 400 units of health. 400 mana cost.'

	act 'Treated (400 mana)':
		cla
		*clr
		manna -= 400
		health += 400
		'<b><font color="green">You put the manna in the acceleration of regenerative processes in the body.</font></b>'
		gt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'hand':
	cla
	!!Creating fog
	'Striking hand increases damage 10 times per attack. 100 mana cost.'

	act 'Striking hand (100 mana)':
		cla
		*clr
		manna -= 100
		strenK = stren * 20/100
		magweapbonus = rand(stren * 10 - strenK, stren * 10 + strenK)
		'<b><font color="green">You put the manna in the palm for applying a devastating blow.</font></b>'
		xgt 'atak', 'player'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'fire1':
	cla
	!!Creating fog
	'Flame. Cost 10 mana.'

	act 'Flame (10 mana)':
		cla
		*clr
		manna -= 10
		damTip = 250
		'<b><font color="green">You have created a torrent of flames pouring out of your hand.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'fire2':
	cla
	!!Creating fog
	'Release of fire. 100 mana cost.'

	act 'Release of fire (100 mana)':
		cla
		*clr
		manna -= 100
		damTip = 2500
		'<b><font color="green">You have created a huge stream of fire pouring out of your hand.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'fire3':
	cla
	!!Creating fog
	'Fire barrier, creates a shield of 750 units. 150 mana cost.'

	act 'Fire barrier (150 mana)':
		cla
		*clr
		manna -= 150
		defence += 750
		'<b><font color="green">You have created a fire barrier around him, now you <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'fire4':
	cla
	!!Creating fog
	'Firestorm. Cost 250 mana.'

	act 'Firestorm (250 mana)':
		cla
		*clr
		manna -= 250
		damTip = 6250
		bonusSh = 100
		'<b><font color="green">The air around you is red-hot and inflamed, a sea of ​​fire fell upon the enemy.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'fire5':
	cla
	!!Creating fog
	'Flame Shield creates a shield of 2,500 units. 500 mana cost.'

	act 'Flame Shield (500 mana)':
		cla
		*clr
		manna -= 500
		defence += 2500
		'<b><font color="green">You have created a wall of fire around it absorbs damage, you now have <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ele1':
	cla
	!!Creating fog
	'Discharge. Cost 10 mana.'

	act 'Discharge (10 mana)':
		cla
		*clr
		manna -= 10
		damTip = 150
		eleSh = 1
		'<b><font color="green">You have created an electrical discharge pouring out of your hand.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ele2':
	cla

	!!Creating fog
	'Lightning. 100 mana cost.'
	act 'Lightning (100 mana)':
		cla
		*clr
		manna -= 100
		damTip = 1500
		eleSh = 1
		'<b><font color="green">You have created a lightning rattled vystrelevshuyu from your hand.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ele3':
	cla
	!!Creating fog
	'Electrical barrier creates a shield of 1,500. 150 mana cost.'

	act 'Electric barrier (150 mana)':
		cla
		*clr
		manna -= 150
		defence += 1500
		'<b><font color="green">You have created a wall around himself dancing lightning, you now have <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ele4':
	cla
	!!Creating fog
	'Dance of thousands of birds. Cost 250 mana.'

	act 'Dance of thousands of birds (250 mana)':
		cla
		*clr
		manna -= 250
		damTip = 3750
		bonusSh = 30
		eleSh = 1
		'<b><font color="green">you have gathered the manna in the hand and danced around the palm of your hand lightning leaping through the air with shrieks.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ele5':
	cla
	!!Creating fog
	'Plyaschuschaya sphere creates a shield of 5,000 units. 500 mana cost.'

	act 'Plyaschuschaya sphere (500 mana)':
		cla
		*clr
		manna -= 500
		defence += 5000
		'<b><font color="green">you have created around him a large sphere of lightning dancing, you now have <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ert1':
	cla
	!!Creating fog
	'Quicksand trap catches the enemy in quicksand and inflicts 100 units. Cost 10 mana.'

	act 'Quicksand (10 mana)':
		cla
		*clr
		manna -= 10
		damTip = 100
		eleSh = 5
		'<b><font color="green">you have created under enemy addictive quicksand.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ert2':
	cla
	!!Creating fog
	'Active protection, creates a protective sphere of earth, stone and sand 2,500 mana and health protection, this protection is self-healing in 10 moves absorbing units 20 mana per turn. 100 mana cost.'

	act 'Active Protection (100 mana)':
		cla
		*clr
		manna -= 100
		defence += 2500
		defenceM += 2500
		defenceActPar = 1000
		defenceActParM = 1000
		defenceAct = 10
		defenceActM = 10
		'<b><font color="green">Land surrounded you, giving you protection.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ert3':
	cla
	!!Creating fog
	'Abyss earth asunder underfoot enemy inflicting damage 1,500 and depriving him of the ability to move. 150 mana cost.'

	act 'Quicksand (150 mana)':
		cla
		*clr
		manna -= 150
		damTip = 1500
		eleSh = 5
		'<b><font color="green">You are the earth underfoot opponents.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ert4':
	cla
	!!Creating fog
	'Absolute protection, creates a huge protective sphere of the earth, which regenerates itself every move and attack the enemy. Cost 250 mana.'

	act 'Absolute protection (250 mana)':
		cla
		*clr
		manna -= 250
		defence += 6250
		defenceM += 6250
		defenceW += 6250
		defenceActPar = 1000
		defenceActParM = 1000
		defenceActParW = 1000
		defenceAct = 15
		defenceActM = 15
		defenceActW = 15
		defAtk = 15
		'<b><font color="green">Land surrounded you, giving you protection.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'ert5':
	cla
	!!Creating fog
	'Sando, two huge plates come out of the ground and collapse crushing the enemy inflicting damage to 5,000 units and depriving him of the ability to move. 500 mana cost.'

	act 'Sando (500 mana)':
		cla
		*clr
		manna -= 500
		damTip = 5000
		bonusSh = 50
		eleSh = 5
		'<b><font color="green">Two huge plate with a roar came from the earth and imploded.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind1':
	cla
	!!Creating fog
	'A gust of wind, inflicts 100 units destroys clones and fog, it is very difficult to dodge. Cost 10 mana.'

	act 'Wind gusts (10 mana)':
		cla
		*clr
		manna -= 10
		damTip = 100
		bonusSh = 50
		'<b><font color="green">You have created a gust of wind.</font></b>'

		if klonV > 0:klonV = 0 & '<b><font color="green">Clone opponent turned into steam.</font></b>'
		if tumanV > 0:tumanV = 0 & '<b><font color="green">Fog enemy torn to shreds by the wind.</font></b>'

		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind2':
	cla
	!!Creating fog
	'Horrendous pressure inflicts 1,000 clones and destroys the fog is very difficult to dodge. 100 mana cost.'

	act 'Horrendous pressure (100 mana)':
		cla
		*clr
		manna -= 100
		damTip = 1000
		bonusSh = 100
		'<b><font color="green">You are sharply raised air pressure.</font></b>'

		if klonV > 0:klonV = 0 & '<b><font color="green">Clone the enemy broke and turned into steam.</font></b>'
		if tumanV > 0:tumanV = 0 & '<b><font color="green">Fog enemy torn apart pressure.</font></b>'

		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind3':
	cla
	!!Creating fog
	'Vacuum sphere, creates a shield of 1,500. 150 mana cost.'

	act 'Vacuum sphere (150 mana)':
		cla
		*clr
		manna -= 150
		defence += 1500
		'<b><font color="green">you have created around themselves the vacuum, you now have <<defence>> protection units.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind4':
	cla
	!!Creating fog
	'Vacuum shells cause damage destroys 2,500 clones and fog, it is very difficult to dodge. Cost 250 mana.'

	act 'Vacuum Rockets (250 mana)':
		cla
		*clr
		manna -= 250
		damTip = 2500
		bonusSh = 100
		'<b><font color="green">you have created around themselves many areas and they vacuum at high speed with a whistle flew over the battlefield.</font></b>'

		if klonV > 0:klonV = 0 & '<b><font color="green">Clone the enemy broke and turned into steam.</font></b>'
		if tumanV > 0:tumanV = 0 & '<b><font color="green">Fog enemy torn apart pressure.</font></b>'

		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'wind5':
	cla
	!!Creating fog
	'Devouring vacuum sucks shield enemy destroying it whatever strength he was not. 500 mana cost.'

	if defenceV > 0:
		act 'Devouring vacuum (500 mana)':
			cla
			*clr
			manna -= 500
			defenceV = 0
			defenceMV = 0
			defenceWV = 0
			defenceActParV = 0
			defenceActParMV = 0
			defenceActV = 0
			defenceActMV = 0
			defAtkMV = 0
			'<b><font color="green">you have created around themselves the vacuum that sucked in the defense of the enemy to destroy it.</font></b>'
			xgt 'fight', 'sta'
		end

	else
		'The enemy is no shield that can destroy this spell.'
	end
	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'water1':
	cla
	!!Creating fog
	'Creek manna, inflicts 100 units and 1,000 units absorbs manna. Cost 10 mana.'

	act 'Creek mana (10 mana)':
		cla
		*clr
		manna -= 10
		damTip = 100
		damTipM = 1000
		'<b><font color="green">you have created in his hand a small stream of water which was shot at the enemy.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'water2':
	cla
	!!Creating fog
	'Flooding, inflicts 1,000 units and absorbs 500 units of manna. 100 mana cost.'

	act 'Flooding (100 mana)':
		cla
		*clr
		manna -= 100
		damTip = 1000
		damTipM = 500
		'<b><font color="green">From your mouth a flood of water flooded the countryside.</font></b>'
		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'water3':
	cla
	!!Creating fog
	'Water bubble creates a protective sphere of water 1,500 protection from all influences, this protection is self-healing in 10 moves absorbing units 20 mana per turn. 150 mana cost.'

	act 'Blister (150 mana)':
		cla
		*clr
		manna -= 150
		defence += 1500
		defenceM += 1500
		defenceW += 1500
		defenceActPar = 500
		defenceActParM = 500
		defenceAct = 10
		defenceActM = 10
		'<b><font color="green">Water has created around you the scope of protection.</font></b>'
		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'water4':
	cla
	!!Creating fog
	'Water shark missile inflicts 1,500 units and 2,500 units consumes mana. Cost 250 mana.'

	act 'Water shark missile (250 mana)':
		cla
		*clr
		manna -= 250
		damTip = 1500
		damTipM = 2500
		bonusSh = 50
		'<b><font color="green">You released a pack of sharks consist of water flying towards the enemy like a torpedo.</font></b>'

		if klonV > 0:klonV = 0 & '<b><font color="green">Clones enemy disappeared.</font></b>'

		xgt 'atakA', 'atak'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

if $ARGS[0] = 'water5':
	cla
	!!Creating fog
	'Great flood, the water creates a huge sphere that absorbs enemy and deflating manna from it and handing it to provide increased protection. 500 mana cost.'

	act 'Great Flood (500 mana)':
		cla
		*clr
		manna -= 500
		defence += 5000
		defenceM += 5000
		defenceW += 5000
		defenceActPar = 500
		defenceActParM = 500
		defenceAct = 10
		defenceActM = 10
		defAtkM = 10
		'<b><font color="green">you have filled out all the water district that protects you and devour enemy mana.</font></b>'

		if klonV > 0:klonV = 0 & '<b><font color="green">Clones enemy disappeared.</font></b>'

		xgt 'fight', 'sta'
	end

	act 'Physical attacks':gt 'boxing'

	if magik > 0:
		act 'Magical attacks':gt 'magik'
	end
end

--- spell ---------------------------------
# ender
if $ARGS[0] = 'loss':
	cla
	gs 'nill'

	if test = 1:
		test = 0
		act 'further':gt 'test'
		exit
	end

	if jugoFight = 1:
		health = 100
		jugoFight = 0
		'You fell to the floor and consciousness began to slip away from you.'

		act 'further':gt 'karinPRE'

		exit
	elseif jugoFight = 2:
		health = vital * 10
		jugoFight = 0
		'You fell to the floor is no longer able to fight Juugo.'

		act 'further':gt 'lab', 'start'

		exit
	elseif karinFight = 1:
		health = vital * 10
		karinFight = 0
		'You fell to the floor is no longer able to fight with Karin.'

		act 'further':gt 'lab', 'start'

		exit
	elseif prostitutFight = 1:
		health = 100
		prostitutFight = 0
		money = 0
		SUB += 1
		Loss += 1

		if rikudo > 10:rikudo -= 10

		'<center><img src="images/pics/spit.jpg"></center>'
		'You fell to the ground. Prostitute kicked you a couple more times. She searched and you took all the money. Then she leaned over and you relish spat in your face.'

		act 'further':gt 'park', 'start'

		exit
	elseif prostitutFight = 2:
		health = 100
		prostitutFight = 0
		money = 0
		SUB += 1
		Loss += 1
		bandfight -= 1

		if rikudo > 10:rikudo -= 10

		'<center><img src="images/etogame/band.jpg"></center>'
		'You fell to the ground. Bandit lit and searched you took all your money, then ordered, "Open your mouth bitch." You obeyed and opened her mouth. He inhaled and shook the ashes in your mouth. "I hope you learned a lesson slut in the next time I will not be so kind, I will punish the present."'

		act 'further':gt 'park', 'start'

		exit
	elseif prostitutFight = 3:
		health = 100
		prostitutFight = 0
		money = 100
		SUB += 2
		Loss += 1
		stellfight -= 1

		if rikudo > 10:rikudo -= 10

		'<center><img src="images/picVA/irinaQW7.jpg"></center>'
		'You fell to the ground. Prostitute kicked you a couple more times. She searched and you took all the money. Her that was not enough, he ordered you to kneel. Pulled off her panties, she sat on your face, making licking smelling secretions and semen pussy. Fearing new battery, you carefully polished her crotch with his tongue. After a few minutes, were satisfied, she left you to recover.'

		act 'further':gt 'park', 'start'

		exit
	elseif KisaFight = 1:
		health = 100
		KisaFight = 0
		SUB += 1
		Loss += 1

		if rikudo > 10:rikudo -= 10
		if KisameSex = 0:KisameSex = 1 & guy += 1

		sex += 1
		vagina += 1
		rape += 1
		horny = 0
		'<center><img src="images/qwest/kisameSex.jpg"></center>'
		'Kisame swims around you and laughs, I had fun baby perfectly. He grabbed you for utyanul legs to the bottom of the pool, where you thrust your dick in pussy, you try not to drown in the water until you fucks Kisame, he aimed his cock your insides like a jackhammer and you feel that you can no longer hold your breath in the eyes dark, Kisame ulybaetsya and leans towards you, kiss me, you have stuck my lips to his mouth and he breathed in you a new batch of air. Finally he finished and his seed shark was swimming in the water.'

		act 'Crawl out of the pool':gt 'street'

		exit
	elseif RapistFight = 1:
		RapistFight = 0
		health = 100
		RapistFight = 0
		SUB += 1
		Loss += 1

		if rikudo > 10:rikudo -= 10

		sex += 1
		vagina += 1
		guy += 1
		cumpussy += 1
		manna = 20
		willpower = 20
		rape += 1
		picrand = rand(1, 6)
		'<center><img src="images/pics/gopslut<<picrand>>.jpg"></center>'
		horand = rand(1, 100)
		'Swollen from the blows lips whispered, "do not have to beg, " "I beg you." All was in vain, the words were absorbed relentless darkness of the night benevolent, as we know the most ruthless and lost to the light of day people. You lost, was a pathetic attempt to fight but, alas, it is seen today you will look at the starry sky, while your body will be a docile instrument meet the dirtiest fantasies. Since you ripped clothes, leaving the body defenseless before the cold hands touched inaccessible to outsiders places you roared in frustration. Through closed eyelids, you have not seen that over excite you with stump hung your tormentor. Seconds later you feel bad breath body unceremoniously subjugate, toxic cloud enveloped the nostrils, perhaps, was not so disgusting to feel rhythmic violence between his legs, how to feel the smell of the stench of omnipotence. Overcoming disgust you unstuck swollen eyes from crying, face the beast you have not considered, he was the son of darkness, and she gave him his protection. Time of silence diluted filthy curses in your address changed cries and moans of pleasure. And struggled, you portrayed that he brought you to the highest peak of passion, although he was only filled with pain your crotch ravaged literally every piece of delicate skin. Trick brought you relief, rapist soon finished, poured over your stomach and crotch his scalding seed, quickly dressed, he threw himself off disappearing as suddenly as it had appeared. Do you still have pain, humiliating, over you cutting fire traces sky star fell, giving you the chance to make a wish.'

		act 'Cry':gt 'street', 'start'

		exit
	elseif gangrapeFight = 1:
		gangrapeFight = 0
		health = 100
		SUB += 1
		Loss += 1

		if rikudo > 10:rikudo -= 10

		'Drunken mug threw you on the floor spit-covered porch and began to tear your clothes, you no longer have the strength to rebel by.'

		act 'Cry':gt 'sexm', 'gangbang'
	elseif ZverevaFight = 1:
		ZverevaFight = 0
		zverRageQW = 10
		health = 100
		Loss += 1
		'<center><img src="images/pics/spit.jpg"></center>'
		'Christina Zverev beat you and you fall to the ground crying in front of the whole school. She hissed angrily to you "Now I''ll make your life hell, crud!" She leaned over to your face and said "Open your mouth and asshole Vysun language." You listened to Christina opened her mouth and tongue hanging out. Christina immediately relish spat in your mouth "swallow bitch!" You are in front of the whole school humbly swallowing harchek, Christina then again spat already hitting you in the face. Jeer at you a couple of times Christina kicking you in the ribs turned around and went to the school site.'

		act 'Leave':gt 'gschool'
	end
end

if $ARGS[0] = 'win':
	cla
	gs 'nill'

	if test = 1:
		test = 0

		act 'further':gt 'test'

		exit
	end

	if jugoFight = 2:
		health = vital * 10
		rikudo += 10
		jugoFight = 0

		if winJugo = 0:winJugo = 1

		'Juugo fell to the floor and can no longer sparingovat.'

		act 'further':gt 'lab', 'start'

		exit
	elseif karinFight = 1:
		health = vital * 10
		karinFight = 0
		rikudo += 10

		if winKarin = 0:winKarin = 1

		'Karin fell to the floor and can no longer sparingovat.'

		act 'further':gt 'lab', 'start'

		exit
	elseif prostitutFight = 1:
		prostitutFight = 0
		whoreQW = 1
		DOM += 1
		Win += 1
		rikudo += 10
		'Prostitute fell to the ground and began to plead with you not to beat her more.'

		act 'further':gt 'park', 'start'

		exit
	elseif prostitutFight = 2:
		prostitutFight = 0
		DOM += 1
		Win += 1
		bandfight += 1
		rikudo += 10

		if prostOnce = 0:prostOnce = 1 & money += rand(500, 5000)

		'Bandit fell to the ground with a groan, you took his wallet and adding a couple of times in the ribs footed left him.'

		act 'further':gt 'park', 'start'

		exit
	elseif prostitutFight = 3:
		prostitutFight = 0
		DOM += 1
		Win += 1
		stellfight += 1
		rikudo += 10
		money += rand(300, 500)
		'Battered prostitute fell to the ground, you bump it again in the ribs and she took all his money and gave you, if only you did not beat her anymore.'

		act 'further':gt 'park', 'start'

		exit
	elseif KisaFight = 1:
		KisameDead = 1
		KisaFight = 2
		DOM += 1
		Win += 1

		if rikudo > 10:rikudo += 3000

		money += 5000
		'You killed Kisame and took away his body 5,000 rubles.'

		act 'further':gt 'street'

		exit
	elseif RapistFight = 1:
		RapistFight = 0

		if rikudo > 10:rikudo += 100

		DOM += 1
		Win += 1

		if rapistOnce = 0:rapistOnce = 1 & money += rand(500, 2000)

		'You beat the rapist and took his wallet.'

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

		exit
	elseif gangrapeFight = 1:
		gangrapeFight = 0

		if rikudo > 10:rikudo += 100

		DOM += 1
		Win += 1

		if gangrapeOnce = 0:gangrapeOnce = 1 & money += rand(500, 2000)

		'Drunken mug broken snout stuck in spit-covered floor in the entryway, you got his money from his pocket saying it damages. Guys looking at you warily stepped aside.'

		act 'Leave':gt 'street'
	elseif ZverevaFight = 1:
		zverSlutQW = 1
		Win += 1
		ZverevaFight = 0
		$npcText[18] = 'Christina after catching pizdyuley from you, in front of the whole school talked about, how to suck dick at fizruka, after that terrifies the surrounding Christina was broken and humiliated.'
		grupTipe[18] = -1
		'Christina Zvereva fell to the ground, you grabbed her by the hair. "Well, say, you suck at fizruka or not?" Christina roaring confessed before the whole school in the, she sucked dick in fizruka.'

		act 'Leave':gt 'gschool'
	end
end

--- ender ---------------------------------
# nill
inFight = 0
stun = 0
stunV = 0
tuman = 0
tumanV = 0
klon = 0
klonV = 0
blood = 0
bloodV = 0
defence = 0
defenceV = 0
izanagiV = 0
round = 0
heartV = 0
hodtimeV = 0
hodtime = 0
damTip = 0
damTipV = 0
unmaterialV = 0
unmaterial = 0
defenceM = 0
defenceW = 0
defenceActPar = 0
defenceActParM = 0
defenceAct = 0
defenceActM = 0
defenceMV = 0
defenceWV = 0
defenceActParV = 0
defenceActParMV = 0
defenceActV = 0
defenceActMV = 0
defAtk = 0
defAtkV = 0
defAtkM = 0
defAtkMV = 0
damTipM = 0
damTipMV = 0
kisamePro = 0
poisonAV = 0
SasoriBody = 0
tobiPic = 0
kisamePic = 0
sasoriPic = 0
konanPic = 0
hidanPic = 0
barierV = 0
hidanAtk = 0
hidanPic = 0

--- nill ---------------------------------
# test
rost = 170
fat = 110
!!stats
rikudo = 9000
stren = 100
speed = 100
react = 100
agil = 100
vital = 100
intel = 100
will = 100
boxing = 100
magik = 10
health = vital * 10 + stren * 5
willpower = intel * 5 + will * 5
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
!!!!!!!!!!!!!!!!!!!!!!
vmeat = (stren + vital) / 8
!!!vmeat = vmeat / 8
vfat = fat / 10
Kves = vmeat + vfat
krost = rost - 130
ves = Kves + krost - (agil / 10)
talia = ves - (agil / 10)
grudi = talia + 10 + vfat + silicone
bedra = talia + 15 + (vmeat / 2) + vfat
titK = grudi - talia
if titK <= 10:tits = 0
if titK > 10 and titK <= 15:tits = 1
if titK > 15 and titK <= 20:tits = 2
if titK > 20 and titK <= 25:tits = 3
if titK > 25 and titK <= 30:tits = 4
if titK > 30 and titK <= 35:tits = 5
if titK > 35 and titK <= 40:tits = 6
if titK > 40 and titK <= 45:tits = 7
if titK > 45 and titK <= 50:tits = 8
if titK > 50 and titK <= 55:tits = 9
if titK > 55:tits = 10

spelltuman = 1
spellklon = 1
spellstun = 1
spellweap = 1
spellwind = 1
spellklon2 = 1
spellenergo = 1
spellinit = 1
spellhel = 1
spellreset= 1
spellavtoklon = 1
spellhand = 1
spellfire1 = 1
spellfire2 = 1
spellfire3 = 1
spellfire4 = 1
spellfire5 = 1
spellele1 = 1
spellele2 = 1
spellele3 = 1
spellele4 = 1
spellele5 = 1
spellert1 = 1
spellert2 = 1
spellert3 = 1
spellert4 = 1
spellert5 = 1
spellwind1 = 1
spellwind2 = 1
spellwind3 = 1
spellwind4 = 1
spellwind5 = 1
spellwater1 = 1
spellwater2 = 1
spellwater3 = 1
spellwater4 = 1
spellwater5 = 1
spellunmat = 1
spellbefshild = 1
'<<rost>>cm <<ves>>kg <<grudi>>-<<talia>>-<<bedra>> the size of the breast <<tits>>'
'All articles on the 100, all spells, magical about the 10 forces Rikudo 9000'
'Do you have any second shadow sedtse that may once to die for you.'
heart = 1
mannaReset= 10000
act '(Toby mag12)':
	cla
	$nameV = 'Toby'
	!!stats
	strenV = 300
	speedV = 100
	agilV = 100
	reactV = 100
	vitalV = 100
	intelV = 100
	willV = 200
	!!skills
	magikV = 12
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 6
	test = 1
	tobiPic = 1
	unmaterialV = 40
	izanagiOnce = 0
	tobizanagi = 0
	izanagiV = 1
	GedoMazo = 0
	TobiStena = 0

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Kisame mag10)':
	cla
	horny += 10
	$nameV = 'Kisame'
	!!stats
	strenV = 300
	speedV = 100
	agilV = 100
	reactV = 100
	vitalV = 200
	intelV = 100
	willV = 50
	!!skills
	magikV = 10
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 5
	test = 1
	kisamePic = 1
	KisaFight = 1
	klonV = 5
	!!defenceV = 10000

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Sasori mag10)':
	cla
	$nameV = 'Sasori doll'
	!!stats
	strenV = 100
	speedV = 50
	agilV = 50
	reactV = 50
	vitalV = 100
	intelV = 100
	willV = 100
	!!skills
	magikV = 10
	boxingV = 50
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 9
	test = 1
	sasoriPic = 1
	klonV = 3
	SasoriBody = 6
	!!defenceV = 10000

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Conan mag10)':
	cla
	$nameV = 'Conan'
	!!stats
	strenV = 60
	speedV = 105
	agilV = 100
	reactV = 100
	vitalV = 60
	intelV = 100
	willV = 100
	!!skills
	magikV = 10
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 10
	test = 1
	konanPic = 1
	!!klonV = 3
	!!defenceV = 10000
	unmaterialV = 20

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Hidan mag9)':
	cla
	$nameV = 'Hidan'
	!!stats
	strenV = 500
	speedV = 100
	agilV = 80
	reactV = 100
	vitalV = 600
	intelV = 100
	willV = 100
	!!skills
	magikV = 9
	boxingV = 110
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 11
	test = 1
	hidanPic = 1
	!!klonV = 3
	!!defenceV = 10000
	barierV = 5500
	hidanAtk = 1
	!!unmaterialV = 20

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Juugo, mutant power 600)':
	cla
	!!judosparday = day
	$nameV = 'Juugo'
	!!stats
	strenV = 600
	speedV = 60
	agilV = 60
	reactV = 50
	vitalV = 200
	intelV = 50
	willV = 50
	!!skills
	magikV = 1
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 0
	test = 1
	jugoFight = 2

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Karin mag6)':
	cla
	$nameV = 'Karin'
	!!stats
	strenV = 60
	speedV = 90
	agilV = 90
	reactV = 60
	vitalV = 100
	intelV = 100
	willV = 100
	!!skills
	magikV = 6
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 4
	test = 1
	karinFight = 1
	klonV = 3
	tumanV = 10

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Throwing knives mag1)':
	cla
	$nameV = 'Knife thrower'
	!!stats
	strenV = 40
	speedV = 40
	agilV = 40
	reactV = 40
	vitalV = 60
	intelV = 60
	willV = 60
	!!skills
	magikV = 1
	boxingV = 60
	shootV = 60
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 1
	test = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Misty thrower, mag2)':
	cla
	$nameV = 'Misty thrower'
	!!stats
	strenV = 50
	speedV = 50
	agilV = 50
	reactV = 50
	vitalV = 60
	intelV = 60
	willV = 60
	!!skills
	magikV = 2
	boxingV = 60
	shootV = 60
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 2
	test = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Misty lord clones mag3)':
	cla
	$nameV = 'Misty lord clones'
	!!stats
	strenV = 60
	speedV = 60
	agilV = 60
	reactV = 60
	vitalV = 70
	intelV = 70
	willV = 70
	!!skills
	magikV = 3
	boxingV = 70
	shootV = 70
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 3
	test = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Gouge magician mag4)':
	cla
	$nameV = 'Gouge magician'
	!!stats
	strenV = 70
	speedV = 70
	agilV = 70
	reactV = 70
	vitalV = 80
	intelV = 80
	willV = 80
	!!skills
	magikV = 4
	boxingV = 80
	shootV = 80
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 4
	test = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

act '(Commando)':
	cla
	$nameV = 'Commando'
	!!stats
	strenV = 200
	speedV = 100
	agilV = 100
	reactV = 100
	vitalV = 200
	intelV = 10
	willV = 10
	!!skills
	magikV = 0
	boxingV = 100
	shootV = 80
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 8
	dospehV = 800
	dospehEnV = 10
	test = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	gt 'fight', 'start'
end

--- test ---------------------------------
# priziv
if $ARGS[0] = 'tobi':
	$nameV = 'Toby'
	!!stats
	strenV = 300
	speedV = 100
	agilV = 100
	reactV = 100
	vitalV = 100
	intelV = 100
	willV = 200
	!!skills
	magikV = 12
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 6
	unmaterialV = 40
	stunV = 0

end

if $ARGS[0] = 'sasori':
	$nameV = 'Sasori doll'
	!!stats
	strenV = 100

	if SasoriBody = 5:
		speedV = 100
		agilV = 100
		reactV = 100
	end

	if SasoriBody = 4:
		speedV = 110
		agilV = 100
		reactV = 100
	end

	if SasoriBody = 3:
		speedV = 120
		agilV = 105
		reactV = 105
	end

	if SasoriBody = 2:
		speedV = 130
		agilV = 110
		reactV = 110
	end

	vitalV = 100
	intelV = 100
	willV = 100
	!!skills
	magikV = 10
	boxingV = 100
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 9
	klonV = 3
	stunV = 0
end

if $ARGS[0] = 'sasori1':
	$nameV = 'Sasori'
	!!stats
	strenV = 500
	speedV = 140
	agilV = 120
	reactV = 110
	vitalV = 500
	intelV = 100
	willV = 100
	!!skills
	magikV = 10
	boxingV = 105
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 9
	klonV = 3
	stunV = 0
end

--- priziv ---------------------------------
# defence
if defence <= 0:
	defence = 0
	defenceM = 0
	defenceW = 0
	defenceActPar = 0
	defenceActParM = 0
	defenceAct = 0
	defenceActM = 0
	defAtk = 0
	defAtkM = 0
end

if defenceV <= 0:
	defenceV = 0
	defenceMV = 0
	defenceWV = 0
	defenceActParV = 0
	defenceActParMV = 0
	defenceActV = 0
	defenceActMV = 0
	defAtkV = 0
	defAtkMV = 0
end

if defenceAct > 0:
	defence += defenceActPar
	defenceAct -= 1
	defActParK = defenceActPar/100
	manna -= defActParK
	'<b><font color="green">Regeneration consumes Protection <<defActParK>> units manna.</font></b>'
end

if defenceActM > 0:
	defenceM += defenceActParM
	defenceActM -= 1
	defActParKM = defenceActParM/100
	manna -= defActParKM
	'<b><font color="green">Regeneration consumes magical protection <<defActParKM>> units of manna.</font></b>'
end

if defenceActV > 0:
	defenceV += defenceActParV
	defenceActV -= 1
	mannaV -= (defenceActParV / 100)
end

if defenceActMV > 0:
	defenceMV += defenceActParMV
	defenceActMV -= 1
	mannaV -= (defenceActParMV / 100)
end

if defAtk > 0:
	defAtk -= 1
	'<b><font color="green">Your defense is attacking the enemy.</font></b>'
	gs 'atakB', 'atak'
end

if defAtkV > 0:
	defAtkV -= 1
	'<b><font color="red">Protection of the enemy attacks you.</font></b>'
	gs 'atakB1', 'atak'
end

if defAtkM > 0:
	defAtkM -= 1

	if defenceMV <= 0 and unmaterialV = 0:
		defDamM = rand(defenceActParM/2, defenceActParM)
		mannaV -= defDamM
		defence += defDamM
		'<b><font color="green">Your defense absorbed <<defDamM>> mana from an enemy, this manna went to strengthen your defenses.</font></b>'
	end

	if defenceMV > 0:
		defenceMV += defenceActParM
		'<b><font color="green">Your defense caused <<defenceActParM>> points of damage protection from damage enemy mana.</font></b>'
	end
	if unmaterialV > 0:'<b><font color="green">Your defense is trying to absorb the manna but it does not work, the enemy is not material.</font></b>'
end

if defAtkMV > 0:
	defAtkMV -= 1

	if defenceM <= 0 and unmaterial = 0:
		defDamMV = rand(defenceActParMV/2, defenceActParMV)
		manna -= defDamMV
		defenceV += defDamMV
		'<b><font color="red">Protection of the enemy swallow <<defDamMV>> manna from you and this manna went to strengthen the defense.</font></b>'
	end

	if defenceM > 0:
		defenceM += defenceActParMV
		'<b><font color="red">Protection against your magic damage inflicted damage <<defenceActParMV>> units.</font></b>'
	end

	if unmaterial > 0:'<b><font color="red">Protection of the enemy is trying to absorb your manna but it does not work.</font></b>'
end

--- defence ---------------------------------


# kikbox
if $ARGS[0] = 'start':
	cla
	if health <= 0:
		'<b><font color = red>You lost by TKO</font></b>'
		xgt'enderKik','loss'
		exit
	elseif healthV <= 0:
		'<b><font color = green><<$nameV>> lost by TKO</font></b>'
		xgt'enderKik','win'
		exit
	end

	if round >= 1:
		'<center><b>Round <<round>></b></center>'
		*nl
		'<center><img src="images/community/ring<<round>>.jpg"></center>'
		cla
		gs 'befKik'
		'<b>= = = = = = = = = = = = = (ROUND <<round>>) = = = = = = = = = = = = =</b>'
		if minround = 1:'<b>the fight 0:30</b>'
		if minround = 2:'<b>the fight 1:00</b>'
		if minround = 3:'<b>the fight 1:30</b>'
		if minround = 4:'<b>the fight 2:00</b>'
		if minround = 5:'<b>the fight 2:30</b>'
		'<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, Endurance <b><font color="green"><<staminaV>></font></b>'
		'Your life <b><font color="red"><<health>></font></b>, Endurance <b><font color="green"><<stamina>></font></b>'
		'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
		'Your points <<pointKik>>Points opponent <<pointKikV>>'
		'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
		gs 'initKik'

		if hod = 0:
			!!Player attacks
			'<font color="green">You can attack</font>'

			act 'Apply fast Jeb':
				cla
				damage = rand(stren/12, stren/8)

				if damage <= 0:damage = 1

				koefatak = (speed + reakt + jab) * 2
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="green">You deal with a quick jab step forward.</font>'
				gs 'Kikatak', 'player'
				xgt 'kikbox', 'sta'
			end

			act 'Apply power punch':
				cla
				damkoef = stren * 20 / 100
				damage = rand(stren - damkoef, stren + damkoef)

				if damage <= 0:damage = 1

				koefatak = (speed + reakt + punch)
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="green">You apply a powerful punch.</font>'
				gs 'Kikatak', 'player'
				xgt 'kikbox', 'sta'
			end

			act 'Footed strike':
				cla
				damkoef = stren * 20 / 100
				damage = rand((stren - damkoef) * 3, (stren + damkoef) * 3)

				if damage <= 0:damage = 1

				koefatak = (speed + reakt + kik) / 2
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="green">You apply a kick powerful.</font>'
				gs 'Kikatak', 'player'
				xgt 'kikbox', 'sta'
			end
		else
			!!Enemy attacks
			'<font color="red"><<$nameV>> attacks</font>'
			tiprand = rand(0, 2)

			if tiprand = 0:
				damage = rand(strenV / 12, strenV / 8)

				if damage <= 0:damage = 1

				koefatak = (speedV + reaktV + JabV) * 2
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="red"><<$nameV>> deals with quick jab step forward.</font>'
				gs 'Kikatak', 'enemy'
				xgt 'kikbox', 'sta'
			elseif tiprand = 1:
				damkoef = strenV * 20/100
				damage = rand(strenV - damkoef, strenV + damkoef)

				if damage <= 0:damage = 1

				koefatak = (speedV + reaktV + punchV)
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="red"><<$nameV>> applies the power punch.</font>'
				gs 'Kikatak', 'enemy'
				xgt 'kikbox', 'sta'
			elseif tiprand = 2:
				damkoef = strenV * 20 / 100
				damage = rand((strenV - damkoef) * 3, (strenV + damkoef) * 3)

				if damage <= 0:damage = 1

				koefatak = (speedV + reaktV + kikV) / 2
				koefpop = koefatak * 20 / 100
				popad = rand(koefatak - koefpop, koefatak + koefpop)
				'<font color="red"><<$nameV>> tries for a kick.</font>'
				gs 'Kikatak', 'enemy'
				xgt 'kikbox', 'sta'
			end
		end
	end
end

if $ARGS[0] = 'sta':
	cla
	ionce = 0
	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
	if minround = 1:'<b>the fight 1:00</b>'
	if minround = 2:'<b>the fight 1:30</b>'
	if minround = 3:'<b>the fight 2:00</b>'
	if minround = 4:'<b>the fight 2:30</b>'
	if minround = 5:'<b>the fight 3:00</b>'
	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
	'<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, Endurance <b><font color="green"><<staminaV>></font></b>'
	'Your life <b><font color="red"><<health>></font></b>, Endurance <b><font color="green"><<stamina>></font></b>'
	'<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'

	act 'Further':gt 'kikbox', 'fight'

	if minround = 5:
		cla
		minround = 0
		round += 1
		'Rang the gong indicating the end of the round <<round>>.'
		if round <= formula:
			act 'Back to the corner':
				cla
				'<center><img src="images/community/kickboxing_corner.jpg"></center>'
				'You try to rest as best as you can.'

				act 'In the ring':gt 'kikbox', 'start'
			end
		elseif round > formula and sparing = 0:
			act 'Get out in the middle of announcing the winner':
				cla

				if pointKik > pointKikV:
					'You won.'
					gt 'enderKik', 'win'
				elseif pointKik < pointKikV:
					'You lost.'
					gt 'enderKik', 'loss'
				elseif pointKik = pointKikV:
					'It''s a draw'
					act 'Leave the ring':gt 'enderKik', 'draw'
				end
			end
		elseif round > formula and sparing = 1:
			act 'Leave the ring':gt 'fit','start'
		end
	end
end

--- kikbox ---------------------------------
# befKik
if round > 0:
	if minround < 5:minround += 1
end

if round = 0:round = 1

--- befKik ---------------------------------
# initKik
init = speed + reakt
initKoef = init * 20 / 100
initi = rand(initi - initKoef, initi + initKoef)
initV = speedV + reaktV
initKoefV = initV * 20 / 100
initiV = rand(initiV - initKoefV, initiV + initKoefV)

if initi > initiV and hodtime < 3 and ionce = 0 or hodtimeV >= 3 and ionce = 0:
	hod = 0
	hodtime += 1

	if hodtimeV >= 3:hodtimeV = 0

	'<font color="green">You took the initiative</font>'

	ionce = 1
elseif initi < initiV and hodtimeV < 3 and ionce = 0 or hodtime >= 3 and ionce = 0:
	hod = 1
	hodtimeV += 1

	if hodtime >= 3:hodtime = 0

	'<font color="red"><<$nameV>> took the initiative</font>'
	ionce = 1
elseif initi = initiV and hodtime < 3 and hodtimeV < 3 and ionce = 0:
	ionce = 1
	inrand = rand(0, 1)

	if inrand = 0:
		hod = 0
		hodtime += 1
		'<font color="green">You took the lead</font>'
	else
		hod = 1
		hodtimeV += 1
		'<font color="red"><<$nameV>> took the initiative</font>'
	end
elseif initi = initiV and hodtime >= 3 and ionce = 0 or initi = initiV and hodtimeV >= 3 and ionce = 0:
	hodtime = 0
	hodtimeV = 0
	ionce = 1
	inrand = rand(0, 1)

	if inrand = 0:
		hod = 0
		hodtime += 1
		'<font color="green">You took the lead</font>'
	else
		hod = 1
		hodtimeV += 1
		'<font color="red"><<$nameV>> took the initiative</font>'
	end
end

--- initKik ---------------------------------
# Kikatak
if $ARGS[0] = 'player':
	defsumV = agilV + reaktV + KikDefV
	defkofV = defsumV * 20 / 100
	defV = rand(defsumV - defkofV, defsumV + defkofV)

	if popad >= defV * 2:
		'<b><font color="green">CRETE</font></b>'
		damageKrit = damage * 20 / 100
		damage += damageKrit
		healthV -= damage
		pointKik += 1
		'<font color="green">You applied <<damage>> points of damage</font>'

		if damage >= healthV * 20 / 100:
			pointKik += 1
			'<font color="green"><<$nameV>> fell to the ring</font>'

			if healthV < (vitalV * 10 + strenV * 5) / 4:
				'<font color="green"><<$nameV>> in a knockout. This is a victory!</font>'
				xgt 'enderKik', 'winKO'
				exit
			end
		end
	elseif popad < defV * 2 and popad >= defV:
		'<font color="green">Contact</font>'
		healthV -= damage
		pointKik += 1
		'<font color="green">You applied <<damage>> points of damage</font>'

		if damage >= healthV * 20 / 100:
			pointKik += 1
			'<font color="green"><<$nameV>> fell to the ring</font>'

			if healthV < (vitalV * 10 + strenV * 5) / 4:
				'<font color="green"><<$nameV>> in a knockout. This is a victory!</font>'
				xgt 'enderKik', 'winKO'
				exit
			end
		end
	elseif popad < defV:
		'<font color="red">Slip</font>'
	end
end

if $ARGS[0] = 'enemy':
	defsum = agil + reakt + KikDef
	defkof = defsum * 20 / 100
	def = rand(defsum - defkof, defsum + defkof)

	if popad >= def * 2:
		'<b><font color="red">CRETE</font></b>'
		damageKrit = damage * 20 / 100
		damage += damageKrit
		health -= damage
		pointKikV += 1
		'<font color="red">You have caused <<damage>> points of damage</font>'

		if damage >= health * 20 / 100:
			pointKikV += 1
			'<font color="red">You have fallen into the ring</font>'

			if health < (vital * 10 + stren * 5) / 4:
				'<font color="red">You are in a knockout. This defeat</font>'
				xgt 'enderKik', 'loss'
				exit
			end
		end
	elseif popad < def * 2 and popad >= def:
		'<font color="red">Contact</font>'
		health -= damage
		pointKikV += 1
		'<font color="red">You have caused <<damage>> points of damage</font>'

		if damage >= health * 20 / 100:
			pointKikV += 1
			'<font color="red">You have fallen into the ring</font>'

			if health < (vital * 10 + stren * 5) / 4:
				'<font color="red">You are in a knockout. This defeat</font>'
				xgt 'enderKik', 'loss'
				exit
			end
		end
	elseif popad < def:
		'<font color="green">Slip</font>'
	end
end

--- Kikatak ---------------------------------
# enderKik
!!CV extension: Rewrite of the winning announcement
if $ARGS[0] = 'win':
	!!KikWin = KikWin + 1
	pointKik = 0
	pointKikV = 0
	round = 0
	minround = 0
end

if health < 10:health = 10

cla
*clr


if profi = 1:
	profi = 0
	'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
	'Time to the announcement ...'

	act 'Exit to the middle to announce the winner':
		if $ARGS[0] = 'win':
			cla
			*clr
			'<center><img src="images/community/kickboxing_win.jpg"></center>'
			'Congratulations! You win!'
			KikWinPro += 1
			rikudo += 5
		end

		if $ARGS[0] = 'winKO':
			cla
			*clr
			'<center><img src="images/community/kickboxing_win_ko.jpg"></center>'
			'Congratulations! You win!'
			'And it is a knockout!'

			KikWinPro += 1
			KikWinProKO += 1
			rikudo += 10
		end

		if $ARGS[0] = 'loss':
			cla
			*clr
			'<center><img src="images/community/kickboxing_loss.jpg"></center>'
			'You lose.'
			KikLossPro += 1
		end

		if $ARGS[0] = 'lossKO':
			cla
			*clr
			'<center><img src="images/community/kickboxing_loss_ko.jpg"></center>'
			'Suddendly the room starts getting darker and darker ...'
			KikLossPro += 1
			KikLossProKO += 1
		end

		if $ARGS[0] = 'draw':
			cla
			*clr
			'And it is a draw !'
			KikDrawPro += 1
		end

	act 'Leave the ring':gt 'fit', 'razd'
	end



elseif amateur = 1:
	amateur = 0

	'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
	'Time to the announcement ...'

	act 'Exit to the middle to announce the winner':
		if $ARGS[0] = 'win':
			cla
			*clr
			'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
			'Time to the announcement ...'
			'<center><img src="images/community/kickboxing_win.jpg"></center>'
			'Congratulations! You win!'

			KikWinAm += 1
			amateur = 0
			amatReit += 1
			money += 500 + kikmoney
			rikudo += 5
			'You handed over a prize of 500 rubles.'
			gs 'razrKik'
		end

		if $ARGS[0] = 'winKO':
			cla
			*clr
			'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
			'Time to the announcement ...'
			'<center><img src="images/community/kickboxing_win_ko.jpg"></center>'
			'Congratulations! You win!'
			'Great victory!'

			KikWinAm += 1
			KikWinAmKO += 1
			amatReit += 1
			amateur = 0
			money += 500
			rikudo += 10
			'You handed over a prize of 500 rubles.'
		end

		if $ARGS[0] = 'loss':
			cla
			*clr
			'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
			'Time to the announcement ...'
			'<center><img src="images/community/kickboxing_loss.jpg"></center>'
			'You lose.'
			KikLossAm += 1
			if amatReit > 0:amatReit -= 1
		end

		if $ARGS[0] = 'lossKO':
			cla
			*clr
			'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
			'Time to the announcement ...'
			'<center><img src="images/community/kickboxing_loss_ko.jpg"></center>'
			'Suddendly the room starts getting darker and darker ...'
			KikLossAm += 1
			KikLossAmKO += 1
			if amatReit > 0:amatReit -= 1
		end

		if $ARGS[0] = 'draw':
			cla
			*clr
			'<center><img src="images/community/kickboxing_speaker.jpg"></center>'
			'Time to the announcement ...'
			'And it is a draw !'
			KikDrawAm += 1
		end

		act 'Leave the ring':gt 'fit', 'razd'
	end


elseif sparing = 1:
	sparing = 0

	if $ARGS[0] = 'win':
		'<center><img src="images/community/kickboxing_rival.jpg"></center>'
		'The section is over.'
		'Your rival came to you and said:'
		'- "Nice job on the ring."'
		'She turned around and left to the dressing room.'
	end

	if $ARGS[0] = 'winKO':
		'<center><img src="images/community/kickboxing_win_ko.jpg"></center>'
		'The section is over.'
		'You had to knock her off .... Did you??'
	end

	if $ARGS[0] = 'loss':
		'<center><img src="images/community/kickboxing_rival.jpg"></center>'
		'The section is over.'
		' Your rival came to you and said:'
		'- "Keep practicing."'
		'She turned around and left to the dressing room.'
	end

	if $ARGS[0] = 'lossKO':
		'<center><img src="images/community/kickboxing_loss_ko.jpg"></center>'
		'The section is over.'
		'Suddendly the room starts getting darker and darker ...'
	end

	if $ARGS[0] = 'draw':
		'<center><img src="images/community/kickboxing_rival.jpg"></center>'
		'The section is over.'
		' Your rival came to you and said:'
		'- "Looks like both of us need to keep practicing"'
		'She turned around and left to the dressing room.'
	end

	act 'Leave the ring':gt 'fit', 'razd'

end


--- enderKik ---------------------------------
# razrKik
if razradKik = 0:
	if amatReit >= 5:
		razradKik = 1
		amatReit = 0
		kikmoney = 200
		'You have assigned the third rank amateur kickboxing.'
	end
elseif razradKik = 1:
	if amatReit >= 10:
		razradKik = 2
		amatReit = 0
		kikmoney = 500
		'You have assigned the 2nd rank amateur kickboxing.'
	end
elseif razradKik = 2:
	if amatReit >= 15:
		razradKik = 3
		amatReit = 0
		kikmoney = 1500
		'You assigned 1st rank amateur kickboxing.'
	end
elseif razradKik = 3:
	if amatReit >= 20:
		razradKik = 4
		amatReit = 0
		kikmoney = 3500
		'You awarded the title of Candidate Master of Sports in kickboxing.'
	end
elseif razradKik = 4:
	if amatReit >= 25:
		razradKik = 5
		amatReit = 0
		kikmoney = 7500
		'You awarded the title of Master of Sports in kickboxing.'
	end
end

--- razrKik ---------------------------------
# street
$metka = $ARGS[0]
$loc = $CURLOC
music_on = 0
gs 'dinam'
'<center><b>Residential Area</b></center>'
'<center><img src="images/etogame/street.jpg"></center>'

if opusk > 0 and housr > 0:'Near the entrance to the house you live there something written on the wall. It says:<b>"<<$name>> from apartment 69 is a cheap slut!"</b>'

clr
gs 'stat'
gs 'time'
palMir = 0
bordysh = 0
housrA = 0
palMir = 0
obdysh = 0
tanhouse1 = 0
obMir = 0
houseob = 0
borMir = 0
$onobjsel = 'onobjsel'

if gopdeath = 1 and vsehsdaladay ! day:
	over = 6
	gt 'gameover'
	exit
end

if shantpopala > 0:
	cla
	*clr
	hour += 8
	cumbelly += 1
	cumpussy += 1
	cumass += 1
	cumlip += 1
	cumface += 1
	cumfrot += 1
	cumanus += 1
	fingal += 1
	guy += 2
	rape += 1
	sex += 1
	bj += 1
	anal += 1
	shantpopala -= 1
	'<center><img src="images/img/centr/rape.jpg"></center>'
	'On the street close to you, a black jeep suddenly hit the brakes. You turn your head to see what''s happening and see two large men jump of it and start to run towards you in. Before you can react and run away, they grap you and drag you into the car.'
	'"You''re doing this for a living? Taking pictures of naked people in the park?", one of the shouts, holding one of the pictures to your face you''ve made awhile back and sent someone over a social network, hoping they would pay the ransom.'
	'"No...what? What the hell is going on? I don''t know what you''re talking about!", you try to explain.'
	'"Don''t lie to use you stupid bitch.", as he said that, he hits you on your head and you pass out.'
	'You wake up somewhere out of town, you''re tied up and naked. You look down on yourself and notice traces of cum on your body, it also seems like that cum is flowing from your ass and your pussy.'
	'You notice that the blokes, who captured you sit next to you and seem to have a break, some of them are smoking.'
	'"Oh, she is finally awake, then the next fuck-cycle will be far more fun.", one of the men said, as he noticed you moving. Some of them are starting to get a evil grin on their face.'
	'They got up and came back at you, barely a minute later you wished your were still knocked out, as these jackasses had their ways with. You tried to resist, but the tape hindered you from moving. Not long after, everything faded to black and you lost you consciousness again.'
	'You feel groggy as you wake up, but it feels like someone is grapping you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he shouts, then kicks you into the stomach and leaves. As you collapse on the ground holding your stomach in pain, you take a glimpse at the street and see the assholes driving away in their black jeep. The mainroad is about 200m away, you crawl most of the way there, but soon you can walk again and eventually you find your way back to one of the mainstreets.'

	act 'Leave':gt $curloc
	exit
end

if workDolgDay <= 0 and workDolg > 0:
	cls
	gs 'stat'
	gs 'time'
	workDisk = 0
	'<center><img src="images/sauna/bug.jpg"></center>'
	'Near the entrance to the house you see two large guys, you notice that both are carrying guns. They notice you and walk up to you. "It''s time for you to pay back your depts."'

	if money >= workDolg:
		money -= workDolg
		workDolg = 0
		'You gave money Bugay, they counted them.'

		act 'Leave':gt $curloc

		exit
	else
		if money + stolmoney + karta >= workDolg:
			money += stolmoney + karta
			stolmoney = 0
			karta = 0
			money -= workDolg
			workDolg = 0
			'"I have enough at home. Follow me.", you say, going up to your apartment. You quickly hush inside, take the money out of the drawer and go back to pay. They count it, look at each other nod, then they leave again.'

			act 'Leave':gt 'korr'

			exit
		else
			money += stolmoney + karta
			stolmoney = 0
			karta = 0
			workDolg -= money
			money = 0
			workDolg += 10000
			'You tell them that you don''t have enough money. They smack you, push you into your apartment and search everything. They find you stash and plunder it.'
			'Brutes took everything that you have been told. In short, you have a duty to <<workDolg>>. Debt grows by 10 pieces, and since you can not pay off, then we will help you. Brutes dragged you into the car and thrown into the back seat. Car started and you went somewhere.'

			act 'Out of the car':
				cls
				minut += 30
				gs 'stat'
				'You have come to the sauna. Bandits have been dragged into what that room and started to explain. "You''re going to live here and work until not rasplatishsya debt. All clear? Try that buzz or escape, all we''ll bullet to the head and stabbed in the woods bury, truncated?"'
				'You frightened nodded, realizing that they are not joking.'

				act 'Look around':gt 'saunaroom'
			end
		end
	end

	exit
end

if workDiskAtkPlayer = 1:
	workDisk = 1
	workDiskAtkPlayer = 0
	'<center><img src="images/sauna/car.jpg"></center>'
	'Grab and throw you into the back seat of the car. Right and left of you sit two Ambala. In the front seat - porn studio manager. Where is the envelope - he asked.'

	if konvert = 0:
		workDolg = 200000
		workDolgDay = 7
		'Stolen.'
		'-WHAT! But how could this happen! You know, in what you got dibs?! Term give you until next Friday. In my office, you bring 200,000. If not - Pingyao itself.'
	else
		konvert = 0
		money += 5000
		'You gave the envelope. He warned you that such delays in the future may be harmful to your business relationships.'
	end

	act 'Leave':gt $curloc

	exit
end

if vladimirday = day and vladimirQW = 30 and hour >= 16 and week = 6:'<a href="exec:gt ''qwmeet2''">Before your entrance stands Audi and around the phlegmatic worth waiting for your driver Glory</a>.'
if vladimirday = day and vladimirQW = 40 and hour >= 16 and week = 6:'<a href="exec:gt ''qwmeet3''">Before your entrance stands Audi and around the phlegmatic worth waiting for your driver Glory</a>.'

housrA = 0

if car > 0 and cardrive = 1:
	cardrive = 1
	'In the parking lot is worth <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
end

if hour >= 8 and hour <= 22:'The kiosk selling <a href="exec:dynamic $kiosksig">cigarettes</a>'
if housr = 1:
	act '<b>GO HOME</b>':
		gorand = rand(0, 100)

		if loh > 0 and gopdolg > 0 and hour >= 20 and gorand >= 80:
			gt 'gopnew', 'start'
			exit
		end

		if opusk > 0 and hour >= 20 and gorand >= 80 and gopopusday ! day:
			gt 'gopnew', 'start'
			exit
		end

		gt 'korr'
	end
end

act 'Wait':
	cla
	waiting = input ("How long would you like to wait? (Not more than 120 minutes)")

	if waiting <= 0 or waiting > 120:
		minut += 15
	elseif waiting > 0 and waiting <= 120:
		minut += waiting
	end

	act 'Take a look at the clock':gt curloc
end

act 'Take a cab':
	cla
	*clr
	minut += 5
	'<center><img src="images/etogame/taxi1.jpg"></center>'
	'You caught a passing taxi.'
	'"The drive will cost you <b>250 rubles</b>", the driver says.'

	if $loc ! 'street':
		act 'Go to the Residential Area':
			$loc = 'street'
			dynamic $taxi
			end
		end

	if $loc ! 'down':
		act 'Go to the City Center':
			$loc = 'down'
			dynamic $taxi
		end
		end

	if $loc ! 'Nord':
		act 'Go to the Northern Area':
			$loc = 'Nord'
			dynamic $taxi
		end
	end

	act 'Turn him down and leave':gt '<<$loc>>'
end

if tanga = 0 and ski = 1 and hour > 6 and hour <= 20 or tanga = 0 and glamur = 1 and hour > 6 and hour <= 20:
	nurand = rand(0, 100)

	if nurand >= 90:
		manna -= 5
		SUB += 1
		horny += SUB
		'You heard a loud whisper deliberately grandmothers on the bench, "That whore! Walks in a short skirt and no panties, then mandischey shines!"'
		'You blushed in shame after caustic remarks old ladies.'
	end
end

if magik >= 1 and mainQW = 0 and StoryLine = 0:
	cla
	*clr
	mainQW = 1
	'<center><img src="images/qwest/main.jpg"></center>'
	'At the entrance you see Karin and Juugo. Karin adjusts glasses and looks around, Juugo seems to head in the clouds and not as strange look on his face is not visible tattoos.'
	'Karin closely looks around you, "I felt a burst of energy.''m Not attacking the magician?"'

	act 'No':gt 'mainQW'

	exit
end

if katkey = 1:'<a href="exec:gt ''katspalnya'', ''start''">Katies</a> apartment'
if IrinaQW >= 1:'<a href="exec:gt ''IrinaRoom'', ''start''">Irenes</a> Apartment is not far away from yours.'
if hour >= 16 and hour < 22 and dimaQW > 0:'<a href="exec:gt ''dima'', ''start''">Dimas</a> apartment'
if klofQW >= 2:'<a href="exec:gt ''klofdomhouse'', ''start''">Joras</a> apartment'
if hour >= 5 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> Station is within a 5 minute walk from here.'
if hour >= 8 and hour <= 20:'Not far from your house is a <a href="exec:gt ''shop'', ''start''">Supermarket</a>'
if hour >= 8 and hour <= 20:'<a href="exec:gt ''poli'', ''start''">the clinic</a> isn''t far from your apartement either'
if hour >= 6 and hour <= 9 and military = 1 and week = 6:'There is a <a href="exec:minut += 60 & gt ''Military'', ''start''">military bus</a> waiting on the other side of the street.'
if hour >= 8 and hour <= 14 and week ! 1:'At the local, but noisy, <a href="exec:gt ''rinok'', ''start''">marketplace</a> you can go for a small shopping trip'
if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:'The side door at the <a href="exec:gt ''kafe'', ''work''">cafe</a> open, so work staff can get in begin their shift.'
if hour >= 12 and hour <= 22 and week ! 1:'In a side alley, next to the <a href="exec:gt ''kafe'', ''start''">cafe</a>, you can hear the swearing and laughing of some <a href="exec:gt ''gopnew'', ''start''">Gopniks</a>.'
if hour > 22 or hour <= 3:'In one of the parking lots you can hear the swearing and laughing of some <a href="exec:gt ''gopnew'', ''start''">Gopniks</a>.'
if clener >= 1 and hour >= 7 and hour <= 22:'There''s a small office building where a <a href="exec:gt ''clener'', ''start''">cleaning lady</a> is needed.'

'The towns <a href="exec:minut += 21 & gt ''park'', ''start''">central park</a> is about a 20-minute walk away.'
'The cities only <a href="exec:minut += 39 & gt ''lake'', ''start''">lake</a> can be reached from here and is just a 40-minute walk away.'
'24 Hour <a href="exec:$loc = ''street'' & gt ''pharmacy'', ''start''">Pharmacy</a>.'

if hour >= 8 and lesbiQW >= 1 and lesbiQW < 3:'<a href="exec:gt ''lesbidomhouse'', ''start''">Natalia Petrovnas</a> Apartment'
if lesbiday ! day and hour >= 8 and (lesbiQW = 3 or lesbiQW = 4):'<a href="exec:gt ''lesbidomhouse'', ''start1''">Mistress''</a> Apartment'
if lesbiday ! day and hour >= 8 and lesbiQW = 5:'<a href="exec:gt ''lesbidomhouse'', ''ev15''">Mistress''</a> Apartment'
if lesbiday ! day and hour >= 8 and lesbiQW = 6:'The <a href="exec:gt ''lesbidomhouse'', ''ev22''">Perverts''</a> Apartment'
if lesbiday ! day and hour >= 8 and lesbiQW = 7:'<a href="exec:gt ''lesbidomhouse'', ''ev25''">Mistress''</a> Apartment'
if lesbiday ! day and hour >= 8 and lesbiQW = 8:'<a href="exec:gt ''lesbidomhouse'', ''ev28''">Mistress''</a> Apartment'
if lesbiday ! day and hour >= 8 and lesbiQW = 9:'<a href="exec:gt ''lesbidomhouse'', ''ev29''">Mistress''</a> Apartment'
if lesbiday = day and hour >= 8:'You can only visit your Mistress once a day!'

'In the courtyard of the house you live in, you can find the <a href="exec:gt ''trashplace'', ''start''">Wastebaskets</a>'

if SNarkPriton > 0:'<a href="exec:minut += 5 & gt ''narkopriton''">The Drug House</a> is clearly recognizeable by the syringes and the trash that lies in front of it.'
if hour >= 8 and hour <= 23 or saunaWorkWhore > 0 or workDisk = 2:'<a href="exec:minut += 10 & gt ''sauna''">The Sauna</a> is a 10 minute walk away. Rumors say the sauna is just the front for a brothel.'

if hour = meethour:
	if svidanieA = 1:'<b><a href="exec:gt ''meet'', ''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</b>'
	if svidanieB = 1:'<b><a href="exec:gt ''svidan'', ''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</b>'
	if svidanieC = 1:'<b><a href="exec:gt ''svidan'', ''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</b>'
end

streetrand = rand(0, 100)

if streetrand >= 100 and hour <= 3:
	cla
	*clr
	'<center><img src="images/etogame/street.jpg"></center>'
	'Out of the blue you are grapped by a man. He drags you into the closest bush, saying "Honey, you better not scream for help."'

	act 'Useless to resist':
		cla
		*clr
		!!money += 500
		$nameV = 'Rapist'
		sex += 1
		guy += 1
		vagina += 1
		'<center><img src="images/picV/dogging.jpg"></center>'

		if prezik > 0:
			protect = 1
			prezik -= 1
			'You give him a condom. "At least wear protection asshole. I don''t want a bastards child.", you tell him. He nods in silence, the puts it on.'
		end

		'"Get ready, bitch.", he says pushing you onto your knees. He moves behind you and takes you doggy-style. You can feel his hard cock entering your vagina.'

		if horny >= 90:
			horny = 0
			manna += 15
			willpower += 15
			orgasm += 1
			'Gradually a pleasant warmth and ripple grow in the lower abdomen, then descend upon the feeling you and your entire body covered hot waves of orgasm, you involuntarily scream with pleasure writhing on elde.'
		end

		if protect ! 1:
			!!unprotected sex
			finrand = rand(0, 1)

			if finrand = 0:
				!!inside
				cumpussy += 1
				'Man groaned and you feel like jet of sperm hit you inside your body.'

				if tabletki <= 0 and mesec <= 0:
					gs 'preg'
					manna -= 15
					willpower -= 15
					'Hell, because after all, you can fly, you thought with horror.'
				end
			else
				!!out
				cumass += 1
				'<<$nameV>> groaned and removing a member of you finished on your ass.'
			end
		else
			protect = 0
			'Guy cums in a condom. Member pulls out of you and removing the condom throws him to the ground, after pulls his pants and leaves.'
		end

		act 'Leave':gt 'street'
	end

	act 'Fight':
		cla
		$nameV = 'Rapist'
		!!stats
		strenV = 100
		speedV = 50
		agilV = 40
		reactV = 40
		vitalV = 50
		intelV = 10
		willV = 10
		!!skills
		magikV = 100
		boxingV = 50
		shootV = 100
		!!parameters
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * 10 + magikV * 10
		willpowerV = willV * 10
		BonusAtakV = 0
		BonusDefV = 0
		!!Programme of Action
		program = 0
		RapistFight = 1

		if spellavtoklon = 1:klon = 3
		if spellbefshild = 1:defence = 500

		gt 'fight', 'start'
	end

	exit
end

streetrand = rand(0, 100)
if streetrand >= 100 and money >= 1000 and daystart >= 10 and hour <= 3:
	cla
	*clr
	'<center><img src="images/etogame/street.jpg"></center>'
	'Suddenly you are attacked by a robber'

	act 'Don''t fight, just give him your money':
		cla
		clr
		money = 0
		gs 'stat'
		'He took all the money you had on your hand'

		act 'Leave':gt 'street'
	end

	act 'Stand up to him and fight back':
		cla
		'The robber throws heavy insults at you.'

		act 'Fight':
			$nameV = 'Rapist'
			!!stats
			strenV = 100
			speedV = 50
			agilV = 40
			reactV = 40
			vitalV = 50
			intelV = 10
			willV = 10
			!!skills
			magikV = 100
			boxingV = 50
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 10 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 0
			RapistFight = 1

			if spellavtoklon = 1:klon = 3
			if spellbefshild = 1:defence = 500

			gt 'fight', 'start'
		end
	end

	exit
end

streetrand = rand(0, 100)

if streetrand >= 100 and money >= 1000 and daystart >= 10 and hour <= 3:
	cla
	*clr
	'<center><img src="images/etogame/street.jpg"></center>'
	'You have been robbed. A thief grapped your purse and ran away.'

	act 'Not run, I did not catch':
		cla
		clr
		money = 0
		gs 'stat'

		act 'That jackass':gt 'street'
	end

	act 'Catch this asswipe and then fuck him up':
		if speed < 55 or agil < 55 or vital < 55:
			cla
			money = 0
			clr
			gs 'stat'

			act 'He was faster than you and you lost sight of him':gt 'street'

		elseif speed >= 60 and agil >= 60 and vital >= 60:
			$nameV = 'Rapist'
			!!stats
			strenV = 100
			speedV = 50
			agilV = 40
			reactV = 40
			vitalV = 50
			intelV = 10
			willV = 10
			!!skills
			magikV = 100
			boxingV = 50
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 10 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 0
			RapistFight = 1

			if spellavtoklon = 1:klon = 3
			if spellbefshild = 1:defence = 500

			gt 'fight', 'start'
		end
	end

	exit
elseif streetrand >= 10 and bfa < 1:
	vnerand = rand(0, 300)

	if vnerand <= vnesh:
		gs 'boy'
		'To you came <<$boybody>> <<$boybod>> <<$boyface>>. he <<$boyClo>>'
		'The guy introduced himself as <<$boy>> and asked for your telefonchik.'

		act 'Tell him your phone':
			cla
			gs 'boyfrend', 'start'
			stopboy = 0
			'<<$boyA>> record your phone and left.'

			act 'complete the walk':gt 'street'
		end
	end
end

dynamic $din_street_cum

--- street ---------------------------------
# pharmacy
!!!0.2.6 addition: Optimized flow of the code, updated descriptions - now lists everything the drugstore has to sell
!! now lists everything the drugstore has to sell
set minut += 5
*pl '<center><b><font color="maroon">Pharmacy</font></b></center>'
*pl '<center><img src="images/community/pharmacy.jpg"></center>'

!! output for purchased item
*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

*pl '<center><table align="center">' + _
FUNC ('$stock_item', 5, 'condoms', 100, 'prezik', $CURLOC) + _
FUNC ('$stock_item', 1, 'pregnancy test', 200, 'pregtest', $CURLOC) + _
FUNC ('$stock_item', 28, 'birth control pills', 500, 'tabletki', $CURLOC) + _
FUNC ('$single_stock_item', 1, 'enema kit', 500, 'klisma', $CURLOC) + _
FUNC ('$stock_item', 10, 'antibiotics', 500, 'lekarstvo', $CURLOC) + _
FUNC ('$stock_item', 20, 'vitamin drinks', 500, 'vitamin', $CURLOC) + _
FUNC ('$stock_item', 10, 'ointments for corns', 600, 'mosolmaz', $CURLOC) + _
FUNC ('$stock_item', 25, 'lip balm', 100, 'lipbalm', $CURLOC) + _
FUNC ('$stock_item', 1, 'weight loss pill', 2000, 'fatdel', $CURLOC) + _
'</table></center>'

!!gs '$stock_item', 1, 'antifungal pills', 600, 'mosolmaz', $CURLOC
*nl
clr
gs 'stat'
gs 'time'


act 'Leave': gt $loc
--- pharmacy ---------------------------------

# clener
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">office building</font></b></center>'
	'<center><img src="images/etogame/clener.jpg"></center>'
	'On the walls there are different ads, one of which says:"Cleaner Wanted".'
	'Above one of the doors a sign says, Jacob Solomonovich Schneersohn, tailor, 7:00--15:00'

	if svQW >= 1:
		if hour >= 8 and hour <= 16 and week < 6:
			'The door to the<a href="exec:gt ''torgpred''">Trade Mission</a> is open.'
		else
			'The door of the trade mission is closed and the schedule is visible:Sat and Sun 8:00--16:00'
		end
	end

	if jouryQwNo = 1 and hour = 17:
		'Yuri goes through the corridor (the same office worker who offered you walk, but you refused). He look at you and starts walking closer.'

		act 'Talk to Yuri':
			cla
			minut += 15
			gs 'stat'
			'Yuri walks up to you and says, "<<$name>>, want to grab a cup of coffee?"'

			act 'No':jouryQwNo = 1 & gt 'clener', 'start'

			act 'Drink coffee':
				cls
				minut += 30
				gs 'stat'
				'You go to the café, where Yuri orders coffee. You sit down at the table and begin to drink. Yuri is painfully quiet. He has no sense of humor and is very stiff. Obviously he likes you, but he does not know what to do. When you are done with the coffee Yuri suggests (going with him?).'

				act 'No':jouryQwNo = 1 & gt 'clener', 'start'

				dynamic $youriqwest
			end
		end
	end

	if borodachQW > 0 and borodachSex = 0 and hour >= 19:'The security guard, Sasha, nods at you.'
	if borodachQW > 0 and borodachSex > 0 and hour >= 19:'The security guard, Sasha, smiles and says:"Hi <<$name>>!"'

	if borodachQW > 0 and hour >= 19:
		act 'Approach Sasha':
			cls
			minut += 5
			gs 'stat'

			if borodachSexDay = day:'You approach the security guard and say hello. You chat with him a bit, then Sasha was going to crawl and you''re away without becoming disturb him.'

			if borodachSexDay ! day:
				'You approach the security guard and say hello. He winks at you, I stashed the bubble here, as you look at the cult of mass leisure?'

				act 'Come':
					cla
					minut += 5
					gs 'stat'
					'Sasha takes you into his cubbyhole and pulls out a bottle of vodka from under the table. He then reaches into a drawer and pulls out a piece of liver sausage and some cheese. He pours some of the vodka out into two glasses.'

					act 'Have a drink':
						cla
						'You drink the shitty vodka and it burns your throat. Breath you perlo of shit and you quickly grabbed cheese zanyuhivat friendship. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the ass.'

						act 'Smile':
							cla
							minut += 15
							horny += 10
							gs 'stat'
							'You smile and Sasha pours more vodka, not stopping from caressing your buttocks.'

							if horny < 50:dynamic $borodachNo2

							dynamic $borodachDrink
						end

						act 'Put your hand on his pants':
							cls
							minut += 15
							horny += 10
							borodachTimes += 1
							gs 'stat'

							picrand = rand(0, 2)

							if picrand = 0:'<center><img src="images/qwest/ohrannik/hj.jpg"></center>'
							if picrand = 1:'<center><img src="images/qwest/ohrannik/hj1.jpg"></center>'
							if picrand = 2:'<center><img src="images/qwest/ohrannik/hj2.jpg"></center>'

							'You put your hand on his crotch and feel his erection harden. Your thin fingers slide over his hardon and find the zipper. You unzip him and get his cock out of his pants. Sasha relaxes on the couch waiting for you to continue what you started.'
							dynamic $ohrhj
							dynamic $ohrbj
						end
					end
				end
			end

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

	if clenerT >= 3 and borodachQW = 0 and hour >= 19:
		'On a chair in front of the guard sits with crosswords and painfully remembers something. He asks to see you. "Bad ending the case, and the second letter."'

		act 'Reply guard':
			cls
			borodachQW = 1
			'(You) - Fiasco'
			'(Guard) - Exactly what I think PIZDETS can not be the answer.'

			act 'Leave':gt 'clener', 'start'

			act 'Zasmeyatsya':
				cla
				borodachQW = 2
				'You laughed at the security guard, he smiled and put aside crosswords. "I love you there is no longer seen. Cleaning lady work?"'
				'You nodded, "yes, moonlighting, then pay that kind of money that would not call it work."'
				'(Guard) - by the way I''m Sasha, and you?'
				'(You) - My World.'
				'(Sasha) - Very nice. I''ve got a bottle and have zakus, sostavish business?'

				act 'Sorry, I have to go':gt 'clener', 'start'

				act 'Why not?':
					cla
					minut += 5
					gs 'stat'
					'Sasha took you into his cubbyhole and took out a bottle of vodka under the table, reached into a drawer and pulled out a piece of liver sausage and cheese friendship. Took out a couple of glasses of vodka and poured there.'

					act 'Have a drink':
						cla
						'You drank vodka give zhzhonoy rubber and booze. Breath you perlo of shit and you quickly grabbed cheese zanyuhivat friendship. Sasha habitually slammed the glass and not even pomorschalsya. "Ah, well gone."'
						'While you are leaning to the table and nibbled zanyuhivali, you feel like a hand guard as if by chance, you stroking light touch on the ass.'

						act 'Hey! What are you doing?':
							cla
							minut += 15
							horny += 10
							gs 'stat'
							'(You) - Hey! What are you doing?'
							'"C''mon, I accidentally." Sasha began to mutter pouring more vodka. "Let''s have a drink."'

							if horny < 50:dynamic $borodachNo

							dynamic $borodachDrink
						end

						act 'To pretend not to notice':
							cla
							minut += 15
							horny += 15 + SUB
							gs 'stat'
							'You ate, trying not to pay attention to, as it were casual touch. Sasha poured more vodka and say "Between the first and second pereryvchik not great" knocked over a glass.'
							if horny < 50:dynamic $borodachNo
							dynamic $borodachDrink
						end
					end
				end
			end
		end
	end

	if hour >= 7 and hour <= 15:
		act 'Go to the tailor':
			cla
			*clr
			'Elderly Jew makes a pattern at the table, he''s a bit down glasses and looking at you on top of the points.'

			if portnoyQW > 0:
				'Aah <<$name>>, come, come again cut down?'

				if money >= 500:
					act 'Take in the clothes you are wearing for 500 rubles':
						cla
						*clr
						minut += 15
						if $clothingworntype = 'vatnik' or $clothingworntype = 'sforma' or $clothingworntype = 'yoga' or $clothingworntype = 'sarafan':
							'What are you wasting my time for? This type of clothing does not need to be resized.'
						else
							money -= 500
							dynamic '<<$clothingworntype>>B[<<clothingwornnumber>>] = bedra'
							'You undressed and filed for shirmochka clothes Jacob Solomonovich it fifteen minutes ushil your clothes and returned to you.'
						end

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

					act 'Take in different clothes':gt 'clothing', 'view_clothing_list', 'resize'
					act 'Take in all the clothes':gt 'portnoi2'
				end
			else
				'Hello young lady. I am Solomonovich Jacob, for you simply Yasha. And what is your name?'

				act 'Tell him your name':
					cla
					portnoyQW = 1
					'(You) - <<$name>>'
					'(Yasha) - What pgekgasnoe name. <<$name>>, come, sit here on this chair. Any way than I can be useful to you?'

					act 'Can you tailor my clothes?':
						cla
						*clr
						minut += 15
						gs 'stat'
						'(You) - Can you tailor my clothes to fit me better?'
						'(Yasha) - Of course I can! Otherwise, what kind of tailor would I be? Here, let me see that you''re wearing.'
						'Jacob Solomonovich you jumped smartly and flexible by removing the meter from the neck began obmeryat your chest, waist and hips.'
						'Well, I can take in whatever clothing you bring to me for 500 rubles.'

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

	if clener >= 10 and clenerT = 0:
		act 'Ask whether there is more work':
			cla
			'You ask Boris Ivanovich whether he has more work for you. He says that he needs a cleaner for cleaning the toilets. You can work almost every day. Cleaning toilets for an hour gets you 100 rubles immediately on hand.'

			act 'Refuse and leave':gt 'street'

			act 'Agree to work':
				cla
				clenerT = 1
				'You agreed to work.'

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

	if clener = 1:
		act 'Talk about available jobs':
			cla
			'You go into the office that advertised the job. You meet a large man in a jacket. He tells you you can work almost every day. Office cleaning 100 rubles per hour, cash.'

			act 'Refuse and leave':gt 'street'

			act 'Agree to work':
				cla
				clener = 2
				'You agreed to work.'

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

	if clener > 1 and clenday ! day:
		act 'Mop the floor in the office (1:00)':
			cla
			*clr
			clenday = day
			minut += 60
			clener += 1
			manna -= 15
			money += 100
			sweat += 2
			'<center><img src="images/etogame/clener1.jpg"></center>'

			if clener < 5:
				if hour >= 9 and hour <= 16:'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor.'
			elseif clener >= 5 and clener < 10:
				if hour >= 9 and hour <= 16:
					jouryQw += 1
					'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you feel his burning gaze.'
				end
			elseif clener >= 10:
				if hour >= 9 and hour <= 16 and jouryQw < 7:
					jouryQw += 1
					'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you feel his burning gaze.'
				elseif jouryQw = 7 and hour >= 9 and hour <= 16:
					cls
					gs 'stat'
					jouryQw += 1
					'<center><img src="images/etogame/clener1.jpg"></center>'
					'You scored in a bucket of water and went to the office with a rag mop capturing. All the staff went out of the office, except for a red-blond. He walked up to you and told you visibly nervous quiet "Hi. My name Jura. You loved me. Can converge to something after work?"'

					act 'No':
						cla
						jouryQwNo = 1
						'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'

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

					act 'Yes':
						cla
						minut += 15
						gs 'stat'
						'Yuri said that he now exits and greet you at the entrance to the building.'
						'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'
						'Code you are out of the commandant at the entrance to the building was already waiting for you, Yuri. He''s pretty strong emotions and it seems as if he swallowed scrap. Not knowing what to say, he blurted out, "Maybe we''ll go to me, the movie''s look, drink champagne, we''ll talk."'

						act 'No':jouryQwNo = 1 & gt 'clener', 'start'

						dynamic $youriqwest
					end

					exit
				end

				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex = 0:'You scored in a bucket of water and went to the office with a rag mop capturing. Sotrudnikiki office parted and gave you clean the floor. Yuri looked at you groping look at your figure.'
				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0:'You scored in a bucket of water and went to the office with a rag mop capturing. Sotrudnikiki office parted and gave you clean the floor. Yuri pretending not to notice you left the office.'
			end

			if hour < 9 or hour > 16:'In the office is unoccupied, you quietly washed the floor and wiped the floor in the office.'

			'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'

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

	if clenerT >= 1 and clendayT ! day:
		act 'Clean toilets (1:00)':
			cla
			*clr
			clendayT = day
			minut += 60
			clenerT += 1
			manna -= 25
			money += 100
			sweat += 3
			'<center><img src="images/etogame/clener2.jpg"></center>'

			if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0 and jouryResult = 0:
				'You entered the booth and began to scrub the toilet bowl. In tulet slammed the door and somebody came in, you looked out of the booth and saw George. He, too, saw you and came to you. "<<$name>>, do not come to me in the office, well, you know, the team does not understand what I''m meeting with the cleaner."'

				act 'You make me ashamed?':
					cla
					'You come off the toilet and looked into the eyes of Yuri asked, "You stesnyaeshsya me?" Yuri stammered, "Well, not that that would be embarrassed, but you must understand, I am a manager, you lady. We must not be seen together. But I want you to continue on. You know where I live, came to see me after 4 pm."'

					act 'Fuck you.':
						cla
						dom += 1
						jouryResult = 1
						'Such behavior has offended you and Yuri you without hesitation sent him. He turned and walked out of the closet.'
						'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'

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

					act 'Okay.':
						cla
						sub += 1
						jouryResult = 10
						'Jury sees you only hole drya its members. But you put up with it and agreed to go to his home. Yuri nodded in satisfaction and walked out of the toilet.'
						'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'

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

				exit
			end

			if StasikValera > 0 and SVqw = 0:
				'You nadraivali toilet to shine in this moment heard the toilet as someone walked in, turned around you saw a man. Suddenly you''ve learned it, it Stasik, with him and his friend Valera you met at the beach. Stasik also apparently recognize you and come up to you, "Hi <<$name>> thou is a cleaner work?"'

				act 'I earn the money needed.':
					cls
					gs 'stat'
					'<center><img src="images/etogame/clener2.jpg"></center>'
					'You shrugged. "I earn. I need the money." Stasik smiled "Well, for an attractive girl I can find a decent part-time job. I just need merchandisers."'

					act 'Can be more?':
						cls
						SVqw = 1
						gs 'stat'
						'<center><img src="images/etogame/clener2.jpg"></center>'
						'You asked about the details of Stas. Stasik you said "It''s very simple. In northern, central and residential areas are supermarkets. Thou shalt come to our office to take a job to work, then go to all these stores and arrange our products there charges according assignment. At the checkout take receipt confirming that that you were at work. Thereafter yavlyaeshsya you to our office and we will pay you compensation. 500 rubles. works you will have a few hours. Labour I''m not asking. So what? "'

						act 'Not interested':gt 'clener', 'start'

						act 'I agree.':
							cls
							SVqw = 2
							gs 'stat'
							'<center><img src="images/etogame/clener2.jpg"></center>'
							'You agreed and Stas fairly nodded, then walked out of the toilet.'

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

				exit
			end

			'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'

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

	act 'Leave':gt 'street'
end

--- clener ---------------------------------
# dima
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Entrance where he lives Dima</font></b></center>'
	'<center><img src="images/etogame/podezdhr.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end
end

--- dima ---------------------------------
# dinsexgivi
$threesomedin = {
	act 'Sit on the penis':
		cls
		minut += 5
		gs 'stat'
		tiprand = rand(0, 1)
		picrand = rand(1, 2)
		'<center><img src="images/picKav/threeC<<picrand>>.jpg"></center>'
		'You take the top of the Givi and sit on his cock her pussy.'
		dynamic $sexstart2
		dynamic $giviirasexdivibor2
end

	act 'Kiss more':
		cls
		minut += 5
		gs 'stat'
		tiprand = rand(0, 1)
		picrand = rand(1, 2)
		'<center><img src="images/picKav/threeC<<picrand>>.jpg"></center>'
		'Ira sits on member Givi her pussy and begins to frantically jump on his thick and solid horseradish.'
		dynamic $giviirasexdivibor
	end
}

$threesomedin2 = {
	act 'Kiss more':
		cls
		minut += 5
		gs 'stat'
		tiprand = rand(0, 1)
		picrand = rand(1, 2)
		'<center><img src="images/picKav/threeC<<picrand>>.jpg"></center>'
		'Ira sits on member Givi her pussy and begins to frantically jump on his thick and solid horseradish.'
		dynamic $giviirasexdivibor
	end
}

$giviirasexdivibor = {
	!!SG selection
	act 'Licking breasts Ira':
		cls
		minut += 5
		horny += 10
		gs 'stat'
		tiprand = rand(0, 1)
		picrand = rand(1, 2)

		if picrand = 1:'<center><img src="images/picKav/threeD.jpg"></center>'
		if picrand = 2:'<center><img src="images/picKav/threeD1.jpg"></center>'

		'While Ira jumped on a thick cock you wrapped around his lips to her nipple and started sucking him.'
		'Givi groaned and dropped Ira member.'
		dynamic $giviirasexdivibor3
	end

	act 'Substitute pussy Ira':
		cls
		minut += 5
		horny += 20
		gs 'stat'
		tiprand = rand(0, 1)
		picrand = rand(1, 2)
		'<center><img src="images/picKav/threeE.jpg"></center>'
		'You framed her pussy Ira and she began to lick her active without stopping skakt on a limb.'

		if horny >= 90:horny = 0 & orgasm += 1 & 'Ohata you orgasm and you moan with pleasure.'

		'Givi groaned and dropped Ira member.'
		dynamic $giviirasexdivibor3
	end
}

$giviirasexdivibor2 = {
	!!Ira choice
	act 'Jump on a limb':
		cls
		minut += 5
		horny += 10
		gs 'stat'
		tiprand = rand(0, 2)
		picrand = rand(1, 2)

		if tiprand = 0:
			'<center><img src="images/picKav/threeF.jpg"></center>'
			'You skip a member Givi and Ira decided not indifferent ostavatsya dug my lips you nipple began to suck and nibble.'
		else
			'<center><img src="images/picKav/threeF1.jpg"></center>'
			'You jump out on a limb and Givi Ira starts to kiss you on the mouth while caressing finger your pussy.'
		end

		'Givi groaned and threw you to the member.'
		dynamic $giviirasexdivibor3
	end
}

$giviirasexdivibor3 = {
	!!Ira choice
	act 'Further':
		cls
		minut += 5
		horny += 10
		cumlip += 1
		cumface += 1
		gs 'stat'
		'<center><img src="images/picKav/threeFin.jpg"></center>'
		'Givi put you on your knees with Irina and began to finish you on the face. You finish with a lick and a member of individuals to each other and kissed.'

		act 'Leave':dynamic $endirinaaftergang
	end
}

$endirinaaftergang = {
	cls
	minut += 5
	gs 'stat'
	'Exhausted, tired and with a heavy smell of sperm you get home with Irina after a hard day. You get to the entrance of Ira and she kisses you on the lips enveloping aroma sperm goodbye, then goes to his home.'

	act 'Leave':gt 'street'
}

--- dinsexgivi ---------------------------------
# IrinaRoom
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Entrance where your girlfriend lives Ira</font></b></center>'
	'<center><img src="images/etogame/podezdhr.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end

	act 'Ring the doorbell Irina':
		cla

		if hour >= 16 and hour <= 21 and week >= 6 and IrinaQW ! 2:
			'You have reached the door and you opened the IRA, she smiled and invited you to join.'

			act 'Take the apartment':gt 'IrinaRoom', 'first'
		else
			'You rang the doorbell but no one answers.'

			act 'Leave':
				cla
				minut += 5
				gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'first':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Apartment Ira</font></b></center>'
	'<center><img src="images/etogame/IrinaRoom.jpg"></center>'
	'Small studio apartment Ira neat and tidy'

	act 'Drinking in the kitchen':gt 'IrinaRoom', 'first1'
end

if $ARGS[0] = 'first1':
	cla
	clr
	*clr
	minut += 60
	manna += 50
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW.jpg"></center>'
	'You Ira settled in the kitchen with a bottle of wine and a snack of fruit, you talked and chatted merrily.'
	'And Ira and you''re a bit tipsy and the conversation became more candid flow into shape.'

	act 'Leave':
		cla
		minut += 60
		manna += 50
		gt 'street'
	end

	if IrinaQW = 1:
		act 'Suggest drink brotherhood':gt 'IrinaRoom', 'first2'
	end

	if IrinaQW >= 10:
		act 'Kiss':gt 'IrinaRoom', 'kiss'
	end
end

if $ARGS[0] = 'kiss':
	cla
	*clr
	minut += 10
	manna += 50
	horny += 20
	clr
	gs 'stat'
	'<center><img src="images/picVA/IrinaKiss.jpg"></center>'
	'You passionately kissing with Ira, and caress her firm breasts with his hands.'

	act 'Sex':gt 'IrinaRoom', 'sex'
end

if $ARGS[0] = 'sex':
	cla
	clr
	*clr
	minut += 60
	manna += 50
	lesbian += 1
	manna += 100
	willpower += 100
	gs 'stat'
	'<center><img src="images/picVA/IrinaSex.jpg"></center>'

	if horny < 50:
		horny -= 10
		'Once in bed you caress each other with passion and lick wet pussies each other. But the excitement gradually disappears and you feel that the orgasm you will not be.'
	end

	if horny >= 50:
		horny = 0
		orgasm += 1
		'Once in bed you caress each other with passion and lick wet pussies each other. Finally you are both satisfied.'
	end

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end
end

if $ARGS[0] = 'first2':
	cla
	clr
	*clr
	minut += 60
	manna += 50
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW1.jpg"></center>'
	'You offered Ira drink brotherhood, after dating.'

	act 'Kiss':gt 'IrinaRoom', 'first3'
end

if $ARGS[0] = 'first3':
	cla
	clr
	*clr
	manna += 50
	horny += 20
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW2.jpg"></center>'
	'You kissed Il in her warm, soft, smelling wine lips. Irina flushed after the kiss and looks at you a little embarrassed and frightened.'

	act 'Ira undress':gt 'IrinaRoom', 'first4'
	act 'Ira drink more':gt 'IrinaRoom', 'first5'
end

if $ARGS[0] = 'first4':
	cla
	clr
	*clr
	IrinaQW = 2
	gs 'stat'
	'You started filming blouse with Ira, she jumped up and jumped from his chair screaming "What are you doing? I''m not a lesbian!"'
	'She was very afraid of your attack and you pointed to the door.'

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end
end

if $ARGS[0] = 'first5':
	cla
	clr
	*clr
	IrinaQW = 10
	horny += 20
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW3.jpg"></center>'
	'You pumped Er wine, it is highly intoxicated and spilled wine on myself. She went into the bathroom to change. You, too, went in and spredlozhili help her.'
	'She undressed and you have decided to follow suit and also undressed climbed into the shower. You started lathering body Ira and saw how she stood erect nipples.'

	act 'Kiss':gt 'IrinaRoom', 'first6'
end

if $ARGS[0] = 'first6':
	cla
	clr
	*clr
	horny += 20
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW4.jpg"></center>'
	'You passionately dug lips in luscious lips Ira, she suddenly said, your kiss very passionately.'

	act 'Fondle breasts':gt 'IrinaRoom', 'first7'
end

if $ARGS[0] = 'first7':
	cla
	clr
	*clr
	horny += 20
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW5.jpg"></center>'
	'You lowered his head to his chest and Ira began to suck and lick her hard nipples Ira zastonalya pleasure.'

	act 'Licking pussy':gt 'IrinaRoom', 'first8'
end

if $ARGS[0] = 'first8':
	cla
	clr
	*clr
	horny += 20
	girl += 1
	lesbian += 1
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW6.jpg"></center>'
	'You began to kiss lower and lower until it fell to the level of moisture seeping pussy Ira. Your reed began to caress her clit and soon she shuddered and began to moan from orgasm.'
	'Ira decided to pay you back in the same coin and not speak a word not put you on the edge of the tub and her lips stuck into your pussy.'

	act 'Licking pussy':gt 'IrinaRoom', 'first9'
end

if $ARGS[0] = 'first9':
	cla
	clr
	*clr
	horny = 0
	orgasm += 1
	manna += 100
	willpower += 100
	gs 'stat'
	'<center><img src="images/picVA/IrinaQW7.jpg"></center>'
	'Lips and tongue Ira quickly vozimeli effect and you finished with passionate moans.'

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end
end

--- IrinaRoom ---------------------------------
# kafe
if $ARGS[0] = 'start':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	*clr
	minut += 1
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	clr
	gs 'stat'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You see <a href="exec:gt ''kafe'', ''vlad''">the owner of the cafe</a> dealing with paperwork.'
	'Lunch - 100 rubles'

	if QWdogReiq = 3 and week = 7 and hour >= 12:
		act 'Sit down at the table and wait for a Margarita':dynamic $margokafedin
	end

	!!act 'Agree':gt 'cafe3', 'wc'

	if money >= 100:
		act 'Eat (100 rubles)':
			cla
			*clr
			frost = 0
			minut += 30
			health += 10
			money -= 100
			manna += 5
			willpower += 5
			'<center><img src="images/pics/food.jpg"></center>'
			if energy >= 30:
				fat += 5
				'You can no longer eat.'
			elseif energy >= 20 and energy < 30:
				fat += 3
				energy += 10
				'You pushed through the power of a meal.'
			elseif energy < 20:
				energy += 20
				fat += 1
				'You gladly ate the food.'
			end
			if water >= 20:
				'You don''t need any more tea.'
			elseif water < 20:
				water += 20
				'You gladly drank a mug of tea.'

			end

			razvrand = rand(1, 10)

			if razvrand > 5:
				gs 'boy'
				'Came to your table <<$boybody>> <<$boybod>> <<$boyface>> presented as <<$boy>>.'
				xgt 'kafe', 'razvod'
			end

			act 'Get up from the table':gt 'kafe', 'start'
		end
	end

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'vlad':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'

	if givi = 0:'At the reception costs not big, but very thick caucasian, he''s writing something.'
	if givi > 0:'At the reception is Givi K., the owner of the cafe, he''s writing something.'

	if workKafe = 0:
		if GiviSex >= 2 and Givisexday < 1 and Venera < 4:
			act 'Provoke Givi':
				cla
				*clr
				Givisexday = 1
				GiviSex += 1
				'<center><img src="images/etogame/kafe.jpg"></center>'
				' You went behind the counter to Givi and asked about undermining.'
				' "Wow, you <<$name>> he so bored!" said Givi K. unbuttoning his pants'

				act 'To kneel':
					cla
					*clr
					bj += 1
					dick = 20
					harakBoy = 2
					minut += 30
					$nameV = 'Givi Karapetovich'
					$boy = 'Givi Karapetovich'
					SUB += 1
					'<center><img src="images/picVA/barbj.jpg"></center>'
					'You bent down and hid from visitors to the high bar, knelt before Givi, he took a member.'
					gs 'oral', 'start'
					'Givi hard grabbed you by the hair and pulled your mouth on his cock deeper.'

					act 'Continue to suck.':
						cla
						*clr
						swallow += 1
						cumlip += 1
						money += 500
						'<center><img src="images/picV/swallow1.jpg"></center>'
						'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
						'Zahady-yet! - Says Givi gives you 500 rubles.'

						act 'Leave':gt 'kafe', 'start'
					end
				end
			end
		end
	else
		if GiviSex >= 2 and Givisexday < 1 and Venera < 4:
			act 'Provoke Givi':
				cla
				*clr
				Givisexday = 1
				GiviSex += 1
				'<center><img src="images/etogame/kafe.jpg"></center>'
				' You went behind the counter to Givi and asked about undermining.'
				' "Sverhurochnye want?" asked K. Givi and not interested in the answer took you by the hand'

				act 'To kneel':
					cla
					*clr
					smenaKafe += 1
					bj += 1
					dick = 20
					harakBoy = 2
					minut += 30
					$nameV = 'Givi Karapetovich'
					$boy = 'Givi Karapetovich'
					SUB += 1
					'<center><img src="images/picVA/barbj.jpg"></center>'
					'You bent down and hid from visitors to the high bar, knelt before Givi, he took a member.'
					gs 'oral', 'start'
					'Givi hard grabbed you by the hair and pulled your mouth on his cock deeper.'

					act 'Continue to suck.':
						cla
						*clr
						swallow += 1
						cumlip += 1
						'<center><img src="images/picV/swallow1.jpg"></center>'
						'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

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

		act 'Resign':
			cla
			work = 0
			workKafe = 0
			pay = smenaKafe * 600
			money += pay
			smenaKafe = 0
			'Givi Karapetovich sadly shook his head, "Okay, here''s your <<pay>> rubles and employment history. Go."'

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

	if workKafe > 0 and week > 1 and week < 5:'Wah, <<$name>>. Zachem skipping?'
	if workKafe > 0 and week > 4:'Wah, pryvet <<$name>>!'
	if givi = 1 and workKafe < 1:'Listen to you.'

	if givi = 0:
		givi = 1
		'Pryvet! I Givi Karapetovich. Hozain cafe. What do you want?'
	end

	if (work = 0 and workKafe = 0 and cheatWork = 0) or (workKafe = 0 and cheatWork = 1):
		act 'Apply for a job at the cafe.':
			cla
			'<br>You ask if Givi has any job openings at the cafe.'

			if vnesh < 5:'No no no, you would scare all the customers away. Convergence, whether that priodensya, use makeup, brush your hair. You look just terrible.'

			if vnesh >= 5:
				'<br>Givi K. examines you from head to toe. "Okay, listen to the working conditions"'
				'<br>"The cafe is open from 12 to 22 every day, except Monday. You work on Tuesdays, Wednesdays and Thursdays. Come to the café between 11 to 12, before opening. If you do not come to work, that day will not be counted in your salary. Salary is paid on the 25th of each month and for each shift you earn 600 rubles. Plus whatever you can get as tips, that depends on you. Also you''ll get free meals. "'
				'<br>"Oh, and I''ll take your work book, you can not apply for another job while working here. Well? Interested?"'

				act 'Take the job':
					cla
					work = 1
					workKafe = 1
					smenaKafe = 0
					'<br>You give Givi your work book. He takes it and reminds you. "Come to work every day, except Monday, somewhere between 11 to 12."'

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

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

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

if $ARGS[0] = 'work':
	cla
	*clr
	minut += 5
	gs 'stat'
	smenaKafe += 1
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You have replaced the cafe, Givi K. writes in a book that you came to work on time and stands behind the bar. The kitchen cook is a sturdy young caucasian, Ashot. Another waitress Irina is preparing for work. Tamara the dishwasher is cleaning the sink.'

	act 'Start work':
		cla
		minut = 0
		hour = 12
		Givi += rand(5, 10)
		gt 'kafe', 'workPred'
	end

	act 'Resign':
		cla
		work = 0
		workKafe = 0
		pay = smenaKafe * 600
		money += pay
		smenaKafe = 0
		'Givi Karapetovich sadly shakes his head, "Okay, here''s your <<pay>> rubles and employment history. Go."'

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

if $ARGS[0] = 'workPred':
	cla
	clr
	*clr
	gs 'kafedinamic'
	gs 'stat'
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'Café work boils, the cook <a href="exec:dynamic $ashotdin">Ashot</a> is busy in the kitchen. Your workmate <a href="exec:dynamic $iradin">Ira</a> serves tables with visitors. The owner <a href="exec:dynamic $gividin">Givi K.</a> is standing behind the bar.'
	'<a href="exec:dynamic $kafetualet">Toilet</a>'

	if Givi > 100:Givi = 100
	if Givi > 90 and GiviSex = 0:Givi = 90

	if IrinaSlut = 1 and hour = 22:
		cls
		IrinaSlut = 2
		gs 'stat'
		'<center><b><font color="maroon">Cafe</font></b></center>'
		'<center><img src="images/etogame/kafe.jpg"></center>'
		'Job ended and Ira disappeared somewhere. Looking around you saw that Givi nowhere. Tamara slipped out the door, and Ashot puts the dishes in places.'

		act 'Search for missing where Ira':
			cls
			horny += 10
			gs 'stat'
			'<center><img src="images/picKav/irinaslut.jpg"></center>'
			'You came to the back room from which he emerged pleased Givi fastening belt for trousers. He smiled at you and said, "Wai, a good whore you found me, help her, and that she is after this horseman does not come to life."'
			'You went into the back room and saw there Irina standing up naked butt cancer, which was a pool of sperm. Ira blissfully moaned "Such a thrill, I never happened."'

			act 'Ira and help hold up the house':
				cla
				minut += 15
				gs 'stat'
				'Taking a napkin you wiped the cum from her problem and helped her climb and put himself in order. Ira recognized with a beatific smile "Can Givi and chock-bellied ugly, but he fucked me like nobody fucked, I even lost consciousness from an orgasm."'
				'Have you done Ira home who could not move away from orgasm. Front of the entrance, she kissed you on the lips and left.'

				act 'Go home':gt 'street'
			end

			if horny >= 50:
				act 'Lick cum off her problem':
					cls
					horny += 10
					minut += 15
					cumlip += 1
					gs 'stat'
					'<center><img src="images/picKav/irinaslut2.jpg"></center>'
					'You kneel before just Fucked in all holes and ass Ira began to lick her reddened hole licking sperm.'
					'Ira moaned, "Oh, it''s so nice, and why I was afraid of this before?"'

					act 'Swallow sperm and conduct Ira home':
						cla
						minut += 15
						sub += 1
						swallow += 1
						gs 'stat'
						'You swallow sperm and helped her climb and put himself in order. Ira recognized with a beatific smile "Can Givi and chock-bellied ugly, but he fucked me like nobody fucked, I even lost consciousness from an orgasm."'
						'Have you done Ira home who could not move away from orgasm. Front of the entrance, she kissed you on the lips and left.'

						act 'Go home':gt 'street'
					end

					act 'Ira spit sperm in her mouth':
						cls
						minut += 5
						dom += 1
						gs 'stat'
						'<center><img src="images/picKav/irinaslut3.jpg"></center>'
						'You took a hands-il and his face lifted him, she readily opened her mouth where you spit, lick sperm transferred all Ire.'

						act 'Kiss':
							cls
							sub += 1
							gs 'stat'
							'<center><img src="images/picKav/irinaslut4.jpg"></center>'
							'You dug lips lips Ira and started kissing her and exchanging sperm in your mouths, finally you both swallowed his part of the semen'

							act 'Ira conduct home':
								cla
								minut += 15
								gs 'stat'
								'You wiped the face of the remnants of sperm and helped her climb and put himself in order. Ira recognized with a beatific smile "Can Givi and chock-bellied ugly, but he fucked me like nobody fucked, I even lost consciousness from an orgasm."'
								'Have you done Ira home who could not move away from orgasm. Front of the entrance, she kissed you on the lips and left.'

								act 'Go home':gt 'street'
							end
						end

						act 'Ira conduct home':
							cla
							minut += 15
							dom += 1
							swallow += 1
							gs 'stat'
							'You wiped the face of the remnants of sperm and helped her climb and put himself in order. Ira recognized with a beatific smile "Can Givi and chock-bellied ugly, but he fucked me like nobody fucked, I even lost consciousness from an orgasm."'
							'Have you done Ira home who could not move away from orgasm. Front of the entrance, she kissed you on the lips and left.'

							act 'Go home':gt 'street'
						end
					end
				end
			end
		end

		exit
	end

	if hour < 22:
		act 'Serve tables':
			cls
			minut += 30
			manna -= 5
			znarand = rand(0, 300)
			chai = rand(0, vnesh + oficiant/2)

			if oficiant < 100:oficiant += 1
			if vital < 30:vital += 1

			money += chai

			if chai = 0:willpower -= 5 & manna -= 15

			manna -= 5
			gs 'stat'
			'<center><img src="images/picKav/waitress_client.jpg"></center>'
			'You serve a table at which visitors sat and receive <<chai>> rubles as tip.'

			act 'Move away':gt 'kafe', 'workPred'

			if znarand > vnesh or bfA > 0:
				kaferand = rand(0, 100)

				if kaferand = 0:
					cls
					gs 'stat'
					'<center><img src="images/img/spaln/kafe1.jpg"></center>'
					'Serving a table at one of the private booths you see two men seduce a pretty drunk girl. Pretty soon she is on her knees sucking on both of their cocks. One of the men is looking at you with a clear invitation to join them.'

					act 'Leave':gt 'kafe', 'workPred'

					if daystart > 10 and sex > 0:
						act 'Prisoedinitsa to girl':
							kafesexrand = 1
							picrand = 13
							guy += 2
							girl += 1
							gang += 1
							xgt 'sexdvanadva', 'var'
						end
					end
				elseif kaferand = 1:
					cls
					gs 'stat'
					'<center><img src="images/img/spaln/kafe2.jpg"></center>'
					'You serve a table in the attic, with two men. Each time you come by they strive to pinch or slap your butt, or run their hands under your skirt.'

					act 'Leave':gt 'kafe', 'workPred'

					if daystart > 10 and sex > 0:
						act 'Succumb':
							kafesexrand = 1
							picrand = 17
							guy += 2
							xgt 'sexdvoe', 'var'
						end
					end
				elseif kaferand = 2 and vnesh > 15:
					cls
					'<center><img src="images/picKav/waitress_client.jpg"></center>'
					'At the table in a separate room sat a man. He looks at you appreciatively and says, "Girl, do not keep me company?" You notice the bulge in his trousers, he''s obviously got dick.'

					act 'Leave':gt 'kafe', 'workPred'

					act 'Sit down next to him':
						cls
						'You sit down next to the client. And look at him waiting for what he would do. He takes your hand and puts it on his crotch.'

						act 'Leave':gt 'kafe', 'workPred'

						if horny >= 50 or bj > 0:
							act 'Unbutton his pants':
								cls
								dick = rand(12, 21)
								gs 'stat'
								'<center><img src="images/picKav/waitress_work_2.jpg"></center>'
								'You undo his pants and got warm and hard cock <<dick>> cm long, covered with veins and a small drop of crimson on the head.'

								act 'Masturbate him':
									cls
									boy += 1
									hj += 1
									money += 500
									gs 'stat'
									'<center><img src="images/picKav/waitress_work_hj.jpg"></center>'
									'Clasping her fingers member you started to masturbate, a man fairly quickly groaned and discharged you in the palm. Then you wiped his penis tissue and he gave you 500 rubles for your work.'

									act 'Leave':gt 'kafe', 'workPred'
								end

								act 'Suck his dick':
									cls
									boy += 1
									bj += 1
									gs 'stat'
									'<center><img src="images/picKav/waitress_work_bj.jpg"></center>'
									dynamic $dinrandbj

									act 'Take the sperm in your mouth':
										cls
										cumlip += 1
										money += 700
										gs 'stat'
										'<center><img src="images/picKav/waitress_work_bj2.jpg"></center>'
										dynamic $dinrandswallow

										act 'Leave':gt 'kafe', 'workPred'
									end
								end
							end
						end
					end
				elseif kaferand = 3 and vnesh > 15:
					cls
					'<center><img src="images/picKav/waitress_client.jpg"></center>'
					'At the table in a separate room sat a man. He looked appreciatively at you and said "- Girl, do not help? I have prepared for you a great tip, but accidentally dropped them under the table. And I myself have eaten too much so that they no longer will bend ..." while you notice how bristling fly on his trousers, he obviously got dick.'
					act 'Leave':gt 'kafe', 'workPred'

					act 'Crawl under the table':
						cls
						gs 'stat'
						'<center><img src="images/picKav/waitress_work_3_1.jpg"></center>'
						'- Well, now, - I replied.'
						'In the end, with the tip and not a sin under the table slazit. Standing on all fours and climbing under the table, I do find there pyatisotrublevuyu paper. But when I reach out, what would it take, a man comes to the edge of the shoe bill. Then unzips his pants and pulls out of his pants member.'

						act 'Leave':gt 'kafe', 'workPred'

						if horny >= 50 or bj > 0:
							act 'Suck':
								cls
								bj += 1
								guy += 1
								gs 'stat'
								'<center><img src="images/picKav/waitress_work_3_2.jpg"></center>'
								'And knew that the free cheese ... just not lying under the table.'
								'But I need these five hundred rubles, so I''m taking his cock hand and head straight into his mouth. The next five minutes, I carefully lick and chew it. Finally, the visitor made several short jerky movements hips starts to pour out hot cum into my mouth.'

								act '....':
									cls
									cumlip += 1
									cumface += 1
									money += 500
									gs 'stat'
									'<center><img src="images/picKav/waitress_work_3_3.jpg"></center>'
									'Filling my mouth to the brim, he took his foot off bills and I was finally able to pick it up.'

									act 'Leave':gt 'kafe', 'workPred'
								end
							end
						end
					end
				elseif kaferand = 4:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand.jpg"></center>'
					'Going into one of the stalls you saw the girl leaning over a guy sucking him.'

					act 'Tactfully leave':
						cls
						money += 300
						gs 'stat'
						'You tactfully left out of the booth, and after a couple of tips on the left found 300 rubles'

						act 'Leave':gt 'kafe', 'workPred'
					end

					act 'Troubled':
						cls
						gs 'stat'
						'You indignantly declared that the cafe is not a brothel, then people eat.'
						iverand = rand(0, 2)

						if iverand = 0:'The guy has called you a bitch and severing his girlfriend blowjob retired from the cafe without leaving a penny tip.'
						if iverand = 1:'Guy sent you fucking whore and called frigid, then finished in the mouth of his girlfriend and left without leaving a penny tip.'

						if iverand = 2:
							'The guy got into the purse and pulled pyatisotennuyu bill, "and to leave us alone"'

							act 'Expel them':gt 'kafe', 'workPred'

							act 'Leave':
								cls
								money += 500
								gs 'stat'
								'You took the money and left a couple of Entertaining letting on.'

								act 'Leave':gt 'kafe', 'workPred'
							end
						end

						act 'Leave':gt 'kafe', 'workPred'
					end

					if bj > 10 and swallow > 5 and horny >= 50:
						act 'Giggle':
							cls
							gs 'stat'
							'The girl looked up from the penis and waved his hand inviting you to join.'

							act 'Tactfully leave':
								cls
								money += 300
								gs 'stat'
								'You tactfully left out of the booth, and after a couple of tips on the left found 300 rubles'

								act 'Leave':gt 'kafe', 'workPred'
							end

							act 'Kneel before the guy':
								cls
								bj += 1

								if SergeaAndKatjaSex = 0:SergeaAndKatjaSex = 1 & guy += 1

								gs 'stat'
								'<center><img src="images/picKav/ivrandBJ.jpg"></center>'
								'You knelt down and started to suck dick with a girl kissing in the process.'

								act '....':
									cls
									cumlip += 1
									cumface += 1
									gs 'stat'
									'<center><img src="images/picKav/ivrandCUM.jpg"></center>'
									'Finally the guy broke down and began to finish. Hot sperm gets into your mouth and a little on the face. You dvoem Girl licking dick until dry.'

									if SergeaAndKatjaQW = 0:
										SergeaAndKatjaQW = 1
										'After blowjob guy introduced himself, "I Sergei and Katia it. Did not know what''s so hot waitresses work."'
									end

									act 'Leave':gt 'kafe', 'workPred'
								end
							end
						end
					end
				elseif kaferand = 5:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand.jpg"></center>'
					'Serving tables you accidentally noticed as what that girl ukratkoy member Fingering her boyfriend.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 6:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand3.jpg"></center>'
					'Going into one of the stalls that you see sitting there a couple of girls and one of them on their knees licking vagina in another.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 7:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand4.jpg"></center>'
					'Passing the dance floor where you messed around pyanaya youth saw as one drunken girl sat on his haunches began to suck cock.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 8:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand5.jpg"></center>'
					'Walking past the bar you see as sort of a girl squatting sucks dick guy drinking beer ..'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 9:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand6.jpg"></center>'
					'Going into one of the stalls you see that there is the cheerful company of young people and one of the beautiful girls fucked doggy style right in front of the table.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 10:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand7.jpg"></center>'
					'On the dance floor fun girls lit.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 11:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand8.jpg"></center>'
					'You see how the two drunken girls lick passionately unashamedly anyone.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 12:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand9.jpg"></center>'
					'Do you see how drunk girl crawled under the table there losing something, she hiked skirt and no panties on my ass, so that almost all cafes can see all the content podyubochnogo space in detail.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 13:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand10.jpg"></center>'
					'You see as a drunken couple sports, girl licks cock and the guy pouring champagne in her mouth.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 14:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand11.jpg"></center>'
					'Do you happen to notice that a couple of fun chatting girls not only fun chatting, one of the girls put her hand into her panties and caresses her girlfriend there.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 15:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand12.jpg"></center>'
					'Do you see how the dance floor dancing with a Negro girl lapaya her for all that is possible, but the girl apparently do not mind.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 16:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand13.jpg"></center>'
					'Going into one of the stalls that you see guys play with girls cards on the strip and the girls obviously lose sitting in his underwear.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 17:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand14.jpg"></center>'
					'You see two guys dancing with a girl in every way it lapaya and bullying her skirt on the girl reacts laugh without even trying to cover up how your sirloin from the eyes of the public around them.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 18:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand15.jpg"></center>'
					'Do you see how the guy on the dance floor kiss with a girl and he ran his hand under her skirt practically fucks her fingers through the panties.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 19:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand16.jpg"></center>'
					'You see like a stand alone drunk girl spread Lyashko and at least buhoy and cheerful young man fuck her pussy with his fingers.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 20:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand17.jpg"></center>'
					'You see a guy hugs a drunken girl in the wood and took a mouthful of beer pouring it to her with a kiss until the second guy matzo her boobs.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 21:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand18.jpg"></center>'
					'Going into the attic you see two guys at both ends pyalyut girl who champs sucking cock and ass podmahivaet trying to spread on the second-Man as deeply as possible.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 22:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand19.jpg"></center>'
					'You see on the dance floor as one no longer young madam in revealing outfits dancing with a young guy to paw her.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 23:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand20.jpg"></center>'
					'You see two young guys bent girl and depict sex with her under the leaping laughter and cheerful girl.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand = 24:
					cls
					horny += 5
					gs 'stat'
					'<center><img src="images/picKav/ivrand21.jpg"></center>'
					'Going into one of the stalls you see a man licking pussy what that cheeky person who is a Lyashko put her on his back and catching buzz smokes a cigarette.'

					act 'Leave':gt 'kafe', 'workPred'
				elseif kaferand >= 90 and opusk > 0 and pirsA = 0:
					cls
					pirsA = 1
					pirsday = day
					! WD: Correct Image path ~ "images/body/pirs.jpg"
					'<center><img src="images/body/pirsA.jpg"></center>'
					'Beckons you to one of the clients, you come to the table and notice that in front of you are the real criminals.'
					'When you come to the table, the leader called you closer to him, and when you come, it is very hard and painful grabbed you by the neck.'
					'The leader told you - vaflersha, open your mouth. You obediently opened his mouth, he looked back and you slapped you podschechinu. I do not see a pierced tongue. Vaflersha should wear piercings that would be a decent person could immediately understand that before it chlenososka.'
					'The leader turned to his mobsters said. Necessary to issue chlenososku. Tackle. At the same moment you grabbed strong arms and carried out of the cafe, there was thrown into the back seat of the jeep. And the jeep jumped up.'
					'Drove you not very long, riding up to what that goal, jeep honked and gates opened soundlessly. Jeep pulled into the teritory cottages. Strong ''brother dragged you out of the car and dragged him to the basement.'
					'The basement has all the tools were ready. You sat on a chair and a hefty tattooed bandyugan came to you with a clip and a pair of scissors, he pulled you out of the mouth and tongue pierced him with lightning speed needle. In a bleeding wound in the language he zasoval small bar.'
					'Hell, it''s very painful. You moan with his tongue hanging out, laughing bandyuki your pain. Finally your tongue pulled out of the clamp. How did you hurt. Bandits escorted you out cottages.'

					act 'Go home':gt 'street'
				elseif kaferand > 25 and opusk > 0 and pirsA = 1 and hour >= 12 and hour <= 19:
					cls
					'Mob boss beckons you to his table. You approached him with trembling knees.''He looks at you like a boa constrictor on the rabbit and says vaflersha, open your mouth. You open your mouth obediently and labeled and put out a tongue piercing.'
					'The leader took you in the face and saw piercing gaze. All the same, good job guys. Okay vaflersha on, get under the table and entertain me.'

					act 'Get under the table':
						cla

						if glavar = 0:glavar = 1 & guy += 1

						bj += 1
						cumface += 1
						'<center><img src="images/pics/glavarBJ.jpg"></center>'
						'You obediently crawl under the table and pulled out a member of the leader of his pants, dutifully caress his tongue and start sucking.'
						'Ringleader as if the whole is made of stone, he did not flinch a muscle when he emptied his sperm reserve your mouth.'
						horand = rand(1, 100)

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

						'You swallow all his sperm and sucking him dry up.'

						act 'return to work':gt 'kafe', 'workPred'
					end
				end
			elseif znarand <= vnesh and bfA <= 0:
				cls
				gs 'boy'
				'<center><img src="images/picKav/waitress_client.jpg"></center>'
				'The table sits <<$boybody>> <<$boybod>> <<$boyface>>. One <<$boyClo>>'
				'You took his order, he took the bill and asked if he could meet you.'

				act 'No':
					cla
					money += 10
					'Angry man left you 10 rubles tip and left.'

					act 'Move away':gt 'kafe', 'workPred'
				end

				if bfA <= 0 or bfB = 0 or bfC = 0:
					act 'Yes':
						cla
						money += 100
						gs 'boyfrend', 'start'
						stopboy = 0
						'Man glad that you do not mind dating him. He introduced himself as <<$boy>> and asked for a phone number, promising to call you back tomorrow.'
						'Then leave you a hundred rubles tip and left.'

						act 'Move away':gt 'kafe', 'workPred'
					end
				end
			end
		end
	end

	if hour >= 22:
		act 'This collection of home':
			cla

			if GiviSex = 0 and Givi < 90 or Vnesh < 0:
				'Givi you nods his head, "Goodbye, <<$name>>."'

				act 'Leave':
					cla
					minut += 5
					gt 'kafeend'
				end
			else
				dynamic $givipredlogdin
			end
		end
	end
end

if $ARGS[0] = 'razvod':
	cla
	!!*clr
	!!act 'Get up from the table':gt 'kafe', 'start'
	deyst = rand(0, 3)

	if deyst = 0:
		'<<$boy>> has invited you to dance.'

		act 'Dance':gt 'cafe2', 'dance'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst = 1:
		'<<$boy>> asked permission to sit down at a table to you.'

		act 'Drink':gt 'cafe2', 'booze'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst = 2:
		'<<$boy>> has invited you to join the party on which he walks.'
		act 'Agree':gt 'cafe2', 'kampashka'

		if horny < 75:
			act 'Otshit':gt 'street'
		end
	elseif deyst = 3:
		'<<$boy>> drunk in the trash and going to douse you have an incredible smell. "Hey baby, what time to pull? Come have fun in the outhouse."'

		act 'Agree':gt 'cafe3', 'toilet'

		if horny < 95:
			act 'Otshit':
				cla
				derand = rand(0, 100)

				if derand < vnesh:
					'Come on, baby, give two thousand. Daddy should have fun.'

					act 'Agree':
						money += 2000
						gt 'cafe3', 'toilet'
					end
				else
					'Well, okay, get out of here, you still have legs and curves fuck up like a monkey.'
				end

				act 'Fuck you':gt 'street'
			end
		end
	end
end

--- kafe ---------------------------------
# kafedinamic
$kafetualet = {
	cls
	clr
	gs 'stat'
	'<center><img src="images/LakeCafe/Toilet.jpg"></center>'
	'Dirty and smelly toilet that seems to have never been cleaned'
	turand = rand(0, 100)

	if turand = 0:
		cls
		gs 'stat'
		'<center><img src="images/picKav/tuarand.jpg"></center>'
		'Go to the toilet as you saw in one of the booths drunk girl with bottle in hand rides a dick guy standing on the toilet rassevshegosya.'

		act 'Leave':gt 'kafe', 'workPred'

		exit
	elseif turand = 1:
		cls
		gs 'stat'
		'<center><img src="images/picKav/tuarand1.jpg"></center>'
		'Go to the toilet that you saw what that skinny girl sucks dick at the guy who shoots everything on camera.'

		act 'Leave':gt 'kafe', 'workPred'

		exit
	elseif turand = 2:
		cls
		gs 'stat'
		'<center><img src="images/picKav/tuarand2.jpg"></center>'
		'Go to the toilet you caught what that redhead girlfriend for suction member.'

		act 'Leave':gt 'kafe', 'workPred'

		exit
	end

	!!!Maruda hair mod
	act 'Look in the mirror':
		cla
		gs 'portmirror'
		$gt1 = 'kafedinamic'
		$gt2 = ''
		dynamic $portmirror

		act 'Move away from the mirror':
			cla
			dynamic $kafetualet
		end
	end
	!!!
	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

			act 'Finish':dynamic $kafetualet
		end
	end

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

			act 'Finish':dynamic $kafetualet
		end
	end

	if cumfrot > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumfrot = 0
			minut += 10
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/frotsp.jpg"></center>'
			'<center><img src="images/etogame/frotsp.jpg"></center>'
			'You remove traces of cum from your clothes.'

			act 'Finish':dynamic $kafetualet
		end
	end
	!!

	if tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut += 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use a tampon.'

			act 'Finish':dynamic $kafetualet
		end
	end

	act 'Leave':gt 'kafe', 'workPred'
}

$gividin = {
	cls
	gs 'stat'

	if hour < 22:
		'You came to the bar behind which stands the host cafe Givi K., he''s not looking up from wiping glasses looked at you.'

		if hour = 20 and Givi >= 90:
			act 'Beg off Givi':
				cla
				minut += 5
				Givi -= 5
				'You take time off to leave early Givi K.. He was a little angry but let you go.'

				act 'Move away':gt 'street'
			end
		end

		if Kavslut > 0 and IrinaQW >= 10 and IrinaSlut = 0 and hour <= 20:
			act 'Ask Givi raise salaries Ire':
				cla
				IrinaSlut = 1
				minut += 30
				gs 'stat'
				'You are asked to raise the salary Givi Ira. Givi grunted "What for?" You appeal to the fact that she is your close friend and want to help her. Givi promised to think about the wage increase.'

				act 'Move away':gt 'kafe', 'workPred'
			end
		end

		act 'Chat with Givi':
			cla

			if GiviSex = 0:
				minut += 30
				manna += 5

				if Givi <= 90:Givi += rand(10, 25)
				if Givi > 90 and GiviSex = 0:Givi = 90

				'You talked at the bar with a cafe owner and part-time bartender Givi K..'

				if Givi = 90:'Departing from Givi you suddenly got a hand slap on the ass. Turning around you saw that Givi smiling.'

				act 'Move away':gt 'kafe', 'workPred'
			elseif GiviSex >= 1 and kavslut = 0:
				minut += 63
				manna += 5
				Givi = 100
				'You talked at the bar with a cafe owner and part-time bartender Givi K..'
				'Wai <<$name>>, I enjoyed it so much last time. Stay with me tonight, help.'
				'Departing from Givi you suddenly got a hand slap on the ass. Turning around you saw that Givi smiling.'

				act 'Move away':gt 'kafe', 'workPred'
			elseif GiviSex >= 1 and kavslut > 0:
				minut += 30
				manna -= 5
				Givi = 100
				givirand = rand(0, 100)

				if givirand < 10 and Venera < 4:
					'"<<$name>> I what that napryazhonny, take away my stress" With these words, Givi took you by the hand'

					act 'To kneel':
						cla
						*clr
						smenaKafe += 1

						if giviSex < 2:GiviSex = 2

						bj += 1
						gs 'bdman', 'givi'
						SUB += 1
						gs 'stat'
						'<center><img src="images/picVA/barbj.jpg"></center>'
						'You bent down and hid from visitors to the high bar, knelt before Givi, he took a member.'
						gs 'bdsex', 'autobj'
						'Givi hard grabbed you by the hair and pulled your mouth on his cock deeper.'

						act 'Continue to suck.':
							cla
							*clr
							swallow += 1
							cumlip += 1
							gs 'stat'
							'<center><img src="images/picV/swallow1.jpg"></center>'
							'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boy>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

							act 'Move away':gt 'kafe', 'workPred'
						end
					end

					if GiviSex < 2:
						act 'Sdurel what?':
							cla
							'"Wow, you <<$name>> you PVCs slut zachem soprotivlyaeshsya I tebe money in salary''ll write more, there will be many deneg dresses buy kasmetika." said Givi'

							act 'Move away':gt 'kafe', 'workPred'
						end
					end
				elseif givirand >= 10 or Venera >= 4:
					'Givi strongly slapped you in the ass and whinnied. "<<$name>>, zvezda mineta!"'

					act 'Move away':gt 'kafe', 'workPred'
				end
			end
		end
	else
		if Vnesh < 0:
			'Givi you nods his head, "<<$name>>, <<$name>>."'

			act 'Leave':
				cla
				minut += 5
				gt 'kafeend'
			end
		else
			dynamic $givipredlogdin
		end
	end
}

$ashotdin = {
	cls
	gs 'stat'
	'You went into the kitchen where he studied cooking chef Ashot. Dishwasher <a href="exec:dynamic $tamdin">Tamar</a> as always stands near the sink and washes the dishes.'

	if hour < 22:
		act 'Eat and drink in the kitchen':
			cla
			minut += 30
			gs 'stat'
			frost = 0
			health += 10

			if energy >= 30:
				fat += 5
				'You can no longer eat.'
			elseif energy >= 20 and energy < 30:
				fat += 3
				energy += 10
				'You pushed through the power of a meal.'
			elseif energy < 20:
				energy += 20
				fat += 1
				'You gladly ate cooked food.'
			end
			if water >= 20:
				'You don''t need any more tea.'
			elseif water < 20:
				water += 20
				'You gladly drank a mug of tea.'
			end

			act 'Move away':gt 'kafe', 'workPred'
		end

		act 'Chat with Ashot':
			cla
			minut += 30
			manna += 5
			gs 'stat'

			if Ashot <= 90:Ashot += rand(0, 5)

			if giviSex > 0 and Ashotsex = 0:
				if Ashot <= 90:Ashot = 90

				horny += 10
				'When you entered the kitchen, Ashot came up to you and squeezed his hand your buttock, you can even squealed. Ashot laughed.'

				act 'Move away':gt 'kafe', 'workPred'
			elseif giviSex = 0 and Ashotsex = 0:
				'You talked in the kitchen with the chef Ashot.'

				act 'Move away':gt 'kafe', 'workPred'
			elseif giviSex > 0 and Ashotsex > 0:
				Ashotrand = rand(0, 100)

				if Ashotrand > 20:
					horny += 10
					'"You''re a cool bitch" said Ashot grabbing you in the ass.'

					act 'Move away':gt 'kafe', 'workPred'
				elseif Ashotrand <= 20:
					*clr
					cla
					'When you entered the kitchen, Ashot came up to you and squeezed his buttocks your hands "- Razdevaysya My dick miss on your ass"'

					act 'Allow':
						*clr
						cla

						if analplugin = 1 :
							*clr
							cla
							analplugin = 0
							'<center><img src="images/picKav/analplug.jpg"></center>'
							'Wai what razvratnytsa! - Ashot vosklikunul pulling out of your ass anal plug.'

							act 'Become confused':
								*clr
								cla
								'<center><img src="images/picKav/analkafe.jpg"></center>'
								'Then you put the cancer and put the dick in the ass. Without giving time sphincter to relax, he was rude to fuck you deep pounding cock. Ashot gripped your hips from members beat you in the ass tears flowed from his eyes. "- Move your ass, move, lustful whore!"'

								act 'Moan':
									*clr
									cla

									horny += SUB - DOM + ((anus - 18) * 3)
									anal += 1
									Ashotsex += 1
									cumanus += 1

									if anus < 18:anus += 1

									'<center><img src="images/picKav/kafeanpie.jpg"></center>'
									'Ashot leaned forward thrusting his cock as deeply as possible.'

									if horny >= 100 :
										horny = 1
										orgasm += 1
										analorgasm += 1
										'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
									end

									'Hot jet of sperm hit your anus. Ashot finished and hit you in the ass, saying that such a hole to fuck and need to fuck. And then pulled out a member and you feel like out of your ass rastrahannoy flowed a trickle of sperm. .'

									act 'Move away':gt 'kafe', 'workPred'
								end
							end
						else
							*clr
							cla
							'<center><img src="images/picKav/analkafe.jpg"></center>'
							'Then you put the cancer and put the dick in the ass. Without giving time sphincter to relax, he was rude to fuck you deep pounding cock. Ashot gripped your hips from members beat you in the ass tears flowed from his eyes. "- Move your ass, move, lustful whore!"'

							act 'Moan':
								*clr
								cla
								horny += SUB - DOM + ((anus - 18) * 3)
								anal += 1
								Ashotsex += 1
								cumanus += 1

								if 18 > anus:anus += 1

								'<center><img src="images/picKav/kafeanpie.jpg"></center>'
								'Ashot leaned forward thrusting his cock as deeply as possible.'

								if horny >= 100 :
									horny = 1
									orgasm += 1
									analorgasm += 1
									'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
								end

								'Hot jet of sperm hit your anus. Ashot finished and hit you in the ass, saying that such a hole to fuck and need to fuck. And then pulled out a member and you feel like out of your ass rastrahannoy flowed a trickle of sperm. .'

								act 'Move away':gt 'kafe', 'workPred'
							end
						end
					end
				end
			elseif giviSex = 0 and Ashotsex > 0:
				horny += 10
				'"Slyushay, you''re so juicy ass around my dick skewers wai still remember." said Ashot grabbing you in the ass.'
			end
		end
	else
		'Ashot lays kitchen appliances in their places ready to go.'
	end

	act 'Move away':gt 'kafe', 'workPred'
}

$iradin = {
	cls
	gs 'stat'

	'Ira just not worth than not occupied at the counter.'

	if hour < 22:
		act 'Chat with Irina':
			cla
			minut += 30
			manna += 5
			gs 'stat'
			willpower += rand(0, 1)

			if Irina <= 100:Irina += rand(0, 5)

			gs 'stat'
			'You chatted with the waitress at the bar Ira.'

			if IrinaQW ! 10 or IrinaLesbSex >= 3:
				if GiviSex >= 1 and Kavslut = 0:
					'Ira with round eyes tells you that rumor goes, if you Givi in ​​the mouth take.'
				elseif Kavslut > 0:
					'Ira tells you that she knows that you fuck Caucasians in the evenings at the moment.'
				end
			elseif IrinaQW = 10 and IrinaLesbSex = 2:
				IrinaLesbSex = 3
				'Irina bit more relaxed and not twitches in your appearance.'
			elseif IrinaQW = 10 and IrinaLesbSex = 1:
				IrinaLesbSex = 2
				'Irina you smiling and trying to communicate, but it goes like this strained.'
			elseif IrinaQW = 10 and IrinaLesbSex = 0:
				IrinaLesbSex = 1
				'Irina clearly looks confused and tries not to look you in the eye. You approached her and tried to calm her down. Irina you nodded and said, "Let''s work to pretend that nothing happened. I do not want that to somebody about it knew." You agree with Ira.'
			end

			act 'Move away':gt 'kafe', 'workPred'
		end
	else
		if IrinaSlut >= 2:
			dynamic $givipredlogdin
		elseif IrinaSlut < 2:
			act 'Go home with Irina':
				cla
				Irina += 5
				minut += 5
				gs 'stat'

				if Irina < 100:
					if Irina < 50:
						if GiviSex >= 1 and Kavslut = 0:
							$irinatalk = 'Along the way she basically silent and looks askance at you'
						elseif Kavslut > 0:
							$irinatalk = 'Along the way she basically silent and looks askance at you.'
						else
							$irinatalk = 'Irina mostly silent all the way.'
						end

						$irinaend = 'Near the entrance is reserved to you goodbye and goes to his home.'
					else
						if GiviSex >= 1 and Kavslut = 0:
							$irinatalk = 'Along the way she mostly silent, but emboldened begins to ask you about your relationship with Givi.'
						elseif Kavslut > 0:
							$irinatalk = 'Along the way she mostly silent, but emboldened begins to ask you about the adventures with hachami wondering how you can be a litter like you.'
						else
							$irinatalk = 'Irina on the road is about trifles.'
						end

						$irinaend = 'Near the entrance she waves a hand and you go to his home.'
					end
				elseif Irina >= 100 and IrinaQW = 0:
					IrinaQW = 1

					$irinatalk = 'Ira fun twitters all the way.'
					$irinaend = 'She invites you as a Saturday to go to visit her and goes to his entrance.'
				elseif Irina >= 100 and IrinaQW = 1:
					if GiviSex >= 1 and Kavslut = 0:
						$irinatalk = 'Irina on the way talks about her ex-boyfriend.'
					elseif Kavslut > 0:
						$irinatalk = 'Irina on the way talks about her ex-boyfriend. And also about how she once made a blowjob in the toilet of the club drunk with what that guy.'
					else
						$irinatalk = 'Irina chatted all the way to the time of day.'
					end

					$irinaend = 'Ira standing at the entrance invites you to come to her.'

					act 'Enjoy a visit to Ira':gt 'IrinaRoom', 'first'
				elseif Irina >= 100 and IrinaQW = 2:
					if GiviSex >= 1 and Kavslut = 0:
						$irinatalk = 'Irina mostly silent all the way, but mustered committed says he did not expect that he did not expect from you, In order that you not only sleep with men, but also with women. Trying to be polite , that''s what it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
					elseif Kavslut > 0:
						$irinatalk = 'Irina mostly silent all the way, but mustered determination says that from such a whore as you can of course it was all expected and tells you that you do loose. Trying to be polite , that''s what it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
					else
						$irinatalk = 'Irina mostly silent all the way, but mustered committed says he did not expect that such a nice girl like you, actually lesbian. Trying to be polite , that''s what it is not against sex minorities, but she did not want to sleep with women, they are so soft and nasty, just awful.'
					end

					$irinaend = 'Going to the door she says goodbye to you and leaves.'
				elseif Irina >= 100 and IrinaQW >= 10 and IrinaSlut >= 2:
					if Kavslut > 0:
						$irinatalk = 'Ira smiling tells that she had long wanted to stop being a nun and live freely and she thanks you for your help ..'
					end

					$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'

					act 'Going to visit Ira':gt 'IrinaRoom', 'first'
				elseif Irina >= 100 and IrinaQW >= 10 and IrinaSlut = 1:
					if GiviSex >= 1 and Kavslut = 0:
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
					elseif Kavslut > 0:
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure. She notes that although you obviously more experience, so that Ira never slept with two men at once.'
					else
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
					end

					$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'

					act 'Going to visit Ira':gt 'IrinaRoom', 'first'
				elseif Irina >= 100 and IrinaQW >= 10 and IrinaSlut = 0:
					if GiviSex >= 1 and Kavslut = 0:
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
					elseif Kavslut > 0:
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman such pleasure. she notices, which, so il will never slept with two men at once. She also asked her to speak to her word Givi, she also wants a pay rise.'
					else
						$irinatalk = 'Ira smiling surprised that he did not expect to have sex with a woman so much pleasure.'
					end

					$irinaend = 'Standing at the door of her house Ira invites you to come to visit her.'

					act 'Going to visit Ira':gt 'IrinaRoom', 'first'
				end

				'You came and went home with Irina. <<$irinatalk>> you get to the house where he lives Il. <<$irinaend>>'

				act 'Say goodbye':gt 'street'
			end
		end
	end
}


$tamdin = {
	cls
	gs 'stat'
	'Tamara without interrupting the dishes turned to you.'

	if hour < 22:
		act 'Chat with Tamara':
			cla
			minut += 30
			manna += 5
			willpower += rand(0, 2)

			if Tamara <= 100:Tamara += rand(0, 5)

			'You talked in the kitchen with a dishwasher Tamara.'

			if GiviSex >= 1 and Kavslut = 0:
				'Tamara snorts. It is necessary, and not ashamed to suck Givi for wages, how disgusting!'
			elseif Kavslut > 0:
				'Caucasian slut you stomp away.'
			end

			act 'Move away':gt 'kafe', 'workPred'
		end
	else
		'She already going home and offers to go along.'

		act 'Go home with Tamara':
			cla
			minut += 5

			if clener = 1:'You walk down the street with Tamara, she does not live podaleku from you and when you come to her house she stops poproschatsya with you.'
			if clener = 0:clener = 1 & 'You walk down the street with Tamara, Tamara tells you that she sometimes works as a cleaner in an office building nearby.'

			act 'Say goodbye':gt 'street'
		end
	end
}

$givipredlogdin = {
	if IrinaSlut >= 2:
		'Givi revolves around Ira and Givi not how much embarrassed squeezes her ass and snorts "Wai, Ira, you''re a real slut." He turns to you, "Hey <<$name>> Stay evening, earn bonuses."'

		act 'Well stay with them':gt 'kavkazkafe', 'podgivi'

		act 'Go home':
			cla
			minut += 5
			gt 'kafeend'
		end

		exit
	end

	'Givi walks with a notepad and recalculates the bottle. Wai <<$name>>, ti smart head, help count bottles.'

	act 'Sorry, but I must go home':
		cla
		minut += 5
		'You apologized and steel This collection of home.'

		if GiviSex > 0:
			'Wai <<$name>>. Remain STEM earn entertain.'
				act 'Yet I''m home':
					cla
					minut += 5
					gt 'kafeend'
				end

				act 'Help Givi':gt 'kavkazkafe', 'podgivi'

				exit
		elseif GiviSex = 0:
			'Wai <<$name>> why offend you? I feel about you as a mother. And you do not want to help the old man.'

			act 'Yet I''m home':
				cla
				Givi = 0
				minut += 5
				gt 'kafeend'
			end

			act 'Help Givi':gt 'kavkazkafe', 'podgivi'

			exit
		end

		act 'Go home':
			cla
			minut += 5
			gt 'kafeend'
		end
	end

	act 'Help Givi':gt 'kavkazkafe', 'podgivi'
}

--- kafedinamic ---------------------------------
# kafeend
endrand = rand(0, 100)

if endrand > 15:
	gt 'street'
elseif endrand = 0:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand.jpg"></center>'
	'On leaving the cafe you saw a large crowd of young people deciding where to move on. You''ll also notice that one of the girls wasted no time in vain started doing blowjob her boyfriend completely undeterred adventitious.'

	act 'Leave':gt 'street'
elseif endrand = 1:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand1.jpg"></center>'
	'Coming out of the cafe you notice the car standing in the dark, passing out of it you see a light in the open trunk of what that guy zhetko hammer chick, so much so that as much shock and creaking machine raskazivaetsya. Litter only moans and whispers, "More, more!"'

	act 'Leave':gt 'street'
elseif endrand = 2:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand2.jpg"></center>'
	'On leaving the cafe you saw a large crowd of young people deciding where to move on. In the crowd you are surprised to see how one of the girls licking pussy another without paying attention to others.'

	act 'Leave':gt 'street'
elseif endrand = 3:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand3.jpg"></center>'
	'Coming out of the cafe you way home and when you walked past the car, you suddenly saw a woman sitting on his heels does blowjob contented guy in front of her.'

	act 'Leave':gt 'street'
elseif endrand = 4:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand4.jpg"></center>'
	'Coming out of the cafe you went home and noticed how the side of the cafe a couple fucking. Maid squatted and sucked cock.'

	act 'Leave':gt 'street'
elseif endrand = 5:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand5.jpg"></center>'
	'Coming out of the cafe you way home and when you walked past the car, you suddenly saw a woman sitting in the front seat of the car makes blowjob guy smacking a member in his mouth.'

	act 'Leave':gt 'street'
elseif endrand = 6:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand6.jpg"></center>'
	'Coming out of the cafe as you notice between parked cars sitting girl with his pants down and pissing smiling blissfully.'

	act 'Leave':gt 'street'
elseif endrand = 7:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand7.jpg"></center>'
	'Coming out of the cafe you notice what that laughing maiden who danced bullying legs while still managed to drink from the cup.'

	act 'Leave':gt 'street'
elseif endrand = 8:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand8.jpg"></center>'
	'Coming out of the cafe you noticed a girl lying on the pavement, she wore only a sweater does not hide her naked pussy. The girl was obviously drunk as a skunk.'

	act 'Leave':gt 'street'
elseif endrand = 9:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand9.jpg"></center>'
	'Coming out of the cafe you noticed that on the bench asleep drunk vusmert guy with a girl, apparently sleep caught them directly during petting thought you eyeing them.'

	act 'Leave':gt 'street'
elseif endrand = 10:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand10.jpg"></center>'
	'Coming out of the cafe as you notice what that middle-aged man and a drunk girl in the trash trying to drag the machine is off the girl.'

	act 'Leave':gt 'street'
elseif endrand = 11:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand11.jpg"></center>'
	'Coming out of the cafe, you notice that right near the entrance lying on the pavement located drunk girl passed out.'

	act 'Leave':gt 'street'
elseif endrand = 12:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand12.jpg"></center>'
	'Coming out of the cafe, you notice that the girl fell asleep drunk ass sitting in an urn and collapsed there.'

	act 'Leave':gt 'street'
elseif endrand = 13:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand13.jpg"></center>'
	'Coming out of the cafe you notice one girl trying to unstick from the asphalt his drunken girlfriend who mumbles something and drunkenly giggling.'

	act 'Leave':gt 'street'
elseif endrand = 14:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand14.jpg"></center>'
	'Coming out of the cafe you notice lying drunk girl without panties.'

	act 'Leave':gt 'street'
elseif endrand = 15:
	horny += 5
	gs 'stat'
	'<center><img src="images/picKav/arand15.jpg"></center>'
	'Coming out of the cafe, you notice how the male leads somewhere that his little wife dopilas spree before it began to show striptease on the street.'

	act 'Leave':gt 'street'
end

--- kafeend ---------------------------------

# kavkazkafe
if $ARGS[0] = 'podgivi':
	gs 'bdman', 'givi'
	gs 'dinsexgivi'
	minut += 30
	gs 'stat'

	if IrinaSlut >= 2:
		cla
		*clr

		if bjgiviiraonce = 1:bjgiviiraonce = 0

		smenaKafe += 1
		tiprand = rand(0, 1)

		if tiprand = 0:
			'Givi grinned grabbing you both hands "Wai, come heifers, have fun."'

			act 'Go.':gt 'kavkazkafe', 'threesome'
		else
			'Ashot entered the room and said, "Well bitch, fingering holes now have real horsemen in all holes otebut."'

			act 'Go.':gt 'kavkazkafe', 'foursome'
		end

		exit
	end

	podrand = rand(0, 100)

	if podrand < 70 and kavslut > 0:
		gs 'bdman', 'ashot'
		'<center><img src="images/picKav/podsob.jpg"></center>'
		'You went into the back room with Givi and began to count the wine and talking Givi figures which he wrote in his notebook.'
		'Suddenly the door opened into the back room and came back Ashot. You looked at Caucasians.'
		'Givi said wai, but what? We liked <<$name>>, cup your hole, now you two fuck horseman, age will not forget.'

		act 'Leave':gt 'street'
		act 'Okay.':gt 'kavkazkafe', 'grup'

		exit
	elseif podrand < 70 and kavslut = 0 and giviAnalOnce = 1:
		gs 'bdman', 'ashot'
		'<center><img src="images/picKav/podsob.jpg"></center>'
		'You went into the back room with Givi and began to count the wine and talking Givi figures which he wrote in his notebook.'
		'Suddenly the door opened into the back room and came back Ashot. You looked puzzled Givi.'
		'Givi smiled. "<<$name>>, my nephew Ashotiku is high time to become a man, I hope you can help him in premium will not be found."'

		act 'But for whom do you take me?':
			cla
			'You rebelled "But for whom do you take me?"'
			'Givi laughed. "Come boldly devochka. I know you want potrahatsya two such jigits, wai we will not tell anyone, do not be afraid."'
			'Ashot came up to you and put his hand that would hug you.'

			act 'Allow yourself to embrace':gt 'kavkazkafe', 'grup'

			act 'All that''s enough from me, I''m going home!':
				cla
				'You blurted out, "All this is enough to me, I''m going home!" and turned to walk toward the exit.'
				'Givi trotted after "<<$name>> well wait I''m poshyutil, zachem offended?"'

				act 'Leave':gt 'street'
			end
		end

		act 'Well, let''s.':gt 'kavkazkafe', 'grup'

		exit
	end

	'<center><img src="images/picKav/podsob.jpg"></center>'
	'You went into the back room with Givi and began to count the wine and talking Givi figures which he wrote in his notebook.'
	'Givi told you count wine in a box from the bottom, you bent over and began to count.'

	if givisex = 0:
		'You felt like a hand clutched Givi your ass and started stroking you from behind.'

		act 'Continue to consider pretending you do not notice':
			cla
			gs 'stat'
			'You grinned and continued to take it as not in what happened. Givi already being groped by your priest hands.'
			'(Givi) - <<$name>>. I want you. Come to me sweetie.'
			'Strong hands Givi deployed you to him. And you were face to face with Givi.'

			act 'To kneel':gt 'kavkazkafe', 'givibj'

			act 'But for whom do you take me?':
				cla
				'You rebelled "But for whom do you take me?"'
				'Givi zauhmylyalsya. "You''re a whore, zachem booty before Werth guy?"'

				act 'To kneel':
					money += 5000
					gt 'kavkazkafe', 'givibj'
				end

				act 'All that''s enough from me, I''m going home!':
					cla
					'You blurted out, "All this is enough to me, I''m going home!" and turned to walk toward the exit.'
					'Givi grabbed you by the arm and dragged her to a chair in the back.'

					act 'Trying to pull his hand':gt 'kavkazkafe', 'givirape'
				end
			end
		end

		act 'Remove his hands':
			cla
			gs 'stat'
			'You straightened up and looked at the Givi. "What do you allow yourself Givi K.?"'
			'Givi licking and devouring you burning eyes spoke haltingly "Wai <<$name>>, you''re so juicy, slyushay, you want money I''ll do bonus, you''ll live like a queen."'

			act 'To kneel':gt 'kavkazkafe', 'givibj'

			act 'But for whom do you take me?':
				cla
				'You rebelled "But for whom do you take me?"'
				'Givi zalopotal again stepping on you and clasping hands. "Come boldly devochka. Want, I''ll now give deneg? Five thousand? And bonus."'

				act 'To kneel':
					money += 5000
					gt 'kavkazkafe', 'givibj'
				end

				act 'All that''s enough from me, I''m going home!':
					cla
					'You blurted out, "All this is enough to me, I''m going home!" and turned to walk toward the exit.'
					'Givi trotted after "<<$name>> well wait I''m poshyutil, zachem offended?"'

					act 'Leave':gt 'street'
				end
			end
		end
	else
		'Givi relish slapped you in the ass hand.'
		'(Givi) - Wai, what is tebya ass. <<$name>> suck me, I will add you bonus.'

		act 'To kneel':gt 'kavkazkafe', 'givibj'
		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = 'grup':
	Givi = 100
	smenaKafe += 2

	if GiviSex = 0:GiviSex = 1 & guy += 1
	if Ashotsex = 0:Ashotsex = 1 & guy += 1

	minut += 5
	kavslut += 1
	gang += 1
	bj += 2
	gs 'stat'
	picrand = rand(0, 1)

	if picrand = 0:'<center><img src="images/picKav/grupbj.jpg"></center>'
	if picrand = 1:'<center><img src="images/picKav/grupbj1.jpg"></center>'

	'You knelt down and took both hands members. You obediently opened his mouth and wrapped around <<$liptalk>> purple and warm dick started to absorb it in your mouth after a few movements you masturbate without stopping first term cupped his second term working mouth and began to suck it, so you take turns sucking members and tried to take just two dick in your mouth working.'

	act 'Helplessly moo':gt 'kavkazkafe', 'grup1'
end

if $ARGS[0] = 'grup1':
	minut += 5
	gs 'stat'
	picrand = rand(0, 1)

	if picrand = 0:'<center><img src="images/picKav/grupv.jpg"></center>'
	if picrand = 1:'<center><img src="images/picKav/grupv1.jpg"></center>'

	dynamic $sexudo
	'You suck his dick Givi <<$liptalk>> absorbing his every move to the throat until Ashot hews your pussy.'

	if givserand >= 8:anus += 1 & 'During sex Ashot you stuck a finger in the ass and started rubbing it.'

	gianrand = rand(0, 10)

	if anus > 1 and gianrand >= 8:
		'Ashot suddenly took out a member and you become stronger fingers to work in your ass.'

		act 'Suck givi':gt 'kavkazkafe', 'grup2'

		exit
	end

	'Ashot suddenly pulled out of you cock and taking you by the shoulders put in front of him on his knees.'

	act 'Substitute person':gt 'kavkazkafe', 'grupcum'
end

if $ARGS[0] = 'grup2':
	minut += 5
	gs 'stat'
	picrand = rand(1, 3)
	'<center><img src="images/picKav/grupd<<picrand>>.jpg"></center>'

	'You continue to suck his dick Givi <<$liptalk>> absorbing his every move to the throat until Ashot busy behind you.'
	gs 'bdsex', 'an'
	gianrand = rand(0, 10)

	if anus > 1 and gianrand >= 8:
		'Ashot suddenly took out a member and you become stronger fingers to work in your ass.'

		act 'Double Penetration':gt 'kavkazkafe', 'grup3'

		exit
	end

	'Ashot suddenly pulled out of you cock and taking you by the shoulders put in front of him on his knees.'

	act 'Substitute person':gt 'kavkazkafe', 'grupcum'
end

if $ARGS[0] = 'grup3':
	minut += 5
	gs 'stat'
	picrand = rand(1, 3)
	'<center><img src="images/picKav/grupdouble<<picrand>>.jpg"></center>'
	'Givi and Ashot administered in you its members.'
	gs 'bdman', 'givi'
	dynamic $sexudo
	gs 'bdman', 'ashot'
	gs 'bdsex', 'an'
	'Ashot suddenly pulled out of you cock and taking you by the shoulders put in front of him on his knees.'

	act 'Substitute person':gt 'kavkazkafe', 'grupcum'
end

if $ARGS[0] = 'grupcum':
	minut += 5
	facial += 1
	cumface += 2
	gs 'stat'
	'<center><img src="images/picKav/grupcum.jpg"></center>'
	'You kneel and Ashot Givi together began to cum on your face, covering it with hot and sticky cum gushing that you warm in the face and degrading streams and trickled down.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'givirape':
	Givi = 100
	smenaKafe += 1

	if GiviSex = 0:GiviSex = 1 & guy += 1

	rape += 1
	givirape += 1
	minut += 5
	manna -= 20
	gs 'stat'
	'<center><img src="images/picKav/rape.jpg"></center>'
	'Givi took the tape and began to bind you, that you would not pre-plugged fluttered you gag.'
	'Finally, he shook you so that you could not even twitch.'

	act 'Helplessly moo':gt 'kavkazkafe', 'givirape1'
end

if $ARGS[0] = 'givirape1':
	minut += 5
	bj += 1
	gs 'stat'
	'<center><img src="images/picKav/rape1.jpg"></center>'
	'Givi took and put a gag in your mouth his thick, not washed member.'

	act 'Suck':gt 'kavkazkafe', 'givirapebj'
	act 'Bite':gt 'kavkazkafe', 'givirape2'
end

if $ARGS[0] = 'givirapebj':
	minut += 5

	if mop > 1:mop = 0

	hapri = 0
	throat += 1
	cumlip += 1
	swallow += 1
	money += 5000
	'<center><img src="images/picKav/rape1.jpg"></center>'
	'Not seeing any other way you started to work diligently mouth that would hurry Givi finished. Givi went into a rage and began to peck you with his cock in her mouth hitting every movement in your throat.'

	if mop > 1:mop = 0 & 'You started crying and smeared kometiki face.'

	'Givi finally grunted and hot jet of sperm hit you in the throat. You started frantically ingest it that would not choke.'
	gs 'stat'
	'After Givi finished, he immediately mellowed and began to untie you. Wai <<$name>>, you''re a good nipple. Deneg on you, buy yourself something.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'givirape2':
	minut += 5
	money += 5000
	'<center><img src="images/picKav/rape2.jpg"></center>'
	'You bit Givi member and furious, then I''ll fuck you in the ass whore, just do not want to suck.'
	'You feel like something big and hard pressed to your anus trying to enter.'

	if anus >= 1:
		anus += 3
		anal += 1
		cumass += 1
		manna -= 100
		horny = 0
		'Givi pushed harder and his cock flew into your ass. You squealed madly pain. Givi began to peck you in the ass without lubrication without paying what you roared as beluga.'
		'Anal rape seemed like an eternity, finally Givi groaned and stopped you feel as heat from the ass poured his sperm.'
	elseif anus <= 0:
		'Ah, what do you narrow, did not go, okay, then you pussy fuck off.'
		dynamic $sexudo
		'You moaned and groaned gagged until your insides hollowed Givi a member.'
		pose = 1
		dynamic $sexcum
	end

	gs 'stat'
	'After Givi finished, he immediately mellowed and began to untie you. Wai <<$name>>, Do not cry, you''re a woman, you are destined for a man to lie, and you kochevryazhishsya. Deneg on you, buy yourself something.'

	act 'Leave':gt 'street'
end


if $ARGS[0] = 'givibj':
	Givi = 100
	smenaKafe += 1

	if GiviSex = 0:GiviSex = 1 & guy += 1

	givitime += 1
	minut += 3
	gs 'bdman', 'givi'
	gs 'stat'
	'<center><img src="images/picKav/before.jpg"></center>'
	'You nodded and stood in front of big-bellied Armenian lap. He unbuttoned his pants and pulled out his long and thick cock which ended up right on your face against almost touching you.'

	act 'Stroking his dick':gt 'kavkazkafe', 'givibj1'
	act 'Take by mouth':gt 'kavkazkafe', 'givibj3'
end

if $ARGS[0] = 'givibj1':
	minut += 3
	hj += 1
	gs 'stat'
	'<center><img src="images/picKav/before3.jpg"></center>'
	'You took member Givi hands and began to fondle his own fingers. Givi put his hairy hand on your face, and began to touch your lips.'

	act 'Sucking his thumb':gt 'kavkazkafe', 'givibj2'
	act 'Take in the mouth member':gt 'kavkazkafe', 'givibj3'
end

if $ARGS[0] = 'givibj2':
	minut += 3

	if sub > 0:horny += sub

	sub += 1
	gs 'stat'
	'<center><img src="images/picKav/before2.jpg"></center>'
	'You started to suck salty fingers Givi and masturbate his penis.'

	act 'Take by mouth':gt 'kavkazkafe', 'givibj3'
end

if $ARGS[0] = 'givibj3':
	minut += 3
	bj += 1
	hapri = 0
	gs 'stat'
	'<center><img src="images/picKav/bj1.jpg"></center>'
	'Givi took your hair pulled your face to his cock. You touched his <<$liptalk>> crimson head. Givi gladly spent dickhead you lips. You are standing on all fours wrapped around his <<$liptalk>> it is thick and slightly salty cock and began to suck him, absorbing up to the neck, this solid piece of flesh fills your mouth.'

	act 'Suck on':gt 'kavkazkafe', 'givibj4'
end

if $ARGS[0] = 'givibj4':
	minut += 3
	gs 'stat'
	'<center><img src="images/picKav/bj.jpg"></center>'
	'Givi tired of standing and he sat on the sofa without letting your hair out of hand. You continue to work with your <<$liptalk>> treating the solid as a rock dick standing in front potbellied Caucasians on all fours. Givi began to puff and it seems that''s here to finish.'

	act 'Remove the mouth':gt 'kavkazkafe', 'givibj5'
	act 'Continue to suck':gt 'kavkazkafe', 'givibj6'

	if givitime > 1:
		givrand = rand(0, 100)

		if givrand >= 75:
			cla
			'Givi took a member of your mouth, and said, "Make yourself <<$name>> cancer."'

			act 'Doggy-Style':gt 'kavkazkafe', 'givisex'
		end
	end
end

if $ARGS[0] = 'givibj5':
	minut += 3
	facial += 1
	cumface += 1
	gs 'stat'
	picrand = rand(1, 9)
	'<center><img src="images/picKav/facial<<picrand>>.jpg"></center>'
	'You remove a member from his mouth, but did not give you Givi dodge jet of sperm and slapped you covering your lips sticky and hot manure with a pungent odor.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'givibj6':
	minut += 3
	swallow += 1
	cumlip += 1
	gs 'stat'
	picrand = rand(1, 9)
	'<center><img src="images/picKav/cum<<picrand>>.jpg"></center>'
	'You have opened my mouth and began to finish Givi your mouth stuffing his sperm. The taste of semen was terrible and you had a mouth full of spit was not particularly where and waiting until Givi dries, you swallow cum in your mouth that has left a sharp aftertaste from your mouth and can be had for a couple of meters to smell the pungent smell of semen.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'givisex':
	minut += 3
	gs 'stat'
	'<center><img src="images/picKav/before4.jpg"></center>'
	'You undressed and got on all fours, hands apart poluzhopiya. Givi approvingly grunted and slapped you in the ass hand. "Good Ass <<$name>> you!"'

	if givitime > 5:
		givrand = rand(0, 100)

		if givrand >= 75 and anal > 0 and giviVagOnce = 1:
			cla
			'<<$name>>, I want you in the ass.'

			act 'I do not want':gt 'kavkazkafe', 'givisex1'
			act 'Close your eyes':gt 'kavkazkafe', 'givianal'

			exit
		end
	end

	act 'Close your eyes':gt 'kavkazkafe', 'givisex1'
end

if $ARGS[0] = 'givisex1':
	minut += 3

	if giviVagOnce = 0:giviVagOnce = 1

	gs 'stat'
	givserand = rand(0, 10)

	if givserand < 8:'<center><img src="images/picKav/sex.jpg"></center>'
	if givserand >= 8:'<center><img src="images/picKav/sex1.jpg"></center>'

	dynamic $sexudo
	'You moan until your insides hollowed Givi a member.'

	if givserand >= 8:anus += 1 & 'During sex Givi you stuck a finger in the ass and started rubbing it.'

	gianrand = rand(0, 10)

	if anus > 1 and givserand >= 8 and gianrand >= 8:
		'Givi suddenly took out a member and you become stronger fingers to work in your ass.'

		act 'Close your eyes':gt 'kavkazkafe', 'givianal'

		exit
	end

	givfinrand = rand(0, 10)

	if givfinrand >= 8:
		'Givi suddenly pulled out of you cock and taking you by the shoulders put in front of him on his knees.'

		act 'Substitute person':gt 'kavkazkafe', 'givibj5'
		act 'Open mouth':gt 'kavkazkafe', 'givibj6'

		exit
	end

	pose = 1
	dynamic $sexcum

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'givianal':
	minut += 3

	if giviAnalOnce = 0:giviAnalOnce = 1

	gs 'stat'
	'<center><img src="images/picKav/anal.jpg"></center>'
	gs 'bdsex', 'an'
	givfinrand = rand(0, 10)

	if givfinrand >= 8:
		'Givi suddenly pulled out of you cock and taking you by the shoulders put in front of him on his knees.'

		act 'Substitute person':gt 'kavkazkafe', 'givibj5'
		act 'Open mouth':gt 'kavkazkafe', 'givibj6'

		exit
	end

	gs 'bdsex', 'ancum'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'threesome':
	minut += 3
	gang += 1
	gs 'stat'
	'<center><img src="images/picKav/threestart.jpg"></center>'
	'Givi sat on the couch and pulled out his penis, you Ira began to undress each other sexually and kissing.'

	act 'Sucking dick':
		cls
		minut += 3
		sub += 1

		if bjgiviiraonce = 0:bjgiviiraonce = 1 & bj += 1

		gs 'stat'
		tiprand = rand(0, 1)

		if tiprand = 0:
			picrand = rand(1, 6)
			'<center><img src="images/picKav/threeA<<picrand>>.jpg"></center>'
			'You and Irina knelt and began to suck dick Givi together, by turns sucking the barrel, then licking the testicles, sometimes kissing each other.'
			dynamic $threesomedin
		else
			picrand = rand(1, 3)
			'<center><img src="images/picKav/threeB<<picrand>>.jpg"></center>'
			'You knelt down and started to suck dick until Ira kissed Givi.'
			dynamic $threesomedin
		end
	end

	act 'Kissing Givi':
		cls
		minut += 3

		if bjgiviiraonce = 0:bjgiviiraonce = 1 & bj += 1

		dom += 1
		gs 'stat'
		picrand = rand(1, 3)
		'<center><img src="images/picKav/threeB<<picrand>>.jpg"></center>'
		'You kissed Givi until Ira worked his cock bringing it into combat readiness.'
		dynamic $threesomedin2
	end
end

if $ARGS[0] = 'foursome':
	minut += 3
	gang += 1
	gs 'stat'
	'<center><img src="images/picKav/four.jpg"></center>'
	'Givi and Ashot undressed you and Irina sat down and began to undress kissing each other.'

	act 'Suck':
		cls
		minut += 3

		if bjgiviiraonce = 0:bjgiviiraonce = 1 & bj += 1

		gs 'stat'
		picrand = rand(1, 10)
		'<center><img src="images/picKav/four<<picrand>>.jpg"></center>'
		'Together with Irina you started sucking dicks in Caucasians. Kiwi and Ashot gaily in an unfamiliar language and clicked their tongues.'

		act '...':
			cls
			minut += 3
			gs 'stat'
			picrand = rand(1, 5)
			'<center><img src="images/picKav/fourA<<picrand>>.jpg"></center>'
			'You and Ira climbed on fat cock and began to jump on them.'
			dynamic $sexstart2
			'Caucasians put you on your knees with Ira and started nadrachivat members before your faces.'

			act '...':
				cls
				minut += 3
				cumface += 1
				cumlip += 1
				gs 'stat'
				picrand = rand(1, 5)
				'<center><img src="images/picKav/fourfin.jpg"></center>'
				'You and Ira knelt at each other and Givi with Ashot began to cum on you face. You kissed Ira smeared in sperm.'

				act 'Leave':dynamic $endirinaaftergang
			end
		end
	end
end

--- kavkazkafe ---------------------------------
# klofdomhouse
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5

	act 'Ring the doorbell':
		cla

		if klofQW = 2 and hour >= 16 and klofday ! day:
			klofday = day
			gt 'klofdomhouse', 'ev1'
		elseif klofQW > 2 and hour >= 16 and klofday ! day:
			klofday = day
			gt 'klofdomhouse', 'start1'
		else
			'No one home'

			act 'Go home':gt 'street'
		end
	end

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'start1':
	cla
	*clr
	klofday = day
	minut += 5
	kloftimes += 1
	gs 'stat'

	if kloftimes < 10:
		gt 'klofdomhouse', 'ev7'
	else
		'<center><img src="images/klof/klof.jpg"></center>'
		'You rang the doorbell. Jora and went belly scratched. Yawned and said he was busy.'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev1':
	cla
	*clr
	klofday = day
	minut += 5
	kloftimes += 1
	gs 'stat'

	if kloftimes < 10:
		'<center><img src="images/klof/klof.jpg"></center>'
		'You rang the doorbell.'
		'You do not open and you want to leave, but then the door opened.'
		'Hey, you said'
		'-And you said this guy smiling through.'

		act 'Stop by':gt 'klofdomhouse', 'ev2'
	else
		'<center><img src="images/klof/klof.jpg"></center>'
		'You rang the doorbell. Jora and went belly scratched. Yawned and said he was busy.'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev2':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 1.jpg"></center>'
	'You looked around the apartment was a pigsty, the walls papered with peeled everywhere strewn socks.'
	'How pathetic something you guys here rebya - you said and smiled, eyes met the guy.'
	'Nothing, we just arrived in this city soon obzhivaya said grinning guy.'
	'- Clear. We are never met.'
	'- Call me Zhora, and my sidekick Senya, and now just quickly clean this up in the apartment.'

	act 'Clean up':gt 'klofdomhouse', 'ev4'

	if sub < 30 and horny < 75:act 'Leave':gt 'klofdomhouse', 'ev3'
end

if $ARGS[0] = 'ev3':
	cla
	*clr
	minut += 5
	klofQW -= 1

	if dom > 0:dom += 5
	if sub > 0:sub -= 5

	'<center><img src="images/qwest/pnx.jpg"></center>'
	'You decided that the guy above you just izdevaetsya and left.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev4':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 3.JPG"></center>'
	'Remove ZHore you approached and asked.'
	'Jora-you promised money and entertainment, but so far I have not seen what this'
	'Well-look, as I said we are not in a long time, until now we need a girl for home services'
	'- When will become closer acquainted, talk about business.'
	'- Now be a good girl and I discussed'

	act 'Open your legs ZHore':gt 'klofdomhouse', 'ev5'
end

if $ARGS[0] = 'ev5':
	cla
	*clr
	minut += 5
	sex += 1
	vagina += 1
	'<center><img src="images/klof/klof 4.jpg"></center>'
	'Jora began to fuck you in the pussy, suddenly the door opened.'
	'Into the room came Senya and said, "Suck my cock baby ka"'

	act 'Get a mouth Cenis':gt 'klofdomhouse', 'ev6'
end

if $ARGS[0] = 'ev6':
	cla
	*clr
	hour += 23
	minut += 5
	klofQW += 1
	cla
	*clr
	money += 2000
	bj += 1
	cumface += 1
	cumpussy += 1
	'<center><img src="images/klof/klof 5.jpg"></center>'
	'Jora zhetko pecked in your pussy, Xian fucked you in the mouth.'
	horand = rand(1, 100)

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

	'You are dressed and ready to go home.'
	'To you approached and handed the money Jora:"Earned crumb"'

	if bj >= anal and bj >= sex:callnm = 1
	if anal >= oral and anal >= sex:callnm = 2
	if Sex >= oral and Sex >= anal:callnm = 3
	if vaf >= 100:callnm = 4

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev7':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 1.jpg"></center>'
	'You went to the apartment'

	act 'Say hello to the guys':gt 'klofdomhouse', 'ev8'
end

if $ARGS[0] = 'ev8':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 6.jpg"></center>'
	'Hey baby-boys said, baring his chest and you started to caress you.'
	'- Hello boys miss me? - You said and blushed'

	act 'Entertain ZHoru':gt 'klofdomhouse', 'ev9'
	act 'entertain Senya':gt 'klofdomhouse', 'ev10'
	act 'Entertain both':gt 'klofdomhouse', 'ev19'
	act 'Talk about the affairs of Zhora':gt 'klofdomhouse', 'ev20'
end

if $ARGS[0] = 'ev9':
	cla
	*clr

	act 'Writing in the pussy ZHore.':gt 'klofdomhouse', 'ev13'
	act 'Writing in the ass ZHore.':gt 'klofdomhouse', 'ev14'
	act 'ZHore suck.':gt 'klofdomhouse', 'ev19'
end

if $ARGS[0] = 'ev13':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	vagina += 1
	sex += 1
	cumpussy += 1
	'Jora zhetko pecked in your pussy.'
	picrand = rand(7, 9)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	'You feel that Jora razryazhaetsya you.'
	'<center><img src="images/klof/klof 10.jpg"></center>'
	'You are dressed and ready to go home.'
	'Jora handed you the money, "Earned crumb"'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev14':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	anal += 1
	anus += 1
	cumass += 1
	'Jora with full force hammer you in the ass.'
	picrand = rand(11, 13)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		'<center><img src="images/klof/klof 14.jpg"></center>'
		'Jora discharge you in the ass, in the ass and inserts gag'
		'You are dressed and ready to go home.'
		'Jora handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev15':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	bj += 1
	cumface += 1
	'You passionately clasped Zhorin member lips.'
	picrand = rand(15, 17)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)
	if horand <= sex:horny = 0 & orgasm += 1 & 'You covered orgasm'
	if horand > sex:horny += 10 & 'You were not satisfied'

	act '...':
		cla
		*clr
		'Jora discharged in your face'
		picrand = rand(18, 20)
		'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
		'You are dressed and ready to go home.'
		'Jora handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev10':
	cla
	*clr
	act 'Writing in the pussy Seine.':gt 'klofdomhouse', 'ev 16'
	act 'Writing in the ass Seine.':gt 'klofdomhouse', 'ev 17'
	act 'Suck Seine.':gt 'klofdomhouse', 'ev 18'
end

if $ARGS[0] = 'ev 16':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	vagina += 1
	sex += 1
	'Hsien zhetko pecked in your pussy.'
	picrand = rand(7, 9)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	act '...':
		cla
		*clr
		'<center><img src="images/klof/klof 10.jpg"></center>'
		'You feel that Jora razryazhaetsya you.'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end
if $ARGS[0] = 'ev 17':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	cumass += 1
	anal += 1
	anus += 1
	'Hsien with full force hammer you in the ass.'
	picrand = rand(11, 13)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	act '...':
		cla
		*clr
		'<center><img src="images/klof/klof 14.jpg"></center>'
		'Hsien discharge you in the ass, in the ass and inserts gag'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev 18':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	bj += 1
	guy += 1
	cumlip += 1
	'You passionately clasped Senenin member lips.'
	picrand = rand(15, 17)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	act '...':
		cla
		*clr
		facial += 1
		'Hsien discharged in your face'
		picrand = rand(18, 20)
		'<center><img src="images/klof/klof 18.jpg"></center>'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev19':
	cla
	*clr
	minut += 30
	klofQW += 2
	money += 200
	sex += 1
	bj += 1
	cumface += 1
	facial += 1
	cumpussy += 1
	vagina += 1
	picrand = rand(1, 3)

	if picrand = 1:'<center><img src="images/klof/klof 21.jpg"></center>'
	if picrand = 2:'<center><img src="images/klof/klof 22.jpg"></center>'
	if picrand = 3:'<center><img src="images/klof/klof 23.jpg"></center>'

	'Jora brutally fuck you in the mouth and pussy Cenya dryuchit'
	horand = rand(1, 100)

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

	'Finally they both finished, one in the pussy, the other on the face.'
	'You are dressed and ready to go home.'
	'Boys stretched you money, "Earned crumb"'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev20':
	cla
	*clr
	klofday = day
	minut += 5
	'<center><img src="images/klof/klof.jpg"></center>'
	'If you want to talk serious business with our boss'

	act 'Talk to the boss':
		cla

		if klofQW < 10:gt 'klofdomhouse', 'ev21'
		if klofQW >= 10:gt 'klofdomhouse', 'ev22'
	end
end

if $ARGS[0] = 'ev21':
	cla
	*clr
	'<center><img src="images/klof/klof24.jpg"></center>'
	'From the room came an ugly old man'
	'"Too early you climb into our business" - he said.'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev22':
	cla
	*clr
	'<center><img src="images/klof/klof24.jpg"></center>'
	'From the room came an ugly old man'
	'Boss looked closely at you and said, "Come to me, look at what you''re ready for the money"'

	act 'Go to the boss room':gt 'klofdomhouse', 'ev23'
	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev23':
	cla
	*clr
	'<center><img src="images/klof/klof25.jpg"></center>'
	'You went into the room boss surprisingly it was well renovated and furnished'
	'Well Well take off your clothes and show yourself - said the boss'

	act 'Show yourself':gt 'klofdomhouse', 'ev24'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev24':
	cla
	*clr
	'<center><img src="images/klof/klof 26.jpg"></center>'
	'You sat on the bed modestly'
	'Show breast - ordered boss'

	act 'Show breast':gt 'klofdomhouse', 'ev25'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev25':
	cla
	*clr
	'<center><img src="images/klof/klof 26 (1).jpg"></center>'
	'You bared her breasts'
	'Show ass! - Ordered the boss'

	act 'Show ass':gt 'klofdomhouse', 'ev26'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev26':
	cla
	*clr
	! WD: Correct Image path ~ "images/klof/klof 26</center>.jpg"
	'<center><img src="images/klof/klof 26.jpg"></center>'
	'You showed your ass boss'
	'Let''s pull off her dress! - He said'

	act 'Remove dress':gt 'klofdomhouse', 'ev27'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev27':
	cla
	*clr
	'You took off her dress'
	'Spreads legs! - Received an order'
	'<center><img src="images/klof/klof 26 (4).jpg"></center>'

	act 'Extend the legs':gt 'klofdomhouse', 'ev28'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev28':
	cla
	*clr
	'<center><img src="images/klof/klof 26 (6).jpg"></center>'
	'You sat on the bed and pushed the legs'
	'And now to seduce me - smiled boss'

	act 'Seduce the boss':gt 'klofdomhouse', 'ev29'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev29':
	cla
	*clr
	'<center><img src="images/klof/1284364hjl.jpg"></center>'
	'You rolled over on his side and showed their charms boss'

	act 'Spin the ass before the boss':gt 'klofdomhouse', 'ev30'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev30':
	cla
	*clr
	'<center><img src="images/klof/1284365sgp.jpg"></center>'
	'You got cancer and began to twist her ass before the boss noticed that onachal fidget in his chair'

	act 'Lick the head of the boss':gt 'klofdomhouse', 'ev31'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev31':
	cla
	*clr
	'<center><img src="images/klof/klof27.jpg"></center>'
	'You gently began to lick penis'

	act 'Clasp member lips':gt 'klofdomhouse', 'ev32'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev32':
	cla
	*clr
	'<center><img src="images/klof/klof28.jpg"></center>'
	'You eagerly clasped member lips'
	'Boss hoarse voice you ordered, "spreads her legs bitch"'

	act 'Spread her legs':gt 'klofdomhouse', 'ev33'
	act 'Send it to...':gt 'street'
end

if $ARGS[0] = 'ev33':
	cla
	*clr
	'<center><img src="images/klof/klof 26 (5).jpg"></center>'
	'You call razdvinuli legs'
	'Well, check your front - asked the boss'

	act 'Writing in the pussy':gt 'klofdomhouse', 'ev34'
	act 'Refuse':gt 'street'
end

if $ARGS[0] = 'ev34':
	cla
	*clr
	minut += 30
	klofQW += 1
	vagina += 1
	sex += 1
	'<center><img src="images/klof/klof 28.jpg"></center>'
	'Boss with full force pushes his penis in your vagina.'
	horand = rand(1, 100)

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

	'Let me try your ass - the boss ordered'

	act 'Writing in the ass':gt 'klofdomhouse', 'ev35'
	act 'Refuse':gt 'street'
end

if $ARGS[0] = 'ev35':
	cla
	*clr
	minut += 30
	klofQW += 1
	anal += 1
	anus += 1
	'<center><img src="images/klof/klof29.jpg"></center>'
	'Boss skewer your point on his penis.'
	horand = rand(1, 100)

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

	'You chustvuete boss ready to be discharged'

	act 'Substitute person that he finished':gt 'klofdomhouse', 'ev36'
	act 'Let them ends up in the ass':gt 'klofdomhouse', 'ev37'
	act 'Insert dick in pussy':gt 'klofdomhouse', 'ev38'
end

if $ARGS[0] = 'ev36':
	cla
	*clr
	cumface += 1
	money += 500
	'<center><img src="images/klof/klof30.jpg"></center>'
	'You jump from a member and start nadrachivat member face to the boss'

	act 'Get out of bed':gt 'klofdomhouse', 'ev39'
end

if $ARGS[0] = 'ev37':
	cla
	*clr
	cumpussy += 1
	money += 500
	'<center><img src="images/klof/klof32.jpg"></center>'
	'You start furiously podmahivat ass trying to quickly help him reach orgasm'

	act 'Get out of bed':gt 'klofdomhouse', 'ev39'
end

if $ARGS[0] = 'ev38':
	cla
	*clr
	money += 500
	'<center><img src="images/klof/klof31.jpg"></center>'
	'Catching the moment you insert member into the vagina'
	'Well, check your front - asked the boss'

	act 'Get out of bed':gt 'klofdomhouse', 'ev39'
end

if $ARGS[0] = 'ev39':
	cla
	*clr
	'<center><img src="images/klof/klof33l.jpg"></center>'
	'You got out of bed, looked at the exhausted man, with a grin and asked the boss:"Well, I passed the test?"'
	'-Well you went bed-check, check you in obedience, '
	'- Served both my boys only dvoi and only pussy once - ordered boss'

	act ' Obediently serve children':gt 'klofdomhouse', 'ev40'
	act 'Refuse':gt 'street'
end

if $ARGS[0] = 'ev40':
	cla
	*clr
	minut += 30
	klofQW += 1
	db += 1
	bj += 1
	vagina += 2
	'<center><img src="images/klof/klof33.jpg"></center>'
	'Jora and Senja in Two Smoking Barrels hammering you in the pussy.'
	horand = rand(1, 100)

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

	act 'Get up and get dressed':gt 'klofdomhouse', 'ev41'
end

if $ARGS[0] = 'ev41':
	cla
	*clr
	money += 5000
	'<center><img src="images/klof/klof 3.JPG"></center>'
	'You got dressed and cleaned up.'
	'To you Zhorik approached and said, "You''re like the boss, he told you to come tomorrow after 10 in the pool, keep money in swimsuit'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev42':
	cla
	*clr
	'<center><img src="images/klof/klof 3.JPG"></center>'
	'You look around and notice the crowd ZHoru'
	'It is suitable to you and says, "Come on baby swim"'

	act 'Go swimming.':gt 'klofdomhouse', 'ev43'
	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev43':
	cla
	*clr
	'<center><img src="images/klof/bas.jpg"></center>'
	'You dress up in a swimsuit and waiting at the entrance ZHoru'
	'Jora takes place in a swimming pool talking to you, ''Lie down until <<$name>> wait until more people gather "'

	act 'Lie down beside the pool':gt 'klofdomhouse', 'ev44'
	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev44':
	cla
	*clr
	minut += 30
	'<center><img src="images/klof/bas1.jpg"></center>'
	'You lay around the pool, the pool is filled with people'
	'Jora swims up to you ordered, "Take off your clothes in front of the crowd"'

	if sub > 0:act 'Hesitantly remove bra':gt 'klofdomhouse', 'ev45'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev45':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas3.jpg"></center>'
	'You lower a little strap'
	'<center><img src="images/klof/bas2.jpg"></center>'
	'You lower a little cup'
	'<center><img src="images/klof/bas4.jpg"></center>'
	'You are standing in water conceal chest burning with shame'

	'Jora says with a grin, "Show the people hunting them chest entertainment"'

	if sub > 5:act 'Remove hands':gt 'klofdomhouse', 'ev46'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev46':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas5.jpg"></center>'
	'Do you give your hands from the chest around you starts to gather a crowd of men'
	'<center><img src="images/klof/bas6.jpg"></center>'
	'You picturesquely crank arms behind his head'
	'Jora ordered:"subtended panties"'

	if sub > 10:act 'To go into the water removing panties':gt 'klofdomhouse', 'ev47'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev47':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas7.jpg"></center>'
	'You go down into the water, the people around you more'
	'<center><img src="images/klof/bas8.jpg"></center>'
	'You shoot panties in water'
	'Jora ordered:"Come out and show yourself to all"'

	if sub > 15:act 'Out of the water':gt 'klofdomhouse', 'ev48'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev48':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas9.jpg"></center>'
	'You picturesquely out of the water'
	'<center><img src="images/klof/bas10.jpg"></center>'
	'And go to the edge of the pool, there is a crowd around you guys excited'
	'Jora ordered:"Spread your legs"'

	if sub > 20:act 'Spread her legs':gt 'klofdomhouse', 'ev49'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev49':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas11.jpg"></center>'
	'You push the legs, the crowd whooped'
	'<center><img src="images/klof/bas12.jpg"></center>'
	'Excitement you heat covers you go into the water and relax'
	'Jora ordered:"Spread your lips"'

	if sub > 25:act 'Push the sponge':gt 'klofdomhouse', 'ev50'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev50':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas13.jpg"></center>'
	'You push the legs, hands and dip disclose your vagina'
	'Most men opened mouth'
	'Jora ordered:"play with themselves"'

	if sub > 30:act 'Caressing her pussy':gt 'klofdomhouse', 'ev51'

	act 'Send it':gt 'street'
end

if $ARGS[0] = 'ev51':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas14.gif"></center>'
	'You are so excited that not oraschaya attention to the crowd start to pull at your girl'
	'Most men opened mouth'

	act 'Come':gt 'klofdomhouse', 'ev52'
end

if $ARGS[0] = 'ev52':
	cla
	*clr
	minut += 5
	orgasm += 1
	horny = 0
	'<center><img src="images/klof/bas15.gif"></center>'
	'Within a few minutes you covered wild orgasm'
	'Crowd of men standing in complete shock'
	'Jora Didelot hands you and says, "insert it yourself"'

	act 'Insert Didlo':gt 'klofdomhouse', 'ev53'
end

if $ARGS[0] = 'ev53':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas16.jpg"></center>'
	'You start planting in your cave Didelot'
	'Jora hands you a second Didelot and says "Insert to the same"'

	act 'Insert second Didelot':gt 'klofdomhouse', 'ev54'
end

if $ARGS[0] = 'ev54':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas17.jpg"></center>'
	'You nachinaetebez labor stick in the hole in his second Didelot'
	'Jora orders:"Put about one in the ass"'

	act 'Paste in the ass':gt 'klofdomhouse', 'ev55'
end

if $ARGS[0] = 'ev55':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas18.jpg"></center>'
	'Jora takes you and members of your thrusts his fist into the vagina'

	act 'Kajfovat':gt 'klofdomhouse', 'ev56'
end

if $ARGS[0] = 'ev56':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas19.jpg"></center>'
	'Jora raises your pelvis with the words:"Hold my cup ka"'
	'Inserts in you and pours himself a glass of juice'

	act 'Obediently keep glass':gt 'klofdomhouse', 'ev57'
end

if $ARGS[0] = 'ev57':
	cla
	*clr
	minut += 5
	horny += 10
	'<center><img src="images/klof/bas20.jpg"></center>'
	'Jora leisurely drink juice and smiling said:"I Suck dick bitch"'

	act 'Suck Zhora':gt 'klofdomhouse', 'ev58'
end

if $ARGS[0] = 'ev58':
	cla
	*clr
	minut += 5
	bj += 1
	'You take Zhorin member cheek'
	'<center><img src="images/klof/bas21.jpg"></center>'
	'Aroused Jora ordered:"Get in. on my dick"'

	act 'Jump on a limb':gt 'klofdomhouse', 'ev60'
end

if $ARGS[0] = 'ev60':
	cla
	*clr
	minut += 10
	vagina += 1
	sex += 1
	'<center><img src="images/klof/bas 27.jpg"></center>'
	'You furiously springing on Zhorina dick'
	'Jora ready to cum'

	act 'Take charge of a':gt 'klofdomhouse', 'ev61'
end

if $ARGS[0] = 'ev61':
	cla
	*clr
	cumface += 1
	minut += 10
	orgasm += 1
	horny = 0
	'<center><img src="images/klof/bas22.jpg"></center>'
	'You Kochan Zhorina taking a sperm'
	'Zhora gets up and goes into the shower with the words to the crowd:"otderu this damn"'

	act 'Fuck with the crowd':gt 'klofdomhouse', 'ev62'
end

if $ARGS[0] = 'ev62':
	cla
	*clr
	minut += 10
	orgasm += 1
	cumlip += 3
	'<center><img src="images/klof/bas23.jpg"></center>'
	'Not what you''re not realizing fucked by group of men'
	'Someone puts you cancer and plants you ass your dick'

	act 'Fuck with the crowd':gt 'klofdomhouse', 'ev63'
end

if $ARGS[0] = 'ev63':
	cla
	*clr
	minut += 10
	bj += 1
	cumlip += 3
	sex += 1
	orgasm += 1
	cumass += 1
	anal += 1
	anus += 1
	'<center><img src="images/klof/bas24.jpg"></center>'
	'You continue to suck, who then hammer you in the ass'
	'Covers you orgasm, you chuvsvuete that someone''s dick goes into your pussy'

	act 'Fuck with the crowd':gt 'klofdomhouse', 'ev64'
end

if $ARGS[0] = 'ev64':
	cla
	*clr
	minut += 10
	orgasm += 1
	bj += 1
	cumlip += 3
	sex += 1
	orgasm += 1
	cumass += 1
	anal += 1
	anus += 1
	'<center><img src="images/klof/bas25.jpg"></center>'
	'Fuck you and end up in all the cracks. Orgasm you covered'

	act 'Get up and dress swimsuit':gt 'klofdomhouse', 'ev65'
end

if $ARGS[0] = 'ev65':
	cla
	*clr
	money += 200
	'<center><img src="images/klof/bas26.jpg"></center>'
	'You odelis swimsuit rose and rested on the column. Your arms and legs were shaking and pussy and ass itched unbearably'
	'Jora came out of the locker room and said, "Well, we''ll show staged here, boss delighted!"'
	'Even-handed on TV, keep the money and a business card with his address.'

	act 'Go home':gt 'street'
end

!!Jesus, what hueta, I cried tears of blood

--- klofdomhouse ---------------------------------
# lake
if $ARGS[0] = 'start':
	cla
	clr
	*clr

	if lakeonce = 0:lakeonce = 1 & minut += 60

	gs 'stat'
	gs 'time'

	'<center><b><font color="maroon">Lake</font></b></center>'
	'<center><img src="images/etogame/lake2.jpg"></center>'

	'A large lake located in the city is a favorite destination of residents in the summer.'

	if car > 0 and cardrive = 4:
		cardrive = 4
		'At the lake stands <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
	end

	if nastjaqw = 3 and temper >= 20 and bikini > 0 and hour >= 6 and hour <= 20:'You hand waving from <a href="exec:gt ''nastja'', ''pos14''">Anastasia</a>.'

	if temper >= 20 and bikini > 0 and hour >= 6 and hour <= 20:
		'Next is <a href="exec:gt ''lake'', ''aquapark''">Water attractions</a>.'
		'And, you can <a href="exec:gt ''lake'', ''horse''">ride a horse</a>'
		'And there''s even a couple of kilometers <a href="exec:gt ''Nudelake''">nude beach</a>'
		'Also you can sunbathe or swim.'

		act 'Walk on the beach':
			cls
			minut += 60
			gs 'stat'
			'<center><img src="images/img/lake/lake.jpg"></center>'
			'You walk along the shore.'
			walkrand = rand(0, 100)

			if walkrand >= 50 and walkrand < 60:gt 'lake', 'walklake1'
			if walkrand >= 60 and walkrand < 70:gt 'lake', 'walklake2'

			act 'Finish':gt 'lake', 'start'
		end

		act 'Swim (1:00)':
			cla
			*clr
			cumpussy = 0
			cumbelly = 0
			cumass = 0
			cumlip = 0
			cumface = 0
			cumfrot = 0
			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 'Out of the water':gt 'lake', 'start'
		end

		act 'Sunbathe (1:00)':
			cla
			*clr
			minut += 60
			sweat += 1
			manna += 5
			'<center><img src="images/pics/zagar.jpg"></center>'

			if krem = 0:
				tan += 1
				'You went to the beach to sunbathe.'
			else
				krem -= 1
				tan += 3
				'You smeared body sunblock and went to sunbathe.'
			end

			evrand = rand(0, 100)

			if evrand > 50:
				act 'Rise from the beach':gt 'lake', 'start'
			elseif evrand <= 30 and andrei > 0:
				act 'Rise from the beach':gt 'lake', 'start'
			elseif evrand <= 30 and andrei = 0:
				anreirape = 1
				'You fell asleep on the beach while sunbathing. You dreamed that someone caresses your chest. Your nipples hardened, high breasts rising from deep breaths. Outlined the aura of something wet on the breast, and you moan sweetly.'
				'Strong hand stroked the folds on your body, from which the whole body covered goose, and suddenly his finger slipped through overgrown fuzz barely pierces folds sexual sponges and touched some incredibly pleasant point. Your body is thrown into a fever, back sweet shiver ran, and below all moistened. Already feeling that pleasure comes reality and not a dream, but still unable to overcome the sleepy bliss and open your eyes, you have spread her legs wide, yielding a seductive caress. When cheeky finger dipped your juices, easily penetrated into your bosom, you even had to wonder, natural feeling. Finger movement led you into a kind of trance, you are already in full voice moaned, wriggling under the hot sun. And then when you thought something was about to happen, a feeling of fullness left you.'

				act 'Open your eyes':
					cla
					*clr
					'Opening his eyes, you saw a shadowy figure unshaven men lustfully staring at you. You become uncomfortable - you''re lying naked in front of a stranger, and even all moaning and current as the latest slut and scary - no one on the beach, because he can do with you whatever he wants!'
					'All these thoughts flashed through your mind as a man pulling off her shorts. You looked with horror at the exposed his penis, before you he seemed huge.'

					act 'Jump ':
						cla
						*clr
						'You tried to jump but were immediately pressed his strong hands to his hairy chest.'

						act 'Knee hit him in the balls':
							cla
							*clr
							andrei = 1
							'You very accurately poked his knee in the balls, he screamed and let you down.'

							act 'Rise from the beach':gt 'lake', 'start'
						end

						act 'Escape from the clutches':
							cla
							*clr
							andrei = 2
							anreiday = day
							guy += 1
							anal += 1
							anus += 1
							cumass += 1
							horny = 20
							orgasm += 1
							'<center><img src="images/picVA/andreiA.jpg"></center>'
							'You began to break out of his grasp, but elozanie led to the fact that he was even more excited and hugged her hard cock to your heated sun tender thigh.'
							'The stranger turned you on his stomach and began to wet his saliva your elastic anus.'
							'He spread his force your buttocks, the maximum opening quivering hole, crushing you with its heavy body. You blinked, escaped from your throat wheezing pain when hard cock began to enter into your inner sanctum. No you did not feel pleasure, only acute pain ebbs, his aversion to the rapist and the feeling that you are using, as a whore. Here, his fingers casually touched your womb, and you caught the wave of lust. Over and over again as if you punched through a huge cock your abuser, and you podmahivat him, and could not hold back the sweet moans.'

							act 'More, more, more, more...':
								cla
								*clr
								'<center><img src="images/picVA/andrei.jpg"></center>'
								'More, more, more, more ... pounding in your temples simultaneously with each thrust. Your clitoris turned into bare wire seemed to have a moment - and you explode. Man changed positions - now you''re sitting in an upright position, nasazhivayas already own on his fat cock with one hand, he continued stimulation of your clitoris and the other fiercely squeezed one, then another soft supple breasts, painfully squeezing between your fingers lumps nipples.'
								'Here, at last, your body has received a long-awaited discharge, you have a few seconds of inertia continued to bounce on his rapist, and then he will cast a dull growl in your plump ass hot spicy ropy streams of sperm.'
								'- Well, I liked it, Aphrodite? - With a touch of irony, the man asked.'

								act 'What''s your name?':
									cla
									*clr
									'- What is your name? - You own question seemed the most stupid, but the word, as they say, not a sparrow ...'
									'- Andrew - he grinned.'
									'And yours?'
									'<<$name>> answered you -'
									'I can see that you liked our game. Want to catch an even bigger thrill? - Come back tomorrow, - said Andrei suavely dressing - repeat our deeds.'

									act 'Rise from the beach':gt 'lake', 'start'
								end
							end
						end
					end
				end
			elseif evrand <= 40 and evrand > 30:
				gt 'lake', 'vlake1'
			elseif evrand <= 50 and evrand > 40:
				gt 'lake', 'vlake2'
			end
		end

		if anreiday ! day and andrei = 2:
			'You see on the beach Andrew.'

			act 'Approach to Andrew':gt 'lake', 'andrey1'
		end
	end

	act 'Leave':
		cla
		lakeonce = 0
		minut += 60
		gt 'street'
	end
end

if $ARGS[0] = 'aquapark':
	minut += 5
	cls
	gs 'stat'
	'<center><img src="images/img/Lake/aquapark.jpg"></center>'
	'You came to the attractions.'
	'There is <a href="exec:gt ''lake'', ''gidro''">Jet Ski</a>, <a href="exec:gt ''lake'', ''banan''">banana</a> and <a href="exec:gt ''Lake'', ''gorka''">slide</a>.'

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

if $ARGS[0] = 'gidro':
	cls
	gs 'stat'
	minut += 1
	'<center><img src="images/img/Lake/aquapark.jpg"></center>'
	'You came to ski.'
	'Tour price 100 rubles.'

	if money >= 100:
		act 'Go for a ride (100 rubles)':
			manna += 10
			willpower += 10
			money -= 100
			cls
			minut += 30
			'<center><img src="images/img/Lake/gidro.jpg"></center>'
			'You take a jet ski, and start to skate.'
			gidrrand = rand(0, 4)


			if gidrrand = 0:gt 'lake', 'kater1'

			act 'Finish':gt 'lake', 'aquapark'
		end
	end

	act 'Move away':gt 'lake', 'aquapark'
end

if $ARGS[0] = 'banan':
	cls
	gs 'stat'
	minut += 1
	'<center><img src="images/img/Lake/aquapark.jpg"></center>'
	'You came to the banana.'
	'Tour price 100 rubles.'

	if money >= 100:
		act 'Go for a ride (100 rubles)':
			manna += 10
			willpower += 10
			cls
			minut += 30
			money -= 100
			'<center><img src="images/img/Lake/banan.jpg"></center>'
			'You sodites a banana and you ride.'
			banrand = rand(0, 100)

			if banrand >= 80 and banrand < 90:gt 'lake', 'kater2'
			if banrand >= 90:gt 'lake', 'kater3'

			act 'Finish':gt 'Lake', 'aquapark'
		end
	end

	act 'Move away':gt 'lake', 'aquapark'
end

if $ARGS[0] = 'gorka':
	cls
	gs 'stat'
	minut += 1
	'<center><img src="images/img/Lake/aquapark.jpg"></center>'
	'You came to the hill.'
	'Tour price of 50 rubles.'

	if money >= 50:
		act 'Go for a ride (50 rubles)':
			manna += 10
			willpower += 10
			cls
			minut += 15
			money -= 50
			'<center><img src="images/img/Lake/gorka.jpg"></center>'
			'You go up the hill and roll down.'

			act 'Finish':gt 'lake', 'aquapark'
		end
	end

	act 'Move away':gt 'lake', 'aquapark'
end

if $ARGS[0] = 'horse':
	cls
	gs 'stat'
	minut += 1
	'<center><img src="images/img/Lake/horse0.jpg"></center>'
	'You came to the horses.'
	'Tour price 100 rubles.'

	if money >= 100:
		act 'Go for a ride (100 rubles)':
			manna += 10
			willpower += 10
			cls
			minut += 30
			money -= 100
			'<center><img src="images/img/Lake/horse.jpg"></center>'
			'Sodites you go into the saddle and ride along the lake shore.'
			horserand = rand(0, 100)

			if horserand >= 60 and horserand < 80:gt 'lake', 'horse1'
			if horserand >= 80:gt 'lake', 'horse2'

			act 'Finish':gt 'lake', 'start'
		end
	end

	act 'Move away':gt 'lake', 'start'
end

if $ARGS[0] = 'walklake1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
	'Walking along the beach as you hear someone calling you "Hey beauty come here." You turned around and saw that next to the shore between the trees standing on the threshold of the hut and sits guy.'

	$dinribak = {
		act 'Idiot! (To leave)':
			cls
			minut += 2
			gs 'stat'
			'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
			'You have called this idiot idiot and got ready to leave. The guy said, "Well, maybe I was wrong. And you do not whore and a slut. Slut Hey, you want to earn two thousand?"'

			act 'Leave':gt 'lake', 'start'

			act 'Money in advance!':
				cls
				minut += 2
				gs 'stat'
				'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
				'You hesitating blurted "Money up front!" The guy laughed, "Well, since that would have started! Would say that you''re a whore, and not powdering my brain would of themselves playing schoolgirl virgin." The guy took the money and handed them imposingly you.'

				act 'Leave':gt 'lake', 'start'

				act 'Take the money':
					cls
					minut += 2
					money += 2000

					if ribakSex = 0:ribakSex = 1 & guy += 1

					bj += 1
					sub += 1
					manna = 0
					gs 'stat'
					'<center><img src="images/qwest/sosed/facefuck.jpg"></center>'
					'You took money from a guy and hid them. The guy grinned wickedly "On your knees scum Now I''m so goddamned fuck your face that you will not forget for a long time!" You blushed, but still stood in front of the guy''s lap. He grabbed your face in her hands and spit in your face, then rubbed his hand over his harchek your face. You froze in confusion, but the guy does not stand on ceremony with you and you vognyal his penis in her mouth to the throat. You choked and tears flowed from his eyes. Man growled, "What whore, like it? Such scum like you should enjoy it, you are a dirty whore. Do you like money, then you have to get used to such things." The guy started to fuck you roughly in the mouth, periodically wiping the current out of your nose snot and saliva from his mouth, his hand on your face and occasionally inflicting hefty podschechiny. You almost fainted and expired snot, tears and saliva from the fact that roughly member enters your throat. Your throat was on fire and incessant cramps nausea twisted your body. Time stretched to infinity and you have already started to think that this torment will never end, when the guy pulled his cock out of your mouth.'

					act '...':
						cls
						minut += 2
						sub += 1
						cumface += 1
						cumlip += 1
						facial += 1
						gs 'stat'
						'<center><img src="images/qwest/sosed/facefuck1.jpg"></center>'
						'The guy started to cum on your face, lips, jet flew his semen in your mouth and you feel awful taste of sperm.'

						act 'Watch for Man':
							cls
							minut += 2
							sub += 1
							$ribakName = 'whore'
							gs 'stat'
							'<center><img src="images/qwest/sosed/facefuck1.jpg"></center>'
							'Are you tired of seeing it on the guy. Then taking your hair in the palm, wiped his cock your hair. After that, he rudely told you. "All of a whore. Now you can get out."'

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

		act 'Come closer':
			cls
			minut += 2
			gs 'stat'
			'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
			'You hesitantly moved closer to the guy and he quickly grabbed you by the wrist literally poddtaschil yourself. "Come on baby, do not fuck the brain, we both know that you want to try to horror my dick taste. So do not be shy."'

			act 'Break and run':gt 'lake', 'start'

			act 'Stand in front of a guy on his knees':
				cls
				minut += 2

				if ribakSex = 0:ribakSex = 1 & guy += 1

				bj += 1
				sub += 1
				gs 'stat'
				'<center><img src="images/qwest/sosed/big.jpg"></center>'
				'You knelt in front of a guy and your face was in front of his big cock. Impatient guy slapped you dickhead nose. "What mnesh boobs? Starts to suck!" With these words, the guy grabbed you by the hair and buried his face in your own dick, you do not understand how it happened, but his head was hot inside your mouth. The guy taking your head in my hands began to stick your face on your hefty dick. His head rested on a regular basis in your throat, sometimes causing retching and salivation. Suddenly the man sharply pushing hips to meet your face drove his cock in your throat. You eyes widened from the realization that this huge body went into your throat. You rested her hands on her hips Man trying to escape from the trap and breathe. Finally the guy let your head allowing you to remove a member from the throat and rest. But how long the guy did not wait, and again taking your hair began to pull your face on his penis. Suddenly the man pulled out his penis out of your mouth and began to masturbate in front of your face while you''re trying to catch my breath, "Open your fucking mouth, " growled at you kid "and stick your own language."'

				act 'Open your mouth and stick out tongue':
					cls
					minut += 2
					sub += 1
					cumface += 1
					cumlip += 1
					facial += 1
					gs 'stat'
					'<center><img src="images/qwest/sosed/cum.jpg"></center>'
					'You obediently opened his mouth and put the language. Immediately slapped you in the face jet of sperm. Then another and another, covering your face with sperm. The sperm gets into your mouth and you feel its nasty taste.'

					act 'Watch for Man':
						cls
						minut += 2
						sub += 1
						swallow += 1
						gs 'stat'
						'<center><img src="images/qwest/sosed/cumeat.jpg"></center>'
						'In your face dripping semen, you feel no taste in your mouth and look at the guy. The guy smiled and finger collected some sperm from your face. Then he put his finger in your mouth causing lick sperm. When his finger was clean, he gathered the remnants of sperm on your face on my finger and stuck it back in your mouth. Once again you sobsosali his finger and swallowed cum.'

						act 'Watch for Man':
							cls
							minut += 2
							sub += 1
							$ribakName = 'lowered whore'
							gs 'stat'
							'<center><img src="images/qwest/sosed/spit.jpg"></center>'
							'The guy suddenly thrust your fingers of both hands in his mouth and your lips apart with relish spat in your mouth. You flinch from this and feel like your cheeks blush with shame floods. The guy looked at you angrily, "You lewd, vile creature and got what she deserved. Now get out!"'

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

				act 'Try to remove the person':
					cls
					minut += 2
					cumface += 1
					$ribakName = 'whore'
					gs 'stat'
					'<center><img src="images/qwest/sosed/cum1.jpg"></center>'
					'You tried to dodge, but the guy grabbed you by the hair and began to get a jet of sperm on your face. Finally dried up and the guy said, "Get out of here bitch!"'

					act 'Leave':gt 'lake', 'start'
				end
			end
		end
	}

	if ribakSex = 0:
		act 'Leave':gt 'lake', 'start'

		act 'Step up':
			cls
			minut += 2
			gs 'stat'
			'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
			'You came to the guy with a fishing rod. He looked lustfully and imposingly you from head to toe.'

			act 'Leave':gt 'lake', 'start'

			if vnesh < 15:
				'The guy smiled and began to hum "Well Well you''re so terrible."'
			elseif vnesh >= 15 and vnesh < 30:
				'Look around you man grinned, "Well, good."'
			elseif vnesh >= 30:
				'Look around you man nodded, "And you did so simpotnaya."'
			end

			if vnesh >= 15:
				act 'What do you want?':
					cls
					minut += 2
					gs 'stat'
					'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
					'You asked what a guy needed. The guy looked again at you with a smirk. "You have written on his face that you blyadushka. Want huytsa delicious nap?"'

					act 'How dare you? (Troubled)':
						cls
						minut += 2
						gs 'stat'
						'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
						'You rebelled so brazen statements. What guy just became wider grin. "Come on. Do not worry. I love whores." After these words the man unbuttoned his pants and pulled out a hefty term in which it was clearly not less than 25 centimeters. "Come on baby, look what the Pope has snacks for your goddamned mouth." Man beckoned you to my finger.'
						dynamic $dinribak
					end

					act 'What? (Wonder)':
						cls
						minut += 2
						gs 'stat'
						'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
						'Were you surprised of such impudence. Guy just grinned wider. "You''re even more udivishsya seeing this!" With these words the man unbuttoned his pants and pulled out a hefty term in which it was clearly not less than 25 centimeters. "Come on baby, look what the Pope has snacks for your goddamned mouth." Man beckoned you to my finger.'
						dynamic $dinribak
					end

					act 'hmm (thinking)':
						cls
						minut += 2
						gs 'stat'
						'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
						'You think for a second. Guy just grinned wider. "I knew you''d damn, just looking at you, I have a nose for whores missing on sturdy dick." With these words the man unbuttoned his pants and pulled out a hefty term in which it was clearly not less than 25 centimeters. "Come on baby, look what the Pope has snacks for your goddamned mouth." Man beckoned you to my finger.'
						dynamic $dinribak
					end
				end
			end
		end
	elseif ribakSex > 0:
		'You went to the guy who told you. Hi <<$ribakName>>delicious huytsa want?'

		act 'Leave':gt 'lake', 'start'

		if $ribakName = 'whore':
			act 'Two pieces!':
				cls
				minut += 2
				gs 'stat'
				'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
				'You told the guy "Two things forward and money!" The guy grinned "Gonna make money whoring, get ready to drink the cup of humiliation to the dregs." The guy took the money and handed them imposingly you.'

				act 'Leave':gt 'lake', 'start'

				act 'Take the money':
					cls
					minut += 2
					money += 2000
					ribakSex += 1
					bj += 1
					sub += 1
					manna = 0
					gs 'stat'
					'<center><img src="images/qwest/sosed/facefuck.jpg"></center>'
					'You took money from a guy and hid them. The guy grinned wickedly "On your knees scum Now I''m so goddamned fuck your face that you will not forget for a long time!" You blushed, but still stood in front of the guy''s lap. He grabbed your face in her hands and spit in your face, then rubbed his hand over his harchek your face. You froze in confusion, but the guy does not stand on ceremony with you and you vognyal his penis in her mouth to the throat. You choked and tears flowed from his eyes. Man growled, "What whore, like it? Such scum like you should enjoy it, you are a dirty whore. Do you like money, then you have to get used to such things." The guy started to fuck you roughly in the mouth, periodically wiping the current out of your nose snot and saliva from his mouth, his hand on your face and occasionally inflicting hefty podschechiny. You almost fainted and expired snot, tears and saliva from the fact that roughly member enters your throat. Your throat was on fire and incessant cramps nausea twisted your body. Time stretched to infinity and you have already started to think that this torment will never end, when the guy pulled his cock out of your mouth.'

					act '...':
						cls
						minut += 2
						sub += 1
						cumface += 1
						cumlip += 1
						facial += 1
						gs 'stat'
						'<center><img src="images/qwest/sosed/facefuck1.jpg"></center>'
						'The guy started to cum on your face, lips, jet flew his semen in your mouth and you feel awful taste of sperm.'

						act 'Watch for Man':
							cls
							minut += 2
							sub += 1
							$ribakName = 'whore'
							gs 'stat'
							'<center><img src="images/qwest/sosed/facefuck1.jpg"></center>'
							'Are you tired of seeing it on the guy. Then taking your hair in the palm, wiped his cock your hair. After that, he rudely told you. "All of a whore. Now you can get out."'

							act 'Leave':gt 'lake', 'start'
						end
					end
				end
			end
		elseif $ribakName ! 'whore':
			act 'Stand in front of a guy on his knees':
				cls
				minut += 2
				ribakSex += 1
				bj += 1
				sub += 1
				gs 'stat'
				'<center><img src="images/qwest/sosed/big.jpg"></center>'
				'You knelt in front of a guy and your face was in front of his big cock. Impatient guy slapped you dickhead nose. "What mnesh boobs? Starts to suck!" With these words, the guy grabbed you by the hair and buried his face in your own dick, you do not understand how it happened, but his head was hot inside your mouth. The guy taking your head in my hands began to stick your face on your hefty dick. His head rested on a regular basis in your throat, sometimes causing retching and salivation. Suddenly the man sharply pushing hips to meet your face drove his cock in your throat. You eyes widened from the realization that this huge body went into your throat. You rested her hands on her hips Man trying to escape from the trap and breathe. Finally the guy let your head allowing you to remove a member from the throat and rest. But how long the guy did not wait, and again taking your hair began to pull your face on his penis. Suddenly the man pulled out his penis out of your mouth and began to masturbate in front of your face while you''re trying to catch my breath, "Open your fucking mouth, " growled at you kid "and stick your own language."'

				act 'Open your mouth and stick out tongue':
					cls
					minut += 2
					sub += 1
					cumface += 1
					cumlip += 1
					facial += 1
					gs 'stat'
					'<center><img src="images/qwest/sosed/cum.jpg"></center>'
					'You obediently opened his mouth and put the language. Immediately slapped you in the face jet of sperm. Then another and another, covering your face with sperm. The sperm gets into your mouth and you feel its nasty taste.'

					act 'Watch for Man':
						cls
						minut += 2
						sub += 1
						swallow += 1
						gs 'stat'
						'<center><img src="images/qwest/sosed/cumeat.jpg"></center>'
						'In your face dripping semen, you feel no taste in your mouth and look at the guy. The guy smiled and finger collected some sperm from your face. Then he put his finger in your mouth causing lick sperm. When his finger was clean, he gathered the remnants of sperm on your face on my finger and stuck it back in your mouth. Once again you sobsosali his finger and swallowed cum.'

						act 'Watch for Man':
							cls
							minut += 2
							sub += 1
							$ribakName = 'lowered whore'
							gs 'stat'
							'<center><img src="images/qwest/sosed/spit.jpg"></center>'
							'The guy suddenly thrust your fingers of both hands in his mouth and your lips apart with relish spat in your mouth. You flinch from this and feel like your cheeks blush with shame floods. The guy looked at you angrily, "You lewd, vile creature and got what she deserved. Now get out!"'

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

				act 'Try to remove the person':
					cls
					minut += 2
					cumface += 1
					$ribakName = 'whore'
					gs 'stat'
					'<center><img src="images/qwest/sosed/cum1.jpg"></center>'
					'You tried to dodge, but the guy grabbed you by the hair and began to get a jet of sperm on your face. Finally dried up and the guy said, "Get out of here bitch!"'

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

		!'
		act '"Just between your legs?"':
			cla
			*clr
			dynamic $venerasiak
			slutty += 1
			guy += 1
			'<center><img src="images/img/Lake/walk1/walk1.jpg"></center>'
			'"Only between the legs?" ask you to understand that it offers'
			'"I was just there and catch, but you told me to start rod mouth polish" the guy said, rastegivaya pants and releasing his rod into the wild.'

			act 'Polished rod':
				cla
				*clr
				bj += 1
				'<center><img src="images/img/Lake/walk1/walk2.jpg"></center>'
				'You sat down next to him and lowered his head to his cock began to suck. A few minutes later the guy pulled you from a member of "All right enough poliruesh well."'

				act 'I tried':
					cla
					*clr
					sex += 1
					'<center><img src="images/img/Lake/walk1/walk3.jpg"></center>'
					'The guy climbed, You turned and swung cancer went into your vagina, you screamed in pain.'
					'"Well, Fishing is not easy, Needless to suffer" said the man with the power of continuing to fuck your pussy. And you have only squeaked with every jolt.'

					act '"Ay-ay-ay"':
						cla
						*clr
						cumbrest += 1
						money += 2000
						'<center><img src="images/img/Lake/walk1/walk4.jpg"></center>'
						'At the end of man shivered and tensed abruptly pulled his dick out of you, expanding you to her face filled your chest with his sperm.'
						'"This is for you food for fish." he said with a smile.'
						'"And it is that they were gold" said the guy handing you money'

						act 'Leave':gt 'lake', 'start'
					end
				end
			end
		end
		'!
	end
end

if $ARGS[0] = 'walklake2':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/walk2/walk1.jpg"></center>'

	if StasikValera = 0:'You got hot and decided to freshen up a bit, you went into the water, turning you notice not far two men looking at you.'
	if StasikValera > 0:'You got hot and decided to freshen up a bit, you went into the water, turning you notice not far Stasik and Valera looking at you.'

	act 'Leave':gt 'lake', 'start'

	$din_stasValera4 = {
		act 'Relax':
			cls
			minut += 2
			horny += 20

			if StasikSex = 0:StasikSex = 1 & guy += 1
			if ValeraSex = 0:ValeraSex = 1 & guy += 1

			StVaGang = 1
			gang += 1
			gs 'stat'
			'<center><img src="images/qwest/sosed/lake.jpg"></center>'
			'You are relaxed and began to enjoy the caress breasts and pussy.'
			$boy = 'Stasik'
			dick = 15
			silavag = 1
			pose = 0
			dynamic $sexstart
			'You felt like a body Stasik expanded the your feet and that it boils down to your hard soft pussy.'
			dynamic $sexstart2
			'While you fucked Stasik, Valera slumped to your face and your uper standing member in your lips.'
			dick = 17
			bj += 1
			dynamic $dinrandbj
			dynamic $sexcum
			'Valera lipped groaned and shuddered his cock in your mouth.'
			swallow += 1
			cumlip += 1
			cumface += 1
			dynamic $dinrandswallow

			act 'Further':
				cls
				minut += 2
				gs 'stat'
				'Tired men dismounted and began to pull you over clothes. Stasik helped you get back on your feet, "You cool the girl <<$name>>, we let you carry home."'

				act 'Do not, I myself as anything':
					cls
					minut += 2
					gs 'stat'
					'You refused and Stasik shrugged, "Well, as you know."'

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

				act 'I do not mind':
					cls
					minut += 5
					cumface = 0
					StasValeraKnow = 1
					gs 'stat'
					'Boys waited until you bring yourself up and went to the side of your house. Along the way the guys kept silent and even more sprightly Stasik not really thought what can be said in such a situation. Finally you stopped before the door of your apartment. And saying goodbye to you guys gone.'

					act 'Leave':gt 'korr'
				end
			end
		end
	}

	$din_stasValera3 = {
		act 'Further':
			cls
			minut += 2
			horny += 20
			gs 'stat'
			'You are relaxed and began to enjoy the sensations in your chest arising from touching Stasik. Man honed movement lowered the cup bra freeing your breasts. You do not have time to blink as your lips Stasik covered nipple.'

			act 'Hey! What are you doing?':
				cls
				minut += 2
				gs 'stat'
				'You jumped to their feet adjusting bra. Stasik smiled, "Do not be afraid of a girl."'

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

			act 'Feebly protest':
				cls
				minut += 2
				horny += 20
				gs 'stat'
				'You tried to pull her bra back and whispered, "Do not!" Stasik smiled, "Do not be shy girl."'
				dynamic $din_stasValera4
			end

			act 'Be silent':
				cls
				minut += 2
				horny += 30
				gs 'stat'
				'You get comfortable enjoying the way skillfully Staik sucking your breast, his hands began to passionately caress your body. His strong fingers penetrated into your panties and began to caress your pussy.'
				dynamic $din_stasValera4
			end
		end
	}

	$din_stasValera2 = {
		act 'Remove hands from himself Stasik':
			cls
			minut += 2
			gs 'stat'
			'You angrily removed his hands from his body Stasik. Stasik grinned "C''mon baby, relax."'

			act 'Rebel and go':
				cls
				minut += 2
				gs 'stat'
				'You angrily stood up and began to leave. Stasik got to his feet and began to persuade you to go with the guys in the cafe.'

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

			act 'Keep silent':
				cls
				minut += 2
				horny += 20
				gs 'stat'
				'You said nothing and Stasik immediately took advantage of your confusion. His hands gently squeeze your chest and you feel like a pleasant warmth and tenderness of your breasts covered.'
				dynamic $din_stasValera3
			end
		end

		act 'Smile and pretend that nothing is happening.':
			cls
			minut += 2
			horny += 20
			gs 'stat'
			'You started to smile, feeling a touch Stasik excite you. You closed his eyes for a moment and suddenly felt a hand on his chest. You opened your eyes in surprise and saw how completely unflappable Staik squeezes your chest with a dreamy smile on his face.'
			dynamic $din_stasValera3
		end
	}

	$din_stasValera = {
		act '<<$name>>':
			cls
			minut += 2
			gs 'stat'
			'Stasik you answered that your name is <<$name>>. He smiled even wider and said. "Nice to meet you." To you also Valera came and said hello to you. Men settled on the shore near you.'

			act 'Lie on the sand':
				cls
				minut += 2
				horny += 15
				gs 'stat'
				'You lay down on the sand and the men settled on either side of you. Stasik began to tell you that they work with Valera sales representative of a major company, and indeed a very important bird knowledgeable people. Without stopping to chat Stasik put his hand on your stomach and began stroking.'
				dynamic $din_stasValera2
			end

			act 'Sit on the sand':
				cls
				minut += 2
				horny += 15
				gs 'stat'
				'You sat down on the sand and the men settled on either side of you. Stasik began to tell you that they work with Valera sales representative of a major company, and indeed a very important bird knowledgeable people. Without stopping to chat Stasik put his hand on your ass and started stroking.'
				dynamic $din_stasValera2
			end
		end
	}

	if StasikValera = 0:
		act 'Look at them':
			cls
			minut += 1
			StasikValera = 1
			gs 'stat'
			'You looked at the men and noticed they began to whisper among themselves. Then one of the men came up to you. He said smiling "Hey beautiful, I Stasik, and this is my friend Valera. What''s your name?"'
			dynamic $din_stasValera

			act 'I have to go.':
				cls
				minut += 1
				gs 'stat'
				'You''re not going to get acquainted with these fellows and began to leave. Stasik began to persuade you. "Come on, babe. We savages what? We just wanted to talk, and you''re right to be frightened. Might still say, what''s your name?"'
				dynamic $din_stasValera

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

	if StasikSex > 0 or ValeraSex > 0:
		act 'Wave it':
			cla
			*clr
			!!guy += 2
			dynamic $venerasiak
			'<center><img src="images/img/Lake/walk2/walk2.jpg"></center>'
			'Looking directly at them you shoot demostrativno panties and waving to them. Men almost running toward you, you threw off their rest and knelt.'

			act 'Wait':
				cla
				*clr
				bj += 1
				'<center><img src="images/img/Lake/walk2/walk3.jpg"></center>'
				'Men run to you already unbuttoned pants, you dostoete their members alternately sucking then one or the other. One of the men vneterpenii grabs your ass and trying to put the cancer.'

				act 'Doggy-Style':
					cla
					*clr
					sex += 1
					'<center><img src="images/img/Lake/walk2/walk4.jpg"></center>'
					'You have succumbed to him and got cancer, a man with power came into your pussy. And you continued to suck the other, but soon he, too, could not resist and tried to take his dick out of your mouth.'

					act 'Let him go':
						cla
						*clr
						anal += 1
						'<center><img src="images/img/Lake/walk2/walk5.jpg"></center>'
						'As soon as you let go of his cock, he literally pulled you with dildo second man, turned his back and buttocks prepodnyav you nasodil anus on his penis.'

						act 'Beckon second':
							cla
							*clr
							'<center><img src="images/img/Lake/walk2/walk6.jpg"></center>'
							'You are beckoned to the other man, he was not taken aback came up to you and drove his dildo back into your vagina. You felt as their members move within you, rub against each other through the thin partition separating them. Opera on their shoulders and you become prepodnimatsya again sit down on their members have not yet reached the peak of pleasure.'

							act 'Finish':
								cla
								*clr
								cumbrest += 1
								cumlip += 1
								cumface += 1
								'<center><img src="images/img/Lake/walk2/walk7.jpg"></center>'
								'Sated men lowered you down, and began to masturbate on your face, you have opened my mouth and waited patiently. They both finished the Gulf sperm your mouth, face and chest.'

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

if $ARGS[0] = 'vlake1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/Vlake1/vlake1.jpg"></center>'
	'While you are sunbathing on the beach you came campaign of four guys and they began to flirt with you'

	act 'Otshit':gt 'lake', 'start'

	act 'Flirt':
		cla
		*clr
		'<center><img src="images/img/Lake/Vlake1/vlake2.jpg"></center>'
		'Boys perched nearby, they flirt and how to sneak to touch your body and caress it.'

		act 'Otshit':gt 'lake', 'start'

		act 'Relax and enjoy':
			cla
			*clr
			guy += 4
			bj += 1
			dynamic $venerasiak
			'<center><img src="images/img/Lake/Vlake1/vlake3.jpg"></center>'
			'One of the guys gets dick and holds it to your face, you grinned lasciviously and licked it, the other guys got too excited and members. They surrounded you and you kneeling immediately aspirated from four people.'

			act 'Continue to suck':
				cla
				*clr
				kuni += 1
				'<center><img src="images/img/Lake/Vlake1/vlake4.jpg"></center>'
				'One of the guys leaned toward your pussy kissed her and began to lick trying to shove his fingers inside.'

				act 'Move his legs':gt 'lake', 'vlake1cum'

				act 'Relax and enjoy':
					cla
					*clr
					gang += 1
					sex += 1
					anal += 1
					'<center><img src="images/img/Lake/Vlake1/vlake7.jpg"></center>'
					'Noticing that you reacted favorably to his fingers in your vagina, the guy took out his fingers, and their place was taken by his hard cock. Others also decided not to stop blowjob, starting periodically change places.'

					act '"Let twos"':
						cla
						*clr
						'<center><img src="images/img/Lake/Vlake1/vlake8.jpg"></center>'
						'"Let''s two" you said, and did not have time to finish felt like dildo included in your anus. And again spun, then you fall down below the top, but always all your holes were plugged members, it''s crazy like you but you do not want to finish and could not.'

						act 'Finish':gt 'lake', 'vlake1cum'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'vlake1cum':
	cla
	*clr
	gs 'stat'
	cumlip += 1
	cumface += 1
	'<center><img src="images/img/Lake/Vlake1/vlake5.jpg"></center>'
	'Boys began to cum on your face and mouth. You lick cum off dick and swallows it. Finally satisfied guys, dressed and gone, you''re left with is not satisfied.'

	act 'Leave':gt 'lake', 'start'

	act 'Masturbate':
		cla
		*clr
		mastr += 1
		orgasm += 1
		'<center><img src="images/img/Lake/Vlake1/vlake6.jpg"></center>'
		'Left not satisfied, you decide to take matters into their own hands, puts his hand to caress her pussy until orgasm and not nakryvvaet you.'

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

if $ARGS[0] = 'vlake2':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/Vlake2/vlake1.jpg"></center>'
	'Tanning you noticed two naked men walking along the shore from the nude beach.'

	act 'Disregard':gt 'lake', 'start'

	act 'Wave it':
		cla
		*clr
		'<center><img src="images/img/Lake/Vlake2/vlake2.jpg"></center>'
		'Men come up to you, one of them falls sharply in front of you pricks and bites her lips in your second stoke your panties.'

		act 'And push them away':gt 'lake', 'start'

		act 'To kneel':
			cla
			*clr
			guy += 2
			bj += 1
			SUB += 1
			dynamic $venerasiak
			'<center><img src="images/img/Lake/Vlake2/vlake3.jpg"></center>'
			'You go up to her knees, pick up their dildo and suck alternately takes both.'

			act 'Proceed':
				cla
				*clr
				sex += 1
				'<center><img src="images/img/Lake/Vlake2/vlake4.jpg"></center>'
				'One of the men lay down and you continue to suck him lifting up his ass, the second immediately discovered volzovalsya view and put his penis in your wet pussy.'

				act '"Like me, both"':
					cla
					*clr
					anal += 1
					'<center><img src="images/img/Lake/Vlake2/vlake5.jpg"></center>'
					'"Like me, both" you moaned and straddled one of the men, and the second was not deaf to your request and put his cock in your ass.'

					act 'Change position':
						cla
						*clr
						cumassin += 1
						'<center><img src="images/img/Lake/Vlake2/vlake6.jpg"></center>'
						'You planted his anus on a man lying. Second came up to you and keeping your head with one hand began to fuck your mouth, penetrating his dildo deeper and deeper. After a while you feel as hot cum fills your anus and finished with him, the second man got ready to cum in your mouth.'

						act 'Continue to suck':gt 'lake', 'vlake2cum'

						act 'Pull':
							cla
							*clr
							cumface += 1
							'<center><img src="images/img/Lake/Vlake2/vlake7.jpg"></center>'
							'You remove a member from his mouth and the man had finished on your face.'

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

if $ARGS[0] = 'vlake2cum':
	cla
	*clr
	gs 'stat'
	cumlip += 1
	'<center><img src="images/img/Lake/Vlake2/vlake8.jpg"></center>'
	'You continued to suck and soon your mouth filled stream of semen swallowing it you carefully licked his cock, leaving no drop of sperm.'

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

if $ARGS[0] = 'andrey1':
	cla
	*clr
	gs 'stat'
	minut += 30
	'You came to Andrew, he grinned and said, "Let''s go for a swim!"'

	act 'Refuse':gt 'lake', 'start'

	act 'Bathe':
		cla
		anreiday = day
		anreirape = 0
		'<center><img src="images/img/Lake/Andrey1/andrey1.jpg"></center>'
		'- I see the lady agree - predatory Andrew grinned. - Then let''s go for a swim. He caught you in his arms, laughing your inappropriate attempts to cover him from his chest, dropped your hand and lips gently pinched the right nipple. You sigh, and abdomen began to rise warm wave excitation.'
		'You''re a little swimming, resting and relaxing. And now, you already are back on the bedspread, stroking in rhythm of your body relaxing. First, you should excite a man, - he said, pododvinuv his penis to your mouth and bit potershis head on your lips.'

		act 'Open the lips':
			cla
			*clr
			bj += 1
			sex += 1
			'<center><img src="images/img/Lake/Andrey1/andrey2.jpg"></center>'
			'You sever the lips and held his tongue along the barrel, then pulled him into her as they could. Andrew started with gusto fuck you in the mouth. Suddenly your hearing some sob came from nearby bushes. You looked up and saw how the bushes spying on you young man pulls his hand up and down in the groin area.'
			'Andrew also realized that peep behind them, and turned your head so that the observer could see all the details of how the red head appears and disappears in your mouth. You defiantly licked member of the men, then speeding up, then slowing the pace, holding the bridle on his tongue and mouth periodically absorbing his testicles. Where you were born in these instincts, you did not know, but by the reaction of Andrew understood that you''re doing it right.'
			'Finally, Andrew dismissed you from yourself, you knocked on his back and one jerk deep inside your womb. You cringed in pain, but Andrew, without stopping, began to move inside of you. After a couple of minutes you monotonous movements enveloped sweet bliss, and when Andrew became fingers to stimulate your anus, penetrating directly into both holes, you blew on the waves of incredible pleasure. Through narrowed eyelids, you watched as a young man Peeper, breathless, fascinated, as if in a trance, devoured every move.'

			act 'Call boy':
				cla
				*clr
				guy += 1
				cumlip += 1
				cumass += 1
				anal += 1
				'<center><img src="images/img/Lake/Andrey1/andrey3.jpg"></center>'
				'Shy young man came up to you. "Well, what are you waiting briefs descends until the girl against" Andrew threw him, turning you over and pushing your hands buttocks. The young man came from behind and put his penis in your anus. Now two members moved in you as pistons delivering incredible pleasure. Moaning you rode on two terms, until the young man did not finish you on the ass, and Andrew got up and discharged into your mouth.'

				act 'Rise from the beach':gt 'lake', 'start'
			end

			act 'Deeper! Stronger!':
				cla
				*clr
				cumpussy += 1
				'<center><img src="images/img/Lake/Andrey1/andrey4.jpg"></center>'
				'- Deeper, Stronger! - You shouted, do not hesitate to enthusiastically absorbing the whole man. He answered you inarticulate growl escaping from it to the beat of their ragged breathing. Even before the two of you left off, the boy ran away.'

				act 'Rise from the beach':gt 'lake', 'start'
			end
		end
	end
end

if $ARGS[0] = 'kater1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/kater1/kater1.jpg"></center>'
	'Riding on the jet you do too steep turn, throws you in the water, you have swallowed the water and begin to sink. On your happiness you notice the guy on the boat, he pulls you out of the water, and watercraft binds to the boat. After a while, when you catch your breath and comfortable on the foundations of the nose cutters, a guy comes to you'
	'"Well, how are you beautiful, pulled myself together, what about gratitude?" he asks, his hand at the same time you lodge pubis.'

	act 'Sit on the watercraft and leave':gt 'lake', 'start'

	act 'Spread her legs':
		cla
		*clr
		guy += 1
		kuni += 1
		dynamic $venerasiak
		'<center><img src="images/img/Lake/kater1/kater2.jpg"></center>'
		'You push the legs, making it clear that they are ready to thank savior, the guy smiled, introduced his fingers into your vagina and tongue began to caress your clitoris.'

		act 'Give blowjob':
			cla
			*clr
			bj += 1
			'<center><img src="images/img/Lake/kater1/kater3.jpg"></center>'
			'You seat guy lick dildo, bows his lips and start sucking selflessly, in a few minutes you feel like a dick in your mouth starts sodragatsya ready to finish.'

			act 'Continue to suck':gt 'lake', 'kater1cum'

			act 'Stay':
				cla
				*clr
				sex += 1
				'<center><img src="images/img/Lake/kater1/kater4.jpg"></center>'
				'You stay, the guy puts you cancer and gimlet your vagina with your cock.'

				act 'Change position':
					cla
					*clr
					'<center><img src="images/img/Lake/kater1/kater5.jpg"></center>'
					'When he gets tired, you store it, and themselves, jump up on top of him and start jumping on neobezschennom as stallion.'

					act 'Change position':
						cla
						*clr
						orgasm += 1
						'<center><img src="images/img/Lake/kater1/kater6.jpg"></center>'
						'You turn around on it without letting yourself dildo and keep nesschadno impale her pussy on his dildo and now one of you sees a groan of pleasure. Weaken fall out with him.'

						act 'Proceed':
							cla
							*clr
							'<center><img src="images/img/Lake/kater1/kater7.jpg"></center>'
							'Guy povarachivaetsya you to the side and re-enters your pussy, continuing his gimlet her dildo.'

							act 'Change position':
								cla
								*clr
								'<center><img src="images/img/Lake/kater1/kater8.jpg"></center>'
								'Then he takes you up on your feet, lifts one and forcefully inserts his penis into your vagina, you are satisfied and tired hangs on it waiting for him to finish. After a few thrusts he pulls out his dick and lets you, you fall on your knees and the guy puts you in the mouth.'

								act 'Suck':gt 'lake', 'kater1cum'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'kater1cum':
	cla
	*clr
	gs 'stat'
	cumbelly += 1
	cumlip += 1
	cumface += 1
	cumbrest += 1
	'<center><img src="images/img/Lake/kater1/kater9.jpg"></center>'
	'Irruptive flow of sperm in your mouth was on so large that you could not keep your mouth and swallow were filled to the brim, sperm flowed like a cornucopia poured out of your mouth, spread over the chin and fill your chest and stomach.'

	act 'Lick residues':
		cla
		*clr
		'<center><img src="images/img/Lake/kater1/kater10.jpg"></center>'
		'When the stream dried up, distraught as you bathed sperm began to lick the remnants of his cock, savoring every drop.'

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

if $ARGS[0] = 'kater2':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/kater2/kater1.jpg"></center>'
	'Riding on a banana you withheld, throws you in the water, you have swallowed the water and begin to sink. On your happiness you notice the two guys on the boat they gets you out of the water. After a while you catch your breath, relaxed and started to look around. You saw that on the nose are both your savior is bare.'

	act 'Pretending to be asleep until moored':gt 'lake', 'start'

	act 'Approach them':
		cla
		*clr
		guy += 2
		sex += 1
		dynamic $venerasiak
		'<center><img src="images/img/Lake/kater2/kater2.jpg"></center>'
		'You shoot a swimsuit, come to the guys and let not the word, jump up to one of the guys and kiss him passionately, in a second you feel like a member of his risen rests on your buttocks, you take it in your hand and guide in her pussy.'

		act 'Change position':
			cla
			*clr
			anal += 1
			'<center><img src="images/img/Lake/kater2/kater3.jpg"></center>'
			'The guy takes you from your member povarachivaetsya back to him, grabs and lifts the buttocks, your legs throws up, and the guy pressing you to indulge your anus tightens on your dildo. You moan, whether from pain inflicted huge dildo in your ass, whether of pleasure that he gives you, with each thrust you try to take his cock as deep as possible in itself.'
			'"Want deeper?" he asks'

			act '"Yes, deeper, harder!"':
				cla
				*clr
				bj += 1
				'<center><img src="images/img/Lake/kater2/kater4.jpg"></center>'
				'"Yes, deeper, harder!" you shout.'
				'"Well then, hold on, " the guy says, putting you on all fours. He comes into you and shoves his cock so deep in your ass that his balls clap on your buttocks. The second guy who all this time looking at you, coming to poke you in the face by a dick. You grab his cock and start sucking lips.'

				act '"Like both of them."':
					cla
					*clr
					orgasm += 1
					'<center><img src="images/img/Lake/kater2/kater5.jpg"></center>'
					'"Fuck me in the two holes" you shout themselves marveling at his lust, the guys were not included radumyvat and both left their members as deep as they could to. Soon you like provalisis swam before his eyes following whole body trembled, you want something to orgasm this never end'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/Lake/kater2/kater6.jpg"></center>'
						'Realizing that you are satisfied you guys put on the deck, stood side by side and began to masturbate.'

						act 'Turn to one':
							cla
							*clr
							cumlip += 1
							'<center><img src="images/img/Lake/kater2/kater7.jpg"></center>'
							'When one of the guys groaned, you turned to him opening his mouth. And he vyprysnul his seed into your mouth, you swallow it with pleasure.'

							act 'Turn to the second':
								cla
								*clr
								cumface += 1
								'<center><img src="images/img/Lake/kater2/kater8.jpg"></center>'
								'Soon groaned and second, you turned to him, but as soon as you opened your mouth, the guy is dead on your face.'

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

if $ARGS[0] = 'kater3':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/kater3/1.jpg"></center>'
	'Riding on the jet you do too steep turn, throws you in the water, you have swallowed the water and begin to sink. On your happiness you notice the guy on the boat, he pulls you out of the water, and watercraft binds to the boat. After a while, when you catch your breath and comfortable on the foundations of the nose cutters, a guy comes to you'
	'"Well, how are you beautiful, pulled myself together, what about gratitude?" he asked, thrusting his hand while you cowards.'

	act 'Sit on the watercraft and leave':gt 'lake', 'start'

	act 'Spread her legs':
		cla
		*clr
		guy += 2
		kuni += 1
		dynamic $venerasiak
		'<center><img src="images/img/Lake/kater3/2.jpg"></center>'
		'You shoot panties and spreads her legs, man lowers her head to your feet and caressing them with his tongue moving eventually gets to your clitoris.'

		act 'Give blowjob':
			cla
			*clr
			bj += 1
			sex += 1
			'<center><img src="images/img/Lake/kater3/4.jpg"></center>'
			'You seat guy lick dildo, bows his lips and start sucking selflessly until you suck from the depths, a second boat. Seeing this picture, he comes up to you and puts his cock in your pussy.'

			act 'Further':
				cla
				*clr
				anal += 1
				'<center><img src="images/img/Lake/kater3/6.jpg"></center>'
				'You sodites on top of one of them, and the second part of you in the ass.'

				act 'Change position':
					cla
					*clr
					orgasm += 1
					'<center><img src="images/img/Lake/kater3/8.jpg"></center>'
					'You guys are deploying and re-enter as a couple.'

					act 'Change position':
						cla
						*clr
						cumlip += 1
						'<center><img src="images/img/Lake/kater3/11.jpg"></center>'
						'Sated they turn you end up in the mouth.'

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

if $ARGS[0] = 'horse1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/horse1/horse1.jpg"></center>'
	'Riding along the beach you notice the two men on quad bikes, they podehali to you and offered to walk together.'

	act 'Refuse':gt 'lake', 'start'

	act 'Go with them':
		cla
		*clr
		'<center><img src="images/img/Lake/horse1/horse2.jpg"></center>'
		'You spukaetes horse and go along with the men talking about any nonsense.'

		act 'Move on':
			cla
			*clr
			'<center><img src="images/img/Lake/horse1/horse3.jpg"></center>'
			'Suddenly one of the men turns you to his chest and begins to paw at this time the second hugs you from behind, reaching into your panties.'

			act 'And push them away':gt 'lake', 'start'

			act 'Get their members':
				cla
				*clr
				guy += 2
				bj += 1
				dynamic $venerasiak
				'<center><img src="images/img/Lake/horse1/horse4.jpg"></center>'
				'You took them members of his pants, squatted down and began to suck greedily.'

				act 'Fuck me':
					cla
					*clr
					sex += 1
					'<center><img src="images/img/Lake/horse1/horse5.jpg"></center>'
					'"Fuck me" you cried. One of the men lay down and you continue to suck him, the second came from behind and put your pine with desire pussy'

					act 'Change position':
						cla
						*clr
						'<center><img src="images/img/Lake/horse1/horse6.jpg"></center>'
						'You straddle one of the men jumping on it like a horse galloping all a few minutes ago. Second came up to you and started to tease you as a member, then lowering it to you that, you could suck it then picking up forcing you are drawn to him trying to catch his lips.'

						act 'Change position':
							cla
							*clr
							orgasm += 1
							'<center><img src="images/img/Lake/horse1/horse7.jpg"></center>'
							'You jumped from the penis and got on all fours, men crowded around you from different sides of one fucked your vagina, the second thrust into his mouth. You suck at the same time began yarosno podmahivaya hips, you will soon feel that dick in your mouth that''s about to explode.'

							act 'Remove the mouth':
								cla
								*clr
								cumlip += 1
								'<center><img src="images/img/Lake/horse1/horse8.jpg"></center>'
								'You remove a member from his mouth and began stroking his tongue out in a second your efforts were rewarded on stream smermy protruding tongue'

								act 'Suck second':
									cla
									*clr
									'<center><img src="images/img/Lake/horse1/horse9.jpg"></center>'
									'You kneel before the second man had a language from balls to the head and took in the mouth when you suck dick with naslozhdenie man trembled. "Now finish" flashed through your mind'

									act 'Continue to suck':gt 'lake', 'horse1bj'

									act 'Pull':
										cla
										*clr
										cumface += 1
										'<center><img src="images/img/Lake/horse1/horse10.jpg"></center>'
										'You remove a member from his mouth and the man had finished on your face, with the words, "Here''s a baby face cream", you gladly licked the remnants of sperm from his penis.'

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

if $ARGS[0] = 'horse1bj':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/horse1/horse11.jpg"></center>'
	'And the flow of sperm gushed into your mouth, you swallow it purring with pleasure, licking the remnants of his cock and swallowed again'

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

if $ARGS[0] = 'horse2':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/Lake/horse2/horse1.jpg"></center>'
	'When you are riding you caught two men on horseback and offered to walk together.'

	act 'Refuse':gt 'lake', 'start'

	act 'Go with them':
		cla
		*clr
		'<center><img src="images/img/Lake/horse2/horse2.jpg"></center>'
		'You came down from their horses and started walking along the beach talking about any nonsense.'

		act 'Finish the walk':gt 'lake', 'start'

		act 'Touch their pants':
			cla
			*clr
			bj += 1
			guy += 2
			dynamic $venerasiak
			'<center><img src="images/img/Lake/horse2/horse3.jpg"></center>'
			'You touch their pants in the groin, the men looked at each other freeze, then you kneel down and pull out their members begin to caress his tongue smooth transition blowjob.'

			act 'Lie on your back':
				cla
				*clr
				anal += 1
				'<center><img src="images/img/Lake/horse2/horse4.jpg"></center>'
				'Releasing their members, you went to the back of the men odnin prepodnyal you legs and put in the ass, you would not expect this and squealed softly, the second located in your head, trying to shove your dick in her mouth.'

				act 'Take by mouth':
					cla
					*clr
					'<center><img src="images/img/Lake/horse2/horse5.jpg"></center>'
					'You vskhvatili his dick lips and greedily inhaled the'

					act 'Change position':
						cla
						*clr
						sex += 1
						orgasm += 1
						'<center><img src="images/img/Lake/horse2/horse6.jpg"></center>'
						'You sat on one of the men on horseback, the second came from behind to ambush your count you in the anus and strong strokes fucked your ass, you have dark eyes with pleasure, all body trembled and you faced a wave of orgasm. Soon you povstvovali as men began to moan and now explode.'

						act 'Change position':
							cla
							*clr
							'<center><img src="images/img/Lake/horse2/horse7.jpg"></center>'
							'You jumped from members and knelt, men crowded around you from different sides, one finished immediately.'

							act 'Suck second':
								cla
								*clr
								'<center><img src="images/img/Lake/horse2/horse8.jpg"></center>'
								'You turned to the second, his lips wrapped around his cock, but you pulled his cock deeper into himself as a man groaned his cock stiffened ready to pour into your mouth sperm flows'

								act 'Remove the mouth':
									cla
									*clr
									cumface += 1
									cumlip += 1
									'<center><img src="images/img/Lake/horse2/horse9.jpg"></center>'
									'Removing member, you open wide, ready to catch the stream of sperm, a man does not keep you waiting, sperm splattered into your mouth, your obvalakivaya tongue and throat.'

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

--- lake ---------------------------------
# metro
if $ARGS[0] = 'start':
	'<center><b><font color="maroon">Metro station</font></b></center>'

	if $loc = 'street':'<center><b><font color="maroon">Residential area</font></b></center>'
	if $loc = 'down':'<center><b><font color="maroon">Center</font></b></center>'
	if $loc = 'Nord':'<center><b><font color="maroon">Northern region</font></b></center>'

	'<center><img src="images/etogame/metro.jpg"></center>'
	'Subway fare costs 16 rubles.'
	minut += 15
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	if workDisk = 3 and konvert = 1:
		badrand = rand(0, 100)
		if badrand >= 80:konvert = 0
	end

	if money >= 16:
		if $loc ! 'street':
			act 'Go to the <b>residential area</b> (16 rubles)':
				$loc = 'street'
				gt 'metro', 'vagon'
			end
		end

		if $loc ! 'down':
			act 'Go to the <b>center</b> (16 rubles)':
				$loc = 'down'
				gt 'metro', 'vagon'
			end
		end

		if $loc ! 'Nord':
			act 'Go to the <b>northern area</b> (16 rubles)':
				$loc = 'Nord'
				gt 'metro', 'vagon'
			end
		end
	end

	act 'Get off the subway':
		minut += 15
		gt '<<$loc>>'
	end
end

if $ARGS[0] = 'vagon':
	cla
	clr
	money -= 16
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Subway car</font></b></center>'
	if hour < 5 or hour > 10 and hour < 15 or hour > 24:
		'<center><img src="images/etogame/vagon.jpg"></center>'
		'In the car just a few passengers sadly examines advertising in the car.'
	elseif hour >= 5 and hour <= 10 or hour >= 15 and hour <= 24:
		'<center><img src="images/etogame/vagonFull.jpg"></center>'
		'In the car, a lot of people all standing like statues without paying the slightest attention to others.'
		frotrand = rand(0, 100)

		if frotrand >= 90 - (frot * 10) and frot < 3:
			gt 'frot', 'a'
		elseif frotrand >= 90 - (frot * 10) and frot >= 3 and cumfrot = 0 and ski = 1 or frotrand >= 90 - (frot * 10) and frot >= 3 and cumfrot = 0 and glamur = 1:
			tipfrot = rand(0, 1)

			if tipfrot = 0:gt 'frot', 'b'
			if tipfrot = 1:gt 'frot', 'd1'

			!!gt 'frot', 'b'
		elseif frotrand >= 90 - (frot * 10) and frot >= 3 and cumfrot = 0 and ski = 0 or frotrand >= 90 - (frot * 10) and frot >= 3 and cumfrot = 0 and glamur = 0:
			tipfrot = rand(0, 2)

			if tipfrot =0:gt 'frot', 'c'
			if tipfrot =1:gt 'frot', 'd'
			if tipfrot =2:gt 'frot', 'e'
		end
	end

	if sosedQW >= 1:
		if hour = 7 or hour = 15:
			sosedMetroRand = rand(0, 100)

			if sosedMetroRand >= 60 and sosedMetroDay ! day:'You notice in the subway <a href="exec:gt ''TimofeiMetro''">Timothy</a>, your neighbor.'
		end
	end

	if cumfrot > 0 or cumface > 0:
		if hour >= 7 and hour <= 21:
			manna -= 10
			'Several passengers were hatched at you looking at where you cum smeared.'
		end
	end

	act 'Get out of the car':gt 'metro', 'start'
end

--- metro ---------------------------------
# narkopriton
cla
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b>drug houses</b></center>'
'<center><img src="images/etogame/narkopriton.jpg"></center>'
'Crappy apartment where addicts come to inject and buy heroin.'
'Door is opened by a skinny guy with a crazy look. After examining you, he said, "This product is worth apiece."'

act 'Leave':minut += 15 & gt 'street'

if money >= 1000:
	act 'Buy dope and shirnutsya (1,000 rubles)':
		cls
		minut += 5
		money -= 1000
		StrongNarkota += 25
		SNarkTimes += 1
		gs 'stat'
		'You bought some heroin and injected yourself with trembling hands'

		act 'Go away':gt $curloc
	end
elseif money < 1000 and SLomka > 0:
	act 'Persuade to sell you on credit.':
		cls
		minut += 5
		gs 'stat'
		if NarkShmaraTimes > 0:
			'You start to persuade Bobkov to give you a dose on credit, promising to pay back later. But he only grinned wickedly "Yeah, Do you know how many times a day I hear that? I won''t give anything on credit."'

			act 'Leave':gt $curloc

			act 'Beg and promise to do anything for it.':
				cls
				minut += 5
				gs 'stat'
				'You started begging to give you drugs on credit, and promise to do anything for it. He thought a little and then took you by the hand to the next room and said "Get on your knees".'

				act 'Escape':gt $curloc

				act 'Go to the next room.':
					cls
					minut += 5
					gs 'stat'
					bobrand = rand(0, 4)

					if bobrand >= 0 and bobrand < 3:NarkShmaraTimes += 1 & $bobtalk = 'Get on your knees and suck me.' & $bobtext = 'Suck'
					if bobrand = 3:NarkShmaraTimes += 1 & $bobtalk = 'I polish the point.' & $bobtext = 'Lick ass'
					if bobrand = 4:NarkShmaraTimes += 1 & $bobtalk = 'Fuck I do not hunt, but piss would be my pleasure. Get on your knees.' & $bobtext = 'Kneel'

					'You begged Man give you drugs in debt, and promise to do for it whatever you like, little guy thought, after which he took you by the hand led into the room and said "<<$bobtalk>>"'

					act 'Run away':gt $curloc
					act '<<$bobtext>>':gt 'bobka'
				end
			end

			if NarkShmaraTimes > 5:
				act 'Submit to your fate':
					cla
					cls
					over = 8

					'<center><img src="images/qwest/sosed/crackwhore.jpg"></center>'
					'The increasing dependence on drugs and lack of money led to that your will was broken. You are tired of fighting and agreed to the proposal merchant foolishness. You were in the den and turned into heroin whore, paying for housing, food and your body dose.'

					act '...':
						cla
						cls
						'<center><img src="images/qwest/sosed/crackwhore2.jpg"></center>'
						'Your life has changed dramatically. Now your mouth, pussy and ass wholly owned by the owner of a brothel and his friends. The rumor about a new whore, ready for any abomination per dose, quickly spread throughout the area and began to lend Bobka you to everyone for a small amount. At first you tried feebly protest, but you quickly pointed to your site and you dutifully accepted it powerless position.'

						act '...':
							cla
							cls
							'<center><img src="images/qwest/sosed/crackwhore3.jpg"></center>'
							'-"What is the difference in the end? One more by a dick, one less, main shirnutsya time" - you decide, and meekly serving a any, to indicate who the owner of a brothel, dutifully pushing the legs, substituting ass and mouth, as befits this heroin whore.'

							act '...':
								cla
								cls
								'<center><img src="images/qwest/sosed/crackwhore4.jpg"></center>'
								'In those rare moments, when you do not hover in the narcotic intoxication, sometimes you remember the house, family, friends. Past life now seems a surreal.'

								act '...':
									cla
									cls
									'<center><img src="images/qwest/sosed/crackwhore5.jpg"></center>'
									'You fed such hopes studying at school. The teacher spoke of the great potential. I wonder what he would say when he saw you on my knees with a member of the cheek? And your classmates, they learned his girlfriend in this finally descended nipple? But for a long time to reminisce fails, and to the reality you very roughly returns the next dick, which by tradition once unceremoniously they drive you deep into the throat.'
									'You do not even try to resist or help hands, but only a little wider open your mouth and draw out the tongue out. Professional habit. what to do, heroin whores nobody on ceremony. And more, the more gross and perverted things you have to do to earn money for the next dose.'

									act '...':
										cla
										cls
										'<center><img src="images/qwest/sosed/crackwhore6.jpg"></center>'
										'You have long ceased to take care of yourself, from the former beauty was gone, in the face, hair and clothes traces of dried semen, and his mouth all day and night it smells, suction after each rinse your long lazy. Substituting their broken-down holes or taking the cheek once you dick sometimes thinking - "Was there another way?"'

										act '...':gt 'gameover'
									end
								end
							end
						end
					end
				end
			end
		elseif NarkShmaraTimes = 0:
			'You start to persuade Bobkov to give you a dose on credit, promising to pay back later. But he only grinned wickedly "Yeah, Do you know how many times a day I hear that? I won''t give anything on credit."'

			act 'Go away':gt $curloc

			act 'Beg and promise to do for it whatever you like':
				cls
				minut += 5
				gs 'stat'
				'You started begging to give you drugs on credit, and promise to do anything for it. He thought a little and then took you by the hand to the next room and said "Get on your knees".'

				act 'Run away':gt $curloc

				act 'Go into the room':
					cls
					minut += 5
					gs 'stat'
					'You begged Man give you drugs in debt, and promise to do for it whatever you like, little guy thought, after which he took you by the hand led into the room and said "Get on your knees and suck me."'

					act 'Run away':gt $curloc

					act 'Suck':
						cls
						minut += 5
						guy += 1
						bj += 1
						swallow += 1
						NarkShmaraTimes += 1
						cumlip += 1
						gs 'stat'
						dynamic $venerasiak
						'<center><img src="images/qwest/sosed/bj.jpg"></center>'
						'You need so much dope, you flopped down in front of a guy on his knees and began to suck his flaccid penis. Finally. Suddenly. You continued sucking swallowing sperm. Man exhausted and took his penis in your mouth. He tucked his dick in his pants and threw you a syringe.'

						act 'shirnutsya':
							cls
							minut += 5
							StrongNarkota += 25
							SNarkTimes += 1
							gs 'stat'
							'You grabbed the syringe and injected his foolishness itself in a vein shaking hands. Man with a smile looking at you. "By the way my name is Bobkov, and you?" You mumbled through a veil "<<$name>>."'

							act 'Leave':minut += 15 & gt 'street'
						end
					end
				end
			end
		end
	end
end

--- narkopriton ---------------------------------
# bobka

$bobka_bj = {
	'<center><img src="images/qwest/sosed/bj.jpg"></center>'
	$tempval = 'You'
	$tempval2 = ''

	if HaveMetBobka = 1:$tempval = 'You desperately need a fix so you'
	if bobrand = 0:$tempval2 = ' He tucked his dick in his pants and threw you a syringe.'

	'<<$tempval>> dropped down on your knees in front of the guy and started sucking his flaccid penis. His penis started to get erect in your mouth as you actively sucked it. Suddenly you feel a jet of sperm hit you in the mouth. You continued sucking while swallowing sperm. Finally it stopped and he pulled his cock out of your mouth.<<$tempval2>>'
}

$bobka_inject = {
	act 'Inject.':
		cls
		minut += 5
		StrongNarkota += 25
		SNarkTimes += 1
		NarkShmaraTimes += 1
		gs 'stat'
		$tempval = ''

		if narkoman ! 0:$tempval = ' with trembling hands'

		'You grabbed the syringe and injected yourself<<$tempval>>. While <<$tempname>> was looking at you with a smile.'

		if HaveMetBobka = 0:'"By the way I''m Bobka, and you are?" You mumbled "<<$name>>."' & HaveMetBobka = 1

		act 'Leave':minut += 15 & gt 'street'
	end
}

if bobrand = 0:
	minut += 5
	bj += 1
	swallow += 1
	cumlip += 1
	gs 'stat'

	dynamic $venerasiak
	dynamic $bobka_bj
	dynamic $bobka_inject
elseif bobrand = 1:
	minut += 5
	bj += 1
	gs 'stat'

	dynamic $venerasiak
	dynamic $bobka_bj

	act 'Go into doggystyle position':
		cls
		minut += 5
		sex += 1
		$boy = 'Bobka'
		dick = 16
		silavag = 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/doggy.jpg"></center>'
		dynamic $sexstart
		dynamic $sexstart2
		dynamic $sexcum
		'He threw you a syringe.'
		dynamic $bobka_inject
	end
elseif bobrand = 2:
	minut += 5
	bj += 1
	gs 'stat'

	dynamic $venerasiak
	dynamic $bobka_bj

	act 'Go into doggystyle position':
		cls
		minut += 5
		$boy = 'Bobka'
		dick = 16
		silavag = 1
		cumanus += 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/anal.jpg"></center>'
		dynamic $sexstart
		dynamic $analsex
		'Finally <<$tempname>> stops and you feel like your ass filling with warm sperm.'
		'He threw you a syringe.'
		dynamic $bobka_inject
	end
elseif bobrand = 3:
	minut += 10
	gs 'stat'
	$tempval = 'You'
	$tempval2 = ''

	if HaveMetBobka = 1:$tempval = 'You desperately need a fix so you'

	'<center><img src="images/qwest/sosed/rimming.jpg"></center>'
	'<<$tempval>> dropped down on your knees in front of the guy and frozen in indecision. Bobka lay back and lifted his legs pulled up to your face its fifth point said "Come lick already, Hare rebate".'

	act 'Reluctantly licking':gt 'bobka', 'rimming2'
	act 'Carefully lick':gt 'bobka', 'rimming3'
elseif bobrand = 4:
	minut += 5
	pee += 1
	gs 'stat'
	$tempval = 'You'
	$tempval2 = ''

	if HaveMetBobka = 1:$tempval = 'You desperately need a fix so you'

	'<center><img src="images/qwest/sosed/knees.jpg"></center>'
	'<<$tempval>> dropped down on your knees in front of the guy. "If you swallow - Naquin steward top." - grinning offered you Bobka'

	act 'Substitute person':gt 'bobka', 'peeface'
	act 'Open your mouth':gt 'bobka', 'peeswallow'
end

if $ARGS[0] = 'rimming2':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/rimming2.jpg"></center>'
	'You looked at him pleadingly, but do nothing, breaking unbearable and you doomed kneels. Clasping hands buttocks, you are a little bit lit them and slightly tongue hanging out timidly licked his hairy point. From the terrible smell and taste you almost puked, but willpower you discreet and began to drive sluggish tongue around his hole. - «You Th zhopolizka, sleep there? Let''s normal operating your fucking tongue» - He yelled at you, reinforcing its claim slap in the face. Tears gushed out of your eyes and you, fearfully looking up at him, become hard to handle every inch of his dirty ass, do not forget to kiss and suck periodically covered with sweat eggs. «That''s better» - Bobka and grinned suddenly with the force of your face pressed to his ass. «Now zasun his foul language there, where he belongs»'

	act 'Moo and working language.':gt 'bobka', 'rimming4'
end

if $ARGS[0] = 'rimming3':
	cla
	cls
	minut += 5

	'<center><img src="images/qwest/sosed/rimming3.jpg"></center>'
	'understanding, useless to argue that you knelt down and began to polish his hole hard, not forgetting about the neighborhood. You were like a cat, lick his balls. Language quickly tired of this hard work, nasty taste and smell of shit made ​​you wince, but you patiently continued to clean his unwashed hairy mezhduzhopie, not forgetting pripadat juicy lips and kissed each corner. «Ha yes you inborn zhopolizka, seen love this thing» - Bobka laughed and suddenly pressed his face into your own ass. «It''s time for you to stick your dirty language there, where it should be» - grinned Bobka.'

	act 'Moo and working language.':gt 'bobka', 'rimming4'
end

if $ARGS[0] = 'rimming4':
	cla
	cls
	minut += 5
	SUB += 1
	gs 'stat'

	'<center><img src="images/qwest/sosed/rimming4.gif"></center>'
	'Your face is so hard pressed to reeking of sweat and stale than the crotch Bobkov, hair with his pubes intertwined with your nose. Slightly swollen lips flattened ring of sphincter. you choke, plaintively mychite and the last effort diligently pushed her tired tongue in his anus. «I want to, that you thoroughly cleaned me out there, otherwise, then you know that for a long time DO NOT wash, hot water nebilo, and why, when there are zhopolizki» - mockingly said Bobka understanding, nadrachivat continuing his already hard standing member. By throat again drove com nausea, but the idea, you can not get drugs even worse and you, with tears in his eyes, suppressing the urge, courageously continued to move his tongue in the ass. «If only he quickly finished» - Beats you up with the idea, in those moments, when you are with smeared makeup and language in the ass, slurred mychite and pleading look at him from under the eggs.'

	act 'come':gt 'bobka', 'rimming5'
end

if $ARGS[0] = 'rimming5':
	cla
	cls
	minut += 5
	cumlip += 1
	cumface = cumface + 1
	gs 'stat'
	'<center><img src="images/qwest/sosed/rimming5.jpg"></center>'
	'At_Last, unable to bear it with a muffled rattle became abundantly finish, watering your face and hair hearty sperm, you stand in a humiliating position with his eyes closed and his head down. In teeth stuck several hard black hairs. «Hey Shmarev, and who will clean?» - Bobka, poked you flaccid penis under his breath. You meekly took in his mouth and brushed his fallen body, otliza anus after the taste of semen was almost pleasant, and with hope looked at him, waiting dose. «Th such acidic? Get_used_to_it, zhopolizka, heroin whores should not be squeamish». - With these words and nasty smile Bobka you threw a syringe.'
	dynamic $bobka_inject
end

if $ARGS[0] = 'peeface':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/peeface.jpg"></center>'
	'Bobka took his flaccid cock and hot stream of urine dramatically splattered on your face. You''re a little twitch. "Do not you turn away and turn a blind eye, I look into the eyes of a bitch."- he shouted at you'

	act 'Look in your eyes':gt 'bobka', 'peeface2'
end

if $ARGS[0] = 'peeface2':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/peeface2.jpg"></center>'
	'You look in the eyes obediently, trying not to blink and keep your face so, to spray does not impinge on the nose. You hold firmly, ignoring the fluttering across your face spray and disgusting smell. You desperately need a dose. Trickle of urine running down your face, sisechki and form a puddle under you. Finally, you sit . You feel that your entire body impregnated with this disgusting smell, at least the person exactly. In your mind struggles awareness, that you just like pissing torn blotter, one side, breaking buzz and anticipation on the other. Wiping her eyes from splashes you looking forward to Bobkov and stretch from breaking shaking hands behind syringe. '

	act 'streamlined':gt 'bobka', 'peeface3'
end

if $ARGS[0] = 'peeface3':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/peeface3.jpg"></center>'
	'Bobka slowly shakes off the last drops on your face and wipes his penis on your hair. «Well opuschenka, you like a shower? Just right for a heroin whores, how are you. Keep your dose» - grinning and holding a syringe guy says, seeing your status.'

	act 'Grab a syringe':gt 'bobka', 'peewhore'
end

if $ARGS[0] = 'peeswallow':
	cla
	cls
	minut += 5
	money += 100
	water += 10
	'<center><img src="images/qwest/sosed/peeswallow.jpg"></center>'
	'Golden brackish liquid sharply hit you in the mouth, you almost choked and coughed, involuntary grimacing from noxious fumes.'

	act 'Cough':gt 'bobka', 'peeswallow2'
end

if $ARGS[0] = 'peeswallow2':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/peeswallow2.gif"></center>'
	'Bobka wait until you coughed again and open your mouth, and then continued to urinate. Your mouth quickly filled with warm adverse moisture, you take a drink, suppressed a gag reflex, again and then, but the flow has not dried up. From the corner of his mouth and ran down his chin excess, «Slurp every drop, and you will not get money, creature» severely scolded you dope dealer. realizing, do not have time to swallow all, You open your mouth wider, making it in the manner of the urinal. In the mouth you immediately zazhurchal and even seemed to foam bubbles, you''ve done a few sips, and then, his head thrown back, just passed urine flows directly into the stomach, without swallowing. Your stomach filled quickly, and treacherously swollen belly.'

	act 'Diligently to swallow':gt 'bobka', 'peeswallow3'
end

if $ARGS[0] = 'peeswallow3':
	cla
	cls
	minut += 5
	'<center><img src="images/qwest/sosed/peeswallow3.jpg"></center>'
	'Finally, but then shoved in your mouth you dirty flaccid dick, forcing suck the last drops.'

	act 'Take by mouth':gt 'bobka', 'peeswallow4'
end

if $ARGS[0] = 'peeswallow4':
	cla
	cls
	minut += 5

	'<center><img src="images/qwest/sosed/peeswallow4.jpg"></center>'
	'You obediently sucks residues, not grimacing at the taste. Finished brushing member, You pull his hand for a syringe, trying not to think about, for the sake of it, but still diligently all swallowed. Kaif is near. «Enjoyed working urinal? Get_used_to_it, opustehi type for you, this is the most suitable employment» - Laughed Bobka - «Keep your dose and as promised a hundred top».'

	act 'grab a syringe':gt 'bobka', 'peewhore'
end
if $ARGS[0] = 'peewhore':
	cla
	cls
	minut += 5
	StrongNarkota += 25
	SNarkTimes += 1
	NarkShmaraTimes += 1
	gs 'stat'
	'<center><img src="images/qwest/sosed/peewhore.jpg"></center>'
	'Even washing you greedily grabbed a syringe with foolishness and it stuck itself in a vein shaking hands. Man with a smile looking at you.'

	act 'Leave':minut += 10 & gt 'street'
end
--- bobka ---------------------------------
# park
if $ARGS[0] = 'start':
	cla
	*clr
	gs 'parkivent'
	gs 'parkdin'

	$torchki = {
		cls
		gs 'stat'
		gs 'time'
		SNarkPriton = 1
		'The junkies look at you with a daunted gaze. They probably thought you are a police officer. Then one of them said, "We don''t sell no drugs. Go to the Drug House, ye can get zome there."'

		act 'Walk away from them':gt 'park', 'start'
	}

	$sexloc = $CURLOC
	minut += 30
	clr
	gs 'stat'
	gs 'time'
	'<center><b><font color="maroon">Park</font></b></center>'
	'<center><img src="images/etogame/park.jpg"></center>'
	'The central park is huge, sandy paths go into all directions and ever so often you''ll find a bench to sit on. In the summer you''ll see a lot people playing ball, relax or have a picnic in the more open areas, while in the winter you''ll meet families with their children sledding down the humps.'
	'Despite it''s almost paradise-like appearence, the park can be very dangerous once the sun goes down.'
	''
	'There is a sign that points into general direction of the <a href="exec:minut += 47 & gt ''down''">City Center</a>. You estimate the walk to the city center would take about 40 to 50 minutes.'
	'The second sign points into the direction of the <a href="exec:minut += 19 & gt ''street''">Residential Area</a>. If you have to guess, the walk to the residential are should take about 20 minutes.'
	'The third sign says <a href="exec:minut += 59 & gt ''Nord''">Northern District</a> on it and points north, you suppose. You know the Northern District is rahter far away from here, you estimate taht a walk would take almost one hour'
	''

	if SNarkPriton = 0:'Near one of the shops roll <a href="exec:dynamic $torchki">junkies</a>.'

	if car > 0 and cardrive = 5:
		cardrive = 5
		'Stands near the park <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
	end

	if tanga = 0 and ski = 1 and hour > 6 and hour <= 20 or tanga = 0 and glamur = 1 and hour > 6 and hour <= 20:
		nurand = rand(0, 100)

		if nurand >= 80:
			manna -= 5
			SUB += 1
			horny += SUB
			nudity += 1
			'A man walks past you and notices that you didn''t put on any panties. He whistles at you, "Did you forget to put on your underwear today, honey?"'
			'You blush with shame and you try to walk out of his sight as fast as possible.'
		end
	end

	act 'Leave the park':
		cla
		minut += 30
		gt 'street'
	end

	if hour >= 10 and hour <= 22:
		act 'Sit in a Café':
			cla
			*clr
			minut += 30
			gt 'ParkKafe', 'food'
		end
	end

	act 'Walk in the park (1:00)':
		cla
		minut += 60

		if hour > 7 and hour < 21:
			parkrand = rand(0, 20)

			if parkrand < 10 and parkrand > 0:
				dynamic $parkrandivdin
				exit
			end

			if parkrand > 14:
				dynamic $parkrandivdin
				exit
			end
		end

		manna += 10
		willpower += 10
		gs 'stat'
		'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'

		act 'Finish the walk':gt 'park', 'start'
	end

	if pusher = 1 and hour >= 6 and hour <= 21:
		'There''s a drug dealer casually sitting on one of the benches. He''s trying not to be too suspicious.'

		if money >= 2000:
			act 'Buy "Pale Lady" (2,000 rubles)':
				cla
				minut += 10
				palelady = input ("How many doses you want to buy?")

				if palelady * 2000 > money or palelady <= 0:
					'Either tell me how many you want to buy or get lost.'
				else
					money -= palelady * 2000
					dur += palelady
					'You get out your purse and pay him quickly, hoping nobody else saw you giving him money. Then he passes you the doses you''ve paid for and you can savely sniff the stuff at home.'
				end

				act 'Casually walk away':gt 'park', 'start'
			end
		else
			'You do not have enough money, not even for one dose.'
		end
	end

	if sport > 0 and parkrunday ! day:
		act 'Jog through the park (1:00)':
			cla
			*clr
			parkrunday = day
			minut += 30
			manna -= 10
			willpower -= 10
			beg += 1
			fat -= 8
			speed += 1
			sweat += 3
			'<center><img src="images/etogame/parkbeg.jpg"></center>'
			'You randomly take the paths, you run them up and down and about an hour later, you are out of breath and heavily sweating.'

			if hour >= 20:
				parkrand = rand(0, 10)

				if parkrand >= 8:
					'A shade steps out of the shadow from a tree and runs up to you. Before you can react, he hits you and drags you into the bushes. "Relax and enjoy this", he says.'

					act 'Fight':
						cla
						$nameV = 'Rapist'
						!!stats
						strenV = 100
						speedV = 50
						agilV = 40
						reactV = 40
						vitalV = 50
						intelV = 10
						willV = 10
						!!skills
						magikV = 100
						boxingV = 50
						shootV = 100
						!!parameters
						healthV = vitalV * 10 + strenV * 5
						mannaV = intelV * 10 + magikV * 10
						willpowerV = willV * 10
						BonusAtakV = 0
						BonusDefV = 0
						!!Programme of Action
						program = 1
						RapistFight = 1

						if spellavtoklon = 1:klon = 3
						if spellbefshild = 1:defence = 500

						gt 'fight', 'start'
					end

					exit
				end
			end

			act 'Complete jog':gt 'park', 'start'
		end
	end

	act 'Go to the highway near the park':gt 'park', 'whore'
	act 'Go to the fair':gt 'park', 'luna'
end

if $ARGS[0] = 'luna':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	gs 'time'
	'<center><b><font color="maroon">The Fun Fair</font></b></center>'
	'<center><img src="images/etogame/luna.jpg"></center>'
	'The fun fair sits in the hearts of the park and attracts families, people on a vacation and loving couples from all over the town. It''s a popular gathering spot and a place to forget your worries for a few hours.'

	if vladimirQW = 0 and hour >= 9 and hour <= 20 and week > 5 and vnesh > 10:'<a href="exec:gt ''qwloc''">There''s a strong looking man staring at you from the fences.</a>.'


	if hour >= 9 and hour <= 20:
		act 'Distribute flyers to earn money (50 rubles) (1:00)':
			cla
			*clr
			minut += 60
			money += 50
			manna -= 5
			'<center><img src="images/etogame/flaer.jpg"></center>'
			'For an hour straight, you walked through the park and the fun fair, chatting up random visitors and trying to give them one of your flyers. After that you are being paid 50 rubles for your effort.'

			act 'Move away':gt 'park', 'luna'
		end

		if money >= 50:
			act 'Eat Shawarma (50 rubles)':
				cla
				*clr
				minut += 30
				health += 10
				money -= 50
				manna += 5
				willpower += 5
				'<center><img src="images/etogame/luna1.jpg"></center>'
				if energy >= 30:
					fat += 7
					'You can''t eat one more bite.'
				elseif energy >= 20 and energy < 30:
					fat += 5
					energy += 10
					'While you weren''t really hungry, you ate the entire dish of shawarma.'
				elseif energy < 20:
					energy += 20
					fat += 3
					'You are glad you finally got something to eat.'
				end

				act 'Move away':gt 'park', 'luna'
			end

			act 'Drink Lemonade (50 rubles)':
				cla
				*clr
				minut += 30
				health += 10
				money -= 50
				manna += 5
				willpower += 5
				'<center><img src="images/etogame/luna1.jpg"></center>'
				if water >= 20:
					fat += 3
					'You weren''t really thristy, but you still emptied the bottle of lemonade.'
				elseif water < 20:
					fat += 2
					'Finally you got something to drink, even if it''s just a bottle of lemonade.'
					water += 20
				end

				act 'Move away':gt 'park', 'luna'
			end

			act 'Ride on the carousel (50 rubles)':
				cla
				*clr
				minut += 30
				money -= 50

				if will < 30:will += 1
				if will >= 30:will += rand(0, 1)

				willpower += 10
				manna += 10
				'<center><img src="images/pic/karusel.jpg"></center>'
				'You paid 50 rubles and sat in the carousel.'
				'You have a great ride, already dazzled.'

				act 'move_away':gt 'park','luna'
			end
		end

		if money >= 100:
			act 'Shoot some targets (100 rubles)':
				cla
				*clr
				minut += 30
				money -= 100
				'<center><img src="images/etogame/tir.jpg"></center>'
				'You paid 100 rubles for ten bullets. If you are able to hit all targets, you can win a teddy bear.'

				act 'Shoot':
					cla
					tirkoef = agil + shoot
					tirmin = tirkoef * 20 / 100
					tirand = rand(tirkoef - tirmin, tirkoef + tirmin)

					if tirand >= 80:
						mishka += 1
						manna += 5
						'You hit all targets and didn''t even miss once. Congratulations! You''ve won a Teddy Bear.'
					elseif tirand < 80 and tirand >= 70:
						'Oh, you''ve only missed once.'
					elseif tirand < 70 and tirand >= 60:
						'You were able to hit the target eight times, but you''ve missed twice.'
					elseif tirand < 60 and tirand >= 50:
						'You were able to hit the target seven times, but you''ve missed twice.'
					elseif tirand < 50 and tirand >= 40:
						'Six times you were able to hit the target, but you''ve missed four times.'
					elseif tirand < 40 and tirand >= 30:
						'Five times you were able to hit the target, but you''ve missed five times too.'
					elseif tirand < 30 and tirand >= 25:
						'Four times you were able to hit the target, but you''ve missed six times.'
					elseif tirand < 25 and tirand >= 20:
						'Three times you were able to hit the target, but you''ve missed seven times.'
					elseif tirand < 20 and tirand >= 15:
						'You were able to hit the target twice, but you''ve missed it eight times.'
					elseif tirand < 15 and tirand >= 10:
						'You were only able to hit the target once and missed it nine times.'
					elseif tirand < 10:
						'You couldn''t even hit the target once.'
					end

					shoot += 1

					act 'Move away':gt 'park', 'luna'
				end
			end
		end

		if money >= 20:
			act 'Hit the dynamoeter (20 rubles)':
				cla
				*clr
				'<center><img src="images/etogame/silomer.jpg"></center>'
				'You''ve paid 20 rubles to play Ring-The-Bell.'

				act 'Bump':
					cla
					minut += 30
					money -= 20
					stKo = stren * 20/100
					damage = rand(stren - stKo, stren + stKo)

					if stren < 30:stren += 1
					if stren >= 30:stren += rand(0, 1)

					'You swung the hammer as hard as you could, but it wasn''t enough for a new record. A LED screen lights up and shows you your score:<<damage>>'

					if damage > maxdamage:maxdamage = damage & 'Congratulations! You''ve just a new record!'

					act 'Move away':gt 'park', 'luna'
				end
			end
		end

		act 'One-Armed Bandit':gt 'park', 'avtomat'
	end

	act 'Go back to the park':gt 'park', 'start'
end

if $ARGS[0] = 'avtomat':
	cla
	*clr
	clr
	gs 'stat'
	gs 'time'
	'<center><img src="images/etogame/avtomat.jpg"></center>'
	'The rules of the game are very simple, throw 5 rubles into the slot, pull the lever and with a bit of luck you can win the jackpot of 1.000 rubles.'

	if money >= 5 and hour <= 20:
		act 'Throw in 5 rubles and pull the lever':gt 'park', 'avtomat2'
	end

	act 'Move away from the slot machine':gt 'park', 'luna'
end

if $ARGS[0] = 'avtomat2':
	cla
	*clr
	clr
	gs 'stat'
	gs 'time'
	minut += 5
	money -= 5
	avtrand = rand(0, 100)

	if avtrand = 100:
		money += 1000
		'Jackpot! You win 1,000 rubles.'
	elseif avtrand < 100 and avtrand >= 95:
		money += 100
		'You win 100 rubles.'
	elseif avtrand < 95 and avtrand >= 85:
		money += 10
		'You win 10 rubles.'
	elseif avtrand < 85 and avtrand >= 75:
		money += 5
		'You win 5 rubles.'
	elseif avtrand < 75:
		'Unfortunately, you weren''t able to win anything this time.'
	end

	act 'Try your luck once more':gt 'park', 'avtomat'
end

if $ARGS[0] = 'whore':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	gs 'time'
	'<center><b><font color="maroon">The road near the park</font></b></center>'

	if hour >= 16 and hour <= 23:
		'<center><img src="images/etogame/park1.jpg"></center>'
		'Along the roadside <a href="exec:gt ''prostitute'', ''start''">Prostitutes</a> are walking and sometimes picked up by a car.'
	elseif hour >= 4 and hour < 16:
		'<center><img src="images/etogame/glpark.jpg"></center>'
		'Cars passing on the road past the park and there is not seen nothing interesting.'
	else
		! WD: Remove Dupe Images ~ '<center><img src="images/pic/park1.jpg"></center>'
		'<center><img src="images/etogame/park1.jpg"></center>'
		'Cars drive on the road past the park and then not see anything interesting.'
	end

	temp = rand(1, 10)

	if temp > 5 and exhibi > 2:
		act 'Walking in pantyhose':
			cla
			*clr
			set minut = minut + 30
			'<center><img src="images/etogame/parkex.jpg"></center>'
			'You shoot the robe and walk into some pantyhose, as though-forgot to wear a skirt.'
		end
	end
	act 'Go back to the park':gt 'park', 'start'
end

if $ARGS[0] = 'prost':
	cla
	*clr
	minut += 5
	clr
	gs 'stat'
	gs 'time'
	'<center><b><font color="maroon">Hooker</font></b></center>'
	'<center><img src="images/etogame/park2.jpg"></center>'

	if whoreQW = 2:
		'Prostitutes look at you with curiosity.'
	elseif whoreQW = 1:
		'Prostitutes look at you with interest.'
		act 'Talk':
			cla
			whoreQW = 2
			'You went to a prostitute and asked her how things are done here at all. She began to explain. "We are free, do not work on anyone, but because of this many problems. Svimi Stella with her friends sometimes beat us and rob and sometimes come petty thugs and rob us of the money. If you want to work here, you have to pay and Stella and Bandyuk . course you cool, you can try to besiege Stella and her friends, but the bandits do not advise contact. And yet, you do not peck on customers, if you nebudesh dressed like a slut, you can buy some clothes in a sex shop. "'

			act 'Move away':gt 'park', 'prost'
		end
	elseif whoreQW = 0:
		'Hey, you''re not one of us, would valyl from our point, and that the teeth will not collect.'

		act 'Fuck you!':
			cla
			minut += 15
			$nameV = 'Stoned prostitute'
			!!stats
			strenV = 20
			speedV = 30
			agilV = 30
			reactV = 30
			vitalV = 50
			intelV = 10
			willV = 10
			!!skills
			magikV = 10
			boxingV = 10
			shootV = 10
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 10 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 0
			prostitutFight = 1

			if spellavtoklon = 1:klon = 3
			if spellbefshild = 1:defence = 500

			gt 'fight', 'start'
		end
	end
	if whoreQW > 1 and $clothingworntype = 'hooker':
		act 'Search client (0:15)':
			cla
			*clr
			minut += 15
			whrand = rand(0, 100)

			if whrand <= 5:
				'To you black jeep pulled up, opened the window and leaned out healthy brazen face. "Hey slut, it''s time to pay tribute. Shtukar Come here and get out on work."'

				if money >= 1000:
					act 'Giving money (1,000 rubles)':
						cla
						money -= 1000
						'You gave the money big man in the jeep. He put them in his pocket and left.'

						act 'Move away':gt 'park', 'prost'
					end
				end

				act 'Fuck you!':
					cla
					minut += 15
					$nameV = 'Bandit'
					!!stats
					strenV = 200
					speedV = 30
					agilV = 20
					reactV = 20
					vitalV = 150
					intelV = 10
					willV = 10
					!!skills
					magikV = 10
					boxingV = 10
					shootV = 10
					!!parameters
					healthV = vitalV * 10 + strenV * 5
					mannaV = intelV * 10 + magikV * 10
					willpowerV = willV * 10
					BonusAtakV = 0
					BonusDefV = 0
					!!Programme of Action
					program = 0
					prostitutFight = 2

					if spellavtoklon = 1:klon = 3
					if spellbefshild = 1:defence = 500

					gt 'fight', 'start'
				end
			elseif whrand > 5 and whrand <= 60:
				minut += 15
				bj += 1
				guy += 1
				money += 500
				throat += 1
				'<center><img src="images/picV/car.jpg"></center>'
				'To you a car drove up and a man sitting behind the wheel asked how much it would cost the vacuum. You called a standard fee of 500 rubles. He agreed and opened Passenger door for you.'

				if prezik > 0:'You got a condom and put it in your mouth, then bent over his pants and put his client condom on the penis with his mouth.'

				'You clasped lips member client and began to suck it, caress the tongue and try to take it as deep as possible.'

				if prezik = 0:
					swallow += 1
					cumlip += 1
					'Client started cumming in your mouth, you continued to suck and swallow his hot, tart sperm.'
					gerprand = rand(0, 100)

					if gerprand > 96:
						if VeneraOnce = 0:VeneraOnce = 1
						Venera += 1
					end
				elseif prezik > 0:
					prezik -= 1
					'Client finished in a condom.'
				end

				'After the client has finished you off immediately dropped out of the car.'

				act 'Go to the panel':gt 'park', 'prost'
			elseif whrand > 60 and whrand <= 90:
				minut += 15
				'You were walking along the sidewalk showing off their charms completely in vain, no you are not interested.'

				act 'Go to the panel':gt 'park', 'prost'
			elseif whrand > 90:
				'To you approached a prostitute. "I hear you, slut, if you do not want problems, you have to pay Stella. Pyatihatnik Come here and get out on work."'

				if money >= 500:
					act 'Giving money (500 rubles)':
						cla
						money -= 500
						'You gave the money to the prostitute, she turned and walked away.'

						act 'Move away':gt 'park', 'prost'
					end
				end

				act 'Fuck you!':
					cla
					minut += 15
					$nameV = 'Prostitute'
					!!stats
					strenV = 50
					speedV = 50
					agilV = 40
					reactV = 30
					vitalV = 60
					intelV = 10
					willV = 10
					!!skills
					magikV = 10
					boxingV = 10
					shootV = 10
					!!parameters
					healthV = vitalV * 10 + strenV * 5
					mannaV = intelV * 10 + magikV * 10
					willpowerV = willV * 10
					BonusAtakV = 0
					BonusDefV = 0
					!!Programme of Action
					program = 0
					prostitutFight = 3

					if spellavtoklon = 1:klon = 3
					if spellbefshild = 1:defence = 500

					gt 'fight', 'start'
				end
			end
		end
	end

	act 'Move away':gt 'park', 'start'
end

if $ARGS[0] = 'rape1':
	cla
	*clr
	rape += 1
	sex += 1
	SUB += 3
	money = 0
	'<center><img src="images/img/spaln/rape.jpg"></center>'
	'Suddenly, you are hit on the head. You awake sometime later in a bush. Somehow you''re not able to move your arms, they must be tied up. As you look down on yourself, you realize, that you''re not wearing anything and before you can even react some dude is ramming his into your cunt. "Shit", you think yourself, "I''m being raped."'

	act 'Try to resist':
		cla
		cumpussy += 1
		'You try everything that''s possible in your situation right now to resist him, but he just tightens his grips and doesn''t stop fucking you. Some time later he begins to groan and you can feel his hot cum flowing inside your pussy. You just hope to yourself, that he didn''t impregnate you. He then zips up his pants, takes your money and leaves.'

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

	act 'Try to relax and enjoy it':
		cla
		*clr
		anal += 1
		SUB += 5
		'<center><img src="images/img/spaln/rapean.jpg"></center>'
		'It doesn''t take long for the rapist to realize you''re not resisting. "Good girl!", he says to you. He pushes you onto your knees and intends to take you doggy-style. He spreads your asschecks aside and pushes his cock inside. You cry out in pain, but he holds your mouth shut and doesn''t stop fucking your asshole.'

		act 'Go on':
			cla
			*clr
			bj += 1
			cumlip += 1
			cumface += 1
			SUB += 5
			'<center><img src="images/img/spaln/cum.jpg"></center>'
			'"Give me a blowjob and you''ll get your reward for not resisting, woman.", he tells you. You nod obidiently and move on your knees and begin to give him head. It doesn''t take long for him to groan out in pleasure, "You better swallow it all, slut!" Shortly after that you can taste his hot cum inside your mouth and you swallow every drip of it, somehow enjoying the taste. Then he stand up, buttons up his pants and takes your money. While you were still liking your fingers clean from any drips of cum, he smiles and says to you, "Have a nice day slut."'

			act 'Stand up and leave':gt 'park', 'start'
		end
	end
end

--- park ---------------------------------
# parkdin
$parkrandivdin = {
	if hour > 7 and hour < 21:
		!!day
		if parkrand < 10 and parkrand > 0:
			if parkrand = 1:dynamic $parkivent1
			if parkrand = 2:dynamic $parkivent2
			if parkrand = 3:dynamic $parkivent3
			if parkrand = 4:dynamic $parkivent4
			if parkrand = 5:dynamic $parkivent5
			if parkrand = 6:dynamic $parkivent6
			if parkrand = 7:dynamic $parkivent7
			if parkrand = 8:dynamic $parkivent8
			if parkrand = 9:dynamic $parkivent9
		else
			dynamic $parkemptyevent
		end
	else
		!!night
		if parkrand >= 15:
			dynamic $parkivent1
		else
			dynamic $parkemptyevent
		end
	end
}

--- parkdin ---------------------------------
# parkivent
$parkemptyevent = {
	manna += 10
	willpower += 10
	gs 'stat'
	'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'

	act 'Complete walk':gt 'park', 'start'

	exit
}

$parkivent1 = {
	gs 'stat'

	if hour > 7 and hour < 21:
		cls
		'In the shadow of a tree you can see a man stand, he watches you and when you look back at him he simple shouts "Whore!" at you.'

		act 'Silently leave':sub += 1 & gt 'park', 'start'

		act '"Shut the trap, jackass"':
			cla
			dom += 1
			'You tell him to shut the hell up. You''re surprised when you see him quickly running away.'

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

		exit
	else
		'From the shade of a tree guy came out, he came up to you and through gritted teeth, "Babe", you dragged into the bushes.'

		act 'Fight him':
			cls
			cla
			$nameV = 'Rapist'
			!!stats
			strenV = 100
			speedV = 50
			agilV = 40
			reactV = 40
			vitalV = 50
			intelV = 10
			willV = 10
			!!skills
			magikV = 100
			boxingV = 50
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 10 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 0
			RapistFight = 1

			if spellavtoklon = 1:klon = 3
			if spellbefshild = 1:defence = 500

			gt 'fight', 'start'
		end

		act 'Try to run away':
			if beg < 10:peshimraperand = rand(0, 11)
			if beg >= 10 and beg < 30:peshimraperand = rand(0, 20)
			if beg >= 30 and beg < 50:peshimraperand = rand(0, 30)
			if beg >= 50 and beg < 70:peshimraperand = rand(0, 40)
			if beg >= 70 and beg < 90:peshimraperand = rand(0, 50)
			if beg >= 90 and beg < 110:peshimraperand = rand(0, 60)
			if beg >= 110 and beg < 130:peshimraperand = rand(0, 70)
			if beg >= 130 and beg < 150:peshimraperand = rand(0, 80)
			if beg >= 150 and beg < 170:peshimraperand = rand(0, 90)
			if beg >= 170:peshimraperand = rand(11, 100)

			if peshimraperand < 11:
				cla
				'You try to run away, but you''re not quick enough and he catches you. He drags you back into the bushes.'

				act 'Further':gt 'park', 'rape1'
			elseif peshimraperand > 10:
				cla
				minut += 60
				'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost an hour of running, you finally catch your breath and the rapist is norwhere to be seen.'

				act 'Further':
					cls
					locbegrand = rand(0, 4)

					if locbegrand = 0:gt 'park', 'start'
					if locbegrand = 1:gt 'street'
					if locbegrand = 2:gt 'down'
					if locbegrand = 3:gt 'nord'
					if locbegrand = 4:gt 'lake', 'start'
				end
			end
		end

		exit
	end
}

$parkivent2 = {
	gs 'stat'

	if vnesh >= 30 and parkday = day:
		cls
		'You see a man sitting under a tree drinking beer. It''s the guy who fucked you here in the park the other day. He looks at you and since he suddenly begins to grin, you suppose he also remembers who you are.'

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

		exit
	elseif vnesh >= 30 and parkday ! day and parkslut > 0:
		cls
		'From the bench under one of the trees came a guy up to you. It''s the guy who fucked you here in the park a while back. He smiles and asks you "Hello again beautiful girl, do you mind if we do it once again?"'

		act 'Walk away':gt 'park', 'start'

		act '"I don''t mind it all"':
			cla
			'The guy laughed "Unfortunately, I don''t it''ll be as much fun as the first time, but why don''t you already bend over?".'

			act '"Not this time, I''m afraid"':gt 'park', 'start'

			act 'Bend over the bench':
				cla
				*clr
				money += 500
				sex += 1
				parkday = day

				if parkslut = 0:parkslut = 1 & guy += 1

				vagina += 1
				dynamic $venerasiak
				picrand = rand(1, 6)
				'<center><img src="images/img/prost/dogging<<picrand>>.jpg"></center>'

				if prezik > 0:
					protect = 1
					prezik -= 1
					'"I don''t plan on having children at the moment", you say, "Be a gentleman and put this condom on."'
					'"Sure, babe", he says, takes it and pulls the condom over his cock.'
				end

				'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrusts in and out of it.'

				if horny >= 90:
					horny = 0
					manna += 15
					willpower += 15
					orgasm += 1
					'You can feel your pussy begin to throb and a wave of pleasure runs through your entire body and you scream out in pleasure.'
				end

				if protect ! 1:
					!!unprotected sex
					finrand = rand(0, 1)

					if finrand = 0:
						!!inside
						cumpussy += 1
						'The guy groans loudly and you feel his hot cum flowing inside your pussy.'

						if tabletki <= 0 and mesec <= 0:
							gs 'preg'
							manna -= 15
							willpower -= 15
							'Once the bliss of the orgasm fades away, you realize, he didn''t wear a condom. Shit. You hope he didn''t impregnate you.'
						end
					else
						!!out
						cumass += 1
						'<<$nameV>> groans as he cums inside your ass.'
					end
				else
					protect = 0
					'The bloke cums inside his condom. Once he''s done and calmed down, he moves his cock out of your pussy, removes the condom and throws it into the bushes. Then he pulls up his pants, gives you a wicked smile and leaves.'
				end

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

		exit
	elseif vnesh >= 30 and parkday ! day and parkslut = 0:
		cls
		'From the trees comes a man to you. "Good evening beautiful lady, would you like to earn 2.000 rubles?" he asks you.'

		act 'Ask him how to do it':
			cla
			'"What do I have to do?", you ask him. He smiles, "Let us go over there." and points over to the bench in a somewhat secluded part of the park.'

			act 'Fuck off, asshole':gt 'park', 'start'

			act 'Follow him':
				cla
				*clr
				money += 2000
				sex += 1
				parkday = day

				if parkslut = 0:parkslut = 1 & guy += 1

				vagina += 1
				dynamic $venerasiak

				picrand = rand(1, 6)
				'<center><img src="images/img/prost/dogging<<picrand>>.jpg"></center>'

				if prezik > 0:
					protect = 1
					prezik -= 1
					'"I don''t plan on having children at the moment", you say, "Be a gentleman and put this condom on."'
					'"Sure, babe", he says, takes it and pulls the condom over his cock.'
				end

				'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrusts in and out of it.'

				if horny >= 90:
					horny = 0
					manna += 15
					willpower += 15
					orgasm += 1
					'You can feel your pussy begin to throb and a wave of pleasure runs through your entire body and you scream out in pleasure.'
				end

				if protect ! 1:
					!!unprotected sex
					finrand = rand(0, 1)

					if finrand = 0:
						!!inside
						cumpussy += 1
						'The guy groans loudly and you feel his hot cum flowing inside your pussy.'

						if tabletki <= 0 and mesec <= 0:
							gs 'preg'
							manna -= 15
							willpower -= 15
							'Once the bliss of the orgasm fades away, you realize, he didn''t wear a condom. Shit. You hope he didn''t impregnate you.'
						end
					else
						!!out
						cumass += 1
						'<<$nameV>> groans as he cums inside your ass.'
					end
				else
					protect = 0
					'The bloke cums inside his condom. Once he''s done and calmed down, he moves his cock out of your pussy, removes the condom and throws it into the bushes. Then he pulls up his pants, gives you a wicked smile and leaves.'
				end

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

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

		exit
	else
		dynamic $parkemptyevent
	end
}

$parkivent3 = {
	cls
	gs 'stat'
	'As you walk through the park, you hear moans and groans coming out of bush close to one of the paths.'

	act 'Continue walking':gt 'park', 'start'

	act 'Peek':
		cla
		*clr
		horny += 10
		gs 'stat'
		'<center><img src="images/img/spaln/shfoto.jpg"></center>'
		'You take a peek through the bushes and see three guys fucking one woman. It seems like she''s really enjoying it.'

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

		if horny >= 50:
			act 'Pry':
				cla
				horny += 10
				gs 'stat'
				'You hide behind a tree to get a better look at the group action.'

				if horny >= 75:
					'This sight really excites you and you can feel your pussy moisten.'
				else
					'While this is quite the sight to enjoy, you think it''s better not to get caught, so you silently move away.'
				end

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

		if minifoto = 1 or zenit = 1:
			act 'Take a photo':
				cla

				if minifoto = 1:fotoparkrand = rand(0, 10)
				if minifoto = 0:fotoparkrand = rand(0, 1)

				if fotoparkrand > 0:
					minut += 30
					shantfoto += 1
					'As you hide behind a tree, you start to take photos of them and watch them until they''re done. Once they are you silently move away and decide to find out who she was. Blackmailing her would be a nice source of income, you think to yourself.'

					act 'Back to the park':gt 'park', 'start'
				end

				if fotoparkrand = 0:
					'You hide behind the tree and start to take pictures of what is happening. Somehow you get carried away and one of the notice you. One of them slowly walks up behind you and grabs you, taking you to the others.'
					'"Look what I''ve found. We''ve got ourselves a stalked." the guy holding you tight says.'

					act 'Try to talk your way out':
						cla
						rape += 1
						'You try to talk your way out, but they just laugh at you, pitying you for even trying. Then one of the guys force you onto your knees and they prepare you to fuck your doggy-style.'

						if minifoto = 1:
							minifoto = 0
						else
							zenit = 0
						end

						act 'Further':gt 'paysex', 'start'
					end

					act 'Try to run away':
						if beg < 10:peshimraperand = rand(0, 11)
						if beg >= 10 and beg < 30:peshimraperand = rand(0, 20)
						if beg >= 30 and beg < 50:peshimraperand = rand(0, 30)
						if beg >= 50 and beg < 70:peshimraperand = rand(0, 40)
						if beg >= 70 and beg < 90:peshimraperand = rand(0, 50)
						if beg >= 90 and beg < 110:peshimraperand = rand(0, 60)
						if beg >= 110 and beg < 130:peshimraperand = rand(0, 70)
						if beg >= 130 and beg < 150:peshimraperand = rand(0, 80)
						if beg >= 150 and beg < 170:peshimraperand = rand(0, 90)
						if beg >= 170:peshimraperand = rand(0, 100)

						if peshimraperand < 11:
							rape += 1
							'You try to run away, but you''re not fast enough and one of them eventually catches up with you. He smashes your camera and drags you back into the bushes. There he forces you onto your knees, preparing you to get fucked doggy-style.'

							if minifoto = 1:
								minifoto = 0
							else
								zenit = 0
							end

							act 'Further':gt 'paysex', 'start'
						elseif peshimraperand > 10:
							'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost an hour of running, you finally catch your breath and the rapist is norwhere to be seen.'
							locbegrand = rand(0, 4)

							if locbegrand = 0:
								act 'Take a look around to see where you are':gt 'park', 'start'
							elseif locbegrand = 1:
								act 'Take a look around to see where you are':gt 'street'
							elseif locbegrand = 2:
								act 'Take a look around to see where you are':gt 'down'
							elseif locbegrand = 3:
								act 'Take a look around to see where you are':gt 'nord'
							elseif locbegrand = 4:
								act 'Take a look around to see where you are':gt 'lake', 'start'
							end
						end
					end
				end
			end

			act 'Back to the park':gt 'park', 'start'
		end

		exit
	end
}

$parkivent4 = {
	gs 'stat'

	if parkblackmail = 0:
		cls
		'On one of the open grass areas, you see a group of young people having a barbecue. As you walk past them, a guy who is with them, walks up to you and asks you, if you would like to join them.'

		act 'Decline and continue your walk':gt 'park', 'start'

		act 'Agree and join them':
			cla
			'You had fun drinking with the guys and girls. One of the guys comes up behind you while you''re at the table an put his arms around your waist, then presses himself against your ass. ...God, he''s HUGE. It feels like a big sausage against your lower back... damn, it''s so hot. You suddenly wonder if you''ve been drinking too fast.'
			'Shortly after, one of the guy gropes your titties and pushes you against the closest tree. You softly moan as he massages your breasts. You can feel his stiff cock poking your belly. Then he asks you in a rather harsh tone, "You like this slut, don''t you?"'
			'Another guy roughly grabs your breasts, pushes you back against the closest tree, and presses his hips against you. His stiff cock rests against your belly, and you moan softly from the feeling. He roughly asks, "Like it, slut?"'

			act 'Tell him to get away':
				cla
				'You sharply tell him to let you go. Surprised, he takes a step back, and you move away from the tree.'

				act 'Leave':
					cla
					*clr
					'You turn to leave, but the guy quickly catches up to you. He grabs your ass, spins you around to face him, and orders "On your knees, quickly, bitch!"'

					act 'Kick him in the his nuts and walk away':gt 'park', 'start'

					act 'Do as he tells you':
						cla
						hour += 2
						rape += 1
						gang += 1
						minut += 120
						gs 'stat'
						'<center><img src="images/picBJ/parkBJ.jpg"></center>'
						'Too drunk to resist further, you quickly do as he says. He drops his pants to his knees and abruptly thrusts his big dick into your mouth. You quickly forget about everything else and start hungrily sucking on him - his big, juicy, fragrant cock is driving you mad. He gathers your hair behind your head to make sure it doesn''t get in the way. After a little while he pulls his delicious cock out of your mouth - but it''s immediately replaced by a guy you didn''t even notice approach.'
						'His cock is so big, you can barely breath and are on the verge of fainting. More men gather around you and take out their cocks for you to suck on. They call you many names, but ''Slut'' burns itself into your memory, so often it''s used. You suck them off one by one, giving two other cocks a handjob. You try to swallow as much cum as possible, maybe it''s due to you being drunk, but the taste is just overwhelming to you. One of them removes your top, so everyone can enjoy the sight of your beautiful titties.'
						'His cock even bigger than the last guy''s, and the excitement it gives you is almost overpowering. The other guys gather around and hurl insults at you, mocking you for sucking strangers. You suck each them off too, one by one, while stroking others, a dick in each hand. Every guy you blow cums in your mouth, and you swallow every time. Someone pulls down your top, letting your boobs spill out. You feel a cock slap against your chest as someone takes the opportunity to give himself a titfuck.'
						'"Fuck, slut, suck faster!" orders one of the guys.'

						act '"Guys, be quieter... someone might hear"':
							cla
							'"Guys, be quieter... someone might hear," you try to warn them while coughing.'
							'One the guys bitchslaps you, "Shut up slut. You''re not here to talk."'
							'"Stop talking and work your mouth, bitch. You''re here to suck, not to lecture us."'

							act 'Okay, boy.':
								cla
								*clr
								minut += 120
								gs 'stat'

								if parkblackmail = 0:guy += 2 & parkblackmail = 1 & parkday = day

								bj += 8
								swallow += 6
								facial += 2
								horny = 0
								cumface += 2
								'"Okay, boys," you say around the cock in your mouth.'
								'You drunkenly wonder why they insist on talking so loud. But when you open your eyes, you see two of the girls from the group with a camera.'
								'With a growl, the guy fucking your chest finally comes - and comes a lot. Your breasts are completely coated with semen. You start to feel an overpowering need to make the guy currently in your mouth cum as well. You put your hands on his ass and pull him toward you, forcing his cock down your own throat, forgetting about the cameras and onlookers. You feel like an insatiable whore as you deepthroat him, swallowing his large head as far as you can manage.'
								'The second guy took your hair as the last whore and calling huesoska, roughly finished your face. He grabs your hair, calling you "whore" and "cocksucker" as you move your head, and at the last second roughly jerks your head backwards to cum all over your face. He bathes you with an incredible amount of sperm.'
								'That you were ashamed goes without saying - you just swallowed six strangers'' cum and took two others'' loads all over you.'

								act 'Go home':gt 'park', 'start'
							end
						end
					end
				end
			end
		end

		exit
	else
		dynamic $parkemptyevent
	end
}

$parkivent5 = {
	gs 'stat'
	!!'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'

	act 'Complete walk':gt 'park', 'start'

	if yaq = 0 and student > 0:
		cls
		cla
		*clr
		'As you walk past a bunch of trees, a man walked up to you. He introduced himself as Yaroslav and asks you, if you would like to earn some money.'

		act '"No, thanks"':gt 'park', 'start'

		act '"I''m listening"':
			cla
			'"My house is a bit dirty and I''m look for someone who would like to keep it clean for me.", he says. "All you had to do is to dust and clean everything. My house isn''t too large."'

			act 'Turn him down':gt 'park', 'start'

			act 'Agree':
				cla
				'"Alright, but what''s in for me?" you ask him. "I''d pay you 2.000 rubles.", he answers. "By the way, I haven''t asked you for your name yet."'
				'"I''m <<$name>>.", you tell him. He nods and smiles and tells you it''s a cute name. Then he gives you his card and judging by the adress, it''s somewhere in the city center.'

				act 'Ask him, when to come by':
					cla
					yaq += 1
					'"When would you like me to come by?" you ask Yaroslav.'
					'"No hurry, just come by when you''ve got some free time, but I''m usually home in the evening, so therer''s just that.", he answers.'
					'"Alright, thank you and see you I guess.", you say and walk away.'

					act 'Finish your walk':gt 'park', 'start'
				end
			end
		end

		exit
	else
		dynamic $parkemptyevent
	end
}

$parkivent6 = {
	gs 'stat'

	if ublyudokparkivent = 0:
		cls
		'You were walking through the, somewhen you realized, you ended up in a somewhat shady area of it. Between two trees you can see a man waving at you.'

		act 'Walk away':gt 'park', 'start'

		act 'Walk up to him':
			cla
			*clr
			ublyudokparkivent = 1
			'You walk up to him, asking what he wants. He says, he would like to show you something, but suddenly you are being hit and everything fades to black.'

			act 'Wake up':
				cla
				*clr
				'<center><img src="images/picizpar/1.jpg"></center>'
				'"Ouch...", you say groggily as you wake up. "I thought you would never wake up.", a deep voice says. He grabs your hair and pulls you up, then takes his huge knife and holds it to your face. "Look pretty, if you don''t resist, this might be a pleasurable experience for you.", he tells you, "Now take of your clothes, you won''t need them for now."'

				act 'Take off your clothing':
					cla
					*clr
					'<center><img src="images/picizpar/2.jpg"></center>'
					'He''s huge and intimidating, you decide it''s better to do as he tells you, so can get out of here alive, hence you take off you clothes and a cold breeze makes your nipples rock hard immediately.'

					act '...':
						cla
						*clr
						'<center><img src="images/picizpar/3.jpg"></center>'
						'"Good girl", he says and orders you to bend over. You oblige him and present your rear assests to him. He then ''inspects'' them, by spreading your ass cheeks apart. You yelp when you feel his finger is entering your cunt.'

						act '...':
							cla
							*clr
							'<center><img src="images/picizpar/4.jpg"></center>'
							'"The two of us are going to have a lot of fun together, so prepare yourself and make you tight little twat moist for me", he tells you and you begin to rub your clit. He unbuttoned his pants, took out his cock and started to stroke it, while listening to your soft moans.'

							act 'Go on...':
								cla
								*clr
								'<center><img src="images/picizpar/5.jpg"></center>'
								'"Come over here and suck me", he orders you, with his rock hard cock in his hand- Come over heNa gut*re darling, my dickhead wants you it sucked. The man grabbed me by the hair and threw it on the ground before him. My knees immediately became ragged and pinching ... - Open your mouth slut! - As soon as I open my mouth, he grabbed my head and began to thrust into my throat his fat cock.'

								act 'Suck':
									cla
									*clr
									'<center><img src="images/picizpar/6.jpg"></center>'
									'His dick smelled dirt and sweat and was slightly salty. I could not afford to admit that I like the taste, but it was so hard and thick that out of my vagina involuntarily flowed lubrication.'

									act '...':
										cla
										*clr
										'<center><img src="images/picizpar/7.jpg"></center>'
										'Men do not have to make me a few minutes I became very deep swallow and lick his head from the trunk of the most balls.'

										act '...':
											cla
											*clr
											'<center><img src="images/picizpar/8.jpg"></center>'
											'- Well, ka get up darling, suction is certainly good, but your hot hole is definitely better. He put me and planted in my womb just three fingers. It was very painful, my pussy has not stretched and I screamed.'

											act 'Masturbate':
												cla
												*clr
												'<center><img src="images/picizpar/9.jpg"></center>'
												'Then the bastard grabbed me by the throat and forced to masturbate herself. I tried to gently stretch his hole, and he meanwhile nadrachival its eldu, then took a rope and tied me.'

												act '...':
													cla
													*clr
													'<center><img src="images/picizpar/10.jpg"></center>'
													'When his fat cock, I slowly began to go I started to twitch and kick, but more for the mind. Despite the frantic fear, I was very nervous and even wanted him to fuck me.'

													act '...':
														cla
														*clr
														'<center><img src="images/picizpar/11.jpg"></center>'
														'Fat cock sharply into me, pulling up to the uterus. It hurt ... or not, it was nice, I do not know, I can not tell from what I screamed so loud when he pulled me into the damn woods. It is faster and sharper, his cock swelled and I could not remember anything from the mad buzz. He abruptly shoved his cock pressed me to her pubis and hot jet of sperm hit in my uterus, vagina filling warm, slippery fluid.'

														act 'Savoury':
															cla
															*clr
															'<center><img src="images/picizpar/12.jpg"></center>'
															'- Wow ... - just said bastard, but I did not care for it, now I did not care at all and I hung blissfully kayfovat trying to squeeze numb feet. I did not even feel like it stuck in my pussy his fingers.'

															act 'Licking fingers':
																cla
																*clr
																manna -= 15
																cumpussy += 1
																'<center><img src="images/picizpar/13.jpg"></center>'
																'But I could taste his semen when those fingers were in my mouth, but then I realized that for the horror just happened that he came to me.'

																act 'Iti':
																	cla
																	*clr
																	'<center><img src="images/picizpar/14.jpg"></center>'
																	'- Come on baby ka - pulling her pants and wearing a hat, said the peasant. - You''re a little at me to stay. In my mouth turned out to gag and he untied me and pulled on the rope. I fell a few times, and he put me up in spurts and again we were on the rocks and sharp branches, it is good that he allowed me to wear shoes.'

																	act '...':
																		cla
																		*clr
																		'<center><img src="images/picizpar/15.jpg"></center>'
																		'- That''s my nest - said with a smile bastard, pointing to a strong two-storey house with a high fence, surrounded by barbed wire.'

																		act 'Lick':
																			cla
																			*clr
																			'<center><img src="images/picizpar/16.jpg"></center>'
																			'This pig did not even took me into the house, and just have cast their clothes and climbed on me. He again began to tear up my swollen pussy, but soon threw my mouth his five fingers. - Let ka, lick them well, believe you handy.'

																			act '...':
																				cla
																				*clr
																				'<center><img src="images/picizpar/17.jpg"></center>'
																				'I began to lick his fingers until saliva ran down his wrist, and then he pulled out his penis and to my horror, began to shove his paws in my ass. When his fingers pushed my anus and penetrated into the rectum, I began kicking and twitching.'

																				act 'Cry':
																					cla
																					*clr
																					'<center><img src="images/picizpar/18.jpg"></center>'
																					'That bastard, grabbed a knife and began to threaten me. Tears streamed from my eyes, but I promised that I will not twitch.'

																					act 'Relax':
																						cla
																						*clr
																						'<center><img src="images/picizpar/19.jpg"></center>'
																						'When his cock was sticked to my compressed sfinker, I tried to relax, that was not so painful. Thick head barely poked my asshole, causing me to shout in pain, but later it became easier ... was even nice. Apparently member abuts the outer wall of the vagina had other feelings, but they were good, very good.'

																						act 'Shout':
																							cla
																							*clr
																							'<center><img src="images/picizpar/20.jpg"></center>'
																							'My cries ceased to be a cry of pain, without even noticing, I began to cry from the buzz and excitement, I again wanted his cock naciloval my pink crack.'

																							act 'Sit on top':
																								cla
																								*clr
																								'<center><img src="images/picizpar/21.jpg"></center>'
																								'When the bastard put me on, I myself began to move her hips to meet his powerful dick, wishing only that he did not stop.'

																								act 'Jump on a limb':
																									cla
																									*clr
																									'<center><img src="images/picizpar/22.jpg"></center>'
																									'I began to jump on his penis, squealing with pleasure, forgetting about everything, except a sense of solid, hot-term in its bosom.'

																									act 'Correct':
																										cla
																										*clr
																										'<center><img src="images/picizpar/23.jpg"></center>'
																										'Jumping off his clubs I tried to sit up again, but the guy cleverly directed his eldu in my ass and she easily slipped into my anus.'

																										act '...':
																											cla
																											orgasm += 1
																											*clr
																											'<center><img src="images/picizpar/24.jpg"></center>'
																											'I jumped on him, until he finally realized that I roll without feeling, and my body trembles in orgasm. Tears poured from her eyes, as if relieved that that accumulated for all this time inside and I felt incredibly good.'

																											act 'Suck':
																												cla
																												*clr
																												'<center><img src="images/picizpar/25.jpg"></center>'
																												'I am happy to become a member of the men suck, feeling the salty taste of his head, mixed with a taste of my vagina and rectum.'

																												act 'Substitute priest':
																													cla
																													*clr
																													'<center><img src="images/picizpar/26.jpg"></center>'
																													'Then I like a dog licking his feet and turned to him her ass, wanting him to fuck me again.'

																													act '...':
																														cla
																														*clr
																														cumbelly += 1																														cumbelly += 1
																														cumass += 1
																														cumlip += 1
																														cumface += 1
																														'<center><img src="images/picizpar/27.jpg"></center>'
																														'But the man began to masturbate and very soon I began to feel his hot cum, but this time outside. I really do not want him to let me go, do not want me to lost its perfect dick and so I eagerly began to lick the cum from his cock, not yet had time to drop, wanting to pick it up again.'
																														'But then again, I felt the blow to the head and fell unconscious again.'

																														act 'Wake':
																															cla
																															*clr
																															'I woke up somewhere near the lake. I was naked and smeared the entire semen, but my clothes lay near me. I silently thanked for this sex abuser, got dressed and went.'

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

		exit
	else
		dynamic $parkemptyevent
	end
}

$parkivent7 = {
	gs 'stat'

	if pusher = 0:
		'Young boy wearing a hooded jacket comes to you and tells you a conspiratorial voice, "Girl. Dose I got pale lady is, you want to try? Completely free. Lovely thing, instantly cleans the brain, the mood is that just ATAS, body sensations such as if you have never been healthier. "'

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

		act 'Yes':
			cla
			pusher = 1
			health = vital * 10 + stren * 5
			willpower = intel * 5 + will * 5
			manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
			horny = 100
			nark += 10
			narkday = day
			'You stayed with interest, never tried dope, but because at one time there will be nothing? The guy came up to you and backfilled with a little white powder, you sucked his nose and the world blossomed unexpected colors.'
			'The guy looked at you and said, "If you like it, come again, a dose of only 2,000 rubles."'

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

			exit
		end
	else
		dynamic $parkemptyevent
	end
}

$parkivent8 = {
	!!'You leisurely stroll through the park. Breathing fresh air, thinking about the vicissitudes of life.'
	!!act 'Complete walk':gt 'park', 'start'
	gs 'stat'
	vnerand = rand(0, 300)

	if bfa < 1 and vnerand <= vnesh:
		cla
		*clr
		gs 'boy'
		'To you came <<$boybody>> <<$boybod>> <<$boyface>>. One <<$boyClo>>'
		'The guy introduced as <<$boy>> and asked your number.'

		act 'Tell him to phone':
			cla
			gs 'boyfrend', 'start'
			stopboy = 0
			'<<$boyA>> recorded your phone and left.'

			act 'Complete walk':gt 'park', 'start'
		end

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

		exit
	else
		dynamic $parkemptyevent
	end
}

$parkivent9 = {
	gs 'stat'

	if bfa >= 1:
		cls
		'You walk through the park and you notice how the meeting goes your man <<$boyA>>'

		act 'Leave':bfa -= 1 & gt 'park', 'start'

		if boyonceA = 0 or SUB = 0 and DOM = 0:
			act 'Nice to talk':
				cla
				bfa += 2
				minut += 15
				'<<$boyA>> bradovalsya your chance meeting and hugged you. You nice talk and kiss goodbye to split each according to his deeds.'

				act 'Complete walk':gt 'park', 'start'
			end
		elseif boyonceA = 1 and SUB > 0:
			'<<$boyA>> glad you and taking you by the hand led to a deeper into the park.'

			act 'Go with the guy.':gt 'event', 'park'
		elseif boyonceA = 1 and DOM > 0:
			'<<$boyA>> glad you and taking you by the hand led to a deeper into the park.'

			act 'Offer to sit on the bench. (You decide to have sex with a guy.)':gt 'event', 'park'

			act 'Nice to talk':
				cla
				bfa += 5
				minut += 15
				'<<$boyA>> bradovalsya your chance meeting and hugged you. You nice talk and kiss goodbye to split each according to his deeds.'

				act 'Complete walk':gt 'park', 'start'
			end
		end

		exit
	else
		dynamic $parkemptyevent
	end
}

--- parkivent ---------------------------------
# poli
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	cla
	*clr
	clr
	hosprand = rand(0, 10)
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Clinic</font></b></center>'
	'<center><img src="images/etogame/poli.jpg"></center>'
	'General practitioner appointments - 1,000 rubles'
	'Psychotherapist appointment - 1,000 rubles'
	'Reception at the Venereology - 1,000 rubles.'
	''
	'On the issue of hospitalization come Monday, prior_to 10 of each month'
	''
	'Abortion at the woman''s request can be made up to 84 days of pregnancy - 20,000 rubles.'
	'Be warned, abortions are dangerous to health. There is always a risk of complications and the possibility of sterility.'
	if workhosp = 1 and hour >= 8 and hour <= 9 and week < 6:act 'Exit to replace':gt 'poli', 'beginwork'

	act 'Leave Clinic':gt 'street'

	if money >= 1000:
		if health < (vital * 10 + stren * 5):
			act 'Treat health (1,000 rubles)':
				cla
				money -= 1000
				minut += 60
				health = vital * 10 + stren * 5 + 1000

				if hosprand = 0:gt 'poli', '0'
				if hosprand = 1:gt 'poli', '1'
				if hosprand = 2:gt 'poli', '2'

				'The doctor did give you a shot and you immediately felt much better'

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

		if willpower < intel * 5 + will * 5:
			act 'See a therapist (1,000 rubles)':
				cla
				money -= 1000
				minut += 60
				willpower = intel * 5 + will * 5 + 1000
				manna = (intel * magik) + magik * 100 + vital * 10 + rikudo

				if hosprand = 0:gt 'poli', '0'
				if hosprand = 1:gt 'poli', '1'
				if hosprand = 2:gt 'poli', '2'
				'You lie down on a couch at the therapist and told him about his troubles, and you immediately become much happier.'

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

		act 'Go to the Venereology':
			cls
			'In the waiting room is an advertisement.'
			*nl
			'	Private Sexually Transmitted Infection Clinic provides the following treatment.'
			'		Complete cure for herpes - 150,000 rubles.'
			'		Complete cure of syphilis - 350,000 rubles.'
			'		Complete cure for yeast infection - 50,000 rubles.'
			'	Treatment requires hospitalization on first Monday of each month'

			act 'Make a VD test (1,000 rubles)':
				money -= 1000
				minut += 60
				gs 'stat'
				'You took the tests and after a short wait the doctor called you into his office.'

				if venera > 0:'The doctor pulled a sad mine and said that you are not going smoothly with analyzes.'

				if GerpesOnce = 1:
					'You have found genital herpes. This disease is not curable and it can only jam at a time.'

					if Gerpes >= 3:
						if GerpesNapr = 0:GerpesNapr = 3 & 'Here you have the direction of the shots herpes. Needs a course out of 3 injections, each injection will cost 1,000 rubles.'
						if GerpesNapr > 0:'Go for shots herpes direction I gave you.'

					else
						'Herpes you in an inactive stage, take vitamins and he does not show himself.'
					end
				end

				if SifacOnce = 1:
					'You found to have syphilis. It is not curable, the deadly disease which nowadays have learned to restrain, but not much more.'

					if Sifilis < 15:
						'Now you have syphilis in the inactive stage. Therefore, no special meaning in therapy.'
					elseif Sifilis >= 15:
						if SifNapr = 0:SifNapr = 10 & 'Here you have the direction of the shots from syphilis. Needs a course out of 10 injections, each injection will cost 5,000 rubles.'
						if SifNapr > 0:'Go for injections of syphilis. Long course, 10 days. But it is necessary, severe.'
					end
				end

				if TriperOnce = 1:
					'You found gonorrhea. In principle, this disease is curable.'
					if TriperNapr = 0:TriperNapr = 5 & 'Here you have the direction of the shots gonorrhea. Needs a course out of 5 injections, each injection will cost 1,500 rubles'
				end

				if KandidozOnce = 1:
					'You found candidiasis. Or as it is popularly called thrush. Thing is not curable, but not very dangerous, besides easily suppressed.'

					if KandidNapr = 0:KandidNapr = 1 & 'The pharmacy can buy pills.'
					if Kandidoz < 30:'Now you candidiasis in an inactive stage, take vitamins, and he does not show himself.'
				end

				if venera <= 0:'Doctor is pleased that you do not have a sexually transmitted disease.'

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

			if GerpesNapr > 0 and GerpesUkolDay ! day:
				act 'Go for shots of herpes (1,000 rubles). Remaining <<GerpesNapr>> in the direction of injection':
					cls
					money -= 1000
					minut += 60
					GerpesUkolDay = day
					GerpesNapr -= 1
					gs 'stat'
					'You made a very painful injection in the ass.'

					if GerpesNapr = 0:Gerpes = -10 & 'It was the last injection'
				end

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

		if TriperNapr > 0 and money >= 1500 and TriperUkolDay ! day:
			act 'Go for shots of gonorrhea (1,500 rubles). Remaining <<TriperNapr>> in the direction of injection':
				cls
				money -= 1500
				minut += 60
				TriperUkolDay = day
				TriperNapr -= 1
				gs 'stat'
				'You made a very painful injection in the ass.'

				if TriperNapr = 0:Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'It was the last injection'

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

		if money >= 5000 and SifNapr > 0 and SifUkolDay ! day:
			act 'Go to injections of syphilis (5,000 rubles). Remaining <<SifNapr>> in the direction of injection':
				cls
				money -= 5000
				minut += 60
				SifUkolDay = day
				SifNapr -= 1
				gs 'stat'
				'You made a very painful injection in the ass.'

				if SifNapr = 0:Sifilis = 0 & 'It was the last injection'

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

		if GerpesOnce = 1 and money >= 150000 and week = 1 and day <= 10:
			act 'Go to private clinic for the complete cure of the herpes (150,000 rubles)':
				cla
				money -= 150000
				day += 3
				week += 3
				GerpesOnce = 0
				Gerpes = 0
				Venera -= 1
				gs 'stat'
				'You have lain three days in private clinics and were completely cured of herpes.'

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

		if SifacOnce = 1 and money >= 350000 and week = 1 and day <= 10:
			act 'Go to private clinics for the complete cure of syphilis. (350,000 rubles)':
				cla
				money -= 350000
				day += 3
				week += 3
				SifacOnce = 0
				Sifilis = 0
				Venera -= 1
				gs 'stat'
				'You have lain three days in private clinics and were completely cured of syphilis.'

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

		if KandidozOnce = 1 and money >= 50000 and week = 1 and day <= 10:
			act 'Go to private clinics for the complete cure of the thrush. (50,000 rubles)':
				cla
				money -= 50000
				day += 3
				week += 3
				KandidozOnce = 0
				Kandidoz = 0
				gs 'stat'
				'You have lain three days in private clinics and were completely cured of thrush.'

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

	if money >= 20000 and preg = 1 and pregtime < 84:
		act 'Abortion (20,000 rubles)':
			cla
			vidage += 1
			abort += 1
			money -= 20000
			pregtime = 0
			pregtalk = 0
			abortrand = rand(0, 10)

			if age > 18:
				if abortrand < 10:preg = 0
				if abortrand = 10:preg = 2
			else
				if abortrand < 4:preg = 0
				if abortrand >= 5:preg = 2
			end

			! WD: Correct Image path ~ "images/etogame/abort.jpg"
			'<center><img src="images/add-on/abort.jpg"></center>'
			'You spread out on a gynecological chair, the doctor entered your vagina tool and parts ripped out of you fruit.'

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

	if preg = 1 and pregtime = 280:
		act 'Have':
			cla
			vidage += 1
			preg = 2
			pregtime = 0
			pregtalk = 0
			numkid += 1
			kid += 1
			daykid[numkid] = day
			monthkid[numkid] = month
			yearkid[numkid] = year
			$father[numkid] = $father
			haprikid[numkid] = rand(0, 3)
			glacol[numkid] = rand(0, 3)

			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/abort.jpg"></center>'
			'You put on the bed and lit up. Began a terrible pain in the abdomen, you yelled with all the dope and finally gave birth.'
			polkid[numkid] = rand(0, 1)

			if polkid[numkid] = 0:$polreb[numkid] = 'girl' & 'The doctor said that you had a girl.'
			if polkid[numkid] = 1:$polreb[numkid] = 'boy' & 'The doctor said that you have a baby boy.'

			act 'Give the name of the child':
				$kidname[numkid] = input ("What do you call a baby?")

				if $kidname[numkid] <= 0:
					if polkid[numkid] = 0:$kidname = 'Masha'
					if polkid[numkid] = 1:$kidname = 'Misha'
				end

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

	if sick > 0 and polisickday ! day:
		if ninelsex = 0:
			act 'See a Doctor':
				cla
				*clr
				polisickday = day
				terrnd = rand(0, 1)

				if terrnd = 0:gt 'poli', 'drPP'
				if terrnd = 1:gt 'poli', 'ninel'
			end
		else
			act 'See Dr. Ninel':
				cla
				*clr
				polisickday = day
				gt 'poli', 'ninel2'
			end
		end
	end
	if sick <= 0 and horny >= 90 and ninelsex >= 1 and ninelday ! day:
		act 'Search for Dr Ninel':
			cla
			*clr
			ninelday = day
			ninelrand = rand(0, 2)

			if ninelrand = 0:
				'At the reception you skzali that Ninel in his office'

				act 'Go to Ninel':gt 'poli', 'ninel3'
			elseif ninelrand = 1:
				'At the reception you were told that today do not accept Ninel'

				act 'Leave the clinic':gt 'street'
			elseif ninelrand = 2:
				'At the reception you were told that Ninel today calls'

				act 'Leave the clinic':gt 'street'
			end
		end
	end

	if katjob > 0:act 'Visit the chief doctor':gt 'poli', 'glavdoc'
	if zub > 0:
		act 'Go to the dentist':
			cls
			zubpay = zub * 30000
			gs 'stat'
			'The dentist looked at you and said, prosthetics that will cost <<zubpay>> rubles'

			act 'Leave the clinic':gt 'street'

			if money >= zubpay:
				act 'pay for prosthetics':
					cls
					money -= zubpay
					minut += 60
					zub = 0
					gs 'stat'
					'You paid prosthetics and dentist within an hour completely put in order your teeth.'

					act 'Get away from the clinic':gt 'street'
				end
			end
		end
	end

	if anus > 5:
		act 'Go to the proctologist':
			cls
			minut += 15

			if analplugIN ! 0:analplugIN = 0

			gs 'stat'
			! WD: Remove Dupe Images ~ use 'images/picb/' not 'images/body/' as in '# body'
			'<center><img src="images/picb/<<anpic>>.jpg"></center>'
			'You''ve come to the office to the proctologist. He immediately asked you to undress from the waist down and tilt.'

			if anus <= 15:
				'The doctor examined your anus and said "Well , slightly distended anus, but no abnormalities."'
			elseif anus > 15 and anus <= 25:
				'The doctor examined your anus and said "You stretched anus and sphincter. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
			elseif anus > 25 and anus <= 35:
				'The doctor examined your anus and said "You have greatly distended anus, most likely your sphincter is not able to keep the intestinal gas. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
			elseif anus > 35:
				'The doctor examined your anus and said "oh my God! You need to be careful with his booty obraschatsya, you have the same here now fall intestine. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
			end

			if money >= 1000 and anus > 15 and proktologday ! day:
				act 'Checkout procedure':
					cls
					money -= 1000
					minut += 60
					proktologday = day
					anus -= 5
					gs 'stat'
					! WD: Remove Dupe Images ~ use 'images/picb/' not 'images/body/' as in '# body'
					'<center><img src="images/picb/<<anpic>>.jpg"></center>'
					'You paid for the procedure and the doctor an hour tinkering in your ass causing her to order.'

					act 'Get away from the clinic':gt 'street'
				end
			end

			act 'Leave the clinic':gt 'street'
		end
	end

	if glass > 0:
		act 'Go to the optometrist':
			cls
			gs 'stat'
			'Optometrist examined you and said that you can do laser vision correction 100 thousand. But from reading books eyesight can deteriorate again.'

			if glass = 1:'Doctor looking at you add, Of course you can buy glasses that will be better to look at you. 8,000 rubles.'

			act 'Leave the clinic':gt 'street'

			if money >= 8000 and glass = 1:
				act 'Buy Points (8,000 rubles)':
					cls
					money -= 8000
					minut += 60
					glass = 2
					gs 'stat'
					'You bought a new, more stylish glasses.'

					act 'Leave the clinic':gt 'street'
				end
			end

			if money >= 100000 and glass ! 0:
				act 'Pay for laser correction (100,000 rubles)':
					cls
					money -= 100000
					minut += 60
					blizoruk = 0
					glass = 0
					gs 'stat'
					'You paid for laser correction.'
					act 'Leave the clinic':gt 'street'
				end
			end
		end
	end
end

if $ARGS[0] = 'drPP':
	cla
	clr
	*clr
	minut += rand(3, 10)
	gs 'stat'
	'You sit in the corridor of coughing and ohayuschih old women waiting for their turn.'
	'Finally, the turn came'

	act 'Login to Account':
		cla
		*clr

		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/add-on/drPP.jpg"></center>'

		if drPP = 0:'At the table sits an elderly bald man felicitous appearance. "Hello, sick. My name is Peter, I am your local therapist - he says, looking at you through his glasses."'
		if drPP = 1:'Sit at the table Peter. He smiles at you and says, "Hello, sick."'

		drPP = 1
		'(You) - Hello, doctor.'
		'(Doctor) - What complain sick?'

		act 'Complain':
			cla
			*clr
			minut += 5
			'(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
			'(Doctor) - So-Low has a ...?'
			'(You) - Yes, a little.'
			'(Doctor) - Well, let''s hear you'

			act 'Follow the instructions of the doctor':
				cla
				minut += 20
				! WD: Correct Image path ~ "images/images/inBed/ninel03"
				'<center><img src="images/inBed/ninel03.jpg"></center>'
				'The doctor listened attentively your lungs, looked into his throat, gave a thermometer - to measure the temperature and finally concluded:'
				'(Doctor) - Do not worry - common cold - SARS. Buy in a drugstore here these drugs, lie in bed a couple of days and everything will be alright. The main thing - do not supercool.'
				'(You) - Thank you, Doctor. Goodbye.'

				act 'Go home':gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'ninel':
	cla
	clr
	*clr
	minut += rand(3, 15)
	gs 'stat'
	'You sit in the corridor of coughing and ohayuschih old women waiting for their turn.'
	'Finally, the turn came'

	act 'Login to Account':
		cla
		*clr

		if ninelmet = 0:'At the table sits a pretty young girl in a light robe. Robe unbuttoned so that does not hide her small but beautiful gud. "Hello My name is Ninel Pavlovna, I replaces your local therapist - she said, scrutinizing you."'
		if ninelmet = 1:'Ninel sitting at the table. She smiles at you and says, "Hello, World."'

		if horny < 30:
			act 'Hello, Doctor':
				cla
				*clr
				ninelmet = 1
				minut += 5
				'<center><img src="images/add-on/exam00.jpg"></center>'
				'(Dr.) Good afternoon. At that complain?'
				'(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
				'(Doctor) - Temperature is?'
				'(You) - Yes, a little.'
				'(Doctor) - Clear. Undress.'

				act 'Follow the instructions of the doctor':
					cla
					*clr
					minut += 20
					'<center><img src="images/add-on/exam01.jpg"></center>'
					'The doctor carefully proslushala your lungs zaglyanula the throat, dala thermometer - to measure the temperature and finally zaklyuchila:'
					'(Doctor) - SARS - nothing serious. Observe bed rest and take these medications here. A couple of days will be healthy. And avoid hypothermia.'
					'(You) - Thank you, Doctor. Goodbye.'

					act 'Go home':gt 'street'
				end
			end
		else
			act 'Hello, Doctor':
				cla
				*clr
				'<center><img src="images/add-on/exam10.jpg"></center>'
				'(Dr.) Good afternoon. At that complain?'
				'(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
				'(Doctor) - Temperature is?'
				'(You) - Yes, a little.'
				'(Doctor) - Clear. Undress. Fully'

				act 'Undress':
					cla
					*clr
					horny += 10
					'<center><img src="images/add-on/exam12.jpg"></center>'
					'You stand perd doctor completely naked and confused pytaetel hide behind hands.'
					'The doctor comes to you and gently hugs the shoulders:'
					'(Doctor) - What are you, my dear - do not be shy. I''m a doctor. What''s your name?'
					'(You timidly) - <<$name>> ...'
					'(Doctor) - Do not worry, <<$name>> - I heal you. Come on - breathe deeply.'

					act 'Breathe':
						cla
						clr
						*clr
						horny += 10
						gs 'stat'
						'<center><img src="images/add-on/exam13.jpg"></center>'
						'Dr. vylushivaet your lungs. Her hands were light and gentle touching stethoscope frankly laskiayut your chest.'
						'You feel the growing excitement'
						'(Doctor) - Here we go. Taper open your mouth - ah-ah-ah-ah ...'

						act 'A-ah':
							cla
							*clr
							'<center><img src="images/add-on/exam14.jpg"></center>'
							'You open your mouth and the doctor examines your throat reddened'
							'(Doctor) - Well. Now let''s took my temperature. Sit on the couch and spread your legs.'
							'(You) - Why?'
							'(Doctor) - We measured rectally - so reliable.'
							'(You) - Uh-uh ...'
							'(Doctor) - Do not worry - it does not hurt.'

							act 'Substitute ass':
								cla
								clr
								*clr
								horny += 10
								gs 'stat'
								'<center><img src="images/add-on/exam15.jpg"></center>'
								'The doctor arranged for you on the couch in this position that you were red, smeared lubricant between your legs and gently introduced a thermometer into the anus. It really does not hurt, you understand - even pleasant.'
								'The doctor began to slowly move the thermometer back and forth in your ass and the fingers of the other hand - to stroke your pussy. Thanks lbrikantu her fingers sklzyat very easily and gently.'
								'You feel that you are excited stronger. Your nipples harden, pussy doctor flowed at hand ...'

								act 'Doctor, what''s happening?':
									cla
									clr
									*clr
									minut += 10
									horny += 10
									gs 'stat'
									'<center><img src="images/add-on/exam16.jpg"></center>'
									'The doctor takes a thermometer and begins openly caress your pussy moisten with desire.'
									'Are you confused and horrified by her behavior, but she was so gentle, and you are so excited that you simply can not resist. The only thing that you manage - is choking sprsit:'
									'(You) - Doctor, what are you doing? What''s going on?'
									'(Doctor) - A - felt! I knew immediately that you were one of us, and therefore I can use his power quietly.'
									'(You) - So you''re a magician, too?'
									'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
									'(You) - No, I do not remember ...'
									'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
									'(You) - So ..?'
									'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
									'(You) - And what in return?'
									'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
									'(You) - Then of course - I agree.'
									'(Doctor) - Then get on your knees on the couch.'

									act 'Kneel':
										cla
										*clr
										'<center><img src="images/add-on/exam17.jpg"></center>'
										'You knelt down and turned back to Ninel. She took off her robe, meanwhile, remained in her stocking feet and you gasped when he saw her strapon.'
										'Dr. lubed dildo and your pussy lubricated and grinned:'
										'(Doctor) - Well, baby, let''s curable!'

										act 'Ah-ah-ah!':
											cla
											clr
											*clr
											minut += 10
											horny = 100
											gs 'stat'
											'<center><img src="images/add-on/exam18.jpg"></center>'
											'With these words she has driven a powerful push in you dildo.'
											'You gasped in surprise, then again, and again, and yet - already with pleasure.'
											'Doctor fucked you familiar confident movements, moaning with every jolt - it seems she is not afforded less fun than you - you were just ecstatic. Unusual decor, shame and skill Ninel quickly led you to the peak'

											act 'I''m going to come!':
												cla
												*clr
												'<center><img src="images/add-on/exam19.jpg"></center>'
												'(You) - I''m going to come! - You shout - Please, please, please!'
												'Ninel topples onto the couch, pulling you along, you find yourself at the top and start frantically jumping on an artificial penis, screaming and vzvizkivaya acute, almost unbearable pleasure.'
												'A few more movements, and you start to cum, screaming and twitching in a paroxysm of incredibly long orgasm.'
												'(Doctor) - Now it''s my turn. Come on, girl - try.'

												act 'Ninel humor':
													cla
													clr
													*clr
													horny = 0
													orgasm += 1
													lesbian += 1
													ninelsex += 1

													if ninelsex = 1:girl += 1

													SUB += 1
													vagina += 1
													sick = 0
													health = vital * 10 + stren * 5 + 1000
													willpower = intel * 5 + will * 5 + 1000
													manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
													gs 'stat'
													'<center><img src="images/add-on/exam19a.jpg"></center>'
													'Ninel strap breaks and presses his face to you raspalennye flowing pussy juices. You begin to wield her tongue in a few seconds and comes in Ninel orgzazme. She screams and beats his chest and squeezing out of her vagina in your face squirting thick whitish fluid'

													act 'Dress':
														cla
														*clr
														'<center><img src="images/add-on/exam11.jpg"></center>'
														'With trembling hands, you start natyagivavt panties. Ninel already slipped the robe only her flushed face recalls rough sex, which she just worked with you.'
														'(Ninel) - Well, how do you feel?'
														'(You) - Ooh ... Just perfect - you answer and only then realize how much you are right - the disease has disappeared, you are full health and in good spirits. A sweet bouquet exhaustion makes this even more pleasant sensations'
														'(Ninel) - Well, you see. It''s magic, baby. Mm-m ... You''re just a miracle - a long time I did not get so much pleasure from their magic. If you get sick again - just come to me or calling home. Well, if you just want to spend your time - look for me in the clinic.'
														'You promised to be sure to find her, cleaned up and left'

														act 'Get out of the clinic':gt 'street'
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'ninel2':
	cla
	*clr
	'You come to the office and Ninel contemptuously throwing old ladies sitting in the hallway:"No line" - come into the office.'

	act 'Login to Account':
		cla
		*clr
		'<center><img src="images/add-on/exam00.jpg"></center>'
		'Ninel looks up from some medical scribbling, to know you and smiles:'
		'(Ninel) - Hi, <<$name>>. Again ill?'
		'(You coughed into his fist) - Yeah. I''ll fly?'
		'(Ninel) - Sure, baby. Undress - I''ll listen.'
		'(You) - Why? You''re a magician ...'
		'(Ninel laughs) - Silly. How could you not know much about magic. I''m must to know what will be treated, otherwise it will happen as the old song - make like a thunderstorm, and got a goat. Magic - the exact thing'
		'(You) - Here''s how ... Well then, of course.'

		act 'Undress':
			cla
			*clr
			horny += 10
			'<center><img src="images/add-on/exam02.jpg"></center>'
			'You undress and Ninel hears your lungs. As usual, her arms are light and tender and touching her stethoscope on your chest swell sultry heat'
			'(Ninel) - Yes ... You again wheezing. Lets say "ah-ah-ah"'

			act 'A-a-a':
				cla
				*clr
				'<center><img src="images/add-on/exam03.jpg"></center>'
				'You open your mouth and carefully inspect your Ninel Sore throat'
				'(Ninel) - Painting familiar. What are you? Absolutely not kept. Temperature there?'
				'(You with a smile) - Pit.'
				'(Ninel sly) - Like it? And just afraid ... The first major Down on the flank and knees to her chest tighten.'

				act 'Lie on the couch':
					cla
					clr
					*clr
					horny += 10
					minut += 10
					gs 'stat'
					'<center><img src="images/add-on/exam04.jpg"></center>'
					'You take the desired position and Ninel starts fucking your ass thermometer. You get excited, your pussy lips are opened, one begins to ooze grease. You moan softly'
					'(Ninel) - What, baby, like it? Come on let''s see - how.'

					act 'Substitute pussy':
						cla
						clr
						*clr
						horny += 10
						minut += 5

						gs 'stat'
						'<center><img src="images/add-on/exam06.jpg"></center>'
						'You roll over onto his back and pushes the legs. Ninel gets vvobit Speculum and flushed it in your vagina. You quietly ohaete from udovolstvaiya and Ninel echoes you passionate heavy sigh. It looks like your kind of wide-open vulva her great-ons'

						act 'Oh-h ..!':
							cla
							clr
							*clr
							horny = 100
							minut += 15
							gs 'stat'
							'<center><img src="images/add-on/exam05.jpg"></center>'
							'Overcome with passion, Ninel quickly takes off her robe, showing sticking out between his legs and pulled the strap to your lips'
							'You eagerly kissing, while skilled fingers Ninel play with your excited clitoris, causing warm waves of pleasure through your body to disperse'
							'(You) - Fuck me! Hurry! - You ask. Ninel grins, continuing to tease your clitoris hand'
							'(Ninel) - Ask me'
							'(You) - Fuck me - please! Rather, I ask!'
							'(Ninel) - Ask better. I see the way you want it'

							act 'Beg and pray':
								cla
								*clr
								minut += 20
								'<center><img src="images/add-on/exam07.jpg"></center>'
								'(You) - Please, please, please! Fuck me! Do with me what you want - I''m all yours! Rather only - please, soon!'
								'Ninel puts on a strap and snarling drives it in your bosom lust blazing. You cried out Put your feet up, trying to make rubber penis entered you as deeply as possible.'
								'Ninel fucks you faster, moaning and groaning with every jolt, and you moan and podmahivat struggled.'
								'(Ninel) - On your knees ..! Turn around! - Choking doctor ordered'

								act 'Substitute ass':
									cla
									clr
									*clr
									horny = 0
									minut += 10
									orgasm += 1
									lesbian += 1
									SUB += 1
									vagina += 1
									sick = 0
									health = vital * 10 + stren * 5 + 1000
									willpower = intel * 5 + will * 5 + 1000
									manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
									gs 'stat'
									'<center><img src="images/add-on/exam08.jpg"></center>'
									'Moaning with excitement you get on your knees and bulging ass to Ninel it easier to get in, but it is in no hurry'
									'(You) - Come on - faster! - Ask you - I almost ..! - But Ninel panting orders:'
									'(Ninel) - Ask! Beg, plead me little mokroschelka!'
									'(You) - Please, please, please-ah-ah-ah! - You shout - Fuck me, fuck! I want to come! Yes - I''m a whore, I mokroschelka, but please, please, please, let me finish! Fuck-me-a-ah!'
									'Strap on your sticks into the inflamed vagina and nachenaet peck like a jackhammer. Blink and you pierces wild orgasm. You scream in agony and beats, your rules knees weakened and you fall on kusheku shuddering in the throes of sensual and Ninel all stops and orgasm does not end ...'
									'Finally you end immediately and Ninel commands:'
									'(Ninel) - A well appease me now, little slut. Come on - how do you know how!'

									act '...':
										cla
										*clr
										'<center><img src="images/add-on/exam09.jpg"></center>'
										'You''s turnover on the back and Ninel sits on your face. You diligently oruduete tongue and lips obihazhivaya its wide-open jaws and swollen erect clit, and she was screaming and sobbing crotch crawl across your face until he finally comes in a scream and starts to cum. She cums long, yelling, shaking like a fever and abundantly filling your face thick and sticky liquid'

										act '...':
											cla
											*clr
											horny += 20
											'<center><img src="images/add-on/exam09a.jpg"></center>'
											'When he finished, Ninel rises and slowly dressed, showing you their perkrasnoe body. It''s unbelievable, but you again rises excitement.'
											'Ninel somehow sees this and smiles'
											'(Ninel) - Oh, no - enough is enough. But you come in something else - fun.'
											'And you will realize that once again will be a little too. You are healthy, satisfied - and thanks for that.'

											act 'Thank Ninel and go':gt 'street'
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'ninel3':
	cla
	*clr
	'You come to the office and Ninel contemptuously throwing old ladies sitting in the hallway:"No line" - come into the office.'

	act 'Login to Account':
		cla
		*clr
		'<center><img src="images/add-on/exam10.jpg"></center>'
		'Ninel looks up from some medical scribbling, to know you and smiles:'
		'(Ninel) - Hi, <<$name>>. Again ill?'
		'(You with feigned suffering grimace on his face) - Oh, Doctor - my pussy is burning, and all flows. Perhaps she is seriously ill.'
		'(Ninel smiling) - my poor child. Now we are going to fly it.'

		act 'Tear off her clothes':
			cla
			*clr
			'<center><img src="images/add-on/polsex01.jpg"></center>'
			'Groaning with impatience you tear off her clothes. Ninel also took off the robe and the front of your face rocked strap.'
			'(Ninel) - Suck it, baby. Make it hot and wet, as you yourself'
			'You bites his lips in a dildo and start sucking, squishing and abundantly irrigating his saliva. You can see how excited looking at this Ninel.'

			act 'Fuck me!':
				cla
				*clr
				minut += 10
				'<center><img src="images/add-on/polsex02.jpg"></center>'
				'Remembering that this Ninel loves you begin to beg her to fuck you soon. You do not even need to pretend to be this - the desire to literally burn you.'
				'Ninel finally heed the request. She rudely puts you on your knees and begins to drive the strap and measured in your inflamed vagina. You ahaete screams and each push. Your feet are weakening.'

				act 'Fall on the couch':
					cla
					*clr
					minut += 20
					'<center><img src="images/add-on/polsex03.jpg"></center>'
					'You fall on the couch. Ninel knocks you on your side and play continues. You drawl and voluptuously moan from her breasts too pulled out a deep groan and bestial growl'
					'My God, as you well.'
					'(Ninel panting) - I can not - let itself ..!'

					act 'Let Ninel ride you':
						cla
						clr
						*clr
						horny = 0
						minut += 10
						orgasm += 1
						lesbian += 1
						SUB += 1
						manna += 15
						willpower += 15
						vagina += 1

						gs 'stat'
						'<center><img src="images/add-on/polsex04.jpg"></center>'
						'You obediently mnyaete pose. Ninel leans back on the couch, and you sit down on top of her and strung on a dildo.'
						'You jump on the strap, and squealing nadrachivaya fingers clit when Ninel beneath you starts to twitch and moan. You understand that it ends, and it works as a trigger - you go in orgasm.'
						'Few seconds, you are fighting with Ninel and scream in paroxysms of passion, and then fall exhausted on the couch'
						'(You) - Thank you, dear. It was great ...'
						'(Ninel) - Oh yeah, <<$name>>. Come again.'

						act 'Freshen up and go':gt 'street'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'glavdoc':
	minut += 5
	'You logged in and asked whether you take on the job.'
	'Chief doctor looked at you. "Oh yeah, that girl you was talking about Catherine. Okay, listen working conditions"'
	'"Work will be on weekdays, come with 8 to 9 hours, and come out on the shift will work up to 16 hours. Do not come to you this day will not be counted in the salary. Salary paid on 25th, the spent per shift - 1000 rubles. "'
	'"Labor should hand over to the personnel department. You understand, will work?"'

	if (work = 0 and workshop = 0 and cheatWork = 0) or (workshop = 0 and cheatWork = 1):
		act 'Find a job':
			cla
			workhosp = 1
			work = 1
			'You classify working in the personnel department.'

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

	if workhosp = 1:act 'Resign':gt 'poli', 'discharge'

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

if $ARGS[0] = 'beginwork':
	cla
	*clr
	'<center><b><font color="maroon">Clinic</font></b></center>'
	'<center><img src="images/img/spaln/hospital.jpg"></center>'
	'You have replaced the clinic.'

	act 'Start work':
		smena += 1
		gt 'WorkHosp', 'start'
	end

	act 'Resign':gt 'poli', 'discharge'

end

if $ARGS[0] = 'discharge':
	cla
	minut += 10
	workhosp = 0
	work = 0
	pay = smena * 1000
	money += pay
	smena = 0
	'Chief doctor looked at you:"Here is your payment <<pay>> rubles and employment history. Goodbye."'

	act 'Leave':gt 'street'
end

if $ARGS[0] = '0':
	cla
	*clr
	'<center><img src="images/img/spaln/hospsex1.jpg"></center>'
	'During the examination, the doctor starts to stick to you, clearly alluding to the intimate relationship'

	act 'Send it':gt 'poli', 'start'

	act 'Fun':
		picrand = 11
		guy += 1
		xgt 'sex', 'var'
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/img/spaln/hospsex2.jpg"></center>'
	'You examine the two doctors, they touch you everywhere clearly go beyond what is permitted'

	act 'Send them':gt 'poli', 'start'

	act 'Fun':
		picrand = 11
		guy += 2
		xgt 'sexdvoe', 'var'
	end
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/img/spaln/hospsex3.jpg"></center>'
	'Going to the office you caught nurse africana stoyuschee kneeling before the doctor with smacking sucking his cock.'

	act 'Leave':gt 'poli', 'start'

	act 'Login to Account':
		cla
		*clr
		'<center><img src="images/img/spaln/hospsex4.jpg"></center>'
		'When you walked in, jumped out of the doctor''s office, and unmet ostavshayusya nurse glared at you, but after a moment in her eyes flashed light robe and dropping it came to you and vskhvativ one-handed for a second back pressed to his chest drew you to your'

		act 'Leave':gt 'poli', 'start'

		act 'Let her':
			cla
			*clr
			guy += 1
			girl += 1
			lesbian += 1
			'<center><img src="images/img/spaln/hospsex5.jpg"></center>'
			'She prispustila with you pants and bent his couch over, began to process your pussy with his tongue'

			act 'Lick her':
				cla
				*clr
				'<center><img src="images/img/spaln/hospsex6.jpg"></center>'
				'You oprakinuli her on the couch and dug his lips in her black pussy, she exuded an smell that just drives you crazy, you could not put it down and licked her pussy to put their tongue inside pussy and anus, in this state you found and returned the doctor.'

				act 'Proceed three':picrand = 11 & gt 'podrsex', 'var'
			end
		end
	end
end

--- poli ---------------------------------
# rinok
if $ARGS[0] = 'start':
	$rinbuy1 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 50 > money:'You do not have enough money.'

		if portion * 50 <= money:
			fairy += portion
			money -= portion * 50
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought dishwashing detergent and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy2 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 150 > money:'You do not have enough money.'

		if portion * 150 <= money:
			poroshok += portion
			money -= portion * 150
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought detergent and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy3 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 150 > money:'You do not have enough money.'

		if portion * 150 <= money:
			cltarelka += portion * 3
			money -= portion * 150
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought plates and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy4 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 500 > money:'You do not have enough money.'

		if portion * 500 <= money:
			kosmetica += portion * 25
			money -= portion * 500
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought cosmetics and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy5 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 200 > money:'You do not have enough money.'

		if portion * 200 <= money:
			stanok += portion * 10
			money -= portion * 200
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought razor and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy6 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 150 > money:'You do not have enough money.'

		if portion * 150 <= money:
			tampon += portion * 20
			money -= portion * 150
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You bought tampons and paid the money to the cashier.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}

	$rinbuy7 = {
		cla
		*clr
		portion = input ("How much you want to buy?")

		if portion <= 0:portion = 1
		if portion * 200 > money:'You do not have enough money.'

		if portion * 200 <= money:
			clrbelo += portion
			money -= portion * 200
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You pay the cashier and bought clothes.'
		end

		act 'Move away from the counter':gt 'rinok', 'start'
	}
	$rinbuy8 = {
		if money >= 1000 and bikini < 1:
			cla
			*clr
			money -= 1000
			bikini = 1
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You pay the cashier and bought a swimsuit.'

			act 'Move away from the counter':gt 'rinok', 'start'
		else
			'You do not have enough money.'
		end
	}

	$rinbuy9 = {
		if money >= 1000 and umbrella < 1:
			cla
			*clr
			money -= 1000
			umbrella = 1
			'<center><img src="images/etogame/kassa2.jpg"></center>'
			'You pay the cashier and bought an umbrella.'

			act 'Move away from the counter':gt 'rinok', 'start'
		else
			'You do not have enough money.'
		end
	}

	cla
	*clr
	minut = minut + 5
	mag = 1
	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	'<center><b><font color="maroon">Trade</font></b></center>'
	'<center><img src="images/etogame/rinok.jpg"></center>'
	'<a href="exec:dynamic $rinbuy1">Dishwashing detergent - 50 rubles</a> <a href="exec:dynamic $rinbuy2">laundry detergent - 150 rubles</a> <a href="exec:dynamic $rinbuy3">a of 3 plates - 150 rubles</a> <a href="exec:dynamic $rinbuy4">Cosmetics - 500 rubles</a> <a href="exec:dynamic $rinbuy5">razor - 200 rubles</a> <a href="exec:dynamic $rinbuy6">tampons - 100 rubles</a> <a href="exec:dynamic $rinbuy7">Underwear - 200 rubles</a>'

	if bikini < 1:'<a href="exec:dynamic $rinbuy8">Swimsuit - 1,000 rubles</a>'
	if umbrella < 1:'<a href="exec:dynamic $rinbuy9">Umbrella - 1,000 rubles</a>'

	'On one of the tents hanging listing <a href="exec:gt ''clothing'', ''view_clothing_list'', ''sell''">"Accept the things to implement"</a>'

	if analplugIN = 1 and tanga = 0 and ski = 1 or analplugIN = 1 and tanga = 0 and glamur = 1:
		nurand = rand(0, 100)

		if nurand >= 80:
			manna -= 5
			SUB += 1
			horny += SUB
			nudity += 1
			'You feel that someone gently touched <a href="exec:gt ''etoexhib'', ''pos15''">your hand buttocks</a>'
		end
	end

	clr
	gs 'stat'
	gs 'time'

	act 'Leave':
		cla
		minut += 5
		gt 'street'
	end

	if workrin = 1:
		if week = 2 or week = 4 or week = 6:
			if hour < 9:
				'Arthur item is waiting for you.'
				act '<b>Accept goods</b>':
					cla
					*clr
					hour = 9
					minut = 0
					prodpayum = 1200
					'Arthur unloaded stuff from his ushatannoy Shokhi to the tray and gave you. You started to hang clothes on the tent.'
					'Before leaving Arthur gives you instructions. "Sell what you want, but that night I would have given to each item sold by 1000. And to gain by selling no less than <<arturplan>> rubles."'

					act 'To work.':gt 'rinwork', 'start'
				end
			end
		end
		act 'Retire from work':
			cla
			work = 0
			workrin = 0
			'You retired from work and took labor.'

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

	if (work = 0 and workrin = 0 and cheatWork = 0) or (workrin = 0 and cheatWork = 1):
		nl
		'On one of the tents hanging ad "Need females saleswomen. Paychecks big."'

		act 'Approach the owner of the tents ad':
			cla
			*clr
			'Hi, my name is Arthur. I am the master of the tent, I need a saleswoman. I do not cope. Well? Will you?'
			'Paying a percentage of wages. Will operate on Tuesdays, Thursdays and Saturdays. With 8 to 14.'
			'Work on labor.'

			act 'Leave':gt 'rinok', 'start'

			act 'Find a job':
				cla
				work = 1
				workrin = 1
				arturplan = 5000
				'You got a job to Arthur and gave him a career.'

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

	if palto < 1:
		'On the market sell for winter jackets - 5,000 rubles'

		if money >= 5000:
			act 'Buy a down jacket (5,000 rubles)':
				cla
				money -= 5000
				palto = 1
				$palto = 'Chinese wear'
				'You bought a down jacket.'

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

	if money >= 1500:
		i = 1
		:loopjeans
			if jeans[i] = 0:dynamic 'act ''Look at jeans <<i>>'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''jeans'', <<i>>, 1500'
			i += 1
		if i <= 5:jump 'loopjeans'
	end

end

--- rinok ---------------------------------
# rinwork
if $ARGS[0] = 'start':
	$answerrin = {
		if tipred = pokti:
			if pokvnirand = 0:
				pokpay = rand(1000, 1200)
			elseif pokvnirand = 1:
				pokpay = rand(1200, 1500)
			elseif pokvnirand = 2:
				pokpay = rand(1500, 2000)
			end
		else
			$rinitog = '<<$poktip>> puts the thing in place and leaves'
			pokupatel = 0
		end
	}

	$answerrin2 = {
		act 'Name the price':
			cla
			prodpay = input ("Enter the selling price")

			if prodpay < 1000:prodpay = prodpayum

			'You a price in <<prodpay>> rubles'

			if prodpay <= pokpay:
				poknorand = rand(1, 100 + vnesh)

				if poknorand >= 10:
					rinmon += prodpay
					rinvesh += 1
					'Buyer collected and paid item <<prodpay>> rubles'

					act 'Trading on':gt 'rinwork', 'start'
				else
					'Buyer twirls thing in your hands <<prodpay>> RR is too expensive'
					dynamic $answerrin3

					act 'Less I can not (take the thing)':gt 'rinwork', 'start'
				end
			elseif prodpay > pokpay and prodpay <= pokpay + 100:
				poknorand = rand(1, 100 + vnesh)

				if poknorand >= 10:
					'Buyer twirls thing in your hands <<prodpay>> RR is too expensive'
					dynamic $answerrin3

					act 'Less I can not (take the thing)':gt 'rinwork', 'start'
				else
					'Buyer puts thing into place and leaves'

					act 'Trading on':gt 'rinwork', 'start'
				end
			elseif prodpay > pokpay + 100:
				'Buyer puts thing into place and leaves'

				act 'Trading on':gt 'rinwork', 'start'
			end
		end
	}

	$answerrin3 = {
		if prodpay >= 1100:
			act 'Reduce the price by 100 rubles':
				cla
				'You have reduced the price by 100 rubles.'
				poknorand = rand(1, 100 + vnesh)

				if poknorand >= 10:
					rinmon += prodpay - 100
					rinvesh += 1
					'Buyer collected and paid item <<prodpay - 100>> rubles'

					act 'Trading on':gt 'rinwork', 'start'
				else
					'Buyer puts thing into place and leaves'

					act 'Trading on':gt 'rinwork', 'start'
				end
			end
		elseif prodpay >= 1050:
			act 'Reduce the price by 50 rubles':
				cla
				'You have reduced the price by 50 rubles.'
				poknorand = rand(1, 100 + vnesh)

				if poknorand >= 30:
					rinmon += prodpay - 50
					rinvesh += 1
					'Buyer collected and paid item <<prodpay - 50>> rubles'

					act 'Trading on':gt 'rinwork', 'start'
				else
					'Buyer puts thing into place and leaves'

					act 'Trading on':gt 'rinwork', 'start'
				end
			end
		end
	}

	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Trade</font></b></center>'
	'<center><img src="images/etogame/rinok.jpg"></center>'
	'You stand in the tray with the clothes in anticipation of buyers.'
	'At the box office <<rinmon>> rubles, Sales <<rinvesh>> things.'
	'The average price on the market <<prodpayum>>'

	if hour = 14:
		'Arthur came to you and you started to calculate how much you should give to Arthur.'

		act 'Giving money to Arthur':
			cla
			*clr
			rinart = rinvesh * 1000
			rinmon -= rinart
			money += rinmon
			gs 'stat'
			'You gave Arthur <<rinart>> per sold <<rinvesh>> things.'
			'Today you have earned <<rinmon>> rubles'

			if rinart < arturplan:
				arturnoo += 1
				'Uh, <<$name>>, bad work, not enough money. You''re so razorish me completely.'
			else
				arturyes += 1
				'Maladets <<$name>>, good job.'
			end

			if arturnoo > arturyes:arturnoo = arturnoo - arturyes & arturyes = 0
			if arturyes > arturnoo:arturyes = arturyes - arturnoo & arturnoo = 0
			if arturnoo = arturyes:arturnoo = 0 & arturyes = 0

			rinmon = 0
			rinvesh = 0

			if arturnoo > 10:
				arturnoo = 0
				work = 0
				workrin = 0
				'Uh, you''ve fucked savsem. Here''s your labor. Hit the road that I did not see you anymore!'

				act 'Leave':gt 'street'

				exit
			end

			rinrand = rand(1, 100)

			if rinrand < vnesh and palevorin = 0 and rinhoz = 0:
				'(Arthur) - Wai <<$name>>, you and I have not even met properly. Come into the container, ate barbecue, drink and get acquainted.'

				act 'Refuse':
					cla
					'You have become excuses Arthur told you. Wai, why insult, you have here the tray is not cleaned, dust, dirt, I''m fine and I can take you.'

					act 'Okay, let''s go have a drink':gt 'RynokHoz', 'the_beginning'

					act 'No.':
						cla
						arturplan += 1000

						if money >= 1000:
							money -= 1000
							'Wai, you dirty things, to give a thousand rubles, which is fine. Arthur gave you money.'
						else
							'Okay, go already.'
						end

						act 'Leave.':gt 'street'
					end
				end

				act 'Come':gt 'RynokHoz', 'the_beginning'

				exit
			elseif rinrand < vnesh and palevorin = 0 and rinhoz = 1:
				'(Arthur) - Wai <<$name>>. Come into the container, ate barbecue, drink, rest. He walked right up to you and slapped on the ass with his hand.'

				act 'Refuse':
					cla
					'You become otnekivatsya Arthur told you. Wai, why insult, you have here the tray is not cleaned, dust, dirt, I''m fine and I can take you.'

					act 'Okay, let''s go have a drink':gt 'RynokHoz', 'the_beginning'

					act 'No':
						cla
						arturplan += 1000

						if money >= 1000:
							money -= 1000
							'Wai, you dirty things, to give a thousand rubles, which is fine. Arthur gave you money.'
						else
							'Okay, go already.'
						end

						act 'Leave.':gt 'street'
					end
				end

				act 'Come':gt 'RynokHoz', 'the_beginning'

				exit
			end

			act 'Leave work':gt 'street'
		end

		exit
	elseif hour < 14:
		pokrand = rand(0, 1)

		if pokrand = 0:
			$pokup = 'Buyers can not see.'
			pokupatel = 0
			''
			'Market is Aunt Katya with trolley in which it carries cakes and coffee.'
		else
			pokupatel = 1
			poktiprand = rand(0, 7)

			if poktiprand = 0:$pokup = 'To the tray approached middle-aged man.' & $poktip = 'Man' & pokti = 1
			if poktiprand = 1:$pokup = 'To the tray approached by a young man.' & $poktip = 'Guy' & pokti = 2
			if poktiprand = 2:$pokup = 'Guy came to the tray teenager.' & $poktip = 'Boy' & pokti = 3
			if poktiprand = 3:$pokup = 'A woman came up to the tray.' & $poktip = 'Woman' & pokti = 1
			if poktiprand = 4:$pokup = 'Girl came to the tray.' & $poktip = 'Girl' & pokti = 2
			if poktiprand = 5:$pokup = 'To the tray approached teen girl.' & $poktip = 'Girlfriend' & pokti = 3
			if poktiprand = 6:$pokup = 'Approached the old man to the tray.' & $poktip = 'Old man' & pokti = 0
			if poktiprand = 7:$pokup = 'Grandma went to the tray.' & $poktip = 'Granny' & pokti = 0
		end

		'<b><<$pokup>></b>'

		if pokupatel = 1:
			act 'What do you want?':
				cla
				minut += 15
				pokvnirand = rand(0, 2)

				if pokvnirand = 0:
					'<<$poktip>> without interest examines selling things.'
				elseif pokvnirand = 1:
					'<<$poktip>> with interest examining selling things.'
				elseif pokvnirand = 2:
					'<<$poktip>> picks up the item.'
				end

				!!dynamic $answerrin
				act 'Now it is very fashionable':
					cla
					tipred = 3
					dynamic $answerrin
					'<<$rinitog>>'

					if pokupatel = 0:act 'Further':gt 'rinwork', 'start'

					if pokupatel = 1:
						'<<$poktip>> asks you for a price'
						dynamic $answerrin2
					end
				end

				act 'Thing is very high quality and reliable':
					cla
					tipred = 1
					dynamic $answerrin
					'<<$rinitog>>'

					if pokupatel = 0:act 'Further':gt 'rinwork', 'start'

					if pokupatel = 1:
						'<<$poktip>> asks you for a price'
						dynamic $answerrin2
					end
				end

				act 'Give not expensive':
					cla
					tipred = 0
					dynamic $answerrin
					'<<$rinitog>>'

					if pokupatel = 0:act 'Further':gt 'rinwork', 'start'

					if pokupatel = 1:
						'<<$poktip>> asks you for a price'
						dynamic $answerrin2
					end
				end

				act 'You are very':
					cla
					tipred = 2
					dynamic $answerrin
					'<<$rinitog>>'

					if pokupatel = 0:act 'Further':gt 'rinwork', 'start'

					if pokupatel = 1:
						'<<$poktip>> asks you for a price'
						dynamic $answerrin2
					end
				end
			end
		end

		act 'Laze around (0:15)':
			minut += 15
			gt 'rinwork', 'start'
		end

		if hour = 9:
			rintakrand = rand(0, 5)

			if rintakrand = 0:
				$rintak = 'The tray in front of Hassan unloads clothes saleswoman Nadia.'

				act 'See Hassan and Nadia':
					cla
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:'Nadia Hassan utters. "Today you will sell more, and then the fine ladies, I need the money."'
					if talkrand = 1:'Hassan opens trunks and puts clothes on the counter.'
					if talkrand = 2:'Hassan drags trunks to his tray.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 1:
				$rintak = 'In the next tray Abdul talking loudly gives clothes saleswoman Anna.'

				act 'Look at Abdul and Anna':
					cla
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:'Abdul swears. "You''re fucked, you can not sell anything!" Anna retorts, "you told me so rotten shit for sale give, take it nobody wants."'
					if talkrand = 1:'Abdul slapped ass Anna, she pretended that nothing happened.'
					if talkrand = 2:'Abdul drags trunks to his tray.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 2:
				$rintak = 'Abdul Hassan and stand beside your tray and about something guttural talking.'

				act 'View on Caucasians':
					cla
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:'Abdul Hassan and continue to talk about something, you do not know the language, and what they say can not understand.'
					if talkrand = 1:'Abdul Hassan pyalyatsya you and discussing what is yuk.'
					if talkrand = 2:'Abdul looks at you and says Hassan, "Look what a girl, sponges persik, wah."'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 3:
				$rintak = 'Anna hanging clothes in the tray and shouting with Nadia.'

				act 'Chat with sex':
					cla
					annaQW += 1
					NadiaQW += 1
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:
						'Anya raskazyvaet that her skirt had to alter, so here is a Jew great tailor, he works in an office building.'

						if clener = 0:clener = 1
					else
						'Nadia tells her how the subway molested what that pervert ass rubbed against a member.'
					end

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 4:
				$rintak = 'Arthur is talking about something with Abdullah.'

				act 'View on Caucasians':
					cla
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:'Abdul and Arthur continue to talk about something, you do not know the language, and what they say can not understand.'
					if talkrand = 1:'Abdul and Arthur pyalyatsya you and discussing what is yuk.'
					if talkrand = 2:'Abdul looks at you and says Arthur, "Look what a girl, sponges persik, wah."'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 5:
				$rintak = 'Arthur, Abdul Hassan and neighing loudly and talk about something not on the plain language.'

				act 'View on Caucasians':
					cla
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:'Caucasians continue to talk about something, you do not know the language, and what they say can not understand.'
					if talkrand = 1:'Caucasians pyalyatsya you and discussing what is yuk.'
					if talkrand = 2:'Abdul looks at you and says other Caucasians, "Look what a girl, sponges persik, wah."'

					act 'Further':gt 'rinwork', 'start'
				end
			end

			'<<$rintak>>'
		elseif hour = 10:
			rintakrand = rand(0, 5)

			if rintakrand = 0:
				$rintak = 'Hassan sitting on a chair dejectedly cheburek chews and talks with his mouth full with a saleswoman Nadia.'

				act 'See Hasan':
					cla
					minut += 15
					'Hassan says Nadia "Nadia, zachem ti refuse? Encroach Shlyk, have some wine."'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 1:
				$rintak = 'The tray is sitting in front of Nadia and crossword puzzles.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW += 1
					minut += 15
					'Nadia leaves the crossword and willingly support the conversation about any nonsense.'

					if clener = 0:
						clener = 1
						'Nadia tells about a Jew tailor working in an office building.'
					end

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 2:
				$rintak = 'The tray in front of buyers came to Nadia and she fusses before laying them goods.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW -= 1
					minut += 15
					'Nadia is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 3:
				$rintak = 'In the next tray Anna drinking coffee.'

				act 'Chat with Anna':
					cla
					annaQW += 1
					!!NadiaQW -= 1
					minut += 15
					'Anya support chat with you and tells you what nonsense.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 4:
				$rintak = 'In the next tray Anna tries vtyuhat buyers stale goods.'

				act 'Chat with Anna':
					cla
					annaQW -= 1
					!!NadiaQW -= 1
					minut += 15
					'Anya is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 5:
				$rintak = 'Anna talks about trifles with Aunt Katya.'

				act 'Chat with Anna and Aunt Katya':
					cla
					annaQW += 1
					!!NadiaQW += 1
					tetaKataQW += 1
					minut += 15
					'Aunt Katya praises pies and Anya complains that it currently has on these patties Naela ass twice more than it was ..'

					act 'Further':gt 'rinwork', 'start'
				end
			end

			'<<$rintak>>'
		elseif hour = 11:
			rintakrand = rand(0, 5)

			if rintakrand = 0:
				$rintak = 'By Nadia approached by three Caucasian, Aslan, Camille and Mukhtar and began to molest her, and she swore at them and tried to dodge.'

				act 'Look at Nadia and Caucasians.':
					cla
					!!annaQW += 1
					!!NadiaQW += 1
					!!tetaKataQW += 1
					minut += 15
					'Caucasians seem to be leaning toward sex Nadia.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 1:
				$rintak = 'The tray is sitting in front of Nadia and eating cake.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW += 1
					minut += 15
					'Nadia leaves the crossword and willingly support the conversation about any nonsense.'

					if clener = 0:
						clener = 1
						'Nadia tells about a Jew tailor working in an office building.'
					end

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 2:
				$rintak = 'The tray in front of buyers came to Nadia and she fusses before laying them goods.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW -= 1
					minut += 15
					'Nadia is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 3:
				$rintak = 'In the next tray Anna reading the newspaper.'

				act 'Chat with Anna':
					cla
					annaQW += 1
					!!NadiaQW -= 1
					minut += 15
					'Anya support chat with you and tells you what nonsense.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 4:
				$rintak = 'By Ana from a nearby tray approached buyers.'

				act 'Chat with Anna':
					cla
					annaQW -= 1
					!!NadiaQW -= 1
					minut += 15
					'Anya is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 5:
				$rintak = 'By Ana approached by three Caucasian, Aslan, Camille and Mukhtar and began to molest her, she excuses and mostly scared silent.'

				act 'Look at Anya and Caucasians.':
					cla
					!!annaQW += 1
					!!NadiaQW += 1
					!!tetaKataQW += 1
					minut += 15
					'Caucasians seem to be leaning toward sex Anya.'

					act 'Further':gt 'rinwork', 'start'
				end
			end

			'<<$rintak>>'
		elseif hour = 12:
			rintakrand = rand(0, 5)

			if rintakrand = 0:
				$rintak = 'Hasan bought cheburek and eating it while sitting behind Nadi in the tray.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW -= 1
					minut += 15
					'Nadia shy to talk with Hassan.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 1:
				$rintak = 'Nadia Thorog with buyers.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW -= 1
					minut += 15
					'Nadia is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 2:
				$rintak = 'Nadia talks with Anna.'

				act 'Chat with girls':
					cla
					annaQW += 1
					NadiaQW += 1
					minut += 15
					talkrand = rand(0, 2)

					if talkrand = 0:
						'Anya raskazyvaet that her skirt had to alter, so here is a Jew great tailor, he works in an office building.'

						if clener = 0:clener = 1

					elseif talkrand = 1:
						'Nadia tells her how the subway molested what that pervert ass rubbed against a member.'
					end

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 3:
				$rintak = 'Anya sells clothing buyers.'

				act 'Chat with Anna':
					cla
					annaQW -= 1
					!!NadiaQW -= 1
					minut += 15
					'Anya is not happy, light, no distractions, I have buyers.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 4:
				$rintak = 'Anya drinking coffee sitting at his tray.'

				act 'Chat with Anna':
					cla
					annaQW += 1
					!!NadiaQW -= 1
					minut += 15
					'Anya support chat with you and tells you what nonsense.'

					act 'Further':gt 'rinwork', 'start'
				end
			elseif rintakrand = 5:
				$rintak = 'Nadia idleness catches flies.'

				act 'Chat with Nadia':
					cla
					!!annaQW += 1
					NadiaQW += 2
					minut += 15
					'Nadia glad though what that entertainment and fun to chat with you.'

					act 'Further':gt 'rinwork', 'start'
				end
			end

			'<<$rintak>>'
		elseif hour = 13:
			rintakrand = rand(0, 5)

			if rintakrand = 0:
				$rintak = 'Hassan began to slowly collect the goods from Nadi.'
			elseif rintakrand = 1:
				$rintak = 'Anya sits and calculates profit per day.'
			elseif rintakrand = 2:
				$rintak = 'Nadia calculates profit per day.'
			elseif rintakrand = 3:
				$rintak = 'Abdul began to collect the goods from Ani.'
			elseif rintakrand = 4:
				$rintak = 'Past your tray was Arthur.'
			else
				$rintak = 'Aunt Katya ends trade pies and seems to leave.'
			end

			'<<$rintak>>'
		end

		if money >= 200:
			act 'Buy a snack (200 rubles) (0:15)':
				cla
				*clr
				gs 'stat'
				tetaKataQW += 1
				minut += 15
				health += 10
				manna += 20
				money -= 200
				'<center><img src="images/pics/food.jpg"></center>'
				if energy >= 30:
					fat += 5
					'You can no longer eat.'
				elseif energy >= 20 and energy < 30:
					fat += 3
					energy += 10
					'You pushed through the power of a meal.'
				elseif energy < 20:
					energy += 20
					!!fat += 1
					'You gladly ate cooked food.'
				end

				if water >= 20:
					'Coffee you no longer climbs.'
				elseif water < 20:
					water += 20
					'You gladly drank a mug of coffee.'

				end

				act 'Throw leftovers':gt 'rinwork', 'start'
			end
		end
	end
end

--- rinwork ---------------------------------
# sauna
clr
sauna += 1
gs 'stat'
'<center><b>Sauna</b></center>'
'<center><img src="images/etogame/sauna.jpg"></center>'
'Excellent renovated sauna.'

act 'Leave':minut += 15 & gt 'street'

!!if saunaWorkWhore > 0:act 'Go to work':gt 'saunawork'
if SaunaWhore > 0:act 'Go to work whore':gt 'saunawork'

if week = 5 and workDisk = 2:
	'At the entrance you are waiting for a strong man waiting for you to drive.'

	act 'Give disk':
		cls
		minut += 20
		workDisk = 3
		konvert = 1
		gs 'stat'
		'You gave the disc and you were handed a thick envelope.'

		act 'Leave':minut += 15 & gt 'street'
	end
end

if hour >= 8 and hour <= 23:act 'Go to the sauna':gt 'sauna2'

--- sauna ---------------------------------
# sauna2
minut += 5
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Sauna</font></b></center>'
'<center><img src="images/etogame/sauna1.jpg"></center>'
'Stay for an hour - 2,000 rubles'

act 'Leave':gt 'sauna'

if money >= 2000 and saunaday ! day:
	act 'Stay (2,000 rubles)':
		cls
		money = money - 2000
		minut += 60
		fat -= 10
		sweat = -10
		dynamic $showerdin
		saunaday = day
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		gs 'stat'
		'<center><img src="images/etogame/sau.jpg"></center>'
		'You are in for an hour in the sauna steamed, washed under a shower and relax.'

		act 'Leave':gt 'sauna'
	end
end

--- sauna2 ---------------------------------
# saunabed
$metka = $ARGS[0]
$loc = $CURLOC
gs 'stat'
'<center><b>bed</b></center>'
'<center><img src="images/pics/son.jpg"></center>'

if son < 10:
	if budon = 1:
		act 'Sleep until the alarm at <<alarm1>> hours <<alarm2>> minutes':
			cls
			inSleep = 1
			:markson
			needminut = 60 - minut
			sec += needminut * 60
			son += 3
			gs 'stat'

			if son >= 23 or alarm1 = hour and alarm2 = minut:
				inSleep = 2
				gt $locBroom, $metkaBroom
			else
				jump 'markson'
			end
		end
	end

	act 'Sleep as you want':
		cls
		inSleep = 1
		:markson
		needminut = 60 - minut
		sec += needminut * 60
		son += 3
		gs 'stat'

		if son < 23:jump 'markson'

		inSleep = 2
		gt $locBroom, $metkaBroom
	end
end

if budon = 1:
	'Clock wound <<alarm1>> hours <<alarm2>> minutes'

	act 'Disable the alarm':budon = 0 & gt $curloc
else
	act 'Enable Service':budon = 1 & gt $curloc
end

act 'Set the alarm time':gt 'saunabud'
act 'Get out of bed':sec += 5 & gt $locBroom, $metkaBroom

--- saunabed ---------------------------------
# saunabud
dynamic $budilnik

act 'Enable Service':budon = 1 & gt 'saunabed'

--- saunabud ---------------------------------
# saunaroom
$metka = $ARGS[0]
$loc = $CURLOC
$metkaBroom = $ARGS[0]
$locBroom = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
saunaYouRoom = 1
'<center><b><font color="maroon">Room</font></b></center>'
'<center><img src="images/etogame/saunaroom.jpg"></center>'
'The room is barely removed <a href="exec:sec += 30 & gt ''saunabed''">bed</a> and <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">cabinet</a>.'
'Hanging on the wall <a href="exec:gt ''mirror'', ''start''">mirror</a>'

if money > 0 and workDolg > 0:workDolg -= money & money = 0
if workDolg > 0:'Your debt is <<workDolg>> rubles'

act 'Go to the sauna':gt 'saunawork'

if workDolg > 0:
	act 'There are in debt (0:05)':
		cla
		*clr
		minut += 5
		workDolg += 50
		health += 30
		manna += 100
		energy = 20
		water = 20
		fat += 50
		salo += 1
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You drank tea with cookies, sweet and very bad for the figure, but so nice.'

		act 'Get up from the table':gt $curloc
	end

	act 'Borrow cosmetics':
		workDolg += 1000
		kosmetica += 25
		gt $curloc
	end
end

if water < 20:
	act 'Drink':
		cla
		minut += 5

		if water >= 20:
			'You don''t need any more water.'
		elseif water < 20:
			water += 20
			'You gladly drank a glass of water.'
		end

		act 'Get up from the table':gt $curloc
	end
end

--- saunaroom ---------------------------------
# saunawhore
saunaWorkKlient = 1
guy += 1
slutty += 1
bj += 1
dynamic $venerasiak
gs 'boy'
$namev = 'Client'
whorerand = rand(1, 22)
minut += 15
SaunaWhore += 1
gs 'stat'
'<center><img src="images/sauna/bj<<whorerand>>.jpg"></center>'
'You are logged in to the sauna with a client, he undressed, you too undressed.'
'You fell on his knees in front of the client and his mouth took his flaccid cock, working from your jaw member and quickly rose to become stronger <<dick>> centimeters.'
'You carefully clasping his dick sucked their <<$liptalk>> and felt like with every movement hard cock fills your mouth to the throat.'

if dick <= 12:'Member is not very large and you constantly poke his nose in curly pubis sucking dick to the ground and hairy balls hit you on the chin.'
if dick > 12 and dick <= 15:'Member at each movement gets to your throat and you''re a little choking diligently handle it their jaws.'
if dick > 15:'Dick too big for your mouth and you suck it for as long as you allow your mouth sucking it up to the neck and head of the language processing.'
!!dynamic $saunadinsexbefore
if dick > 15:saunarand = rand(0, 100)

if dick > 15 and saunarand > 90:
	'Client wanted what would you do to him deep blowjob.'

	act 'Deepthroating':
		cls
		minut += 45
		sweat += 1
		mop = 0
		throat += 1
		gs 'stat'
		whorerand = rand(1, 34)
		'<center><img src="images/sauna/deep<<whorerand>>.jpg"></center>'
		'You become deeply absorb into your mouth dick, dick rested in your throat, you have tried to expand it and swallowed the cock became hard to breathe and started crying, drooling and snot, you pulled out a member of the throat and took a rest, and then began again to pull his mouth <<dick>> centimeter-member standing as the count finally throat slightly adapted and you could find the pace in which swallowed member. Throat burning fire flowed carcasses in the eyes, nose snot ran down the face, the client finally groaned and finished in the condom.'

		act 'Take the money from the client and go':money += 1500 & saunaWorkNow = 1 & gt 'saunawork'
	end
end

if dick <= 15 or saunarand <= 90:
	'Client distracted you from work mouth and wanted sex.'

	act 'Further':
		cls
		whorerand = rand(0, 100)

		if whorerand <= 80:
			cls
			minut += 45
			sex += 1
			pose = 0
			sweat += 1
			gs 'stat'
			whorerand = rand(1, 23)
			'<center><img src="images/sauna/sex<<whorerand>>.jpg"></center>'
			'Customer has placed you in a pose'

			if prezik <= 0:prezik += 1 & workDolg += 50 & 'You took a condom out of the total pack, knowing that for this you will deduct from 50 rubles.'

			gs 'orgazm', 'start'

			act 'Take the money from the client and go':money += 1000 & saunaWorkNow = 1 & gt 'saunawork'
		else
			cls
			minut += 45
			sweat += 1
			gs 'stat'
			whorerand = rand(1, 23)
			'<center><img src="images/sauna/anal<<whorerand>>.jpg"></center>'
			'The client wants you in the ass, you smeared grease points and framed your work back to the client.'

			if prezik <= 0:prezik += 1 & workDolg += 50

			lubonus = 5
			dynamic $analsex
			'Finally client groaned and finished in a condom.'
			prezik -= 1

			act 'Take the money from the client and go':money += 2000 & saunaWorkNow = 1 & gt 'saunawork'
		end
	end
end

--- saunawhore ---------------------------------
# saunawork
$metka = $ARGS[0]
$loc = $CURLOC
$metkaBroom = $ARGS[0]
$locBroom = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
saunaYouRoom = 1

if paymamka = 0:paymamka = 300
if workDolg > 0:paymamka = 300
if workDolg <= 0:paymamka = 500

gs 'stat'
'<center><b><font color="maroon">Sauna</font></b></center>'
'<center><img src="images/etogame/sauna1.jpg"></center>'
'On the walls are full of <a href="exec:gt ''mirror'', ''start''">mirrors</a>.'

if saunaWorkNow = 1:
	saunaWorkNow = 0
	money -= paymamka
	'Nurse came to you and took you to <<paymamka>> per customer.'
end

if money > 0 and workDolg > 0:workDolg -= money & money = 0
if workDolg > 0:'Your debt is <<workDolg>> rubles'

gs 'stat'

if workDolg <= 0:act 'Leave':gt 'sauna'
if workDolg > 0:act 'Go to your room':gt 'saunaroom'

if hour > 8 and hour < 12 and whorehour ! hour:
	whorehour = hour
	klientrand = rand(0, 100)

	if klientrand >= 80:saunaWorkKlient = 1
elseif hour >= 12 and hour < 16 and whorehour ! hour:
	whorehour = hour
	klientrand = rand(0, 100)

	if klientrand >= 50:saunaWorkKlient = 1
elseif hour >= 16 and hour < 21 and whorehour ! hour:
	whorehour = hour
	klientrand = rand(0, 100)

	if klientrand >= 10:saunaWorkKlient = 1
elseif hour >= 21 and whorehour ! hour:
	whorehour = hour
	saunaWorkKlient = 1
end

if saunaWorkKlient = 1:
	cls
	gs 'stat'
	'<center><img src="images/etogame/saunawhore.jpg"></center>'
	'In the sauna arrived client, girls lined up that would be a customer could choose your favorite.'

	if mop > 1 and hapri = 1 and sweat <= 0 and leghair <= 0 and lobok <= 0:
		whorerand = rand(0, 25)

		if whorerand < vnesh:
			'Client jabbed a finger at you "This one."'

			act 'Go to the sauna with a client':saunaWorkKlient = 0 & gt 'saunawhore'
		else
			'Client examined picky eyes and turned away you chose another girl.'

			act 'Leave':saunaWorkKlient = 0 & gt $curloc
		end
	else
		'Looking at your client immediately turned away and chose another girl.'

		act 'Leave':saunaWorkKlient = 0 & gt $curloc
	end

	exit
end

if vnesh = -10 or SLomka > 0:
	cls
	workDolg += 1500
	gs 'stat'
	'You beckoned nurse. "Hey, come here."'
	'You came up to her and she demanded to bare your hand. You have done the required and she took a syringe with what that rubbish. "Sit still, do a shot now and will bring you into a normal form."'

	act 'Leave':StrongNarkota += 25 & SNarkTimes += 1 & minut += 10 & gt $curloc

	exit
end

act 'Sit on the couch (1:00)':
	cls
	minut += 60
	gs 'stat'
	'<center><img src="images/etogame/saunawork.jpg"></center>'
	'You are within an hour sitting on the couch waiting for customers.'

	act 'Leave':gt $curloc
end

if clenerSauna ! day:
	act 'Clean toilets (1:00)':
		cla
		*clr
		minut += 60
		clenerSauna = day
		manna -= 25
		workDolg -= 100
		sweat += 3
		'<center><img src="images/etogame/clener2.jpg"></center>'
		'You scrubbed toilets for an hour in the sauna to shine.'

		act 'Leave':gt $curloc
	end
end

if clenerSauna2 ! day:
	act 'Scrubbing floors (1:00)':
		cla
		*clr
		minut += 60
		clenerSauna2 = day
		manna -= 25
		workDolg -= 100
		sweat += 3
		'<center><img src="images/etogame/clener1.jpg"></center>'
		'You within the hour scrubbed floors mopped to shine.'

		act 'Leave':gt $curloc
	end
end

act 'Take a shower (0:15)':
	cla
	*clr
	minut += 15
	sweat = -3
	horny += 1
	hapri = 0
	mop = 1
	dynamic $showerdin

	if frost > 0:frost = 0

	'<center><img src="images/pics/dush.jpg"></center>'
	'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'

	act 'Get razor':dynamic $saunabrit

	if horny >= 90:
		act 'Send shower pussy':
			cla
			*clr
			horny = 0
			minut += 30
			mastr += 1
			orgasm += 1
			manna += 15
			willpower += 15
			'<center><img src="images/pics/wash2.jpg"></center>'
			'You sent a shower pussy and tight jet of warm water began to caress you. Soon you will feel like a warm wave covers your entire body and you began to shudder in orgasm.'

			act 'Get out and get dressed':gt $curloc
		end
	elseif horny >= 40 and hormy < 90:
		act 'Send shower pussy':
			cla
			*clr
			horny += 5
			minut += 30
			manna += 10
			willpower += 10
			'<center><img src="images/pics/wash2.jpg"></center>'
			'You sent a shower pussy and tight jet of warm water began to caress you. First you were very nice, but after a while, even as it was painful. Excitation of sleep and you stop masturbating.'

			act 'Get out and get dressed':gt $curloc
		end
	end

	act 'Get out and get dressed':gt $curloc
end

$saunabrit = {
	cls
	'You rinsed the razor blade which will be enough for <<stanok>> time.'

	if leghair > 0:
		act 'Shave your legs (0:15)':
			cla
			*clr
			minut += 15
			leghair = -5
			horny += 5
			'<center><img src="images/pics/shave.jpg"></center>'
			'You lathered up and shaved hair with them.'

			act 'Postpone machine':dynamic $saunabrit
		end
	end

	if lobok > 0:
		act 'Shave pubis (0:15)':
			cla
			*clr
			minut += 15
			lobok = -5
			horny += 5
			'<center><img src="images/pics/shave3.jpg"></center>'
			'You lathered pubis, then shaved all the hair from it.'

			act 'Postpone machine':dynamic $saunabrit
		end
	end

	act 'Get out and get dressed':gt $curloc
}

--- saunawork ---------------------------------
# shop
!! This is the supermarket, located in several places

!! Main entrance
if $ARGS[0] = 'start':
	$shoplocation = 'main'
end

if $ARGS[0] = 'start' or $ARGS[0] = 'move':
	minut += 1
end

!! Main area
if $shoplocation = 'main':
	cla
	*clr

	'<center><b><font color="maroon">Supermarket</font></b></center>'
	'<center><img src="images/etogame/shop.jpg"></center>'

	if hour < 8 or hour > 20:
		'The supermarket is currently closed.'

		act 'Leave the store':gt $loc
		exit
	end

	'In the hall stands an <a href="exec:$shoplocation = ''ATM'' & gt ''shop'', ''move''">ATM</a>, from which you can withdraw money from your bank account.'
	'<br>Most of the space in the supermarket is taken up by the <a href="exec:$shoplocation = ''grocery'' & gt ''shop'', ''move''">grocery department</a>, but the store has many smaller departments as well. <a href="exec:$shoplocation=''cosmetics'' & gt ''shop'', ''move''">Cosmetics</a>, <a href="exec:$shoplocation = ''hardware'' & gt ''shop'', ''move''">hardware</a>, <a href="exec:$shoplocation = ''clothing'' & gt ''shop'', ''move''">clothing</a> and the department of <a href="exec:$shoplocation = ''tech'' & gt ''shop'', ''move''">household appliances</a>. Not far from the entrance is a <a href="exec:$shoplocation = ''icecream'' & gt ''shop'', ''move''">counter selling ice cream</a>.'
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	!! The store in the town and in the altstart only
	if $loc = 'gorodok' and StoryLine = 1:
		if week < 6 and hour >= 8 and hour < 16:
			'Your sister <a href="exec:gt ''sister'', ''work''">Anja</a> sits at the checkout.'
		end
	end

	!! Store in the residential district
	if $loc = 'street':
		if rand(1, 20) = 20:
			if dimaQW = 0:
				'In the lobby of the store looks at you appreciatively what that man.'
				act 'See it':gt 'event', 'dima'
			elseif dimaQW = 1:
				'In the lobby of the store you notice Dima and binds you fear, you can not move.'
				act 'See it':gt 'event', 'scoreslut1'
			else
				'You met the same Dima who boyfriend fucking amuse you. Dima cocky grin came to you and said hello.'

				act 'Hello':
					cla
					'Come to me, I have no wife at home said Dima.'

					act 'No':gt 'shop', 'start'

					act 'Come':
						cla
						*clr

						if rand(1, 2) = 1:
							cla
							sex += 1
							oral += 1
							throat += 1
							cumlip += 1
							swallow += 1
							horny = 0
							'Dima took you to his house and there has ordered you to kneel. You got on his knees and he calling you a bitch and fuck you cocksucker began in the mouth.'
							'<center><img src="images/pics/gostDT2.jpg"></center>'
							'Dima finally finished your mouth, you obediently swallowed and licked the remnants of sperm with his big cock.'

							act 'Leave':gt 'street'
						else
							cla
							sex += 1
							anal += 1
							cumass += 1
							spank += 1
							boom = 5
							horny = 0
							'Dima has brought you to my house and right in the corridor began to kiss you and undress. After he stripped you he took you to the bathroom. There he sat in the bathroom and you unscrewing the showerhead put a water hose you in the ass. Quickly the feeling of fullness and Dima put you on the toilet. After an enema, he made you cancer and put you in the ass his big dick.'
							'<center><img src="images/pics/gostAnal2.jpg"></center>'
							'Dima long you fucked in the ass and beat his hands, you first it was painful, but gradually you got the taste and began to catch the buzz finally your ass filled with hot liquid and Dima moan grabbed your buttocks.'

							act 'Leave':gt 'street'
						end
					end
				end
			end
		end
	end

	'<br>The store is crowded with shoppers.'

	!! This is connected to the trade mission
	if TorgPredZ > 0:
		!! the location of the shop hasn''t been done today
		if ($loc = 'street' and StreetShopTPday ! day) or ($loc = 'Nord' and nordShopTPday ! day) or ($loc = 'down' and downShopTPday ! day):
			act 'Arrange products':
				if $loc = 'street':StreetShopTPday = day
				if $loc = 'Nord':nordShopTPday = day
				if $loc = 'down':downShopTPday = day

				cls
				mtprand = rand(40, 130)
				minut += mtprand
				TorgPredZ -= 1
				TorgPredZV += 1
				gs 'stat'
				'<center><img src="images/etogame/shop.jpg"></center>'
				'You arranged the products for quite a while and when I finally managed, then went to the cashier and you check it struck.'

				act 'Exit':gt 'shop', 'start'
			end

		end
	end

	act 'Leave the store':gt $loc
	exit
end

!! ATM
if $shoplocation = 'ATM':
	if karta > 0:
		act 'Withdraw money from the ATM':
			cla
			minut += 5
			kartaOUT = input ("How much money you want to withdraw?")

			if kartaOUT <= 0 or kartaOUT > karta:
				'<br>Invalid operation.'
			else
				karta -= kartaOUT
				money += kartaOUT
				'<br>You withdraw <<kartaOUT>> rubles. You have <<karta>> rubles left in your bank account.'
			end

			act 'Move away':gt 'shop', 'start'
		end
	else
		'You do not have any money in the bank.'
		act 'Move away':gt 'shop', 'start'
	end
end

!! Grocery
if $shoplocation = 'grocery':
	cla
	*clr

	'<center><b><font color="maroon">Grocery</font></b></center>'
	'<center><img src="images/etogame/shop1.jpg"></center>'

	if hour < 8 or hour > 20:
		'The grocery is currently closed.'

		act 'Leave the grocery':gt 'shop', 'start'
		exit
	end

	!! output from purchase
	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

	*pl '<center><table align="center">' + _
	FUNC ('$stock_item', 1, 'Regular food', 50, 'eda', $CURLOC) + _
	FUNC ('$stock_item', 1, 'Diet food', 250, 'edaD', $CURLOC) + _
	FUNC ('$stock_item', 10, 'Tea biscuits', 300, 'pranik', $CURLOC) + _
	iif(bag > 0, FUNC ('$single_stock_item', 1, 'Bottle of water', 50, 'bottle', $CURLOC), '') + _
	iif(bag > 0, FUNC ('$single_stock_item', 1, 'Sandwich', 100, 'buterbrod', $CURLOC), '') + _
	iif(bag > 0, FUNC ('$single_stock_item', 1, 'Bottle of wine', 500, 'wine', $CURLOC), '') + _
	'</table></center>'

	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	act 'Leave the grocery':gt 'shop', 'start'
end

!! Cosmetics
!! The scrunchies and hairpins sold here are from the Maruda Hair Mod
if $shoplocation= 'cosmetics':
	cla
	*clr

	'<center><b><font color="maroon">Cosmetics Department</font></b></center>'
	'<center><img src="images/etogame/shop2.jpg"></center>'

	if hour < 8 or hour > 20:
		'The cosmetics department is currently closed.'

		act 'Leave the cosmetics department':gt 'shop', 'start'
		exit
	end

	!! output from purchase
	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

	*pl '<center><table align="center">' + _
	FUNC ('$stock_item', 50, 'Cosmetics', 1000, 'kosmetica', $CURLOC) + _
	FUNC ('$stock_item', 10, 'Razors', 500, 'stanok', $CURLOC) + _
	FUNC ('$stock_item', 20, 'Sunblock', 500, 'krem', $CURLOC) + _
	FUNC ('$stock_item', 20, 'Tampons', 200, 'tampon', $CURLOC) + _
	FUNC ('$stock_item', 30, 'Shampoo', 500, 'shampoo', $CURLOC) + _
	FUNC ('$stock_item', 10, 'Hair scrunchies', 80, 'hscrunch', $CURLOC)

	*pl FUNC ('$stock_item', 12, 'Hair pins', 100, 'hpingrip', $CURLOC) + _
	iif(bag > 0, FUNC ('$stock_item', 10, 'Wipes', 100, 'salfetka', $CURLOC), '') + _
	iif(bag > 0, FUNC ('$stock_item', 10, 'Portable makeup', 1000, 'kosmetitka', $CURLOC), '') + _
	iif(bag > 0, FUNC ('$single_stock_item', 1, 'Comb', 150, 'greben', $CURLOC), '') + _
	FUNC ('$single_stock_item', 1, 'Handbag', 5000, 'bag', $CURLOC) + _
	'</table></center>'

	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	act 'Leave the cosmetics department':gt 'shop', 'start'
end

!! Hardware
if $shoplocation = 'hardware':
	cla
	*clr

	'<center><b><font color="maroon">Division of household goods</font></b></center>'
	'<center><img src="images/etogame/shop3.jpg"></center>'

	if hour < 8 or hour > 20:
		'The hardware department is currently closed.'

		act 'Leave the hardware department':gt 'shop', 'start'
		exit
	end

	!! output from purchase
	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

	*pl '<center><table align="center">' + _
	FUNC ('$stock_item', 20, 'Dishwashing detergent', 100, 'fairy', $CURLOC) + _
	FUNC ('$stock_item', 30, 'Clothing detergent', 250, 'poroshok', $CURLOC) + _
	FUNC ('$stock_item', 5, 'Plates', 300, 'cltarelka', $CURLOC) + _
	'</table></center>'

	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	act 'Leave the hardware department':gt 'shop', 'start'
end

!! Women''s clothing
if $shoplocation = 'clothing':
	cla
	*clr

	'<center><b><font color="maroon">Department of Women''s Clothing</font></b></center>'
	'<center><img src="images/etogame/shop4.jpg"></center>'

	if hour < 8 or hour > 20:
		'The women''s clothing department is currently closed.'

		act 'Leave the women''s clothing department':gt 'shop', 'start'
		exit
	end

	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

	*pl '<center><table align="center">' + _
	FUNC ('$stock_item', 1, 'Underwear', 300, 'clrbelo', $CURLOC) + _
	FUNC ('$stock_item', 7, 'Sale pack of underwear', 2000, 'clrbelo', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'Swimsuit', 1000, 'bikini', $CURLOC) + _
	'</table></center>'

	'<br/>Women''s clothing cost 2,500 rubles each.'

	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	act 'Leave the women''s clothing department':gt 'shop', 'start'

	!! This is not being done as a stock item because it needs to set the palto string value
	if palto < 2:
		'A winter coat is available for 10,000 rubles'
		if money >= 10000:
			act 'Purchase a winter coat for 10,000 rubles':
				cla
				money -= 10000
				palto = 2
				$palto = 'winter coat'
				'You bought a coat.'

				act 'Move away from the counter':gt 'shop'
			end
		end
	end

	if money >= 2500:
		if profi[1] = 0:
			act 'Inspect Office clothes number 1':
				cla
				*clr
				'<center><img src="images/clothes/profi1.jpg"></center>'
				'Office clothes.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					profi[1] = 1
					profiH[1] = 60
					profiB[1] = bedra
					gt 'shop', '<font color="green">You bought <b>Office clothes number 1</b>.</font>'
				end
			end
		end

		if profi[2] = 0:
			act 'Inspect Office clothes number 2':
				cla
				*clr
				'<center><img src="images/clothes/profi2.jpg"></center>'
				'Office clothes.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					profi[2] = 1
					profiH[2] = 60
					profiB[2] = bedra
					gt 'shop', '<font color="green">You bought <b>Office clothes number 2</b>.</font>'
				end
			end
		end

		if sarafan[1] = 0:
			act 'Inspect Colorful sundress':
				cla
				*clr
				'<center><img src="images/clothes/sarafan1.jpg"></center>'
				'Simple sundress, its main advantage is its dimensionless.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					sarafan[1] = 1
					sarafanH[1] = 60
					gt 'shop', '<font color="green">You bought <b>colorful sundress</b>.</font>'
				end
			end
		end

		if sarafan[2] = 0:
			act 'Inspect Light sundress':
				cla
				*clr
				'<center><img src="images/clothes/sarafan2.jpg"></center>'
				'Simple sundress, its main advantage is its dimensionless.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					sarafan[2] = 1
					sarafanH[2] = 60
					gt 'shop', '<font color="green">You bought <b>Light sundress</b>.</font>'
				end
			end
		end

		if short[1] = 0:
			act 'Inspect Black shorts with a purple t-shirt':
				cla
				*clr
				'<center><img src="images/clothes/short1.jpg"></center>'
				'Black shorts with a purple jersey.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					short[1] = 1
					shortH[1] = 60
					shortB[1] = bedra
					gt 'shop', '<font color="green">You bought <b>Black shorts with a purple t-shirt</b>.</font>'
				end
			end
		end

		if short[2] = 0:
			act 'Inspect Black shorts with a striped t-shirt':
				cla
				*clr
				'<center><img src="images/clothes/short2.jpg"></center>'
				'Black shorts with striped jersey.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					short[2] = 1
					shortH[2] = 60
					shortB[2] = bedra
					gt 'shop', '<font color="green">You bought <b>Black shorts with a striped t-shirt</b>.</font>'
				end
			end
		end

		if short[3] = 0:
			act 'Inspect Black shorts with a black jersey':
				cla
				*clr
				'<center><img src="images/clothes/short3.jpg"></center>'
				'Black shorts with a black T-shirt.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					short[3] = 1
					shortH[3] = 60
					shortB[3] = bedra
					gt 'shop', '<font color="green">You bought <b>Black shorts with a black jersey</b>.</font>'
				end
			end
		end

		if short[4] = 0:
			act 'Inspect Pink shorts with a pink jersey':
				cla
				*clr
				'<center><img src="images/clothes/short4.jpg"></center>'
				'pink shorts with the pink jersey.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					short[4] = 1
					shortH[4] = 60
					shortB[4] = bedra
					gt 'shop', '<font color="green">You bought <b>Pink shorts with a pink jersey</b>.</font>'
				end
			end
		end

		if short[5] = 0:
			act 'Inspect White shorts with a white bodice':
				cla
				*clr
				'<center><img src="images/clothes/short5.jpg"></center>'
				'white shorts with a white bodice.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					short[5] = 1
					shortH[5] = 60
					shortB[5] = bedra
					gt 'shop', '<font color="green">You bought <b>White shorts with a white bodice</b>.</font>'
				end
			end
		end

		if skirt[1] = 0:
			act 'Inspect White skirt with a colorful blouse':
				cla
				*clr
				'<center><img src="images/clothes/skirt1.jpg"></center>'
				'White skirt with a colorful blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					skirt[1] = 1
					skirtH[1] = 60
					skirtB[1] = bedra
					gt 'shop', '<font color="green">You bought <b>White shirt with a colorful blouse</b>.</font>'
				end
			end
		end

		if skirt[2] = 0:
			act 'Inspect Black skirt with a red sweater':
				cla
				*clr
				'<center><img src="images/clothes/skirt2.jpg"></center>'
				'Black skirt with a red sweater.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					skirt[2] = 1
					skirtH[2] = 60
					skirtB[2] = bedra
					gt 'shop', '<font color="green">You bought <b>Black skirt with a red sweater</b>.</font>'
				end
			end
		end

		if skirt[3] = 0:
			act 'Inspect White skirt with a striped shirt':
				cla
				*clr
				'<center><img src="images/clothes/skirt3.jpg"></center>'
				'White skirt with a striped shirt.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					skirt[3] = 1
					skirtH[3] = 60
					skirtB[3] = bedra
					gt 'shop', '<font color="green">You bought <b>White skirt with a striped shirt</b>.</font>'
				end
			end
		end

		if skirt[4] = 0:
			act 'Inspect Skin black skirt with a red blouse':
				cla
				*clr
				'<center><img src="images/clothes/skirt4.jpg"></center>'
				'Black skirt under the skin with a red blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					skirt[4] = 1
					skirtH[4] = 60
					skirtB[4] = bedra
					gt 'shop', '<font color="green">You bought <b>Skin black skirt with a red blouse</b>.</font>'
				end
			end
		end

		if skirt[5] = 0:
			act 'Inspect Black skirt with a white blouse':
				cla
				*clr
				'<center><img src="images/clothes/skirt5.jpg"></center>'
				'Black skirt with a white blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					skirt[5] = 1
					skirtH[5] = 60
					skirtB[5] = bedra
				gt 'shop', '<font color="green">You bought <b>Black skirt with a white blouse</b>.</font>'
				end
			end
		end

		if pants[1] = 0:
			act 'Inspect Pants with a blouse number 1':
				cla
				*clr
				'<center><img src="images/clothes/pants1.jpg"></center>'
				'Pants with a blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					pants[1] = 1
					pantsH[1] = 60
					pantsB[1] = bedra
					gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 1</b>.</font>'
				end
			end
		end

		if pants[2] = 0:
			act 'Inspect Pants with a blouse number 2':
				cla
				*clr
				'<center><img src="images/clothes/pants2.jpg"></center>'
				'Pants with a blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					pants[2] = 1
					pantsH[2] = 60
					pantsB[2] = bedra
					gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 2</b>.</font>'
				end
			end
		end

		if pants[3] = 0:
			act 'Inspect Pants with a blouse number 3':
				cla
				*clr
				'<center><img src="images/clothes/pants3.jpg"></center>'
				'Pants with a blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					pants[3] = 1
					pantsH[3] = 60
					pantsB[3] = bedra
					gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 3</b>.</font>'
				end
			end
		end

		if pants[4] = 0:
			act 'Inspect Pants with a blouse number 4':
				cla
				*clr
				'<center><img src="images/clothes/pants4.jpg"></center>'
				'Pants with a blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					pants[4] = 1
					pantsH[4] = 60
					pantsB[4] = bedra
					gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 4</b>.</font>'
				end
			end
		end

		if pants[5] = 0:
			act 'Inspect Pants with a blouse number 5':
				cla
				*clr
				'<center><img src="images/clothes/pants5.jpg"></center>'
				'Pants with a blouse.'
				'Costs 2,500 rubles.'

				act 'Leave':gt 'shop'

				act 'Buy':
					cla
					money -= 2500
					pants[5] = 1
					pantsH[5] = 60
					pantsB[5] = bedra
					gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 5</b>.</font>'
				end
			end
		end
	end
end

!! Household appliances
if $shoplocation = 'tech':
	cla
	*clr

	'<center><b><font color="maroon">Department of household appliances</font></b></center>'
	'<center><img src="images/etogame/shop5.jpg"></center>'

	if hour < 8 or hour > 20:
		'The household appliance department is currently closed.'

		act 'Leave the appliance department':gt 'shop', 'start'
		exit
	end

	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')

	*pl '<center><table align="center">' + _
	FUNC ('$single_stock_item', 1, 'Small TV with a picture tube', 35000, 'TV', $CURLOC) + _
	FUNC ('$single_stock_item', 2, 'Large Plasma TV', 35000, 'TV', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'Computer', 25000, 'komp', $CURLOC) + _
	iif(komp > 0, FUNC ('$single_stock_item', 1, 'Computer game Dead Sunset', 500, 'GameCD2', $CURLOC), '') + _
	FUNC ('$single_stock_item', 1, 'Dishwasher', 50000, 'posudomashina', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'Washing machine', 50000, 'stiralka', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'Camera', 10000, 'zenit', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'Mini camera disguised as a cigarette pack', 40000, 'minifoto', $CURLOC) + _
	'</table></center>'

	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	act 'Leave the appliance department':gt 'shop', 'start'
end

!! Ice cream counter
if $shoplocation = 'icecream':
	'Ice cream is available for sale for 50 rubles.'

	act 'Move away from the counter':gt 'shop', 'start'

	if money >= 50:
		act 'Buy ice cream':
			cls
			money -= 50
			fat += 50
			manna += 500
			water = 20
			energy = 20
			!! perkice is currently only ever referenced in stat and only then to decrement itself if > 0, so it does not currently do anything
			perkice += 1
			gs 'stat'
			'<center><img src="images/etogame/icecreem.jpg"></center>'
			'You bought ice cream and ate it not going far.'

			act 'Move away from the counter':gt 'shop', 'start'
		end
	end
end

--- shop ---------------------------------
# trashplace
if $ARGS[0] = 'start':
	clr
	gs 'stat'
	gs 'time'
	'<center><b>Musorka</b></center>'
	'<center><img src="images/etogame/musorka.jpg"></center>'
	'A long string of garbage bins from which carries per kilometer shamefully hidden small iron fence.'

	act 'Leave':gt 'street'

	if bumtolik = 2 and rand(0, 1) = 1:
		cls
		gs 'stat'
		gs 'time'
		'<center><img src="images/etogame/musorka.jpg"></center>'
		'You see a homeless person who gave the last time money. He smiles, hand making the gesture did not escape and goes to you to say something.'
		'-Girl, you''ll excuse me, do not be afraid, hear what I say?'

		act 'Hear out':
			cla
			*clr
			minut += 5
			'<center><img src="images/etogame/bum.jpg"></center>'
			'You see the kind of hangover homeless.'
			'Bum:- You know what kind of case. How would you say. I gathered some money and spend them to me except for a drink, but nowhere on the grub. I''ve been watching you, you''re the girl business. Besides beautiful, takes as much heat!'
			'But I''m a man, though not young, but the beauty of the female pleasure as appreciate.'
			'You:- Are you hinting at?'
			'Bum:- Do not think anything like that, I just wanted to offer money in exchange for beauty. You show me something, and I just look. Yes, more money and I will give all that a week scraped. As many as 300 rubles!'

			act 'Agree':
				cls
				money += 300
				bumtolik = 3
				bomjshet += 1

				if exhibi = 2:exhibi = 3

				gs 'stat'
				'<center><img src="images/etogame/bumt1.jpg"></center>'
				'Looking around and making sure that no one near you show stroller breasts and panties. Bum looks at you with round eyes and violently pulls his penis. You get scared, if someone comes to throw garbage.'
				'Bum:- Argh, wait let me finish!'
				'Finally homeless nachivaet loud puffing and collapses on the cardboard box Box.'
				'You:- Money, money come! - With this you cry grabs bum all his money and laughing carried away.'

				act 'Leave':gt 'street'
			end

			act 'Refuse':gt 'street'
		end
		exit
	end

	if bumtolik = 3 and hour >= 6 and hour <= 20 and rand(0, 1) = 1:
		cls
		gs 'stat'
		gs 'time'
		'<center><img src="images/etogame/bumt2.jpg"></center>'
		'You see a girl feed the homeless.'
		'Stranger:- Girl, I''m sorry, please take a picture for the record, as I help this unhappy.'
		*nl
		'You were uncomfortable and you refuse photographed girl on her camera.'

		act 'Ask for what she need':
			cla
			*clr
			minut += 5
			bumtolik = 4
			'<center><img src="images/etogame/bumt4.jpg"></center>'
			'It turned out that the girl named Olga. And it works in the service of helping the unfortunate.'
			'Olga:- Of course, I never thought that I would do it. Sent me here the court of public works, as a punishment for an administrative offense. Although in principle the right thing, and for karma is useful to help people. If interested, take a business card, the people we really need.'
			'On the business card is written "Mercy Hospital." Address points to the northern area'

			act 'Leave':gt 'street'
		end
		exit
	end

	if musor > 0:
		act 'Throw garbage':
			cls
			musor = 0
			'<center><img src="images/etogame/musorka.jpg"></center>'
			'You throw trash in the trash.'

			if bumtolik = 0:
				'"Oh, what!" - Was heard because of tanks.'
				'You scared of surprises.'

				act 'See who is said':
					cla
					*clr
					bumtolik = 1
					minut += 5
					gs 'stat'
					'<center><img src="images/etogame/bum.jpg"></center>'
					'You see the kind of hangover homeless. You looked at him and turned an angry look.'

					act 'Leave':gt 'street'
				end
			elseif bumtolik = 1:
				'"Hey, babe, come here, do me a favor to the old man!" - Heard you cheeky wheeze.'
				'This is the old bum you saw last time.'

				act 'Look at the homeless':
					cla
					*clr
					minut += 5
					gs 'stat'
					'<center><img src="images/etogame/bum.jpg"></center>'
					'You see the kind of hangover homeless.'
					'Bum:- Is that you, young lady, do not fear the old man! - With a predatory smile, said homeless.'

					act 'Ask what he needs':
						cla
						*clr
						minut += 5
						gs 'stat'
						'<center><img src="images/etogame/bum.jpg"></center>'
						'You see the kind of hangover homeless.'
						'You:- What do you want from me?'
						'Bum:- Ah, good lady. Just nothing, you know, there is such a thing, today is a holiday, and I''m broke ...'
						'You are:- In short, if I give money, you get behind me?'
						'Bum:- Yeah, yeah. Money.'

						act '- Of course not! Fu, nasty old man!':gt 'street'

						act 'Give him a trifle (20 rubles)':
							cla
							*clr
							minut += 5
							bumtolik = 2
							money -= 20
							gs 'stat'
							'<center><img src="images/etogame/bum.jpg"></center>'
							'You see the kind of hangover homeless.'
							'Bum:- Oh, lady, it''s so touching. I never helped anybody. I am so unhappy. My whole life was beaten. Can I, in gratitude, kiss your hand? Allow the old man, the last time in your life?'
							'(He looks at you with her tearful eyes)'

							act 'Allow and lend a hand for a kiss':
								cla
								*clr
								minut += 5
								'<center><img src="images/etogame/bum_kiss.jpg"></center>'
								'You see the kind of hangover homeless.'
								'Bum, gently, in disbelief, stretches wet lips to your snow-white pen and kisses her. It''s all flutters and closes her eyes in pleasure. But when he opens, you notice the bad lights in his eyes ...'

								act 'Further':
									cls
									gs 'stat'
									'<center><img src="images/etogame/bum_gra.jpg"></center>'
									'Suddenly, pulling your hand to him, he grabs you by the buttocks and starts, right through clothes, kissing and sniffing furiously between your legs.'
									'Bum:- Argh, what a beauty!'

									act '- The ugly freak! (Slap)':gt 'street'
								end
							end
						end

						act 'Give him 100 rubles':
							cla
							*clr
							minut += 5
							bumtolik = 2
							money -= 100
							gs 'stat'
							'<center><img src="images/etogame/bum.jpg"></center>'
							'You see the kind of hangover homeless.'
							'Bum:- Wow, so much. Napit have ... uh, ie buy gifts for the grandchildren, cough, cough.'

							act 'Leave':gt 'street'
						end

						act 'Leave':gt 'street'
					end
				end
			end

			act 'Move away from the tank':gt 'street'
		end
		exit
	end

	if bomzQW = 0 and rand(1, 10) >= 8 and hour <= 16 and week ! 4:
		cls
		gs 'stat'
		gs 'time'
		'<center><img src="images/sauna/bomz.jpg"></center>'
		'When did you start to move away from the tanks, the man came up to you and kind bomzhevatogo croaked.'
		'-Girl, 300 rubles for a cultural holiday not will throw?'

		if money >= 300:
			act 'Yes, keep':
				cls
				money -= 300
				gs 'stat'
				'You gave money to the homeless, and he walked away from thanking you.'

				act 'Leave':gt 'street'
			end
		end

		act 'No':
			cls
			gs 'stat'
			gs 'time'

			if daystart < 10 or sex <= 2:
				'I''d love to, but the money and most do not. Hell, like already accustomed to the new body, but watch your tongue with difficulty. -Himself? Are you pidorok?'

				act 'No':
					cls
					gs 'stat'
					'No, you just ogovorilas.Muzhik looked at you with suspicion.'
					act 'Further':gt 'trashplace', 'bomzQWstart', 'suspicious'
				end
			else
				'I''d love to, but that kind of money and most do not.'
				act 'Further':gt 'trashplace', 'bomzQWstart'
			end
		end

		act 'Get lost':
			cls
			bomzQW = -1
			gs 'stat'
			'-You should not so rude to me. I did a lot of where I go, and I know a lot of things. May come back to haunt you so unresponsive.'
			'With these words, the man withdrew.'

			act 'Leave':gt 'street'
		end
		exit
	end
end

if $ARGS[0] = 'bomzQWstart':
	'-Okay. I see you''re a good man, but with finance problems. I here you have several times seen and heard said about you. I know one part time. Work is not dusty, but a bit risky. Now all I will not tell, just ask:Do you bring your passport with residence permit local there?'

	act 'Yes, there is':
		cls
		minut += 15
		gs 'stat'
		gs 'time'
		'Yes, there is. So when you tell about the job?'
		'-Not here. Drove into the center, where you will explain everything.'
		'One of the ways the center passes near an abandoned construction site, and you''ve decided that if a man will go through it, you immediately use the excuse of iron and hurriedly removed.'
		'But to your surprise, the man walked toward the subway. You reminded him about his financial problems, but he just waved. In the subway he went to the checkout, the cashier and start a conversation'
		'-Hi, Uncle Nick, decided to go - she asked, holding out his badge.'
		'-Yes, you know, do, do. Here, people help - Uncle Nick nodded at you - you can throw another zhetonchik?'
		'-No problem, just a word to anyone - she said, winking.'
		'-Well, well, good luck, Nastya, hello Barbara Anikeevne.'
		'Yes, give at the meeting.'

		act 'In the subway':
			cls
			minut += 15
			gs 'stat'
			'You descended into the subway and got to the center. You got to walk the porn studio.'

			if pfilmNO = 1:
				'I have come here, but I was denied.'
				'-Do you think the porn studio only by a pussy you can trade? - Said with a grin Uncle Nick - there are other ways to earn there. You''re only as an actress ask for?'
			elseif film > 0:
				'And because of this I already know earnings'
				'-Do you think the porn studio only by a pussy you can trade? - Said with a grin Uncle Nick - there are other ways to earn there.'
			else
				'Not the porn studio I''m not going look for another rabotuI have come here, but I was denied.'
				'-Do you think the porn studio only by a pussy you can trade? - Said with a grin Uncle Nick - there are other ways to earn there. You''re only as an actress ask for?'
			end

			act 'Log in to the manager':
				cls
				minut += 15

				if pornstudio = 0:pornstudio = 1
				gs 'stat'

				if film > 0:
					'Hi <<$pfname>>.'
				else
					'You on any issue?'
				end

				'Here in the dialogue interrupted Uncle Kolya'
				'-I remember you there were problems with delivery'
				'-Yes, they were - said the manager - and we will still not settled. Tax presses, the majority of our people to engage in risky delivery.'
				'-So, this girl has led, I think, be able to help you with this problem.'
				'-What kind of warranty?'
				'-So, it is with a passport, and no one bothers you inquire.'

				act 'So what kind of work?':
					cls
					minut += 15
					gs 'stat'
					'-Transportation of the goods and pay for it. Show your passport and come next Thursday. If all goes well, we shall discuss the details.'

					act 'Show your passport':
						cls
						minut += 15
						gs 'stat'

						if $ARGS[1] = 'suspicious':
							'Uncle Nick comes to the manager and whispers something in his ear.'

							if film > 0:
								'The manager laughed and said, '
								'-What do you mean, everything has already been verified. Normally she''s all there.'
							else
								'The manager looked at you and said, '
								'-We got one question arose. Suspicions have that you do not quite ... Girl. Single bearer evidence.'

								act 'How dare you? (To leave)':gt 'down'

								act 'Show pussy':
									cls
									SUB += 1
									minut += 15
									gs 'stat'

									if ski > 0 or glamur > 0:
										'You raised your skirt and showed your pussy.'
									else
										'You lowered your pants and showed your pussy.'
									end

									if tatvag = 3:
										'Loves black dicks, I see.'
									end

									if lobok <= 0:
										if ski > 0 or glamur > 0:
											'<center><img src="images/sauna/sauna_pussy1.jpg"></center>'
										else
											'<center><img src="images/sauna/sauna_pussy1.jpg"></center>'
										end

										'How Schoolgirl - All-manager noticed, checked, do not forget to come on Thursday.'
									elseif lobok <= 2:
										if ski > 0 or glamur > 0:
											'<center><img src="images/sauna/sauna_pussy2.jpg"></center>'
										else
											'<center><img src="images/sauna/sauna_pussy3.jpg"></center>'
										end

										'-Hedgehog, neither head nor feet - noticed Manager-Everything checked out, do not forget to come on Thursday.'
									else
										if ski > 0 or glamur > 0:
											'<center><img src="images/sauna/sauna_pussy4.jpg"></center>'
										else
											'<center><img src="images/sauna/sauna_pussy5.jpg"></center>'
										end

										'Jungle name - noticed Manager-Everything checked out, do not forget to come on Thursday.'
									end

									act 'Leave':bomzQW = 1 & gt 'down'
								end
								exit
							end
						else
							'Manager rewrote your data and put your passport. All waiting for you on Thursday.'
						end

						act 'Leave':bomzQW = 1 & gt 'down'
					end

					act 'Thanks, but I refuse (to leave)':bomzQW = -1 & gt 'down'
				end
			end
		end
	end

	act 'Uh, better not, she can handle it':bomzQW = -1 & gt 'street'
end

--- trashplace ---------------------------------
# RynokHoz
if $ARGS[0] = 'the_beginning':
	minut += 15

	if arturplan > 4000:arturplan -= 1000

	gs 'stat'
	'You went into a master container skluzhaschy warehouse and dwelling, where he pulled out a bottle of vodka and a snack'

	act 'Drink along with a host':
		cla
		minut += 15
		gs 'stat'
		'Arthur the table, put a bottle of vodka and invited you to sit on a chair.'
		'You got drunk together with the owner and he pulled you to her hugging. Then he took out your chest and began to fondle'

		act 'Surrender':
			cla

			if rinhoz = 0:rinhoz = 1 & guy += 1

			sex += 1
			vagina += 1
			cumass += 1
			horand = rand(1, 100)
			'<center><img src="images/pics/rinsex.jpg"></center>'
			'You are relaxed and started hugging the host response. He undressed and put your stomach on the bags with cereal, spread your buttocks and your zasoval hard and hot cock in your pussy'

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

			gbrand = rand(1, 100)

			if gbrand < 95 and palevorin = 0:
				money += 2000
				'After sex, the host has written you a premium in the amount of 2, 000 rubles, and you went each about his business.'

				act 'Go home':gt 'street'
			elseif palevorin >= 1:
				money += 2000
				'After sex, the host has written you a premium in the amount of 2, 000 rubles, and you went each about his business.'

				act 'Go home':gt 'street'
			elseif gbrand >= 95 and palevorin = 0:
				cla

				if palevorin = 0:palevorin = 1

				'While the owner you fucked you heard the creaking front door, entered the room, two more men. You know them is Abdul Hassan, owners of neighboring tents.'
				'You froze in astonishment and shame, you caught moaning fuck bare ass, the men were glad, and guffawed. They offered you serve them and then no one will know about this incident.'

				act 'Silently dress':
					cla
					money += 2000
					if rinslut = 0:rinslut = 1
					'You with a red face of shame dressed silently, at this time the owner handed you 2, 000 rubles as a bonus.'

					act 'Go home':gt 'street'
				end

				act 'Agree to gangbang':
					cla
					palevorin = 2

					if abdulasex = 0:abdulasex = 1 & guy += 1
					if hasansex = 0:hasansex = 1 & guy += 1

					sex += 1
					vagina += 1
					bj += 1
					gang += 1
					cumass += 1
					cumlip += 1
					money += 5000
					'<center><img src="images/pics/rinkrug.jpg"></center>'
					'Host finished on you and gave way to the two guys, one of them raised your ass and threw you in pussy stuck to his penis, you groaned in pain when he hit you in the womb, the second guy immediately pulled penis and began to clap them on your face, you take it in your mouth. So you fry two guys, and the owner was sitting and looking at what is happening.'
					'And finally Abdul Hasan filled steel finish and one in your mouth and the second you on your ass.'
					'After the boys finished owner came to you and gave you a bonus of 5000 rubles'

					act 'Go home':gt 'street'
				end
			end
		end

		act 'Suck':
			cla

			if rinhoz = 0:rinhoz = 1 & guy += 1

			bj += 1
			cumlip += 1
			'<center><img src="images/pics/rinbj.jpg"></center>'
			'You sat down before the master on his knees and took out his cock around his mouth and started sucking him, absorbing member in the throat and licking balls host when he began to cum in your mouth, you were forced to swallow his struhnyu nor wash or not to spit it .'
			horand = rand(1, 100)

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

			gbrand = rand(1, 100)

			if gbrand < 95 and palevorin = 0:
				money += 2000
				'After sex, the host has written you a premium in the amount of 2, 000 rubles, and you went each about his business.'
				act 'Go home':gt 'street'
			elseif palevorin >= 1:
				money += 2000
				'After sex, the host has written you a premium in the amount of 2, 000 rubles, and you went each about his business.'

				act 'Go home':gt 'street'
			elseif gbrand >= 95 and palevorin = 0:
				if palevorin = 0:palevorin = 1

				'Have you finished doing blowjob and licking the remnants of sperm with the host member when the door opened and two men entered the closet. You know them is Abdul Hassan, owners of neighboring tents.'
				'You froze in astonishment and shame, you were caught with a mouth full of sperm licking red eldu, the men were glad, and guffawed. They offered you serve them and then no one will know about this incident.'

				act 'Wipe your mouth and correct clothes':
					cla
					money += 2000

					if rinslut = 0:rinslut = 1

					'You with a red face of shame began to wipe the remnants of sperm from her lips and correct clothes, at this time the owner handed you 2, 000 rubles as a bonus.'

					act 'Go home':gt 'street'
				end

				act 'They agree to suck':
					cla
					palevorin = 2

					if abdulasex = 0:abdulasex = 1 & guy += 1
					if hasansex = 0:hasansex = 1 & guy += 1

					bj += 2
					gang += 1
					cumlip += 2
					money += 5000
					'<center><img src="images/pics/rintri.jpg"></center>'
					'Licking prick you master nodded his head in agreement. Two men immediately took out their members and framed them to your mouth, you immediately began to suck two dick'
					'Finally Abdul Hassan steel cum in your mouth, you swallow and lick sperm until their members did not fall off.'
					'After the boys finished owner came to you and gave you a bonus of 5000 rubles'

					act 'Go home':gt 'street'
				end
			end
		end
	end
end

if $ARGS[0] = 'the_bus':
	'You are the driver stopped in the shed, where he pulled out a bottle of vodka and a snack'

	act 'Drinking with driver':
		cla
		'You got drunk together with the driver and he began to squeeze your breasts and ass'

		act 'Surrender':
			cla

			if vodila = 0:vodila = 1 & guy += 1

			sex += 1
			cumass += 1
			!!money = money + 2000
			'<center><img src="images/pics/busSex.jpg"></center>'
			'You are relaxed and started hugging in response cage. He undressed you and put the cancer, you feel his hot cock hard and pushing the vaginal wall is part of you, you involuntarily groaned from the flood of feelings for you.'
			horand = rand(1, 100)

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

			'After having sex with a carrier you went each about his business.'

			act 'Go home':gt 'street'
		end

		act 'Suck':
			cla

			if vodila = 0:vodila = 1 & guy += 1

			sex += 1
			oral += 1
			cumlip += 1
			!!money += 2000
			'<center><img src="images/pics/busbj.jpg"></center>'
			'You sat down before the driver got on his knees and his cock wrapped around his lips and began to suck when the driver began to cum in your mouth, you were forced to swallow cum, neither wash nor spit it no where.'

			horand = rand(1, 100)

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

			'After suction cage, you went each about his business.'

			act 'Go home':gt 'street'
		end

		act 'Swear at it and go':gt 'street'
	end
end

if $ARGS[0] = 'opusteha':
	rinslut = 1
	sex += 1
	bj += 3
	cumlip += 3
	money += 2000

	if repa < 6:repa = 6
	'<center><img src="images/pics/tri6.jpg"></center>'
	'You three fellows went into the container warehouse employee and cabins, where they got their members and you kneeling immediately sucked in three'
	horand = rand(1, 100)

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

	'After the men left off in your mouth, the owner took thousands in 2000 and gave you as a premium'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'opusteha2':
	guy += 1
	bj += 1
	throat += 1

	if tiprand = 1:cumlip += 1
	if tiprand = 2:cumface += 1

	money += 500

	if repa < 6:repa = 6

	'Armenians took you into the shed, and him on his knees in front of him pulled out his big dick. You licked his lips and started grinding his powerful member of his mouth.'
	tiprand = rand(1, 2)

	if tiprand = 1:
		'<center><img src="images/pics/rinslutBJ.jpg"></center>'
		'Armenian grabbed you by the head and finished in your mouth. You were forced to swallow everything.'
	elseif tiprand = 2:
		'<center><img src="images/pics/bukkOne.jpg"></center>'
		'Armenian pulled his cock out of your mouth and hold your head for cumshot on your face.'
	end

	horand = rand(1, 100)

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

	'After the Armenian finished, he tucked in his pants member and threw you five hundred-ruble notes.'

	act 'Go home':gt 'street'
end

--- RynokHoz ---------------------------------
# torgpred
gs 'stat'
'<center><b><font color="maroon">Trade Representative</font></b></center>'
'<center><img src="images/etogame/clener.jpg"></center>'
'Not a big cabinet in which are office desks and office equipment. In the office there is a door that says "Director"'
'One of the tables sits Stas, after another Vitali, for the third table sits a woman chief accountant.'

act 'Leave':gt 'clener', 'start'

if svQW = 2:
	if TorgPredDay ! day:
		if TorgPredZ = 0 and TorgPredZV = 0:
			act 'Take the job':
				cls
				TorgPredZ = 3
				minut += 5
				TorgPredDay = day
				gs 'stat'
				'<center><img src="images/etogame/clener.jpg"></center>'
				'You came to Stas for the job. He smiled and handed you the paper. "Do not forget. Supermarkets three pieces. You need to arrange the items in all the supermarkets."'

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

	if TorgPredZ = 0 and TorgPredZV = 3:
		act 'Get Money':
			cls
			TorgPredZV = 0
			minut += 5
			money += 500
			TPworkTimes += 1
			gs 'stat'
			'<center><img src="images/etogame/clener.jpg"></center>'
			'You came to Stas for money. He smiled and handed you 500 rubles'

			if StasikSex = 0:
				if TPworkTimes >= 3 and TPmainQW = 0 and mesec = 0:
					if ski > 0 or glamur > 0:
						'Stas interest asks "Well, how do you work?"'

						act 'Excellent!':
							cls
							TPmainQW = 1
							minut += 5
							gs 'stat'
							'<center><img src="images/etogame/clener.jpg"></center>'
							'You answered Stas that everything is fine and he smiled. "Our company is developing, and intelligent man there will be a place better. Way, let''s go to the cafe, you have not stamped for work."'

							act 'Agree':
								cls
								minut += 15
								gs 'stat'
								'<center><img src="images/etogame/clener.jpg"></center>'
								'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'

								act 'Take':gt 'StasQW'
							end
						end

						act 'So-so.':
							cls
							TPmainQW = 1
							minut += 5
							gs 'stat'
							'<center><img src="images/etogame/clener.jpg"></center>'
							'You answered that Stas so-so and he grinned. "Our company is developing, and intelligent man there will be a place better. Way, let''s go to the cafe, you have not stamped for work."'

							act 'Agree':
								cls
								minut += 15
								gs 'stat'
								'<center><img src="images/etogame/clener.jpg"></center>'
								'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'

								act 'Take':gt 'StasQW'
							end
						end
					end

					exit
				end
			end

			if TPmainQW = 1:
				if StasikSex > 0 and StVaGang = 0:'' & !!Light gave Stas, he did not consider her a whore, and wants to continue the relationship
				if StasikSex = 0:'' & !!Light gave Stas, he did not consider her a whore, and wants to continue the relationship
			end

			if StVaGang > 0:'' & !!Stas and Valera believe whore Light

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

	if TPmainQW = 1 and StasikSex > 0 and StVaGang = 0:
		'In view of Stas clearly glimpsed joy, when he sees you. in_a_low_voice, to not hear his colleagues are busy, it offers you to continue your relationship and start dating.'

		if bfa >= 1:
			'You think, that your current boyfriend is unlikely to please, you accept this offer. Stas, of_course, very nice, but you first need to understand their current relationship.'
		elseif bfa < 1:
			act 'agree':
				'You answered Stas consent, to which he beamed and promised to call you back shortly.'
				TPmainQW = 2
				$boy = 'Stas'
				boybodyrand = 1
				$boybody = 'high'
				boybodrand = 1
				$boybod = 'thin'
				boyfacerand = 3
				$boyface = 'blond'
				dick = 15
				silavag = 1
				harakBoy = 1
				finance = 1
				vneshBoy = 1
				$boyClo = 'dressed in jeans and a sweater.'
				figurBoy = rand(0, 2)
				titBoy = rand(0, 2)
				haerBoy = rand(0, 3)
				izvrat = 0
				gs 'boyfrend', 'start'
				stopboy = 0
				bfa = 70
				boyonceA = 1
				cla
				gs 'stat'

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

		act 'I need to think':
			cla
			'You answered Stas, you will find it very much, but you are not ready to give an answer, and ask him a little-just wait. Stas frowns, but accepts your answer.'

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

		act 'Contribute':
			TPmainQW = 2
			cla
			gs 'stat'
			'You quite sharply denied Stas, what he is offended: "Oh well! I-thought, we have that-something more, than an occasional census."'

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

--- torgpred ---------------------------------
# StasQW
gs 'stat'

if StasKafe = 2:
	'<center><img src="images/qwest/sosed/kafe2.jpg"></center>'
	'After the dance, Stas took you by the hand to the table and taking your waist sat on his lap. He immediately began to kiss you and you felt his hand again penetrated you under her skirt began to caress your clitoris. Stas you whispered in your ear, "Come to you or can have fun in the toilet?"'

	act 'Come to me!':
		cls
		gs 'stat'
		'<center><img src="images/qwest/sosed/kafe2.jpg"></center>'
		'Stas sweeping gesture threw the money to the waitress, and then stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'

		act 'Go':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/sosed/go.jpg"></center>'
			'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you Stas conducted to the apartment and when you opened the door, he literally dragged you to your apartment.'

			act 'Further':SStip = 0 & gt 'StasSex'
		end
	end
elseif StasKafe = 1:
	'<center><img src="images/qwest/sosed/kafe.jpg"></center>'
	'After the dance, you sat down again at the table, the waitress brought the bill. You look at the figure and slightly stunned. Five thousand! Stas took the paper out of your hands and you said "Do not worry, I''ll pay."'

	if money >= 5000:
		act 'No thank you, I''ll pay':
			cls
			money -= 5000
			gs 'stat'
			'<center><img src="images/qwest/sosed/kafe.jpg"></center>'
			'You got the money and paid the waitress. Stas stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'

			act 'Go':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/sosed/go.jpg"></center>'
				'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you have to spend Stas apartments and clearly expects you to invite him.'

				act 'To invite':SStip = 0 & gt 'StasSex'

				act 'Say goodbye':
					cls
					gs 'stat'
					'You said goodbye with Stas and he sighed sadly and went down.'

					act 'Close the door':gt 'korr'
				end
			end
		end
	end

	act 'Oh it''s so cute!':
		cls
		gs 'stat'
		'<center><img src="images/qwest/sosed/kafe.jpg"></center>'
		'You are glad that will not have to pay for the cafe and Stas sweeping gesture threw the money to the waitress, and then stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'

		act 'Go':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/sosed/go.jpg"></center>'
			'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you have to spend Stas apartments and clearly expects you to invite him. You get crushed on the doorstep, thinking how would snub Stas, but looking at it you feel indebted to him, he found you a job, he forked over the cafe, though it was your duty and put it over the threshold, you just can not.'

			act 'To invite':SStip = 0 & gt 'StasSex'
		end
	end
elseif StasKafe = 0:
	'<center><b><font color="maroon">Cafe</font></b></center>'
	'<center><img src="images/etogame/kafe.jpg"></center>'
	'You sat on a chair and gestured Stas master''s waitress. When the waitress came, he ordered champagne and fruit. Order quickly brought Stas poured champagne glasses. "A toast to friendship."'

	act 'Drink for acquaintance':
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/sosed/kafe.jpg"></center>'
		'You drank champagne and Stas started telling funny stories pouring champagne into glasses.'

		act 'Drink and chat':
			cls
			minut += 60
			horny += 15
			water = 24
			energy = 24
			salo += 2
			fat += 20
			gs 'stat'
			'<center><img src="images/qwest/sosed/kafe.jpg"></center>'
			'You are relaxed and drinking champagne that you listened to tales regaled Stas. For chatter, you do not even notice how Stas ordered another bottle and more. Finally you realize that you are already well plucked. Here in the cafe zairala music and Stas rising from his chair gallantly handed you a hand offering dance.'

			act 'Dance':
				cls
				minut += 1
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/sosed/dance.jpg"></center>'
				'You came to the dance floor and Stas hugged you and you start dancing. His hands while dancing slowly slipped from the waist to the hips and you began to stroke them. You feel like your hand Stas squeezed soft ass.'

				if horny < 100:
					act 'Raise his hands above':
						cls
						minut += 1
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/sosed/dance.jpg"></center>'
						'You took his hands and raised them Stas again on your waist. Stas just smiled wider and again his hands began to crawl to you on the ass.'

						if horny < 100:
							act 'Again raise his hands above':
								cls
								minut += 1
								horny += 10
								gs 'stat'
								'<center><img src="images/qwest/sosed/dance.jpg"></center>'
								'Once again you took Stas hands and raised them to his waist. Stas apparently only covered by this passion and he began gently stroking gently down your back you hands on the ass. Finally dance is over.'

								act 'Sit at the table':StasKafe = 1 & gt $curloc
							end
						end

						act 'Dance':
							cls
							minut += 1
							horny += 20
							gs 'stat'
							'<center><img src="images/qwest/sosed/dance2.jpg"></center>'
							'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him. Suddenly, the dance is over, but Stas was not going back sits at the table'

							act 'Sit at the table':StasKafe = 2 & gt $curloc
						end
					end
				end

				act 'Dance':
					cls
					minut += 1
					horny += 20
					gs 'stat'
					'<center><img src="images/qwest/sosed/dance2.jpg"></center>'
					'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him.'

					if horny < 100:
						act 'Raise his hands above':
							cls
							minut += 1
							horny += 10
							gs 'stat'
							'<center><img src="images/qwest/sosed/dance.jpg"></center>'
							'Once again you took Stas hands and raised them to his waist. Stas apparently only covered by this passion and he began gently stroking gently down your back you hands on the ass. Finally dance is over.'

							act 'Sit at the table':StasKafe = 2 & gt $curloc
						end
					end

					act 'Dance':
						cls
						minut += 1
						horny += 20
						gs 'stat'
						'<center><img src="images/qwest/sosed/dance2.jpg"></center>'
						'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him. Suddenly, the dance is over, but Stas was not going back sits at the table'

						act 'Sit at the table':StasKafe = 2 & gt $curloc
					end
				end
			end
		end
	end
end

--- StasQW ---------------------------------
# StasSex
if SStip = 0:
	minut += 5
	horny += 10
	gs 'stat'
	'<center><img src="images/qwest/sosed/stas.jpg"></center>'
	'You entered the apartment and Stas razuvshis immediately dug its lips in yours and you felt his hands covered your breasts started to caress them and compress. He''s not stopping to caress you took into your bedroom.'

	act 'Go into the bedroom':
		cls
		gs 'stat'
		'<center><img src="images/qwest/sosed/pov.jpg"></center>'
		'Stas drop you on the bed and began to undress without interrupting you fondle your breasts and undress himself.'

		act 'Next':
			cls

			if StasikSex > 0:StasikSex += 1
			if StasikSex = 0:StasikSex = 1 & guy += 1
			!!if ValeraSex = 0:ValeraSex = 1 & guy += 1
			!!gang += 1

			minut += 15
			gs 'stat'
			'<center><img src="images/qwest/sosed/sex.jpg"></center>'
			'You are relaxed and began to enjoy the caress breasts and pussy.'
			$boy = 'Stasik'
			dick = 15
			silavag = 1
			pose = 0
			!!dynamic $sexstart
			'You felt like a body Stasik expanded the your feet and his hard cock rested against your soft, expiring pussy juice.'
			dynamic $sexstart2
			!!dynamic $sexcum
			cumpussy += 1
			'<<$boy>> groaned and you feel like jet of sperm hit you inside your body.'

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

			act 'Breathe':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/sosed/aftersex.jpg"></center>'
				'Stas tears with you and is located near your breast stroking hand. Of your pussy slowly follows sperm mixed with your vaginal juices. Stas said apologetically, "I''m sorry that you came inside, could not resist." He reached out and began to get out of bed. "Well, I gotta go <<$name>>."'

				act 'Hold up the door':gt 'korr'
			end
		end
	end
end

--- StasSex ---------------------------------
# billiard
$sexloc = $CURLOC
cla
*clr
gs 'stat'
'<center><b>Pool</b></center>'
'<center><img src="images/img/centr/bil.jpg"></center>'
'Quite a large billiard room, there are plenty of tables in the hall, but there are tables in individual cubicles.'

act 'Leave':gt 'torgcentr'

if hour >= 8 and hour <= 20:
	if money >= 250:
		act 'Play (250 rubles) (1:00)':
			money -= 250
			minut += 60
			billvar = 0
			billiardnav += rand(0, 3)
			billrand = rand(0, 5)

			if billrand = 0:
				cla
				'It suits you and the guy offers to play with him'

				if money >= 1000:act 'Gamble, bet 1000':gt 'billiard', 'randwin'

				if DOM > 20 and strapon = 1:
					act 'Play on your ass, fuck me lose':
						billvar = 1
						gt 'billiard', 'randwin'
					end
				end

				act 'Leave':gt 'billiard'
			elseif billrand = 1:
				cla
				'It suits you and offer a couple of guys to play with them'

				if money >= 1000:act 'Gamble, bet 1000':gt 'billiard', 'randwin'

				if DOM > 20 and strapon = 1:
					act 'Play on your ass, fuck me lose':
						billvar = 2
						gt 'billiard', 'randwin'
					end
				end

				act 'Leave':gt 'billiard'
			elseif billrand > 1:
				cla
				'You played billiard.'

				act 'Leave':gt 'billiard'
			end
		end
	end

	if money >= 300:
		act 'Play for money (300 rubles)':
			money -= 300
			minut += 60
			billvar = 3
			gt 'billiard', 'randwin'
		end
	end
end

if $ARGS[0] = 'randwin':
	cla

	if billiardnav < 10:billwin = rand(0, 10)
	if billiardnav >= 10 and billiardnav < 20:billwin = rand(0, 12)
	if billiardnav >= 20 and billiardnav < 30:billwin = rand(0, 14)
	if billiardnav >= 30 and billiardnav < 40:billwin = rand(0, 16)
	if billiardnav >= 40 and billiardnav < 50:billwin = rand(0, 18)
	if billiardnav >= 50 and billiardnav < 60:billwin = rand(0, 20)
	if billiardnav >= 60 and billiardnav < 70:billwin = rand(0, 22)
	if billiardnav >= 70 and billiardnav < 80:billwin = rand(0, 24)
	if billiardnav >= 80 and billiardnav < 90:billwin = rand(0, 26)
	if billiardnav >= 90:billwin = rand(0, 28)

	if billwin > 10 and billvar = 0:
		money += 1000
		'You won and received 1,000 rubles.'

		act 'Leave':gt 'billiard'
	elseif billwin > 10 and billvar = 1:
		*clr
		DOM += 5
		'<center><img src="images/img/centr/strapon.jpg"></center>'
		'You win, put a strap, and looked at the guy, "Well stand stoop, today you''re my bitch"'
		'The guy dropped his pants and got cancer, you fucked his threesome.'

		act 'Leave':gt 'billiard'
	elseif billwin > 10 and billvar = 2:
		DOM += 8
		'<center><img src="images/img/centr/strapon.jpg"></center>'
		'You won dressed strap, and looked at the guys:"Come on girls panties descend and rise at all, I now this whole harem going to fuck"'
		'You fucked them all in turn.'

		act 'Leave':gt 'billiard'
	elseif billwin > 10 and billvar = 3:
		money += 300
		'You won and received 300 rubles.'

		act 'Get_Away':gt 'billiard'
	elseif billwin <= 10 and billvar = 0:
		money -= 1000
		'You lost and paid 1,000 rubles.'

		act 'Leave':gt 'billiard'
	elseif billwin <= 10 and billvar = 1:
		'You lose, will push the legs.'
		picrand = 16

		act 'Pay':xgt 'sex', 'var'
	elseif billwin <= 10 and billvar = 2:
		'You lose, will push the legs.'

		act 'Pay':gt 'paysex', 'var'
	elseif billwin <= 10 and billvar = 3:
		money -= 300
		'You lost and paid 300 rubles.'

		act 'Leave':gt 'billiard'
	end
end

if $ARGS[0] = 'start':
	'<center><b>Pool</b></center>'
	'<center><img src="images/img/centr/bil.jpg"></center>'

	act 'Leave':gt 'billiard'
end

--- billiard ---------------------------------
# billsvid
minut += 60
bilrand = 0
manna += 10
bilsvidukiy = 0
bilsvidkiy = 0
gs 'stat'
'<center><b>Pool</b></center>'
'<center><img src="images/img/bilsvid/0.jpg"></center>'
'And you <<$telsob>> rented a booth'

act 'Play':
	if $telsob = 'Alla':
		alla += 1

		if alla >= 20:
			bilrand = rand(0, 10)
			if bilrand > 0 and bilrand < 3:gt 'billsvid', '1'
			if bilrand > 2 and bilrand < 5:gt 'billsvid', '2'
			if bilrand = 0 or bilrand > 4:gt 'billsvid', '3'
		elseif alla < 20:
			gt 'billsvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			bilrand = rand(0, 10)
			if bilrand > 0 and bilrand < 3:gt 'billsvid', '1'
			if bilrand > 2 and bilrand < 5:gt 'billsvid', '2'
			if bilrand = 0 or bilrand > 4:gt 'billsvid', '3'
		elseif masha < 20:
			gt 'billsvid', '3'
		end
	elseif $telsob = 'Katia':
		kat += 1

		if kat >= 20:
			bilrand = rand(0, 10)
			if bilrand > 0 and bilrand < 3:gt 'billsvid', '1'
			if bilrand > 2 and bilrand < 5:gt 'billsvid', '2'
			if bilrand = 0 or bilrand > 4:gt 'billsvid', '3'
		else
			gt 'billsvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr

	'<center><img src="images/img/bilsvid/1.jpg"></center>'
	'When you once again leaned over the table to strike <<$telsob>> podozhla back and slipped her hands on your hips, back and stayed on his chest.'

	act 'Not now <<$telsob>>':gt 'billsvid', '3'

	act 'Kiss her':
		cla
		*clr
		lesbian += 1
		'<center><img src="images/img/bilsvid/2.jpg"></center>'
		'You turned around and kissed her, in response to <<$telsob>> quickly took off her clothes, stole everything from you and thrown back on the table, you jumped on, continuing to kiss.'

		act 'Make her Cooney':gt 'billsvid', '10'
		act 'Cooney':gt 'billsvid', '11'
	end
end

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

	'<center><img src="images/img/bilsvid/4.jpg"></center>'
	'You put her cancer to the table and squatted themselves opustivshs pressed his lips to her pussy. You kissed her and caressed the tongue until she came.'

	act 'Cooney':gt 'billsvid', '11'

	if bilsvidkiy = 0:act 'Play with a cue':gt 'billsvid', '12'
	if bilsvidukiy = 0:act 'Ask her to play with a cue':gt 'billsvid', '13'
end

if $ARGS[0] = '11':
	cla
	*clr

	'<center><img src="images/img/bilsvid/3.jpg"></center>'
	'You stood at the table, legs spread, and <<$telsob>> dropping to his knees in front of you began to kiss your pussy, but her tongue could not bring you to the desired state.'

	act 'Make her Cooney':gt 'billsvid', '10'

	if bilsvidkiy = 0:act 'Play with a cue':gt 'billsvid', '12'
	if bilsvidukiy = 0:act 'Ask her to play with a cue':gt 'billsvid', '13'
end

if $ARGS[0] = '12':
	cla
	*clr

	bilsvidkiy = 1
	'<center><img src="images/img/bilsvid/6.jpg"></center>'
	'<<$telsob>> climbed on the table and spread her legs wide. Picking up the cue stick and you licked medleno inserted it into her vagina. <<$telsob>> Diligently podmahivala your movements to the beat and a few minutes later collapsed on the table in a shuddering orgasm.'

	if bilsvidukiy = 0:act 'Ask her to play with a cue':gt 'billsvid', '13'

	act 'Finish':gt 'billsvid', '3'
end

if $ARGS[0] = '13':
	cla
	*clr
	orgasm += 1
	vagina += 1

	bilsvidukiy = 1
	'<center><img src="images/img/bilsvid/5.jpg"></center>'
	'You sat on the edge of the table, throwing one leg on the table and stretched her cue, "get into the pocket?". <<$telsob>> smiled and demonstrotivno spending tongue rukoyadke cue quickly inserted it you pussy, you already squealed in surprise. While she diligently fucked you cue, turning it in different directions, you''re massaging her clitoris with a finger. After a few minutes pleasant negative spread through your body and you are disconnected from the second nacrite you orgasm.'

	if bilsvidkiy = 0:act 'Play with a cue':gt 'billsvid', '12'

	act 'Finish':gt 'billsvid', '3'
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/img/bilsvid/10.jpg"></center>'
	'During the game <<$telsob>> is constantly trying to put his arm around you, you will hand over the hips, then casually touch a chest.'

	act 'Continue to play':gt 'billsvid', '3'

	act 'Kiss her':
		cla
		*clr
		lesbian += 1
		'<center><img src="images/img/bilsvid/11.jpg"></center>'
		'When <<$telsob>> once again put her hand on your stomach, you moved up closer to her and kissed her hand immediately slipped under your clothes and stood on his chest.'

		act 'Proceed':
			cla
			*clr
			'<center><img src="images/img/bilsvid/12.jpg"></center>'
			'<<$telsob>> knelt down and taking off your clothes started to kiss your crotch down below until her tongue under your pussy.'

			act 'Lick her':
				cla
				*clr
				'<center><img src="images/img/bilsvid/13.jpg"></center>'
				'Holding her knees with her face you have deployed to the table and lifted up her leg on the table and began to kiss her pussy and caressing tongue, then sucking in her lips.'

				act 'Proceed':
					cla
					*clr
					'<center><img src="images/img/bilsvid/14.jpg"></center>'
					'Unfolding her to face him, you put it on the table and spreading her legs continued to caress pussy tongue until she came.'

					act 'Give her to lick':
						cla
						*clr
						'<center><img src="images/img/bilsvid/15.jpg"></center>'
						'When <<$telsob>> finished, you climbed on the table and positioned her pussy right in front of her face, <<$telsob>> immediately began to caress her lips parted fingers she tried to thrust deeper language.'

						act 'Lick her':
							cla
							*clr
							orgasm += 1
							'<center><img src="images/img/bilsvid/16.jpg"></center>'
							'You turned around so that pussy was over her face, and have started to lick her pussy in a few minutes you feel as her body shook and <<$telsob>> groaning strongly pressed against your pussy, and then you have shrouded pleasant waves of orgasm.'

							act 'Finish':gt 'billsvid', '3'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = '3':
	cla
	horny = 0
	minut += 60
	gs 'stat'
	'When you have finished playing <<$telsob>> said that she needed to flee and left'

	act 'Leave':gt 'torgcentr'
end

--- billsvid ---------------------------------
# bordel
$sexloc = $CURLOC
gs 'stat'
'<center><b>Brothel</b></center>'
'<center><img src="images/img/centr/bordel.jpg"></center>'

if vnesh < 0:
	'"Listen, you have some sort of infection, go to undergo treatment."'

	act 'Leave':gt 'down'
elseif vnesh >= 0 and vnesh < 25:
	'"Look at you, for such a product no one will pay cleaned up and come back."'

	act 'Leave':gt 'down'
elseif vnesh >= 25:
	act 'In the room':gt 'bordel', 'start'
end

if $ARGS[0] = 'start':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	*clr
	gs 'stat'
	'<center><b>Your room in a brothel</b></center>'
	'<center><img src="images/img/centr/borroom.jpg"></center>'
	'In a brothel and a lot of competition in order to avoid massacre introduced a rule no more than two clients per day'
	'In the middle is a huge bed, and a small side door <a href="exec:gt ''bordel'', ''dysh''">bath</a>.'

	act 'Leave':
		if $clothingworntype ! 'ero':
			gt 'down'
		else
			cla
			'You need to change into my clothes.'

			act 'In the bathroom':gt 'bordel', 'dysh'
		end
	end

	act 'Going to the gym, waiting for customers':
		if $clothingworntype ! 'ero':
			cla
			'You need to change into something more appropriate, in a locker in the bathroom is all there.'

			act 'In the bathroom':gt 'bordel', 'dysh'
		end

		if cumbelly > 0 or cumpussy > 0 or cumass > 0 or cumlip > 0 or cumface > 0 or cumfrot > 0 or cumanus > 0 or mop < 2 or leghair > 0 or lobok > 0 or sweat > 0 or hapri = 0:
			cla
			'You need to freshen up.'

			act 'In the bathroom':gt 'bordel', 'dysh'
		else
			gt 'bordel', 'var'
		end
	end
end

if $ARGS[0] = 'dysh':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	*clr
	gs 'stat'

	'<center><img src="images/img/centr/bordysh.jpg"></center>'

	act 'In the room':gt 'bordel', 'start'

	act 'Bathroom':
		bordysh = 1
		gt 'vann', 'start'
	end

	act 'Mirror':
		borMir = 1
		gt 'mirror', 'start'
	end

	act 'Locker for clothes':
		gt 'clothing', 'view_clothing_list', 'wardrobe'
	end
end

if $ARGS[0] = 'var':
	if borsexkol >= 2:gt 'bordel', 'start'

	minut += 30
	borrand = rand(0, 10)

	if borrand = 0:
		'Customer ordered one girl, the price of 1,000 rubles.'

		act 'Refuse':gt 'bordel', 'start'

		act 'Agree':
			borsexkol += 1
			money += 1000
			slutty += 1
			bordelslutty += 1
			minut += 120
			zpprand = rand(0, 100)

			if zpprand >= 70:dynamic $venerasiak

			gt 'sex', 'start'
		end
	elseif borrand = 1:
		'Customer ordered two girls, the price of 1,000 rubles.'

		act 'Refuse':gt 'bordel', 'start'

		act 'Agree':
			borsexkol += 1
			money += 1000
			slutty += 1
			bordelslutty += 1
			minut += 120
			zpprand = rand(0, 100)

			if zpprand >= 70:dynamic $venerasiak

			gt 'podrsex', 'start'
		end
	elseif borrand = 2:
		'Two clients booked one girl, the price of 1,500 rubles.'

		act 'Refuse':gt 'bordel', 'start'

		act 'Agree':
			borsexkol += 1
			money += 1500
			slutty += 1
			bordelslutty += 1
			minut += 120
			zpprand = rand(0, 100)

			if zpprand >= 70:dynamic $venerasiak

			gt 'sexdvoe', 'start'
		end
	elseif borrand = 3:
		'Two clients booked two girls, the price of 1,500 rubles.'

		act 'Refuse':gt 'bordel', 'start'

		act 'Agree':
			borsexkol += 1
			money += 1500
			slutty += 1
			bordelslutty += 1
			minut += 120
			zpprand = rand(0, 100)

			if zpprand >= 70:dynamic $venerasiak

			gt 'sexdvanadva', 'start'
		end
	elseif borrand = 4:
		'Customer group ordered one girl, price 2,000 rubles.'

		act 'Refuse':gt 'bordel', 'start'

		act 'Agree':
			borsexkol += 1
			money += 2000
			slutty += 1
			bordelslutty += 1
			minut += 120
			zpprand = rand(0, 100)

			if zpprand >= 70:dynamic $venerasiak

			gt 'paysex', 'start'
		end
	elseif borrand > 4:
		'You will not chose.'

		act 'Go into the room':gt 'bordel', 'start'
		act 'Wait another':gt 'bordel', 'var'
	end
end

--- bordel ---------------------------------
# bordelv
cla
*clr
minut += 30
horny += 20
gs 'stat'
'<center><b><font color="maroon">room with a mirror</font></b></center>'
'<center><img src="images/img/centr/bvika1.jpg"></center>'
'Vic takes you through what that neighborhood, and entered into an inconspicuous door you find a large room vnitri here scurry girls dressed as if they did not have clothes and not letting you look around Vic drags you down the hall, she finally gets you to the small room except where chairs and glass in the wall nothing. "Sit here, " she says, and leaves.'
'You sat down in a chair and look through the glass is a room with a large bed. "This is a brothel" flashed in your head, "I''m in the room for voyeurs."'
'While you''re pondering proiskhodyazhee Vick came into the room, dressed in a pink combination, and lay on the bed.'
'She looked at you through the glass with one hand and massaged her pussy through her panties. Looking at it you felt like you covered excitement.'

act 'view more':
	cla
	*clr
	horny += 20
	picrand = 2
	'<center><img src="images/img/centr/bvika2.jpg"></center>'
	'A few minutes later came into the room, two men jumped out of bed Vick and he rose to his knees between them took their members, continuing to look in your direction, it does blowjob both at once. You looked like zavorezhennaya in her mouth then disappears then one other member, she continued diligently to satisfy men not taking chapter from the mirror from her view your pussy strongly humidified and demanded attention.'

	act 'Leave':gt 'bordelv', 'out'
	act 'view more':gt 'bordelv', 'sex'
end

if $ARGS[0] = 'sex':
	cla
	*clr
	minut += 10
	picrand = rand(3, 7)
	dviksex += 1
	horny += 20
	gs 'stat'
	'<center><img src="images/img/centr/bvika<<picrand>>.jpg"></center>'
	'You continued to watch as the men fuck Vick as they wheeled her like that alternately entering her pussy, then pecked her anus, or consisted dvoem. Vic groaned and struggled podmahivala them, she always tried to stay as a mirror to see, even though you knew that she can not see you, but you thought that it is watching you, waiting for your approval.'

	act 'See more':gt 'bordelv', 'sex'

	if dviksex >= 3:act 'Finish':gt 'bordelv', 'end'
end

if $ARGS[0] = 'end':
	cla
	*clr
	minut += 10
	horny = 0
	orgasm += 1
	gs 'stat'
	'<center><img src="images/img/centr/bvika8.jpg"></center>'
	'When the men were satisfied, Vick again knelt and sperm splattered in her mouth, face and chest, looking at it you feel as your body begins to tremble potemnolo you in the eyes and pleasant wave hit you. When you re-opened zlaza men are already out and Vick and sat on the floor flooded with sperm, she is now trying not to look in your direction. Finally sobravis the forces she got up and left the room.'

	act 'Wait':
		cla
		*clr
		'<center><img src="images/img/centr/bvika9.jpg"></center>'
		'A few minutes later the door opened and entered the room, Vic, she closed the door and you are left in the dark, you vidili only its silhouette. Vic stood silently waiting for your reaction.'

		if slutty = 0:
			act 'Called a whore':
				cla
				'"Whore" is perhaps the only thing less censorship word that you said, from other words you are in shock, how do you know all this. When you have finished swear they heard a quiet vskhlypyvanie Vick crying.'

				act 'Leave':
					vika = 0
					vikaend = 1
					gt 'street'
				end

				act 'Soothe her':
					cla
					vika += 5
					'You began to comfort her by saying that did not want to hurt her and that uttered it all for you because it was a shock. Vick closer to you and you hugged her, she soon stopped crying and saying that it should be back to work carried you to the exit.'
					act 'Leave':gt 'street'
				end
			end
		else
			act 'Soothe':
				cla
				vika += 5
				'"Why are you so upset, think it works in a brothel, I also moonlighted a couple of times opening your legs." you said quietly.'
				'Vic breathed relief "And then I worried that you would not understand, okay I have to work, you go spend" it said, Vick led you to the exit.'

				act 'Leave':gt 'street'
			end

			act 'Ask about work':
				cla
				vika += 5
				bordel = 1
				'"And I am satisfied with work here, I know how much." you asked.'
				'Vic breathed relief "And then I worried that you would not understand, well, I''ll tell the administrator, but I can not guarantee it can not take it. And now I have to work, you go spend" it said, Vick led you to the exit.'

				act 'Leave':gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'out':
	cla
	*clr
	minut += 20
	gs 'stat'
	'<center><img src="images/img/centr/bordel.jpg"></center>'
	'Vyskachil you out of the room like a scalded and rushed to the door, as you seemed to have opened the door but vidili another room, where also "worked" the girl slammed the door rushed to the next room and again. You rushed through the corridors, doors vygledeli same and you no it does not manage to find out, when you''re desperate, someone put your hand on her shoulder, turning you saw Vic, she just left the room and stood in front of you naked, her face and chest were smeared with sperm.'
	'"<<$name>> wait, you promised to speak"'
	'"Where''s the fucking out, slut, " you cried.'
	'Vick looked at you, you noticed her lips and the eyes zadrazhali navarachivalis tears "There, " she said, pointing you to one of the doors, barely holding back that would not cry.'

	act 'Leave':
		vika = 0
		vikaend = 1
		gt 'street'
	end

	act 'Soothe her':
		cla
		vika += 5
		'You began to comfort her by saying that did not want to hurt her and that uttered it all for you because it was a shock. Vick closer to you and you hugged her, she soon stopped crying and saying that it should be back to work carried you to the exit.'

		act 'Leave':gt 'street'
	end
end

--- bordelv ---------------------------------
# bouling
$sexloc = $CURLOC
gs 'stat'
'<center><b>Bowling</b></center>'
'<center><img src="images/img/centr/boul.jpg"></center>'

act 'Leave':gt 'torgcentr'

if hour >= 8 and hour <= 20:
	act 'Play 300 rubles (1:00)':
		if money < 300:
			'You have no money'
		else
			money -= 300
			minut += 60
			boulvar = 0
			boulingnav += rand(0, 3)
			boulrand = rand(0, 9)

			if boulrand = 0:
				cla
				'To suit you two guys and offer to play with them'

				act 'Gamble, bet 2000':boulvar = 1 & gt 'bouling', 'randwin'
				act 'Leave':gt 'torgcentr'
			elseif boulrand = 1:
				cla
				'To suit you two girls and offer to play with them against two guys prize 5000, at a loss of sex.'

				act 'Play':boulvar = 2 & gt 'bouling', 'randwin'
				act 'Leave':gt 'torgcentr'
			elseif boulrand > 1:
				cla
				'You played billiards'

				act 'Leave':gt 'torgcentr'
			end
		end
	end

	if money >= 300:
		act 'Play for money (300 rubles)':
			money -= 300
			minut += 60
			boulvar = 0
			gt 'bouling', 'randwin'
		end
	end
end

if $ARGS[0] = 'randwin':
	cla

	if boulingnav < 10:boulwin = rand(0, 10)
	if boulingnav >= 10 and boulingnav < 20:boulwin = rand(0, 12)
	if boulingnav >= 20 and boulingnav < 30:boulwin = rand(0, 14)
	if boulingnav >= 30 and boulingnav < 40:boulwin = rand(0, 16)
	if boulingnav >= 40 and boulingnav < 50:boulwin = rand(0, 18)
	if boulingnav >= 50 and boulingnav < 60:boulwin = rand(0, 20)
	if boulingnav >= 60 and boulingnav < 70:boulwin = rand(0, 22)
	if boulingnav >= 70 and boulingnav < 80:boulwin = rand(0, 24)
	if boulingnav >= 80 and boulingnav < 90:boulwin = rand(0, 26)
	if boulingnav >= 90:boulwin = rand(0, 28)

	if boulwin > 10 and boulvar = 0:
		money += 300
		'You won and received 300 rubles.'

		act 'Get_Away':gt 'torgcentr'
	elseif boulwin > 10 and boulvar = 1:
		money += 2000
		'You won and received 2,000 rubles.'

		act 'Leave':gt 'torgcentr'
	elseif boulwin > 10 and boulvar = 2:
		money += 5000
		'You won and received 5,000 rubles.'

		act 'Leave':gt 'torgcentr'
	elseif boulwin <= 10 and boulvar = 0:
		money -= 300
		'You lost and paid 300 rubles.'
		act 'Leave':gt 'torgcentr'
	elseif boulwin <= 10 and boulvar = 1:
		picrand = 14

		if money >= 2000:
			'You lose and have to pay 2,000 rubles.'

			act 'Offer in-kind':xgt 'sexdvoe', 'var'

			act 'Pay':
				money -= 2000
				gt 'torgcentr'
			end
		else
			'You lost, but you do not have money to pay, only one payment method.'

			act 'In kind':xgt 'sexdvoe', 'var'
		end
	elseif boulwin <= 10 and boulvar = 2:
		picrand = 11
		'You lose, will push the legs.'

		act 'Pay':gt 'sexorg', 'var'
	end
end

if $ARGS[0] = 'start':
	'<center><b>Bowling</b></center>'
	'<center><img src="images/img/centr/boul.jpg"></center>'

	act 'Leave':gt 'bouling'
end

--- bouling ---------------------------------
# house
$metkaM = $ARGS[0]
$locM = $CURLOC
cla
*clr
tanhouse1 = 1
minut += 5
gs 'stat'
'<center><b>Apartment</b></center>'
'<center><img src="images/img/centr/house.jpg"></center>'

if tanwork = 1:'This apartment Tanya stepfather you work here.'
if nik > 30 and niksvid = 2 and hour > 12 and hour < 19:gt 'house', 'razb'

act 'In the bathroom':gt 'vann', 'start'
act 'The kitchen':gt 'kitchen'
act 'In his bedroom':gt 'spalnya'
act 'In the master bedroom':gt 'hozspal', 'start'
act 'In the hall':gt 'housezal'
act 'In room Thani':gt 'tanroom', 'start'

if $clothingworntype ! 'nude':act 'On the street':gt 'down'

if tanwork = 1:
	act 'Resign':
		tanuvol = 1
		tanwork = 0
		work = 0
		gt 'down'
	end
end

if $ARGS[0] = 'razb':
	cla
	*clr
	minut += 90
	guy += 1
	bj += 1
	sex += 1
	swallow += 1
	cumlip += 1
	cumface += 1
	lesbian += 1
	'<center><img src="images/img/th/h1.jpg"></center>'
	'Walking down the hall you hear a voice from the hall hostess "<<$name>> Come here." You enter the room it is worth hostess and what that man. You go up to her and waiting for her to say. Noticing that you glanced toward the man she says "This is my personal driver and part-time security guard." You carefully inspect it and notice protruding from under floor rukoyadku jacket, "hardly a toy gun, " you thought, as she continued.'
	'"So, I want something to remember you now carefully, I will tell you, and to be confident that I will do something" with these words she vskhvatila you by the hair and pulled her. You first want to sink his nails into her face, but then decided not to risk it, not in vain, she led the guard, in the meantime continued.'
	'"You little slut I have decided to withdraw her husband. Pilkaesh eyes What do you, do you think I do not know whose ass he fuck. So remember that my wallet, not yours and I''ll choke a bitch. Fact that he was my little daughter fuck I do not care let fuck young meat, but remains here, but you''re not wanted here. yet know what you tell him you substitute your point, you put them in there shotgun and trigger later. Did you understand everything that thing? " she finished, you nodded in response.'
	'"Okay, now I will punish you that would know how to touch other people''s things." With these words, she pulled your hair down, you bent over, and she told you to kneel.'

	act 'Up':
		cla
		*clr
		'<center><img src="images/img/th/h2.jpg"></center>'
		'You knelt down and the hostess said to you, "Take off your panties, " you pulled to his feet, "Let not a dumbass yourself, shoot me and lick, " she laughed. You pulled off her panties and when she sat on the couch legs spread wide, began to lick her pussy, you''re really trying to, periodically, nervously glancing at the guard sitting next to a stony face and staring at you. A few minutes later your efforts will bear fruit and whole body shuddering hostess richly finished, you will not be waiting for orders began slichyvat highlight it. She looked at you and grinned, "Be thou clean Lesbian prices do not you have that delicious, I see that delicious, well that all lapped up, and now her ass loan, how to yes" she said, and got cancer on the couch, continuing to hold your hair.'

		act 'Continue':
			cla
			*clr
			'<center><img src="images/img/th/h3.jpg"></center>'
			'You clung to her bottom, starting to caress her anus tongue. "Let''s try, and do not forget the inside" she laughed. You tried to push his tongue inside, but with the course you could not, and you start moving eventually push him when he finally was inside her anus, you began to move them back and forth, literally fucking her ass tongue. Over her buttocks you saw the guard who has watched with interest you. You start to initiate an event, you looked at it on top of the buttocks and the hostess caught myself thinking that you want something he would now came from behind and took you. Noticing your interest hostess stopped you. "Now take off your clothes, " she commanded.'

			act 'Undress':
				cla
				*clr
				'<center><img src="images/img/th/h4.jpg"></center>'
				'You quickly took off his clothes and threw it in the corner sat down on the sofa. "Now we are going to teach you a blowjob to do, " she said and pulled bilateral dildo. She sat back in the seat next to you, with one hand she recorded your head under his arm and took the second dildo and began to enter into your mouth. First, only the head, you immediately grasped his lips and began laskt, then she introduced more and started to move them there, here. You tried licked artificial penis, his eyes fixed on the support of this, it seemed to you that you have between your legs fountain, your thighs were wet and sofa under your ass, too, are pretty gets wet from your selections. "You''re all the same techesh slut" she cried seeing moisture on your hips, "But still early, you have not really learned how to suck" with these words she began to push the dildo deeper into your mouth. You tried to swallow it, but the first time you could not, the hostess pushed him further and you had no choice but to try again. You swallowed it and she moved it on, it was about a meter long and in your throat disappeared already his third kind. She took him by giving you catch your breath and re-sent to you in the mouth, this time you swallowed it immediately began to introduce his mistress deeper and deeper, as a result of you only the head sticking dildo. "That''s Throat, " cried the hostess. She brought it up so that it would-vskhvatitsya and started to fuck you to them, you felt like he was moving inside you and you only have this factory, sometimes it put him, letting you catch your breath, and then again pounded the entire length and moved, no longer carefully and with decent speed. Finally she got sick "And now check what you have learned. Sergei, Skidan pants, now you will be doing a blowjob to swallow." she said. Security guard did not wait rose quickly unbuttoned his pants and pulled out have long standing member.'

				act 'To take by mouth.':
					cla
					*clr
					'<center><img src="images/img/th/h5.jpg"></center>'
					'Without waiting for orders, you jumped on the floor and his cock vskhvatili mouth. "Snapper nipple" said the lady sitting next to, she put her hand on his head and you pressed, you will immediately understand what she wants from you, and swallowed the cock in his throat, so that the nose rested in his crotch, and in podbordku knocked his balls. "Now take out the tongue and lick balls" she commanded, lifting his balls to your mouth, you will not easily took a little tongue and began to tickle his balls until he ran out of air. Little breather you reiterated the whole procedure, but when you swallowed the third time, he took you by the head and started to fuck in the throat, you run your hand between her legs and began to caress the clitoris. During all this, you do not even notice that the owner took the phone and started to shoot you. "And now saddled him and fuck" she commanded, security guard let your head and sat on the couch.'

					act 'Start':
						cla
						*clr
						'<center><img src="images/img/th/h6.jpg"></center>'
						'You without hesitation jumped on him, quickly entering his dick into her pussy, you started to move his hips quickly gaining pace. Hostess posnivala you a few more minutes and sat beside postponing phone and began to bestow you a spanking on the buttocks, which you did not even notice before my eyes swam, rode out on a limb you closer to the coveted orgasm when you finished it fell on him and could not continue. "What fizzled whore" she said, and pulled your hair from the couch, you did not care you almost do not hear her voice, you would not let naslozhdenie. "Mouth open, trash." she shouted.'

						act 'Open mouth':
							cla
							*clr
							'<center><img src="images/img/th/h7.jpg"></center>'
							'You have opened my mouth guard put him cock until she held your head by the hair, but do nothing you could not, and he took a member. "That bitch" cursed hostess and taking cock in her hand to right in her mouth, she sucked his dildo at the same time keeping your head with a second hand, she soon released his breath and sent on your face. Jet of sperm hit you in the face, some got in my mouth. Worth it to let your head as you fall on the floor, the hostess took the phone several times photographed you all in the semen came out and dressed with security guard. You lay on the floor, later kakoeto time you came to their senses and Stroud rising, pulled on his clothes.'

							act 'In the corridor':gt 'house'
						end
					end
				end
			end
		end
	end
end

--- house ---------------------------------
# housezal
$metkaM = $ARGS[0]
$locM = $CURLOC
minut += 5
gs 'stat'
'<center><b>Hall</b></center>'
'<center><img src="images/img/centr/housezal.jpg"></center>'

act 'In the corridor':gt 'house'

housezalrand = rand(0, 10)

if week < 6 and hour > 8 and hour < 20:
	act 'Get out':
		cla
		minut += 60
		gs 'stat'

		if hour < 14 and housezalrand = 1 and houserab = 1:
			cla
			*clr
			SUB += 1
			'<center><img src="images/img/centr/gosp6.jpg"></center>'
			'Mistress puts you on all fours, and she soditsya top and you hour kata her room.'

			act 'Leave':gt 'housezal'
		elseif hour < 14 and housezalrand = 2 and houserab = 1:
			cla
			*clr
			SUB += 1
			'<center><img src="images/img/centr/gosp7.jpg"></center>'
			'Mistress lifts her skirt and pulls you whip whips you in the ass'

			act 'Leave':gt 'housezal'
		elseif hour < 14 and housezalrand = 3 and houserab = 1:
			cla
			*clr
			SUB += 1
			'<center><img src="images/img/centr/gosp8.jpg"></center>'
			'Mistress puts you on your knees and pulls face to her pussy, you dutifully licks her she does not finish.'

			act 'Leave':gt 'housezal'
		elseif hour < 14 and housezalrand = 4 and houserab = 1:
			cla
			*clr
			SUB += 1
			sex += 1
			orgasm += 2
			horny = 0
			'<center><img src="images/img/centr/gosp9.jpg"></center>'
			'Mistress puts you cancer and fucks your pussy threesome, simultaneously calling a whore, you begin to like it and while she fuck you you cum several times.'

			act 'Leave':gt 'housezal'
		elseif hour < 14 and housezalrand = 0 and houserab = 0:
			cla
			*clr
			'<center><img src="images/img/centr/gosp1.jpg"></center>'
			'While you are tucked away hostess tells you where and how to clean up, you is already rather tired, but she did not let up in the end when you korachkah crawl on the floor with a rag that abusive her leg.'
			'"That you''re a fool without rukaya boots smeared me as well, to clean them quickly, " she cried.'
			'You vskhvatili clean rag and started rubbing her boots.'
			'"That''s stupid brainless, tongue clean, well get a move that froze"'

			if DOM > 10:act 'Silently exit':gt 'house'

			act 'Lick':
				cla
				*clr
				SUB += 5
				houserab = 1
				'<center><img src="images/img/centr/gosp2.jpg"></center>'
				'You carefully lick her boots in the hope that these and end.'
				'"You did not try to have you flogged"'

				act 'Rise in a pose':
					cla
					*clr
					'<center><img src="images/img/centr/gosp3.jpg"></center>'
					'You get up from the couch and cancer lifts up her skirt, mistress starts to whip you on the ass, and you just screams with each stroke.'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/centr/gosp4.jpg"></center>'
						'Finally she was tired, but not yet finished, "Here parazitka, because of you I soiled panties, quickly erase" she said, taking off his pants.'
						'You vskhvatili soaking wet pants and going to go to the bathroom when she suddenly stopped you:'
						'"Where are you soaped, mouth wash" with these words she took you cowards and shoved into your mouth. You diligently pretended that like trying to wash her ​​panties.'

						act 'Further':
							cla
							*clr
							'<center><img src="images/img/centr/gosp5.jpg"></center>'
							'"That''s done, because you can if you want, lick here and now." With these words, the hostess opened her legs. You obediently began to lick her pussy, she soon finished and you diligently licked away all the juices.'

							act 'Leave':gt 'house'
						end
					end
				end
			end
		elseif hour > 17 and hour < 20 and housezalrand < 3 and niksvid = 1 and niksexday ! day:
			cla
			*clr
			'<center><img src="images/img/centr/nikzal1.jpg"></center>'
			'While you are tucked away Nicholas comes to you from behind and knelt starts groping your ass.'

			act 'Push off':nik -= 1 & gt 'house'

			act 'Allow':
				cla
				*clr
				niksexday = day
				bj += 1
				anal += 1
				guy += 1
				nik += 1
				'<center><img src="images/img/centr/nikzal2.jpg"></center>'
				'Not many polapat your ass he uses the language and you''re feeling as he caresses your anus when he pushes it inside you relax his ass and wet tongue Shchekotov you inside.'

				act 'Take by mouth':
					cla
					*clr
					'<center><img src="images/img/centr/nikzal3.jpg"></center>'
					'You turn to him to bend down his fly, pulled out his cock and around his lips begin to suck as soon as you feel that he was ready to cum then stop.'

					act 'Lie down on the sofa':
						cla
						*clr
						'<center><img src="images/img/centr/nikzal4.jpg"></center>'
						' Slowly, slowly swinging her hips, you go to the sofa, Nicholas goes for you, you lie on your back and thigh lifts that-it is comfortable to enter you in the anus, his penis is too big for your ass and you still hurt when he enters into you, but you''re struggling trying not to show it, and only moaned when his dildo hammer your ass.'

						act 'Further':
							cla
							*clr
							'<center><img src="images/img/centr/nikzal5.jpg"></center>'
							'When you hold back the forces of the last cries of pain, his cock before cum blown and you cry out in pain, realizing that you hurt Nicholas takes it and pours sperm your ass.'

							act 'Suck':
								cla
								*clr
								'<center><img src="images/img/centr/nikzal6.jpg"></center>'
								'You get up on korachki and begin to lick dick fading carefully lick the remnants of sperm, when he poured again and again stands ready to fight.'

								act 'Doggy-Style':
									cla
									*clr
									'<center><img src="images/img/centr/nikzal7.jpg"></center>'
									'Seeing that he was ready to continue, you get up with cancer, his hands pushing the buttocks, Nicholas gently introduces dick in your ass and starts to move first delay, then faster and faster, he no longer pays attention to the moans, it lasted about half an hour, you have ceased to feel his anus when he finally finished you in the ass. This time vyreshili not risk and do not clean his cock mouth, and then the third row of the anal you would no longer be endured.'

									act 'Further':
										cla
										*clr
										cumlip += 1
										cumass += 1
										'<center><img src="images/img/centr/nikzal8.jpg"></center>'
										'While you are going to continue to stand by cancer, Nicholas walked up to you and put in the ass twisted bill'

										act 'Go with the money':
											money += 1000
											niksvid = 0
											nikslut = 1
											gt 'house'
										end

										act 'Money back':
											cla
											*clr
											niksvid = 2
											'<center><img src="images/img/centr/nikzal9.jpg"></center>'
											'You defiantly removing kupuru from the anus, licked her cum and throwing it at his feet, turn around and leave.'

											act 'Leave':gt 'house'
										end
									end
								end
							end
						end
					end
				end
			end
		elseif hour > 17 and hour < 20 and housezalrand >= 3 and housezalrand <= 5 and niksvid > 1 and niksexday ! day:
			cla
			*clr
			niksexday = day
			'<center><img src="images/img/th/n2.jpg"></center>'
			'While you zip over the room with a vacuum cleaner, comes Nicholas sat on the sofa and began to read a newspaper. Soon he looked up from the newspaper and began to watch you as you walk around the room with a vacuum cleaner and bend down periodically, that would vacuum under the furniture, it is not surprising, because every time it will be charmed by your bare buttocks, panties then you are not clothed. Do you like that he looks at you, and you have already started to bend especially where already vacuumed a couple of times and even got up on all fours, pretending to be trying to push the vacuum cleaner away with cupboard under, with your bare ass flaunted in front of him. You squinting nadlyudali he swallows saliva, looking at you with lust.'

			act 'Continue':
				cla
				*clr
				nik += 1
				picrand = 78
				'<center><img src="images/img/th/n3.jpg"></center>'
				'You continue to shine backwards before Nicholas, walking around the room until you feel that your pussy juice is flowing and began to emerge from her hips. Then you come to the couch and start vacuuming in front of him, you bend a little so that your newly bared buttocks and legs spread slightly fed back, now your pussy a few inches from his face and he was perfectly clear that you are already in full flow. Nicholas did not take long, after a few seconds you ooschutili his hands wrapped around your buttocks and bred in hand. He buried his face between your buttocks, then kissing your pussy and anus, then he began to lick at the hips all that managed to leak out of your pussy. Nicholas finished with them stuck in your language vagina and started moving it back and forward. You were standing on gave way to pleasure your feet, leaning on vacuum cleaner until his tongue fuck your pussy. Then he turned his attention to the ass, as the brushing her tongue, he launched into it with two fingers and began to push them a bit, stretching your anus. When your ass a little used and no longer shut mgnoveno, he took his fingers and their place was taken by his tongue. Nikolai fucked your ass tongue and hand massaging your clitoris, you moan with pleasure with difficulty holding the handle of the vacuum cleaner, Nicholas finally pulled you over and you''re plopped on the couch, and he sat down beside widely spread your legs, intending to re-engage your pussy .'

				act 'Continue':gt 'sex', 'kuni'
			end

			act 'Finish cleaning':gt 'house'
		end

		'You cleared the room'

		act 'Leave':gt 'house'
	end
elseif week = 6 and hour > 5 and hour < 10 and housezalrand < 5 and niksvid > 1 and niksexday ! day:
	cla
	*clr
	minut += 30
	niksexday = day
	'<center><img src="images/img/th/n0.jpg"></center>'
	'Entering the room you see Nicholas lying on the sofa, in the clothes. It seems that he is not bad gulnul yesterday, the smell in the room could get drunk and wifey sent him to sleep in the living room.'
	'"A <<$name>>, pour something" he said, opening his eyes and trying to get up there and then collapsed back vskhvativshis head. "Nah, because you can not drink." he articulated.'
	'You poured into a glass of whiskey and handed him. Glass in one gulp swallowed it again fell back. "Feeling better?" you asked.'
	'"A little, thank the <<$name>>, go to him." he said without opening his eyes. You felt sorry for him, you even remembered how when something kicking themselves periodically on Fridays and wife sends you to sleep in another room, how long ago it was, I think in another life. Then you remember that if you managed to persuade my wife to have sex in the morning, or just take her while she''s still sleeping you could not send, it helped quite back to life. "Maybe it will help" flashed in my head crazy idea.'

	act 'Try to help':
		cla
		*clr
		nik += 1
		picrand = 77
		'<center><img src="images/img/th/n1.jpg"></center>'
		'You go down next to him on his heels and unbuttoned his pants pull out dick, even raslablenno state it very decent size. You spend tongue around the trunk and begin to tickle the head, when Nicholas revives "There''s no light, I''m not in that state, and his wife is sleeping in the bedroom, " he says.'
		'"Relax, I know that will help you and your wife on Saturdays before noon does not arise, " you reply and absorbs his mouth already swelling body, you liked it swells in your mouth, and soon you have worked diligently mouth, but still tried not to make loud noises, and suddenly his wifey Owned today decides to get up early. You are tired of sucking, you seemed to have passed a couple of hours before a stream of hot, viscous liquid hit you in the mouth. You already swallowed and intended to release the cooling of the body cavity, as Nicholas already come a bit said "Go on, I want you all."'
		'You still released his cock from his mouth, but picking hand started to masturbate, not letting it fall. "Good, but not in the ass, " you answered.'
		'"Well, maybe a little on the floor bumps?" he asked, visibly upset.'
		'"Come on, just when my screams come your wife, you yourself will explain to her that makes your dick in my ass." you answered. Nicholas agreed with your arguments and you will once again lowered his head to his cock.'

		act 'Continue':gt 'sex', 'minet'
	end

	act 'Leave':gt 'house'
elseif hour > 17 and hour < 20 and housezalrand >= 3 and housezalrand <= 5 and niksvid > 1 and niksexday ! day:
	cla
	*clr
	minut += 10
	niksexday = day
	'<center><img src="images/img/th/n4.jpg"></center>'
	'Entering the room you see Nicholas, sitting in a chair and talking on the phone. "<<$name>>, get a drink, " he said see you. You brought him a glass of whiskey, he took the glass and motioned for you to linger. You waited until he finished talking on the phone.'
	'"What a day, sit down sit with me, " he said, slapping his thigh.'

	act 'Leave':gt 'house'

	act 'Stay':
		cla
		*clr
		nik += 2
		minut += 30
		picrand = 79
		niksexday = day
		'<center><img src="images/img/th/n5.jpg"></center>'
		'You sit down on his leg and one arm around his neck, Nicholas hugs you by the waist and held her back in his chair. You almost lying on it, and he does not even try to climb between your legs, it just pushes you to come and sit and eyes closed. Realizing that he was just tired and he wants something to someone was there, you relax and lozhite head on his shoulder. So half an hour passes, Nicholas sits in a chair clutching you to yourself, and you listen to how he breathes, so you like to just relax and start to climb to the head of dreams, that if he was yours and you were sitting here in the evenings and rested. You clung to him more tightly embracing both hands, Nicholas felt as if your desire, and opened his eyes looked at you, after a couple of seconds, you kissed, but not as much as before, with animal passion, as if going to devour each other, and easily and gently, almost kosayas each other lips. Soon, his hands sliding over your body, he raised you and putting on a chair began to cover your body with kisses, descending lower and lower until he reached her thighs.'

		act 'Continue':gt 'sex', 'kuni'
	end
elseif hour > 17 and hour < 20 and housezalrand < 3 and niksvid > 1 and niksexday ! day:
	cla
	niksexday = day
	'Entering the room you see Nicholas, sitting in a chair "<<$name>> wanna watch TV?" he asked.'

	act 'Refuse':gt 'house'

	act 'Agree':
		cla
		*clr
		minut += 40
		nik += 1
		picrand = 80
		niksexday = day
		'<center><img src="images/img/th/n6.jpg"></center>'
		'You sit down beside him on the sofa, Nikolai priobnimaet you and lays down with one hand on hip, you are already prepared for the fact that it will start to stick, but then nothing happened, he just sat and watched TV pressed you to her. You get comfortable and resting her head on his shoulder, too, have begun to look at the TV show which is nonsense, but you did not care, and it seems too. So you sat for about half an hour, occasionally exchanging short phrases, you suddenly become so good and comfortable with him, but your idyll interrupted by football and you yourself do not believe Nicholas when asked to change the channel. "Maybe a little bit of a look?" he asked, as if this is your apartment and your TV.'

		act 'Take control':
			cla
			*clr
			'<center><img src="images/img/th/n7.jpg"></center>'
			'"No, do not look, " you said and snatched the remote out of his hands.'
			'"<<$name>>, return idler, " he said in a stern voice when done'
			'"Nope, " replied playfully you.'
			'"Well beware" he said, and tried to grab the remote, but you had to remove his hand and he just collapsed on you. You began to rage on the couch grabbing the remote from each other, laughing and fooling around you as children, showing each other languages, when they could snatch control. In the course of this game your breasts popped out, but neither you nor Nicholas did not pay attention to it. When you''re tired and collapsed on the bed, he lay down on you and his head was on your chest, you both lay and breathed heavily. You began to stroke his hair, his lips soon kospulis your chest. He kissed your breasts and nipples, gradually descending lower and lower.'

			act 'Allow':nik += 1 & gt 'sex', 'kuni'

			act 'Stop':
				cla
				'"No, not here, " you said. Nicholas stopped and kissed you on the lips and left'

				act 'Leave':gt 'house'
			end
		end
	end
elseif hour > 17 and hour < 20 and housezalrand < 3 and nikslut = 1 and niksexday ! day:
	cla
	*clr
	SUB += 1
	guy += 1
	minut += 20
	niksexday = day
	money += 2000
	picrand = 35
	'<center><img src="images/img/th/s0.jpg"></center>'
	'Entering the room you see Nicholas and another man as they sit having imposed documents and arguing about something. "A <<$name>>, bring us some tea, " he says see you. You go to the kitchen to make tea and return back. When you pour the tea into the cups, Nicholas lozhit you hand to the buttocks and said, "Well, how do you like my new maid?" man shrugs in response, "It''s you know better, she''s at your house to cook and clean."'
	'"Yeah, no, you do not understand how you her ass, though very best." says Nicholas baring your buttocks. "Short allowance and she gets up it." Nicholas continues. In the meantime you stand with your bare ass and smiling stupidly looking at the man, and Nicholas did not let up, "Want it show? <<$name>> And you do not mind to serve the host along with his guest?" gororit he puts a couple of bills on the table. A man looks at you and in his pants markedly increases bump in the groin area.'
	'"With pleasure, " you reply, kneeling.'

	act 'Start':xgt 'sexdvoe', 'var'
elseif hour > 17 and hour < 20 and housezalrand > 8 and nikslut = 1 and niksexday ! day:
	cla
	*clr
	SUB += 1
	guy += 1
	minut += 20
	niksexday = day
	money += 2000
	picrand = 37
	'<center><img src="images/img/th/s2.jpg"></center>'
	'Entering the room you see Nicholas and another man as they sit having imposed documents and arguing about something. "A <<$name>>, bring me a drink, " you leave the bar and while pouring alcohol hear him talk, Nicholas does not even try to speak more quietly, that you would not have heard "This is the light which I love to confess to you."'
	'"Yeah, not bad." responsible man inspecting you from head to toe.'
	'"Yeah, so not far-fetched to relax and be happy that you <<$name>> relax" continued Nicholas.'
	'"Yes I do not know, my wife uchuit will complete zvizdets, deprive all go begging in the subway" responsible man.'
	'"Yes, where she learns thrust took, and went, when she gave you six months ago or a year. Married a rich bitch''s agonized" says Nicholas.'
	'"To hell with it, call your slut" agrees a man, you just come up with a glass to Nicholas.'
	'"<<$name>>, help a person to relax, I depart for a few minutes, and later to join you, " said Nicholas, slap you on the ass and shoving a couple of bills in his hand out of the room.'
	'"Let no prilyudy, strip naked and on the floor, " the man said.'

	act 'Lie down':
		cla
		*clr
		'<center><img src="images/img/th/s2.jpg"></center>'
		'You lay on the floor and he lay down behind you, he smeared fingers slaver your pussy and slowly introduced dick in you. You were not excited and a couple of minutes you were hurt a little vagina until moistened. Entering into a little taste you started podmahivat him. Once you pick up the pace in the room returned Nicholas "Yes you already have everything in full swing, I seem almost too late, " he said, starting to undress.'

		act 'Continue':xgt 'sexdvoe', 'var'
	end
end

--- housezal ---------------------------------
# hozspal
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	minut += 5
	gs 'stat'
	'<center><b>Bedroom</b></center>'
	'<center><img src="images/img/centr/hozspaln.jpg"></center>'

	act 'In the corridor':gt 'house'

	if week < 6 and hour > 8 and hour < 20 and tanwork = 1:
		act 'Get out':
			minut += 60
			gs 'stat'
			housespalrand = rand(0, 4)

			if hour > 17 and hour < 20 and housespalrand = 0 and nikslut = 1 and niksexday ! day:
				cla
				*clr
				niksexday = day
				money += 2000
				SUB += 1
				guy += 1
				picrand = 23
				'<center><img src="images/img/centr/niks1.jpg"></center>'
				'Nicholas and another man discussing something, you saw Nicholas beckons you to come and taking out a member of the inserts it into your mouth, you dutifully start sucking. The second man also joins.'

				act 'Sex':xgt 'sexdvoe', 'var'
			elseif hour < 14 and housespalrand = 0 and houserab = 1:
				cla
				*clr
				SUB += 3
				'<center><img src="images/img/centr/gosps1.jpg"></center>'
				'Mistress orders you to undress and lie down on the bed, you dutifully perform, she pulls out a dildo and puts you in the pussy, in a few minutes you covering orgasm. It looks like you squirm on the bed ending.'
				'"Well, the cat was hungry, go feed you." she said putting on your collar'

				act 'Go with it':
					cla
					*clr
					'<center><img src="images/img/centr/gosps2.jpg"></center>'
					'You slide out of bed on korachki and hostess leads you to the kitchen. You barge on korachkah trying to keep up, that would not irritate her.'

					act 'The kitchen':
						cla
						*clr
						'<center><img src="images/img/centr/gosps3.jpg"></center>'
						'She pours milk into a bowl and puts on the floor, you vnereshitelnosti freezes over the plate, then it lowers the force with your head on a plate, you literally hammering in her face.'
						'"Ah, you see the entire floor pig muck, fast licks that-be shone." she cried.'

						act 'Lick':
							cla
							*clr
							'<center><img src="images/img/centr/gosps4.jpg"></center>'
							'You dutifully start licking milk from the floor, and she presses you for a face to the floor, saying that you would rather lick. When you lick the entire floor of the milk, she goes leaving you naked on the floor.'

							act 'In the corridor':gt 'house'
						end
					end
				end
			end
		end
	end
end

--- hozspal ---------------------------------
# kafesvid
minut += 60
manna += 10
gs 'stat'
'<center><b>Cafe</b></center>'
'<center><img src="images/img/kafesvid/0.jpg"></center>'
'And you <<$telsob>> went into a small cafe in the center of'

act 'Chat':
	if $telsob = 'Alla':
		alla += 1

		if alla >= 20:
			kaferand = rand(0, 10)
			if kaferand > 0 and kaferand < 3:gt 'kafesvid', '1'
			if kaferand > 2 and kaferand < 5:gt 'kafesvid', '2'
			if kaferand = 0 or kaferand > 4:gt 'kafesvid', '3'
		else
			gt 'kafesvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			kaferand = rand(0, 10)
			if kaferand > 0 and kaferand < 3:gt 'kafesvid', '1'
			if kaferand > 2 and kaferand < 5:gt 'kafesvid', '2'
			if kaferand = 0 or kaferand > 4:gt 'kafesvid', '3'
		else
			gt 'kafesvid', '3'
		end
	elseif $telsob = 'Katia':
		kat += 1

		if kat >= 20:
			kaferand = rand(0, 10)
			if kaferand > 0 and kaferand < 3:gt 'kafesvid', '1'
			if kaferand > 2 and kaferand < 5:gt 'kafesvid', '2'
			if kaferand = 0 or kaferand > 4:gt 'kafesvid', '3'
		else
			gt 'kafesvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/img/kafesvid/1.jpg"></center>'
	'In malnkom cafe but you do not have anyone, and you are located in the far corner, in the shadows, in the course of conversation <<$telsob>> moved to the table right in front of you, and from under her skirt panties were visible. Noticing that you periodically glancing under her skirt. <<$telsob>> prepodnyala skirt, and has got one foot between your and began stroking her your hips.'

	act 'Move over':gt 'kafesvid', '3'

	act 'Touch it':
		cla
		*clr
		'<center><img src="images/img/kafesvid/2.jpg"></center>'
		'You had a hand on her hip and sent hand to her panties <<$telsob>> jumped off the table and stood beside that, would you feel more comfortable stroking her pussy and running his hand under your clothes you started massaging his chest. A few seconds later she tried to take off your clothes.'

		act 'Well, not here':gt 'kafesvid', '3'

		act 'Let her':
			cla
			*clr
			lesbian += 1
			'<center><img src="images/img/kafesvid/3.jpg"></center>'
			'<<$telsob>> pulled off your clothes and on their knees, began to lick your pussy deftly wielding tongue.'

			act 'Doggy-Style':
				cla
				*clr
				orgasm += 1
				'<center><img src="images/img/kafesvid/5.jpg"></center>'
				'You get up from a chair, and she bends over the table <<$telsob>> immediately pushes your buttocks and begins to fuck you tongue, and sometimes she misses her tongue slips you into the anus, you it gets harder and soon you covering orgasm.'

				act 'Proceed':gt 'kafesvid', '10'
			end

			act 'Lick her':
				cla
				*clr
				'<center><img src="images/img/kafesvid/4.jpg"></center>'
				'You pick it up from his knees, and themselves go down on them. <<$telsob>> sits on a table and spreads her legs to the side, you cling to her crotch lips and start kissing her and then release the tab and a sensitive clitoris, occasionally running it into the vagina. Soon <<$telsob>> shudders and strongly pressed you to pussy violently cums from her pussy sees some powerful jets, first you have even decided that she pees in your mouth, but having tasted her juices realized that this is not so. You swallowed a few times its juice before this stream has dried up, but still her juices spilled over her hips and your breasts. <<$telsob>> without forces collapsed on the floor and kiss you sent last portion of its juice from his mouth in it, <<$telsob>> swallowed the juice, and began to lick your breasts licking droplets off her own juice.'

				act 'Proceed':gt 'kafesvid', '10'
			end
		end
	end
end

if $ARGS[0] = '10':
	cla
	*clr
	'<center><img src="images/img/kafesvid/6.jpg"></center>'
	'<<$telsob>> found her purse, which flew in the process where it is under the table, and a little digging in her dildo learned to light. Sitting on poluryadom with a handbag she brought a dildo to her lips and began to tickle his head tongue playfully glancing at you.'

	act 'Her pussy':gt 'kafesvid', '11'
	act 'Her ass':gt 'kafesvid', '12'
	act 'Their pussy':gt 'kafesvid', '13'
	act 'Finish':gt 'kafesvid', '3'
end

if $ARGS[0] = '11':
	cla
	*clr
	kafesvidsex += 1
	'<center><img src="images/img/kafesvid/8.jpg"></center>'
	'You take a dildo and sat her on a chair, enter it in her vagina. You fuck her carefully introducing dildo almost to the end, and <<$telsob>> at the time t handle her clitoris, until cums softly yelp.'

	if kafesvidsex < 3:
		act 'Her ass':gt 'kafesvid', '12'
		act 'Their pussy':gt 'kafesvid', '13'
	end

	act 'Finish':gt 'kafesvid', '3'
end

if $ARGS[0] = '12':
	cla
	*clr
	kafesvidsex += 1
	'<center><img src="images/img/kafesvid/9.jpg"></center>'
	'Taking a couple of times you dildo slaps the table, quickly realizing what you want <<$telsob>> is taken on the table and gets on all fours, licking juicy dildo you spit on her ass and send dildo behind. While you fuck her ass dildo <<$telsob>> moaning on the table, and you second hand pat yourself trying to achieve orgasm but in vain.'

	if kafesvidsex < 3:
		act 'Her pussy':gt 'kafesvid', '11'
		act 'Their pussy':gt 'kafesvid', '13'
	end

	act 'Finish':gt 'kafesvid', '3'
end

if $ARGS[0] = '13':
	cla
	*clr
	orgasm += 1
	vagina += 1
	kafesvidsex += 1
	'<center><img src="images/img/kafesvid/7.jpg"></center>'
	'You stand on the table and rastavlyaete feet <<$telsob>> immediately turns on his knees in front of you with a dildo in hand, she begins to caress your clitoris tongue, then enters a dildo in your pussy, continuing to lick clitoris orgasm covers you soon.'

	if kafesvidsex < 3:
		act 'Her pussy':gt 'kafesvid', '11'
		act 'Her ass':gt 'kafesvid', '12'
	end

	act 'Finish':gt 'kafesvid', '3'
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/img/kafesvid/10.jpg"></center>'
	'Sitting at the table you made the order, in a cafe like anyone except you and the waiter was not the waiter constantly spinning around your table, and then looking at you.'
	'"And you liked it, " said <<$telsob>> caught you once his eyes.'
	'"Say also like we''re here alone so he rubs nearby, eavesdropping, then he has nothing more." you objected'
	'And when the waiter once again came up to you to ask whether you want anything else, <<$telsob>> grabbed you with one hand on his chest and squeezed it so that you just do not have jumped on the chair.'
	'"What are you, that hurts" started talking you trying to unhook her hand.'
	'<<$Telsob>> meanwhile without weakening grip and not paying attention to you turned to the waiter, "Want to touch a second?"'
	'The waiter hesitated looking at you.'

	act '"Just try, balls cut off"':gt 'kafesvid', '3'

	act 'Do not resist':
		cla
		*clr
		'<center><img src="images/img/kafesvid/11.jpg"></center>'
		'Noticing that you stopped struggling, <<$telsob>> let go your chest and took the waiter''s hand, put it on your chest, "Do not hesitate to see a girl do not mind."'
		'He began timidly to feel your breasts, but soon grew bolder and already being crushed your chest with both hands.'
		'A minute later, <<$telsob>> again began to direct your actions, "Well, you''re selfish, paw Woman and her own personal touch not given."'
		'The guy pulled his hands away from your chest and back neznaya hesitated what to do.'
		'<<$Telsob>> rapid hand movement undid his pants, from which immediately freed his erection "That''s what you still can touch, the second did not uvidivish?" she asked, and immediately noticed that the guy falls into a stupor again added, "The question is rhetorical, not necessarily respond. Well, you''re beautiful what are you waiting, help yourself."'

		act 'Refuse':gt 'kafesvid', '3'

		act 'Take in hand':
			cla
			*clr
			hj += 1
			'<center><img src="images/img/kafesvid/12.jpg"></center>'
			'You took his penis in his hand and began to masturbate <<$telsob>> continued to chat with you not paying any attention to the guy, but after a couple of mine when the guy started to shake, going to cum, she again joined "You and let him finish on the table, even taste not try, at least let you finish in her mouth? "'

			act 'Take in the mouth':
				cla
				*clr
				SUB += 1
				cumlip += 1
				swallow += 1
				'<center><img src="images/img/kafesvid/16.jpg"></center>'
				'You go down on his knees, and <<$telsob>> you catching his cock quickly starts to masturbate aiming your mouth, just seconds after jet of sperm enters your mouth, and <<$telsob>> continues to play cock trying to squeeze it dry in your mouth when she finally ends and the last drop of warm liquid falls into your mouth, you swallow it quickly, and licking lips sit at the table and continue to talk as if nothing had happened.'
			end

			act 'Continue to masturbate':
				cla
				*clr
				'<center><img src="images/img/kafesvid/12.jpg"></center>'
				'You are not paying attention to her words, and soon the guy is dead on the table.'
				'Thereafter <<$telsob>> started up again, "Well, let''s at least try yogurt"'

				act 'Lick sperm':
					cla
					*clr
					SUB += 1
					swallow += 1
					'<center><img src="images/img/kafesvid/14.jpg"></center>'
					'You lean over to the table and start licking sperm tightening it in yourself and swallowing.'

					act 'Finish':gt 'kafesvid', '3'
				end

				act 'Do not touch the sperm':
					cla
					*clr
					'<center><img src="images/img/kafesvid/15.jpg"></center>'
					'Seeing that you''re not going to touch the sperm <<$telsob>> she leaned over to the table and rapid movements of the tongue collected all cum in your mouth, and then play a bit with her mouth, swallowed. "And the taste is not even go far wrong, knowingly refused."'

					act 'Finish':gt 'kafesvid', '3'
				end
			end
		end

		act 'Take by mouth':
			cla
			*clr
			bj += 1
			'<center><img src="images/img/kafesvid/13.jpg"></center>'
			'You seat guys in front of him on the table and spent some time on the tongue base of his cock head start to suck, <<$telsob>> at this time coming to you from behind, and pulled out from under slul vases, removes clothes and spreading buttocks little bites tongue in your pussy.'
			'A few minutes later <<$telsob>> continued to lead the process, "Now fuck her cancer"'

			act 'Doggy-Style':
				cla
				*clr
				sex += 1
				'<center><img src="images/img/kafesvid/17.jpg"></center>'
				'You broke away from his cock, and bent over with his hands on the table <<$telsob>> sat in front of you and pulled up her breasts goliv to your face, tongue cost you touch her breasts, as you feel like you are in the pussy dick rested. Guy raised your foot and dramatically drove his bolt in you, he began to peck force your pussy. Soon <<$telsob>> again commanded "Now lay down on the table, " you felt pornographic actress on the sets, and <<$telsob>> was by producer, but you is only a factory and you are prepared to fulfill all of her team.'

				act 'Lie on a table':
					cla
					*clr
					'<center><img src="images/img/kafesvid/18.jpg"></center>'
					'You lie on a table and the guy came to you to take you by the legs and spreading them wide apart, you re-entered into the vagina, beating her with such force that you slid on the table, <<$telsob>> even put his hand behind you, so you do not flew off the table, and the second you massaged her clit. Actions guys were inept and even massage the clitoris is not helping you to cum in the end, after a few minutes <<$telsob>> commanded "And now in the ass"'

					act 'Doggy-Style':
						cla
						*clr
						cumanus += 1
						anal += 1
						analorgasm += 1
						orgasm += 1
						'<center><img src="images/img/kafesvid/19.jpg"></center>'
						'You stasis from the table, lie down on his stomach and buttocks Spreading hands, <<$telsob>> several times relish spits you on the ass, "Now very gently fuck her ass" refers to the guy, he carefully collects saliva her head and directs his dildo you in the ass, he moves ahead and carefully, and <<$telsob>> closely watching the process, occasionally spits on his dick, dobovlyaya grease a couple of minutes your ass adapts to your penis and the guy begins to slowly accelerate, you chuvstvuetekak it member of the slides in your ass and as <<$telsob>> looming over you spit you with his chest, it gets you much dildo and once inside you begins to swell, ready to finish, one of you sees a moan of pleasure from the long-awaited orgasm. At that moment, you feel like a warm liquid escaping from his penis fills your ass.'
						'"Clever, from anal cum, and now raise him until he did not fall, " cried <<$telsob>>'

						act 'No, that''s enough':gt 'kafesvid', '3'

						act 'Pick up':
							cla
							*clr
							bj += 1
							cumlip += 1
							'<center><img src="images/img/kafesvid/20.jpg"></center>'
							'You jump off the table and natsinaete yarosno suck, trying not to fall term.'

							if klismaday ! day:'Do you realize that there''s not an enema did you lie in member izmazany mixture of sperm and the contents of your ass, you''re choking back retching continue sucking, and <<$telsob>> noticing it looks at you with a grin, "That Vidisha as important in the ass keep clean, for me it''s like brush your teeth. "'
							if klismaday = day:'You suck dick feeling the taste of semen left on it, and how of your ass is not yet closed and sperm follows spreads to the buttocks and thighs'

							'When a member of the newly gained strength and was ready to continue, <<$telsob>> once again commanded "And now on top and ass at full speed"'

							act 'Jump to member':
								cls
								*clr
								analorgasm += 5
								orgasm += 5
								anus += 1
								'<center><img src="images/img/kafesvid/21.jpg"></center>'
								'Without waiting until you release it from the mouth of a member of the man abruptly pulled him and lay down on the table, <<$telsob>> has helped you to climb on top and put his penis in your anus from which is still leaking sperm. Once you have settled down as the guy began to move his movements were quick and strong, he fucked your ass so you Vijay, and <<$telsob>> stood nearby and pressing down on you at every push you deeper trying to impose on his penis, kept saying, "Faster, deeper, let''s fuck her point to sit week could not. " And the guy started to move even faster Smashan pain with pleasure, then you are finished again again and again, you and started yelling at the guy that he fucked faster and at every push with force to sit down to a member of his anus. you already struggling to understand how this is going to ecstatic ass you rode out on a limb, was replaced by another one orgasm you end up exhausted stretched on it, but the guy has not yet finished, and <<$telsob>> you vskhvativ legs lifted them to the top and a few more minutes your body already obmyagshee fucked in the anus. "Well enough, " said <<$telsob>> and pulled you to the floor. "Now it is settled in her mouth, " she said to the guy.'

								act 'Open mouth':
									cla
									*clr
									cumface += 1
									cumlip += 1
									swallow += 1
									'<center><img src="images/img/kafesvid/21.jpg"></center>'
									'You barely got on their knees before the guy, his mouth wide open. <<$telsob>> took his penis in his hand and began to masturbate aiming your mouth, soon man groaned and sperm gushed out of him, filling your mouth, chest and ran down his stomach.'

									act 'Kiss <<$telsob>>':
										cla
										*clr
										'<center><img src="images/img/kafesvid/22.jpg"></center>'
										'You grab her by the arm and pulled up to his bites her lips, infusing the sperm in her mouth <<$telsob>> swallows sperm and reaches out to you for more, but you have already swallowed, then she licks cum off your chest and abdomen, and then gently pushing you forward so that you are on all fours, licking all that leaked out of your ass, and lastly your anus kisses passionately trying to suck from it all to the last drop. When it finishes, you get dressed and sit down to chat continuing as if nothing had happened.'

										act 'Finish':gt 'kafesvid', '3'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = '3':
	cla
	kafesvidsex = 0
	horny = 0
	minut += 60
	gs 'stat'
	'Soon <<$telsob>> said that she had to flee and left'

	act 'Leave':gt 'down'
end

--- kafesvid ---------------------------------
# kamera
hour += 48
gs 'stat'
'<center><b>chamber</b></center>'
'<center><img src="images/img/police/c1.jpg"></center>'
'You spent in one chamber for two days and no one to you and hoisted for questioning did not cause. You did not know what to do, went from corner to corner and hours staring at the ceiling while lying on his bunk. When you have already decided that the threats were empty words, the cell door opened and she brought zechku, a woman 40 years old, you will see she grinned. The cell door slammed shut and you are left alone.'

act 'Hello':
	cla
	*clr
	girl += 1
	lesbian += 1
	'<center><img src="images/img/police/c2.jpg"></center>'
	'You just opened your mouth that would say hello as she vskhvatila you by the hair and pulled from the bunk to the floor. She quickly pulled down his pants and in your face appeared impressive size strap.'
	'"Well nipple suck" she said grinning.'

	act 'Open mouth':
		cla
		*clr
		bj += 1
		anal += 1
		'<center><img src="images/img/police/c3.jpg"></center>'
		'You opened her mouth and she had driven strap you in the throat. When you try to pull away zvdyhayas it took him a little by letting you up for air, and then continued to drive it down your throat keeping your hair. Soon she got sick and she pulled your hair up.'

		act 'Up':
			cla
			*clr
			'<center><img src="images/img/police/c5.jpg"></center>'
			'You''re up and you deploying it to the wall tilted. You hit a wall trying to relax arms ass, but you did not try the strap still proved too much when she drove it with the force you into the anus, tears streamed from his eyes and you cried.'
			'"Scream all you want, now you''re mine, " said zechka, and began to move quickly, driving you to strap the entire length, you could no longer hold back and started yelling at her every movement pain pierced you and you cried I could.'
			'"Ori, ori, I like it, " she laughed. You tried to close his mouth, but still pulled out a cry of your mouth, so continued for about half an hour, when you no longer feel pain usche and felt a shock, she took the strap and began to dress, you slid along the wall to the floor and curled continued to cry . She looked at you and grinned knocked on the door camera. The door opened surprisingly quickly.'
			'"I finished, " said zechka.'
			'"Well, take it into the camera" you heard a girl''s voice interrogates you. After that, the door closed again and you were one, you hardly crawled to the bunk and climbing on them asleep.'

			act 'Sleep':
				cla
				*clr
				vagina += 1
				hour += 4
				gs 'stat'
				'<center><img src="images/img/police/c6.jpg"></center>'
				'You woke up with pain in the vagina, open your eyes you saw on a tighter girl, she poked bludgeon you into her vagina, trying to enter her, but she could not. Otolkunut you tried it and got a slap in the face, "Lie still, you now I''ll stick to polish until the conspiracy, " she said, and she was finally able to insert into your club. She moved with the force of a bludgeon, obviously trying to make you as painfully as possible, and you screamed at every push. "Well, that''ll be talking about?" she asked?'

				act 'Share':
					cla
					gopdeath = 1
					minut += 180
					vsehsdaladay = day
					gs 'stat'
					'You told all they knew, and even then what just heard from conversations Gopnik. After that you released.'

					act 'Leave':gt 'nord'
				end

				act 'Refuse':
					cla
					*clr
					minut += 90
					orgasm += 1
					horny = 0
					'<center><img src="images/img/police/c7.jpg"></center>'
					'You did not answer, but only began to try to portray desire. You moaned and podmahivat her carefully portraying fun and even stuck one finger in the ass and began to massage her. Maiden looked at you, obviously besyas of baton and began to move even faster trying vtolkat it in you whole. Soon you will become really enjoy this and moan in earnest, you move your hips nasazhivayas on the baton. Soon you will feel like an orgasm rolled on you, you vskhvatili girl''s hand and pushed the baton themselves so deeply as we could, she looked like you moan, writhing in orgasm, and said something, but you did not hear anything. When you come to a bit then releasing her arm collapsed on the bench, she took the baton and stood over you frantically squeezing it. She did not expect this and now frantically trying to figure out what to do now. She stared at what you tried to do something to swing to hit something tugging at her clothes, she was clearly excited by her pants clearly could see the wet spot. You have a choice of either left it now you cripple a club, or you satisfy her.'

					act 'Grin':
						over = 7
						gt 'gameover'
						exit
					end

					act 'Suggest lick':
						cla
						*clr
						mentovka = 1
						lesbian += 1
						'<center><img src="images/img/police/c8.jpg"></center>'
						'You head hanging off the bed, so that it appeared between her legs and started kissing her pants odnovremeno rastegivaya them, she immediately slipped off her top and help you with your trousers. Slightly bent legs she pulled your head to his crotch, you dug into her lips and began to kiss her pussy, then floated gently tongue licking every inch of her pussy, she did not press in your head, and stroked your hair. She did not take long, a few minutes later she came and fell down on the bench next to you. You silently lying on his bunk Jacks, her hands stroking your thigh, so it took several minutes, she suddenly jumped up and dressed silently headed for the exit. On the threshold, she stopped and said, turning to you, "Soon you will release."'

						act 'Wait':
							cla
							*clr
							gnewQW = 3
							'<center><img src="images/img/police/c1.jpg"></center>'
							'You got dressed and started to wait half an hour later, the door opened you brought back from the camera and all your belongings.'

							act 'Leave':gt 'nord'
						end
					end
				end
			end
		end
	end

	if DOM > 30:
		act 'Bump':
			cla
			*clr
			'<center><img src="images/img/police/c4.jpg"></center>'
			'You have the strength that embedded her fist between her legs, she screeched collapsed on the floor. You stood up and pulled off her strap-on, put it on yourself. Zechka writhed on the floor, you wait until she wakes up a little, and then pulled off her pants and went into her vagina, at first she cried out in pain, but soon turned to screams moans, she began podmahivat you and soon came. You removed the strap and threw her zechka quickly gathered clothes and arranging strap, start knocking on the door when the door opened she jumped into the corridor do not even dressed.'

			act 'Wait':
				cla
				*clr
				gnewQW = 3
				hour += 20
				'<center><img src="images/img/police/c1.jpg"></center>'
				'You sat on the bed and waited, you got scared that if she now sends not one but several zechek, then you will not be able to cope with them, these thoughts swirling in your head, but the camera so no one came to you sat almost a day looking at the door finally opened the door you taken from his cell and all of your stuff back.'

				act 'Leave':gt 'nord'
			end
		end
	end
end

--- kamera ---------------------------------
# kathouse0
hour = 31
son = 20
gs 'stat'
'<center><img src="images/img/Kathouse/slip.jpg"></center>'
'Katia brought you to myself and put him to bed and she lay with you too. Early in the morning you povstvovali as she slipped out of your embrace and opened his eyes.'
'"Go to sleep, I need to work, I''ll leave you the keys." said Kate and smacking you ran away.'
'You slept and began to look around, on the couch in front of the bed lay man and looked at you. Probably this is one of her many guys about whom you have described it.'

act 'Leave':gt 'street'

act 'Seduce':
	cla
	*clr
	'<center><img src="images/img/Kathouse/kathouse1.jpg"></center>'
	'You throw off the covers and start stroking yourself first then the chest area panties pussy when you feel that pussy humidified allot enough panties to the side and poke a couple of fingers into her vagina, moaning slightly.'
	'The guy sat on the couch and looks at you without blinking.'

	act 'Beckon':
		$sexloc = 'katspalnya'
		gt 'sex', 'start'
	end
end

--- kathouse0 ---------------------------------
# Katlake
cla
gs 'stat'
'<center><img src="images/img/Lake/kat.jpg"></center>'
'You get bored and you start to examine other vacationers far from you is beautiful girl.'

act 'Do not approach':gt 'Nudelake'

act 'Step up':
	cla
	'You walk up to a girl and trying to have a conversation.'

	act '"Hi."':gt 'Katlake', 'znakomstvo'
end

if $ARGS[0] = 'znakomstvo':
	cla
	gs 'stat'

	if vnesh < 14:
		katday = day
		'"Hello" you say, a bit shyly.'
		'The girl looked around you scornful look and said nothing'
		'"Talk will not work" flashed in your head'

		act 'Leave.':gt 'Nudelake'
	else
		cla
		clr
		katday = day
		telkat += 1
		kat = 1
		minut += 30
		'"Hello" you say a bit shyly.'
		'Girl looks you up and down, smiles and says, "Hi."'
		'She looks at you with a slight smile and waits. You frantically trying to think of what to say, blushing trying to squeeze out a word.'
		'Girl notices your flour and decides to take matters into their own hands, "I Katia, for friends Kate and what''s your name?"'
		'"<<$name>>" you exhale with relief. Continue the conversation went much better and you chatted for another half hour.'

		act 'Leave.':gt 'Nudelake'
	end
end

if $ARGS[0] = 'kat':
	cla
	clr
	*clr
	gs 'stat'
	minut += 30
	'<center><img src="images/img/Lake/kat.jpg"></center>'
	'See you smiling Kate "<<$name>> Hi how''s it going."'

	act 'Leave':gt 'Nudelake'
	act 'Offer to play volleyball':gt 'Katlake', 'voleybol'
	act 'Suggest a walk':gt 'Katlake', 'walk'

	act 'Chat':
		cla
		clr
		katday = day
		kat += 1
		minut += 30
		'You talked for half an hour.'

		act 'Leave':gt 'Nudelake'
	end
end

if $ARGS[0] = 'voleybol':
	cla
	clr
	*clr
	katday = day
	kat += 3
	minut += 30
	agil += 1
	react += 1
	speed += 1
	gs 'stat'
	'<center><img src="images/img/Lake/voleybol.jpg"></center>'
	'You can go to Kate volleyball court and Join of playing. When something goes wrong Kate encourages you clapping a hand over your bare ass, with her hand on his buttocks slightly delayed slightly squeezing it.'

	act 'Finish':gt 'Nudelake'
end

if $ARGS[0] = 'walk':
	cla
	katday = day
	kat += 2
	minut += 30
	gs 'stat'
	'You Kat walk along the beach, chatting merrily.'
	kwalrand = rand(0, 100)

	if kwalrand >= 80 and kwalrand < 90 and kat > 20:gt 'Kwlake1'
	if kwalrand >= 90 and kat > 20:gt 'Kwlake2'

	act 'Finish':gt 'Nudelake'
end


if $ARGS[0] = 'key':
	cla
	clr
	*clr
	katkey = 1
	kat += 10
	minut += 60
	gs 'stat'
	'<center><img src="images/img/Lake/sun.jpg"></center>'
	'You sunbathe, you suddenly become ill, dizzy, nauseated you. You tried to get up and lost consciousness.'
	'"Now, now, wait a little." where you hear that voice from the darkness Katie.'
	'You feel the cool darkness slowly razveevaetsya and you open your eyes. Before you face the Cat.'
	'"Good, you are finally awake." says Kate. You look around, you have a wet towel on your head, and you yourself are lying in the shade under a tree.'
	'"What happened to me, " you ask.'
	'"What, what, sunstroke, that''s what." meets Katya.'
	'"And now comes to life and went to me, today I''ll stay, " she continued.'
	'"I feel better, I am going home, " you tried to argue.'
	'"No, well, you better it a look, I''m with her noshus like a chicken with egg, three times ran a towel drenched, dragged by his shadow, and she still vykobenivaetsya. All I said to me it means to me, I still nurse and I know better "'
	'After this tirade mind you do not become'

	act 'Go with Kate.':gt 'kathouse0'
end

--- Katlake ---------------------------------
# katspalnya
$sexloc = $CURLOC

if $ARGS[0] = 'start':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cls
	gs 'stat'
	'<center><b><font color="maroon">Guest Katie</font></b></center>'
	! WD: Correct Image path ~ "images/img/SleepingQuarter/Kathouse/bedroom.jpg"
	'<center><img src="images/img/Kathouse/bedroom.jpg"></center>'

	if hour >= 18 and hour < 23:'Sitting on the couch <a href="exec:gt ''katspalnya'', ''kat''">Kate</a> and watching television'
	if hour >= 23 or hour < 6:'In bed asleep <a href="exec:gt ''katspalnya'', ''katslip''">Kate</a>.'

	'Large room in the middle is a huge bed, a small couch in the side.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'katslip':
	cla
	clr
	*clr
	minut += 30

	if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'

	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'Katya rubs his eyes "Hey how''s it going."'

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

	if kat > 50:act 'Sex':gt 'lezbsex', 'start'
end

if $ARGS[0] = 'kat':
	cla
	clr
	*clr
	minut += 30

	if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'

	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'Seeing you Katya smiling "Hi how''s it going."'

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

	if kat > 50:act 'Sex':gt 'lezbsex', 'start'

	act 'Chat':
		cla
		clr
		*clr

		if telkat = 0:telkat = 1

		kat += 1
		minut += 30
		'<center><img src="images/img/Kathouse/kat.jpg"></center>'
		'You talked for half an hour.'

		act 'Finish':gt 'katspalnya', 'start'
	end
end

if $ARGS[0] = 'katjobs':
	cla
	clr
	*clr
	katjob = 1
	minut += 30
	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'"<<$name>> if you want I can talk to your doctor and heads take to work in the clinic."'

	act '"But I''m not a nurse."':
		cla
		'"But I''m not a nurse." you tried to argue.'
		'"Oh, come on, you start with what some unpretentious, dressing will do. And there you''ll learn, life safety in the school because it was."'
		'"Yes, it was." otveteli you thinking about what you are interested in while not dressings.'
		'"Well, okay, I''ll talk and you yourself want to come see it or not."'

		act '"Good."':gt 'katspalnya', 'start'
	end
end

--- katspalnya ---------------------------------
# kazinosvid
minut += 60
kisvrand = 0
manna += 10
gs 'stat'
'<center><b>Cinema</b></center>'
'<center><img src="images/img/kazinosvid/0.jpg"></center>'
'And you <<$telsob>> sat down at the table and began to play.'

act 'Play':
	if $telsob = 'Alla':
		alla += 1

		if alla >= 20:
			kisvrand = rand(0, 10)
			if kisvrand > 0 and kisvrand < 3:gt 'kazinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kazinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kazinosvid', '3'
		else
			gt 'kazinosvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			kisvrand = rand(0, 10)

			if kisvrand > 0 and kisvrand < 3:gt 'kazinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kazinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kazinosvid', '3'
		else
			gt 'kazinosvid', '3'
		end
	elseif $telsob = 'Katia':
		kat += 1
		if kat >= 20:
			kisvrand = rand(0, 10)

			if kisvrand > 0 and kisvrand < 3:gt 'kazinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kazinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kazinosvid', '3'
		else
			gt 'kazinosvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/img/kazinosvid/0.jpg"></center>'
	'While you play you two guys hooked and offered to play two by two in their room.'
	'<<$telsob>> said that she does not mind and looked questioningly at you.'

	act 'Refuse':gt 'kazinosvid', '3'

	act 'Agree':
		cla
		*clr
		picrand = rand(14, 15)
		'<center><img src="images/img/kazinosvid/<<picrand>>.jpg"></center>'
		randkazinv = rand(0, 1)
		randkazinvsum = rand(100, 10000)

		if randkazinv = 1:
			money += randkazinvsum
			'You won and your share <<randkazinvsum>> rub. You and <<$telsob>> were about to leave, but the guys started to beg you to stay, "C''mon girls, to take the time can sit down, have a drink, take a closer look. Well losers are left reassurance" said one rastegnuv his pants and pulled out a member, clearly implying any consolation he waits .'
			telsobnastr = rand(0, 10)

			if telsobnastr < 4:
				'"No, it''s time, reassurance to themselves." said <<$telsob>> and taking you by the hand brought back to the gym'

				act 'Finish':gt 'kazinosvid', '3'
			else
				'"I do not mind console losers" said <<$telsob>> lustfully smiling and looking at the guy who has his fly open from sticking member.'

				act 'Pick up <<$telsob>> and leave.':gt 'kazinosvid', '3'

				act 'To console the losers':
					kazsexdva = 1
					guy += 2
					gang += 1
					xgt 'sexdvanadva', 'var'
				end
			end
		else
			'You lost your share and loss <<randkazinvsum>> rub.'

			if money < randkazinvsum:
				'You have no money to pay and <<$telsob>> also have no money left to pay that, no options have to open your legs.'

				act 'Pay in kind':
					kazsexdva = 1
					guy += 2
					gang += 1
					xgt 'sexdvanadva', 'var'
				end
			else
				'Do you have enough money to pay and <<$telsob>> that also have enough money to pay, but the guys obviously hints that do not necessarily pay the money, they would gladly accept another form of payment.'

				if telsobnastr < 4:
					money -= randkazinvsum
					'"No, we go, here''s your money." said <<$telsob>> and taking you by the hand brought back to the gym'

					act 'Finish':gt 'kazinosvid', '3'
				else
					'"I do not mind to use an alternative form of payment, " said <<$telsob>> smiling lasciviously.'

					act 'Giving money to pick up <<$telsob>> and leave.':
						money -= randkazinvsum
						gt 'kazinosvid', '3'
					end

					act 'Use an alternative form of payment':
						kazsexdva = 1
						guy += 2
						gang += 1
						xgt 'sexdvanadva', 'var'
					end
				end
			end
		end
	end
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/img/kazinosvid/0.jpg"></center>'
	'While you are playing you addicted man and offered to play with him in his room.'
	'<<$telsob>> said that she does not mind and looked questioningly at you.'

	act 'Refuse':gt 'kazinosvid', '3'

	act 'Agree':
		cla
		*clr
		'<center><img src="images/img/kazinosvid/3.jpg"></center>'
		'Arriving at the room you are located on the bed and began to play a few minutes later a guy offered to play on the strip. <<$telsob>> giggled "And then you do not be ashamed, but you see so far have never won, " grinned the guy, "I have nothing to be ashamed of."'

		act 'Refuse to pick up <<$telsob>> and leave':gt 'kazinosvid', '3'

		act 'Agree':
			cla
			*clr
			'<center><img src="images/img/kazinosvid/4.jpg"></center>'
			'After a few minutes and you <<$telsob>> already removed her panties. "It does not honestly, you spetsalno first succumbed to we agreed" said <<$telsob>>, defiantly pout.'
			'"Good girl, the last game the two of you against me, you can even change the cards, win doing that tell fun too lose to the fullest." the guy said.'
			'"Playing" immediately blurted <<$telsob>>'

			act 'Play':
				cla
				*clr
				'<center><img src="images/img/kazinosvid/5.jpg"></center>'
				'A minute later he was standing with his pants down, "Well girls, gambling debt - holy, the incident" he said pointing to his dildo'

				act 'Start':
					guy += 1
					picrand = 23
					kazsexdva = 1
					gt 'podrsex', 'var'
				end
			end
		end
	end
end

if $ARGS[0] = '3':
	cla
	horny = 0
	minut += 90
	gs 'stat'
	'Soon <<$telsob>> said that she had to flee and left'

	act 'Leave':gt 'nord'
end

--- kazinosvid ---------------------------------
# kino
gs 'stat'
'<center><b>Cinema</b></center>'
'<center><img src="images/img/centr/kino.jpg"></center>'
'Small cinema ticket costs 300 rubles.'

act 'Leave':gt 'torgcentr'

if hour >= 8 and hour <= 20:
	if money >= 300:
		act 'Watch a movie (300 rubles)':
			cls
			money -= 300
			minut += 60
			manna += 300
			gs 'stat'
			kinorand = rand(0, 9)

			if kinorand = 9:
				'The room is empty, just sitting next to you one man.'

				act 'Watch the movie':minut += 60 & gt 'kino'

				act 'Seduce':
					cla
					*clr
					'<center><img src="images/img/centr/kino1.jpg"></center>'

					if vnesh < 15:
						'You bares breasts demonstrate her boyfriend, but he does not pay attention to you'

						act 'Leave':gt 'kino'
					else
						'You bares breasts demonstrate her boyfriend, he was clearly interested and looking at you in looking forward to a'

						act 'Cooney':
							cla
							*clr
							guy += 1
							kuni += 1
							horny += 10
							'<center><img src="images/img/centr/kino2.jpg"></center>'
							'You push your feet and ask him to lick the guy quickly knelt down and began to lick you.'

							act 'Leave':DOM += 1 & gt 'kino'
							act 'Blow job':gt 'kino', 'sex'
						end

						act 'Blow job':gt 'kino', 'sex'
					end
				end

				exit
			end

			minut += 60
			gs 'stat'
			'You watched the film'

			act 'Leave':gt 'kino'
		end
	end
else
	'Cinema closed.'
end

if $ARGS[0] = 'sex':
	cla
	*clr
	bj += 1
	'<center><img src="images/img/centr/kino3.jpg"></center>'
	'You cupped his excited penis lips and began to suck his hand while playing with his balls. Soon you will feel that he is about to finish.'

	act 'Suck':
		cla
		'You continued to suck and the guy is dead in your mouth filling it with warm viscous liquid.'

		act 'Leave':cumlip += 1 & gt 'kino'
	end

	act 'Post':
		cla
		*clr
		sex += 1
		horny += 50
		'<center><img src="images/img/centr/kino4.jpg"></center>'
		'You get up on your knees chair, turning his back to the guy and invitingly swaying ass, he did not wait and you quickly entered into the vagina, after a few seconds he groaned and came inside you, leaving you unsatisfied.'

		act 'Leave':cumpussy += 1 & gt 'kino'
	end
end

--- kino ---------------------------------
# kinosvid
minut += 60
kisvrand = 0
manna += 10
gs 'stat'
'<center><b>Cinema</b></center>'
'<center><img src="images/img/kinosvid/0.jpg"></center>'
'And you <<$telsob>> have bought tickets and took their seats ready for viewing'

act 'Watch a movie':
	if $telsob = 'Alla':
		alla += 1
		if alla >= 20:
			kisvrand = rand(0, 10)

			if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
		else
			gt 'kinosvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			kisvrand = rand(0, 10)

			if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
		else
			gt 'kinosvid', '3'
		end
	elseif $telsob = 'Katja':
		kat += 1

		if kat >= 20:
			kisvrand = rand(0, 10)

			if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
			if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
			if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
		else
			gt 'kinosvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/img/kinosvid/1.jpg"></center>'
	'Passing you submissive <<$telsob>> distracted by the screen and it wakes you.'

	act 'Oh':
		cla
		*clr
		lesbian += 1
		'<center><img src="images/img/kinosvid/2.jpg"></center>'
		'"Here I am clumsy, " she whispered, and began to clean up the popcorn with your clothes, her hands glided over your body collecting popcorn when she took off all her clothes c fingers slipped under clothing pulling back from the remnants of popcorn, her touch you a little excited, <<$telsob>> same clothes you have lifted up so that it was easier to get popcorn.'
		'Suddenly she lifted her head and looked around the hall where no one except you and smile nebilo said "regaled popkornchikom?" With that, she put her head down to your chest and the remnants of popcorn became quickly disappear from your body under the influence of her tongue, sending them into her mouth.'

		act 'Enjoy':gt 'kinosvid', '10'
		act 'Fondle her':gt 'kinosvid', '11'
	end
end

if $ARGS[0] = '10':
	cla
	*clr
	orgasm += 1
	'<center><img src="images/img/kinosvid/3.jpg"></center>'
	'Soon her tongue down below the stomach and that <<$telsob>> has already dug tongue in your pussy expertly massaging the clitoris and bringing you to orgasm.'

	act 'Enjoy':
		cla
		*clr
		orgasm += 1
		vagina += 1
		'<center><img src="images/img/kinosvid/4.jpg"></center>'
		'<<$telsob>> floated fingers, continuing to massage the clitoris tongue, she tucked first one, then a second finger, and so long as you were not her four fingers, in fact she put all her fingers and brush wholly entered into and you start gently move inside continuing to lick the clitoris, a few seconds of this massage you again covered orgasm.'

		act 'Fondle her':gt 'kinosvid', '13'
		act 'Finish':gt 'kinosvid', '3'
	end

	act 'Fondle her':gt 'kinosvid', '12'
end

if $ARGS[0] = '11':
	cla
	*clr
	'<center><img src="images/img/kinosvid/5.jpg"></center>'
	'You rose from the chair and forcing her to stand glaring lips to her chest, ran his hand into her pants, her pussy was already very wet and your fingers easily proskalznuli inside. After a minute <<$telsob>> strongly pressed your head to your chest and you felt like her whole body shook your hand and on her juices flowed.'

	act 'Caressing her pussy':gt 'kinosvid', '14'
	act 'Caress her ass':gt 'kinosvid', '15'
	act 'Put on your knees':gt 'kinosvid', '16'
end

if $ARGS[0] = '12':
	cla
	*clr
	'<center><img src="images/img/kinosvid/6.jpg"></center>'
	'You slipped lower and taking <<$telsob>> under the arms pulled up, she realized what you want and quickly zaskachila on chair, placing her pussy oozing over your face. Lips clinging to her crotch you entered my tongue into her, diligently plying them inside. A few minutes later <<$telsob>> was rapidly rub against your mouth and after a few seconds her juices fill your mouth.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '13':
	cla
	*clr
	'<center><img src="images/img/kinosvid/7.jpg"></center>'
	'Seated in her chair, you knelt down and began to lick her pussy odnovremeno inserting her fingers one by one, when her pussy was stretched enough, you have laid a hand and gently entered her. Soon <<$telsob>> and shuddered from her lips escaped a moan of pleasure.'

	act 'Substitute ass':gt 'kinosvid', '110'
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '14':
	cla
	*clr
	'<center><img src="images/img/kinosvid/8.jpg"></center>'
	'Unfolding her back to him you''re a little pushed her forward so that she stood on a chair and knees kneeling clung to her pussy, then dropped into your tongue inside it caressed the clitoris <<$telsob>> moaning with pleasure.'

	act 'Fondle her':gt 'kinosvid', '17'
end

if $ARGS[0] = '15':
	cla
	*clr
	'<center><img src="images/img/kinosvid/9.jpg"></center>'
	'Unfolding her back to him you''re a little pushed her forward so that she stood on a chair and knees kneeling clung to her ass, then dropped into your tongue inside the anus then fondled the buttocks <<$telsob>> moaning with pleasure, trying to run a deeper your language .'

	act 'Fondle her':gt 'kinosvid', '17'
end

if $ARGS[0] = '16':
	cla
	*clr
	'<center><img src="images/img/kinosvid/11.jpg"></center>'
	'You pressed on her shoulders and <<$telsob>> quickly dropped to his knees in front of you, you bulged forward trying to give her maximum access to her crotch, <<$telsob>> pressed his lips to your pussy and then draw in your lips then indulge in language, massaging your clitoris.'

	act 'Enjoy':gt 'kinosvid', '18'
	act 'Fondle her':gt 'kinosvid', '19'
end

if $ARGS[0] = '17':
	cla
	*clr
	'<center><img src="images/img/kinosvid/10.jpg"></center>'
	'Gradually you start getting fingers in her pussy, her anus odnovremeno Shchekotov tongue, every time her vagina stretched enough you shoved another finger, a few minutes later your whole hand was inside her pussy. <<$telsob>> moaning and diligently podmahivala the beat of your hand, in a couple of minutes, she cried, clutching the chair strongly you felt inside her womb spreads heat.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '18':
	cla
	*clr
	orgasm += 1
	'<center><img src="images/img/kinosvid/12.jpg"></center>'
	'You pulled up a chair and foot <<$telsob>> hug your hip continued to kiss your pussy then penetrating tongue inside, kissing clit, sucked it into itself. A few minutes later weaken and satisfied collapsed on a chair.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '19':
	cla
	*clr
	'<center><img src="images/img/kinosvid/13.jpg"></center>'
	'You picked her up and helped to climb back in his chair, and then spread wide her legs bowed down to her pussy passionately licking her lips and clit, a few minutes later <<$telsob>> moaned, clutching your hair and richly finished, you tchatelno lapped up all that flowed from it countries not to miss drop.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '110':
	cla
	*clr
	orgasm += 1
	'<center><img src="images/img/kinosvid/14.jpg"></center>'
	'You got my knees on a chair, turning to her ass and began to shake her hips invitingly, <<$telsob>> does not make them wait in a couple of seconds her hands parted the buttocks and your tongue aggressively invade you in the ass, after a few minutes of this massage you left off, and <<$telsob>> tchatelno lapped up all the juices from your hips.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '2':
	cla
	*clr
	lesbian += 1
	'<center><img src="images/img/kinosvid/0.jpg"></center>'
	'During the session <<$telsob>> said that it should go out and quietly left the room.'

	act 'Wait':
		cla
		*clr
		'<center><img src="images/img/kinosvid/20.jpg"></center>'

		if kendra = 0:'While it was not nice to you hooked no circumstances African and putting his hand on your hip, started stroking it slowly priblezhayas to the perineum and now her fingers naglazhivayut your clitoris. You are confused by such impudence and just sat in a stupor watching namanikyurinye marigolds you penetrate into the vagina. At this point in the back room <<$telsob>> and uvidivetu picture immediately vskhvatila africana by the ear and pulled out of the hall, the guys sitting in the hall laughed and back <<$telsob>> started yelling at them so that they would prefer to leave. In the hall were just you and <<$telsob>>.'
		if kendra > 0:'While it was not hooked to you and Kendra no circumstances putting a hand on your hip, started stroking it slowly priblezhayas perineum and now her fingers naglazhivayut your clitoris. You are confused by such impudence and just sat in a stupor watching namanikyurinye marigolds you penetrate into the vagina. At this point in the back room <<$telsob>> and uvidivetu picture immediately vskhvatila Kendra ear and pulled out of the hall, the guys sitting in the hall laughed and back <<$telsob>> started yelling at them so that they would prefer to leave. In the hall were just you and <<$telsob>>.'

		act 'Wait':
			cla
			*clr
			'<center><img src="images/img/kinosvid/21.jpg"></center>'
			'When <<$telsob>> a little calmed down and sat back down next to you, you are still and sat with her legs spread wide and bare wet pussy. Looking at you, <<$telsob>> quietly began filming with you top clothing'

			act 'Wait':
				cla
				*clr
				vagina += 1
				orgasm += 1
				'<center><img src="images/img/kinosvid/22.jpg"></center>'
				'When <<$telsob>> bared your breasts, first walked on her tongue, and then glaring you in the lips, with the force you inserted two fingers into her vagina and pryanyalas violently move them, it seems that the anger in her still raged. You flattered that <<$telsob>> you jealous and began diligently podmahivat though hardly keep up with her movements, and finished in a few minutes. <<$telsob>> does not appeased and tried to flip you.'

				act 'Submit':
					cla
					*clr
					orgasm += 1
					'<center><img src="images/img/kinosvid/23.jpg"></center>'
					'You obediently rolled over and got cancer in his chair, this time you got four fingers in her vagina. <<$telsob>> moved them at such a rate that soon you become sick, but made its way through the pain and pleasure you again soon finished.'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/kinosvid/24.jpg"></center>'
						'<<$telsob>> stood on a nearby chair and poodlokotniki taking your hand inserted four fingers of their pussy, you began to gently move his hand trying not to cause her pain, but received ukorizniny opinion, accelerated I could. <<$telsob>> moan so shouted over the film, she soon vskriknulai limp, sliding armrests with you and kiss it as if nothing had happened continued to watch the movie.'

						act 'Finish':gt 'kinosvid', '3'
					end
				end

				act 'Fondle her':gt 'kinosvid', '22'
			end

			act 'Fondle her':gt 'kinosvid', '21'
		end
	end
end

if $ARGS[0] = '21':
	cla
	*clr
	'<center><img src="images/img/kinosvid/25.jpg"></center>'
	'Without waiting for her to finish in throw off the remnants of clothes and sat on the floor in front of her to throw back his head and draw out the tongue. <<$telsob>> slowly got up off his clothes and stood over you, she shook her hips a few times so that your tongue sticking out walked over her pussy, then stopped placing her pussy so that your tongue lightly touched her clitoris. You clung to her crotch and then ran into a language that tickled the clitoris, a few minutes later <<$telsob>> finished filling your mouth with their droppings.'

	act 'Finish':
		cla
		*clr
		orgasm += 1
		'<center><img src="images/img/kinosvid/26.jpg"></center>'
		'When you''re dressed and sat down to watch the movie again, <<$telsob>> suddenly dropped to his knees in your chair and your feet spread wide lips you dug in the pussy, her tongue zasklzil on your lips and clitoris then dropping into the vagina then slipped just below the anus. Soon her efforts were crowned with success, your body is stirred up by the skin and shivers ran wave of pleasure you covered.'

		act 'Finish':gt 'kinosvid', '3'
	end
end

if $ARGS[0] = '22':
	cla
	*clr
	'<center><img src="images/img/kinosvid/27.jpg"></center>'
	'You gently pushed her away and knelt bullying her feet up. <<$telsob>> pushing the hips and hands you start to caress her tongue, first spending thighs then lick her lips and her tongue was neatly enter the vagina, then spiral back to the hips back, a few of these approaches <<$telsob>> begins to tremble and from breaking moan of pleasure.'

	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '3':
	cla
	horny = 0
	minut += 90
	gs 'stat'
	'When the movie ended <<$telsob>> said that she had to flee and left'

	act 'Leave':gt 'torgcentr'
end

--- kinosvid ---------------------------------
# kitchen
minut += 5
gs 'stat'
'<center><b>Kitchen</b></center>'
'<center><img src="images/img/centr/kitchen.jpg"></center>'

act 'In the corridor':gt 'house'

act 'Eat Meal (0:30)':
	cla
	*clr
	gs 'stat'
	frost = 0
	minut += 30
	edahot = 0
	health += 10
	manna += 20
	'<center><img src="images/pics/food.jpg"></center>'

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		fat += 1
		'You gladly ate cooked food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	else
		water += 20
		'You gladly drank a mug of tea.'

	end

	act 'Get up from the table':gt 'kitchen'
end

if tanwork = 1:
	act 'Cook food (1:00)':
		minut += 60
		nikrand = rand(0, 5)

		if week < 6 and hour >= 6 and hour <= 9 and nikrand = 0 and vnesh > 20 and niksexday ! day:
			cla
			niksexday = day
			'The kitchen breakfast Tannin stepfather, Nikolai'

			act 'Go about their business.':gt 'kitchen'

			if niksex = 0 and tanga = 0:
				cla
				'You notice that he is not taking his eyes off your ass, not surprisingly trisikov because you do not.'

				act 'Go about their business.':gt 'kitchen'

				act 'Seduce':
					cla
					*clr
					niksex = 1
					nik += 1
					'<center><img src="images/img/centr/kitchensob.jpg"></center>'
					'You bend down so that your bare ass appears before him in all its glory, and continue to do their work, pretending that he did not notice that the skirt rode up and you have a bare ass in the end when you once again that you drop or bend down for this without bending the legs, Nicholas walks up to you and hand you gently lays down on the buttocks.'

					act 'Blow job':
						cla
						*clr
						nik += 2
						cumlip += 1
						bj += 1
						guy += 1
						'<center><img src="images/img/centr/kitchenminet.jpg"></center>'
						'You get up on his knees and his pants are releasing rastegnuv his huge cock. Licking you head bows his lips and sucking takes diligently trying to tighten it as far as possible, but do not pull out up to half, and finally he starts to cum in your mouth pouring jet of sperm, you hardly have time to swallow, but it does not end when she finally ended you carefully licked his dick from sperm, and removing it back into his pants stood up and turned to the stove without even looking at Nicholas. He put the plate around 1000 and went out.'

						act 'Take the money':
							money += 1000
							nikslut = 1
							gt 'kitchen'
						end

						act 'Do not take money':gt 'kitchen'
					end

					act 'Anal':
						cla
						*clr
						guy += 1
						anal += 1
						nik += 5
						cumassin += 1
						'<center><img src="images/img/centr/kitchenanal.jpg"></center>'
						'Not turning to him you take a little oil and lubricate them anus, buttocks Spreading through your anus second rests his dick when he starts to enter you could barely hold back anything would not cry out in pain, his cock is too big for your ass. You only slightly moaning as his big dildo anus breaks you, although you want to scream in pain. Finally he cums and spills his seed inside your ass, it is so much that you have to stretch the buttocks strongly that, would not it all spilled out onto the floor. He lays down about 2000, and the plate comes out.'

						act 'Take the money':
							money += 2000
							nikslut = 1
							gt 'kitchen'
						end

						act 'Do not take money':gt 'kitchen'
					end
				end
			elseif niksex = 1 and nikslut = 0 and niksvid = 0:
				cla
				'He walks up to you and his hands immediately climbs under your skirt'

				act 'Blow job':
					cla
					*clr
					bj += 1
					guy += 1
					nik += 1
					cumlip += 1
					'<center><img src="images/img/centr/kitchenminet.jpg"></center>'
					'You get up on his knees and his pants are releasing rastegnuv his huge cock. Licking you head bows his lips and sucking takes diligently trying to tighten it as far as possible, but not even half of dostoete, and finally he starts to cum in your mouth pouring jet of sperm, you hardly have time to swallow, but it does not end when she finally ended definitively you licked a member of sperm, and removing it back into his pants stood up and turned to the stove without even looking at Nicholas. He turns you to itself and stretches 1, 000 rubles.'

					act 'Take the money':
						money += 1000
						nikslut = 1
						gt 'kitchen'
					end

					act 'Do not take money':
						cla
						niksvid = 1
						'You look at the money at him and then stick in him a slap with the words, "I''m not a whore, and for the money do not fuck."'
						'He looks at you a little dumbfounded, "Okay, " says Nicholas and out of the kitchen.'

						act 'Back to business':gt 'kitchen'
					end
				end

				act 'Anal':
					cla
					*clr
					nik += 2
					cumassin += 1
					'<center><img src="images/img/centr/kitchenanal.jpg"></center>'
					'Not turning to him you take a little oil and lubricate them anus, buttocks Spreading through your anus second rests his cock, he quickly comes into you and you will not hurt so much and even nice when his cock fucks your ass. You moan and diligently podmahivat him, he soon discharged you. He hands you a 2000 rubles.'

					act 'Take the money':
						money += 2000
						nikslut = 1
						gt 'kitchen'
					end

					act 'Do not take money':
						niksvid = 1
						'You look at the money at him and then stick in him a slap with the words, "I''m not a whore, and for the money do not fuck."'
						'He looks at you a little dumbfounded, "Okay, " says Nicholas and out of the kitchen.'

						act 'Back to business':gt 'kitchen'
					end
				end
			elseif nikslut = 1:
				cla
				*clr
				SUB += 1
				nikslutrand = rand(0, 1)

				if nikslutrand = 0:
					bj += 1
					cumlip += 1
					money += 500
					'<center><img src="images/img/centr/kitchenminet.jpg"></center>'
					'He walks up to you and put his hand on his shoulder otuskaet lap. Quickly realizing that he wants you open your mouth and suck obediently until he fills your mouth with his sperm, it leaves you 500 rubles. and leaves.'

					if horny > 60:
						cla
						orgasm += 1
						horny = 0
						'You''re too excited to think that-about something other than sex, you have to take care of herself'

						act 'Hand':
							cla
							*clr
							'<center><img src="images/img/th/m0.jpg"></center>'
							'Lowering his hand to the crotch you have inserted a couple palichikov their pussy and began to actively move them bringing themselves to orgasm.'

							act 'Back to business':gt 'kitchen'
						end

						act 'Improvised means':
							cla
							*clr
							'<center><img src="images/img/th/m1.jpg"></center>'
							'You got out of the fridge cucumber, licked it ruled on their pussy. Cucumber was cold, and at first you start to disappear excitement, but soon gave new chill feeling and you start to like it, cool cucumber moved to your pussy. You opened the fridge to plow and settled closer to him, you chill ran back and skin crawled. Only your pussy remained razgorechennoy and soon enveloped you pleasure. Came a little you took already warmed cucumber and closed the refrigerator, looking for cucumber you decide to put it on salad and even the hostess did not wash, it will be a special taste.'

							act 'Back to business':gt 'kitchen'
						end
					end

					act 'Back to business':gt 'kitchen'
				else
					anal += 1
					cumass += 1
					money += 1000
					'<center><img src="images/img/centr/kitchenanal.jpg"></center>'
					'He walks up to you and you lifted up her skirt spreads buttocks, you barely have time to lubricate the anus before he force pushes his dick in it, you stand in silence and wait until he finishes, to Nicholas vyterat your body on your ass and leave you 1000 rubles . leaves.'

					if horny > 60:
						cla
						orgasm += 1
						horny = 0
						'You''re too excited to think that-about something other than sex, you have to take care of herself'

						act 'Hand':
							cla
							*clr
							'<center><img src="images/img/th/m0.jpg"></center>'
							'Lowering his hand to the crotch you have inserted a couple palichikov their pussy and began to actively move them bringing themselves to orgasm.'

							act 'Back to business':gt 'kitchen'
						end

						act 'Improvised means':
							cla
							*clr
							'<center><img src="images/img/th/m1.jpg"></center>'
							'You got out of the fridge cucumber, licked it ruled on their pussy. Cucumber was cold, and at first you start to disappear excitement, but soon gave new chill feeling and you start to like it, cool cucumber moved to your pussy. You opened the fridge to plow and settled closer to him, you chill ran back and skin crawled. Only your pussy remained razgorechennoy and soon enveloped you pleasure. Came a little you took already warmed cucumber and closed the refrigerator, looking for cucumber you decide to put it on salad and even the hostess did not wash, it will be a special taste.'

							act 'Back to business':gt 'kitchen'
						end
					end

					act 'Back to business':gt 'kitchen'
				end
			end
		end

		'You cooked a meal'

		act 'Finish':gt 'kitchen'
	end
end

if pranik > 0:
	act 'Drink tea with cookies (0:05)':
		cla
		*clr
		minut += 5
		pranik -= 1
		health += 30
		manna += 100
		energy += 20
		water += 20
		fat += 50
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You drank tea with cookies, sweet and very bad for the figure, but so nice.'

		act 'Get up from the table':gt 'kitchen'
	end
end

if edaD > 0:
	act 'Eat diet food (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'

		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a mug of tea.'
		end

		act 'Get up from the table':gt 'kitchen'
	end
end

if fatdel > 0:
	act 'Consume fat burners':
		cla
		*clr
		fatdel -= 1
		fat -= 25

		if fat < 0:fat = 0

		'You drank fat burning capsule. These capsules are gradually and results will be seen immediately.'

		act 'Get up from the table':gt 'kitchen'
	end
end

act 'Drink':
	cla
	minut += 5

	if water >= 20:
		'You don''t need any more water.'
	else
		water += 20
		'You gladly drank a glass of water.'

	end

	act 'Get up from the table':gt 'kitchen'
end

if lekarstvo > 0:
	'You have <<lekarstvo>> tablets.'

	if sick > 0 and lekarday ! day:
		act 'Take a pill':
			cla
			*clr
			minut += 5
			lekarday = day
			lekarstvo -= 1
			sick -= sick * 20/100
			lekrand = rand(1, 9)
			'<center><img src="images/inBed/lekr<<picrand>>.jpg"></center>'
			'You took a pill'

			act 'Move away':gt 'kitchen'
		end
	end
end

if vitamin > 0:
	'You have <<vitamin>> vitaminok.'
	if vitaminday ! day:
		act 'Drink Vitamins (0:05)':
			cla
			*clr
			minut += 5
			vitaminday = day
			vitamin -= 1
			frost = 0
			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

			'You took some vitamins'

			act 'Move away':gt 'kitchen'

		end
	end
end

housekitrand = rand(0, 10)

if hour > 17 and hour < 20 and housekitrand > 8 and nikslut = 1 and niksexday ! day:
	cla
	*clr
	SUB += 1
	guy += 1
	minut += 20
	niksexday = day
	money += 2000
	picrand = 36
	'<center><img src="images/img/th/s1.jpg"></center>'
	'Nicholas went to the kitchen with another man "<<$name>>, feed us, " he said. You get all warmed up and began to wait when they will eat. When they finished Nicholas looked at you and said, "Thank you, everything was tasty <<$name>>, where the dessert?" You frantically began to think that they give for dessert, because you have not cooked anything. "Yes you wait" said Nikolai see your kitchen by throwing in search of dessert, "You do not understand, so let this dessert, " he said, slapping you on the ass. You sigh of relief, so this dessert you always at the ready. You get everything cleaned off the table and do not have got it.'

	act 'Start':xgt 'sexdvoe', 'var'
end

--- kitchen ---------------------------------
# Kwlake1
clr
gs 'stat'
'<center><img src="images/img/Lake/kwlake1/kwlake1.jpg"></center>'
'Walking along the beach you notice unusual stone shapes resembling dildo.'
'"Look how cool" interrupting you Kat story about some guy pointing at the stone.'
'Kate raises stone, inspects and laughing puts it in his mouth blow job portraying'

act 'Laugh.':gt 'Kwlake1', 'end'

act 'Fondle her.':
	cla
	*clr
	kat += 5
	lesbian += 1
	'<center><img src="images/img/Lake/kwlake1/kwlake2.jpg"></center>'
	'You Spit pubis Katie, and descends below his hand running his fingers over her pussy. Kat little straddle, you go down on your knees and kiss her crotch, slowly moving to her pussy and starting to caress her tongue.'

	act 'Lie down':
		cla
		*clr
		kuni += 1
		'<center><img src="images/img/Lake/kwlake1/kwlake3.jpg"></center>'
		'You lie on the sand, Kate gives you the stone, and she spends the language of your razgorechenomu body from neck to crotch and begins to caress your tongue. You are so excited that without noticing take a stone in his mouth and start to suck it. Kat you are so enthusiastic about each other that nazametili approached the guy, he has meanwhile play their yaldu a few minutes you will notice it.'

		act 'Leave':gt 'Nudelake'

		act 'Man beckon':
			cla
			*clr
			kat += 5
			mastr += 1
			orgasm += 1
			'<center><img src="images/img/Lake/kwlake1/kwlake4.jpg"></center>'
			'You beckon Man, he comes and stops in indecision, not knowing who to approach you or Kate. But Kate did not give him a long time to arrive in thought, turning to him Kate grabbed his dick lips, leaving your expiring pussy alone, but you are not taken aback by inserting a stone at her, began to masturbate until you have brought yourself to orgasm.'

			act 'Approach the Cat':
				cla
				*clr
				'<center><img src="images/img/Lake/kwlake1/kwlake5.jpg"></center>'
				'While you have already masturbated Kate straddled Man, you come to it apply the stone to his pubis, Kate with a smile enough Kamet lips licking your juices from it.'

				act '...':
					cla
					*clr
					anal += 1
					'<center><img src="images/img/Lake/kwlake1/kwlake6.jpg"></center>'
					'Katya guy posing on all fours and enters her ass, you also get up on all fours ass turning to Kate and give her the stone. Kat is not thinking long stone inserts in your anus.'

					act '...':
						cla
						*clr
						'<center><img src="images/img/Lake/kwlake1/kwlake7.jpg"></center>'
						'Sated Katina ass guy puts her on her knees and cums in her mouth'

						act 'Leave':gt 'Nudelake'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'end':
	cla
	'"Pervert" laughing at you'
	'"What an easy blowjob stone god can make my guy eternal risers." Kate laughs and throws a rock and returns to its Raskaz.'

	act 'Finish':gt 'Nudelake'
end

--- Kwlake1 ---------------------------------
# Kwlake2
clr
gs 'stat'
'<center><img src="images/img/Lake/kwlake2/kwlake1.jpg"></center>'
'Walking along the beach you notice a man sitting alone.'
'"Let''s sit here not much" Katia offers.'

act '"No, let''s go"':gt 'Nudelake'

act '"Come on"':
	cla
	*clr
	kat += 5
	'<center><img src="images/img/Lake/kwlake2/kwlake2.jpg"></center>'
	'You sodites nedoleko of men, Kate starts stroking your pussy and kissing his chest, you watch the corner of my eye a man, seeing this view he perked up, rolled over and slid under her arm.'

	act '"Kat. Enough, went away"':gt 'Nudelake'

	act 'Call a man':
		cla
		*clr
		kat += 5
		kuni += 1
		bj += 1
		'<center><img src="images/img/Lake/kwlake2/kwlake3.jpg"></center>'
		'When Kate starts to lick your pussy, you beckon a man, he quickly jumps up and runs over to you, taking on the go pants. Man ran up opuskaetsyaryadom with you on your knees, poking his cock in your face. Once you had preotkryt mouth as he once put it in his penis and not waiting when you start to suck, fuck your mouth started.'

		act '...':
			cla
			*clr
			sex += 1
			'<center><img src="images/img/Lake/kwlake2/kwlake4.jpg"></center>'
			'When he was tired of your mouth, he lay on his back, and you put on yourself, back to him. Kate stood over you substituting her pussy to your mouth. While the man handles your vagina, you licked Kat and it soon bore fruit. Kate hugged you tightly clenched to her pussy and you felt like she shuddered and her juices flowed into your mouth.'

			act '...':
				cla
				*clr
				cumlip += 1
				orgasm += 1
				'<center><img src="images/img/Lake/kwlake2/kwlake5.jpg"></center>'
				'Soon the man removed you from yourself and putting on his knees again put his dildo into your mouth. Kate also settled down under you, caressing your tongue clitoris. You feel like your bosom pleasant warmth spreads, you clung more to Kat literally pushing her head in the sand. Dick in your mouth and you, too, trembled finished almost simultaneously, a man poured your mouth with his sperm, and your juices flowed in her mouth Katie.'

				act 'Leave':gt 'Nudelake'
			end
		end
	end
end

--- Kwlake2 ---------------------------------
# lezbsex
if $ARGS[0] = 'start':
	gs 'stat'
	girl += 1
	lesbian += 1
	picrand = rand(0, 1)

	if tanznak = 1:
		picrand = 12
		tanznak = 2
	end

	xgt 'lezbsex', 'var'
end

if $ARGS[0] = 'var':
	gs 'stat'

	if picrand ! 11:act 'Cooney':gt 'lezbsex', 'kuni'

	act 'Make Cooney':gt 'lezbsex', 'ukuni'

	if picrand ! 12 and picrand ! 13 and picrand ! 14 and picrand ! 16 and picrand ! 17 and picrand ! 18 and picrand ! 21:act 'Anulingus':gt 'lezbsex', 'anuli'
	if picrand ! 12 and picrand ! 13 and picrand ! 14 and picrand ! 16 and picrand ! 17 and picrand ! 18 and picrand ! 21:act 'Make anulingus':gt 'lezbsex', 'uanuli'
	if strapon = 1 and picrand ! 11 and picrand ! 12 and picrand ! 13 and picrand ! 14 and picrand ! 15 and picrand ! 16 and picrand ! 17 and picrand ! 18 and picrand ! 19 and picrand ! 20 and picrand ! 21 and picrand ! 22:
		act 'Strap-on pussy':gt 'lezbsex', 'svag'
		act 'Strap-on in the ass':gt 'lezbsex', 'sanal'
		act 'Strap on your pussy':gt 'lezbsex', 'usvag'
		act 'Strap you in the ass':gt 'lezbsex', 'usanal'
	end

	if dildo = 1 and picrand ! 12 and picrand ! 19 and picrand ! 20 and picrand ! 22:
		act 'Dildo in pussy':gt 'lezbsex', 'dvag'

		if picrand ! 11 and picrand ! 15 and picrand ! 16 and picrand ! 17 and picrand ! 18 and picrand ! 21:act 'Dildo in the ass':gt 'lezbsex', 'danal'
		if picrand ! 11:act 'Dildo in the pussy you':gt 'lezbsex', 'udvag'
		if picrand ! 11 and picrand ! 14 and picrand ! 15 and picrand ! 16 and picrand ! 17 and picrand ! 18 and picrand ! 21:act 'Dildo you in the ass':gt 'lezbsex', 'udanal'
	end
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/ukuni<<picrand>>.jpg"></center>'
	'You kiss her breasts moving eventually going down lower and lower and now its current before you pussy, you begin to caress her tongue sponges, setting the stage for his tongue between them touch the clitoris, she pushes her lips with your fingers that nothing had prevented you caress the clitoris.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end


	'<center><img src="images/img/lezbsex/kuni<<picrand>>.jpg"></center>'
	'Girl holds his tongue over your thighs, crotch and kisses down to the vagina, her tongue slides over your crotch then caressing the clitoris is penetrating the vagina.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/anuli<<picrand>>.jpg"></center>'
	'She kisses your buttocks priblezhayas moving eventually to the center, reaching a goal, she spends the language of your anus and then shoves it inside your buttocks, prints and again licking the anus, then all repeated.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/uanuli<<picrand>>.jpg"></center>'
	'You lick her buttocks priblezhayas moving eventually to the center, reaching anus, his tongue on his tongue and get inside her buttocks, removing and again licks anus.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

if $ARGS[0] = 'svag':
	cla
	*clr
	minut += 5
	DOM += 1
	horny += 10

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/svag<<picrand>>.jpg"></center>'
	'You wear the strap and insert in her pussy, she yells while you fuck her.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

if $ARGS[0] = 'sanal':
	cla
	*clr
	minut += 5
	DOM += 2
	horny += 10

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/sanal<<picrand>>.jpg"></center>'
	'You wear the strap and gently insert it into the anus of girls starting to fuck her ass medleno first then faster and faster.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/usvag<<picrand>>.jpg"></center>'
	'Girl inserts strap you in the pussy, she moves back and forth bringing you pleasure.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/usanal<<picrand>>.jpg"></center>'
	'Girl spits on you ass, collects saliva strap tip and inserts it into the anus to you, you feel like it is moving in your ass with every thrust faster and deeper.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/dvag<<picrand>>.jpg"></center>'
	'You take a dildo and poke her pussy, she kisses you while you are driving with one hand and the second dildo caress her breasts.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/danal<<picrand>>.jpg"></center>'
	'You take a dildo, licking it, trying to leave it on the maximum amount of saliva, and gently insert into the anus girls starting to fuck her ass dildo medleno first then faster and faster.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/udvag<<picrand>>.jpg"></center>'
	'Girl inserts dildo in pussy you, it moves it back and forth while constantly provarachivaya it dildo in her hands to get better any member.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end


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

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/lezbsex/udanal<<picrand>>.jpg"></center>'
	'Girl spits on you ass, collects saliva tip dildo and inserts it into the anus to you, you feel like it stretches your anus, bringing you pleasure.'

	act 'More':xgt 'lezbsex', 'var'
	act 'Leave':gt 'lezbsex', 'end'
end

if $ARGS[0] = 'end':
	cla

	if picrand = 22:gt 'down'
	if picrand = 21:gt 'vann', 'start'
	if picrand = 19 or picrand = 20:gt 'office', 'work'
	if tanznak = 2:gt 'fit', 'dressing room'

	gt $sexloc, 'start'
end

--- lezbsex ---------------------------------
# masharoom
if $ARGS[0] = 'start':
	cla
	*clr
	gs 'stat'

	if hour < 7 or hour > 20:
		gt 'masharoom', 'masha'
		exit
	end

	'<center><img src="images/img/masha/r1.jpg"></center>'
	'Konata Masha obsharpannosti huge room with walls and many kinds of sex toys and accessories.'
	'Masha is not, and this door softy forgot to close.'

	act 'Wait an hour':
		minut += 60
		gt 'masharoom', 'start'
	end

	act 'Trying on costumes':
		cla
		*clr
		minut += 60
		mashroomrand = rand(1, 10)

		if mashroomrand = 10:gt 'masharoom', '1'
		if mashroomrand = 9:gt 'masharoom', '2'

		'<center><img src="images/img/masha/r2.jpg"></center>'
		'You are interested suits hanging on the walls and you have decided to try a few for yourself.'

		act 'Finish':gt 'masharoom', 'start'
	end

	act 'Leave':gt 'sexshop', 'podval'
end

if $ARGS[0] = 'masha':
	gs 'stat'
	cla
	*clr
	'<center><img src="images/img/masha/r0.jpg"></center>'
	'Konata Masha obsharpannosti huge room with walls and many kinds of sex toys and accessories.'
	'Masha was lying half naked on the bed.'

	if month > 5 and temper > 20 and osadki < painweather:
		act 'Even walk on a leash':
			cla
			*clr
			DOM += 1
			minut += 60
			'<center><img src="images/img/masha/r30.jpg"></center>'
			'Masha you put a collar and print out the back door onto the street to the nearest doorway. Masha seems not even ashamed that someone could you see her on a leash paces briskly on all fours and a couple of times, even urinating on the sidewalk. Portraying a contented dog, then rubs on your feet, then licks shoes.'

			act 'Make sweeping street':
				cla
				*clr
				DOM += 1
				'<center><img src="images/img/masha/r31.jpg"></center>'
				'You give her a broom and sweep the street order. Masha quickly jumps and starts diligently revenge such janitor perhaps no one has yet seen.'

				act 'Compliment':
					cla
					*clr
					'<center><img src="images/img/masha/r32.jpg"></center>'
					'"Well done, good job here is your reward." With these words, you are strapped to his thigh dildo. Masha went quickly to you and turned carefully planted on dildo pussy. You stood leaning his hand on her back and looked like Masha yarosno put on dildo hips swaying to the beat of her movements. A few minutes later Masha started and jumped off with dildo knelt down, catching her breath she carefully licked all their selections with a dildo and began to lick your shoes. "Everyone went home" you said gently pulling leash.'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Punish':
					cla
					*clr
					'<center><img src="images/img/masha/r33.jpg"></center>'
					'"Bad, very bad you should be punished" with these Slovan you took her broom. "Stoop" commanded you, Mary obediently turned to you and bent backwards. You began to whip her buttocks with a broom, a few bumps you notice that her face shed tears, but she continued to stand silently, suffering blows. When you have finished her ass was crimson red, Masha quickly dropped to all fours and cautiously approached the beginning you rub on your feet, "Okay, let''s go home" you said patting her head, Mary immediately perked up and went happily next to you.'

					act 'Finish':gt 'masharoom', 'start'
				end
			end

			act 'Finish':gt 'masharoom', 'start'
		end
	end

	act 'Play with a candle':
		cla
		*clr
		minut += 60
		lesbian += 1
		DOM += 1
		'<center><img src="images/img/masha/r34.jpg"></center>'
		'You order Masha licking and she immediately drops to his knees in front of you. Her tongue slides over your crotch nearly bringing you to orgasm, you pull up and order her to insert in place of the strap candle. Masha little fiddle finally adjusts the candle, and puts this design for you.'

		act 'Order to suck':
			cla
			*clr
			'<center><img src="images/img/masha/r35.jpg"></center>'
			'You order her suck a candle and she passionately jumped on her and began sucking furiously. Masha bends over backwards then caressing her tongue in the cheek then the plant. A few minutes later you get tired of it.'

			act 'Pour the wax into the mouth':
				cla
				*clr
				'<center><img src="images/img/masha/r36.jpg"></center>'
				'"And now I''m going to cum in your mouth" with these words, you burned the candle wick. Masha without waiting for your orders located under candle mouth wide open. Wax began to melt and drain it into his mouth. Masha catching every drop with her whole body shook with pain, but she continued. Soon you will have noticed that her hands were clenched thighs, which have already started to shudder, you realize that it ends when another drop fell into her mouth, Mary cried, stronger hands gripped her hips and throughout the body probeschala cramp, she came from the pain " And she really turned on the pain and submission. " thought you extinguishing a candle. "Relax, " you threw her and she immediately curled up on the floor.'

				act 'Finish':gt 'masharoom', 'start'
			end

			act 'Pour the wax on his chest':
				cla
				*clr
				orgasm += 1
				'<center><img src="images/img/masha/r37.jpg"></center>'
				'"And now I''m going to cum on your chest, lie down." With these words, you burned the candle wick. Masha quickly lay on the floor, you sat on. Sun started to drip on her chest she shuddered every drop tihoniko and moaning. Every time a drop fell on the nipple of her body shook harder and you start it gets you started on your nipples to aim and soon your pussy was very wet, and her whole chest is filled with wax on so that the remaining drops are no longer does cause her pain.'

				act 'Give her to lick':
					cla
					*clr
					'<center><img src="images/img/masha/r38.jpg"></center>'
					'You threw off their makeshift strap, and sat turning her face. Masha did not make them wait immediately in motion the language. She did not take much time, you were so excited that in a few seconds you covered orgasm.'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Meet each other':
					cla
					*clr
					'<center><img src="images/img/masha/r39.jpg"></center>'
					'You threw off their makeshift strap, and sat turning her face. Masha did not make them wait immediately in motion the language, you leaned over her dripping pussy and naming conventions in her own language. You will not take long for the two of you were so excited that in a few seconds you both covered orgasm.'

					act 'Finish':gt 'masharoom', 'start'
				end
			end
		end

		act 'Fuck her':
			cla
			*clr
			'<center><img src="images/img/masha/r40.jpg"></center>'
			'You light a candle and get up on Masha so wax dripped on her buttocks. The wax melts and drips flowing down the candle on car ass, with every drop of Masha wails, but does not even try to pull away. A few minutes later her buttocks are covered with a layer of wax.'

			act 'Enter into it':
				cla
				*clr
				'<center><img src="images/img/masha/r41.jpg"></center>'
				'You extinguish the candle and stood until the wax candles smoothing edges. Masha all this time is still on his knees waiting for your instructions, you get up on her knees in back and put his hand on her back in front of the tilt, then you notice that all of her thighs wet from her discharge, it seems that it only excites pain, then a little vyreshaete change the target and raises just above the candle, delicious spit you enter a thick candle in her anus. Maria starts to cry and squirm all over, but does not even try to suspend you, and you continue to type. Giving her ass a little privvyknut to the size you start fucking her postepono speeding, Masha howls of pain but prodlzhaet diligently podmahivat you. a few minutes later Masha loud screams and goes limp, her legs her juice flowing. You pull out of its buttocks candle and Masha leans to one side, her face beatific smile. Now she can not do anything you have to stay in a makeshift strap.'

				act 'Finish':gt 'masharoom', 'start'
			end
		end
	end

	act 'Order lick':
		cla
		*clr
		minut += 60
		lesbian += 1
		DOM += 1
		orgasm += 1
		'<center><img src="images/img/masha/r27.jpg"></center>'
		'You lie on a couch and Masha beckon you rskidyvaete legs and commanding "Lick" Masha immediately crouches lips against your crotch, you cast your leash her head and strongly attracted to her pussy. Her tongue slides over your crotch then caressing the clitoris is penetrating the vagina, you''ll soon feel like an orgasm become closer.'

		act 'Continue':
			cla
			*clr
			'<center><img src="images/img/masha/r29.jpg"></center>'
			'You jump on the sofa and pulls her leash to her vagina. Just a few deft movements of the tongue and your juices filled her mouth.'

			act 'Finish':gt 'masharoom', 'start'
		end

		act 'Ordered to lick ass':
			cla
			*clr
			'<center><img src="images/img/masha/r28.jpg"></center>'
			'You climb on the couch on all fours and spending leash between her legs pulling her to her ass. Masha kisses your buttocks priblezhayas moving eventually to the center, reaching a goal, she carefully licks your anus then pushes tongue inside your buttocks, and again displays licking anus. After a couple of minutes of such manipulations with your anus, you end.'

			act 'Finish':gt 'masharoom', 'start'
		end
	end

	act 'Play a little':
		cla
		*clr
		minut += 60
		DOM += 1
		lesbian += 1
		'<center><img src="images/img/masha/r42.jpg"></center>'
		'You go up to Masha and hugged her from behind start stroking his chest, then go to the nipples, first pulling them tight squeeze then turning them in different directions. Masha meanders all body teryas ass on your hips.'

		act 'Continue to play with breast':
			cla
			*clr
			'<center><img src="images/img/masha/r44.jpg"></center>'
			'You loshites on the bed and Meshe order to kneel at your feet. You abut feet in heels and her breasts begin to apply pressure on the nipples first softly, then harder and harder. The harder you pressed the heel in her breasts, the more she moans, you''ll soon notice that her legs are already flowing juice, she''s so excited that here now to finish.'

			act 'Activities her pussy':
				cla
				*clr
				picrand = rand(49, 51)
				'<center><img src="images/img/masha/r<<picrand>>.jpg"></center>'
				'You grab the whip from the table and literally stabs her in the car rukoyadkoy pussy, she screams and starts moaning. You force fuck her rukoyadkoy soon Masha starts to cum and she poured out a stream of juice.'

				act 'Further':
					cla
					*clr
					orgasm += 1
					'<center><img src="images/img/masha/r64.jpg"></center>'
					'You do not hold back and cling to her pussy lips starting to lick its release, and you are not expecting it ends.'

					act 'Finish':gt 'masharoom', 'start'
				end
			end
		end

		act 'Let kisses your breasts':
			cla
			*clr
			'<center><img src="images/img/masha/r45.jpg"></center>'
			'You grab her by the hair and pulls his chest. Masha bites you in the chest with his lips, then kissing her trying to tighten the whole mouth, the tongue tickling her nipples.'

			act 'Order lick':
				cla
				*clr
				orgasm += 1
				picrand = rand(46, 48)
				'<center><img src="images/img/masha/r<<picrand>>.jpg"></center>'
				'You order Masha lick your pussy and she immediately glares at her with my tongue, her nimble tongue minute later almost brings you to orgasm.'

				act 'Let continues':
					cla
					'You did not stop it, and a few seconds later you covered orgasm.'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Mark strapon':
					cla
					*clr
					picrand = rand(53, 54)
					'<center><img src="images/img/masha/r<<picrand>>.jpg"></center>'
					'You stop it and bring order strap, Masha brings and helps you put it. When you are wearing the strap literally plunges it into his mouth, Mary begins to suck it as if her mouth real dick.'

					act 'In pussy':
						cla
						*clr
						picrand = rand(57, 63)
						'<center><img src="images/img/masha/r<<picrand>>.jpg"></center>'
						'Removing it from the machine mouth, you put it in her pussy. Masha moans and actively podmahivaet your movements to the beat. Soon she ends violently publishing moan. You end it after making a few more strong, broad thrusts.'

						act 'Finish':gt 'masharoom', 'start'
					end

					act 'In the ass':
						cla
						*clr
						picrand = rand(55, 56)
						'<center><img src="images/img/masha/r<<picrand>>.jpg"></center>'
						'Removing it from the machine mouth, you insert it with force in her anus. Masha moans and actively podmahivaet your movements to the beat. Soon she ends violently publishing moan. You end it after making a few more strong, broad thrusts.'

						act 'Finish':gt 'masharoom', 'start'
					end
				end
			end
		end

		act 'Let caresses your pussy':
			cla
			*clr
			'<center><img src="images/img/masha/r43.jpg"></center>'
			'You take her hand and napravlete his crotch, Masha started stroking your pussy fingering clit. Her nimble fingers almost brought you to orgasm'

			act 'Let continues':
				cla
				'You did not stop it, and a few seconds later you covered orgasm.'

				act 'Finish':gt 'masharoom', 'start'
			end

			act 'Order to take a dildo':
				cla
				*clr
				'<center><img src="images/img/masha/r52.jpg"></center>'
				'Masha you order take dildo. She takes it and sends you a pussy. You do not require a lot of time and your razgorechennaya her fingers pussy, a few minutes later came. When you are finished, Mary took the dildo from you and start to suck him a second hand toying her pussy a few seconds later she came.'

				act 'Finish':gt 'masharoom', 'start'
			end
		end
	end

	act 'Leave':gt 'sexshop', 'podval'
end

if $ARGS[0] = '1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/masha/r3.jpg"></center>'
	'Wearing regular attire, you feel yourself on someone''s opinion, carefully turning his head, you see that the door is not completely closed, and through a crack at you who is watching.'

	act 'Close the door':gt 'masharoom', 'start'

	act 'Tease':
		cla
		*clr
		horny += 20
		'<center><img src="images/img/masha/r4.jpg"></center>'
		'You sit back and legs spread wide, so that the crotch was visible from the door, running his hand into her panties and starts stroking herself, soon you will hear the sound of the door unzips and soon heard heavy breathing.'

		act 'Continue':
			cla
			orgasm += 1
			'You continue to massage your clitoris, and the realization that someone at this time looks at you and fingering only strengthens your arousal leading to rapid orgasm. When you have ended then noticed how white liquid jet flew into the room through the gap, your supervisor came too.'

			act 'Finish':gt 'masharoom', 'start'
		end

		act 'Call him':
			cla
			*clr
			kuni += 1
			'<center><img src="images/img/masha/r5.jpg"></center>'
			'"Hey, you want to lick?" you asked looking at the door. It was quiet for a few seconds, you really thought that you thought no one there and no, but soon the door creaked and threshold guy came, it was a pimply-faced college boy, he stood on the verge of not knowing what to do.'
			'"My suggestion has validity and it is now expired, or you lizhish or went out of here. And as a bonus, if it is good lick, I''ll masturbate." you said, looking at him with a satisfied smile.'
			'The guy finally decided to come to you and knelt down and began to lick your pussy, his movements were not nimble and clumsy, he hardly keeps you excited.'

			act 'Let licks ass':
				cla
				*clr
				'<center><img src="images/img/masha/r6.jpg"></center>'
				'You razvoratsivaetes and substituting his ass, saying that he licked her, the guy starts to drive carefully on the language of your buttocks, in a minute you get tired of it and pump the words "Lick Point" you grab the guy''s head and presses his lips to his anus, he starts to kiss him and then floats language. Gradually you begin to like it and you let go his head relax, have fun. A few minutes later he prekrazhaet and only you are going to yell at him again as you feel rested in the pussy his cock.'

				act 'Post':
					cla
					*clr
					guy += 1
					sex += 1
					'<center><img src="images/img/masha/r8.jpg"></center>'
					'"Do not you have an invitation to give a pisminom, come already." you said and then his cock went in you but yet not for long. You do not even have time to really feel his cock like a guy all Difficult and began to finish, you barely had time to jump off of his cock and then he is dead on the floor. "Get out, impotent unfortunate", the heart you threw. The guy ran out of the room by finding wearing pants.'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Punish':
					cla
					*clr
					DOM += 1
					'<center><img src="images/img/masha/r9.jpg"></center>'
					'"Do not hurry, give first taste try" you say turning her head. Joyful guy runs up to you, jabbing his cock in your face. You take his penis in his hand and tongue spend on the head, he relaxes ready to have fun, but after a moment, his face distort in pain, you grabbed him by the balls and squeezed them ssiloy. "Well suchenok decided that you can fuck me like that, I told you that you can only masturbate." With these words, you yank down his balls and the guy drops to his knees. Releasing his balls you hit in the face with his foot, and when he natsinaet otpolzat to the exit, customize it kicks in the ribs. Lastly, when he crawls on all fours through the door you come to him from behind and swung strongly that there is a way to beat the foot in the balls, man tumbled continues its way down the corridor screaming loudly.'

					act 'Finish':gt 'masharoom', 'start'
				end
			end

			act 'Sit on face':
				cla
				*clr
				orgasm += 1
				'<center><img src="images/img/masha/r7.jpg"></center>'
				'When you are tired of his inept actions, we decided to take matters into their own hands, or rather feet, and commanded the guy to go to. He quickly decided to lay down what you want him to please, but you sat on his face and began to actively crawl on it pussy. The guy was trying to help you, but I could not get into a rhythm, and you end up grabbing his hair and fixed his head-that would not interfere. After a few minutes you manage to finish, you frantically moved his feet almost strangled guy. You moved a little giving him air, his face dripping drops of your juice.'

				act 'Take by mouth':
					cla
					*clr
					bj += 1
					cumlip += 1
					'<center><img src="images/img/masha/r10.jpg"></center>'
					'You turn around right at him and his cock hand vskhvativ run it in his mouth, the guy immediately bites tongue in your pussy, and then you chustvuete his penis in your mouth starts to cum. "Skorostrel damn" flashed through your head when jet of sperm filled your mouth. You spat out his penis together with sperm, otplevavshis expelled guy out.'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Saddle':
					cla
					*clr
					guy += 1
					sex += 1
					'<center><img src="images/img/masha/r11.jpg"></center>'
					'You move to his cock and took him in hand are pointing their pussy, you do not even have time to introduce his cock to the end, as pochuvstovat that he is about to finish. You jumped off his cock and he came over. Guy all flushed and he began leptat perevozbudilsya etc. etc. you just grinned "Run from here skorostrel."'

					act 'Finish':gt 'masharoom', 'start'
				end

				act 'Wank hands':
					cla
					*clr
					hj += 1
					'<center><img src="images/img/masha/r12.jpg"></center>'
					'You sleli with a guy and taking his cock in his hand began to masturbate, you took a few movements and the guy groaned ready to finish.'

					act 'Further':
						cla
						*clr
						cumlip += 1
						cumface += 1
						'<center><img src="images/img/masha/r14.jpg"></center>'
						'You made a few movements and his cock spurted semen jet was quite powerful and sperm gets into your mouth, face and flooded your chest.'

						act 'Finish':gt 'masharoom', 'start'
					end
				end

				act 'Wank-feeding':
					cla
					*clr
					'<center><img src="images/img/masha/r13.jpg"></center>'
					'You squeezed his cock muzhdu her breasts and began to masturbate him with them, after a few seconds, you feel that your breasts between his cock already very swollen and began to shudder ready to finish.'

					act 'Further':
						cla
						*clr
						cumlip += 1
						cumface += 1
						'<center><img src="images/img/masha/r14.jpg"></center>'
						'You tried to pull away from him, that would not get dirty, but it was too late his cock spurted semen jet was quite powerful and sperm gets into your mouth, face and flooded your chest.'

						act 'Finish':gt 'masharoom', 'start'
					end
				end
			end
		end
	end
end

if $ARGS[0] = '2':
	cla
	*clr
	guy += 1
	gs 'stat'
	'<center><img src="images/img/masha/r20.jpg"></center>'
	'Trying another Machine outfit you wear leather hand cuffs fastens between carbine and behold, terror fasten it to you but was easily remove it alone does not work, you frantically began trying to break free, when someone pulled on the leash you hitched to dressed to the neck collar. First you happy even deciding that it returned Masha, but turned to see a man in front of him and a large kozhzhanaya blade in his hand suggests that now you will be hurt, and that nothing you forgot to close the door. Meanwhile man looked at you, "I see you waiting for me, well, now let''s play.".'
	'"Please help me take it off, " you started handing him manacled hands, still hoping that he will not touch you. "Shut up bitch slave should not speak without permission of the owner, got on her knees and opened her mouth, quickly." he shouted.'

	act 'You keep asking for release.':
		cla
		*clr
		mop = 0
		rape += 1
		anal += 1
		'<center><img src="images/img/masha/r21.jpg"></center>'
		'"Oh, you bitch unruly. Now I''ll teach you to obey." With these words he threw you on the couch. You were on the couch with his back to him, his eyes he nyatyanul you bandage and you only hear how your back rastegivat belt and falls to the floor, in a second you put his anus hard hot cock. "Please do not" reprimand you are already aware that your words did not stop what happened ssiloy man shoved dildo ass you, you cried in pain pierced your anus. "Let''s yell louder, now turn to line up your ass, " he said with a grin and continued to drive a screw into your anus. You bite the bullet and deprive quietly wept slightly squealing with every jolt, realizing that he was right, because you are tied in the basement of a sex shop, which is full of perverts and your screams can be lined up.'

		act 'Tolerate':
			cla
			cumanus += 1
			'Deciding that your prayers only angered him more you bite the bullet and waited until he had finished. He fucked you a long time, driving his cock to the balls when you could no longer cry and the couch was wet with your tears, he finally came, filling your ass with his sperm. You collapsed on the couch shivering in mourning. "The next time you''re submissive bitch" and threw the man came out leaving the door to plow, so that you had a good view from the corridor. You got up and limped to the door slammed her. After a while you manage to undo the carabiner and you are released from the handcuffs.'

			act 'Finish':gt 'masharoom', 'start'
		end

		act 'Ask for release':
			cla
			*clr
			cumlip += 1
			cumface += 1
			spank += 1
			bj += 1
			swallow += 1
			'<center><img src="images/img/masha/r22.jpg"></center>'
			'"Please enough, let me go" you cried. "There''s no way you''ll understand where your place, I look into your mouth do nothing, now I will correct it." With that, he walked around the couch and vskhvativ you so that you could not close his mouth, began to fuck you in it, and the second hand began to strike you on the buttocks with a spatula. When he began to finish what you stuck your dick right in the throat, you had to frantically swallow his cum-that would not suffocate. When he was finished then wiped his dildo on your face, and went out, finally causing you such a kick in the ass, that you flew off the couch onto the floor. You got up and limped to the door slammed her. After a while you manage to undo the carabiner and you are released from the handcuffs.'

			act 'Finish':gt 'masharoom', 'start'
		end
	end

	act 'Submit':
		cla
		*clr
		SUB += 2
		bj += 1
		swallow += 1
		cumlip += 1
		'<center><img src="images/img/masha/r23.jpg"></center>'
		'You humbly knelt and opened his mouth. He put a blindfold on you and soon your lips prikasnulos something warm and solid. Catching member lips tightened in a rapidly into itself and began to suck yarosno all kind depicting a grateful slave. Soon you pochuvsvovali as a member in his mouth began to throb ready to finish. Jet of sperm hit your mouth, you immediately swallowed it and continued to suck dick when he took it, you opened your mouth and began to try to catch him blindly lips, depicting the passion-that would not anger him.'
		'"Good girl, good slave, and now lie on the couch, " he said.'

		act 'Submit':
			cla
			*clr
			'<center><img src="images/img/masha/r24.jpg"></center>'
			'You blindly korachkah moved toward the couch, finding it difficult to lay down and waited. He sat down on top of you and you''ll feel his lips touching his penis, but this time it was not hard, you pulled him into her and started to suck again trying to pick it up, you will soon feel kakon began to increase. "That''s clever, well postoraysya, Now turn on the flank and open ass, and for your efforts we''ll smazhem it a little." With these words, he got off and lay down beside you.'

			act 'Turn':
				cla
				*clr
				anal += 1
				orgasm += 1
				analorgasm += 1
				'<center><img src="images/img/masha/r25.jpg"></center>'
				'You turned on its side, putting his ass to his cock, he rubbed it and medleno introduced his penis into the anus of you, trying not to cause pain. You tried to push the buttocks with his hands, but his hands tied you are unable to do this, then he unclasped carbine on handcuffs. His cock was moving in your ass and you start to like it, you are diligent podmahivat in time with his movements. Soon you began to accelerate the movement and he sped along with you, penetrating deeper into you. In the process, he unrolled you several times without removing the penis from the anus and when he once again started to unwrap you on the other side, you covered the orgasm you tremble sharply moved up to him trying to absorb his term in itself as it can go. He made several strong aftershocks and finished rasdeliv cum so you part resulted in the ass and the rest on the buttocks. "And now, quickly open your mouth, " he commanded vashevu rushing to face strong hand squeezing his penis'

				act 'Open mouth':
					cla
					*clr
					cumlip += 1
					swallow += 1
					'<center><img src="images/img/masha/r26.jpg"></center>'
					'You opened your mouth and the remnants of sperm poured into it. Waiting until you swallow cum, he again put dick in your mouth when you carefully licked his dildo, he put on his pants and let not the word went out, closing the door behind him.'

					act 'Finish':gt 'masharoom', 'start'
				end
			end
		end
	end
end

--- masharoom ---------------------------------
# Military
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'
	'<center><b><font color="maroon">polygon</font></b></center>'
	'<center><img src="images/img/military/military.jpg"></center>'
	'Full of people around, near the tent city, and many guys are running around with guns.'

	act 'Work in the infirmary':
		cla
		minut += 60
		sanrand = rand(0, 10)

		if sanrand = 0:gt 'Military', 'san0'
		if sanrand = 1:gt 'Military', 'san1'

		'You worked in the infirmary.'

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

	act 'Go to his tent':gt 'Palatka', 'start'

	act 'Walking in the woods':
		cla
		minut += 60
		milprorand = rand(0, 10)

		if milprorand = 0:gt 'Military', 'pro0'
		if milprorand = 1:gt 'Military', 'pro1'

		'You walk.'

		act 'Finish':gt 'Military', 'start'
	end

	act 'There is a field kitchen':
		minut += 30
		health += 10
		manna += 20
		energy += 20
		water += 20
		gs 'stat'
	end

	if week < 6 or week = 7 and hour >= 18:
		cla
		minut += 60
		money += 5000

		act 'Go to town':gt 'street'
	end
end

if $ARGS[0] = 'san0':
	cla
	*clr
	'<center><img src="images/img/military/san0.jpg"></center>'
	'During the examination, the patient shows you your erection and looks at you in anticipation of responses.'

	act 'Drive away':gt 'Military', 'start'

	act 'Post':
		guy += 1
		picrand = 41
		gt 'sex', 'minet'
	end
end

if $ARGS[0] = 'san1':
	cla
	*clr

	'<center><img src="images/img/military/san1.jpg"></center>'
	'While in the infirmary is unoccupied, the doctor begins to pester you.'

	act 'Send':gt 'Military', 'start'

	act 'Post':
		guy += 1
		picrand = 42
		gt 'sex', 'minet'
	end
end

if $ARGS[0] = 'pro0':
	cla

	'To suit you two guys and offer to help them in one game, play the role of a captive spy.'

	act 'Refuse':gt 'Military', 'start'

	act 'Agree':
		cla
		*clr
		'<center><img src="images/img/military/pro0.jpg"></center>'
		'You tie the hands and lead to the headquarters, where they represent a long interrogation, and then with the words "We will torture you" get members. That''s what you thought before allowing two burly men you associate.'

		act 'Submit':
			guy += 2
			SUB += 1
			picrand = 21
			xgt 'sexdvoe', 'var'
		end
	end
end

if $ARGS[0] = 'pro1':
	cla
	'For you several minutes is what that guy'

	act 'Disregard':gt 'military', 'rape'

	act 'Run':
		if beg < 10:peshimraperand = rand(0, 11)
		if beg >= 10 and beg < 20:peshimraperand = rand(0, 20)
		if beg >= 20 and beg < 30:peshimraperand = rand(0, 30)
		if beg >= 30 and beg < 40:peshimraperand = rand(0, 40)
		if beg >= 40 and beg < 50:peshimraperand = rand(0, 50)
		if beg >= 50 and beg < 60:peshimraperand = rand(0, 60)
		if beg >= 60 and beg < 70:peshimraperand = rand(0, 70)
		if beg >= 70 and beg < 80:peshimraperand = rand(0, 80)
		if beg >= 80 and beg < 90:peshimraperand = rand(0, 90)
		if beg >= 90:peshimraperand = rand(11, 100)

		if peshimraperand < 11:
			cla
			'You tried to run away but the guy you caught'

			act 'Further':gt 'military', 'rape'
		else
			'You are rushing headlong, crashing through the bushes. Finally, you ran to the polygon'

			act 'Further':gt 'military', 'start'
		end
	end
end

if $ARGS[0] = 'rape':
	cla
	*clr
	rape += 1
	bj += 1
	sex += 1
	guy += 1
	anal += 1
	'<center><img src="images/img/military/rape1.jpg"></center>'
	'You woke up in a certain barn with a bag on his head, his head ached badly from the impact.'

	act 'Shout':
		cla
		*clr
		'<center><img src="images/img/military/rape2.jpg"></center>'
		'You began to cry, when you stuck in his mouth member.'
		'"Here''s the nipple to not scream" came the voice of a rapist.'
		'You tried to spit out a member, but this was worse, he thrust it down your throat, and began to fuck your mouth.'

		act 'Further':
			cla
			*clr
			'<center><img src="images/img/military/rape3.jpg"></center>'
			'When you have already started to lose consciousness, choking his cock in her throat, he took it out and threw you on what that box with the power you entered into the vagina, his cock pecked nischadno you, and you had to look at the leash him through tears.'

			act 'Further':
				cla
				*clr
				'<center><img src="images/img/military/rape4.jpg"></center>'
				'When your pussy bored him, and he turned you apart buttocks drove a screw you in the ass, you cried out in pain, but he did not care and he continued to fuck your ass as I could, you cried and begged him to even be lubricated, but in response heard only pleased sniff, Mom told you learn to run that would not hurt Ass.'

				act 'Further':
					cla
					*clr
					cumlip += 1
					mop = 0
					minut += 240
					SUB += 5
					'<center><img src="images/img/military/rape5.jpg"></center>'
					'You do not remember how much time passed that you fainted then again came to himself, but in the end he pulled you from the box and you''re exhausted knelt down, he again stuck you dick in your mouth, with the words "Suck", you dutifully started dildo suck it, he has just brutally raped your anus, head wondered bite him, but knocked it a second thought, and suddenly not be able to do it then with my ass, finally he came in your mouth. And once you have lowered his head again as got hit on the head.'

					act 'Further':gt 'military', 'start'
				end
			end
		end
	end
end

--- Military ---------------------------------
# Nudelake
gs 'stat'
'<center><b>nudist beach</b></center>'
'<center><img src="images/img/Lake/Nudelake.jpg"></center>'
'Here you can walk naked and no one will blame you.'

if hour >= 6 and hour <= 20:
	'Here you can <a href="exec:gt ''Nudelake'', ''zagarat''">tanning</a> and <a href="exec:gt ''Nudelake'', ''swim''">swim</a>'
	'And, you can play <a href="exec:gt ''Nudelake'', ''voleybol''">beach volleyball</a>'
end

act 'Go to the main beach':gt 'lake', 'start'

if katday ! day and kat >= 1:
	'You see at the beach Cat.'

	act 'Approach the Cat':gt 'Katlake', 'kat'
end

if $ARGS[0] = 'voleybol':
	cls
	minut += 1
	'<center><img src="images/img/Lake/voleybol.jpg"></center>'
	'You came to the volleyball court.'

	act 'Watch':gt 'Nudelake', 'smotr'
	act 'Leave':gt 'Nudelake'

	act 'Play':
		cla
		*clr
		agil += 1
		react += 1
		speed += 1
		minut += 30
		'<center><img src="images/img/Lake/voleybol.jpg"></center>'
		'You go up to the players and ask whether it is possible to join, you will be happy to take the team.'

		act 'Finish':gt 'Nudelake'
	end
end

if $ARGS[0] = 'zagarat':
	cls
	minut += 30
	sweat += 1
	manna += 5
	gs 'stat'
	'<center><img src="images/img/Lake/nudezagarat.jpg"></center>'

	if krem = 0:
		tan += 1
		'You went to the beach to sunbathe.'
	else
		krem -= 1
		tan += 3
		'You smeared body sunblock and went to sunbathe.'
	end

	nzagrand = rand(0, 100)

	if nzagrand >= 60 and nzagrand < 70 and kat > 30 and katkey = 0:gt 'Katlake', 'key'
	if nzagrand >= 70 and nzagrand < 80 and kat = 0 and katday ! day:gt 'Katlake'
	if nzagrand >= 80 and nzagrand < 90:gt 'Vnlake1'
	if nzagrand >= 90:gt 'Vnlake2'

	act 'Finish':gt 'Nudelake'
end

if $ARGS[0] = 'swim':
	cla
	*clr
	cumpussy = 0
	cumbelly = 0
	cumass = 0
	cumlip = 0
	cumface = 0
	cumfrot = 0
	minut += 60
	sweat = -3
	manna += 5
	willpower += 5

	if stren < 30:stren += 1

	'<center><img src="images/img/Lake/nudeswim.jpg"></center>'
	'You went for a swim.'

	act 'Finish':gt 'Nudelake'
end

if $ARGS[0] = 'smotr':
	cls
	minut += 30
	gs 'stat'
	'<center><img src="images/img/Lake/voleybol.jpg"></center>'
	'You see how others play.'

	act 'Leave':gt 'Nudelake'
end

--- Nudelake ---------------------------------
# obkitchen
$metkaM = $ARGS[0]
$locM = $CURLOC
gs 'stat'
'<center><b>in the dorm kitchen</b></center>'
'<center><img src="images/img/centr/obkitchen.jpg"></center>'

act 'In the corridor':gt 'dorm', 'korr'

if eda > 0:
	act 'Cook food (1:00)':
		cla
		*clr
		minut += 60
		gs 'stat'
		edahot += 1
		eda -= 1
		manna -= 5
		'<center><img src="images/pics/cook.jpg"></center>'
		'You prepare the meal.'

		act 'Leave the meal':gt 'obkitchen'
	end
end

if edahot > 0:
	act 'Eat cooked food (0:30)':
		cla
		*clr
		gs 'stat'
		frost = 0
		minut += 30
		edahot -= 1
		health += 10
		manna += 20
		'<center><img src="images/pics/food.jpg"></center>'

		if energy >= 30:
			fat += 5
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			fat += 3
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			!!fat += 1
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a mug of tea.'
		end

		act 'Get up from the table':gt 'obkitchen'
	end
end

if pranik > 0:
	act 'Drink tea with cookies (0:05)':
		cla
		*clr
		minut += 5
		pranik -= 1
		health += 30
		manna += 100
		energy += 20
		water += 20
		fat += 50
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You drank tea with cookies, sweet and very bad for the figure, but so nice.'

		act 'Get up from the table':gt 'obkitchen'
	end
end

if edaD > 0:
	act 'Eat diet meal (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'

		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a mug of tea.'

		end

		act 'Get up from the table':gt 'obkitchen'
	end
end

if fatdel > 0:
	act 'Consume fat burners':
		cla
		*clr
		fatdel -= 1
		fat -= 25

		if fat < 0:fat = 0

		'You drank fat burning capsule. These capsules are gradually and results will be seen immediately.'

		act 'Get up from the table':gt 'obkitchen'
	end
end

act 'Drink':
	cla
	minut += 5

	if water >= 20:
		'You don''t need any more water.'
	else
		water += 20
		'You gladly drank a glass of water.'
	end

	act 'Get up from the table':gt 'obkitchen'
end

if lekarstvo > 0:
	'You have <<lekarstvo>> tablets.'

	if sick > 0 and lekarday ! day:
		act 'Take a pill':
			cla
			*clr
			minut += 5
			lekarday = day
			lekarstvo -= 1
			sick -= sick * 20 / 100
			lekrand = rand(1, 9)
			'<center><img src="images/inBed/lekr<<picrand>>.jpg"></center>'
			'You took a pill'

			act 'Move away':gt 'obkitchen'
		end
	end
end

if vitamin > 0:
	'You have <<vitamin>> vitaminok.'

	if vitaminday ! day:
		act 'Take vitamins (0:05)':
			cla
			*clr
			minut += 5
			vitaminday = day
			vitamin -= 1
			frost = 0
			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

			'You took some vitamins'

			act 'Move away':gt 'obkitchen'
		end
	end
end

--- obkitchen ---------------------------------
# obroom
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	*clr
	odkomp = 1
	gs 'stat'
	'<center><b>Your room</b></center>'
	'<center><img src="images/img/centr/obroom.jpg"></center>'
	'This is your room, with you in it lives another girl Vika'

	if hour > 14 and hour < 20 and vikaend = 0:'Lying on my bed your neighbor <a href="exec:gt ''obroom'', ''vika''">Wick</a>.'
	if hour > 3 and hour < 8 and vikaslut = 0:'Wick is sleeping in her bed after a night of being like. I wonder where it disappears at night.'
	if hour > 3 and hour < 8 and vikaslut = 1:'Wick is sleeping in her bed, after work in a brothel.'
	if komp = 1:'<a href="exec:gt ''Komp'', ''start''">Computer</a>.'

	act 'In the corridor':
		if $clothingworntype ! 'nude':
			odkomp = 0
			minut += 5
			gt 'dorm', 'korr'
		else
			'You need to get dressed.'
		end
	end

	act 'Learn lesson (2:00)':
		cla
		minut += 120
		intel += 1
		'You prozanimavshis two hours seems something in your head postponed'

		act 'Finish':gt 'obroom', 'start'
	end

	if student > 0 and kursovik < 100:
		act 'Write kursovik (1:00)':
			cla
			*clr
			minut += 60
			manna -= 10
			kursovik += rand(intel / 20, intel / 10)

			if kursovik > 100:kursovik = 100

			'<center><img src="images/etogame/study.jpg"></center>'
			'You sat on the course work and prepared her <<kursovik>> percent.'

			act 'Finish':gt 'obroom', 'start'
		end
	end

	act 'Mirror':
		obMir = 1
		gt 'mirror', 'start'
	end

	act 'Cupboard':
		gt 'clothing', 'view_clothing_list', 'wardrobe'
	end

	act 'In bed':
		houseob = 1
		gt 'bed', 'start'
	end

	if tanga = 0 and clrbelo > 0:
		act 'Wear underwear':
			cla
			tanga = 1
			gt 'obroom', 'start'
		end
	else
		act 'Remove Underwear':
			cla
			tanga = 0
			gt 'obroom', 'start'
		end
	end
end

if $ARGS[0] = 'vika':
	cla
	gs 'stat'
	'<center><img src="images/img/centr/kat.jpg"></center>'

	act 'Leave':gt 'obroom', 'start'

	if hour < 20:
		act 'Chat with Vika (1:00)':
			cla
			minut += 60
			vika += 1
			talkrand = rand(0, 10)

			if talkrand = 0:'You started talking with Vika, she tells you about the boys she met, about parties, about cosmetics.'
			if talkrand = 1:'Wick says she was in a cafe and invited her to dance even then the guy who paid her bill.'
			if talkrand = 2:'Wick says she worked at a strip club dancer, quite lucrative job for students, although customers are very pristavuchi.'
			if talkrand = 3:'Vic tells you that several sections of beautiful girls running at the university entered the European level sports competitions and earn big money, but of course that Vick priznaetsya her laziness so they plow.'
			if talkrand = 4:'Vick says that one of her friends flew from a guy who did not have time to pull out of it. But Vick smarter, she buys in a pharmacy contraceptives, 100% satisfaction guarantee.'
			if talkrand = 5:'Vick says in the park, she accidentally went to the panel and she was offered sex for money.'
			if talkrand = 6:'Vic tells how she acted naked in studio, not a dusty job, but reputation suffers.'
			if talkrand = 7:'Vic tells a horror story about how one pretty girl did not wash his feet and did not shave, then became so terrible to her for all obbegat kilometer.'
			if talkrand = 8:'Vic says that she buys tampons always with a reserve, and then if they go without a monthly then quickly prevratishsya in slut.'
			if talkrand = 9:'Vic tells how one of her guys wanted anal sex, but she was not in possession of Vaseline.'
			if talkrand = 10:'Vick says the summer sunning herself on the beach, for this truth had her buy a swimsuit, but it came in handy in the winter and go to the pool. The pool is not a bad tool to maintain a healthy body.'

			act 'Finish':gt 'obroom', 'vika'
		end

		act 'Engage with Vika (1:00)':
			cla
			minut += 60
			intel += 1
			vika += 1
			'You overlaid textbooks and become engaged with Vika, reviews all absorbed twice as fast.'

			act 'Finish':gt 'obroom', 'vika'
		end

		if vikasex > 0 and vika > 20:
			act 'Offer fun':
				minut += 60
				gt 'lezbsex', 'start'
			end
		end

		if vika > 70 and vikaslut = 0:
			act 'Ask where it is at night':
				cla
				minut += 30
				vikaslut = 1
				'Vick hesitated and blushed, "I just walk."'
				'"Yeah, she walks at night in the street, and I''ll believe it, kolis friend where you are wearing." neunimalis you.'
				'"I work at the" Vic mumbled unsure.'
				'"Many times I was in the club and you were not vidila, enough already lie." you misbehaved, and a little later added, "Do not want to not say it is not very much and wanted." and turned away from her.'
				'"Well do not be mad, I''ll show you just promise me that you then at least you will talk to me"'
				'You were taken aback by these words than she can do, that you stop talking to her, not with the same dogs publicly fucked. "Yes, of course I''m going to talk to you, what a stupid question."'
				'"Good show went"'

				act 'Go with Vika':gt 'bordelv', 'start'
			end
		elseif vika > 70 and vikaslut = 1 and bordel = 0:
			act 'Ask about work':
				cla
				vika += 5
				bordel = 1
				odkomp = 0
				'"And I have arranged to work in a brothel, I know how much." you asked.'
				'"Well I''ll tell the administrator, but I can not guarantee it can not take."'

				act 'Finish':gt 'obroom', 'vika'
			end
		end
	end
end

--- obroom ---------------------------------
# Palatka
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	palMir = 1
	gs 'stat'
	'<center><b><font color="maroon">tent</font></b></center>'
	'<center><img src="images/img/military/palatka.jpg"></center>'
	palrand = rand(0, 10)

	if palrand = 0:gt 'Palatka', 'pal0'
	if palrand = 1:gt 'Palatka', 'pal1'

	'To your surprise quite spacious tent has a bed here, <a href="exec:gt ''mirror'', ''start''">mirror</a>, and even made improvizorovany <a href="exec:gt ''vann'', ''start''">shower</a>.'

	act 'Leave':gt 'Military', 'start'

	act 'Sleep':
		hour += 8
		son = 24
		gt 'palatka', 'start'
	end
end

if $ARGS[0] = 'pal0':
	cla
	*clr
	'<center><img src="images/img/military/pal0.jpg"></center>'
	'Once you begin to change as the tent includes two soldiers and see you half-naked, running up to you with the members on the edge, you hvaete for their members, but what to do to squeeze harder and get them out of the tent or relax after a hard day.'

	act 'Send':gt 'palatka', 'start'

	act 'Post':
		guy += 2
		picrand = 22
		xgt 'sexdvoe', 'var'
	end
end

if $ARGS[0] = 'pal1':
	cla
	*clr
	'<center><img src="images/img/military/pal1.jpg"></center>'
	'By accessing the tent you stumble and already flying nose to the ground, but suddenly you pick up strong hands, opening her eyes you see a hefty black.'

	act 'Say thank you':gt 'palatka', 'start'

	act 'Repay in full':
		guy += 1
		picrand = 43
		gt 'sex', 'minet'
	end
end

--- Palatka ---------------------------------
# parksvid
minut += 60
manna += 10
gs 'stat'
'<center><b>Park</b></center>'
'<center><img src="images/img/parksvid/0.jpg"></center>'
'And you <<$telsob>> met near the park'

act 'Go for a walk':
	if $telsob = 'Alla':
		alla += 1

		if alla >= 20:
			parksvidrand = rand(0, 5)
			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end
		else
			gt 'parksvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			parksvidrand = rand(0, 10)

			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end

		else
			gt 'parksvid', '3'
		end
	elseif $telsob = 'Katia':
		kat += 1

		if kat >= 20:
			parksvidrand = rand(0, 10)

			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end
		else
			gt 'parksvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img src="images/img/parksvid/1.jpg"></center>'
	'When you walked through the park we noticed a man in a skirt. <<$telsob>> interested in what he does and even in a skirt'

	act 'Move on':gt 'parksvid', '3'

	act 'See what he''s doing':
		cla
		*clr
		'<center><img src="images/img/parksvid/2.jpg"></center>'
		'Coming closer, you notice that in the hands of men something round, it seems that he has been pushing the nucleus.'
		'"Girls, you would move a little and then you get, sorry to be such beauties, " he said, noting your interest in his occupation.'
		'"That''s interesting, but they really do not have anything under her skirt, " said <<$telsob>>.'
		'"How should I know, come and ask"'
		'"Not one will not go, go along ask" said <<$telsob>>, making plaintive eyes.'

		act 'Cancel and go for a walk on.':gt 'parksvid', '3'

		act 'Go with it':
			cla
			*clr
			'<center><img src="images/img/parksvid/3.jpg"></center>'
			'You two go up to the guy and <<$telsob>> starts to push you to the side, whispering in his ear, "Well ask."'
			'"Is it true that under the kilt wearing nothing." you ask'
			'"You want to know, look and see." smiling boy said.'
			'"Well, let''s see the <<$name>>." asked <<$telsob>>'
			'"Here, take a look and" you answered'
			'"Come and see, " said <<$telsob>> defiantly pouting and sitting down on his haunches.'
			'When she began to lift the kilt guy quickly threw it on his head.'
			'"Wow, " came her voice from under the kilt, and subsided after a few seconds you got sick of it, "Well what are you staring there?" and asked you here on the blessed face guy and head movements under the kilt you realize that <<$telsob>> does not consider the presence of underwear.'
			'A few minutes later <<$telsob>> crawled out from under the kilt wiped his lips.'
			'"Girls and went to take a closer look to me." suggested that the guy is still standing with a beatific smile'

			act 'Cancel and go for a walk on.':gt 'parksvid', '3'

			act 'Go-to guy':
				cla
				*clr
				orgasm += 1
				lesbian += 1
				minut += 30
				'<center><img src="images/img/parksvid/4.jpg"></center>'
				'When you come home to the guy, the guy with the threshold lifted kilt demonstrate your worth dildo and said, "Well that continue acquaintance."'
				'Emboldened <<$telsob>> immediately knelt and clasped his lips began to suck dick. You crouched behind and started sliding her panties to fondle her pussy tongue.'

				act 'Further':
					cla
					*clr
					'<center><img src="images/img/parksvid/5.jpg"></center>'
					'He picked it up and putting cancer on the bed entered her vagina, you are not thinking long lay on the bed putting her pussy right in front of her face. After a moment, her tongue stared you in the pussy. After a couple of minutes you left off.'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/parksvid/6.jpg"></center>'
						'Once you ochuhavshis orgasm as the guy took her by the shoulders and pulling back on his back and knocked inserting dick in her mouth finished.'
						'Came to himself a little, you got dressed and went back to the park'

						act 'Leave':gt 'parksvid', '3'
					end
				end
			end
		end
	end
end

if $ARGS[0] = '2':
	cla
	horny = 0
	minut += 90
	gs 'stats'
	'When you have finished, <<$telsob>> said that she needed to escape and went'

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

if $ARGS[0] = '3':
	cla
	horny = 0
	minut += 90
	gs 'stat'
	'When you''re finished <<$telsob>> said that she needed to escape and went'

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

--- parksvid ---------------------------------
# paysex
if $ARGS[0] = 'start':
	minut += 30
	gang += 1
	sweat += 1
	picrand = rand(0, 1)
	gt 'paysex', 'var'
end

if $ARGS[0] = 'var':
	colpaysex += 1
	paysexrand = rand(0, 2)

	if paysexrand = 0:
		cla
		*clr
		horny += 10
		SUB += 1

		if paysxbj = 0:
			bj += 1
			paysxbj = 1
		end

		if paysxsex = 0:
			sex += 1
			paysxsex = 1
		end

		'<center><img src="images/img/paysex/vag<<picrand>>.jpg"></center>'
		'While one guy fucks your pussy, you sucked the rest.'

		act 'More':gt 'paysex', 'var'

		if colpaysex > 3:
			act 'Finish.':gt 'paysex', 'end'
		end
	elseif paysexrand = 1:
		cla
		*clr
		horny += 10
		SUB += 1

		if paysxbj = 0:
			bj += 1
			paysxbj = 1
		end

		if paysxanal = 0:
			anal += 1
			paysxanal = 1
		end

		'<center><img src="images/img/paysex/anal<<picrand>>.jpg"></center>'
		'While one guy fucks you in the ass, you sucked the rest.'

		act 'More':gt 'paysex', 'var'

		if colpaysex > 3:
			act 'Finish.':gt 'paysex', 'end'
		end
	elseif paysexrand = 2:
		cla
		*clr
		horny += 10

		if paysxbj = 0:
			bj += 1
			paysxbj = 1
		end

		if paysxsex = 0:
			sex += 1
			paysxsex = 1
		end

		if paysxanal = 0:
			anal += 1
			paysxanal = 1
		end

		'<center><img src="images/img/paysex/dp<<picrand>>.jpg"></center>'
		'Fuck you in all the cracks.'

		act 'More':gt 'paysex', 'var'

		if colpaysex > 3:
			act 'Finish.':gt 'paysex', 'end'
		end
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	paysxbj = 0
	paysxsex = 0
	paysxanal = 0
	colpaysex = 0
	cumbelly = 1
	cumpussy = 1
	cumass = 1
	cumlip = 1
	cumface = 1

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/paysex/cum<<picrand>>.jpg"></center>'

	'When they were satisfied that you have filled in all his sperm.'

	act 'Leave':
		if picrand = 16 or picrand = 17:gt 'office', 'work'
		if picrand = 18:gt 'husbSex', 'dolgend'

		gt '<<$sexloc>>', 'start'
	end
end

--- paysex ---------------------------------
# podrsex
if $ARGS[0] = 'start':
	cla
	*clr
	gs 'stat'
	minut += 30
	sweat += 1
	girl += 1
	guy += 1
	lesbian += 1
	picrand = rand(0, 1)
	gt 'podrsex', 'var'
end

if $ARGS[0] = 'var':
	podrsexrand = rand(0, 4)

	if podrsexrand = 0:
		cla
		*clr
		horny += 10
		sexvar += 1

		if pdsxbj = 0:
			bj += 1
			pdsxbj = 1
		end

		'<center><img src="images/img/podrsex/minet<<picrand>>.jpg"></center>'
		'You two suck his cock, then take turns licking it with his dildo, touching tongues.'

		act 'More':gt 'podrsex', 'var'

		if sexvar >= 3:act 'Finish.':gt 'podrsex', 'end'

	elseif podrsexrand = 1:
		cla
		*clr
		horny += 10
		sexvar += 1
		'<center><img src="images/img/podrsex/vag<<picrand>>.jpg"></center>'
		'While she enjoys her pussy in a member, you also find yourself iteresnoe occupation.'

		act 'More':gt 'podrsex', 'var'

		if sexvar >= 3:act 'Finish.':gt 'podrsex', 'end'

	elseif podrsexrand = 2:
		cla
		*clr
		horny += 10
		sexvar += 1

		if pdsxsex = 0:
			sex += 1
			pdsxsex = 1
		end

		'<center><img src="images/img/podrsex/uvag<<picrand>>.jpg"></center>'
		'He comes into you, his cock moving inside your pussy bringing you pleasure, this time she did not lose too found something to do.'

		act 'More':gt 'podrsex', 'var'

		if sexvar >= 3:act 'Finish.':gt 'podrsex', 'end'
	elseif podrsexrand = 3:
		cla
		*clr
		horny += 10
		sexvar += 1
		'<center><img src="images/img/podrsex/anal<<picrand>>.jpg"></center>'
		'Do you like the sight of his cock in her ass and sweet until she yells trying to absorb all of it, too, you did not get lost.'

		act 'More':gt 'podrsex', 'var'

		if sexvar >= 3:act 'Finish.':gt 'podrsex', 'end'
	elseif podrsexrand = 4:
		cla
		*clr
		horny += 10
		sexvar += 1

		if pdsxanal = 0:
			anal += 1
			pdsxanal = 1
		end

		'<center><img src="images/img/podrsex/uanal<<picrand>>.jpg"></center>'
		'When he enters you in the anus you hurt a little, but soon the pain goes away and its place is taken by a pleasant feeling, while his moving dildo in your ass it is not sitting idly by.'

		act 'More':gt 'podrsex', 'var'

		if sexvar >= 3:act 'Finish.':gt 'podrsex', 'end'
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	pdsxbj = 0
	pdsxsex = 0
	pdsxanal = 0
	sexvar = 0
	cumlip = 1

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/podrsex/cum<<picrand>>.jpg"></center>'
	'When he ends up spilling your semen, you licks it off with each other, exchanging kissing and finally swallow.'

	act 'Leave':
		if picrand = 26 or picrand = 27 or picrand = 29:gt 'office', 'work'
		if picrand >= 30 and picrand <= 32:gt 'down'

		if kazsexdva = 1:
			kazsexdva = 0
			gt 'kazinosvid', '3'
		end

		gt '<<$sexloc>>', 'start'
	end
end

--- podrsex ---------------------------------
# police
if $ARGS[0] = '1':
	gopstop = 0
	minut += 60
	gs 'stat'
	'<center><b>Police</b></center>'
	'<center><img src="images/img/police/a1.jpg"></center>'
	'The doorbell rings, you open. Standing in the doorway simpotichnaya girl "Hello <<$name>>." she says.'
	'"Hello, and we know each other?" you ask.'
	'"While only in absentia, but is now personally acquainted" she says, and you have on hand snapped handcuffs.'
	'"What''s happening?" you start.'
	'"The arrest of a fool." she says, and then there are two men in the form they take you by the hand and lead out onto the street. You pushed into a car and driven to the department, on arrival she leads you into the office.'
	'"Here is our hooligan" the girl says a man sitting in the office.'
	'"Take care of it myself, I still have a case, " the man answers and out of the office.'
	'"Come on love to confess, " she tells you.'
	'"What raskazyvat, I did not do anything, " you reply.'
	'"You hymen of themselves do not build those in the park for the people of money and mobile phones has overcome, you have identified a fool, not far from his own house to engage in looting, you idiot or something, let''s love to confess. You do not need us, who love to confess to you was how many who robbed and where merged, raskazhesh let go, do not send the camera raskazhesh chicken. There you quickly put on my knees. " she yelled.'
	'You started frantically thinking that you do. If you give her all raskazhite, Gopnik with you skin later, and in the literal sense, but if not it raskazhite you send in the camera, and then you too can do what the hell.'

	act 'Abut':
		cla
		*clr
		minut += 60
		anal += 1
		guy += 1
		cumanus += 1
		'<center><img src="images/img/police/a2.jpg"></center>'
		'"I know nothing." told you.'
		'"That you''re a fool, you have any idea what you will do in the chamber, " she said, "Are you going for days pissing lick hole, you think it''s worth it, " she said.'
		'You presented yourself as you lie on the floor zaplevanom and sits on your face carcass killogram under stopyatdesyat and rubs his crotch month of not washed your face. You wince, but the prospect of being raped by a dozen pohoronnenoy Gopnik and in a ditch, you scared more and you reiterated that you know nothing.'
		'Maiden sat at the table in front of you and legs outstretched, pushed her panties exposing pussy. "I think about you fool, that''s pretty clear Vidisha groomed pussy, and imagine there are not washed for months, overgrown, smelly, there you my smell, it smells slightly usche, and in fact I just washed a few hours ago." With these words she took the baton and hooking her your neck pulled to his crotch. "That feeling is a little smell, and now lick" she said. You hesitated and she tutzhe ssiloy vzhalas you face in your pussy "Lick" she hissed. You began to lick "You see, gladenko shaved nice lick, and there will be those colonies that removing the language, you can not get to the clitoris, and then you would be beaten and his head tucked into the slop pail, so it you want, come tell me." she continued.'

		act 'Refuse':
			cla
			*clr
			'<center><img src="images/img/police/a3.jpg"></center>'
			'You refused to speak again, it is the beginning of anger, she brushed his hand all over the table and roughly pushed you ordered to undress, taking off your handcuffs. When you are left without clothes, she again handcuffed and ordered you to lie on a table, undressed herself. Once you lay on the table, she also climbed on him and sat on your face. "Well, what you like, and the camera is the only way you''re going to breathe and, through someone else''s crotch, " she continued teryas on your face. A few minutes later you hear the door slam cabinet, you wanted to see who came, but the girl pressed on your face all the weight by pressing in your head on the table. You do not vidili nothing but her ass just felt like someone took your legs and lifted up, and then you feel like you pressed the anus that you have the strength to squeeze the anus and your feet released, but not for long, a few seconds later they again raised, and your anus smeared something cold, then it penetrated the finger, followed the second and third. A minute later and took his fingers into the anus rested head of the penis, you no circumstances pushed the buttocks and pushed ssiloy dick in the ass, not letting you get used to cock began to move gaining crazy pace. You tried to break free, or at least prevent it, but the girl sitting on your face pressed tightly manacled hands to your chest and legs gripped man raping your anus.'
			'"What''s not to like" the girl spoke again, "And this is only the beginning, I will be silent on your strapon inmates to betray that, would you round the clock in the ass flogged, will speak scum?" she screamed and sat up a bit, something you could answer.'
			'"Granted them a bigger size, and then I have this pipette can not even feel." you answered, barely holding back something would not cry out in pain.'
			'"Bitch!" cried the girl, and got off the table, "Send it to the camera, " she said to the man dressed.'
			'"Wait, I have not finished yet, " he said. Just a few minutes he continued, until I came to you.'
			'He undid the handcuffs you, something you could dress up and took the camera.'

			act 'In chamber':gt 'kamera'
		end
	end

	act 'Share':
		cla
		gopdeath = 1
		minut += 180
		vsehsdaladay = day
		gs 'stat'
		'You told all they knew, and even then what just heard from conversations Gopnik. After that you released.'

		act 'Leave':gt 'nord'
	end
end

--- police ---------------------------------
# qjob
if $ARGS[0] = 'var1':
	cla
	*clr
	var = rand(0, 3)

	if var ! 0:
		minut += 180
		money += 2000
		'<center><img src="images/img/qjob/f0.jpg"></center>'
		'You have arrived at a small photo studio. You were taken to the dressing room and asked to undress, with you there were a few girls in lingerie and you''ve decided to undress, photographer skeptically examined you from all sides and nodded. You and another girl were carried out in another room, given advertised lingerie and after you have dressed you engaged makeup. In the end, after almost three hours, you were on the court together with another girl. Photographer shooting began, telling you what to do during the next change of posture, britelka you flew off the shoulder bodice and slid down a bit baring breasts. You started to correct him, but the photographer stopped you, "Stop, leave as is, and you''re close to her breasts with her hands. Nipples that-be could not see"'

		act 'Correct':
			cla
			'"No, I did not shoot a subscribed" you said, and trimmed bra. Photographer grumbled under his breath, but the shooting continued. Soon it was over and you''re dressed, took the money and left.'

			act 'Leave':gt 'down'
		end

		act 'Leave as is':
			cla
			*clr
			'<center><img src="images/img/qjob/f1.jpg"></center>'
			'You do not have anything to correct and remained bare-chested girl nakryala her hands and shooting continued. After some time, when the photographer once again telling you how to stand up, he walked right up to you and put his hand on your buttocks and kissed her neck. The girl opened her mouth in surprise, and you were looking at her, not knowing what to do.'

			act 'Stop it':
				cla
				*clr
				'<center><img src="images/img/qjob/f0.jpg"></center>'
				'You bounce from him with a cry, the photographer began to apologize, you will once again put the bodice and the shooting continued. Soon it was over and you''re dressed, took the money and left.'

				act 'Leave':gt 'down'
			end

			act 'Do nothing':
				cla
				*clr
				orgasm += 1
				kuni += 1
				guy += 1
				'<center><img src="images/img/qjob/f2.jpg"></center>'
				'You stood there in silence, and the photographer seeing that you do not mind continued, he began to kiss your shoulders and back, down below, and now your panties flew down and his tongue began to wander between your buttocks closer to her pussy. Girl all the time and was astonished with the view, holding your chest when you started to moan, she came to herself and tried to move, but you vskhatili her and pulling her to her started kissing. The first few seconds she was tight-lipped and Perche you in the chest, timidly trying to put you off, but then her mouth fell open and dropped into your tongue, and hands no longer rested on the chest, caressing her. Feeling that you are close to orgasm released the girl and stronger hands pressed to his head photographer buttocks. Soon pleasant shiver ran through your body, you are finished. Looking up from your pussy photographer stood up and said, "Girls, can continue in the dressing room?"'

				act 'Refuse':
					cla
					'"No, good little by little, " said you went and dressed in the dressing room. Disguised as you took the money and left.'

					act 'Leave':gt 'down'
				end

				act 'Agree':
					picrand = 30
					gt 'podrsex', 'var'
				end
			end
		end
	else
		minut += 60
		'<center><img src="images/img/qjob/f3.jpg"></center>'
		'You arrived at the place, there were only woman photographer and another girl model, photographer gave clothes and asked to change clothes and stand in front of the camera along with another girl, when you''re all done, she went around long the two of you, considering you through the camera. Finally she finished and you obratilask "Generally you come, but there is one detail with your partner we''ve all discussed it and agreed with you now. Shooting is not quite advertising, most erotic, you caress each other, and all I do is take off, I warn you once, it will go abroad, so there is no one of these images will not see. Well, how do you agree? "'

		act 'Refuse':
			cla
			'"No, I''m not a porn star and is not willing" and went in disguise.'

			act 'Leave':gt 'down'
		end

		act 'Agree':
			cla
			*clr
			minut += 90
			money += 2000
			'<center><img src="images/img/qjob/f4.jpg"></center>'
			'You agreed and started shooting, you hugging each other, kissing, sometimes photographer ostavlivala and shows how you better get that-it looked showy, she soon stopped again you "Well finished with a prelude, and now vstanovis on his knees and caress her tongue "she told you. You were already well excited and re-invitation you did not need, quickly knelt you release tab and prilbnuli to pussy girls, but the photographer again stopped you, "No, wait I did not see anything so, take out the language completely and lick her vytenutym language you need not satisfy her and make good shots, "she said. You obeyed and did everything she said, caressing the girl you most tip of the tongue, in the area of ​​the clitoris, and she diligently buckle depicting that here now to finish. "Okay, now take advantage of this, " said photographer pulling a decent sized dildo and handing it to the girl, "Well, you''re on all fours, " she added, turning to you.'

			act 'Up':
				cla
				*clr
				'<center><img src="images/img/qjob/f5.jpg"></center>'
				'You got up on all fours girl took a dildo, but the photographer stopped her, "Wait a minute. Grease now ladies, although I watch it here is not necessary." she added, looking at your oozing pussy. Girl you introduced a vibrator and continued shooting. You moaned and writhed and not on the camera, and from the fact that you liked it, you were willing to come, but here again the photographer stopped you, "No, wait, what are you doing, who works as a vibrator, that''s how to see." she took a dildo in her hand and began to show a girl, and you start to roll again, tolkochto othlynuvshee naslozhdenie. You were enjoying the process, but then you think that the camera can not hear clicks, you turned around and you will see that the photographer is completely naked wielding a dildo in your pussy and a model instrument of the language in it.'

				act 'Change position':
					cla
					*clr
					picrand = rand(6, 10)
					'<center><img src="images/img/qjob/f<<picrand>>.jpg"></center>'
					'Your body swam in kakomto bizarre tangle of women''s bodies, you''ve hardly understood naslozhdenievam who gives and who you are, but you like it madly. When it was over, and all three of you were satisfied then collapsed to the floor and lay there for several minutes. In this survey and over, you have a little chat, all dressed and left.'

					act 'Leave':gt 'down'
				end
			end
		end
	end
end

if $ARGS[0] = 'var2':
	cla
	*clr
	minut += 120
	money += 2000
	'<center><img src="images/img/qjob/f11.jpg"></center>'
	'You have come to a small studio where you met a girl photographer, she gave you underwear and when you start to shoot dressed. Linen was so clear that he had seen skoz all parts of your body. Deuvshka meanwhile commanded as up and that the bend. You diligently carried out all her instructions about an hour after the shooting, when she once again put you in the correct position and start the laundry, then you just bared breasts, and returned to smkam as if nothing had happened. You get trimmed linen covering her breasts, though through it and so it was perfectly clear. The girl pouted, "Well open, it is not for publicity, advertising, we finished it for me, I like to shoot odnazhennyh beauties, these pictures no one will see, " she said.'

	act 'Refuse':
		cla
		'"No, I did not shoot a subscribed" you said and went pereodivatsya, she gave you the money once again asked to take off, but you were not bowed.'

		act 'Leave':gt 'down'
	end

	act 'Open':
		cla
		*clr
		'<center><img src="images/img/qjob/f12.jpg"></center>'
		'You bared breasts and she smiled at the beginning you shoot, she already takes you into a dense and not commanded, giving you the choice of poses. As a result, one soon began stroking her hand you, and after that she put the camera and grabbed you in the chest with both hands and soon her hands slid lower, and their place was taken by mouth. She caressed you and seeing that you do not put her hand soprativlyaetes you in panties and began to pull at the clitoris, and soon began to go down there with his lips, covering your body with kisses.'

		act 'Further':
			picrand = 22
			xgt 'lezbsex', 'var'
		end
	end
end

if $ARGS[0] = 'var3':
	cla
	*clr
	qjobpristrand = rand(0, 5)
	var = rand(0, 5)

	if var = 0:
		minut += 60
		'<center><img src="images/img/qjob/n0.jpg"></center>'
		'You came to the apartment, you opened the young man and asked to enter a long time he showed you his work, and then announced, "I have now Voobscheto tvorchisky crisis and I do not need a model, but rather muse that, she inspired me."'
		'"And how can I help you?" you asked.'
		'"Here is the deal, I''ve always had problems with women, so if you agree to help me relax a bit." he mumbled.'
		'"What do you want that, I slept with you?" you asked.'
		'"You could say that, do not you worry I''ll pay you, that day gi I have." he said, pulling out money.'

		act 'Refuse':
			cla
			'"Whore a challenge, freak, let it inspires you, " you said and headed for the exit.'

			act 'Leave':gt 'down'
		end

		act 'Agree':
			cla
			*clr
			minut += 60
			money += 1000
			'<center><img src="images/img/qjob/n1.jpg"></center>'
			'"Okay, give me the money" you have agreed.'
			'"Sure, here you go, and I can first consider your vagina or anything, just want to see near, " he said.'
			'"Yeah, see how much you want" you answered and throwing off his clothes lay down on the bed. Man lay down beside him and began to consider your pussy, then pushing the sponge and zaglyudyvaya inside, just finger on your clitoris, you will soon flowed and he moistened fingers in your juice put them inside and slightly parted again began to stare inside, soon he finally finished and took off his pants.'

			act 'Start':
				picrand = 81
				xgt 'sex', 'var'
			end
		end
	elseif var = 1:
		minut += 180
		money += 1000
		'<center><img src="images/img/qjob/n2.jpg"></center>'
		'You came to the Estate where you met a man, he quickly take you to your room and sit on the couch said he need only your face and you have to pretend passion, as if you end. You two o''clock sat on the couch with his mouth open, frozen in a silent scream of pleasure. When all was ready he called you to the picture you saw coming in the picture narisovvanuyu girl in anime style, it was your face and she was naked srl. Painter standing behind your back and talks describing how she was doing fine and you compliments for the excellent otobraschenie passion, you''ll soon feel his breath on your neck, he approached closer to you in the end, he put his arm around you and all of his boltavni you caught the phrase " How sad that women can not be as exciting as passionately and their copies on the canvas. "'

		act 'Leave':
			cla
			'"I have to go" and told you to right to the door leaving him alone to admire his work with.'

			act 'Leave':gt 'down'
		end

		act 'Convince':
			cla
			'"Well, why can not, even as they can, they''re just shy to show it. A picture shows their true passion, that they do not dare to show to others. Maybe you just could not wake her up in them, " you said.'
			'"No, it''s not possible, I had a lot of women and not one was not such a passion." he replied.'
			'"Maybe once we verify whether there is in me such stast" you said unbuttoning clothes.'

			act 'Start':
				picrand = 82
				xgt 'sex', 'var'
			end
		end
	elseif var = 2:
		minut += 180
		money += 1000
		'<center><img src="images/img/qjob/n3.jpg"></center>'
		'You came to the Estate where you met a man, he quickly take you to your room and gives you a sheet and a vase as he prepared paint you quickly undressed and turned into sheets picked up a vase.'

		if qjobpristrand ! 0:
			'So passed a couple of hours, he finally finished and thanking you evicted from the apartment.'

			act 'Leave':gt 'down'
		else
			'While you are standing, the artist periodically comes up to you and adjusts the sheet, and each time he seems to be accidentally touches you. Each time, he more and more suited to you and his touch are becoming more confident. He eventually priobnimaet you and begins to paw has no qualms about his hands glide over your chest and falling lower.'

			act 'Stop':
				cla
				'You make a remark to him, and he lets you off and returns to the picture, he soon ends and you see out.'

				act 'Leave':gt 'down'
			end

			act 'Allow':
				picrand = 85
				gt 'sex', 'kuni'
			end
		end
	elseif var = 3:
		minut += 180
		money += 1000
		'<center><img src="images/img/qjob/n4.jpg"></center>'
		'You came to the Estate where you met a man, he quickly take you to your room and sit on the couch on which was sitting another girl. You froze waiting when you are told you have to do, but the artist just went back to the picture and began to write. "Yes you Relax, we do not care for him, he draws his muse we''re just, we sit and do nothing, " said the girl you. You leaned back on the sofa and talking with the girl about any nonsense. You are talking and laughing, and the artist continued his work without paying attention to you, and you have completely forgotten about it, and it can be seen that almost was not due to the canvas.'

		if qjobpristrand ! 0:
			'So passed a couple of hours, he finally finished and thanking you evicted from the apartment.'

			act 'Leave':gt 'down'
		else
			'Soon you besilis already hard on the couch like children. Girl you brought down on the couch and your clothes slipped baring breasts. She froze over you panting, her face a few inches from your chest, she looked at you and you notice how her lips ran smile, she opened her mouth slightly and making a few movements language without taking it out of his mouth, but so- you''d have seen, stopped waiting for your reaction.'

			act 'Correct clothing':
				cla
				'You trimmed clothes and the girl got off you, you go back to the chatter. Soon, the artist finished and shoved you.'

				act 'Leave':gt 'down'
			end

			act 'Allow':
				cla
				*clr
				'<center><img src="images/img/qjob/n5.jpg"></center>'
				'You smiled and held her hand on her hip, more from you and did not require her lips stuck into your chest, and his hands slid over the body randomly ripping off your clothes. Soon you lying naked on the couch srl, her tongue caressing your pussy and his hands caressing the body. You closed your eyes sinking into the abyss of pleasure when suddenly felt someone breathing on yourself, open your eyes you saw his face before the erection of the artist. He pulled him closer to you practically resting on the lips, you opened the mouth running it inside and began to caress the head of the language, then it absorbed deeper and began to suck.'

				act 'Continue':
					picrand = 31
					gt 'podrsex', 'var'
				end
			end
		end
	elseif var = 4:
		minut += 180
		money += 1000
		'<center><img src="images/img/qjob/n6.jpg"></center>'
		'You have arrived at the apartment, there you met a girl and held in a room in which a man was sitting in a sheet, she said it was her husband and basically he will pose as you are only required buttocks. You got cancer before MEN''s and bared buttocks, he put one hand on the buttocks and you froze. She began to write.'

		if qjobpristrand ! 0:
			'So passed a couple of hours, and finally she finished thanking you shown the door of the apartment.'

			act 'Leave':gt 'down'

		else
			'You stayed that way for quite some time and then the man began to stroke your buttocks, first gently, almost imperceptibly, then more and more and soon he squeezed your ass without embarrassment. You looked at her, she pretended that nothing was happening and continued to do their work. At this time, the man had put his hand between her legs and you started stroking you pussy.'

			act 'Embed':
				cla
				'You turned around and as I could slap him. The girl did not respond again, again you got an attitude, and he gently put his hand on your ass and wiggled her no more. Soon she finished and shown the door you.'

				act 'Leave':gt 'down'
			end

			act 'Allow':
				cla
				*clr
				'<center><img src="images/img/qjob/n7.jpg"></center>'
				'You lit a little legs giving him room to maneuver, and he immediately took advantage of this, ran his fingers over your clit fingering pussy first, and when you got wet, he introduced two fingers into the vagina and you began to move. You become tihoniko moan, but remembering the girl broke off and looked her, she smiled and continued to write to you. You closed your eyes and began naslozhdatsya proihodyaschim already moaned unashamedly. Soon you girls heard footsteps, and then the characteristic squish, turning you saw her husband doing blowjob. You turned around and walked up to him, the guy immediately vskhvatil you again and running one hand you pussy began to kiss your breasts'

				act 'Continue':
					picrand = 32
					gt 'podrsex', 'var'
				end
			end
		end
	elseif var = 5:
		minut += 180
		money += 1000
		'<center><img src="images/img/qjob/n2.jpg"></center>'
		'You came to the Estate where you met a man, he quickly take you to your room. You took a pose, and he began to write, it was quite beautiful and you become rotated showing itself in a favorable light, but your every move just heard a request not to move. So a lot of time has passed, and he had paid no attention to you, you hurt it even began, as it so you do not pay attention. he soon graduated.'

		act 'Leave':gt 'down'

		act 'Covet':
			picrand = 86
			gt 'sex', 'minet'
		end
	end
end

--- qjob ---------------------------------
# sex
if $ARGS[0] = 'start':
	guy += 1
	gs 'stat'
	picrand = rand(0, 1)
	xgt 'sex', 'var'
end

if $ARGS[0] = 'var':
	cla
	gs 'stat'
	textrand = rand(1, 4)

	act 'Blow job':gt 'sex', 'minet'

	if picrand ! 12 and picrand ! 28 and picrand ! 29 and picrand ! 30 and picrand ! 34 and picrand ! 35 and picrand ! 50 and picrand ! 55 and picrand ! 76 and picrand ! 81 and picrand ! 87:act 'Cooney':gt 'sex', 'kuni'
	if picrand ! 31 and picrand ! 33 and picrand ! 36:act 'Spread her legs ':gt 'sex', 'vag'
	if picrand ! 15 and picrand ! 28 and picrand ! 29 and picrand ! 32:act 'Horsewoman':gt 'sex', 'nae'

	act 'Doggy-Style':gt 'sex', 'rak'

	if picrand ! 13 and picrand ! 36 and picrand ! 39 and picrand ! 75:act 'On the side':gt 'sex', 'bok'
	if picrand ! 15 and picrand ! 16 and picrand ! 22 and picrand ! 17 and picrand ! 44 and picrand ! 51 and picrand ! 52 and picrand ! 61 and picrand ! 74 and picrand ! 77 and picrand ! 80:act 'In the ass':gt 'sex', 'anal'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'minet':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxbj = 0:
		if svidboysex = 1:bja += 1
		bj += 1
		sxbj = 1
	end

	'<center><img src="images/img/sex/minet<<picrand>>.jpg"></center>'

	if textrand = 1:'You took a member of the hand, drew off the skin, licked his lips and sucked in her mouth naked penis. You vigorously sucking dick her soft wet lips, tongue played with him, played with a bridle. He, smiling blissfully, not take his eyes from you sucking his cock. He shivered and moaned'
	if textrand = 2:'You knelt down and took his hand in this great and gentle trunk. Then slowly started to work hand gently leading him to my insatiable lips, and now he was drowned in your mouth.'
	if textrand = 3:'Your tongue walked around the trunk from the testicles to the head end. Your hot lips captured his tender head and your mouth slid down the barrel of his penis. Your palm was a continuation of her mouth and tightly cover the remainder of the phallus. You then accelerated pace, then slowed, then your sponge filled elasticity, it becomes extremely soft.'
	if textrand = 4:'Taking his hand hard dick, you sent it to your hot mouth. Then introducing it at all, to the very throat, then caressing one head, you stared at him, stretching his pleasure, your hands caressing guy''s body.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'kuni':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxkuni = 0:
		kuni += 1
		sxkuni = 1
	end

	'<center><img src="images/img/sex/kuni<<picrand>>.jpg"></center>'

	if textrand = 1:'Man holds his tongue over your thighs, crotch and kisses down to the vagina, his tongue slides over your crotch then caressing the clitoris is getting inside.'
	if textrand = 2:'You felt like tongue deep in your pussy wielded, he got up there is that you ran like crazy. You had the feeling that he neglected, has not left any zakoulochki in vaey hot pussy. At the same time you are so run down that you thought that he''s choking. But it was not there, his tongue, not only get you deep in the pussy, but he still managed to lick and what you tried to run on the thighs'
	if textrand = 3:'He clung to your current hole. Nose rested against the clitoris, and a large and long tongue plunged inside, where he began to lick smazochki with stenochek vagina. Thank you so podmahivat that popped out of your tongue hole. Then he grabbed you buttocks and squeezed and stretched the entire length of the language, you become a fuck.'
	if textrand = 4:'His tongue gently began to lick pussy lips, the entrance to the womb hurt klitorok. "Oh, how cool!" - You thought. Gradually, more attention he paid to your clitoris. His tongue as easy fast moth fluttering over it.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'vag':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxsex = 0:
		if svidboysex = 1:sexa += 1

		sex += 1
		sxsex = 1
	end

	'<center><img src="images/img/sex/vag<<picrand>>.jpg"></center>'

	if textrand = 1:'He slowly and deeply entered into you. You lay relaxing. Enjoy your body it can easily read on his face. He literally melted, moaning, dissolving into your bosom. How is it, after all it was cool!'
	if textrand = 2:'Hard cock hard and deeply entered into your bosom. Peel it bullying and tender moist but hard head so nicely slid, rubbed on wet cunt'
	if textrand = 3:'Going through the entire depth, he has not stopped, and began to move back, smearing the entire length of the accumulated moisture. Fearing completely out of caves so desired, it stalled at half the length, and a higher rate again began to sink into the abyss beckoning. Movements became more intense and deeper. His hips splashed on your thighs.'
	if textrand = 4:'Your pisya squelched and slurp you fidgeting and twirling his ass okamenevschem banana, more intense and more aggressive peck their bottomless hole.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'nae':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxsex = 0:
		if svidboysex = 1:sexa += 1

		sex += 1
		sxsex = 1
	end

	'<center><img src="images/img/sex/nae<<picrand>>.jpg"></center>'

	if textrand = 1:'He slowly and deeply entered into you. You lay relaxing. Enjoy your body it can easily read on his face. He literally melted, moaning, dissolving into your bosom. How is it, after all it was cool!'
	if textrand = 2:'Hard cock hard and deeply entered into your bosom. Peel it bullying and tender moist but hard head so nicely slid, rubbed on wet cunt'
	if textrand = 3:'Going through the entire depth, he has not stopped, and began to move back, smearing the entire length of the accumulated moisture. Fearing completely out of caves so desired, it stalled at half the length, and a higher rate again began to sink into the abyss beckoning. Movements became more intense and deeper. His hips splashed on your thighs.'
	if textrand = 4:'Your pisya squelched and slurp you fidgeting and twirling his ass okamenevschem banana, more intense and more aggressive peck their bottomless hole.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'rak':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxsex = 0:
		if svidboysex = 1:sexa += 1
		sex += 1
		sxsex = 1
	end

	'<center><img src="images/img/sex/rak<<picrand>>.jpg"></center>'

	if textrand = 1:'He slowly and deeply entered into you. You lay relaxing. Enjoy your body it can easily read on his face. He literally melted, moaning, dissolving into your bosom. How is it, after all it was cool!'
	if textrand = 2:'Hard cock hard and deeply entered into your bosom. Peel it bullying and tender moist but hard head so nicely slid, rubbed on wet cunt'
	if textrand = 3:'Going through the entire depth, he has not stopped, and began to move back, smearing the entire length of the accumulated moisture. Fearing completely out of caves so desired, it stalled at half the length, and a higher rate again began to sink into the abyss beckoning. Movements became more intense and deeper. His hips splashed on your thighs.'
	if textrand = 4:'Your pisya squelched and slurp you fidgeting and twirling his ass okamenevschem banana, more intense and more aggressive peck their bottomless hole.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'bok':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxsex = 0:
		if svidboysex = 1:sexa += 1

		sex += 1
		sxsex = 1
	end

	'<center><img src="images/img/sex/bok<<picrand>>.jpg"></center>'

	if textrand = 1:'He slowly and deeply entered into you. You lay relaxing. Enjoy your body it can easily read on his face. He literally melted, moaning, dissolving into your bosom. How is it, after all it was cool!'
	if textrand = 2:'Hard cock hard and deeply entered into your bosom. Peel it bullying and tender moist but hard head so nicely slid, rubbed on wet cunt'
	if textrand = 3:'Going through the entire depth, he has not stopped, and began to move back, smearing the entire length of the accumulated moisture. Fearing completely out of caves so desired, it stalled at half the length, and a higher rate again began to sink into the abyss beckoning. Movements became more intense and deeper. His hips splashed on your thighs.'
	if textrand = 4:'Your pisya squelched and slurp you fidgeting and twirling his ass okamenevschem banana, more intense and more aggressive peck their bottomless hole.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end


if $ARGS[0] = 'anal':
	cla
	*clr
	horny += 10
	minut += 10
	sexvar += 1

	if sxanal = 0:
		if svidboysex = 1:anala += 1

		anal += 1
		sxanal = 1
	end

	'<center><img src="images/img/sex/anal<<picrand>>.jpg"></center>'

	if textrand = 1:'You Spreading buttocks inviting him into her ass, the guy did not hesitate and threw her dildo in your point, you squealed with every jolt, and it is only whet and he moves faster with each thrust penetrating deeper into your anus, causing you to scream louder.'
	if textrand = 2:'Cock slowly but surely making his way into your ass. For he came to the full depth. Are you struggling compressed logging into your ass, and this cock seemed even more strained, thickens and grows in size. - Yes, that''s very cool! Do not let go! How do cool! - He groaned. His steely member strongly moved back and forth, bringing you pleasure.'
	if textrand = 3:'At the same moment, you felt something big and fat enters your narrow opening. You cried out in pain, but he is not paying attention to you, began to peck at the drop of a hat. Pain disappeared somewhere, and you began to receive a fabulous treat.'
	if textrand = 4:'You Spreading buttocks inviting him into her ass, the guy did not hesitate and threw her dildo in your point, you squealed with every jolt, and it is only whet and he moves faster with each thrust penetrating deeper into your anus, causing you to scream louder.'
	if sexvar < 3:act 'More':xgt 'sex', 'var'
	if sexvar >= 3:act 'Finish.':gt 'sex', 'end'
end

if $ARGS[0] = 'end':
	cla
	*clr
	svidboysex = 0
	minut += 10
	sexvar = 0
	sxkuni = 0
	sxbj = 0
	sxsex = 0
	sxanal = 0
	cumlip += 1

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/sex/cum<<picrand>>.jpg"></center>'
	'You take it in your mouth and dildo suck rage until he cums.'

	act 'Leave':
		if picrand >= 54 and picrand <= 73:gt 'office', 'work'
		if picrand >= 74 and picrand <= 76:gt 'vann', 'start'
		if picrand >= 77 and picrand <= 80:gt 'house'
		if picrand >= 81 and picrand <= 82:gt 'down'
		if picrand >= 83 and picrand <= 84:gt 'korr'
		if picrand >= 85 and picrand <= 86:gt 'down'
		if picrand = 87 or picrand = 90:gt 'kuhr'
		if picrand = 88:gt 'sitr'
		if picrand = 89:gt 'bed', 'start'

		if svidboykino = 1:
			svidboykino = 0
			gt 'torgcentr'
		end

		if svidboypark = 1:
			svidboypark = 0
			gt 'park', 'start'
		end

		if svidboypark1 = 1:
			svidboypark1 = 0
			gt 'svidboy', 'parksvid21'
		end

		if svidboypark2 = 1:
			svidboypark2 = 0
			gt 'svidboy', 'parksvid22'
		end

		if svidboykafe = 1:
			svidboykafe = 0
			gt 'down'
		end

		gt $sexloc, 'start'
	end
end

--- sex ---------------------------------
# sexdvanadva
if $ARGS[0] = 'start':
	cla
	*clr
	guy += 2
	girl += 1
	gang += 1
	minut += 30
	sweat += 1
	gs 'stat'
	picrand = rand(0, 1)
	xgt 'sexdvanadva', 'var'
end

if $ARGS[0] = 'var':
	sexdvarand = rand(0, 6)

	if picrand = 11:sexdvarand = rand(0, 5)
	if picrand = 14:sexdvarand = rand(0, 4)

	if sexdvarand = 0:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvdvsxbj = 0:
			bj += 1
			dvdvsxbj = 1
		end

		'<center><img src="images/img/sexdvanadva/minet<<picrand>>.jpg"></center>'
		'You two suck their members.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 1:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1
		'<center><img src="images/img/sexdvanadva/vag<<picrand>>.jpg"></center>'
		'While she enjoys the member in her pussy, you will not remain without a man''s attention.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 2:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvdvsxsex = 0:
			sex += 1
			dvdvsxsex = 1
		end

		'<center><img src="images/img/sexdvanadva/uvag<<picrand>>.jpg"></center>'
		'He comes into you, his cock moving inside your pussy bringing you pleasure, at which time it is also not alone.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 3:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1
		'<center><img src="images/img/sexdvanadva/anal<<picrand>>.jpg"></center>'
		'Do you like the kind of cock in her ass and sweet until she yells trying to absorb all of it you too busy INTERESTNO process.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 4:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvdvsxanal = 0:
			anal += 1
			dvdvsxanal = 1
		end

		'<center><img src="images/img/sexdvanadva/uanal<<picrand>>.jpg"></center>'
		'When he enters you in the anus you hurt a little, but soon the pain goes away and its place is taken by a pleasant feeling, while his moving dildo in your ass it is not sitting idly by.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 5:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvdvsxsex = 0:
			sex += 1
			dvdvsxsex = 1
		end

		if dvdvsxanal = 0:
			anal += 1
			dvdvsxanal = 1
		end

		'<center><img src="images/img/sexdvanadva/udp<<picrand>>.jpg"></center>'
		'Both men belong to you and you moan with pleasure feeling both dildo move inside.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	elseif sexdvarand = 6:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1
		'<center><img src="images/img/sexdvanadva/dp<<picrand>>.jpg"></center>'
		'When they enter into it as a couple you get a little jealous seeing how she enjoys.'

		if sexvar < 3:act 'More':xgt 'sexdvanadva', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvanadva', 'end'
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	minut += 10
	dvdvsxbj = 0
	dvdvsxsex = 0
	dvdvsxanal = 0
	cumlip = 1
	sexvar = 0

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/sexdvanadva/cum<<picrand>>.jpg"></center>'
	'When they end up spilling your semen, you licks it off with each other, exchanging kissing and finally swallow.'

	act 'Leave':
		if kafesexrand = 1:
			kafesexrand = 0
			gt 'kafe', 'workPred'
		end

		if kazsexdva = 1:
			kazsexdva = 0
			gt 'kazinosvid', '3'
		end

		gt $sexloc, 'start'
	end
end

--- sexdvanadva ---------------------------------
# sexdvoe
if $ARGS[0] = 'start':
	minut += 30
	sweat += 1
	guy += 2
	picrand = rand(0, 1)
	xgt 'sexdvoe', 'var'
end

if $ARGS[0] = 'var':
	sexrand = rand(0, 3)

	if picrand = 12:sexrand = rand(0, 2)
	if picrand = 40:sexrand = rand(1, 2)

	if sexrand = 0:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvsxbj = 0:
			bj += 1
			dvsxbj = 1
		end

		'<center><img src="images/img/sexdvoe/minet<<picrand>>.jpg"></center>'
		'You suck both members trying to deliver udovolsvie both, but just two in your mouth does not fit.'

		if sexvar < 3:act 'More':xgt 'sexdvoe', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvoe', 'end'
	elseif sexrand = 1:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvsxbj = 0:
			bj += 1
			dvsxbj = 1
		end

		if dvsxsex = 0:
			sex += 1
			dvsxsex = 1
		end

		'<center><img src="images/img/sexdvoe/vag<<picrand>>.jpg"></center>'
		'While one guy fucks your pussy, you diligently sucking the second.'

		if sexvar < 3:act 'More':xgt 'sexdvoe', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvoe', 'end'
	elseif sexrand = 2:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvsxbj = 0:
			bj += 1
			dvsxbj = 1
		end

		if dvsxanal = 0:
			anal += 1
			dvsxanal = 1
		end

		'<center><img src="images/img/sexdvoe/anal<<picrand>>.jpg"></center>'
		'While one guy fucks you in the ass, you are struggling with their own moans trying to serve a second mouth.'

		if sexvar < 3:act 'More':xgt 'sexdvoe', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvoe', 'end'
	elseif sexrand = 3:
		cla
		*clr
		horny += 10
		minut += 10
		sexvar += 1

		if dvsxsex = 0:
			sex += 1
			dvsxsex = 1
		end

		if dvsxanal = 0:
			anal += 1
			dvsxanal = 1
		end

		'<center><img src="images/img/sexdvoe/dp<<picrand>>.jpg"></center>'
		'They both belong to you, it is a great pleasure dostovlyaet when both members move on vnurti variably as pistons.'

		if sexvar < 3:act 'More':xgt 'sexdvoe', 'var'
		if sexvar >= 3:act 'Finish':gt 'sexdvoe', 'end'
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	minut += 10
	dvsxbj = 0
	dvsxsex = 0
	dvsxanal = 0
	sexvar = 0
	cumbelly = 1
	cumlip = 1
	cumface = 1

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/sexdvoe/cum<<picrand>>.jpg"></center>'
	'When they were satisfied that you have filled in all his sperm.'
	if picrand = 29:'When it ends boss says that you did well and today you are free and can go.'
	if picrand = 39:'Then <<$boyA>> throws you out of the apartment.'

	act 'Leave':
		if picrand >= 24 and picrand <= 26:gt 'office', 'work'
		if picrand >= 30 and picrand <= 34:gt 'office', 'work'
		if picrand >= 35 and picrand <= 37:gt 'house'
		if picrand >= 40 and picrand <= 43:gt 'korr'
		if picrand = 38:gt 'bed', 'vorend'
		if picrand = 29 or picrand = 39:gt 'nord'

		if kafesexrand = 1:
			kafesexrand = 0
			gt 'kafe', 'workPred'
		end

		gt '<<$sexloc>>', 'start'
	end
end

--- sexdvoe ---------------------------------
# spalnya
$metkaM = $ARGS[0]
$locM = $CURLOC
minut += 5
tanhouse1 = 1
gs 'stat'
'<center><b>Bedroom</b></center>'
'<center><img src="images/img/centr/spaln.jpg"></center>'
if komp = 1:'<a href="exec:gt ''Komp'', ''start''">Computer</a>.'

act 'In the corridor':gt 'house'

act 'Learn lesson (2:00)':
	cla
	minut += 120
	intel += 1
	'You prozanimavshis two hours seems something in your head postponed'

	act 'Finish':gt 'spalnya'
end

if student > 0 and kursovik < 100:
	act 'Write kursovik (1:00)':
		cla
		*clr
		minut += 60
		kursovik += rand(intel / 20, intel / 10)

		if kursovik > 100:kursovik = 100

		manna -= 10
		'<center><img src="images/etogame/study.jpg"></center>'
		'You sat on the course work and prepared her <<kursovik>> percent.'

		act 'Finish':gt 'spalnya'
	end
end

act 'Mirror':gt 'mirror', 'start'
act 'Cupboard':gt 'clothing', 'view_clothing_list', 'wardrobe'
act 'In bed':gt 'bed', 'start'

if tanga = 0 and clrbelo > 0:
	act 'Wear underwear':
		cla
		tanga = 1
		gt 'spalnya'
	end
else
	act 'Remove Underwear':
		cla
		tanga = 0
		gt 'spalnya'
	end
end

--- spalnya ---------------------------------
# svidboy
if $ARGS[0] = 'kinosvid':
	cla
	*clr
	minut += 60
	manna += 10
	bfA += 3
	gs 'stat'
	'<center><b>Cinema</b></center>'
	'<center><img src="images/img/boysvid/kino0.jpg"></center>'
	'<<$boyA>> you bought the tickets and took their seats ready for viewing'

	act 'Watch a movie':
		cla
		*clr
		minut += 90
		'<center><img src="images/img/boysvid/kino1.jpg"></center>'
		'During the session <<$boyA>> looked around and making sure that you are in the room except no one is turned to you and started to kiss his hand slipped under your clothes, you started to caress his chest.'

		act '"Not here"':
			cla
			*clr
			'<center><img src="images/img/boysvid/kino0.jpg"></center>'
			'You removed his hand with the words "Well, not here"'
			'When the movie ended <<$boyA>> said that he has to run and left.'

			act 'Leave':gt 'torgcentr'
		end

		act 'Unbutton his pants':
			cla
			*clr
			picrand = 48
			svidboysex = 1
			svidboykino = 1
			bfA += 5
			'<center><img src="images/img/boysvid/kino2.jpg"></center>'
			'You unbutton his pants and pulled out already erection begin to stroke his hand <<$boyA>> lays down the hands on your shoulders and begins to press down gently guiding your head to its members.'

			act 'Take by mouth':gt 'sex', 'minet'
		end
	end
end

if $ARGS[0] = 'parksvid':
	cla
	*clr
	minut += 60
	manna += 10
	bfA += 3
	gs 'stat'
	'<center><b>Park</b></center>'
	'<center><img src="images/img/boysvid/sex_park0.jpg"></center>'
	'<<$boyA>> and you are met at the entrance to the park.'

	act 'Go for a walk':
		parksvidrand = rand(0, 1)

		if parksvidrand = 1:gt 'svidboy', 'parksvid2'

		cla
		*clr
		minut += 60
		'<center><img src="images/img/boysvid/sex_park1.jpg"></center>'
		'When you come into the park <<$boyA>> caught you in his arms and began to circle, "Stop, stop, else you will drop" you laughed. <<$boyA>> put you on the ground.'

		act 'Move on':
			cla
			*clr
			'<center><img src="images/img/boysvid/sex_park0.jpg"></center>'
			'You took his hand and walked away.'
			'Soon <<$boyA>> said that he has to run and left.'

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

		act 'Kiss him':
			cla
			*clr
			'<center><img src="images/img/boysvid/sex_park2.jpg"></center>'
			'You turn to him and kiss on the lips, he hugs you and his hands begin to wander through your body, one stop on the chest, the second is your buttocks squeezes.'

			act 'Stop':
				cla
				*clr
				'<center><img src="images/img/boysvid/sex_park0.jpg"></center>'
				'You removed his hands and walked away.'
				'Soon <<$boyA>> said that he has to run and left.'

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

			act 'Continue':
				cla
				*clr
				horny += 20
				'<center><img src="images/img/boysvid/sex_park3.jpg"></center>'
				'You keep kissing him <<$boyA>> goes to your lips on his neck, and hands you bares his chest and begins to squeeze, you have a factory and hand itself stretches to the pussy.'

				act 'Stop':
					cla
					*clr
					'<center><img src="images/img/boysvid/sex_park0.jpg"></center>'
					'You removed his hands and chest hidden under clothes back went on.'
					'Soon <<$boyA>> said that he has to run and left.'

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

				act 'Continue':
					cla
					*clr
					'<center><img src="images/img/boysvid/sex_park4.jpg"></center>'
					'You stand and enjoy petting, one hand fingering her pussy, when <<$boyA>> bends you and exposing your ass glares at her tongue, his tongue slides between your buttocks then fondling pussy is a sensitive anus.'

					act 'Continue':
						picrand = 49
						svidboysex = 1
						svidboypark = 1
						bfA += 5
						gt 'sex', 'kuni'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'parksvid2':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/img/boysvid/sex_park5.jpg"></center>'
	'Walking through the park zakaulkam you notice black guy watching you'

	if izvrat = 1:
		'<<$boyA>> also his remarks and turned to you rastegivat pants and says, "And let''s have a little show for this pervert"'

		act 'Refuse':
			cla
			*clr
			'<center><img src="images/img/boysvid/sex_park6.jpg"></center>'
			'"Well, no, I will not do that, " you reply ego buttoning his pants, take his hand and move on.'
			'Soon <<$boyA>> said that he has to run and left.'

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

		act 'Agree':
			picrand = 50
			svidboysex = 1
			svidboypark1 = 1
			bfA += 5
			gt 'sex', 'minet'
		end
	end

	'You comes to mind crazy idea, to have sex with her boyfriend in front of spying.'

	act 'Sex':
		cla
		*clr
		'<center><img src="images/img/boysvid/sex_park9.jpg"></center>'
		'You let go of his hand away a little guy back raschityvaya place so that African-would you have seen good and throwing off his clothes covenant her boyfriend, "I want you here and now"'
		'"And I do not mind, " he says coming up to you and find rastegivaya fly.'

		act 'Blow job':
			picrand = 50
			svidboysex = 1
			svidboypark2 = 1
			bfA += 5
			gt 'sex', 'minet'
		end
	end

	act 'Discard this idea and move on.':
		cla
		*clr
		'<center><img src="images/img/boysvid/sex_park6.jpg"></center>'
		'You drop this idea and move on.'
		'Soon <<$boyA>> said that he has to run and left.'

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

if $ARGS[0] = 'parksvid21':
	cla
	*clr
	'<center><img src="images/img/boysvid/sex_park7.jpg"></center>'
	'Once <<$boyA>> finished, he asks you, "Well this little Papuan still here?"'
	'"Yes, actively Fingering." you reply, glancing toward African.'
	'"If you can suck it, and I''ll see." says <<$boyA>>, clearly wanting something you agreed.'

	act 'Refuse':
		cla
		*clr
		'<center><img src="images/img/boysvid/sex_park6.jpg"></center>'
		'"Well, no, I''m not going to suck him, enough with him and watching." you reply dressing, then take his hand and move on.'
		'Soon <<$boyA>> said that he has to run and left.'

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

	act 'Agree':
		cla
		*clr
		bfA += 5
		bj += 1
		swallow += 1
		'<center><img src="images/img/boysvid/sex_park8.jpg"></center>'
		'You beckon African, he carefully approaches cautiously posmatrikaya on your guy.'
		'"Do not worry, took out personal belongings, now my slut suck you down to the bottom" grinned <<$boyA>>'
		'You go down on his knees so that <<$boyA>> could see the whole process, and with styanuv Man briefs start sucking, you had to work not long, a minute later he came in your mouth. Happy man immediately ran away.'
		'"Hey, if a slut does not take money it could even say thank you" threw him go <<$boyA>>'
		'Not paying attention to his words, because you really behaved like the last whore, you got dressed and went down.'
		'Soon <<$boyA>> said that he has to run and left.'

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

if $ARGS[0] = 'parksvid22':
	cla
	*clr
	'<center><img src="images/img/boysvid/sex_park7.jpg"></center>'
	'After <<$boyA>> finished, he notices you watching African "Damn, this pervert us spying" and noting both your lips slipped smile asked, "Did you know that he''s here, you''re here to fuck specially decided to show off in front of this Negro, you can also otsosesh him? "'

	act 'Reassure him':
		cla
		*clr
		'<center><img src="images/img/boysvid/sex_park6.jpg"></center>'
		'"Of course I did not know anything, do you think that I could have sex with you in front of this" you make pained face and dressed quickly go away after a few seconds <<$boyA>> catching up with you, "I''m sorry, honey, not mean to offend you, I said sgorecha "he izvenyayus you take him by the hand, saying that you forgive and move on.'
		'Soon <<$boyA>> said that he has to run and left.'

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

	act 'Annoy him':
		cla
		*clr
		bfa = 0
		bj += 1
		swallow += 1
		balls += 1
		'<center><img src="images/img/boysvid/sex_park8.jpg"></center>'
		'"If I want to suck and" threw you back.'
		'"So what do you expect me to suck or call him, hey man come on here free whore sucks for so" cried <<$boyA>>'
		'"Come on do not be afraid" you shouted guy African timidly walked up to you.'
		'You go down on his knees so that <<$boyA>> could see the whole process, and with styanuv Man briefs start sucking, you had to work not long, a minute later he came in your mouth. But you''re not going to end so quickly when osobeno <<$boyA>> sitting next crimson with anger. You took the guy cock and continued to masturbate, that he finally fell, but themselves demonstratively turned to his, now ex-boyfriend, and a little tinkering with the sperm in her mouth to swallow it. Then you turned back to African and continued without deliv his cock out of hand you the language began to fondle his balls, then took them whole in his mouth and began to suck it out of his mouth one releasing it again absorbing both when a member of the African stood again, you switched on him, slow and metadichno you licking every inch of his phallus, and then began to suck the head, smacking loudly after you calmly and methodically started sucking him trying to absorb it into himself entirely and as a member was very modest size you manage it, and that would put an end to you shoved in his mouth and his balls. At this <<$boyA>> could not resist and shouting something about the fact that you as a whore and he wa hates escaped, you quietly completed the guy a blowjob and swallowing cum went away.'

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

if $ARGS[0] = 'billsvid':
	cla
	*clr
	minut += 60
	manna += 10
	bfA += 3
	gs 'stat'
	picrand = rand(51, 52)
	'<center><img src="images/img/boysvid/bil<<picrand>>.jpg"></center>'
	'<<$boyA>> paid for a table at a booth and you went to play'

	act 'Play':
		cla
		*clr
		minut += 60

		'<center><img src="images/img/boysvid/bil1<<picrand>>.jpg"></center>'
		'During the game <<$boyA>> suitable for you from behind and his hands glide over your endeavors hips and lips are drawn to the neck.'

		act 'Not here':
			cla
			*clr
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/img/boysvid/bil0<<picrand>>.jpg"></center>'
			'You removed his hand with the words "Well, not here."'
			'When your time is up <<$boyA>> said that he has to run and left.'

			act 'Leave':gt 'torgcentr'
		end

		act 'Let continues':
			cla
			*clr
			'<center><img src="images/img/boysvid/bil2<<picrand>>.jpg"></center>'
			'You lozhite cue on the table and relax allowing him to continue to caress your body, kissing it down lower and lower.'

			act 'Let continues':
				svidboysex = 1
				svidboykino = 1
				bfA += 5
				gt 'sex', 'kuni'
			end

			act 'Stop, stop':
				cla
				*clr
				$ImageNeededPlacholder
				! WD: IMAGE NEEDED ~ '<center><img src="images/img/boysvid/bil0<<picrand>>.jpg"></center>'
				'You removed his hand with the words "Well, not here"'
				'When your time is up <<$boyA>> said that he has to run and left.'

				act 'Leave':gt 'torgcentr'
			end
		end
	end
end

if $ARGS[0] = 'kafesvid':
	cla
	*clr
	minut += 60
	manna += 10
	bfA += 3
	gs 'stat'
	'<center><img src="images/img/boysvid/kafe0.jpg"></center>'
	'And you <<$boyA>> went into a small cafe in the center, it seems that it does not enjoy popularity, site visitors almost there, you sat at a table in one of the private booths.'

	act 'Wait for the order':
		cla
		*clr
		minut += 60
		'<center><img src="images/img/boysvid/kafe1.jpg"></center>'
		'Once you have brought order <<$boyA>> began to pester you, he and Narov kiss you, and slid his hands over your body, then caressing his chest, then squeeze your buttocks.'

		act '"Not here"':
			cla
			*clr
			'<center><img src="images/img/boysvid/kafe0.jpg"></center>'
			'You removed his hand with the words "Well, not here"'
			'After some time <<$boyA>> said that he has to run and left.'

			act 'Leave':gt 'down'
		end

		act 'Let continues':
			cla
			*clr
			'<center><img src="images/img/boysvid/kafe2.jpg"></center>'
			'Soon you remain almost without clothes, and <<$boyA>> was kissing you underbelly, dropping to the pubis.'

			act 'Let continues':
				svidboysex = 1
				svidboykafe = 1
				bfA += 5
				picrand = 53
				gt 'sex', 'kuni'
			end

			act 'Stop, stop':
				cla
				*clr
				'<center><img src="images/img/boysvid/kafe0.jpg"></center>'
				'The last time you came all the same in yourself and realizing that you are in a cafe, pushed him, "No, we have enough in the same cafe, patience to the house"'
				'But soon <<$boyA>> said that he has to run and left.'

				act 'Leave':gt 'down'
			end
		end
	end
end

--- svidboy ---------------------------------
# tanhouse
$sexloc = $CURLOC
gs 'stat'
'<center><b>Apartment Thani</b></center>'
'<center><img src="images/img/centr/house.jpg"></center>'
'Tanya opens up and you quickly navigate to my room.'

if tanpred = 0:
	if tanya <= 50:
		tanday = day
		tanya += 3
		'Neither giving you say a word she pushes you on the bed and rips clothes'

		act 'Sex':xgt 'lezbsex', 'var'
	elseif tanya > 50 and vnesh <= 20:
		tanday = day
		tanya += 3
		'Neither giving you say a word she pushes you on the bed and rips clothes'

		act 'Sex':xgt 'lezbsex', 'var'
	elseif tanya > 50 and vnesh > 20:
		'"<<$name>>, I very best idea, mother just fired guvernatku, let me suggest you take a stepfather, he pays good 25,000 rubles per month, and the business is in the morning to cook breakfast, evening dinner and tidy up a bit well, and you will live right here with us . "protorotorila Tanya.'
		'"And where did you get that your stepfather take me, I used in this field did not work, " you asked.'
		'"Believe me, if I say take it." Tanya smiled lasciviously'

		act 'Refuse':
			cla
			tanya = 0
			'"I offer second time will not, do not want to be around me piss" Tanya furious pushes you out of the apartment.'

			act 'Leave':gt 'down'
		end

		act 'Agree':

			if work = 1:
				cla
				tanya += 5
				tanpred = 1
				'"Okay, but I first need to quit"'
				'"So what are you waiting, already run" exclaimed happily Tanya'

				act 'Leave':gt 'down'
			elseif (work = 0 and tanwork = 0 and cheatWork = 0) or (tanwork = 0 and cheatWork = 1):
				cla
				tanya += 5
				tanwork = 1
				work = 1
				'"Well, I agree."'
				'"Go and tell ur stepfather" exclaimed happily Tanya'

				act 'Leave':gt 'tanhouse', 'sex'
			end
		end
	end
else
	'"Well quit?"'

	if (work = 0 and tanwork = 0 and cheatWork = 0) or (tanwork = 0 and cheatWork = 1):
		tanwork = 1
		work = 1
		'"Yeah, quit"'
		'"Go and tell ur stepfather" exclaimed happily Tanya'

		act 'Leave':gt 'tanhouse', 'sex'
	else
		'"Not yet"'
		'"So what are you waiting, already run"'

		act 'Leave':gt 'down'
	end
end

if $ARGS[0] = 'sex':
	cla
	*clr
	'<center><img src="images/img/centr/tananal.jpg"></center>'
	'Walking down the hall you hear the groans of one room, opened the door a little bit you can see Tanya standing apart buttocks against the wall with your hands until her stepfather fucks in the ass. So here''s how it achieves from his stepfather that he wants.'

	act 'Leave':gt 'down'
end

act 'Leave':gt 'down'

--- tanhouse ---------------------------------
# tanroom
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'
	'<center><b>Room Thani</b></center>'
	'<center><img src="images/img/centr/tanroom.jpg"></center>'

	act 'In the corridor':gt 'house'

	if hour > 16 and hour < 23:
		if tanya > 50 and strapon > 0:
			act 'Play with strapon':
				cla
				*clr
				tanya += 2
				lesbian += 1
				orgasm += 1
				'<center><img src="images/img/centr/tanst1.jpg"></center>'
				'You wear the strap and hiding it under her skirt start to stick to Tanya, Tanya in the process starts fondling hand under her skirt and you will come across the strap. She looks at him admiringly, she obviously liked the idea.'

				act 'Further':
					cla
					*clr
					'<center><img src="images/img/centr/tanst2.jpg"></center>'
					'Tanya is not thinking long snaps on top of you and introducing a strap their pussy starts jumping as distraught.'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/centr/tanst3.jpg"></center>'
						'When she cums then weaken slips from you, you go substituting strap to her mouth, she eagerly embraces his lips and starts sucking licking their own juices and simultaneously bring you to orgasm fingers.'

						act 'Finish':
							cla
							*clr

							if niksvid > 2:
								cla
								*clr
								bj += 1
								sex += 1
								'<center><img src="images/img/centr/tanst4.jpg"></center>'
								'Once you have gathered to finish as Nicholas enters the room, and seeing this picture, took unabashed member was attached to your mouth.'

								act 'Further':
									cla
									*clr
									'<center><img src="images/img/centr/tanst5.jpg"></center>'
									'Nicholas lay on the bed, and you planted on your pussy dildo, Tanya same could not tear myself away from the strap, continuing to suck it passionately.'

									act 'Insert it':
										cla
										*clr
										'<center><img src="images/img/centr/tanst6.jpg"></center>'
										'You roll over on its side and tearing Tanya from sucking strap insert it into her pussy, Nicholas at this time continues to fuck your pussy. You now svoebrazny sandwich in which you were stuffing fucking Tanya and taking a Nicholas.'

										act 'Further':
											cla
											*clr
											'<center><img src="images/img/centr/tanst7.jpg"></center>'
											'You bet Tanya cancer and begin to peck her ass Nicholas at this time gets up and starts to fuck your mouth.'

											act 'Further':
												cla
												*clr
												'<center><img src="images/img/centr/tanst8.jpg"></center>'
												'Nicholas lays down on the bed and you insert your dick in pussy, this amateur anal no choice, because the closed ass panties strap. Tanya is attached over you substituting your own pussy, you will be happy glares at her lips.'

												act 'Further':
													cla
													*clr
													cumlip += 1
													nik += 2
													'<center><img src="images/img/centr/tanst9.jpg"></center>'
													'Tanya snaps back at you nasazhivayas pussy on a strap. As she squirms from orgasm on threesome, Nikolai inserts his penis into your mouth and ends rapidly filling it with sperm.'

													act 'Finish':gt 'house'
												end
											end
										end
									end
								end
							else
								gt 'house'
							end
						end
					end
				end
			end
		end

		if tanya > 30:act 'Sex':gt 'lezbsex', 'start'

		act 'Chat':
			cla
			tanya += 1
			minut += 30
			'You talked for half an hour.'

			act 'Finish':gt 'tanroom', 'start'
		end
	end

	if hour > 17 and hour < 20 and tanya > 70 and niksvid = 2:
		act 'Ask for help':
			cla
			*clr
			'<center><img src="images/img/centr/tanr1.jpg"></center>'
			'You give Tanya form and ask the maid to wear. Tanya asks you what surprised me that, but then you say that all explain, Tanya agrees and puts uniforms.'

			act 'Going to the gym':
				cla
				*clr
				picrand = 19
				niksvid = 3
				nik += 5
				tanya += 5
				lesbian += 1
				'<center><img src="images/img/centr/tanr2.jpg"></center>'
				'The hall sits Nicholas and seeing his stepdaughter in uniform looking at you with surprise. But you remember how great Tanya urged him to take you to work and begin to fondle her in front of him. He walks up to you and Join of the weasel.'

				act 'Sex':gt 'podrsex', 'var'
			end
		end
	end
end

--- tanroom ---------------------------------
# vecher
if $ARGS[0] = 'start':
	cla
	*clr
	'<center><img src="images/img/centr/vecher.jpg"></center>'

	act 'Leave':gt 'dorm', 'korr'

	act 'Dance':
		cla
		hour = 23
		'You have fun, dance and Bukhaev.'
		itrand = rand(1, 11)
		gt 'vecher', 'end<<itrand>>'
	end
end

if $ARGS[0] = 'end1':
	cla
	*clr
	'<center><img src="images/picparty/itog.jpg"></center>'
	'Gradually you distribute alcohol as hell and you start to feel sick, you end vechereniki spent hugging the toilet.'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'end2':
	cla
	*clr
	'<center><img src="images/picparty/itog2.jpg"></center>'
	'You danced and hooligans, you had the idea to dance with Vika, ended your dance light lesbian show with savory lingering kisses.'

	act 'Leave':gt 'dorm', 'korr'

	act 'Go into the room with Vika':
		cla
		if vikasex = 0:vikasex = 1
		$sexloc = 'obroom'
		gt 'lezbsex', 'start'
	end
end

if $ARGS[0] = 'end3':
	cla
	*clr

	if vnesh < 20:
		'<center><img src="images/picparty/itog3.jpg"></center>'
		'You nakiryalis and slept in the next room with a few hardcore sex.'

		act 'Leave':gt 'dorm', 'korr'
	else
		'<center><img src="images/img/centr/vechend1.jpg"></center>'
		'You nakiryalis and slept in the next room with a few hardcore sex. You dream that you have sex with Vika, you literally feel like it pushes you to your feet, and then hot tongue starts licking your clitoris. Opening his eyes you can see a few girls bent over your hands and caress your body, and you have between your legs Vick wielded his tongue, "This is a prophetic dream" flashed through your mind.'

		act 'Leave':gt 'dorm', 'korr'

		act 'Enjoy':
			cla
			*clr

			if vikasex = 0:vikasex = 1

			orgasm += 1
			girl += 4
			lesbian += 1
			'<center><img src="images/img/centr/vechend2.jpg"></center>'
			'You relax allowing girls to caress your body, they periodically change in your pussy, giving each try yazochok from these endless caresses you covered orgasm.'

			act 'Continue':gt 'vecher', 'end12'
		end
	end
end

if $ARGS[0] = 'end4':
	cla
	*clr
	'<center><img src="images/picparty/itog4.jpg"></center>'
	'You get drunk and began to molest girls, how come you and do not understand, but you have exposed breasts and Vic kiss and lick your nipples in front of everyone.'

	act 'Leave':gt 'dorm', 'korr'

	act 'Vika leave an empty room':
		cla
		if vikasex = 0:vikasex = 1
		$sexloc = 'obroom'
		gt 'lezbsex', 'start'
	end
end

if $ARGS[0] = 'end5':
	cla
	*clr
	guy += 1
	sex += 1
	'<center><img src="images/img/centr/itog5.jpg"></center>'
	'You woke up on the floor in the hallway, half way to your room. Puffed over you what that pimply young man fucking your vagina carefully. Noticing that you''re awake, he quickly jumped to his feet and ran off, leaving you lying on the dirty floor.'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'end6':
	cla
	*clr
	'<center><img src="images/picparty/itog6.jpg"></center>'
	'You all evening molested girl with big breasts begging her to kiss her breasts. By evening, the two of you got drunk in the trash and then you climbed her face in his chest and began kissing them.'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'end7':
	cla
	*clr
	'<center><img src="images/img/centr/itog7.jpg"></center>'
	'Natreskavshis zyuzyu to you and do not understand how the dance began to undress, but alcohol has done his job and lost his balance and falls down Man sitting on the couch, then immediately took advantage of the situation and began to grope your breasts.'

	act 'Writing in the balls and leave':gt 'dorm', 'korr'

	act 'Remove panties':
		cla
		*clr
		guy += 1
		bj += 1
		sex += 1
		cumass += 1
		'<center><img src="images/img/centr/itog71.jpg"></center>'
		'You go up to her feet and shoot the last thing you have left, panties, nearly fell again. Seeing your man rush immediately releases chleniz pants.'

		act 'Suck':
			cla
			*clr
			'<center><img src="images/img/centr/itog72.jpg"></center>'
			'You go down on his knees and clasping member lips retract it in yourself, you will gradually move its sucking dildo ignoring the crowd gathered around you, but it seemed to him that is not enough, he grabbed you by the head and began to literally stick your mouth on his penis.'

			act 'Further':
				cla
				*clr
				'<center><img src="images/img/centr/itog73.jpg"></center>'
				'When he became a member of the stone, he put you on the couch doggy style and with force entered your vagina, he did not even try to make you even as it pleased, just fucked, the crowd around you cheered him, shouting that he would fuck you properly, although how do they know how to. The guy was drunk he could not get to finish.'

				act 'Further':
					cla
					*clr
					'<center><img src="images/img/centr/itog74.jpg"></center>'
					'When you have ceased to feel that either he pulled Resko of you penis and discharged you on the buttocks. Collecting clothes from the floor you went to his room.'

					act 'Leave':gt 'dorm', 'korr'
				end
			end
		end
	end
end

if $ARGS[0] = 'end8':
	cla
	*clr
	'<center><img src="images/picparty/itog8.jpg"></center>'
	'You ran with Vika Vika became sex with what that guy is not known. You were lying next fun chatting with her until Vika tore drunk in the trash is not familiar guy.'

	act 'Leave':gt 'dorm', 'korr'

	act 'Caress Vic':
		cla
		*clr

		if vikasex = 0:vikasex = 1

		girl += 1
		lesbian += 1
		horny += 60
		'<center><img src="images/img/centr/itog81.jpg"></center>'
		'You kiss and fondle breasts Vicki, she is very excited and you have decided to give her to lick your pussy.'

		if horny < 100:'You started to get tired of licking and wanted to continue'
		if horny >= 100:horny = 0 & orgasm += 1 & 'Muscles of the vagina began to decline sharply, the entire abdomen as if covered hot wave of pleasure, you scream from a powerful orgasm.'

		'The guy pulls his dick out of Vicki and lifting it inserts his penis into her mouth.'

		act 'Watch':
			cla
			*clr
			'<center><img src="images/img/centr/itog82.jpg"></center>'
			'Vick guy cums in her mouth. Vicki peremazanny lips in semen and it stretches to you that would have kissed her.'

			act 'Kissing with Vika':
				cla
				*clr
				cumlip += 1
				'<center><img src="images/img/centr/itog83.jpg"></center>'
				'You''re kissing licking each other''s cum.'

				act 'Leave':gt 'dorm', 'korr'
			end
		end

		act 'Suck together with Vika':
			cla
			*clr
			bj += 1
			guy += 1
			cumface += 1
			'<center><img src="images/img/centr/itog84.jpg"></center>'
			'You fucked by dick together with Vika finally ends Perrin you on the face.'

			act 'Kissing with Vika':
				cla
				*clr
				cumlip += 1
				'<center><img src="images/img/centr/itog83.jpg"></center>'
				'You''re kissing licking each other''s cum.'

				act 'Leave':gt 'dorm', 'korr'
			end
		end
	end
end

if $ARGS[0] = 'end9':
	cla
	'<center><img src="images/picparty/itog9.jpg"></center>'
	'Girls love to have fun, you two had a drunken girlfriends lesbian show right at the party. Caressing, kissing and squeezing each other in front of everyone.'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'end10':
	cla
	'<center><img src="images/picparty/itog10.jpg"></center>'
	'You got drunk and danced with what that guy who you dirty paw tits.'

	act 'Leave':gt 'dorm', 'korr'

	act 'Touch for pants':
		$sexloc = 'obroom'
		gt 'sex', 'start'
	end
end

if $ARGS[0] = 'end11':
	cla
	*clr
	cumfrot += 1
	'<center><img src="images/picparty/skirtcum.jpg"></center>'
	'You woke up in a strange room, lying on his stomach, thank god clothes, then no you are not drunk ripped.'
	'What''s this? Damn! What that bastard, you dragged into another room and obkonchal your ass.'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'end12':
	cla
	*clr
	minut += 15
	picrand = rand(3, 9)
	'<center><img src="images/img/centr/vechend<<picrand>>.jpg"></center>'
	'All mixed up in a big ball of women''s bodies, you do not understand or who or whom, and how that now makes your tongue or in your hole either language, or fingers.'

	act 'More':gt 'vecher', 'end12'
	act 'Leave':gt 'dorm', 'korr'
end

--- vecher ---------------------------------
# vipclub
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'
	'<center><b>Vip-room</b></center>'
	'<center><img src="images/img/centr/vipclub.jpg"></center>'
	'VIP area is divided into several separate rooms, with no doors and passing by can see such a scene that would be the envy even the director''s porn.'

	act 'Leave':gt 'club', 'inside'

	if hour >= 15 or hour <= 3:
		act 'Cocktails.':
			*clr
			minut += 15
			drunk += 1
			water += 5
			son -= 5
			frost = 0
			horny += rand(10, 20)
			gt 'vipclub', 'start'
		end

		if money >= 3000:
			act 'Order Woman (3,000 rubles)':
				money -= 3000
				picrand = rand(13, 17)
				girl += 1
				lesbian += 1
				dynamic $venerasiak
				xgt 'lezbsex', 'var'
			end
		end

		if money >= 3000:
			act 'Order Man (3,000 rubles)':
				money -= 3000
				picrand = 38
				guy += 1
				dynamic $venerasiak
				xgt 'sex', 'var'
			end
		end

		if money >= 5000:
			act 'Order representation (5,000 rubles)':
				cla
				*clr
				girl += 1
				lesbian += 1
				money -= 5000
				dynamic $venerasiak

				'<center><img src="images/img/centr/vip1.jpg"></center>'
				'You booked an idea and a couple of minutes you went into the room boy and a girl. Man undid his pants and sat on the couch, she began to make him a blowjob. You intiresom watched the scene.'

				act 'Further':
					cla
					*clr
					'<center><img src="images/img/centr/vip2.jpg"></center>'
					'The guy puts her cancer and fucks her vagina, you push the legs and hips push up to her face, realizing your desire girl lowered her head to your pussy and lick you nachila.'

					act 'Further':
						cla
						*clr
						'<center><img src="images/img/centr/vip3.jpg"></center>'
						'Then she takes a double dildo and inserting one end into your vagina, the second takes into his mouth and sucks it at the same time fucking you.'

						act 'Further':
							cla
							*clr
							horny = 0
							orgasm += 1
							'<center><img src="images/img/centr/vip4.jpg"></center>'
							'Then she turns around and puts it in her pussy, you begin to move actively trying to take the dildo as deep as possible and rub against her pussy, she sucks at this time with a guy. Soon you covers the wave of orgasm.'

							act 'Further':
								cla
								*clr
								'<center><img src="images/img/centr/vip5.jpg"></center>'
								'When you end the guy turns her to him and lifted her ass in the upper part of her anus. You watch as she moans when healthy dildo fucks her in the ass.'

								act 'Further':
									cla
									*clr
									'<center><img src="images/img/centr/vip6.jpg"></center>'
									'When a guy sated her ass, he put her on the sofa and began to finish top standing. You tongue hanging out, watching the sperm off his cock filling her mouth and chest.'

									act 'Finish':gt 'vipclub', 'start'

									act 'Lick her breasts':
										cla
										*clr
										cumlip += 1
										'<center><img src="images/img/centr/vip7.jpg"></center>'
										'You began to lick the droplets of cum from her chest, trying not to miss an inch of her body.'

										act 'Finish':gt 'vipclub', 'start'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- vipclub ---------------------------------
# Vnlake1
'<center><img src="images/img/Lake/Vnlake1/vnlake1.jpg"></center>'
'While you were sunbathing you came tipsy girl with a bottle of wine under, sat down next to you and began to stroke your back.'

act 'Drive away':gt 'Nudelake'

act 'Kiss':
	cla
	*clr
	lesbian += 1
	girl += 1
	'<center><img src="images/img/Lake/Vnlake1/vnlake2.jpg"></center>'
	'You turn to her and bites her lips, she begins to fondle your breasts tongue, and hand massages you pussy.'

	act 'Proceed':gt 'Vnlake1', 'variant'
end

if $ARGS[0] = 'variant':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake0.jpg"></center>'
	'The girl looks at you in anticipation of your actions'

	act 'Lick her':gt 'Vnlake1', 'ukuni'
	act 'Ask you to lick':gt 'Vnlake1', 'kuni'
	act 'Ask to lick your anus':gt 'Vnlake1', 'anuli'
	act 'Insert the bottle in her pussy':gt 'Vnlake1', 'bvag'
	act 'Insert the bottle in her ass':gt 'Vnlake1', 'banal'
	act 'Ask you to insert a bottle in pussy':gt 'Vnlake1', 'ubvag'
	act 'Ask you to insert a bottle in the ass':gt 'Vnlake1', 'ubanal'
	act 'Sit on the bottle.':gt 'Vnlake1', 'ubsit'
	act 'Rubbing pussies.':gt 'Vnlake1', 'sex'
end

if $ARGS[0] = 'ukuni':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake4.jpg"></center>'
	'You kiss her breasts moving eventually going down lower and lower and now its current before you pussy, you begin to caress her tongue sponges, setting the stage for his tongue between them touch the clitoris, she pushes her lips with your fingers that nothing had prevented you caress the clitoris.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'kuni':
	cla
	*clr
	kuni += 1
	'<center><img src="images/img/Lake/Vnlake1/vnlake5.jpg"></center>'
	'Girl holds his tongue over your thighs, crotch and kisses down to the vagina, her tongue slides over your crotch then caressing the clitoris is penetrating the vagina.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'anuli':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake6.jpg"></center>'
	'She kisses your buttocks priblezhayas moving eventually to the center, reaching a goal, she spends the language of your anus and then shoves it inside your buttocks, prints and again licking the anus, then all repeated.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'bvag':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake7.jpg"></center>'
	'You take the bottle neck and poke into her pussy, she kisses you while you are driving with one hand and the second bottle fondle her breasts.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'banal':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake8.jpg"></center>'
	'You take a bottle, licking the neck, trying to leave it on the maximum amount of saliva, and gently insert it into the anus of girls starting to fuck her ass bottle medleno first then faster and faster.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'ubvag':
	cla
	*clr
	sex += 1
	orgasm += 1
	'<center><img src="images/img/Lake/Vnlake1/vnlake9.jpg"></center>'
	'Girl puts you in a bottle pussy, she moves it back and forth while constantly provarachivaet, the bottle in her hands to get better soon, and any member of your body shuddered in orgasm.'

	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'ubanal':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake10.jpg"></center>'
	'Girl spits on you ass, collects saliva bottle neck and inserts it into the anus to you, you feel like a glass slide in your ass, bringing you pleasure.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'ubsit':
	cla
	*clr
	'<center><img src="images/img/Lake/Vnlake1/vnlake11.jpg"></center>'
	'You put the bottle and sit down on her with my anus, you liked the feel of the slip, she caressed your breasts tongue until you jumped on the bottle.'

	act 'More':gt 'Vnlake1', 'variant'
	act 'Leave':gt 'Nudelake'
end

if $ARGS[0] = 'sex':
	cla
	*clr
	orgasm += 1
	'<center><img src="images/img/Lake/Vnlake1/vnlake12.jpg"></center>'
	'You sat across from each other, woven so that your feet would touch pussy and started to move her hips caressing each other, until the wave of pleasure is not covered you both.'

	act 'Leave':gt 'Nudelake'
end

--- Vnlake1 ---------------------------------
# Vnlake2
'<center><img src="images/img/Lake/Vnlake2/vnlake1.jpg"></center>'
'Tan you dozed off, and you dream about as a caress your breasts, as someone caressing tongue your pussy, you open HVAs and understand that this is not a dream, next to you two men one caress your breasts, the second you have already dug his lips between her legs.'

act 'Push them':gt 'Nudelake'

act 'Touch member':
	cla
	*clr
	guy += 2
	bj += 1
	'<center><img src="images/img/Lake/Vnlake2/vnlake2.jpg"></center>'
	'Spit you a member of one of them and get up on his knees, men rise and stand next to you, their members to Paul on you, you take them in hand and begin to suck alternately.'

	act 'Stand on all fours':
		cla
		*clr
		sex += 1
		'<center><img src="images/img/Lake/Vnlake2/vnlake3.jpg"></center>'
		'Sucked enough you get up on all fours, one of the men in front of you lies a member to face a second knelt behind and came into your vagina.'

		act 'Change position':
			cla
			*clr
			anal += 1
			orgasm += 3
			'<center><img src="images/img/Lake/Vnlake2/vnlake4.jpg"></center>'
			'Sitting on a dildo, you pushed her hands buttocks inviting second enter your ass, which he did. They fuck you in the trunk in two, and you were moaning and ended. Have you finished that many times lost count, and the men all went finally took one member of your ass, you decided that it would end now but it was not there.'
			'"Sit down ass" said the man from the bottom'

			act 'Seats':
				cla
				*clr
				cumass += 1
				'<center><img src="images/img/Lake/Vnlake2/vnlake5.jpg"></center>'
				'You acted with the member turned her back to him and planted his ass on his dildo, came second to your face and put his penis in your mouth. Soon you povstvovali that your ass flooded with sperm and dick in your mouth is about to finish.'

				act 'Remove the mouth':
					cla
					*clr
					cumface += 1
					'<center><img src="images/img/Lake/Vnlake2/vnlake6.jpg"></center>'
					'You spat member of his mouth and the man was discharged on your face.'

					act 'Stay on the beach':gt 'Nudelake'
				end
			end
		end
	end
end

--- Vnlake2 ---------------------------------
# WorkHosp
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'
	'<center><b><font color="maroon">Clinic</font></b></center>'
	'<center><img src="images/img/spaln/hospital.jpg"></center>'
	'The clinic are hard at work, patients sit in queues, doctors are receiving, nurses rush from office to office.'
	jobhosprand = rand(0, 9)

	act 'Work in the procedural':
		cla
		minut += 60

		if jobhosprand = 0:gt 'WorkHosp', '2'

		'You worked in the treatment room.'

		act 'Move away':gt 'WorkHosp', 'start'
	end

	act 'Help the doctor at the reception':
		cla
		minut += 60

		if jobhosprand = 0:gt 'WorkHosp', '3'

		'You helped a doctor at the reception.'

		act 'Move away':gt 'WorkHosp', 'start'
	end

	act 'Relax in nursing':
		cla
		minut += 30
		'You relax.'

		act 'Masturbate (0:15)':
			minut += 15
			mastrrand = rand(0, 2)

			if mastrrand = 0:
				gt 'WorkHosp', '1'
			else
				cla
				*clr
				mastr += 1
				horny = 0
				orgasm += 1
				picrand = 11
				! WD: Correct Image path ~ "images/img/mastr/mastr<<picrand>>.jpg"
				'<center><img src="images/inBed/mastr11.jpg"></center>'
				'You masturbated.'
				'Gradually a pleasant warmth and pulsation increases in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm'
			end

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

		act 'Move away':gt 'WorkHosp', 'start'
	end

	act 'Eat in the cafeteria (0:30)':
		minut += 30
		health += 10
		manna += 5
		willpower += 5

		if energy >= 30:
			fat += 5
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			fat += 3
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			fat += 1
			'You gladly ate the food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a mug of tea.'
		end
	end

	act 'Chat with Kate':
		cla
		minut += 30
		kat += 1

		if kat > 60 and military = 0:gt 'WorkHosp', 'milit'

		'You chatted with Kate.'


		if kat > 50:
			act 'Suggest to retire':gt 'WorkHosp', '0'
		end

		act 'Move away':gt 'WorkHosp', 'start'
	end

	if hour >= 16:
		cls
		'<center><b><font color="maroon">Clinic</font></b></center>'
		'<center><img src="images/img/spaln/hospital.jpg"></center>'
		'Your shift ended.'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'milit':
	cla
	military = 1
	'"Listen, I immediately offered to earn the weekend, but I have plans. Overall the thing is close to the city are often held war games, well, according to the rules that need to be attended by doctors there. Do not be afraid you will be there with you doctor, so the maximum that you have to do is to stick patches. short if you decide on a Saturday bus at the clinic, he was waiting for from 6 to 9 hours. Yeah I almost forgot to pay for two days of 5000. "'


	act 'Move away':gt 'WorkHosp', 'start'
end

if $ARGS[0] = '0':
	cla
	*clr
	katprorand = rand(0, 2)

	if katprorand = 0:
		girl += 1
		lesbian += 1
		picrand = 11
		xgt 'lezbsex', 'var'
	elseif katprorand = 1:
		'<center><img src="images/img/spaln/hospsex7.jpg"></center>'
		'Only you and Kat began to fondle each other as to the treatment the patient is entered. You backed away from her trying to pretend that nothing happened, on the contrary, Kate did not hesitate and was lying on the couch with her legs spread wide, proudly showing off her wet pussy on your tongue, and looked appealingly at the guy look inviting him prisoedinitsa.'

		act 'Leave':gt 'WorkHosp', 'start'

		act 'Amuse':
			girl += 1
			guy += 1
			lesbian += 1
			picrand = 12
			gt 'podrsex', 'var'
		end
	elseif katprorand = 2:
		'<center><img src="images/img/spaln/hospsex8.jpg"></center>'
		'When your games were in full swing in procedural included two doctors, but you were already so excited that not paying any attention to them continued, and when men began to caress you, you just degradability radvinuli legs wider, inviting them into your vagina.'

		act 'Entertain':
			gang += 1
			picrand = 11
			xgt 'sexdvanadva', 'var'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	mastrrand = rand(0, 1)

	if mastrrand = 0:
		'<center><img src="images/img/spaln/hospsex9.jpg"></center>'
		'While you samozabveno masturbate, trying to bring herself to orgasm, the doctor enters the room, you are so keen that only notice it when his hand starts to pull your head to a standing member.'

		if horny < 50:act 'Break and run':gt 'WorkHosp', 'start'

		act 'Amuse':
			guy += 1
			picrand = 12
			gt 'sex', 'minet'
		end
	else
		picrand = rand(12, 13)
		'<center><img src="images/img/spaln/hospsex10.jpg"></center>'
		'As long as you selflessly masturbate, trying to bring herself to orgasm in the room includes two doctors, you are so keen that only notice them when they stand in front of you with members shaved and masturbate.'

		if horny < 50:
			act 'Leave':gt 'WorkHosp', 'start'
		end

		act 'Amuse':guy += 2 & xgt 'sexdvoe', 'var'
	end
end

if $ARGS[0] = '2':
	cla
	*clr
	picrand = rand(13, 15)
	'<center><img src="images/img/spaln/hospsex11.jpg"></center>'
	'To you and the patient comes from the doorway taking his pants demonstrates his flaccid penis and asks you to help him as you see it is not worth it. Mind you realize that it''s all just a silly gimmick that would fuck you, but you still feel sorry for him. And suddenly it does not worth it, and you will be able to pick it up, but what if he just no luck with girls and if today is not lucky, he will jump out of the window.'

	act 'Oust him':gt 'WorkHosp', 'start'
	act 'Pick up':guy += 1 & gt 'sex', 'minet'
end

if $ARGS[0] = '3':
	cla
	*clr
	'<center><img src="images/img/spaln/hospsex12.jpg"></center>'
	'It comes to you pretty patient until the doctor tries to examine her, and then she touches his trousers near term, the doctor glances at you with a question in his eyes.'

	act 'Make her remark':gt 'WorkHosp', 'start'

	act 'Amuse':
		guy += 1
		girl += 1
		lesbian += 1
		picrand = 13
		gt 'podrsex', 'var'
	end
end

--- WorkHosp ---------------------------------
# worksalon
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'
	'<center><b><font color="maroon">Beauty</font></b></center>'
	'<center><img src="images/img/centr/salon.jpg"></center>'
	'Inside are hard at work.'
	salonjobrand = rand(0, 10)

	if salonjobrand = 2 and vnesh > 20 and alla = 0:
		gt 'worksalon', '2'

	elseif salonjobrand = 3 and salonslut = 1:
		cla
		'It suits you administrator "Well slut went into the back room, crustaceans billeting"'

		if DOM >= 10:
			act '"Get out utyrok"':salonslut = 0 & gt 'worksalon', 'start'
			act 'Go with him':gt 'worksalon', '3'
		else
			act 'Go with him':gt 'worksalon', '3'
		end
	end

	act 'Massage':
		minut += 120

		if salonjobrand = 0:gt 'worksalon', '0'
		if salonjobrand = 1:gt 'worksalon', '1'

		'You did a massage client.'
		gt 'worksalon', 'start'
	end

	act 'Have a snack (0:30)':
		minut += 30
		health += 10
		manna += 5
		willpower += 5

		if energy >= 30:
			fat += 5
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			fat += 3
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			fat += 1
			'You gladly ate the food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a mug of tea.'
		end

		gs 'stat'
	end

	if masha > 0:
		act 'Chat with Masha':
			cla
			minut += 30
			masha += 1
			'You chatted with Masha.'

			act 'Move away':gt 'worksalon', 'start'
		end

		if masharab = 1:
			act 'Masha order a massage':
				cla
				*clr
				DOM += 1
				minut += 30
				manna += 10
				horny += 10
				willpower += 10
				'<center><img src="images/img/masha/s7.jpg"></center>'
				'You go up to Masha and commanding manner, would say that it was for you, logging into the booth you undress and lie down on the table, "Well, what are you waiting let''s work, bitch not hasty" you are in command. Masha immediately jumps up to you and starts massaging.'

				act 'Order to massage the body':
					cla
					*clr
					minut += 30
					manna += 10
					horny += 10
					willpower += 10
					picrand = rand(8, 9)
					'<center><img src="images/img/masha/s<<picrand>>.jpg"></center>'

					if picrand = 8:
						'Mary takes off her clothes and deftly leaping on the table for you to slide naginaet you massaging her breasts.'
					else
						'Mary takes off her clothes and deftly leaping on the table to sit on top of you starts massaging you with their buttocks.'
					end

					act 'Order licking pussy':
						cla
						*clr
						DOM += 1
						lesbian += 1
						orgasm += 1
						horny = 0
						'<center><img src="images/img/masha/s10.jpg"></center>'
						'You push the legs, and order her to lick your pussy. Masha immediately runs up to you with a cheerful smile and crouches to your pussy, her nimble tongue quickly bring you to orgasm. When Masha lapped up the last drop of your pussy, she walks away with his head.'

						act 'Finish':gt 'worksalon', 'start'
					end

					act 'Ordered to lick ass':
						cla
						*clr
						DOM += 1
						lesbian += 1
						orgasm += 1
						horny = 0
						'<center><img src="images/img/masha/s11.jpg"></center>'
						'You stand up doggy on the table and order her to lick your ass. Masha immediately runs up to you with a cheerful smile and crouches to your anus, her nimble tongue that would deprive him of it snaps into kogdavy start to moan with pleasure she glares yaykom you in the anus and literally begins to fuck his tongue trying to plunge it as deep as possible, after a couple of minutes you end, and Masha naachinaet beg you to lick her Rares your hips, she received permission then quickly licks them with your jet juice and finishing moves away with his head.'

						act 'Finish':gt 'worksalon', 'start'
					end

					act 'Finish':gt 'worksalon', 'start'
				end

				act 'Order licking pussy':
					cla
					*clr
					DOM += 1
					lesbian += 1
					orgasm += 1
					horny = 0
					'<center><img src="images/img/masha/s10.jpg"></center>'
					'You push the legs, and order her to lick your pussy. Masha immediately runs up to you with a cheerful smile and crouches to your pussy, her nimble tongue quickly bring you to orgasm. When Masha lapped up the last drop of your pussy, she walks away with his head.'

					act 'Finish':gt 'worksalon', 'start'
				end

				act 'Ordered to lick ass':
					cla
					*clr
					DOM += 1
					lesbian += 1
					orgasm += 1
					horny = 0
					'<center><img src="images/img/masha/s11.jpg"></center>'
					'You stand up doggy on the table and order her to lick your ass. Masha immediately runs up to you with a cheerful smile and crouches to your anus, her nimble tongue that would deprive him of it snaps into kogdavy start to moan with pleasure she glares yaykom you in the anus and literally begins to fuck his tongue trying to plunge it as deep as possible, after a couple of minutes you end, and Masha naachinaet beg you to lick her Rares your hips, she received permission then quickly licks them with your jet juice and finishing moves away with his head.'

					act 'Finish':gt 'worksalon', 'start'
				end

				act 'Finish':gt 'worksalon', 'start'
			end

		elseif masha > 5 and masharab = 0:
			act 'Masha ask a massage':
				cla
				'You go up to Masha and ask her "Mary, I''m so tired I can do a little massage, please"'
				'"Yes of course, all that you wish" she says'
				'"I now nepoyala that was sarcasm?" You ask why Neponyal Masha talks to you as if you are client initially.'
				'"Forgive me if I do not say so, please go through the booth I''ll do what you want, " she says, turning his eyes and bowed his head as a naughty child'

				act 'Nafig this sick':gt 'worksalon', 'start'

				act 'Go into the booth':
					cla
					*clr
					masharab = 1
					minut += 30
					manna += 10
					horny += 10
					willpower += 10
					'<center><img src="images/img/masha/s1.jpg"></center>'
					'You undress and lie down on the table, Mary begins to make you a massage, her delicate hands glide over your body, you chustvuete as your body relaxes, you become very good. A few minutes later Mary begins to speak, "Excuse me please, Sorry for disturbing, let me help you turn over on his back.", You realize that she wants something to you rolled over on his back, but why is it still speaks with his head so that her chin slightly not touching the breast.'

					act 'Roll':
						cla
						*clr
						manna += 10
						horny += 10
						willpower += 10
						'<center><img src="images/img/masha/s2.jpg"></center>'
						'You roll over in silence, eyes closed, continue to enjoy a few minutes later you feel like you Masha strongly compresses the chest and begins to lick her nipples. You open your eyes, noticing this Masha immediately let your chest and fell to the floor on his knees, begins to ask forgiveness for what was fascinated and could not resist, slowly backing away. That you begin to realize that she just likes to obey, so she dwelleth between and leads you seeing his mistress, after the terms of your dating is not surprising.'

						act 'Talk to her':
							cla
							*clr
							'<center><img src="images/img/masha/s5.jpg"></center>'
							'"Masha I realized you love to obey, but do not always do it on people it looks pretty weird." you started.'
							'"I''m sorry I will not, " said Mary, almost in tears.'
							'"I''m not saying that you do not do this just let''s agree when I want you to be a slave I''ll start command, and while I''m not a team we are friends. And for such games need another place, imagine what will happen if we''re caught, " you tried to appease it.'
							'"Can I have it, I work at night in a sex shop, and the owner handed me a room there in the basement, where I live." happy Masha'
							'"Well, that''s good, okay went until we did not have" finished you'

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

						act 'Order licking pussy':
							cla
							*clr
							DOM += 1
							lesbian += 1
							orgasm += 1
							horny = 0
							'<center><img src="images/img/masha/s6.jpg"></center>'
							'You cast your legs over his head and order her to lick your pussy. Masha immediately runs up to you with a cheerful smile and crouches to your pussy, her nimble tongue quickly bring you to orgasm. When Masha lapped up the last drop of your pussy, she walks away with his head.'

							act 'Talk to her':
								cla
								*clr
								'<center><img src="images/img/masha/s5.jpg"></center>'
								'"Masha I realized you love to obey, but do not always do it on people it looks pretty weird." you started.'
								'"I''m sorry I will not, " said Mary, almost in tears.'
								'"I''m not saying that you do not do this just let''s agree when I want you to be a slave I''ll start command, and while I''m not a team we are friends. And for such games need another place, imagine what will happen if we''re caught, " you tried to appease it.'
								'"Can I have it, I work at night in a sex shop, and the owner handed me a room there in the basement, where I live." happy Masha'
								'"Well, that''s good, okay went until we did not have" finished you'

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

					act 'Ask why she says':
						cla
						'"Why are you doing this to me razgovarivash?" you ask.'
						'Masha little steps back and begins to babble, "Excuse me please, I say terrible, tell me how to speak, I immediately corrected"'
						'"Yes, you stop talking like ..." you pluck the word on the floor, "Well, of course she talks like a slave" because it hit you when you first met her then forced to fuck with administrators and she obediently did everything that you told her.'

						act 'Talk to her':
							cla
							'<center><img src="images/img/masha/s5.jpg"></center>'
							'"Masha I realized you love to obey, but do not always do it on people it looks pretty weird." you started.'
							'"I''m sorry I''ll bolshene" said Masha almost crying.'
							'"I''m not saying that you do not do this just let''s agree when I want you to be a slave I''ll start command, and while I''m not a team we are friends. And for such games need another place, imagine what will happen if we''re caught, " you tried to appease it.'
							'"Can I have it, I work at night in a sex shop, and the owner handed me a room there in the basement, where I live." happy Masha'
							'"Well, that''s good, okay went until we did not have" finished you'

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

						act 'Order licking pussy':
							cla
							*clr
							DOM += 1
							lesbian += 1
							orgasm += 1
							horny = 0
							'<center><img src="images/img/masha/s3.jpg"></center>'
							'You stand up doggy on the table and order her to lick your pussy. Masha immediately runs up to you with a cheerful smile and crouches to your pussy, her nimble tongue quickly bring you to orgasm. When Masha lapped up the last drop of your pussy, she walks away with his head.'

							act 'Talk to her':
								cla
								*clr
								'<center><img src="images/img/masha/s5.jpg"></center>'
								'"Masha I realized you love to obey, but do not always do it on people it looks pretty weird." you started.'
								'"I''m sorry I will not, " said Mary, almost in tears.'
								'"I''m not saying that you do not do this just let''s agree when I want you to be a slave I''ll start command, and while I''m not a team we are friends. And for such games need another place, imagine what will happen if we''re caught, " you tried to appease it.'
								'"Can I have it, I work at night in a sex shop, and the owner handed me a room there in the basement, where I live." happy Masha'
								'"Well, that''s good, okay went until we did not have" finished you'

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

						act 'Ordered to lick ass':
							cla
							*clr
							DOM += 1
							lesbian += 1
							orgasm += 1
							horny = 0
							'<center><img src="images/img/masha/s4.jpg"></center>'
							'You stand up doggy on the table and order her to lick your ass. Masha immediately runs up to you with a cheerful smile and crouches to your anus, her nimble tongue that would deprive him of it snaps into kogdavy start to moan with pleasure she glares yaykom you in the anus and literally begins to fuck his tongue trying to plunge it as deep as possible, after a couple of minutes you end, and Masha naachinaet beg you to lick her Rares your hips, she received permission then quickly licks them with your jet juice and finishing moves away with his head.'

							act 'Talk to her':
								cla
								*clr
								'<center><img src="images/img/masha/s5.jpg"></center>'
								'"Masha I realized you love to obey, but do not always do it on people it looks pretty weird." you started.'
								'"I''m sorry I will not, " said Mary, almost in tears.'
								'"I''m not saying that you do not do this just let''s agree when I want you to be a slave I''ll start command, and while I''m not a team we are friends. And for such games need another place, imagine what will happen if we''re caught, " you tried to appease it.'
								'"Can I have it, I work at night in a sex shop, and the owner handed me a room there in the basement, where I live." happy Masha'
								'"Well, that''s good, okay went until we did not have" finished you'

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

	if hour >= 19:
		cls
		'<center><b><font color="maroon">Salon</font></b></center>'
		'<center><img src="images/img/centr/salon.jpg"></center>'
		'Your shift ended.'

		act 'Go home':gt 'down'
	end
end

if $ARGS[0] = '0':
	cla
	*clr
	salonpicrand = rand(0, 4)
	picrand = salonpicrand + 30
	'<center><img src="images/img/centr/wmass<<salonpicrand>>.jpg"></center>'
	'During the massage guy flipped on his back and sticks out from under the towels large standing member. He looks at you in anticipation of your actions'

	act 'Finish the massage':gt 'worksalon', 'start'
	act 'Take by mouth':guy += 1 & gt 'sex', 'minet'
end

if $ARGS[0] = '1':
	'While you are doing massage, the client asks if possible breast erotic massage two girls surcharge 1,000 rubles. each.'

	act 'Refuse':gt 'worksalon', 'start'

	act 'Go for the second girl':
		cla
		*clr
		money += 1000
		'<center><img src="images/img/centr/wmass5.jpg"></center>'
		'You brought one of the girls undressed and started to crawl a couple man stroking his own breasts. You went to the lower part, so that your chest is constantly rubbing his vobuzhdenny member. And you have not noticed how his cock positioned between her breasts and not just massaged his chest and almost jerked off his cock feeding. Looking up, you see that the man is already in full sucking chest girl, and she stroked his chest contentedly.'

		act 'Stop jerking and calmly finish massage':
			cla
			'You stopped to caress his dildo, a little more calmly massaged his thighs and stomach, got up and left the room, leaving him alone with the girl'

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

		act 'Take by mouth':
			girl += 1
			guy += 1
			lesbian += 1
			picrand = 14
			gt 'podrsex', 'var'
		end
	end
end

if $ARGS[0] = '2':
	cla
	*clr

	'<center><img src="images/img/centr/ira1.jpg"></center>'
	'You send client the wash head, do you give it in a separate booth and sits in a chair, costing you turn away like a girl draws you to her, and as long as you do not come to their senses begins to caress your breasts'

	act 'Otolknut and go':gt 'worksalon', 'start'

	act 'Let her':
		cla
		*clr
		girl += 1
		lesbian += 1
		telalla = 1
		alla += 1
		orgasm += 3
		'<center><img src="images/img/centr/ira2.jpg"></center>'
		'Realizing that you do not mind girl sits you down in a chair, and she falls down on all fours and starts so deftly wield language that in ten minutes you end three times, but she continues to lick your pussy greedily trying to drink all the juice out of your womb.'
		'When it finishes it gives you his business card with a number and a name Alla and going away.'

		act 'Let go':gt 'worksalon', 'start'

		act 'Thank':
			cla
			*clr
			'<center><img src="images/img/centr/ira3.jpg"></center>'
			'You stop the girl and usashivaete her in a chair, and you''re diligently working on Kolyanom tongue trying to repeat everything to her what she did to you, and a few minutes later you do it, she shudders and you feel like a warm liquid fills your mouth. Do you want to continue as suddenly hear in his voice behind the administrator finds you. The girl jumps up and runs away, and you stay on the floor naked, licking her juice remnants from his lips.'
			'"Well, as it is called" administrator asks'
			'"Wish me a law client" you reply'
			'"You do ohrenela, fuck girls straight to work, and went well with me in the back room, so do not understand, understand by a pussy."'

			if DOM >= 10:
				act '"Get out utyrok, with whom they want with that and fuck"':gt 'worksalon', 'start'
				act 'Go with him':salonslut = 1 & gt 'worksalon', '3'
			else
				act 'Go with him':salonslut = 1 & gt 'worksalon', '3'
			end
		end
	end
end

if $ARGS[0] = '3':
	minut += 15
	SUB += 1
	guy += 1
	sex += 1
	cumass += 1
	'<center><img src="images/img/centr/raks.jpg"></center>'
	'Administrator gets you into the back room and puts cancer on the couch. Fucked your vagina he finishes you on your ass and leaves.'

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

--- worksalon ---------------------------------
# bedr
act 'The corridor':
	gt 'korr'
end

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
housrA = 1
housrMir = 1
elektro += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

if magik >= 6 and spellbefshild = 1 and tobiQW = 0:gt 'tobiQW', 'start'

'<center><b><font color="maroon">Bedroom</font></b></center>'

if rembedr = 0:
	'<center><img src="images/etogame/bedr.jpg"></center>'
	'Tight little room with a <a href="exec:gt ''bed'', ''start''">double bed</a> and an <a href="exec:gt ''budilnik'', ''start''">alarm clock</a>. Near the entrance is a small wooden <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">wardrobe</a>. The windows are closed with faded heavy curtains.'
else
	'<center><img src="images/etogame/bedr2.jpg"></center>'
	'Bright and beautiful room, with a nice <a href="exec:gt ''bed'', ''start''">double bed</a>. Near the entrance is a modern <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">wardrobe</a>. Against the wall are a table and a <a href="exec:gt ''mirror'', ''start''">mirror</a>.'
end

if $clothingworntype = 'nude':
	$nude = 'The corridor'
else
	$nude = 'Get dressed'
end

if husbandrinkday = day:
	if husbanstrapon = 1:'Drunken husband sleeps on the bed with butt plug in his ass.'
	if husbanstrapon = 2:'Drunken husband sleeps on the bed after you have put a dildo up his ass.'
	if husbanstrapon = 3:'Drunken husband sleeps on the bed after you fucked him with a strapon.'
end
if husband > 0 and husbandrink ! 10 and husbandrinkday ! day:
	if hour > 22 or hour < 7:'<a href="exec:gt ''husb'', ''start''">Husband is sleeping on the bed.</a>'
end

if husbandrink = 11 and husbanstrapon > 0 and husbandrinkday ! day:
	cla
	'Your husband approached you and said, "Honey my ass hurts do you know if maybe I fell yesterday"'

	act 'Lie':
		cla
		husbanstrapon = 0
		'"No dear, I do not know" you said making an innocent face. Husband shrugged and walked away'

		act 'Finish':gt 'bedr'
	end

	act 'Confess':
		cla

		if husbanstrapon = 1:'"Honey you were so drunk last night that I decided to teach you a lesson and put a anal plug in your ass. I''ll never do it again, forgive me please" you said.'
		if husbanstrapon = 2:'"Dear, I wanted to make you a happy so I started to give you a blowjob, but you did not finish, so I inserted a finger into your ass, but once again you did not finish so I took a dildo and you burst, I even gave you a secong blowjob. Forgive me, but you enjoyed it so much that I could not stop. I just wanted to make you happy dear" you lied to your husband.'
		if husbanstrapon = 3:'"Dear, I wanted to make you a happy so I started to give you a blowjob, but you did not finish, so I inserted a finger into your ass, but once again you did not finish when I put in a second finger you began to move your ass towards my fingers moaning heavily, I thought that you like it so I put on a strapon. You enjoyed it so much that you finished over and over again, and I continued until I was tired then licked all the sperm off your body and went to sleep. I just wanted to make you happy and you were enjoying it although you do not remember it. Forgive me please" you lied to your husband.'

		if harakHusb = 2:
			husbizvradd = 0
			husbharmin = 0
			husbandMark = 0
			husband = 0
			divorced += 1
			fingal += 1
			minut += 120
			'The next thing you feel is a powerful punch in the face. When you came back to your senses you realized that your husband and his things were gone. He filed for divorce.'
		elseif harakHusb = 1:
			if husbanstrapon = 1:
				'"Look, do not do it again!" he said and left.'
			elseif husbanstrapon = 2:
				husbizvradd += 1
				'"Do not do it again, I''m still a man and I''m not supposed to get fucked in my ass!" he said and left.'

			elseif husbanstrapon = 3:
				if intel > 40 or izvratH = 1:
					husbharmin += 1
					'"Are you serious, I''m not a bitch that wanted to be fucked!" he yelled, but then you started to cry and said that you only wanted to please him, he looked at you and said, sighing, "Yes, I believe you wanted to please me, but do not do it again."'
				elseif intel <= 40:
					husbizvradd = 0
					husbharmin = 0
					husbandMark = 0
					husband = 0
					divorced += 1
					fingal += 1
					minut += 120
					'The next thing you feel is a powerful punch in the face. When you came back to your senses you realized that your husband and his things were gone. He filed for divorce.'
				end
			end
		elseif harakHusb = 0:
			if husbanstrapon = 1:
				'"I''m sorry I will not get so drunk again, " he said and left.'
			elseif husbanstrapon = 2:
				husbizvradd += 1
				'"You''re so thoughtful, instead of scolding me, you''re still wanted to make me happy, thank you dear." he said and left.'
			elseif husbanstrapon = 3:
				husbizvradd += 1
				'"Did I really like it?" he asked. You nodded. "Well then, thank you dear, but the next time you should ask me first!" he said, and left.'
			end
		end

		act 'Finish':husbanstrapon = 0 & gt 'bedr'
	end
end

if husbandrink = 10 and hour > 20 and hour < 23 and husbanstrapon = 0:
	'<<$husName>> came home drunk and fell asleep on the bed.'
	'"That pig" you thought and then you came up with an idea "Maybe I should teach him a lesson so he won''t get drunk again"'

	if analplug = 1:
		act 'Insert butt plug in his ass':
			cla
			*clr
			husbandrinkday = day
			husbandrink = 11
			husbanstrapon = 1
			minut += 10
			'<center><img src="images/img/hasb/h0.jpg"></center>'

			if analplugin = 1:'You pull the cork out of his ass.'
			if analplugin = 0:'You go take an anal plug and put it into his ass.'

			'<<$husName>> moved, but did not wake up'

			if dildo > 0:
				act 'Insert Dildo':
					cla
					*clr
					minut += 20
					husbanstrapon = 2
					swallow += 1
					cumlip += 1
					horny += 30
					'<center><img src="images/img/hasb/h1.jpg"></center>'
					'You pull out the plug and started to insert dildo in its place, <<$husName>> did not even budge. You began to slowly move the dildo inside trying not to wake your husband. Then in front of your face his cock started to rise, and <<$husName>> began to moan softly, but never woke up. With dildo in his ass, his dick began to throb ready to finish. You touched his penis with your tongue, you took the penis in your mouth and immediately he started to cum, you swallowed it and cleaning his cock from the remnants of cum, put his pants back on.'

					act 'Finish':gt 'bedr'
				end
			end

			if strapon > 0:
				act 'Strapon':
					cla
					*clr
					minut += 20
					husbanstrapon = 3
					swallow += 1
					cumlip += 1
					horny += 30
					'<center><img src="images/img/hasb/h2.jpg"></center>'
					'You put on the strapon and pulling out the plug slowly start to put it in his ass, <<$husName>> began to move but did not wake up. You began to slowly move your hips trying not to wake him. Then in front of your face his cock started to rise, and <<$husName>> began to moan softly, but never woke up. Realizing that he won''t wake up you start to move faster and not hesitating drove the entire length of the strapon in his ass. His cock stood up and you started to stroke it, feeling that he is about to finish you took the penis in your mouth and immediately he started to cum, you swallowed it and cleaning his cock from the remnants of cum, put his pants back on.'

					act 'Finish':gt 'bedr'
				end
			end

			act 'Finish':gt 'bedr'
		end
	end
end

if tanga = 0 and clrbelo > 0:
	act 'Wear underwear':
		cla
		tanga = 1
		gt 'bedr'
	end
else
	act 'Remove Underwear':
		cla
		tanga = 0
		gt 'bedr'
	end
end
if sick >= 1:
	act 'Go to sleep (Illness)':
		cla
		*clr
		minut += 240
		sick -= 1

		if sick < 0:sick = 0

		gs 'stat'
		picrand = rand(11, 17)
		'<center><img src="images/inBed/sick<<picrand>>.jpg"></center>'
		'You are lying in bed, coughing, sneezing and blowing your nose'

		act 'Measure temperature':gt 'bedr'
	end
end

if dur > 0:'You have hidden <<dur>> doses pale lady'

if dur > 0 and narkday ! day:
	act 'Sniff pale lady (0:05)':
		cla
		*clr
		minut += 5
		narkday = day
		health = vital * 10 + stren * 5
		willpower = intel * 5 + will * 5
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		horny = 100
		nark += 10
		dur -= 1
		'<center><img src="images/etogame/dur.jpg"></center>'
		'You sniff dose of powder, then you start to feel just great.'

		act 'Leave':gt $curloc
	end
end

if horny >= 50:
	act 'Masturbate':gt 'selfplay'
end

if pornMagazine > 0:'Under the mattress you have hidden pornozhurnal.'

dynamic $d_read_porn

--- bedr ---------------------------------
# sitr
act 'Go to the corridor':gt 'korr'

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
housrA = 1
elektro += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Living room</font></b></center>'

if remsitr = 0:
	if TV = 0 or komp = 0:
		'<center><img src="images/etogame/sitr.jpg"></center>'
	else
		'<center><img src="images/etogame/sitr1.jpg"></center>'
	end

	$zal = 'A cramped room'
	$zal2 = 'faded wall'
elseif remsitr = 1:
	'<center><img src="images/etogame/sitr2.jpg"></center>'
	$zal = 'A modern, bright room'
	$zal2 = 'papered walls with light'
end
if TV = 0:$TV = 'a great place for a TV, which you don''t have'
if TV = 1:$TV = 'an ancient <a href="exec:gt ''TV'', ''start''">TV</a>'
if TV = 2:$TV = 'a huge plasma <a href="exec:gt ''TV'', ''start''">TV</a>'
if divan = 0:$divan = '<a href="exec:gt ''divan'', ''start''">an old sofa</a>'
if divan = 1:$divan = 'luxury <a href="exec:gt ''divan'', ''start''">a leather sofa</a>'
if komp = 0:$komp = ''
if komp = 1:$komp = 'with a <a href="exec:gt ''Komp'', ''start''">computer</a> on top of it.'
!!!Probably CV edition
if selfPornvidDVD = 0: $selfPornvidDVD = ''
if selfPornvidDVD > 0: $selfPornvidDVD = 'You have <a href="exec:Dynamic $selfPorno_Take"><<selfPornvidDVD>></a> of your amateur porn videos available.'
!!!
if stol = 0:$stol = 'decrepit <a href="exec:gt ''stol'', ''start''">table</a>'
if stol = 1:$stol = 'new <a href="exec:gt ''stol'', ''start''">table</a>'
if obruch > 0:'<br>A hula hoop stands in corner of the room. '
if skak > 0:'A jump rope is on a shelf. '
if bookYog > 0:'A yoga mat is rolled up in a corner. '
'<<$zal>>, <<$divan>> stands next to the <<$zal2>>. In front of the sofa is <<$TV>>. In front of the window is a <<$stol>> <<$komp>> <<$selfPornvidDVD>>'
if mishka > 0:'On a shelf is <<mishka>> teddy bear'

*nl

sports = 0
$sportStringPrefix = ''

if obruch > 0 and obruchday ! day:
	$sitrobr = $sportStringPrefix + ' <a href="exec:dynamic $sitrobrd">twist hoop</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitrobr = ''
end

if bookYog > 0 and bookYogday ! day:
	$sitryog = $sportStringPrefix + ' <a href="exec:dynamic $sitryogd">meditation</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitryog = ''
end

if skak > 0 and skakday ! day:
	$sitrskak = $sportStringPrefix + ' <a href="exec:dynamic $sitrskakd">jumping rope</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitrskak = ''
end

if pressday ! day:
	$sitrpress = $sportStringPrefix + ' <a href="exec:dynamic $sitrpressd">abdominal exercises</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitrpress = ''
end

if pushday ! day:
	$sitrpush = ' <a href="exec:dynamic $sitrpushd">push-ups</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitrpush = ''
end

!!!kept, but does not exists in 1.0.5 anymore
if treadmill > 0 and treadmillday ! day:
	$sitr_tread = $sportStringPrefix + ' <a href="exec:dynamic $sitr_tread_d">treadmill</a>'
	sports = 1
	$sportStringPrefix = ', '
else
	$sitr_tread = ''
end
!!!

if sports = 1:
	$sportsitr = '<<$sitrpush>><<$sitrpress>><<$sitrskak>><<$sitrobr>><<$sitr_tread>><<$sitryog>>'
	'The room has enough space for a variety of sport activities:<<$sportsitr>>.'
end

if suhbelo2 > 0:'<br>Lying on the table are <<suhbelo2>> pieces of dried laundry that need <a href="exec:dynamic $gladbelo">ironing</a>.'

*nl
!!housegostrand = rand(1, 20)
!!if husband > 0 and husbandrink ! 10 and week = 5 and hour > 17 and hour < 21 and housegostrand > 15:gt 'sitr', 'guest'

if husband > 0 and husbandrink ! 10 and husbandrinkday ! day:
	if week < 6:
		if hour > 17 and hour <= 22:'<a href="exec:gt ''husb'', ''start''">On the couch sits husband and watching TV.</a>'
	else
		if hour > 7 and hour < 17:
			'<a href="exec:gt ''husb'', ''start''">On the couch sits husband and watching TV.</a>'
		elseif hour > 17 and hour <= 22:
			'<a href="exec:gt ''husb'', ''start''">On the couch sits husband and watching TV.</a>'
		end
	end
end

!!!CV edition
!gs 'subkid'
if numkid = 1: '<a href="exec: gt ''kid'',''start''">Your child</a>'
if numkid > 1: '<a href="exec: gt ''kid'',''start''">Your children</a>'
!!!

if student > 0 and kursovik < 100:
	act 'Write kursovik (1:00)':
		cla
		*clr
		minut += 60
		kursovik += rand(intel / 20, intel / 10)

		if kursovik > 100:kursovik = 100

		manna -= 10
		'<center><img src="images/etogame/study.jpg"></center>'
		'You sat on the course work and prepared her <<kursovik>> percent.'

		act 'Exit':gt 'sitr'
	end
end

act 'Go out to the balcony': gt 'balkon','start'
if zoo >= 6:
	if husband > 0 and husbandrink ! 10:
		if week > 5 or week < 6 and hour > 17:
			act 'Call <<$namesob>>':
				cla
				*clr
				minut += 30
				'<center><img src="images/zoo/z1.jpg"></center>'
				'You call the dog and that the move pushes his wet nose between your legs and lick accepted.'

				if harakHusb = 0:
					zoo += 1
					horny = 0
					orgasm += 1
					husband -= 1
					'"What''s he doing dear, stop him, " cries the husband'
					'"I can not, try myself, " you reply.'
					'<<$husName>> trying to shove the dog, but he growls and snarls. "I can not get it to drive away what to do dear?" he asks.'
					'"Think of something." you reply, already slightly moaning with pleasure. <<$husName>> begins to pace the room, periodically coming to the dog, but hearing his growl off. While <<$husName>> pacing the room dog began to jump on you.'
					'"Oh my God, that he was going to do?" shrieked <<$husName>>, see attempts dog jump on you.'
					'"What you do not clear he wants to fuck me" you said.'
					'"Dear try again to free" pleaded husband.'

					act 'Try':
						cla
						*clr
						'<center><img src="images/zoo/z2.jpg"></center>'
						'You reluctantly start trying to push the dog and move away, but it appears to him backwards, and <<$namesob>> leans on you and all your weight is on. You feel his penis rubs against your thighs ischya hole.'

						if izvratH = 0:
							'"Oh my God, I can not look at it, " cried the husband slammed the door and ran. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. My husband came back, and you still were cancer and dog sperm flowed from your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						elseif izvratH = 1:
							'"Well get off of her, " shouts <<$husName>> at the dog, but close to it does not fit. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him and your husband decided that your movement is an attempt to free you cheered "Yes Svetsik so can get more wiggle lose it." Soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. Husband looked at you standing cancer hips peremazanymi canine semen flowing out of your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						end

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Well dear, whatever you say."'

							act 'Finish':gt 'sitr'
						end
					end
				elseif harakHusb = 1:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						'<<$husName>> tries to pull the dog, but he growls and grins, then he goes into the tub and what that brings an old sheet, threw it at the dog picks up the ends and picks up dog is in improvezirovannom bag.'
						'"I''ll take him now on euthanasia, " said <<$husName>>'

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Okay, look itself, your dog."'

							act 'Finish':gt 'sitr'
						end
					elseif izvratH = 1:
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						'"Can not or do not want, " said <<$husName>> smiling and continues to sit and watch as the dog licks you.'
						'"It probably does not want" you reply and deliberately pushes the legs wider. <<$husName>> looks like you moan until the dog licks you, and suddenly gets up and pulls out his dick brings to your mouth.'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z3.jpg"></center>'
							'You grab his cock and takes his mouth to suck, soon begins to cover you and you end sodragayas whole body, a second <<$husName>> ends up in your mouth. You swallow sperm and continue to suck his dick fading. Soused dog began naprygivat you with nedvuhslyslennymi intentions.'
							'"But this is too much" said <<$husName>> and tried ottoschit dog, but he growls and grins, then he goes into the tub and what that brings old sheets, throwing her to the dog picks up the ends and picks up dog is in improvezirovannom bag.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'

							act 'Allow':
								sobaka = 0
								zoo = 0
								gt 'sitr'
							end

							act 'Not authorized':
								cla
								'"No, dear, he is not guilty, he has instincts, besides from trying so hard, " you said.'
								'"Well, if he was trying so hard you can thank him" ironically husband.'

								act 'Jerk dog':
									cla
									*clr
									husband -= 1
									'<center><img src="images/zoo/z6.jpg"></center>'
									'You take the dog dick in hand and begin to masturbate after a few minutes you dog cums in her palm.'

									act 'Finish':gt 'sitr'
								end

								act 'Suck dog':
									cla
									*clr
									swallow += 1
									husband -= 40
									'<center><img src="images/zoo/z7.jpg"></center>'
									'You loshite dog on the floor and take his cock in my mouth, my husband looks at you with disgust as you sucking dog in a couple of minutes dog diluted into your mouth and you swallow sperm.'
									'"Well, you''re a pervert, " the husband says with obvious distaste.'

									act 'Finish':gt 'sitr'
								end

								act 'Finish':gt 'sitr'
							end
						end
					end
				elseif harakHusb = 2:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						manna -= 15
						willpower -= 15
						'<<$husName>> trying ottoschit dog, but he growls and grins, then he smashes the dog leg in the ribs and he screeched flies into a corner, did not have time to climb dog as man begins to kick harder, seeing his condition, you scored in angle and covering his head with hands close your eyes. A few minutes later the dog stops.'
						'"What are you hiding there shalt here, and then krovischi from your skunk" said <<$husName>>. Opening her eyes you see a dead dog in a pool of blood.'
						'"Well, what froze shalt say to you, I do this on the trash Dogmeat''ll take." he takes the dog, wrap in sheets and make it in the trash. And you have some time to scour the blood from the floor.'

						act 'Finish':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end
					elseif izvratH = 1:
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						SUB += 1
						'"What do you mean I can not, that you like the way he licks you, " shouts <<$husName>>.'
						'"No, of course you do not, " you begin to make excuses.'
						'"And I see you taschishsya whore, you all are flowing, or think I do not see, and if you like it so thank him, " he says, and seeing your not knowing look continues, "Well, what are hatched suck him alive."'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z4.jpg"></center>'
							'<<$husName>> grabs a dog by the collar iderzhit until you slide on the floor under the dog. Nedozhidayas oplivuhi you hiding his lust take by mouth and takes dick dog suck, husband watching you and cheers saying that the dog loved your mouth. Soon he was bored just watch and he dropped his pants says "Well Spreads legs."'

							act 'Allow':
								cla
								*clr
								suprdolg += 1
								sex += 1
								anal += 1
								'<center><img src="images/zoo/z5.jpg"></center>'
								'You obediently spreads her legs and her husband comes to you in the pussy, he hews suck you until you have a dog, but you do not dostovlyaet pleasure. Soon her husband cums and gets "A dog that is not yet finished, something you''re not trying, as well, cup your point."'

								act 'Substitute ass':
									cla
									*clr
									analorgasm += 1
									orgasm += 1
									horny = 0
									'<center><img src="images/zoo/z8.jpg"></center>'
									'You go up to her knees and dog immediately jumps on you. prevent kneel. With one hand you Spreading buttocks, and a second guide member currently in his ass, fingering hole dog quickly enters and taken to peck your anus. Husband looked at it a little and throwing "Go otmoyus from whores" out. Left with a dog for a single you start podmahivat him and soon oschuzaete tide excitation seems sex dog surpasses her husband, his cock in your ass moves so deftly that comes after the excitement orgasm, and you fall on korachki no longer able to stand, dog makes several movements and spewing his seed you in the ass. After graduating he leaves satisfied.'

									act 'Finish':gt 'sitr'
								end
							end
						end
					end
				end
			end
		else
			act 'Call <<$namesob>>':gt 'soba', 'zoof30'
		end
	elseif husband = 0 or husbandrink = 10:
		act 'Call <<$namesob>>':gt 'soba', 'zoof30'
	end
end

if dildo > 0 and horny >= 50:
	act 'Masturbate':
		cla
		*clr
		minut += 30
		mastr += 1
		manna += 15
		willpower += 15
		vagina += 1

		if husband > 0 and husbandrink ! 10:
			if week > 5 or week < 6 and hour > 16:
				cla
				*clr
				'<center><img src="images/img/hasb/m11.jpg"></center>'
				'You sit on the couch and type dildo their pussy'

				if hour > 17 and hour <= 22:'<<$husName>> looks at you, obviously a little dumbfounded.'
				if hour = 16 or hour > 22:'Once you get a taste of how enters the room <<$husName>>'

				if harakHusb = 0:
					'"What are you doing dear?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
					'"And often you do that, " he asks.'
					'"Owned so often, less often in the ass, if you want to see?" you asked'

					if izvratH = 0:
						husband -= 1
						'"I''ll wait outside the door until you''re done, " he said and left. You continued to satisfy themselves rapidly and soon finished.'
						horny = 0
						orgasm += 1

						act 'Finish':gt 'sitr'
					elseif izvratH = 1:
						'"Well, I do not know, " he stammered.'
						'"So you want" you said'

						act 'Show':
							cla
							*clr
							'<center><img src="images/img/hasb/m12.jpg"></center>'
							'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus. <<$husName>> closely watched as a dildo in your ass disappears and then reappears. Do you see how his pants swell.'
							'"Dear anything else you want?" smiling you ask.'
							'"Can I join?" a little embarrassed he asks.'

							act 'Solve':
								cla
								*clr
								analorgasm += 1
								orgasm += 1
								horny = 0
								'<center><img src="images/img/hasb/m13.jpg"></center>'
								'<<$husName>> gets dick and starts masturbating, it is not what you expected, and at first you even felt a little sad that he did not enter into you, and began to masturbate, but then you start it even start. Have you looked at her husband who masturbate looking at the way you drive the dildo his popkui be covered and you pleasure, you screamed and fell to the table, having experienced an orgasm, dildo still sticking out of your ass. <<$husName>> yarosno masturbate looking at you stretched out on the table, you took the dildo from ass and began to lick it, looking into the eyes of her husband, from such a spectacle he immediately discharged onto the floor. You are drawn to him sticking out his lips, in a second he had passionately kissed you.'

								act 'Finish':gt 'sitr'
							end
						end
					end
				elseif harakHusb = 1:
					'"That''s a number I mean you is not enough?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
					'"Well then, show me everything that you know how I''ll look, " he says.'
					'"And how do I do it in the ass, too, to show?" you asked'

					if izvratH = 0:
						husband += 1
						husbizvradd += 1
						'"No, do not, and yet that''s enough, " he said, and sat down on a chair began to watch. You continued to satisfy themselves rapidly and soon finished in front of her husband. <<$husName>> stood up and began to applaud "Bravo and encore again?" he said laughing.'
						'"For such a lovely audience anything, but only after the intermission, " you laughed. <<$husName>> helped you get down from the table.'
						horny = 0
						orgasm += 1

						act 'Finish':gt 'sitr'
					elseif izvratH = 1:
						husband += 1
						'"And how is it necessarily demonstrate" he said.'
						'"Anything you want, " you said'

						act 'Show':
							cla
							*clr
							'<center><img src="images/img/hasb/m12.jpg"></center>'
							'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus. <<$husName>> closely watched as a dildo in your ass disappears and then reappears. Do you see how his pants swell.'
							'"Dear anything else you want?" smiling you ask.'
							'"I do not just want to but I''ll do, " he said, unbuttoning his pants and substitute member of your face.'

							act 'Take by mouth':
								cla
								*clr
								'<center><img src="images/img/hasb/m14.jpg"></center>'
								'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> to stop you, "Well, now I''ll take this hole."'

								act 'Substitute ass':
									picrand = 88
									gt 'sex', 'anal'
								end
							end
						end
					end
				elseif harakHusb = 2:
					'"What hole itching?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'

					if izvratH = 0:
						husband += 1
						husbizvradd += 1
						'"Well then, open your mouth, " he said pulling member and rudely pushing it in your mouth, he held you by the hair and fucked in the mouth, saying something you did not stop masturbating. Soon he was tired of your mouth, "Now take out of this hole rubber stuff, now I''m going to fuck you"'

						act 'Spread her legs ':
							picrand = 88
							gt 'sex', 'vag'
						end
					elseif izvratH = 1:
						husband += 1
						SUB += 1
						'"Insert this crap myself in the ass and mash, I''ll popolzuyut it, as long as pine Quick" he said, pulling member. You quickly rearrange the dildo from pussy anus and mouth open submissively.'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/img/hasb/m14.jpg"></center>'
							'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> stopped you "All cup your point now I''m ass Flare."'

							act 'Substitute ass':
								picrand = 88
								gt 'sex', 'anal'
							end
						end
					end
				end
			else
				horny = 0
				orgasm += 1
				'<center><img src="images/pics/mastr.gif"></center>'
				'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

				act 'Breath.':gt 'sitr'
			end
		else
			horny = 0
			orgasm += 1
			'<center><img src="images/pics/mastr.gif"></center>'
			'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

			act 'Breath.':gt 'sitr'
		end
	end
end

!!!Probably CV edition
$selfPorno_Take = {
	'You have <<selfPornvidDVD>> of your amateur porn videos available'
	if selfPornvidDVD > 0 and bag > 0:
		act 'Take one':
			selfPornvidDVD -= 1
			selfPornvidDVDCarry +=1
		end
	end
	if selfPornvidDVDCarry > 0:
		act 'Put one back':
			selfPornvidDVD +=1
			selfPornvidDVDCarry -=1
		end
	end
	act 'Back': gt 'sitr'
}
!!!

!'
if $ARGS [0] ='guest':
	gs 'stat'
	cla
	*clr
	minut += 30
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g0.jpg"></center>'

	'My husband came home and covenant you, you go out to him and see him with another man, he presents it as its Colleges. You pass in the hall and sit down on the couch, they both have fun on the husband went to the store to buy something to drink and leave you alone. You are chatting for a while, but quickly running threads, then the man says he tried to persuade your husband to go to the club, but he agreed, and then I want to dance. You do not think of anything better, it offers dance here and he readily agrees.'

	act 'Play music':
		cla
		*clr
		if vnesh < 15:
			husbandrink = 10
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g1.jpg"></center>'
			'You turn on the music and start dancing, man gets up and joins you. You dance until the neighbors start banging on the wall, you turn off the music, laughing and sit on the couch, it takes about an hour and still no husband, then the guest will say that it will look at the leaves'
			act 'Up':gt 'sitr'
		else
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g2.jpg"></center>'
			'You turn on the music and start dancing, man gets up and joins you. You dance with him and with each movement he becomes closer to you, in the end it starts to hurt you at first as if by accident, and then more openly, in the end, he pushes you to himself and his hands begin to wander through your body, you frankly lapaya .'
			if horny < 80:
				act 'Step back':
					cla
					husbandrink = 10
					'You step back from it and turn off the music sit on the sofa, it takes about an hour and still no husband, then the guest will say that it will look at the leaves'
					act 'Up':gt 'sitr'
				end
			end
			act 'Allow':
				cla
				*clr
				horny += 20
				$ImageNeededPlacholder
				! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g3.jpg"></center>'
				'You do not resist, and he continues to grope you, you will soon have a third on while he caresses your bare breasts, you will no longer restrain himself vsilu and turned to him, running his hand into his pants and pulled out a member. He sticks out his tongue and lips around his you start to suck at the same time masturbate him.'
				act 'Take by mouth':
					cla
					*clr
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g4.jpg"></center>'
'!

--- sitr ---------------------------------
# vanr
act 'Go to the corridor':gt 'korr'

$stirkad = {
	cla
	*clr
	minut += dirtbelo * 5
	suhbelo += dirtbelo
	poroshok -= 1
	dirtbelo = 0
	manna -= 10
	'<center><img src="images/etogame/stir.jpg"></center>'
	'You soak the dirty linen in a basin and pour the powder on them. You wash the clothes until they are finally clean.'

	act 'Hang the laundry out to dry':gt 'korr'
}

$metka = $ARGS[0]
$loc = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
clr
minut += 1
housrA = 1
elektro += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Bathroom</font></b></center>'

if remvanr = 0:'<center><img src="images/etogame/vanr.jpg"></center>'
if remvanr = 1:'<center><img src="images/etogame/vanr2.jpg"></center>'

if stiralka > 0:
	if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2:
		husband += 5
		poroshok -= 2
		husporday = day
		'Washing machine washed smelly socks husband and his prossannye and properdannye truselya.'
	end

	if dirtbelo > 0 and poroshok >= dirtbelo:
		clrbelo += dirtbelo
		poroshok -= dirtbelo
		dirtbelo = 0
		'The washing machine washed your laundry'
	elseif poroshok < dirtbelo:
		'You ran out of powder for washing machine.'
	end
end


if tampon > 0:
	'A box of tampons is on a shelf. There is enough for <b><<tampon>></b> uses'
else
	'<b><font color="red">You have no tampons.</font></b>'
end

if stanok > 0:'A package of razors is on a shelf above the sink. You have enough blades for <b><<stanok>></b> shaves.'
if dirtbelo>0:'The laundry basket currently has <font color="red"><b><<dirtbelo>></b></font> pieces of dirty laundry.'
if poroshok > 0:
	if dirtbelo = 0:$stirka = ''
	if dirtbelo > 0:$stirka = '<a href="exec:dynamic $stirkad">You can wash clothes</a>'
	'Under the sink there''s detergent powder, which is enough for <b><<poroshok>></b> washes. <<$stirka>>'
else
	'<b><font color="red">You have no detergent powder and nothing to wash clothes with.</font></b>'
end

if clrbelo > 0:
	'A cupboard contains <font color="blue"><b><<clrbelo>></b></font> pairs of clean underwear. '
else
	'<b><font color="red">You do not have any clean underwear.</font></b> '
end

if shampoo > 0:
	'You have enough shampoo for <b><<shampoo>></b> washes. You can <a href="exec:gt ''vann'', ''start''">wash yourself</a>.'
else
	'You''ve ran out of shampoo.'
end

if mosolmaz>0:'On a shelf is a tube of ointment protivomozolnoy, which will be enough for <b><<mosolmaz>><b> applications.'
if stiralka > 0:'In the bathroom is a washing machine.'

if tanga = 0 and clrbelo > 0:
	act 'Wear underwear':
		cla
		tanga = 1
		gt 'vanr'
	end
else
	act 'Do not wear underwear':
		cla
		tanga = 0
		gt 'vanr'
		end
end

if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Use a tampon (0:05)':
		cla
		*clr
		tampon -= 1
		isprok = 1
		minut += 5
		manna -= 5
		'<center><img src="images/pics/wash3.jpg"></center>'
		'You use a tampon.'

		act 'Finish':gt 'vanr'
	end
end

!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
!!Washing off cosmetics also removes cum from face
!!clrbelo: Amount of clean panties available
if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
	act 'Quick wash (0:15)':
		cla
		*clr

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

		dynamic $showerdin
		sweat -= 1
		minut += 15
		'<center><img src="images/pics/wash5.jpg"></center>'
		'You gave yourself a catlick, thus removing any traces of cum.'

		act 'Finish':gt 'vanr'
	end
end

if cumlip > 0 or cumface > 0:
	act 'Clean your face from sperm (0:05)':
		cla
		*clr
		mop = 1
		cumlip = 0
		cumface = 0
		sweat -= 1
		minut += 5
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You clean your face and got rid of any trace of cum.'

		act 'Finish':gt 'vanr'
	end
end


if mop ! 1:
	act 'Wash off cosmetics (0:15)':
		cla
		mop = 1
		cumface = 0
		minut += 15
		'You washed off your makeup.'

		act 'Finish':gt 'vanr'
	end
end
!!

if klisma = 1 and klismaday ! day:
	act 'Give yourself an enema (0:05)':
		cla
		*clr
		minut += 5
		klismaday = day
		klismaday1= 1
		'<center><img src="images/picV/klisma.jpg"></center>'
		'You give yourself an enema and clean your intestines. Your ass is now ready for anal sex.'

		act 'Finish':gt $curloc
	end
end

if vibrator = 1 and vibratorIN = 1:
	act 'Remove the vibrator (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 0

		if vagina < 30:vagina += 1

		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and take the vibrator out of your pussy.'

		act 'Finish':gt 'vanr'
	end
elseif vibrator = 1 and vibratorIN = 0:
	act 'Insert the vibrator in your vagina (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 1

		if vagina < 30:vagina += 2

		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and inserted the vibrator in your pussy.'

		act 'Finish':gt 'vanr'
	end
end
if analplug = 1 and analplugin = 1:
	act 'Remove the butt plug (0:05)':
		cla
		*clr
		minut += 5
		analplugIN = 0

		if anus < 30:anus += 1

		'<center><img src="images/etogame/analplug.jpg"></center>'
		'You bent over and took out the butt plug.' & !!0.2.6: Removed unneccessary var check

		act 'Finish':gt $curloc
	end
elseif analplug = 1 and analplugin = 0 and klismaday1= 1 and plugday ! daystart:
	act 'Insert a butt plug (0:05)':
		cla
		*clr
		plugday = daystart
		minut += 5
		analplugIN = 1

		if anus < 10:anus = anus + 5
		if anus >= 10 and anus < 20:anus += rand(1, 2)
		if anus >= 20 and anus < 30:anus += rand(0, 1)
		'<center><img src="images/etogame/analplug.jpg"></center>'

		if butpluguse > 0:'You bent over and inserted the butt plug.'
		if butpluguse = 0:butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'

		act 'Leave':gt $curloc
	end
end


if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2:
	act 'Wash your husbands clothes (2 units of washing powder) (1:00)':
		cla
		*clr
		husband += 5
		poroshok -= 2
		minut += 60
		husporday = day
		manna -= 25
		'<center><img src="images/etogame/stir.jpg"></center>'
		'You spend an hour washing your husbands smelly socks and his prossannye and properdannye truselya.'

		act 'Move away from the bathroom':gt 'vanr'
	end
end

if husband > 0 and husbanday > 0 and huspolday ! day:
	act 'Clean the apartment (1:00)':
		cla
		*clr
		husband += 5
		minut += 60
		huspolday = day
		manna -= 25
		!!'<center><img src="images/pics/cook.jpg"></center>'
		'You take a rag and start cleaning the apartment.'

		act 'Leave':gt 'vanr'
	end
end

if pregtest > 0:
	act 'Do a pregnancy test':
		cla
		pregtest -= 1

		gs 'stat'

		if preg = 1:
			'The test showed the two strips. you are pregnant.'
			!!'father - <<$father>>.'
		else
			'The test showed one band.'
		end

		act 'Further':gt $curloc
	end
end

--- vanr ---------------------------------
# kuhr
act 'Go to the corridor':gt 'korr'

$dirtarm = {
	if fairy > 0:
		cla
		*clr
		waterhouse -= dirttarelka
		fairy -= 1
		minut += dirttarelka * 3
		cltarelka += dirttarelka
		dirttarelka = 0
		manna -= 5
		gs 'stat'
		'<center><img src="images/pics/dirt.jpg"></center>'
		'Using the dishwashing liquid you washed the dishes.'

		act 'Wipe your hands':gt $locM, $metkaM
	else
		'<b><font color="red">You have no dishwashing liquid.</font></b>'
	end
}

$edagotd = {
	cla
	*clr
	minut += 60
	edahot += 1
	eda -= 1
	waterhouse -= 1
	kuhdrova = 0
	musor += 1
	cltarelka -= 1
	manna -= 5
	gs 'stat'
	'<center><img src="images/pics/cook.jpg"></center>'
	'You prepare the meal.'

	act 'Eat cooked food (0:30)':dynamic $edahotd
	act 'Leave the meal':gt $locM, $metkaM
}

$edahotd = {
	cla
	*clr
	frost = 0
	minut += 30
	edahot = 0
	dirttarelka += 1
	health += 10
	manna += 20
	gs 'stat'
	'<center><img src="images/pics/food.jpg"></center>'
	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		!!fat += 1
		'You gladly ate cooked food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	else
		water += 20
		'You gladly drank a mug of tea.'
	end

	act 'Get up from the table':gt $locM, $metkaM
}

$santehnikgr = {
	cls
	ransloman = 0
	minut += 25
	gs 'stat'
	'<center><img src="images/img/house/s3.jpg"></center>'
	'You called the plumber and he came Grisha you literally 15 minutes. Quickly found the cause and correct the problem, repair your faucet.'
	act 'Next.':dynamic $santehnikend
}

$santehnikend3 = {
	cls
	ransloman = 0
	bj += 1
	SUB += 1
	facial += 1
	cumface += 1
	if GrishaSex = 0:GrishaSex = 1 & guy += 1
	if mop > 1:mop = 0
	gs 'stat'
	'<center><img src="images/qwest/grisha/bj2.jpg"></center>'
	'You felt like you slapped in the face warm and viscous. Then another and another, covering your face with white seed. Cum began to drain from his face on the lips, chin and cheeks. Plumber finally dried out and stopped the flow of sperm. You could not open his eyes because they felt that they sperm from which matted eyelashes. Plumber chuckled and said. "Classy Vidocq. This slut." His words touched you and you feel like your cheeks flushed with shame. You have become washed sperm from the face, trying to unstick my eyes, but you turned only to smear her face. Finally you are able to open one eye and saw you standing over plumbing, he smirked buttoning his pants. Thereafter, a plumber turned and went to the exit from your apartment.'

	act 'Carry out plumbing.':gt $curloc
}

$santehnikend1 = {
	cls
	kransloman = 0
	minut += 1
	gs 'stat'
	'<center><img src="images/img/house/s3.jpg"></center>'
	'You helplessly shrugged and mumbled that have no idea what to do now. Plumber examined you with oily eyes and told you with the infamous smirk, "Maybe on another thank you? I can take to work not only with money."'

	act 'Let''s debt.':dynamic $santehnikend2

	act 'It''s like, on another?':
		cls
		minut += 1
		gs 'stat'
		'<center><img src="images/img/house/s3.jpg"></center>'
		'You asked the plumbing that he has in mind. And he, instead of answering, took you by the shoulders and drew to itself. You rested his soft breasts against his chest and felt like your stomach rests, something solid. He easily pushed your shoulders and whispered, "Come on baby do not be shy."'

		act 'Kneel':
			cls
			minut += 1
			gs 'stat'
			'<center><img src="images/qwest/grisha/bj.jpg"></center>'
			'You slowly knelt before then smelling plumber. He unbuttoned his pants and in your face was his dick.'

			if bj = 0:
				'You have not had to take by mouth and you looked with horror on the device which you had to suck. Plumber seeing your confusion took you by the head and pulled up to the member. Unwittingly touched your lips crimson head.'
			else
				'You tilt your head slightly forward and kissed the purple penis.'
			end

			act 'Suck':
				cls
				minut += 3
				gs 'stat'
				'<center><img src="images/qwest/grisha/bj1.jpg"></center>'
				'You cupped warm and hard cock his lips and began to absorb the mouth uttering sucking sounds. Plumber began to move her hips trying to drive his cock deeper into your mouth. His solid organ fills almost the entire space of your mouth stuck in your throat and choke you unwittingly. From your eyes tears flowed, but the plumber has already fallen into a rage, and not paying attention to you, fuck your mouth keeping you in the head. Finally he quickly pulled his cock out of your wet mouth and began to masturbate in front of your face.'

				act 'Close your eyes.':dynamic $santehnikend3
			end
		end
	end
}

$santehnikend2 = {
	cls
	kransloman = 0
	minut += 15
	santehnikDolg = 1500

	if Grisha >= 1:$textsan = 'Grisha you smiled. "We are not in whose first and last time working with you. Mail receipt, I like something you''ll come to the money."'
	if Grisha = 0:Grisha = 1 & $textsan = 'I''m way Grisha, and yours? "You smiled feeling that the storm has passed and the plumber said that your name is <<$name>>.'

	gs 'stat'
	'<center><img src="images/img/house/s3.jpg"></center>'
	'You offered a job in the plumbing issue debt. He thought for a moment and said, "Okay. Just write a receipt. Like something I look in and you give me the money. <<$textsan>> Then took a pen and paper and began to write plumbing receipt that you owe him 1, 500 rubles. Grisha took the paper and put it in his pocket. "If that slomaetsya again, call, here''s my card."'

	act 'Carry out plumbing.':gt $curloc
}

$santehnikend = {
	cla
	*clr
	kransloman = 0
	minut += 30
	gs 'stat'
	'<center><img src="images/img/house/s3.jpg"></center>'
	'Half an hour later he said he was finished, and you have 1,500 rubles'

	if money < 1500:
		'Do you lack the money'

		if money + stolmoney >= 1500:'But in the table have a stash and you have enough.'
	elseif money + stolmoney >= 1500:
		act 'Pay':
			if money < 1500:money += stolmoney & stolmoney = 0

			money -= 1500
			gt 'kuhr'
		end
	elseif money + stolmoney < 1500:
		act 'I did not have enough money':
			cls
			gs 'stat'
			'<center><img src="images/img/house/s3.jpg"></center>'
			'You were embarrassed and told the plumber that you do not have enough money. He was visibly angry. "What do you call a girl with no plumbing even money, and what am I supposed to do now?"'

			act 'I do not know.':dynamic $santehnikend1
			act 'Can borrow? I then give it up.':dynamic $santehnikend2
		end
	end

		!'
		if shameless > 15:
			act 'Offer other options (to make a blow)':
				cla
				*clr
				horny += 40
				gs 'stat'
				'<center><img src="images/img/house/s4.jpg"></center>'
				'I do not have money, but you can take another form of payment? you say, dropping to her knees and starting to unbutton his pants. The guy obviously does not mind and watching your actions. You remove it even flaccid penis and tightly gripping his hand, start to kiss the head, gradually sucking it into his mouth.'

				act 'Continue':
					if vnesh < 15:
						cla
						*clr
						guy += 1
						bj += 1
						'<center><img src="images/img/house/s5.jpg"></center>'
						'You diligently sucking his dick between his legs itched from all desires, you break off a couple of times to stop and go to the sex, but he took you by the head and continued to fuck your mouth, soon he came into your mouth and swallow once you come and pick it up again member, as he put his pants and silently walked to the door, to sleep with you, he was not even going. From rastrojstva you spat out semen on the floor, looks like you do not attract even plumbing.'

						act 'Leave':gt 'korr'
					elseif vnesh >= 15:
						picrand = 90
						gt 'sex', 'minet'
					end
				end
			end
		end
		'!
}

$santehnik1 = {
	kransloman = 0
	minut += 20
	gs 'stat'
	'<center><img src="images/img/house/s0.jpg"></center>'
	'You''ve reached the clock service repair. After 20 minutes, a plumber arrived.'
	'You carried him into the kitchen and started to involve themselves in the affairs. When you reached out to one of the shelves, it was noticed that he was staring at your ass.'

	act 'Become confused':dynamic $santehnikend

	if shameless > 5:act 'Disregard':dynamic $santehnikend
}

$santehnik = {
	cla
	*clr
	kransloman = 0

	if husband = 0 or husbandrink = 10:dynamic $santehnik1 & exit
	if husband > 0 and week < 6 and hour < 17 and hour > 7:dynamic $santehnik1 & exit

	if husband > 0 and husbandrink ! 10:
		cla
		*clr
		minut += 20
		'<center><img src="images/img/house/s7.jpg"></center>'
		'You told her husband about the crane and he called the clock service repair. After 20 minutes, a plumber arrived.'
		'Husband walked him to the kitchen and the two of you began to observe his actions, you are sick of hearing about how the plumber raskazyvaet pads Chinese cranes and that people pushed into the sink, and you decided to leave the hall.'

		act 'Leave':
			cla
			*clr
			minut += 20
			horny += 50
			gs 'stat'
			'<center><img src="images/img/house/s8.jpg"></center>'
			'You went into the room and sat on the couch, soon came and sat down beside her husband. With one hand he odnyal you, and you ran second in her panties and began to massage your clitoris.'
			'"What are you, and if the plumber will" you said.'
			'"Yes it there for another hour poking around, " he said, "Come quick mouth job."'
			'"Well, let" you said, the more you have, and most really like his hand has done its job.'

			act 'Start':
				cla
				*clr
				'<center><img src="images/img/house/s9.jpg"></center>'
				'The husband stood up and pulled his pants unbuttoned member you dropped to her knees and only his cock was in your mouth, entered the room plumber "I finished, " he said and paused, seeing this picture.'

				if izvratH = 0:
					'Husband tried to remove a member from your mouth'

					if horny < 80:
						act 'Stop':
							cla
							'Husband quickly hid dick in his pants and with a plumber out into the corridor'
							act 'Leave':gt 'sitr'
						end
					end

					act 'Do not stop':
						cla
						orgasm += 1
						bj += 1
						'You grabbed your husbands hips and continued to work his mouth, he jerked a couple of times trying to free himself, but you could not stop and just absorbed the deeper his cock. When he stopped twitching you omitted one hand to his crotch and just a couple of motions brought herself to orgasm. But the excitement did not sleep, you want even more, and his eyes watching plumbing more aroused you. You could not control myself.'

						act 'Ride the husband':
							cla
							*clr
							orgasm += 1
							cumpussy += 1
							sex += 1
							suprdolg += 1
							husband += 1
							husbizvradd += 1
							horny = 0
							'<center><img src="images/img/house/s12.jpg"></center>'
							'You released a member of her husband''s mouth and quickly pushed him standing on the couch, and jumped on top of themselves, quickly planted a pussy on his dick. You jumped on it like crazy, ignoring the plumbing that all this time and stood in the doorway, watching you. When you were again close to orgasm you feel as sperm gushed into you, and making a few movements uvedayuschem already a member, you have reached orgasm, uttering a cry you limp and fell to the husband. He took you still quaking with myself wearing pants and walked out with a plumber in the hallway.'

							act 'Leave':gt 'sitr'
						end
					end
				else
					'Husband did not even try to stop you'

					if horny < 80:
						act 'Stop':
							if harakHusb ! 2:
								cla
								'You released a member of her husband, and he quickly put it in his pants and with a plumber out into the corridor'
								act 'Leave':gt 'sitr'
							elseif harakHusb = 2:
								cla
								guy += 1
								'You tried to spit from the mouth of a member, but you vskhvatil husband''s head and he started to fuck you in the mouth, talking with obnovremenno plumber "We''re a little busy, wait a minute, now zhenushku feed" he laughed, "How much do I owe you, " he continued.'
								'"Fifteen hundred, " said the plumber.'
								'"Well, you and the prices can agree that if you feed it too and disperse?" he asked.'
								'"I do not know, blow it unless discount pull, but if it all to try, then yes, " replied the plumber.'
								'"Do you know how to bargain, " said the husband, "Okay agreed, " he added, almost without thinking. Knowing the character of her husband decided that you would mind our own peril.'

								act 'Serve both':picrand = 43 & gt 'sexdvoe', 'var'
							end
						end
					end

					act 'Do not stop':
						cla
						bj += 1
						'You continued to suck ignoring watching you plumbing.'

						if harakHusb = 0:'Husband tried not to look in the direction of plumbing, obviously embarrassed, but he did not hesitate to follow your every move.'
						if harakHusb = 1:'Husband stood naslozhdatsya process without paying attention to the plumbing.'
						if harakHusb = 2:'Husband chatted with the plumber did not hesitate and even turned slightly so that it was easier to see.'

						act 'Continue':
							cla
							swallow += 1
							suprdolg += 1
							husband += 1
							horny += 20
							'You continued to make her husband a blowjob, and soon a stream of hot liquid squirted into your mouth, swallowing sperm you licked the remnants of his semen from the penis. Husband cleaned dick in his pants and walked out into the hallway with a plumber. And you are left to sit on the floor exhausted from desire.'

							act 'Leave':gt 'sitr'
						end

						if horny > 70:
							act 'Suggest a threesome':
								cla
								'You broke away from the penis, and a whisper asked her husband if he wanted to try a threesome.'

								if harakHusb = 0:
									*clr
									houseslut += 1
									husband += 2
									'<center><img src="images/img/house/s11.jpg"></center>'
									'Husband a little swept the answer, then what would convince him, you have a loud voice continued, "Let him polizhet me while I caress you."'
									'Plumber readily tensed, waiting for the reaction of her husband, "Well, if only polizhet then let them." said the husband. Plumbing had not persuade her husband was worth sit on the sofa, and you get on your knees and stuck out his ass as his tongue penetrated into your pussy. First husband glanced in his direction, but soon relaxed and finally when the guy started to wield a vengeance fingers in your hole, no sound, you have decided that he was not against you share with others.'

									act 'Serve both':picrand = 43 & gt 'sexdvoe', 'var'
								elseif harakHusb = 1:
									husband -= 5
									'"You do sbrendil that-be wife and I somehow shared plumber, cool pussy fool must think his head." shouted husband and removing member in his pants out of the room with the plumber.'

									act 'Leave':gt 'sitr'
								elseif harakHusb = 2:
									*clr
									houseslut += 1
									husband += 2
									'<center><img src="images/img/house/s10.jpg"></center>'
									'"That''s not for nothing that they say all women are whores, hey man this whore want to write out two, but then the repair free of charge, " said the husband. Plumber twice predlogat had not, he quickly approached and pulled out his dick Framed to your face, you clung to him and started to suck both alternately, and her husband stood komentirovat your actions "That sucked, fresh meat, do not forget about me, like this boy, swallowing deeper and deeper. "'

									act 'Serve both':picrand = 43 & gt 'sexdvoe', 'var'
								end
							end
						end
					end
				end
			end
		end
	end
}

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
housrA = 1
elektro += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Kitchen</font></b></center>'

if remkuhr = 0:'<center><img src="images/etogame/kuhr.jpg"></center>'
if remkuhr = 1:'<center><img src="images/etogame/kuhr2.jpg"></center>'


if kransloman = 1:
	cla
	'You broke the crane, it is necessary to call a plumber'
	if Grisha = 0:act 'Call':dynamic $santehnik
	if Grisha > 0:act 'Call a plumber Grisha':dynamic $santehnikgr

	act 'Leave':gt 'korr'

	exit
end

polomka = rand(1, 100)

if polomka = 100 and santehnikDolg = 0:
	kransloman = 1
	gt 'kuhr'
end

if posudomashina > 0:
	if dirttarelka > 0 and fairy >= dirttarelka:
		cltarelka += dirttarelka
		fairy -= dirttarelka
		dirttarelka = 0
		'Dishwasher washed the dirty dishes.'
	elseif fairy < dirttarelka:
		'ended dishwashing liquid.'
	end
end

if cltarelka > 0:
	'<b><<cltarelka>></b> pieces of clean plates are stored in the cupboard.'
else
	'<b><font color="red">You have no clean dishes left.</font></b>'
end

if dirttarelka > 0:'<b><<dirttarelka>></b> pieces of dirty dishes are lying in the sink. <a href="exec:dynamic $dirtarm">Wash the dishes</a>.'

if fairy > 0:
	'Next to the sink is dishwashing liquid, enough for <b><<fairy>></b> uses.'
else
	'<b><font color="red">You have nothing to wash dishes with, you need to buy dishwashing liquid.</font></b>'
end

if eda > 0:
	if cltarelka = 0 or edahot > 0:$edagot = ''
	if cltarelka > 0 and edahot = 0:$edagot = '<a href="exec:dynamic $edagotd">Cook meal (0:30)</a>'

	'In the refrigerator there''s food, good for <b><<eda>></b> servings. <<$edagot>>'
end

if edaD = 0 and eda = 0:'<b><font color="red">The refrigerator is empty, nothing to eat at all.</font></b>'
if edaD > 0:'The refrigerator contains healthy meals, good for <b><<edaD>></b> servings.'
if posudomashina > 0:'The kitchen has a dishwasher.'
if edahot > 0:'<a href="exec:dynamic $edahotd">A cooked meal is on the table (0:30).</a>'

if husband > 0 and husbandrink ! 10:
	if hour = 7 or hour = 17:'<a href="exec:gt ''husb'', ''start''">Your husband is eating at the table.</a>'
end

if pranik > 0:
	'Cookies will be enough for <b><<pranik>></b> time.'

	act 'Have tea with cookies (0:05)':
		cla
		*clr
		minut += 5
		pranik -= 1
		health += 30
		manna += 100
		energy += 20
		water += 20
		fat += 50
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You had tea with cookies. Sweet and very bad for your figure, but so good.'

		act 'Get up from the table':gt 'kuhr'
	end
end

if edaD > 0:
	'The refrigerator is kept healthy meal that will last for <b><<edaD>></b> servings.'
	act 'Eat diet food (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'

		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'

		else
			water += 20
			'You gladly drank a mug of tea.'

		end

		act 'Get up from the table':gt 'kuhr'
	end
end

if fatdel > 0:
	act 'Take fat burners':
		cla
		*clr

		if fat > salo:fat = salo

		fatdel -= 1
		fat -= 25

		if fat < 0:fat = 0

		'You drank the fat burning capsule. These capsules are gradually and results will be seen immediately.'

		act 'Get up from the table':gt 'kuhr'
	end
end

act 'Drink water (0:05)':
	cla
	minut += 5

	if water >= 20:
		'You don''t need any more water.'
	else
		water += 20
		'You gladly drank a glass of water.'

	end

	act 'Get up from the table':gt 'kuhr'
end

if husband > 0 and husbanday > 0 and huseatday ! day and eda >= 2:
	act 'Cook a meal for your husband and yourself, 2 servings (1:00)':
		cla
		*clr
		husband += 5
		eda -= 2
		minut += 60
		huseatday = day
		manna -= 25
		'<center><img src="images/pics/cook.jpg"></center>'
		'You prepare a meal for your husband and yourself.'

		act 'Leave the meal':gt 'kuhr'
	end
end

if lekarstvo > 0:
	'You have <b><<lekarstvo>></b> tablets.'

	if sick > 0 and lekarday ! day:
		act 'Take a pill':
			cla
			*clr
			minut += 5
			lekarday = day
			lekarstvo -= 1
			sick -= sick * 20 / 100
			lekrand = rand(1, 9)

			'<center><img src="images/inBed/lekr<<picrand>>.jpg"></center>'
			'You took the pill'

			act 'Move away':gt 'kuhr'
		end
	end
end

if vitamin > 0:
	'You have <b><<vitamin>></b> vitamin drinks.'

	if vitaminday ! day:
		act 'Take vitamins (0:05)':
			cla
			*clr

			if fat > salo:fat = salo

			minut += 5
			vitaminday = day
			vitamin -= 1
			frost = 0

			if KandidozOnce = 1:Kandidoz -= 2
			if GerpesOnce = 1:Gerpes -= 2
			if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)

			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

			'You took some vitamins.'

			act 'Move away':gt 'kuhr'
		end
	end
end

if zoo >= 6:
	if husband > 0 and husbandrink ! 10:
		if hour = 7 and hour = 17:
			act 'Call <<$namesob>>':
				cla
				*clr
				minut += 30
				'<center><img src="images/zoo/z1.jpg"></center>'
				'You call the dog and that the move pushes his wet nose between your legs and lick accepted.'

				if harakHusb = 0:
					zoo += 1
					horny = 0
					orgasm += 1
					husband -= 1
					'"What''s he doing dear, stop him, " cries the husband'
					'"I can not, try myself, " you reply.'
					'<<$husName>> trying to shove the dog, but he growls and snarls. "I can not get it to drive away what to do dear?" he asks.'
					'"Think of something." you reply, already slightly moaning with pleasure. <<$HusName>> begins to pace the room, periodically coming to the dog, but hearing his growl off. While <<$husName>> pacing the room dog began to jump on you.'
					'"Oh my God, that he was going to do?" shrieked <<$husName>>, see attempts dog jump on you.'
					'"What you do not clear he wants to fuck me" you said.'
					'"Dear try again to free" pleaded husband.'

					act 'Try':
						cla
						*clr
						'<center><img src="images/zoo/z2.jpg"></center>'
						'You reluctantly start trying to push the dog and move away, but it appears to him backwards, and <<$namesob>> leans on you and all your weight is on. You feel his penis rubs against your thighs ischya hole.'

						if izvratH = 0:
							'"Oh my God, I can not look at it, " cried the husband slammed the door and ran. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. My husband came back, and you still were cancer and dog sperm flowed from your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						else
							'"Well get off of her, " shouts <<$husName>> at the dog, but close to it does not fit. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him and your husband decided that your movement is an attempt to free you cheered "Yes <<$name>> so can get more wiggle lose it." Soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. Husband looked at you standing cancer hips peremazanymi canine semen flowing out of your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						end

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Well dear, whatever you say."'

							act 'Finish':gt 'sitr'
						end
					end
				elseif harakHusb = 1:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						'<<$husName>> tries ottoschit dog but he growls and grins, then he goes to the bath and what that brings old sheets, throwing her to the dog picks up the ends and picks up dog is in improvezirovannom bag.'
						'"I''ll take him now on euthanasia, " said <<$husName>>'

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Okay, look itself, your dog."'

							act 'Finish':gt 'sitr'
						end
					else
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						'"Can not or do not want, " said <<$husName>> smiling and continues to sit and watch as the dog licks you.'
						'"It probably does not want" you reply and deliberately pushes the legs wider. <<$husName>> looks like you moan until the dog licks you, and suddenly gets up and pulls out his dick brings to your mouth.'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z3.jpg"></center>'
							'You grab his cock and takes his mouth to suck, soon begins to cover you and you end sodragayas whole body, a second <<$husName>> ends up in your mouth. You swallow sperm and continue to suck his dick fading. Soused dog began naprygivat you with nedvuhslyslennymi intentions.'
							'"But this is too much" said <<$husName>> and tried ottoschit dog, but he growls and grins, then he goes into the tub and what that brings old sheets, throwing her to the dog picks up the ends and picks up dog is in improvezirovannom bag.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'

							act 'Allow':
								sobaka = 0
								zoo = 0
								gt 'sitr'
							end

							act 'Not authorized':
								cla
								'"No, dear, he is not guilty, he has instincts, besides from trying so hard, " you said.'
								'"Well, if he was trying so hard you can thank him" ironically husband.'

								act 'Jerk dog':
									cla
									*clr
									husband -= 1
									'<center><img src="images/zoo/z6.jpg"></center>'
									'You take the dog dick in hand and begin to masturbate after a few minutes you dog cums in her palm.'
									act 'Finish':gt 'sitr'
								end

								act 'Suck dog':
									cla
									*clr
									swallow += 1
									husband -= 40
									'<center><img src="images/zoo/z7.jpg"></center>'
									'You loshite dog on the floor and take his cock in my mouth, my husband looks at you with disgust as you sucking dog in a couple of minutes dog diluted into your mouth and you swallow sperm.'
									'"Well, you''re a pervert, " the husband says with obvious distaste.'

									act 'Finish':gt 'sitr'
								end

								act 'Finish':gt 'sitr'
							end
						end
					end
				elseif harakHusb = 2:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						manna -= 15
						willpower -= 15
						'<<$HusName>> trying ottoschit dog, but he growls and grins, then he smashes the dog leg in the ribs and he screeched flies into a corner, did not have time to climb dog as man begins to kick harder, seeing his condition, you scored in angle and covering his head with hands close your eyes. A few minutes later the dog stops.'
						'"What are you hiding there shalt here, and then krovischi from your skunk" said <<$husName>>. Opening her eyes you see a dead dog in a pool of blood.'
						'"Well, what froze shalt say to you, I do this on the trash Dogmeat''ll take." he takes the dog, wrap in sheets and make it in the trash. And you have some time to scour the blood from the floor.'

						act 'Finish':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end
					else
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						SUB += 2
						'"What do you mean I can not, that you like the way he licks you, " shouts <<$husName>>.'
						'"No, of course you do not, " you begin to make excuses.'
						'"And I see you taschishsya whore, you all are flowing, or think I do not see, and if you like it so thank him, " he says, and seeing your not knowing look continues, "Well, what are hatched suck him alive."'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z4.jpg"></center>'
							'<<$husName>> grabs a dog by the collar iderzhit until you slide on the floor under the dog. Nedozhidayas oplivuhi you hiding his lust take by mouth and takes dick dog suck, husband watching you and cheers saying that the dog loved your mouth. Soon he was bored just watch and he dropped his pants says "Well Spreads legs."'

							act 'Allow':
								cla
								*clr
								suprdolg += 1
								sex += 1
								anal += 1
								'<center><img src="images/zoo/z5.jpg"></center>'
								'You obediently spreads her legs and her husband comes to you in the pussy, he hews suck you until you have a dog, but you do not dostovlyaet pleasure. Soon her husband cums and gets "A dog that is not yet finished, something you''re not trying, as well, cup your point."'

								act 'Substitute ass':
									cla
									*clr
									analorgasm += 1
									orgasm += 1
									horny = 0
									'<center><img src="images/zoo/z8.jpg"></center>'
									'You go up to her knees and dog immediately jumps on you. prevent kneel. With one hand you Spreading buttocks, and a second guide member currently in his ass, fingering hole dog quickly enters and taken to peck your anus. Husband looked at it a little and throwing "Go otmoyus from whores" out. Left with a dog for a single you start podmahivat him and soon oschuzaete tide excitation seems sex dog surpasses her husband, his cock in your ass moves so deftly that comes after the excitement orgasm, and you fall on korachki no longer able to stand, dog makes several movements and spewing his seed you in the ass. After graduating he leaves satisfied.'

									act 'Finish':gt 'sitr'
								end
							end
						end
					end
				end
			end
		else
			act 'Call <<$namesob>>':gt 'soba', 'zoof27'
		end
	elseif husband = 0 or husbandrink = 10:
		act 'Call <<$namesob>>':gt 'soba', 'zoof27'
	end
end

if musor > 3:
	act 'Discard rubbish':
		if $clothingworntype = 'nude':
			'I can not go to the trash naked!'
		else
			gt 'trashplace', 'start'
		end
	end
end

if dildo > 0 and horny >= 50:
	act 'Masturbate':
		cla
		*clr
		minut += 30
		mastr += 1
		manna += 15
		willpower += 15
		vagina += 1

		if husband > 0 and husbandrink ! 10:
			if week > 5 or week < 6 and hour > 16:
				cla
				*clr
				'<center><img src="images/img/hasb/m1.jpg"></center>'
				'You climb up on the table and enter dildo their pussy'

				if hour = 7 or hour = 17:'<<$husName>> looks at you, obviously a little dumbfounded.'
				if hour ! 7 or hour ! 17:'Once you get a taste of how the kitchen is included <<$husName>>'

				if harakHusb = 0:
					'"What are you doing dear?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
					'"And often you do that, " he asks.'
					'"Owned so often, less often in the ass, if you want to see?" you asked'

					if izvratH = 0:
						husband -= 1
						'"I''ll wait outside the door until you''re done, " he said and left. You continued to satisfy themselves rapidly and soon finished.'
						horny = 0
						orgasm += 1

						act 'Finish':gt 'kuhr'
					else
						'"Well, I do not know, " he stammered.'
						'"So you want" you said'

						act 'Show':
							cla
							*clr
							'<center><img src="images/img/hasb/m2.jpg"></center>'
							'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus. <<$husName>> closely watched as a dildo in your ass disappears and then reappears. Do you see how his pants swell.'
							'"Dear anything else you want?" smiling you ask.'
							'"Can I join?" a little embarrassed he asks.'

							act 'Solve':
								cla
								*clr
								analorgasm += 1
								orgasm += 1
								horny = 0
								'<center><img src="images/img/hasb/m3.jpg"></center>'
								'<<$husName>> gets dick and starts masturbating, it is not what you expected, and at first you even felt a little sad that he did not enter into you, and began to masturbate, but then you start it even start. Have you looked at her husband who masturbate looking at the way you drive the dildo his popkui be covered and you pleasure, you screamed and fell to the table, having experienced an orgasm, dildo still sticking out of your ass. <<$husName>> yarosno masturbate looking at you stretched out on the table, you took the dildo from ass and began to lick it, looking into the eyes of her husband, from such a spectacle he immediately discharged onto the floor. You are drawn to him sticking out his lips, in a second he had passionately kissed you.'

								act 'Finish':gt 'kuhr'
							end
						end
					end
				elseif harakHusb = 1:
					'"That''s a number I mean you is not enough?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
					'"Well then, show me everything that you know how I''ll look, " he says.'
					'"And how do I do it in the ass, too, to show?" you asked'

					if izvratH = 0:
						husband += 1
						husbizvradd += 1
						'"No, do not, and yet that''s enough, " he said, and sat down on a chair began to watch. You continued to satisfy themselves rapidly and soon finished in front of her husband. <<$husName>> stood up and began to applaud "Bravo and encore again?" he said laughing.'
						'"For such a lovely audience anything, but only after the intermission, " you laughed. <<$husName>> helped you get down from the table.'
						horny = 0
						orgasm += 1

						act 'Finish':gt 'kuhr'
					else
						husband += 1
						'"And how is it necessarily demonstrate" he said.'
						'"Anything you want, " you said'

						act 'Show':
							cla
							*clr
							'<center><img src="images/img/hasb/m2.jpg"></center>'
							'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus. <<$husName>> closely watched as a dildo in your ass disappears and then reappears. Do you see how his pants swell.'
							'"Dear anything else you want?" smiling you ask.'
							'"I do not just want to but I''ll do, " he said, unbuttoning his pants and substitute member of your face.'

							act 'Take by mouth':
								cla
								*clr
								'<center><img src="images/img/hasb/m4.jpg"></center>'
								'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> to stop you, "Well, now I''ll take this hole."'

								act 'Substitute ass':
									picrand = 87
									gt 'sex', 'anal'
								end
							end
						end
					end
				elseif harakHusb = 2:
					'"What hole itching?" he asks.'
					'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'

					if izvratH = 0:
						husband += 1
						husbizvradd += 1
						'"Well then, open your mouth, " he said pulling member and rudely pushing it in your mouth, he held you by the hair and fucked in the mouth, saying something you did not stop masturbating. Soon he was tired of your mouth, "Now take out of this hole rubber stuff, now I''m going to fuck you"'

						act 'Spread her legs ':
							picrand = 87
							gt 'sex', 'vag'
						end
					else
						SUB += 1
						husband += 1
						'"Insert this crap myself in the ass and mash, I''ll popolzuyut it, as long as pine Quick" he said, pulling member. You quickly rearrange the dildo from pussy anus and mouth open submissively.'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/img/hasb/m4.jpg"></center>'
							'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> stopped you "All cup your point, but this crap yourself in pussy shove, as if you were in a two-barrel fuck"'

							act 'Substitute ass':
								picrand = 87
								gt 'sex', 'anal'
							end
						end
					end
				end
			else
				horny = 0
				orgasm += 1
				'<center><img src="images/pics/mastr.gif"></center>'
				'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

				act 'Breath.':gt 'kuhr'
			end
		else
			horny = 0
			orgasm += 1
			'<center><img src="images/pics/mastr.gif"></center>'
			'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

			act 'Breathe.':gt 'kuhr'
		end
	end
end

--- kuhr ---------------------------------
# korr
act 'The bedroom':gt 'bedr'
act 'The bathroom':gt 'vanr'
act 'The kitchen':gt 'kuhr'
act 'The living room':gt 'sitr'

act '<font color="maroon">Apartment hallway</font>':
	cls

	if $clothingworntype = 'nude':
		'<b><font color="red">You need to get dressed before going out.</font></b>'
		xgt $curloc
	elseif sick > 72:
		'<b><font color="red">You''re too sick to walk around in the streets.</font></b>'
		xgt $curloc
	else
		xgt 'etoexhib', 'pos51'
	end
end

act '<b><font color="maroon">Go outside</font></b>':
	cls

	if $clothingworntype = 'nude':
		'<b><font color="red">You need to get dressed before going out.</font></b>'
		xgt $curloc
	elseif sick > 72:
		'<b><font color="red">You''re too sick to walk around in the streets.</font></b>'
		xgt $curloc
	else
		xgt 'etoexhib', 'pos51'
	end
end

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
popolaini = 0
saunaYouRoom = 0
boycherdaksex = 0
bonusZ = 0
music_on = 0
minut += 1
housrA = 1
housrMir = 0
elektro += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Corridor</font></b></center>'

if remkorr = 0:
	'<center><img src="images/etogame/korr.jpg"></center>'
	'In the hallway wallpaper which where moved away from the walls, and has long faded. A coat rack and a shelf for shoes are near the entrance. A wall-mounted <a href="exec:gt ''mirror'', ''start''">mirror</a> and a <a href="exec:gt ''telefon'', ''start''">phone</a> hang on the wall.'
else
	'<center><img src="images/etogame/korr2.jpg"></center>'
	'Modern hall with stylish furniture, a wall-mounted <a href="exec:gt ''mirror'', ''start''">mirror</a>, and a <a href="exec:gt ''telefon'', ''start''">phone</a>'
end

if ring = 1:'<b><font color="red">The phone is ringing</font></b>'

if suhbelo > 0:'Drying on the clothesline are <<suhbelo>> laundry items.'
if umbrella > 0:'An umbrella hangs on a hook.'
if palto > 0:'Hanging on the hook <<$palto>>.'
if sobaka = 1:'Your dog, <a href="exec:gt ''soba'', ''start''"><<$namesob>></a>, is lying on the floor near the entrance.'
if krolik = 1:'Resting on the floor your rabbit <a href="exec:gt ''krol'', ''start''"><<$namekrol>></a>.'
if popugai = 1:'In the cage sits your parrot <a href="exec:gt ''popu'', ''start''"><<$namepopu>></a>.'

if parkday ! day and parkblackmail = 1:
	parkblackmail = 2
	parkday = day
	'A heavy envelope has arrived in the mail. When you open it you can see pictures in it. Damn, it''s pictures of you where you are giving blowjobs to two guys in the park.'
	'Small note says:'
	'If you do not want to have these pictures posted on your porch and sent to your work, come to this address (address listed is a Studio)'
	'PS, if you do not come today, these pictures will be hanging in your entryway tomorrow.'
elseif parkday ! day and parkblackmail = 2:
	parkblackmail = 0
	fotoyousuck = 1
	'Damn, your photos with sperm on your face and two dicks in your mouth are plastered around porch.'
end

if bfA < 0:
	bfA = 0
	'<b><font color="red">Your boyfriend <<$boyA>> does not call you, he probably dumped you.</font></b>'
elseif bfA > 1 and boydayA ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyA:
	ring = 1
	ringA = 1
	'<b><font color="red">The phone is ringing</font></b>'
elseif bfA > 1 and boydayA ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyA:
	bfA = 0
	'<b><font color="red">Your guy does not call you, apparently he threw you.</font></b>'
end

if bfB > 1 and boydayB ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyB:
	ring = 1
	ringB = 1
	'<b><font color="red">The phone is ringing</font></b>'
elseif bfB > 1 and boydayB ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyB:
	bfB = 0
	'<b><font color="red">Your boyfriend <<$boyB>> does not call you, he probably dumped you.</font></b>'
end

if bfC > 1 and boydayC ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyC:
	ring = 1
	ringC = 1
	'<b><font color="red">The phone is ringing</font></b>'
elseif bfC > 1 and boydayC ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyC:
	bfC = 0
	'<b><font color="red">Your boyfriend <<$boyC>> does not call you, he probably dumped you.</font></b>'
end

if vladimirday ! day and vladimirQW = 20 and hour >= 15 and hour <= 17:'<a href="exec:gt ''qwloc2''"><font color="red"><b>The phone is ringing</b></font></a>.'
if vladimirday ! day and vladimirQW = 25 and hour >= 15 and hour <= 17 and week = 6:'<a href="exec:gt ''qwloc3''"><font color="red"><b>The phone is ringing</b></font></a>.'
if vladimirday ! day and vladimirQW = 35 and hour >= 15 and hour <= 17 and week = 6:'<a href="exec:gt ''qwloc4''"><font color="red"><b>The phone is ringing</b></font></a>.'
if QWdogreiqTimer = 0 and QWdogReiq = 2 and week = 7 and qwdogiventday ! day and hour >= 12:'<a href="exec:gt ''qwlocdog''"><font color="red"><b>The phone is ringing</b></font></a>.'

if bfA = 1 or bfB = 1 or bfC = 1:
	if bfA = 1 and boydayA ! day and hour > 5 and hour < 20 and ringA = 0:
		if bfb = 1:bfb = 0
		if bfc = 1:bfc = 0

		if vnesh < vneshBoyA:
			bfA = 0
			'Your boyfriend <<$boyA>> has not called you.'
		else
			ring = 1
			ringA = 1
			'<b><font color="red">The phone is ringing</font></b>'
		end
	end

	if bfB = 1 and boydayB ! day and hour > 5 and hour < 20 and ringB = 0:
		if bfa = 1:bfa = 0
		if bfc = 1:bfc = 0

		if vnesh < vneshBoyB:
			bfB = 0
			'Your boyfriend <<$boyB>> has not called you.'
		else
			ring = 1
			ringB = 1
			'<b><font color="red">The phone is ringing</font></b>'
		end
	end

	if bfC = 1 and boydayC ! day and hour > 5 and hour < 20 and ringC = 0:
		if bfa = 1:bfa = 0
		if bfb = 1:bfb = 0

		if vnesh < vneshBoyC:
			'Your boyfriend <<$boyC>> has not called you.'
			bfC = 0
		else
			ring = 1
			ringC = 1
			'<b><font color="red">The phone is ringing</font></b>'
		end
	end
end


if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
	'<b><font color="red">, the doorbell rings</font></b>'

	act 'Go to the door':
		cls
		gs 'stat'
		'You went to the door and looked through the peephole. You see a dark male figure. Apparently the man heard you and said through the door. "It''s me. Plumber Grisha. You''ll need money."'

		act 'Answer the door':
			cls
			money -= santehnikDolg
			santehnikDolg = 0
			gs 'stat'
			'You opened the door and plumbing Gregory smiled. "I thought you were hiding from me now will. Well? There is nothing to pay?" You nodded and climbed for his wallet. Counting half thousand you gave the money he Dwarf and put them in his pocket. Then you said goodbye and left.'

			act 'Close the door':gt $curloc
		end
	end
end

if IvanPodstavaQW = 3 and hour >= 9 and hour <= 20:
	cls
	IvanPodstavaQW = 4

	if DolgRS <= moneySUM:
		money = moneySUM - 650000
		karta = 0
		stolmoney = 0
		minut += 120
		'For you police patrol arrived and took you to court. You have managed to pay off its debt and you were released to reconcile the parties.'

		act 'Get out of the courthouse':gt 'down'
	else
		DolgRS = 650000 - moneySUM - 60000
		money = 0
		karta = 0
		stolmoney = 0
		age += 5
		vidage += 7
		year += 5
		money = 2000
		'For you police patrol arrived and took you to court. At trial, you were given five years of general regime, is obliged to pay debt <<DolgRS>>.'

		act 'Sit on the area':
			cls
			srok_kolvo = 1
			srok_otsidki += 5
			salo = 10
			fat = 10
			curly = 0
			mop = 1
			skin = 0
			tan = 0
			leghair = 6
			lobok = 3
			bfa = 0
			narkoman = 0
			nark = 0
			SLomka = 0
			work = 0
			workKafe = 0
			workhosp =0
			worksalon =0
			tanwork =0
			workSec =0
			stipuha =0
			preg = 0
			young_shop_work = 0
			student = 0
			kurs = 0
			semestr = 0
			abiturient = 0
			stipuha = 0
			lektor = 0
			gs 'stat'

			'Time dragged on too long. Your life and work was tedious and monotonous. You sewed quilted five years, had dinner in the dining room and went to sleep in the barracks surrounded by other women inmates. With your salary of 2, 000 rubles per month in 1000 listed on the debt repayment. But time does not stand still and still came an end to your suffering. You let go and gave 2,000 rubles. You took the train and came back to the city.'

			act 'Get off the train':gt 'vokzal'
		end
	end
	exit
end

if IvanPodstavaDay ! day and IvanPodstavaQW = 1 and hour >= 8 and hour <= 20:
	'<b><font color="red">The doorbell rings</font></b>'

	act 'Come to the door':
		cls
		gs 'stat'
		'You came to the door and looked through the peephole. On the site you saw a few men. In the darkness you have seen them on their caps. One of the men said to you through the door. <<$name>> <<$surname>> open, police.'

		act 'Answer the door':
			cls
			minut += 60
			IvanPodstavaQW = 2
			gs 'stat'
			'You opened the door to police wondering what they need from you. In the room were several men in uniform and with them several men in civilian clothes. Lean and skinny guy with stubble week and a pistol in a holster on a belt tied armpit said. "Understood, take your seats. Who will search in the apartment of the citizen who is accused of stealing." The investigator turned to you. "That''s a warrant for your arrest, this, this search warrant. Could you read it." Policemen full searched your apartment. Soon, one of them came out and said. Here are found the keys, according to the description it is just the keys to the office and the safe where the money was stolen. Witnesses signed the protocol that gave them the investigator. He frowned at you and nodded policeman, who started your hands behind your back and your wrists snap handcuffs.'

			act 'Go with the police':
				cls
				minut += 60
				gs 'stat'
				'Brought you out of the house in handcuffs and put in a police UAZ. After, steel doors slam and UAZ car started shaking and growling at each bump. Finally you have arrived somewhere and you taking from UAZ performed in the office to have a friend you investigator. He took off the handcuffs and offered you a seat. You took a hard and uncomfortable chair, and an investigator in the meantime turned on the TV and put a video cassette. On the screen was a picture of a security camera in bystroeshke. There was visible corridor. Soon appeared in the corridor you. You came to the door and opened it entered the office. After a while, the door opened and you are out of the office with a thick envelope. Investigator turned a VCR tape and pulled, after which he put another tape. On the next cabinet drawer was Anatoly Chubais. The front door opened and it included you, holding keys in hand. You went to the safe and opened it with the key. Got envelope. <<$burgerIvanText>>. Investigator turned the TV off and pulled out a plastic bag with table keys. He threw them on the table, and finally spoke. "Tests showed it really the keys to the office and the safe owner bystroezhki. During the search they were found in your apartment. Surveillance cameras on the record clearly shows how you entered the office and stole 650 thousand." He took out the protocol and taking pen in hand began to write. Filled a slate floor, he raised his dark eyes on you and said. "Confession will help you in court. All the same, it is the first time and provided that you return the money, you may be given a suspended sentence, if you admit your guilt."'

				act 'Sign recognition':
					cls
					minut += 60
					gs 'stat'
					'You sign a confession and an investigator barked "duty." Policeman entered the room. The investigator nodded showing him you get her.'

					act 'Go':gt 'kameraKPZ'
				end

				act 'Tell how it was':
					cls
					minut += 60
					gs 'stat'
					'You were telling the investigator how everything was. As a manager Ivan Framed you. But the investigator listened to you in half an ear. Finally, he slammed his fist on the table and yelled at you, "I was not born yesterday, that would feed me such nonsense:If you will not cooperate, I''ll rot!" Policeman entered the room. The investigator nodded showing him you get her.'

					act 'Go':gt 'kameraKPZ'
				end
			end
		end
	end

	exit
end

if gopstop > 30:gt 'police', '1'

if sick > 0 and doktorday ! day:
	!'
	act 'Call a doctor':
		cla
		*clr
		minut += 15
		doktorday = day
		sick -= 5

		if sick < 1:sick = 1
		if sickstage = 1:sicktimer += 5

		'Has come to you from the clinic and the doctor examined you. After examination, the doctor made a shot and you will become easier.'

		act 'Move away':gt 'korr'
	end
	'!

	act 'Call a doctor':doktorday = day & dynamic $polidin
end

$ninel0 = {
	cla
	*clr
	'<center><img src="images/inBed/ninel00.jpg"></center>'
	'You open the door. Stands on the threshold of a pretty young girl with meitsinskim suitcase in hand.'
	'(You) - Hello, doctor'
	'(Doctor) - Hello. My name is Ninel P. - I replaces your local therapist. Where the patient?'
	'(You) - This is me ... kha-kha-kha.'
	'(Doctor) - Clear. Then come - you need to go back to bed.'

	act 'Pursue a doctorate in the bedroom and lay down':
		cla
		*clr
		ninelmet = 1
		'<center><img src="images/inBed/nadom0.jpg"></center>'
		'The doctor sat on the edge of your bed and sprsil:'
		'(Doctor) - On that complain of <<$name>>? Can I call you that?'
		'(You) - Of course ... Ahem, ahem, ahem ... Oh, Doctor, perhaps I have the flu - cough just kills and very sore throat. And the temperature is high.'
		'(Doctor) - Runny nose is? Headaches? Aching bones?'
		'(You) - Yes. A Aptchee and!'
		'(Doctor) - Now I will examine you. Undress.'

		act 'Undress':
			cla
			*clr
			minut += 5
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/inBed/nadom1.jpg"></center>'
			'You undressed and the doctor listened to your lungs for a long time. Her hands are cool and gentle touch and caress like a stethoscope ...'
			'(Doctor) - Yes, wheezing ... Now open your mouth. That''s because - "ah-ah-ah" ...'

			act 'A-a-a':
				cla
				*clr
				'<center><img src="images/inBed/ninel03.jpg"></center>'
				'You opened your mouth and the doctor examined your sore throat'
				'(Doctor) - Hmmm ... throat strongly reddened and inflamed ... Now we need to measure the temperature.'

				act 'Stick a thermometer in her mouth':
					cla
					*clr
					'<center><img src="images/inBed/ninel04.jpg"></center>'
					'(Dr.) No, not so. Temperature should be measured rectally.'
					'(You) - Uh-uh ...'
					'(Doctor) - Do not be afraid, <<$name>>, is not painful.'
					'(You) - Well if you''re sure ...'
					'(Doctor) - I''m sure. Come on - lie down on his stomach and spread your hands buttocks.'

					act 'Substitute ass':
						cla
						*clr
						minut += 10
						horny += 10
						clr
						gs 'stat'
						'<center><img src="images/inBed/nadom2.jpg"></center>'
						'You obediently roll over and substitute ass. Dr. lubricates your anus lubricated and deftly introduces a thermometer. You flinch, but not from pain and pleasure. Doctor leaves just stick a thermometer in your ass and slowly moves it back and forth and it''s very nice. You feel the growing excitement.'

						if horny >= 50:
							act 'Moan with pleasure':
								cla
								*clr
								'<center><img src="images/inBed/nadom3.jpg"></center>'
								'Doctor takes the thermometer out of your buttocks and checks'
								'(Dr.) 39.2 ... Very bad. Please turn on your back - you need to palpate the lymph nodes.'

								act 'Roll over on his back':
									cla
									*clr
									minut += 15
									horny += 10
									clr
									gs 'stat'
									'<center><img src="images/inBed/nadom5.jpg"></center>'
									'The doctor began to stroke and knead your stomach and thighs. You are not sure that this is a medical procedure - too long and tenderly she delalet, but you are very nice and you did not object.'
									'Excitement, meanwhile, is growing all, you feel like your pussy moistened and begins to whine sweet ...'

									act 'A blush of embarrassment':
										cla
										*clr
										clr
										horny += 15
										!!time += 15

										gs 'stat'
										'<center><img src="images/inBed/nadom6.jpg"></center>'
										'You blush with embarrassment, but then fall below the hands of the doctor and she begins to caress your pussy'
										'(You) - Doctor, what are you doing! - At the same time embarrassed, outraged and frightened screams you.'
										'(Doctor) - Flying you, silly. I feel the magic in you, which means you''re one of us, and I can use his power quietly.'
										'(You) - So you''re a magician, too?'
										'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
										'(You) - No, I do not remember ...'
										'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
										'(You) - So ..?'
										'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
										'(You) - And what in return?'
										'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
										'(You) - Then of course - I agree.'

										act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
									end
								end
							end
						end

						act 'Indignant':
							cla
							*clr
							'<center><img src="images/inBed/nadom3.jpg"></center>'
							'(You) - Doctor, what are you doing?'
							'Doctor takes the thermometer out of your buttocks and calmly replied:'
							'(Doctor) - measures your temperature. 39.2 - very bad.'

							act 'Doctor, what with me?':
								cla
								'(You scared) - Doctor, what with me?'
								'(Dr.) Do you really flu. Now I''ll give you an injection of antibiotic and antipyretic, and you will feel better.'

								act 'Lie on your stomach and bare ass':
									cla
									*clr
									minut += 10
									sick -= 2
									lekar += 3
									clr
									gs 'stat'
									'<center><img src="images/inBed/nadom4.jpg"></center>'
									'The doctor did give you a shot in the ass - you cried'
									'(Doctor) - Just about everything, everything is. You prescribe bed rest, hot drinks, antibiotics, nose drops and a balanced diet. When the temperature drops - the clinic appointment.'
									'(You) - Thank you, Doctor - is necessary.'
									'Doctor said goodbye and left.'

									act 'Back to bed':gt 'bedr'
								end
							end
						end

						act 'Doctor, what with me?':
							cla
							'(You scared) - Doctor, what with me?'
							'(Doctor) - I''m afraid that you have angina, <<$name>>. I would advise you to inpatient treatment'
							'(You) - What''s that - in the hospital, or what?'
							'(Doctor) - Yes'

							act 'Refuse':
								cla
								*clr
								'(You sobbing) - Oh, Doctor, I do not want to the hospital ...'
								'(Doctor, thoughtfully) - Well ... I guess it is still possible. Then I''ll give you a couple of shots - to start ...'
								'(You) - Oh, thank you, doctor!'

								act 'Lie on your stomach and bare ass':
									cla
									minut += 15
									horny = 100
									clr
									gs 'stat'
									'<center><img src="images/inBed/nadom9.jpg"></center>'
									'The doctor made a few jabs you in the ass, and you suddenly enveloped incredible sexual arousal. Between her thighs you like the fire started, sweet pussy ached and flowed, grew heavy chest, nipples harden and solidify ...'
									'(You) - Doctor, what''s happening? - Screams frightened and embarrassed you, but your voice treacherously breaks on voluptuous moan'
									'(Doctor) - Yeah! I knew it - I can feel the magic in you, which means you''re one of us, and I can use his power quietly.'
									'(You) - So you''re a magician too!.'
									'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
									'(You) - No, I do not remember ...'
									'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
									'(You) - So ..?'
									'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
									'(You) - And what in return?'
									'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
									'(You) - Then of course - I agree.'

									act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
								end
							end
						end
					end
				end
			end
		end
	end
}

$drPP = {
	cla
	*clr
	'You open the door. Standing in the doorway of an elderly bald man with a suitcase in hand meitsinskim.'
	'(You) - Kha-kha ... Hello, Doctor'
	'(Doctor) - Hello, sick - I''m Peter, your local therapist. Go back to bed - do not stand in the draft.'

	act 'Hold a doctorate in the bedroom.':
		cla
		*clr
		'<center><img src="images/inBed/drPP1.jpg"></center>'
		'You have returned to the bedroom with a doctor. He sat on the edge of the bed and felt your forehead'
		'(Doctor) - Well, the patient, to complain that?'
		'(You) - Ahem, ahem, ahem ... Oh, Doctor, perhaps, I have a sore throat - very sore throat and high temperature.'
		'(Doctor) - And cough, as I see it. And judging by your voice, you have a nose, sick, laid.'
		'(You) - Yes. A Aptchee and!'
		'(Doctor) - Well, the sick, you hear Dwight. Undress.'

		act 'Undress':
			cla
			*clr
			minut += 5
			clr
			gs 'stat'
			'<center><img src="images/inBed/drPP2.jpg"></center>'
			'You undressed and Dr. vysnushival long your lungs '
			'(Doctor) - So, sir. Now let''s look at the neck. Open your mouth wide and say "Ah-ah"'

			act 'A-a-a':
				cla
				*clr
				'<center><img src="images/inBed/drPP3.jpg"></center>'
				'You opened your mouth and your doctor looked red sore throat'
				'(Doctor) - Ay-ay-ay ... How is it you do that? Should be tempered, ill - tempered. Well, let''s measure your temperature.'

				act 'Put the thermometer armpit':
					cla
					*clr
					'<center><img src="images/inBed/drPP4.jpg"></center>'
					'The doctor looked at the thermometer and shook his head'

					act 'Doctor, what with me?':
						cla
						'(Dr.) Do you have the flu, sick. Do not worry - I''ll give you a shot and you''ll feel better soon. Soak a couple of days in bed, drinketh drugs, and it becomes easier - to see me'

						act 'Substitute ass':
							cla
							*clr
							minut += 10
							sick -= 2
							lekarstvo += 3
							gs 'stat'
							'<center><img src="images/inBed/drPP5.jpg"></center>'
							'The doctor did give you a shot in the ass - you cried'
							'(Doctor) - Well, well, sick, do not worry. And remember - bed rest, regular meals and medication. And do not forget to come to the reception.'
							'(You) - Thank you, Doctor - is necessary.'
							'Doctor said goodbye and left, and you venules in bed.'

							act 'Back to bed':gt 'bedr'
						end
					end
				end
			end
		end
	end
}

$polidin = {
	cla
	*clr
	minut += 15
	callrand = rand(1, 3)
	'<center><img src="images/inBed/housecall<<picrand>>.jpg"></center>'
	'You dial the number several times clinics - there all the time busy.'

	act 'Call again and again':
		cla
		'Finally, you''ve reached. Tired voice tube nurse replied:'
		'(Nurse) - Hello - reception ...'

		act 'Hello ...':
			cla
			'(You) - Hello. Cough-cough ... Can I call a doctor to the house?'
			'(Nurse) - Your name and address?'

			act 'Introduce':
				cla
				'(You) - Mi ... Kha-kha! Sorry ... <<$name>> <<$surname>>. Park Street apartment house 4 69 ... Aa-and-pchhi!'
				'(Nurse) - It''s okay. Wait a minute.'

				act 'Wait':
					cla
					minut += 5
					clr
					gs 'stat'
					'You wait five minutes, occasionally coughing into the phone and finally hear:'
					'(Nurse) - So - <<$name>> <<$surname>>. here is your card ... What are you worried?'
					'(You) - Kha-kha-kha ... I''m sorry ... I have a fever and sore throat very. And cough and runny nose.'
					'(Nurse) - high temperature?'
					'(You) - Yes, very - 39.2 ... Aa-pchhi!'
					'(Nurse) - Right. Wait - the doctor will come to you.'
					'(You) - A soon?'
					'(Nurse) - As soon as he can. Your challenge - not unique.'
					'(You) - Save ... Kha-kha! Thank you ... ...'

					if ninelsex = 1:
						act 'Is it possible to cause Ninel Pavlovna?':
							cla
							'(You) - Is it possible to cause Ninel Pavlovna? She regularly osmatrivat me.'
							'(Nurse) - I''ll see if she is free.'
							'(You) - Once again, thank you.'

							act '...':gt 'housecall', 'ninel3'
						end
					end

					act 'Back to bed':
						cla
						*clr
						picrand = rand(21, 27)
						'<center><img src="images/inBed/sick21.jpg"></center>'
						timerand = rand(1, 6)
						minut += timerand * 30
						'You are lying in bed, shivering in the chill and wrapped in a blanket. Time passes excruciatingly slow - you can not tell how much time passed before the doorbell rang.'

						act 'Answer the door':
							if ninel > 0 and sick <= 50:
								gt 'housecall', 'ninel1'
							elseif ninel = 0 or sick > 50:
								doctrnd = rand(0, 1)

								if doctrnd = 0:dynamic $drPP
								if doctrnd = 1:gt 'housecall', 'ninel0'
							end
						end
					end
				end
			end
		end
	end
}

--- korr ---------------------------------
# housecall
if $ARGS[0] = 'ninel0':
	cla
	*clr
	'<center><img src="images/inBed/ninel00.jpg"></center>'
	'You open the door. Stands on the threshold of a pretty young girl with meitsinskim suitcase in hand.'
	'(You) - Hello, doctor'
	'(Doctor) - Hello. My name is Ninel P. - I replaces your local therapist. Where the patient?'
	'(You) - This is me ... kha-kha-kha.'
	'(Doctor) - Clear. Then come - you need to go back to bed.'

	act 'Pursue a doctorate in the bedroom and lay down':
		cla
		*clr
		ninelmet = 1
		'<center><img src="images/inBed/nadom0.jpg"></center>'
		'The doctor sat on the edge of your bed and sprsil:'
		'(Doctor) - On that complain of <<$name>>? Can I call you that?'
		'(You) - Of course ... Ahem, ahem, ahem ... Oh, Doctor, perhaps I have the flu - cough just kills and very sore throat. And the temperature is high.'
		'(Doctor) - Runny nose is? Headaches? Aching bones?'
		'(You) - Yes. A Aptchee and!'
		'(Doctor) - Now I will examine you. Undress.'

		act 'Undress':
			cla
			*clr
			minut += 5
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/inBed/nadom1.jpg"></center>'
			'You undressed and the doctor listened to your lungs for a long time. Her hands are cool and gentle touch and caress like a stethoscope ...'
			'(Doctor) - Yes, wheezing ... Now open your mouth. That''s because - "ah-ah-ah" ...'

			act 'A-a-a':
				cla
				*clr
				'<center><img src="images/inBed/ninel03.jpg"></center>'
				'You opened your mouth and the doctor examined your sore throat'
				'(Doctor) - Hmmm ... throat strongly reddened and inflamed ... Now we need to measure the temperature.'

				act 'Stick a thermometer in her mouth':
					cla
					*clr
					'<center><img src="images/inBed/ninel04.jpg"></center>'
					'(Dr.) No, not so. Temperature should be measured rectally.'
					'(You) - Uh-uh ...'
					'(Doctor) - Do not be afraid, <<$name>>, is not painful.'
					'(You) - Well if you''re sure ...'
					'(Doctor) - I''m sure. Come on - lie down on his stomach and spread your hands buttocks.'

					act 'Substitute ass':
						cla
						*clr
						minut += 10
						horny += 10
						clr
						gs 'stat'
						'<center><img src="images/inBed/nadom2.jpg"></center>'
						'You obediently roll over and substitute ass. Dr. lubricates your anus lubricated and deftly introduces a thermometer. You flinch, but not from pain and pleasure. Doctor leaves just stick a thermometer in your ass and slowly moves it back and forth and it''s very nice. You feel the growing excitement.'

						if horny >= 50:
							act 'Moan with pleasure':
								cla
								*clr
								'<center><img src="images/inBed/nadom3.jpg"></center>'
								'Doctor takes the thermometer out of your buttocks and checks'
								'(Dr.) 39.2 ... Very bad. Please turn on your back - you need to palpate the lymph nodes.'

								act 'Roll over on his back':
									cla
									*clr
									minut += 15
									horny += 10
									clr
									gs 'stat'
									'<center><img src="images/inBed/nadom5.jpg"></center>'
									'The doctor began to stroke and knead your stomach and thighs. You are not sure that this is a medical procedure - too long and tenderly she delalet, but you are very nice and you did not object.'
									'Excitement, meanwhile, is growing all, you feel like your pussy moistened and begins to whine sweet ...'

									act 'A blush of embarrassment':
										cla
										*clr
										horny += 15
										time += 15
										clr
										gs 'stat'
										'<center><img src="images/inBed/nadom6.jpg"></center>'
										'You blush with embarrassment, but then fall below the hands of the doctor and she begins to caress your pussy'
										'(You) - Doctor, what are you doing! - At the same time embarrassed, outraged and frightened screams you.'
										'(Doctor) - Flying you, silly. I feel the magic in you, which means you''re one of us, and I can use his power quietly.'
										'(You) - So you''re a magician, too?'
										'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
										'(You) - No, I do not remember ...'
										'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
										'(You) - So ..?'
										'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
										'(You) - And what in return?'
										'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
										'(You) - Then of course - I agree.'

										act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
									end
								end
							end
						end

						act 'Indignant':
							cla
							*clr
							'<center><img src="images/inBed/nadom3.jpg"></center>'
							'(You) - Doctor, what are you doing?'
							'Doctor takes the thermometer out of your buttocks and calmly replied:'
							'(Doctor) - measures your temperature. 39.2 - very bad.'

							if sick < 48:
								act 'Doctor, what with me?':
									cla
									'(You scared) - Doctor, what with me?'
									'(Dr.) Do you really flu. Now I''ll give you an injection of antibiotic and antipyretic, and you will feel better.'

									act 'Lie on your stomach and bare ass':
										cla
										*clr
										minut += 10
										sick -= 2
										lekar += 3
										clr
										gs 'stat'
										'<center><img src="images/inBed/nadom4.jpg"></center>'
										'The doctor did give you a shot in the ass - you cried'
										'(Doctor) - Just about everything, everything is. You prescribe bed rest, hot drinks, antibiotics, nose drops and a balanced diet. When the temperature drops - the clinic appointment.'
										'(You) - Thank you, Doctor - is necessary.'
										'Doctor said goodbye and left.'

										act 'Back to bed':gt 'bedr'
									end
								end
							elseif sick >= 48:
								act 'Doctor, what with me?':
									cla
									'(You scared) - Doctor, what with me?'
									'(Doctor) - I''m afraid that you have angina, <<$name>>. I would advise you to inpatient treatment'
									'(You) - What''s that - in the hospital, or what?'
									'(Doctor) - Yes'

									act 'Agree':
										cla
										'(You sobbing) - Oh ... Kha-kha-kha ... If you think that you really need it ...'
										'(Doctor) - I''m afraid so - it is a serious disease ... But do not worry - we have a good hospital.'
										'(You) - Well, I agree.'

										act 'Go to hospital':
											cla
											*clr
											minut += 120
											gt 'hospital', 'start'
										end
									end

									act 'Refuse':
										cla
										*clr
										'(You sobbing) - Oh, Doctor, I do not want to the hospital ...'
										'(Doctor, thoughtfully) - Well ... I guess it is still possible. Then I''ll give you a couple of shots - to start ...'
										'(You) - Oh, thank you, doctor!'

										act 'Lie on your stomach and bare ass':
											cla
											minut += 15
											horny = 100
											clr
											gs 'stat'
											'<center><img src="images/inBed/nadom9.jpg"></center>'
											'The doctor made a few jabs you in the ass, and you suddenly enveloped incredible sexual arousal. Between her thighs you like the fire started, sweet pussy ached and flowed, grew heavy chest, nipples harden and solidify ...'
											'(You) - Doctor, what''s happening? - Screams frightened and embarrassed you, but your voice treacherously breaks on voluptuous moan'
											'(Doctor) - Yeah! I knew it - I can feel the magic in you, which means you''re one of us, and I can use his power quietly.'
											'(You) - So you''re a magician too!.'
											'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
											'(You) - No, I do not remember ...'
											'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
											'(You) - So ..?'
											'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
											'(You) - And what in return?'
											'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
											'(You) - Then of course - I agree.'

											act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'ninel1':
	cla
	*clr
	'<center><img src="images/inBed/ninel10.jpg"></center>'
	'Thank you in advance opened the door once again to not get up, so when the phone rang, you hoarse voice shouted:'
	'(You) - Open! Kha-kha ... I''m in the bedroom!'
	'Young cute girl with suitcase in hand meitsinskim passes into your bedroom and stopped beside the bed, carefully considering you'
	'(You) - Hello, doctor'
	'(Doctor) - Hello. My name is Ninel P. - I replaces your local therapist. This you call a doctor?'
	'(You) - This is me ... kha-kha-kha.'
	'(Doctor) - On that complain of <<$name>>? Can I call you that?'

	act 'Complain':
		cla
		*clr
		ninelmet = 1
		'<center><img src="images/inBed/ninel11.jpg"></center>'
		'(You) - Of course ... Ahem, ahem, ahem ... Oh, Doctor, perhaps I have the flu - cough just kills and very sore throat. And the temperature is high.'
		'(Doctor) - Runny nose is? Headaches? Aching bones?'
		'(You) - Yes. A Aptchee and!'
		'The doctor sat on the edge of your bed and took you by the wrist, listening to the pulse.'
		'You thought of her fingers comes some power, but decided that it was you from the heat of imagining'
		'(Doctor) - Undress - let''s hear you.'

		act 'Undress':
			cla
			*clr
			minut += 5
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/inBed/ninel12.jpg"></center>'
			'You undressed and the doctor listened to your lungs for a long time. Her hands are cool and gentle touch and caress like a stethoscope ...'
			'You feel the growing excitement'
			'(Doctor) - Rattling very unpleasant ... Now open your mouth. That''s because - "ah-ah-ah" ...'

			act 'A-a-a':
				cla
				*clr
				'<center><img src="images/inBed/ninel03.jpg"></center>'
				'You opened your mouth and the doctor examined your sore throat'
				'(Doctor) - Yes ... throat strongly reddened and inflamed ... Now we need to measure the temperature.'

				act 'Stick a thermometer in her mouth':
					cla
					*clr
					'<center><img src="images/inBed/ninel04.jpg"></center>'
					'(Dr.) No, not so. Temperature should be measured rectally.'
					'(You) - Uh-uh ...'
					'(Doctor) - Do not be afraid, <<$name>>, is not painful.'
					'(You) - Well if you''re sure ...'
					'(Doctor) - I''m sure. Come on - lie down on his stomach and spread your hands buttocks.'

					act 'Substitute ass':
						cla
						*clr
						minut += 10
						horny += 10
						clr
						gs 'stat'
						'<center><img src="images/inBed/rectaltemp.jpg"></center>'
						'You obediently roll over and substitute ass. Dr. lubricates your anus lubricated and deftly introduces a thermometer. You flinch, but not from pain and pleasure. Doctor leaves just stick a thermometer in your ass and slowly moves it back and forth and it''s very nice.'
						'Do you feel that excited great - your breasts were filled with sweet and ached, and pussy wet.'
						'And yet - again you feel like the hands of Ninel distributed power'

						act 'Doctor, what''s happening?':
							cla
							*clr
							minut += 10
							horny += 10
							clr
							gs 'stat'
							'<center><img src="images/inBed/ninel13.jpg"></center>'
							'Ninel lies down next to you and starts to kiss and caress your frankly half-naked body.'
							'Are you confused and horrified by her behavior, but she was so gentle, and you are so excited that you simply can not resist. The only thing that you manage - is choking sprsit:'
							'(You) - Doctor, what are you doing? What''s going on?'
							'(Doctor) - A - felt! I knew immediately that you were one of us, and therefore I can use his power quietly.'
							'(You) - So you''re a magician, too?'
							'(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
							'(You) - No, I do not remember ...'
							'(Doctor) - It''s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
							'(You) - So ..?'
							'(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
							'(You) - And what in return?'
							'(Doctor) - Nothing - I''m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
							'(You) - Then of course - I agree.'

							act 'Surrender weasel Ninel':
								cla
								*clr
								minut += 10
								horny += 10
								clr
								gs 'stat'
								'<center><img src="images/inBed/ninel14.jpg"></center>'
								'Ninel opens her robe, exposing beautiful breasts with nipples strained. You realize that she too excited.'
								'She caresses your breasts with her hands, then her lips, tugging and sucking nipples. You moan softly and it inflames it even stronger.'
								'Ninel lifts hem - underwear on it there - and runs fingers between her legs.'

								act 'Enjoy':
									cla
									*clr
									minut += 10
									horny += 10
									clr
									gs 'stat'
									'<center><img src="images/inBed/ninel15.jpg"></center>'
									'You groan under her caresses and Skills Ninel lips - oh my God! - Slide your body down and down ...'
									'Minute, and she crouches to your burning flowing juices pussy and her tongue goes into her wet depths'
									'You emit voluptuous scream, then another and another ... Waves of pleasure pierce your body trembles from the womb to the fingertips. You are incredibly good!'
									'Ah, Ah''s! More, more-oh-oh-oh! - Pray you.'

									act 'Change position':
										cla
										*clr
										horny = 100
										kuni += 1
										clr
										gs 'stat'
										'<center><img src="images/inBed/ninel16.jpg"></center>'
										'With a flick of Ninel leans forward and sits on top of you. You feel like her pussy juices flowing out of your rubs. You groan, his hands clench elastic buttocks doctors and hold her. Stronger! Even stronger! About - what bliss!'
										'Ninel rubs against you faster, powerful, almost masculine tolchkakmi, voluptuously groaning with every movement - it''s crazy!'
										'- Oh, <<$name>>, <<$name>>! - Doctor exhales:- I want you so much! Caress me, weasel-ah-ah-ah!'

										act 'Caress Ninel':
											cla
											*clr
											ninelsex += 1
											lesbian += 1
											'<center><img src="images/inBed/ninel17.jpg"></center>'
											'You put on your knees and Ninel poke his fingers into her vagina inflamed. It flows so copiously that her fingers come in with a loud squelch.'
											'Doctor screams, flexes his magnificent ass ottopyrivaya itself is placed on your fingers. Her scent, her moans, her amazing body circling your head. You furiously fuck Ninel hand while she squirms under you and pleads:'
											'- Please do not stop! That''s it! That''s one-and-ak! Yes-ah! Oh yeah-ah!'

											act '...':
												cla
												*clr
												if ninelsex = 1:girl += 1

												orgasm += 1
												sick = 0
												horny = 0
												health = vital * 10 + stren * 5 + 1000
												willpower = intel * 5 + will * 5 + 1000
												manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
												clr
												gs 'stat'
												'<center><img src="images/inBed/ninel18.jpg"></center>'
												'You feel that you are about to explode and Ninel somehow understands this. She knocks you on your back and descends from above, dropping to your languishing pussy and substituting itself you my wet, with wide-open jaws, vagina.'
												'Without hesitation, you will again run into her fingers and start furiously nadrachivat her while wielding Ninel tongue between your legs. Another minute, and vagina doctors frantically squeezed out of it on your face, hands and splashed a thick white liquid. All Ninel body shakes in spasms, she muffled grunts, burying his tongue between your legs. You understand that it ends and it pulls like a spring'
												'You pierces stunning power orgasm. You shout from the incredible, almost unbearable pleasure, frantically bending, the third person of the perineum Ninel and ends - a long, painfully long. Orgasm lasts and lasts without end.'

												act 'Lie exhausted':
													cla
													*clr
													minut += 30
													clr
													gs 'stat'
													'<center><img src="images/inBed/ninel19.jpg"></center>'
													'You go down on the bed in the sweet exhaustion, still hugging Ninel. She opusketsya close and gently kissed you, asks:'
													'(Ninel) - Well, how do you feel?'
													'(You) - Ooh ... Just perfect - you answer and only then realize how much you are right - the disease has disappeared, you are full health and a wonderful mood. A sweet bouquet exhaustion makes this even more pleasant sensations'
													'(Ninel) - Well, you see. It''s magic, baby. Mm-m ... You''re just a miracle - a long time I did not get so much pleasure from their magic. If you get sick again - just call me. Well, if you just want to spend your time - look for me in the clinic.'
													'You promised to be sure to find her, closed his eyes and fell asleep. While you were sleeping, Ninel quietly dressed and left.'

													act 'Sleep':gt 'bed2'
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'ninel2':
	cla
	*clr
	minut += 10
	horny += 10
	clr
	gs 'stat'
	'<center><img src="images/inBed/ninel13.jpg"></center>'
	'Ninel lies down next to you and starts to kiss and caress your frankly half-naked body.'

	act 'Surrender weasel Ninel':
		cla
		*clr
		minut += 10
		horny += 10
		clr
		gs 'stat'
		'<center><img src="images/inBed/ninel14.jpg"></center>'
		'Ninel opens her robe, exposing beautiful breasts with nipples strained. You realize that she too excited.'
		'She caresses your breasts with her hands, then her lips, tugging and sucking nipples. You moan softly and it inflames it even stronger.'
		'Ninel lifts hem - underwear on it there - and runs fingers between her legs.'

		act 'Enjoy':
			cla
			*clr
			minut += 10
			horny += 10
			clr
			gs 'stat'
			'<center><img src="images/inBed/ninel15.jpg"></center>'
			'You groan under her caresses and Skills Ninel lips - oh my God! - Slide your body down and down ...'
			'Minute, and she crouches to your burning flowing juices pussy and her tongue goes into her wet depths'
			'You emit voluptuous scream, then another and another ... Waves of pleasure pierce your body trembles from the womb to the fingertips. You are incredibly good!'
			'Ah, Ah''s! More, more-oh-oh-oh! - Pray you.'

			act 'Change position':
				cla
				*clr
				horny = 100
				kuni += 1
				clr
				gs 'stat'
				'<center><img src="images/inBed/ninel16.jpg"></center>'
				'With a flick of Ninel leans forward and sits on top of you. You feel like her pussy juices flowing out of your rubs. You groan, his hands clench elastic buttocks doctors and hold her. Stronger! Even stronger! About - what bliss!'
				'Ninel rubs against you faster, powerful, almost masculine tolchkakmi, voluptuously groaning with every movement - it''s crazy!'
				'- Oh, <<$name>>, <<$name>>! - Doctor exhales:- I want you so much! Caress me, weasel-ah-ah-ah!'

				act 'Caress Ninel':
					cla
					*clr
					ninelsex += 1
					lesbian += 1
					'<center><img src="images/inBed/ninel17.jpg"></center>'
					'You put on your knees and Ninel poke his fingers into her vagina inflamed. It flows so copiously that her fingers come in with a loud squelch.'
					'Doctor screams, flexes his magnificent ass ottopyrivaya itself is placed on your fingers. Her scent, her moans, her amazing body circling your head. You furiously fuck Ninel hand while she squirms under you and pleads:'
					'- Please do not stop! That''s it! That''s one-and-ak! Yes-ah! Oh yeah-ah!'

					act '...':
						cla
						*clr

						if ninelsex = 1:girl += 1

						orgasm += 1
						sick = 0
						horny = 0
						health = vital * 10 + stren * 5 + 1000
						willpower = intel * 5 + will * 5 + 1000
						manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
						clr
						gs 'stat'
						'<center><img src="images/inBed/ninel18.jpg"></center>'
						'You feel that you are about to explode and Ninel somehow understands this. She knocks you on your back and descends from above, dropping to your languishing pussy and substituting itself you my wet, with wide-open jaws, vagina.'
						'Without hesitation, you will again run into her fingers and start furiously nadrachivat her while wielding Ninel tongue between your legs. Another minute, and vagina doctors frantically squeezed out of it on your face, hands and splashed a thick white liquid. All Ninel body shakes in spasms, she muffled grunts, burying his tongue between your legs. You understand that it ends and it pulls like a spring'
						'You pierces stunning power orgasm. You shout from the incredible, almost unbearable pleasure, frantically bending, the third person of the perineum Ninel and ends - a long, painfully long. Orgasm lasts and lasts without end.'

						act 'Lie exhausted':
							cla
							*clr
							minut += 30
							clr
							gs 'stat'
							'<center><img src="images/inBed/ninel19.jpg"></center>'
							'You go down on the bed in the sweet exhaustion, still hugging Ninel. She opusketsya close and gently kissed you, asks:'
							'(Ninel) - Well, how do you feel?'
							'(You) - Ooh ... Just perfect - you answer and only then realize how much you are right - the disease has disappeared, you are full health and a wonderful mood. A sweet bouquet exhaustion makes this even more pleasant sensations'
							'(Ninel) - Well, you see. It''s magic, baby. Mm-m ... You''re just a miracle - a long time I did not get so much pleasure from their magic. If you get sick again - just call me. Well, if you just want to spend your time - look for me in the clinic.'
							'You promised to be sure to find her, closed his eyes and fell asleep. While you were sleeping, Ninel quietly dressed and left.'

							act 'Sleep':gt 'bedr'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'ninel3':
	cla
	*clr
	horny = 50
	clr
	gs 'stat'
	'<center><img src="images/inBed/ninel20.jpg"></center>'
	'You lie in bed and quietly waiting Ninel fingers caress her pussy to prepare herself for her coming, so when the bell rings you are ready.'

	act 'Come - open!':
		cla
		*clr
		'<center><img src="images/inBed/ninel21.jpg"></center>'
		'(You) - Come - open! - Wheezing you your sore throat and enters the room Ninel.'
		'(Ninel) - Hi, <<$name>>. Again ill?'
		'(You coughed into his fist) - Yeah. I''ll fly?'
		'(Ninel) - Sure, baby. Undress - I''ll listen.'
		'(You) - Why? You''re a magician ...'
		'(Ninel laughs) - Silly. How could you not know much about magic. I''m must to know what will be treated, otherwise it will happen as the old song - make like a thunderstorm, and got a goat. Magic - the exact thing'
		'(You) - Here''s how ... Well then, of course.'

		act 'Undress':
			cla
			*clr
			horny = 75
			clr
			gs 'stat'
			'<center><img src="images/inBed/ninel22.jpg"></center>'
			'You undress and Ninel hears your lungs. As usual, her arms are light and tender and touching her stethoscope on your chest swell sultry heat'
			'(Ninel) - Yes ... You again wheezing. And much. Temperature is high?'
			'(You) - A Aptchee and! Yes - 39.6 ...'
			'(Ninel) - Oh, you poor thing. Let''s Pomeroy.'
			'(You winking) - The usual?'
			'(Ninel smiling) - Well, no. You''re so excited and DRILLING measures - that and look over.'
			'(You) - Do u have ...'
			'(Ninel) - What - like it? A first feared ... Nothing - another time'

			act 'Trying temperature':
				cla
				*clr
				'<center><img src="images/inBed/ninel23.jpg"></center>'
				'Ninel looks at the thermometer and shakes his head:'
				'(Ninel) - Yes ... it''s bad. Do not worry - we can help it burn.'
				'She slowly pulls down your blanket ...'

				act 'Unbuttoning her robe Ninel':
					cla
					*clr
					horny = 100
					clr
					gs 'stat'
					'<center><img src="images/inBed/ninel24.jpg"></center>'
					'You can no longer hold back - rather, rather enjoy caresses Ninel. Poryvstym movement to unbutton her gown'
					'Skillful hands of Dr. glide over your body, but not in a hurry to the most desirable townships'
					'(You) - Caress me - I''m burnin! I want you so much! - Breathless whisper you, but your cruel mistress just grins:'
					'(Ninel) - Ask me - show me how much you want.'
					'(You) - Ninel, darling, darling, please - caress me! Take me - I''m all yours! I beg you! I beg you - soon!'
					'(Ninel) - ask for more! Beg me!'
					'(You almost crying) - Please, please, please! I beg you, I beg you - caress me! I''m dying to!'

					act 'Beg and plead':
						cla
						*clr
						'<center><img src="images/inBed/ninel25.jpg"></center>'
						'You beg and plead Ninel pity and finally she condescends to your pleas and rushes her tongue into a sweet journey of your bosom'
						'You shrieks and groans of the voluptuous heat waves diverge in the body, your pussy juice and lustful expires Ninel guzzles the juice'
						'You walk up to the finale, when Ninel suddenly interrupted and broken voice commands:'
						'(Ninel) - Now I am. Appease me'

						act 'Ninel humor language':
							cla
							*clr
							'<center><img src="images/inBed/ninel26.jpg"></center>'
							'Ninel siphoned on the bed and you start to caress and lick her vagina. Ninel incensed as you are - she screams and moans from your touch, her pussy oozing thick goo, you eagerly licks it off but it still flows and flows, zalivvaya your face and her thighs'
							'(Ninel, through groans) - Good ... A-ah! Good girl ... Come-ah ..!'

							act '69':
								cla
								*clr
								'<center><img src="images/inBed/ninel27.jpg"></center>'
								'You go into the pose "69" and lachinaete eagerly lick each other, alternating affection cries and groans.'
								'You are getting closer and closer to the peak, and Ninel seem too, but then she stopped again'
								'(You) - Please, please, go on! I am about to finish! - Pray you, and caress her insistently, hoping ontvetnuyu reaction, but Ninel strongly otrvyaet you from yourself'
								'(Ninel) - No ... Not so! I want you to death itself.'

								act 'Masturbate pussy':
									cla
									*clr
									'<center><img src="images/inBed/ninel29.jpg"></center>'
									'With a groan, you obey and begin their desperate nadrachivat burning throbbing pussy. Next Ninel doing the same thing. Species, which spreads through the room spicy smell your juices languid moans your mistress and furious fingers work elevate you to the peak of bliss. You scream and squirm in orgasm and Neiel under you also beats and screaming - it also ends'

									act 'Fall in exhaustion':
										cla
										*clr
										horny = 0
										minut += 40
										orgasm += 1
										lesbian += 1
										ninelsex += 1
										SUB += 1
										sick = 0
										health = vital * 10 + stren * 5 + 1000
										willpower = intel * 5 + will * 5 + 1000
										manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
										clr
										gs 'stat'
										'<center><img src="images/inBed/ninel28.jpg"></center>'
										'You are lying in the arms of Ninel and pant, moving away from the crushing orgasm'
										'You feel like a the totally healthy, but extremely exhausted'
										'(You) - Thank you, dear. - Whisper you.'
										'(Ninel) - Pozhluysta. Visit me sometime in the clinic. With you I am particularly good.'
										'You promise exhausted reclining on a wet crumpled sheet and go to sleep, and Ninel quietly dressed and out'

										act 'Sleep':gt 'bedr'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- housecall ---------------------------------
# bedrPar
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Your bedroom</font></b></center>'
! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
'<center><img src="images/qwest/alter/bedrPar.jpg"></center>'
'Small room in which hardly squeezed <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">cabinet</a>, your <a href="exec:gt ''bedPar''">bed</a>, <a href="exec:gt ''stolPar''">desk</a> bed and sisters.'
gs 'family'

if tanga = 0:tanga = 1

act 'Leave the room':gt 'korrPar'

if student > 0 and kursovik < 100:
	act 'Write coursework (1:00)':
		cla
		*clr
		minut += 60
		kursovik += rand(intel / 20, intel / 10)

		if kursovik > 100:kursovik = 100

		manna -= 10
		'<center><img src="images/etogame/study.jpg"></center>'
		'You sat on the course work and prepared her for <<kursovik>> percent.'

		act 'Leave':gt $curloc
	end
end

if horny >= 50 and sisterHere = 0:
	act 'Masturbate':gt 'selfplay'
end
if pornMagazine > 0:'Under the mattress you have hidden pornozhurnal.'
if sisterHere = 0 and pornMagazine > 0:dynamic $d_read_porn

dynamic $d_read_book

if tovarL > 0:'You have kept <<tovarL>> One unit of small goods. The maximum you can keep in your room 30 One unit of product.'

if card > 0:
	 act 'Take a deck of cards':gt 'card'
end

if dur > 0:'You have hidden <<dur>> doses pale lady'

if dur > 0 and narkday ! day:
	act 'Nyuhnut pale lady 5 min':
		cla
		*clr
		minut += 5
		narkday = day
		health = vital * 10 + stren * 5
		willpower = intel * 5 + will * 5
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		horny = 100
		nark += 10
		dur -= 1
		'<center><img src="images/pic/dur.jpg"></center>'
		'You otsypali dose of powder and its nyuhnuli, then you feel just fine.'

		act 'Leave':gt $curloc
	end
end

--- bedrPar ---------------------------------
# bedrPar2
act 'Leave the room':gt 'korrPar'

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Master bedroom</font></b></center>'
! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
'<center><img src="images/qwest/alter/bedrPar2.jpg"></center>'
'The room in which the parents live. In the center stands a double bed and a large clowall.'
gs 'family'

if hour = 21 and parsexrand = 5 and parentsexday ! daystart:gt 'seeparentsex'

--- bedrPar2 ---------------------------------
# seeparentsex
parentsexday = daystart
gs 'stat'
'<center><img src="images/qwest/alter/ev2/see.jpg"></center>'
'Looking at the door to his parents in the bedroom as you saw your mother ''s stepfather fucks cancer.'

act 'Leave':gt 'korrPar'

if horny >= 50:
	act 'Peep':
		cls
		horny += 10
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/see.jpg"></center>'
		'You pry as your nurse podmahivaet asshole stepfather.'

		act 'Leave':gt 'korrPar'
	 end
end

--- seeparentsex ---------------------------------
# sitrPar
act 'Leave the room':gt 'korrPar'

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Hall</font></b></center>'
! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
'<center><img src="images/qwest/alter/sitrPar.jpg"></center>'
'In the window is a <a href="exec:gt ''tvPar''">TV</a>. Front of the TV is a sofa on which sleeps at night your brother. The wall is a wall with utensils and books.'
gs 'family'

if month = 12 and day >= 30:
	'TV stands near a Christmas tree decorated with toys and garlands.'
elseif month = 12 and day = 31 and hour >= 20:
	act 'Celebrate the New Year with family.':
		cls
		mother = 100
		father = 100
		sister = 100
		brother = 100
		money += 5000
		salo += 5
		fat += 10
		hour = 23
		minut = 0
		minut += 120
		son = 0
		manna += 1000
		wipo += 1000
		energy += 50
		water += 50
		gs 'stat'
		'You sat at the festive table laid in front of the TV and began to celebrate the New Year with family and blue light going on TV. At the table struck up a dialogue and common problems were forgotten, all having fun and talking to each other. at midnight, before the chimes you heard congratulations President, which as always promised, they all will be well, if you ''ll be better off working. Then drank champagne clinking glasses and congratulating each other happy new year. Mom gave you an envelope with a greeting card and five thousand rubles. For a while you continue watching TV ate and drank champagne, but soon was evident ,that family members are exhausted and began to disperse to sleep.'

		act 'Leave':gt $curloc
	end
elseif month = 1 and day = 1:
	act 'Eat up salads with festive table':
		cla
		*clr
		frost = 0
		minut += 15
		health += 10
		manna += 20
		energy += 20
		water += 20
		salo += 1
		fat += 3
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You had finished salads remaining on the table after the holiday.'

		act 'Get up from the table':gt $locM, $metkaM
	end
end

--- sitrPar ---------------------------------
# vanrPar
act 'Leave the room':gt 'korrPar'

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Bath</font></b></center>'
! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
'<center><img src="images/qwest/alter/vanrPar.jpg"></center>'
'Bathroom cramped and very unpretentious.'

if stanok > 0:'Your razor will suffice for <b><<stanok>></b> time.'

act 'Wash in the shower (0:15)':
	cls
	dynamic $showerdin
	minut += 15
	horny += 1
	hapri = 0
	mop = 1
	sweat = -3

	if frost > 0:frost = 0

	gs 'stat'
	'<center><img src="images/pics/dush.jpg"></center>'
	'You got into the shower and began to lather your body washcloth. After washed soap and washed hair with shampoo. Rinse off the shampoo you become completely clean.'

	act 'Out of the bath':gt $locM, $metkaM
end

act 'Wash in the bathroom (1:00)':
	cls
	dynamic $showerdin
	minut += 60
	sweat = -3
	horny += 3
	hapri = 0
	mop = 1
	manna += 10

	if frost > 0:frost = 0

	skinvan += 1

	if skinvan = 20:skinvan = 0 & skin += 1

	gs 'stat'
	'<center><img src="images/pics/wash4.jpg"></center>'
	'Turn on the water, you got into the bathroom and went into the warm water. Ponaslazhdatsya pleasant warmth you lathered his body sponge and hair shampoo. Then all you have washed off with water.'

	act 'Out of the bath':gt $locM, $metkaM
	if horny >= 90:
		act 'Direct water on pussy':
			cla
			*clr
			horny = 0
			minut += 30
			mastr += 1
			orgasm += 1
			manna += 15
			willpower += 15
			'<center><img src="images/pics/wash7.jpg"></center>'
			'You sent a water faucet on pussy and tight jet of warm water began to caress you. Soon you will feel like a warm wave covers your entire body and you began to shudder in orgasm.'

			act 'Get out and get dressed':gt $locM, $metkaM
		end
	elseif horny >= 40 and horny < 90:
		act 'Direct water on pussy':
			cla
			*clr
			horny += 5
			minut += 30
			manna += 10
			willpower += 10
			'<center><img src="images/pics/wash7.jpg"></center>'
			'You sent a water faucet on pussy and tight jet of warm water began to caress you. At first it was not even bad, but then sleep and arousal, even as it was not nice. So you stopped masturbating.'

			act 'Get out and get dressed':gt $locM, $metkaM
		end
	end

	if horny >= 50:
		act 'Masturbate':gt 'selfplay'
	end
end



if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Use a tampon (0:05)':
		cla
		*clr
		tampon -= 1
		isprok = 1
		minut += 5
		manna -= 5
		gs 'stat'
		'<center><img src="images/pics/wash3.jpg"></center>'
		'You use a tampon.'

		act 'Finish':gt $curloc
	end
end

if mop ! 1:
	act 'Wash off cosmetics (0:15)':
		cla
		mop = 1
		cumface = 0
		minut += 15
		gs 'stat'
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You washed off your makeup.'

		act 'Finish':gt $curloc
	end
end

if cumfrot > 0:
	act 'Wipe the cum off your clothes (0:10)':
		cla
		cumfrot = 0
		minut += 10
		gs 'stat'
		'<center><img src="images/etogame/frotsp.jpg"></center>'
		'You remove traces of cum from your clothes.'

		act 'Finish':gt $curloc
	end
end

if cumlip > 0 or cumface > 0:
	act 'Clean your face from sperm (0:05)':
		cla
		*clr
		mop = 1
		cumlip = 0
		cumface = 0
		sweat -= 1
		minut += 5
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You clean your face and got rid of any trace of cum.'

		act 'Finish':gt $curloc
	end
end

if leghair > 0 and stanok > 0:
	act 'Shave your legs (0:15)':
		cla
		*clr
		minut += 15
		leghair = -5
		horny += 5
		stanok -= 1
		'<center><img src="images/pics/shave.jpg"></center>'
		'You lathered his feet and took a razor. Deft movements you shaved hair on the legs and washed shaving foam.'

		act 'postpone machine':gt $curloc
	end
end

if lobok > 0 and stanok > 0:
	act 'Shave pubis (0:15)':
		cla
		*clr
		minut += 15
		lobok = -5
		horny += 5
		stanok -= 1
		'<center><img src="images/pics/shave3.jpg"></center>'
		'You lathered crotch and took a razor deft movements began to shave pubic hairs and shave pussy vokurug. Finally shaving was finished and you flushed with foam pussy.'

		act 'postpone machine':gt $curloc
	end
end

if analplug = 1 and analplugin = 1:
	act 'Remove the butt plug (0:05)':
		cla
		*clr
		minut += 5
		analplugIN = 0

		if anus < 30:anus += 1

		'<center><img src="images/etogame/analplug.jpg"></center>'
		'You bent over and took out the butt plug.' & !!0.2.6: Removed unneccessary var check

		act 'Finish':gt $curloc
	end
elseif analplug = 1 and analplugin = 0 and klismaday1= 1 and plugday ! daystart:
	act 'Insert a butt plug (0:05)':
		cla
		*clr
		plugday = daystart
		minut += 5
		analplugIN = 1

		if anus < 10:anus += 5
		if anus >= 10 and anus < 20:anus += rand(1, 2)
		if anus >= 20 and anus < 30:anus += rand(0, 1)

		! WD: Remove Dupe Images ~ '<center><img src="images/pic/analplug.jpg"></center>'

		'<center><img src="images/etogame/analplug.jpg"></center>'

		if butpluguse > 0:'You bent over and inserted the butt plug.'
		if butpluguse = 0:butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'

		act 'Finish':gt $curloc
	end
end

if klisma = 1 and klismaday ! day:
	act 'Give yourself an enema (0:05)':
		cla
		*clr
		minut += 5
		klismaday = day
		klismaday1 = 1
		'<center><img src="images/picV/klisma.jpg"></center>'
		'You put yourself an enema and clean intestines, now your ass is ready for anal sex.'

		act 'Finish':gt $curloc
	end
end

if vibrator = 1 and vibratorIN = 1:
	act 'Remove the vibrator (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 0

		if vagina < 30:vagina += 1

		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and take the vibrator out of your pussy.'

		act 'Finish':gt $curloc
	end
elseif vibrator = 1 and vibratorIN = 0 and vagina ! 0:
	act 'Insert the vibrator in your vagina (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 1

		if vagina < 30:vagina += 2

		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and inserted the vibrator in your pussy.'

		act 'Finish':gt $curloc
	end
end

if pregtest > 0:
	act 'Do a pregnancy test':
		cla
		pregtest -= 1
		gs 'stat'

		if preg = 1:
			'The test showed the two strips. you are pregnant.'
			'you think, that the father <<$father>>.'
		else
			'The test showed one band.'
		end

		act 'Further':gt $curloc
	end
end

--- vanrPar ---------------------------------
# kuhrPar
act 'Leave the room':gt 'korrPar'

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
minut += 1
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Kitchen</font></b></center>'
! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
'<center><img src="images/qwest/alter/korrPar.jpg"></center>'
'The kitchen is next to the stove sink. Large refrigerator in the corner and kitchen table with chairs is against the wall.'
gs 'family'

act 'Eat (0:30)':
	cla
	*clr
	gs 'stat'
	frost = 0
	minut += 30
	health += 10
	manna += 20
	'<center><img src="images/pics/food.jpg"></center>'

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		!!fat += 1
		'You gladly ate cooked food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	else
		water += 20
		'You gladly drank a mug of tea.'
	end

	gs 'stat'

	act 'Get up from the table':gt $locM, $metkaM
end

act 'Have a snack (0:15)':
	cla
	*clr
	gs 'stat'
	frost = 0
	minut += 15
	health += 10
	manna += 20
	'<center><img src="images/pics/food.jpg"></center>'

	if energy >= 30:
		fat += 3
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 1
		energy += 5
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 10
		!!fat += 1
		'You gladly ate cooked food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	else
		water += 20
		'You gladly drank a mug of tea.'
	end

	gs 'stat'

	act 'Get up from the table':gt $locM, $metkaM
end

act 'Drink':
	cls

	if water >= 20:
		'You don''t need any more tea.'
	else
		water += 20
		'You gladly drank a mug of tea.'
	end

	gs 'stat'

	act 'Get up from the table':gt $locM, $metkaM
end

if pranik > 0:
	'Cookies will suffice for <<pranik>> time.'

	act 'Drink tea with cookies (0:05)':
		cla
		*clr
		minut += 5
		pranik -= 1
		health += 30
		manna += 100
		energy += 20
		water += 20
		fat += 50
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You drank tea with cookies, sweet and very bad for the figure, but so nice.'

		act 'Get up from the table':gt $curloc
	end
end

if edaD > 0:
	act 'Eat diet food (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'
		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		else
			water += 20
			'You gladly drank a cup of tea.'
		end

		act 'Get up from the table':gt $curloc
	end
end

if fatdel > 0:
	act 'Consume fat burners':
		cla
		*clr
		if fat > salo:fat = salo

		fatdel -= 1
		fat -= 25

		if fat < 0:fat = 0

		'You drank fat burning capsule. These capsules are gradually and results will be seen at once.'

		act 'Get up from the table':gt $curloc
	end
end

if lekarstvo > 0:
	'you <<lekarstvo>> tablets.'

	if sick > 0 and lekarday ! day:
		act 'Take a pill (0:05)':
			cla
			*clr
			minut += 5
			lekarday = day
			lekarstvo -= 1
			sick -= sick * 20 / 100
			lekrand = rand(1, 9)
			'<center><img src="images/inBed/lekr<<picrand>>.jpg"></center>'
			'You swallowed the pill'

			act 'move away':gt $curloc
		end
	end
end

if vitamin > 0:
	'you <<vitamin>> vitaminok.'

	if vitaminday ! day:
		act 'Take vitamins (0:05)':
			cla
			*clr

			if fat > salo:fat = salo

			minut += 5
			vitaminday = day
			vitamin -= 1
			frost = 0

			if KandidozOnce = 1:Kandidoz -= 2
			if GerpesOnce = 1:Gerpes -= 2
			if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)

			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

			'You took some vitamins'

			act 'Move away':gt $curloc
		end
	end
end

--- kuhrPar ---------------------------------
# korrPar
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
popolaini = 0
saunaYouRoom = 0
boycherdaksex = 0
frost = 0
minut += 1
bonusZ = 0
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
if hour ! 18 and blockBedrPar = 1:blockBedrPar = 0

if blockBedrPar = 0:
	if sisboyday + 1 = daystart and hour = 18 and sisboytrioQW = 1:
		act 'Go to your room':gt 'sisterQW', 'sisboytrioQW_bedroom', 'start'
	elseif sisboyday + 1 = daystart and hour = 18 and (sisboyQW = 3 or sisboyQW = 5 or sisboyQW = 7 or sisboyQW = 9):
		act 'Go to your room':gt 'sisterQW', 'sisboyQW_bedroom'
	else
		act 'Go to your room':gt 'bedrPar'
	end
end

act 'Go to my parents'' room':gt 'bedrPar2'
act 'Going to the living room':gt 'sitrPar'
act 'Go to the bathroom':gt 'vanrPar'
act 'Go to the kitchen':gt 'kuhrPar'

act '<b>Go to the street</b>':
	if $clothingworntype ! 'nude':
		gt 'gorodok'
	else
		msg 'You are not dressed.'
		gt $curloc
	end
end
'<center><b><font color="maroon">corridor</font></b></center>'
'<center><img src="images/qwest/alter/korrPar.jpg"></center>'
'On the wall near the front door hanging <a href="exec:gt ''mirror'', ''start''">mirror</a>.'

if palto > 0:'Hanging on the hook <<$palto>>'

gs 'family'

if hour >= 16 and hour <= 20 and indorf = 0:
	if artemvbrosvid = 1 and artemhakday ! daystart and motherQW < 2 and mothervideotalk = 0:
		cls
		BJvideoPublic = 1
		manna = 0
		gs 'stat'
		'<center><b><font color="maroon">mom</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'
		'Mom backed hips hands "I then tossed a video with you ....... I never smacked you ....yes see in vain ... You realize that maybe this video is not only my? What about you now will speak.. What about you ... about all our family ... I guess you need to teach you a lesson. Volodya!"'

		act 'Beg to do nothing':
			cls
			mothervideotalk = 2
			minut += 5
			sub += 50
			gs 'stat'
			'<center><b><font color="maroon">mom</font></b></center>'
			'<center><img src="images/qwest/alter/mother.jpg"></center>'
			'You burst into tears: "Mommy !forgive! This will never happen again! I made ​​a fool that ''s what I ''ll never..never_..." You weep and kneel. Mother looks at you and shakes his head out.'

			act 'Move away':gt $curloc
		end

		act 'Be silent':
			cls
			mothervideotalk = 3
			minut += 5
			dom += 10
			spank += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/spank.jpg"></center>'
			'You stand staring at the floor. And what can I say?'
			'Mother takes you by the hand and leads into the room: "Take off your pants and bend over!" You shake my head. " Volodya - keep it!" Stepfather grabs you and keeps .mother pulls your underwear takes the belt and starts to flog you. Gritting her teeth . Lifting his head as you see through the open door behind it to watch your brother and sister.'

			act 'Move away':gt $curloc
		end

		if momslut >= 2:
			act 'Threaten':
				cls
				mothervideotalk = 1
				minut += 5
				gs 'stat'
				'<center><b><font color="maroon">A_Mother</font></b></center>'
				'<center><img src="images/qwest/alter/mother.jpg"></center>'
				'"Come on -come_on - call the father! I''ll tell you what his daughter! And who went!"'
				'Mother is looking at you and spit on the floor leaves.'

				act 'Move away':gt $curloc
			end
		end

		exit
	end

	if artemvbrosvid=1 and artemhakday ! daystart and motherQW >= 2 and mothervideotalk = 0:
		cls
		BJvideoPublic = 1
		manna = 0
		gs 'stat'
		'<center><b><font color="maroon">Mom</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg" ></center>'
		'Mom backed hips hands "What''s this about a video of you? How could you be this careless? You DO realize this is going to reflect badly on the entire family..."'

		act 'Apologize':
			cls
			mothervideotalk = 1
			minut += 5
			mother -= 40
			gs 'stat'
			'<center><b><font color="maroon">mom</font></b></center>'
			'<center><img src="images/qwest/alter/mother.jpg" ></center>'
			!!placeholder I guess, I''m sure I can come up with something better
			'"I don''t know what to say, mom... I''m sorry"'
			'Mother shakes her head, glaring at you, and walks away'

			act 'Move away':gt $curloc
		end

		exit
	end

	if schoolprogul > 2 and SchoolAtestat = 0:
		cls
		gs 'stat'
		'<center><b><font color="maroon">mom</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'

		if schoolPredupr = 2:
			schoolPredupr = 3
			SchoolBlock = 1
			ParHomeBlock = 1
			schoolprogul = 0
			if $clothingworntype = 'sforma':gs 'clothing', 'strip'
			'In the corridor you vsrechaet mother, her eyes thundered. "Doprygat? Thee out of high school. All live the way you want, I am no longer a mother!" Mother gathered your things in a bag, put the bag in your hands and thrown by the scruff of the apartment.'

			act 'Leave':gt 'gorodok'

			exit
		elseif schoolPredupr = 1:
			schoolPredupr = 2
			schoolprogul = 0
			Suspeh -= 40
			'In the corridor you vsrechaet mother, her eyes thundered. "That was the school. Again You absenteeism. You already want to exclude from school, I was literally on his knees begging the directors can not exclude you and give you one last chance to reform. More because of you I will not be humiliated and remember. Next time you Departure from school! And if you fly out of school, I will personally kick him out of the house if you do not understand a normal relationship, then get out, no one does not keep you here! "Mother angrily left the room.'
		elseif schoolPredupr = 0:
			schoolPredupr = 1
			mother = 0
			schoolprogul = 0
			Suspeh -= 20
			'In the corridor you vsrechaet mother, her eyes thundered. "That was the school. You solid absenteeism. For the first time you have forgiven, but the next you just kicked. What are you doing, balbeska?" Mother angrily left the room.'
		end

		act 'Move away':gt $curloc

		exit
	end
end

if hour >= 15 and hour < 20:
	if Gcall = 0:
		numnpcboy = 0
		:markboyfrendcall
		numnpcboy += 1

		if otnBoyFrend[numnpcboy] >= 20 and boyinday[numnpcboy]!day:
			Gcall = 1
			jump 'markboyfrendcall2'
		end

		if numboyFrend > numnpcboy:jump 'markboyfrendcall'
	end
else
	if Gcall > 0:Gcall = 0
end

:markboyfrendcall2

if Gcall > 0:'In the hallway rings <a href="exec:gt ''gtelefon''">phone</a>.'
if motherWorry = 1:gt 'mother'

--- korrPar ---------------------------------
# selfplay
$d_self_ass_fingering = {

}

$d_self_fingering = {
	act 'Poke a finger in the vagina':
		cls
		minut += 2
		selfplaytime += 2
		'<center><img src="images/qwest/selfplay/finger.jpg"></center>'

		if vagina = 0 and mesec <= 0:
			'You caress fingers on his lips soft and wet pussy and began to gradually introduce his finger in the pussy, but you stumble upon a resilient barrier their hymen.'

			act 'Pierce the hymen':
				cls
				horny -= 25
				vagina += 1
				minut += 5
				selfplaytime += 5
				manna -= 100
				gs 'stat'
				'<center><img src="images/qwest/selfplay/finger.jpg"></center>'
				'You stuck my finger in the pussy and forcefully pressed the hymen, it is a little bent inside your body and suddenly broke your finger and went inside completely. Inside was a little pussy hurt, you got yourself out of his finger and saw that he was in the blood.'

				act 'Rest':gt $curloc
			end
		elseif vagina > 0:
			'You have entered my finger into the vagina and then another.'

			if vagina < 5:
				horny += rand(2, 5)
				'Slippery walls of your pussy very tightly clasped fingers.'
			elseif vagina >= 5 and vagina < 10:
				horny += rand(5, 10)
				'You feel your pussy slippery wall around your fingers.'
			elseif vagina >= 10:
				horny += rand(2, 5)
				'Your pussy is quite spacious for a couple of fingers sliding your fingers and you feel your pussy slippery wall.'
			elseif vagina < 5:
				vaginaTemp += 1
			end

			act 'Fuck her fingers':
				cls
				minut += 5
				selfplaytime += 5

				if vagina <= 10:horny += rand(5, 10)
				if vagina > 10:horny += rand(2, 5)

				'<center><img src="images/qwest/selfplay/finger.jpg"></center>'
				'You started to fuck her pussy fingers typing them in his bosom, and moving them.'

				if vagina <= 10:'Your pussy gently grabs your fingers and you feel pleasant warmth spreads in the abdomen.'
				if vagina > 10:'Snatch quite spacious and you have to work pretty hard, that would at least feel something from their fingers.'

				gs 'stat'

				if vagina < 10:vaginaTemp += 1

				if horny >= 100:
					orgasm += 1
					horny = 0
					manna = mannamax
					'Suddenly, as if you hit in the abdomen and shock began pleasant spasms, you squirm biting her lip, that would not scream with pleasure.'
				end

				if horny > 0:dynamic $d_self_fingering2

				act 'Break':gt $curloc
			end
		elseif mesec > 0:
			manna -= 5
			'Vagina slightly covered with dried blood from your period. You tried to shove a finger, but you will immediately become not nice.'
		end

		gs 'stat'

		act 'Break':gt $curloc
	end
}

$d_self_fingering2 = {
	act 'Thrust his hand into the vagina':
		cls
		minut += 2
		selfplaytime += 2
		'<center><img src="images/qwest/selfplay/hand.jpg"></center>'

		if vagina > 0:
			'You have entered yourself whole hand into the vagina.'

			if vagina < 10:
				if vgape = 2:vgape = 3
				if vgape = 1:vgape = 2
				if vgape = 0:vgape = 1

				vgapetime = totminut
				horny -= 10
				manna -= 10
				'You shoved all the fingers in the pussy and you will immediately become very painful.'
			elseif vagina >= 10 and vagina < 15:
				horny += rand(1, 3)
				'You all stuck his fingers in your pussy and feel like your vagina is very tight wraps fingers seem just a little bit and you have something broken.'
			elseif vagina >= 15 and vagina < 20:
				horny += rand(3, 6)
				'You all stuck his fingers in your pussy and feel how your vagina tight wraps his fingers hot and wet walls.'
			elseif vagina >= 20:
				horny += rand(6, 12)
				'You all stuck his fingers in your pussy and feel how your vagina grabs his fingers hot and wet walls. You cover a pleasant feeling of fullness.'
			elseif vagina < 15:
				vaginaTemp += 1
			end

			act 'Fuck her palm':
				cls
				minut += 5
				selfplaytime += 5

				if vagina < 10:
					if vgape = 2:vgape = 3
					if vgape = 1:vgape = 2
					if vgape = 0:vgape = 1

					vgapetime = totminut
					horny -= 10
					manna -= 10
				end

				'<center><img src="images/qwest/selfplay/hand.jpg"></center>'
				'You started to fuck her pussy fingers typing them in his bosom, and moving them.'

				if vagina <= 15:horny -= 10 & manna -= 10 & 'Does it hurt when you''re trying to fuck her pussy with his palm.'
				if vagina > 10:horny += rand(10, 20) & 'Snatch quite spacious and you have to work pretty hard, that would at least feel something from their fingers.'

				gs 'stat'

				if vagina < 20:vaginaTemp += 1

				if horny >= 100:
					orgasm += 1
					horny = 0
					manna = mannamax
					'Suddenly, as if you hit in the abdomen and shock began pleasant spasms, you squirm biting her lip, that would not scream with pleasure.'
				end

				dynamic $d_self_fingering2

				act 'Break':gt $curloc
			end
		end

		gs 'stat'

		act 'Break':gt $curloc
	end
}

$d_van_vtor = {
	if indorf = 0:
		cls
		horny -= 50
		manna -= 10
		gs 'stat'
		'In the bathroom chattering "<<$name>>! Are you, drowned or something? Get out of the bath!"'

		act 'Get out of the bath':
			analplay = 0
			selfplaytime = 0
			mastrOnce = 0
			proverkasisterhere = 0

			if vaginaTemp > vagina * 2:vagina += 1 & vaginaTemp = 0

			gt $loc, $metka
		end

		exit
	end
}

!!if $loc = 'vanrPar' and selfplaytime> = 60:dynamic $d_van_vtor
!!dynamic $d_sis_prov

$d_sis_prov = {
	if sister_indorf = 0:
		if $loc = 'bedrPar':
			gs 'family'

			if sisterHere = 0 and proverkasisterhere = 0:proverkasisterhere = 1
			if sisterHere > 0 and proverkasisterhere = 2:gt $curloc
		end
	end
}

if mastrOnce = 0:mastr += 1 & mastrOnce = 1

gs 'stat'

if $loc = 'bedrPar' or $loc = 'Gadsarai':'<center><img src="images/qwest/selfplay/start.jpg"></center>'
if $loc = 'vanrPar':'<center><img src="images/qwest/selfplay/startvann.jpg"></center>'

!!then the calculation invasion
if $loc = 'vanrPar':
	if selfplaytime >= 60:
	end
end

if $loc = 'bedrPar':
	gs 'family'

	if sister_indorf = 0:
		if sisterHere = 0 and proverkasisterhere = 0:proverkasisterhere = 1

		if sisterHere > 0:
			cls
			gs 'stat'

			!!if $loc = 'bedrPar':'<center><img src="images/qwest/selfplay/start.jpg"></center>'

			if $loc = 'vanrPar':
				'<center><img src="images/qwest/selfplay/startvann.jpg"></center>'
			else
				'<center><img src="images/qwest/selfplay/start.jpg"></center>'
			end

			if proverkasisterhere = 2:
				SisterKnowMastr += 1
				'<font color="red"><b>Anja saw that you masturbate.</b></font>'
			end

			if proverkasisterhere = 1:
				proverkasisterhere = 2
				'<font color="red"><b>You hear footsteps approaching your room.</b></font>'
			end
		end
	end
end

if dildo = 1:'Do you have a small long dildo 10 cm.'
if middildo = 1:'Do you have a long dildo 15 cm.'
if largedildo = 1:'Do you have a long dildo 20 cm.'
if bigdildo = 1:'Do you have a long dildo 25 cm.'
if extradildo = 1:'Do you have a long dildo 30 cm.'
if superdildo = 1:'Do you have a long dildo 35 cm.'
if maddildo = 1:'Do you have a long dildo 40 cm.'

if horny > 0:
	act 'caress the clitoris':
		cls
		minut += 5
		selfplaytime += 5

		!!if $loc = 'bedrPar':'<center><img src="images/qwest/selfplay/klit.jpg"></center>'

		if $loc = 'vanrPar':
			'<center><img src="images/qwest/selfplay/klitvann.jpg"></center>'
		else
			'<center><img src="images/qwest/selfplay/klit.jpg"></center>'
		end

		if manna >= mannamax / 2:
			horny += rand(5, 10)
			'You put your hand down between her legs and groped in the folds of her soft and wet pussy touch a small bump which is very pleasant, you started to caress her fingers this hump and enjoy the feeling of pleasant warmth covering between your legs.'
		else
			horny += rand(0, 1)
			'You caress the clitoris fingers, you feel good and nice, but your bad mood affects, you just can not get away from his thoughts, and you can not get excited.'
		end

		if horny >= 100:
			orgasm += 1
			horny = 0
			manna = mannamax
			'Suddenly, as if you hit in the abdomen and shock began pleasant spasms, you squirm biting her lip, that would not scream with pleasure.'
		end

		gs 'stat'

		act 'Break':gt $curloc

		if horny > 0:dynamic $d_self_fingering
	end
end

if horny > 0 and agape < 3:
	act 'Poke a finger in the ass':
		cls
		minut += 5
		selfplaytime += 5

		!!if $loc = 'bedrPar':'<center><img src="images/qwest/selfplay/klit.jpg"></center>'
		!!if $loc = 'vanrPar':'<center><img src="images/qwest/selfplay/klitvann.jpg"></center>'
		'<center><img src="images/qwest/selfplay/1.jpg"></center>'

		if anus >= 3:
			'You stuck a finger in his ass and he freely slipped into your anus.'
		elseif anus >= 1 and anus < 3:
			anus += 1
			'You stuck a finger in his ass and felt as tight ass grabbed your finger.'
		elseif anus = 0:
			anus = 1
			'You stuck a finger in her virgin ass and felt as tight ass grabbed your finger.'
		end

		if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

		dynamic $d_sis_prov
		gs 'stat'

		act 'rest':gt $curloc

		act 'Stick two fingers':
			cls
			minut += 5
			selfplaytime += 5
			'<center><img src="images/qwest/selfplay/2.jpg"></center>'

			if anus >= 5:
				'You calmly stuck two fingers in your ass.'

				if agape > 0:
					if agape = 2:agape = 3
					if agape = 1:agape = 2

					agapetime = totminut
					horny -= 50

					if anus > 1:anus -= 1

					'Do you have a sore ass and shoved two fingers you even more damage it.'
				end
			elseif anus >= 3 and anus < 5:
				analplay += 1
				'You stuck two fingers in his ass and your anus tightly clasped their.'

				if agape > 0:
					if agape = 2:agape = 3
					if agape = 1:agape = 2
					agapetime = totminut
					horny -= 50
					anus += 1
					'Do you have a sore ass and shoved two fingers you even more damage it.'
				end
			elseif anus >= 1 and anus < 3:
				anus += 1

				if agape = 2:agape = 3
				if agape = 1:agape = 2
				if agape = 0:agape = 1

				horny -= 50
				agapetime = totminut
				'You stuck two fingers in his ass and felt a sharp pain in your anus.'
			end

			gs 'stat'

			act 'rest':gt $curloc

			if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

			dynamic $d_sis_prov

			if horny > 0 and agape < 3:
				act 'Thrust three fingers':
					cls
					minut += 5
					selfplaytime += 5
					'<center><img src="images/qwest/selfplay/3.jpg"></center>'

					if anus >= 10:
						'You quietly shoved three fingers in your ass.'

						if agape > 0:
							if agape = 2:agape = 3
							if agape = 1:agape = 2

							agapetime = totminut
							horny -= 50

							if anus > 1:anus += 1

							'Do you have a sore ass and shoved three fingers you even more damage it.'
						end
					elseif anus >= 5 and anus < 10:
						analplay += 1
						'You stuck three fingers in his ass and your ass grabbed them tightly.'

						if agape > 0:
							if agape = 2:agape = 3
							if agape = 1:agape = 2

							agapetime = totminut
							horny -= 50
							anus += 1
							'Do you have a sore ass and shoved three fingers you even more damage it.'
						end
					elseif anus < 5:
						anus += 1

						if agape = 2:agape = 3
						if agape = 1:agape = 2
						if agape = 0:agape = 1

						horny -= 50
						agapetime = totminut
						'You stuck three fingers in his ass and felt a sharp pain in your anus.'
					end

					act 'rest':gt $curloc

					if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

					dynamic $d_sis_prov
					gs 'stat'

					if horny > 0 and agape < 3:
						act 'Stick four fingers':
							cls
							minut += 5
							selfplaytime += 5
							'<center><img src="images/qwest/selfplay/4.jpg"></center>'

							if anus >= 15:
								'You quietly stuck his hand in your ass.'

								if agape > 0:
									if agape = 2:agape = 3
									if agape = 1:agape = 2

									agapetime = totminut
									horny -= 50

									if anus > 1:anus -= 1

									'Do you have a sore ass and thrust four fingers you even more damage it.'
								end
							elseif anus >= 10 and anus < 15:
								analplay += 1
								'You have thrust his hand into his ass and your anus tightly clasped their.'

								if agape > 0:
									if agape = 2:agape = 3
									if agape = 1:agape = 2

									agapetime = totminut
									horny -= 50
									anus += 1
									'Do you have a sore ass and thrust his hand you even more damage it.'
								end
							elseif anus < 10:
								anus += 1

								if agape = 2:agape = 3
								if agape = 1:agape = 2
								if agape = 0:agape = 1

								horny -= 50
								agapetime = totminut
								'You have thrust his hand into his ass and felt a sharp pain in your anus.'
							end

							act 'rest':gt $curloc

							if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

							dynamic $d_sis_prov
							gs 'stat'

							if horny > 0 and agape < 3:
								act 'Stick your whole hand':
									cls
									SelfFisting += 1
									minut += 5
									selfplaytime += 5
									'<center><img src="images/qwest/selfplay/5.jpg"></center>'

									if anus >= 20:
										'You quietly put his hand in your ass.'

										if agape > 0:
											if agape = 2:agape = 3
											if agape = 1:agape = 2

											agapetime = totminut
											horny -= 50

											if anus > 1:anus -= 1

											'Do you have a sore ass and thrust his hand you even more damage it.'
										end
									elseif anus >= 15 and anus < 20:
										analplay += 1
										'You reached into his ass and your anus tightly clasped their.'

										if agape > 0:
											if agape = 2:agape = 3
											if agape = 1:agape = 2

											agapetime = totminut
											horny -= 50
											anus += 1
											'Do you have a sore ass and thrust his hand you even more damage it.'
										end
									elseif anus < 15:
										anus += 1

										if agape = 2:agape = 3
										if agape = 1:agape = 2
										if agape = 0:agape = 1

										horny -= 50
										agapetime = totminut
										'You reached into his ass and felt a sharp pain in your anus.'
									end

									act 'rest':gt $curloc

									if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

									dynamic $d_sis_prov
									gs 'stat'
								end
							end
						end
					end
				end
			end
		end
	end
end

if horny > 10:
	if dildo >= 1 or middildo = 1 or largedildo = 1 or bigdildo = 1 or extradildo = 1 or superdildo = 1 or maddildo = 1:
		if dildohand > 0:
			'In your hands <<dildohand>>five inch dildo'
		if vgape <= 0:
				act 'Dildo in pussy':
					cls
					minut += 15
					selfplaytime += 15
					dick = dildohand

					!!if $loc = 'bedrPar':'<center><img src="images/qwest/selfplay/dildo.jpg"></center>'
					if $loc = 'vanrPar':
						'<center><img src="images/qwest/selfplay/dildovann.jpg"></center>'
					else
						'<center><img src="images/qwest/selfplay/dildo.jpg"></center>'
					end

					dynamic $d_vag_sex_dildo
					gs 'stat'

					act 'rest':gt $curloc
				end
			end

			if agape <= 0:
				act 'Dildo in the ass':
					cls
					minut += 15
					selfplaytime += 15
					dick = dildohand

					!!if $loc = 'bedrPar':'<center><img src="images/qwest/selfplay/dildoanal.jpg"></center>'
					if $loc = 'vanrPar':
						'<center><img src="images/qwest/selfplay/dildovann.jpg"></center>'
					else
						'<center><img src="images/qwest/selfplay/dildoanal.jpg"></center>'
					end

					dynamic $d_analsex_dildo
					gs 'stat'

					act 'rest':gt $curloc
				end
			end
		elseif dildohand = 0:
			'You do not have a dildo in hand'

			if dildo = 1:
				act 'take 10cm long dildo':dildohand = 10 & gt $curloc
			end

			if middildo = 1:
				act 'take 15cm long dildo':dildohand = 15 & gt $curloc
			end

			if largedildo = 1:
				act 'take 20cm long dildo':dildohand = 20 & gt $curloc
			end

			if bigdildo = 1:
				act 'take 25cm long dildo':dildohand = 25 & gt $curloc
			end

			if extradildo = 1:
				act 'take 30cm long dildo':dildohand = 30 & gt $curloc
			end

			if superdildo = 1:
				act 'take 35cm long dildo':dildohand = 35 & gt $curloc
			end

			if maddildo = 1:
				act 'take 40cm long dildo':dildohand = 40 & gt $curloc
			end
		end
	end
end

if horny > 0:dynamic $d_self_fingering

act 'Abandon this venture':
	analplay = 0
	selfplaytime = 0
	mastrOnce = 0
	proverkasisterhere = 0

	if vaginaTemp > vagina * 2:vagina += 1 & vaginaTemp = 0

	gt $loc, $metka
end

if $loc = 'vanrPar' and selfplaytime >= 60:dynamic $d_van_vtor

if $loc = 'Gadsarai':
	piratHorny += 1
	'Dog named Pirate with curiosity looks at , what you do.'
end

--- selfplay ---------------------------------
# gtelefon
boyinday[numnpcboy] = day
Gcall = 0
minut += 3
gs 'stat'
'You take the phone, "Hello."'

if boyvstre[numnpcboy] > 0:
	'Male voice on the phone says "Hello <<$name>> is I <<$nameBoyfrend[numnpcboy]>>, let''s go to somewhere to walk."'
else
	'In the tube, a male voice says "Hello Can <<$name>>?"'
	'You answer the caller that you are the <<$name>>. Stranger delighted "I <<$nameBoyfrend[numnpcboy]>>, we''re met at a disco. Remember? Let''s go for a walk."'
end

act 'I''m busy today':
	cls
	minut += 3

	if boyvstre[numnpcboy] = 0:otnBoyFrend[numnpcboy] -= 10
	if boyvstre[numnpcboy] > 0:otnBoyFrend[numnpcboy] -= 5

	gs 'stat'
	''

	if otnBoyFrend[numnpcboy] > 20:
		!!otnBoyFrend[numnpcboy] = 0
		'<<$nameBoyfrend[numnpcboy]>> upset. "Well, then, as something next time."'
	else
		otnBoyFrend[numnpcboy] = 0
		'<<$nameBoyfrend[numnpcboy]>> angry. "Well, if you went to the dick." And hung up.'
	end

	act 'Hangup':gt 'korrPar'
end

if GvstreBoy = 0:
	act 'Meet me in the park':
		cls
		minut += 3
		GvstreBoy = 1
		GvstreBoyAfter[numnpcboy] = 1
		SkverBoy = numnpcboy
		gs 'stat'
		'You are invited to meet in the park.'

		act 'Hangup':gt 'korrPar'
	end
end

--- gtelefon ---------------------------------
# tvPar
gs 'stat'
'<center><img src="images/pics/telek.jpg"></center>'
'You turn on the TV and settled comfortably on the couch.'

$din_wath_tv_h = {
	cls
	minut += 60
	willpower += rand(5, 10)
	manna += rand(10, 50)
	gs 'stat'
	'<center><img src="images/pics/telek.jpg"></center>'
	'You are viewing the central channel lying on the couch. Watch almost nothing solid and cheesy advertising program.'

	act 'Watch TV (1:00)':dynamic $din_wath_tv_h
	act 'Get off the couch':gt $locM, $metkaM
}

act 'Watch TV (1:00)':dynamic $din_wath_tv_h
act 'Get off the couch':gt $locM, $metkaM

--- tvPar ---------------------------------
# bedPar
gs 'stat'

if $clothingworntype = 'nude':
	'<center><img src="images/pics/bed.jpg"></center>'
else
	'<center><img src="images/pics/son.jpg"></center>'
end

'You lie on the bed. Clock wound <<timer>> hours <<timerM>> minutes.'

act 'Set Alarm Clock':gt 'budilnik', 'start'

!!if son < 10:
	act 'Undress and go to bed':
		if disable_autosave = 0:
			if StoryLine = 0:
				savegame 'autosave.sav'
		else
			savegame 'autosave_alt.sav'
		end
	end

	cls
	health += 5
	hapri = 0
	InSleep = 1
	:loopson
	minut += 1
	stime += 1

	if stime = 60:stime = 0 & son += 3

	clr
	cls
	gs 'stat'
	'<center><img src="images/pics/son.jpg"></center>'

	if analplugIN = 1:analplugIN = 0 & 'Before going to bed you remove your butt plug.'
	if vibratorIN = 1:vibratorIN = 0 & 'Before going to bed you remove your vibrator'
	if mop > 1:mop = 0 & vidageday = vidageday - 1 & 'Makeup smeared on the face, you think, that looks bad for sleeping with makeup, skin aging faster from this.'

	'You sleep and you dream about nothing.'

	if hour = timer and minut = timerM:
		manna -= 10
		'Alarm goes off'
		act 'Get out of bed and get dressed (0:15)':
			cla
			gs 'clothing', 'wear_last_worn'
			InSleep = 0
			minut += 15
			tanga = 1
			gt $locM, $metkaM
		end

		exit
	end

	if son > 23 and dosip = 0:
		'You woke up on, that slept'

		act 'Get out of bed and get dressed (0:15)':
			cla
			gs 'clothing', 'wear_last_worn'
			InSleep = 0
			minut += 15
			tanga = 1
			gt $locM, $metkaM
		end

		exit
	end

	jump 'loopson'
end
!!end

act 'Get out of bed':
	cla
	gt $locM, $metkaM
end

--- bedPar ---------------------------------
# stolPar
gs 'stat'
!!'<center><img src="images/pics/telek.jpg"></center>'
'You sat down at the desk.'

act 'Get up from the table':gt $locM, $metkaM

if lernHome > 0:
	act 'Learning lessons':
		cls

		if lernHome <= 2:
			minut += 60 * lernHome
			lernHome = 0
			lern += 1
			gs 'stat'
		else
			minut += 60 * 2
			lernHome = 0
			gs 'stat'
		end

		'Sitting for a long time you learned yet they were able to learn.'

		act 'Get up from the table':gt $locM, $metkaM
	end
end

--- stolPar ---------------------------------
# father
fatherAge = age + 30
gs 'stat'
'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
'<center><img src="images/qwest/alter/father.jpg"></center>'
'Your stepfather gray and slightly flabby man working driver. He <<fatherAge>> years. Your mother divorced your father and married Vladimir Mikhailovich when you were one year. Your real father you do not remember and have never seen.'

if father < 20:'You stepfather scandal.'
if father >= 20 and father < 40:'You stepfather tensions.'
if father >= 40 and father < 60:'You have a normal relationship with his stepfather.'
if father >= 60 and father < 80:'You have a good relationship with his stepfather.'
if father >= 80:'You have a great relationship with his stepfather.'

act 'Move away':gt $locM, $metkaM

act 'Asking for money':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked the stepfather of money, he shook his head. "I bring all salary mother, so go and ask her."'

	act 'Move away':gt $loc, $metka
end

act 'Ask about his mother and':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked his stepfather as he met my mother. Stepfather scratched begin balding head and answered. "I then worked as a taxi driver. Busing like Natasha, your mother. She even then was quite soplyushkoy, but has managed to leave her husband for the class-mate and give birth to you with Anya. Your father I did not know, I saw only a couple of times. Know that his name Mikhail Kuznetsov. He left somewhere in another city. "'

	act 'Move away':gt $loc, $metka
end

act 'Ask about his work':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked about his stepfather''s work. Stepfather reached crunching joints. "Before Takser. Tired now. And dangerous and old. Bought Gazelle and now I''m on pickup truck breed products hucksters. Know yourself, I have two garages, one worth our Volga, Gazelle else I got you."'

	act 'Move away':gt $loc, $metka
end

if motherKnowSpravka = 1:
	cla
	father = 0
	motherKnowSpravka = 2
	'Stepfather angrily walked up to you, "Oh damn, do not have time to get off the pot, and already someone has twisted pussy! Hem you bring in who will bring?"'

	act 'Move away':gt $loc, $metka
end

if alko > 0 and alkoday ! day:
	alkoday = day
	father -= 1
	'Stepfather sniffed "<<$name>> from you smell alcohol, what is this mess? You''re too young to drink that!"'
end

if TorgVokzalTimes > 0 and YouCanGar = 0:
	act 'Ask for permission to store goods in the garage':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Stepfather Vladimir Skryabin</font></b></center>'
		'<center><img src="images/qwest/alter/father.jpg"></center>'
		'You asked for permission to store his stepfather in the garage items.'

		if father + dom >= 80:
			YouCanGar = 1
			'Stepfather hesitated still allow you to use it for garage storage of goods for sale.'
		else
			'Stepfather shook his head "No <<$nickname>>. I have ."'
		end

		act 'move_away':gt $loc, $metka
	end
end

--- father ---------------------------------
# mother
!!Model Olga Kabaeva
motherAge = age + 19

if momslut >= 2 and mother < 40:mother = 40

gs 'stat'
'<center><b><font color="maroon">Mama</font></b></center>'
'<center><img src="images/qwest/alter/mother.jpg"></center>'
'Your mother Natasha still quite young and attractive. She''s only <<motherAge>> years. She works at the station cafe.'

if (motherKnowWhore > 0 or motherKnowSpravka > 0) and motherQW = 0:motherQW = 1
if motherQW = 1 and mother > 40:mother = 40
if mother < 20:'You and your mom scandal.'
if mother >= 20 and mother < 40:'You and your mom tensions.'
if mother >= 40 and mother < 60:'You have a normal relationship with her mother.'
if mother >= 60 and mother < 80:'You have a good relationship with his mother.'
if mother >= 80:'You have a great relationship with my mother.'

act 'Move away':gt $loc, $metka

if motherWorry = 1 and indorf = 0:
	motherWorry = 0
	mother -= 1
	'Mama is awake and stands in the hallway waiting for you. "Where are you shlyaeshsya? You know what hour in the court?"'
elseif motherWorry = 1 and indorf > 0:
	motherWorry = 0
end

if SchoolAtestat = 1 and SAtestatGift = 0:
	SAtestatGift = 1
	money += 5000
	gs 'stat'
	'Mama was delighted, "Now you graduated from high school and I want to give you five thousand rubles. Can buy myself a gift."'
end

if hour > 5:
	if abort = 1 and pregTalkFamily = 1:
		pregTalkFamily = 2
		mother = 0
		'Mother looked sadly at you "What are you still a fool! Still had an abortion, and if now you will not have children? What do you think will be forever young and whole life will be held in gladness?"'
	end

	if momslut = 1:
		act 'Say, you vidili mother fucking master cafe':
			cls
			minut += 5
			momslut = 2
			gs 'stat'
			'<center><b><font color="maroon">Mama</font></b></center>'
			'<center><img src="images/qwest/alter/mother.jpg"></center>'
			'You said the mother, you''ve seen it in stock cafe with a host of cafes. Mother noticeably pale and sat down on a stool. "And what you saw?" You answered it, they saw as she sucked in a host cafes, and then he fucked her doggy style. Mother lowered her eyes "Well yes, I sleep with Slava. But I want to warn you, blackmail me you did not get." The mother looked into your eyes "All what you can is achieved, is to destroy the family."'

			act 'Leave':gt $loc, $metka
		end
	end

	if preg = 1 and pregTalkFamily = 0:
		act 'Tell your mother that you are pregnant':
			cls
			minut += 5
			mother = 20
			pregTalkFamily = 1
			gs 'stat'
			'<center><b><font color="maroon">Mama</font></b></center>'
			'<center><img src="images/qwest/alter/mother.jpg"></center>'
			'You said the mother, you are pregnant. Mother with wide-eyed helplessly sat on a stool. She said sadly "Well. I was afraid of this. Now do not try to have an abortion, if you do an abortion, in the future is unlikely you manage to have children. You''ll have to have a child."'

			act 'Leave':gt $loc, $metka
		end
	end

	act 'Asking for money':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Mama</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'
		'You asked my mother money.'

		if SchoolAtestat = 0:
			if mother >= 80:
				if motherPayDay = day:
					'Mother frowned "dochura, I told you already gave the money!"'

				else
					mother -= 1
					motherPayDay = day

					if Suspeh >= 70:
						if Suspeh < 90:
							money += 150
							'Frowning mother gave you 150 rubles, "Will you learn better, I will give more. Meanwhile, it''s all that you deserve!"'

							act 'Move away':gt $loc, $metka

							exit
						else
							money += 300
							'Your mother smiled and gave you 300 rubles, "Okay, here is your money."'

							act 'Move away':gt $loc, $metka

							exit
						end
					else
						'Mother frowned "You''ll learn better, there will be money, as long as you deserve only the belt, not money!"'
					end
				end
			elseif mother >= 60 and mother < 80:
				if motherPayDay = day:
					'Mother frowned "No docha. I already gave money. Enough for today."'
				else
					mother -= 1
					motherPayDay = day

					if Suspeh >= 70:
						if Suspeh < 90:
							money += 100
							'Frowning mother gave you $ 100, "Will you learn better, I will give more. Meanwhile, it''s all that you deserve!"'

							act 'Move away':gt $loc, $metka

							exit
						else
							money += 250
							'The mother smiled and gave you 250 rubles, "Okay, on the money."'

							act 'Move away':gt $loc, $metka

							exit
						end
					else
						'Mother frowned "You''ll learn better, there will be money, as long as you deserve only the belt, not money!"'
					end
				end
			elseif mother >= 40 and mother < 60:
				if motherPayDay = day:
					'Mother frowned "That thou Velcro. Received nothing!"'
				elseif motherPayDay ! day:
					mother -= 1
					motherPayDay = day

					if Suspeh >= 70:
						if Suspeh < 90:
							money += 50
							'Frowning mother gave you 50 rubles, "Will you learn better, I will give more. Meanwhile, it''s all that you deserve!"'

							act 'Move away':gt $loc, $metka

							exit
						else
							money += 200
							'Your mother smiled and gave you 200 rubles, "Okay, on the money."'

							act 'Move away':gt $loc, $metka

							exit
						end
					else
						'Mother frowned "You''ll learn better, there will be money, as long as you deserve only the belt, not money!"'
					end
				end
			elseif mother < 40 and motherKnowWhore = 0 and motherKnowSpravka = 0:
				'Mother frowned, "Do not you deserve the money!"'
			elseif (motherKnowWhore >= 1 or motherKnowSpravka >= 1) and mother < 40:
				'"You ask for more money, whore? Get out of here, scram their stud beg for money"'
			end
		elseif SchoolAtestat > 0:
			'You''re old enough, earn yourself.'
		end

		act 'Move away':gt $loc, $metka
	end

	act 'Ask about this father':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Mama</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'

		if mother < 80:
			'You asked your mother about her real father. Mother pulled a face and not contented said. "<<$name>>, I am not going to discuss this topic now. Just know that Vova, your stepfather growth you with Anya as their own daughters."'
		elseif mother >= 80:
			'You asked your mother about her real father. Mother pulled a face and not contented said. "I have no idea where he is and what he does. We were at school together. It made me your sister Anka. Our parents we were married. Michael, your father, and you made me thumped. We divorced and I married Vovk. Kolka already born from Vova. Vovk But you brought up with Anya as their own daughters. Soul in you looked for, and bathed you, and went for a walk with you for a walk. And tales told you at night. "'
		end

		act 'Move away':gt $loc, $metka
	end

	act 'Ask for new clothes':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Mama</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'
		'You asked for new clothes.'

		if SchoolAtestat = 0:
			if mother >= 80:
				if motherClotheMonth ! month:
					'Mom sighed, "Here we go again. You''re my world is empty. Come to the store, grief onion."'

					act 'Go to the store':
						cls
						mother = 70
						motherClotheMonth = month
						minut += 30
						gs 'stat'
						'You went to the store with his mother and began to choose. With mom go shopping quite interesting to do, she will never give you choose your own and would buy clothes for your taste.'

						act 'choose clothes':
							cls
							gs 'stat'
							:markbuyclomother
							numrand = rand(1, 130)

							if newclo[numrand] = 0:
								newclo[numrand] = 1
								newcloH[numrand] = 50
								newcloB[numrand] = bedra
								'<center><img src="images/clothes/newclo/<<numrand>>.jpg"></center>'
							else
								jump 'markbuyclomother'
							end

							'Mom bought you clothes.'

							act 'Leave':gt $loc, $metka
						end
					end

					exit
				else
					'My mother shook her head "Dochurka, we have a budget is not elastic, this month we bought you clothes. Now wait for the next month."'
				end
			else
				'Mom shook her head "no money."'
			end
		else
			'Mom shook her head, "You''re an adult, she should earn."'
		end

		act 'Move away':gt $loc, $metka
	end
end

if $loc = 'kuhrPar':
	act 'Offer help':
		cls
		minut += 60
		mother += rand(1, 5)
		manna -= 10
		TotalMomPom += 1
		MomPom += 1
		gs 'stat'
		'You offered to help my mother with the housework.'

		if MomPom = 1:
			'Mom asked you to wash the dishes. You are in for an hour washing the dishes in the kitchen.'
		elseif MomPom = 2:
			'Mom asked you to peel the potatoes. You are in for an hour in the kitchen peeling potatoes.'
		elseif MomPom = 3:
			'Mom asked you to clean the floor. You are within an hour washed the floors in the apartment.'
		elseif MomPom = 4:
			'Mom asked you to do your laundry. You are in for an hour to wash clothes in the bathroom.'
		elseif MomPom = 5:
			'Mom asked you to iron the clothes. You are in for an hour in the hall ironed linen.'
		elseif MomPom = 6:
			sdacharand = rand(10, 50)
			money += sdacharand
			gs 'stat'
			'Mom asked you to run to the store for groceries. You walked for an hour for food, you got to surrender to shopping <<sdacharand>>rubles.'
		elseif MomPom = 7:
			'Mom asked you to run to the pharmacy for medicines. Mom''s sister works there and she will give Lyudmila medicament for free, then she finds mom and aunt Luda. Mom wrote you a list and you went to the pharmacy, the pharmacy as always sat behind the counter aunt Luda. "Hi <<$nickname>>. How are you? How are you feeling?" You greeted aunt and gave her a piece of paper in which the mother wrote medications. Aunt Luda quickly gathered the necessary and gave you. You came back to the apartment and gave her mother the medication.'
		elseif MomPom = 8:
			MomPom = 1
		end

		act 'Move away':gt $loc, $metka
	end
end

if $loc = 'gkafe':'Mom saw you and frowned, "What has come? How many times I said, do not go to my office. Young girls There''s nothing to do!"'

if SchoolAtestat = 0:
	if GspravkaT = 0 and GspravkaTimes >= 3 and hour >= 6 and hour <= 21:
		cla
		mother -= 1
		'Mother frowned "How much you can pull out the FAQ? Have you most to the gynecologist to lead!" Mother took you by the hand and led her to the clinic, a gynecologist.'

		act 'Go to the gynecologist for help':
			cla
			minut += 15
			'You lay on the examination table and pushed his feet. Gynecologist has viewed your vagina.'

			if vagina > 0:
				Gspravka = 7
				GspravkaT = 2
				'Help gynecologist wrote that you are not a virgin.'
			else
				Gspravka = 7
				GspravkaT = 1
				'Help gynecologist wrote that you are a virgin.'
			end

			act 'Leave':gt $curloc
		end

		exit
	elseif GspravkaT = 0 and GspravkaTimes < 3:
		GspravkaTimes += 1
		'"You need to go to the clinic. Gynecologist, refer to the school."'
	elseif GspravkaT = 2 and motherKnowSpravka = 0:
		cla

		if motherKnowWhore = 0:
			mother = 0
			motherKnowSpravka = 1

			if motherQW = 0:motherQW = 1

			if momslut < 2:
				'Mother grabbed you by the ear "Oh blyadischa We slaved father, what would you Putnam of people do you find worthy men, and you''re a whore who has already Mandu then tuck Get out of my sight!"'
			else
				'Mother shook her head sadly "Well. Look no zalet."'
			end
		elseif motherKnowWhore > 0 and motherQW < 2:
			mother -= 10
			motherKnowSpravka = 1

			if motherQW = 0:motherQW = 1
			'Your mother looked in the FAQ "Even it is not surprising. Fuck with someone-in the alley, and even home all hahalskih "gifts" come. B my eyes have not seen you."'
		elseif motherQW >= 2:
			motherKnowSpravka = 2
			'"And what do you bring it to me? You can even make photocopies and wear them to school. doubt, what you have there that-will change" - with malice noticed your mother.'
		end

		act 'Move away':gt $loc, $metka

		exit

		end
	end

if motherQW = 1 and mother >= 20 and $loc = 'kuhrPar':
	act 'Try to reconcile':
		cla
		cls
		'<center><b><font color="maroon">Mama</font></b></center>'
		'<center><img src="images/qwest/alter/mother.jpg"></center>'

		mqwtRand = rand(1, 10)

		if mqwtRand <= 2:
			mother -= rand(1, 5)
			minut += 30
			'You tried to talk with her mother and make up. Whether you are too aggressive, whether it has a bad mood, but the results "reconciliation" becomes yet another scandal.'

			act 'Move away':gt $loc, $metka
		elseif mqwtRand > 2 and mqwtRand <= 8:
			mother += rand(0, 1)
			minut += 30
			'You tried to talk with her mother and make up. Despite, that the whole half-hour conversation mainly a fairly aggressive monologue your mother about morality, diseases and about, what awaits you in the future, if you do not pick up the mind, some progress in the relationship is still there.'

			act 'Move away':gt $loc, $metka
		elseif mqwtRand > 8:
			cls
			minut += 60
			motherQW = 2
			mother += rand(5, 10)
			gs 'stat'
			'<center><b><font color="maroon">Mama</font></b></center>'
			'<center><img src="images/qwest/alter/mother.jpg"></center>'
			'You''re trying to talk with his mother and make peace. The whole half-hour conversation mainly consists of a fairly aggressive monologue your mom about morality, disease and future. At some point you get tired of all this.'

			act 'Wedge':
				cla
				cls
				'<center><b><font color="maroon">Mama</font></b></center>'
				'<center><img src="images/qwest/alter/mother.jpg"></center>'
				'- All that you say, Mom, of course, is true and correct, but unless you are the not so?'
				'She is flustered from your sentence, but quickly recovers.'
				'- What do you mean? I''m not the same ...'
				'- So, so. Such a whore! Even abruptly I will!'
				'- <<$nickname>>! What are you currently pos ...'

				act 'Continue to press':
					cla
					cls
					'<center><b><font color="maroon">Mama</font></b></center>'
					'<center><img src="images/qwest/alter/mother.jpg"></center>'
					'- What did I allow myself? - You will quickly intercept of an initiative to prevent her finish. - Well, we''re adults, and are conducting an adult conversation about it is more than an adult theme. And forgive me, but I''ll say it all in plain text.'
					'- <<$nickname>>! They did not break ...'
					'- No, Mom, now you do not interrupt. I have half an hour listening to sermons! And from whom ?!'
					'- <<$nickname>>! ..'

					if age = 15:'- What is the <<$nickname>> that <<$nickname>> ?! Mom, are you now <<motherAge>>, Anjaa <<sisterAge>>. Addition and subtraction are taught in the first grade. Yes, you were just as much as me, when you''re knocked up!'
					if age > 15:'- What the <<$nickname>> that <<$nickname>> ?! Mom, are you now <<motherAge>>, Anja <<sisterAge>>. Addition and subtraction are taught in the first grade. Yes, you were even younger than me, when you''re knocked up!'

					'Unnerving silence. You, red as a lobster, trying to catch my breath, and your mother is sitting with his face all at the same time expressing human emotions simultaneously. Most likely she is trying to figure out what the hell''s going on here and why she listens to sermons from his daughter. Do you even think that once upon a time she just sat there and swore to your grandmother.'
					'- But it was your father, - she says quietly.'
					'- And so what?'
					'- And the fact that I did it out of love and not to expose Mandu first comer of the gate!'
					'- Who told you that I do not love and with everyone ?! And besides, you flew the first time?'
					'- No, but what does this have to talk?'

					act 'Next':
						cla
						cls
						'<center><b><font color="maroon">Mama</font></b></center>'
						'<center><img src="images/qwest/alter/mother.jpg"></center>'
						'- And this, my mother:I am in life I will not believe that it was unpleasant to fuck you and you''re doing it solely for the love of the father.'
						'- <<$nickname>>! Do not swear!'
						'- Okay, okay, had sex. With the rest of you probably agree.'
						'- Nuu ... - she thinks for a moment, immersed in memories of his youth - yes, it was nice, of course, especially when the doors ...'
						'- No comment - with malice notice you.'
						'Awkward silence. Now the mother, red as a lobster, trying to come to his senses. Five minutes later it is obtained, and you see that it is something to mull over, looking something on you, on the wall.'
						'- Well, I have a daughter.'
						'- All in mother - smiling you say.'
						'- All of the mother ... - with a nervous laugh she repeats again and stops for a few minutes.'
						'- Well, Mom, I think we understand each other, and the situation shouted, Oromo, and the scandal is still not correct.'
						'- Do not fix it, but ... - she says slowly, continuing something to think about. - Not to say that I approve your behavior, but ... - you can see that the words are it is not easy - but I understand you.'
						'You get up, hugging his mother and heads for the door.'

						act 'Leave':
							cla
							cls
							'<center><b><font color="maroon">Mama</font></b></center>'
							'<center><img src="images/qwest/alter/mother.jpg"></center>'
							'- Wait, <<$nickname>>.'
							'- Mmm? - You turn in the doorway. Mother gesture tells you to sit back on the kitchen chair.'
							'- Anka at least partially in the Bear went, but you''re just all in me, so that adventure to find his ass and ...'
							'- Maaaam, we''ve just discussed it.'
							'- Now you do not interrupt me, I do something else now. Do not want to, you know, that you any sore or baby from is not clear who currently work up.'

							if prezik > 0 or tabletki > 0:'- Do not worry, I have everything. Gone to town and bought. End - again I will go.'
							if prezik = 0 and tabletki = 0:' Nuuu ... I will go to the city, there is a pharmacy.'

							'- In the city means. You know, it''s better to buy everything in our pharmacy. And you easier, and I will be more easy for you.'
							'- And how, tell me, please, ma''am, I''ll do it? Tell aunt Luda that I Gandon for balls need?'
							'- Fie on you! If Lyudka dig, you say, well, me for a vegetable garden, she will understand. Just do not buy a lot at once.'
							'- Hmm, for the garden, of course. What does it mean ...'
							'- No, docha! - Quickly interrupted her.'
							'- Okay, okay.'
							'You get up, run up and kiss your mother.'
							'- You know, Mom, but you''re still my best.'
							'- Appreciate it, fool - with a smile she says.'

							act 'Leave':gt 'korrPar'
						end
					end
				end
			end
		end
	end
end

if alko > 0 and alkomday ! day:
	alkomday = day
	mother -= 1
	'Mom sniffed "<<$name>> from you smell alcohol, what is this mess? You''re still too young to drink that!"'
end

if (cumlip > 1 or cumface > 0 or cumfrot > 0) and whoremday ! day:
	cla
	whoremday = day
	if motherKnowWhore = 0 and motherKnowSpravka = 0 and motherQW = 0:
		mother = 0
		if motherKnowWhore = 0:motherKnowWhore = 1

		if momslut < 2:
			'The mother looked at you, rolled her eyes and blushed. You was noticeable sperm.'
			'"Oh, you''re a juvenile whore, what is that to you? Telling everyone that my daughter is decent, but she fucked somewhere. Blyadina! Go away, do not get caught up in my eyes!"'
		else
			'Mother shook her head sadly "You would then wiped the sperm, and then the whole town will know, you whore."'
		end

		act 'Move away':gt $loc, $metka
	elseif (motherKnowWhore > 0 or motherKnowSpravka > 0) and motherQW = 1:
		monther -= 20

		if motherKnowWhore = 0:motherKnowWhore = 1

		if momslut < 2:
			'The mother looked at you glare. You was noticeable sperm.'
			'- again-you fucking whore juvenile? I was already familiar to ashamed of you! went here, do not get caught in my eyes!'
		else
			'Mother shook her head sadly "You would then wiped the sperm, and then the whole town will know, you whore."'
		end

		act 'Move away':gt $loc, $metka
	elseif motherQW >= 2:
		monther -= 10

		if motherKnowWhore = 0:motherKnowWhore = 1

		'Mother looked sternly at you. You was noticeable sperm.'
		'- <<$nickname>>, I certainly understand it all, but could you clean up the artistry of their fancy man? Quickly to the bathroom, yet who-something not seen!'

		act 'Move away':gt 'vanrPar'
	end
end

if glamur > 0 and hour > 9:'Mom looked at you, "Why are you so dressed up?"'

if week = 5 and dostupindorf = 1:
	if hour > 9:'Mom continued to go about their business tells you "<<$nickname>>, tomorrow we will go to the village, at 12 o''clock. If you want us then come to me before 12."'
elseif week = 6 and dostupindorf = 1:
	if hour > 9 and hour < 12:
		'Mom asks you "<<$nickname>>, well? Come with us to the village?"'

		act 'Go to the country':hour = 12 & minut = 0 & indorf = 1 & gt 'famdorfride'
	end
end

--- mother ---------------------------------
# sister
!!model Megan Vale Valentina Azarov
sisterAge = age + 3
gs 'stat'
'<center><b><font color="maroon">Anja</font></b></center>'
'<center><img src="images/qwest/alter/sister.jpg"></center>'
'Your sister Anja bit older than you. She <<sisterAge>> years. She graduated from high school, but was unable to go to university and now works at the store clerk.'

if sister < 20:'Do you and your sister scandal.'
if sister >= 20 and sister < 40:'Do you and your sister tensions.'
if sister >= 40 and sister < 60:'Do you and your sister a normal relationship.'
if sister >= 60 and sister < 80:'Do you and your sister a good relationship.'
if sister >= 80:'You have a great relationship with his sister.'

if $clothingworntype = 'nude':
	if sisterLesb = 0:
		'Sister looks at you eyes wide "<<$name>>, Here is the number of, Are not you ashamed to go naked? I do not smoglab.'
	else
		'Sister looks at you eyes wide "<<$name>>, you''re so liberated... I do not smoglab.'
	end
end

if pirsA >= 1 and pirsAsister = 0 and sisterpirsadaytalk ! daystart:
	sisterrpirsadaytalk = daystart
	if rand(1,100) >= 75:
		'Sister looks you in the mouth: "<<$name>>, and what have you got there in the language?"'
		act 'Nothing':
			cla
			'You shake your head. "Nothing." And then turn away, so that your sister did not see your pierced tongue.'
			act 'Move away':gt $loc, $metka
		end

		act 'Show pierced tongue':
			cls
			pirsAsister = 1
			gs 'stat'
			'<center><img src="images/picb/pirsA.jpg" ></center>'
			'You open your mouth and draw out the tongue, sister showing tongue piercing.'
			'Your sister smiled: "Well, you give, Sveta! I decided to embellish their appearance?"'
			act 'Move away':gt $loc, $metka
		end
		exit
	end
end

if pirsB = 1 and pirsBsister = 0 and sisterpirsbdaytalk ! daystart:
	sisterpirsadbytalk = daystart
	'Sister looks at your lips, which appeared piercing: "Listen, and good vyshlyadit, I like!"'
	act 'Thank you':
		cls
		pirsBsister = 1
		gs 'stat'
		'<center><img src="images/picb/pirsB.jpg" ></center>'
		'You thank her sister for her compliment your little new thing.'
		act 'Move away':gt $loc, $metka
	end
	exit
end

if pirsC = 1 and pirsCsister = 0:
	pirsCsister = 1
	'Sister looks at your ears and earrings notices: "Well, finally-then! I thought you and has no earrings to go."'
end

if pirsD = 1 and pirsDsister = 0:
	pirsDsister = 1
	'Sister looks a bit shocked at your nose ring: "Phew, Sveta, it''s that in the muck?"'
end

if pirsE = 1 and pirsEsister=0:
	pirsEsister = 1
	'Sister says your eyebrow piercing: "Look, gently, so no one accidentally snatched!"'
end

if cumlip > 1 or cumface > 0 or cumfrot > 0: sisterknowslut= 1 & 'Sister looks at you, "<<$name>>, what is it?" Suddenly her eyes rounded "<<$name>>, yes it''s sperm! That''s little sister, well, well. Look, if the nurse know, you do not plight."'

if $ARGS[0] = 'work':
	!!at work
	'<<$nickname>> does not bother me, I do not see buyers.'

	act 'Move away':gt 'shop'

	exit
end

if $ARGS[0] = 'drinking':
	!!Outside the club with friends
	if sister < 40:
		'"What do you want? Wali come on!" Anja told you chuckle under her friends.'
	else
		'Anja sits now devchenok guys drinking beer and "Hey little sister." Anja said you smile. "Want pivasom?"'

		act 'Drink beer':
			cls
			minut += 60
			sister += 5
			alko += 3
			salo += 1
			fat += 2
			energy += 10
			gs 'stat'

			if AniaFrends >= 1:
				gt 'annafrends'
			elseif AniaFrends = 0:
				AniaFrends = 1
				'You met friends they. They are all former classmates. Little Lena and moving constantly confuses Ira High athletic guy whose name is Rex and all the red-haired skinny guy by the name Roma. After dating you sat drinking beer and chatted with friends Anja.'
			end

			act 'Move away':gt $loc, $metka
		end

		if sisboyparty = 2 and sisboyparty_day + 1 = daystart and hour = 17 and minut >= 30:act 'Go to the party':gt 'sisterQW', 'sisboyQW_party', 'start'
	end

	act 'Move away':gt $loc, $metka
	exit
end

if $ARGS[0] = 'home':
	if sisterLesb = 2:
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_24.jpg"></center>'
		'You''re both embarrassed after what happened the night, and do not look into each other''s eyes, all-Anja still speaks with you:'
		'-Sveta, smile tells you, Well, you''re a fool, I thought guys like me, and it is much more pleasant to handle your men.'
		'You look at the blushing Anja, - Forgive me, I strongly started up, and does not control themselves, I do not know what came over me...'
		'-Well, I do not mind, so you sometimes so lost control of himself..., He smiled slyly, You smiled at her...'

		sisterLesb = 3
		act 'Finish':gt 'sister', 'home'
		exit
	end

	!! Going to work
	if week < 6 and hour = 7:
		cls
		cla
		gs 'stat'
		'<center><b><font color = maroon>Anya</font></b></center>'
		'<center><img src="images/qwest/alter/sobir.jpg"></center>'
		'As the room goes, I am going to work, your sister Anja.'
		'Anja, without turning to you, speaks: "Sveta, I''m so late, do not distract!"'
		act 'Move away':gt $loc, $metka
		exit
	end

	!! Going for a walk
	if week >= 6 and hour >= 7 and hour <= 10:
		cls
		cla
		gs 'stat'
		'<center><b><font color = maroon>Anya</font></b></center>'
		'<center><img src="images/qwest/alter/progulka.jpg"></center>'
		'As the room goes, going on a walk, your sister Ajya. She admires itself in a mirror and turned the ass, trying to make himself better.'
		'Anja, without turning to you, speaks: "Sveta, If you decide to take a walk, I am near the club with her friends."'
		act 'Move away':gt $loc, $metka
	end

	act 'Chat':
		cls
		minut += 15
		sister += 1
		gs 'stat'

		'<center><b><font color = maroon>Anja</font></b></center>'
		'<center><img src="images/qwest/alter/sister/sister.jpg"></center>'

		if sister < 20:
			'You are trying to talk to her sister, but she refuses to talk to you.'
			if sistersorryday ! daystart:
				act 'Apologize':
					cla
					sistersorryday = daystart
					sister += (intel / 10) + (vnesh / 5)
					gs 'stat'
					'You apologize to my sister and she, it seems, I forgive you.'
					act 'Move away':gt $loc, $metka
				end
			end
			exit
		elseif sister < 40:
			'You are trying to talk to her sister, but she talks to you dry.'
			if sistersorryday ! daystart:
				act 'Trying to smooth relations':
					cla
					sistersorryday = daystart
					sister += (intel / 10) + (vnesh / 5)
					gs 'stat'
					'You suck up to my sister and she, it seems, It begins to treat you better.'
					act 'Move away':gt $loc, $metka
				end
			end
			exit
		else
			sistalkrand = rand (0, 18)
			if sistalkrand = 0:
				if trfatherQW = 0:
					trfatherQW = 1
					'You asked about the real father Ani. She grinned: "<<$name>>, I was 4 the year when they broke up. I do not remember ever seen. Nurse does not like to talk details. But like you as our real father went away-in another town. I also remember, he worked as a truck driver on large wagons, maybe sometimes it is passing by our town."'
				else
					'You started talking with Anja, It tells you about the boys she met, about parties, about cosmetics.'
				end
			end
			if sistalkrand = 1:'You''re talking and gossiping with your sister, She tells you about the new dress, which was brought to the store today.'
			if sistalkrand = 2:'You''re talking and gossiping with your sister, you discuss with movie stars, and share your fantasies with any of them want to have sex.'
			if sistalkrand = 3:'Anja talks about sports clubs in the House of Culture, and recognizes that sport is good for the figure, but she was too lazy to go there.'
			if sistalkrand = 4:'Anja says that one of her friends flew from a guy who does not have time to get out of it. And he says, that we should be smarter, and recognizes that you buy at the pharmacy birth control.'
			if sistalkrand = 5:'You''re talking and gossiping with your sister, she says, that it is possible to rent an apartment in the city and live and work there, but her while in town are satisfied.'
			if sistalkrand = 6:'Anja tells you not to get drunk at parties and at the disco, Once she made that mistake and still regrets.'
			if sistalkrand = 7:'Anja tells how she once winter came out without a coat and a bad cold.'
			if sistalkrand = 8:'You''re talking and gossiping with your sister, you and discuss the latest trends in fashion.'
			if sistalkrand = 9:'Anja recognized, before that she was fond of diets, but they deteriorated skin and went pryshi, yes match start, now she cracks for three and only become more beautiful.'
			if sistalkrand = 10:'You''re talking and gossiping with your sister, She says that she used to go to the dance, but she quickly tired.'
			if sistalkrand = 11:'You''re talking and gossiping with your sister, she advises you where-some earn.'
			if sistalkrand = 12:'Anja shares with you a secret and tells, that her friend filmed naked in a photo studio, Easy Money, but can be seen on the Internet.'
			if sistalkrand = 13:'You''re talking and gossiping with your sister, it tells you, if wander through the market, there you can find a lot of interesting and cheap.'
			if sistalkrand = 14:'Anja tells a horror story about how a nice girl not washed or shaved legs, then began to so many terrible, its per kilometer all obbegat, and advises you to take care of body.'
			if sistalkrand = 15:'You''re talking and gossiping with your sister, she says, that her ex-boyfriend was a weirdo. As-told me: "I love you as much, how to shit in the sea". The sea together we walked no more.'
			if sistalkrand = 16:'Sister complains about you: "Always bothered you,looks like my chin during sex. And now rejoice, If you see a porn actress folds on the neck or chin."'
			if sistalkrand = 17:'Anja asks you, do not you think, that her left eyebrow much sexual rights?'
			if sistalkrand = 18:'Anja recognizes you, that they are with friends at work sometimes make intimate pictures on the camera, and put them back in the window.'
		end

		act 'Finish':gt 'sister', 'home'
	end

	if sisboyQW = 0 and sister >= 40:
		act 'Ask about her boyfriend':
			cls
			minut += 5
			sister += 2
			sisboyQW = 1
			gs 'stat'
			'<center><b><font color="maroon">Anja</font></b></center>'
			'<center><img src="images/qwest/alter/sister.jpg"></center>'
			'You asked Anja about her boyfriend. She smiled.'
			'-Well, I have a boyfriend. Although nothing serious. He told me one more.'
			'-Awesome, Now when I found out about it, you simply must introduce me to him.'
			'-Good sister, we hang out in the evening at the house of culture, Come, there and introduce you to them.'

			act 'Finish':gt 'sister', 'home'
		end
	elseif sisboyQW >= 2 and sister >= 40 and sisboytrioQW ! -1 and sisboytrioDayOtkaz <= daystart and sisboypartyQW < 2:
		act 'Talk about Roma':
			cls
			minut += 5
			gs 'stat'
			if sisboytrio >= 5 and sisboyparty = 0 and sisboyparty_day ! daystart:
				cls
				minut += 5
				sisboyparty = 1
				sisboyparty_day = daystart
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_1.jpg"></center>'
				'- <<$name>>, you have a close friend of our company, and tomorrow Rex birthday, and he asked me to call you.'
				'- Oh I do not know Anja, we like-I am not familiar with it, I then basically out of your only talked with the girls.'
				'- Come on, He strongly requested, I even think he likes you. So you decided?'

				act 'Agree to go to the party':
					cls
					minut += 5
					sisboypartyQW = 1
					sisboyparty = 2
					gs 'stat'
					'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_2.jpg"></center>'
					'You agreed to come to the birthday.'
					'- Awesome, Sveta, it should be fun, and do not worry about a gift, Rex does not like it all. We will be at the House of Culture, Do not forget to come up 18:00, otherwise we will leave without you.'
					'With these words, you hug and kiss with his sister.'

					act 'Finish':gt 'sister', 'home'
				end

				act 'Sorry, I have to study':
					cls
					minut += 5
					sisboyparty = -1
					gs 'stat'
					'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_3.jpg"></center>'
					'You refused to come to the birthday.'
					'- Forgive me Anja, I would gladly, but I have blockages in school. Control, writings, a bunch of literature, she know...'

					act 'Finish':gt 'sister', 'home'
				end

				if bronzebeg > 0 or silverbeg > 0 or goldbeg > 0:
					act 'Sorry, I have a race to compete in':
						cls
						minut += 5
						sisboyparty = -1
						gs 'stat'
						'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_4.jpg"></center>'
						'You refused to come to the birthday.'
						'- I would love, but I have competition on the nose, I have to train. Unlike you, I-still dream of becoming a great athlete...'

						act 'Finish':gt 'sister', 'home'
					end
				end

				if volleyboll >= 100:
					act 'Sorry, I have volleyball game':
						cls
						minut += 5
						sisboyparty = -1
						gs 'stat'
						'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_5.jpg"></center>'
						'You refused to come to the birthday.'
						'- I mode,Coach does not allow a walk late at night, and the drink is also prohibited...'

						act 'Finish':gt 'sister', 'home'
					end
				end
				exit
			end

			if rand(1, 10) >= 8 and sisboyQW = 2 and sisboyday ! daystart:
				'<center><b><font color = maroon>Anja</font></b></center>'
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_01.jpg"></center>'
				'Anja long and hesitantly looking at you, and still decided to ask'
				'-<<$nickname>> could you tomorrow after 18.00 go for a walk for an hour, we are here with a little Roma want... sit, Well, you know what I mean.'
				'Blushing a little sister looks at you with pleading eyes.'

				act 'Of course':
					cls
					minut += 5
					sister += 10
					sisThank = 1
					sisboyQW = 3
					sisboyday = daystart
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_03.jpg"></center>'
					'-Certainly sister, i understand, I will walk until late, just do not make noise loud, You do not want to destroy the psyche of our brother, hee-hee.'
					'-You''re the best", your sister with a cry of joy hugs you.'

					act 'Finish':gt 'sister', 'home'
				end

				act 'No':
					cls
					sister -= 10
					minut += 5
					sisboyday = daystart
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_04.jpg"></center>'
					'-Sorry Anja, I need to study in the evenings'
					'-Oh well, Anja turned angrily away, and buried in his book.'

					act 'Finish':gt 'sister', 'home'
				end
			elseif rand(1, 10) >= 8 and (sisboyQW = 4 or sisboyQW = 6 or sisboyQW = 8) and sisboyday ! daystart:
				'<center><b><font color = maroon>Anja</font></b></center>'
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_09.jpg"></center>'
				'-The last time you have with Roma so much was saved, thank you very much.'
				'-You''re welcome, I am always very happy to help the beloved sister and see you happy.'
				'-We are here again today want to sit by me, you do not mind a walk for an hour?'

				act 'Of course':
					cls
					minut += 5
					sister += 10
					sisThank = 1
					sisboyQW += 1
					sisboyday = daystart
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_03.jpg"></center>'
					'-Certainly sister, i understand, I will walk until late, just do not make noise loud, You do not want to destroy the psyche of our brother, hee-hee.'
					'-You''re my best", your sister with a cry of joy hugs you.'

					act 'Finish':gt 'sister', 'home'
				end

				act 'No':
					cls
					sister -= 10
					minut += 5
					sisboyday = daystart
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_04.jpg"></center>'
					'-Sorry Anja, I need to study in the evenings'
					'-Oh well, Anja turned angrily away, and buried in his book.'

					act 'Finish':gt 'sister', 'home'
				end
			elseif rand(1, 10) >= 8 and sisboyQW = 9 and sisterLesb = 4 and sisboytrioQW = 0 and sisboytrio < 5:
				'<center><b><font color = maroon>Anja</font></b></center>'
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_09.jpg"></center>'
				if sisboytrio = 0:
					'- Sister, we are here with much thought and Roma... I do not know how to say..'
					'- Well, do not pull, what you have there is an interesting for me there.'
					'- Generally, mmm... We want, to you ' + iif(sisboyday = daystart, 'tomorrow', 'this') + ' evening we were joined by.'
				else
					'- Hello World! Well, you liked it last time? We have a very Roma.'
					'You do not say anything and just smiles slyly watching his sister''s eyes.'
					'- We want ' + iif(sisboyday = daystart, 'tomorrow', 'this') + ' evening repeat our games, if you do not mind?'
				end

				act 'Agree':
					cls
					sisboytrioQW = 1
					minut += 5
					sister += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_36.jpg"></center>'
					'You agree to the indecent proposal Ani.'
					'- Well, you and libertines, Of course I agree, it will be very interesting...'
					'You hug and kiss with your beloved sister'
					act 'Finish':gt 'sister', 'home'
				end

				act 'Refuse':
					cls
					sisboytrioQW = -1
					sisboytrioDayOtkaz = daystart + 3
					minut += 5
					sister = 0
					sisboyQW = 2
					sisThank = 0
					gs 'stat'
					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_37.jpg"></center>'
					'You waive Indecent Proposal sister.'
					'- Perverts, roll far away, sick bastards.'
					'You quarrel with her sister, she turns away from you and does not want to talk any more.'
					act 'Finish':gt 'sister', 'home'
				end
			else
				minut += 10
				sister += 2
				gs 'stat'

				'<center><b><font color = maroon>Anja</font></b></center>'
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_05.jpg"></center>'
				temp = rand(0, 10)
				if temp = 0:'You ask my sister about Roma, it long and happy says what he is good, responsive and courageous.'
				if temp = 1:'Anja says, before she met with some Roma-then mymra, and after leaving it for a long time he nazvanivala, from-Because of this, Anja much cursing and jealous.'
				if temp = 2:'One day she and Roma were in a movie, and noticed on the last rows girl sucking guy, and that Roma asked her how-something to do the same.'
				if temp = 3:'Anja swears, Roma that drinks too much beer, does not bestow gifts, and she pays little time.'
				if temp = 4:'Anja says, Roma that offered her a threesome with another girl, to which she greatly offended and week did not communicate with him.'
				if temp = 5:'Anja embarrassed complains you, Roma that sometimes comes to her work and drags her into the back room.'
				if temp = 6:'Anja in detail with enthusiasm tells you about the great virtue Roma, and if it is not, they would have long since parted.'
				if temp = 7:'Anja shares with you a secret, that her favorite position "horsewoman", and Romke likes to have her cancer.'
				if temp = 8:'You''re talking to my sister on a very frank things, and she says shyly, that she does not like to swallow cum, but it Roma strong winds, and she was ready for him to swallow.'
				if temp = 9:'Anja long talks about their company, about Romkinyh friends, and asks you if you wanted to whom any of them meet.'
				if temp = 10:'Anja says, what you liked Roma, and asks if he likes you.'

				act 'Finish':gt 'sister', 'home'
			end
		end
	end

	if sisThank = 1 and ((sisboyday + 1 = daystart and hour > 18) or sisboyday + 1 < daystart):
		cls
		if sisboyQW = 9 or sisboyQW = 7 or sisboyQW = 5 or sisboyQW = 3:sisboyQW -= 1
		sisboyday = 0
		sisThank = 0
		gs 'stat'

		'<center><b><font color = maroon>Anja</font></b></center>'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_00.jpg"></center>'
		'Merry Anja suddenly runs up to you and wraps around your neck.'
		if sisboytrioQW = 0:
			'-Sister, i adore you, we spent a lovely evening with Roma.'
			'-Yes, I am glad for you, Get off of me already, strangle, Anja and happy to let you go, a kiss on the cheek'
		else
			'- Sister, i adore you, I really enjoyed our evening together with Roma.'
			'- Yeah me too pleased, Unhook from me already, strangle, - Anya and happy to let you go, a kiss on the cheek'
			sisboytrioQW = 0
		end

		act 'Finish':gt 'sister', 'home'
		exit
	end

	if SisterKnowMastr = 1 and sisterQW = 0:
		cls
		sisterQW = 1
		gs 'stat'
		'<center><b><font color="maroon">Anja</font></b></center>'
		'<center><img src="images/qwest/alter/sister.jpg"></center>'
		'Anja looks at you and laughs "Well <<$nickname>>, and you give! I come into the room, and she''d play. Man himself Establishments, whether that."'

		act 'Move away':gt $loc, $metka
	end

	if sister >= 80 and sisterknowslut = 1:
		act 'Talk about sex':
			cla
			cls
			gs 'stat'
			minut += rand(10,15)
			horny += rand(5,10)
			sister += 1

			temp = rand (1,19)
			 if temp = 1:
				'<center><img src="images/qwest/alter/sister/sister1.jpg"></center>'
				'Sister shows off your, how good her boyfriend in bed.'
			 elseif temp = 2:
				'<center><img src="images/qwest/alter/sister/sister2.jpg"></center>'
				'Sister tells you the story of, it with my girlfriend sucked his friend on his birthday.'
			 elseif temp = 3:
				'<center><img src="images/qwest/alter/sister/sister3.jpg"></center>'
				'My sister recognized you, that just loves in the ass: - My mother just checking reference, so I cheated a little... - add a little blush: - and I enjoyed it very much.'
			 elseif temp = 4:
				'<center><img src="images/qwest/alter/sister/sister4.jpg"></center>'
				'Sister tells you, it makes blowjob her boyfriend: - Oh, You should have seen his face!'
			 elseif temp = 5:
				'<center><img src="images/qwest/alter/sister/sister5.jpg"></center>'
				'Sister tells you, in school classmate helped her with the study of a foreign language.'
			 elseif temp = 6:
				'<center><img src="images/qwest/alter/sister/sister6.jpg"></center>'
				'My sister recognized you, that just loves, when she was fucked in the mouth.'
			 elseif temp = 7:
				'<center><img src="images/qwest/alter/sister/sister7.jpg"></center>'
				'My sister recognized you, that one of the parties gave herself just two of.'
			 elseif temp = 8:
				'<center><img src="images/qwest/alter/sister/sister8.jpg"></center>'
				'My sister recognized you, that sex with a black man.'
			 elseif temp = 9:
				'<center><img src="images/qwest/alter/sister/sister9.jpg"></center>'
				'My sister recognized you, I had sex with eleven fellows at a time.'
			 elseif temp = 10:
				'<center><img src="images/qwest/alter/sister/sister10.jpg"></center>'
				'My sister recognized you, after the parties had sex with his girlfriend and her boyfriend.'
			 elseif temp = 11:
				'<center><img src="images/qwest/alter/sister/sister11.jpg"></center>'
				'My sister recognized you, that her ex-boyfriend lost heavily at cards, and she had to serve two men in his debt expense.'
			 elseif temp = 12:
				'<center><img src="images/qwest/alter/sister/sister12.jpg"></center>'
				'My sister recognized you, what how-the sucking dick stranger, through the hole in the toilet.'
			 elseif temp = 13:
				'<center><img src="images/qwest/alter/sister/sister13.jpg"></center>'
				'My sister recognized you, I had sex with a sex machine.'
			 elseif temp = 14:
				'<center><img src="images/qwest/alter/sister/sister14.jpg"></center>'
				'My sister recognized you, she attends bdsm club, she likes, when it attributed to the legs and arms and fuck like a piece of meat.'
			 elseif temp = 15:
				'<center><img src="images/qwest/alter/sister/sister15.jpg"></center>'
				'My sister recognized you, that in his last visit to bdsm club, it is bound and fucked by a helpless whore.'
			 elseif temp = 16:
				'<center><img src="images/qwest/alter/sister/sister16.jpg"></center>'
				'Sister tells you the story of, she with a friend, slept with his teacher in class.'
			 elseif temp = 17:
				'<center><img src="images/qwest/alter/sister/sister17.jpg"></center>'
				'Sister tells you the story of, once with Kolka Zhendos and Mishka invited me to see a movie, When we came to the Bears, and he turned Vidic, by which immediately began to show in place of the promised porn movie.'
				'When watching the film I curled it had not even understand, as it turned out c naked and in full force to masturbate Bears Zhendosom, and our dear little brother Kolka pulled his dick began to fuck me in the mouth'
			 elseif temp = 18:
				'<center><img src="images/qwest/alter/sister/sister18.jpg"></center>'
				'Sister tells you the story of, How is she going with two best friends from her stepfather in the garage, drunk and arrange an orgy.'
			 elseif temp = 19:
				'<center><img src="images/qwest/alter/sister/sister19.jpg"></center>'
				'My sister recognized you, What she likes to write in the cups, and then drink their urine.'
			 end

			act 'Move away':gt $loc, $metka
		end
	end

	if sisuniQW = 0:
		act 'Ask about the university':
			cls
			minut += 5
			sisuniQW = 1
			gs 'stat'
			'<center><b><font color="maroon">Anja</font></b></center>'
			'<center><img src="images/qwest/alter/sister.jpg"></center>'
			'You asked about Anja University. She grinned. "I almost came, gleaning points. Who scored on guys need it the whole university. What I will give this piece of paper?"'

			act 'Finish':gt 'sister', 'home'
		end
	end

	act 'Move away':gt $loc, $metka
end

--- sister ---------------------------------
# sistersleep
$sisboyQW_prycaress = {
	cls
	minut += 5
	horny += 10
	gs 'stat'

	'<center><img src="images/qwest/alter/sisterQW/sisboyQW_17.jpg"></center>'
	'From unexpected turbulent feelings you lay back, were placed legs wide and relaxed.'
	'You fondle yourself slowly and gently, enjoying every second, looking for sexy ass Anja.'
	'You kept thinking, continue to touch sleeping sister, touch her tender Picea, but what-then you stopped.'
	'-Maybe next time I will resolutely, you think to yourself, continuing to tease her clit.'

	act 'Move away':gt 'bedrPar'
}

if lesbian > 0:horny += 10
randompic = rand(0, 7)
gs 'stat'
'<center><b><font color="maroon">Anja</font></b></center>'
'<center><img src="images/qwest/alter/sister/sleep0<<randompic>>.jpg"></center>'
'on the bed, Anja is putting the ass'

if $loc ! 'bedrPar':
	act 'Move away':gt $loc, $metka
	exit
end

if sisboyQW >= 8 and sisterLesb = 0 and horny >= 50:
	act 'Touch':
		cls
		minut += 1
		horny += 5
		sisterLesb = 1
		sisprynight = day
		gs 'stat'

		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_16.jpg"></center>'
		'You dare to touch the sleeping sister of elastic ass.'
		'Touching his hand so soft buttocks, You like electric shock, and rushed inside different weird feeling.'
		'You suddenly wanted to have sex with sister.'

		act 'Fondle yourself':dynamic $sisboyQW_prycaress
		act 'Move away':gt 'bedrPar'
	end
elseif sisterLesb = 1 and horny >= 60 and sisprynight ! day:
	act 'Touch':
		cls
		minut += 1
		horny += 5
		sisprynight = day
		gs 'stat'

		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_18.jpg"></center>'
		'You can not help feeling, tested last time by touching the bare ass sister his hand.'
		'Convinced, that Anja fast asleep, again you dare touch her soft ass.'
		'But this time you decide to caress buns a little longer, enjoying the moment.'
		'Sexy body you sister is not a joke and has brought you decide...'

		act 'Proceed':
			cls
			minut += 2
			horny += 5
			gs 'stat'

			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_19.jpg"></center>'
			'You have continued to explore the hot body sisters, Your frisky fingers accidentally slipped between the legs of Anja.'
			'Sensations of heat and moisture have greatly impressed, pussy oozing with desire, -Apparently her dream a fascinating dream, or is it all I?'
			'You think to yourself, continuing to gently and slowly caress her sister, second hands dangling under his shorts'
			'But suddenly stirred Anja, -hell..hell, she wakes up... I do not have time to remove his hand...'

			act 'Kiss Anja':
				cls
				minut += 1
				horny += 5
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_21.jpg"></center>'
				'Are you brave enough girl, and while half asleep Anja not come round, you''re close to her face and sensually kissed her on the lips.'
				'Strongly excited Anja did not think to resist, her soft body easily give you the pressure.'
				'Your palm again slipped under her panties sister, but now your affection were confident...'

				act 'Caress sister':
					cls
					minut += 1
					if horny < 95:horny += 5
					sisterLesb = 2
					girl += 1
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_22.jpg"></center>'
					'Anja suddenly huddled in gentle convulsions and roughly finished. She gratefully looked at you and smiled'
					'-Well, you give a little sister...'
					'And nuzzled into his pillow and went to sleep. You really excited and even a little upset unsatisfied, but was satisfied...'

					act 'Move away':gt 'bedrPar'
				end
			end

			act 'Remove hand':
				cls
				minut += 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_20.jpg"></center>'
				'Sleepy and crumpled Anja wakes up and sees you on her bed, and as you hastily removed his hand and hide behind.'
				'-What...what''s going on here? <<$nickname>>? Are you crazy? What are you doing here?'
				'You sit in front of my sister on her bed, excited, caught off guard, and not knowing what to do...'

				act 'Move away':
					cls
					minut += 1
					sister = 0
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_23.jpg"></center>'
					'You have decided to do nothing and quietly move away from the sleepy sister, She can forget all the morning'
					'As soon you have made a step from her bed she called you:'
					'-I do not want to know what you did to me while I was asleep, but do not come near me.'

					act 'Move away':gt 'bedrPar'
				end
			end
		end

		act 'Fondle yourself':dynamic $sisboyQW_prycaress
		act 'Move away':gt 'bedrPar'
	end
elseif sisterLesb = 3 and horny >= 60 and sisprynight ! day:
	act 'Touch':
		cls
		minut += 1
		horny += 5
		sisprynight = day
		gs 'stat'

		if sisterLesbScene = 0:
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_30.jpg"></center>'
			'Waking up half-naked Anna, You have got it with a kiss, gradually going down.'
			'Letting panties you instantly glued to the coveted bosom sister, inhaling the intoxicating aroma.'
			'Hugged and comfortably between the legs sister, licking the soft folds of the lips and sucking the clitoris.'
			'Anja enjoy your tongue, and I admired you, glancing down.'
			'She started up so much, that suddenly twitched, You grabbed his head and hold it over, and quickly fell asleep.'
		elseif sisterLesbScene = 1:
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_31.jpg"></center>'
			'You began gently kissing, caressing each other, paying attention to every millimeter of body.'
			'Anne sat down and spread your legs long and easily kiss labia, language held on the clitoris.'
			'Insert your finger and began to fuck you, you feel that approaching orgasm and shouted panting:'
			'- Come fuck me please fuck!!'
			'Her tongue penetrated deeper and deeper, Anja and the other hand crumpling your boobs.'
			'- Aaaaaaaaaaaa!!! You caught a wave of bliss and you violently ended......'
			horny = 0
			orgasm += 1
		elseif sisterLesbScene = 2:
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_32.jpg"></center>'
			'You went down to Ankinomu bud from which emanates the sweet smell, circling your head.'
			'Conducted between sponge finger to push them, Then you put your finger on the clitoris and began to make a circular motion...'
			'She was so good, she involuntarily began publishing groans...'
			'Then you have plunged into pussy sister. Lick it lengthwise and crosswise... she writhed... moaning... finally her body convulsed... finished... '
		elseif sisterLesbScene = 3:
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_33.jpg"></center>'
			'At this time, Anka went to the box and pulled out a strap-on.'
			'She put on a strap, I lay on her back and began to put you on top, but the strap went wrong somewhere you thought, and in the ass....'
			'The first impression - This unbearable pain, you may even want to jump, but then it was nice...'
			'Anja held on your boobs, and the priest tossed roughly ebya in point...'
			'- aaa... yeah... suuukaaa.... fuck me.... good.... yeah.... fuck me....- you cried.'
			'You richly finished, and Anja tilted you and forced to lick her release from a strapon...'
			horny = 0
			orgasm += 1
			anus += 1
			act 'Suck Strap':
				cls
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_34.jpg"></center>'
				'Anja looked at you and you dutifully licked strapon, feeling the tart taste of your juice.'
				'Lick all, you began to suck head, Anja monitor your movements and spoke as correctly suck. Then Anja grabbed you by the hair and abruptly entered your throat, You suffocated her by waving..'
				'-Bitch, What are you doing, I''m so suffocate, though be warned.'
				'-Let''s learn a little sister, guys like this, and played enough plenty of your mouth you let Anja'
				throat += 1
				sisterLesbScene += 1
				gs 'stat'
				act 'Move away':gt 'bedrPar'
				exit
			end
			exit
		elseif sisterLesbScene = 4:
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_35.jpg"></center>'
			'You Kiss passionately with his beloved sister, and then she pushes you..'
			'-Listen, Sveta, I love you very much, but I''m not a lesbian, and I do not want that kind of relationship between us developed.'
			'-Of course, I understand, but I got it, and I wanted to thank you for everything..'
			'-And it seems Roma started me to you jealous... oh let slip...'
			'-You what? All told him? I did not expect from you such meanness.'
			'-Do not be afraid you Sveta, it will be our little secret, no one will know...'
			sisterLesb = 4
			sisboytrioQW = 0
		end

		if sisterLesbScene < 4:sisterLesbScene += 1
		gs 'stat'
		act 'Move away':gt 'bedrPar'
	end
end

act 'Move away':gt 'bedrPar'

--- sistersleep ---------------------------------
# sistersobir
!!if lesbian > 0:horny += 10 & siswath += 1
gs 'stat'
'<center><b><font color="maroon">Anja</font></b></center>'
'<center><img src="images/qwest/alter/sobir.jpg"></center>'
'Walks around the room going to work your sister Anja.'
'Anja says turning to you "<<$nickname>>, I''m so late, do not distract."'

act 'Move away':gt $loc, $metka

--- sistersobir ---------------------------------
# sisterprogulka
!!if lesbian > 0:horny += 10 & siswath += 1
gs 'stat'
'<center><b><font color="maroon">Anja</font></b></center>'
'<center><img src="images/qwest/alter/sister/progulka.jpg"></center>'
'Walks around the room going for a walk on your sister Anja. She admires itself in a mirror and turned the ass trying to see yourself better'
'Anja says turning to you "<<$nickname>>, if you decide to take a walk, I''m outside the club with her friends."'

act 'Move away':gt $loc, $metka

--- sisterprogulka ---------------------------------
# family
if day ! m_day:
	m_day = day
	father_go = rand(0, 1)
	mother_go = rand(0, 1)
end

indorf = 0

if indorf_month ! month:
	!!monthly
	indorf_month = month
	dostupindorf = 1
end

if week = 1 and dostupindorf = 1:dostupindorf = 0

if dostupindorf = 1 and ((week = 6 and hour >= 12) or (week = 7 and hour < 20)):
	!!go to the village
	indorf = 1
	father_go = 0
	mother_go = 0
end

if indorf = 1 and sister_opr_indorf = 0:
	sister_opr_indorf = 1
	sister_indorf = rand(0, 1)
end

if indorf = 0:
	sister_opr_indorf = 0
	sister_indorf = 0
end

if sister_indorf = 1:sisterHere = 0

if StoryLine = 1:
	if sisboytrio >= 5 and sisboyparty ! 0 and sisboyparty_day + 1 < daystart and randsbPartyDay <= daystart and week >= 4:
		if week = 4:randsbPartyDay = daystart + 4 & sisboyparty_day = daystart + rand(0, 2)
		if week = 5:randsbPartyDay = daystart + 3 & sisboyparty_day = daystart + rand(0, 1)
		if week = 6:randsbPartyDay = daystart + 2 & sisboyparty_day = daystart
	end

	if sisboyparty_day + 1 = daystart and sisboyparty = 2 and hour > 18 and sisboypartyQW = 1:
		cls
		minut += 5
		sisboyparty = -1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_7.jpg"></center>'
		'You have forgotten to come to a party in honor of the birthday Rex.'
		'- Oh well, I hope they are not offended me greatly...'
		act 'Move away':gt $loc, $metka
		exit
	end

	if sisboyparty_day + 1 = daystart and (sisboyparty = 2 or sisboyparty = 1) and hour > 18 and sisboypartyQW > 1:sisboyparty = -1

	if sister_indorf = 0:
		if $loc = 'bedrPar':
			sisterHere = 0

			if hour < 7:
				sisterHere = 1
				'Your sister <a href="exec:gt ''sistersleep''">Anja</a> asleep in bed.'
			end

			if week < 6:
				if hour = 7:
					sisterHere = 2
					'Your sister <a href="exec:gt ''sister'', ''home''">Anja</a> is going to work.'
				end
			end

			if week >= 6:
				if hour >= 7 and hour < 10:
					sisterHere = 1
					'Your sister <a href="exec:gt ''sistersleep''">Anja</a> asleep in bed.'
				end

				if hour = 10:
					sisterHere = 2
					'Your sister <a href="exec:gt ''sisterprogulka''">Anja</a> going for a walk.'
				end
			end

			if hour >= 18:
				sisterHere = 2
				'Your sister <a href="exec:gt ''sister'', ''home''">Anja</a> sitting on bed and reading a book.'
			elseif sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22:
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_6_<<rand(1,7)>>.jpg"></center>'
				'Drunk, disheveled Anja bursts into the room.'
				'You notice that her hair, All clothes are smeared with sticky sperm.'
				'In this form,, she falls on the bed and falls asleep instantly.'
				sisboyparty = 1
				act 'Move away':gt $loc
				exit
			elseif sisboyparty_day + 1 = daystart and hour >= 22:
				sisterHere = 1
				if sisboypartyQW = 1:sisboypartyQW = 2
				if sisboyparty = -1:sisboyparty = 1
				'Your drunken sister Anja asleep in bed.'
			end
		end
	end

	if indorf = 0:
		if $loc = 'bedrPar2':
			if hour < 6 or hour >= 21:
				'On the bed sleeping mom and stepfather.'

				if hour = 21:parsexrand = rand(0, 5)
			end
		end

		if $loc = 'sitrPar':
			if hour < 7 or hour >= 21:'Sleeps on the couch your younger brother Kolka.'

			if week < 6:
				if father_go = 0:
					if hour >= 16 and hour < 21:'Sitting on the couch <a href="exec:gt ''father''">stepfather</a> and watching TV.'
				end
				if hour >= 18 and hour < 20:'Sitting at the table your little brother <a href="exec:gt ''brother''">Kolka</a> and teaches lessons.'
				if hour = 20:'Sitting on the couch your younger brother <a href="exec:gt ''brother''">Kolka</a> and watching TV.'
			end

			if week >= 6:
				if father_go = 0:
					if hour >= 7 and hour < 21:'Sitting on the couch <a href="exec:gt ''father''">stepfather</a> watching TV.'
				else
					if hour >= 7 and hour < 16:'Sitting on the couch <a href="exec:gt ''father''">stepfather</a> watching TV.'
				end

				if hour >= 18 and hour <= 20:'Sitting on the couch your younger brother <a href="exec:gt ''brother''">Kolka</a> and watching TV.'
			end
		end

		if $loc = 'kuhrPar':
			if week < 6:
				if mother_go = 0:
					if hour >= 16 and hour < 21:'Stands near the stove <a href="exec:gt ''mother''">Mom</a> and that it cooks.'
				else
					if hour >= 17 and hour < 21:'Near the stove stands <a href="exec:gt ''mother''">Mom</a> and that it is preparing.'
				end
			end

			if week >= 6:
				if mother_go = 0:
					if hour >= 7 and hour < 21:'Stands near the stove <a href="exec:gt ''mother''">Mom</a> and that it cooks.'
				else
					if (hour >= 7 and hour < 16) or (hour >= 17 and hour < 21):'Near the stove stands <a href="exec:gt ''mother''">Mom</a> and that it is preparing.'
				end
			end
		end

		if $loc = 'korrPar':
			!! for future code I guess
		end

		if $loc = 'vokzalG':
			!! for future code I guess
		end

		if $loc = 'gdk':
			if week < 6:
				if hour >= 16 and hour < 18:'Your sister <a href="exec:gt ''sister'', ''drinking''">Anja</a> sitting in the company of beautiful girls and guys drinking beer.'
			end

			if week >= 6:
				if hour >= 11 and hour < 18:'Your sister <a href="exec:gt ''sister'', ''drinking''">Anja</a> sitting in the company of beautiful girls and guys drinking beer.'
			end
		end

		if $loc = 'gschool':
			if (week < 6 and hour >= 15 and hour <= 17) or ((week >= 6 or kanikuli > 0) and hour >= 7 and hour <= 17):
				if hour >= 15 and hour <= 17:'On the football field near the school your <a href="exec:gt ''brother''">brother</a> plays futbol.'
			end
		end
	end
end

--- family ---------------------------------
# Snpc
!'
$npcName[numnpc] = ''
$npcSurName[numnpc] = ''
$npcText[numnpc] = ''

grupNPC[numnpc] =
npcPol[numnpc]
grupTipe[numnpc]
'!
gs 'dinnpc'
gs 'stat'
'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
'<<$npcText[numnpc]>>'

if grupTipe[numnpc] = -1:'<<$npcName[numnpc]>> refers to a group of outcasts.'
if grupTipe[numnpc] = 0:''
if grupTipe[numnpc] = 1:'<<$npcName[numnpc]>> refers to a group of nerds.'
if grupTipe[numnpc] = 2:'<<$npcName[numnpc]>> refers to a group sportikov.'
if grupTipe[numnpc] = 3:'<<$npcName[numnpc]>> refers to a group of steep.'
if grupTipe[numnpc] = 4:'<<$npcName[numnpc]>> refers to a group Gopnik.'
if grupNPC[numnpc] < 20:'You have a bad attitude.'
if grupNPC[numnpc] >= 20 and grupNPC[numnpc] < 40:'You tensions.'
if grupNPC[numnpc] >= 40 and grupNPC[numnpc] < 60:'You have a normal relationship.'
if grupNPC[numnpc] >= 60 and grupNPC[numnpc] < 80:'You have a good relationship.'
if grupNPC[numnpc] >= 80:'You have a great relationship.'

if numnpc = 14 and KatjaOTN > 0:
	if KatjaHorny < 20:'Katia looks calm and indifferent.'
	if KatjaHorny >= 20 and KatjaHorny < 40:'Katja in the eyes jump merry twinkle.'
	if KatjaHorny >= 40 and KatjaHorny < 60:'Katja has a faint blush on her cheeks and she looks at you mischievously.'
	if KatjaHorny >= 60 and KatjaHorny < 80:'Katja blushed and languid looks at you.'
	if KatjaHorny >= 80:'Katja all red as a lobster and her chest heaving from deep breathing.'
end
''
''

!!act 'Move away':gt $locM, $metkaM

gs 'cumreaction'
gs 'izdevat'
gs 'krutishi'

if numnpc = 23 and albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0:
	'Albina easy smiles at you "<<$name>>, you spravlyaeshsya well in training, do not forget to come to it."'

	if GorSlut > 0:'By the way, you go about disgusting rumors.'
end

if AlbFrend = 1 and numnpc = 23:
	AlbFrend = 2
	grupNPC[numnpc] = 100
	'Albina smiling at you, "Thank you <<$name>>, correctly say, a friend in need is a friend indeed. You rescued me very warning of Zvezdushkah unfortunately have to close our team, that would not run into trouble."'
elseif AlbFather = 2 and numnpc = 23 and AlbEnemy = 0:
	grupNPC[numnpc] = 0
	AlbEnemy = 1
	'Albina angrily glared "Oh, you bitch! Said at me taken in head to write. Well, you''ll regret it."'
end

if numnpc = 9:gs 'kotovtalker'

!!!!!!!!!!!!
!!!gopota!!!
!!!!!!!!!!!!
if grupTipe[numnpc] = 4:
	if $loc = 'gdkin':
		if GorSlut < 2:
			if numnpc ! 9:
				if npcPol[numnpc] = 0:
					'<<$npcName[numnpc]>> - Hey <<$name>>, let podbuhnem, and then do something dumb like.'
				else
					'<<$npcName[numnpc]>> - Hey <<$name>>, let podbuhnem, and then do something dumb like.'
				end

				act 'Drink beer':
					cls
					minut += 5
					grupNPC[numnpc] += 5
					alko += 1
					salo += 1
					fat += 2
					energy += 10
					gs 'stat'
					'You drank beer in the company of friends.'

					act 'Move away':gt $loc, $metka
				end

				act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka
			end
		elseif GorSlut >= 2:
			if npcPol[numnpc] = 0:
				'<<$npcName[numnpc]>> - Cho priperlas, vaflersha. Huytsa want a nap or something?'
			else
				'<<$npcName[numnpc]>> - Hey cocksucker, sebi here. With you to stand beside you dumb.'
			end

			act 'Leave':grupNPC[numnpc] -= 5 & gt $loc, $metka
		end

		exit
	end
end

act 'Chat':
	cls

	if $loc = 'gdkin':minut += 5

	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
	! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
	'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'

	if numnpc = 1 and grupNPC[numnpc] = 0:
		'Dimka sniffed. "Get off me pimply pig."'

		if $loc ! 'gdkin':dynamic $din_sekondparturok
		if $loc = 'gdkin':act 'Move away':gt $loc, $metka

		exit
	end

	gs 'nogorslut'
	gs 'yesgorslut'

	if $loc ! 'gdkin':dynamic $din_sekondparturok
	if $loc = 'gdkin':act 'Move away':gt $loc, $metka
end

!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!Artem CHEBOTAREV Botha!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!
if numnpc = 2:
	if dom > 0 and artemLernQW = 0:
		act 'You could not pull me in a little school?':
			cls

			if $loc = 'gdkin':minut += 5

			grupNPC[numnpc] += 5
			sub += 1

			if GorSlut < 3:artemLernQW = 1

			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'

			if GorSlut < 3:'You came to Artem and asked him to help you to learn. Artem was a bit surprised and said to you "Okay. Come after school to my home, work."'
			if GorSlut >= 3:'You came to Artem and asked him to help you to learn. Artem outraged "Bah, I''ll spend my time on this as you are, of course, and no more can not fit me."'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end
	end
end

!!!!!!!!!!!!!!!!!!!!!!
!!!JULIA mil bot!!!
!!!!!!!!!!!!!!!!!!!!!!
if numnpc = 12:
	if dom > 0 and JuliaMilLernQW = 0 and grupNPC[numnpc] >= 80:
		act 'You could not pull my little study?':
			cls

			if $loc = 'gdkin':minut += 5

			grupNPC[numnpc] += 5
			sub += 1
			JuliaMilLernQW = 1
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'

			if GorSlut < 1:'You came to Julia and asked you to pull up a little learning, She thought agreed.'
			if GorSlut >= 1:'You came to Julia and asked you to pull up a little learning, she snorted indignantly, well, and then think, we are friends.'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end
	end
end

!!!!!!!!!!!!!!!!!!!
!!!Katja MEYNOLD!!!
!!!!!!!!!!!!!!!!!!!
if numnpc = 14 and meynoldQW = 1:
	act 'Thank you for what you took away from the disco.':
		cls

		if $loc = 'gdkin':minut += 5

		grupNPC[numnpc] += 5
		meynoldQW = 2
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'You came to Katja and thanked her for what she stole you from the disco home when you have touched. Katja smiled at you. "Not at all, only you do not get drunk. Drunkenness could end badly."'

		if $loc ! 'gdkin':dynamic $din_sekondparturok
		if $loc = 'gdkin':act 'Move away':gt $loc, $metka
	end
end

if numnpc = 14 and meynoldQW > 1 and mop <= 1:
	'Katja looks at you with a smile, "<<$name>>, give I to you though your eyes are tinted."'

	act 'Cosmetics':
		cls
		hapri = 1

		if $loc = 'gdkin':minut += 5

		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'Katia quickly straightened your hair and asked. "You what? Little tint, usually distribute or shovel?"'

		act 'Light makeup':
			cla
			mop = 2
			'Katja legonechko your eyes and let the little tint the lips.'

			if KatjaOTN > 0:KatjaHorny += 10 & 'Katja blushes and depart from your eyes.'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end

		act 'Normal makeup':
			cla
			mop = 3
			'Katja has made up your lips, eyes and let the eyelids.'

			if KatjaOTN > 0:KatjaHorny += 10 & 'Katja blushes and depart from your eyes.'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end

		act 'Bright makeup':
			cla
			mop = 4
			'Katja painted her lips bright lipstick you thickly painted her eyes and eyelashes, eyebrows and summed imposed deep shadows.'

			if KatjaOTN > 0:KatjaHorny += 10 & 'Katja blushes and depart from your eyes.'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end
	end
end

if numnpc = 14 and meynoldQW > 1 and mop > 1:
	if $loc ! 'gdkin':
		!!school
		!!if KatjaHorny >= 50:end
		!!if KatjaHorny < 50:end
	end

	if $loc = 'gdkin':
		!!at the disco
		!!if KatjaHorny >= 50:end
		!!if KatjaHorny < 50:end
	end
end

!!!!!!!!!!!!!!!!!!!!!!!!!
!!!Natasha Belova Botha!!!
!!!!!!!!!!!!!!!!!!!!!!!!!
if numnpc = 16:
	if dom > 0 and NatBelLernQW = 0 and grupNPC[numnpc] >= 80:
		act 'You could not pull my little study?':
			cls

			if $loc = 'gdkin':minut += 5

			grupNPC[numnpc] += 5
			sub += 1
			NatBelLernQW = 1
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'

			if GorSlut < 1:'You came to Natasha and asked you to pull up a little learning, She thought agreed.'
			if GorSlut >= 1:'You came to Natasha and asked you to pull up a little learning, she snorted indignantly, well, and then think, we are friends.'
			if $loc ! 'gdkin':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end
	end
end

if $loc ! 'gdkin':dynamic $din_sekondparturok
if $loc = 'gdkin':act 'Move away':gt $loc, $metka

--- Snpc ---------------------------------
# cumreaction
if cumface > 0 or cumfrot > 0:
	grupNPC[numnpc] -= 10

	if GorSlut = 0:GorSlut = 1

	'<<$npcName[numnpc]>> looks at you "And this, what? Yes, it''s sperm! Fu. Would you even substitution."'

	if $loc = 'gschool':
		dynamic $din_sekondparturok
	else
		act 'Move away':gt $loc, $metka
	end

	exit
end

if cumlip > 1:
	grupNPC[numnpc] -= 10

	if GorSlut < 2:GorSlut = 2

	'<<$npcName[numnpc]>> looks at you, "What have you got out of his mouth smells? Yuck It''s sperm carries. Would you even cleaned up the drive after aspiration."'

	if $loc = 'gschool':
		dynamic $din_sekondparturok
	else
		act 'Move away':gt $loc, $metka
	end

	exit
end

--- cumreaction ---------------------------------
# izdevat
if grupTipe[numnpc] = -1 and GorSlut < 2:
	act 'Mock':
		cls
		grupNPC[numnpc] -= 5
		dom += 1
		gs 'stat'
		'You mocked the school outcast, unconscious of the strength and support classmates.'

		if $loc ! 'gdkin':dynamic $din_sekondparturok
		if $loc = 'gdkin':act 'Move away':gt $loc, $metka
	end
elseif grupTipe[numnpc] = -1 and GorSlut >= 2:
	act 'Mock':
		cls
		sub += 1
		gs 'stat'
		'You began to scoff, but <<$npcName[numnpc]>> answered you. "Cocksucker mouth shut, ending stinks." Everyone started laughing at you. You were confused and not knowing what to say, that they began to mutter.'

		if $loc ! 'gdkin':dynamic $din_sekondparturok
		if $loc = 'gdkin':act 'Move away':gt $loc, $metka
	end
end

--- izdevat ---------------------------------
# kotovtalker
!!!!!!!!!!!!!!!!!
!!!Witek Cats!!!
!!!!!!!!!!!!!!!!!
if numnpc = 9 and grupNPC[numnpc] >= 80 and GorSlut = 0 and kotovLoveQW >= 0:
	if $loc = 'gdkin':
		if alko < 2:
			'<<$npcName[numnpc]>> - <<$nickname>> Hey, let podbuhnem, and then do something dumb like.'

			act 'drink beer':
				cls
				minut += 5
				grupNPC[numnpc] += 5
				alko += 2
				salo += 1
				fat += 2
				energy += 10
				gs 'stat'
				'Witek poured you a beer and you have been drinking with him. Witek staring at you eye and tells you what you cool girl.'

				act 'Move away':gt $loc, $metka
			end

			act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka

			exit
		elseif alko >= 2:
			'<<$npcName[numnpc]>> - <<$nickname>> Hey, let''s dance.'

			act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka

			act 'Dance':
				cls
				minut += 5
				grupNPC[numnpc] += 5
				dance += rand(1, 3)
				horny += 10
				kotovQW += 1
				gs 'stat'
				'You came to the dance floor and started dancing with Victor. Witek paw you in the ass with his strong hands, which are more like mites.'

				if kotovLoveQW = 0:
					if kotovQW < 5 or grupTipe[25] = 0:
						act 'Move away':gt $loc, $metka
					elseif kotovQW >= 5 and grupTipe[25] ! 0:
						'The dance ends and Witek took you by the hand steers you to the wall. "Hears <<$name>>, let''s muddy, you will be my type of chick. Anyone I unscrewed for you Bosko"'

						act 'Refuse':
							cls
							grupNPC[numnpc] = 0
							gs 'stat'
							'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
							'You refused and Witek looks completely confused, but he was immediately covered anger. "Well, then Wali on dick fucking whore!"'

							act 'Move away':gt $loc, $metka
						end

						act 'Agree':
							cls
							kotovLoveQW = 1
							gs 'stat'
							'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
							'You and Witek delighted "ohuet. I myself do not believe that you agreed with me muddy."'

							act 'Move away':gt $loc, $metka
						end
					end
				elseif kotovLoveQW > 0:
					'The dance ends and Witek took you by the hand removes the wall.'
					'Witek hugs you "<<$name>>, come to my house."'

					act 'Move away':gt $loc, $metka

					act 'Go to Vit''ka.':
						cls
						minut += 15
						gs 'stat'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
						'You came out of discos and went in the direction where he lives Witek with him while holding his arm. Soon you with Victor approached the dilapidated house he opened the door and led you to the poor and not well-kept apartment in a room where clothes lying crumpled heaps on the floor was littered with empty bottles.'

						act 'Further.':gt 'kotovSex'
					end
				end
			end
		end

		exit
	end

	'<<$npcName[numnpc]>> - Hey <<$name>>, who will get. Tell me about you to anyone I wring your neck.'
	dynamic $din_sekondparturok

	exit
elseif numnpc = 9 and kotovLoveQW > 0 and GorSlut > 0:
	'Witek scowled and tells you "Slysh <<$name>>, Th for garbage? We''re mutim, and then you tell me about what you <<$gnikname>>. Whole town already know the boys with me neigh district. You ohuevshaya bitch! "'

	act 'A scandal':
		cls
		grupNPC[9] = 0
		kotovLoveQW = -1
		gs 'stat'
		'You started yelling at Victor that he has fucked. Vitek started yelling at you and suddenly you have a ringing in your head and you were on the floor. Witek standing over you. Heavily burned cheek, you do not understand what happened, but it seems he slapped you podschechinu. "All the creature! Most do not come to me! All over between us!"'

		if $loc = 'gschool':dynamic $din_sekondparturok
		if $loc = 'gdkin':act 'Move away':gt $loc, $metka
	end

	if dom >= 20:
		act 'Argue that all this gossip':
			cls
			sub += 20
			GorSlut = 0
			gs 'stat'
			'You have started to convince Victor that all this gossip, do not have no foundation. Witek frowned, "I''ll knock your teeth these talkers, if ever even what you hear about the garbage. Do not worry, I pozatykayu these yapping mouths."'

			if $loc = 'gschool':dynamic $din_sekondparturok
			if $loc = 'gdkin':act 'Move away':gt $loc, $metka
		end
	end

	exit
end

if $loc = 'gdkin':
	if GorSlut < 2:
		'<<$npcName[numnpc]>> - Hey <<$name>>, let podbuhnem, and then do something as dumb.'

		act 'drink beer':
			cls
			minut += 5
			grupNPC[numnpc] += 5
			alko += 1
			salo += 1
			fat += 2
			energy += 10
			gs 'stat'
			'You drank beer in the company of friends.'

			act 'move_away':gt $loc, $metka
		end

		act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka
	elseif GorSlut >= 2:
		'<<$npcName[numnpc]>> - Cho priperlas, vaflersha. Huytsa want to nap or something?'

		act 'Leave':grupNPC[numnpc] -= 5 & gt $loc, $metka
	end

	exit
end

--- kotovtalker ---------------------------------
# nogorslut
if GorSlut <= 0:bonusotnG = vnesh / 2
if bonusotnG <= 0:bonusotnG = 1
grupNPC[numnpc] += bonusotnG
talkmarkeronce = 0

if grupNPC[numnpc] < 20 and talkmarkeronce = 0:
	talkmarkeronce = 1
	'You chat about any nonsense and <<$npcName[numnpc]>> listens to you in half an ear.'
elseif grupNPC[numnpc] < 80 and grupNPC[numnpc] >= 20 and talkmarkeronce = 0:
	talkmarkeronce = 2
	'You chat about any nonsense and <<$npcName[numnpc]>> willingly assents to you.'
elseif grupNPC[numnpc] >= 80 and talkmarkeronce = 0:
	talkmarkeronce = 3
	'You chat about all the nonsense and <<$npcName[numnpc]>> with a smile, talking to you, too, telling all sorts of stories.'

	if numnpc = 1:
		Mud = totminut + 60
		!!Dimka steep Nosov

		if DimaRudeQW > 0 and DimaRudeBlock = 0:'Dimka looks at you look aloof "After high school, go to my place. I''ll wait for you at the entrance."'
	elseif numnpc = 2:
		!!nerdy Artem Chebotarev
		''
	elseif numnpc = 3:
		Mud = totminut + 60

		!!sportik Ivan Prokhorov
		if IvanShowerQW = 1:
			IvanShowerQW = 2
			'Ivan smiles "<<$name>>, I''m sorry for what happened in the shower. Just thought I''d make a row or anything."'
		elseif IvanShowerQW = 10:
			IvanShowerQW = 11
			manna = 0
			Mud = 0
			'Ivan thinks "<<$name>>, I wanted to talk to the account of what happened in the shower. Devchenka you cool and everything was great, but I''m not ready for a relationship, I now need to vigorously engage in sports that would get to the championship of Russia. I can not be distracted by girls even such attractive as you. So let''s just forget about what happened."'
		end
	elseif numnpc = 4:
		!!Igor Kruglov
		''
	elseif numnpc = 5:
		!!Fedor goats
		''
	elseif numnpc = 6:
		!!Peter Klyuyev
		''
	elseif numnpc = 7:
		!!Leszek Tsarev
		''
	elseif numnpc = 8:
		!!Svyatoslav soldiers
		''
	elseif numnpc = 9:
		!!Vitek Cats
		''
	elseif numnpc = 10:
		!!Gopnik Dan Ryzhov
		''
	elseif numnpc = 11:
		!!Gopnik Bob Shulgin
		''
	elseif numnpc = 12:
		!!Julia Milov
		''
	elseif numnpc = 13:
		!!Lariska Gruzdeva
		''

	elseif numnpc = 14:
		!!Katja Meynold
		''

		if KatjaOTN > 0:KatjaHorny += 10 & 'Kate blushes and depart from your eyes.'
	elseif numnpc = 15:
		!!Vic Meynold
		''

	elseif numnpc = 16:
		!!Natasha Belova
		''
	elseif numnpc = 17:
		!!Inna Devyatova
		''
	elseif numnpc = 18:
		!!Christina Zvereva
		if kristinaSex = 0 and swinbeggor = 0 and kristinaSex = 0:
			''
		elseif kristinaSex = 0 and swinbeggor > 0 and kristinaSex = 0:
			grupNPC[numnpc] = 20
			'Christina hate looking at you. "You bitch already tired under my feet hang out!"'
		elseif kristinaSex > 0:
			''
		end
	elseif numnpc = 19:
		!!Length Starov
		''
	elseif numnpc = 20:
		!!Lena Kotova
		''
	elseif numnpc = 21:
		!!Lera Tsar
		''
	elseif numnpc = 22:
		!!Bella Artamonov
		''
	elseif numnpc = 23:
		!!Albina Barlovskaya
		''
	elseif numnpc = 24:
		!!Pauline sebagotulina
		''
	elseif numnpc = 25:
		!!Sonia Ivanko
		''
	end
end

--- nogorslut ---------------------------------
# yesgorslut
if GorSlut > 0:
	if grupTipe[numnpc] = -1:
		!!rogue
		bonusotnG = vnesh / 2

		if bonusotnG <= 0:bonusotnG = 1

		grupNPC[numnpc] += bonusotnG

		if npcPol[numnpc] = 0:
			!!Guy
			'You are chatting about any nonsense and <<$npcName[numnpc]>> readily assents to you.'
		elseif npcPol[numnpc] > 0:
			!!Girl
			'You are chatting about any nonsense and <<$npcName[numnpc]>> readily assents to you.'
		end
	elseif grupTipe[numnpc] = 0:
		!!norm
		if npcPol[numnpc] = 0:
			!!Guy
			'You are trying to talk to the guy, but <<$npcName[numnpc]>> missing from face looking at you.'
		elseif npcPol[numnpc] > 0:
			!!Girl
			'You are trying to talk to a girl, but <<$npcName[numnpc]>> turns away and does not want to communicate with you. "Get out! And that still think we''re friends."'
		end
	elseif grupTipe[numnpc] = 1:
		!!nerdy
		if npcPol[numnpc] = 0:
			!!Guy
			'You are trying to talk to the guy, but <<$npcName[numnpc]>> staring at boobs. And chuckles.'
		elseif npcPol[numnpc] > 0:
			!!Girl
			'You are trying to talk to a girl, but <<$npcName[numnpc]>> turns away and does not want to communicate with you.'
		end
	elseif grupTipe[numnpc] = 2:
		!!sportiki
		if numnpc = 18:
			!!Christina Zvereva
			if kristinaSex = 0 and swinbeggor = 0:
				'You are trying to talk to a girl, but <<$npcName[numnpc]>> makes squeamish grimassy "Go away <<$gnikname>>!"'
			elseif kristinaSex = 0 and swinbeggor > 0:
				'Christina hate looking at you. "You filthy whore already zadolbala spinning under my feet!"'
			elseif kristinaSex > 0:
				'Christina smiles at you and says quietly, "Not bad the last time we entertained, you''re so sexy that just zakachaeshsya."'
			end
		elseif npcPol[numnpc] = 0:
			!!Guy
			'You are trying to talk to the guy, but <<$npcName[numnpc]>> dismisses you." I''m busy right now."'
		elseif npcPol[numnpc] > 0 and numnpc ! 18:
			!!Girl
			'You are trying to talk to a girl, but <<$npcName[numnpc]>> makes squeamish grimassy "Go away <<$gnikname>>!"'
		end
	elseif grupTipe[numnpc] = 3:
		!!steep
		if numnpc ! 14:
			if npcPol[numnpc] = 0:
				!!Guy
				'Are you trying to talk to the guy, but <<$npcName[numnpc]>> dismisses you. "Look, I''m busy right now. Come back later or never."'
			elseif npcPol[numnpc] > 0:
				!!Girl
				if AlbFrend >= 1 and numnpc = 23:
					'<<$npcName[numnpc]>> with a smile communicates with you.'
				else
					'You are trying to talk to a girl, but <<$npcName[numnpc]>> makes squeamish grimassy "Get out of here!"'
				end
			end
		elseif numnpc = 14:
			!!Katja Meynold
			'You chat with Katja and she brings all your conversation to the rumors about you and your reputation. Rumor has it that you <<$gnikname>>.'
		end
	elseif grupTipe[numnpc] = 4:
		!!Gopnik
		if npcPol[numnpc] = 0:
			!!Guy
			if numnpc = 9:
				!!Cats
				'Are you trying to talk to Victor, but he responds to you, "I hear it! Fuck off."'
			elseif numnpc ! 9:
				'<<$npcName[numnpc]>> laughing at you "Ha ha <<$gnikname>> come. huytsa want more?"'
			end
		elseif npcPol[numnpc] > 0:
			!!Girl
			'<<$npcName[numnpc]>> disgust face contorts "Yuck, <<$gnikname>>. Fuck off bitch!"'
		end
	end
end

--- yesgorslut ---------------------------------
# Gnpc
!!Guys
GvstreBoyAfter[numnpc] = 0
GvstreBoy = 0
boyvstre[numnpc] += 1
gs 'stat'
'<center><b><font color="maroon"><<$nameBoyfrend[numnpc]>></font></b></center>'
!!'<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
'<<$nameBoyfrend[numnpc]>> your boyfriend.'

if otnBoyFrend[numnpc] < 20:'You have a bad attitude.'
if otnBoyFrend[numnpc] >= 20 and otnBoyFrend[numnpc] < 40:'You tensions.'
if otnBoyFrend[numnpc] >= 40 and otnBoyFrend[numnpc] < 60:'You have a normal relationship.'
if otnBoyFrend[numnpc] >= 60 and otnBoyFrend[numnpc] < 80:'You have a good relationship.'
if otnBoyFrend[numnpc] >= 80:'You have a great relationship.'

''
''

if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] = 1:
	act 'Tell a guy, you have flown away.':
		cls
		gs 'stat'
		'You said the guy, that become pregnant by him. He just did not come out of the eye orbits.'

		if $father = $nameBoyfrend[numnpc]:
			'The guy thought. "Listen, I''m not ready to be a father, and even marry you." He handed you 5five thousand. "money, and let us part."'

			act 'Throw a guy and take the money':
				cls
				dom += 5
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				money += 5000
				gs 'stat'
				'You covered the rage and you sent the guy on the dick. At still snatched the bill from him and left.'

				act 'Leave':gt $loc, $metka
			end

			act 'Throw a guy throwing him the money in the face':
				cls
				dom += 10
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				gs 'stat'
				'You covered the rage and you sent the guy on the dick and tossed him the money in the face. And then went.'

				act 'Leave':gt $loc, $metka
			end

		else
			'The guy was troubled "Yes you ohuel slut! Someone held up her pussy, and now will be with me grandmother swing? Fuck you on the dick!"'

			act 'quit Man':
				cls
				dom += 10
				pregTalk[numnpc] = 1
				otnBoyFrend[numnpc] = 0
				gs 'stat'
				'You covered the rage and you sent the guy on the dick. And then went.'

				act 'Leave':gt $loc, $metka
			end
		end
	end
end

if GboyBalabol[numnpc] = 1:
	act 'Blame the guy that he yap':
		cls
		gs 'stat'
		'You accused guy that he blabbed about your relationship now and all surrounding believe that you <<$gnikname>>'
		reaktrand = rand(0, 2)

		if reaktrand = 0:
			'<<$nameBoyfrend[numnpc]>> it began to apologize, he accidentally drunk one friend said, and he blabbed all bitch. <<$nameBoyfrend[numnpc]>> vowed that more of this does not happen again.'
		elseif reaktrand = 1:
			'<<$nameBoyfrend[numnpc]>> began to soothe you, say nothing terrible happened, chat and forget.'
		elseif reaktrand = 2:
			'<<$nameBoyfrend[numnpc]>> said with a grin. Yes Relax, you is the real <<$gnikname>>, that this fact?'
		end

		act 'quit Man':
			cls
			dom += 10
			GboyBalabol[numnpc] = 2
			otnBoyFrend[numnpc] = 0
			gs 'stat'
			'You covered a rage and you sent the guy on the dick. And then left.'

			act 'Leave':gt $loc, $metka
		end

		act 'just a guy':
			cls
			sub += 10
			GboyBalabol[numnpc] = 2
			gs 'stat'
			'You thought a little and decided to forgive the guy.'

			act 'Leave':gt $loc, $metka
		end
	end
end

act 'Walking through the square':
	cls

	if hapri = 0:otnBoyFrend[numnpc] -= 5
	if hapri = 1:otnBoyFrend[numnpc] += 1
	if mop = 2:otnBoyFrend[numnpc] += 1
	if mop = 3:otnBoyFrend[numnpc] += 2
	if mop = 4:otnBoyFrend[numnpc] -= 5
	if sweat > 0:otnBoyFrend[numnpc] -= 5
	if ski > 0 or glamur > 0:otnBoyFrend[numnpc] += 2

	minut += 15
	boytimes[numnpc] += 1
	gs 'stat'
	'You walk through the square with a guy and fun to hang out.'

	if kotovLoveQW > 0:
		otnBoyFrend[numnpc] = 0
		'Suddenly you see is what you go to a meeting Witek Kotov he comes to the guy and silently slap in his face. <<$nameBoyfrend[numnpc]>> falls to the ground. Witek naklonyaetsya over him "Hey you fucker, it''s my girls, see you again with her, living in the woods to bury you understand?" The guy nods his head and says that he understood.'

		act 'Leave':gt $loc, $metka

		exit
	end

	gboyrand = rand(0, 1)

	if gboyrand = 0:
		'<<$nameBoyfrend[numnpc]>> offered to go to the movies.'

		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

		act 'Going to the cinema':
			cls
			minut += 15
			gs 'stat'
			'You went with a guy in a movie theater located in the park. <<$nameBoyfrend[numnpc]>> bought movie tickets. You came together in a small movie theater and found their seats.'

			act 'Watch a movie':
				cls
				manna += 100
				minut += 100
				otnBoyFrend[numnpc] += 5
				gs 'stat'
				'You got a guy on the chair placed in the back row. Soon the lights dimmed and the movie started on the screen.'

				if otnBoyFrend[numnpc] < 80:
					'You watched the movie a couple of hours sitting in a chair next to the guy.'

					act 'Go to the exit':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
					'You have been watching a movie and suddenly felt a hand on my knee Man.'

					act 'Remove his hands':
						cls
						dom += 1
						otnBoyFrend[numnpc] -= 20
						gs 'stat'
						'You have removed palm guy with his knees and continued to watch the movie. Movie finally ended. In the hall lights went on and the screen went titles.'

						act 'Go to the exit':gt 'Gnpc2'
					end

					act 'Ignore':
						cls
						otnBoyFrend[numnpc] += 5
						gs 'stat'
						'You pretended that nothing happens and the guy started more actively stroking your leg. Movie finally ended. In the hall lights went on and the screen went titles.'

						act 'Go to the exit':gt 'Gnpc2'
					end
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
					'You have been watching the movies, and <<$nameBoyfrend[numnpc]>> put his hand on your foot and began to stroke your knee. Movie finally ended. In the hall lights went on and the screen went titles.'

					act 'Go to the exit':gt 'Gnpc2'
				end
			end
		end
	elseif gboyrand = 1:
		'<<$nameBoyfrend[numnpc]>> suggested to drink beer in the park.'

		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

		act 'Go for a beer':
			cls
			manna += 100
			minut += 15
			gs 'stat'
			'You went with a guy to the nearest kiosk. <<$nameBoyfrend[numnpc]>> bought a beer and a snack. Then you went on the bench in the far corner of the square.'

			act 'Drink':
				cls
				manna += 100
				minut += 30
				alko += 2
				fat += 2
				salo += 1
				energy += 10
				otnBoyFrend[numnpc] += 5
				gs 'stat'
				'<<$nameBoyfrend[numnpc]>> beer poured into glasses and you have been drinking beer. <<$nameBoyfrend[numnpc]>> tell different funny stories.'

				if otnBoyFrend[numnpc] < 80:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
					'You drank beer with a guy, and plenty of fun.'

					act 'Further':gt 'Gnpc2'
				end
			end
		end
	end
end

act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka

--- Gnpc ---------------------------------
# Gnpc2
$din_gboy_end_to_disco = {
	!!:markgoondisco
	discofirsttime += 1
	gs 'stat'

	if gnpcSex[numnpc] = 0:
		gdeystboyrand = rand(0, 1)

		if gdeystboyrand = 0:
			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
			dynamic $din_gboy_go_to_boyhome

			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		elseif gdeystboyrand = 1:
			'<<$nameBoyfrend[numnpc]>> offered to accompany you home.'

			act 'go home':gt 'gorodok'
		end
	elseif gnpcSex[numnpc] > 0:
		'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
		dynamic $din_gboy_go_to_boyhome

		act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
	end
}

$din_gboy_go_to_disco = {
	act 'Go to the disco':
		cls
		minut += 120

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

		manna += 10
		gs 'stat'
		'<<$nameBoyfrend[numnpc]>> paid an entrance fee and you came along to the disco. Together with her boyfriend you went to the dance floor and started dancing together.'
		diskoIvrand = rand(0, 100)

		if discofirsttime = 0:diskoIvrand = 0

		if diskoIvrand >= 80:
			diskoIvTiperand = rand(0, 1)

			if diskoIvTiperand = 0:
				'You dance with her boyfriend, to you suited drunk kid in sweatpants and sweatshirts.'

				if GorSlut < 3:
					'Gopnik pushes your guy to the side and grabs you by the waist. "Let''s dance, chikulya."'

					act 'Leave':
						cls
						dom += 1
						gs 'stat'
						'You escape from the clutches of steel Gopnik. <<$nameBoyfrend[numnpc]>> drunk kid pushed and immediately went to the dance floor buddies Gopnik. Bazaar started. Gopnik began to show your boyfriend that he bykuet.'
						tiprand = rand(0, 100)

						if tiprand <= 70:
							'<<$nameBoyfrend[numnpc]>> managed to get out of the winner of the fight verbally, accusing Gopnik that he began to molest his girlfriend. But the evening was spoiled and finally <<$nameBoyfrend[numnpc]>> offered to leave the disco.'
							act 'Go home':gt 'gorodok'
						elseif tiprand > 70 and tiprand < 90:
							otnBoyFrend[numnpc] -= 20
							'Gopnik quickly downloaded your guy and lit it on the headstock. <<$nameBoyfrend[numnpc]>> Gopnik gave all the money and apologized for a long time before them. whereupon <<$nameBoyfrend[numnpc]>> suggested that you spend.'
							act 'Go home':gt 'gorodok'
						elseif tiprand >= 90:
							'Discussions quickly escalated into a fight and three Gopnik began to beat your guy in the middle of the disco.'

							act 'Watch the fight by':
								cls
								otnBoyFrend[numnpc] -= 20
								gs 'stat'
								'<<$nameBoyfrend[numnpc]>> could oppose the three Gopnik nothing and soon fell under a barrage of punches. Gopari dragged him into the street where the seized money, took off his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
								act 'Go home':gt 'gorodok'
							end

							act 'separate fighting':
								cls
								gs 'stat'

								if stren < 90:
									'You tried to push Gopnik, but someone pushed you and you will fly away from fighting a few meters from all force crashed to the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
									act 'Go home':gt 'gorodok'
								elseif stren >= 90:
									'You Gopnik pushed with all his strength, and he flew away from you. But the second Gopnik turned to you and you saw how he punches you in the face.'

									if agil < 90:
										zub += 1
										gs 'stat'
										'In my head rang and you realize that you are lying on the floor. Severe pain in the teeth and mouth full of salty liquid. You spit on the floor and saw that you knocked out a tooth. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
										act 'Go home':gt 'gorodok'
									elseif agil >= 90:
										'You abruptly removed his head to the side and cut the air Gopnik fist near your head.'

										act 'Hit in the face with his fist Gopnik':
											cls
											gs 'stat'

											if speed >= 50:
												zub += 1
												gs 'stat'
												'You hit Gopnik and hit him right on the nose. The guy yelled, "Oh, you bitch!" and lashed out at you. In my head rang and you realize that you are lying on the floor. Severe pain in the teeth and mouth full of salty liquid. You spit on the floor and saw that you knocked out a tooth. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
												act 'Go home':gt 'gorodok'
											elseif speed < 50:
												'You tried to hit hooligan punched in the face, but your blow was too slow. Gopnik pushed you and you flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
												act 'Go home':gt 'gorodok'
											end
										end

										act 'Hooligan kick Jodan':
											cls
											gs 'stat'

											if speed >= 90:
												'You charge a good kick in the face hooligan. Head Gopnik strongly swayed and he grabbed his face. "Shit! Fucking bitch, You broke my nose, I now you''ll break the whole fucking mouth, bitch!" Your guy at this point punched hooligan with a broken nose and he will fly away for a couple of meters down to the dance floor. Two other goparey hung on your guy trying to unscrew his hands.'

												act 'Grab one of Gopnik''s face':
													cls
													gs 'stat'
													GopWin[numnpc] += 1
													'You nails clutching hooligan in the face and began to scratch his skin and ripping it. Gopnik does not break down and cry with unhooked from your guy. Your guy meanwhile rid of one of Gopnik manages to punch a second, then again and again. Gopnik fell on the floor like a sack. Gopnik with scarred muzzle pounced on your guy, but without success, blood flooded his eyes and your guy punched him in the face of what Gopnik flopped down on his ass. In the meantime, began to rise to his feet one of Gopnik. "Okay, motherfucker, piss with your bitch We''ll still find it!"'
													act 'Go home':gt 'gorodok'
												end
											elseif speed < 90:
												'You tried to kick hooligan Jodan but he managed to push you before you even have time to do something. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
												act 'Go home':gt 'gorodok'
											end
										end

										act 'Hooligan kick in the balls':
											cls
											gs 'stat'

											if speed >= 70:
												bollrand = rand(0, 1)

												if bollrand = 0:
													'You got the balls Gonick and he flopped down on his knees howling pinching sore hands. Two other Gopnik hung on your guy trying to unscrew his hands.'

													act 'Grab one of Gopnik''s face':
														cls
														gs 'stat'
														GopWin[numnpc] += 1
														'You nails clutching hooligan in the face and began to scratch his skin and ripping it. Gopnik does not break down and cry with unhooked from your guy. Your guy meanwhile rid of one of Gopnik manages to punch a second, then again and again. Gopnik fell on the floor like a sack. Gopnik with scarred muzzle pounced on your guy, but without success, blood flooded his eyes and your guy punched him in the face of what Gopnik flopped down on his ass. In the meantime, began to rise to his feet one of Gopnik. "Okay, motherfucker, piss with your bitch We''ll still find it!"'
														act 'Go home':gt 'gorodok'
													end
												elseif bollrand = 1:
													'You tried to kick hooligan between his legs but he ducked and shoved you. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
													act 'Go home':gt 'gorodok'
												end
											elseif speed < 70:
												'You tried to kick hooligan between his legs but he ducked and shoved you. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
												act 'Go home':gt 'gorodok'
											end
										end
									end
								end
							end
						end
					end

					act 'Dance':
						cls
						sub += 1
						otnBoyFrend[numnpc] = 0
						DPtipe = 2
						gs 'BnameGen'
						gs 'stat'
						'You danced with Gopnik. <<$nameBoyfrend[numnpc]>> approached him and grabbed his shoulder. "Hey you! That''s my girl!" For your guy approached couple Gopnik and steel grind with him, but failing to come to you and to the hooligan dancing with you. soon <<$nameBoyfrend[numnpc]>> spat and sending you to the dick left the disco. Gopnik suggested you plunk him.'

						act 'Go thump':gt 'EvgopBuh'
					end
				elseif GorSlut >= 3:
					otnBoyFrend[numnpc] = 0
					'Gopnik looks at you and then starts laughing "hear potsik. What''re you dance with her? Same <<$name>> <<$gnikname>>. Take her into the bushes, but Nava her mouth. You know how it is sweet smacked when sucks dick. "Red with the words you Gopnik and embarrassed. <<$nameBoyfrend[numnpc]>> Gopnik began to run into, "What did you say? Come again!" By hooligan immediately approached his friends. "Hears the boy. Bykuy not. <<$name>> For all the boys in the neighborhood knows that she <<$gnikname>>." <<$nameBoyfrend[numnpc]>> looks at you with surprise. "What is truth?" Boys laugh "Well, you and the brake." <<$nameBoyfrend[numnpc]>> beats you hand over his face, "Fuck you on the dick, slut!" whereupon <<$nameBoyfrend[numnpc]>> leaves the dance floor.'

					act 'rubbing cheek':gt 'gdkin'
				end
			elseif diskoIvTiperand = 1:
				'<<$nameBoyfrend[numnpc]>> said he wanted a beer and invited you to go with him to drink beer.'

				act 'And refuse to dance one':
					cls

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

					minut += 3
					gs 'stat'
					'Your guy came from a disco that would buy a beer and drink it in the meantime you continue to dance.'

					if GorSlut >= 3:
						'It suits you guy "Heh. I''ve been observing how <<$gnikname>> <<$name>> fun with a guy. He still does not know who you are? Can I tell him?"'

						act 'Send it':
							cls
							dom += 1
							otnBoyFrend[numnpc] = 0
							gs 'stat'
							'You will send the guy to go to hell and he''s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I''ll throw. turns you real damn, I''m out of a garbage found that would waste their time on such a whore!"'

							act 'Move away':gt 'gdkin'
						end

						act 'Ask him not to tell':
							cls
							sub += 1
							gs 'stat'
							'You have been asking for a Man not to tell anything to his young man. He chuckled. "Well, if otsosesh, then so be it, do not tell."'

							act 'Send it':
								cls
								dom += 1
								otnBoyFrend[numnpc] = 0
								gs 'stat'
								'You will send the guy to go to hell and he''s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I''ll throw. turns you real damn, I''m out of a garbage found that would waste their time on such a whore!"'

								act 'Move away':gt 'gdkin'
							end

							act 'Agree':
								cls
								sub += 1
								gs 'stat'
								'You agreed and the guy said you go to the toilet. You immediately depressed. Toilet in the club was something of a thoroughfare, someone out there smoking, someone defecate in booths half door was not. The guy took you to the men''s room. When you opened the door there, they saw that some drunk guys standing at the threshold of smoke. In one of the booths heard as someone pukes. Boys bewildered looked at you, "Baby, you do not mistake? This male toilet." The guy who brought you smiled "She''s with me." He turned his head to you, "Well that cocksucker. Bury in his mouth." You looked at the guys and asked, "What right here or what?" Boys laughed "C''mon. Smuschaeshsya What are you?"'

								act 'Send it':
									cls
									dom += 1
									otnBoyFrend[numnpc] = 0
									gs 'stat'
									'You will send the guy to go to hell and he''s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I''ll throw. turns you real damn, I''m out of a garbage found that would waste their time on such a whore!"'

									act 'Move away':gt 'gdkin'
								end

								act 'Suck':
									cls
									sub += 5
									guy += 1
									bj += 1
									cumlip += 1
									swallow += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/public.jpg"></center>'
									'You squatted man unbuttoned his pants and pulled out his standing member. Other boys were smoked and watched the scene. You opened your mouth and licked maroon penis, then cupped her own <<$liptalk>> and took the cock in her mouth. Boys started laughing komentirovat what they see, "Look how vaflersha smacked." Another echoed, "Where did you just find a cocksucker" Once someone know you "So it''s <<$name>> <<$surname>>. Damn it down and out." You blushed and burned with shame sucking dick in front of other guys. Finally the guy started to cum in your mouth and you try as quickly as possible to swallow sperm. Cock finally went limp and he tucked in his pants. You got up from the floor and began to wipe his mouth, feeling out of your mouth smells like sperm. One of the guys chuckled, "Hey star blowjob, suck, and I have."'

									act 'Slip out of the closet':
										cls
										gs 'stat'
										'You are trying not to pay attention to the guys slipped back out of the cloon the floor. <<$nameBoyfrend[numnpc]>> have been looking for you, he came up to you and asked, "Where are you gone? everywhere you here I am looking for." You sovreali first thing that came to mind, "went to the toilet." <<$nameBoyfrend[numnpc]>> asked "A mouth that wipe?"'

										act 'suggest leave':
											cls
											gs 'stat'
											'You offered her boyfriend to leave the disco. <<$nameBoyfrend[numnpc]>> shrugged and you go to the exit.'

											act 'Leave':
												cls
												dynamic $din_gboy_end_to_disco
											end
										end

										act 'Dance':
											cls
											otnBoyFrend[numnpc] = 0
											gs 'stat'
											'You continued to dance with her boyfriend and suddenly saw how out of toilet boys who witnessed how you make a blowjob. They also see you and guffawed, noisily discussing something. <<$NameBoyfrend[numnpc]>> puzzled look at them, "What are they?" The boys shouted to him, "until you wandered somewhere, your teen in the men''s toilet sucks dicks!" <<$NameBoyfrend[numnpc]>> came up to them, "You bazaar?" Boys started to tell him how you just suck dick in front of them. <<$NameBoyfrend[numnpc]>> came up to you and slapped you podschechinu "Get the fuck out whore! And so I did not see you anymore!"'

											act 'Move away':gt 'gdkin'
										end
									end
								end
							end
						end
					elseif GorSlut < 3:
						'While your guy went for a beer came to you what that guy is not familiar with you and began to dance.'

						act 'Dance':
							cls
							otnBoyFrend[numnpc] -= 20
							gs 'stat'
							'You danced with unfamiliar guy and at this moment entered the hall <<$nameBoyfrend[numnpc]>> he came up to you and pulled you by the hand dragged from another guy. "You do something ohrenela? To retreat is impossible, and you''ve found someone!" He was offended at you and walked away from the disco.'

							act 'Move away':gt 'gdkin'
						end

						act 'Refuse to dance with a stranger':
							cls
							otnBoyFrend[numnpc] += 5
							gs 'stat'
							'You refused to dance with a stranger and noticed that <<$nameBoyfrend[numnpc]>> come back to the club. You have a little dance with her boyfriend and he offered to go.'

							act 'Leave':
								cls
								dynamic $din_gboy_end_to_disco
							end
						end
					end
				end

				act 'Go Man and drink beer':
					cls
					alko += 2
					minut += 3
					horny += 5
					gs 'stat'
					'You came out of discos and find a secluded place where he started drinking beer with her boyfriend.'

					act 'Leave':
						cls
						dynamic $din_gboy_end_to_disco
					end

					act 'Kiss':
						cls
						minut += 5
						kissBoyFrend[numnpc] += 1
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
						'<<$nameBoyfrend[numnpc]>> you tenderly embraced and began to kiss your lips.'

						if gnpcSex[numnpc] > 0:
							'<<$nameBoyfrend[numnpc]>> whispered in your ear, "<<$name>> can Let us than anything right here?"'

							act 'jerk guy':
								cls
								minut += 5
								if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
								dick = dickBoyFrend[numnpc]
								hj += 1
								hja += 1
								sub += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/hj.jpg"></center>'
								'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you''ll see how his cock off sperm.'

								act 'Further':
									cls
									dynamic $din_gboy_end_to_disco
								end
							end

							act 'Take by mouth':
								cls
								minut += 5
								horny += 10
								bj += 1
								bja += 1
								dick = dickBoyFrend[numnpc]
								if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

								if GorSlut < 2:
									resultrand = rand(0, 100)

									if resultrand >= 100:
										GorSlut = 2
										GboyBalabol[numnpc] = 1
									end
								end

								sub += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/cocksucker.jpg"></center>'
								'You squatted in front of the guy and brought her face to his cock.'
								dynamic $dinrandbj
								'Soon <<$nameBoyfrend[numnpc]>> groaned "<<$name>>, I''m going to come."'

								act 'suck on':
									cls
									minut += 5
									horny += 10
									cumlip += 1
									swallow += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/cocksuckerSwallow.jpg"></center>'
									dynamic $dinrandswallow

									act 'further':
										cls
										dynamic $din_gboy_end_to_disco
									end
								end

								act 'Remove the mouth':
									cls
									minut += 5
									horny += 10
									cumface += 1
									facial += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/cocksuckerFacial.jpg"></center>'
									'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'

									act 'Further':
										cls
										dynamic $din_gboy_end_to_disco
									end
								end
							end
						elseif gnpcSex[numnpc] = 0:
							'You feel like your guy hands caress your breasts.'

							act 'Stop':
								cls
								dynamic $din_gboy_end_to_disco
							end

							act 'Let him':
								cls
								horny += 10
								minut += 3
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/tits.jpg"></center>'
								'<<$nameBoyfrend[numnpc]>> pulls your breast size <<tits>> outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he''s got a hard cock.'

								act 'Caress his cock through his pants':
									cls
									horny += 5
									minut += 3
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/cock.jpg"></center>'
									'You started stroking guy crotch, feeling the hardness of his member risen through matter.'

									if horny < 80:
										act 'Remove hands':
											cls
											minut += 5
											otnBoyFrend[numnpc] -= 10
											dom += 1
											gs 'stat'
											'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'

											act 'Further':
												cls
												dynamic $din_gboy_end_to_disco
											end
										end
									end

									act 'Going to the guy''s pants':
										cls
										horny += 10
										minut += 3
										gs 'stat'
										'<center><img src="images/qwest/alter/Ev/cock2.jpg"></center>'
										'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'

										if dom > 0:
											act 'jerk guy':
												cls
												minut += 5
												if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
												dick = dickBoyFrend[numnpc]
												hj += 1
												hja += 1
												sub += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/hj.jpg"></center>'
												'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you''ll see how his cock off sperm.'

												act 'Further':
													cls
													dynamic $din_gboy_end_to_disco
												end
											end
										end

										act 'Take by mouth':
											cls
											minut += 5
											horny += 10
											bj += 1
											bja += 1
											dick = dickBoyFrend[numnpc]
											if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

											if GorSlut < 2:
												resultrand = rand(0, 100)

												if resultrand >= 100:
													GorSlut = 2
													GboyBalabol[numnpc] = 1
												end
											end

											sub += 1
											gs 'stat'
											'<center><img src="images/qwest/alter/Ev/cocksucker.jpg"></center>'
											'You squatted in front of the guy and brought her face to his cock.'
											dynamic $dinrandbj
											'Soon <<$nameBoyfrend[numnpc]>> groaned "<<$name>>, I''m going to come."'

											act 'suck on':
												cls
												minut += 5
												horny += 10
												cumlip += 1
												swallow += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/cocksuckerSwallow.jpg"></center>'
												dynamic $dinrandswallow

												act 'Further':
													cls
													dynamic $din_gboy_end_to_disco
												end
											end

											act 'Remove the mouth':
												cls
												minut += 5
												horny += 10
												cumface += 1
												facial += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/cocksuckerFacial.jpg"></center>'
												'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'

												act 'Further':
													cls
													dynamic $din_gboy_end_to_disco
												end
											end
										end
									end
								end

								if horny <= 90:
									act 'Resist':
										cls
										horny += 10
										minut += 3
										gs 'stat'
										'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
										'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'

										if horny < 70:
											act 'Remove his hand':
												cls
												minut += 5
												otnBoyFrend[numnpc] -= 10
												dom += 1
												gs 'stat'
												'You have removed themselves from male hands and he lost his head, not knowing what to do.'

												act 'Further':
													cls
													dynamic $din_gboy_end_to_disco
												end
											end
										end

										act 'Enjoy':
											cls
											minut += 5
											sub += 1
											horny += 10
											gs 'stat'
											'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
											'You cease to resist and just relaxed feeling pleasant warmth from the guy caresses your pussy. <<$nameBoyfrend[numnpc]>> began to undress you and soon you were naked.'

											act 'Surrender':
												cls
												minut += 5
												horny += 10
												sexa += 1

												if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

												$boy = $nameBoyfrend[numnpc]
												dick = dickBoyFrend[numnpc]
												silavag = silavagBoyFrend[numnpc]

												if GorSlut = 0:
													resultrand = rand(0, 100)

													if resultrand >= 100:
														GorSlut = 1
														GboyBalabol[numnpc] = 1
													end
												end

												gs 'stat'
												'<center><img src="images/picV/vag.jpg"></center>'
												'Man quickly took off his clothes and lay down on top of you.'
												dynamic $sexstart
												dynamic $sexstart2
												dynamic $sexcum

												act 'Further':
													cls
													dynamic $din_gboy_end_to_disco
												end
											end

											if dom > 0 or anal > 0:
												act 'substitute ass':
													cls
													minut += 30
													cumanus += 1
													anala += 1
													$boy = $nameBoyfrend[numnpc]
													dick = dickBoyFrend[numnpc]
													silavag = silavagBoyFrend[numnpc]
													if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

													if GorSlut = 0:
														resultrand = rand(0, 100)

														if resultrand >= 100:
															GorSlut = 1
															GboyBalabol[numnpc] = 1
														end
													end

													gs 'stat'
													'<center><img src="images/qwest/alter/Ev/anal.jpg"></center>'
													dynamic $sexstart
													dynamic $analsex
													'Finally the guy dies and you feel like something warm fills your ass.'

													act 'Further':
														cls
														dynamic $din_gboy_end_to_disco
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			elseif diskoIvTiperand = 2:
				''
			elseif diskoIvTiperand = 3:
				''
			end

			exit
		end

		if kissBoyFrend[numnpc] > 0:
			''
		elseif kissBoyFrend[numnpc] = 0:
			''
		end

		dynamic $din_gboy_end_to_disco

	end
}

$din_gboy_tits = {
	'<<$nameBoyfrend[numnpc]>> began to get your breasts <<tits>> the size of a garment.'

	act 'let him':
		cls
		horny += 10
		minut += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/tits.jpg"></center>'
		'<<$nameBoyfrend[numnpc]>> pulls your breast size <<tits>> outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he''s got a hard cock.'

		act 'Caress his cock through his pants':
			cls
			horny += 5
			minut += 3
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/cock.jpg"></center>'
			'You started stroking guy crotch, feeling the hardness of his member risen through matter.'

			if horny < 80:
				act 'Remove hands':
					cls
					minut += 5
					otnBoyFrend[numnpc] -= 10
					dom += 1
					gs 'stat'
					'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'

					act 'Go home':gt 'gorodok'
				end
			end

			act 'Going to the guy''s pants':
				cls
				horny += 10
				minut += 3
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/cock2.jpg"></center>'
				'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'

				if dom > 0:
					act 'jerk guy':
						cls
						minut += 5
						if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
						dick = dickBoyFrend[numnpc]
						hj += 1
						hja += 1
						sub += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/hj.jpg"></center>'
						'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you''ll see how his cock off sperm.'

						act 'Go home':gt 'gorodok'
					end
				end

				act 'Take by mouth':
					cls
					minut += 5
					horny += 10
					bj += 1
					bja += 1
					dick = dickBoyFrend[numnpc]
					if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

					if GorSlut < 2:
						resultrand = rand(0, 100)

						if resultrand >= 100:
							GorSlut = 2
							GboyBalabol[numnpc] = 1
						end
					end

					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/cocksucker.jpg"></center>'
					'You squatted in front of the guy and brought her face to his cock.'
					dynamic $dinrandbj
					'Soon <<$nameBoyfrend[numnpc]>> groaned "<<$name>>, I''m going to come."'

					act 'Suck on':
						cls
						minut += 5
						horny += 10
						cumlip += 1
						swallow += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/cocksuckerSwallow.jpg"></center>'
						dynamic $dinrandswallow
						act 'Go home':gt 'gorodok'
					end

					act 'Remove the mouth':
						cls
						minut += 5
						horny += 10
						cumface += 1
						facial += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/cocksuckerFacial.jpg"></center>'
						'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'
						act 'Go home':gt 'gorodok'
					end

					act 'Surrender':
						cls
						minut += 5
						horny += 10
						sexa += 1
						if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
						$boy = $nameBoyfrend[numnpc]
						dick = dickBoyFrend[numnpc]
						silavag = silavagBoyFrend[numnpc]

						if GorSlut = 0:
							resultrand = rand(0, 100)

							if resultrand >= 100:
								GorSlut = 1
								GboyBalabol[numnpc] = 1
							end
						end

						gs 'stat'
						'<center><img src="images/picV/vag.jpg"></center>'
						'Man quickly took off his clothes and lay down on top of you.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						act 'Go home':gt 'gorodok'
					end

					if dom > 0 or anal > 0:
						act 'substitute ass':
							cls
							minut += 30
							cumanus += 1
							anala += 1
							$boy = $nameBoyfrend[numnpc]
							dick = dickBoyFrend[numnpc]
							silavag = silavagBoyFrend[numnpc]
							if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

							if GorSlut = 0:
								resultrand = rand(0, 100)
								if resultrand >= 100:
									GorSlut = 1
									GboyBalabol[numnpc] = 1
								end
							end

							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/anal.jpg"></center>'
							dynamic $sexstart
							dynamic $analsex
							'Finally the guy dies and you feel like something warm fills your ass.'

							act 'Leave.':gt 'gorodok'
						end
					end
				end
			end
		end

		if horny <= 90:
			act 'Resist':
				cls
				horny += 10
				minut += 3
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
				'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'

				if horny < 70:
					act 'Remove his hand':
						cls
						minut += 5
						otnBoyFrend[numnpc] -= 10
						dom += 1
						gs 'stat'
						'You have removed themselves from male hands and he lost his head, not knowing what to do.'
						act 'Go home':gt 'gorodok'
					end
				end

				act 'Enjoy':
					cls
					minut += 5
					sub += 1
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
					'You cease to resist and just relaxed feeling pleasant warmth from the guy caresses your pussy. <<$nameBoyfrend[numnpc]>> began to undress you and soon you were naked.'

					act 'Surrender':
						cls
						minut += 5
						horny += 10
						sexa += 1
						if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
						$boy = $nameBoyfrend[numnpc]
						dick = dickBoyFrend[numnpc]
						silavag = silavagBoyFrend[numnpc]

						if GorSlut = 0:
							resultrand = rand(0, 100)

							if resultrand >= 100:
								GorSlut = 1
								GboyBalabol[numnpc] = 1
							end
						end

						gs 'stat'
						'<center><img src="images/picV/vag.jpg"></center>'
						'Man quickly took off his clothes and lay down on top of you.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum

						act 'Go home':gt 'gorodok'
					end

					if dom > 0 or anal > 0:
						act 'substitute ass':
							cls
							minut += 30
							cumanus += 1
							anala += 1
							$boy = $nameBoyfrend[numnpc]
							dick = dickBoyFrend[numnpc]
							silavag = silavagBoyFrend[numnpc]
							if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1

							if GorSlut = 0:
								resultrand = rand(0, 100)

								if resultrand >= 100:
									GorSlut = 1
									GboyBalabol[numnpc] = 1
								end
							end

							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/anal.jpg"></center>'
							dynamic $sexstart
							dynamic $analsex
							'Finally the guy dies and you feel like something warm fills your ass.'

							act 'Leave.':gt 'gorodok'
						end
					end
				end
			end
		end
	end

	if horny < 90:
		act 'Remove his hand':
			cls
			minut += 5
			otnBoyFrend[numnpc] -= 10
			dom += 1
			gs 'stat'
			'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'

			act 'Go home':gt 'gorodok'
		end
	end
}


$din_gboy_kiss = {
	act 'Kiss':
		cls
		minut += 5
		kissBoyFrend[numnpc] += 1
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
		'You turn your head to the guy and your lips met. <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body and kiss you.'
		dynamic $din_gboy_tits
	end
}

$din_gboy_knee = {
	if horny < 75 or dom > 0:
		act 'Remove his hand':
			cls
			minut += 5
			otnBoyFrend[numnpc] -= 10
			if dom > 0 and horny >= 75:dom -= 1
			if horny < 75:dom += 1
			gs 'stat'
			'You removed the hand guy and he lost his head, not knowing what to do.'

			act 'Go home':gt 'gorodok'
		end
	end

	act 'Pretend that nothing happens':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/groped.jpg"></center>'
		'You pretended that nothing was happening and <<$nameBoyfrend[numnpc]>> not hesitate vengeance fumbled with his hands on your feet. <<$nameBoyfrend[numnpc]>> tilted towards your face trying to kiss you.'
		dynamic $din_gboy_kiss

		if horny < 75 or dom > 5:
			act 'Remove his hand':
				cls
				minut += 5
				otnBoyFrend[numnpc] -= 10
				if dom > 0 and horny >= 75:dom -= 5
				if horny < 75:dom += 5
				gs 'stat'
				'You removed the hand guy and he lost his head, not knowing what to do.'

				act 'Go home':gt 'gorodok'
			end
		end
	end

	if dom > 0 or horny >= 75:
		act 'Man kiss':
			cls
			minut += 5
			dom += 1
			kissBoyFrend[numnpc] += 1
			horny += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
			'You turn your head to the guy and bent his face. Then you kissed and <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body.'
			dynamic $din_gboy_tits
		end
	end
}

$din_gboy_go_to_boyhome = {
	act 'Go-to guy home':
		cls
		minut += 15
		gs 'stat'
		'<<$nameBoyfrend[numnpc]>> led you to his home. You came to a small two-story house, in which there were several apartments and <<$nameBoyfrend[numnpc]>> guide you to your apartment. He opened the door with a key and let you.'
		boyhouserand = rand(0, 2)

		if boyhouserand = 0:
			'Man at home there was no one and he suggested you go to the gym and see Vidic.'

			act 'See Vidic':
				cls
				minut += 30
				gs 'stat'
				'You settled on comfortably on the sofa and <<$nameBoyfrend[numnpc]>> rummaging in the drawers put one of them in the VCR and turning it sat next to you.'
				boyvideorand = rand(0, 3)

				if boyvideorand = 0:
					'When did the movie you saw this porn. Protagonists do not have time to exchange a few sentences and the girl was already naked and kneeling in front of a guy with his cock in her mouth.'

					act 'watch porn':
						cls
						minut += 30
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/groped.jpg"></center>'
						'You began with a guy to watch porn and what is happening gradually began to excite you. You feel like <<$nameBoyfrend[numnpc]>> put his hand on your knee and began to stroke.'
						dynamic $din_gboy_knee
					end

					act 'a scandal':
						cls
						minut += 30
						dom += 1
						otnBoyFrend[numnpc] -= 20
						gs 'stat'
						'You got up from the couch and a scandal guy claiming that you are not so and it from you only need one. <<$nameBoyfrend[numnpc]>> embarrassed and blushing began bubnet apology.'
						act 'Go home':gt 'gorodok'
					end
				elseif boyvideorand > 0:
					'Started Hollywood thriller in which the protagonist smashed everything around him while he managed to not even scratched. In the film, killed his best friend, after which the hero on his knees beside the body screaming NO! in the rain. Finally got to the main hero and villain after a hard fight killed them, ended the film as expected explosion in the background from which the hero escaped.'
					boyprirand = rand(0, 2)

					if boyprirand = 0:
					'You feel as you lay Man hand on his knee and began to stroke.'
					dynamic $din_gboy_knee

						if horny < 75 or dom > 5:
							act 'Remove his hand':
								cls
								minut += 5
								otnBoyFrend[numnpc] -= 10
								if dom > 0 and horny >= 75:dom -= 5
								if horny < 75:dom += 5
								gs 'stat'
								'You removed the hand guy and he lost his head, not knowing what to do.'
								act 'Go home':gt 'gorodok'
							end
						end

					else
						act 'Go home':gt 'gorodok'
						if dom > 0 or horny >= 75:
							act 'Man kiss':

								cls
								minut += 5
								dom += 1
								gs 'stat'
								'You turn your head to the guy and bent his face. Then you kissed and <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body.'
								dynamic $din_gboy_tits
							end
						end
					end
				end
			end
		elseif boyhouserand = 1:
			'<center><img src="images/qwest/alter/groped.jpg"></center>'
			'Man at home there was no one and he suggested that you go to his room. In his room, a guy sat next to you and started stroking your knee.'
			dynamic $din_gboy_knee
		elseif boyhouserand = 2:
			'<center><img src="images/qwest/alter/groped.jpg"></center>'
			'Man at home were parents and he quickly walks you to your room. In his room, a guy sat next to you and started stroking your knee.'
			dynamic $din_gboy_knee
		end

		!!act 'Go home':gt 'gorodok'
	end

}

gs 'stat'
'<center><b><font color="maroon"><<$nameBoyfrend[numnpc]>></font></b></center>'
!!'<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
'<<$nameBoyfrend[numnpc]>> your boyfriend.'

if otnBoyFrend[numnpc] < 20:'You have a bad attitude.'
if otnBoyFrend[numnpc] >= 20 and otnBoyFrend[numnpc] < 40:'You tensions.'
if otnBoyFrend[numnpc] >= 40 and otnBoyFrend[numnpc] < 60:'You have a normal relationship.'
if otnBoyFrend[numnpc] >= 60 and otnBoyFrend[numnpc] < 80:'You have a good relationship.'
if otnBoyFrend[numnpc] >= 80:'You have a great relationship.'

''
''

if hour < 20:
	if otnBoyFrend[numnpc] < 80:
		'<<$nameBoyfrend[numnpc]>> offered to take you home.'
		act 'Go home':gt 'gorodok'
	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
		gdeystboyrand = rand(0, 1)

		if gdeystboyrand = 0:
			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
			dynamic $din_gboy_go_to_boyhome
			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		elseif gdeystboyrand = 1:
			'<<$nameBoyfrend[numnpc]>> offered to take you home.'
			act 'Go home':gt 'gorodok'
		end
	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
		'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
		dynamic $din_gboy_go_to_boyhome
		act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
	end
elseif hour >= 20 and hour < 23:
	if otnBoyFrend[numnpc] < 80:
		'<<$nameBoyfrend[numnpc]>> offered to take you home.'
		act 'Go home':gt 'gorodok'
	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
		tipgbrand = rand(0, 1)

		if tipgbrand = 0:
			'<<$nameBoyfrend[numnpc]>> offered to go to the disco.'
			dynamic $din_gboy_go_to_disco
			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		elseif tipgbrand = 1:
			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
			dynamic $din_gboy_go_to_boyhome
			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		end
	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
		gdeystboyrand = rand(0, 1)

		if gdeystboyrand = 0:
			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
			dynamic $din_gboy_go_to_boyhome
			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		elseif gdeystboyrand = 1:
			'<<$nameBoyfrend[numnpc]>> offered to go to the disco.'
			dynamic $din_gboy_go_to_disco
			act 'And refuse to go home':otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
		end

	end
elseif hour >= 23:
	'<<$nameBoyfrend[numnpc]>> offered to take you home.'

	act 'go home':gt 'gorodok'
end

--- Gnpc2 ---------------------------------
# Sgrup1
gs 'stat'
'Botany'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 1:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup1 ---------------------------------
# Sgrup2
gs 'stat'
'Sportiki'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 2:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'


'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup2 ---------------------------------
# Sgrup3
gs 'stat'
'Steep'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 3:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup3 ---------------------------------
# Sgrup4
gs 'stat'
'Gopnik'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 4:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup4 ---------------------------------
# Sgrup5
gs 'stat'
'Outcasts'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = -1:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup5 ---------------------------------
# Sgrup
gs 'stat'
'Singles'
$textgrup = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 0:$textgrup += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'<<$textgrup>>'
dynamic $din_sekondparturok

--- Sgrup ---------------------------------
# SgrupDisco
gs 'stat'
$textgrup = ''
$textgrup2 = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 3:$textgrup += '
' + $npcGo[i]

if grupTipe[i] = 4:$textgrup2 += '
' + $npcGo[i]

if i < 26:jump 'markgruploop'

'Dancing on the dance floor <<$textgrup>>'
''
'In one corner stand <<$textgrup2>>'

act 'Move away':gt $loc, $metka

--- SgrupDisco ---------------------------------
# brother
brotherAge = age - 2
gs 'stat'
'<center><b><font color="maroon">Kolca</font></b></center>'
'<center><img src="images/qwest/alter/brother.jpg"></center>'
'Your brother Kolka younger than you and he <<brotherAge>> years. Kolka born unlike you and your sister already from his stepfather. He goes to the same school as you and enjoys football.'

if brother < 20:'You and your brother scandal.'
if brother >= 20 and brother < 40:'You and your brother tensions.'
if brother >= 40 and brother < 60:'You and your brother normal relations.'
if brother >= 60 and brother < 80:'You and your brother good relationship.'
if brother >= 80:'You and your brother a great relationship.'

!'
if cumface > 0 or cumfrot > 0 or cumlip > 1:
	if GorSlut > 0:
		'Kolka looks at you "Slysh <<$gnikname>>. After service cocks should be washed away, but not to run in struhne."'
	elseif GorSlut = 0:
		if motherKnowSpravka => 1 or motherKnowWhore => 1:
			'Kolka looks at you, "Look, I understand that the mother aware that you''re a whore. Struhne But going to run the whole town knows you''re a whore."'
		elseif motherKnowSpravka = 0 and motherKnowWhore = 0:
			'Kolka looks at you, "What''s that?" His eyes rounded "Yes, it''s sperma. Here is the number, my sister exemplary slut."'
		end
	end

	act 'Move away':gt $loc, $metka

	exit
end

act 'Move away':gt $loc, $metka

if GorSlut > 0:'Kolka frowned "What do you want <<$gnikname>>."'
if motherKnowSpravka >= 1 or motherKnowWhore >= 1:
	'You came to your brother. He laughed and began to poke a finger in you "whore. Whore. Whore."'
else
'!

act 'Move away':gt $loc, $metka

if $loc = 'gschool':
	if brother < 40:
		'Brother frowns "Get off me pridurochnaya!"'
		exit
	end

	if evgenQW >= 4:
		'Guys poshushukavshis together tell you "Yup, Well it this Soccer, Let''s go watch porn."'

		act 'Go watch porn':minut += 5 & gt 'seeporn'
	else
		'Brother grins "Hi <<$nickname>>. Play football?"'

		act 'Play football':
			cls
			minut += 60
			brother += 5
			agil += rand(0, 2)
			speed += rand(0, 2)
			sweat += 3
			beg += rand(2, 5)
			gs 'stat'
			'You ran for an hour on the field chasing a ball with my brother and his friends Bear and Zhendosom.'

			if rand(0, 1) = 0 and seepornofut = 0:
				'Boys whispering among themselves discussing something.'

				act 'You are talking about here?':
					cls
					gs 'stat'
					'Boys hesitated, so much so, nothing.'

					act 'Move away':gt $loc, $metka

					if dom > 0:
						'You''re a bit pressed on them "Are you as malyshnya, sekretiki what that you." One of the boys immediately split "Yes."'
						act 'Take me':
							cls
							gs 'stat'
							'you asked, what would you also have to look porn. Guys nemnog oposmuschalis, but agreed.'

							act 'Go watch porn':minut += 5 & gt 'seeporn'
						end
					end
				end
			elseif rand(0, 1) = 0 and seepornofut >= 1:
				'Guys poshushukavshis together tell you "<<$nickname>>, go look porn?"'

				act 'Go watch porn':minut += 5 & gt 'seeporn'
			end

			act 'Move away':gt $loc, $metka
		end
	end
end
!!end

--- brother ---------------------------------
# seeporn
!! this is triggered by going to see porn with the brother in the altstart
gs 'stat'
'Together with all the guys you''ve come to bear and he turned on the video player, by which immediately began to show porn.'

act 'watch':
	cls
	minut += 15
	seepornofut += 1
	horny += (seepornofut + mastr) * 2
	gs 'stat'

	if seepornofut < 3:
		'Boys looking at what is happening on the screen clearly at ease and embarrassed shoot you in the eyes.'
	elseif seepornofut >= 3 and seepornofut < 10:
		'Guys have become accustomed to watching porn, sometimes even comment on it.'
	elseif seepornofut >= 10:
		'Guys look hard porn, you notice, that all vyzdybilis shirinki.'

		if evgenQW = 4:
			cls
			boyseeporn += 1
			gs 'stat'
			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos offers "<<$name>>, What about work mouth?"'

			act 'Be silent':
				cls
				bj += 3
				sub += 5
				gang += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/seepornblowbang.jpg"></center>'
				'Zhendos got dick out of his pants and pulled your face to its members, You dutifully wrapped around his lips and began to suck. Your brother Kolka and Bear also got members and put them to you to face, you started to masturbate and suck dick.'

				act 'Suck':
					cls
					cumface += 3
					cumlip += 2
					cumfrot += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/seepornbbcum.jpg"></center>'
					'The boys did not last long and become cum on your face, Soon almost all of your face was covered with a layer of smelly mucus and the sperm even hit you on your clothes.'

					act 'Leave':gt 'gorodok'
				end
			end

			if dom > boyseeporn * 2:
				act 'Refuse':
					cls
					dom += 1
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
					'You indignantly rejected the proposal boys.'

					act 'Leave':gt 'gorodok'
				end
			end

			exit
		elseif evgenQW = 3:
			cls
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/seeporn.jpg"></center>'
			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos suddenly takes your hand and puts it in the groin, just goes and Bear. Your brother Kolka laughed nervously. A Bear told you conspiratorially "<<$name>>, vzdrochni us."'

			act 'Jerk kid':
				cls

				if MihJenSex = 0:MihJenSex = 1 & guy += 2

				hj += 2
				boyseeporn += 1
				sub += 1
				gs 'stat'
				!!brotherrand = rand(3, 10)

				if boyseeporn < 2:
					! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
					'<center><img src="images/qwest/alter/ev2/seeporn.hand1,<<rand(0,2)>>.gif"></center>'
					'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'

					act 'vozmuschatsya':
						cls
						cumfrot += 2
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/seeporncumhj.jpg"></center>'
						'you have rebelled "look assholes, you all I smeared!" But the boys blissfully sprawled on the couch "Very best in your palms <<$name>>, such small, soft and warm."'

						act 'Leave':gt 'gorodok'
					end
				elseif boyseeporn >= 2:
					bj += 1
					evgenQW = 4
					! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornfirst.jpg"></center>'
					'<center><img src="images/qwest/alter/ev2/seepornbro0,<<rand(0,2)>>.gif"></center>'
					'You glide skin on both members of their handles, your brother Kolka broke down and with a strangled groan. You have eyes widened by this turn of events. Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'

					act 'Continue':
						cls
						cumfrot += 2
						cumface += 1
						facial += 1

						if brotherSex = 0:brotherSex = 1 & guy += 1

						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/seepornfacial.jpg"></center>'
						'Suddenly. Mishan laughed "Kolyamba, you just fucked his sister in the mouth. ohrenet" Kohl wiping the sweat from his forehead choked said "Yes, she asks that this slut. That could not resist."'

						act 'Leave':gt 'gorodok'
					end
				end

				if dom > boyseeporn * 2:
					act 'Remove hand':
						cls
						dom += 1
						gs 'stat'
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
						'You angrily removes his hands and yelling angrily at the boys.'

						act 'Leave':gt 'gorodok'
					end
				end
				exit
			end
			exit
		elseif evgenQW = 2 and rand(0, 1) = 0:
			cls
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/seeporn.jpg"></center>'
			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos suddenly takes your hand and puts it in the groin, just goes and Bear. Your brother Kolka laughed nervously. A Bear told you conspiratorially "<<$name>>, vzdrochni us."'

			act 'Yes you ohueli!!!':
				cls
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/seeporn.jpg"></center>'
				'You rebelled actions boys. What Bear said "Come, you''re a girl, moreover, we just peredernesh gate in a friendly."'

				if horny >= 70:
					act 'jerk kid':
						cls
						hj += 2

						if MihJenSex = 0:MihJenSex = 1 & guy += 2

						evgenQW = 3
						gs 'stat'
						! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
						'<center><img src="images/qwest/alter/ev2/seeporn.hand1,<<rand(0,2)>>.gif"></center>'
						'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'

						act 'vozmuschatsya':
							cls
							cumfrot += 2
							gs 'stat'
							'<center><img src="images/qwest/alter/ev2/seeporncumhj.jpg"></center>'
							'you have rebelled "look assholes, you all I smeared!" But the boys blissfully sprawled on the couch "Very best in your palms <<$name>>, such small, soft and warm."'

							act 'Leave':gt 'gorodok'
						end
					end
				elseif horny < 70:
					act 'Remove hands':
						cls
						dom += 1
						gs 'stat'
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
						'You angrily removes his hands and yelling angrily at the boys.'

						act 'Leave':gt 'gorodok'
					end
				end
			end
			exit
		elseif evgenQW = 1 and rand(0, 1) = 0:
			cls
			horny += 10
			gs 'stat'
			'Guys look hard porn, you notice, that all reared up his pants.'
			'You feel like a hand Zhendosa accidentally stroking your ass.'

			if horny < 70:
				act 'Remove hands':
					cls
					dom += 1
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
					'You angrily removes his hands from his priests Zhendosa.'

					act 'Leave':gt 'gorodok'
				end
			elseif horny >= 70:
				act 'Pretend that nothing is happening':
					cls
					sub += 1
					evgenqw = 2
					gs 'stat'
					! WD: Correct Image path ~ "images/qwest/alter/ev2/seepornHand.jpg"
					'<center><img src="images/qwest/alter/ev2/seeporn.jpg"></center>'
					'You sit on the couch red as a lobster enjoying a nice touch to his priest.'

					act 'Leave':gt 'gorodok'
				end
			end

			exit
		elseif evgenQW = 0 and rand(0, 1) = 0:
			cls
			gs 'stat'
			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos looking at porn asks you "And you did that <<$name>> ever?"'

			if horny < 70:
				act 'Jerk dick':
					cls
					dom += 1
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
					'You sent Zhendosa on dick with such conversations.'

					act 'Leave':gt 'gorodok'
				end
			elseif horny >= 70:
				act 'Be silent':
					cls
					sub += 1
					evgenQW = 1
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
					'You swallowed and said nothing eyeing porn. Mishan chuckled "And she asks how flushed. It turns out the girls also like porn."'

					act 'Leave':gt 'gorodok'
				end
			end

			exit
		end
	end

	act 'Leave':gt 'gorodok'
end

--- seeporn ---------------------------------
# brosh
gs 'stat'
evgentipe = rand(0, 2)

if evgentipe = 0:
	'During the break you came Zhendos, a friend of your brother "<<$name>>! riser tortured, go after school."'

	act 'Go after school':
		cls
		gs 'stat'
		'Together with Zhendosom you left for school, where they found a nook.'

		act 'Suck Zhendosu':
			cls
			bj += 1
			sub += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/bs.jpg"></center>'
			'You sat on his haunches and Zhendos got dick out of his pants pulling your face to its members, You dutifully wrapped around his lips and began to suck.'

			act 'Suck':
				cls
				!cumface += 1
				cumlip += 1
				swalllow += 1
				!cumfrot += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/bscum.jpg"></center>'
				'Zhendos did not last long , you started quickly swallow.'
				dynamic $din_sekondparturok
			end
		end
	end

	exit
elseif evgentipe = 1:
	'During the break you came Mishan, a friend of your brother "<<$name>>! Come for school, I have for you sweetie."'

	act 'Go after school':
		cls
		gs 'stat'
		'Together with Mishan you left for school, where they found a nook.'

		act 'Suck Mishanya':
			cls
			bj += 1
			sub += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/bs1.jpg"></center>'
			'You sat on his haunches and Mishan got dick out of his pants pulling your face to its members, You dutifully wrapped around his lips and began to suck.'

			act 'Suck':
				cls
				!cumface += 1
				cumlip += 1
				swalllow += 1
				!cumfrot += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/bscum1.jpg"></center>'
				'Mishan did not last long , you started quickly swallow.'
				dynamic $din_sekondparturok
			end
		end
	end

	exit
elseif evgentipe = 2:
	'During the break you came Zhendos and Mishan, friends of your brother "<<$name>>! Come for school, fun_too."'

	act 'Go after school':
		cls
		gs 'stat'
		'Together with Zhendosom Mishan and you are out of school, where they found a nook.'

		act 'Suck Guys':
			cls
			gang += 1
			bj += 2
			sub += 1
			cumlip += 2
			swalllow += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/bs2.jpg"></center>'
			'You sat on his haunches and the guys got members, you began to take turns stroking and suck. The guys did not last long  ,you began to swallow.'
			dynamic $din_sekondparturok
		end
	end

	exit
end

!dynamic $din_sekondparturok

--- brosh ---------------------------------

# dimaRudeEv
dimarudeday = day
gs 'stat'
'<center><b><font color="maroon"><<$npcName[1]>> <<$npcSurName[1]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc1.jpg"></center>'
'<center><img src="images/qwest/alter/npc/1.jpg"></center>'

if dimarudorient = 0:
	'Dimka seeing you turned and said quietly, "Well, come to me, have fun."'

	if fedorKozlovQW >= 10:
		'To you with Dimka suitable Fedor. "<<$name>>, well, shall we go?" Dimka looked at Fedora "Fed, what do you want? That''s my girl." Fedor frowned, "What is your zanchit dvechenka? She meets with me." Dimka smiled "So let''s ask her own, whom she meets?"'

		act 'Fyodor Sorry, I meet with Dimka':
			cls
			minut += 15
			fedorKozlovQW = -1
			gs 'stat'
			'You chose Dimka and Fyodor disappointed shrugged and walked away.'
			'You went to the house of Dimka. The house where he lives belongs to his parents, is a large two-storey detached house with a manicured lawn and a large garden.'

			act 'Walk into a room Dimka':dimarudorient = 1 & gt $curloc
		end

		act 'Sorry Dimka, but I''ll throw':
			cls
			minut += 15
			gs 'stat'
			'Did you choose Fedor. What Dimka disgusting grinned and turned to the Fed said "Fed, what for you need this cocksucker? I personally met her just because she fucking sucks." Fedka scowled, "What are you talkin about, motherfucker?"'

			if dimaFilm = 1:
				fedorKozlovQW = -1
				GorSlut = 2
				'Dimka said Fyodor seeing evil eye "And if I have proof that it cocksucker, what do you say then." Fedor was a little embarrassed but firmly said "That can not be!" Dimka smiled, "Can not? Look here." Dimka took the phone and turned on the video. You blushed as cancer, realizing that for the videos included Theodore Dimka. The video was clearly visible, as you ring is inserted into the mouth and hard cock enters your mouth getting into the throat. You drools and tears, but you do not resist, and willingly put your mouth. Fedor flushed and looked at you, "Oh, you two-faced bitch!" He turned away from you and walked away quickly. Dimka glared at you, "I decided to Quit cocksucker? Fuck you in the mouth, I''ll throw it. And today, everyone will know what you look like." Dimka laughed and walked away from you.'

				act 'Leave':gt 'gorodok'
			elseif dimaFilm = 0:
				'Dimka said, "Yes I had her in the bushes near a disco in the mouth fuck." Fedka even stronger scowled and walked right up to Dimka "Well ka again repeat what you said?" Dimka noticeably scared, "Yes it''s true, I have it near the disco sucked." Fyodor shoved Dimka, Dimka flew from him and began to inconsistent to say "Get away from me! Want to meet her, come on." Fyodor came to Dimka and grabbed him by the lapels "Once again I hear you about the light, all garbage talking about, sorry." Dimka fidgeted nervously trying to escape from the grip of steel Fedor "Come on, calm down, I knew." Fyodor Dimka pushed and pulled you aside.'

				act 'Go with Fedor':DimaRudeBlock = 1 & gt 'FedorEv'
			end
		end

		exit
	end

	act 'Go to Dimka':
		cls
		minut += 15
		gs 'stat'
		'You went to the house of Dimka. The house where he lives belongs to his parents, is a large two-storey detached house with a manicured lawn and a large garden.'

		act 'Walk into a room Dimka':dimarudorient = 1 & gt $curloc
	end

	act 'Leave':gt 'gschool'
elseif dimarudorient = 1:
	'Dimka closed the front door of his room at the castle and turned to you, "Take off your clothes."'
		act 'Undress':
			if dimaFilm = 0:dimarudorient = 2
			if dimaFilm = 1:dimarudorient = 3
		gt $curloc
	end
elseif dimarudorient = 2:
	'Dimka indifferent grin looked at your naked body and went to the table. You saw that he turned a small camera and took her hand. He sat on the couch and pointing the camera at you said "If otsosesh front of the camera, then I will not tell anyone how to fuck you in the mouth at the disco."'

	act 'Dress':
		cls
		minut += 5

		if GorSlut < 2:GorSlut = 2

		gs 'stat'
		'You grabbed the clothes and trying to hide her face from the camera began to dress as soon as possible. Dimka continued to shoot it all on camera.'

		act 'Leave':
			cls
			minut += 15
			DimaRudeBlock = 1
			gs 'stat'
			'You opened the door and went to the door of the house. Following Dimka heard the voice, "Go ahead, run a pig. Tomorrow all will know that you cocksucker."'

			act 'Leave':gt 'gorodok'
		end
	end

	act 'Suck on camera':
		cls
		minut += 15
		bj += 1
		cumlip += 1
		swallow += 1
		dimaFilm = 1
		sub += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/evdima/filming.jpg"></center>'
		'You sat before Dimka and started to suck his dick. Dimka concentrated shot you on your camera. His cock quickly became stronger and soon spurted semen in your mouth. You carefully swallowed it before the camera. Dimka turned off the camera and put it aside. "Cool.you''re A great cocksucker."'

		act 'Leave':gt 'gorodok'
	end
elseif dimarudorient = 3:
	'Dimka indifferent smirk examined your body. He went to the cloand rummaged in it taking out what that thing. He walked up to you and you turned rough hands behind his back. Heard-clicking handcuffs and you felt the cold steel on her wrists. He walked up to you and put back into your mouth ring to which prikrepeleny belts, then he buckled strap behind your head'

	act 'Further':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/evdima/ogag.jpg"></center>'
		'Your mouth is widely opened with rings, Dimka apparently little greased ring located in your mouth with lemon juice and now you saliva flowing from the mouth of the creek, and there is no way to stop it. Dimka bit admired you and plantar to your face got dick.'

		act 'Further':
			cls
			minut += 5
			bj += 1
			cumlip += 1
			swallow += 1
			throat += 1
			sub += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/evdima/gagbj.jpg"></center>'
			'Member unopposed went through the ring in your mouth and ran into your throat. You''re a bit choked, Dimka took a member and with full force you drove him in the throat. Do you drool flowed, tears and snot on her face. Dimka furiously drives the his penis in your mouth, burning with fire your fucking throat. Finally he groaned and drove to the base member in your mouth began to cum in your throat. You almost fainted from suffocation and spasms in the throat of any member which is clamped even tighter inside you. Finally Dimka became a member to fall and he took it out of you. After that he took the gag out of your mouth and your hands untied.'

			act 'Leave':gt 'gorodok'
		end
	end
end

--- dimaRudeEv ---------------------------------
# dimaHome
Mud = totminut + 120

if DimaBeHomeOnce = 0:DimaBeHomeOnce = 1

gs 'stat'
'<center><b><font color="maroon"><<$npcName[1]>> <<$npcSurName[1]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/1.jpg"></center>'

if dimaFilm = 0:
	'Dimka took some white powder from his desk and nyuhnul. After that "smell, cool thing! Excellent relaxing!"'

	act 'nyuhnut':
		cls
		minut += 15
		narkday = day
		health = vital * 10 + stren * 5
		willpower = intel * 5 + will * 5
		manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
		horny = 100
		nark += 10
		gs 'stat'
		'<center><img src="images/pic/dur.jpg"></center>'
		'You otsypali dose of powder and its nyuhnuli, then you feel just fine.'

		act 'further':
			cls
			bj += 1
			bja += 1
			cumlip += 1
			swallow += 1
			dimaFilm = 1
			sub += 1
			minut += 15
			dimasexday = daystart
			gs 'stat'
			'<center><img src="images/qwest/alter/evdima/filming.jpg"></center>'
			'My head swam . You seem to be flying above the floor. Dimka smiled at you and unbuttoned his pants taking out a flaccid penis "crawl here!" You why it was very funny . You sit in front of Dimka and kissed his dick, then you started to lick his dick carefully his tongue, Finally a member of Dimka got completely. You cupped member Dimka his lips and took it in her mouth, suddenly looked up you saw, Dimka takes you on camera. you giggled, presenting some stupid you face with a member in the mouth. Are you sexually licked cock and began to suck it in front of the camera, trying to act in the most beautiful, Dimka soon groaned slightly and your mouth spurted jet of sperm, you immediately started to swallow. Dimka turned off the camera and put it aside. "awesome. You''re a great huesoska."'

			act 'Leave':gt 'gorodok'
		end
	end

	act 'Refuse':
		cls
		dom += 1
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/evdima/pre.jpg"></center>'
		'You refused to use powder. Dimka chuckled "Well, thing is really cool." He unbuttoned his pants and pulled out a member. "Come here baby."'

		act 'Approach Dimka':
			cls
			bj += 1
			bja += 1
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/evdima/cock.jpg"></center>'
			'You came to Dimka and he took you by the hand, strong but gentle , while you are fascinated looking at his dick. Dick was getting closer to your face and you feel like a hot head touched your lips.'

			act 'suck':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/cock2.jpg"></center>'
				'Clasping his lips a member you took it in her mouth. Member of the slides in your mouth when you wet it absorbs up to the throat. Dimka whispered "Undress."'

				act 'Undress':
					cls
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/evdima/cock3.jpg"></center>'
					'Trying not to break away from a member you undressed exposing her breasts. Once you were naked you continue to absorb member in her mouth. Suddenly you hear, Dimka began to move . You looked up and saw, he picked up a camera.'

					act 'Dress':
						cls
						minut += 5

						if GorSlut < 2:GorSlut = 2

						gs 'stat'
						'You grabbed the clothes and trying to hide her face from the camera started to dress as soon as possible. Dimka continued to shoot it all on camera.'

						act 'Escape':
							cls
							minut += 15
							DimaRudeBlock = 1
							gs 'stat'
							'You opened the door and went to the door of the house. Following heard a voice Dimka "fire_away, run a pig. Tomorrow everyone will know, you huesoska."'

							act 'Leave':gt 'gorodok'
						end
					end

					act 'Suck on camera':
						cls
						minut += 15
						cumlip += 1
						swallow += 1
						dimaFilm = 1
						sub += 5
						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/filming.jpg"></center>'
						'You continued to suck dick Dimka and he shot you intently at his camera. His cock quickly grew stronger and soon cum spurted into your mouth. You diligently swallowing front of the camera. Dimka turned off the camera and put it aside. "awesome. You''re a great huesoska."'

						act 'Leave':gt 'gorodok'
					end
				end
			end
		end
	end
elseif dimaFilm > 0:
	if narkday ! day:
		'Dimka took some white powder from his desk and nyuhnul. After that "smell, cool thing! Excellent relaxing!"'

		act 'nyuhnut':
			cls
			minut += 15
			narkday = day
			health = vital * 10 + stren * 5
			willpower = intel * 5 + will * 5
			manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
			horny = 100
			nark += 10
			gs 'stat'
			'<center><img src="images/pic/dur.jpg"></center>'
			'You otsypali dose of powder and its nyuhnuli, then you feel just fine.'

			act 'catch a buzz':gt $curloc
		end

		act 'Refuse':
			cls
			dom += 1
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/evdima/pre.jpg"></center>'
			'You refused to use powder. Dimka chuckled "Well, thing is really cool. Without it" He unbuttoned his pants and pulled out a member. "Come here baby."'

			act 'Take by mouth':
				cls
				bj += 1
				bja += 1

				if maxdra = 0:maxdra = 1

				minut += 15
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/minet.jpg"></center>'
				'You came to Dimka and arranged for convenient took it hard and hot cock in her mouth. Your lips slide down the barrel member and you absorb it to the throat.'
				dimadalrand = rand(0, maxdra)

				if dimadalrand = 0:
					act 'further':
						cls
						cumlip += 1
						swallow += 1
						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/cum.jpg"></center>'
						'Suddenly a member of Dimka cums in your mouth and you continue sucking mouth full of sperm. Finally Dimka ceases to finish and you swallow his cum.'

						act 'Leave':gt 'gorodok'
					end
				elseif dimadalrand = 1:
					act 'further':
						cls
						cumface += 1
						facial += 1

						if maxdra = 1:maxdra = 2

						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/face.jpg"></center>'
						'Dimka suddenly pulls his dick out of your mouth and then ends up on your face. Warm jet of sperm land you on the cheek, nose and lips. Soon almost all your face is covered with warm and sticky cumshot.'

						act 'Leave':gt 'gorodok'
					end
				elseif dimadalrand = 2:
					act 'further':
						cls
						cumlip += 1
						swallow += 1

						if throat < 16:throat += 1
						if mop ! 1:mop = 0
						if maxdra = 2:maxdra = 3

						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/deep.jpg"></center>'

						if throat < 16:
							'Dimka grabs you by the hair and starts to pull you to the member. Hard cock enters your throat, you davites and tears flow from his eyes. Dimka not paying any attention to you just fucked your mouth with his hard cock. Finally torture ends and your mouth shoots sperm you immediately swallow.'
						else
							'Dimka grabs you by the hair and starts to pull you to the member. Hard cock enters your throat, you bite vomiting and feel like your eyes moistened. Dimka not paying any attention to you just fucked your mouth with his hard cock. Finally torture ends and your mouth shoots sperm you immediately swallow.'
						end

						act 'Leave':gt 'gorodok'
					end
				elseif dimadalrand = 3:
					act 'further':
						cls

						if maxdra = 3:maxdra = 4

						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/sit.jpg"></center>'
						'Dimka took his dick out of your mouth and put you on the bed. He climbed up on your chest and his cock was on your face. You started to lick his balls and Dimka masturbate dick in your face'

						act 'further':
							cls
							cumface += 1
							facial += 1
							dimasexday = daystart
							gs 'stat'
							'<center><img src="images/qwest/alter/evdima/sitcum.jpg"></center>'
							'Suddenly a member of Dimka began to fly jets of hot cum and land on your face covering it viscous ending with.'

							act 'Leave':gt 'gorodok'
						end
					end
				elseif dimadalrand = 4:
					act 'further':
						cls
						$boy = 'Dimka'
						silavag = 1
						dick = 16

						if maxdra = 4:maxdra = 5

						sexa += 1
						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/sex.jpg"></center>'
						'Dimka puts you on the sofa.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum

						act 'Leave':gt 'gorodok'
					end
				elseif dimadalrand = 5:
					act 'further':
						cls
						$boy = 'Dimka'
						silavag = 1
						dick = 16
						anala += 1
						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/anal.jpg"></center>'
						'Dimka cancer puts you on the sofa.'
						dynamic $analsexrude

						act 'Leave':gt 'gorodok'
					end
				elseif dimadalrand = 6:
					act 'further':
						cls
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/cum.jpg"></center>'
						''

						act 'Leave':gt 'gorodok'
					end
				end
			end
		end

	elseif narkday = day:
		if maxdradrug = 0:maxdradrug = 1

		'Dimka aloof you smiling "what, fun_too?"'
		dimadalrand = rand(0, maxdradrug)

		if dimadalrand = 0:
			act 'further':
				cls
				gs 'stat'
				'Dimka indifferent grin examined your body. He walked over to the cloand rummaged in it taking out some things. He came up to you and roughly wrapped your hands behind your back. There was a click is handcuffs and you feel the cold steel on his wrists. He came up to you from behind and shoved in your mouth ring to which prikrepeleny belts, then he buckled the belt behind your head'

				act 'further':
					cls
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/evdima/ogag.jpg"></center>'
					'Your mouth is widely opened with rings, Dimka seems a little blurry ring located in your mouth lemon juice and now you saliva flowing from the mouth of the creek . Dimka little to admire you and your iron sole person got dick.'

					act 'further':
						cls
						minut += 15
						bj += 1
						bja += 1
						cumlip += 1
						swallow += 1

						if throat < 16:throat += 1

						sub += 1

						if mop ! 1:mop = 0

						dimasexday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/evdima/gagbj.jpg"></center>'
						'Member of unopposed went through the ring in your mouth and ran into your throat. You''re a little choked, Dimka took the cock and with all his strength drove it to you in the throat. Do you drool flowed, tears and snot on the face. Dimka fiercely drives the his penis in your mouth, fucking your throat burning fire. Finally. You almost fainted from suffocation and spasms in the throat of any member who has clamped tighter inside you. Finally became a member of Dimka fall off and he took it out of you. After that he took the gag out of your mouth and your hands are untied.'

						act 'Leave':gt 'gorodok'
					end
				end
			end
		elseif dimadalrand = 1:
			act 'further':
				cls

				if maxdradrug = 1:maxdradrug = 2

				minut += 15
				bj += 1
				bja += 1
				cumlip += 1
				swallow += 1

				if throat < 16:throat += 1
				if mop ! 1:mop = 0

				sub += 1
				dimasexday = daystart
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/ab.jpg"></center>'
				'Dimka roughly ripped off your pants and pulled them on your head, then he inserted his penis into your mouth and began to fuck you hard in the mouth. Your throat burning with fire from the fact that a member with every movement enters your mouth to the most eggs. Dimka growls at you "Huesoska mouth is her second pussy, and what should be done with by a pussy? Rigidly to fuck her, to the uterus!" Dimka beats you on the cheek with his hand "Get struhnyu creature in her pussy!" Dick in your mouth starts to cum and fills your mouth with sperm, you swallow.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 2:
			act 'further':
				cls
				$boy = 'Dimka'
				silavag = 1
				dick = 16
				sexa += 1
				sub += 5

				if maxdradrug = 2:maxdradrug = 3

				dimasexday = daystart
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/car.jpg"></center>'
				'Dimka bound and tied you to your knees a little cart with roliuami, so he put in your mouth clown horn and tied it with tape for you to face.'
				dynamic $sexstart
				dynamic $sexstart2
				'Dimka fuck you, and you instead of moaning makes funny clown sounds.'
				dynamic $sexcum

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 3:
			act 'further':
				cls
				$boy = 'Dimka'
				silavag = 1
				dick = 16
				anala += 1
				sub += 5

				if maxdradrug = 3:maxdradrug = 4

				dimasexday = daystart
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/car.jpg"></center>'
				'Dima bound and tied you to your knees a little cart with casters, so he put in your mouth clown horn and tied it with tape for you to face.'
				dynamic $analsexrude

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 4:
			act 'further':
				cls

				if mop ! 1:mop = 0

				throat += 5
				dimasexday = daystart
				minut += 15
				sub += 5

				if maxdradrug = 4:maxdradrug = 5
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/nar.jpg"></center>'
				'Dimka your hands tied behind your back, then tied the legs so, that would vvy could only sit on his lap , then he put the collar and dragged you to the post to which the tape was attached dildo, inserting it into your mouth Dimka your collar tied to the pillar so, that you could not spit dildo mouth. When you think, Dimka has Najran with you, he is using a rope on your collar pulled her so, that dildo entered your throat. After that Dimka began to enjoy the sight of your face reddened by suffocation, current snot, saliva and tears from the eyes. You choked with dildo in her throat and tried to keep vomiting, so how exactly would be drowned and died right on this dildo. And when you have already started to lose consciousness, Dimka finally freed you and you were able to finally breathe freely.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 5:
			act 'further':
				cls
				spank += 1
				dimasexday = daystart
				minut += 15
				sub += 5

				if maxdradrug = 5:maxdradrug = 6
				if mop ! 1:mop = 0

				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/spank.jpg"></center>'
				'Dimka you tied to a pole and took the whip began to smack your ass. Immolation hit a sharp flashes penetrated through drug intoxication and you were screaming and moaning. Dimka finally played enough and you unleashed.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 6:
			act 'further':
				cls

				if pirsF > 0:$text = 'Dimka pulled out of your nipples needles and you free'
				if pirsF = 0:pirsF = 1 & $text = 'Dimka put in punctures piercing, then you free'

				nippain = 2
				nippainday = daystart

				if maxdradrug = 6:maxdradrug = 7
				if mop ! 1:mop = 0

				sub += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/nip.jpg"></center>'
				'Dimka you connected and fully obezdvizhel. Then your nipples clamped in the jaws and suddenly you stuck a needle into the nipple. You howled in pain, but Dima spit on your cries and stuck the needle next forcing you to howl again. You yelled and swore at this fucking sadist, but Dimka -eyed needle stuck you more and more. When he was tired <<$text>>.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 7:
			act 'further':
				cls

				if pirsA = 1:$text = 'Dimka pulled out of you and you free needles'
				if pirsA = 0:pirsA = 1 & $text = 'Dimka pulled out of your needles, put you in a puncture in the language bar and you free'

				pirs_pain_ton = 7

				if maxdradrug = 7:maxdradrug = 8
				if mop ! 1:mop = 0

				sub += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/ton.jpg"></center>'
				'Dimka you connected and fully obezdvizhel. Then his fingers got your tongue and suddenly stuck a needle in it. You whined and twitched from a sharp pain. Dimka fun you stuck a needle into his cheek, you again howled in pain. <<$text>>.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 8:
			act 'further':
				cls

				if pirsG > 0:$text = 'Dimka pulled out of your pussy pins and untied you'
				if pirsG = 0:pirsG = 1 & $text = 'Dimka pulled out of your pussy pins and put you in a puncture piercing. After that'

				painpub = 2
				painpubday = daystart

				if mop ! 1:mop = 0

				sub += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/vag.jpg"></center>'
				'Dimka you connected and fully obezdvizhel. Then he picked up a pin and pricked your labia. You howled with sharp pain and not sterpimoy steel dergatsya, but Dimka did not calm down until all your istykal suffered vlagilische pins. <<$text>>.'

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 9:
			act 'further':
				cls
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/cum.jpg"></center>'
				''

				act 'Leave':gt 'gorodok'
			end
		elseif dimadalrand = 10:
			act 'further':
				cls
				gs 'stat'
				'<center><img src="images/qwest/alter/evdima/cum.jpg"></center>'
				''

				act 'Leave':gt 'gorodok'
			end
		end
	end
end

--- dimaHome ---------------------------------
# dimaGoHome
Mud = totminut + 120
dimarudeday = day
gs 'stat'
'<center><b><font color="maroon"><<$npcName[1]>> <<$npcSurName[1]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/1.jpg"></center>'
'Dimka came to you and you looked up and down. "what, go to my?"'

act 'Go to Dimka':
	cls
	minut += 30
	gs 'stat'
	'You went to the house of Dimka. The house where he lives belongs to his parents, this is a big two-storey, detached house with a manicured lawn and a large garden. With Dimka you have gone to his room and he closed the door with a key.'

	act 'Go into the room Dimka':gt 'dimaHome'
end

--- dimaGoHome ---------------------------------
# dimaGoHome2
gs 'stat'

if dimaGohomeday = day:
	'You come to a beautiful private home and rang the bell. You opened the door to a pretty blonde of about forty years, apparently the mother of Dimka. She looked at you and smiled "Dimka is not at home."'

	act 'Leave':gt 'gorodok'
elseif dimaGohomeday ! day:
	'You come to a beautiful private home and rang the bell. You opened the door to a pretty blonde of about forty years, apparently the mother of Dimka. She looked at you and smiled "You Dimka?" You nodded and mother of Dimka let you in the house.'

	act 'Go into the room Dimka':dimaGohomeday = day & gt 'dimaHome'
end

--- dimaGoHome2 ---------------------------------
# dinnpc
$din_predlog_dima_bj = {
	act 'Squat':
		cls
		DimaRudeQW += 1
		sub += 1
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'Embarrassed and blushing you squatted in front of Dimka, who got dick and put it in your face.'

		act 'Take by mouth':
			cls
			minut += 5
			horny += 10
			bj += 1
			bja += 1
			dick = 16

			if npcSex[numnpc] = 0:npcSex[numnpc] = 1 & guy += 1

			sub += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/cocksucker2.jpg"></center>'
			'You gently kissed the purple head member and said Dimka taking your hair. "Let''s suck." You cupped his lips and took his dick in her mouth. You began to move his lips on hard cock absorbing it into his mouth as deeply as possible. Dimka groaned and grabbed your head in his hands, "Suck it deeper."'

			act 'Suck':
				cls
				minut += 5
				throat += 2
				dick = 16
				sub += 1

				if mop > 1:mop = 0

				hapri = 0
				manna = 0
				horny = 0
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/cocksucker3.jpg"></center>'
				'Dimka firmly grabbed you by the hair and suddenly moved vperet body, causing his hard cock went in your throat, you''re choking and tears flowed from his eyes. Dimka took a member of your throat and you coughed struggling with a bout of vomiting. Dimka gave you a little breather and again put his hard cock in your mouth. He started literally fuck you in the mouth and his cock every time you flew deeper into the throat. You have flowed from the nose snot on lips, eyes stream tears flowed and flowed drooling lips, dripping on your clothes. Dimka did not let up and fucked your mouth is already in full force. Soon you become studded in his crotch with his nose. Dimka your face pressed to his groin, you struggled to relax blazing fire throat. "What a pig like? Taschishsya when you roughly fuck? Now you will be my pig. Will grunt and scream on my cock." Suddenly he pulled his dick out of your mouth. And he began to masturbate in front of your face.'

				act 'trying to catch my breath':
					cls
					minut += 5
					cumlip += 1
					cumface += 1
					cumfrot += 1
					dimasexday = daystart
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/cocksucker4.jpg"></center>'
					'You sit on his haunches before Dimka panting, all your face smeared with snot, tears, and saliva. Suddenly a member of Dimka flies jet of sperm and hits you on the face, then another and another jet. Your whole face is covered with a layer of mucus in which all mixed up. Dimka member removes his pants and says, "It was not bad. It will be necessary to repeat as anything. Well, until I see you again." Dima turns and going to the disco leaving you alone.'

					act 'Leave':gt 'gdk'
				end
			end
		end
	end
}

$din_dima_predlog = {
	act 'Slap him':
		cls
		dom += 1
		grupNPC[numnpc] = 0
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'You cracked the face Dimka and he clutched his cheek. "Well, get out a fool. And do not come near me."'

		act 'Leave':gt $loc, $metka
	end

	act 'Become confused':
		cls
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'You have eyes widened and you flushed with such a proposal. Dimka unbuttoned his pants. "Come on, brave, I can not stand here all night."'

		act 'Slap him':
			cls
			dom += 1
			grupNPC[numnpc] = 0
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
			'You cracked the face Dimka and he clutched his cheek. "Well, get out a fool. And do not come near me."'

			act 'Leave':gt $loc, $metka
		end

		act 'And you will not tell anyone?':
			cls
			dom += 1
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
			'You asked Dimka "And you will not tell anyone?" Dimka smiled at you "No, You ''ll be my Devchenka."'
			dynamic $din_predlog_dima_bj
		end

		dynamic $din_predlog_dima_bj
	end

	dynamic $din_predlog_dima_bj
}

$din_igor_disco_bj = {
	act 'Squat':
		cls

		if npcSex[numnpc] = 0:npcSex[numnpc] = 1 & guy += 1

		dick = 6
		bj += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/cocksucker5.jpg"></center>'
		'You sat on his haunches and Igor pulled out of his pants his dick. You looked at this tiny fungus and almost laughed. Member Igor was really small and thin and sticking of hair like a mushroom in a meadow. You gently around his lips and began to baby suck on a normal sucking a small penis you did not work and you began to fondle his lips squeezing and licking tongue. Soon Igor groaned and stood out in your mouth drop of semen that you can hardly feel.'

		act 'Leave':gt $loc, $metka
	end
}

$din_igor_dima_disco_bj = {
	act 'Squat':
		cls

		if npcSex[numnpc] = 0:npcSex[numnpc] = 1 & guy += 1

		dick = 6
		bj += 2
		cumlip += 1
		swallow += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/cocksucker6.jpg"></center>'
		'You sat on his haunches and Igor pulled out of his pants his dick. You looked at this tiny fungus and almost laughed. Member Igor was really small and thin and sticking of hair like a mushroom in a meadow. The 16 centimeter dick Dimka looked this giant against this silicula. You guys took the members in his hands and began to suck them one by one. Finally, the boys began to cum in your mouth. Sperm from Igor almost never was, but you almost Dimka poured a mouthful. You swallow sperm and wiped his lips. Satisfied boys buttoned pants and went to the disco.'

		act 'Leave':gt $loc, $metka
	end
}

$din_igor__disco = {
	act 'Go to the street':
		cls
		gs 'stat'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc4.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/4.jpg"></center>'
		'You went out with Igor. Igor passionately took you by the hand and began to say "<<$name>>, you''re such a pretty girl when I see you, I have immediately podnimaetsya mood. I like you very nravishsya. I''d really like to start a relationship with you."'

		act 'Refuse':gt $loc, $metka

		act 'agree':
			cls
			IgorLoverQW = 1
			gs 'stat'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc4.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/4.jpg"></center>'
			'You agreed to meet with Igor and he blossomed smile "<<$name>>, you can get a kiss?"'

			if dom > 0:
				act 'interruption':
					cls
					dom += 5
					IgorDominaQW = 1
					gs 'stat'
					! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc4.jpg"></center>'
					'<center><img src="images/qwest/alter/npc/4.jpg"></center>'
					'You grin skazale Igor that he would kill. Igor blushed and knelt "<<$name>>, I beg you as a slave, on his knees, just one kiss!"'

					if dom >= 10:
						act 'You can kiss my feet':
							cls
							dom += 5
							IgorLove += 20
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/leg.jpg"></center>'
							'You smiled looking at Igor top to the bottom and was told that he can kiss your foot. Igor kissed your foot and began to lick your toes, tickling you with his tongue. Igor took his tiny pisyun and began to masturbate on her knees in front of you and licking your feet, finally he came to the ground.'

							act 'Leave':gt $loc, $metka
						end
					end

					act 'Kiss':
						cls
						IgorLove += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
						'You kissed Igor, Igor kissed your lips passionately but gently.'

						act 'Leave':gt $loc, $metka
					end
				end
			end

			act 'Kiss':
				cls
				IgorLove += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
				'You kissed Igor, Igor kissed your lips passionately but gently.'

				act 'Leave':gt $loc, $metka
			end
		end
	end

	act 'Refuse':gt $loc, $metka
}

--- dinnpc ---------------------------------
# krutishi
if grupTipe[numnpc] = 3:
	if npcPol[numnpc] = 0 and hapri = 0:
		grupNPC[numnpc] -= 5
		'<<$npcName[numnpc]>> with a smile looking at your messy hair.'
	elseif npcPol[numnpc] = 1 and hapri = 0:
		grupNPC[numnpc] -= 5
		'<<$npcName[numnpc]>> with a smile looking at your messy hair.'
	elseif npcPol[numnpc] = 0 and hapri > 0 and $loc = 'gdkin' and grupNPC[numnpc] >= 40:
		if glamur > 0 or ski > 0:
			cla
			'<<$npcName[numnpc]>> - Can dance?'

			act 'Dance':
				cls
				minut += 5
				grupNPC[numnpc] += 5
				dance += rand(1, 3)

				if numnpc = 1:Mud = totminut + 120

				gs 'stat'
				'You danced to the old hit the dance floor with a guy.'

				act 'Move away':gt $loc, $metka

				if numnpc = 4 and grupNPC[numnpc] >= 80:
					!!Igor Kruglov
					horny += 10
					gs 'stat'

					if IgorLoverQW > 0 and IgorDominaQW = 0:
						'Igor whispers to you "<<$name>>, I love you so much. Come to me."'

						act 'Go to Igor':gt 'IgorEv'
					elseif IgorLoverQW > 0 and IgorDominaQW > 0:
						'Igor whispers to you, "My lady, I love you so much. Come to me."'

						act 'Go to Igor':gt 'IgorEv'
					elseif IgorLoverQW = 0:
						'During the dance, hands Igor descend on you ass and start to stroke.'

						if DimaRudeQW > 0:
							'Igor whispers in your ear, "I told Dimka what you cool cocksucker. Come out, show me your class."'

							act 'Go to the street':
								cls
								gs 'stat'
								'You together with Igor slipped out of the disco. Hidden in a secluded corner of Igor began to kiss and caress you. There was the sound of his pants unbuttoned and Igor pushed your shoulders.'
								dynamic $din_igor_disco_bj
							end

							act 'Refuse':
								cls
								gs 'stat'
								'You refused to go with Igor on the street. Dimka came to you and asked you what''s happening. Igor shrugged, "Your cocksucker does not want me to suck." Dimka frowned, "she asks, he''s my best friend, because there would be nothing wrong if you otsosesh it." Boys took you by the hand and led him outside.'
								dynamic $din_igor_dima_disco_bj
							end

							exit
						end

						if grupNPC[1] = 0:
							'Igor whispers in your ear, "I told Dimka as you dumped it. Done, he sometimes behaves like a pig. Incidentally, <<$name>>, go outside, get some air."'
							dynamic $din_igor__disco
							exit
						end

						cla
						'Igor whispers in your ear, "Come on out <<$name>>. Breathe in the fresh air."'
						dynamic $din_igor__disco
						exit
					end
				elseif numnpc = 1 and grupNPC[numnpc] >= 80 and DimaRudeQW > 0:
					'After the dance Dimka holding your hand. "Let''s go outside."'

					act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka
					act 'Dimka go to the street':
						cls
						gs 'stat'
						'You left the club with Dimka on the street. "Well, the pig, take it in your mouth."'

						act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka

						dynamic $din_predlog_dima_bj
					end
				elseif numnpc = 1 and grupNPC[numnpc] >= 80 and DimaRudeQW = 0:
					'After the dance Dimka holding your hand. "Let''s go outside, get some fresh air."'

					act 'Dimka go to the street':
						cls
						gs 'stat'
						'You went out with Dimka and departed for the club. Dimka came up to you and hugged you tight. "<<$name>>, you did the girl. Want to meet me?"'

						act 'No':
							cls
							gs 'stat'
							'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
							'You replied in the negative and Dimka grinned. "Do not be shy, of course you want. Otherwise, why do you always come to me."'

							act 'Well, maybe a little':
								cls
								gs 'stat'
								'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
								! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
								'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
								'You were embarrassed and said that you do not know, but maybe. Dimka smiled and hugged you. "Of course. I knew it from the start. Know, I do not need some sort of a nun, I need a girl without complexes. Overall so we will meet with you, if you are right now otsosesh me."'
								dynamic $din_dima_predlog
							end

							act 'Leave':gt $loc, $metka
						end

						act 'Yes':
							cls
							gs 'stat'
							'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
							'You were confused by the question and confirmed directness. Dimka grinned. "Of course. I knew it from the start. Know, I do not need some sort of a nun, I need a girl without complexes. Overall so we will meet with you, if you are right now otsosesh me."'
							dynamic $din_dima_predlog
						end
					end
				end
			end

			act 'Refuse':grupNPC[numnpc] -= 5 & gt $loc, $metka

		exit

		end
	end
end

--- krutishi ---------------------------------
# artemEv
$din_artem_bj = {
	act 'Suck':
		cls
		minut += 5
		horny += 10
		bj += 1

		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
		if artemBJQW = 0:artemBJQW = 1

		sub += 1
		swallow += 1
		cumlip += 1
		dick = 16
		artempower -= 1
		gs 'stat'
		! WD: Correct Image path ~ "images/qwest/alter/Ev/artemBJ.jpg"
		'<center><img src="images/qwest/alter/Ev/artomBJ.jpg"></center>'
		dynamic $dinrandbj
		dynamic $dinrandswallow

		act 'Go home':gt 'gorodok'
	end
}

$din_artem_leghump = {
	act 'Let him caress your ass':
		cls
		minut += 5
		horny += 10
		hump += 1

		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

		leghumpArtem += 1
		dom += 1
		dick = 16
		cumfrot += 1
		artempower -= 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/artomHump.jpg"></center>'
		'You got my clothes on all fours in front of Artem and framed him his ass. Artem began stroking your ass hands for a while he hesitated and you turned around. Artem took penis and began to rub them on your backside. You feel as through clothes between your buns moving solid barrel member. Artem groaned and flew jet of sperm you on the ass. You turned around and see what Artem pytaetsya cum in hand, but the sperm of his overexcited member still shatters you on clothing. After he finished fussing Artem "<<$name>> sorry, I did not want to stain you, I''m all erase." He began to wash semen stains on your clothes. After some time on the clothes were only wet spots.'

		act 'Go home':cumfrot = 0 & gt 'gorodok'
	end
}

$din_artem_leghump2 = {
	if dom > 0:
		act 'Strip and let Artem rub his dick on your ass':
			cls
			minut += 5
			horny += 10
			hump += 1

			if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

			leghumpArtem += 1
			dom += 1
			dick = 16
			cumass += 1
			artempower -= 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/artomHump2.jpg"></center>'
			'You undressed and lay down on his stomach on the bed. Artem sat on top of your feet and pulls cock was rubbing against your soft ass and jerk off on her. Soon you Artem finished panties.'

			act 'Go home':gt 'gorodok'
		end
	end
}

$din_artem_lern = {
	act 'Do homework with Artem':
		cls
		minut += 60
		grupNPC[2] += 10
		lernHome = 0
		lern += rand(3, 6)
		intel += rand(1, 2)
		gs 'stat'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc2.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/2.jpg"></center>'
		'Did you do with Artem within an hour, during which time he helped you with homework and explained something of the studied material.'

		if grupNPC[2] >= 90:
			artemLernQW += 1
			'While you are with Artem you catch his gaze on me. He glances furtively to you on foot and on his chest.'

			if artemQW > 0:
				if GorSlut < 2:
					'After training with Artem he leaned toward your face, what would kiss you.'

					act 'Kiss Artem':
						cls
						horny += 10
						!!artemQW = 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
						'You smiled slightly and Artem brought her face to him. Artem approached you and kissed you. You started kissing. Finally ending kiss Artem said sheepishly. "<<$name>>, I like you very nravishsya."'

						if artemLernQW >= 20 and leghumpArtem = 0:
							'Artem muttered sheepishly. "<<$name>>. I really want you, maybe we could ... you know ... Can I touch your ass?"'
							dynamic $din_artem_leghump
						elseif leghumpArtem >= 1:
							'Artem said sheepishly. "<<$name>>, you''re so wonderful. I liked it so much last time. Can we play one more time?"'
							dynamic $din_artem_leghump
							dynamic $din_artem_leghump2
						end


						act 'Go home':gt 'gorodok'
					end
				elseif GorSlut >= 2:
					if artemBJQW = 0:
						'After classes, Artem looked at you, "<<$name>>, everyone at school is talking about what you cocksucker. I think it will be fair if you have me otsosesh for what I''m helping you."'
						dynamic $din_artem_bj

						act 'Refuse':
							cls
							dom += 1
							artemLernQW = -1
							grupNPC[2] = 0
							gs 'stat'
							'You refused to Artem, who frankly offended "Look, I have so much time and effort spent, and you ... you suck all in a row, but I do not want to ... More to me can not be appropriate."'

							act 'Go home':gt 'gorodok'
						end
					elseif artemBJQW > 0:
						'Artem unbuttoned pants and pulled out a member of his pants. "On <<$name>>, suck."'
						dynamic $din_artem_bj
					end
				end

				exit
			elseif artemLernQW >= 10 and artemQW = 0:
				'Artem stumbles as if he wants you to say something, but not solved. But then mustered determination asks. "<<$name>>, I like you. Can I kiss you?"'

				act 'Kiss Artem':
					cls
					horny += 10
					artemQW = 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
					'You smiled slightly and Artem brought her face to him. Artem approached you and kissed you. You started kissing. Finally ending kiss Artem said sheepishly. "It was fun, light, I like you very nravishsya."'

					act 'Go home':gt 'gorodok'
				end

				act 'Refuse':
					cls
					dom += 1
					artemLernQW = -1
					grupNPC[2] = 0
					gs 'stat'
					'You refused to Artem, who frankly offended "Look, I have so much time and effort spent, and you ... you are using just me. All. Can no longer come to me!"'

					act 'Go home':gt 'gorodok'
				end

				exit
			end
		end

		act 'Say goodbye and go home':gt 'gorodok'
	end
}

gs 'stat'
'<center><b><font color="maroon"><<$npcName[2]>> <<$npcSurName[2]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc2.jpg"></center>'
'<center><img src="images/qwest/alter/npc/2.jpg"></center>'
if kotovLoveQW > 0 and artemVitokQW = 0:
	'You are out of school and went to Artem. Artem asked, "Well, shall we go?" You nodded his head. Once you have gathered with Artem leave the school yard when suddenly came up to meet you Witek Kotov. He walked up to you and smeryav disdainful look Artem said "Where are you going to go with this four-eyed jerk?" You answered Vit''ka that you went to teach lessons, Artem helps you tighten school. Witek frowned, "I do not trust this freak. He has written on his face, that he laid eyes on you." Artem much frightened, and began to mumble. "Witek, but you what, I would never. We just teach lessons." Have you noticed how tense nodules in Vic.'

	if dom >= 10:
		act 'Tell Witek to leave him alone':
			cls
			sub += 10
			artemVitokQW = 1
			gs 'stat'
			'You said Vit''ka fork out from Artem. And Witek slightly wilted, but went up to Artem and lightly punched him in the shoulder with his fist "Slysh motherfucker. If I even suspect that it will be something out of a hint, I love you so otpizzhu that you mother dear know. You have me in a wheelchair the chair will be sitting for the rest of life and piss blood. Do you understand? " Artem nodded repulsed rubbing his shoulder, "Yes, yes. All clear." Thereafter Witek turned and went the other way. You scared Artem went to his home.'
			dynamic $din_artem_lern
		end
	end

	act 'Be silent':
		cls
		artemVitokQW = 2
		gs 'stat'
		'You silent pondering what to do. And then there was cotton and Artem fell to the ground. You do not understand what happened but obviously Witek punched Artem. Artem closed hands and squealed like a little girl "Witek, well, do not!" Witek leaned over Artem "Once again I see you together, teeth will strike. Understood?" Artem wailed "Got it figured." Witek gave a kick in the ass lifted from the ground to Artem. "And now sebis horrified pimples!" Artem grabbed an armful their stuff running drapanul from Vic. Witek spat on the ground and turned around went somewhere.'

		act 'Leave':gt 'gschool'
	end

	exit
end

if fedorKozlovQW >= 10 and FedorArtemTalk = 0:
	FedorArtemTalk = 1
	'To you with Artem suitable Fedor. "Artem, you would go to the library ..., <<$name>> my girl." Artem blushed "Fed, but nothing we just teach lessons together, I light tightens on tuition. She has come to the Institute, by the way!" You also inserted mot that Artem for you with just one and only lessons you learn together, nothing between you is not. Fyodor sighed and said, "Well, I do not like it all, yeah figs with him. <<$name>> I believe you." After that Fedor oteshel from you.'
	dynamic $din_artem_lern
	exit
end

'You are out of school and went to Artem. Artem asked, "Well, shall we go?" You nodded his head. All the way to his house you walked in silence.'
act 'Go to Artem':gt 'artemhome'
!!dynamic $din_artem_lern

--- artemEv ---------------------------------
# artemhome2
gs 'stat'

if artemhomemark = 0:
	'You came to the house Artem Chebotarev.'

	act 'Leave':minut += 15 & gt 'gorodok'

	if week < 6:
		if hour < 16 and hour >= 7:
			'Artem not at home.'
		elseif hour >= 16 and hour < 20:
			'The door you opened Artem and invited to enter.'

			act 'Enter':artemhomemark = 1 & gt $curloc
		elseif hour >= 20 or hour < 7:
			'Too late, that would go to visit.'
		end
	end

	if week >= 6:
		if hour < 10:
			'Too early time, that would go to visit.'
		elseif hour >= 10 and hour < 20:
			'The door you opened Artem and invited to enter.'

			act 'Enter':artemhomemark = 1 & gt $curloc
		elseif hour >= 20 or hour < 5:
			'Too late, that would go to visit.'
		end
	end
elseif artemhomemark = 1:
	'Artem sits in his room on the bed.'

	if artempower > 0:
		'Artem smiling at you "<<$name>>, you are so beautiful!"'

		act 'Kiss':
			cls
			horny += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
			'You smiled Artem and his face a little closer to him. Artem approached you and kissed you. You started kissing.'

			if artempower = 3:'During a kiss Artem rubs against your thigh his crotch and you feel his hard cock through clothes. Do you feel that Artem took dick out of his pants and rubs them on your hip.'
			if artempower = 2:'During a kiss Artem rubs against your thigh his crotch and you feel his hard cock through clothes.'
			if artempower = 1:'Finally ending the kiss shyly said Artem. "<<$name>>, I like you very nravishsya."'

			dynamic $din_artrm_leghump
			dynamic $din_artem_leghump2
		end
	elseif artempower = 0:
		'Artem with a smile looking at you "Oh <<$nickname>>, you milked me dry, I need a vacation."'
	end

	if lernHome > 0:act 'Do homework with Artem':artemhomemark = 2 & gt $curloc

	act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
elseif artemhomemark = 2:
	minut += 60
	grupNPC[2] += 10
	lernHome = 0
	lern += rand(3, 6)
	intel += rand(1, 2)
	gs 'stat'
	'<center><img src="images/qwest/alter/npc/<<2>>.jpg"></center>'
	'Did you do with Artem in under an hour, During this time he helped you with homework and explained something of the studied material.'

	act 'Rest':artemhomemark = 1 & gt $curloc
end

!'
act '':
	cls
	minut += 5
	gs 'stat'
	! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/artom/2.jpg"></center>'
	'<center><img src="images/qwest/alter/npc/2.jpg"></center>'
	''

	act '':
end
'!

--- artemhome2 ---------------------------------
# artemhome
gs 'stat'
$boy = 'Artem'
dick = 16
silavag = 0

if artemhomemark = 0:
	'You came to the house Artem Chebotarev.'

	act 'Leave':minut += 15 & gt 'gorodok'

	if week < 6:
		if hour < 16 and hour >= 7:
			'Artem not at home.'
		elseif hour >= 16 and hour < 20:
			'The door you opened Artem and invited to enter.'

			act 'Enter':artemhomemark = 1 & gt $curloc
		elseif hour >= 20 or hour < 7:
			'Too late, that would go to visit.'
		end
	elseif week >= 6:
		if hour < 10:
			'Too early time, that would go to visit.'
		elseif hour >= 10 and hour < 20:
			'The door you opened Artem and invited to enter.'

			act 'Enter':artemhomemark = 1 & gt $curloc
		elseif hour >= 20 or hour < 5:
			'Too late, that would go to visit.'
		end
	end
elseif artemhomemark = 1:
	if arthakQW = 1 and artemhakday ! daystart:
		!!tell_a_lie
		DimaRudeBlock = 1
		'Artem tells you "There are no words - well.I was ready to do anything for you .I think after that I saw our relationship will move to another plane. A record pobudet let me - so that your head is not climbed all sorts of nonsense. And now ON KNEES BITCH! Exhaustion - it''s the least you can do that I have not used this entry."Artem very disappointed and angry.It seems he began to despise you.'

		act 'Get on your knees':
			cls
			minut += 5
			bj += 1

			if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

			swallow += 1
			cumlip += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/facefuck.jpg"></center>'
			'After these words, you choke, you are sick and flow snot, tears and saliva, Artem not stand for a long time and ends you right in the throat. You choking convulsively swallow sperm.'

			act 'Breathe':
				cls
				gs 'stat'
				'Artem takes you by the hand and says "I think that this bitch what are you showed not mind to devote my friend into the secrets of the female body." You shakes his head. "Well then .. And if you ''re obedient bitch - I promise - that no one is going to show her and eventually destroy. So do not speak and go."'

				act 'To escape and run away':
					artemblok = 1
					artemhakday = daystart
					artemvbrosvid = 1
					gt 'gorodok'
				end

				act 'Go with Artem':
					cls
					minut += 15
					gs 'stat'
					'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
					'You go to the garage with Artem. In the garage you see Pete Klyueva.'
					'Artem:"Look who I have here. As I promised you <<$name>> kindly agreed to teach us all the secrets of the female body. Anatomy lessons will be held on Mondays. And today''s lesson we will start with the vagina ...!"'
					'Artem:"Stretch ka pussy. I can imagine what else you got up with Nosov!"'

					act 'Spread your lips':
						cls
						minut += 15
						vagina += 3
						gs 'stat'
						'<center><img src="images/qwest/alter/artom/fist.jpg"></center>'
						'Artem :"Here Petruchio see what her capacious pussy. Yes stronger Do not be afraid - I know what you''re capable!"'
						'You stretch even further.'
						'Artem:"And not to be unfounded zasun a hand."'
						'Have you tried but did not get:" Give Vaseline please .Does not work." Artem gets what that oil and throws you "For such a whore ." You lubricate the hands of those that have and shove it in yourself.Oddly but you chustvuete excited that start from these humiliations.'
						'Artem:"That''s how come there -here until the end of!"'
						'You do not have to say anything .'
						'Under the comments guys "Bring it on! come_on!" you end exhausted and lie down on the floor.'

						act 'Open your eyes':
							cls
							minut += 15
							bj += 2

							if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
							if npcSex[6] = 0:npcSex[6] = 1 & guy += 1

							gang += 1
							cumface += 2
							facial += 1
							arthakQW = 10
							artemblok = 1
							gs 'stat'
							'<center><img src="images/qwest/alter/artom/doublebj.jpg"></center>'
							'You open your eyes and see how Peter and Artem surrounded you masturbate their cocks.'
							'Artem:"That stared - Get direct their work - you know how it is good. Petya now you enjoy all the pleasures of professional blow job!"'
							'You remove the hand from the vagina and begins to suck alternately guys and they end up on your face.'
							'Do_You:" You erase record?"'
							'Artem :"Erase ... but not today ... we Petka at you a lot of plans. Do not roar.'
							'It will be our little secret. Fair_Enough - until next week."'

							act 'Leave':gt 'garmassiv'
						end
					end
				end
			end
		end

		act 'To escape and run away':
			artemvbrosvid = 1
			artemblok = 1
			artemhakday = daystart
			gt 'gorodok'
		end
	elseif arthakQW = 2 and artemhakday ! daystart:
		arthakQW = 7
		!!the_truth
		DimaRudeBlock = 1
		'Artem tells you "all, I Rushed comp bow and destroyed records."'
	end

	if artemtimes >= 15 and artQW = 0 and lernHome > 0:artQW = 1 & gt 'artemev2'

	'Artem sits in his room on the bed.'

	if artQW = 2:
		!!took the flowers but not wanker Artem
		artcooldown += 1

		if artcooldown >= 10:artcooldown = 0 & artQW = 1 & gt 'artemev2'
	elseif artQW = 3 and artemkissday ! daystart:
		!!wanker Artem
		'Artem hugs you and kisses'

		act 'Kiss':
			cls
			minut += 5
			horny += 10
			artemkissday = daystart
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
			'You kiss with Artem and his arms around you and caress your breasts'

			if horny < 50:
				if lernHome > 0:
					act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
				else
					act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
				end

				act 'Reluctantly masturbate Artem':
					cls
					sub += 1
					manna = manna / 2
					minut += 15
					hj += 1
					hja += 1

					if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

					gs 'stat'
					'<center><img src="images/qwest/alter/artom/hj.jpg"></center>'
					'You got a reluctant member of Artem of his pants and began to gently move the skin up and down then revealing crimson head then closing it. Artem soon broke down and finished in your hands. You went to the bathroom and washed his hands.'

					if lernHome > 0:
						act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
					else
						act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
					end
				end
			elseif horny >= 50:
				act 'Masturbate Artem':
					cls
					minut += 15
					hj += 1
					hja += 1

					if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

					dom += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/artom/hj.jpg"></center>'
					'You got Artem member of his pants and began to gently move the skin up and down then revealing crimson head then closing it. Artem soon broke down and finished in your hands. You went to the bathroom and washed his hands.'

					if lernHome > 0:
						act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
					else
						act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
					end
				end
			end
		end
	elseif artQW >= 2 and artQW <= 3 and artemtimes >= 30 and Suspeh >= 90:
		artQW = 10
		gt 'artemev2'
	elseif artQW = 4:
		!refused Artem
	elseif artQW = 20 and artemkissday ! daystart:
			'Artem hugs you and kisses'

			act 'Kiss':
				cls
				artemkissday = daystart
				minut += 5
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
				'You kiss with Artem and his arms around you and caress your breasts'

				if horny < 30:
					if lernHome > 0:
						act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
					else
						act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
					end
				elseif horny >= 30:
					act 'Masturbate him':
						cls
						minut += 15
						hj += 1
						hja += 1

						if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

						gs 'stat'
						'<center><img src="images/qwest/alter/artom/hj.jpg"></center>'
						'You got Artem member of his pants and began to gently move the skin up and down then revealing crimson head then closing it. Artem soon broke down and finished in your hands. You went to the bathroom and washed his hands.'

						if lernHome > 0:
							act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
						else
							act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
						end
					end

					act 'Give him a blowjob':
						cls
						minut += 5
						bj += 1
						bja += 1

						if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

						gs 'stat'
						'<center><img src="images/qwest/alter/artom/bj.jpg"></center>'
						'You keep kissing and unbutton the dress so it was convenient .Take it out and put it on his chest. You feel his caresses excite you.'
						'continuing to kiss , you put his hand into his pants and felt his cock is ready to fight. You unbutton his pants and start to unbutton his shirt . You take the hand of his cock and start stroking it .Your excitement is growing with every second you take a cock in her mouth and start sucking vigorously.'
						'"I want you ..." Hear the voice of Artem.'

					if mesec > 0:
						if artemanal > 0:
							'You do not remain isolated for long member said Artem, that you have a monthly, Artem immediately offered you anal.'

							act 'Agree to anal':
								cls
								minut += 15
								anala += 1
								artemanal += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/artom/anal.jpg"></center>'
								'You went to the bathroom and made themselves an enema, then came into the room and undressed Artem got cancer.'
								dynamic $analsexrude

								if lernHome > 0:
									act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
								else
									act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
								end
							end
						elseif artemsex >= 10 and artemanal = 0:
							act 'Tell him that you have your period':
								cls
								minut += 5
								gs 'stat'
								'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
								'You: "I''d love to but I started ... red days.. Well"'
								'Artem blushing and strongly: "Or maybe try in the ass?"'

								act 'Refuse and continue to suck':
									cls
									minut += 5
									swallow += 1
									cumlip += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/artom/bjcum.jpg"></center>'
									'You looked at him wide-eyed "I understand that you are bolder - but not too much you want?I went home."'
									'Artem:"Sorry! Please do not go." He grabs you by the hand and starts to kiss them gradually rising higher. You melts from his kisses kneel and take a cock in her mouth and starts to suck . With one hand. Artem is discharged into your mouth and you will quickly swallow all.'
									'Artem: "Forgive me - I''ll never never talk about it ..."'
									'You: "Well , when I''m ready and in the mood."'


									if lernHome > 0:
										act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
									else
										act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
									end
								end

								act 'Agree':
									cls
									minut += 15
									anala += 1
									artemanal += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/artom/anal.jpg"></center>'
									'You: "Yes, but first you need to clean yourself ... in short it is necessary to do an enema. You have?"'
									'Artem: "Yes."'
									'Artem brings enema .You go to the bathroom and make yourself an enema.'
									'Having come into the room you get cancer and you say:"So now need grease or petroleum jelly -Do you have? Look in the medicine cabinet."'
									dynamic $analsexrude

									if lernHome > 0:
										act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
									else
										act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
									end
								end
							end
						end
					else
						act 'Surrender':
							cls
							minut += 5
							sexa += 1

							if artemsex = 1:artemsex += 1

							gs 'stat'
							'<center><img src="images/qwest/alter/artom/sex.jpg"></center>'
							'You undressed and lay on his back.'
							dynamic $sexstart
							dynamic $sexstart2
							dynamic $sexcum

							if artemsex = 0:
								artemsex = 1
								'"Here you are the man"-Say you smile.'
								'Artem:"<<$nickname>> ... I ... my I love you ...."'
								'In response. '
							end
							if lernHome > 0:
								act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
							else
								act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
							end
						end
					end

					act 'Continue to suck':
						cls
						minut += 5

						if horny < 90:
							$timeorgart = 'In swallow all his sperm and carefully lick dick.'
						elseif horny >= 90:
							horny = 0
							orgasm += 1
							$timeorgart = 'Without removing a member from the mouth you bring themselves to orgasm. During orgasm you swallow all his sperm and carefully lick dick.'
						end

						swallow += 1
						cumlip += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/artom/bjcum.jpg"></center>'
						'You accelerate the pace of not paying attention to the words of one hand caressing herself.'
						'"Now I finish"-Artem said. <<$timeorgart>>'
						'You:"Did you like it?"'
						'Artem:"Very much. It was really cool"'

						if lernHome > 0:
							act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
						else
							act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
						end
					end
				end
			end
		end
	end

	if dimaFilm > 0 and arthakQW = 0 and vagina > 0:
		act 'Ask Artem to steal the video Dimka filmed of you':
			cls
			minut += 15
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
			'You:"Artem we''re more than friends?"'
			'Artem: "Of course."'
			'You: "Could you help me with one simple fact is not? After all, well versed in computers?"'
			'Artem:"Certainly help. tell."'
			'You: "Promise? Well. It stores it on your computer. Could you hack it and destroy this computer record. Just do not see it pozhalusta!"'
			'Artem :"Okay. And that on the record?"'

			act 'Lie':
				cls
				minut += 5
				artemhakday = daystart
				arthakQW = 1
				gs 'stat'
				'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
				'"Yes" you lied.'

				if lernHome > 0:
					act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
				else
					act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
				end
			end

			act 'Tell him the truth':
				cls
				minut += 5
				artemhakday = daystart
				arthakQW = 2
				gs 'stat'
				'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
				'"It seemed to me that I love him and he took off like I''m doing him a blow job - now he is blackmailing me this." you said Artem downcast eyes.'

				if lernHome > 0:
					act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
				else
					act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
				end
			end
		end
	end

	if lernHome > 0:act 'Do homework with Artem':artemhomemark = 2 & gt $curloc

	act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'

	if talkartemday ! daystart:
		act 'Chat with Artem':
			cls
			artemtimes += 1
			talkartemday = daystart
			lern += rand(3, 6)
			intel += rand(1, 2)
			minut += 60
			manna += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/<<2>>.jpg"></center>'
			'You talked for an hour with Artem. Rather you are talking, and Artem listened to your stream of consciousness.'

			act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
		end
	end
elseif artemhomemark = 2:
	minut += 60
	grupNPC[2] += 10
	lernHome = 0
	lern += rand(3, 6)
	intel += rand(1, 2)
	artemtimes += 1

	if ArtemBeInHome = 0:ArtemBeInHome = 1

	gs 'stat'
	'<center><img src="images/qwest/alter/npc/<<2>>.jpg"></center>'
	'Did you do with Artem in under an hour, During this time he helped you with homework and explained something of the studied material.'

	act 'Rest':artemhomemark = 1 & gt $curloc
end

--- artemhome ---------------------------------
# artemev2
gs 'stat'

if artQW = 1:
	'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
	'Artem suddenly gets flowers and presents them to you.'

	act 'Take':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
		'You take the flowers and kisses Artem. Do you feel that-it boils down to you through his pants. "Thank you ." You accidentally running a hand over his crotch and away from it.'
		'Artem blushing: "You are beautiful in different colors." Artem looking into the eyes you see them as much adoration that do not stand up and kiss him. Artem responds to kiss and you feel that his hand begins to caress your breasts.'

		act 'Tell him to stop it':
			cls
			minut += 5
			artQW = 2
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
			'You.:" stop. Not too fast?" Artem blushing removed from you:"Sorry_..."'

			act 'Do homework with Artem':artemhomemark = 2 & gt 'artemhome'
		end

		act 'Enjoy and encourage him':
			cls
			minut += 5
			horny += 20
			artQW = 3
			hj += 1
			hja += 1

			if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

			gs 'stat'
			'<center><img src="images/qwest/alter/artom/cum.jpg"></center>'
			'You keep kissing and unbutton the dress so it was convenient .Take it out and put it on his chest. You feel his caresses excite you.'
			'Continuing to kiss you unbutton his pants and begin to masturbate guy. After several frictions Artem ends of the dress you.'
			'Pulled away from him you say "Well - dress soiled - where you have a bath?" Artem blankly pointed. You took the bag with textbooks buttoned dress and went to the bathroom. Along the way. "Hello." Hiding behind the package you''ve gone to the bathroom. I hope my mother did not notice.'
			'You.: "Let''s deal with."'

			act 'Do homework with Artem':artemhomemark = 2 & gt 'artemhome'
		end
	end

	act 'Do not take':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
		'You''re looking at Artem but do not take flowers "Thank you of course - but we''re just friends and I want to make it so . I can not take them from you - that you had not counted on that-something more."'
		'Artem throws flowers into the trash.'

		act 'Run and pick them up from the trash':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
			'"What are you doing - they are so beautiful!" You got flowers from the bin and burst into tears. Artem came to you knelt down to hug you "Well ... do not cry unnecessarily ..I did not want . I''m just so up..because you are such a ...."He paused and buried his face in your stomach. You . Artem responds to kiss and you feel that his hand begins to caress your breasts.'

			act 'Stop it':
				cls
				minut += 5
				artQW = 2
				gs 'stat'
				'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
				'You.: "Stop. Not too fast?" Artem blushing removed from you:"Sorry_..."'

				act 'Do homework with Artem':artemhomemark = 2 & gt 'artemhome'
			end

			act 'Enjoy and encourage him':
				cls
				minut += 5
				horny += 20
				artQW = 3
				hj += 1
				hja += 1

				if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

				gs 'stat'
				'<center><img src="images/qwest/alter/artom/cum.jpg"></center>'
				'You keep kissing and unbutton the dress so it was convenient .Take it out and put it on his chest. You feel his caresses excite you.'
				'Continuing to kiss you unbutton his pants and begin to masturbate guy. After several frictions Artem ends of the dress you.'
				'Pulled away from him you say "Well - dress soiled - where you have a bath?" Artem blankly pointed. You took the bag with textbooks buttoned dress and went to the bathroom. Along the way. "Hello." Hiding behind the package you''ve gone to the bathroom. I hope my mother did not notice.'
				'You.:"Let''s deal with."'

				act 'Do homework with Artem':artemhomemark = 2 & gt 'artemhome'
			end
		end

		act 'Leave it as it is':
			cls
			minut += 5
			artQW = 4
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
			'You pass silently into the room and say :"Come on."'
			'Artem: "Well ... Come." Have you noticed in his eyes a bad light. Come on - it seemed.'

			act 'Do homework with Artem':artemhomemark = 2 & gt 'artemhome'
		end
	end
elseif artQW = 10:
	minut += 30
	gs 'stat'
	'You see a table - Lighted candles - a bottle of wine. "what is that? And why?"'
	'Artem.:"We have a lot of time dealing with you and we can draw some conclusions. You do not loom poor results - and the gold medal can hold out and I decided to celebrate this modestly."'
	'You. :"Does your mother know ? And wine from? Suddenly?"'
	'Artem.:"Do not go down - my mother went to her friend - and the wine -one gave me herself .... She thinks that we meet ... was very happy for me - especially dry wine - degrees in yogurt, she said, so let''s just sit here - talk - you do not mind?"'
	'You.:"No - do not mind ...."'
	'You are talking about the future - who wants to be someone where to go - from the conversation . You do not notice the bottle is almost empty and hops hit you in the head. You see how shiny Artem eyes when he looks at you. There is a strange silence and he kisses you .You are responsible for a kiss .Artem wants to remove your clothes.'

	act 'Tell him to stop it':
		cls
		minut += 5

		if artQW = 2:artQW = 4
		if artQW = 3:artemtimes = 20

		gs 'stat'
		'<center><img src="images/qwest/alter/artom/2.jpg"></center>'
		'You.: "No need to rush okay?" Artem blushing removed from you:"Sorry_..."'
		'You keep talking as if nothing had happened.'

		act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
	end

	act 'Enjoy':
		cls
		minut += 5
		bj += 1
		bja += 1

		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1

		artQW = 20
		gs 'stat'
		'<center><img src="images/qwest/alter/artom/bj.jpg"></center>'
		'You keep kissing and unbutton the dress so it was convenient .Take it out and put it on his chest. You feel his caresses excite you. Hop hit in the head ( not bad wine -Think you).'
		'continuing to kiss , you put his hand into his pants and felt his cock is ready to fight. You unbutton his pants and start to unbutton his shirt . You take the hand of his cock and start stroking it .Your excitement is growing with every second you take a cock in her mouth and start sucking vigorously.'
		'"I want you ..." Hear the voice of Artem.'

		act 'Surrender':
			cls
			minut += 5
			sexa += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/sex.jpg"></center>'
			'You undressed and lay on his back.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum

			if artemsex = 0:
				artemsex = 1
				'"Here you are the man"-Say you smile.'
				'Artem:"<<$nickname>> ... I ... my I love you ...."'
				'In response. '
			end

			act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
		end

		act 'Continue to suck':
			cls
			minut += 5
			horny = 0
			orgasm += 1
			swallow += 1
			cumlip += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/bjcum.jpg"></center>'
			'You accelerate the pace of not paying attention to the words of one hand caressing herself.'
			'"Now I finish"-Artem said. Without removing a member from the mouth you bring themselves to orgasm. During orgasm you swallow all his sperm and carefully lick dick.'
			'You:"did you like it?"'
			'Artem:"Very much. Not exactly what I wanted but it ''s even better - I could only dream about such a ..."'

			act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
		end
	end
end

--- artemev2 ---------------------------------
# artgar
apmeetday = daystart
gs 'stat'
!'
if apmeet = 5:
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev.'
elseif apmeet = 4:
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev.'
elseif apmeet = 3:
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev.'
elseif apmeet >= 2:
	apmeet = 3
	bj += 1
	throat += 1
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/artom/apmeet3.jpg"></center>'
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev drinking beer. presenting, that you will be up, Do_You, nonetheless, dutifully undressed in front of the guys before the goal and took a pose on her knees before 10 liter bucket. You blindfolded. Your body was covered with goose bumps, You start to shiver in anticipation of the upcoming action. here Peter , astraddle, stood over a bucket in front of your face . While he was pulling on the penis condom and watered it with vegetable oil from a bottle, Artem has got you behind your head with your hands. You were ordered to open his mouth wide, started... It was not the blow. Peter just fucked you deep throat. You poked away tongue and holding her mouth wide open, choked by walking on the throat of the male member in a condom. oiled, sexual organ is easy to slide on taut throat . Eggs Petka relish spanked on your chin, When his cock was buried in the throat. Peter gripped by the ears and rhythmically deeply skewer your mouth on his penis. The most terrible thing in this was, what do you, being completely sober, well aware , that you guys get up to your class, but did not know how to stop this mockery of a humiliating and treacherous starts to flow from it all. all, What could I do - so it, give their classmates plenty to enjoy your body, while meeting their absolutely wild ideas...'
end
'!

if apmeet >= 1:
	!!apmeet = 2
	vagina += 2
	minut += 60
	'<center><img src="images/qwest/alter/artom/apmeet2.jpg"></center>'
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev.'
	'"We thought that we would like to see. We decided to see how you fuck yourself bottle. And do not make round eyes - we know that it has brought you ALREADY. Beginners and that without hands."'
	'You looked at a bottle of beer standing in the middle of the garage. Yes you thought nedomerki yet perversely Gopnik - hunger presses. You sat down on a bottle - Sights and neck came into you is very easy - and you really flowed .You started to squat on the bottle almost forcing it to yourself - just a little bit and you''re finished .Do not stay on his feet to the floor vyupali -Bottle left to wallow in your legs. "I''m looking beer bottle have in it do not hold - as well that we still have?" You saw how Artem with Peter come up to you and turn to the top of the booty .'

	act 'Get on all fours':
		cls
		anal += 5
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/artom/analbotle.jpg"></center>'
		'Artem takes what that bottle of lubricant inserts in back neck and squeezes. And then apply this grease fingers and sticks you in the ass .Gradually he razdrachivaet you point. " Well ka Petruchio pull it from the other side!" Peter smears fingers and inserts two fingers of the other hand - they stretch your point in different directions gradually adding fingers and grease.You have tears rolling from pain and humiliation. "Wash enough." Artem takes wine bottle plaster it with grease:"Come on itself - to surprise us- bottomed inside."You hardly have inserted a bottle . Guys applauded came to you " Now suck !"'

		act 'Suck':
			cls
			minut += 15

			if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
			if npcSex[6] = 0:npcSex[6] = 1 & guy += 1

			gang += 1
			cumface += 2
			facial += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artom/doublebj2.jpg"></center>'
			'You started to suck their members with a bottle in the ass . Nerdy finished your face - but you already do not care "I think that all the taboos removed ."-said Artem.'
			'"Thank you for the show - and to meet following Manufacture!" with sound "FERВ" you pulled from a bottle.'
			'You have come as something brought myself up and went home on the road wondering how to get out of this situation and that all fantasy perversion. What to do? Can return blackmail? And that is the idea! It should be good to think things through.'

			act 'Leave':gt 'garmassiv'
		end
	end
elseif apmeet = 0:
	apmeet = 1
	vagina += 5
	horny = 0
	orgasm += 1
	minut += 60
	'<center><img src="images/qwest/alter/artom/apmeet1.jpg"></center>'
	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev.'
	'Artem: "Well .I was thinking how uncomfortable all consider when you close all hands and brought one little thing." It gives you an expander:" I understand that just so uncomfortable - so to start masturbate themselves."You start to fondle himself gradually being raised. "In my opinion sufficient time to introduce this Thing. "You licked extender and inserted it into my pussy.'
	'Extending to a maximum. The boys opened their mouths in surprise and there poodnomu zagyanuli. In your head is not clear what''s going on - bring your thoughts orgasm - you are such a slut in front of what that nerds are sitting with an open vagina and they treat you. "Now look carefully Petka - seen in porn. It''s uterus and take ..."Do you feel that the uterus is that you put in - you open your eyes and see what sticks out in your brush and at this point you already covers orgasm you can not hear anything that says Artem : "You see she had finished I pull out the brush and spreader - about what a beauty ..." Do you feel a breeze - the vagina does not close completely. '

	act 'Lay down':
		cls
		minut += 15

		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
		if npcSex[6] = 0:npcSex[6] = 1 & guy += 1

		gang += 1
		cumface += 2
		facial += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artom/facial.jpg"></center>'
		'The boys begin to masturbate hard and end up on your face. "What a lesson for today is over - Petruchio think what else to do or would like to - I think we will not deny <<$nickname>>. The_Truth?"'
		'You do not nod your head wondering "oh well?"'

		act 'Leave':gt 'garmassiv'
	end
end

gs 'stat'

--- artgar ---------------------------------
# katjaEv
$din_katja_kiss = {
	act 'Kiss':
		cls
		minut += 5
		manna += 100
		horny += 10
		KatjaHorny += 10

		if katjaFirstKiss = 0:
			katjaFirstKiss = 1
			KatjaLust = 10
			KatjaSlut = 10
			KatjaDom = 50
			KatjaOTN = 1
		end

		gs 'stat'
		gs 'katjaEvDin'
		gs 'KatjaHomeDin'
		'<center><img src="images/qwest/alter/katja/kiss.jpg"></center>'
		'You brought her face to face Katie and felt her hot breath on his lips. Katja closed her eyes and touched his lips to your lips. In your mouth penetrated nimble tongue Katie that you started to suck, then your tongue went into Katin''s mouth and she very gently caressed it with his tongue and sucked. Katja finally pushed you to your flushed face and licked her lips.'

		if KatjaHorny >= 75:
			'Katja handed his pen to your chest and gently held her finger on.'

			act 'touch the chest':
				cls
				minut += 5
				horny += 10
				KatjaHorny += 10
				KatjaLust += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/katja/touch.jpg"></center>'
				'You touched the tender breast and Katja and she sighed deeply biting her lip.'
				katjalustrand = rand(0, 30)

				if KatjaLust < katjalustrand:
					'You''re a little touched each other breast and Katia moved away from you.'

					act 'Further':gt 'KatjaHomeTalk'

					if dom > 0:
						act 'grab her':
							cls
							minut += 5
							horny += 10
							dom -= 1
							KatjaDom -= 5
							KatjaHorny -= 10
							KatjaLust += 1
							gs 'stat'
							'<center><img src="images/qwest/alter/katja/grab.jpg"></center>'
							'You grabbed Katja without letting it wriggle.'

							if dom < KatjaDom:
								'Katja firmly took your hands and took them away, giving you understand that you have already completed.'

								act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
							else
								'Katja froze in your hands while you stroked her body and kissed her neck.'

								act 'Licking her breast':
									cls
									minut += 5
									horny += 10
									KatjaDom -= 1
									KatjaHorny += 10
									KatjaLust += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/katja/tits.jpg"></center>'
									'You got not big but firm breasts Katja from under their clothes and began to lick his tongue. Katja closed her eyes in pleasure and bit her lip.'

									if npcSex[14] = 0:
										'After a while Katja cleaned your hands away.'

										act 'Further':gt 'KatjaHomeTalk'
									elseif npcSex[14] > 0:
										dynamic $d_katja_sex
									end
								end
							end
						end
					end
				else
					'Katja started stronger stroking your chest and you feel as it removes your bra trying to get to your breasts.'

					act 'Let her':
						cls
						minut += 5
						horny += 10
						KatjaDom += 1
						KatjaHorny += 10
						KatjaLust += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/tits.jpg"></center>'
						'Katja bared your breasts and touched her with his fingers, then she bowed her head and began to lick your nipple.'

						if npcSex[14] = 0:
							'Lick your breasts while Katja stood up and turned to start cleaning the room.'

							act 'Further':gt 'KatjaHomeTalk'
						elseif npcSex[14] > 0:
							dynamic $d_katja_sex
						end
					end

					act 'Remove her hands':
						cls
						dom += 1
						minut += 5
						horny += 10
						KatjaDom -= 1
						KatjaHorny -= 10
						KatjaLust += 1
						gs 'stat'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
						'You removed her hands and smiled Katja fun.'

						act 'Further':gt 'KatjaHomeTalk'
					end
				end
			end
		else
			'Katja turned and began to collect books pretending that nothing had happened.'

			act 'Say goodbye and go home':gt 'gorodok'
		end
	end
}

katjaMeynoldday = day
gs 'stat'
gs 'KatjaHomeDin'
gs 'katjaEvDin'
'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
'Katja looks at you smiling. "<<$name>>, come to me, with the lessons learned."'

if fedorKozlovQW >= 10:'To you and Katja suitable Fedor. "Hi girls, that up to?" Katja said embarrassed "Here we want to go teach lessons together." Fedor much thought and said "Okay. Then before the meeting." Then turned and walked away.'

act 'Say goodbye and go home':gt 'gorodok'

act 'Go with Katja':
	cls
	minut += 15
	manna += 100
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
	! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
	'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	'You walk down the streets of the town, along with Katja to her house. You are chatting together about all sorts of trivia and fun.'

	if albinaQWdance > 0 and AlbinaBlokDance = 0:'Katja keen interest how are you doing with Zvezdushkami. In her opinion it is a very private team in a variety of rumors roam about Albina team.'
	if kotovLoveQW > 0:'Katja asks you about your relationship with Victor Kotov, simultaneously expressing opinion about it. According to her Witek rude and he is a true gangster.'

	if pirsA = 1 and KatjaKnowPirsA = 0:
		KatjaKnowPirsA = 1
		KatjaLust += 5
		'Kate noticed you have a pierced tongue and chattered all the way to finding out you details.'
	end

	'Finally you come to her house. Detached two storey house with attached garages and quite a large garden gives the impression of grooming and order. Katja shows you the way to your room'

	act 'Walk into a room Katja':
		cls
		minut += 15
		manna += 100
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'The room Katja did not quite clean and circle are her things. Katja throws her to the floor and ryukzachek lacking textbooks and notebooks.'

		act 'Engage with Katja':
			cls
			minut += 30
			grupNPC[14] += 10
			lernHome = 0
			lern += rand(2, 4)
			intel += rand(0, 1)
			katjaLernTimes += 1
			gs 'stat'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
			'For half an hour that you do with Katja you fully learned the lessons and pretty well understood the materials.'

			if katjaLernTimes >= 10:
				katjaLernQW += 1

				if katjaLernQW < 5:
					katrand = rand(0, 3)

					if katrand = 0:'You notice that Katja stares you in the face, as if he wants, that is to ask, but turns away.'
					if katrand = 1:'You notice that Katja blushed and turned away from you.'
					if katrand = 2:'Katja as if by accident puts his palm on your knee, then quickly removes it.'
					if katrand = 3:'Katja smiles at you quite a silly smile, then turns away.'
				elseif katjaLernQW = 5:
					'Katja thinks about something, then embarrassed and blushing asks you "<<$name>>, and you have kissed a boy?"'

					act 'Yes':
						cls
						gs 'stat'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
						'You smiled at Katja and said that of course you kissing boys. Katja shy even more. "You see the <<$name>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Could you teach me how to kiss?"'
						dynamic $din_katja_kiss

						act 'No':
							cls
							katjaLernQW = 0
							katjaLernTimes = 1
							gs 'stat'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
							'You refused to kiss with Katja and she was mad at you.'

							act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
						end
					end

					act 'No':
						cls
						gs 'stat'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
						'You shook their heads and said they did not kiss. Katja shy even more. "You see the <<$name>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Maybe we could try to kiss, what to learn?"'
						dynamic $din_katja_kiss

						act 'No':
							cls
							katjaLernQW = 0
							katjaLernTimes = 1
							gs 'stat'
							! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc14.jpg"></center>'
							'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
							'You refused to kiss with Katja and she was mad at you.'
							act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
						end
					end

					exit
				elseif katjaLernQW >= 6:
					katjaDeystRand = rand(0, 2)

					if katjaDeystRand = 0:
						dynamic $d_katjahornykiss

						act 'Say goodbye and go home':minut += 15 & KatjaHorny -= 5 & gt 'gorodok'

						exit
					elseif katjaDeystRand = 1:
						if npcSex[14] = 1:
							'Katja invited you to take a walk in the park.'

							act 'Go to the park':
								minut += 15
								KatjaHorny += 5
								$ev_name = 'Katja'
								$ev_name_a= 'Katja'
								$ev_name_om = 'Katja'
								dick = 0
								place = 1
								Frend_num = 14
								p_lust = KatjaLust
								p_slut = KatjaSlut
								p_dom = KatjaDom
								p_horny = KatjaHorny
								p_alko = 0
								gt 'placer'
							end

							act 'And refuse to go home':minut += 15 & KatjaHorny -= 5 & gt 'gorodok'

							exit
						elseif npcSex[14] = 0:
							KatjaHorny += 5
							KatjaLust += 1
							'Katja started chatting about boys, cosmetics and school with you.'

							act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
						end
					elseif katjaDeystRand = 2 and sweat > 0:
						'Katja wrinkled her nose "<<$name>>, you''re all sweaty, go to the shower?"'

						act 'Go to the shower':
							cls
							minut += 15
							gs 'stat'

							if KatjaHorny >= 50:
								'Katja held you in the shower. She blushed and said "I, Come join Pomo."'

								act 'one wash':
									cls
									dynamic $showerdin
									minut += 15
									horny += 1
									hapri = 1
									mop = 1
									sweat = -3

									if frost > 0:frost = 0

									gs 'stat'
									'<center><img src="images/pics/dush.jpg" ></center>'
									'You kicked out of the shower and Katja closed the door. You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

									act 'Get out of the shower':
										cls
										gs 'stat'
										'<center><img src="images/qwest/alter/npc/14.jpg" ></center>'
										'You came out of the shower and walked into the room to Katja. You have chatted and Katja said, what she was doing.'

										act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
									end
								end

								act 'bathe together':
									cls
									dynamic $showerdin
									minut += 15
									horny += 1
									hapri = 1
									mop = 1
									sweat = -3

									if frost > 0:frost = 0

									horny += 10
									KatjaHorny += 10
									KatjaLust += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/katja/shower.jpg" ></center>'
									'You undressed and climbed together with Katja in the shower.'

									if lobok <= 0:
										'Katja eyes slid over your body a little lingering on your breasts and pussy. Katja took a shower together and you became watered.'

										act 'further':
											cls
											gs 'stat'
											'<center><img src="images/qwest/alter/katja/shower2.jpg" ></center>'
											'Katja gently shampooed you gel and rinse with warm shower jets.'

											if KatjaLust >= 10 and KatjaHorny >= 90:
												'Katja washed with soap your pussy and breasts gentle stroking his little palms. Her cheeks were flushed and her eyes glistened.'
												dynamic $katja_shower_kiss
											else
												'Katja finally finished and you wash herself pomylas.'

												act 'Get out of the shower':
													cls
													gs 'stat'
													'<center><img src="images/qwest/alter/npc/14.jpg" ></center>'
													'You came out of the shower and walked into the room to Katja. You have chatted and Katja said, what she was doing.'

													act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
												end
											end
										end
									elseif lobok > 0:
										'Katja eyes slid over your body a little lingering on her breasts and pubic hair. Katja smiled "<<$name>>, you got such vegetation, it is no longer fashionable, I''ll let sbreyu hair."'

										act 'Shave the hair between her legs':
											cls
											minut += 5
											lobok =- 3
											KatjaHorny += 10
											KatjaLust += 1
											gs 'stat'
											'<center><img src="images/qwest/alter/katja/lobok.jpg" ></center>'
											'Katja sat in the bathroom and you lathered your crotch passing lathered his stomach and chest. She took a razor and began to gently shave your hairs between her legs.'

											if KatjaLust >= 10 and KatjaHorny >= 90:
												'Katja washed with soap your pussy and breasts gentle stroking his little palms. Her cheeks were flushed and her eyes glistened.'
												dynamic $katja_shower_kiss
											else
												'Katja finally shaved all your hair between her legs and began to wash off with soap you.'

												act 'Get out of the shower':
													cls
													gs 'stat'
													'<center><img src="images/qwest/alter/npc/14.jpg" ></center>'
													'You came out of the shower and walked into the room to Katja. You have chatted and Katja said, what she was doing.'

													act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
												end
											end
										end
									end
								end
							elseif KatjaHorny < 50:
								dynamic $showerdin
								minut += 15
								horny += 1
								hapri = 1
								mop = 1
								sweat = -3

								if frost > 0:frost = 0

								gs 'stat'
								'<center><img src="images/pics/dush.jpg" ></center>'
								'Katja showed you where the toiletries and came out of the shower. You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

								act 'Get out of the shower':
									cls
									gs 'stat'
									'<center><img src="images/qwest/alter/npc/14.jpg" ></center>'
									'You came out of the shower and walked into the room to Katja. You have chatted and Katja said, what she was doing.'
									act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
								end
							end
						end

						act 'And refuse to go home':minut += 15 & KatjaHorny -= 5 & gt 'gorodok'

						exit
					elseif katjaDeystRand = 2 and sweat <= 0:
						dynamic $d_katjaSextalk
						exit
					end
				end
			end

			act 'Say goodbye and go home':minut += 15 & gt 'gorodok'
		end
	end
end

--- katjaEv ---------------------------------
# katjaEvDin
$katja_shower_kiss = {
	cls
	horny += 10
	KatjaLust += 10
	KatjaSlut += 1
	KatjaHorny += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/katja/showerkiss.jpg"></center>'
	'Katja gently hugged you with one hand and kissed him on the lips, you feel her soft palm lay naked on your pubis and her thin finger fingering your clitoris began to caress him.'

	if KatjaSlut >= 10:
		'Katja gently, but firmly puts you on the edge of the tub.'
	elseif KatjaSlut < 10:
		'Katja gently caresses your clitoris with your fingers and her lips begin to kiss your neck, wading all below.'
	end

	act 'Sit on the edge of the tub':
		cls
		minut += 5
		horny += 10
		KatjaHorny -= 10
		KatjaLust += 1
		KatjaSlut += 1

		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5

		lesbian += 1
		orgasm += 1
		horny = 0
		gs 'stat'
		'<center><img src="images/qwest/alter/katja/showersex.jpg"></center>'
		'You sat on the edge of the tub and pushed open his feet wet pussy. Katja vsala on his knees in front of you and gently licked your swollen red petals. Her tongue began briskly caress your pussy do not forget about the clitoris. Soon bliss enveloped your entire body. Have you noticed how Katie sklznula hand between her legs and began to move there. Suddenly you covered powerful orgasm from kotorgo you almost lose consciousness, your whole body bends in convulsions and hot wave blazhnstva cover you.'

		act 'Say goodbye and go home':gt 'gorodok'
	end

	act 'Remove her hands':
		cls
		dom += 1
		minut += 5
		horny += 10
		KatjaDom -= 1
		KatjaHorny -= 10
		KatjaLust += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'You have removed her hands and smiled Katja fun. You domylis Katja shyly looked away and left the bathroom.'

		act 'Say goodbye and go home':gt 'gorodok'
	end
}

$d_katja_sex = {
	act 'relax':
		cls

		if horny < 50:horny = 50

		gs 'stat'

		if KatjaSlut >= 20:
			KatjaSlut += 1
			'Katja put her pen between your legs and you become easily compress your small lips.'
			dynamic $d_katja_kuni_p
		else
			KatjaLust += 1
			'Katja embarrassed and pulled away from you.'

			act 'Say goodbye and go home':gt 'gorodok'
		end
	end

	act 'Katja touch between her legs ':
		cls

		if horny < 50:horny = 50

		gs 'stat'

		if KatjaSlut >= 20:
			KatjaSlut += 1
			KatjaLust += 1
			'You put your hand between her legs Katja feeling her hot and wet pussy under panties.'
			dynamic $d_katja_kuni
		else
			if dom > 0:
				KatjaSlut += 1
				KatjaLust += 1
				'You put your hand between her legs Katja feeling her hot and wet pussy under panties.'
				dynamic $d_katja_kuni
			else
				KatjaSlut += 1
				KatjaLust += 1
				'Katja embarrassed and clean your hands.'

				act 'Say goodbye and go home':gt 'gorodok'
			end
		end
	end
}

$d_katja_kuni = {
	act 'Katja licking':
		cls
		KatjaSlut += 1
		KatjaLust += 1
		lesbian += 1
		KatjaHorny = 0

		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5

		gs 'stat'
		'<center><img src="images/qwest/alter/katja/kuni2.jpg"></center>'
		'You leaned Katja between his legs and began to lick her pussy, Katja moaned and closed her eyes enjoying your tongue, after a while Katja shivered and her pussy start to contract rhythmically, Katja clutched in your hair and not holding back moaning. Then she pushed your head away from you.'

		if horny >= 50:
			'Katja smiled at you "It was great <<$name>>, Spread your legs."'
			dynamic $d_katja_kuni_p
		else
			act 'Say goodbye and go home':gt 'gorodok'
		end
	end
}

$d_katja_kuni_p = {
	act 'spread her legs':
		cls
		KatjaSlut += 1
		KatjaLust += 1
		lesbian += 1
		orgasm += 1
		horny = 0

		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5

		gs 'stat'
		'<center><img src="images/qwest/alter/katja/kuni.jpg"></center>'
		'Katja bowed her head between your legs and you felt something like her tongue began to slide on your clitoris, You captured a pleasant bliss. After a while a nice fire in the bottom zhivyota sterpimy not become clogged and you''re in the throes of orgasm, after a while the feeling became too painful and you moved away from Katie.'

		if KatjaHorny > 0:
			'Katja smiled at you "It was great <<$name>>, come on now you tell me."'
			dynamic $d_katja_kuni
		else
			act 'Say goodbye and go home':gt 'gorodok'
		end
	end
}

--- katjaEvDin ---------------------------------
# KatjaHome
gs 'stat'

if hour >= 17 and week < 6 and kanikuli = 0 and hour < 20 or hour >= 9 and week >= 6 and kanikuli = 0 and hour < 20 or hour >= 9 and kanikuli > 0 and hour < 20:
	'The door opened to you mom Katja "Hello World. Kate is now in her room. Come."'

	act 'Go into the room Katja':gt 'KatjaHomeTalk'
else
	if hour >= 9:'The door opened to you mom Katja "oh, hello World. And Katja is not at home."'
	if hour < 9:'The door opened to you mom Katja "<<$name>>. Night Street, come no earlier than nine."'

	act 'Say goodbye and go home':gt 'gorodok'
end

--- KatjaHome ---------------------------------
# KatjaHomeTalk
gs 'KatjaHomeDin'
gs 'stat'
'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/14.jpg"></center>'

if sweat > 0:
	'Katja wrinkled her nose "<<$name>>, you''re all sweaty, go to the shower?"'

	act 'Go to the shower':
		cls
		minut += 15
		gs 'stat'

		if KatjaHorny >= 50:
			'Katja held you in the shower. She blushed and said "I, Come join Pomo."'

			act 'one wash':
				cls
				dynamic $showerdin
				minut += 15
				horny += 1
				hapri = 1
				mop = 1
				sweat = -3

				if frost > 0:frost = 0

				gs 'stat'
				! WD: Correct Image path ~ "images/dush.jpg"
				'<center><img src="images/pics/dush.jpg"></center>'
				'You kicked out of the shower and Katja closed the door. You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

				act 'Get out of the shower':gt $curloc
			end

			act 'Bathe together':
				cls
				dynamic $showerdin
				minut += 15
				horny += 1
				hapri = 1
				mop = 1
				sweat = -3

				if frost > 0:frost = 0

				horny += 10
				KatjaHorny += 10
				KatjaLust += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/katja/shower.jpg"></center>'
				'You undressed and climbed together with Katja in the shower.'

				if lobok <= 0:
					'Katja eyes slid over your body a little lingering on your breasts and pussy. Katja took a shower together and you became watered.'

					act 'further':
						cls
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/shower2.jpg"></center>'
						'Katja gently shampooed you gel and rinse with warm shower jets.'

						if KatjaLust >= 10 and KatjaHorny >= 90:
							'Katja washed with soap your pussy and breasts gentle stroking his little palms. Her cheeks were flushed and her eyes glistened.'
							dynamic $katja_shower_kiss_home
						else
							'Katja finally finished and you wash herself pomylas.'

							act 'Get out of the shower':gt $curloc
						end
					end
				elseif lobok > 0:
					'Katja eyes slid over your body a little lingering on her breasts and pubic hair. Katja smiled "<<$name>>, you got such vegetation, it is no longer fashionable, I''ll let sbreyu hair."'

					act 'Shave the hair between her legs ':
						cls
						minut += 5
						lobok = -3
						KatjaHorny += 10
						KatjaLust += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/lobok.jpg"></center>'
						'Katja sat in the bathroom and you lathered your crotch passing lathered his stomach and chest. She took a razor and began to gently shave your hairs between her legs.'

						if KatjaLust >= 10 and KatjaHorny >= 90:
							'Katja washed with soap your pussy and breasts gentle stroking his little palms. Her cheeks were flushed and her eyes glistened.'
							dynamic $katja_shower_kiss_home
						else
							'Katja finally shaved all your hair between her legs and began to wash off with soap you.'

							act 'Get out of the shower':gt $curloc
						end
					end
				end
			end
		elseif KatjaHorny < 50:
			dynamic $showerdin
			minut += 15
			horny += 1
			hapri = 1
			mop = 1
			sweat = -3

			if frost > 0:frost = 0

			gs 'stat'
			'<center><img src="images/pics/dush.jpg"></center>'
			'Katja showed you where the toiletries and came out of the shower. You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

			act 'Get out of the shower':gt $curloc
		end
	end
else
	!!not sweaty
	if hour < 20:
		act 'Chat with Katja':
			cls
			KatjaHorny += 1
			!KatjaLust += 1
			!if npcSex[14] = 1:
			minut += 15
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
			'<center><img src="images/qwest/alter/npc/14.jpg"></center>'

			if katjaPreg = 0 or knowKatjaPreg >= 1:
				if KatjaHorny < 50:'Katka talks about the lessons, cosmetics, the latest fashion trends in clothing and other very important things.'

				if KatjaHorny >= 50:
					dynamic $d_katjaSextalk
					exit
				end
			elseif katjaPreg > 0 and knowKatjaPreg = 0:
				if knowKatjaPreg = 0:
					'Katja biting her lip without looking you in the eye, Finally typed determination and says "<<$name>>, i am pregnant."'

					act 'From whom?':
						cls
						minut += 5
						knowKatjaPreg = 1
						gs 'stat'
						'You asked dumbfounded "from." Katja wrinkled her nose, "Santa Claus! Yes by Voinov, I was with him at the Christmas party school slept. And flew. Jesus, what to do now that?"'

						act 'I have no idea':gt $curloc
					end
				else
					''
				end
			end

			act 'further':gt $curloc
		end

		if KatjaLust > 10:
			katkisrand = rand(0, 5)

			if katkisrand = 0:
				cls
				gs 'stat'
				'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[14]>></font></b></center>'
				'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
				dynamic $d_katjahornykiss
			end
		end
	elseif hour >= 20:
		'Katja says, she wants to go to the disco.'

		if money >= 25:act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
	end
end

act 'Say goodbye and go home':gt 'gorodok'

--- KatjaHomeTalk ---------------------------------
# KatjaHomeDin
$katja_shower_kiss_home = {
	cls
	horny += 10
	KatjaLust += 10
	KatjaSlut += 1
	KatjaHorny += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/katja/showerkiss.jpg"></center>'
	'Katja gently hugged you with one hand and kissed him on the lips, you feel her soft palm lay naked on your pubis and her thin finger fingering your clitoris began to caress him.'

	if KatjaSlut >= 10:
		'Katja gently, but firmly puts you on the edge of the tub.'
	elseif KatjaSlut < 10:
		'Katja gently caresses your clitoris with your fingers and her lips begin to kiss your neck, wading all below.'
	end

	act 'Sit on the edge of the tub':
		cls
		minut += 5
		horny += 10
		KatjaHorny -= 10
		KatjaLust += 1
		KatjaSlut += 1

		if npcSex[14] = 0:npcSex[14] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5

		lesbian += 1
		orgasm += 1
		horny = 0
		gs 'stat'
		'<center><img src="images/qwest/alter/katja/showersex.jpg"></center>'
		'You sat on the edge of the tub and pushed open his feet wet pussy. Katja vsala on his knees in front of you and gently licked your swollen red petals. Her tongue began briskly caress your pussy do not forget about the clitoris. Soon bliss enveloped your entire body. Have you noticed how Katja sklznula hand between her legs and began to move there. Suddenly you covered powerful orgasm from kotorgo you almost lose consciousness, your whole body bends in convulsions and hot wave blazhnstva cover you.'

		act 'Get out of the shower':gt $curloc
	end

	act 'Remove her hands':
		cls
		dom += 1
		minut += 5
		horny += 10
		KatjaDom -= 1
		KatjaHorny -= 10
		KatjaLust += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'You have removed her hands and smiled Katja fun. You domylis Katja shyly looked away and left the bathroom.'

		act 'Get out of the shower':gt $curloc
	end
}

$d_katjaSextalk = {
	'Reddened Katja looks at you thoughtfully.'
	kattalkrand = rand(0, 3)

	if kattalkrand = 0:
		if KatjaKnowBJ > 0:
			'- <<$name>>, tell, how are you sucking dick.'
		elseif KatjaKnowBJ = 0:
			'- <<$name>>, and you took in the mouth guys?'
		end

		if bj > 0:
			act 'Tell how you were doing blowjob':
				cls
				KatjaLust += 5
				KatjaHorny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
				'You told Katja how you suck dick and that it felt. Katja blushed and bit her lip.'

				act 'further':minut += 15 & gt 'KatjaHomeTalk'
			end
		end
	elseif kattalkrand = 1:
		if KatjaKnowSex > 0:
			'- <<$name>>, tell, how you fucked.'
		elseif KatjaKnowSex = 0:
			'- <<$name>>, and you have fucked guys?'
		end

		if sex > 0:
			act 'Share how you have sex':
				cls
				KatjaLust += 5
				KatjaHorny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
				'Did you tell Katja you were having sex and that it felt. Katja blushed and bit her lip.'

				act 'further':minut += 15 & gt 'KatjaHomeTalk'
			end
		end
	elseif kattalkrand = 2:
		if KatjaKnowAnal > 0:
			'- <<$name>>, tell, how you took in the ass.'
		elseif KatjaKnowAnal = 0:
			'- <<$name>>, and gave you guys in the ass?'
		end

		if anal > 0:
			act 'Tell how you gave in the ass':
				cls
				KatjaLust += 5
				KatjaHorny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
				'You told Katja as you gave in the ass and that it felt. Katja blushed and bit her lip.'

				act 'further':minut += 15 & gt 'KatjaHomeTalk'
			end
		end
	elseif kattalkrand = 3:
		if KatjaKnowMastr > 0:
			'- <<$name>>, tell, as you mastrubiruesh.'
		elseif KatjaKnowMastr = 0:
			'- <<$name>>, and you mastrubiruesh?'
		end

		if mastr > 0:
			act 'Tell how you masturbate':
				cls
				KatjaLust += 5
				KatjaHorny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
				'You told Katja how you masturbate in the bathroom. Katja blushed and bit her lip.'

				if KatjaMastr = 0:
					act 'further':minut += 15 & gt 'KatjaHomeTalk'
				elseif KatjaMastr > 0:
					act 'further':
						cls
						KatjaLust += 5
						KatjaHorny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/katja/mastr.jpg"></center>'
						'Katja told, it also mastrubiruet, right there in the room fondling herself between her legs.'

						act 'further':minut += 15 & gt 'KatjaHomeTalk'
					end
				end
			end

			if SelfFisting > 0:
				act 'Tell yourself you are stuck his fist in the ass':
					cls
					KatjaLust += 10
					KatjaHorny += 20

					if SelfFistingKnow = 0:SelfFistingKnow = 1

					gs 'stat'
					'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
					'You told Katja how you masturbate her ass and even managed to stretch it so, that there can shove a fist. Katja blushed and bit her lip.'

					act 'further':minut += 15 & gt 'KatjaHomeTalk'
				end
			end
		end
	end

	act 'Refuse to talk on such topics':
		cls
		dom += 1
		KatjaDom -= 1
		gs 'stat'
		'You refused to speak with Katja on such topics. Katja was confused and looked down "Sorry, <<$name>>, I did not want to hurt you."'

		act 'further':minut += 15 & gt 'KatjaHomeTalk'
	end
}

$d_katjahornykiss = {
	'Katia brought his face to your, like_this, that you could feel her hot breath on her skin.'

	act 'Bring your face close to hers':
		cls
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
		'You, to face Katja.'

		if KatjaHorny < 50:
			katjarand = rand(0, 50)

			if katjarand <= KatjaHorny + dom:
				dynamic $din_katja_kiss
			else
				KatjaHorny += 5
				'Katja giggled and pushed his face away from your.'

				act 'further':minut += 15 & gt 'KatjaHomeTalk'

				if dom > 0:
					act 'Seize face Katja':
						cls
						dom -= 1
						KatjaDom -= 5
						KatjaHorny -= 10
						KatjaLust += 1
						gs 'stat'
						'You wrapped around the face with his hands and Katja have brought his lips to hers.'

						if dom < KatjaDom:
							'Katja firmly took your hand and remove them from themselves, allowing you to understand, that it does not intend to kiss.'

							act 'further':minut += 15 & gt 'KatjaHomeTalk'
						else
							'Katja stopped looking into your eyes.'
							dynamic $din_katja_kiss
						end
					end
				end
			end
		elseif KatjaHorny >= 50:
			dynamic $din_katja_kiss
		end
	end
}

--- KatjaHomeDin ---------------------------------
# famdorfride
hour = 12
minut = 0
gs 'stat'
minut += 60
gs 'stat'
'You got into the Volga and an hour reached the village in which they live Gadyukino your grandparents.'

act 'Going into the house':gt 'Gadhouse'

--- famdorfride ---------------------------------
# farmhomeride
hour = 20
minut = 0
gs 'stat'
minut += 60
gs 'stat'
'You got into the Volga River with his family and an hour reached the town.'

act 'Go home':gt 'korrPar'

--- farmhomeride ---------------------------------
# Gadhouse
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
'<center><H4>Cottage</H4></center>'
'<center><img src="images/qwest/gadukino/izba.jpg"></center>'
'Simple village hut. In a small room is <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">cupboard</a> and <a href="exec:gt ''bedPar''">bed</a> where you can sleep. In a large room is <a href="exec:gt ''tvPar''">tv_set</a>. TV stands next to an ancient <a href="exec:gt ''mirror'', ''start''">trellis</a>'
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

act 'Go outside':minut += 5 & gt 'Gaddvor'

act 'Eat':
	cla
	*clr
	frost = 0
	minut += 30
	health += 10
	manna += 20
	wipo += 5
	salo += 1
	gs 'stat'
	'<center><img src="images/pics/food.jpg"></center>'

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		!!fat = fat + 1
		'You gladly ate cooked food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	elseif water < 20:
		water += 20
		'You gladly drank a cup of tea.'
	end

	gs 'stat'

	act 'Get up from the table':gt $locM, $metkaM
end

dynamic $d_read_book

if indorf = 1:
	'The room resting parents.'

	if week = 7:
		if hour >= 20:gt 'farmhomeride'
	end
end

if monthbabkapay ! month:
	monthbabkapay = month
	money += 2000
	gs 'stat'
	'Grandma gives you two thousand.'
end

--- Gadhouse ---------------------------------
# Gaddvor
$metka = $ARGS[0]
$loc = $CURLOC
'<center><h4>Yard</h4></center>'
'<center><img src="images/qwest/gadukino/dvor.jpg"></center>'
'Yard with Seat, hut and outbuildings enclosed fence.'
clr
gs 'stat'
gs 'time'

act 'Going into the house':minut += 5 & gt 'Gadhouse'
act 'Go to the barn':minut += 5 & gt 'Gadsarai'
act 'Go to the bath':minut += 5 & gt 'Gadbana'
act '<b>Go to the village</b>':minut += 5 & gt 'gadukino'

if hour >= 17 and hour < 20:
	if mitkaday!daystart:'Not far from the hut shies <a href="exec:gt ''mitka''">Mitka kingpin</a>'
elseif hour >= 20:
	'Not far from the village hut sits kampashka <a href="exec:gt ''mitkabuh''">youth</a>'
end

--- Gaddvor ---------------------------------
# Gadsarai
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
'<center><h4>Cottage</h4></center>'
'<center><img src="images/qwest/gadukino/sarai.jpg"></center>'
'Old barn that holds tools. Sitting near the barn <a href="exec:gt ''pirat''">dog named Pirate</a>'
clr
gs 'stat'
gs 'time'

act 'Go outside':minut += 5 & gt 'Gaddvor'

act 'Picking in the barn':
	cls
	minut += 15
	gs 'stat'
	poiskrand = rand(0, 5)

	if card > 0 and poiskrand = 0 or poiskrand > 0:
		'In the locker old magazines Health, Equipment Youth and dusty yellowed books.'
	elseif card = 0 and poiskrand = 0:
		card = 1
		'"Hmm, what''s this?" think you''ve found a deck of cards.'
	end

	act 'Put in place':gt $curloc
end

if card > 0:
	act 'Take a deck of cards':gt 'card'
end

if horny >= 50:
	act 'Masturbate':gt 'selfplay'
end

if piratHorny >= 20 and piratfrend >= 10:gt 'pirat'

--- Gadsarai ---------------------------------
# Gadbana
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
'<center><h4>bath</h4></center>'
'<center><img src="images/qwest/gadukino/bana.jpg"></center>'
'Not a big room with a low oven, water tanks of stainless steel, low smoky ceiling, and blackened wooden shelf.'
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

act 'Go outside':minut += 5 & gt 'Gaddvor'

if week = 6:
	if hour >= 12 and hour <= 18:
		canpar = 1
		'bath fired. Somewhere to seven hours can be steamed.'
	elseif hour > 18 and hour < 22:
		canpar = 1
		'In the bath can be steamed'

		if banaday!day:
			act 'Steamed in the sauna (2:00)':
				cls
				minut += 120
				dynamic $showerdin
				hapri = 0
				mop = 1
				sweat = -3

				if frost > 0:frost = 0

				skinvan += 5

				if skinvan >= 20:skinvan = 0 & skin += 1

				gs 'stat'

				'<center><img src="images/qwest/gadukino/par.jpg"></center>'
				'You soared in the bath, then doused with cold water and finally showered.'

				act 'Go outside':gt 'Gaddvor'
			end
		end
	elseif hour >= 22:
		canpar = 0
	end
elseif week ! 6:
	canpar = 0
end

if canpar = 0:
	act 'Wash (1:00)':
		cls
		dynamic $showerdin
		minut += 60
		hapri = 0
		mop = 1
		sweat = -3

		if frost > 0:frost = 0

		gs 'stat'
		'<center><img src="images/qwest/gadukino/mit.jpg"></center>'
		'You began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

		act 'Leave':gt 'Gaddvor'
	end
end

if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Use a tampon (0:05)':
		cla
		*clr
		tampon -= 1
		isprok = 1
		minut += 5
		manna -= 5
		gs 'stat'
		'<center><img src="images/pics/wash3.jpg"></center>'
		'You use a tampon.'

		act 'Finish':gt $curloc
	end
end

!!0.2.6 extension: Washing off cosmetics also removes cum from face
if mop ! 1:
	act 'Wash off cosmetics (0:15)':
		cla
		mop = 1
		cumface = 0
		minut += 15
		gs 'stat'
		! WD: Remove Dupe Images ~ '<center><img src="images/pic/facesp.jpg"></center>'
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You washed off your makeup.'

		act 'Finish':gt $curloc
	end
end
!!

!!0.2.6 extensionRemoved sweat =- 1 when cum is wiped off clothes
if cumfrot > 0:
	act 'Wipe the cum off your clothes (0:10)':
		cla
		cumfrot = 0
		minut += 10
		gs 'stat'
		! WD: Remove Dupe Images ~ '<center><img src="images/pic/frotsp.jpg"></center>'
		'<center><img src="images/etogame/frotsp.jpg"></center>'
		'You remove traces of cum from your clothes.'

		act 'Finish':gt $curloc
	end
end
!!

--- Gadbana ---------------------------------
# pirat
gs 'stat'

if piratfrend < 10:
	'<center><img src="images/qwest/gadukino/pirat.jpg"></center>'
	'Purebred dog named Pirate indifferently sitting near the barn.'
elseif piratfrend >= 10:
	'<center><img src="images/qwest/gadukino/pirat.jpg"></center>'

	if piratHorny < 10:
		'Purebred dog named Pirate wags his tail when your appearance.'
	elseif piratHorny >= 10 and piratHorny < 20:
		if piratsuka < 3:'Purebred dog named Pirate revolves around you wagging his tail and sniffing.'
		if piratsuka >= 3:'<center><img src="images/qwest/gadukino/sniff.jpg"></center>'
		if piratsuka >= 3:'Purebred dog named Pirate revolves around you wagging his tail and nuzzle you between the legs.'
	elseif piratHorny >= 20:
		pirand = rand(0, 1)

		if piratsuka<3 or piratsuka >= 3 and pirand = 0:
			'Purebred dog named Pirate pounces on your leg and rubs against her.'

			act 'push Pirate':
				cls
				piratHorny -= 1
				minut += 15
				dom += 1
				gs 'stat'
				!!'<center><img src="images/qwest/gadukino/dog.jpg"></center>'
				'You pushed Pirate dropping him with legs.'

				act 'Leave':gt $curloc
			end

			act 'Endure':
				cls
				piratHorny = 0
				minut += 15
				manna = manna / 2
				piratsuka += 1
				sub += 1
				gs 'stat'
				'<center><img src="images/qwest/gadukino/leghump.jpg"></center>'
				'You were not moving until Pirate rub against your leg. Suddenly she poured some sort of hot white liquid, Pirate immediately jumped to the side and began chesatsya but nothing had happened.'

				act 'Leave':gt $curloc
			end
		elseif piratsuka >= 3 and pirand = 1:
			'Purebred dog named pirate stands on his hind legs and puts his front paws on your shoulder. You chustvuete like you in the ass rests like an awl member of the Pirate.'

			act 'push Pirate':
				cls
				piratHorny -= 1
				minut += 15
				dom += 1
				gs 'stat'
				!!'<center><img src="images/qwest/gadukino/dog.jpg"></center>'
				'You pushed Pirate dropping him off his back.'

				act 'Leave':gt $curloc
			end

			act 'Stand':
				cls
				!piratHorny = 0
				minut += 15
				manna = manna / 2
				piratsuka += 1
				sub += 1
				!cumfrot += 1
				gs 'stat'
				!!'<center><img src="images/qwest/gadukino/dog.jpg"></center>'
				'You froze and became hard Pirate tykatsya his cock you in the ass. Pirate angry and growling jumps from you'

				act 'Leave':gt $curloc
			end

			act 'Stand on all fours':
				cls
				piratHorny = 0
				minut += 15
				manna = manna / 2
				piratsuka += 3
				sub += 5
				cumfrot += 1
				gs 'stat'
				'<center><img src="images/qwest/gadukino/hump.jpg"></center>'
				'You got up on all fours and substituting ass dog Pirate became intensely tykatsya his cock you in the ass. Soon.'

				act 'Leave':gt $curloc
			end
		end

		exit
	end
end

act 'Leave':minut += 5 & gt $loc

act 'Pat the Pirate':
	cls

	if piratfrend < 10:piratfrend += 1

	minut += 15

	if piratsuka > 0:piratHorny += 1

	gs 'stat'
	'<center><img src="images/qwest/gadukino/dog.jpg"></center>'
	'You pat on the back Pirate.'

	act 'Leave':gt $curloc
end

--- pirat ---------------------------------
# mitka
gs 'stat'
'<center><b><font color="maroon">Mitka kingpin</font></b></center>'
'<center><img src="images/qwest/alter/npc/mitka.jpg"></center>'
'Swain barely older than you, do you know him from childhood and children together while still bathed in the river.'

if mitkaday = daystart:
	'Mr. Cho <<$name>>, come in at eight o''clock, buhnem brew, popizdim for life.'
elseif mitkaday!daystart:
	mitkaday = daystart
	'Hello <<$name>>. How zhituha?'

	act 'Normally':
		cls
		gs 'stat'
		'<center><b><font color="maroon">Mitka kingpin</font></b></center>'
		'<center><img src="images/qwest/alter/npc/mitka.jpg"></center>'
		'You said that you are all well and Mitka smiled offered "Mr. Cho <<$name>>, come in at eight o''clock, buhnem brew, popizdim for life."'

		if mitkasextimes > 0:
			'Mitka scratched eggs and added with a grin "Svetuh, Let us go now poebemsya, and that the riser fucking."'

			act 'Let''s go':
				cls
				minut += 15

				if mitkasex = 0:mitkasex = 1 & guy += 1

				$boy = 'Mitka'
				silavag = 0
				dick = 18
				pose = 0
				mitkasextimes += 1
				gs 'stat'
				'<center><img src="images/qwest/gadukino/mitka2.jpg"></center>'
				'Mitka took you to his house and led to the veranda, There he laid you on the couch and began to undress beztseremonno.'
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum
				'Mityai, lay down on his side and lit "fucking!"'

				act 'Leave':gt 'Gaddvor'
			end
		end

		act 'Leave':gt 'Gaddvor'
	end

end

act 'Leave':gt 'Gaddvor'

--- mitka ---------------------------------
# mitkabuh
gs 'stat'
'<center><img src="images/qwest/gadukino/drunk.jpg"></center>'
'Set in a secluded spot three village boy, Mitka kingpin, Bob Package Kolyamba and drink moonshine without snacks. Mitka brew pours into the glass and provides you.'

if alko < 8:
	act 'Leave':gt 'Gaddvor'

	act 'drink':
		cls
		minut += 30
		alko += 4
		gs 'stat'
		'<center><img src="images/qwest/gadukino/drunk.jpg"></center>'
		'You drank moonshine and everything inside burned, you become a choking zanyuhivat sleeve , as snacks was not. Mitka said approvingly "good infection, wade."'

		act 'Ottdyshatsya':gt $curloc
	end
elseif alko >= 8:
	'You got drunk in the trash, leg is almost not keep you. Mitka noticed your condition keeps you around the waist. "Mr. Cho <<$name>>, go ebatsya?"'

	act 'slurred mumble':
		cls
		minut += 15

		if mitkasex = 0:mitkasex = 1 & guy += 1

		$boy = 'Mitka'
		silavag = 0
		dick = 18
		pose = 0
		mitkasextimes += 1
		gs 'stat'
		'<center><img src="images/qwest/gadukino/mitka.jpg"></center>'
		'Mitka took you to his house and led to the veranda, There he laid you on the couch and began to undress beztseremonno.'
		dynamic $sexstart
		dynamic $sexstart2
		dynamic $sexcum
		'Mityai, lay down on his side and lit "fucking!"'

		act 'Leave':gt 'Gaddvor'
	end
end

--- mitkabuh ---------------------------------
# placer
!!$ev_name = 'Fedor'
!!$ev_name_a = 'Fedor'
!!$ev_name_om = 'Fedor'
!!dick = 17
!!silavag = 0
!!gnpcSex[numnpc] - sex
!!grupNPC[numnpc] - relationship
!!the presence of NPC theoretically able to meet
mass_ver_zn = 0
!!want or do not meet NPCs
ver_zn = 0
!!the number of men
kol_man = 0
!!greeting text
$text_znak = ''
!!the possibility of knowledge turnip years
know_status = 0
!!identified reputation or not
know_gor_slut = 0
!!retext
$kol_man_text_no = ''
plact = 0
gs 'stat'
$textEvent = ''
if place = 0:
	!!street
	if litltown = 1:$numplace = 'gorodok'
elseif place = 1:
	!!square
	$numplace = 'gskver'
elseif place = 2:
	!!movie
elseif place = 3:
	!!home to the guy. preposition Vidic
elseif place = 4:
	!!disco in town
end

gt 'placer_<<$numplace>>'

--- placer ---------------------------------
# placer_gskver
if hour >= 22 or hour < 8:
	encounter = 0
else
	encounter = rand(0, 5)
end

if encounter = 0:
	!!no one in the park
	$textEvent = 'In the park is quiet and deserted. No one in sight.'
elseif encounter = 1:
	!!people in the park 1mother walking with a baby 2old_man 3woman with shopping bags 4two young girls
	encrand = rand(0, 4)

	if encrand = 0:$textEvent = 'In the park on the sidewalk strolls a young mother with a stroller.'
	if encrand = 1 and cloth_vid = 0:$textEvent = 'In the park on the sidewalk walks a lonely old man with a newspaper in his hand.'

	if encrand = 1 and cloth_vid = 1:
		$textEvent='In a park on the sidewalk walking a lonely old man with a newspaper in his hand. The old man came up to you and said: "Look, young lady, I have something for you-whats is"'

		act 'see':gt 'parkBimbo','pos1'
	end

	if encrand = 2:$textEvent = 'In the park on the sidewalk is a woman with shopping bags who decided to shorten the path passing through the square.'
	if encrand = 3:$textEvent = 'In the park on the sidewalk stroll two young girls.'

	if encrand = 4:
		kol_man = rand(1, 5)

		if kol_man = 1:$textSub = 'is a guy'
		if kol_man = 2:$textSub = 'are two guys'
		if kol_man = 3:$textSub = 'are three guys'
		if kol_man = 4:$textSub = 'four guys'
		if kol_man = 5:$textSub = 'five guys'

		$textEvent = 'In the park on the sidewalk <<$textSub>>.'
		mass_ver_zn = 1
		know_status = 1
	end
elseif encounter = 2:
	!!dog in the park
	$textEvent = 'In the park is quiet and deserted only lonely dog ​​sniffs to something near the boardwalk.'
elseif encounter = 3:
	!!young people in the park company
	$textEvent = 'In the park on a bench sits youth campaign.'
	kol_man = rand(2, 6)
	mass_ver_zn = 1
	know_status = 1
elseif encounter = 4:
	!!Gopnik in the park
	kol_man = rand(3, 6)
	$textEvent = 'In the park sitting on his haunches Gopnik and drink beer.'
	mass_ver_zn = 1
	know_status = 2
elseif encounter = 5:
	!!couple in love in the park
	$textEvent = 'In the park walks a couple in love.'
elseif encounter = 6:
	!!in the square of the familiar class
end

if dickfrend > 0:ver_zn = 0

gs 'placer_man'

if hour >= 8 and hour < 22:'<center><img src="images/gevent/skver.jpg"></center>'
if hour >= 22 or hour < 8:'<center><img src="images/gevent/skver.jpg"></center>'

if Frend_num > 0:
	'together with <<$ev_name_om>> you have come to a quiet garden square. <<$textEvent>>'

	if dickfrend > 0:
		!!your friend guy
		if kol_man = 1 and $text_znak = '':$kol_man_text_no = 'After the guy looked at you, he turned away.'
		if kol_man > 1 and $text_znak = '':$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'
		if kol_man > 0:'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'+$text_znak
		!!action with a guy whom came to the square
	elseif dickfrend = 0:
		!!your friend girl
		if ver_zn = 1:
			'At you with his girlfriend looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>.'

			if kol_man = 1:'A guy came up to you and said, "<<$text_znak>>"'
			if kol_man > 1:'Guys come to you and one of the guys said "<<$text_znak>>"'

			act 'meet':
				cls

				if p_dom < 80:
					gt 'placer_act'
				elseif p_dom >= 80:
					gs 'stat'
					'<<$ev_name>> hissed in your ear "I''m not acquainted with someone on the street. If you want to, stay, and I will go."'

					act 'Go with a friend':gt 'placer_end'

					act 'can you go, and I''ll stay':
						Frend_num = 0
						gt 'placer_act'
					end
				end
			end
		elseif ver_zn = 0 and kol_man > 0:
			if kol_man = 1:$kol_man_text_no = 'After the guy looked at you, he turned away.'
			if kol_man > 1:$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'

			'At you with his girlfriend looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'
		end
		!!acts with the girl you came
	end

	act 'Continue to walk':gt 'placer_end'
elseif Frend_num = 0:
	'You stroll through the quiet park. <<$textEvent>>'

	if ver_zn = 1:
		'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>.'

		if kol_man = 1:'The guy came up to you and said, "<<$text_znak>>"'
		if kol_man > 1:'Guys come to you and one of the guys said "<<$text_znak>>"'

		act 'meet':gt 'placer_act'
	elseif ver_zn = 0 and kol_man > 0:
		if kol_man = 1:$kol_man_text_no = 'After the guy looked at you, he turned away.'
		if kol_man > 1:$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'

		'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'
	end

	act 'Leave':gt 'gskver'
end

gs 'stat'

--- placer_gskver ---------------------------------
# placer_man
if mass_ver_zn > 0:
	!!calculation of the probability of dating
	ver_zn = 0
	vn_ver = rand(0, 30)
	rand_vero = rand(0, 1)

	if vn_ver < vnesh and rand_vero = 0:ver_zn = 1
	if dickfrend > 0:ver_zn = 0
	if kol_man = 1:$kol_man_text = 'guy' & $kol_man_text_a = 'man' & $kol_man_prefiks = '' & $kol_man_prefiks_he = 'he'
	if kol_man = 2:$kol_man_text = 'two guys' & $kol_man_text_a = 'man' & $kol_man_prefiks = 'и' & $kol_man_prefiks_he = 'they'
	if kol_man = 3:$kol_man_text = 'three guys' & $kol_man_text_a = 'man' & $kol_man_prefiks = 'и' & $kol_man_prefiks_he = 'they'
	if kol_man = 4:$kol_man_text = 'four guys' & $kol_man_text_a = 'man' & $kol_man_prefiks = 'и' & $kol_man_prefiks_he = 'they'
	if kol_man = 5:$kol_man_text = 'five guys' & $kol_man_text_a = 'man' & $kol_man_prefiks = 'и' & $kol_man_prefiks_he = 'they'
	if kol_man = 6:$kol_man_text = 'six guys' & $kol_man_text_a = 'man' & $kol_man_prefiks = 'и' & $kol_man_prefiks_he = 'they'

	$text_znak = ''

	!!iconic moments
	if GorSlut > 0:
		!!if know_status = 0:end
		if know_status = 1:knowrand = rand(0, 1)
		if know_status = 2:knowrand = rand(0, 4)
		if knowrand >= 1:know_gor_slut = 1
	end

	if ver_zn = 0:
		if know_gor_slut = 1:
			if kol_man = 1:
				$text_znak = ' The guy smiled significantly.'
			elseif kol_man > 1:
				$text_znak = ' Boys began to whisper: "Hey, it''s <<$name>> <<$gnikname>>"'
			end
		end
	elseif ver_zn = 1:
		if Frend_num = 0:
			slut_vid = 0

			if mop = 4:slut_vid += 1

			if pirsA > 0:slut_vid += 1
			if pirsB > 0:slut_vid += 1
			!!if tits > 2:end
			!!if bedra-talia > 30:end
			!!if glamur > 0 or ski > 0:end
			!!if sport > 0:end

			$txt_a= 'hello'
			$txt_b= 'beauty'

			if know_status = 2:
				textrand = rand(0, 1)

				if textrand = 0:$txt_a = 'Hallow'
				if textrand = 1:$txt_a = 'healthy'

				textrand2 = rand(0, 1)

				if textrand2 = 0:$txt_b = 'beauty'
				if textrand2 = 1:$txt_b = 'chikulya'
			end

			$text_znak = '<<$txt_a>> <<$txt_b>>'
		elseif Frend_num > 0 and dick = 0:
			$text_znak = 'Hi girls!'

			if know_status = 2:$text_znak = 'Hi chikuli!'
		end
	end

	if $clothingworntype = 'hooker':
		randtext = rand(0, 5)

		if randtext = 0:$txt_a = 'Hey, Shmarov'
		if randtext = 1:$txt_a = 'Hey, slut'
		if randtext = 2:$txt_a = 'Hey, nipple'
		if randtext = 3:$txt_a = 'Hey, girl'
		if randtext = 4:$txt_a = 'Cool chick, hey'
		if randtext = 5:$txt_a = 'Oh! prostitute'

		randtext2 = rand(0, 5)

		if randtext2 = 0:$txt_b = 'how much a blowjob?'
		if randtext2 = 1:$txt_b = 'for the steward take the cheek?'
		if randtext2 = 2:$txt_b = 'cool you zhopets'
		if randtext2 = 3:$txt_b = 'not bad you have boobs'
		if randtext2 = 4:$txt_b = 'you''re at work?'
		if randtext2 = 5:$txt_b = 'I look at you working mouth'
		$text_znak = '<<$txt_a>> <<$txt_b>>'
	end
end

--- placer_man ---------------------------------
# placer_act
gs 'stat'
gs 'skverdin'

if plact = 0:
	gs 'BnameGen'

	if Frend_num > 0:$text_mod = ' Your girlfriend is also presented as <<$ev_name>>'
	if Frend_num = 0:$text_mod = ''

	'You stopped and looked at the guy who approached you, he in turn introduced "my name is <<$bname>>" You answered it "<<$name>>."'+$text_mod

	if know_status = 2:
		!!gopa
		'<<$bname>> offered you to join and to drink beer.'

		!!if Frend_num = 0:end
		if Frend_num > 0:'<<$ev_name>> whispers to you "Yah they nafik, let''s get out."'
	else
		!!norms
		'<<$bname>> offered you to join and to drink beer.'

		if kol_man = 1:
			!!if Frend_num = 0: end
			if Frend_num > 0:'<<$ev_name>> whispers to you "interestingly, who he liked, you or me."'
		elseif kol_man > 1:
			'You vied with each other to invite <<$kol_man_text>> join.'

			!!if Frend_num = 0:end
			if Frend_num > 0:'<<$ev_name>> whispers to you "Come sit with them a little."'
		end
	end

	act 'drink beer':plact = 1 & gt $curloc

	if Frend_num = 0:act 'Leave':gt 'gskver'

	if Frend_num > 0:
		act 'Go with a friend':
			cls
			gs 'stat'

			if p_slut < 80:gt 'placer_end'

			if p_slut >= 80:
				'<<$ev_name>> whispers to you "Do not be such a bore, sit, fun_too."'

				act 'drink beer':plact = 1 & gt $curloc
				act 'leave one':gt 'gskver'

				if dom > p_dom / 2:
					act 'drag girlfriend':gt 'placer_end'
				end
			end
		end
	end
end

!!if slut_vid > 0:know_gor_slut = 1

!!!!!!!!!!!!!!!
!!!drink beer!!!
!!!!!!!!!!!!!!!
if plact = 1:
	alko += rand(1, 3)
	minut += 5
	gs 'stat'

	if Frend_num > 0:$textsub = ' with a friend '
	if Frend_num = 0:$textsub = ''
	if kol_man = 1:$textsub2 = 'guy'
	if kol_man > 1:$textsub2 = 'guys'

	'Do_You <<$textsub>> joined <<$textsub2>>. <<$bname>> Beer poured into cups. you drank, <<$kol_man_text>> chatting gaily<<$kol_man_prefiks>> about various trifles and entertained<<$kol_man_prefiks>> you <<$textsub>>.'

	if know_status = 2:
		!!gopa
		if Frend_num = 0:
			if know_gor_slut = 0:
				horny += 5
				'One of the guys came up to you from behind and put his arm around her waist kissed her neck. Other drinking beer and talking among themselves without paying attention to you.'

				act 'kiss':
					cls
					horny += 5
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
					'You kissed a man and his hands began to stroke your body. "In_short, chikul, let''s go to a secluded place, dobuhaem there" tells you gopar.'

					if dom > 0:
						act 'Refuse to drink and go':gt 'gskver'
					end

					act 'Go with the guys':
						cls
						minut += 5
						alko += 3
						gs 'stat'
						'Together with the guys you went down the street to what that shabby house. There''s one of the guys spent the whole company to the apartment. The apartment boys quickly the table, putting vodka and artful snacks. Vodka poured into glasses and handed one of the glasses you. You drink cheap vodka from which disgusted bore rubber and ate anchovies from banks.'

						act 'further':gt 'gopnik_house'
					end
				end

				act 'Step_back':
					cls
					minut += 5
					gs 'stat'
					'You have stepped back from the guy avoiding kiss and removed his hands.'
					tiprand = rand(0, 2)

					if tiprand = 0:
						'One of the guys said "In short boys, we all like children, beer, yes beer, let''s take vodyary?" Other enthusiastically supported this idea and soon one of the guys ran somewhere and brought a package with vodka and snack. The boys began to pour vodka into plastic cups. One of these cups held out to you.'

						act 'drink':
							cls
							minut += 5
							alko += 3
							gs 'stat'
							'You drink cheap vodka from which disgusted bore rubber and ate anchovies from banks. You immediately poured another glass of vodka. And the boys began to persuade you to drink.'

							if dom > 0:
								act 'Refuse to drink and go':gt 'gskver'
							end
							act 'drink':
								cls
								minut += 5
								alko += 3
								gs 'stat'
								'You drank another cup of cheap vodka which is contrary to bore rubber and ate anchovies from banks.'

								if alko < 6:
									'you feel, that very drunk, but are still able to think. A few guys have picked up under your arms and led from the square, soon the whole company came to what that house and you have spent in the basement and put on a dirty mattress.'
								elseif alko >= 6:
									'You feel like the beginning of dizzy and the earth started to slip away from under the feet. Several strong hands gripped you and you somewhere dragged. You could not get to focus vision and you just realized, that you have somewhere to bring. In this place so much bore sewerage, that you start to feel sick.'
								end

								act 'further':gt 'podval_rape'
							end
						end

						act 'Leave':gt 'gskver'
					elseif tiprand = 1:
						'One of the guys said "In short, boys, that we here in the square hang, I hata free, let''s go back to thump." Were enthusiastically supported this idea.'

						act 'Go with the guys':
							cls
							minut += 5
							alko += 3
							gs 'stat'
							'Together with the guys you went down the street to what that shabby house. There''s one of the guys spent the whole company to the apartment. The apartment boys quickly the table, putting vodka and artful snacks. Vodka poured into glasses and handed one of the glasses you. You drink cheap vodka from which disgusted bore rubber and ate anchovies from banks.'

							act 'further':gt 'gopnik_house'
						end

						act 'Leave':gt 'gskver'
					elseif tiprand = 2:
						'One of the guys said "In_short, boys, that we here in the square hang, I know there is one place, let''s go back to thump." Were enthusiastically supported this idea.'

						act 'Go with the guys':
							cls
							minut += 5
							gs 'stat'
							'Together with the guys you went down the street to what that shabby house. There''s one of the guys went to the basement door and opened it.'

							act 'Go to the basement':
								cls
								minut += 5
								gs 'stat'
								'You went into the dark basement floor and damp smelling sewage. In the basement you saw shabby mattress and a bunch of empty bottles. All friendliness guys somewhere disappeared and one of them splashing into a glass of vodka and a glass of handing you said roughly "Pei let."'

								act 'drink':
									cls
									minut += 5
									alko += 3
									gs 'stat'
									'You drank all covered in mist and the ground began to shake and rumble underfoot. You helped to sit down on a dirty mattress on the floor.'

									act 'further':gt 'podval_rape'
								end

								act 'refuse to drink':
									cls
									minut += 5
									manna = 0
									gs 'stat'
									'You refused to drink and then one of the guys grabbed you and pulled tossed on the mattress.'

									act 'further':gt 'podval_rape'
								end
							end

							act 'Leave':
								cls
								minut += 5
								manna = 0
								gs 'stat'
								'You refused to go to the basement and decided to leave. But as soon as you turned around you grabbed by the arm and dragged by force into the basement. In the floor of a dark basement smelled of damp and sewage. You threw on a dirty mattress on the floor .'

								act 'further':gt 'podval_rape'
							end
						end

						act 'Leave':gt 'gskver'
					end
				end
			elseif know_gor_slut = 1:
				'One of the guys said "Slysh <<$name>>, we''re up to date, what do you <<$gnikname>>". Another guy came up to you "In_short, nipple, Now let''s go to one place and will show you where your skills. Will balk, get the teeth, all clear?"'

				act 'Go with the guys':
					cls
					gs 'stat'
					'You went with the guys , where one of the guys opened the basement door and looked in, then you took the floor in a dark basement. You saw the empty bottles and dirty mattress on the ground. One of the guys came to you "Well nipple, Come to work." and began to unbutton his pants.'

					act 'To squat':
						cls
						bj += kol_man
						guy += kol_man
						cumlip += kol_man / 2
						cumface += kol_man / 2
						gang += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/blowbang.jpg"></center>'
						'You sat on his haunches and surrounded you guys took out their members, you started sucking them like a real nadrachivat mnogostanochnitsa. The guys did not last long and took turns to finish on your face covering his sperm.'

						act 'Leave':gt 'gskver'
					end
				end
			end
		elseif Frend_num > 0:
			if know_gor_slut = 0:
				horny += 5
				'One of the guys came up to your friend and hugged her. Another guy pretty Unleashed came up to you and grabbed your waist.'

				act 'kiss':
					cls
					gs 'stat'
					'You began to kiss a guy and he started to touch you. Other guys have offered to go to the hut continue the fun.'

					act 'Go with the guys':gt 'placer_gop_orgy'
				end

				act 'Go with a friend':
					cls
					gs 'stat'
					'You are estranged from Gopnik and skazale girlfriend, that are on the go. <<$ev_name>> also became a going away.'

					act 'Leave':gt 'placer_end'
				end

				exit
			end

			if know_gor_slut = 1:
				'One of the guys said "Slysh <<$name>>, we''re up to date, what do you <<$gnikname>>, polyubasu your girlfriend too." Another guy came up to you. "In short nipples, Now let''s go to one place, and there you are with a friend show their skills. will abut, get the teeth, all clear?"'

				act 'Go with the guys':gt 'placer_gop_orgy'

				act 'Go with a friend':
					cls
					gs 'stat'
					'You stated that Gopnik not going anywhere, guys started coming to you threateningly "Hey sheep, ohuel you something? You nicho not beguiled? You eblische something break?" One of them grabbed you by the hand.'

					act 'Go with the guys':gt 'placer_gop_orgy'

					if dom > 20:
						act 'Leave':gt 'placer_end'
					end
				end

				exit
			end

		end
	end

	if know_status < 2:
		tiprand = rand(0, 1)
		tiploverand = rand(0, 1)

		!norms
		if kol_man = 1:
			if Frend_num = 0 and kol_man = 1:
				if slut_vid > 0:
					'A guy came up to you and hug you.'

					act 'kiss':
						cls
						gs 'stat'
						'You began to kiss a guy, he took you by the hand and led somewhere, you were in the bushes with a guy. He unbuttoned his pants and pulled out his already erect member.'

						act 'hey! What are you doing?':
							cls
							gs 'stat'
							'You angrily yelled at the guy "Hey?" The guy smiled "Come virginity something of themselves to build, smeared like a cheap whore, hodish here in the park, snimaeshsya. Come shorter, not my my brain."'
							dynamic $d_park_placer_bj

							act 'Leave':gt 'gskver'
						end

						act 'Are you crazy? And if someone sees?':
							cls
							gs 'stat'
							'You hissed angrily at the guy "Are you crazy? And if someone sees?" The guy smiled, "Come, no one is".'

							act 'I can not do':
								cls
								gs 'stat'
								'You have flatly refused to be engaged than something similar in a public place and the guy offered to go to him.'

								act 'Go to guy':
									cls
									gs 'stat'
									tiperand = rand(0, 1)

									if tiperand = 0:gt 'fbHouse'
									if tiperand = 1:gt 'fbDorm'
									if tiperand = 2:gt 'fbGar'
								end

								act 'Leave':gt 'gskver'
							end

							dynamic $d_park_placer_bj
						end

						dynamic $d_park_placer_bj
					end
				else
					'The guy offered you to go to his apartment.'

					act 'Go to guy':
						cls
						gs 'stat'
						tiperand = rand(0, 1)

						if tiperand = 0:gt 'fbHouse'
						if tiperand = 1:gt 'fbDorm'
						if tiperand = 2:gt 'fbGar'
					end
				end
			elseif Frend_num > 0 and kol_man = 1:
				if tiploverand = 0:
					'While you''re having fun and drinking beer <<$bname>> pay attention to you more often, than your girlfriend. When the beer was over .'

					act 'kiss':
						cls
						gs 'stat'
						'Man whispering in your ear "Come to my <<$name>>."'

						if p_slut < 50:
							'<<$ev_name>> seems to have understood all "Fair_Enough, until the light, I''ll go home."'

							act 'Go with a friend':gt 'placer_end'

							act 'Go to guy':
								cls
								gs 'stat'
								tiperand = rand(0, 2)

								if tiperand = 0:gt 'fbHouse'
								if tiperand = 1:gt 'fbDorm'
								if tiperand = 2:gt 'fbGar'
							end
						elseif p_slut >= 50:
							'<<$ev_name>> smiled and licked her lips "And take me with you?"'

							act 'Go the whole company at the apartment':minut += 5 & gt 'placer_house'
						end
					end
				elseif tiploverand = 1:
					'While you''re having fun and drinking beer <<$bname>> pay attention to your girlfriend more often, than you. When the beer was over .'

					act 'watch':
						cls
						gs 'stat'

						if p_slut < 30:
							'<<$ev_name>> kissed Man ​​refused and suggested you go.'

							act 'Go with a friend':gt 'placer_end'
						end

						if p_slut >= 30 and p_slut < 60:
							'<<$ev_name>> kissing a guy and he starts to caress her whispering something in her ear. <<$ev_name>> turns to you and says, she goes to the guy to visit.'

							if Frend_num = 14:
								KatjaLust += 10
								KatjaSlut += 10
								KatjaHorny = 0
								KatjaSex += 1
								KatjaGuy += 1
								KatjaBJ += 1
							end

							act 'Leave':gt 'gskver'
						elseif p_slut >= 60:
							'<<$ev_name>> kissing a guy and he starts to caress her whispering something in her ear. <<$ev_name>> turns to you and offers you innocently "Well <<$name>>, you''re with us?"'

							act 'Leave':gt 'gskver'
							act 'Go the whole company at the apartment':minut += 5 & gt 'placer_house'
						end
					end
				end
			end
		elseif kol_man > 1:
			if Frend_num = 0:
				if slut_vid > 0:
					if kol_man = 2:$textsub = 'The second guy looks at you with interest.'
					if kol_man > 2:$textsub = 'The other guys looking at you with interest'

					'One of the guys came up to you and hug. <<$textsub>>.'

					act 'kiss':
						cls
						gs 'stat'
						'Guys suggested you go to their apartment.'

						act 'Go with the guys':
							cls
							alko += 20
							minut += 30
							gs 'stat'
							'<center><img src="images/qwest/alter/placer/drunk.jpg"></center>'
							'You went to the hostel with the guys, on the way the guys still have bought booze. The room was almost nothing, only a few iron beds. The boys began to thump, all pouring and pouring you. Soon. Through gripped you feel you intoxication, that you dragged clothing.'

							act 'further':gt 'placer_sex'
						end
					end
				else
					'Guys suggested you go to their apartment.'

					act 'Go with the guys':
						cls
						alko += 20
						minut += 30
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/drunk.jpg"></center>'
						'You went to the hostel with the guys, on the way the guys still have bought booze. The room was almost nothing, only a few iron beds. The boys began to thump, all pouring and pouring you. Soon. Through gripped you feel you intoxication, that you dragged clothing.'

						act 'further':gt 'placer_sex'
					end
				end
			elseif Frend_num > 0:
				if slut_vid > 0:
					'One of the guys came up to you and hug, you also noticed, that other guy came up to your friend and hugged her.'

					act 'kiss':
						cls
						horny += 10
						minut += 5
						gs 'stat'
						'You started to kiss a guy and his hands began to fumble through the body, corner of your eye you notice <<$ev_name>> Man kisses too. The guy broke the kiss and offered to go to his apartment or continue to rest all together.'

						act 'Go the whole company at the apartment':minut += 5 & gt 'placer_house'
						act 'Go to guy for him':minut += 5 & gt 'placer_house_one'
					end
				else
					'Guys have offered you my friend and go to their apartment.'

					act 'Go with the guys':
						cls
						minut += 5
						gs 'stat'
						'You are the whole company went to the apartment of one of the guys'

						act 'further':gt 'placer_house'
					end
				end
			end
		end
	end

	gs 'stat'

	if Frend_num = 0:
		act 'Leave':
			cls
			gs 'stat'

			if know_gor_slut = 0:
				if slut_vid = 0:gt 'gskver'

				if slut_vid > 0:
					if know_status = 2:
						'Man angrily remarked "And the fig then has made up like a whore?"'

						act 'Leave':gt 'gskver'
					else
						gt 'gskver'
					end
				end
			elseif know_gor_slut = 1:
				if know_status = 2:
					'You turned on the boys and went to the door.'
					tipgopreactrand = rand(0, 1)

					act 'Leave':gt 'gskver'
				else
					gt 'gskver'
				end
			end
		end
	elseif Frend_num > 0:
		act 'Go with a friend':gt 'placer_end'
	end
end

--- placer_act ---------------------------------
# skverdin
$d_park_placer_bj = {
	boy += 1
	dick = rand(15, 25)
	parkfuckboy += 1
	$ppBoyName[parkfuckboy] = $bname
	ppBoyTipe[parkfuckboy] = 1
	ppBoyPlace[parkfuckboy] = 1
	!!masturbate 2 blow_job 3 gangbang
	ppdick[parkfuckboy] = dick
	parktimes += 1
	pphj = 0
	ppbj = 0
	ppsex = 0
	ppanal = 0
	dynamic $d_pp_hand
	dynamic $d_pp_squat
}

$d_pp_hand = {
	act 'Member of the hand touch':
		cls
		pphj += 1
		minut += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/hj.jpg"></center>'
		'You clasped fingers standing <<dick>> inch cock and began to move the skin is revealing crimson head then closing it.'
		tiprand = rand(1, 100)

		if tiprand >= 90:
			'<<$bname>> took you by the shoulders and pushed, trying to put you on his heels'
			dynamic $d_pp_squat
		elseif tiprand >= 50 and tiprand < 90:
			'<<$bname>> said impatiently "<<$name>>, kiss him"'
			dynamic $d_pp_squat

			if dom > 0:
				dynamic $d_pp_hjcum
			else
				'<<$bname>> stands still and you devour eyes'
				dynamic $d_pp_hjcum
				dynamic $d_pp_squat
			end
		end
	end
}

$d_pp_hjcum = {
	act 'Dodrochit':
		cls
		pphj += 1
		minut += 1
		gs 'stat'
		tiprand = rand(1, 100)

		if tiprand >= 80:cumfrot += 1 & $pptext = 'you notice as one of the jets of semen gets into your clothes on'
		if tiprand < 80:$pptext = 'Man sperm tight jets flew to the ground'

		'<center><img src="images/qwest/alter/Ev/pphjcum.jpg"></center>'
		'You have become hard to masturbate cock and he began to finish, <<$pptext>>'
		dynamic $d_pp_goend
	end
}

$d_pp_squat = {
	act 'To squat':
		cls
		minut += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/squat.jpg"></center>'
		'You sat on his haunches and right in front of your face turned stand-up <<dick>> inch cock'
		dynamic $d_pp_bj
	end
}

$d_pp_bj = {
	act 'suck':
		cls
		ppbj += 1
		minut += 5
		parkslut += 1
		ppBoyTipe[parkfuckboy] = 2
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/ppbj.jpg"></center>'
		'Your lips wrapped around a hard <<dick>> inch cock, and you suck it carefully feeling his tongue and lips.'
		tiprand = rand(1, 100)

		if tiprand = 100:
			'Suddenly, He laughed and said "shit, <<$bname>> fifteen minutes you can not leave, already what that heifer cheek wheeled." <<$bname>> laughed and turned to his friend "What do you tupish? Come_Over!" The second guy immediately came up to you and pulled out of his pants his dick.'
			dynamic $d_pp_double
		elseif tiprand >= 90 and tiprand < 100:
			'<<$bname>> suddenly took out a member of your mouth and began to say a word to lift you and expand back to him'
			dynamic $d_pp_sex
		elseif tiprand >= 70 and tiprand < 90:
			'<<$bname>> whispers to you "<<$name>>, you mouth is not tired? can perepihnemsya?"'
			dynamic $d_pp_sex
			dynamic $d_pp_bjcum
		elseif tiprand < 70:
			'You chustvuete stiffen cock, it seems he is ready is about to finish'
			dynamic $d_pp_hjcum
			dynamic $d_pp_bjcum
		end
	end
}

$d_pp_bjcum = {
	act 'continue to suck':
		cls
		minut += 1
		cumlip += 1
		cumfrot += 1
		cumface += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/ppbjcum.jpg"></center>'
		'You continued to suck and less than a minute as a member became razryazhatsya your mouth seed, Sperm were so many, that part of it poured on your lips and mouth .'
		dynamic $d_pp_goend
	end
}

$d_pp_sex = {
	act 'bend':
		cls
		minut += 1
		ppsex += 1
		pose = 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/ppsex.jpg"></center>'
		'You bared her butt and bending framed his boyfriend'
		dynamic $sexstart
		dynamic $sexstart4
		tiprand = rand(1, 100)

		if tiprand >= 20:
			dynamic $sexcum
			dynamic $d_pp_goend
		elseif tiprand < 20:
			'<<$bname>> took out of you cock and you deploying to face him began to put you on his heels'
			dynamic $d_pp_squat
		end
	end
}

$d_pp_double = {
	act 'ohrenevayu':
		cls
		ppBoyTipe[parkfuckboy] = 3
		parkslut += 10
		guy += 1
		gang += 1
		bj += 1
		ppbj += 1
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/ppbjdouble.jpg"></center>'
		'It all happened quickly and you do not even have time to realize in both your hands turned over the penis, their purple heads were right in front of your face. One of the guys hand impatiently pushed your head against a member.'

		act 'Sucking two members':
			cls
			minut += 15
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/ppbjdouble2.jpg"></center>'
			'You have become a polished just two bow with her wet lips spitted her mouth purple hat guys take turns. soon <<$bname>> groaned "Open your mouth slut"'

			act 'open your mouth':
				cls
				minut += 15
				cumface += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/ppbjdouble3.jpg"></center>'
				'You obediently opened the procedure already tired mouth and <<$bname>> you shot a thick white liquid directly on wet and slightly swollen lips of the work done. His friend choked hissed "finish" and grab you by the hair turned your face to its members.'

				act 'turn the face':
					cls
					minut += 15
					cumface += 1
					cumlip += 1
					cumfrot += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/ppbjdouble4.jpg"></center>'
					'You turned your face and you immediately charged a second portion struhni directly into open mouth, you instinctively shaken and a large ball of sperm fell out of your mouth and you shmyaknulsya on clothes. <<$bname>> neigh "epta! You''re a sniper, huesoska loaded directly into her mouth fucking!"'
					dynamic $d_pp_goend
				end
			end
		end
	end
}

$d_pp_goend = {
	act 'Brush up':
		cls

		if ppbj > 0:bj += 1
		if pphj > 0:hj += 1
		if ppsex > 0:sex += 1
		if ppanal > 0:anal += 1

		minut += 5
		gs 'stat'

		if cumface > 0 or cumlip > 0:
			'<center><img src="images/qwest/alter/Ev/ppendcum.jpg"></center>'
		else
			'<center><img src="images/qwest/alter/Ev/ppendno.jpg"></center>'
		end

		'You began to brush up. <<$bname>> pretty buttoned pants "Well pokeda <<$name>>, I still have things, can be seen as a."'

		act 'Leave':gt 'gskver'
	end
}

--- skverdin ---------------------------------
# placer_end
gs 'stat'

if Frend_num = 14:
	KatjaHorny += 10
	'<center><img src="images/qwest/alter/npc/14.jpg"></center>'
	if KatjaOhrenet > 0:
		if KatjaOhrenet = 1:'Kate goes all the way in silence, then mutters "ohrenet can, I just fucked quite familiar guy."'
		if KatjaOhrenet = 2:'Kate goes all the way in silence, then mutters "ohrenet can, I just fucked two virtually unknown to Man."'
		if KatjaOhrenet = 3:'Kate goes all the way in silence, then mutters "ohrenet can, us together just to fuck a whole pack Gopnik."'
		if KatjaOhrenet = 4:'Kate goes all the way in silence, then mutters "ohrenet can, we both like complete sluts fucking with strange guys."'
		if KatjaOhrenet = 5:'Kate goes all the way in silence, then mutters "ohrenet can, we both just fucked threesome with unfamiliar guy."'

		KatjaOhrenet = 0
	end

	'You said goodbye to Katja, and she went to her home.'

	 act 'Leave':
		 Frend_num = 0
		 gt 'gorodok'
	 end
end

--- placer_end ---------------------------------
# placer_sex
gs 'stat'

if dormrape = 0:
	'You ''re lying on the creaking iron bed in a dorm room peteushnoy. Around you stand <<$kol_man_text>> and discuss among themselves "Well boys, who first fucks this slut?"'

	act 'further':
		rape += 1
		gang += 1
		dormrape += 1
		minut += 5
		silavag = 0
		$boy = 'guy'
		guy += kol_man
		ciklkm = kol_man

		if dormrapeQW = 0:dormrapeQW = 1

		gt $curloc
	end
elseif dormrape = 1:
	'<center><img src="images/qwest/alter/placer/podval.jpg"></center>'
	:markdormrape
	ciklkm -= 1
	minut += 15
	dick = rand(12, 20)
	tiprand = rand(0, 2)

	if tiprand < 2:
		dynamic $sexstart2
		dynamic $sexcum
	elseif tiprand = 2:
		dynamic $analsexrude
	end
	if ciklkm > 0:'Then the space between your legs took the next guy.'
	if ciklkm > 0 and cumbelly >= 5:cumbelly -= 4 & cumfrot += 4 & 'One of the guys started vozmuschatsya "shit, boys, Cho you like this slut zastruhali? By the same approach to her dumb! In short let her clothes, I though it pizden wipe" You to feel as you wipe the abdomen and vagina which is stuck to cloth.'

	gs 'stat'

	if ciklkm > 0:jump 'markdormrape'

	'Finally it''s all over, guys got dressed and left the room. You sluggishly began to brush up.'

	act 'Leave':podvalrape = 0 & dormrape = 0 & gt 'gorodok'
end

--- placer_sex ---------------------------------
# podval_rape
gs 'stat'

if podvalrape = 0:
	'You ''re lying on a dirty mattress on the floor a dark basement smelling sewage, surrounded by empty bottles. Around you stand <<$kol_man_text>> and discuss among themselves "Well potsiki, pull the lot, who first pulls this slut?"'

	act 'further':
		rape += 1
		gang += 1
		podvalrape = 1
		sweat += 1
		minut += 5
		silavag = 0
		$boy = 'Gopnik'
		guy += kol_man
		ciklkm = kol_man

		if podvalrapeQW = 0:podvalrapeQW = 1

		gt $curloc
	end
elseif podvalrape = 1:
	'<center><img src="images/qwest/alter/placer/podval.jpg"></center>'
	:markpodvalrape
	ciklkm -= 1
	minut += 15
	dick = rand(12, 20)
	tiprand = rand(0, 2)

	if tiprand < 2:
		dynamic $sexstart2
		dynamic $sexcum
	elseif tiprand = 2:
		dynamic $analsexrude
	end

	if ciklkm > 0:'Then the space between your legs took the next guy.'

	gs 'stat'

	if ciklkm > 0:jump 'markpodvalrape'

	'Finally it''s all over, guys got dressed and went out of the cellar.'

	act 'Leave':podvalrape = 0 & gt 'gorodok'
end

--- podval_rape ---------------------------------
# gopnik_house
gs 'stat'

if gophouse = 0:
	'You sit in a dirty apartment with shabby wallpaper on a rickety chair at the table. Just sitting at the table <<$kol_man_text>> drinking and eating.'

	if alko < 6:
		'You feel, that very drunk, but are still able to think.'
	elseif alko >= 6:
		'You feel like the beginning of dizzy and the earth started to slip away from under the feet.'
	end

	'A couple of guys pick up and drag you into the room, there you laid on the sofa.'

	act 'further':
		rape += 1
		gang += 1
		gophouse = 1
		minut += 5
		silavag = 0
		$boy = 'Gopnik'
		guy += kol_man
		ciklkm = kol_man

		if gophouserapeQW = 0:gophouserapeQW = 1

		gt $curloc
	end
elseif gophouse = 1:
	'<center><img src="images/qwest/alter/placer/podval.jpg"></center>'
	:markgophouserape
	ciklkm -= 1
	minut += 15
	dick = rand(12, 20)
	tiprand = rand(0, 2)

	if tiprand < 2:
		dynamic $sexstart2
		dynamic $sexcum
	elseif tiprand = 2:
		dynamic $analsexrude
	end

	if ciklkm > 0:'Then the space between your legs took the next guy.'

	gs 'stat'

	if ciklkm > 0:jump 'markgophouserape'

	'Finally it''s all over, you feel like someone you clothes and buttons you again somewhere drag.'

	act 'look_around':gophouse = 0 & gt 'gorodok'
end

--- gopnik_house ---------------------------------
# placer_house
alko += 10
gs 'stat'
'You come across a company apartment and continued there to drink and have fun.'

if kol_man = 1:
	dick = rand(12, 25)
	$boy = 'guy'
	'You started hugging and kissing a man, <<$ev_name>> also started to kiss him.'

	act 'Sucking guy':
		cls
		bj += 1
		guy += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/placer/threesomeBJ.jpg"></center>'
		'Together with a friend , in turn.'

		act 'further':
			cls
			minut += 15

			if Frend_num = 14:
				KatjaLust += 5
				KatjaSlut += 5
				KatjaHorny = 0
				KatjaSex += 1
				KatjaGuy += 1
				KatjaBJ += 1
				KatjaOhrenet = 5
			end

			pose = 1
			lesbian += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/threesome.jpg"></center>'
			'You put cancer and parne came to your ass ready to fuck you. <<$ev_name>> sat in front of you and offered you my pussy you immediately began to lick.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum

			act 'Leave':gt 'placer_end'
		end
	end
elseif kol_man = 2:
	dick = rand(12, 25)
	$boy = 'guy'
	'The boys began to hug and kiss you with his girlfriend, <<$ev_name>> Man began to stroke between her legs and pulled out his cock.'

	act 'Sucking guy':
		cls
		bj += 1
		guy += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/placer/foursomeBJ.jpg"></center>'
		'You, too, leaned to the guy and started sucking his cock, <<$ev_name>> sucks the other guy.'

		act 'Fuck guys':
			cls
			minut += 15

			if Frend_num = 14:
				KatjaLust += 5
				KatjaSlut += 5
				KatjaHorny = 0
				KatjaSex += 1
				KatjaGuy += 1
				KatjaBJ += 1
				KatjaOhrenet = 4
			end

			gs 'stat'
			'<center><img src="images/qwest/alter/placer/foursome.jpg"></center>'
			dynamic $sexstart
			dynamic $sexstart3
			dynamic $sexcum

			act 'Leave':gt 'placer_end'
		end
	end
elseif kol_man = 3:
	$d_dozdat = {
		act 'wait for girlfriend':
			cls
			minut += 5
			gs 'stat'
			cumface = 0

			if Frend_num = 14:
				'<center><img src="images/qwest/alter/placer/katjacum.jpg"></center>'
				'Of the room came a tired but happy with Katja smeared in white mucus face.'
			end

			'Together with a friend you have brought each other in order and steel This collection of home.'

			act 'Leave':gt 'placer_end'
		end
	}

	$d_girlfrend_end = {
		act 'further':
			cls

			if Frend_num = 14:
				KatjaLust += 10
				KatjaSlut += 5
				KatjaHorny = 0
				KatjaSex += 1
				KatjaGuy += 1
				KatjaBJ += 1
				KatjaOhrenet = 1
			end

			gs 'stat'
			'The boys went to the bathroom and you were alone in the room.'
			dynamic $d_dozdat

			act 'Peek behind girlfriend':
				cls
				gs 'stat'

				if Frend_num = 14:
					'<center><img src="images/qwest/alter/placer/katjaend.jpg"></center>'
					'You looked in the room, on the bed lay naked Katja and clearly dosasyvala member of the guy after hot sex, the guy started to cum on your face and Katja smear sperm on her lips and cheeks.'
				end

				'You closed the door that would not interfere and wait for girlfriend.'
				dynamic $d_dozdat
			end
		end
	}

	$d_girlfrend_end2 = {
		act 'further':
			cls

			if Frend_num = 14:
				KatjaLust += 5
				KatjaSlut += 10
				KatjaHorny = 0
				KatjaSex += 1
				KatjaGuy += 2
				KatjaBJ += 2
				KatjaGang += 1
				KatjaOhrenet = 2
			end

			gs 'stat'
			'The guy lay on the bed and began to snore.'
			dynamic $d_dozdat

			act 'Peek behind girlfriend':
				cls
				gs 'stat'

				if Frend_num = 14:
					'<center><img src="images/qwest/alter/placer/katjaendgang.jpg"></center>'
					'You looked into the room that Katja furiously spire on both sides two guys, Katja only grunts holding member of the mouth.'
				end

				'You closed the door that would not interfere and wait for girlfriend.'
				dynamic $d_dozdat
			end
		end
	}

	'One of the guys suggested you uedenitsya in the room.'

	act 'Go to guy':
		cls
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
		'You should be left alone as the guy started to kiss you and paw'

		act 'Take by mouth':
			cls
			$boy = 'guy'
			dick = rand(15, 20)
			bj += 1
			guy += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/bj.jpg"></center>'
			'You sat on his haunches in front of a guy and he unbuttoned his pants pulled out his penis.'
			dynamic $dinrandbj

			act 'further':
				cls
				gs 'stat'
				tipsexrand = rand(0, 1)

				if tipsexrand = 0:
					cumlip += 1
					swallow += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/swallow2.jpg"></center>'
					dynamic $dinrandswallow
					dynamic $d_girlfrend_end2
				elseif tipsexrand = 1:
					'<center><img src="images/qwest/alter/placer/bj.jpg"></center>'
					'The guy whispered, "I want you"'

					act 'redouble efforts':
						cls
						cumlip += 1
						swallow += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/swallow2.jpg"></center>'
						'You become even more actively sucking dick, that would do blowjob.'
						dynamic $dinrandswallow
						dynamic $d_girlfrend_end2
					end

					act 'Lie on your back':
						cls
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/miss.jpg"></center>'
						'You lay on your back and one of the guys spread your legs, and the second came up to your face and put his penis in your mouth.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						dynamic $d_girlfrend_end2
					end

					act 'anal':
						cls
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/anal2.jpg"></center>'
						'You suggested the guy to fuck you in the ass, he gladly accepted and you undressed got on all fours.'
						dynamic $analsexrude
						dynamic $d_girlfrend_end2
					end
				end
			end
		end
	end

	act 'Stay in the room':
		cls
		horny += 20
		gs 'stat'
		'<center><img src="images/qwest/alter/placer/swing.jpg"></center>'
		'<<$ev_name>> whispering about something with a guy, then she went into the next room with him, leaving you with two guys. The boys sat down to you to close, one began to kiss your lips, and the second stroke your breasts.'

		act 'Stay with the guys':
			cls
			$boy = 'guy'
			dick = rand(15, 20)
			horny += 10
			bj += 2
			guy += 2
			gang += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/doublebj.jpg"></center>'
			'You guys started to undress , and you just giggled drunkenly, you do not understand how but in your mouth proved a member of one of the guys, and the second term you held in your hand. You started to suck the guys take turns. Finally.'

			act 'Lie on your back':
				cls
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/doublemiss.jpg"></center>'
				'You lay on your back and one of the guys spread your legs, and the second came up to your face and put his penis in your mouth.'
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum
				sexrand = rand(0, 1)

				if sexrand = 0:
					cumlip += 1
					cumface += 1
					gs 'stat'
					'Suddenly a guy who sucked you became close your mouth and smeared his cock cum to you on the lips and cheeks.'
					dynamic $d_girlfrend_end
				elseif sexrand = 1:
					'Guys suddenly decided to change places.'

					act 'further':
						cls
						horny += 10
						cumlip += 1
						cumface += 1
						dick = rand(15, 20)
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/doublemiss2.jpg"></center>'
						'Guys swapped, and the guy from whom you suck dick spread your legs, and the guy who fucked you slipped you smeared his cock in her mouth Cum, What would you clean it.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						dynamic $d_girlfrend_end
					end
				end
			end

			act 'get cancer':
				cls
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/rakom.jpg"></center>'
				'You undressed and got cancer on the bed waiting for guys.'

				act 'anal':
					cls
					dick = rand(15, 20)
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/doggyanal.jpg"></center>'
					'You guys have offered to fuck you in the ass, they gladly agreed. One of the guys came up to your face and put his penis between your lips, you immediately started to suck.'
					dynamic $analsexrude
					sexrand = rand(0, 1)

					if sexrand = 0:
						cumlip += 1
						cumface += 1
						gs 'stat'
						'Suddenly a guy who sucked you became close your mouth and smeared his cock cum to you on the lips and cheeks.'
						dynamic $d_girlfrend_end
					elseif sexrand = 1:
						act 'further':
							cls
							dick = rand(15, 20)
							gs 'stat'
							'<center><img src="images/qwest/alter/placer/anal.jpg"></center>'
							'The guy pulled out of your ass his limp dick and a guy who beat you you suck and joined up to your ass. '
							dynamic $analsexrude
							dynamic $d_girlfrend_end
						end
					end
				end

				act 'In pussy':
					cls
					pose = 1
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/doubledog.jpg"></center>'
					'One of the guys came up to your face and put his penis between your lips, you immediately started to suck.'
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					cumlip += 1
					cumface += 1
					gs 'stat'
					'Suddenly a guy who sucked you became close your mouth and smeared his cock cum to you on the lips and cheeks.'
					dynamic $d_girlfrend_end
				end
			end
		end
	end
elseif kol_man >= 4:
	'The boys began to embrace you and girlfriend.'

	act 'engaged in sex':
		cls
		gang += 1
		anal += 1
		sex += 1
		dp += 1
		dick = rand(15, 18)
		$boy = 'the first guy'
		dick2 = rand(15, 18)
		$boy2 = 'the second guy'

		if Frend_num = 14:
			KatjaLust += 5
			KatjaSlut += 10
			KatjaHorny = 0
			KatjaSex += 1
			KatjaGuy += 2
			KatjaBJ += 2
			KatjaGang += 1
			KatjaOhrenet = 4
		end

		gs 'stat'
		'<center><img src="images/qwest/alter/placer/dp.jpg"></center>'
		dynamic $doublepenetration
		dynamic $sexcum
		cumanus += 1
		gs 'stat'
		'The second guy started to cum inside your priests filling her with his sperm'
		act 'Leave':gt 'placer_end'
	end
end

!!if kol_man = 5:
!!end

!!if kol_man = 6:
!!end

--- placer_house ---------------------------------
# placer_house_one
alko += 10
gs 'stat'
'You went with a guy to his home.'
!!tipsexrand = rand(0, 1)
tipsexrand = 0

if tipsexrand = 0:
	'At the entrance a guy suddenly hugged you and started kissing.'

	act 'Kissing Man':
		cls
		horny += 10
		gs 'stat'
		'The guy unbuttoned his pants and pulled out a member, his hands pressed gently on your shoulder.'

		act 'To squat':
			cls
			horny += 10
			guy += 1
			bj += 1
			minut += 15
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/bjdan.jpg"></center>'
			'You sit down in front of the guy and kiss him standing member, then you wrapped around his lips and began to suck. After a while the man groaned and much more you realize, that he was going to cum.'

			act 'her lips':
				cls
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/cum.jpg"></center>'
				'You wrapped around his dick <<$liptalk>> and your mouth cum shot, you continued to suck and the guy finished your mouth.'

				act 'swallow':
					cls
					swallow += 1
					vaf += 1
					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/swallow.jpg"></center>'
					'You swallow your cum casual acquaintance, then in your mouth left a nasty aftertaste male seed. You have opened my mouth and stuck out her tongue showing that swallow cum. Man patted you on the head "Are you cool huesoska."'

					act 'Sucked dry up':
						cls
						vaf += 1
						sub += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/clean.jpg"></center>'
						'Smile in the slope to the penis and tongue and lips gathered the remnants of sperm with him.'

						act 'Leave':gt 'placer_end'
					end
				end

				act 'Spit out':
					cls
					swallow += 1
					dom += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/bjdan.jpg"></center>'
					'You wrinkled and spit cum out of his mouth on the floor.'

					act 'Leave':gt 'placer_end'
				end
			end
		end
	end
end

!!if tipsexrand = 1:''

--- placer_house_one ---------------------------------
# placer_gop_orgy
alko += 5
gs 'stat'
'You and <<$ev_name>> came in what is clearly semi-abandoned apartment where everywhere was rubbish and dirt. The boys began to pour vodka and actively fluster you with a girlfriend. Soon you guys started to undress and put on his back with his girlfriend.'
gang += 1
$boy = 'Gopnik'
ciklkm = (kol_man / 2) + 1
guy += ciklkm

if goporgyeQW = 0:goporgyeQW = 1

if Frend_num = 14:
	KatjaLust += 5
	KatjaSlut += 5
	KatjaHorny = 0
	KatjaSex += kol_man
	KatjaGuy += kol_man
	KatjaOhrenet = 3
end

act 'further':
	cls
	gs 'stat'
	'<center><img src="images/qwest/alter/placer/gopgang2.jpg"></center>'
	'You girlfriend put next to each other and began to fuck you.'
	:markgopgang
	ciklkm -= 1
	minut += 15
	dick = rand(12, 20)
	tiprand = rand(0, 2)

	if tiprand < 2:
		dynamic $sexstart2
		dynamic $sexcum
	elseif tiprand = 2:
		dynamic $analsexrude
	end

	if ciklkm > 0:'Then the space between your legs took the next guy.'

	gs 'stat'

	if ciklkm > 0:jump 'markgopgang'

	'The guys finally emptied their sperm reserves and continued to thump you interested in stopping.'

	act 'Leave':gt 'placer_end'
end

--- placer_gop_orgy ---------------------------------
# fbHouse
cls
gs 'stat'
'<center><img src="images/qwest/alter/Ev/fbHouse.jpg"></center>'
'<<$bname>> led you to your house and take you to your apartment. The apartment he put you on the couch and sat down next to you. <<$bname>> tilted towards your face'

act 'Kiss':
	cls
	boy += 1
	dick = rand(15, 25)
	parkfuckboy += 1
	$ppBoyName[parkfuckboy] = $bname
	ppBoyTipe[parkfuckboy] = 1
	ppBoyPlace[parkfuckboy] = 2
	!!masturbate 2 blow_job 3 gangbang
	ppdick[parkfuckboy] = dick
	fbhousetimes += 1
	pphj = 0
	ppbj = 0
	ppsex = 0
	ppanal = 0
	minut += 5
	horny += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/Ev/fbhKiss.jpg"></center>'
	'You started kissing a man and he began to slowly undress you.'

	act 'Take by mouth':
		cls
		ppbj += 1
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbhBJ.jpg"></center>'
		'You are inclined to the guy and unbuttoned his pants lowered his pants to get it <<dick>> inch dick. Play a little with him.'
		tiprand = rand(0, 1)

		if tiprand = 0:
			pose = 1
			$fbhactname = 'get cancer'
			'<<$bname>> gently but firmly puts you on your feet and Tips'
		else
			pose = 0
			$fbhactname = 'Lie on your back'
			'<<$bname>> gently but firmly puts you on the back'
		end

		act '<<$fbhactname>>':
			cls
			minut += 5
			ppsex += 1
			gs 'stat'

			if tiprand = 0:'<center><img src="images/qwest/alter/Ev/fbhdog.jpg"></center>'
			if tiprand = 1:'<center><img src="images/qwest/alter/Ev/fbhmiss.jpg"></center>'

			dynamic $sexstart
			dynamic $sexstart4
			dynamic $sexcum

			act 'Brush up':
				cls

				if ppbj > 0:bj += 1
				if pphj > 0:hj += 1
				if ppsex > 0:sex += 1
				if ppanal > 0:anal += 1

				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/fbhend.jpg"></center>'
				'You began to brush up. <<$bname>> pretty dressed "I was glad to be with you even sit, but my business, I''m_sorry."'

				act 'Leave':gt 'gorodok'
			end
		end
	end
end

--- fbHouse ---------------------------------
# fbDorm
gs 'stat'
gs 'fbDormD'
'<<$bname>> led you to ptushnoy hostel. "what, let''s go to my room."'
dynamic $d_fbd_start

act 'Ehmm... I changed my mind':
	cls
	minut += 5
	gs 'stat'
	'Seeing that <<$bname>> brought you to the hostel you decide to retreat until it''s too late. <<$bname>> began to persuade you, promising that everything will be fine, nobody knows.'

	if dom > 0:
		'But you were adamant, and as you are not trying to persuade the guy still decided to leave.'

		act 'Leave':gt 'gorodok'
	else
		'The guy managed to convince you and you bite my lip thinking, why all of you weave ropes, and whether it is necessary to repent for his act this.'
		dynamic $d_fbd_start
	end
end

--- fbDorm ---------------------------------
# fbDormD
$d_fbd_start = {
	act 'Go to the hostel':
		cls
		minut += 5
		gs 'stat'
		'Vahtersha seeing you snapped indignantly "<<$bname>>, you sort of infection, again what that damn led?" <<$bname>> grinned "Come on Aunt Kate, case that young, and with me chocolate." Aunt Katya noticeably slowed down and probubnela "Yup, how, you will wait."'

		tiprand = rand(1, 100)

		if tiprand >= 90:fbde = 1
		if tiprand<90 and tiprand >= 60:fbde = 2
		if tiprand < 60:fbde = 3

		dynamic $d_fbd_dormroom
	end
}

$d_fbd_dormroom = {
	act 'Go into the room':
		cls
		minut += 5
		gs 'stat'

		if fbde <= 1:
			'When you enter the room you will see, that here in the middle of a party, on the table there are bottles and snack, PTUshnik full walk. One of the guys got up to meet you "A, <<$bname>> Come, and introduced us to his girlfriend." <<$bname>> shook hands with the guys and introduced you after which you helped to sit down. Chairs was not enough and you sat down in the middle of the bed, sat on the one hand <<$bname>>, on the other hand are not familiar guy.'
			dynamic $d_fbd_mass
		elseif fbde = 2:
			'To the surprise of no one in the room and turned <<$bname>> quickly closed the door behind you and come to you hugged and kissed you.'
			dynamic $d_fbd_regular
		elseif fbde = 3:
			'The room was not familiar to you man. <<$bname>> greeted him and whispered something to him.'
			tiprand = rand(1, 100)

			if tiprand < 90:
				'Not familiar guy changed his sneakers to boots and left the room saying goodbye.'
				dynamic $d_fbd_regular
			elseif tiprand >= 90:
				'Unfamiliar guy pulled out of the bag a bottle of vodka and a snack and you persistently sat on the bed, and the boys sat on both sides of you.'
				dynamic $d_fbd_drunk
			end
		end
	end
}

$d_fbd_regular = {
	act 'Kiss':
		cls
		boy += 1
		dick = rand(15, 25)
		parkfuckboy += 1
		$ppBoyName[parkfuckboy] = $bname
		ppBoyTipe[parkfuckboy] = 1
		ppBoyPlace[parkfuckboy] = 3
		!!masturbate 2 blow_job 3 gangbang
		ppdick[parkfuckboy] = dick
		fbdormtimes += 1
		pphj = 0
		ppbj = 0
		ppsex = 0
		ppanal = 0
		minut += 5
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdKiss.jpg"></center>'
		'You started passionately kissing a man and he began to slowly undress you.'
		dynamic $d_fbd_blowhim

		act 'Continue kissing':
			cls
			minut += 5
			horny += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/fbdKiss.jpg"></center>'
			tiprand = rand(1, 100)

			if tiprand >= 80:
				'<<$bname>> gently but firmly pressing on your shoulder tilt causing your face to his cock.'
				dynamic $d_fbd_blowhim
			elseif tiprand<80 and tiprand >= 40:
				'<<$bname>> took you by the shoulders and put it on the back'
				dynamic $d_fbd_miss
			elseif tiprand < 40:
				'<<$bname>> you took the waist and put the cancer'
				dynamic $d_fbd_dog
			end
		end
	end
}

$d_fbd_blowhim = {
	act 'Take by mouth':
		cls
		minut += 5
		ppbj += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdBJ.jpg"></center>'
		dynamic $dinrandbj
		tiprand = rand(0, 1)

		if tiprand = 0:
			'<<$bname>> took you by the shoulders and put it on the back'
			dynamic $d_fbd_miss
		elseif tiprand = 1:
			'<<$bname>> you took the waist and put the cancer'
			dynamic $d_fbd_dog
		end
	end
}

$d_fbd_miss = {
	act 'Lie on your back':
		cls
		minut += 5
		horny += 10
		ppsex += 1
		pose = 0
		$boy = 'guy'
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdMiss.jpg"></center>'
		dynamic $sexstart
		dynamic $sexstart4
		tiprand = rand(1, 100)

		if tiprand < 70:
			dynamic $sexcum
			dynamic $d_fbd_end
		elseif tiprand >= 50 and tiprand < 70:
			'<<$bname>> you took the waist and put the cancer'
			dynamic $d_fbd_dog
		elseif tiprand >= 70:
			'<<$bname>> suddenly came out of you and climbed nimbly on your chest'
			dynamic $d_fbd_face
		end
	end
}

$d_fbd_dog = {
	act 'get cancer':
		cls
		minut += 5
		horny += 10
		pose = 1
		ppsex += 1
		$boy = 'guy'
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdDog.jpg"></center>'
		dynamic $sexstart
		dynamic $sexstart4
		tiprand = rand(1, 100)

		if tiprand < 70:
			dynamic $sexcum
			gs 'stat'
			dynamic $d_fbd_end
		elseif tiprand >= 50 and tiprand < 70:
			'<<$bname>> You went out of your way and pressed, you had to lie on his stomach'
			dynamic $d_fbd_anal
		elseif tiprand >= 70:
			'<<$bname>> suddenly came out of you, put you on the back and climbed nimbly on your chest'
			dynamic $d_fbd_face
		end
	end
}

$d_fbd_face = {
	act 'lie':
		cls
		minut += 5
		horny += 10
		cumface += 1
		cumlip += 1
		facial += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdFace.jpg"></center>'
		'<<$bname>> Fingering a member of the front of your face touching his purple head of your lips and tongue. Suddenly out of his cock flies jet of sperm and paopadaet your face, then another and another. Sharply smelling seed gets into your mouth and running down your cheeks.'
		dynamic $d_fbd_end
	end
}

$d_fbd_anal = {
	act 'Lie down on your stomach':
		cls
		minut += 5
		horny += 10
		ppanal += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdAnal.jpg"></center>'
		dynamic $analsex2
		tiprand = rand(1, 100)

		if tiprand >= 70:
			'<<$bname>> suddenly came out of you, put you on the back and climbed nimbly on your chest'
			dynamic $d_fbd_face
		elseif tiprand < 70:
			cumass += 1
			gs 'stat'
			'<<$bname>> groaned and you felt something warm as it was the seed fill your ass.'
			dynamic $d_fbd_end
		end
	end
}

$d_fbd_end = {
	act 'Brush up':
		cls

		if ppbj > 0:bj += 1
		if pphj > 0:hj += 1
		if ppsex > 0:sex += 1
		if ppanal > 0:anal += 1

		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbhend.jpg"></center>'
		'You began to brush up. <<$bname>> pretty dressed "I was glad to be with you even sit, but now come roommates, she know."'

		act 'Leave':gt 'gorodok'
	end
}

$d_fbd_drunk = {
	act 'drink':
		cls
		minut += 60
		alko += 6
		gs 'stat'
		'Noisy group fun and buzzing like a disturbed hive. You order typed, although it passed most of the booze. <<$bname>> pours you a drink again and offers.'

		act 'another drink':
			alko += 12
			dormrape = 0
			kol_man = rand(5, 16)
			$kol_man_text = 'guys'
			gt 'placer_sex'
		end
	end
}

$d_fbd_mass = {
	act 'drink':
		cls
		boy += 2
		gang += 1
		dick = rand(15, 25)
		parkfuckboy += 1
		$ppBoyName[parkfuckboy] = $bname
		ppBoyTipe[parkfuckboy] = 1
		ppBoyPlace[parkfuckboy] = 4
		!!masturbate 2 blow_job 3 gangbang
		ppdick[parkfuckboy] = dick
		fbdormtimes += 1
		pphj = 0
		ppbj = 0
		ppsex = 0
		ppanal = 0
		minut += 5
		horny += 10
		minut += 60
		alko += 6
		horny += 20
		gs 'stat'

		'You began to drink with the guys and quickly tipsy. <<$bname>> began to kiss you, and the second guy gently stroking your ass. <<$bname>> whispers to you "You both prefer, only me? Or maybe three poeksperementiruem?"'

		act 'Only with you':
			cls
			minut += 5
			horny += 10
			ppsex += 1
			pose = 0
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/fbdtsingle.jpg"></center>'
			'<<$bname>> began to kiss you and you do not understand how, were already naked guy under.'
			dynamic $sexstart
			dynamic $sexstart4
			'You feel like something hard and hot pressed his lips to you'

			act 'mouth open':
				cls
				minut += 5
				horny += 10
				ppsex += 1
				pose = 0
				ppbj += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/fbdtdouble.jpg"></center>'
				'You opened his mouth, and then in your mouth that has become something solid and warm. Opening his eyes you see curly pubic hair in front of his face. Only here before you came, that roommate decided to join you and put his cock in your mouth. You want to be troubled, but he took your head and began to stick it on his penis while yet <<$bname>> fuck you hold in your hands your feet.'
				dynamic $sexcum

				act 'suck':
					cls
					minut += 5
					cumface += 1
					cumlip += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/fbdtcum.jpg"></center>'
					'Suddenly you hit on the lips warm, viscous liquid with a pungent odor and taste even sharper. The second guy started razryazhatsya your mouth. Have you tried to portray something but were too drunk and lay only blowing bubbles from his mouth, where saliva is mixed up with sperm.'
					dynamic $d_fbd_end

					act 'helplessly lying':
						cls
						minut += 5
						cumface += 1
						cumlip += 1
						gs 'stat'
						'You lie entirely from exhaustion and then suddenly <<$bname>> taking you by the shoulders sent your face to its members'
						dynamic $d_fbd_threesome
					end
				end
			end
		end

		act 'Well. may be':
			cls
			minut += 5
			horny += 10
			ppsex += 1
			pose = 0
			gs 'stat'
			'You started uncertainly mumble something unintelligible and <<$bname>> gently taking you by the shoulders sent your face to its members.'
			dynamic $d_fbd_threesome
		end
	end
}

$d_fbd_threesome = {
	act 'Take by mouth':
		cls
		ppbj += 2
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/fbdrbj.jpg"></center>'
		'You parted his lips and took her mouth dick, taking the second term in the palm and began to masturbate. Do you sometimes change the terms in your mouth and try to iladoshke alternately serve boys. One of the guys gets up and coming to you from behind starts stroking your ass.'

		act 'continue to suck':
			cls
			minut += 5
			horny += 10
			ppsex += 1
			pose = 1
			$boy = $bname
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/fbdrsex.jpg"></center>'
			'You continued to suck dick and feel like the back is attached <<$bname>>.'
			dynamic $sexstart
			dynamic $sexstart4
			'<<$bname>> takes the cock out of your vagina and anus caresses your light stroking fingers.'

			act 'Relax and continue to suck':
				cls
				minut += 5
				horny += 10
				ppsex += 1
				pose = 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/fbdranal.jpg"></center>'
				'You tried to relax the ass and continued to suck dick in your mouth.'
				dynamic $analsex2
				'<<$bname>> took the cock out of your ass and lay on his back. He grabbed you by the waist and began to put on his penis.'

				act 'Sit down on the penis':
					cls
					minut += 5
					horny += 10
					ppsex += 1
					pose = 1
					dick2 = rand(15, 18)
					$boy2 = 'the second guy'
					dp += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/fbdrdp.jpg"></center>'
					'You sat on a limb and try to relax, the guy who came up to you suck you from behind and began to stroke your ass..'
					dynamic $doublepenetration
					'Of you suddenly got both members and sharply on their knees.'

					act 'Kneel':
						cls
						minut += 5
						cumface += 2
						cumlip += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/fbdrcum.jpg"></center>'
						'Suddenly you hit on the lips warm, viscous liquid with a pungent odor and taste even sharper. The second guy started razryazhatsya your mouth. You''re standing on my knees smeared with sperm in the face and look up at the guys.'
						dynamic $d_fbd_end
					end
				end
			end
		end
	end
}

--- fbDormD ---------------------------------
# fbGar
gs 'stat'
''

--- fbGar ---------------------------------
# fbSex
$d_fb_sexstart = {

}

--- fbSex ---------------------------------
# gorodok
$metka = $ARGS[0]
$loc = $CURLOC
$metkaStreet = $ARGS[0]
$locStreet = $CURLOC
cla
*clr
litltown = 1
alkoblock = 0
boynumBlock = 0
music_on = 0

'<center><h4>The Village</h4></center>'
'<center><img src="images/etogame/gorodok.jpg"></center>'
'A quiet province village, if you had no idea of you where abouts, you couldn''t differ this village from others. It''s tallest building is the chuches tower.'

if GorSlut = 6 and rand(1, 20) = 20:
	'To you a guy came up and offered to move into the bushes to get laid for a hundred.'

	act 'Agree':gt 'gevent', '5'
	act 'Refuse':gt $curloc
	exit
end

if AlbFather >= 1:
	if AlbFaterBlackTime = 0:AlbFaterBlackTime = totminut + 2880

	'You can see voting posters on the walls. They say, "Vote for Boris Barlovsky!".'
end

if AlbFaterBlackTime > 0 and AlbFaterBlackTime <= totminut and hour >= 16 and AlbFather = 1:gt 'AlbFatherQW'
if hour >= 16 and hour <= 22 and AlbFather = 2 and AlbZaDay + 30 < daystart and year > 2010:
	gt 'AlbStarsEnd'
end

if StoryLine > 0 and hour < 5 and motherWorry = 0 and SchoolAtestat = 0 and age < 18:
	motherWorry = 1
end

if NosovRevenge = 2 and daynosovrevenge + 1 >= daystart:
	cls
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[1]>> <<$npcSurName[1]>></font></b></center>'
	'<center><img src="images/qwest/alter/npc/1.jpg" ></center>'
	'Near the house "Well slut. If you do not want that to video became public, Now let''s go and talk to me."'

	act 'Go to Dimka':
		cls
		NosovRevenge = 3
		minut += 30
		gs 'stat'
		'You went to the house of Dimka. The house where he lives belongs to his parents, this is a big two-storey, detached house with a manicured lawn and a large garden. With Dimka you have gone to his room and he closed the door with a key.'

		act 'Go into the room Dima':gt 'dimaHome'
	end

	exit
end

if rand(1, 5) >= 4:
	if GorSlut = 3:'You catch yourself on people''s views, some are trying to find you in someone, and maybe learn. Occasionally you hear people chuckle. Looks like someone found out about your adventures.'
	if GorSlut = 4:'People look at you with a grin, someone makes vulgar gestures towards you some hints on your adventures.'
	if GorSlut >= 5:'All around you will recognize whore. Some came by and slap you on the ass. Grandmother on the benches name-calling you whore.'
end

gs 'stat'
gs 'time'

if car > 0 and cardrive = 20:
	cardrive = 20
	'In the parking stands <a href="exec:gs ''carF'', ''start''">your <<$car>></a>.'
end

if StoryLine = 1 and ParHomeBlock = 0:'Your home is in one of the houses, it''s an <a href="exec:minut += 15 & gt ''korrPar''">apartment</a> your parents own.'

'The <a href="exec:minut += 15 & gt ''vokzalG''">Train Station</a>.'
'The <a href="exec:minut += 15 & gt ''gpoli''">Clinic</a>.'

if hour >= 8 and hour <= 20:'The <a href="exec: minut += 15 & gt ''gaptek'', ''start''">Pharmacy</a>.'
if hour >= 8 and hour <= 17:'<a href="exec: minut += 3 & gt ''barbershop'', ''start''">The local barbershop</a>.'
if hour >= 8 and hour <= 22:'A kiosk selling <a href="exec:dynamic $kiosksig">cigarettes</a>.'

'<a href="exec:gt ''zaprF'', ''start''">Gas Station</a>.'
'<a href="exec:gt ''gdk''">House of Culture</a>.'

if SchoolBlock = 0:'Local <a href="exec:gt ''gschool''">school</a>.'
if hour >= 7 and hour <= 18:'The <a href="exec:gt ''etoexhib'', ''pos20''">Vocational School</a>.'
if hour >= 8 and hour <= 20:'The only major store in town is the <a href="exec:gt ''shop'', ''start''">supermarket</a>.'

'Small city <a href="exec:gt ''gskver'', ''park''">park</a>, in which people are going.'
'Aside from residential buildings is <a href="exec:minut += 5 & gt ''garmassiv''">Garage array</a>.'

if ArtemBeInHome > 0 and artemblok = 0:'Apartment <a href="exec:minut += 15 & gt ''artemhome''">Artem Chebotarev</a>.'
if DimaBeHomeOnce = 1 and DimaRudeBlock = 0:'Private house in which he lives <a href="exec:minut += 15 & gt ''dimaGoHome2''">Dimka Nosov</a>.'
if katjaFirstKiss >= 1:'Private house in which <a href="exec:minut += 15 & gt ''KatjaHome''">Katja Meynold</a> lives.'
if BeInNatBelHome = 1 and hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:'The house where the apartment <a href="exec:minut += 15 & gt ''NatBelHome''">Natasha Belova</a>.'
if BeInJulMilHome = 1 and hour >= 18 and hour <= 20 and week < 6 or hour >= 8 and hour <= 20 and week >= 6:'The house where the apartment <a href="exec:minut += 15 & gt ''JuliaMilHome''">Julia Milova</a>.'
if beinalbinahome > 0:'Luxurious mansion in which he lives <a href="exec:minut += 15 & gt ''albinaporog''">Albina Barlovskaya</a>.'

'Urban development enterprise <a href="exec:minut += 15 & gt ''Gshveyfab''">Garment factory named Paris Commune</a>.'

if workPTU > 2:act '<b>Go to the hostel</b>':gt 'etoexhib', 'pos40'

act 'Wait':
	cla
	waiting = input ("How long would you like to wait? (Not more than 120 minutes)")

	if waiting <= 0 or waiting > 120:
		minut += 15
	elseif waiting > 0 and waiting <= 120:
		minut += waiting
	end

	act 'Take a look at the clock':gt $curloc
end

if StoryLine = 1 and hour >= 8 and hour < 23 and cumface > 0 and rand(0, 3) = 0 and sosedday ! day:
	cls
	sosedday = day
	gs 'stat'

	if sosedknow = 0:
		sosedknow = 1
		'Suddenly someone call out to you "<<$name>>." You turn around and see a neighbor Uncle Misha, he looks at your face with surprise "It''s that on your face?" You blush and hesitate, Stra hand to wipe off the face of sperm. he grins "Well, all clear." and goes on about his business.'
	else
		'Once again you are confronted face to face with Uncle Misha, your neighbor, he chuckled looking at you "Well."'
	end
	act 'Further':gt $curloc
	exit
end

--- gorodok ---------------------------------
# garmassiv
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Garage array</h4></center>'
'<center><img src="images/pic/garmassiv.jpg"></center>'
'A large area is built up offsuit garages where motorists keep their cars.'

if StoryLine = 1:'In one of the garages located <a href="exec:minut += 5 & gt ''gargazel''">garage your stepfather</a>'

act 'Go into town':minut += 5 & gt 'gorodok'

--- garmassiv ---------------------------------
# gargazel
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Garage</h4></center>'

if father_go = 1 and hour >= 16 and hour < 21:
	'<center><img src="images/pic/gargazel.jpg"></center>'
	'Large garage in which to store the gazelle stepfather.'
else
	'<center><img src="images/pic/gargazel_empty.jpg"></center>'
	'Large garage in which to store the gazelle stepfather. Now the garage is closed on the lock.'
end

act 'Leave':minut += 5 & gt 'garmassiv'

if father_go = 1 and hour >= 16 and hour < 21:
	'Now stepfather in the garage, car repairs.'

	act 'Help':
		cls
		minut += 15
		father += rand(1, 3)
		gs 'stat'
		'You became stepfather to help repair the car, handing him the keys and bolts.'

		act 'further':gt $curloc

		if father >= 80 and hour = 20:
			'Stepfather took from a drawer a bottle of vodka and a jar of pickles. "I probably drink after work."'

			act 'further':
				cls
				minut += 60
				father += rand(1, 3)
				gs 'stat'
				'Stepfather poured himself a glass of vodka and drank. You began to talk with him about everything.'

				act 'further':gt $curloc
			end
		end
	end
end

if YouCanGar > 0:
	'In the garage there is stored <<GarTorgItem>> One unit of product, with a total capacity 100 One_unit. To, that would be able to sell the product out of the garage, you have to transfer it to your room.'

	if tovarL >= 30:
		'Home and so all culled product, transfer nowhere.'
	elseif tovarL < 30:
		perenGarTov = 30-tovarL
		'I could move out of the garage <<perenGarTov>> One unit of the goods in the room.'

		if GarTorgItem > 0:
			if GarTorgItem >= perenGarTov:
				act 'move <<perenGarTov>> One unit of product':
					cls
					minut += 60
					tovarL += perenGarTov
					GarTorgItem -= perenGarTov
					gs 'stat'
					'You hour dealt with the goods, and transferred it from the garage to the apartment.'

					act 'further':gt $curloc
				end
			end

			if GarTorgItem < perenGarTov:
				act 'move <<GarTorgItem>> One unit of product':
					cls
					minut += 60
					tovarL += GarTorgItem
					GarTorgItem = 0
					gs 'stat'
					'You hour dealt with the goods, and transferred it from the garage to the apartment.'

					act 'further':gt $curloc
				end
			end
		end
	end
end

--- gargazel ---------------------------------
# Gshveyfab
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Garment factory named Paris commune</h4></center>'
'<center><img src="images/pic/Gshveyfab.jpg"></center>'
'near <a href="exec:minut += 15 & gt ''gorodok''">the front door</a> is communicating factory which sits protection.'

act 'Get_Away':gt 'gorodok'

--- Gshveyfab ---------------------------------
# Gotel
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Hotel</h4></center>'
'<center><img src="images/pic/Gotel.jpg"></center>'
'near <a href="exec:minut += 3 & gt ''vokzalG''">the front door</a> Front is located <a href="exec:minut += 1 & gt ''Gresep''">reception</a>.'


if hour >= 12 and hour <= 13 and GermanQW > 0:'In the room with the inscription <a href="exec:minut += 1 & gt ''Goteladmin''">"administration"</a> The castle is open.'

--- Gotel ---------------------------------
# Gresep
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Reception</h4></center>'
'<center><img src="images/pic/Gotel.jpg"></center>'
'Behind the counter stands a pretty brunette.'

if GotelWork = 0 and GotelRoom = 0:
	if BeInOtel < 10:
		'The girl smiles at you and asks "the desired number? 500 rubles per day."'
	elseif BeInOtel >= 10:
		'Girl slyly smiling at you and asks "the desired number? 500 rubles per day. Or you are in another case?"'
	end

	!'
	if money >= 500:
		act 'pay room':
			cls
			money -= 500
			Goteldaytot = daystart + 1
			GotelRoom = 1
			gs 'stat'
			'You pay at the hotel.'

			act 'Leave':gt 'Gotel'
		end
	end
	'!

	act 'Ask for work':
		cls

		if GermanQW = 0:GermanQW = 1

		gs 'stat'
		'You asked the girl working at the hotel. She shrugged, "The hiring of workers engaged in the host Herman Hotels Leonidovich, it is mainly in the hotel with 12 prior_to 13."'

		act 'Leave':gt 'Gotel'
	end
end

act 'Leave':gt 'Gotel'

if GotelRoom > 0:
	act 'Go into the room':gt 'Gotelroom'
end

--- Gresep ---------------------------------
# Goteladmin
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Receptionist</h4></center>'
'<center><img src="images/pic/Goteladmin.jpg"></center>'
'At the table sat a man of thirty with a small, in an expensive suit and tie.'

!!if GotelWork = 0:end

act 'Leave':gt 'Gotel'

--- Goteladmin ---------------------------------
# Gotelroom
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><h4>Room</h4></center>'
'<center><img src="images/pic/Gotelroom.jpg"></center>'
'A small room in the hotel.'


act 'Leave':gt 'Gotel'

--- Gotelroom ---------------------------------
# gdk
$metka = $ARGS[0]
$loc = $CURLOC
music_on = 0
gs 'stat'
gs 'time'
'<center><b><font color="maroon">House of Culture</font></b></center>'

if hour >= 9 and hour < 20:
	'<center><img src="images/etogame/dk.jpg"></center>'
	'In the evenings, 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.'

	if money >= 25:act 'Sign in here (25 rubles)':money -= 25 & minut += 15 & gt 'gdkin'
end

act 'Leave':gt 'gorodok'

if hour >= 16 and hour <= 20:
	'Now the house of culture sports sections.'

	act 'Go to section':gt 'gdksport'
end

if hour >= 8 and hour <= 18:
	'Now the house has a library culture.'

	act 'Go to the library':gt 'gdkbibl'
end

if hour < 9:'<center><img src="images/etogame/dk_night.jpg"></center>'


if hour >= 16 and hour < 18:'Your sister <a href="exec:gt ''sister'', ''drinking''">Anja</a> sitting in the company of beautiful girls and guys drinking beer.'


--- gdk ---------------------------------
# gaptek
cla
clr
*clr
minut += 5
gs 'stat'
gs 'time'

'<center><B><font color="maroon">Drugstore</font></B></center>'
'<center><img src="images/etogame/aptek.jpg"></center>'

act 'Leave':gt 'gorodok'

if hour < 8 or hour > 20:
	'Pharmacy is closed'
	exit
end

!! for original start we can just use stockitem, for alt start there are other plot elements involved
if StoryLine = 0:
	*p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
	*pl '<center><table align="center">' + _
	FUNC ('$stock_item', 5, 'condoms', 100, 'prezik', $CURLOC) + _
	FUNC ('$stock_item', 1, 'pregnancy test', 200, 'pregtest', $CURLOC) + _
	FUNC ('$stock_item', 28, 'birth control pills', 500, 'tabletki', $CURLOC) + _
	FUNC ('$single_stock_item', 1, 'enema kit', 500, 'klisma', $CURLOC) + _
	FUNC ('$stock_item', 10, 'antibiotics', 500, 'lekarstvo', $CURLOC) + _
	FUNC ('$stock_item', 20, 'vitamin drinks', 500, 'vitamin', $CURLOC) + _
	FUNC ('$stock_item', 10, 'ointments for corns', 600, 'mosolmaz', $CURLOC) + _
	FUNC ('$stock_item', 25, 'lip balm', 100, 'lipbalm', $CURLOC) + _
	FUNC ('$stock_item', 1, 'weight loss pill', 2000, 'fatdel', $CURLOC) + _
	'</table></center>'
else
	'Condoms - 100 rubles'
	'Pregnancy test - 200 rubles'
	'Lubricant - 300 rubles'
	'Birth control pills - 500 rubles'
	if klisma = 0:'Enema - 500 rubles'
	'Medicine - 500 rubles'
	'Vitamins - 500 rubles'
	'Ointment for corns - 600 rubles'
	'Moisturizing Lip Balm - 1000 rubles'
	'Fat burners - 1500 rubles'
	if KandidNapr = 1:'Cure pills for yeast infection - 1,500 rubles'
	'Behind the counter, as always, sits aunt Luda. "Hi <<$name>>. How are you?"'
end

if motherQW >= 2:
	act 'Garden':
		cla
		cls
		gs 'stat'
		'<center><b><font color="maroon">Pharmacy</font></b></center>'
		'<center><img src="images/pic/aptek.jpg"></center>'

		if motherQW = 2:
			!! gaogorod = is how many condoms you purchased from here after reaching a certain point in the mother quest
			if gaogorod + rand(1, 20) < 40:
				if gaptekfirst = 0:
					gaptekfirst = 1
					minut += 5
					'You are considering showcases c drugs and are considering how to talk to my aunt. She notices your confusion and releasing the last buyer contacts you.'
					'- <<$name>>, what are you doing here trash? It should be what?'
					'- Yes, as if looking for a vegetable garden.'
					'- Niece, you''re not wrong store? We''ve got a pharmacy, you know - it is to laugh.'
					'- Know aunts. Mom asked you to buy everything for the garden.'
					'- Mom, so ... Horticultural ...'
					'She gravely examines you and brings the shop window with contraceptives.'
					'- Here we have all "for the garden." Choose.'
				else
					minut += rand(5, 15)
					if gaprezikday ! day or gatabletkiday ! day:
						'You wait until the last buyer leaves from the pharmacy, and then speak to my aunt.'
						'- Aunts, my mom would have it ... for a vegetable garden ...'
						'- Yes, I have understood, you go here, trash - she grins.'
						'- Thank you, aunty.'
						'- But not for that, and tell Natasha that she has time to finish with gardens.'
					else
						'You have decided to wait until my aunt is free, but every minute shoppers at the pharmacy became more and more. You just wasted your time.'
					end
				end
			else
				cls
				minut += rand(20, 30)
				motherQW = 3
				gs 'stat'
				'<center><b><font color="maroon">Drugstore</font></b></center>'
				'<center><img src="images/etogame/aptek.jpg"></center>'
				'You waited for the pharmacy will last buyer, and went up to my aunt.'
				'- Aunts, I would have it ... my mom for a vegetable garden ...'
				'- Well, of course my mother ...'

				act 'Next':
					cla
					cls
					'- I mean?'
					'- And that you yourself do not understand. <<$nickname>>, I look like a fool?'
					'- No ...'

					if gorslut = 0:'- Then it is not necessary to make a fool of me. Natasha mare, of course, hardy, but she is not 16 years old, the new "garden" it is unlikely to be mastered.'
					if gorslut > 0:'- Then it is not necessary to make a fool of me. The whole town knows that you <<$gnikname>>.'

					'- Well ...'
					'- Canned wildebeest. "Scumbag for balls" and that would ring true.'
					'You stood there and did not know what to say. You were ashamed to own aunt, though rather for fraud than for your immoral behavior.'
					'- Okay, figs with you. In the end, I am not your mother to read notation here. And with it you seem to have a full understanding, - smiled aunt. - With whom you are both such a whore? It seems the whole family we have always been decent.'

					act 'Get away from the counter':gt 'gaptek', 'start'
				end

				exit
			end
		else
			minut += rand(5, 15)
			if gaprezikday ! day or gatabletkiday ! day or galubri = 0 or (galubri = 1 and galubriday ! day):
				if rand(1, 10) = 10 and oluuosegunday ! day:
					cls
					'<center><b><font color="maroon">Drugstore</font></b></center>'
					'<center><img src="images/etogame/aptek.jpg"></center>'

					if tetyafirst = 0:
						'Aunt as always stood behind the counter and advised some grandmother. Periodically, she kept looking at you, and something in her eyes seemed strange to you. Letting go of the last buyer, aunt went to the front door, closed it with a key and hung a sign, "Accounting." It was obvious that she was nervous.'
						'- <<$nickname>>, I wanted to talk to you about something ... - finally she said.'
						'- What is it?'
						'- You see, I have right now in the life of such a situation ... there is one problem, though there is certainly not a problem, though ... I do not know who to ask ... even in a strange way to say this to you ...'
						'- Aunt - interrupted you. - May be enough to pull the cat is tail ... I?'
						'- You have probably correctly understand ...'
						'- Teeeeeeetyayayayayaya.'
						'- Okay, I will say it is. I recently came a man and ...'
						'- Is the wedding? Or are you pregnant? - Joyfully exclaimed you.'
						'- No, not yet. Give finish. So, there was a man, named Oluuosegun.'
						'- Oluuo ... who? Language is broken.'
						'- Oluuosegun, I want him just to Olu. He is from somewhere in Africa.'
						'- In the exotic pulled? - You laughed. Aunt missed your comment on deaf ears.'
						'- Well, he is a good man, and all the hardware is just so very ... how to say ... insatiable.'
						'- Iiiiii ... you want me to ... help you with it ... that is tra ... - in your voice felt surprise.'
						'- Well, you can not itself, can anyone of your friends agree - frightened she interrupted. - And certainly not for nothing.'
						'- Aunts, you do in your mind ??? !!! Not only that, you ask me, so still and friends are invited to find ??? !!! It seems like even in the article is, "inducement to prostitution" !!'
						'- Well, <<$nickname>>, well, I am sorry - almost in tears she said. - I do not want to lose this guy. I really thought he even hire prostitutes, but there are a whole bunch with them can be. Help me, I beg you.'
					elseif tetyafirst = 1:
						'You waited in line and approached the counter. Aunt leaned over to the window.'
						'- <<$nickname>>, remember our conversation? Nuuu ... about Ola? - She said in a whisper.'
						'- Yes, aunts, remember.'
						'- Well, that decided?'
					elseif tetyafirst = 2:
						'You waited in line and approached the counter. Aunt leaned over to the window.'
						'- <<$nickname>>, then how would it again ... need your help with Ola.'
					end

					act 'Agree':
						cla
						oluuosegunday = day
						if tetyafirst < 2:
							tetyafirst = 2
							'- Well, aunt, figs with you, help you, tea is not a stranger. But going to be!'
							'- Of course, of course, <<$nickname>> - happily she said. - Come home to me, are the keys.'
						else
							'- Oh, Auntie, you have exactly the grave svedesh.'
						end

						act 'Go to my aunt home':
							cla
							cls
							gs 'stat'
							'<center><b><font color="maroon">Aunts apartment</font></b></center>'
							'<center><img src="images/qwest/alter/motherQW/olu.jpg"></center>'
							'You unlocked the door to the apartment aunt and went inside.'

							if olufirst = 0:
								olufirst = 1
								galubri = 1
								minut += rand(5, 10)
								'Taking off shoes, you began to look around the room in search of Olu. Quick search returned no results and you already thinking to leave, when suddenly felt that someone or something is behind you. Turning around, you saw a huge black man, carefully studying you. "Good Aunt security system, but ... Alarms and angry dog ​​rolled into one. And where he had just been hiding?" Flashed through your mind.'
								'- Ty who? - Ebony asked in broken Russian.'
								'- Yes, I like this ... <<$nickname>> ...'
								'- <<$nickname>>? - The name was obviously nothing said. "Well, Aunt gives, could even prevent it."'
								'- Yes, <<$nickname>>, niece aunt Luda, it is her apartment.'
								'Negros face, it was clear that he was trying to understand the meaning of your words. Apparently, he really knew Russian bad. Finally reached him the meaning of what was said.'
								'- Ah, my darling your aunt. Good, good. And that need ti?'
								'- Yes, I would like to say ... come to help her ... with you ... help her with you, - you remember school English lessons.'
								'- Help with me? - Surprised Negro.'
								'Realizing that Interracial communication in a mixture of Russian and English is hardly something to give you a nod indicated Olu pants and looked at him. At this time, a long time to think about the meaning of these actions Negro did not have, and show you the famous golivudskie smile, he pulled out his h ... pulled out his h ... got his m ...'

								act 'Wake':
									cla
									cls
									minut += 30
									guy += 1
									anal += 1
									anus += 10
									cumanus = 1
									sub += 5
									agape = 3
									agapetime = totminut

									if mop ! 1:mop = 0

									hapri = 0
									gs 'stat'
									'<center><b><font color="maroon">Aunts apartment</font></b></center>'
									'<center><img src="images/qwest/alter/motherQW/olu1.jpg"></center>'
									'You woke up from a sharp pain. The ass was burning with fire, you were crying, screaming, trying to escape, but Olu gripped you and continued to fuck my monster. Your cries of his even more wound up.'
									'In a few minutes you will have ceased to feel his ass, forces in attempts to break you no longer exists, and all that you could, so it izredko sob. Olu soon broke down and discharged you right in the ass.'
									'Catching his breath, Ebony gently lifted you helped to get dressed and accompanied her to the door. Though strength is almost gone, anger was rife. Everything you wanted to at the time, so it is to strangle my aunt.'

									act 'Back to aunt':
										cls
										gs 'stat'
										'<center><b><font color="maroon">Drugstore</font></b></center>'
										'<center><img src="images/etogame/aptek.jpg"></center>'

										minut += 15
										'You ran back to the pharmacy and stopped at the door. You look like a jack-was-the-box. You looked in the wrong side of the counter.'
										'My aunt was talking to another customer, some guy full years under 40 who choose what brand zhiroszhigatelnye pills to take. Seeing you and your opinion, aunt stopped abruptly in mid-sentence, his face reflected fear. A guy looked at her blankly, followed the direction of her gaze. Behind him in your side turned the other buyers in the queue.'
										'- Pray, aunt, - through clenched teeth you. - KILL fuck !!'
										'The first dangerous moment realized just the same guy. Surprisingly agile for his physique, he jumped from the place where literally a fraction of a second you were trying to reach through the window counter aunt, and judiciously deciding that running, especially from an angry woman, much more effective than any pills, beat a hasty retreat from the pharmacy . Further recognition has come to the other customers, and they quickly began to leave the future place of fighting.'
										'- <<$nickname>>, let s talk!'
										'- AT THE FUNERAL OF YOUR TALKING !!'
										'Are you trying to get to his aunt, but every time she managed to dodge and then increase the distance between you.'
										'- The bastards ... BITCH ... creature ... scum ... SHEEP ... HATE ... - every word was accompanied by a cast of what was on hand at the aunt.'

										act 'An hour later':
											cls
											minut += 75

											if son > 1:son = 1

											'<center><b><font color="maroon">Drugstore</font></b></center>'
											'<center><img src="images/qwest/alter/motherQW/gaptek.jpg"></center>'
											'"Elephant in the room" - perhaps the most gentle expression, which you could describe the state of the pharmacy.'
											'You and aunt sat on the floor in different corners of the room and breathed heavily. You did not manage to get to it, though a few shots yet reached the goal, and Aunt wincing rubbing sore spots.'
											'Behind the glass front door you notice the crowd of onlookers, who all this time watching the show. Among them you will even notice the police, do not even try to go inside and to separate you. Seeing you view a crowd of onlookers with the police quickly resolved.'
											'- <<$nickname>> ... lets talk ... please ... - breathlessly said my aunt.'
											'- What the fuck ... talk - you threw a bottle of some kind of colorless liquid, but the strength you have left, so she broke at the feet of an aunt.'
											'- Well, I am sorry ... <<$nickname>> ...'
											'- What the hell, I am sorry, Aunt ?! Your ebyr nearly tore me apart! And you do not even warned me !!'
											'- Would you ... agreed to help ... if ... know that?'
											'- Yes ... No ... I do not know ...'
											'- You see ...'
											'You are thinking. In the words of Aunt made ​​sense. Anger, of course, still remains, but the strength to fight and swear was not there. Aunt wearily rose and walked up to you and sat down.'
											'- All that bad?'
											'- Bad? Yes in the ass is a pain that does not pass!'
											'- I understand - aunt winced, remembering the experience. - What did you, no lubrication or what?'

											if age < 18 and ssdostup = 0:'- Where do you take it? In the adult store I have not allowed. Besides, I do ofigela on its size and disconnected, and woke up when it was too late.'
											if age >= 18 or ssdostup = 1:'- Yes, I even did not have time to understand. When I saw razmerchik, so we can say disconnected. And when I came it was too late. In addition, far away to the city to go.'

											'- I see ... I am sorry again. <<$nickname>>, every day I am in town, so that I could bring you a little bit.'
											'- At least on this thank you, aunt.'
											'- And Olu say that was more careful next time.'
											'- What the hell next time ?! I look like a masochist ?!'
											'- Well, <<$nickname>>, well, please - pleaded aunt. - I am alone with him could not do it. And not for just the same.'
											'- I have heard that.'
											'- Remember when I said that I was willing to hire him, even the girls? Well, I would better pay you will, than someone else. Oh, please.'
											'- Cool, man. If my mother a whore, then you just prison crying! The first call will not run, but if other things will not, then to hell with you, help you.'
											'- Thank you, thank you, thank you, beloved niece - aunt nearly suffocated you in his arms, she was very happy to your account.'

											act 'Go home':gt 'korrPar'
										end
									end
								end
							else
								if rand(1, 5) ! 5:
									minut += 5
									'Taking off shoes, you went straight to the big room, where he found Ola.'
									'- Hi, <<$nickname>> - Ebony smiled his smile golivudskie unchanged.'
									'- Well hello, my black friend - meaning of the phrase Olu clearly do not understand.'

									if olufirst = 1:
										olufirst = 2
										'- My darling say, I make you too sick last time.'
										'- Yes.'
										'- Sorry for that ... I am sorry ... - he looked down guiltily.'
										'- Well, I hope more of this will not happen.'
									end

									act 'Next':
										cls
										minut += 30
										guy += 1
										anal += 1
										anus += 10
										sub += 1
										cumanus = 1

										if lubri > 0:
											agape = 1
											agapetime = totminut
											horny += 20
										else
											agape = 2
											agapetime = totminut
											horny += 10
										end

										gs 'stat'
										picrand = rand(1, 3)
										'<center><b><font color="maroon">Aunts apartment</font></b></center>'
										'<center><img src="images/qwest/alter/motherQW/olu<<picrand>>.jpg"></center>'
										'Olu undressed himself and helped you. You sucked his little monster, so he took the firing position. When it was done, you lay down on the sofa.'

										if lubri > 0:'Ebony took you grease squeezed himself into the hands and fingers smeared your anus, and then his penis.'
										if lubri = 0:'Ebony was gently massaging your anus, exponent introduced first one, then two, three fingers and began to pull out the ass.'

										'Finally, he pulled his fingers, and you feel like its a great device ran into your hole.'
										'You squealed a little pain when he was a monster, your ass apart, came in you.'
										'Olu froze for a moment, giving your ass to adjust to the protruding member in it, and then started to drive them all the more insistent.'
										'You were a little hurt, but at the same time nice when a member moved inside your ass.'
										'The Negro groaned and you feel like you jet of sperm hit the inside of your body.'

										if oluD = 0 and rand(1, 10) = 10:
											oluD = 1
											'- By the way, <<$nickname>>, five adults and soon has to leave the city? - Olu asked after a while.'
											'- Well, yes, most likely - sluggishly responded to you.'
											'- In the city now learn my niece Demarcus.'
											'- Well, not a niece and nephew, most likely. But what are you getting at?'
											'- I see five lubit real man - said with a smile and nodded at Olu its not yet fallen member.'
											'- Yeah, of course. And where I can find your nephew?'
											'- Where is usually to meet a girl in the city? Park, coffee shop.'
											'- Well, yes, and can meet with your nephew.'
										end

										'Olu helped you get dressed and accompanied her to the door.'

										act 'Back to aunt':
											cls
											gs 'stat'
											'<center><b><font color="maroon">Drugstore</font></b></center>'
											'<center><img src="images/etogame/aptek.jpg"></center>'

											minut += rand(5, 10)
											money += rand(500, 700)
											'You ran to the pharmacy and waited until Aunt free.'
											'- Thank you very much, <<$nickname>> - happily she said, and held out an envelope. - Here are a few, of course, but believe me, in all sincerity. I really appreciate your help.'

											act 'Leave':gt 'gorodok'
										end
									end
								else
									cls
									'<center><b><font color="maroon">Aunts apartment</font></b></center>'
									'<center><img src="images/etogame/korr2.jpg"></center>'
									'You unlocked the door to the apartment aunt and went inside.'
									'Taking off shoes, you went straight to the big room where there was usually Olu. Going to the door, you hear a woman moaning.'

									act 'Look':
										cls
										picrand = rand(1, 3)
										'<center><b><font color="maroon">Aunts apartment</font></b></center>'
										'<center><img src="images/qwest/alter/motherQW/oluM<<picrand>>.jpg"></center>'

										if oluM = 0:
											oluM = 1
											minut += 25
											horny += 20
											'You quietly opened the door and looked inside. What he saw surprised you. Your mother was writhing on the penis and Olu is clearly getting a lot of fun. "And he just placed it, especially not in the ass, " flashed through your mind. You are seeing this little porn show and went out into the corridor. After 10 minutes, your mother came and stared at you.'
											'-Docha?'
											'- Mum ...'
											'- Aunt?'
											'- Aunt ...'
											'You both giggled nervously.'
											'- <<$nickname>>, give me 5 minutes, I will give myself up, and then go talk to my sister.'

											act 'Back to aunt':
												cls
												gs 'stat'
												'<center><b><font color="maroon">Drugstore</font></b></center>'
												'<center><img src="images/etogame/aptek.jpg"></center>'

												minut += 15
												'You went to the pharmacy with his mother and aunt waited until cleared, and while buyers disperse.'
												'- Well hello, madam Khrenova - start your mother.'
												'- Natasha, are you talking about? - Tried to fool matted aunt.'
												'- People, do not play. She guess where we are faced with <<$nickname>> or suggest?'
												'- Itself ...'
												'- Well, you are so quick-witted. Nail to you, sister, but in a good mood.'
												'- Your daughter has already tried to ...'
												'- Yes? - Mother stared at you.'
												'- Well, yes, it was ... after the first time to Olu ... - sheepishly told you. - Paul pharmacy smashed.'
												'- Only half? - Your mother laughed. - In general, all right, if she asks not against your Olu, you and I, in principle, too. But try its still something to draw - buried in a nearby cemetery. You know me, do not look that big sister. Everything all right?'
												'- I see ...'
												'- I can not hear!'
												'- Yes, I have understood, I understood!'
												'- That is wonderful, and now <<$nickname>> home. With you we still have to talk.'

												act 'Go home with mother':
													cls
													minut += 60
													motherQW = 4
													gs 'stat'
													'<center><b><font color="maroon">Маmа</font></b></center>'
													'<center><img src="images/qwest/alter/mother.jpg"></center>'

													'You came home, and the mother immediately dragged you into the kitchen.'
													'- Come on, tell me how you were turned.'
													'Have you told her how Aunt first realized that you buy condoms for yourself how begged to help her with Olu, as you agreed, as a defeated pharmacy.'
													'- It is clear, all in the style of Luda. If you can not push, then immediately to the floor and burst into tears, well, money or offers.'
													'- Do you own something like?'
													'- Yes, as a. They found that Olu more than a year. It almost from the beginning asked me to help. I agreed to make a duplicate key, and occasionally go to him. Although lately not so often. Looks like he did wear out so that it completely forgot about me and invited you.'
													'- She is a little head like forgetfulness is not worth it.'
													'- Or an entire pharmacy.'
													'You both laughed.'
													'- As I said, I do not mind what you do with this Olu fuck. It is your business, but first, be careful, nevertheless it really is not very small.'
													'- Yeah. I do not understand how he climbed into you. I have it only in the ass.'
													'- In the ass? - Surprised mother. - Hmm ... will have to try as a thread. Ugh, so what am I doing?'
													'- On the ass.'
													'- Oh you. But, remember. Second, your aunt - hitryuschie bitch. I doubt that she will now that the thread still offer me afraid, but still. And that will eventually suck to some bloke for discounts on items for her pharmacy.'
													'- Has she offered you such?'
													'- Yes, it was. I refused. And thirdly <<$nickname>>, I understand that you are young girl, and the money you need, but do not change the sex for money. It is better to be a slut or whore than a prostitute.'
													'- Hmmm ... Is there a difference?'
													'- Yes. While you may not realize this, but there is.'
													'- Well, remember that. And with the money aunt what to do?'
													'- With money aunt, you say ... In the good it would be necessary to give up, of course ... On the other hand she offered ... And then the bitch will get it all at once ... Well, can not be punished differently, so though the purse hit her ...'
													'You have talked about 15 minutes about the treachery aunt Code honest sluts and whores and left.'

													act 'Leave':gt 'korrPar'
												end
											end
										else
											minut += 25
											horny += 20
											'You quietly opened the door and looked inside. What I saw did not surprise you. Your mother was writhing on the penis and Olu is clearly getting a lot of fun. "And he just placed it, especially not in the ass" has once again caught you on your thoughts. Mother noticed you and smiled. You are seeing this little porn show and went out into the corridor.'
											'"I think she can handle herself"'

											act 'Leave':gt 'gorodok'
										end
									end
								end
							end
						end
					end

					act 'Do not agree':
						cla
						oluuosegunday = day
						if tetyafirst = 0:
							tetyafirst = 1
							'- You just moved, aunt! Niece of the litter of a black man trying to do!'
							'- I am sorry - she said sadly. - You are right, it was not necessary to contact you.'
							'- "Quiet, Masha, I Dubrovsky" - remember you are a school Hochma. - I did not say no, but did not say yes. Overall, I think.'
						elseif tetyafirst = 1:
							'- While nothing is decided. I think.'
							'- Well then - she said sadly.'
						else
							'- Nah, aunts, now I can not.'
							'- Well then. Today will have the most rap - saying this she winced.'
						end

						act 'Leave':gt 'gorodok'
					end

					exit
				else
					'You waited in line and approached the counter' + iif(galubri = 1,'.', ', nodding to the desired display case.')
				end
			else
				'You waited in line and approached the counter' + iif(galubri = 1,'.', ', nodding to the desired display case.') + '"All sold out, light, - said my aunt. And with malice added almost in a whisper, - Have your ebaryam wait until tomorrow."'
			end
		end

		act 'Step away':gt $curloc
	end
end

if StoryLine = 1:
	if money >= 100 and motherQW >= 2 and gaptekfirst = 1 and gaprezikday ! day:
		act 'Buy <b>condoms</b> (100 rubles) <<iif(prezik > 0, ''[left:<b>'' + prezik + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many packages you want to buy? (One package contains 5 condoms)")

			if portion <= 0:portion = 1
			if portion > 2 and motherQW < 3:portion = 2 & '"Then 2 packages until I have enough. It is better not to buy a lot at once, and then Aunt may become suspicious."'
			if portion > 5 and motherQW >= 3:portion = 5 & '"<<$name>>, rublesber goods factory does not have time to deliver products."'

			if portion * 100 <= money:
				prezik += portion * 5
				minut += 5 + (portion / 5)
				money -= portion * 100
				gaprezikday = day
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought condoms and paid the money to the cashier.'

				if motherQW < 3:gaogorod += portion
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	if money >= 200 and motherQW >= 2 and gaptekfirst = 1:
		act 'Buy  <b>pregnancy tests</b> (200 rubles) <<iif(pregtest > 0, ''[left:<b>'' + pregtest + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many packages you want to buy? (One package contains two testers)")

			if portion <= 0:portion = 1

			if portion * 200 <= money:
				pregtest += portion * 2
				minut += 5 + (portion / 5)
				money -= portion * 200
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought pregnancy tests and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	!! you can only buy lube here if your aunt arranged for it and you haven''t bought any today yet
	if money >= 300 and galubri = 1 and motherQW >= 2 and gaptekfirst = 1 and galubriday ! day:
		act 'Buy <b>lubricant</b> (300 rubles) <<iif(lubri > 0, ''[left:<b>'' + lubri + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input ("How many packages you want to buy? (One tube lasts for 5 uses)")

			if portion <= 0:portion = 1
			if portion > 10:portion = 10 & '"<<$nickname>>, I sell only 10 pieces, no longer brought, I''m_sorry."'

			if portion * 300 <= money:
				lubri += portion * 5
				minut += 5 + (portion / 5)
				money -= portion * 300
				galubriday = day
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought some lubricant and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	if money >= 500:
		if gatabletkiday ! day:
			act 'Buy <b>birth control pills</b> (500 rubles) <<iif(tabletki > 0, ''[left:<b>'' + tabletki + ''</b>]'', '''')>>':
				cla
				*clr
				portion = input ("How many packages you want to buy?")

				if portion < 0 or (portion > 1 and motherQW < 3):portion = 1 & '"First package I still have enough. It is better not to buy a lot at once, and then Aunt may become suspicious."'

				if portion * 500 <= money:
					tabletki += portion * 28
					minut += 5 + (portion / 5)
					money -= portion * 500
					gatabletkiday = day
					'<center><img src="images/etogame/kassa.jpg"></center>'
					'You bought some lubricant and paid the money to the cashier.'
				else
					'You do not have enough money.'
				end

				act 'Move away from the counter':gt 'gaptek', 'start'
			end
		end

		if klisma = 0 and motherQW >= 2 and gaptekfirst = 1:
			act 'Buy <b>enema</b> (500 rubles)':
				cla
				*clr
				klisma = 1
				minut += 5
				money -= 500
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought an enema and paid the money to the cashier.'

				act 'Move away from the counter':gt 'gaptek', 'start'
			end
		end

		act 'Buy <b>medicine</b> (500 rubles) <<iif(lekarstvo > 0, ''[left:<b>'' + lekarstvo + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many packages you want to buy? (One package contains 10 pills)")

			if portion <= 0:portion = 1

			if portion * 500 <= money:
				money -= portion * 500
				minut += 5 + (portion / 5)
				lekarstvo += portion * 10
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought drugs and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end

		act 'Buy <b>vitamins</b> (500 rubles) <<iif(vitamin > 0, ''[left:<b>'' + vitamin + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many packages you want to buy? (One package contains 20 pills)")

			if portion <= 0:portion = 1

			if portion * 500 <= money:
				vitamin += portion * 20
				minut += 5 + (portion / 5)
				money -= portion * 500
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought vitamins and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	if money >= 600:
		act 'Buy <b>ointment for corns</b> (600 rubles) <<iif(mosolmaz > 0, ''[left:<b>'' + mosolmaz + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many packages you want to buy? (One package contains 10 treatments)")

			if portion <= 0:portion = 1

			if money >= portion * 600:
				money -= portion * 600
				minut += 5 + (portion / 5)
				mosolmaz += portion * 10
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought some oinment packages and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	if money >= 1000:
		act 'Buy <b>moisturizing lip balm</b> (1,000 rubles) <<iif(lipbalm > 0, ''[left:<b>'' + lipbalm + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many lip balms you want to buy? (One lip balm is good enough for 25 uses)")

			if portion <= 0:portion = 1

			if portion * 1000 <= money:
				lipbalm += portion * 25
				minut += 5 + (portion / 5)
				money -= portion * 1000
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought some lip balm and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end
	end

	if money >= 1500:
		act '<b>Buy fat burners</b> (1,500 rubles) <<iif(fatdel > 0, ''[left:<b>'' + fatdel + ''</b>]'', '''')>>':
			cla
			*clr
			portion = input("How many fat burners you want to buy?")

			if portion <= 0:portion = 1

			if portion * 1500 <= money:
				fatdel += portion
				minut += 5 + (portion / 5)
				money -= portion * 1500
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought some fat burning capsules and paid the money to the cashier.'
			else
				'You do not have enough money.'
			end

			act 'Move away from the counter':gt 'gaptek', 'start'
		end

		if KandidNapr = 1:
			act 'Buy cure pills for yeast infection (1,500 rubles)':
				cla
				*clr
				minut += 10
				money -= 1500
				Kandidoz = 0
				! WD: Remove Dupe Images ~ '<center><img src="images/pic/kassa.jpg"></center>'
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought tablets and paid the money to the cashier.'
				'Immediately about cash you swallow the tablet.'

				act 'Move away from the counter':gt 'gaptek', 'start'
			end
		end
	end
end

--- gaptek ---------------------------------
# gdkbibl
$metka = $ARGS[0]
$loc = $CURLOC
frost = 0
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">House of Culture</font></b></center>'
'<center><img src="images/qwest/alter/gdkbibl.jpg"></center>'
'A small library with lots of interesting books.'

act 'Leave':gt 'gdk'

if hour >= 8 and hour <= 18:
	act 'Read science book (1:00)':
		cls
		minut += 60

		if intel >= 50:intel += rand(0, 1)
		if intel < 50 and intel >= 25:intel += rand(1, 2)
		if intel < 25:intel += rand(1, 3)

		gs 'stat'
		'You are reading a book for an hour trying to figure out all sorts of clever frazochki and understand the subject description.'

		act 'Put the book':gt $curloc
	end

	act 'Read entertaining book (1:00)':
		cls
		minut += 60
		manna += 100
		willpower += 100
		gs 'stat'
		'You are in for an hour reading a book about the adventures.'

		act 'Put the book':gt $curloc
	end

	act 'Read the collected works of Leo Tolstoy (1:00)':
		cls
		minut += 60

		if will >= 50:will += rand(0, 1)
		if will < 50 and will >= 25:will += rand(1, 2)
		if will < 25:will += rand(1, 3)

		gs 'stat'
		'You are in for an hour reading a book. Tolstoy classic course, no one denies, but he wrote tyagomotinu rare.'

		act 'Put the book':gt $curloc
	end
else
	'Library closes.'
end

--- gdkbibl ---------------------------------
# gdksport
$din_go_to_home_dance = {
	act 'Drive back':
		cls
		minut += 15
		gs 'stat'
		'You called a taxi and you brought back to town.'

		if cumface > 0:cumface = 0 & 'Along the way you wiped the sperm from the face wipes.'

		act 'Leave':gt 'gorodok'
	end
}

$din_beg_gor_sec = {
	cls
	gs 'stat'
	'Subsriptions section running costs 100 rubles for 30 days.'

	if money >= 100 and gsAboBeg = 0:
		act 'Buy a subscription to the running section 100 rubles':
			cls
			money -= 100
			gsAboBeg += 30
			gs 'stat'
			'You bought a ticket for 30 visits section running.'

			act 'Leave':gt 'gdksport'
		end
	end

	act 'Leave':gt 'gdksport'
}

$din_dance_gor_sec = {
	cls
	gs 'stat'
	'Subscriptions section dancing costs 100 rubles for 10 days.'

	if money >= 100 and gsAboDance = 0:
		act 'Buy a ticket to the dance 100 rubles':
			cls
			money -= 100
			gsAboDance += 10
			gs 'stat'
			'You bought a ticket for 10 visits dance section.'

			act 'Leave':gt 'gdksport'
		end
	end

	act 'Leave':gt 'gdksport'
}

$din_voll_gor_sec = {
	cls
	gs 'stat'
	'Aboniment section volleyball costs 300 rubles for 30 days.'

	if money >= 300 and gsAboVolley = 0:
		act 'Buy a subscription for 300 rubles volleyball':
			cls
			money -= 300
			gsAboVolley += 30
			gs 'stat'
			'You bought a ticket for 30 visits section volleyball.'

			act 'Leave':gt 'gdksport'
		end
	end

	act 'Leave':gt 'gdksport'
}

$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">House of Culture</font></b></center>'
'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
'The house work culture section <a href="exec:dynamic $din_beg_gor_sec">Racing</a>, <a href="exec:dynamic $din_dance_gor_sec">Dance</a> and <a href="exec:dynamic $din_voll_gor_sec">Volleyball</a>.'

if kotovLoveQW > 0 and hour = 16:
	'Do you see how the club is included <a href="exec:minut += 3 & gt ''kotovEv''">Vitek Kotov</a> with a large sports bag.'
elseif grupNPC[3] >= 80 and hour = 17 and ivansportday ! day:
	'Do you see how the club included <a href="exec:minut += 3 & gt ''IvanEv''">Ivan Prokhorov</a> with a large sports bag.'
end

if grupNPC[5] >= 80 and fedorKozlovQW = 0 and GorSlut = 0 and UNSTARTER = 1:
	!!event does not have to start over because they do not
	cls
	fedorKozlovQW = 1
	numnpc = 5
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
	! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
	'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
	'The club you unexpectedly met Fedor Kozlov in your class. He smiled affably you "Hello <<$name>>. Hmm ... Here is the deal ... I have an extra ticket to the movies. Let''s go together."'

	act 'Refuse':
		cls
		grupNPC[5] = 40
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'You refused to Fedor referring to employment. Fedor frowned. "Okay. Whereas some other time."'

		act 'Leave':gt 'gdksport'
	end

	act 'Agree':
		cls
		fedorKozlovQW = 10
		grupNPC[5] = 100
		minut += 15
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
		'You agreed and delighted Fedor took you to a movie theater located in the park.'

		act 'Watch a movie':
			cls
			minut += 100
			manna += 100
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
			'Fedor gave tickets at the entrance and you went into the hall. Soon the lights went out and started the movie. Fedor sat motionless and only occasionally glancing at you. Movie was quite interesting and you watched it with pleasure. When the movie ended, the hall lights were turned on and Fedor became accompany you. "<<$name>>. I like you. Maybe we could meet?"'

			act 'Refuse':
				cls
				grupNPC[5] = 40
				fedorKozlovQW = 2
				minut += 15
				gs 'stat'
				'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
				! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
				'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
				'You refused to meet with him to Fedor and was invited to stay friends. Fedor visibly upand silently carried you home.'

				act 'Leave':gt 'gorodok'
			end

			act 'Agree':
				cls
				minut += 15
				gs 'stat'
				'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
				! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
				'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
				'You have agreed to meet with Fedor. Fedor was visibly delighted and escort you to the house on the way you viewed fun discussing movies.'

				act 'Leave':gt 'gorodok'
			end
		end
	end

	exit
end

act 'Leave':gt 'gdk'

if albinaQWdance > 0 or gsAboDance > 0 or gsAboBeg > 0 or gsAboVolley > 0:
	act 'Change clothes in the locker room':gt 'clothing', 'view_clothing_list', 'wardrobe'

	if sweat >= 0:
		act 'Wash in the shower':
			cls
			dynamic $showerdin
			minut += 15
			horny += 1
			hapri = 1
			mop = 1
			sweat = -3

			if frost > 0:frost = 0

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

			if kotovVSprohorov = 1:
				kotovVSprohorov = 2
				'You entered the women''s shower and turning the water began to lather your body washcloth. Suddenly, the door creaked and you remember that you forgot to close it. You looked back and saw that standing in the doorway Ivan Prokhorov and treat you. "Hi <<$name>>. Can I join? And then the men''s shower place." Ivan smiled after these words.'

				act 'expel Ivan':
					cls
					IvanShowerQW = 1
					gs 'stat'
					'<center><img src="images/pics/dush.jpg"></center>'
					'You covered the chest hand and the other hand launched a washcloth in Ivan. He easily dodged the flying sponges and laughter came out of the shower. You locked the door and quickly domylis shower.'

					act 'Get out of the shower':gt $locM, $metkaM
				end

				act 'Uh, what?':
					cls
					gs 'stat'
					'<center><img src="images/pics/dush.jpg"></center>'
					'Were you surprised like, and your insecurities Ivan regarded as consent. He went into the shower and closed the door behind him.'

					act 'Escape from the shower':IvanShowerQW = 1 & gt $locM, $metkaM

					act 'bathe together':
						cls
						minut += 5
						horny += 10
						gs 'stat'
						'<center><img src="images/pics/dush.jpg"></center>'
						'Ivan took off his boxer shorts and went under a jet shower. His muscular body was very close to yours. You tried not to look at him but his eyes involuntarily dropped to his groin where hung thick cock. Ivan winked "Want to soap?"'

						act 'lather Ivan':
							cls
							minut += 5
							horny += 20
							gs 'stat'
							'<center><img src="images/qwest/alter/ev/shower.jpg"></center>'
							'You took a washcloth and began to lather body of Ivan. His cock began to get up and touched your thigh. Ivan began to hug you and caress your body with your hands.'

							act 'Give blowjob':
								cls
								minut += 5
								horny += 20
								bj += 1

								if npcSex[3] = 0:npcSex[3] = 1 & guy += 1

								gs 'stat'
								'<center><img src="images/qwest/alter/ev/shover.jpg"></center>'
								'You slowly sank to his knees in front of Ivan and his cock was in front of your face. Ivan spent impatiently you head lips mouth open and you let his cock. Your lips tightly wraps solid rod Ivan and you sucked in the shower under the streams of water. Suddenly Ivan took a member of your mouth and taking you by the hand raised to his feet, he dug his lips to your breast and began to suck. You swept bliss. Ivan turned your back to him and pushed you back.'

								act 'stand cancer':
									cls
									IvanShowerQW = 10
									minut += 5
									horny += 20
									$boy = 'Ivan'
									dick = 17
									lubonus = 2
									gs 'stat'
									'<center><img src="images/qwest/alter/ev/shover2.jpg"></center>'
									'You bent over and felt the hand of Ivan stroking your ass and anus.'
									dynamic $analsex
									'Ivan pulls a member of your buttocks and you feel like you are on the back and buttocks land warm trickle of sperm.'

									act 'Get out of the shower':gt $locM, $metkaM
								end
							end
						end
					end
				end

				exit
			end

			'You entered the women''s shower and began soaping his body washcloth. After washed soap and washed hair with shampoo. Rinse off the shampoo you become completely clean. After showering you comb your hair and dressed.'

			act 'Get out of the shower':gt $locM, $metkaM
		end
	end
end

if hour < 16 or hour > 20:
	exit
end

if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and sport = 1:
	act 'Train with Zvezdushkami':
		cls
		minut += 120
		fat -= 5
		if agil < 50: agil += rand(1, 3)
		if agil >= 50 and agil < 80: agil += rand(0, 2)
		if agil >= 80:agil += rand(0,1)

		manna -= 5
		sweat += 3
		dancePRO += rand(1, 3)
		gs 'stat'
		'<center><img src="images/etogame/fit1.jpg"></center>'

		if dancePRO < 20:
			sub += 1
			'You train together with sex of "Zvezdushek", you get bad and Albina constantly yelling at you and calling them bowlegged kolkhoz.'
		elseif dancePRO >= 20 and dancePRO < 40:
			sub += 1
			'You train together with sex of "Zvezdushek" you sometimes get something, but most movements by Albina constantly yelling at you and calling them bowlegged kolkhoz.'
		elseif dancePRO >= 40 and dancePRO < 60:
			'You train together with sex of "Zvezdushek" you dance with sex getting in the general rhythm, but not happy Albina "<<$name>>, very sluggish, more life."'
		elseif dancePRO >= 60 and dancePRO < 80:
			'You train together with sex of "Zvezdushek" you normally get all but Albina regularly you niggles "<<$name>>, you are not at the funeral, raise your head and smile!"'
		elseif dancePRO >= 80:
			stardance += 1
			'You dance beautifully and Albina you start to put an example to other girl.'

			if stardance < 10:
				if otkazDanceWhore = 1:
					if AlbinaLast = 1:
						AlbinaBlokDance = 1
						'After training Albina withdraws you aside and starts berating. "You roundnose Kolhoz. Because of you I am losing customers. So fuck off, you are no longer uchavstvuesh in the team."'
					else
						AlbinaLast = 1
						otkazDanceWhore = 0
						if AlbFather = 0:AlbFather = 1

						'After training Albina withdraws you aside and starts berating. "I know you''re young and stupid, but I explain to you in the first and last time. Again swept me with clients fly from Zvezdushek miserably. Entertain men is part of the business."'
					end
				end

				if DanceWhoreT > 0:
					DanceWhoreT = 0

					if AlbFather = 0:AlbFather = 1

					'Albina after training beckons you to her. "Good <<$name>>. Communicating with men of the business. Main keep his mouth shut. You''re doing fine, doing well. Stick with me and you will have all the money, cars and apartments."'
				end
			else
				stardance = 0
				albpayrand = rand(1, 5)
				'Albina gathered girls. Today small halturka planned. Each will receive <<albpayrand*1000>> per job. The matter for a couple of hours.'

				act 'Go part time':
					cls
					minut += 120
					money += albpayrand * 1000
					sweat = -3
					profiDanceTime += 1
					gs 'stat'
					'You agreed and Albina phoned by phone. Soon the car came up to you. You sank with sex in the car and went somewhere. Soon you come to what that home in a large hall where people were sitting and pointed. You are dressed in costumes who sewed commissioned Albina, and went on stage to dance to the fiery music. You danced very well and everything went smoothly. You left the stage and Albina distributed money. You take turns on bystrenkomu took a shower.'

					if vnesh >= 13:
						if vnesh < 16:wealthmanrand = rand(0, 15)
						if vnesh >= 16 and vnesh < 18:wealthmanrand = rand(0, 12)
						if vnesh >= 18:wealthmanrand = rand(0, 10)

						if wealthmanrand = 0:
							kolvomanparty = 1
							danceWhorePay = rand(3, 8)
							'You see how a man came to Albina in a decent suit and began about something with her to talk quietly.'
						elseif wealthmanrand = 1:
							kolvomanparty = 2
							danceWhorePay = rand(5, 10)
							'You see how to Albina approached by two guys and started about something to talk to her.'
						elseif wealthmanrand = 2:
							kolvomanparty = 1
							danceWhorePay = rand(4, 9)
							'You see how to Albina came Caucasian and became what it is talking to her gesticulating.'
						elseif wealthmanrand = 3:
							kolvomanparty = 2
							danceWhorePay = rand(6, 12)
							'You see how to Albina came two Caucasians and become about something to talk to her.'
						elseif wealthmanrand = 4:
							kolvomanparty = 3
							danceWhorePay = rand(8, 14)
							'You see how to Albina came three Caucasians and became what it is talking to her.'
						elseif wealthmanrand = 5:
							kolvomanparty = 1
							danceWhorePay = rand(5, 10)
							'You see as a Negro came Albina and became about something to talk to her.'
						elseif wealthmanrand = 6:
							kolvomanparty = 2
							danceWhorePay = rand(7, 15)
							'You see how to Albina approached two blacks and became what it is talking to her.'
						elseif wealthmanrand = 7:
							kolvomanparty = 3
							danceWhorePay = rand(10, 20)
							'You see how to Albina approached three blacks and became what it is talking to her.'
						end

						if wealthmanrand <= 7:
							'After talking Albina came to you. "<<$name>>, need to talk."'

							act 'About what?':
								cls
								minut += 15
								gs 'stat'
								'You asked Albina what she wanted to talk.'

								if kolvomanparty = 1:
									'Albina came closer to you and quietly began to speak, "You see this guy? If you stay with him for an hour and be affectionate, you will be able to earn not bad. Obtain <<danceWhorePay*1000>> rubles."'
								else
									'Albina came closer to you and quietly began to speak, "You see these guys? If you stay with them for a couple of hours and be affectionate, you will be able to earn not bad. Obtain <<danceWhorePay*1000>> rubles."'
								end

								act 'Cancel and go back':
									cls
									minut += 15
									otkazDanceWhore = 1
									DanceWhoreT = 0
									gs 'stat'
									'You got in the car and soon, along with sex you brought back to town.'

									act 'Leave':gt 'gorodok'
								end

								act 'Agree':
									cls
									money += danceWhorePay * 1000
									DanceWhore += 1
									DanceWhoreT += 1
									otkazDanceWhore = 0
									slutty += 1
									gs 'stat'
									'You agreed and Albina you counted the money.'

									if wealthmanrand = 0:act 'Go with a man':gt 'DanceWhore1'
									if wealthmanrand = 1:act 'Go with men':gt 'DanceWhore2'
									if wealthmanrand = 2:act 'Go in Caucasians':gt 'DanceWhore3'
									if wealthmanrand = 3:act 'Go with Caucasians':gt 'DanceWhore4'
									if wealthmanrand = 4:act 'Go with Caucasians':gt 'DanceWhore5'
									if wealthmanrand = 5:act 'Start with a black man':gt 'DanceWhore6'
									if wealthmanrand = 6:act 'Go with blacks':gt 'DanceWhore7'
									if wealthmanrand = 7:act 'Go with blacks':gt 'DanceWhore8'
								end
							end

							exit
						end
					elseif vnesh < 13:
						'After dancing Albina talked with some sort of men and what is agreed.'
					end

					act 'Drive back':
						cls
						minut += 15
						gs 'stat'
						'You got in the car and soon, along with sex you brought back to town.'

						act 'Leave':gt 'gorodok'
					end
				end
			end
		end

		act 'Leave':gt 'gdksport'
	end
end

if gsAboDance > 0 and sport = 1:
	act 'Section dance ticket is valid for <<gsAboDance>> visits':
		cla
		*clr
		gsAboDance -= 1
		minut += 120
		fat -= 5

		if agil< 50:agil += rand(1, 3)
		if agil >= 50 and agil < 80:agil += rand(0, 2)
		if agil >= 80:agil += rand(0, 1)

		manna -= 5
		sweat += 3

		if dance < agil:dance += rand(5, 15)

		gs 'stat'
		'<center><img src="images/etogame/fit1.jpg"></center>'
		if dance < 100:
			'You studied modern dance club, which is very popular in discos.'

			if dance < agil:
				'You have to string up, but your agility and helps you hone some of what dance moves.'
			else
				'You do not have enough dexterity, that would successfully repeat all the movements.'
			end

			!place for use in events
			if rand(0, 1) = 0:'It seems you see, that is <a href="exec:gt ''danceGev''">interesting</a>.'
		elseif dance >= 100:
			'You have tried something new in modern club dancing, but you all already know it.'

			if albinaQWdance > 0:
				!place for use in events
				if rand(0, 1) = 0:'It seems you see, that is <a href="exec:gt ''danceGev''">interesting</a>.'
			elseif albinaQWdance = 0 and StoryLine > 0:
				'When the training is over you noticed how the room got a few girls and Albina Barlovskaya. Albina odnoklasnitsa you, but you almost nothing about her know.'

				act 'Say hello to Albina':
					cls
					numnpc = 23
					gs 'stat'
					'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
					! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
					'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
					'You are greeted with Albina. She raised an eyebrow haughtily. "And it''s you.''s Your name there? Oh yeah <<$name>>. Did you? Zanimaeshsya Dancing?" You nodded confirming the obvious. Albina dismissive laugh. "Well, how''s it going?" You said coldly Albina "Not bad." Albina gave you look arrogant "Not bad? Well, maybe in comparison with other local bowlegged and not bad. But I doubt that you can dance on a more or less professional level."'

					act 'I do not care':
						cls
						numnpc = 23
						dom += 1
						grupNPC[numnpc] -= 5
						gs 'stat'
						'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
						'You said scornfully as possible that you do not care and turned away from Albina. She said with a giggle. "Girls. Let''s train."'

						act 'Leave':gt 'gdksport'
					end

					act 'I know how to dance':
						cls
						numnpc = 23
						!!dom += 1
						!!grupNPC[numnpc] -= 5
						gs 'stat'
						'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
						! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
						'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'
						'Albina you already began to annoy his arrogance. And you told her firmly that you know how to dance. Albina turned to the girls who came to her and said. "Girls. Let''s train." Then she turned to you and said with a slight grin. "You can sit and watch as the dance pros. Itself will understand everything"'

						act 'Leave':gt 'gdksport'

						act 'Watch':
							cls
							minut += 15
							gs 'stat'
							'Girls included stereo and started dancing. You once it became clear that they dance very well and professionally. You can hardly so. Albina also dances much better than you. And indeed very concerted action girls and waste, apparently they do not work out this dance for the first time. When the music ended Albina said, "Girls. While a little break." She came to you and said a little breathlessly, "We are the pros. We spent a dance troupe Zvezdushki. Dancing on holidays. Even in a music video filming."'

							act 'Leave':gt 'gdksport'

							act 'Ask for them in the community':
								cls
								minut += 15
								gs 'stat'
								'You are asked to dance group. Albina grinned "Can you? We then have all worked. Though vprchem. Show how you know how to dance." Albina included music and girls gathered to look at your dance.'

								act 'Dance':
									cls
									minut += 5
									gs 'stat'
									'You began to dance to the music, trying as much as possible. When the music stopped you came Albina. "Collective Farm Style course. But nothing, you have some potential."'

									act 'Well take me to your team?':
										cls
										albinaQWdance = 1
										minut += 5
										gs 'stat'
										'You asked Albina, if she would take you to their team. Albina thought and answered you. "Okay, take it. Maybe from you and get anything worthwhile."'

										act 'Leave':gt 'gdk'
									end
								end
							end
						end
					end
				end
			end
		end

		act 'Leave':gt 'gdksport'
	end
end

if gsAboBeg > 0 and sport = 1:
	act 'Section races, subscription is valid for <<gsAboBeg>> visits':
		cla
		*clr
		gsAboBeg -= 1
		minut += 120
		speed += rand(1, 3)
		manna -= 5

		if salo > 0:salo -= 1

		fat -= 5
		sweat += 3
		beg += rand(3, 6)
		gs 'stat'
		'<center><img src="images/etogame/parkbeg.jpg"></center>'
		'You do run for two hours.'

		act 'Leave':gt 'gdksport'
	end
end

if gsAboVolley > 0 and volleysostav = 0 and sport = 1:
	if week ! 5:
		act 'Section volleyball ticket is valid for <<gsAboVolley>> visits':
			cla
			*clr
			gsAboVolley -= 1
			minut += 120

			if alko = 0:
				volleyboll += 1
				speed += rand(1, 3)
				beg += rand(1, 2)

				if agil < 50:agil += rand(1, 3)
				if agil >= 50 and agil < 80:agil += rand(0, 2)
				if agil >= 80:agil += rand(0, 1)
				if stren < 10:stren += rand(1, 3)
				if stren >= 10 and stren < 20:stren += rand(1, 2)
				if stren >= 20 and stren < 30:stren += 1
				if stren >= 30 and stren < 40:stren += rand(0, 1)
				if vital < 10:vital += rand(1, 3)
				if vital >= 10 and vital < 20:vital += rand(1, 2)
				if vital >= 20 and vital < 30:vital += 1
				if vital >= 30 and vital < 40:vital += rand(0, 1)
			end

			manna -= 5
			fat -= 5
			sweat += 3
			gs 'stat'
			'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
			if alko = 0:'At the beginning of the workout you ran a few laps around the room. After you press the jog and do abdominal exercises. Then began to practice reception and feeding the ball.'
			if alko > 0:'You are trying to train, but your intoxication does not give you focus and you will suffer from garbage, than treneruetes.'

			act 'Leave':gt 'gdksport'
			act 'Go to coaching':gt 'Voltrener'
		end
	else
		act 'Section volleyball ticket is valid for <<gsAboVolley>> visits':
			cla
			*clr
			gsAboVolley -= 1
			minut += 120

			if alko = 0:
				volleyboll += 1
				speed += rand(1, 2)
				agil += rand(1, 2)

				if stren < 40:stren += rand(1, 2)
				if vital < 40:vital += rand(1, 2)

				beg += rand(1, 2)
				dom += 1
			end

			manna -= 5
			fat -= 5
			sweat += 3
			gs 'stat'
			'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
			'Fridays are usually held as the game in which to discover strengths and talented athletes.'

			if alko = 0:
				if volleyboll < 25:
					'You are absolutely lousy play and constantly mistaken. Finally nerves coach not stand up and it removes you from the field.'
				elseif volleyboll >= 25 and volleyboll < 50:
					'You do not play very much. Sometimes make blunders. Coach is angry, but tolerates your antics.'
				elseif volleyboll >= 50 and volleyboll < 75:
					'You play well on the field and rarely wrong. Coach looks pleased you.'
				elseif volleyboll >= 75:
					'You play great on the field, easily replaying their rivals. Coach looks pleased with your game.'
					if rand(0, 1) = 0:
						if andGevknow = 0:$nameAndGev = 'Some guy'
						if andGevknow > 0:$nameAndGev = 'Andrew'

						'During the game you pushed <a href="exec:gt ''volAndGev''"><<$nameAndGev>></a>.'
					end
				end
			else
				'You took to the field, but failed to recapture myach, intoxication does not focus. The coach sees your status and remove you from the game.'
			end

			act 'Leave':gt 'gdksport'
			act 'Go to coaching':gt 'Voltrener'
		end
	end
end

if volleysostav > 0 and sport = 1:
	if week ! 6 and volkomday ! day:
		act 'To engage with the team':
			cla
			*clr
			volkomday = day
			minut += 120
			speed += rand(1, 3)
			agil += rand(1, 3)

			if stren < 50:stren += rand(1, 3)
			if vital < 50:vital += rand(1, 3)

			manna -= 5
			fat -= 5
			sweat += 3
			beg += rand(1, 2)
			volleyboll += 1
			trenerepa += 1
			dom += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
			'Number of games <<volsesongame>>, Win - <<volsesonwin>>, lesions - <<volsesonloss>>, draws - <<volsesondraw>>.'
			'At the beginning of the workout you ran a few laps around the room. After you press the jog and do abdominal exercises. Then began to practice reception and feeding the ball. At the end of the workout you had a game.'

			act 'Leave':gt 'gdksport'
			act 'Go to coaching':gt 'Voltrener'
		end
	elseif week = 6 and sorevday ! day:
		act 'Check out the competition with a team':
			cla
			*clr

			if poverkomand = 0:poverkomand = 600

			volltime = 0
			sorevday = day
			minut += 180
			speed += rand(1, 3)
			agil += rand(1, 3)

			if stren < 60:stren += rand(1, 3)
			if vital < 60:vital += rand(1, 3)

			manna -= 5
			fat -= 5
			sweat += 3
			beg += rand(1, 2)
			volleyboll += rand(1, 3)
			dom += 1
			trenerepa += 2
			gs 'stat'
			'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
			'You gathered their things together with other devchenki from the team and got on a bus that took you to a place where there will be a match.'

			act 'Play':gt 'volley'
		end
	end
end

--- gdksport ---------------------------------
# Voltrener
$din_trener_bj = {
	act 'Give blowjob':
		cls
		bj += 1

		if trenerSex > 0:trenerSex += 1
		if trenerSex = 0:trenerSex = 1 & guy += 1
		if volleysostav > 0:trenerepa += 2

		gs 'stat'
		'<center><img src="images/qwest/alter/ev/tren.jpg"></center>'
		'You squatted in front of the coach and stroked his crotch and felt how his cock stood up. You reached into his sweatpants gum holding with the other hand and groped hot cock trainer. You pulled the standing member of sweatpants and leaned toward him around his lips.'

		cumlip += 1
		swallow += 1
		gs 'stat'
		'Coach groaned slightly and your mouth spurted warm jet of sperm. You started to swallow warm liquid fills your mouth.'

		if volleysostav = 0:
			volleysostav = 1
			trenerepa = 20
			'Coach bosses cock in his pants. "Okay <<$surname>>, you are very diligent girl, maybe you will come out of sense, consider that you have a team, but of course in replacement players."'
		end

		act 'Leave':gt 'gdksport'
	end
}
$din_trener_gorslut = {
	gs 'stat'
	'You reluctantly nodded his head, "It''s true, I really <<$gnikname>>. And what does this have to volleyball?" Coach smiled, "Indirect attitude, very indirectly, we''re now discussing how you get into the team. And I wonder what you can do. You know what I Gauvreau?"'

	act 'No':
		cls
		gs 'stat'
		'You shake your head and told the coach that do not understand the coach sighed, "And you do not mind bleschesh, is not it? Well, I lonely man, and all around a pretty young girl. So clear?"'

		act 'Leave':gt 'gdksport'

		dynamic $din_trener_bj
	end

	act 'Coach put his hand on her knee':
		cls
		gs 'stat'
		'You leaned forward slightly and put her palm on his knee coach grin you whispered "Need a little demonstration of my other skills? I understand you correctly?" Coach leaned back in his chair, "You''re a smart girl of <<$name>>, go on."'
		dynamic $din_trener_bj
	end
}

gs 'stat'
'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
'You went into the room the coach in which there are cups, balls, sports equipment and a different table where sometimes sitting coach and fills various papers. Coach Mikhail Vlasov does not only lovers but also in the section just coach a professional team volleybolistok.'

if volleysostav > 0:
	if trenerepa < 20:'The coach does not wish you any longer.'
	if trenerepa >= 20 and trenerepa < 40:'Coach barely tolerates you.'
	if trenerepa >= 40 and trenerepa < 60:'You have a normal relationship with the coach.'
	if trenerepa >= 60 and trenerepa < 80:'You have a good relationship with the coach.'
	if trenerepa >= 80:'Trainer in you doted.'

	if trenerepa <= 0:
		volleysostav = -1
		'Coach menacing appeals to you. "All <<$surname>>, you make me sick with their flourishes. I''ll exclude from the team!"'

		act 'Leave':gt 'gdksport'

		exit
	end

end

act 'Talk with the coach':
	cls
	gs 'stat'

	if volleysostav = -1:
		if trenerSex = 0:
			'Coach looked up at you, "<<$surname>>. Did not even come near me. Longer I''ll put you in command!"'
		else
			'Coach looked up at you, "<<$surname>>. Did not even come near me. Longer I''ll put you in the team!"'
		end
	elseif volleysostav = 0:
		if volleyboll < 25:
			'Coach looked at you "And <<$surname>>. Do not distract me from things."'
		elseif volleyboll >= 25 and volleyboll < 50:
			'Coach looked at you "And <<$surname>>. You need to devote more time to training, you are all very bad."'
		elseif volleyboll >= 50 and volleyboll < 75:
			'Coach looked at you "And <<$surname>>. You certainly did not play bad, but not bad for an amateur. Higher level you do not you pull."'
		else
			'Coach looked at you "And <<$surname>>. Do you have the makings of athletes, though I''m not sure that at the professional level you get that either."'

			act 'Asks the pros':
				cls
				gs 'stat'

				if GorSlut = 0:
					if volleyboll < 100:
						'You started to ask the coach to include you in command, but he shook his head. "<<$surname>> is not buried, you have a good amateur level. Potyanesh But you do not."'
					else
						'You started to ask the coach to include you in the team, the coach thought. "Of course you can try to include you in the replacement, but I do not even know if I should."'

						act 'Persuade':
							cls
							dom -= 1
							gs 'stat'

							if dom >= 10:
								!!if volleysostav > 0:trenerepa -= 1
								volleysostav = 1
								trenerepa = 20
								'You started to prove the coach that you want to include in the team, the coach tried to protest, but your head was so convincing that he eventually gave up. "Okay <<$surname>>, I''ll put you in command until naturally only in the bench."'
							else
								'You started to prove the coach that you want to include in the team, but failed to show sufficient vigor and coach threw all your arguments denying you.'
							end

							act 'Leave':gt 'gdksport'
						end
					end
				else
					'You started to ask the coach to include you in the. Coach thought, "Hey <<$surname>>, then other devchoki about you say different things. Example you <<$gnikname>>. Is that true?"'

					act 'It''s all lies':
						cls
						gs 'stat'

						if dom > 0:
							'You started to prove the coach that rumors about you it''s all lies and dismiss them envious. You said quite convincingly and coach seems to believe.'

							act 'Make sure to include the team':
								cls
								dom -= 1
								gs 'stat'

								if dom >= 10:
									!!if volleysostav > 0:trenerepa -= 1
									volleysostav = 1
									trenerepa = 20
									'You started to prove the coach that you want to include in the team, the coach tried to protest, but your head was so convincing that he eventually gave up. "Okay <<$surname>>, I''ll put you in command until naturally only in the bench."'
								else
									'You started to prove the coach that you want to include in the team, but failed to show sufficient vigor and coach threw all your arguments denying you.'
								end

								act 'Leave':gt 'gdksport'
							end
						else
							'You started to prove the coach that rumors about you it''s all lies and dismiss them envious. You said not very convincing and coach you frankly do not believe. "<<$surname>>, stop lying, You''re holding me for a fool?"'

							act 'Okay, it''s true, I <<$gnikname>>':
								cls
								gs 'stat'
								dynamic $din_trener_gorslut
							end
						end

						act 'Leave':gt 'gdksport'
					end

					act 'It''s true, I''m <<$gnikname>>':
						cls
						gs 'stat'
						dynamic $din_trener_gorslut
					end
				end

				act 'Leave':gt 'gdksport'
			end
		end
	else
		if trenerSex = 0:
			'Coach looked at you "And <<$surname>>. Do not distract me from things."'
		else
			'Coach looked at you "And <<$surname>>. Done for coming."'

			act 'Coach put his hand on her knee':
				cls
				gs 'stat'
				'You leaned forward slightly and put her palm on his knee coach grin you whispered "Need a little demonstration of my skills? I understand you correctly?" Coach leaned back in his chair, "You''re a smart girl of <<$name>>, go on."'
				dynamic $din_trener_bj
			end
		end
	end

	act 'Leave':gt 'gdksport'
end

act 'Leave':gt 'gdksport'

--- Voltrener ---------------------------------
# volley
minut += 30
gs 'stat'
if volltime = 0:
	'<center><img src="images/qwest/alter/gdksport.jpg"></center>'
	'Teams took to the field and started playing.'

	if volleysostav = 1:'You sit on the bench watching your team plays.'
	poverkomandV = rand(500, 1500)

	if poverkomand > poverkomandV:
		volpoint += 1
		'Your team plays with the team opponents.'
	elseif poverkomand = poverkomandV:
		volpoint += 1
		volpointv += 1
		'The scales vary in one, then the other, obviously teams are equal on forces.'
	elseif poverkomand < poverkomandV:
		volpointv += 1
		'Team beats rivals your team.'
	end

	act 'further':volltime=1 & gt $curloc
elseif volltime = 1:
	'<center><img src="images/qwest/alter/gdksport.jpg" ></center>'
	'There was a break, and both teams have a rest.'

	if volleysostav = 1:
		'You are sitting on the bench.'

		act 'Ask to play':
			cls
			gs 'stat'
			trenereparand = rand(0, 80)

			if trenerepa >= trenereparand:
				volleysostav = 2
				dom += 1
				poverkomand -= 100
				poverkomand += volleyboll
				'The coach has agreed to release you on the field.'

				act 'further':volltime = 2 & gt $curloc
			else
				'You have been asking the coach to play, but he shook his head and went on to explain the strategy of girls.'

				act 'further':volltime = 2 & gt $curloc
			end
		end
	end

	act 'further':volltime = 2 & gt $curloc
elseif volltime=2:
	'<center><img src="images/qwest/alter/gdksport.jpg" ></center>'
	'Break is over and the team started to play again.'

	if volleysostav = 1:'You are sitting on the bench watching how your team plays.'

	if poverkomand > poverkomandV:
		volpoint += 1
		'Your team plays with the team opponents.'

		if volleysostav = 2:
			if volpointv > 0:trenerepa += 10
		end
	elseif poverkomand = poverkomandV:
		volpoint += 1
		volpointv += 1
		'The scales vary in one, then the other, obviously teams are equal on forces.'

		if volleysostav = 2:
			if volpointv > 0:trenerepa += 5
		end
	elseif poverkomand < poverkomandV:
		volpointv += 1
		'Team beats rivals your team.'

		if volleysostav = 2:
			if volpoint > 0:trenerepa -= 10
		end
	end

	act 'further':volltime = 3 & gt $curloc
elseif volltime = 3:
	volsesongame += 1
	'<center><img src="images/qwest/alter/gdksport.jpg" ></center>'
	'Final whistle.'

	if volpoint > volpointv:
		volsesonwin += 1
		'Your team won.'
	elseif volpoint = volpointv:
		volsesondraw += 1
		'draw.'
	elseif volpoint < volpointv:
		volsesonloss += 1
		'Your team lost.'
	end

	if volleysostav = 2:volleysostav = 1 & poverkomand -= volleyboll & poverkomand += 100

	volpoint = 0
	volpointv = 0

	act 'Leave':gt 'gdksport'
	act 'Go to coaching':gt 'Voltrener'
end

--- volley ---------------------------------
# DanceWhore1
minut += 5
dick = rand(10, 26)
gs 'stat'
'Man took you by the hand and led him into the room. When the man turned on the light in the room, you will see that it is a great sleeper.'

act 'Squat':
	cls
	bj += 1
	guy += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/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. Then you started to suck cock absorbing it into his mouth as much as they could.'
	tipdarand = rand(0, 2)

	if tipdarand = 0:
		'Man vzal your head in his hands and began to stick it on the penis.'

		act 'Relax the throat':
			cls

			if throat < dick:throat += 1

			minut += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/throat.jpg"></center>'

			if throat < dick / 2:
				manna = 0
				horny = 0
				'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
			elseif throat >= dick / 2 and throat < dick:
				manna /= 2
				horny /= 2
				'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
			elseif throat >= dick:
				'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
			end

			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'The man took a member of your mouth and began to masturbate in front of your face it.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'The man took a member of your mouth and put your cancer.'

		act 'Substitute ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/anal.jpg"></center>'
			dynamic $sexstart
			dynamic $analsex
			dynamic $din_go_to_home_dance
		end
	elseif tipdarand = 2:
		'The man took a member of your mouth and put you on the back.'

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

--- DanceWhore1 ---------------------------------
# DanceWhore2
minut += 5
dick = rand(10, 26)
gs 'stat'
'Boys led you to your room.'

act 'Squat':
	cls
	bj += 2
	guy += 2
	gang += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjd.jpg"></center>'
	'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'

	tipdarand = rand(0, 1)

	if tipdarand = 0:
		'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'

		act 'Relax and suck ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/d.jpg"></center>'
			'You suck dick absorbing it as deeply as possible.'
			dynamic $sexstart
			dynamic $analsex
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'

		act 'Suck.':
			cls
			minut += 30
			!!sex += 1
			$boy = 'Client'
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/d1.jpg"></center>'
			'You began to suck dick while the other guy spread your legs.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	end

	!!if tipdarand = 2:end
end

--- DanceWhore2 ---------------------------------
# DanceWhore3
minut += 5
dick = rand(16, 30)
gs 'stat'
'Caucasian took you by the hand and led him into the room. When the man turned on the light in the room, you will see that it is a great sleeper.'

act 'Squat':
	cls
	bj += 1
	guy += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/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. Then you started to suck cock absorbing it into his mouth as much as they could.'
	tipdarand = rand(0, 2)

	if tipdarand = 0:
		'Man vzal your head in his hands and began to stick it on the penis.'

		act 'Relax the throat':
			cls
			if throat < dick:throat += 1
			minut += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/throat.jpg"></center>'

			if throat < dick / 2:
				manna = 0
				horny = 0
				'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
			elseif throat >= dick / 2 and throat < dick:
				manna /= 2
				horny /= 2
				'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
			elseif throat >= dick:
				'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
			end

			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'The man took a member of your mouth and began to masturbate in front of your face it.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'The man took a member of your mouth and put your cancer.'

		act 'Substitute ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/anal.jpg"></center>'
			dynamic $sexstart
			dynamic $analsex
			dynamic $din_go_to_home_dance
		end
	elseif tipdarand = 2:
		'The man took a member of your mouth and put you on the back.'

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

--- DanceWhore3 ---------------------------------
# DanceWhore4
minut += 5
dick = rand(16, 30)
gs 'stat'
'Two Caucasians led you to your room.'

act 'Squat':
	cls
	bj += 2
	guy += 2
	gang += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjd.jpg"></center>'
	'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'
	tipdarand = rand(0, 1)

	if tipdarand = 0:
		'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'

		act 'Relax and suck ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/d.jpg"></center>'
			'You suck dick absorbing it as deeply as possible.'
			dynamic $sexstart
			dynamic $analsex
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'

		act 'Suck.':
			cls
			minut += 30
			!!sex += 1
			$boy = 'Client'
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/d1.jpg"></center>'
			'You began to suck dick while the other guy spread your legs.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facial.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	end

	!!if tipdarand = 2:end
end

--- DanceWhore4 ---------------------------------
# DanceWhore5
minut += 5
dick = rand(16, 30)
gs 'stat'
'Three Caucasians led you to your room.'

act 'Squat':
	cls
	bj += 3
	guy += 3
	gang += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjt.jpg"></center>'
	'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate other members. You tried to lick and suck just three members.'
	!!tipdarand = rand(0, 1)
	tipdarand = 0

	if tipdarand = 0:
		'Caucasians talking in a strange language you put cancer.'

		act 'Relax and suck ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/f.jpg"></center>'
			'You suck two members of absorbing them as deeply as possible into his mouth.'
			dynamic $sexstart
			dynamic $analsex

			act 'Further':
				cls
				tipdarand = rand(0, 1)

				if tipdarand = 0:
					cumface += 2
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facialt.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish. Second Caucasian too, began to discharge on your face, covering it with sperm.'
				elseif tipdarand = 1:
					cumlip += 2
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallowt.jpg"></center>'
					'You kneel and readily opened his mouth. Caucasians started you finish filling in the open mouth of his sperm. When the flow of sperm stopped and turned your mouth is filled to the brim with sperm, you swallow it.'
				end

				dynamic $din_go_to_home_dance
			end
		end
	end

	!!if tipdarand = 1:end
	!!if tipdarand = 2:end
end

--- DanceWhore5 ---------------------------------
# DanceWhore6
minut += 5
dick = rand(18, 35)
gs 'stat'
'Hefty Ebony took you by the hand and led somewhere.'

act 'Squat':
	cls
	bj += 1
	guy += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjn.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. Then you started to suck cock absorbing it into his mouth as much as they could.'
	tipdarand = rand(0, 2)

	if tipdarand = 0:
		'Man vzal your head in his hands and began to stick it on the penis.'

		act 'Relax the throat':
			cls

			if throat < dick:throat += 1

			minut += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/throatn.jpg"></center>'

			if throat < dick / 2:
				manna = 0
				horny = 0
				'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
			elseif throat >= dick / 2 and throat < dick:
				manna /= 2
				horny /= 2
				'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
			elseif throat >= dick:
				'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
			end

			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'The man took a member of your mouth and began to masturbate in front of your face it.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facialn.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'The man took a member of your mouth and put your cancer.'

		act 'Substitute ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/analn.jpg"></center>'
			dynamic $sexstart
			dynamic $analsex
			dynamic $din_go_to_home_dance
		end
	elseif tipdarand = 2:
		'The man took a member of your mouth and put you on the back.'

		act 'Lie on your back.':
			cls
			minut += 30
			!!sex += 1
			$boy = 'Client'
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/sexn.jpg"></center>'
			'You lay on your back. <<$bname>> lay on top and spread your legs.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			dynamic $din_go_to_home_dance
		end
	end
end

--- DanceWhore6 ---------------------------------
# DanceWhore7
minut += 5
dick = rand(18, 35)
gs 'stat'
'Two Negro led you to your room.'

act 'Squat':
	cls
	bj += 2
	guy += 2
	gang += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjdn.jpg"></center>'
	'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'
	tipdarand = rand(0, 1)

	if tipdarand = 0:
		'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'

		act 'Relax and suck ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/dn.jpg"></center>'
			'You suck dick absorbing it as deeply as possible.'
			dynamic $sexstart
			dynamic $analsex
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facialn.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	elseif tipdarand = 1:
		'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'

		act 'Suck.':
			cls
			minut += 30
			!!sex += 1
			$boy = 'Client'
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/d1n.jpg"></center>'
			'You began to suck dick while the other guy spread your legs.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum
			tipdarand = rand(0, 1)

			if tipdarand = 0:
				'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'

				act 'Swallow':
					cls
					cumlip += 1
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallow.jpg"></center>'
					'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
					dynamic $din_go_to_home_dance
				end
			elseif tipdarand = 1:
				'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'

				act 'Close your eyes':
					cls
					cumface += 1
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facialn.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
					dynamic $din_go_to_home_dance
				end
			end
		end
	end

	!!if tipdarand = 2:end
end

--- DanceWhore7 ---------------------------------
# DanceWhore8
minut += 5
dick = rand(18, 35)
gs 'stat'
'Three Negro led you to your room.'

act 'Squat':
	cls
	bj += 3
	guy += 3
	gang += 1
	sub += 1
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/dance/bjtn.jpg"></center>'
	'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate other members. You tried to lick and suck just three members.'
	!!tipdarand = rand(0, 1)
	tipdarand = 0

	if tipdarand = 0:
		'Negros talking in a strange language you put cancer.'

		act 'Relax and suck ass':
			cls
			minut += 30
			$boy = 'Client'
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/dance/fn.jpg"></center>'
			'You suck two members of absorbing them as deeply as possible into his mouth.'
			dynamic $sexstart
			dynamic $analsex

			act 'Further':
				cls
				tipdarand = rand(0, 1)

				if tipdarand = 0:
					cumface += 2
					facial += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/facialtn.jpg"></center>'
					'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish. Second Caucasian too, began to discharge on your face, covering it with sperm.'
				elseif tipdarand = 1:
					cumlip += 2
					swallow += 1
					minut += 10
					gs 'stat'
					'<center><img src="images/qwest/alter/dance/swallowtn.jpg"></center>'
					'You kneel and readily opened his mouth. Negros you started to cum into her open mouth filling it with sperm. When the flow of sperm stopped and turned your mouth is filled to the brim with sperm, you swallow it.'
				end

				dynamic $din_go_to_home_dance
			end
		end
	end

	!!if tipdarand = 1:end
	!!if tipdarand = 2:end
end

--- DanceWhore8 ---------------------------------
# gdkin
$din_kotov_love = {
	if kotovLoveQW > 0:
		cls
		gs 'stat'
		'<center><b><font color="maroon"><<$npcName[9]>> <<$npcSurName[9]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
		'To you and the guy fits Witek. "Che garbage? Who''s that bloke?" Witek takes for male breast and angrily said, "Well, ka sebal horrified by my heifer, and now the mug smashed into smithereens. Understood?"'

		if DPgrup = 1:
			fightboyrand = rand(0, 10)

			if fightboyrand <= 5:
				'Frightened man began to speak. "Come on you, I did not know. Already leaving." Witek pushed Man "Get out of here until I''m good."'
			elseif fightboyrand > 5 and fightboyrand < 10:
				'The guy pushes Victor "Get your hands off, deer!" Witek suddenly gets very fast and powerful kick.'
				'Man falls from hitting the dance floor. Witek approaches him and grabbing breast lifts his feet, and then shoves the boy to the wall. "Well, Cho motherfucker? Still need? Or is it okay?" Man holding a broken person mutters "Everything, everything, I got it!"'
			elseif fightboyrand >= 10:
				'The guy has Vit''ka silence in the face with his fist. Witek recoils from the guy and then gets fast and powerful kick. Fight begins, hitting fly from both sides, suddenly a guy misses a very powerful supply by Vic and flying away to the wall falls to the floor. Witek runs up to him and thrusts into enemy lying a couple of powerful blows. The guy is no longer resisting, apparently he lost consciousness.'
			end
		elseif DPgrup = 2:
			'Rams kid starts with Vic "Hey, who are you in life?" Witek markedly sviripeet and to help him fit drugany. For the kid in turn, also pulled the boys. Nachinaetsya disassembly. After some time, both groups disagree peacefully.'
		elseif DPgrup = 3:
			'Man throws up his hands "Sorry young man. Did not know." Witek repels man "Topal city bloke here until I''m good."'
		end

		act 'Go to Witek':numnpc = 9 & gt 'Snpc'

		exit
	end
}

$din_reakt_dance = {
	if alko > 0:
		horny += 10
		manna += 5
		'Do you feel that the actions of Man excite you.'
	else
		if horny > 0:horny -= 5

		manna -= 5
		'You feel disgusted by these actions Man.'
	end

	gs 'stat'
}

$din_reverse_reakt_dance = {
	if alko <= 0:
		manna += 20
		horny += 1
		'You are fun and exciting.'
	elseif alko > 0:
		if horny > 0:horny -= 5

		manna -= 5
		'You boring and uninteresting.'
	end

	gs 'stat'
}

$din_dance_vrp = {
	minut += 5

	if dance < 50 and agil >=dance:dance += 1
	gs 'stat'
	'You accepted the offer and the guy took you by the hand brought you to the dance floor where you started dancing together.'

	if DPgrup = 1:
		if DPtipe = 1:
			'Guy dancing with you holding your waist with his hands.'
			dynamic $din_reverse_reakt_dance
		elseif DPtipe = 2:
			'Drunk guy pushes you to indulge. You feel like your soft breasts literally flattened breasts of Man.'
			dynamic $din_reakt_dance
		end
	elseif DPgrup = 2:
		if DPtipe = 1:
			'The guy is pretty enough to unleash your waist and his hands slide your hips.'
			dynamic $din_reakt_dance
		elseif DPtipe = 2:
			'Pyany guy grabs your ass and squeezes her much, his head tilted to your face and it bites into your <<$liptalk3>> kiss.'
			dynamic $din_reakt_dance
		end
	elseif DPgrup = 3:
		if DPtipe = 1:
			'Man very confident and elegantly leads you to dance, hold your waist with his strong hands.'
			dynamic $din_reverse_reakt_dance
		elseif DPtipe = 2:
			'Tipsy man despite his advanced views hugs your waist and his hands down to you on the ass.'
			dynamic $din_reakt_dance
		end
	end

	dynamic $din_vibor_tipe_dance

	act 'Stop dancing':
		cls
		gt $curloc
	end
}

$din_dance_otkaz = {
	if alko <= 2 and horny <= 75:
		act 'Refuse':
			cls
			willpower += rand(0, 1)
			gt 'gdkin'
		end
	end
}

$din_vibor_tipe_dance = {
	!'
	if dance >= 50 and alko > 0 and horny >= 50:
		act 'Sexy dance':
			cls
			dance += 1
			gs 'stat'

			gt $curloc
		end
	end
	'!

	act 'Further':
		cls
		gs 'stat'
		'<center><img src="images/etogame/club_dance.jpg"></center>'

		if DPgrup = 1:
			if DPtipe = 1:
				'The guy told you in the dance "My name is <<$bname>>. What''s your name?" You answered "<<$name>>." The song ends and the guy offers to sit with him and chat.'
			elseif DPtipe = 2:
				'The guy told you in the dance "My name is <<$bname>>. What''s your name?" You answered "<<$name>>." All dancing drunk guy crushed your body and now his face flushed with excitement. He offers to leave the club on the street, get some fresh air, socialize.'
			end

			act 'Go with a guy':gt 'EvBoyBuh'
		elseif DPgrup = 2:
			if DPtipe = 1:
				'The entire dance guy grabs your ass and he is clearly excited when he pressed against you, you feel something hard in his pants. Finally zakanchivaetsya song and the guy offers to go out, plunk.'

				act 'Go thump':gt 'EvgopBuh'
			elseif DPtipe = 2:
				'The entire dance guy grabs your ass, breasts and kissed you, he clearly excited when he pressed against you, you feel something hard in his pants. Finally zakanchivaetsya song and the guy offers to go out, plunk.'

				act 'Go thump':gt 'EvgopBuh'
			end
		elseif DPgrup = 3:
			if DPtipe = 1:
				'All male dance was confident and elegant, finally the song was over and the man offers to go out for some fresh air and talk.'

				act 'Go with a man':
					cls
					gs 'stat'
					'<center><img src="images/etogame/dk_night.jpg"></center>'
					'You went out with a man. He walked up to you and bit his arm around her waist. "My name is <<$bname>>. What''s your name?" You answered "<<$name>>." The man continued, "<<$name>>, I''m in your town on a business trip. Lives in the hotel from the city itself. Virtually nothing in your town do not know. Come to my hotel. Take whiskey, balls, sit down and have a chat."'

					act 'Go to the hotel':gt 'EvOtelMan'

					dynamic $din_dance_otkaz
				end
			elseif DPtipe = 2:
				'The entire dance tipsy man molested you when the dance ended and he whispered in your ear. "My name is <<$bname>>. What''s your name?" You answered "<<$name>>." The man continued, "<<$name>>, I''m not a local, I live in a hotel, let''s now take a taxi and go to me."'

				act 'Go to the hotel':gt 'EvOtelMan'
			end
		end

		gs 'stat'
		dynamic $din_dance_otkaz
		dynamic $din_kotov_love
	end
}

$din_otbor_dance_pertner = {
	!!the creation of a partner to dance
	sozboyrand = rand(1, 300)
	if sozboyrand > boynum:
		gs 'BnameGen'
		DaPaTipeRand = rand(0, 100)

		if DaPaTipeRand < 70:
			!!ordinary local boy
			bmtimeTipe = 0
			DrunkDPTrand = rand(0, 100)

			if DrunkDPTrand < 70:
				DPtipe = 1
				DPgrup = 1
				$din_disc_dance = 'It suits you the guy in jeans and a t-shirt, and offers dance.'
				$din_disc_dance2 = 'Next to you dancing guy in jeans and a T-shirt.'
			elseif DrunkDPTrand >= 70:
				DPtipe = 2
				DPgrup = 1
				$din_disc_dance = 'It suits you drunk guy in jeans and a t-shirt, and offers dance.'
				$din_disc_dance2 = 'Next to you dancing drunk guy in jeans and a T-shirt.'
			end
		elseif DaPaTipeRand >= 70 and DaPaTipeRand < 90:
			!!local gopar
			bmtimeTipe = 1
			DrunkDPTrand = rand(0, 100)

			if DrunkDPTrand < 50:
				DPtipe = 1
				DPgrup = 2
				$din_disc_dance = 'It suits you guy dressed in sweatpants and a sweatshirt and the same offers to dance.'
				$din_disc_dance2 = 'Next to you dancing guy in sweatpants and sweatshirts.'
			elseif DrunkDPTrand >= 50:
				DPtipe = 2
				DPgrup = 2
				$din_disc_dance = 'It suits you drunk guy dressed in sweatpants and sweatshirts same and takes you arms around his waist offering dance.'
				$din_disc_dance2 = 'Next to you dancing drunk guy in sweatpants and sweatshirts.'
			end
		elseif DaPaTipeRand >= 90:
			!!traveling_expenses
			bmtimeTipe = 2
			DrunkDPTrand = rand(0, 100)

			if DrunkDPTrand < 90:
				DPtipe = 1
				DPgrup = 3
				$din_disc_dance = 'To you fit man in a decent jacket, trousers with arrows, expensive shoes, and offers dance.'
				$din_disc_dance2 = 'Next to you dancing man in a decent jacket, trousers with arrows, expensive shoes.'
			elseif DrunkDPTrand >= 90:
				DPtipe = 2
				DPgrup = 3
				$din_disc_dance = 'It suits you drunk man in a decent jacket, trousers with arrows, expensive shoes, and offers dance.'
				$din_disc_dance2 = 'Near you drunk man dancing in a decent jacket, trousers with arrows, expensive shoes.'
			end
		end
		gs 'boymass'
	elseif sozboyrand <= boynum:
		Tboynum = sozboyrand

		if bmTip[Tboynum] = 0:
			$niknameboy = 'Guy'
			rudeboy = 1
			$text = 'It suits you the guy in jeans and T-shirt, and invites you to dance. Appearance guy seems familiar to you, apparently you have danced with him.'
		elseif bmTip[Tboynum] = 1:
			$niknameboy = 'Gopnik'
			rudeboy = 2
			$text = 'It suits you the guy dressed in sweatpants and sweatshirts same and offers dance. Appearance guy seems familiar to you, apparently you have danced with him.'
		elseif bmTip[Tboynum] = 2:
			$niknameboy = 'Man'
			rudeboy = 0
			$text = 'For you fit man in a decent jacket, pants with arrows, expensive shoes, and invites you to dance. Ethnicity men seem familiar to you, apparently you have danced with him.'
		end

		gt 'BMloc'
	end
}

$din_too_drunk_dance = {
	if StoryLine = 1 and BeInSchool > 0:
		cls
		gs 'stat'
		'It suits you Katja Meynold "<<$name>>, so that you get drunk? Let''s go home, I''ll take you."'

		act 'Go with Katja':
			cls
			minut += 15
			grupNPC[14] = 100

			if meynoldQW = 0:meynoldQW = 1

			gs 'stat'
			'<center><img src="images/etogame/club_dance.jpg"></center>'
			'Katja took you to your home keeping the arms.'

			act 'Go home':gt 'korrPar'
		end

		exit
	end
}

$metka = $ARGS[0]
$loc = $CURLOC
boynumBlock = 0
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
if music_on = 0:
	inited = 1
	music_on = 1
	volume = 100
	$music_theme = 'gdis'
	gs 'init_music'
end
'<center><b><font color="maroon">Disco</font></b></center>'
'<center><img src="images/etogame/club_yaho.jpg"></center>'

if hour >= 20 and hour <= 23:
	if StoryLine = 1 and BeInSchool > 0:'The club and you see a few <a href="exec:gt ''SgrupDisco''">of people you know</a>.'
	if soniaslut < 5:soniaslut += 1

	if grupTipe[25] = 0 and StoryLine = 1 and BeInSchool > 0 and soniaslut >= 5 and hour < 23:
		'You notice the disco Sonia Ivanko of your class. She is talking about something with Victor Kotov.'

		act 'View Sonya':gt 'soniaDisco'

		exit
	end

	!'
	if soniaPS >= 1 and hour <= 21 and meynoldQW = 0 and BeInSchool > 0:
		''
		exit
	end
	'!

	act 'Dance one':
		cls
		'<center><img src="images/etogame/club_dance.jpg"></center>'
		minut += 5
		!!fat -= 1

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

		manna += 10
		willpower += 10
		frost = 0
		gs 'stat'

		if cumface > 0 or cumfrot > 0:
			if GorSlut < 2:GorSlut = 2

			manna -= 100
			'It suits you and the guy starts to stick, suddenly he sees you cum. The guy jumps on you "thanked, vaflersha. Lads estimate, this chick all in Concha peremazanna." To you guys still see fit. "Yeah sure. Hey nipple unsuccessfully vysmarkalas what?" You cheeks blush with shame and you''re heading for the exit.'

			act 'Leave':gt 'gdk'

			exit
		end

		if alko >= 4:
			'You''re drunk in the trash and try to dance, but the floor out from under my feet and you dance instead of just drunkenly Mota regularly bumping into other people.'
			dynamic $din_too_drunk_dance
		elseif alko < 4 and alko > 0:
			'You''re drunk and fun skip on the dance floor without paying attention to others, and even the music.'
		else
			'The music is quite old, but catchy. And you''ll have fun circling dance, paying no attention to anyone.'
		end

		if alko < 4:
			verprigrand = rand(0, 100)

			if verprigrand <= dance:
				dynamic $din_otbor_dance_pertner
				gs 'stat'
				'<<$din_disc_dance2>>'

				act 'Dance with a guy':
					cls
					'<center><img src="images/etogame/club_dance.jpg"></center>'
					dynamic $din_dance_vrp
				end

				act 'Move away':
					cls
					gt $curloc
				end

				exit
			end
		end

		gs 'stat'

		act 'Further':gt 'gdkin'
	end

	act 'Standing at the wall':
		cls
		minut += 5
		!!fat -= 1
		manna -= 5
		frost = 0
		gs 'stat'
		'<center><img src="images/etogame/club_yaho.jpg"></center>'

		if cumface > 0 or cumfrot > 0:
			if GorSlut < 2:GorSlut = 2

			manna -= 100
			'It suits you and the guy starts to stick, suddenly he sees you cum. The guy jumps on you "thanked, vaflersha. Lads estimate, this chick all in Concha peremazanna." To you guys still see fit. "Yeah sure. Hey nipple unsuccessfully vysmarkalas what?" You cheeks blush with shame and you''re heading for the exit.'

			act 'Leave':gt 'gdk'

			exit
		end

		if alko >= 4:
			'You''re drunk in the trash, and standing at the wall hard for her to restrain from the fact that the floor floats you from under their feet.'
			dynamic $din_too_drunk_dance

		elseif alko < 4 and alko > 0:
			'You''re drunk, and standing at the wall watching the dancing.'
		else
			'You are standing at a modest stenochki watching dancing.'
		end

		if alko < 4:
			verodance = 0

			if hapri = 1:verodance += 1
			if glamur = 1:verodance += 2
			if ski = 1:verodance += 1
			if mop = 2:verodance += 1
			if mop = 3:verodance += 2
			if mop = 4:verodance += 3

			verodance += alko
			verodance += 5
			verprigrand = rand(0, 20)

			if verprigrand <= verodance:
				dynamic $din_otbor_dance_pertner
				gs 'stat'
				'<<$din_disc_dance>>'

				act 'Dance':
					cls
					gs 'stat'
					'<center><img src="images/etogame/club_dance.jpg"></center>'
					dynamic $din_dance_vrp
				end

				act 'Refuse':
					cls
					gt $curloc
				end

				exit
			end
		end

		gs 'stat'

		act 'Further':gt 'gdkin'
	end
elseif hour < 20:
	'Club closes. The lights go on, the music fades and all begin to diverge.'
end

act 'Go outside':gt 'gdk'

--- gdkin ---------------------------------
# soniaDisco
$din_sonia_dance = {
	act 'Approach Sonia':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/sonia/1.jpg"></center>'
		'You went to Sonya and told her that she had piled strap. Sonia smiled drunkenly and began awkwardly correct dress. To you came Witek Kotov and said "Cool tits." Sonya touched her nipple with a finger, "Really? You like" Kotov grinned "And how. You still sponges and cool, well probably suck." Sonya knocked cam Vic "Ofigel what?" Witek laughed "I''m talking about ice cream, what do you think?" Sonia embarrassed "You do not have ice cream!" Witek squinted slyly, "And if there? Pososesh?" Sonia licked "With pleasure." Witek ice cream out of his pocket and opened it. Sonia pulled her hands to the ice cream, but ice cream Witek deftly cleaned by Sonya "Just out of my hands."'

		act 'Watch':
			cls
			minut += 3
			horny += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/sonia/2.jpg"></center>'
			'Sonia took her hands and opened her mouth. Vitek held ice cream lips and tongue Sony. Sonia began to suck dick like ice cream and cunningly look at Victor. Witek gradually lowered down to the level of its ice cream his pants and Sonia slowly squatted and continued to suck ice cream. Witek noticeably excited and reared him fly. Shulga and Auburn were watching with their mouths open. Auburn finally squeezed "Come into the street still buhnem."'

			act 'Staying at the disco':
				cls
				minut += 5
				dance += 1
				soniaPS = 1
				grupTipe[25] = -1
				$npcText[25] = 'Sonia once inadvertently drunk and fucked in the mouth in a circle Witek Kotov and his friends. After that, the girls shunned Sonya, and the boys thought she was a whore. Local gopota regularly drove to Sonia proposals have sex.'
				gs 'stat'
				'<center><img src="images/qwest/alter/sonia/7.jpg"></center>'
				'You were at the disco and continued to dance. Soon happy boys went to the disco, Kotov hand pulled Sonia, you got accustomed and gasped, her face was covered with cum. Boys began to laugh and call Sonia whore girls turned away with contempt. Sonia pulled her hand out of his hand and ran away with Vic discos.'

				act 'Go to the disco':gt 'gdkin'
			end

			act 'Go to the street':
				cls
				minut += 3
				horny += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/sonia/3.jpg"></center>'
				'You went out with the company and went to the place where the booze. Sonia was staggering and finishing her ice cream. "Witek, and you have more ice cream?" Witek grinned "We find something. Syat squatted and close your eyes." Sonia giggling squatted and closed her eyes. Witek unbuttoned his pants and fell out of his pants his dick gets up. Sonia opened her eyes and drew back. She giggled, but did not get up on their feet. Vitek said quietly, "You can touch, it''s much better ice cream."'

				act 'Watch':
					cls
					minut += 3
					horny += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/sonia/4.jpg"></center>'
					'Sonya watched spellbound as a member before his face and her hands went to the penis, she pointed a finger member and cock jerked, Sonia giggled and grabbed his dick small hands. Her slender fingers began stroking the skin on the penis. Vitek said strangled "Now try the taste, you''ll like it."'

					act 'Watch':
						cls
						minut += 3
						horny += 5
						gs 'stat'
						'<center><img src="images/qwest/alter/sonia/5.jpg"></center>'
						'Sonia brought her face to the penis and gingerly licked the head, then opened her lips and put prick in his mouth. Sonia began to suck dick slurping loudly. The other guys as teammates began to unbutton his pants and surround Sonya.'

						act 'Watch':
							cls
							minut += 3
							horny += 5
							gs 'stat'
							'<center><img src="images/qwest/alter/sonia/6.jpg"></center>'
							'Sonia surrounded boys and she began to suck their members did not resist and even with obvious pleasure. It took quite a bit of time and the guys in turn began to cum on face Sonya, covering his sperm.'

							act 'Watch':
								cls
								minut += 3
								horny += 5
								soniaPS = 1
								grupTipe[25] = -1
								$npcText[25] = 'Sonia once inadvertently drunk and fucked in the mouth in a circle Witek Kotov and his friends. After that, the girls shunned Sonya, and the boys thought she was a whore. Local gopota regularly drove to Sonia proposals have sex.'
								gs 'stat'
								'<center><img src="images/qwest/alter/sonia/7.jpg"></center>'
								'Finally the guys finished and cleaned members in his pants. Ryzhov said "We have to give the lads announced on vafleshe. Zashkvaryatsya And what about this whore." Shulga giggled "Classy cocksucker." Sonia drunkenly to her feet and leaned against the tree. flowed down her face sperm and you notice that the eyes of her tears flow. Sonia whispers "What have I done, you fool."'

								act 'Go to the disco':gt 'gdkin'
							end
						end
					end
				end
			end
		end
	end
}

gs 'stat'
'<center><img src="images/qwest/alter/sonia/0.jpg"></center>'
'To Vit''ka Kotov joined his cronies have Vasya you notice package where you can see the bottle. Vitek says your mind and turns to you. "Hey <<$name>>. Then plunk We decided, let''s go with us."'

act 'go thump':
	cls
	alko += 2
	minut += 15
	gs 'stat'
	'<center><img src="images/qwest/alter/sonia/0.jpg"></center>'
	'You along with the company went out and Bob took out a package of vodka, a piece of liver sausage, lemonade and a loaf of Pinocchio. Bob poured vodka into plastic cups and distributed. You drank vodka and choking zapili lemonade. Sonia too drunk. After that, everyone started talking. Vasya again poured vodka into glasses. You decided to skip and Sonya drank vodka. After that, she became noticeably opyanela and cheeky smile. "I want to dance. Come back."'

	act 'Go back to the disco':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/sonia/1.jpg"></center>'
		'You''re back with the company on a disco and Sonia immediately ran to the dance floor. Sonia dancing so desperately that does not even notice that her bra strap fell down and see her naked breasts.'
		dynamic $din_sonia_dance
	end
end

act 'Refuse':
	cls
	minut += 30
	gs 'stat'
	'<center><img src="images/qwest/alter/sonia/1.jpg"></center>'
	'You refused and the company withdrew, after a while you see that Sonia guys returned to the disco and Sonia frankly drunk. Sonia goes to the dance floor and starts dancing. Sonia dancing so desperately that does not even notice that her bra strap fell down and see her naked breasts.'
	dynamic $din_sonia_dance
end

--- soniaDisco ---------------------------------
# gschool
$metka = $ARGS[0]
$loc = $CURLOC
gs 'stat'
gs 'time'
'<center><b><font color="maroon">School</font></b></center>'
'<center><img src="images/qwest/alter/gschool.jpg"></center>'
'Ordinary school where local children learn.'


act 'Leave':gt 'gorodok'

if zverRageQW = 1:
	cls
	zverRageQW = 2
	gs 'stat'
	gs 'time'
	'You came to the school yard after school, vnezpno someone you flunked powerful Pendel in the ass, you dumbfounded turned and saw Christina Zverev contorted with rage face. She yelled at you "you ohuel, whether that bitch, about me any garbage chat? I''ll now break mug!"'
	$nameV = 'Christina'
	!!stats
	strenV = 100
	speedV = 90
	agilV = 90
	reactV = 90
	vitalV = 120
	intelV = 50
	willV = 50
	!!skills
	magikV = 100
	boxingV = 40
	shootV = 100
	!!parameters
	healthV = vitalV * 10 + strenV * 5
	mannaV = intelV * 10 + magikV * 10
	willpowerV = willV * 10
	BonusAtakV = 0
	BonusDefV = 0
	!!Programme of Action
	program = 0
	ZverevaFight = 1

	if spellavtoklon = 1:klon = 3
	if spellbefshild = 1:defence = 500

	round = 0

	act 'fight':gt 'fight','start'

	exit
end

if day = 29 and month = 12 and year = 2010 and StoryLine = 1:
	if hour = 14:
		'Near the school are already well-dressed girls and boys in your class. Someone called you "<<$name>>, you did not hand over a thousand for the new year"'

		if money >= 1000:act 'Go to a party (1,000 rubles)':money -= 1000 & gt 'sny'
	end
end
if week = 6 and schoolSorev = 2 and hour = 10:
	'Near the school are students from different schools and athletes preparing for the competitions in running.'

	act 'Participate in city running race':
		cls
		minut += 30
		gs 'stat'
		'You came to the athletes and he wrote you. After this athlete finished all the preparations for the competition and the guys went to a stratum. The guys went over and as expected won the Ivan Prokhorov. After the guys finished the turn girls.'

		if swinbeggor = 0:
			'Ready to start Christina Zvereva, one of the girls in your class. She scoff at you, "You''ll never beat me."'
		elseif swinbeggor = 1:
			'Ready to start Christina Zvereva, one of the girls in your class. She looks at you angrily, "You beat me once, but now you will not work."'
		elseif swinbeggor = 2:
			'Ready to start Christina Zvereva, one of the girls in your class. She looks at you with hatred "Again came bitch? Never mind, this time I''ll do it!"'
		end

		act 'Go to start':
			cls
			kolsorev += 1
			minut += 30
			schoolSorev = 0
			gs 'stat'
			'<center><img src="images/etogame/begsor.jpg"></center>'
			'Girls, on the 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

			begresult = beg + speed + vital + rand(1, 20) - salo - rand(1, 20)

			if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
			if begresult > 0 and begresult < 70:'You are not bad ran for dilettante course, as ranked last 8th place.'
			if begresult >= 70 and begresult < 80:'You fought hard, but managed to take only 7 penultimate place.'
			if begresult >= 80 and begresult < 90:'You fought hard, but only managed to take 6th place.'
			if begresult >= 90 and begresult < 100:'You fought hard, but only managed to take 5th place.'
			if begresult >= 100 and begresult < 110:'You fought hard, but only managed to take 4th place.'
			if begresult >= 110 and begresult < 120:'You fought hard and managed to take 3rd place. Fizruk congratulates you on your success.'
			if begresult >= 120 and begresult < 130:'You fought hard and managed to take 2nd place. Fizruk congratulates you in hurry.'
			if begresult >= 130:swinbeggor += 1 & dom += 1 & 'You fought hard and managed to take 1st place. Fizruk congratulate you on winning the competition.'

			beg += 1
			fat -= 10

			if swinbeggor = 3 and razradbeg = 1:
				razradbeg = 2
				grupNPC[18] = 0
				zverevaQW = 1
				'You won the three competitions and urban Fizruk announces you that he and you are handed pohadataystvoval 2nd sports category on the run. Christina Zvereva stands apart clenched his hands into fists and hatred looks at you.'
			elseif swinbeggor = 2 and begresult >= 130:
				grupNPC[18] = 0
				'At the finish line worth Christina Zvereva and trying to catch her breath, she was not able to overtake you, and came second. Christina tries not to look you in the eye.'
			elseif swinbeggor = 1 and begresult >= 130:
				grupNPC[18] = 0
				'At the finish line worth Christina Zvereva and trying to catch her breath, she was not able to overtake you, and came second. Christina through her teeth growls at you, "That bitch!"'
			end

			gs 'stat'

			act 'Leave':gt 'gorodok'
		end
	end
end

if week = 6 and schoolSorev = 1 and hour = 10:
	'Near the school are students of different classes and Athlete preparing for the competitions in running.'

	act 'Participate in school running race':
		cls
		minut += 30
		gs 'stat'
		'You came to the athletes and he wrote you. After this athlete finished all the preparations for the competition and the guys went to a stratum. The guys went over and as expected won the Ivan Prokhorov. After the guys finished the turn girls.'

		act 'Go to start':
			cls
			minut += 30
			schoolSorev = 0
			kolsorev += 1
			gs 'stat'
			'<center><img src="images/etogame/begsor.jpg"></center>'
			'Girls, on the 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

			begresult = beg + speed + vital + rand(1, 20) - salo - rand(1, 20)

			if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
			if begresult > 0 and begresult < 10:'You are not bad ran for dilettante course, as ranked last 8th place.'
			if begresult >= 10 and begresult < 20:'You fought hard, but managed to take only 7 penultimate place.'
			if begresult >= 20 and begresult < 30:'You fought hard, but only managed to take 6th place.'
			if begresult >= 30 and begresult < 40:'You fought hard, but only managed to take 5th place.'
			if begresult >= 40 and begresult < 50:'You fought hard, but only managed to take 4th place.'
			if begresult >= 50 and begresult < 60:'You fought hard and managed to take 3rd place. Fizruk congratulates you on your success.'
			if begresult >= 60 and begresult < 70:'You fought hard and managed to take 2nd place. Fizruk congratulates you in hurry.'
			if begresult >= 70:swinbeg += 1 & dom += 1 & 'You fought hard and managed to take 1st place. Fizruk congratulate you on winning the competition.'
			beg += 1
			fat -= 10

			if swinbeg = 3 and razradbeg = 0:
				razradbeg = 1
				'You have won three times on the school competitions and you Fizruk announces that he pohadataystvoval and you are handed a third sports category on the run.'
			end

			gs 'stat'

			act 'Leave':gt 'gorodok'
		end
	end
end

if hour <= 8 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 4 and month = 5 and day >= 25 and age = 17:
	'Today you will have a prom.'

	act 'Go to the prom':
		cls
		SchoolAtestat = 1
		intel += 10
		gs 'stat'
		'Your class was built on a ruler and a teacher to congratulate you on the successful completion of the school.'

		act 'Leave':gt 'gorodok'

		act 'Go to the prom':
			cls
			minut += 120
			alko += 5
			gs 'stat'
			gs 'clothing', 'strip'
			!!gee gee, no normal outlet
			'At graduation all get drunk in the asshole. You almost do not remember anything, only that bathed in the fountain as a paratrooper and woke up naked.'

			act 'Leave':gt 'gorodok'
		end
	end
end

if hour <= 8 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0:
	if $clothingworntype = 'sforma':
		act 'Go to school':gt 'gschool2'
	else
		'You are not dressed in uniforms and you are not allowed in school.'
	end
end

if hour >= 16 and GorSlut >= 3 and SchoolGossip > 0 and afterschoolday ! day:
	aftgopbjrand = rand(0, 2)

	if aftgopbjrand = 0:
		cla
		'At the exit of the school you were waiting for the boys headed cats. "Well, that nipple? Ready yet to work their fucking mouth? Come for the school."'

		act 'Go after school':
			cls
			afterschoolday = day
			SchoolGossip += 1
			minut += 60
			gs 'stat'
			'You took in school where boys giggling looking at you. Kotov said, "I do not understand why you cocksucker cheek still not get it?"'

			act 'Suck':
				cls
				minut += 60
				bj += 3

				if npcSex[9] = 0:npcSex[9] = 1 & guy += 1
				if npcSex[10] = 0:npcSex[10] = 1 & guy += 1
				if npcSex[11] = 0:npcSex[11] = 1 & guy += 1

				sub += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/toiletBJtreesome.jpg"></center>'
				'You obediently squatted and pulled Witek member of his sweatpants. You clasped him with <<$liptalk3>> a hard cock and began to suck him. Dan and Bob Ryzhov Shulgin came to you and took out their members. You become one by one handle cocks with her mouth caressing those that are not in your mouth with your hands.'

				act 'Suck':
					cls
					minut += 60
					bj += 3
					cumlip += 1
					cumface += 1
					cumfrot += 1
					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/toiletBJcum.jpg"></center>'
					'Finally a member of the discharge of semen in your mouth. Looking at it as follows sperm from your mouth remaining guys started to cum on your face. You closed your eyes and obediently waited until the boys did not stop to stop. Finally they ended up laughing at you and walked away.'

					act 'Leave':gt $curloc
				end
			end
		end

		exit
	end
end

if JuliaMilLernQW >= 1 and hour = 16 and week < 6 and kanikuli = 0:'In the school yard strolls <a href="exec:minut += 1 & gt ''JuliaMilGo''">Julia Milov</a>'
if NatBelLernQW >= 1 and hour = 16 and week < 6 and kanikuli = 0:'In the school yard strolls <a href="exec:minut += 1 & gt ''NatBelGo''">Natasha Belova</a>'
if artemLernQW >= 1 and hour = 16 and week < 6 and kanikuli = 0 and artemVitokQW ! 2:'In the school yard you already waiting <a href="exec:minut += 15 & gt ''artemEv''">Artem Chebotarev</a>'
if week = 1 and kanikuli = 0 and arthakQW >= 10 and apmeetday ! daystart and hour >= 16:gt 'artgar'
if hour = 16 and albinaCarday ! day and week < 6 and kanikuli = 0:
	!!if DanceWhore > 0 or AlbinaLast > 0 or AlbinaBlokDance > 0:'You see standing in the school yard and BMW X5 <a href="exec:minut += 15 & gt ''albinaEv''">Albina Barlovskuyu</a> sitting behind the wheel'
	if AlbFrend >= 1 and albrideday ! daystart:'Near a large black SUV parked near the school stands <a href="exec:minut += 15 & gt ''albinaRide''">Albina Barlovskaya</a>'
end

if hour = 16 and week < 6 and kanikuli = 0 and katjaMeynoldday ! day and meynoldQW >= 2:'In the school yard stroll <a href="exec:minut += 15 & gt ''katjaEv''">Katja Meynold</a>'
if DimaRudeQW > 0 and hour = 16 and week < 6 and kanikuli = 0 and dimarudeday ! day and DimaRudeBlock = 0:'In the school yard is worth pondering <a href="exec:minut += 15 & gt ''dimaRudeEv''">Dimka Nosov</a>'
if IgorLoverQW > 0 and hour = 16 and week < 6 and kanikuli = 0 and igorkruglovday ! day and IdorBlock = 0:'In the school yard strolls <a href="exec:minut += 15 & gt ''IgorEv''">Igor Kruglov</a>'
if fedorKozlovQW >= 10 and hour = 16 and week < 6 and kanikuli = 0:'Far away from the school entrance stands <a href="exec:minut += 15 & gt ''FedorEv''">Fedor Kozlov</a>, he was glad to see you and come to you.'
if strelaDay ! day and strelaQW = 1 and hour = 16:
	cls
	gs 'stat'
	'To school drove Mitsubishi Pajero and BMW. Of the cars went out strong, inflated guys in leather jackets and tracksuits. They came to the meeting Kotov, Auburn and Shulga. They talked about something and came here from school Fedor Kozlov with a swollen face, bruised. Kotov you waved a hand "<<$name>>, come here, you''re a witness."'

	act 'Start at the arrow':gt 'strela'

	exit
end
gs 'family'

--- gschool ---------------------------------
# gschool2
$d_fart_klass = {
	if anus > 25 and analplugin = 0:
		fartrand = rand(0, 5)

		if fartrand = 0:
			farttiperand = rand(0, 3)

			if farttiperand = 0:
				manna /= 2
				gs 'stat'
				'Stir in the chair you suddenly farted. Carefully looking around and looking at you understand classmates, that no one had heard of this.'
			elseif farttiperand=1:
				manna /= 2
				gs 'stat'
				'Stir in the chair you suddenly farted. Carefully looking around and looking at you understand classmates, that no one had heard of this. One of the guys suddenly become oziratsya and prinyuhivatsya, then whispered loudly neighbor "What a bastard naperdela?"'
			elseif farttiperand = 2:
				manna /= 2
				sub += 1
				gs 'stat'
				'Stir in the chair you suddenly farted. Several people turned out at you and giggled.'
			elseif farttiperand = 3:
				manna = 0
				sub += 5
				fart += 1
				gs 'stat'
				'Stir in the chair you suddenly perdanuli loudly to the whole class. The whole class looked at you and classmates began to laugh at you. Teacher as something managed to calm the class. And you sit all red as a lobster out of shame and fear to raise their eyes to classmates, myself thinking "Christ, what a shame."'
			end
		end
	end
}

$d_fart_fiz = {
	if anus > 25 and analplugin = 0:
		fartrand = rand(0, 5)

		if fartrand = 0:
			farttiperand = rand(0, 3)

			if farttiperand = 0:
				manna /= 2
				gs 'stat'
				'The voltage you suddenly farted. Carefully looking around and looking at you understand classmates, that no one had heard of this.'
			elseif farttiperand = 1:
				manna /= 2
				gs 'stat'
				'The voltage you suddenly farted. Carefully looking around and looking at you understand classmates, that no one had heard of this. One of the guys suddenly become oziratsya and prinyuhivatsya, then whispered loudly neighbor "What a bastard naperdela?"'
			elseif farttiperand = 2:
				manna = manna / 2
				sub += 1
				gs 'stat'
				'The voltage you suddenly farted. Several people turned out at you and giggled.'
			elseif farttiperand = 3:
				manna = 0
				sub += 5
				fart += 1
				gs 'stat'
				'The voltage you suddenly perdanuli loudly to the whole class. The whole class looked at you and classmates began to laugh at you. Fizruk something like managed to calm the class. And you sit all red as a lobster out of shame and fear to raise their eyes to classmates, myself thinking "Christ, what a shame."'
			end
		end
	end
}

gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">School</font></b></center>'
'<center><img src="images/qwest/alter/gschool2.jpg"></center>'
'Hallways at school painted cheap toxic green paint.'

act 'Leave to the school entrance':gt 'gschool'

$din_sekondparturok = {
	act 'Go to lessons':
		cls
		minut += 60 * 3
		schoolprogul -= 1

		if week ! 3 and week ! 5:
			urand = rand(0, 12)
			lernSkill += 1
			lernHome += 1
			BeInSchool += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/urok<<urand>>.jpg"></center>'
			'You were sitting in the classroom and listened to the monotonous boom on teachers, at least that is trying to understand and not to fall asleep.'
			dynamic $d_fart_klass
			'Finally the bell rang and students began to go home.'

			act 'Leave':gt 'gschool'
		elseif week = 3 or week = 5:
			gs 'stat'
			'<center><img src="images/qwest/alter/fizra.jpg"></center>'
			'On Wednesdays and Fridays, as always in the afternoon exercise. You other devchenki dressed in the locker room and went to gym class. Viktor Pavlovich in tights with blisters on my knees and nickel whistle built your class in a line and began to conduct a roll call.'
			fizrarand = rand(0, 4)

			if fizrarand = 0:
				speed += rand(1, 3)
				manna -= 5
				fat -= 5
				sweat += 3
				beg += rand(2, 5)
				'After the roll fizruk announced that today the class will take a run. You ran with the whole class the entire gym class.'
			elseif fizrarand = 1:
				agil += rand(1, 3)
				fat -= 5
				manna -= 5
				sweat += 3
				'After the roll fizruk announced that today the class will take the goat jumping through. You, along with all waiting their turn, that would jump over a goat.'
			elseif fizrarand = 2:
				stren += rand(1, 3)
				manna -= 5
				fat -= 2
				sweat += 3
				'After the roll fizruk announced that today the class will take the pull-ups. You, along with all waiting their turn, that would catch up on the bar with almost lying under a horizontal bar like all girls.'
				dynamic $d_fart_fiz
			elseif fizrarand = 3:
				vital += rand(1, 3)
				manna -= 5
				fat -= 2
				sweat += 3
				'After the roll fizruk announced that today the class will take the news. You, along with all waiting their turn, that would perform abdominal exercises.'
				dynamic $d_fart_fiz
			elseif fizrarand = 4:
				cls
				stren += rand(1, 3)
				manna -= 5
				fat -= 2
				sweat += 3
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/rope.jpg"></center>'
				'On Wednesdays and Fridays, as always in the afternoon exercise. You other devchenki dressed in the locker room and went to gym class. Viktor Pavlovich in tights with blisters on my knees and nickel whistle built your class in a line and began to conduct a roll call.'
				'After the roll fizruk announced that today the class will take the climbing rope. You, along with all waiting their turn, that would climb the rope.'

				if horny >= 100:
					horny = 0
					orgasm += 1
					rope_orgasm += 1
					'You climb a rope and feel like a solid rope t your pussy. You cover the excitement of each meter preodaleniya finally you flinch from the cover you a pleasant feeling all the muscles quivering orgasm and you gripped right on the rope. Fizruk shouts from below "<<$surname>>, what you''re shaking? Tired of what? Come down then."'
				elseif horny >= 50 and horny < 100:
					'You climb a rope and feel like a solid rope t your pussy. You cover the excitement of each preodaleniya meters. You Stroud climbs up to the top and go down the rope with a burning face with excitement.'
				end
			end

			if week = 5 and razradbeg = 0:
				if schoolSorev = 0:schoolSorev = 1

				'Fizruk announced that on Saturday at 10 am will be held school running competition.'
			elseif week = 5 and razradbeg = 1:
				if schoolSorev = 0:schoolSorev = 2

				'Fizruk came to you and said that on Saturday at 10 am will be held city competitions in running.'
			end

			if fizrukSex > 0 and kristinaSex > 0:
				'Christina came to you after gym class, "Well <<$name>> sweetie, let''s go to the Pavlovich? Entertain."'

				act 'Go to athletes':
					cls
					bj += 1
					!!cumlip += 1

					if fizrukSex = 0:fizrukSex = 1 & guy += 1
					if kristinaSex = 0:kristinaSex = 1

					grupNPC[18] = 100
					gs 'stat'
					'<center><img src="images/qwest/alter/ev/fiz.jpg"></center>'
					'You squatted before the coach next to Christine and kissed fizruka member. Then around his lips and began to suck. Christina squatted and looked like you were aspirated. Then she took the dick in his mouth and began to lick you a solid trunk and balls fizruka. Fizruk finally broke down and began to cum in her mouth Christina.'

					act 'Leave':gt 'gschool'
				end
			end
			if zverRageQW = 10:
				!!Christina broke SG
				act 'In the locker room':gt 'gKristinaZv'

				exit
			end

			!!if zverevaQW = 2:end
			!!if zverevaQW = 3 and fizrukSex = 0:end

			if zverevaQW = 1:
				'You see that the gym teacher went to his room and went after him Christina Zvereva. All other students went to the exit.'

				act 'Overheard under the doors':
					cls
					gs 'stat'
					'You quietly stood near the door to the room where the athlete sits and started listening. Christina said, "Viktor Pavlovich, I should not go to the <<$surname>> regional competitions." Viktor Pavlovich said "<<$surname>> beat you." Christina interrupted sporty "Well, you promised!" further they both fell silent and there was a deep sigh fizruka. "Well Kristinochka, I can not just pick and choose you, not her." Christina purred, "And if you think?" Fizruk choked voice said, "Oh, my God." Heard what that champ.'

					act 'Peek':
						cls
						zverevaQW = 2
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/zver.jpg"></center>'
						'You bent to the keyhole and look there. Seen you amazed. Christina was on her knees in front of the coach and sucked his cock.'

						act 'Enter the room':
							cls
							zverevaQW = 3
							gs 'stat'
							!!'<center><img src="images/qwest/alter/Ev/zver.jpg"></center>'
							if GorSlut = 0:
								'You opened the door and entered the room fizruka. Christine''s eyes widened when she saw you. She immediately jumped up and turned away wiping his mouth. Fizruk quickly began to fill the standing member in the sport tights. "<<$surname>>, you have not been taught to knock? We''re discussing important issues!" You rebelled, "Questions? Yeah it sucks you have a member that you''d sent it to the competition!" Fizruk shrugged, "What is this nonsense? There was nothing that you sweetheart overheated? May cause a doctor?" You are even more outraged "Viktor Pavlovich, I saw everything!" He grinned "Congratulations <<$name>>. Only who will believe you? You openly slander pytaeshsya best school athlete Christina Zvereva and make me send you to the regional competition, how low I''ll complain to your parents and the director!" You choked with indignation and Christina smiled slyly you "You can not prove anything, bitch. Now get out."'
							elseif GorSlut > 0:
								'You opened the door and entered the room fizruka. Christina broke away from the penis and giggled "<<$gnikname>> <<$name>> came. Want to suck on some candy?"'

								act 'Give blowjob':
									cls
									bj += 1
									!!cumlip += 1

									if fizrukSex = 0:fizrukSex = 1 & guy += 1
									if kristinaSex = 0:kristinaSex = 1

									grupNPC[18] = 100
									gs 'stat'
									'<center><img src="images/qwest/alter/ev/fiz.jpg"></center>'
									'You squatted before the coach next to Christine and kissed fizruka member. Then around his lips and began to suck. Christina squatted and looked like you were aspirated. Then she took the dick in his mouth and began to lick you a solid trunk and balls fizruka. Fizruk finally broke down and began to cum in her mouth Christina.'

									act 'Leave':gt 'gschool'
								end
							end

							act 'Leave':gt 'gschool'
						end

						act 'Snoop on':
							cls
							horny += 10
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/zver.jpg"></center>'
							'Fizruk groaned and Christine finished in her mouth. That is not taking out a member of his mouth swallow cum.'

							act 'Leave':
								cls
								gs 'stat'
								'You left pondering what he saw. Christina turns fucking with gym teacher and she wants you to go instead to the regional competitions.'

								act 'Leave':gt 'gschool'
							end
						end

						act 'Leave':
							cls
							gs 'stat'
							'You left pondering what he saw. Christina turns fucking with gym teacher and she wants you to go instead to the regional competitions.'

							act 'Leave':gt 'gschool'
						end
					end
				end
			end

			gs 'stat'

			act 'Leave':gt 'gschool'
		end
	end
}

$din_bigperemena = {
	if AlbFrend >= 1 and GorSlut >= 3 and SchoolGossip > 0 and kotovLoveQW <= 0 and AlbinaBlockHumiliation = 0:
		AlbinaBlockHumiliation = 1
		'During the break you approached the local Gopnik. "Slysh cocksucker, missed the dick? Come to jolt, feed you over." To the guys came Albina Barlovskaya "Hey kids, it took away from the quick." Boys began to run into Albina, but she just laughed in their faces, "Look, boys, pull up your pants and stomp where got out, if I see you again pestering Svetke, will have a deal with my dad, and you vkurse who he is." Guys poobzyvali Albina my father''s daughter and said that she kept in her father''s ass hiding, but Albina only grinned in response to them, soon the bell rang and the boys went to the lesson.'
		dynamic $din_sekondparturok
		exit
	elseif AlbFrend >= 1 and GorSlut >= 3 and SchoolGossip = 0 and kotovLoveQW <= 0 and AlbinaBlockHumiliation = 0:
		AlbinaBlockHumiliation = 1
		'During the break you approached the local Gopnik. "Slysh <<$name>>. Star blowjob. Potsiki We already told you zashkvarenaya. Tolchek Come in and chat right." To the guys came Albina Barlovskaya "Hey kids, it took away from the quick." Boys began to run into Albina, but she just laughed in their faces, "Look, boys, pull up your pants and stomp where got out, if I see you again pestering Svetke, will have a deal with my dad, and you vkurse who he is." Guys poobzyvali Albina my father''s daughter and said that she kept in her father''s ass hiding, but Albina only grinned in response to them, soon the bell rang and the boys went to the lesson.'
		dynamic $din_sekondparturok
		exit
	end

	if npcSex[14] = 1 and KatjaLust >= 50 and KatjaHorny + KatjaSlut >= 100 and KatjaHorny > 50:
		'During the break you went red as a lobster Katja Meynold and invited to go along to a secluded place.'

		act 'Go with Katja':
			cls
			gs 'stat'
			'<center><img src="images/qwest/alter/katja/petting.jpg" ></center>'
			'Katja brought you into a small room where it was stored inventory for cleanup. She barely closed the door immediately dug into your lips on my lips and whispered passionately "<<$name>>, I want you."'

			act 'Lick Katja':
				cls
				lesbian += 1
				sub += 1
				KatjaDom += 1
				katschoolsex += 1
				KatjaSlut += 1
				KatjaHorny = 0
				gs 'stat'
				'<center><img src="images/qwest/alter/katja/lesbian.jpg" ></center>'
				'You sat on his haunches and Kate lifted her skirt and pulled down pants. You nuzzled into her crotch and began to caress his tongue deftly tiny clitoris Katie ,Soon Kate moaned and clutched your hair cum.'
				dynamic $din_sekondparturok
			end
		end

		dynamic $din_sekondparturok
		exit
	end

	if GorSlut >= 3 and SchoolGossip > 0 and kotovLoveQW <= 0 and AlbinaBlockHumiliation = 0:
		'During the break you approached the local Gopnik. "Slysh cocksucker, soskuchelas on dick? Come to jolt, feed you over."'

		act 'Go to the toilet':
			cls
			SchoolGossip += 1
			gs 'stat'
			'You sadly went with the guys in the men''s room. One of the guys drove small fry of sortra and stood at the door. Cats spoke to you. "Well, that cocksucker. Bury on the canine."'

			act 'Suck':
				cls
				minut += 60
				bj += 1

				if npcSex[9] = 0:npcSex[9] = 1 & guy += 1

				cumlip += 1
				swallow += 1
				sub += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/toiletBJ.jpg"></center>'
				'You obediently squatted and pulled Witek member of his sweatpants. You clasped him with <<$liptalk3>> a hard cock and began to suck him. Finally you feel like your mouth spurt of semen and Vitek said in a choked voice, "Swallow cocksucker, if any drop will''ll lick." You diligently swallowing sperm trying not to drop a single drop Witek finally stopped and cleaned cum cock back in his pants. "Good cocksucker, now going to go to every change in tolchek portion struhni. Clear?" You nodded, feeling a nasty taste in the mouth of sperm.'
				dynamic $din_sekondparturok
			end
		end

		exit
	elseif GorSlut >= 3 and SchoolGossip = 0 and kotovLoveQW <= 0 and AlbinaBlockHumiliation = 0:
		gopbjtoiletrand = rand(0, 2)

		if gopbjtoiletrand=0:
			'During the break you approached the local Gopnik. "Slysh <<$name>>. Star blowjob. Potsiki We already told you zashkvarenaya. Tolchek Come in and chat right."'

			act 'Go to the toilet':
				cls
				SchoolGossip = 1
				gs 'stat'
				'You trembling went with the guys in the men''s room. One of the guys drove small fry of sortra and stood at the door. Cats spoke to you. "Well, that cocksucker. Bury on the canine."'

				act 'Suck':
					cls
					minut += 60
					bj += 1

					if npcSex[9] = 0:npcSex[9] = 1 & guy += 1

					cumlip += 1
					swallow += 1
					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/toiletBJ.jpg"></center>'
					'You obediently squatted and pulled Witek member of his sweatpants. You clasped him with <<$liptalk3>> a hard cock and began to suck him. Finally you feel like your mouth spurt of semen and Vitek said in a choked voice, "Swallow cocksucker, if any drop will''ll lick." You diligently swallowing sperm trying not to drop a single drop Witek finally stopped and cleaned cum cock back in his pants. "Good cocksucker, now going to go to every change in tolchek portion struhni. Clear?" You nodded, feeling a nasty taste in the mouth of sperm.'
					dynamic $din_sekondparturok
				end

				!!if dom > 0:end
			end

			exit
		elseif gopbjtoiletrand=1:
			'On the reverse to you guy came from another class. "Hey <<$nickname>>, star blowjob, I heard that you <<$gnikname>>, go to jolt me sosnesh."'

			act 'Go to the toilet':
				cls
				gs 'stat'
				'You went to the toilet with unfamiliar guy from another class. In the bathroom .'

				act 'Suck':
					cls
					minut += 60
					bj += 1
					guy += 1
					cumlip += 1
					swallow += 1
					sub += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/toiletBJ2.jpg" ></center>'
					'You obediently sat down on his haunches and the guy ran his purple head you lips. You wrapped around his own <<$liptalk3>> hard cock and started to suck his hard cock absorbing into his mouth. After a while the man groaned and you feel like a warm jet of sperm hit you in the mouth. that would not choke you immediately started to swallow sperm and dosasyvat member. Finally went limp dick and a guy hid in his pants.'
					dynamic $din_sekondparturok
				end
			end

			if dom > 0:
				act 'Send it':
					cls
					gs 'stat'
					'You idiot sent to hell .'
					dynamic $din_sekondparturok
				end
			end

			exit
		end

		if evgenQW >= 4:
			evgenrand = rand(1, 10)

			if evgenrand = 1:gt 'brosh'
		end
	end

	if soniaPS = 2:soniaPS = 3 & 'When the change you have seen how Sonya Ivanko talking about something Cats. Sonia looks at him almost in tears and nods.'

	act 'Sit in a classroom':
		cls
		minut += 60
		urand = rand(0, 20)
		gs 'stat'
		'<center><img src="images/qwest/alter/peremena<<urand>>.jpg"></center>'
		'You sit in a classroom with a few <a href="exec:gt ''Sgrup1''">and botanists zauchkami</a>. The class also remained <a href="exec:gt ''Sgrup5''">rogue</a>. Most of the students came out into the corridor.'
		dynamic $din_sekondparturok
	end

	act 'Go through the corridor':
		cls
		minut += 60
		gs 'stat'
		'<center><img src="images/qwest/alter/school.jpg"></center>'
		'Girls wandered through the piles and then discuss it. Guys derzhutsya separately and some went to smoke behind the school. You see the local <a href="exec:gt ''Sgrup3''">Spin the</a>, <a href="exec:gt ''Sgrup2''">sportikov</a>'
		dynamic $din_sekondparturok
	end

	act 'Go to the toilet':
		cls
		minut += 60
		urand = rand(0, 12)
		gs 'stat'
		'<center><img src="images/qwest/alter/toilet.jpg"></center>'
		'The toilet as always full of beautiful girls who go about their business. Some people smoke at the window. Local hooligans rubs near <a href="exec:gt ''Sgrup4''">WC</a>.'
		dynamic $din_sekondparturok

		if soniaPS >= 3:
			soniarand = rand(0, 3)

			if soniarand = 0:
				cls
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/sonia/t.jpg"></center>'
				'Going to the toilet you see, that Sonia sucks dick at what that kid. Hard cock entering her mouth and Sonia champs and skillfully works sponges.'
				dynamic $din_sekondparturok
			end
		end
	end

	act 'Go to the canteen':
		cls
		minut += 60
		urand = rand(0, 12)
		gs 'stat'
		'<center><img src="images/qwest/alter/stolovka.jpg"></center>'
		'In the canteen at the big change all <a href="exec:gt ''Sgrup''">students</a> wanting to eat.'
		dynamic $din_sekondparturok

		if money >= 50:
			act 'Buy food 50 rubles':
				cls
				money -= 50
				salo += 2
				minut += 30
				health += 10
				manna += 20
				gs 'stat'
				'<center><img src="images/qwest/alter/stolovka.jpg"></center>'

				if energy >= 30:
					fat += 5
					'You can no longer eat.'
				elseif energy >= 20 and energy < 30:
					fat += 3
					energy += 10
					'You pushed through the power of a meal.'
				elseif energy < 20:
					energy += 20
					!!fat += 1
					'You gladly ate cooked food.'
				end

				if water >= 20:
					'You don''t need any more tea.'
				elseif water < 20:
					water += 20
					'You gladly drank a mug of tea.'
				end

				gs 'stat'
				dynamic $din_sekondparturok
			end
		end
	end

	if zverevaQW = 2 and zverRageQW = 0 or zverevaQW = 3 and zverRageQW = 0:
		act 'Spread rumors about Christina':
			cls

			if zverRageQW = 0:zverRageQW = 1

			minut += 60
			gs 'stat'
			'You secretly worldwide blabbed what Zvereva Christina sucks fizruka. Now, the school will talk about it.'
			dynamic $din_sekondparturok
		end
	end
}

if hour <= 8:
	act 'Go to lessons':
		cls
		hour = 9
		minut = 0
		minut += 60 * 3
		urand = rand(0, 12)

		if lernHome = 0:Suspeh += 2
		if lernHome > 0:Suspeh -= 1
		if Suspeh > 100:Suspeh = 100
		if Suspeh < 0:Suspeh = 0

		lernSkill += 1
		lernHome += 1

		if schoolSorev = 1:schoolSorev = 0

		gs 'stat'
		'<center><img src="images/qwest/alter/urok<<urand>>.jpg"></center>'
		'You were sitting in the classroom and listened to the monotonous boom on teachers, at least that is trying to understand and not to fall asleep.'
		dynamic $d_fart_klass
		'Finally the bell rang and the students went to a big change.'

		if GorSlut > 0:'You hear whispering classmates as showing a finger at you.'
		if soniaPS = 1:soniaPS = 2 & 'The main news today was the news that Sonia Ivanko allowed in a circle at a disco. She sucked in as much as five guys.'

		dynamic $din_bigperemena
	end
end

--- gschool2 ---------------------------------
# gkafe
$metka = $ARGS[0]
$loc = $CURLOC
gs 'stat'
gs 'time'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">A cafe</font></b></center>'

if mother_go = 1 and hour = 16:
	'<center><img src="images/qwest/alter/gkafe.jpg" ></center>'
	'little bedraggled, station cafe.'
	'Door closed on the lock and the door hangs a plaque "records".'

	act 'Wander around the cafe':
		cls
		minut += 15
		gs 'stat'
		'You walked around the cafe and suddenly you have come to the weak voices, closer to the wall cafe, you heard what that poor women moaning. Go behind the cafe you see old crates and on the wall a small window in which you can look if you stand on boxes.'

		act 'Leave':gt 'vokzalG'
		act 'Peep through the window':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/momslut.jpg" ></center>'

			if momslut >= 1:
				'You climbed on the boxes and looked through the small window. Behind the glass you noticed, your mom does blowjob cafe owner. You have come to see, Mom enthusiastically sucks dick swallowing it up to the eggs.'
			elseif momslut=0:
				momslut = 1
				'You climbed on the boxes and looked through the small window. Behind the glass as you notice what that woman squatting in front of a man . And then before you came, it''s your mom does blowjob cafe owner. You surprise goggled, and my mother .'
			end

			act 'Leave':gt 'vokzalG'

			act 'View more':
				cls
				minut += 5
				mother_go = 0
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/momslut2.jpg" ></center>'
				'Your mother got to her feet and turned his big bare ass to the owner of the cafe. He came up from behind and abruptly drove his cock in her pussy. His movements were strong and flourish, your mother moaned and held on to the wall. Finally the owner of the cafe ass grabbing your mother groaned and finished it in her pussy.'

				act 'Leave':gt 'vokzalG'
			end
		end
	end
else
	if hour >= 8 and hour <= 20:
		'<center><img src="images/qwest/alter/gkafe2.jpg"></center>'
		'Little bedraggled, station cafe.'

		if StoryLine > 0:'Zadripannoe small, station cafe. Since your mom works here, then you are fed free.'

		if week < 6:
			if hour >= 6 and hour < 16 and StoryLine > 0:
				'The cafe bar for your worth <a href="exec:gt ''mother''">Mom</a>.'
			else
				'The bar should cafe owner <a href="exec:GT ''motherkafeboss''">glory</a>'
			end
		end

		act 'Eat':
			cla
			*clr
			frost = 0
			minut += 30
			health += 10
			manna += 5
			willpower += 5
			gs 'stat'
			'<center><img src="images/pics/food.jpg"></center>'

			if energy >= 30:
				fat += 5
				'You can no longer eat.'
			elseif energy >= 20 and energy < 30:
				fat += 3
				energy += 10
				'You pushed through the power of a meal.'
			elseif energy < 20:
				energy += 20
				fat += 1
				'You gladly ate the food.'
			end

			if water >= 20:
				'You don''t need any more tea.'
			elseif water < 20:
				water += 20
				'You gladly drank a mug of tea.'
			end

			razvrand = rand(1, 10)

			if razvrand > 7 and hour > 16 and hour < 20 and age < 18 and dyadyamishaevent = 0 and momslut = 1:
				''
				'Past your table is going to release an adult male, where you will find Uncle Misha, who lives in the house next door, who see you, suddenly stops and tells you:'
				'Oh, <<$name>>, hello. I learned? See, what yes. Listen, here it is... We are your stepfather as it repaired the car late, and then lay down with me to overthrow ryumashki, and I stayed at the apartment of his luggage with tools. Help him to return? I''ll give a money for ice cream.'

				act 'Agree':gt 'gevent', '1'
			elseif razvrand > 7 and hour > 16 and hour < 20 and dyadyamishaevent = 1 and dmishaday ! day:
				''
				'Suddenly you at the table sits Misha, that strips you look, looking greedy and oily eyes on your chest, and says,:'
				'Hello, <<$name>>.. can now look within me for tea..? Have fun as last time, Yes, and the donations will not hurt, and?'

				act 'agree':gt 'gevent', '1-1'
			end

			act 'Get up from the table':gt 'gkafe'
		end
	else
		'<center><img src="images/qwest/alter/gkafe.jpg"></center>'
		'Little bedraggled, station cafe.'
		'The cafe is not working.'
	end
end

act 'Leave':gt 'vokzalG'

--- gkafe ---------------------------------
# motherkafeboss
gs 'stat'
'Cafe owner and Glory tall, thin man in his forties.'

act 'Leave':gt $loc, $metka

--- motherkafeboss ---------------------------------
# gpoli
clr
minut += 5
frost = 0
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Clinic</font></b></center>'
'<center><img src="images/etogame/poli.jpg"></center>'

act 'Leave':gt 'gorodok'

if hour >= 6 and hour <= 21:
	if gpoliuborka = 0:
		act 'Read listing':
			cla
			*clr
			minut += 5
			gpoliuborka = 1
			'On the wall near the entrance to the clinic hanging ad. Requires cleaner, work one hour a day, from 16 to 21 hours, payment of 25 rubles.'

			act 'Move away':gt 'gpoli'
		end
	elseif gpoliuborka = 1 and hour >= 8 and hour <= 21:
		act 'Ask the chief doctor of the work as a cleaner':
			cla
			*clr
			gpoliuborka = 2
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/poli.jpg"></center>'
			'You came to the office of the head doctor and knocked on the door entered the office. In the office sat a large man in a white robe. He looked sternly at you through his glasses. "On what issue?" You answered that you have read the ad and would like to get a cleaner. Heads doctor thought for a moment and handed you the paper. "Write on the model application for a job part-time." You took the paper and wrote a statement. Heads doctor stood up together and you went into the corridor. He showed you the shed where the stored tools, buckets, mops, dusters.'

			act 'Leave':gt 'gpoli'
		end
	elseif gpoliuborka > 1 and hour >= 8 and hour <= 21 and gpolicleanday ! day:
		act 'To work as a cleaner':
			cla
			*clr
			gpolicleanday = day
			minut += 60
			manna -= 15
			money += 100
			sweat += 2
			gs 'stat'
			'<center><img src="images/etogame/clener1.jpg"></center>'
			'You took a mop bucket and washed corridors throughout the clinic. After washing corridors you steel wash rooms. Doctors certainly cursed and bubneli as you unceremoniously broke into their offices, but still give you a calm, clean the floor.'

			act 'Finish the job':gt 'gpoli'

			ginrand = rand(0, 1)

			if Gspravka < 10 and ginrand = 0:
				'When you remove the gynecologist office, he goes out of the room leaving you alone.'

				if vagina > 0:
					act 'Fake certificate':
						cls
						Gspravka = 30
						GspravkaT = 1
						gs 'stat'
						'You quickly pull out of the table form and print reference and spank seal on the certificate.'
						'After that, you take away the seal back to the table and hide help. Help text from the gynecologist you write a little later on.'

						act 'Finish the job':gt 'gpoli'
					end
				end
			end
		end
	end

	if health < (vital * 10 + stren * 5) and money >= 1000:
		act 'Treat health (1,000 rubles)':
			cla
			money -= 1000
			minut += 60
			health = vital * 10 + stren * 5 + 1000
			'The doctor did give you a shot and you immediately felt much better'

			act 'Leave':gt $curloc
		end
	end

	if willpower < intel * 5 + will * 5 and money >= 1000:
		act 'Receiving a psychotherapist (1,000 rubles)':
			cla
			money -= 1000
			minut += 60
			willpower = intel * 5 + will * 5 + 1000
			manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
			gs 'stat'
			'You lie down on a couch at the therapist and told him about his troubles, and you immediately become much happier.'

			act 'Leave':gt $curloc
		end
	end

	if sick >= 1:
		act 'Go to the therapist uchastkovumu':
			cla
			minut += 15
			sick = 0
			gs 'stat'
			'You came to the reception to uchastkovumu therapist and doctor has prescribed pills for colds.'

			act 'Leave':gt $curloc
		end
	end

	if StoryLine > 0 and SchoolAtestat = 0 and Gspravka < 3:
		act 'Go to the gynecologist for help':
			cls
			minut += 15
			'<center><img src="images/etogame/gin.jpg"></center>'
			'You lay on the examination table and pushed his feet. Gynecologist began to examine your vagina.'

			if vagina > 0:
				Gspravka = 30
				GspravkaT = 2
				'Help gynecologist wrote that you are not a virgin.'
			elseif vagina = 0:
				Gspravka = 30
				GspravkaT = 1
				'Help gynecologist wrote that you are a virgin.'
			end

			if preg > 0:'Gynecologist told you that you are pregnant.'

			gs 'stat'

			act 'Leave':gt $curloc
		end
	end
else
	'Clinic is closed.'
end

--- gpoli ---------------------------------
# gevent
if $ARGS[0] = '1':
	cla
	*clr
	dyadyamishaevent = 1
	dick = 18
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	'You agreed and went with his uncle from the cafe. He brought you into their home and took you by the hand, started in the bedroom, closing the door with a key. Firmly taking you by the hair, he dropped you on your knees and pulled his pants and took his penis in his hand, jabbed him in your mouth.'
	'Open your mouth, come on, whore know where you''re going'
	'You tried to resist, then he slapped you across the face and said that you do not make excuses. You had to open your mouth and take it plump vile smelling dick in your mouth.'
	'Suck-let''s not shirk'
	'You started to suck him, constantly nuzzling into his hairy crotch. After some time, he took a member of your mouth, and said:'
	'-Lie down, play with you'

	act 'Lie on the bed':
		cla
		cls
		'You lay on the bed. He undressed you lay down at your feet and parted them, and then looked at your pussy'

		if vagina = 0 and sex = 0:
			'-Tselochku yet? Now fix it'
			'He stood closer to you and put his member in your crotch. He introduced the term in and began to fuck you, breaking your hymen. You were painful and unpleasant. Soon he began to pant, and then he took dick and crawled to your face, forcibly stuck in your mouth his cock and cum in it'
		else
			'You already torn-whore? Dai and I''ll popolzuyut'
			'He stood closer to you and put his member in your crotch. He introduced the term in and began to fuck you.'

			if dick - vagina > 10 and dick - vagina <= 7:'You were very bylno and you prayed that it ran faster'
			if dick - vagina > 6 and dick - vagina <= 3:'You were painful and unpleasant'

			'Soon he began to pant, and then he took dick and crawled to your face, forcibly stuck in your mouth his cock and cum in it, you feel his hot cum, which swallowed. In the mouth, the bitterness remains disgusting.'
		end

		act 'Swallow':
			cla
			cls
			sex += 1
			bj += 1
			swallow += 1
			cumlip += 1
			throat += 1

			if vagina < dick:vagina += 1

			rape += 1
			minut += 75
			money += 500
			gs 'stat'

			'<center><img src="images/gevent/1.jpg"></center>'
			'You swallowed the sperm in your mouth.'
			'Swallowed-up, girl? - It dramatically mellowed, patted you on the head and gave things - Get dressed. ''ll Give you a present'
			'You got dressed and waited for the rapist who left the room. He returned, holding a dollar bill hundred rubles, which gave you'
			'-On, child, buy yourself some ice cream. I know you''re from a poor family, so come in to visit, play, even a present you give. My name is Misha.'
			'You took the bill from the hands of Uncle Misha and came out of his house'


			act 'Leave':gt 'gorodok'
		end
	end
end

if $ARGS[0] = '1-1':
	cla
	*clr
	dmishaday = day
	dick = 18
	sex += 1
	bj += 1
	cumbelly += 1
	throat += 1

	if vagina < dick:vagina += 1

	minut += 75
	money += 200
	gs 'stat'

	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><img src="images/gevent/mishasex.jpg"></center>'
	'You went to visit Uncle Misha. He once closed the door, and began to undress me, touching my body with his rough, hairy arms. Undressed, he sat on the couch and gave me a job. You made him a blowjob, after which he put you on the sofa and began to fuck you.'

	if dick - vagina > 10 and dick - vagina <= 7:'You were very bylno and you prayed that it ran faster'
	if dick - vagina > 6 and dick - vagina <= 3:'You were painful and unpleasant'

	'<center><img src="images/gevent/mishasex3.jpg"></center>'
	'Finally, Misha puffed and you took out his penis, breathing with wheezing and cum on your belly, then kiss your pussy and gave you fifty rubles for expenses.'

	act 'Leave':gt 'gorodok'
end

if $ARGS[0] = '2':
	cla
	*clr
	minut += 15
	cumface = 1
	cumlip = 1
	bj += 1
	GorSlut += 1
	money += 10
	gs 'stat'
	'<center><img src="images/gevent/2.jpg"></center>'
	'You went out with him from the audience, after which he held you in the men''s room. Having got you in one of the stalls, they closed it and put it on his knees, then pulled out his penis and gave you a service, starting to shoot you on the phone. You suck at it, and then he came on your face, pulled from his pocket a crumpled ten, which threw you under the feet and left.'

	act 'Wash and leave':
		cumpussy = 0
		cumbelly = 0
		cumass = 0
		cumlip = 0
		cumface = 0
		cumfrot = 0
		minut += 5
		gt 'gskver', 'kino'
	end

	act 'Leave':gt 'gskver', 'kino'
end

if $ARGS[0] = '3':
	cla
	*clr
	alko += 10
	minut += 120
	bj += 3
	anal += 3
	sex += 3
	vagina += 3
	anus += 3
	throat += 3
	guy += 3
	gang += 1
	cumpussy = 1
	cumbelly = 1
	cumass = 1
	cumlip = 1
	cumface = 1
	GorSlut += 1
	gs 'preg'
	gs 'stat'
	'<center><img src="images/gevent/3.jpg"></center>'
	'You went home to Armenian. He appeared in the apartment two more people, also Armenians. They Fingered you speak their language, drink alcohol you in the trash, and then stripped and fuck you, sticking to turn in all your holes, ending with you and in you, soldering and having more, while removing all of you on camera time. Finally, when they played enough with you, they kicked you out of the apartment.'

	act '...':gt 'gorodok'
end

if $ARGS[0] = '4':
	cla
	*clr
	guy += 1
	alko += 2
	sex += 1
	vagina += 1
	cumass = 1
	minut += 50
	gs 'stat'
	'<center><img src="images/gevent/4.jpg"></center>'
	'You came from a guy to his house, where you drank with him and have sex. Fuck your pussy, he pulled out his penis and ended you on the ass, and then he gave you your clothes, you chatted with him, drank tea, and went out.'

	act '...':gt 'gorodok'
end

if $ARGS[0] = '5':
	cla
	*clr
	guy += 1
	sex += 1
	vagina += 1
	cumass = 1
	minut += 15
	money += 100
	gs 'stat'
	'<center><img src="images/gevent/5.jpg"></center>'
	'The guy has got you into the woods, where a section of the tree and put in quick fuck, Cum on ass, and then gave you a hundred rubles, and left.'

	act 'Leave':gt 'gorodok'
end

if $ARGS[0] = '6':
	day += 1
	week += 1
	hour = 12
	minut = 17
	GorSlut += 1
	guyondisco = rand(5, 10)
	guy += guyondisco
	bj += guyondisco
	sex += guyondisco
	vagina += guyondisco
	throat += guyondisco
	gang += 1
	cumpussy = 1
	cumbelly = 1
	cumass = 1
	cumlip = 1
	cumface = 1
	gs 'stat'
	gs 'time'
	gs 'preg'

	'<center><img src="images/gevent/6.1.jpg"></center>'
	'You vaguely remember what happened. Hands probe you that something hard and hot, rests in your hands in your body. Bit and you''ve done what blowjob something guy, and when he finished, then it becomes a different place. Disco went, someone filmed, someone to stand in line, someone is attached to you from behind. Day you woke up the next day, all in the semen and without clothes, about DK. Finding her clothes, you got dressed and stood up.'

	act 'Leave':gt 'gorodok'
end

if $ARGS[0] = '7':
	cla
	*clr
	guy += 2
	anal += 2
	bj += 2
	sex += 2
	vagina += 2
	anus += 2
	throat += 2
	gang += 1
	gs 'stat'
	'<center><img src="images/gevent/7.jpg"></center>'
	'You guys brought to the apartment, where you stripped and fucked in all holes, having finished on your face and prevent wash, kicked out of the apartment.'

	act 'Leave':gt 'gorodok'
end

--- gevent ---------------------------------
# gskver
$metka = $ARGS[0]
$loc = $CURLOC
cls
gs 'stat'
gs 'time'
'<center><img src="images/gevent/skver.jpg"></center>'
'Small park where people often rest, walk a couple, played by kids.'
*nl

if hour > 8 and hour < 19:'Here is a small <a href="exec:minut += 5 & gt ''gskino''">Theater</a>'
if GvstreBoy = 1:'You can see that in the park walks <a href="exec:numnpc = SkverBoy & gt ''Gnpc''"><<$nameBoyfrend[SkverBoy]>></a>.'
!!if kotovLoveQW > 0 and hour >= 18 and hour < 20 and week < 6 or week >= 6 and kotovLoveQW > 0 and hour >= 9 and hour < 20:'You see in the park sitting on the bench <a href="exec:minut += 3 & gt ''kotovEv''">Vitek Kotov</a> with Druganov and beer.'
if StoryLine = 1 and BeInSchool > 0:
	if hour >= 18 and hour < 20 and week < 6 or week >= 6 and hour >= 9 and hour < 20:'You see in the park sitting on the bench <a href="exec:minut += 3 & gt ''gopskver''">Vitek Cats, Dan Ryzhov and Shul''ga.</a>'
end

act 'Walk (0:15)':
	cla
	*clr
	minut += 15
	place = 1
	Frend_num = 0
	gt 'placer'
end

if hour >= 8 and hour < 22:
	act 'Distributing flyers to earn money (10 rubles) (1:00)':
		cla
		*clr
		minut += 60
		money += 10
		manna -= 5
		gs 'stat'
		'<center><img src="images/etogame/flaer.jpg"></center>'
		'You an hour handing out flyers park visitors. Then you got 10 rubles.'

		act 'Move away':gt 'gskver'
	end
end

if sport > 0 and hour > 5 and hour < 22 and daybegskver ! daystart:
	act 'Run on the square (1:00)':
		cls
		minut += 60

		if salo > 3:salo -= rand(1, 3)

		fat -= rand(5, 15)
		beg += rand(3, 6)
		sweat += 2
		daybegskver = daystart
		gs 'stat'

		! WD: Remove Dupe Images ~ '<center><img src="images/pic/parkbeg.jpg"></center>'

		'<center><img src="images/etogame/parkbeg.jpg"></center>'
		'You are within an hour running through the square'

		act 'Further':place = 1 & Frend_num = 0 & gt 'placer'
	end
end
act 'Get out of the park':minut += 5 & gt 'gorodok'

--- gskver ---------------------------------
# gopskver
$d_dan_blowjob = {
	act 'To squat':
		cls
		minut += 3
		horny += 10
		bj += 1

		if npcSex[10] = 0:npcSex[10] = 1 & guy += 1

		swallow += 1
		cumlip += 1

		if DansOralSlut = 0:DansOralSlut = 1

		gs 'stat'
		'<center><img src="images/qwest/alter/placer/bjdan.jpg"></center>'
		'You sat on his haunches in front of Dan and Dan eagerly unbuttoned his pants pulled out of his pants his risen member. You licked tongue purple head Dan and Dan said "here we go, and now take it in her mouth." You lips wrapped around his cock and took it in her mouth. Dan spent your hand through his hair "brain." You began to move his head back and forth spitted her mouth hard and hot cock Dan. It was not long and Dan grabbed his hands through his hair you. You feel like a member of his mouth spurted you in a warm and viscous liquid. Dan firmly hold your hair, and the flow of sperm all did not stop and you become swallow sperm. Dan finally stopped to finish and let your hair, You stood up wiping his lips with her hand and feeling sticky cum on her chin and her taste in the mouth. Dan removed the dick in his pants and told you "Not bad <<$name>>, I''ll have something to repeat it."'

		act 'Go home':gt 'korrPar'
	end
}

$d_gop_triple_blow = {
	act 'Suck Dan':
		cls

		if GorSlut < 3:GorSlut = 3

		bj += 1

		if npcSex[10] = 0:npcSex[10] = 1 & guy += 1

		dick = 17
		cumlip += 1
		swallow += 1
		sub += 1
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/placer/bjgop.jpg"></center>'
		dynamic $dinrandbj
		'Dan groaned "Come huesoska, that would be all swallowed."'
		dynamic $dinrandswallow

		act 'Suck Shulgi':
			cls
			bj += 1

			if npcSex[11] = 0:npcSex[11] = 1 & guy += 1

			cumface += 1
			dick = 15
			sub += 1
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/placer/bjgop2.jpg"></center>'
			dynamic $dinrandbj
			'Shulga took a little dick out of your mouth and ending with hot punch you in the mouth covering their vile -smelling slime.'

			act 'Suck Vic':
				cls
				bj += 1

				if npcSex[9] = 0:npcSex[9] = 1 & guy += 1

				dick = 18
				sub += 1
				cumface += 1
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/bjgop3.jpg"></center>'
				dynamic $dinrandbj
				'Vitek took his dick out of your mouth and in your face slapped warm stream of cum covering your face sharply smelling mucus layer.'

				act 'further':
					cls
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/placer/bjgop3.jpg"></center>'
					'You sit humiliated in front of three guys with a face smeared in sperm and try to rub the eyes. Guys neighing over you "In_short, <<$name>>, Now you understand where you belong?"'

					act 'Realized':
						cls
						sub += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/bjgop3.jpg"></center>'
						'You nodded his head and said, they understood where your site. Dan said "smart huesoska, glayadite boys, vaflersha understood everything, Well then here sebala, and then in your eblische struhne all appetite spoils."'

						act 'Leave':gt 'gskver'
					end

					act 'Fuck you!':
						cls
						sub += 5
						pee += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/placer/goppee.jpg"></center>'
						'Rubbing his eyes . Dan said angrily "Look guys, huesoska still bristle, let her umoem." You have opened my eyes and saw that all three boys have surrounded you and are holding pisyuny, suddenly your face hits the urine stream, then another and finally you piss on the face of the three boys. Finally jets have dried up and the boys said Dan "In short sebala here scum."'

						act 'Leave':gt 'gskver'
					end
				end
			end
		end
	end
}

$metka = $ARGS[0]
$loc = $CURLOC
cls
gs 'stat'
gs 'time'
'<center><img src="images/gevent/skver.jpg"></center>'
''

if kotovLoveQW > 0:
	if hour < 20:
		'Vitek Kotov offers to drink beer with him and his friends.'

		act 'Leave':gt 'gskver'

		act 'drink beer':
			cls
			minut += 15
			alko += 1
			fat += 2
			salo += 1
			energy += 10
			gs 'stat'
			'<center><img src="images/pic/ParkBeer.jpg"></center>'
			'You poured a beer and you began to drink with the guys.'

			act 'further':gt $curloc
		end

		if alko > 2:
			'Witek offers go to his house, well, or continue to thump.'

			act 'Go to Vit''ka.':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
				'You went through the square towards where he lives Vitek. Soon you with Vityok approached the dilapidated house , where lay crumpled heaps of clothes on the floor littered with empty bottles.'

				act 'further.':gt 'kotovSex'
			end
		end
	elseif hour >= 20:
		'Already Evening and boys gathered to go to the disco.'

		act 'Leave':gt 'gskver'
		act 'Go to the disco with boys':minut += 15 & gt 'gdkin'
	end
else
	if hour >= 20:
		if alko < 3:
			'Already Evening and boys gathered to go to the disco.'

			act 'Leave':gt 'gskver'
			act 'Go to the disco with boys':minut += 15 & gt 'gdkin'
		elseif alko >= 3 and alko < 6 and DansOralSlut = 1:
			'You pretty much got drunk and Dan Ryzhov suggest you hold up the house.'

			if dom >= 5:act 'Refuse':dom -= 5 & gt 'gskver'

			act 'Go with Dan':
				cls
				horny += 10
				minut += 15
				gs 'stat'
				'You are walking down the street with Dan keep you under the handle, on the way Dan fun joking and telling stories. Finally you come to your porch. Dan opened the door for you to the entrance and you went in. Suddenly Dan roughly dragged you to one of the sites to musoprovodu. Dan whispered in your ear "Take it in your mouth, huesoska."'
				dynamic $d_dan_blowjob

				act 'Rebel':
					cls
					GorSlut = 2
					gs 'stat'
					'You indignant words of Dan and recoiled from it. In the eyes of Dan broke is not a good light and you un grinned nastily "Well." Then turned and walked away.'

					act 'Go home':gt 'korrPar'
				end
			end
		elseif alko >= 3 and alko < 6 and DansOralSlut = 0:
			'You pretty much got drunk and Dan Ryzhov suggest you hold up the house.'

			if dom >= 5:act 'Refuse':dom -= 5 & gt 'gskver'

			act 'Go with Dan':
				cls
				horny += 10
				minut += 15
				gs 'stat'
				'You are walking down the street with Dan keep you under the handle, on the way Dan fun joking and telling stories. Finally you come to your porch. Dan opened the door for you to the entrance and you went in. Dan suddenly dragged you to one of the sites to musoprovodu. There he grabbed you and started to hug you, his lips stuck into your kiss.'

				if dom >= 10:act 'go home':dom -= 10 & gt 'korrPar'

				act 'kiss':
					cls
					horny += 10
					gs 'stat'
					'You began to kiss with Dan near the garbage in your entryway. Dan suddenly you press down firmly on the shoulders of trying to put you on your knees. "Do not be afraid <<$name>>, I did not tell anyone."'

					if dom >= 15:act 'go home':dom -= 15 & gt 'korrPar'

					dynamic $d_dan_blowjob
				end
			end
		elseif alko >= 6:
			'You got drunk as a lord and you shook from side to side. Shul''ga you hugged her waist and led somewhere.'

			if dom >= 5:act 'leave most':dom -= 5 & gt 'gskver'

			act 'Go with the guys':
				cls

				if sgopgang = 0:sgopgang = 1
				if npcSex[9] = 0:npcSex[9] = 1 & guy += 1
				if npcSex[10] = 0:npcSex[10] = 1 & guy += 1
				if npcSex[11] = 0:npcSex[11] = 1 & guy += 1

				sex += 3
				gang += 1
				vagina += 3
				cumbelly += 3
				gs 'stat'
				'<center><img src="images/qwest/alter/placer/gopgang.jpg"></center>'
				'You passed out and woke up lying on the couch, inside your pussy that is moving. You are trying to focus his eyes and see in front of face Shulgi, transferring look down you can see that he moves his hips against your pubic area for, intoxication through until you reach, Shul''ga that you fucks, Once again you are off and opened his eyes already see you lying on the Dan, He takes out a member of you and you feel, that belly get what that warm drops, replacing Dan climbs on you Vitek, you feel, that he put his penis in you and they began to move there. After a while you came to their senses and see, that you are still lying on the couch. Guys sitting at the table and continue to drink.'

				act 'Leave':gt 'gorodok'
			end
		end
	elseif hour < 20:
		'Sitting on a bench Vitek Cats, Dan Ryzhov and Shul''ga.'

		if GorSlut < 3:
			if alko < 4:
				'Boys invite you to join them and drink beer.'

				act 'Leave':gt 'gskver'

				act 'drink beer':
					cls
					minut += 15
					alko += 1
					fat += 2
					salo += 1
					energy += 10
					gs 'stat'
					'<center><img src="images/pic/ParkBeer.jpg"></center>'
					'You poured a beer and you began to drink with the guys.'

					act 'further':gt $curloc
				end
			elseif alko >= 4:
				'You already rather tipsy and started having fun chatting with the guys.'

				act 'Leave':gt 'gskver'

				if GorSlut = 0:
					act 'drink beer':
						cls
						minut += 15
						alko += 1
						fat += 2
						salo += 1
						energy += 10
						dom += 1
						gs 'stat'
						'<center><img src="images/pic/ParkBeer.jpg"></center>'
						'You poured a beer and you began to drink with the guys.'

						act 'further':gt $curloc
					end
				elseif GorSlut = 1:
					'To you sat closer Shul''ga and started a conversation. "<<$name>>, they_say, that you give. it is true?"'

					act '"Yes that''s true"':
						cls
						gs 'stat'
						'You confirmed, that you have already had sex and you''re not a girl.'

						act 'Leave':gt 'gskver'
					end

					act 'No':
						cls
						gs 'stat'
						'You cursed and said Shulga, that all this is a lie. You snapped Dan "<<$name>>, you that pussy? But for you the whole town knows, you davalka!"'

						act 'Leave':gt 'gskver'
					end
				elseif GorSlut = 2:
					'To you sat closer Shul''ga and started a conversation. "<<$name>>, they_say, you suck. it is true?"'

					act '"Yes, that''s true"':
						cls
						gs 'stat'
						'You confirmed, what you put in their mouths. Shul''ga cheeky smile "And in your mouth lowered?"'

						act '"Yes, that''s true"':
							cls
							gs 'stat'
							'You confirmed, you cum in her mouth. Shul''ga squirmed excitedly "And I otsosesh?"'

							act 'No':
								cls
								gs 'stat'
								'You indignantly rejected the proposal Shulgi. Dan suddenly growled at you "slishom you, vaflersha, and you do not ohuel Do hour? Which is loshya suck cocks to swallow, and decent guys mean to you zapadlo?" You''re a little afraid of how easy Dan became aggressive and began to explain, that the matter is in another. But Dan again you abruptly interrupted "Good equivocate bitch, and then smashed conductive ebalo! answer, zapadlo you have decent boys cheek take or not zapadlo?"'

								act 'No, not zapadlo.':
									cls
									gs 'stat'
									'You said, you do not zapadlo. Dan then growled at you "And then huyli of virginity itself writhes? Take it in your mouth!" With these words.'
									dynamic $d_gop_triple_blow
								end

								act 'zapadlo.':
									cls
									gs 'stat'
									'You said, you zapadlo and immediately fell to the ground from the impact of Dan in your face.'

									act 'Leave':gt 'gskver'
								end
							end

							act 'Maybe':
								cls
								gs 'stat'
								'Dan grinned "And then huyli of virginity itself writhes? Take it in your mouth!" With these words.'
								dynamic $d_gop_triple_blow
							end
						end

						act 'No':
							cls
							gs 'stat'
							'You cursed and said Shulga, that you did not finish in the mouth.'

							if swallow > 0:
								'You snapped Dan "<<$name>>, good bullshit? But for you the whole town knows, that you not only in your waffle iron was poured struhnyu, so you also swallow, like_this, that do not bullshit me, huesoska."'
							elseif swallow = 0 and facial > 0:
								'You snapped Dan "But you all fucking mouth obstruhali."'
							else
								'Dan chuckled "Well, give only half flaccid, in your mouth you take just a little bit, Just share a girl."'
							end

							'Dan said sharply "And then huyli of virginity itself writhes? Take it in your mouth!" With these words.'
							dynamic $d_gop_triple_blow
						end
					end

					act 'No':
						cls
						gs 'stat'
						'You cursed and said Shulga, that all this is a lie. You snapped Dan "<<$name>>, you that pussy? But for you the whole town knows, you huesoska! In short , truncated?" With these words.'
						dynamic $d_gop_triple_blow
					end
				end
			end
		elseif GorSlut >= 3:
			shultextrand = rand(0, 1)

			if shultextrand = 0:$shultextrand = 'want candy red hero?'
			if shultextrand = 1:$shultextrand = 'want Chupahuy?'

			'Shul''ga Courage tells you "Hey Shmarev, <<$shultextrand>>" Guys neighing loudly over you.'

			act 'Leave':gt 'gskver'
		end
	end
end

--- gopskver ---------------------------------
# gskino
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><img src="images/gevent/kinoteatr.jpg"></center>'
'Small cinema in which there is just one small room. A movie ticket costs 100 rubles.'

if money >= 100:
	act 'Go to the movies':
		cla
		*clr
		money -= 100
		minut += 120
		manna += rand(60, 90)
		'You quietly watched the film, and then came out of the cinema.'

		act 'Leave the hall':gt 'gskver'
	end
end

act 'Get out of the theater':minut += 5 & gt 'gskver'

--- gskino ---------------------------------
# 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 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 '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 ---------------------------------
# EvgopBuh
$din_gop_double_bj = {
	act 'Open mouth':
		cls
		minut += 5
		horny += 10
		bj += 2
		guy += 1

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

		bmBJ[Tboynum] += 1
		bmGANG[Tboynum] += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/gop6.jpg"></center>'
		'You obediently opened his mouth and the guys immediately inserted you both cocks into her mouth, stretching it to the limit. You started to suck two hard and hot cock in turn.'

		act 'Further':
			cls
			minut += 5
			horny += 10
			cumlip += 2
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/gop7.jpg"></center>'
			'Suddenly one of the guys started to cum in your mouth, followed immediately began to finish second. One of the guys grabbed you a head without letting you remove the face. Nakonchal you guys and got a mouthful of its members out of your mouth. Leaving you sitting on a stump with a mouth full of sperm.'
			dynamic $din_gop_end
		end
	end
}

$din_gop_end = {
	act 'Further':
		cls
		minut += 5
		cumfrot += 1
		manna -= 30

		if GorSlut < 3:GorSlut = 3
		bmGossip[Tboynum] = 3
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/gop8.jpg"></center>'
		'You sit on a stump occurred stunned and out of your mouth dripping thin trailing jet sperm. You sluggish notice that the sperm gets into your clothing. Men poured vodka into cups and drank again. One chuckled looking at you "Very best cocksucker you found. Not bad she patted his lips elde me." Second laughed, "Look vaflersha sits struhnyu relishes." The third said thoughtfully, "We have to give the lads announced, so as not to zashkvarilis vaflersha."'

		act 'Leave':gt 'gdk'
	end
}

$din_gop_end2 = {
	act 'Further':
		cls
		minut += 5
		cumfrot += 1
		manna -= 30

		if GorSlut < 4:GorSlut = 4
		bmGossip[Tboynum] = 4
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/gop8.jpg"></center>'
		'Your feet are tired and podgibayutsya, you do not stand up and sit down on the ground, out of your mouth dripping thin trailing jet sperm. You sluggish notice that the sperm gets into your clothing. Men poured vodka into cups and drank again. One chuckled looking at you "Klasnaya pacifier you found. Not bad she patted his lips elde me." Second laughed, "Look, bitch still a can not come." The third said thoughtfully, "We have to give the lads announced, so as not to zashkvarilis slut."'

		act 'Leave':gt 'gdk'
	end
}

music_on = 0
minut += 5
gs 'stat'
'<center><img src="images/etogame/dk_night.jpg"></center>'

if GorSlut < 3:
	'You went out with a guy from the club he led the club for you. There has flopped his two pals. On the ground, there was a bottle of vodka and plastic cups. The guy said "I <<$bname>> is <<$bname2>> and <<$bname3>>." You introduced "I <<$name>>." <<$bname2>> took a bottle and a plastic cup. He drunk, uncertain movements poured vodka into a glass, then handed the cup to you.'

	act 'Drink':
		cls
		minut += 5
		alko += 2
		gs 'stat'
		'<center><img src="images/etogame/dk_night.jpg"></center>'
		'You drank vodka and you breath away this booze. <<$bname3>> pulled out his candy "On <<$name>>, a snack." You get stuck in the mouth candy trying to kill the disgusting taste of vodka.'

		if alko < 4:
			act 'Go back to the club':
				cls
				willpower += rand(0, 1)
				intel += rand(0, 1)
				gt 'gdkin'
			end
		end

		act 'Stay with the guys':
			cls
			minut += 5
			horny += 10
			gs 'stat'
			'<center><img src="images/etogame/dk_night.jpg"></center>'
			'You stayed with the guys. <<$bname>> come up to you and put his arm around your waist. "<<$name>>, you chuvikhi very best." His hands began to stroke your ass and squeeze her.'

			if dom >= 10:
				act 'Indignant "You ohuel what?"':
					cls
					minut += 5
					sub += 1
					gs 'stat'
					'You rebelled ryavknuv on GREYHOUND kid "ohuel You what?" <<$bname>> even jerked his hands away from you. You left him on the pitch, "So keep your hands to yourself!"'

					act 'Go back to the club':
						cls
						willpower += rand(1, 3)
						intel += rand(1, 3)
						gt 'gdkin'
					end
				end
			end

			act 'Whisper, "Do not"':
				cls
				minut += 5
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/gop.jpg"></center>'
				'<<$bname>> put you on a stump next to the meadow where the boys drink. He unbuttoned his pants and pulled out his standing member. <<$bname>> said to you in a floor vote "Come on baby, do not be shy, look what a delicious caramel, you can lick."'

				if horny < 75:
					act 'Go back to the club':
						cls
						willpower += rand(1, 3)
						intel += rand(1, 3)
						gt 'gdkin'
					end
				end

				if dom >= 5:
					act 'Indignant "You ohuel what?"':
						cls
						minut += 5
						sub += 1
						gs 'stat'
						'You rebelled ryavknuv on GREYHOUND kid "ohuel You what?" <<$bname>> did not expect such a reaction from you and embarrassed. You got up from the stump and said, "Shove your stub back in panties patsanchik!"'

						act 'Go back to the club':
							cls
							willpower += rand(1, 3)
							intel += rand(1, 3)
							gt 'gdkin'
						end
					end
				end

				act 'Sitting on a tree stump':
					cls
					minut += 5
					horny += 10
					bj += 1

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

					bmBJ[Tboynum] += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/gop2.jpg"></center>'
					'You covered apatite and you were sitting on a stump looking at cock. <<$bname>> taking a member of the hand you held them to her lips. You have opened my mouth, that would be indignant and immediately his cock slapped his crimson head of your wet tongue. Another second and his cock was in your mouth.'

					act 'Suck':
						cls
						minut += 5
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/gop3.jpg"></center>'
						'Without even realizing you started sucking hard cock obhvatyvyaya him with <<$liptalk2>>. You closed your eyes trying not to think about what you are doing. Hard and hot cock slid between your lips, filling your mouth to the throat.'

						act 'Further':
							cls
							minut += 5
							cumlip += 1
							water -= 10
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/gop4.jpg"></center>'
							'Suddenly you in the mouth of a member of the hot jet of sperm flew. Your mouth was filled with pungent, warm finish. <<$bname>> member took you out of his mouth and wiped it on your <<$liptalk2>>. Then he removed the cock in his pants. "Guys, can use vaflersha, I already othuesosil."'

							if dom > 0:
								act 'Indignant':
									cls
									minut += 5
									dom = 0
									sub += 1
									GorSlut = 2
									gs 'stat'
									'You angrily spat sperm feet kid. "You ohuel what?" The kid started ruffle "Shut vaflersha." But you got up from the stump and obmaterili boys.'

									act 'Go back to the club':
										cls
										willpower += rand(0, 1)
										intel += rand(0, 1)
										gt 'gdkin'
									end
								end
							end

							if horny <= 75:
								act 'Spit sperm':
									cls
									minut += 5
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/gop5.jpg"></center>'
									'You bent over and spat out semen at his feet. To you came <<$bname2>> and <<$bname3>>, they got out of his pants and framed their members for you to face.'
									dynamic $din_gop_double_bj
								end
							end

							act 'Swallow sperm':
								cls
								minut += 5
								swallow += 1
								water -= 10
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/gop5.jpg"></center>'
								'You swallow sperm, feeling her lousy taste in your mouth. To you came <<$bname2>> and <<$bname3>>, they got out of his pants and framed their members for you to face.'
								dynamic $din_gop_double_bj
							end
						end
					end
				end
			end

			act 'Be silent':
				cls
				minut += 5
				horny += 10
				gs 'stat'
				'<center><img src="images/etogame/dk_night.jpg"></center>'
				'<<$bname>> took to pull off your clothes, you drunkenly dangled in his hand and suddenly felt the breeze on my naked ass.'

				act 'Further':
					cls
					minut += 5
					horny += 10
					sex += 1
					$boy = $bname

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

					bmSEX[Tboynum] += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/gopd.jpg"></center>'
					'<<$bname>> bent you and you grabbed his hands for something that would not fall.'
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum
					'Male removed the cock in his pants and said "Guys, you can use davalkoy."'

					act 'Further':
						cls
						minut += 5
						horny += 10
						sex += 1
						guy += 1

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

						bj += 1
						cumlip += 1
						$boy = $bname3
						bmGANG[Tboynum] += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/gopd2.jpg"></center>'
						'<<$bname2>> come up to you and you saw him naked dick, though you tried to do something, but he grabbed you by the hair and then in your mouth was his cock. <<$bname3>> podeshel back to you and you feel his hands on your hips.'
						dynamic $sexstart
						dynamic $sexstart2
						dynamic $sexcum
						'You feel like your mouth starts to cum cock and <<$bname2>> even stronger holding your hair.'
						dynamic $din_gop_end2
					end
				end
			end
		end
	end
elseif GorSlut >= 3:
	'You went out with a guy from the club he led the club for you. There has flopped his two pals. On the ground, there was a bottle of vodka and plastic cups. The guy said "I <<$bname>> is <<$bname2>> and <<$bname3>>. Incidentally, I know that You are the light spot <<$gnikname>>. Shortly not pull the rubber, take on the canine."'
	$din_gop_slut_triple_bj = {
		act 'Squat':
			cls
			minut += 5
			horny += 10
			bj += 3
			guy += 2

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

			bmBJ[Tboynum] += 1
			bmGANG[Tboynum] += 1
			sub += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/gopdbj.jpg"></center>'
			'You obediently squatted and the guys got their members. You cupped his dick two fingers and began to masturbate them. The third guy immediately slapped you on <<$liptalk2>> member. You unclenched lips and absorbed dick in your mouth hot and humid.'

			act 'Suck':
				cls
				minut += 5
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/gopdbj2.jpg"></center>'
				'You have become members take turns to suck and caress hands those dicks who were not in your hot mouth. Finally the guys are already ready to cum.'

				act 'Close your eyes':
					cls
					minut += 5
					horny += 10
					facial += 1
					cumface += 3
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/gopdbj3.jpg"></center>'
					'You closed your eyes and framed his face. Almost immediately you felt like hot jet of sperm fall on your face. Soon the boys run out completely covering your face with sperm.'

					act 'Leave':gt 'gdk'
				end
			end
		end
	}

	dynamic $din_gop_slut_triple_bj

	if dom > 0:
		act 'Refuse':
			cls
			manna = 0
			health -= 10
			sub += 1
			gs 'stat'
			'You refused and the guy was furious. "What, are you a slut ohuel Yes I''m now eblische smash!" After these words, he shoots you in the stomach with his fist. You gasp in pain and doubled over. "What thing? Mind? Or you otpizdet and then shove a bottle in the ass?"'
			dynamic $din_gop_slut_triple_bj

			if dom >= 5:
				act 'Send it':
					cls
					manna = 0
					health -= 10
					sub += 1
					zub += 1
					GorSlut = 2
					gs 'stat'
					'You guys spit searing his feet Vzlyad "Fuck you dick on the boy." Immediately rang in my head and realized that you are lying on the ground. Very much a toothache, you spit on the ground and saw that you''re bleeding on the ground and lay your tooth that you just knocked out. The guy jumped in beshensve to you, but he never dared to "Go here for dick, slut."'
					act 'Leave':gt 'gdk'
				end
			end
		end
	end
end

--- EvgopBuh ---------------------------------
# EvBoyBuh
$din_gorodok_boy_bj = {
	act 'Squat':
		cls
		minut += 5
		horny += 10
		bj += 1

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

		sub += 1
		gs 'tboyopr'
		bmBJ[Tboynum] += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/boybj.jpg"></center>'
		'You squatted in front of the guy and began stroking his cock.'

		act 'Suck':
			cls
			minut += 5
			horny += 10

			if GorSlut < 2:
				resultrand = rand(0, 100)

				if resultrand >= 80:
					GorSlut = 2
					bmGossip[Tboynum] = 2
				end
			end

			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/boybj2.jpg"></center>'
			dynamic $dinrandbj

			act 'Suck on':
				cls
				minut += 5
				horny += 10
				cumface += 1
				cumlip += 1
				cumfrot += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/boybj3.jpg"></center>'
				dynamic $dinrandswallow

				act 'Leave':gt 'gdkin'
			end
		end

		act 'Stoop':
			cls
			minut += 5
			horny += 10

			if boynumBlock = 0:boy += 1

			bmSEX[Tboynum] += 1
			$boy = $bname3
			pose = 1

			if GorSlut = 0:
				resultrand = rand(0, 100)

				if resultrand >= 80:
					GorSlut = 1
					bmGossip[Tboynum] = 1
				end
			end

			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/boysex.jpg"></center>'
			'You bent down and framed mooning guy.'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum

			act 'Leave':gt 'gdkin'
		end
	end
}

$d_gorodok_boy_hj={
	if dom>0:
		act 'jerk guy':
			cls
			minut += 5
			sub += 1
			gs 'tboyopr'
			bmHJ[Tboynum] += 1
			gs 'stat'
			evhjrand = rand(0, 1)

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

				hj += 1
				'<center><img src="images/qwest/alter/Ev/hj.jpg" ></center>'
				'You got it hard and hot cock out of his pants and took his hand. You started kissing Man, while masturbate his penis. Finally the guy strangled groan and you will see how a member of his sperm flies.'

				act 'Leave':gt 'gdkin'
			elseif evhjrand = 1:
				'<center><img src="images/qwest/alter/Ev/hj.jpg" ></center>'
				'You got it hard and hot cock out of his pants and took his hand. You started kissing Man, while masturbate his penis. The guy pushes you on the shoulders forcing squat.'
				dynamic $din_gorodok_boy_bj
			end
		end
	end
}

music_on = 0
minut += 5
gs 'stat'
'<center><img src="images/etogame/dk_night.jpg"></center>'
'You went out with a guy from the club he led the club for you.'

if GorSlut = 0:
	'The guy pulled out a package poltorashku beer, chips and a couple of cups. You have found a place in the bush, and settled on the fallen tree.'

	act 'Drink beer':
		cls
		alko += 1
		manna += 30
		fat += 5
		energy += 20
		minut += 10
		gs 'stat'
		'You will have fun chatting with a guy drinking beer from cups and seizing chips. The guy was hilarious and telling funny stories.'

		if alko >= 3:
			horny += 20
			'<<$bname>> you hugged and kissed. You embraced the thrill of a kiss. You felt his hands on his chest.'

			if horny < 75:
				act 'Whisper, "Do not"':
					cls
					minut += 5
					gs 'stat'

					if DPtipe = 2:
						'<center><img src="images/qwest/alter/Ev/grab.jpg"></center>'
						'The guy was drunk and not paying attention to you.'
						dynamic $din_gorodok_boy_bj

						act 'Be silent':
							cls
							minut += 5
							horny += 10

							if boynumBlock = 0:boy += 1

							gs 'tboyopr'
							bmSEX[Tboynum] += 1
							$boy = $bname3

							if GorSlut = 0:
								resultrand = rand(0, 100)

								if resultrand >= 80:
									GorSlut = 1
									bmGossip[Tboynum] = 1
								end
							end

							gs 'stat'
							'<center><img src="images/picV/vag.jpg"></center>'
							'The guy threw you to the ground and began to undress.'
							dynamic $sexstart
							dynamic $sexstart2
							dynamic $sexcum

							act 'Leave':gt 'gdkin'
						end
					else
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/tits.jpg"></center>'
						'Male head slightly weakens, but still does not let you.'

						if horny < 75:
							act 'Leave':gt 'gdkin'
						end

						'You are standing in an embrace with a guy and he gently pulls your chest and begins to lick and suck her nipples.'
						dynamic $din_gorodok_boy_bj
					end

					dynamic $d_gorodok_boy_hj
				end
			end

			act 'Be silent':
				cls
				minut += 5
				horny += 10

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

				bmSEX[Tboynum] += 1
				$boy = $bname3

				if GorSlut = 0:
					resultrand = rand(0, 100)
					if resultrand >= 80:
						GorSlut = 1
						bmGossip[Tboynum] = 1
					end
				end

				gs 'stat'
				'<center><img src="images/picV/vag.jpg"></center>'
				'The guy threw you to the ground and began to undress.'
				dynamic $sexstart
				dynamic $sexstart2
				dynamic $sexcum

				act 'Leave':gt 'gdkin'
			end
		elseif alko < 3:
			if DPtipe = 1:
				randvnesh = rand(10, 30)
				deystrand = rand(0, 1)

				if deystrand = 0 and vnesh >= randvnesh:
					'<<$bname>> said "You''re a cool girl. Maybe we''ll meet again?"'

					act 'And refuse to leave':gt 'gdkin'

					act 'Tell him your phone':
						cls
						manna += 10
						numboyFrend += 1
						$nameBoyfrend[numboyFrend] = $bname
						$nameBoyfrendFull[numboyFrend] = $bnamefull
						dickBoyFrend[numboyFrend] = dick
						silavagBoyFrend[numboyFrend] = siladick
						otnBoyFrend[numboyFrend] = 50
						minut += 30
						bmFrend[Tboynum] = 1
						gs 'stat'
						'You told the guy my phone and he recorded it.'

						act 'Leave':gt 'gdkin'
					end
				elseif deystrand = 1 or vnesh < randvnesh:
					'<<$bname>> fits closer to you and starts kissing you.'

					if horny <= 25:act 'Leave':gt 'gdkin'

					dynamic $din_gorodok_boy_pristal
				end
			elseif DPtipe = 2:
				horny += 5
				gs 'stat'
				'<<$bname>> suitable for you closer and starts kissing you.'

				if horny <= 25:act 'Leave':gt 'gdkin'

				act 'Kiss':
					cls
					horny += 5
					minut += 3
					bmKISS[Tboynum] += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
					'<<$bname>> passionately kisses your <<$liptalk3>> and you reciprocate the kiss. You feel like your hands Man trying to pull your chest.'

					if horny <= 50:act 'Leave':gt 'gdkin'

					act 'Let him':
						cls
						horny += 10
						minut += 3
						bmTITS[Tboynum] += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/Ev/tits.jpg"></center>'
						'<<$bname>> pulls your breasts <<tits>> the size of the outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he''s got a hard cock.'

						if horny <= 75:act 'Leave':gt 'gdkin'

						if horny <= 90:
							act 'Resist':
								cls
								horny += 10
								minut += 3
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
								'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'

								if horny <= 90:act 'Remove his hands and walk away':gt 'gdkin'

								if horny > 90:
									cla
									horny = 0
									orgasm += 1
									gs 'stat'
									'Suddenly you feel like in the abdomen increases the pleasant warmth and you hit an orgasm. You bite my lip that would not yell at the sensation.'

									act 'Moan':
										cls
										horny += 5
										minut += 3
										gs 'stat'
										'<center><img src="images/qwest/alter/Ev/cock3.jpg"></center>'
										'You moan with pleasure and your legs buckled, you squatted in front of the guy. When eyes brightened you will see in your face member.'

										if sub > 10:
											act 'Suck':
												cls
												minut += 5
												horny += 10
												bj += 1

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

												bmBJ[Tboynum] += 1
												sub += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/cocksuck.jpg"></center>'
												'You without even realizing suddenly kissed penis and realized that you do only when hard cock already filled your mouth and you are diligent it aspirated.'

												act 'Further':
													cls
													minut += 5
													horny += 10
													cumlip += 1
													cumface += 1
													cumfrot += 1

													if GorSlut < 2:
														resultrand = rand(0, 100)

														if resultrand >= 80:
															GorSlut = 2
															bmGossip[Tboynum] = 2
														end
													end

													gs 'stat'
													'<center><img src="images/qwest/alter/Ev/cocksuck2.jpg"></center>'
													'Suddenly your mouth warm jet of sperm hit, you almost choked but continued to suck. Seed flowed on your lips on your cock and dripping clothes, finally became a member of the fall off in your mouth and the guy took it out and put it in his pants.'

													act 'Look at the Man':
														cls
														minut += 1
														gs 'stat'
														'<center><img src="images/qwest/alter/Ev/cocksuck3.jpg"></center>'
														'<<$bname>> still experience holding your head and you with a mouth full of sperm looked up into his face. The guy is quite bliss and looks at you. "Fucking suck!"'

														act 'Get up and leave':gt 'gdkin'
													end
												end
											end
										elseif sub >= 10 or dom =< 10:
											act 'Sit':
												cls
												minut += 5
												if boynumBlock = 0:guy += 1
												if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
												facial += 1
												sub += 1
												cumface += 1
												cumfrot += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/facial.jpg"></center>'
												'You as if spellbound remained seated on the ground and the guy started to masturbate in front of your face member. Everything happened very quickly, you do not have time to understand anything and suddenly you face, a member of the hot liquid jet takes off and lands on the nose. You flinch and squeezes his eyes shut eyes, feeling as new streams of sperm fall on your face.'

												act 'Leave':gt 'gdkin'
											end
										elseif dom > 10:
											act 'Jerk guy':
												cls
												minut += 5

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

												bmHJ[Tboynum] += 1
												hj += 1
												dom = 0
												gs 'stat'
												'<center><img src="images/qwest/alter/Ev/hj.jpg"></center>'
												'You had the courage to stand up and took it hard and hot cock in her hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you''ll see how his cock off sperm.'

												act 'Leave':gt 'gdkin'
											end
										end
									end
								end
							end
						end

						act 'Caress his cock through his pants':
							cls
							horny += 5
							minut += 3
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/cock.jpg"></center>'
							'You started stroking guy crotch, feeling the hardness of the penis.'

							if horny <= 90:act 'Leave':gt 'gdkin'

							act 'Going to the guy''s pants':
								cls
								horny += 10
								minut += 3
								gs 'stat'
								'<center><img src="images/qwest/alter/Ev/cock2.jpg"></center>'
								'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'

								if horny <= 90:act 'Leave':gt 'gdkin'

								dynamic $d_gorodok_boy_hj
								dynamic $din_gorodok_boy_bj
							end
						end
					end
				end
			end
		end
	end
end

$din_gorodok_boy_otkaz = {
	if dom >= GorSlut:
		act 'Leave':
			cls
			dom -= GorSlut
			minut += 5
			gs 'stat'
			'You refused and the guy went back to the club.'

			act 'Leave':gt 'gdkin'
		end
	end
}

$din_gorodok_boy_pristal = {
	act 'Kiss':
		cls
		horny += 5
		minut += 3
		gs 'tboyopr'
		bmKISS[Tboynum] += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
		'<<$bname>> passionately kisses your <<$liptalk3>> and you reciprocate the kiss. You feel like your hands Man trying to pull your chest.'

		if horny <= 50:act 'Leave':gt 'gdkin'

		act 'Let him':
			cls
			horny += 10
			minut += 3
			bmTITS[Tboynum] += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/tits.jpg"></center>'
			'<<$bname>> pulls your breasts <<tits>> size outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he''s got a hard cock.'

			if horny <= 75:act 'Leave':gt 'gdkin'

			if horny <= 90:
				act 'Resist':
					cls
					horny += 10
					minut += 3
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/petting.jpg"></center>'
					'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'

					if horny <= 90:act 'Remove his hands and walk away':gt 'gdkin'

					if horny > 90:
						cla
						horny = 0
						orgasm += 1
						gs 'stat'
						'Suddenly you feel like in the abdomen increases the pleasant warmth and you hit an orgasm. You bite my lip that would not yell at the sensation.'

						act 'Moan':
							cls
							horny += 5
							minut += 3
							gs 'stat'
							'<center><img src="images/qwest/alter/Ev/cock3.jpg"></center>'
							'You moan with pleasure and your legs buckled, you squatted in front of the guy. When eyes brightened you will see in your face member.'

							if sub > 0:
								act 'Suck':
									cls
									minut += 5
									horny += 10
									bj += 1

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

									bmBJ[Tboynum] += 1
									sub += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/cocksuck.jpg"></center>'
									'You without even realizing suddenly kissed penis and realized that you do only when hard cock already filled your mouth and you are diligent it aspirated.'

									act 'Further':
										cls
										minut += 5
										horny += 10
										cumlip += 1
										cumface += 1
										cumfrot += 1

										if GorSlut < 2:
											resultrand = rand(0, 100)

											if resultrand >= 80:
												GorSlut = 2
												bmGossip[Tboynum] = 2
											end
										end

										gs 'stat'
										'<center><img src="images/qwest/alter/Ev/cocksuck2.jpg"></center>'
										'Suddenly your mouth warm jet of sperm hit, you almost choked but continued to suck. Seed flowed on your lips on your cock and dripping clothes, finally became a member of the fall off in your mouth and the guy took it out and put it in his pants.'

										act 'Look at the Man':
											cls
											minut += 1
											gs 'stat'
											'<center><img src="images/qwest/alter/Ev/cocksuck3.jpg"></center>'
											'<<$bname>> still experience holding your head and you with a mouth full of sperm looked up into his face. Guy and quite blissfully happy looking at you. "Fucking suck!"'

											act 'Get up and leave':gt 'gdkin'
										end
									end
								end
							elseif sub = 0 and dom = 0:
								act 'Sit':
									cls
									minut += 5

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

									facial += 1
									sub += 1
									cumface += 1
									cumfrot += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/Ev/facial.jpg"></center>'
									'You as if spellbound remained seated on the ground and the guy started to masturbate in front of your face member. Everything happened very quickly, you do not have time to understand anything and suddenly you on the face of a member of hot liquid jet takes off and lands on the nose. You flinch and squeezes his eyes shut eyes, feeling like new streams of sperm fall on your face.'

									act 'Leave':gt 'gdkin'
								end
							end

							dynamic $d_gorodok_boy_hj
						end
					end
				end
			end

			act 'Caress his cock through his pants':
				cls
				horny += 5
				minut += 3
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/cock.jpg"></center>'
				'You started stroking guy crotch, feeling the hardness of the penis.'

				if horny <= 90:act 'Leave':gt 'gdkin'

				act 'Going to the guy''s pants':
					cls
					horny += 10
					minut += 3
					gs 'stat'
					'<center><img src="images/qwest/alter/Ev/cock2.jpg"></center>'
					'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'

					if horny <= 90:act 'Leave':gt 'gdkin'

					dynamic $d_gorodok_boy_hj
					dynamic $din_gorodok_boy_bj
				end
			end
		end
	end
}

if GorSlut = 1 or GorSlut = 2:
	gsboyrand = rand(0, 10)

	if gsboyrand = 0:
		if GorSlut = 1:
			'<<$bname>> said, "<<$name>> I heard that you all give." The guy got dick out of his pants.'
			dynamic $din_gorodok_boy_bj
			dynamic $din_gorodok_boy_otkaz
		elseif GorSlut = 2:
			'<<$bname>> said, "<<$name>> I heard that you take in your mouth." The guy got dick out of his pants.'
			dynamic $din_gorodok_boy_bj
			dynamic $din_gorodok_boy_otkaz
		end
	elseif gsboyrand > 0:
		alko += 1
		minut += 15
		gs 'stat'
		'<<$bname>> beer and got you started drinking with him. When the beer was done with a guy came up to you and hug you.'
		dynamic $din_gorodok_boy_otkaz
		dynamic $din_gorodok_boy_pristal
		exit
	end
elseif GorSlut = 3 or GorSlut = 4:
	'<<$bname>> said, "you''re <<$name>> <<$gnikname>>. I want to have fun." The guy got dick out of his pants.'
	dynamic $din_gorodok_boy_bj
	dynamic $din_gorodok_boy_otkaz
elseif GorSlut = 5:
	'<<$bname>> said, "you''re <<$name>> <<$gnikname>>. I want to have fun." After that guy got dick out of his pants.'
	dynamic $din_gorodok_boy_bj
	dynamic $din_gorodok_boy_otkaz
elseif GorSlut = 6:
	gs 'tboyopr'
	'<<$bname>> said, "you''re <<$name>> <<$gnikname>>. I want a blow job. Here you 50 rubles, " After this guy got dick out of his pants.'

	act 'Squat':
		cls
		minut += 5
		horny += 10
		bj += 1

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

		bmHJ[Tboynum] += 1
		sub += 1
		money += 50
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/boybj.jpg"></center>'
		'You squatted in front of the guy and began stroking his cock.'

		act 'Suck':
			cls
			minut += 5
			horny += 10
			bmBJ[Tboynum] += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/boybj2.jpg"></center>'
			dynamic $dinrandbj

			act 'Further':
				cls
				minut += 5
				horny += 10
				cumface += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/Ev/boybj3.jpg"></center>'
				dynamic $dinrandswallow

				act 'Leave':gt 'gdkin'
			end
		end
	end

	act 'Leave':gt 'gdkin'
end

if GorSlut >= 1:
	if dom >= 5:
		act 'Swear Man':
			cls
			sub += 5
			minut += 3
			GorSlut -= 1
			gs 'stat'
			'You denied the kid "You do ohereli? His wife will make such proposals. Freak." The guy was confused, "Well boys as they say ..." You killed him, "said Moscow chickens milked, but just being milked, do not say you''re more ears hang, you moron!"'

			act 'Leave':gt 'gdkin'
		end
	end

	if GorSlut < 6:
		if dom > 0:
			act 'And you''ve got the money that is?':
				cls
				sub += 1
				minut += 3
				GorSlut = 6
				money += 300
				gs 'stat'
				'You refused kid "And you have money that is?" The kid pulled out his 300 rubles. You took the money and put their own.'
				dynamic $din_gorodok_boy_bj
			end
		end
	end
end

!!dynamic $dinrandswallow

--- EvBoyBuh ---------------------------------
# BMloc
gs 'stat'
'<<$text>>'

act 'Dance':
	cls
	gs 'stat'

	if bmFrend[Tboynum] = 0:
		if bmHJ[Tboynum] > 0 or bmBJ[Tboynum] > 0 or bmSEX[Tboynum] > 0 or bmANAL[Tboynum] > 0 or bmGANG[Tboynum] > 0:
			if bmHJ[Tboynum] > 0:$text2 = 'you handle me like that caressed'
			if bmBJ[Tboynum] > 0:$text2 = 'You took me in her mouth'
			if bmSEX[Tboynum] > 0:$text2 = 'we have to sleep with you'
			if bmANAL[Tboynum] > 0:$text2 = 'I took you in the ass'
			if bmGANG[Tboynum] > 0:$text2 = 'I''ll fuck with a friend'

			'<<$niknameboy>> tells you "Remember me, <<$text2>>. I''m <<$bmNane[Tboynum]>>"'
		else
			if bmKISS[Tboynum] > 0 or bmTITS[Tboynum] > 0:
				'<<$niknameboy>> tells you "Remember me, I like you and we drank together beer. I''m <<$bmNane[Tboynum]>>"'
			else
				'<<$niknameboy>> tells you "Remember me, I like you and we danced together. I''m <<$bmNane[Tboynum]>>"'
			end
		end
	else
		!!if bmFrend[Tboynum] = 1:end
		!!if bmFrend[Tboynum] = 2:end
		!!if bmFrend[Tboynum] = 3:end
	end

	if bmTip[Tboynum] = 0:'After the Dance <<$bmNane[Tboynum]>> offers to go out and drink beer.'
	if bmTip[Tboynum] = 1:'After the Dance <<$bmNane[Tboynum]>> offers to plunk.'
	if bmTip[Tboynum] = 2:'After the Dance <<$bmNane[Tboynum]>> offers to go to his hotel.'

	act 'Agree':
		cls
		boynumBlock = 1

		if bmTip[Tboynum] = 0:gt 'EvBoyBuh'
		if bmTip[Tboynum] = 1:gt 'EvgopBuh'
		if bmTip[Tboynum] = 2:gt 'EvOtelMan'
	end

	act 'Refuse':
		cls
		willpower += rand(0, 1)
		gt 'gdkin'
	end
end

act 'Leave':gt 'gdkin'

--- BMloc ---------------------------------

# BMloc1
gs 'stat'
'<<$text>>'

--- BMloc1 ---------------------------------

# BMloc2
gs 'stat'
'<<$text>>'

--- BMloc2 ---------------------------------

# albinaEv
$din_albina_get_over_car = {
	'Strong hands grabbed you and pulled out of the car.'

	act 'Further':
		cls
		albinaCar = 1
		gs 'stat'
		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/grab.jpg"></center>'
	end
}

albinaCarday = day
gs 'stat'
'<center><img src="images/qwest/alter/BMW.jpg"></center>'
'You went out to the car and looked at Albina. She looked around you haughty look and started the car.'

if albinaCar = 0:
	act 'Ask her if that car is hers':
		cls
		albinaCar = 1
		gs 'stat'

		'<center><b><font color="maroon"><<$npcName[23]>> <<$npcSurName[23]>></font></b></center>'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc23.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/23.jpg"></center>'
		'You asked Albina "Is this your car?" Albina squirmed grimassy contemptuous "What? Of course not, this is the machine my father, I would never have bought it. Generally X5 is a machine for cattle suddenly grown rich and not for decent people." You shake your head, "You what? Rights have?" Albina laughed "Rights? Why should I, right? Do you know who my father is? He police chief of our town, though retired, but the connection remained. Never stopped me in his car." Albina second thought about something and said, "go for a drive."'

		act 'Go with Albina':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/BMW.jpg"></center>'
			'You sat down on the seat next to Albina and she touched the car. You went through the streets of the town, soon you moved out from the central streets and stopped at what that wilderness, where the trees darkened factory building. Albina looking at you smiled mysteriously "This is a surprise."'

			act 'Look around':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/castle.jpg"></center>'
				'You looked around and realized that you are in the territory of an abandoned factory. You looked at Albina, she grinned and poked manicured finger in the plate. Have you read the inscription on the plate "Property Ltd. The Snow Queen" Albina grinned "This castle of the Snow Queen. My Territory" The car stopped and two men approached BMW, the appearance of both was a little over 30 years, one tall, athletic, not the second big growth with tum, but very sturdy, with a red neck wrestling, powerful hands and broad shoulders. Albina opened the door, "Hi guys. How you doing?" Guys frown examined you and shorty boomed "Everything is fine."'

				if AlbinaLast > 0 or AlbinaBlokDance > 0:
					'Albina does not stop the engine, got out and told the guy, "I''ve brought you a not very obedient girl who knows something about my dance business." High grinned "I see." Strong Shorty silently and lazily toward you.'

					if dom > 0:
						act 'Jump behind the wheel':
							cls
							minut += 5
							gs 'stat'
							'<center><img src="images/qwest/alter/BMW.jpg"></center>'

							if agil >= 100:
								'You deftly jumped behind the wheel of a car. Fortress was at the hood, as long guy rushed to the driver''s door, What would you get.'

								act 'Switch into reverse gear':
									cls
									minut += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/BMW.jpg"></center>'
									'You dramatically stopped and handed back almost concrete fence. Before your hood you see as the burly running to you. A driver''s door to the long runs.'
								end

								act 'Put the pedal to the metal':
									cls
									minut += 1
									gs 'stat'
									'<center><img src="images/qwest/alter/BMW.jpg"></center>'
									'You abruptly thrust gear and pull the clutch abruptly moved forward. Fortress with a bang flopped down on the hood and fell off the machine. Ahead you see the bushes, the gateway to which you moved Albina are to the right of you. From left to you is factory building brick wall.'
								end
							elseif agil < 100:
								'You jumped behind the wheel of a car, but tangled legs between the seat and the gear lever. The driver''s door stuck his hands long man.'

								dynamic $din_albina_get_over_car
							end
						end
					end

					act 'Get out of the car':
						cls
						minut += 5
						gs 'stat'
						'<center><img src="images/qwest/alter/castle.jpg"></center>'
						'You jumped out of the car and see how you run burly side hood and trunk from the car obbegat long. The road back to cut you, but you notice the open door of the shop.'
					end

					act 'Sit in the car':
						cls
						minut += 5
						gs 'stat'
						'<center><img src="images/qwest/alter/BMW.jpg"></center>'
						dynamic $din_albina_get_over_car
					end

					exit
				end

				if DanceWhore > 0:'Albina does not stop the engine, got out and said, "Relax guys. <<$name>> of my Zvezdushek. Newcomer. But a lot of promise."'
			end
		end
	end
end

act 'Move away':gt $loc, $metka

--- albinaEv ---------------------------------
# kotovEv
gs 'stat'
'<center><b><font color="maroon"><<$npcName[9]>> <<$npcSurName[9]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
'<center><img src="images/qwest/alter/npc/9.jpg"></center>'

if kotovLoveQW > 0 and GorSlut > 0:
	'Witek scowled and tells you "Slysh <<$name>>, Th for garbage? We''re mutim, and then you tell me about you <<$gnikname>>. Whole town already know the boys with me neigh district. Ohuevshaya You bitch!"'

	act 'A scandal':
		cls
		grupNPC[9] = 0
		kotovLoveQW = -1
		gs 'stat'
		'You started yelling at Victor that he has fucked. Vitek started yelling at you and suddenly you have a ringing in your head and you were on the floor. Witek standing over you. Heavily burned cheek, you do not understand what happened, but it seems he slapped you podschechinu. "All the creature! Most do not come to me! All over between us!"'

		act 'Move away':gt $loc, $metka
	end

	if dom >= 20:
		act 'Argue that all this gossip':
			cls
			sub += 20
			GorSlut = 0
			gs 'stat'
			'You have started to convince Victor that all this gossip, do not have no foundation. Witek frowned, "I''ll knock your teeth these talkers, if ever even what you hear about the garbage. Do not worry, I pozatykayu these yapping mouths."'

			act 'Move away':gt $loc, $metka
		end
	end

	exit
end

if $loc = 'gdksport':
	if kotovKnowSport = 0:
		'Vitek came up to you and hug her waist kissed. "Hi, <<$name>>."'

		act 'What are you doing here?':
			cls
			gs 'stat'
			'<center><b><font color="maroon"><<$npcName[9]>> <<$npcSurName[9]>></font></b></center>'
			! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
			'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
			'You asked Vic what he was doing. Witek snickered "You cho? Since I''ve been boxing for 11 years doing. Candidate Master of Sports is the second place in the championship held in the region."'

			act 'You drink, and even smoke!':
				cls
				kotovKnowSport = 1
				gs 'stat'
				'<center><b><font color="maroon"><<$npcName[9]>> <<$npcSurName[9]>></font></b></center>'
				! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
				'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
				'Were you surprised Witek every day thumps and smokes as he combines with sports. Witek chuckled, "Ha. Coach says I have a talent. Kick like a cannon, and the reaction is great. It''s in my dad, who was a drunkard goner. 6t walker on the area and died of cirrhosis, but move into the jug could always so that flew from sneakers. course bluing slightly hampered, but what the fuck? tossed and I would drink and smoke, but in boxing, no dating and money, CCM is the ceiling. though I can wriggle inside, but the master of sports will not. I''ve on the region, took 2nd place, I beat the champion in the shit, he twice knocked down lying. And gave him the victory. So for me right now is boxing, so they do out of habit, but that would be in the form behave. "'

				act 'Move away':gt $loc, $metka
			end
		end
	elseif kotovKnowSport > 0:
		'Vitek came up to you and hug her waist kissed. "Hi, <<$name>>. Again I to practice."'

		act 'Move away':gt $loc, $metka
	end
elseif $loc = 'gskver':
	'Witek you waving hand. "Come here <<$name>>."'

	act 'Sorry, I''m in a hurry':gt $loc, $metka

	act 'Step up':
		cls
		minut += 5
		gs 'stat'
		! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
		'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
		'Witek pours beer into a plastic cup. "In short, <<$name>>, let''s have a cup pivasom."'

		act 'Drink beer':
			cls
			minut += 15
			alko += 2
			fat += 5
			salo += 1
			energy += 10
			gs 'stat'
			'Witek poured you a beer and you have been drinking with him. Witek with boys bullied stories as they overcame babosov in Loja city, and how the Rams with boys from another district.'

			act 'Okay, I gotta go.':
				cls
				gs 'stat'
				! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
				'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
				'Vitek came up to you and hugged, kissed her on the lips. "Slysh <<$name>>, come to me."'

				if dom > 0:act 'Sorry, I''m in a hurry.':sub += 1 & gt $loc, $metka

				act 'Go to Vit''ka.':
					cls
					minut += 15
					gs 'stat'
					! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
					'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
					'You went through the square to the side where he lives Witek. Soon you with Vic came to a dilapidated house he opened the door and led you to the poor and not well-kept apartment in a room where clothes lying crumpled heaps on the floor was littered with empty bottles.'

					act 'Next':gt 'kotovSex'
				end
			end
		end

		act 'Sorry, I''m in a hurry':gt $loc, $metka
	end
end

--- kotovEv ---------------------------------
# IgorEv
gs 'stat'
'<center><b><font color="maroon"><<$npcName[4]>> <<$npcSurName[4]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc4.jpg"></center>'
'<center><img src="images/qwest/alter/npc/4.jpg"></center>'

if fedorKozlovQW >= 10 and $loc = 'gdkin':
	'To you and Igor suitable Fedor. "Gosh, you do not confused? <<$name>> my girl." Igor blushed "Well Fed, you know, I did not know. But if you insist, then okay, I''m just a joke." Fyodor nodded, "Well, go wherever you go, a practical joker."'

	act 'Go with Fedor':IdorBlock = 1 & gt 'FedorEv'

	exit
end

'Igor eagerly tell you, "Well what? Come to my house?".'

if IgorLove > 0:
	act 'Go to Igor':
		cls
		minut += 15
		gs 'stat'
		'You came home to Igor.'

		if IgorDominaQW = 0:
			'Igor starts hugging and kissing you.'
		elseif IgorDominaQW > 0:
			'Igor gets up on his knees in front of you, "Madam, I pray for a kiss!"'
		end

		act 'Leave':IgorLove -= 1 & gt 'gorodok'
	end
elseif IgorLove <= 0:
	IgorLoverQW = -1
	'Along the way, Igor began to chant "<<$name>>, I love you so much, but you do not know me, you know, I began to wonder if perhaps we should leave."'

	act 'Leave':gt 'gorodok'
end

--- IgorEv ---------------------------------
# IvanEv
ivansportday = day
gs 'stat'
'<center><b><font color="maroon"><<$npcName[3]>> <<$npcSurName[3]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc3.jpg"></center>'
'<center><img src="images/qwest/alter/npc/3.jpg"></center>'

if $loc = 'gdksport':
	'Ivan grinned seeing you "Hello <<$name>>, you''re here too zanimaeshsya sports?" You confirmed his words. Ivan nodded. "I''ve been training for boxing go. Soon the competition."'

	act 'Leave':gt 'gdksport'

	!!if kotovVSprohorov = 1:end
	if kotovVSprohorov = 0:
		'Ivan thought about something and said, "I have today sparring with Kotov from our class. Want to see?"'

		act 'Want':
			cls
			kotovVSprohorov = 1
			gs 'stat'
			'You entered the hall where trained local boxing club. In the hall stood ineradicable smell of old leather pears and sweat. A few guys hit on pears practicing strokes, several mirrors before doing the moves. In the ring was already Kotov, shorts, helmet and gloves. "Hey Proshka I''ll wait for you much? Go to the ring!" Prokhorov smirked, quickly pulled the helmet on your head, put on gloves and entered the ring. You sat down on the bench. Many of the guys, too, began to look, what will happen in the ring.'

			act 'Watch':
				cls
				minut += 3
				dom += 1
				gs 'stat'
				'Immediately struck that Ivan is much higher than Vitek Kotov Kotov but broader in the shoulders and much more muscular. Guys bumped gloves in salute and departed from each other stood in the rack. Cats like a whirlwind attacked Ivan. Ivan began to retreat fighting jabs. Became apparent that Kotov embedded in shots, but can not get Ivan. Ivan is not strong blows of his left hand almost immediately began to get cats in the head. Here there was a loud bang, and the head jerked Kotova, and the Vitek otsupil step. Ivan kick right hand was very sharp and detailed. Vitek began to retreat and fight. Roles were reversed in the ring, now crushed and put pressure Ivan Kotov. It became apparent that Vic is the sweat pours and he began to choke. And Ivan Kotov meanwhile shot sharp and precise strokes of the race. Vitek also fighting could not get Prokhorov. There was another loud bang and Vic head jerked to the side, and he was visibly staggered. Coach whistle whistle "So at the corners, the end of the round. Victor, What the hell you like a tank Presch Ivan? Ivan class above you. Use jab feint if you will shove, I can not catch you separate them, then you will treat a concussion. " Witek standing in the corner and tried sweating prodyshatsya. Ivan looked fresh and not tired. Finally coach whistle whistle "second round."'

				act 'Watch':
					cls
					minut += 3
					dom += 1
					gs 'stat'
					'In the second round, Ivan became easy on your feet moving around the circle and beat Victor light blows with his left hand, almost all the blows fell cats in the head, but Victor was not responding to them trying to get closer Ivan suddenly he abruptly threw a left hook to the head of Ivan Prokhorov had time to raise hands and close the head, but then a second blow Kotova landed with a loud bang Ivan in the stomach. Ivan noticeably bent down and began to retreat and move from side to side. Cats happy and began to settle on Ivan throwing hands with incredible speed. Here he managed to get Ivan''s head and legs buckled Ivan. Coach again whistled the whistle. "Ivan, keep him at a distance, do not let close!" It has been seen as Ivan nose bleeds he wipes his glove. Coach whistled again "Round."'

					act 'Watch':
						cls
						minut += 3
						dom += 1
						gs 'stat'
						'Ivan began to move easily on his feet throwing his left hand on his head which regularly ran constantly attacking Kotov. Victor threw hand, but Ivan managed to remove the head from bumps and knocks over his arm Kotova, there was a loud bang and Kotov got ass in the ring. Some of the guys who are watching the fight with admiration said "Great cross struck Vanya." Long and nasty whistle whistle coach. "Ivan, well done, well caught on the cross. Victor, are you okay?" Witek got to his feet and angrily looked at Ivan through clenched teeth. "I''m all right." Coach nodded "Well, then continue." The guys came back to the center of the ring and greeting each other blow gloves started the fight. Witek was noticeably quieter and often tried to go away from the blows Prokhorov. Ivan was moving on his feet and threw scathing attack, many of them hit the target. Witek suddenly intensified and tucked in the corner of Ivan, two powerful blows immediately hit in the stomach and Ivan Prokhorov clutching Vic hung on it. Whistle blew trainer "Ivan, protect body. Okay, relax a little bit." Boys stood in their corners, it was noticeable that they are both covered in sweat and panting. Ivan wiped the blood flowing from the nose, and Victor hands kneaded. Coach whistle whistle "fourth round"'

						act 'Watch':
							cls
							minut += 3
							dom += 1
							gs 'stat'
							'Began the fourth round and Victor began circling around the ring trying to drive into the corner of Ivan. Ivan noticeably tired and his movements became slower in the ring, but his punches are still regularly fetched Kotova. Suddenly there was a cotton and Ivan staggered Victor still got him in the head. Ivan began to retreat from close hands Kotova and Witek with renewed vigor to protect Ivan thrashed. Suddenly, one of the blows to the stomach slapped Prokhorov and he bent down, Kotov hit uppercut swing and the head of Ivan. Ivan hung on Victor. Coach whistle whistle "Ivan, move on his feet, hit jab, do not sleep in the ring." Coach whistled again and the guys continued. Witek were pressing on Ivan, but Ivan has already recovered and fought light and quick strokes. Here''s head jerked from Ivan and Ivan hit hard recoiling hanging on the ropes, Kotov immediately rushed to Ivan with a view to finish it, but the whistle blew coach. "Okay, enough for today. Ivan, get some rest and paws will practice defense corps. You weak this part." Witek scowled, "What do I do?" Coach shrugged "Invent something, not small."'

							act 'Ask the coach who won':
								cls
								minut += 3
								gs 'stat'
								'You asked an elderly coach who won. Coach looked at you as if you had just said. "It''s sparring, there are no winners. But if it was a real battle, it would certainly be defeated Ivan. In combat count the number of strokes, their strength does not matter. Ivan struck a dozen times more punches." Kotov heard coach zabubnel "Certainly otpizdish in shit, and then another and lose. Proshka same broke, if not whistle, I would put it. Fucking master of sports." On the coach said with exasperation, "Kotov, you''re not in the alley, it is a sport and it has rules, according to the rules you lose, learn not to expose all your head off." Cats with exasperation took off his gloves and went to the corner where lay the rod and weights. Coach looked after him "That''s only and can swing." Prokhorov has already recovered and went to the coach. Coach began to wear long leather paws on his hands.'

								act 'Can I like to practice?':
									cls
									minut += 3
									gs 'stat'
									'You asked an elderly trainer whether you can train too. Coach grinned. "You see, there''s no other girls. Who are you going to stand in sparring? And without sparing it will not stall, and a children''s game." You offered to put you in sparring with guys. Surround you guys giggled. Smiled even coach. "You saw the fight, imagine what will happen to you if some sort Kotov you accidentally hit in full force. I''m not going in my old age, still in jail get for what you in training accidentally injure somebody."'

									act 'Leave':gt 'gdksport'
								end
							end
						end
					end
				end
			end
		end
	end
end

--- IvanEv ---------------------------------
# FedorEv
numnpc = 5
gs 'stat'
'<center><b><font color="maroon"><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc<<numnpc>>.jpg"></center>'
'<center><img src="images/qwest/alter/npc/<<numnpc>>.jpg"></center>'

if GorSlut = 0:
	if kotovLoveQW > 0 and week < 5 and kotovVSkozlov = 0:
		kotovVSkozlov = 1
		'To you Fedor came Witek Kotov, "Hey, patsanchik, you do not beguiled? <<$name>> my calf!" Fedor turned to Vit''ka "It looks like you made me do. <<$name>> to me now, so you should go wherever you go." Witek Courage put his hand to his ear, "Where you just sent me, eh?" Fedor said quietly, "You heard me perfectly." In the eyes of Victor prolyhnula rage and you noticed how white-knuckled fingers on his clenched fists "You Th so gallant? Heifer To my basement, I derzish, because I ask for it and I can not." Fedor came close to too Vit''ka and clenched his fists. "Get away from Amy Cats."'

		act 'Witek, I''ll throw':
			cls
			minut += 5
			kotovLoveQW = -1
			gs 'stat'
			'You said that you throw Kotova. Witek noticeably angry, forced a "Fuck you on dick, bitch!" And he left.'

			act 'Further':gt $curloc
		end

		act 'See what will':
			cls
			minut += 5
			gs 'stat'
			'Witek will suddenly punched Fedor, from which he flew backwards and fell to the pavement. Vitek quickly jumped to the fallen Theodore and grabbed him by the collar with his left hand, there powerfully punched right hand on the head of Fedor. Fedor shrunk covering his face and tried to kick cats. Witek bounced and with all his strength gave a kick in the ribs lying on the ground Fedor. Fedor skhvavshis groaned and tried to get his ribs to his feet, but then he got another powerful kick in the head from Vic, and fell on his back. Have you noticed that on the left corner of Auburn and Shulga, groomsman Kotova "Hey Cat, what''s happening here? Goat that insolent mind?" Cats again kicked in the ribs bezchuvstvennogo Fedor, and said to his friends. "Yes absolutely ohuel our goat, my wedges devchenke decided to knock out, sent me. Bykuet short in full, and here I am his pressanul." Auburn came to lying on the ground and Fedor sat on his haunches Fedor grabbed by the hair and lifted his head. "Hey goat, let ochuhivaysya bazaar there." Fedor groaned and opened his eyes, his face was broken and bleeding. Ryzhy blew smoke in the face of Federal "Well, Th, deer, you agree that wrong?" Fyodor moaned "<<$name>> my girl." Shulga disgusting like a hyena giggled, "You see, goat bychit continues." Cats barked at Fedora "You little what? Piedra I''ll do now omit the floor, if not with their mouths shut up!" Auburn said quietly "Relax Cat. Goat I think realized the depth of his delusion. Well? Woke? Or do you want to aggravate?"'

			act 'See what will':
				cls
				strelaDay = day
				strelaQW = 1
				gs 'stat'
				'Fyodor started to rise to his feet and moaned through the broken ruining "Fuck you, gopota fucking." Shulga jumped to Fede and slammed his fist in the face, but managed Fyodor staggered to his feet, but he was immediately on the neck edge of his hand hit Auburn. Fedor legs buckled and he fell on all fours. Shulga giggled "Look pidarok already stood in a pose! Gradually begins to realize." Fedor came to the Wailing Kotov and grabbed him by the collar to his feet, "Well, do you have something else to say?" Fyodor tried to hit Kotova, but he easily parried Fedi hand and hit his forehead on the nose Fedor. Fedor went limp and kept it from falling only Kotov, "Well, well, what do you immediately fall in mind? We''re just talking here, is not it?" By Fyodor jumped back with a run Shulga and kicked him in the kidneys, causing Theodore groaned and began to twitch in the hands Kotova. Kotov said angrily, "What hurts, what? So we just started talking." Suddenly Kotov easily picked Fedor zamli over and threw it on the pavement. Fedor fell with a thud and lay still on the ground. Shulga mocking sat around a broken face Fedor and spat in his face, "Ha, ha, let''s petushnem bychara!" Cats with perplexity at Shulga "You do Rams beguiled, pimples that I had stood up to this shit?" Shulga immediately retorted, "Well then obossym kid, I just want to pee." Redhead said, "Guys, do not mess arrange. Such questions people should decide." Shulga started bristle "And I? Not people?" Redhead grinned, "You syavka people thieves, not you. Can ask the White for this goat. He will decide how to punish him for his insolence. Zabem boom and they could decide what to do with it." Cats nodded "OK, and proceed accordingly." Fyodor lying on the pavement groaned and clutched his head. Auburn went up to him and said, "I hear you, kid. Tomorrow boom score. They look at how to punish you, and mind you, if you do not come, it will be worse." Shulga happily jumped to the fallen Theodore "Come on kid do not come without you decide to take you on the cheek, or will podmahivat ass." Kotov grimaced in disgust and said, "Come on guys drink beer. Enough already with this mess around by shit. <<$name>>, in short we in the park, if that." Cats and Auburn went to the side of the square, Shulga again kicked lying Fedor and disgusting giggling followed the boys.'

				act 'Leave':gt 'gorodok'
			end
		end

		exit
	end

	'Fedor is coming to you and gently hugs the waist.'

	act 'Kiss':
		cls
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
		'You kissed passionately with Fedor.'
		$ev_name = 'Fedor'
		$ev_name_a = 'Fedor'
		$ev_name_om = 'Fedor'
		dick = 17
		silavag = 0

		if gnpcSex[numnpc] = 0:
			!!sex was not
			placerand = rand(0, 2)

			if placerand = 0:place = 1 & $textEvent = ' "Let''s go for a walk through the square?"'
			if placerand = 1:place = 2 & $textEvent = ' "Let''s go to the movies?"'
			if placerand = 2:place = 3 & $textEvent = ' "Come to me, Vidic look."'
		end

		!!sex was
		if gnpcSex[numnpc] > 0:$textEvent = ' ""'

		'You kissed passionately with Fedor. Finally stopping kiss <<$ev_name>> said <<$textEvent>>'

		act 'Sorry, but I gotta go':gt 'gorodok'

		act 'Go with Fedor':
			cls
			gs 'stat'
			Frend_num = 1
			gt 'placer'
		end
	end
elseif GorSlut > 0:
	fedorKozlovQW = -1
	'Fyodor looks very evil "<<$name>>, I treat you with all my heart, and you okazyvatsya ordinary slut. Everything between us is nothing else and can not be!" Fedor turned and walked.'

	act 'Leave':gt 'gorodok'
end

--- FedorEv ---------------------------------
# strela
gs 'stat'
'You came to the car and were greeted by the bandits. Those nod your heads. You looked around and saw that cars worth about six strong guys, lean their gang leader named White, Kotov, Auburn, Shulga, and against all these companies need only one Fedor. White came to Fedor "I understand you and no one can say for you?" Fedor frowned and nodded. White said quietly, "Guys neponyatkah, come to me, outlined the situation. Girlfriend decided you discourage Kotova, it certainly nonsense, is themselves would decide among themselves. But you specifically rude kid, this is not in order. So I love you and I ask, do you agree that sending kids? " Fyodor muttered "Sent, but they started it!" White calmly explained, "You admitted that rude kid. And you guys had come together mind to reason, but you can see bad to learn. You have not realized their error. Now you realize it or not?" Fyodor grimly kinvul "Woke up." White said, "Well, good. You specifically rude kid, now you''ve realized it. During his rudeness need to pay with. Briefly, 30 pieces with you until tomorrow, if you do not bring it up tomorrow, a counter starts, and each day you will be missed must still in pieces. " Fedor pale "Why do I have that kind of money? I was just a schoolboy?" White shrugged "I think before it was necessary, before the start rude kid, and now pay." Fedor sovesem wilted and depressed paused Shulga jumped to him, "What, boys, let''s make him a discount, now suck me and ask him the favor, this rogue will still not be able to scrape together even cleaver, not that much thirty haymakers." White grinned and turned to the redhead, "Well, your sidekick and scumbag. But in principle, if the boys are not against such a decision, then I am too." Cat shrugged, "Do not care." Redhead grinned, "I also do not mind. Fyodor Well, 30 pieces, or at Shulga otsosesh now?" Fyodor pale and stepped back, "What do you mean? I''m not a fagot!" Shulga came to him and said sarcastically, "No one said you fagot. You offered to pay off the debt at once, over easy. Sosnesh now and you will not need anything, and refuse, then cook top thirty this evening, and then on the counter put, then your parents and sell the hut that would pay off your debt. Now you know in what situation are you? " Fedor broke down and cried, "Guys, do not! I do not have that kind of money, I did not know it would turn out that way!" The guys looked at Fedka indifferently. White said with disgust "Snot erase, and then look disgusted, decides to give you one minute." Shulga unbuttoned his pants, "Well, do not be dismayed, a couple of minutes and no debt." Fyodor openly began to waver. White grinned looking at fluctuations Fedor "Look those ka, and he was already staggering."'

act 'Look at what is happening':
	cls
	$npcText[5] = 'Fedka omitted in the schoolyard. His mouth fucked in Shulga. Now everyone calls only Fyodor Masha.'
	grupNPC[5] = 50
	grupTipe[5] = -1
	fedorKozlovQW = -10
	gs 'stat'
	'Fedor even stronger wept and knelt before Shulga. Member Shulga instantly cured and he buried his lips in his Fedor Fedor started to suck dick. Shulga zahihkil laughing hyenas "bite''ll knock your teeth! Waffles.". Hefty brother smiled at one another, "Well, Shulga, which arranged circus." Cats turned away in disgust. Redhead grinned and pulled out his cell phone "Zashkvarili kid, you must click on the memory." Finally Shulga choked groaned and began to cum in her mouth Fedor. "Swallow fag! Do not even think of dropping a drop!" Shulga took a member of his mouth and Fyodor Fyodor stepped wiping his mouth with his hand. "Well, that cocksucker How to call you now? Fyodor is a man''s name, and you are no longer a kid, you Shmarov. Will now Masha! And you can all be enjoyed at any time. And if you though that that fag vyaknesh, you fucked up. You''re not a man, you cocksucker! Well understood his place? " Fyodor nodded grimly, "Got it." Shulga lifted his leg and spent the dirty soles on the face Fedor "Statement shall speak in the feminine, okay?" Fyodor nodded wiping the mud from his face and muttered, "I knew." Shulga spat in the face of Fed "What''s your name Shmarov?" Fyodor replied "My name is Masha." White grinned and went to BMW, "Okay lads, let''s go, let the boys play more with his toy." Brother got in their cars and left. Shulga mocking Fyodor made him collect harchok face and lick it finally played enough Shulga left alone Fyodor and boys went to drink beer in the park.'

	act 'Leave':gt 'gorodok'
end

if money >= 30000:
	act 'Pay money for Fedor (30,000 rubles)':
		cls
		money -= 30000
		dom += 10
		gs 'stat'
		'You said "I''ll give him the money." White looked at you with narrowed eyes, "Why so?" You looked into his eyes and said "look disgusting." White sighed and said, "Well, that you take, you''re a woman and you do not understand a lot, but if you want me, then give me the money." Did you get the money and stretched White, who counted them and put it in his pocket, then turned to his bandits. "Okay guys, let''s go." The whole team got into the car and drove away. Kotov said angrily, "Okay guys, let''s go drink beer." Guys went to the side of the square. Fedor came up to you and mumbled "Thank you <<$name>>, you saved me, I will give money, do not worry, not once, in parts, but give up!"'

		act 'Leave':gt 'gorodok'
	end
end

--- strela ---------------------------------
# kotovSex
$din_kotov_bj = {
	act 'Take by mouth':
		cls
		minut += 5
		bj += 1
		bja += 1
		if npcSex[9] = 0:npcSex[9] = 1 & guy += 1
		bjrand = rand(0, 6)
		kotovBJtimes += 1

		if pirsA = 0:$textsexkotov = 'tongue caressed the head'
		if pirsA > 0:$textsexkotov = 'tongue caressed the head feeling the rod in your language moves from hitting the member'

		gs 'stat'
		'<center><img src="images/qwest/alter/ev/kotovBJ<<bjrand>>.jpg"></center>'
		'You stroked his crotch and Vic felt his cock began to rise. Vitek quickly pulled off his pants and lay down on the bed. You get comfortable between his legs and wrapped his lips to his standing member began to suck. You sucked hard cock to the throat filling the entire mouth, tongue caressed the head and took a member of the cheek. Soon Witek groaned "<<$name>>, I''m going to come!"'

		if kotovBJtimes > 5:
			act 'Continue to suck':
				cls
				minut += 5
				cumlip += 1
				bjrand = rand(0, 6)
				gs 'stat'
				'<center><img src="images/qwest/alter/ev/kotovBJcum.jpg"></center>'
				'You continued to suck and hot jet of sperm hit you in the mouth.'

				act 'Sucking swallowing sperm':
					cls
					minut += 5
					swallow += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/ev/cocksuck2.jpg"></center>'
					'You suck dick cum swallowing cum as soon as it hits your mouth. Witek finally stops to finish and takes his cock out of your mouth.'

					act 'Leave.':gt 'gorodok'
				end

				if kotovBJtimes > 10:
					act 'Suck holding sperm in your mouth':
						cls
						minut += 5
						gs 'stat'
						'<center><img src="images/qwest/alter/ev/kotovBJcum4.jpg"></center>'
						'You suck dick cum that fills your mouth with sperm. Witek finally stops to finish and takes his cock out of your mouth.'

						act 'Spit it out':
							cls
							minut += 5
							gs 'stat'
							'<center><img src="images/qwest/alter/ev/gop8.jpg"></center>'
							'You quickly went to the bathroom and spit the cum into the sink.'

							act 'Leave.':gt 'gorodok'
						end

						if kotovBJtimes > 12:
							act 'Swallow.':
								cls
								minut += 5
								swallow += 1
								vaf += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/ev/kotovBJcum5.jpg"></center>'
								'Once Witek gets dick out of your mouth, you gulp swallow cum, leaving a sharp aftertaste.'

								act 'Leave.':gt 'gorodok'
							end
						elseif kotovBJtimes > 15:
							act 'Play with sperm':
								cls
								minut += 5
								swallow += 1
								vaf += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/ev/kotovBJcum2.jpg"></center>'
								'Once Witek gets dick out of your mouth, you open your mouth in front of him and start playing with the sperm.'

								act 'Leave.':gt 'gorodok'
							end
						end
					end
				end
			end
		end

		act 'Remove the mouth':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/ev/kotovHJ.jpg"></center>'
			'You remove a member from his mouth and start stroking his hand.'

			if kotovBJtimes > 15:
				act 'Direct face':
					cls
					minut += 5
					cumface += 1
					facial += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/ev/kotovFacial.jpg"></center>'
					'You direct the member on his face and a hot jet of sperm hits you in the face. Then another and another jet. Your face is covered with flowing Vitek finished and cleans dick in his pants.'

					act 'Leave.':gt 'gorodok'
				end
			end

			act 'Cum in your hands':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/ev/kotovHJ2.jpg"></center>'
				'You pinch the ends member palms and into your hand starts to whip the sperm out of the penis.'

				act 'Leave.':gt 'gorodok'
			end
		end
	end
}

$din_kotov_anal = {
	act 'Substitute ass':
		cls
		minut += 30
		cumanus += 1
		anala += 1

		if npcSex[9] = 0:npcSex[9] = 1 & guy += 1

		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/anal.jpg"></center>'
		dynamic $sexstart
		dynamic $analsex

		act 'Leave.':gt 'gorodok'
	end
}

$din_kotov_sex = {
	act 'Lie on your back.':
		cls
		minut += 30
		sexa += 1
		kotovVagSex += 1

		if npcSex[9] = 0:npcSex[9] = 1 & guy += 1

		gs 'stat'
		'<center><img src="images/qwest/alter/Ev/sex.jpg"></center>'
		'You lay on your back. Witek lay on top and spread your legs.'
		dynamic $sexstart
		dynamic $sexstart2
		dynamic $sexcum

		act 'Leave.':gt 'gorodok'
	end
}

dick = 18
silavag = 2
$boy = 'Witek'
minut += 15
gs 'stat'
'<center><b><font color="maroon"><<$npcName[9]>> <<$npcSurName[9]>></font></b></center>'
! WD: Remove Dupe Images ~ '<center><img src="images/qwest/alter/npc9.jpg"></center>'
'<center><img src="images/qwest/alter/npc/9.jpg"></center>'
'Vitek began groping and kissing you. "In short <<$name>> off your clothes."'

if vagina = 0 and sex = 0:
		if SchoolAtestat = 0:
			act 'I''m still a girl.':
				cls
				minut += 5
				gs 'stat'
				'You said Victor, you''re still a girl. He scratched his head, "That''s an ambush, but still not graduated from school. Well then take on canine or popets. Cheek If you take, I''ll fuck, will not tell anyone that you took in your mouth."'
				dynamic $din_kotov_bj
				dynamic $din_kotov_anal
			end
		else
			act 'I''m still a girl.':
				cls
				minut += 5
				gs 'stat'
				'You said Victor, you''re still a girl. He grinned, "C''mon, garbage, you finished school, an adult now. Not well, of course you can take on canine or popets."'
				dynamic $din_kotov_bj
				dynamic $din_kotov_anal
				dynamic $din_kotov_sex
			end
		end
	else
		act 'Undress.':
			cls
			minut += 5
			gs 'stat'
			'You quickly threw off their clothes and Vitek also undressed.'
			dynamic $din_kotov_sex

			if dom > 0:dynamic $din_kotov_anal
			if KotovKnowPirsA = 1:dynamic $din_kotov_bj
		end
	end

	if pirsA = 1 and KotovKnowPirsA = 0:
		KotovKnowPirsA = 1
		'Vitek suddenly looked you in the face. "And what ''s that on your tongue?" You stuck out her tongue and showed post. Vitek grinned "heh, these_are, to suck dick better?" You frowned and called Victor vulgar. he grinned "Come <<$name>>, I will not tell anyone, if you take the cheek."'
end

--- kotovSex ---------------------------------
# BnameGen
bnrand = rand(0, 15)

if bnrand = 0:$bname = 'Sasha' & $bnamefull = 'Alexander'
if bnrand = 1:$bname = 'Lesch' & $bnamefull = 'Alexey'
if bnrand = 2:$bname = 'Kohl' & $bnamefull = 'Nicholas'
if bnrand = 3:$bname = 'Petya' & $bnamefull = 'Peter'
if bnrand = 4:$bname = 'Vasya' & $bnamefull = 'Basil'
if bnrand = 5:$bname = 'Gosh' & $bnamefull = 'Igor'
if bnrand = 6:$bname = 'Misha' & $bnamefull = 'Michael'
if bnrand = 7:$bname = 'Dan' & $bnamefull = 'Denis'
if bnrand = 8:$bname = 'Pasha' & $bnamefull = 'Paul'
if bnrand = 9:$bname = 'Gene' & $bnamefull = 'Gennady'
if bnrand = 10:$bname = 'Dimka' & $bnamefull = 'Dimitry'
if bnrand = 11:$bname = 'Slavik' & $bnamefull = 'Vyachesla'
if bnrand = 12:$bname = 'Acne' & $bnamefull = 'Vitali'
if bnrand = 13:$bname = 'Valera' & $bnamefull = 'Valery'
if bnrand = 14:$bname = 'Vanya' & $bnamefull = 'Ivan'
if bnrand = 15:$bname = 'Serge' & $bnamefull = 'Sergey'

:markodinname
bnrand = rand(0, 15)

if bnrand = 0:$bname2 = 'Sasha'
if bnrand = 1:$bname2 = 'Lesch'
if bnrand = 2:$bname2 = 'Kohl'
if bnrand = 3:$bname2 = 'Petya'
if bnrand = 4:$bname2 = 'Vasya'
if bnrand = 5:$bname2 = 'Gosh'
if bnrand = 6:$bname2 = 'Misha'
if bnrand = 7:$bname2 = 'Dan'
if bnrand = 8:$bname2 = 'Pasha'
if bnrand = 9:$bname2 = 'Gene'
if bnrand = 10:$bname2 = 'Dima'
if bnrand = 11:$bname2 = 'Slavik'
if bnrand = 12:$bname2 = 'Acne'
if bnrand = 13:$bname2 = 'Valera'
if bnrand = 14:$bname2 = 'Vanya'
if bnrand = 15:$bname2 = 'Serge'
if $bname = $bname2:jump 'markodinname'

:markodinnamesec
bnrand = rand(0, 15)

if bnrand = 0:$bname3 = 'Sasha'
if bnrand = 1:$bname3 = 'Lesch'
if bnrand = 2:$bname3 = 'Kohl'
if bnrand = 3:$bname3 = 'Petya'
if bnrand = 4:$bname3 = 'Vasya'
if bnrand = 5:$bname3 = 'Gosh'
if bnrand = 6:$bname3 = 'Misha'
if bnrand = 7:$bname3 = 'Dan'
if bnrand = 8:$bname3 = 'Pasha'
if bnrand = 9:$bname3 = 'Gene'
if bnrand = 10:$bname3 = 'Dima'
if bnrand = 11:$bname3 = 'Slavik'
if bnrand = 12:$bname3 = 'Acne'
if bnrand = 13:$bname3 = 'Valera'
if bnrand = 14:$bname3 = 'Vanya'
if bnrand = 15:$bname3 = 'Serge'

if $bname = $bname3 or $bname2 = $bname3:jump 'markodinnamesec'

raspredickrand = rand(0, 10)

if raspredickrand = 0:
	dick = rand(8, 13)
elseif raspredickrand = 10:
	dick = rand(18, 25)
else
	dick = rand(13, 17)
end

silavag = rand(0, 2)

--- BnameGen ---------------------------------
# boymass
boynum += 1
$bmNane[boynum] = $bname
$bmNaneFull[boynum] = $bnamefull
bmDick[boynum] = dick
bmSila[boynum] = silavag
bmTip[boynum] = bmtimeTipe
bmHJ[boynum] = 0
bmBJ[boynum] = 0
bmSEX[boynum] = 0
bmANAL[boynum] = 0
bmGANG[boynum] = 0
bmGossip[boynum] = 0
bmFrend[boynum] = 0
bmKISS[boynum] = 0
bmTITS[boynum] = 0

--- boymass ---------------------------------

# tboyopr
if boynumBlock = 0:Tboynum = boynum

if boynumBlock > 0:
	if bmHJ[Tboynum] > 0 or bmBJ[Tboynum] > 0 or bmSEX[Tboynum] > 0 or bmANAL[Tboynum] > 0:
		if bmTOTSEX[Tboynum] = 0:bmTOTSEX[Tboynum] = 1
	end

	$bname = $bmNane[Tboynum]
	dick = bmDick[Tboynum]
	silavag = bmSila[Tboynum]
end

--- tboyopr ---------------------------------

# barbershop
!!! Maruda Hair Mod
$pokraska = {
	clr
	cla
	money -= 750
	'You ask the barber, if he could dye your hair.'
	'"Sure.", he says.'
	'"Which colour would like to have your hair dyed in?"'

	if hcol ! 0:
		act 'Black':
			cla
			*clr
			'"Black", you say, "I want to have it as dark as possible, please."'
			'"Sure thing!", he says, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", he says and points your over to sit down on one of the seats.'

			act 'Sit down':
				cla
				*clr
				minut += 45
				hcol = 0
				'Not even an hour later everything seems to have dried up.'
				'He removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay him 750 rubles.'

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

	if hcol ! 1:
		act 'Brown':
			cla
			*clr
			'"I''d like to have my hair brown", you say.'
			'"Sure thing!", he answer in a happy tone, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", he says.'

			act 'Sit down':
				cla
				*clr
				minut += 45
				hcol = 1
				'45 minutes later, everything should be dried up.'
				'He removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay him 750 rubles.'

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

	if hcol ! 2:
		act 'Red':
			cla
			*clr
			'"Red is a colour I''d love to try out.", you say.'
			'"Sure thing!", he smiles, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", he says as he turns around one of the seats for you.'

			act 'Sit down':
				cla
				*clr
				minut += 45
				hcol = 2
				'45 minutes later, everything should be dried up.'
				'He removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay him 750 rubles.'

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

	if hcol ! 3:
		act 'Blonde':
			cla
			*clr
			'"I want to have my hair coloured blonde, please", you tell him.'
			'"As you wish, please have a seat.", he says and turns around one of the chairs for you.'

			act 'Sit down':
				cla
				*clr
				minut += 45
				hcol = 3
				'About an hour later, everything should be dried up.'
				'He removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay him 750 rubles.'

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

	gs 'stat'
}

$zavivka = {
	minut += 20
	curly += 10
	money -= 300
	'You have your hair curled'
	gs 'stat'
	gt 'barbershop', 'start'
}

$cuthair = {
	cla
	*clr
	money -= 500
	'You approach the barber and ask, "Hi, I would like to get my hair cut."'
	'"Of course, at which length do you want to have your hair at?", he asks you.'

	if hairlength > 10:
		act 'Very short':
			cla
			*clr
			'You sit down and say, "I want my hair to be very short."'
			'"Of course", he says with a friendly smile on her face, while leading you to a free seat.'

			act 'Sit down':
				cla
				*clr
				minut += 30
				hairlength = 10
				'About half an hour later he is done and what''s left from you former hairstyle is a very short buzzcut.'
				'You stand up and pay him at the counter.'

				act 'Stand up':gt 'barbershop', 'start'
			end
		end
	end

	if hairlength > 31:
		act 'Short, but not too short':
			cla
			*clr
			'"I''d like to have my hair cut short, but it shouldn''t get too short. I hope, you know what I mean.", you tell him, hoping he wouldn''t cut everything off.'
			'"I know what you mean, that''s not problem at all", he says, then he turns around one of the free seats and makes a gesture to you, to sit down.'

			act 'Sit down':
				if hairlength > 60:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", he tells you.'

					act 'Yes':
						cla
						*clr
						minut += 20
						hairlength = 31
						hbangs = 1
						hapri = 1
						'20 minutes later, he is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end

					act 'No':
						cla
						*clr
						minut += 20
						hairlength = 31
						hapri = 1
						'20 minutes later, he is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
						'You stand up and pay the barber at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end
				else
					cla
					*clr
					minut += 20
					hairlength = 31
					hapri = 1
					'20 minutes later, he is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
					'You stand up and pay him at the counter.'

					act 'Stand up':gt 'barbershop', 'start'
				end
			end
		end
	end

	if hairlength > 81:
		act 'About chin-line length':
			cla
			*clr
			'"Could you cut my hair back to between my chin and shoulder, please?", you ask him.'
			'"Sure, no problem", he tells you getting a chair for you ready.'

			act 'Sit down.':
				if hairlength > 90:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", he tells you.'

					act 'Yes':
						cla
						*clr
						minut += 20
						hairlength = 81
						hbangs = 1
						hapri = 1
						'20 minutes later, he is done cutting your hair. Your new hairstyle goes down to you chin-line and you have a fringe, covering your forehead.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 81
						hapri = 1
						'20 minutes later, he is done cutting your hair.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end
				else
					cla
					*clr
					minut += 20
					hairlength = 31
					hapri = 1
					'20 minutes later, he is done cutting your hair.'
					'You stand up and pay him at the counter.'

					act 'Stand up':gt 'barbershop', 'start'
				end
			end
		end
	end

	if hairlength > 161:
		act 'Shoulder Length':
			cla
			*clr
			'"I would like to have my hair cut back to about the height of my shoulder.", you tell him.'
			'"Sure, no problem", he tells you, gesturing you, to sit down into a free chair.'

			act 'Sit down':
				if hairlength > 170:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", he tells you.'

					act 'Yes':
						cla
						*clr
						minut += 20
						hairlength = 161
						hbangs = 1
						hapri = 1
						'20 minutes later, he is done cutting your hair. Your hair now goes just to your shoulders and you have a fringe, covering your forehead.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 161
						hapri = 1
						'30 minutes later, he is done cutting your hair. Your hair is now just slightly longer, than your shoulders.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end
				else
					cla
					*clr
					minut += 20
					hairlength = 161
					hapri = 1
					'20 minutes later, he is done cutting your hair. Your hair is now just slightly longer, than your shoulders.'
					'You stand up and pay him at the counter.'

					act 'Stand up':gt 'barbershop', 'start'
				end
			end
		end
	end

	if hairlength > 261:
		act 'About Brastrap length':
			cla
			*clr
			'"Could you cut my hair back to about where my bra-strap sits?", you ask him.'
			'"That''s absolutely no problem.", he says, when geasturing you sit down on one of the free seat'

			act 'Sit down.':
				if hairlength > 280:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", he tells you.'

					act 'Yes':
						cla
						*clr
						minut += 20
						hairlength = 261
						hbangs = 1
						hapri = 1
						'20 minutes later, he is done cutting your hair. He cut your hair back to about the height of where your bra sits, in addition he made you a fringe, which covers your forehead, as requested.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end

					act 'No':
						cla
						*clr
						minut += 20
						hairlength = 261
						hapri = 1
						'20 minutes later, he is done cutting your hair. She cut your hair back to about the line where your bra sits.'
						'You stand up and pay him at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end
				else
					cla
					*clr
					minut += 20
					hairlength = 261
					hapri = 1
					'20 minutes later, he is done cutting your hair. She cut your hair back to about the line where your bra sits.'
					'You stand up and pay him at the counter.'

					act 'Stand up':gt 'barbershop', 'start'
				end
			end
		end
	end

	if hairlength > 401:
		act 'Cut the tips':
			cla
			*clr
			'"I''d like to keep this length, but my tips might need some cutting. Could you do that?", you ask him. '
			'"Of course, please sit down.", he says.'

			act 'Sit down.':
				if hairlength > 401:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", he tells you.'

					act 'Yes':
						cla
						*clr
						minut += 20
						hairlength = 401
						hbangs = 1
						hapri = 1
						'20 minutes later, he is done cutting your hair. He just cuts the tips of your, barely making it any shorter and as requested, he cut you a nice fringe, which now covers your forehead.'
						'You stand up and pay the barber at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end

					act 'No':
						cla
						*clr
						minut += 20
						hairlength = 401
						hapri = 1
						'20 minutes later, he is done cutting your hair.'
						'You stand up and pay the barber at the counter.'

						act 'Stand up':gt 'barbershop', 'start'
					end
				else
					cla
					*clr
					minut += 20
					hairlength = 401
					hapri = 1
					'20 minutes later, he is done cutting your hair.'
					'You stand up and pay him at the counter.'

					act 'Stand up':gt 'barbershop', 'start'
				end
			end
		end
	end
}

if $ARGS[0] = 'start':
	gs 'stat'
	'<center><b><font color="maroon">The Barber Shop</font></b></center>'
	'<center>The only barber shop in the area. While he can''t do special hairstyles, he''s cheap and works fast.</center>'
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	Lcolor = rgb(106, 90, 205)
	''

	if money >= 500 and hairlength > 15:'<a href="exec:dynamic $cuthair">Cut your hair - 750 rubles</a>'
	if money < 500 and hairlength <= 15:'You don''t have enough money to get your hair properly cut. It costs 750 rubles but you only have <<money>>.'

	''

	if money >= 300 and hairlength > 80:'<a href="exec:dynamic $zavivka">Curl your hair - 500 rubles</a>'
	if money < 300:'You cannot afford curling your hair, as it costs 500 rubles, which you do not have at the moment.'
	if money >= 300 and hairlength <= 80:'Your hair is too short to be curled.'
	if hairlength <= 80:'Your hair is not long enough to be curled.'

	''

	if money >= 750:'<a href="exec:dynamic $pokraska">Dye your hair - 1.000 rubles</a>'
	if money < 750:'You cannot afford dyeing your hair, as you are missing the 1.000 rubles required for it.'

	''

	if hour =< 8 or hour >= 20:
		cls
		'The barber shop is closed at the moment, you should probably come back, when he''s in'

		act 'Leave':minut += 2 & gt 'gorodok'

		exit
	end

	act 'Leave':minut += 2 & gt 'gorodok'
end

if money >= 60:
	act 'Buy Scrunchies - 60 rubles':
		cls
		money -= 60
		hscrunch += 10
		'You pay the cashier and bought the small box.'

		act 'Move away':gt 'barbershop', 'start'
	end
end

if money >= 80:
	act 'Buy Hairaccessories - 80 rubles':
		cls
		money -= 80
		hpingrip += 10
		'You pay the cashier and bought the small box.'

		act 'Move away':gt 'barbershop', 'start'
	end
end
!!! Maruda Hair Mod

--- barbershop ---------------------------------
# sisterQW
if $ARGS[0] = 'sisboyQW_bedroom':
	if dom > 10:
		if sisboyQW = 3 or sisboyQW = 5 or sisboyQW = 7 or sisboyQW = 9:
			if horny >= 60 and sister >= 80 and sisboyQW = 3:
				cls
				minut += 5

				if horny < 90:
					horny += 10
				elseif horny >= 90 and horny < 95:
					horny += 5
				end

				if sisboyQW = 3:sisboyQW = 4

				blockBedrPar = 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_08.jpg"></center>'
				'You all the time and did not leave stimulating thoughts, how to spy on Anja and her boyfriend.'
				'And not finding the strength to overcome this temptation, you came to the door of your room and slowly touched the handle.'
				'She opened a crack, and your eyes had the explicit scenes.'
				'Anja sat on his knees in front of Roma, gently and sensually kissed his head, Roma and relaxed lying on his back, and gifts to sister compliments.'
				'You are very excited, but from the fear of being detected, closing the door.'

				act 'Leave':gt 'korrPar'
			elseif horny >= 60 and sister >= 80 and sisboyQW = 5:
				cls
				minut += 5

				if horny < 90:
					horny += 10
				elseif horny >= 90 and horny < 95:
					horny += 5
				end

				if sisboyQW = 5:sisboyQW = 6

				blockBedrPar = 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_08.jpg"></center>'
				'You all day were too excited and wanted to spy out again Anja and her boyfriend.'
				'The door opened a crack surprisingly easy, and you froze the seen pictures.'
				'Roma tightly clutching his hair sisters, hard-fucked her in the mouth.'
				'Anja kept hips Man, so as not to fall from the high-pressure, languidly moAnjang and sobbing.'

				act 'Leave':gt 'korrPar'
			elseif horny >= 60 and sister >= 80 and sisboyQW = 7:
				cls
				minut += 5
				horny = 85
				blockBedrPar = 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_11.jpg"></center>'
				'You liked to watch her sister and Roma again and you have decided this is not loiter and spy on them.'
				'The door was slightly ajar, they seem to have completely forgotten about the precautions, maybe Anja guessed and specifically does not close the door.?'
				'Anja relish sucking dick Roma, and passionately wild-eyed look at him, blowjob they just are not going to stop.'
				'You were so excited, but seen has brought you even more.'

				act 'Continue to watch':
					cls
					minut += 5
					horny = 90
					gs 'stat'

					'<center><img src="images/qwest/alter/sisterQW/sisboyQW_13.jpg"></center>'
					'You got curious and decided to overcome his strong excitation, to spy a little more.'
					'Roma wound roughly turned Anja, and bit his lips between her legs, Anja began to moan and squirm slightly.'
					'But the guy kept, strongly clenching ass sister, from time to time peeping at her from below.'
					'-How did it well, I''d like to be in her place, you think to yourself enjoying painting.'

					act 'Continue to watch':
						cls
						minut += 5
						horny = 95
						gs 'stat'

						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_14.jpg"></center>'
						'You completely absorbed happening, you keep your eyes on the bodies of two young excited your sister and her boyfriend.'
						'Roma looked up from his sweet sister pisechki, Anja with a slight regret looked at him and smiled.'
						'He smiled back at her, Anja turned on his tummy and abruptly entered, starting to move faster.'
						'Anja screamed, but then I remembered, that the house they are not alone, and barely holding back his cries of Anjamals, swayed and moved her ass to the beat movements Roma.'
						'-Yes, yes, fuck me pupsik, burst of languid lowing sister.'

						act 'Continue to watch':
							cls
							minut += 5
							horny = 99

							if sisboyQW = 7:sisboyQW = 8 & sisterLesb = 0

							gs 'stat'

							'<center><img src="images/qwest/alter/sisterQW/sisboyQW_15.jpg"></center>'
							'You have lost a clear mind and consciousness, and how to hypnotize continued to watch the passionate lovers.'
							'Now Romka launched on the back of your sister, Anja arranged the legs a little wider, and they continued coveted intercourse.'
							'The guy was moving faster and faster, starting to pant and moan muffled.'
							'Anja was all red and sweaty, relax lying under the Roma and caught the buzz.'
							'Here warned Roma, that will soon be over, and Anja screamed:'
							'-Not only inside Zaya,forgive not only inside, Roma and hastily pulled dick and instantly finished tummy sister.'

							act 'Fondle yourself':gt 'sisterQW', 'sisboyQW_caress'
						end

						act 'Fondle yourself':gt 'sisterQW', 'sisboyQW_caress'
						act 'Leave':gt 'korrPar'
					end

					act 'Fondle yourself':gt 'sisterQW', 'sisboyQW_caress'
					act 'Leave':gt 'korrPar'
				end

				act 'Fondle yourself':gt 'sisterQW', 'sisboyQW_caress'
				act 'Leave':gt 'korrPar'
			elseif horny >= 60 and sister >= 80 and sisboyQW = 9:
				cls
				minut += 5
				if horny < 90:
					horny += 10
				elseif horny >= 90 and horny < 95:
					horny += 5
					end
					blockBedrPar = 1
					gs 'stat'

					temp = rand(0, 4)

					if sisboyQWrand = 0:
						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_25.jpg"></center>'
						'Open the door, your ears pierced tight wild sounds of passion sisters and Roma.'
						'Anja bent, vypyachena his ass and gave it the power of Man, and Roma without delay, boldly and confidently tore ass Anja, tightly clenched buttocks.'
						'His movements were faster and faster, and their bodies swayed in unison, Anja screamed "..more, more".'
						'It seems they are so engrossed in each other, that you did not notice, so it''s time to quickly leave the hot couple.'
					elseif sisboyQWrand = 1:
						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_26.jpg"></center>'
						'Peering into the room, you saw, like your sister have a rude cancer.'
						'Roma almost to the point, suddenly froze for a moment, and fell on his back groaned sister.'
						'"..You what, again she finished inside?... moron, Get off of me, how many can speak..."'
						'It seems they need to talk, and you have time to run away, yet you have not noticed.'
					elseif sisboyQWrand = 2:
						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_27.jpg"></center>'
						'Only slightly pushing the door, you heard the sound smacked, Anja happy sucked in Roma.'
						'The guy lying relaxed, if fallen asleep, but most importantly in Roma sister woke up and continued to play with him.'
						'Anja so skillful with a member, that have greatly impressed, She can teach you a few lessons when-anything?'
						'A little carried away, you still go out of the door, not to be discovered.'
					elseif sisboyQWrand = 3:
						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_28.jpg"></center>'
						'Running up impatiently to the door, you had opened it quietly, from enjoying your sister sucking.'
						'Anja relish swallowing a member to the testicles and taking it out of his mouth, He sobbed heavily, plastered all around his saliva.'
						'She had a hard time making the throat blowjob, in tears and mascara potekshey, but Roma forced and pressed her hands on her head.'
						'Mischievous little sister suffered,  just to please her boyfriend.'
						'You want to watch until the end, but you need to run away until you have not noticed.'
					else
						'<center><img src="images/qwest/alter/sisterQW/sisboyQW_29.jpg"></center>'
						'The door was ajar, It seems the couple was too excited, to lock it.'
						'They lay on the bed and kissing passionately, huddled together hot bodies.'
						'Roma embracing sister Rear, slowly he walked into her pussy, not letting her lips,and gently stroked her clitoris.'
						'Anja wriggled his whole body, leAnjang to the hips and groin guy moAnjang faintly.'
						'At that moment you wanted to do - sister to be in place, but you were at the door and you have to run.'
					end

					act 'Caresses yourself':gt 'sisterQW', 'sisboyQW_caress'
					act 'Leave':gt 'korrPar'
			elseif horny >= 60 and sister < 80:
				cls
				minut += 2

				if horny <= 85:horny += 5

				blockBedrPar = 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_06.jpg"></center>'
				'Anja excited and disheveled opens the door:'
				'-Well, Sveta, you promised, Come walk a little more, we''re still not finished.'
				'She quickly shut the door and turned the key, you could only hear her giggle.'

				act 'Leave':gt 'korrPar'
			elseif horny < 60:
				cls
				minut += 1
				blockBedrPar = 1
				gs 'stat'

				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_06.jpg"></center>'
				'You wanted to go to my room, But remember this promise and sister decided not to bother her.'

				act 'Leave':gt 'korrPar'
			end
		end
	else
		cls
		minut += 1
		blockBedrPar = 1
		gs 'stat'

		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_06.jpg"></center>'
		'You wanted to go to my room, But remember this promise and sister decided not to bother her.'

		act 'Leave':gt 'korrPar'
	end
end

if $ARGS[0] = 'sisboyQW_caress':
	cls
	minut += 5
	horny = 0
	orgasm += 1
	gs 'stat'

	'<center><img src="images/qwest/alter/sisterQW/sisboyQW_12.jpg"></center>'
	'You can not hold back from the strong excitation turned and rested his back against the wall.'
	'Lowered her panties down and touched her wet finger glowing Picea.'
	'Licked his finger and began rhythmically caressing his swollen clit, and stroking his chest with the other hand, and enjoying this moment forgetting everything'
	'From everything that happens to you, you quickly ran right in front of the door, barely holding their moans.'

	act 'Leave':gt 'korrPar'
end

if $ARGS[0] = 'sisboyQW_expel':
	cls
	minut += 1
	gs 'stat'

	'<center><img src="images/qwest/alter/sisterQW/sisboyQW_07.jpg"></center>'
	'Sister remind you, they wanted with Roma spend time alone and asks you to leave the room.'

	act 'Leave':gt 'korrPar'
end


if $ARGS[0] = 'sisboytrioQW_bedroom' and $ARGS[1] = 'start':
	blockBedrPar = 1
	if minut > 30:
		cls
		minut += 1
		sister -= 10
		sisboytrioQW = 0
		sisboyday = 0
		sisThank = 0
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_38.jpg"></center>'
		'Sad Anja opens the door'
		'- You promised to come, what happened? Well maybe next time...'

		act 'Escape':gt 'korrPar'
		exit
	end

	sisboytrio += 1
	if sisboytrio = 1:
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_39.jpg"></center>'
		'You entered the room, sweet couple had tumbled into bed.'
		'Anja noticed you, Man freed from the embrace and walked slowly to you from kissing and undressing.'

		act 'Escape':
			cls
			sisboytrioQW = -1
			sisboytrioDayOtkaz = daystart + 3
			minut += 5
			sister = 0
			sisboyQW = 2
			sisThank = 0
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_40.jpg"></center>'
			'-Oh nafig, to hell with it'
			'At the last moment you decide to get away from these perverts.'

			act 'Escape':gt 'korrPar'
		end

		act 'Kiss':
			cls
			minut += 5
			horny += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_41.jpg"></center>'
			'You can easily succumb to temptation and kissed Anja back.'
			'Her hands wandered through your body, slowly warming up and undressing you.'
			'You were completely at the mercy sister enjoying caresses, and we have not noticed how turned out to be naked in front of Roma, completely forgetting about it.'
			'Anja told him to sit, and your faces found themselves in his pants Man.'

			act 'Suck':
				cls
				minut += 5
				horny += 5
				bj += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/sisboyQW_42.jpg"></center>'
				'You slowly began to drive up the language-down the trunk. And I feel like a novel almost trembling with excitement.'
				'If Anna did not keep a member of the hand, Roma would certainly drove him into your mouth for the most eggs, so much you have got it.'
				'Later, you have shared with her sister. I sucked it slowly and carefully. That member swallowing half, licking his tongue over the entire length. Roma lay baldel.'
				act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
				act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
			end

			act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
		end
	elseif sisboytrio = 2:
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_45.jpg"></center>'
		'You entered the room, sweet couple had tumbled into bed.'
		'This time there was no embarrassment grams. Your eyes are like-strangely sparkled. Anna slowly walked up to you and kissed passionately. And you told her a gentle kiss.'
		'Anja start to knead your breasts through clothes, then she took off her shoulders bra straps, and later her panties fell down, and you have nothing left.'

		act 'Suck':
			cls
			minut += 5
			horny += 5
			bj += 1
			cumlip += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_46.jpg"></center>'
			'Together with Anja you took up a little limp dick , and without further ado set to work.'
			'Again Roma lying, and you tell him aspirated. Anja sucked it notably. You did not even think, so that it can. As the saying goes, still waters...'
			'She is a member of swallowing almost completely, actively processing head tongue. You got me, if competing who better sucks.'
			'A few minutes later the novel was ready...'

			act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
			act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
		end

		act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
	elseif sisboytrio = 3:
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_49.jpg"></center>'
		'You entered the room, sweet couple had tumbled into bed.'
		'Anja saw you, but only waved, while continuing to caress. Quickly undressed, and excitement you were already impatient to join them.'

		act 'Suck':
			cls
			minut += 5
			horny += 5
			bj += 1
			cumlip += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_50.jpg"></center>'
			'Roma put both of you on your knees, Well, then what do you do not have to specify.'
			'You suck dick with passion, changing his beloved sister, sucking the head of the queue, licking the eggs.'
			'For a moment you forget about the penis and starts to kiss, and Roma enjoyed this painting but quickly slip into his unit back to you.'
			'Vai got tired of sitting on my knees and wanted more... '

			act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
			act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
		end

		act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
	elseif sisboytrio = 4:
		cls
		minut += 5
		horny += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_53.jpg"></center>'
		'You entered the room, sweet couple had tumbled into bed.'
		'Throwing Anna on the bed, Roma attacked violently kissing you and your sexy body lapaya. For a few moments, and you have not noticed how turned naked and strong institutions.'

		act 'Suck':
			cls
			minut += 5
			horny += 5
			bj += 1
			cumlip += 1
			throat += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_54.jpg"></center>'
			'Romka said, that loves deep throating, you realize you do not have to persuade needed.'
			'And in turn, you start to swallow a big dick, but you obviously get much worse than that of sister. She swallowing so, Already captures the spirit. At the same time with one hand caressed eggs, and the other stroked his stomach, bringing her boyfriend enormous pleasure.'
			'So you have got Man, he flushed was unable to have to endure...'

			act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
			act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
		end

		act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
	elseif sisboytrio = 5:
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_57.jpg"></center>'
		'You entered the room, sweet couple had tumbled into bed.'
		'On the go tearing off her clothes, You jumped to the couple on the bed'

		act 'Suck':
			cls
			minut += 5
			horny += 5
			bj += 1
			cumlip += 1
			throat += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/sisboyQW_58.jpg"></center>'
			'Do you like to suck the resilient, thick rod. His hard hat came into your mouth, and you tried very hard to do a good suction.'
			'Chupa Chups This promised to be a long-playing, and I did not want to finish. You thrust his hammer until the end, his lips fragrant hairy pubes.'
			'From it smelled fucking. By turns Anja you licking and biting her hat, playing with language bridle. Your tongues slid over the barrel to the testicles...'

			act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
			act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
		end

		act 'Sex':gt 'sisterQW', 'sisboytrioQW_bedroom', 'sex'
	end
end

if $ARGS[0] = 'sisboytrioQW_bedroom' and $ARGS[1] = 'sex':
	if sisboytrio = 1:
		cls
		minut += 5
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_43.jpg"></center>'
		'Anja took you to my boyfriend. All of you were taken aback as if in a state of.'
		'Anja ordered Roma: В«Work on it.В» And it helps you to sit on his face, so your pussy was in front of him.'
		'It is without hesitation began to lick her. Romijn Member bit Opal, so its a little Anja sucked, and as soon as he came into the firing state I sat on it.'
		'She slowly sank, not a member yet plunged into it fully. Her pussy was wet and narrow.'
		'Gradually increasing the pace, She skipped out on a limb, Roma and licking your pussy abundantly streamed.'
	elseif sisboytrio = 2:
		cls
		minut += 5
		horny += 10
		sex += 1
		vagina += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_47.jpg"></center>'
		'- Have you ever-anything to make each other cunnilingus? - I asked the man, rising. You just looked back and smiled playfully.'
		'Anja lay, and you sat on it. And they began to lick each other. After admiring you for half a minute Roma came to you.'
		'Your ass was exposed invitingly towards him, and he slowly entered my dick in your pussy.'
		'He drives the member on the entire length, sometimes he touched his tongue Anjan, that your clitoris and licked his balls. A few minutes later Roma felt, that the ends...'
	elseif sisboytrio = 3:
		cls
		minut += 5
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_51.jpg"></center>'
		'- I want new experiences - Anja waved a tube of cream you.'
		'Anja started up in earnest, and I decided to try in the ass. She got up on the bed on all fours, and you, brushing her anus cream, slowly began to introduce his finger into her ass.'
		'Anja a little twitched and moaned, but your finger is already easy entry, and you have entered a second. Anja moaned louder.'
		'A couple of minutes later the two fingers quietly placed in her ass. Not pulling your fingers from the anus sisters, second hand sent to a member of his mouth. Within minutes, the fighter was ready.'
		'You head smeared with cream, and Roma began to slowly go Anja hole. The head was part of a very tight. Anja cried, but the head has plunged into it.'
		'Roma began to move slowly-back, gradually increasing the pace. A few minutes later, she bent, moaned, and you feel, she cums...'
	elseif sisboytrio = 4:
		cls
		minut += 5
		horny += 10
		sex += 1
		vagina += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_55.jpg"></center>'
		'This time, Roma would only put you and your cancer, and Anna lay in front of you, legs wide apart. And unceremoniously drove the man in you a member of most tomatoes, I began to move violently inside your feverish pussy.'
		'Anja, meanwhile, pressed your pretty face to her Picea, and you barely catching his breath from the violent actions of Roma, again immersed in the sweet pussy sister. Trying to bring her pleasure, and she was lying and enjoy on your tongue and earnestly looked into the eyes of Roma, which was on the verge...'
	else
		cls
		minut += 5
		horny += 10
		vagina += 1
		sex += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_59.jpg"></center>'
		'You are so busy with Anna, that poor guy started to use as a sex toy.'
		'Anja sat pisey face Roma and skated on it, getting enormous pleasure. You sat with his back to him, completely subjugate member Romijn began jumping and shouting madly.'
		'Roma could only mumble limp and dull groan under two beauties while it is not the wave of happiness swept over...'
	end

	act 'Come':gt 'sisterQW', 'sisboytrioQW_bedroom', 'end'
end

if $ARGS[0] = 'sisboytrioQW_bedroom' and $ARGS[1] = 'end':
	if sisboytrio = 1:
		cls
		minut += 5
		horny = 0
		guy += 1
		cumface += 1
		orgasm += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_44.jpg"></center>'
		'All of you in earnest bred. Anja jump and move out on a limb faster and faster on the verge of orgasm.'
		'You closed your eyes slid pisey juice flowing across the face Roma, I am in seventh heaven.'
		'And suddenly you started to cum together, obkonchalsya poor guy, but he has not yet finished.'
		'Put your face close, and barely touching member, I poured out on you a hot jet.'
		'You blissfully lying with his sister kissing and enjoying the taste of sperm.'
	elseif sisboytrio = 2:
		cls
		minut += 5
		horny = 0
		cumface += 1
		orgasm += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_48.jpg"></center>'
		'You lay panting face to face. Roma fell in between you and began furiously nadrachivat your face.'
		'He soon finished, panting, ottryahival you the last drop.'
		'You were relaxed and kissed exchanging sweet nectar.'
	elseif sisboytrio = 3:
		cls
		minut += 5
		horny = 0
		cumface += 1
		cumlip += 1
		orgasm += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_52.jpg"></center>'
		'Put your face close, and barely touching member, I poured out on you a hot jet.'
		'You blissfully lying with his sister kissing and enjoying the taste of sperm. Roma lay on the bed, barely recovering, and you with a little rested Ana, We went into the shower.'
	elseif sisboytrio = 4:
		cls
		minut += 5
		horny = 0
		cumbelly += 1
		orgasm += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_56.jpg"></center>'
		'Roma barely manages to pull the penis out of your pussy and abruptly ends directly on it.'
		'Anja looks at him, puzzled:'
		'- What are you doing? Want, she flew to? Then we''ll marry her, not me.'
		'- Yes, everything is fine, I did not get into, - Roma protested breathlessly.'
		'And you were in ecstasy, and do not quite understand, that''s going around.'
	else
		cls
		minut += 5
		horny = 0
		cumface += 1
		cumlip += 1
		swallow += 1
		orgasm += 1
		gang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_60.jpg"></center>'
		'Seated in front of you, Anna picked up and became a member nadrachivat your mouth:'
		'- Suck bitch, All you want to swallow?'
		'The guy from such pressure for a long time could not resist and finished in your mouth, wincing and filling you. You do not have time to swallow all, stream flowed on the chin, and Anja all nadaivala yes last drop...'
	end

	act 'Leave':gt 'korrPar'
end


!! party stuff is all under sisboyQW_party as arg 0
if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'start':
	sisboyparty = 1
	if sisboypartyQW = 1:sisboypartyQW = 2

	cls
	minut += 15
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_8.jpg"></center>'
	'Once you burst into the house Rex, immediately joined the loud music.'
	'You with sex began to help the guys to lay the table, they carried the drinks, you snack, but the booze was so much, that the food was no where to put.'
	'Everyone started to thump in unison, dealing, laughing, telling funny stories...'
	'And you cheerful asked Anja:'
	'- You miss your sister Th, as well-ka fun, until devastate the glass, I will not leave you..'
	'Free cups was not, and she gave you a bottle of booze in hand.'

	act 'Drink':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_9.jpg"></center>'
		'You took the bottle out of the hands of Anja.'
		'- Well, walk so to walk in full, - throat and gulped with strong drink goryachitelny, the sound of laughter and the company.'
		'- Look, the woman is drinking more than you, - With these words, all began to drink Rex.'
		act 'Go Dancing':gt 'sisterQW', 'sisboyQW_party' ,'dance'
		act 'Drink':gt 'sisterQW', 'sisboyQW_party' ,'drink'
		act 'Sit':gt 'sisterQW', 'sisboyQW_party' ,'sit'
	end

	act 'Try to give up':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_9.jpg"></center>'
		'You have tried to give a friendly drink.'
		'But seeing is the choir began to cry: "Pei, Pei, Pei, Pei, Pei,Pei...."'
		'Realizing, that is a little ragoryachenaya company simply because you will not leave.'
		'You took the bottle out of the hands of Anja, throat and gulped with strong drink goryachitelny, the sound of laughter and the company.'
		act 'Go Dancing':gt 'sisterQW', 'sisboyQW_party' ,'dance'
		act 'Drink':gt 'sisterQW', 'sisboyQW_party' ,'drink'
		act 'Sit':gt 'sisterQW', 'sisboyQW_party' ,'sit'
	end

	act 'Get up to dance':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_9.jpg"></center>'
		'Getting up, you tried to go from table, to go dancing, but no one was there, all we sat and drank.'
		'Seeing, you want to stand up and leave the table, Rex stopped you:'
		'- Where are you, everything is just beginning, Keep the bottle, and let''s drink, otherwise I would be offended.'
		'You could not deny birthday, We took a bottle out of his hand,  throat and gulped with strong drink goryachitelny, the sound of laughter and the company.'
		act 'Go Dancing':gt 'sisterQW', 'sisboyQW_party' ,'dance'
		act 'Drink':gt 'sisterQW', 'sisboyQW_party' ,'drink'
		act 'Sit':gt 'sisterQW', 'sisboyQW_party' ,'sit'
	end
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'dance':
	cls
	minut += 15
	horny += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_10.jpg"></center>'
	'All drunk stripped to the waist and went into the hall to dance.'
	'You did not need to persuade, you were on the same wavelength with everyone and also undressed, stay in one bra.'
	'Boys and jumped besilis, even though you half-naked, but it seems not to have paid any attention.'
	'To you came Anja:'
	'- Sveta, Let''s have fun, - and you have got to the center of fun and dance vytvoryaya very tempting thing.'

	act 'Plump':
		cls
		minut += 10
		alko += 3
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_13.jpg"></center>'
		'Do you want to drink more and more, guys gave you quickly into the hands of two bottles viskarya and down you start to pour out all the.'
		'All your clothes were wet, and through a wet bra could be seen protruding nipples.'
		'Two guys around you mad, They began to dance around you, insistently lapaya your body.'

		act 'Dance with them':gt 'sisterQW', 'sisboyQW_party' ,'twoboys'
	end

	act 'Continue to dance':
		cls
		minut += 10
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_18.gif"></center>'
		'You''re drunk, but still able to control myself, you wanted to continue dancing.'
		'His erotic movements attracted the attention of many of you guys, and you approached by two.'

		act 'Dance with them':gt 'sisterQW', 'sisboyQW_party' ,'twoboys'
		act 'Search for Anja':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'start'
		act 'Congratulate Rex personally':gt 'sisterQW', 'sisboyQW_party' ,'rex'
	end

	act 'Congratulate Rex personally':gt 'sisterQW', 'sisboyQW_party' ,'rex'
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'drink':
	cls
	minut += 10
	alko += 2
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_11.jpg"></center>'
	'All drunk stripped to the waist and went into the hall to dance.'
	'- Come dance, Sveta, What are you left alone, there is fun.'
	'- Now Anja, Only mood I need to raise even higher, otherwise I would be bored.'
	act 'Go Dancing':gt 'sisterQW', 'sisboyQW_party' ,'dance'
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'sit':
	cls
	minut += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_12.jpg"></center>'
	'After you have drunk a little dizzy, and you prefer to sit slightly.'
	'Then you went with her friends Anja:'
	'- Sveta Che you here kisnesh, not on the same funeral, Ah yes, hang out together...'
	'From persuasion sister no rest, and you know, you better accept, otherwise it will not leave you alone.'
	act 'Go Dancing':gt 'sisterQW', 'sisboyQW_party' ,'dance'
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'rex':
	cls
	minut += 5
	alko += 1
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_19.jpg"></center>'
	'You came to the birthday, to congratulate, even though you are not familiar.'
	'It is on this evening was clearly all fun, and to your surprise it was still zinger.'
	'- Oh, hi, chikulya, You do this... damn it.. Oh yes, Anja''s sister, I know, I know... Even I have not seen, that you saw me today,, in shampusik, come on, Let''s drink to the dregs..'
	'With these words, you drank sweet champagne, but a drunken Rex pushed the bottle so much, I had to swallow in her mouth neck floor...'
	'Later, Rex left and where you are-the left...'

	act 'Search for Anja':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'start'

	act 'The toilet':
		cls
		minut += 5
		horny += 10
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_20.jpg"></center>'
		'It turned out the toilet open, and you then found Rex, coming from a booze.'
		'- Oh, Sveta, you again? I''ve already come out, Today, few went through Thu...'
		'Stopping him in midsentence, They pushed him to the toilet and sat down on top of him, glaring lips in a kiss.'
		'- Here''s my present for you and, - You utter a playful smile.'
		'- Hell, fucking..., - muttered Rex. In the meantime, you feel like you in the crotch rests excited reksik.'

		act 'Become cancer':
			cls
			minut += 5
			horny += 10
			sex += 1
			guy += 1
			reksSex = 1
			cumpussy += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_21.gif"></center>'
			'Rex told you to bend down, and abruptly drove into you a heated member.'
			'- Not so fast, not so deep, - We are begging you, but gradually the pain resolved, and you began to fidget on a limb and have fun.'
			'The guy at this point is not exactly thought, to meet you, faster and faster he finished member will drive you in the pussy.'
			'- Wow Sveta, You''re her sister''s hot, With these words he left..'
			'You also brought a little in order, and went...'

			act 'Search for Anja':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'start'
		end
	end
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'twoboys':
	cls
	minut += 10
	horny += 10
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_14.gif"></center>'
	'They paw your body, touch boobs, cuddle.'
	'Under the influence of alcohol you really liked it, and just enjoy the moment.'
	'Seeing, that you do not resist, they dragged you into the next room.'

	act 'Go':
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_15.jpg"></center>'
		'Entering the room you knocked on the bed,and dumped in the face of two terms of service.'
		'In a drunken haze, you try to grab something in one, then after another, but it dropped from the hands.'
		'One of the guys you licking pussy, and making sure, you all flows from the desire, put you in front of another cancer.'

		act 'Get cancer':
			cls
			minut += 5
			horny += 5
			gang += 1
			guy += 2
			bj += 1
			sex += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_16.jpg"></center>'
			'You put cancer, and began to fuck two trunk, impaling both front and rear.'
			'The guys were obviously pleased with talking and joking with each other:'
			'- And you said, that it is still small, Yes it your sister Ana odds to give.'
			'- Yes, you''re right, excellent young trick, not long ago I schoolgirls fucked, Hey, let''s change, a blowjob can not eat...'

			act 'Exchange':
				cls
				minut += 5
				horny += 5
				bj += 1
				sex += 1
				cumlip += 1
				cumface += 1
				swallow += 1
				cumass += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_17.jpg"></center>'
				'Boys swapped and continued to rhythmically fuck you.'
				'After a while fucked, You have come a little:'
				'- Oh yeah, I woke up bitch, Let''s suck harder fuck, it is quite sluggish..'
				'And they began to suck hard, while he did not finish you in the mouth, splashing his face. Second, too, without delay, I pulled out a dick and you finished in the ass.'
				'Having come a little, you wanted to find a sister.'

				act 'Search for Anja':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'start'
			end
		end
	end
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'searchforsister' and $ARGS[2] = 'start':
	cls
	minut += 5
	gs 'stat'
	'Are you looking for your sister, but you can not find. -Hell, Where is she zapropastilas?'
	'We need to look everywhere, I need to find her.'

	act 'In the kitchen':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'kitchen'
	act 'In the room':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'room'
	act 'In the toilet':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'toilet'
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'searchforsister' and $ARGS[2] = 'kitchen':
	cls
	minut += 5
	horny += 5
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_24.jpg"></center>'
	'Breaking into the kitchen, you look back and looking eyes sister. And notice how at the corner of Romka fun with two drunk chicks...'
	'But neither one of them you will not know his sister Anna... Suddenly you hear someone behind-the puffing...'

	act 'To turn':
		cls
		minut += 5
		horny += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_25.jpg"></center>'
		'Turning you found naked drinking Anja, for her eyes were visible tears.'
		'- Well Romka, I see we''re through, Wali to hell, dog. - Roma could not say anything in response.'
		'Anja ran away. Roma had a fight a few minutes, you rushed off his sister...'

		act 'For Anja':
			cls
			minut += 5
			horny += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_26.jpg"></center>'
			'Hardly having time for Anja, you have found it sitting on the lap in front of two unfamiliar guys.'
			'- What are you doing, stop, should not immediately rush to the winds.'
			'Drunk Anja will hardly-I perceive your words, continuing to suck.'
			'- She you, Come join, or wali fuck and do not bother us.'

			act 'Wait':
				cls
				minut += 10
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_26.jpg"></center>'
				'You have decided not to argue with the strong guys and wait.'
				'Boys turned Anja on her stomach, and began to fuck her in the two members.'
				'- Come to the point of its, still thumping, Th hell feel.'
				'And turns fucking her, until obkanchali point.'

				if hour < 22:
					hour = 22
					minut = 0
				else
					minut += 15
				end

				act 'Leave':gt 'bedrPar'
			end

			act 'Join':
				cls
				minut += 10
				horny += 10
				gang += 1
				sex += 1
				gay += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_27.jpg"></center>'
				'- Okay boys, I also want to, who I vyebet?'
				'Lively guys have dismantled, and the room was a wild orgy.'
				'- Oh yeah, have his personal whore much better, - satisfied, fuck you in all the cracks.'
				'Room service is boys and hardly gather my thoughts, you''re headed home.'

				if hour < 22:
					hour = 22
					minut = 0
				else
					minut += 15
				end

				act 'Leave':gt 'bedrPar'
			end
		end
	end
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'searchforsister' and $ARGS[2] = 'room':
	cls
	minut += 5
	horny += 5
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_23.jpg"></center>'
	'In the room you saw the two guys play two barrel poor unconscious girl.'
	'- Let''s fuck, until he woke up, I do not want to deal with her ex-boyfriend boxer.'

	act 'In the kitchen':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'kitchen'
	act 'In the toilet':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'toilet'
end

if $ARGS[0] = 'sisboyQW_party' and $ARGS[1] = 'searchforsister' and $ARGS[2] = 'toilet':
	cls
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_22.jpg"></center>'
	'Going to the toilet you have found the guys bring to life one of the girls.'
	'Peering, fortunately it was not for her'

	act 'In the kitchen':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'kitchen'
	act 'In the room':gt 'sisterQW', 'sisboyQW_party' ,'searchforsister', 'room'
end

--- sisterQW ---------------------------------
# annafrends
gs 'stat'

'Around the house drinking beer culture your sister Anja, Lena, Ira, Rex and Roman.'
temprand = rand(0, 4)

if temprand = 0:
	!!Anja
	'Anja outraged polutoralitrovogo grasping a bottle of beer "Guys! Well you pour beer today or not?"'

	if rand(0, 1) = 0:
		'Rex took poltorashku hands of Anja.'
		temprand = rand(0, 4)

		if temprand = 0:
			*nl
			'"And why not to shout! now pour!"'
			temprand = rand(0, 2)

			if temprand = 0:
				'Anja giggles "I have not yet started to yell, if I start, you oglohnesh."'
			elseif temprand = 1:
				'Lena resounding slaps on the shoulder Rex "Hurry! And with a jump of dog shit, with jumps!"'
			else
				'Ira smiling "not outraged, Reksik."'

				if rand(0, 10) = 0:'Anja sprinkles in cam "And then put him on a chain."'
			end
		elseif temprand = 1:
			*nl
			'"Well, you always like to be late for the train. Relax rolls. Now everything will be."'
			temprand = rand(0, 2)

			if temprand = 0:
				'Anja giggles, "I have not started to scream if I start, you oglohnesh."'
			elseif temprand = 1:
				'Lena resounding slaps on the shoulder Rex "Hurry! And with a jump of dog shit, with a jump!"'
			else
				'Roma giggles "Here and stinks. And if she rolls relax, we run the risk of suffocation!"'
				temprand = rand(0, 2)

				if temprand = 0:
					'Anja quips, "You''re so forever remain a virgin, Roma."'
					if rand(0, 10) = 0:
						'Roma grins "It was an offer?"'
						temprand = rand(0, 2)

						if temprand = 0:
							'Anja laughs "Dream on, saffron."'
						elseif temprand = 1:
							'Anja laughs "Only in your dreams, saffron."'
						else
							'Anja laughs "Yeah, schazz. Hear the tramp? Already ran to give."'
						end
					end
				elseif temprand = 1:
					'Anja quips "And you udivlyaeshsya that you girls do not give Roma."'

					if rand(0, 10) = 0:'Rex grins "Yeah, our eternal virgin Roma is able to enliven the conversation on the topic of anal gases."'
				else
					'Anja quips "It''s from you is the smell."'

					if rand(0, 10) = 0:'Roma grins "Yes, no, it sobachatiny bears."'
				end
			end
		elseif temprand = 2:
			*nl
			'"Che, unscrew the plug does not have a hand?"'
			temprand = rand(0, 2)

			if temprand = 0:
				'Anja giggles "And then what for you need?"'

				if rand(0, 10) = 0:'Rex with mock indignation "Around one operation."'
			elseif temprand = 1:
				'Lena resounding slaps on the shoulder Rex "You talk like a girl?"'

				if rand(0, 10) = 0:'Rex with mock indignation "In Russian, I speak with her."'
			else
				'Ira smiling "not outraged, Reksik."'

				if rand(0, 10) = 0:'Anja sprinkles in cam "And then on the chain to plant."'
			end
		elseif temprand = 3:
			*nl
			'"Let me be undermined, madam."'
			temprand = rand(0, 2)

			if temprand = 0:
				'Anja giggles "Cleared, monsieur."'
			elseif temprand = 1:
				'Anja with mock indignation says "Do not Madame and Mademoiselle!"'

				if rand(0, 10) = 0:'Rex bowing gallantly "Miles sorry mademoiselle."'
			else
				'Anja says impatiently "Pour already a clown."'
			end
		else
			*nl
			'"Shit! Where cups? Are we not buy them?"'
			temprand = rand(0, 2)

			if temprand = 0:
				'Anja takes cups "Here they are, blind monster."'
			elseif temprand = 1:
				'Roma says "Rex, you did them in the store took, all memory is that it is not?"'
			else
				'Lena enough cups "Rex, do not pull the rubber."'
			end
		end
	else
		'Roma took the bottle out of the hands polutoralitrovogo Anja and began to print. "Hold somebody cups."'
		temprand = rand(0, 2)

		if temprand = 0:
			'Rex took the cups and Roma began to pour beer on plastic glasses.'
		elseif temprand = 1:
			'Rex took the cups "That same armless horseradish. Itself can not what?"'
		else
			'Ira took cups "Pour already onion grief."'
		end

		if rand(0, 3) = 0:
			'Fracture of beer cups and flooded the ground.'
			temprand = rand(0, 2)

			if temprand = 0:
				'Rex was outraged. "That thou armless hell! Nothing can trust you!"'
			elseif temprand = 1:
				'Rex was outraged. "No, well, how not to spill it?"'
			else
				'Anja was indignant. "Always the same, if saffron pours, make sure you will pour."'
			end
		end
	end
elseif temprand = 1:
	!!Lena
	'Lena indignantly, "We came to drink beer or admire it?"'
elseif temprand = 2:
	!!Ira
	'Ira flirting eyes and flapping "Boys, and today we are going to drink beer?"'
elseif temprand = 3:
	!!Rex
	if rand(0, 1) = 0:
		'Rex took poltorashku beer and unscrew the plug.'
		if rand(0, 2) = 0:
			*nl
			'"Shit! Where cups? Are we not buy them?"'

			temprand = rand(0, 2)

			if temprand = 0:
				'Anja takes cups "Here they are, blind monster."'
			elseif temprand = 1:
				'Roma says "Rex, you did them in the store took, all memory is that it is not?"'
			else
				'Lena enough cups "Rex, do not pull the rubber."'
			end
		else
			*nl
			'"Roman, cups hold this while I pour."'
		end
	else
		'Rex took poltorashku beer and handed it to Roma. "Pour, then froze."'
		'Roma took polutoralitrovogo beer bottle and began to print. "Hold somebody cups."'
		temprand = rand(0, 2)

		if temprand = 0:
			'Rex took the cups and Roma began to pour beer on plastic glasses.'
		elseif temprand = 1:
			'Rex took the cups "That same armless horseradish. Itself can not what?"'
		else
			'Ira took cups "Pour already grief onion."'
		end

		if rand(0, 3) = 0:
			'Fracture of beer cups and flooded the land.'
			temprand3 = rand(0, 2)

			if temprand3 = 0:
				'Rex was outraged. "That thou armless hell! Nothing can trust you!"'
			elseif temprand3 = 1:
				'Rex was outraged. "No, well, how not to spill it?"'
			elseif temprand3 = 2:
				'Anja was indignant. "Always the same, if saffron pours, make sure you will pour."'
			end
		end
	end
else
	!!Roma Meynold
	'Roma took polutoralitrovogo beer bottle and began to print. "Hold somebody cups."'
	temprand = rand(0, 2)

	if temprand = 0:
		'Rex took the cups and Roma began to pour beer on plastic glasses.'
	elseif temprand = 1:
		'Rex took the cups "That same armless horseradish. Itself can not what?"'
	else
		'Ira took cups "Pour already onion grief."'
	end

	if rand(0, 3) = 0:
		'Fracture of beer cups and flooded the ground.'
		temprand = rand(0, 2)

		if temprand = 0:
			'Rex was outraged. "That thou armless hell! Nothing can trust you!"'
		elseif temprand = 1:
			'Rex was outraged. "No, well, how not to spill it?"'
		else
			'Anja was indignant. "Always the same, if saffron pours, make sure you will pour."'
		end
	end
end

'Finally turned into beer cups and you also gave a plastic cup with a cold beer. Are you drunk with all beer.'

if sisboyQW = 1:
	act 'Meet with a girl sister':
		cls
		minut += 5
		sisboyQW = 2
		gs 'stat'

		'<center><img src="images/qwest/alter/sisterQW/sisboyQW_02.jpg"></center>'
		'-Sveta, You really wanted to meet with my boyfriend, This is a novel, and this is my sister Sveta, So you met."'
		'-For acquaintance!!!" He shouted a drunken Rex, and you with all the company continued to drink beer the contrary, Man looking sister.'
		'Roma, red-haired skinny guy, and very pretty, sister how very lucky you thought.'

		act 'Continue to drink beer':gt 'annafrends2'
	end
end

act 'Continue to drink beer':gt 'annafrends2'

--- annafrends ---------------------------------
# annafrends2
gs 'stat'

'Poltorashka beer was quickly drained and the guys got a new bottle.'

if rand(0, 1) = 0:
	gennpc = rand(0, 2)

	if gennpc = 0:
		'Anja came to you. "<<$name>>, go to the toilet."'
	elseif gennpc = 1:
		'Lena came to you. "<<$name>>, you do not want the toilet?"'
	elseif gennpc = 2:
		'Ira came to you. "<<$name>>, you do not want to go some where?"'
	end

	act 'Go together':gt 'annafrendtoilet'
else
	'Boys went around the corner of the club, to empty their bladder, leaving the girls alone.'
end

act 'Leave':gt 'gdk'
if sisboyparty = 2 and sisboyparty_day + 1 = daystart and hour = 18:act 'Go to the party':gt 'sisterQW', 'sisboyQW_party', 'start'

--- annafrends2 ---------------------------------
# annafrendtoilet
cls
minut += 5
gs 'stat'

if gennpc = 0:$annafrendname = 'Anja' & $annafrendname2 = 'Anja'
if gennpc = 1:$annafrendname = 'Lena' & $annafrendname2 = 'Lena'
if gennpc = 2:$annafrendname = 'Ira' & $annafrendname2 = 'Ira'

'<center><img src="images/qwest/alter/Ev/piss.jpg"></center>'
'You went with <<$annafrendname>> in the bushes behind the club. <<$annafrendname2>> looked around, lifted her skirt, pulled down pantyhose and squatted. Between the legs of a flood of gushing jet on the ground.'

act 'Leave':gt 'gdk'
if sisboyparty = 2 and sisboyparty_day + 1 = daystart and hour = 18:act 'Go to the party':gt 'sisterQW', 'sisboyQW_party', 'start'

--- annafrendtoilet ---------------------------------
# danceGev
if lesbian > 0:
	horny += 10
elseif lesbian = 0:
	manna += 10
	wipo += 5
end

danceevtimes += 1
gs 'stat'

if danceevtimes < 5:dancegevtipe = rand(0, 2)
if danceevtimes >= 5:dancegevtipe = rand(0, 3)

'<center><img src="images/qwest/alter/ev2/ev<<dancegevtipe>>.jpg"></center>'

if dancegevtipe = 0:
	'Veronichka Mokhova doing stretching and finally sits down on the string.'
elseif dancegevtipe = 1:
	'Veronichka Mokhova doing a handstand.'
elseif dancegevtipe = 2:
	'Veronichka Mokhova warming up'
elseif dancegevtipe = 3:
	'Veronichka Mokhova doing the splits standing on hands, thus it without underpants.'
end

act 'Leave':gt 'gdksport'

--- danceGev ---------------------------------
# volAndGev
gs 'stat'

if andGevknow = 0:
	if vnesh < 15:
		'The guy that something vaguely probubnel, of the text you''ve seen only the word bow-legged cow.'
	else
		'The guy smiled looking at you.'
	end

	if dom > 0:
		act 'Swear Man':
			cls
			gs 'stat'
			'You cursed Man, for what he roughly pushed you.'

			if vnesh < 15:
				'What guy showed you fuck and smile.'
			else
				'To which the guy just shrugged.'
			end

			act 'Leave':gt 'gdksport'
		end
	end
end

!!if andGevknow > 0:!

act 'Leave':gt 'gdksport'

--- volAndGev ---------------------------------
# vokzalG
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Station</h4></center>'
'<center><img src="images/etogame/vokzal.jpg"></center>'
'Little quiet station. About <a href="exec:minut += 3 & gt ''vokzalGin''">Station</a> worth <a href="exec:minut += 5 & gt ''gkafe''">cafe</a>. Just outside the station is a small hotel, guesthouse, post office and police station.'
'On the forecourt placed small <a href="exec:minut += 1 & gt ''Grinok''">market</a>'
'Not great <a href="exec:minut += 1 & gt ''Gotel''">hotel</a> in which they live travel.'

if kidalob = 0:
	podrand = rand(0, 3)

	if money >= 5000 and hour >= 8 and hour <= 20 and podrand = 0 and monthKidalo ! month:
		cls
		monthKidalo = month
		gs 'stat'
		'<center><h4>Station</h4></center>'
		'<center><img src="images/etogame/vokzal.jpg"></center>'
		'You go to the train station and to the right for you girl with a microphone and a man with a camera. The girl turns to you "Hello. We TV. Now passes unprecedented action - show on the distribution of gifts. We have chosen you." Girl pulls beautifully wrapped box with a bow and gives you. "Here laptop last generation."'

		act 'Leave':minut += 15 & gt $curloc

		act 'Mark the box':
			cls
			gs 'stat'
			'<center><h4>Station</h4></center>'
			'<center><img src="images/etogame/vokzal.jpg"></center>'
			'You took the box and the man began to take you on camera. The girl held up a microphone and proposed to refer greetings relatives and friends. You are standing in front of the box with a heavy camera sends greetings and thanks for the gift handed. Man and woman took all invited you to pay VAT on the value of the gift. This is just what that 5t thousands.'

			act 'Pay Tax':
				cls
				money -= 5000
				kidalob = 1
				gs 'stat'
				'<center><h4>Station</h4></center>'
				'<center><img src="images/etogame/vokzal.jpg"></center>'
				'You gave the money and began to print a gift. When you manage to open the box, you see that there is a brick wrapped in newspaper. You look around in search of men and women, but they were gone.'

				act 'Leave':minut += 15 & gt $curloc
			end
		end

		exit
	elseif money >= 1000 and hour >= 8 and hour <= 20 and podrand = 0 and glamur > 0 and monthKidalo ! month:
		cls
		monthKidalo = month
		gs 'stat'
		'<center><h4>Station</h4></center>'
		'<center><img src="images/etogame/vokzal.jpg"></center>'
		'Walking along the station you notice how near the station are two men. They notice you come up to you and talking among themselves. "Well, just the model, well, just kind of ... Claudia Schiffer" One of the guys in a representative suit comes up to you and says. "We are opening a new store your city and we need a woman for advertising. We offer you 30 thousand for the photograph on advertising."'

		act 'Leave':minut += 15 & gt $curloc

		act 'Agree':
			cls
			gs 'stat'
			'You willingly agree to such a tempting offer. Boys took you to build the site near the railway station, one of the guys pulled out a camera and put it in front of a tree with bushes. "Shoot will on natural background. So picturesque. Only here''s the problem, your dress glare. You need to change." The guy pulled out of the car''s trunk, and gave you a dress. "Can change clothes in the car" guy showed you that Audi was not far away.'

			act 'Leave':minut += 15 & gt $curloc

			act 'To change':
				cls
				!! ths will either add the sundress or simply set it to a certain damage level
				sarafan[3] = 1
				sarafanH[3] = 20
				gs 'clothing', 'wear', 'sarafan', 3

				gs 'stat'
				'You got into the car and took off her dress. Then you put on her dress, which gave you a man.'

				act 'Pose':
					cls
					kidalob = 1
					gs 'stat'
					'You got out leaving their belongings in the car and went up to the tree. One of the guys stood behind the camera, the second bustles around you, showing you how to stand. The camera clicked. "So, now picture from the back, " You stood with his back to the camera and heard a voice. "Excellent. Tepr slightly raised his head and close your eyes." You have done the instructions but no schelcha camera followed. Instead, the engine suddenly earned machine.'

					act 'Turn out':
						cls
						money = 0
						gs 'stat'
						'You turned around and saw that no camera no. Both men sit in the audit, which began to move and tore through the streets. You frantically realized that her dress and the money you have left in the car. You threw as last lohushku.'

						act 'Leave':minut += 15 & gt $curloc
					end
				end
			end
		end
	exit

	end
end

gs 'family'

act 'Go to the town':minut += 15 & gt 'gorodok'
act 'Exit to the northern highway':minut += 15 & nroad = 20 & gt 'road'

--- vokzalG ---------------------------------
# Grinok
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Market</h4></center>'
'<center><img src="images/pic/Grinok.jpg"></center>'
'This small market is location near the station.'

act 'Go back to the station':minut += 3 & gt 'vokzalG'

if hour < 12 or hour > 18:
	'There is no one in the market.'
	if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
		act 'Wait for Arthur to arrive':hour = 12 & gt 'grinok'
	end
	exit
end

'In the market the sellers of goods are beckoning shoppers.'

act 'Wander through the market':
	cls
	minut += 15
	gs 'stat'

	'You are strolling through the market looking for good deals.'
	if arturKnow = 0:
		temp = rand(0, 6)
	else
		temp = rand(0, 5)
	end

	if temp = 0:
		tovpay = rand(3, 8) * 100
		'You see that cosmetics are for sale for <<tovpay>> rubles.'

		if money >= tovpay:
			act 'Buy':
				cls
				minut += 15
				money -= tovpay
				kosmetica += rand(10, 40)
				gs 'stat'
				gt $curloc
			end
		end
	elseif temp = 1:
		tovpay = rand(2, 5) * 100
		'You see vitamins for sale for <<tovpay>> rubles.'

		if money >= tovpay:
			act 'Buy':
				cls
				minut += 15
				vitamin += 20
				money -= tovpay
				gt $curloc
			end
		end
	elseif temp = 2:
		tovpay = rand(2, 8) * 10
		'You see a booth selling condoms for <<tovpay>> rubles.'

		if money >= tovpay:
			act 'Buy':
				cls
				minut += 15
				prezik += 5
				money -= tovpay
				gt $curloc
			end
		end
	elseif temp = 3:
		tovpay = rand(5, 10) * 100
		'There is lip balm for sale for <<tovpay>> rubles.'

		if money >= tovpay:
			act 'Buy':
				cls
				minut += 15
				lipbalm += 20
				money -= tovpay
				gt $curloc
			end
		end
	elseif temp = 4:
		tovpay = rand(1, 5) * 1000
		'You see someone selling a handbag for <<tovpay>> rubles.'

		if bag = 0:
			if money >= tovpay:
				act 'Buy':
					cls
					minut += 15
					bag = 1
					money -= tovpay
					gt $curloc
				end
			end
		else
			'But you already have a bag, so you move on.'
		end
	elseif temp = 5:
		if pornmarkonce = 0:pornmarkonce = 1
		'Strolling through the market you accidentally wander into the far corner where they sell porn.'

		act 'Go to the area with the porn':gt 'Gpornmark'
	else
		'Suddenly you hail "Hey devyushka, want tangerine skyushat?"'

		act 'Look':gt 'arturRinok', 'start'
	end

	act 'Move on':gt $curloc
end

if pornmarkonce = 1:
	act 'Go to the area with the porn':gt 'Gpornmark'
end

if arturKnow = 1 and arturQW = 0:
	act 'Go to Arthur':gt 'arturRinok', 'start'
elseif arturQW = 1 and (week = 6 or week = 7):
	if hour = 12 or hour = 13:
		act 'Go to Arthur':gt 'arturRinok', 'work_1'
	end
elseif arturQW = 2:
	if hour = 16 and minut <= 30:
		act 'Go to Arthur':gt 'arturRinok', 'work_2'
	elseif hour < 16:
		act 'Wait for Arthur to arrive':hour = 16 & minut = 0 & gt 'Grinok'
	end
end

act 'Go to the book tray':
	cls
	minut += 15
	gs 'stat'
	'On the counter is a very entertaining fantasy book, which costs only 150 rubles and more are women''s novels in paperback standing 300 rubles.'

	if money >= 150:
		act 'Buy fantasy book (150 rubles)':
			cls
			minut += 15
			money -= 150
			f_book += 1
			gs 'stat'
			'You bought the fantasy book for 150 rubles.'

			act 'Leave':gt $curloc
		end
	end

	if money >= 300:
		act 'Buy romance novel (300 rubles)':
			cls
			minut += 15
			money -= 300
			w_book += 1
			gs 'stat'
			'You bought a romance novel for 300 rubles.'

			act 'Leave':gt $curloc
		end
	end

	act 'Leave':gt $curloc
end

--- Grinok ---------------------------------
# Gpornmark
gs 'stat'
'On the tray on a variety of porn magazines. Near the tray turns salesman with shifty eyes.'

act 'Leave':gt 'Grinok'

if pornMagazine > 1:
	'You already have a magazine and once again hang around near the tray with a similar item you have no desire to.'
elseif pornMagazine = 1:
	'You read his magazine to the holes and it would be good to buy a new.'

	if money >= 500:
		act 'Buy':
			cls
			minut += 5
			money -= 500
			pornMagazine = 50
			TimesBuyPorno += 1
			gs 'stat'
			'You are trying not to look into the eyes of the seller counted the money and took the magazine quickly hid it.'

			act 'Leave':gt 'Grinok'
		end
	end
elseif pornMagazine = 0:
	'In the stunned look at magazines where sfotografirovanny half-naked girls, men with erect members ready and then how they can work together to engage in.'
end

if TimesBuyPorno = 0:
	'Sold with interest and looks at you expectantly.'

	act 'ask For Price':
		cls
		minut += 5
		manna /= 2
		gs 'stat'
		'Desperately blushing to the tips of hair you have come to the seller and broken voice asked him the price. Seller you smiled and said. All journals 500 rubles.'

		if money >= 500:
			act 'Buy':
				cls
				minut += 5
				money -= 500
				pornMagazine = 50
				TimesBuyPorno += 1
				gs 'stat'
				'You are trying not to look into the eyes of the seller counted the money and took the magazine quickly hid it.'

				act 'Leave':gt 'Grinok'
			end
		end

		act 'Leave':gt 'Grinok'
	end
elseif TimesBuyPorno > 0:
	'Seller is suitable to you "Looking to buy a magazine? Only 500 rubles.".'
end

--- Gpornmark ---------------------------------
# vokzalGin
$metka = $ARGS[0]
$loc = $CURLOC
clr
frost = 0
poezddalsled = 0
gs 'vokdin'
gs 'vokdinvera'
gs 'vokmantoiev'
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)


'<center><h4>Station</h4></center>'
'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
'In the center of the station waiting room and <a href="exec:dynamic $din_vokzalg_kassi">Case</a> with the scoreboard. In one wing are <a href="exec:dynamic $din_vokzalg_kabinet">offices bosses</a>, and in the other <a href="exec:minut += 1 & dynamic $din_vokzalg_toilet">Toilets</a>.'

if katalkinSexOnce = 1:'There is a small <a href="exec:minut += 5 & gt ''katalkin''">police</a> station inside the terminal.'

if podbros = 0:
	podrand = rand(0, 1)

	if money >= 1000 and hour >= 8 and hour <= 20 and podrand = 0:'Walking along the station you notice how a man falls thick <a href="exec:dynamic $din_vokzalg_podbros">purse</a>.'
end

act 'Leave':minut += 3 & gt 'vokzalG'

if vokzalVork >= 1:
	if cleZalDay ! day:
		act 'Mopping the floor in the waiting room':
			cls
			cleZalDay = day
			minut += 60
			sweat += 1

			if vital < 15:vital += rand(0, 1)
			if stren < 15:stren += rand(0, 1)

			gs 'stat'
			'<center><img src="images/etogame/clener1.jpg"></center>'
			'You took inventory, poured water into a bucket and began to wash the floor in the waiting room.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end

	if cleMTDay ! day:
		act 'Mopping the floor in the men''s room':
			cls
			cleMTDay = day
			minut += 30
			sweat += 1

			if vital < 15:vital += rand(0, 1)
			if stren < 15:stren += rand(0, 1)

			gs 'stat'
			'<center><img src="images/etogame/clener1.jpg"></center>'
			'You took inventory, poured water into a bucket and went to the men''s room.'
			dynamic $d_vok_man_toilet_event
			!!'You began to wash the floor in the men''s room, and then began to scrub toilets.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end

	if cleWTDay ! day:
		act 'Mopping the floor in the women''s restroom':
			cls
			cleWTDay = day
			minut += 30
			sweat += 1

			if vital < 15:vital += rand(0, 1)
			if stren < 15:stren += rand(0, 1)

			gs 'stat'
			'<center><img src="images/etogame/clener1.jpg"></center>'
			'You took inventory, poured water into a bucket and began to wash the floor in the ladies'' room, and then began to scour bowls.'
			dynamic $d_vokzal_vera_talk

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end

	if cleMTDay = day and cleWTDay = day and cleZalDay = day and cleZarplatDay ! day:
		act 'Get salary':
			cls
			cleZarplatDay = day
			vokzalVork += 1
			money += 250
			minut += 3
			gs 'stat'
			'You went to the cashier and got their money.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end
end

if hour = 11 and minut = 0:
	poezddalsled = 1
	'The platform comes long-distance trains.'
elseif hour = 11 and minut > 0 and minut < 30:
	poezddalsled = 1
	'At the platform stands distance trains.'
elseif hour = 11 and minut = 30:
	poezddalsled = 1
	'Platform serving long-distance trains.'
elseif hour = 18 and minut = 0:
	poezddalsled = 1
	'The platform comes long-distance trains.'
elseif hour = 18 and minut > 0 and minut < 30:
	poezddalsled = 1
	'At the platform stands distance trains.'
elseif hour = 18 and minut = 30:
	poezddalsled = 1
	'Platform serving long-distance trains.'
end

if poezddalsled = 1:
	'Platform fussy run hucksters vtyuhivat their goods train passengers. On the part of all this fuss watches Police.'

	if tovarL > 0:
		act 'Vtyuhivat their goods passengers.':gt 'vokzaltorg'
	end
end

--- vokzalGin ---------------------------------
# vokdin
$din_vokzalg_kassi = {
	cls
	gs 'stat'
	'<center><h4>Cashier</h4></center>'
	'<center><img src="images/qwest/alter/kassa.jpg"></center>'
	'A ticket to the city costs 200 rubles.
	Long-distance trains are in 11:00-11:30 and 18:00-18:30'

	if money >= 200:
		act 'Buy a ticket to the Center (200 rubles)':
			cls
			money -= 200
			minut += 15
			gs 'stat'
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/electri.jpg"></center>'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'
			'After 15 minutes the train stopped at the station.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				! WD: Remove Dupe Images ~ '<center><img src="images/pic/electri.jpg"></center>'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped at the station.'

				act 'To go further':
					cls
					minut += 15
					gs 'stat'
					! WD: Remove Dupe Images ~ '<center><img src="images/pic/electri.jpg"></center>'
					'<center><img src="images/etogame/electri.jpg"></center>'
					'After 15 minutes the train stopped at the station.'

					act 'To go further':
						cls
						minut += 15
						gs 'stat'
						! WD: Remove Dupe Images ~ '<center><img src="images/pic/electri.jpg"></center>'
						'<center><img src="images/etogame/electri.jpg"></center>'
						'After 15 minutes the train stopped at the Centre.'

						act 'Leave':minut += 5 & nroad = 0 & gt 'Vokzal'
					end

					act 'Leave':minut += 5 & nroad = 5 & gt 'road'
				end

				act 'Leave':minut += 5 & nroad = 10 & gt 'road'
			end

			act 'Leave':minut += 5 & nroad = 15 & gt 'road'
		end
	end

	act 'Get away from banks':minut += 1 & gt 'vokzalGin'
}

$din_vokzalg_kabinet = {
	cls
	gs 'stat'
	'You came to the office of chief of station. About cabinet hanging ad "Wanted lady. 2 hours of work at any time, the salary of 50 rubles a day."'

	act 'Leave':minut += 1 & gt 'vokzalGin'

	if hour >= 8 and hour <= 16:
		act 'Login to Account':
			cls
			gs 'stat'
			'You knocked on the door and entered the office of the chief. Elderly man distracted from scribbling and looked at you "On what issue?"'

			act 'Leave':minut += 1 & gt 'vokzalGin'

			if vokzalVork = 0:
				act 'Arranged a cleaner':
					cls
					vokzalVork = 1
					minut += 15
					gs 'stat'
					'You said that you would like to apply cleaner. Chief of station delighted obviously that nobody wants to work for such meager wages. He recorded your data and explained. You''ll have to wash the floors at the station and clean toilets. How to do it, so get 50 rubles. If something does not have time, you will not receive anything. Then you came out of his office and he showed pantry that stores inventory.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		end
	end
}

$din_vokzalg_toilet_deyst = {
	if hapri = 0:
		act 'Comb your hair (0:03)':
			cla
			minut += 3
			hapri = 1

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end

	if mop = 1 and kosmetica > 0:
		act 'Apply makeup':
			cla
			*clr
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/mop.jpg"></center>'
			'<center><img src="images/etogame/mop.jpg"></center>'

			act 'Light makeup (0:03)':
				cla
				minut += 3
				kosmetica -= 1
				mop = 2
				'You lightly summed eyes and a little lipstick.'

				if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
				if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
			end

			if kosmetica >= 2:
				act 'Normal makeup (0:05)':
					cla
					minut += 5
					kosmetica -= 2
					mop = 3
					'You lipstick, summed up the eyes and eyelids.'

					if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
					if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
				end
			end

			if kosmetica >= 3:
				act 'Challenging makeup (0:10)':
					cla
					minut += 10
					kosmetica -= 3
					vidageday -= 1
					mop = 4
					'You densely nakrasili eyes, imposed shadows and mascara , nakrasili lip contour pencil and lipstick.'

					if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
					if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
				end
			end
		end
	end

	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/facesp.jpg"></center>'
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end

	if cumfrot > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumfrot = 0
			minut += 10
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/frotsp.jpg"></center>'
			'<center><img src="images/etogame/frotsp.jpg"></center>'
			'You remove traces of cum from your clothes.'

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end
	!!

	if tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut =+ 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use a tampon.'

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end

	if horny >= 90:
		act 'Masturbate':
			cls
			orgasm += 1
			mastr += 1
			horny = 0
			gs 'stat'
			'<center><img src="images/qwest/alter/Ev/mastr.jpg"></center>'
			'You closed booth, removed the pants and sat on the toilet.'
			'Your fingers began to caress expiring pussy juice and you started to rub your clit.'
			'Soon pleasant wave began to spread throughout the body and you covered a very powerful orgasm.'

			if vokzalToilet = 1:act 'Finish':dynamic $din_vokzalg_toilet_f
			if vokzalToilet = 2:act 'Finish':dynamic $din_vokzalg_toilet_m
		end
	end
}

$din_vokzalg_toilet_f = {
	cls
	vokzalToilet = 1
	gs 'stat'
	'<center><h4>The ladies'' room</h4></center>'
	! WD: Remove Dupe Images ~ '<center><img src="images/pic/PublicToilet.jpg"></center>'
	'<center><img src="images/etogame/PublicToilet.jpg"></center>'
	'You opened the door to the ladies'' room and went in.'

	act 'Leave':minut += 1 & dynamic $din_vokzalg_toilet

	dynamic $din_vokzalg_toilet_deyst
}

$din_vokzalg_toilet_m = {
	cls
	vokzalToilet = 2
	gs 'stat'
	'<center><h4>The men''s room</h4></center>'
	! WD: Remove Dupe Images ~ '<center><img src="images/pic/PublicToilet.jpg"></center>'
	'<center><img src="images/etogame/PublicToilet.jpg"></center>'
	'You opened the door to the men''s room and went in.'

	if cloth_vid = 1:
		act 'Stand and wait adventures':gt 'vokBimbo', 'pos1'
		act 'Go to the booth':gt 'vokBimbo', 'pos5'
	end
	act 'Leave':minut += 1 & dynamic $din_vokzalg_toilet

	dynamic $din_vokzalg_toilet_deyst
}

$din_vokzalg_toilet = {
	cls
	vokzalToilet = 0
	gs 'stat'

	'<center><h4>Station</h4></center>'
	'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
	'You are logged into the wing where the station to be <a href="exec:minut += 1 & dynamic $din_vokzalg_toilet_f">women''s</a> and <a href="exec:minut += 1 & dynamic $din_vokzalg_toilet_m">men''s</a> wc.'

	act 'Leave':minut += 1 & gt 'vokzalGin'
}

$din_vokazalg_podbros2 = {
	cls
	gs 'stat'
	'You showed your money man and he said that this was the sum and not enough in his wallet. The man demanded that you returned the money.'

	act 'Money back':
		cls
		money = 0
		podbros = 1
		gs 'stat'
		'<center><h4>Station</h4></center>'
		'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
		'You gave the man his money, that would not contrive a scandal and not to be attracted by the police for theft.'

		act 'Leave':minut += 1 & gt 'vokzalGin'
	end
}

$din_vokzalg_podbros = {
	cls
	gs 'stat'
	'<center><h4>Station</h4></center>'
	'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
	'You cant raise the purse and then some sort of slim girl leans to the purse. You are catching the first to raise the purse and she offers to step aside and share the money.'

	act 'Go with a purse':
		cls
		gs 'stat'
		'<center><h4>Station</h4></center>'
		'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
		'You went to one side with a girl and got a purse that would share the money. You divided the money on a flat and gave half girl, thrusting the remaining money in your pocket. At this point, a man came up to you, lost wallet. He took the wallet out of your hands. He counted the money and said that the purse is not enough large sum of money. Then he asked, what would you show him your money.'

		act 'Show money':dynamic $din_vokazalg_podbros2
	end

	act 'Giving purse and go':minut += 1 & gt 'vokzalGin'

	act 'Step aside and share the money':
		cls
		gs 'stat'
		'<center><h4>Station</h4></center>'
		'<center><img src="images/qwest/alter/vokzal.jpg"></center>'
		'You walked away, together with the girl and got the purse, that would divide the money. You divided the money on a flat and give half to the girl, having put the remaining money in your pocket. At this point, lost wallet. He took the wallet out of your hands. He counted the money and said, that in your wallet is not enough large sum of money. Then he demanded, what would you show him your money.'

		act 'Show money':dynamic $din_vokazalg_podbros2
	end
}

--- vokdin ---------------------------------
# vokdinvera
$d_vokzal_vera_talk = {
	verarand = rand(0, 1)

	if verakassir = 3 and hour >= 8 and hour <= 20 and verarand = 0:
		'Near the window woman smokes in which you will learn cashier Faith.'

		act 'Chat with the cashier':
			cls
			!verakassir = 3
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'

			if verafrend > 0:
				verafrend += 1
				'You have come to faith and greeted her. Gradually.'
				veratalkrand = rand(0, 3)

				if veratalkrand = 0:
					'Suddenly your conversation smoothly flowing in no great controversy.'

					act 'To prove his innocence':
						cls
						dom += 1
						minut += 5
						verafrend -= 1
						gs 'stat'
						'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
						'You rushed to prove his innocence and Faith in a few minutes Vera waved, "Oh. How do you say."'

						act 'Leave':minut += 1 & gt 'vokzalGin'
					end

					act 'Agree with Vera':
						cls
						sub += 1
						minut += 5
						verafrend += 1
						gs 'stat'
						'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
						'You have decided not to argue with faith and agree with it.'

						act 'Leave':minut += 1 & gt 'vokzalGin'
					end

					exit
				end

				if verafrend >= 40:
					if veratalkrand = 1:
						horny += 10
						'Faith today that it sold out and began to tell about their guys, that were with her husband to.'

						if verafrend >= 50:
							act 'Interesovatsya details':
								cls
								minut += 5
								horny += 10
								gs 'stat'

								if veraendtalker = 1:
									veraboyrand += 1
									if veraboyrand >= 9:veraendtalker = 2
								elseif veraendtalker = 0:
									veraendtalker = 1
									veraboyrand = 0
								elseif veraendtalker = 2:
									veraboyrand = rand(0, 8)
								end

								if veraboyrand = 0:
									'<center><img src="images/qwest/vokzal/bvtalk0.jpg"></center>'
									'faith tells "The first time I was with an adult man, when I was 14 year_old. I''m born in the village, she know, on one side of the village pernesh, to hear the other, so I did not meet with the local guys. So one day in the village came one adult man, an expensive car, himself all of this yourself, in white pants. We met, he invited me to his, drink martinis. I''m a fool ears hung and went to him. He really made ​​me drunken martini. Not that I would have drunk, In those days I could calmly drink grams 300 moonshine, but then softened. In general, after which it is separated Me, began to lick his chest. It was just a fucking nice. And then suddenly bam! He sticks in my own process. It hurt, certainly bearable, but for girls who did not even really knew nothing about sex it was just a shock. I lie under what is a man, with her legs spread, he sweats and romping on me, between the legs dull, throbbing pain. Then he pulls out his hell out of me and cums on my stomach. And here I lay naked, smeared in his smelly mucus, from the blood of tortured pussy, and he says to me that I log. Well. I is the beam and failed to meet his majesty. This stupid kid did not even realize, that he had just robbed me of my innocence. In_short, I sent him to the dick and more with him not met. Well at least no one would know about it in the village of my adventure. It was terrible just to horror, was feeling after deprivation of virginity, that everything is up to date. I was hiding from people a month and did not go for a walk, I was so ashamed."'

									act 'Leave':minut += 1 & gt 'vokzalGin'
								elseif veraboyrand = 1:
									'<center><img src="images/qwest/vokzal/bvtalk1.jpg"></center>'
									'faith tells "After his first experience and I look at the guys did not want to. but 17 years. I even managed to go to college. There I met with Oleg undergraduate, all such inflated guy, just like Schwarzenegger. athlete, Master of Sports in cycling. Here I can not imagine how he was able to afford a bicycle frame pump. He invited me in a cafe, we were there having fun and drinking. Oleg suggested to go to him. Well, that he should, but as it is not believed, before that can be reached. In general, we went to him. There''s still drank champagne, started kissing. He stroked my chest and it was very nice. I myself did not understand what I was doing put her hand on his pants, stroking his cock, Then he took his first time in my life took in his mouth. I sat on his haunches, sucked his cock and caressed herself between her legs. And you know what? I was first in my life felt so good, I began to not care at all. The guy was good, I was also good, what else does it?"'

									act 'And what happened next?':
										cls
										minut += 5
										horny += 10
										gs 'stat'
										'<center><img src="images/qwest/vokzal/bvtalk11.jpg"></center>'
										'Vera continued "Oleg turned me and I leaned, He pulled off my skirt and panties and entered me. Unlike my first time it was fucking, I squealed with delight fingering ass on his cock. And here I was covered! It was such an orgasm, which I have never in my life have been, I almost fainted. When the ability to think back to me, Oleg had finished and my ass was covered with his sperm. I went on padded feet to wash. He carried me to the hostel and all. More we had not met. I tried to stick to it, but he just waved me. Other devchenok I learned, that he began to consider me whore. Allegedly went ebatsya Man, which for the first time in my life met, suck it, and then cums on his cock."'

										act 'You''re really the one to blame':
											cls
											dom += 1
											minut += 5
											verafrend -= 1
											gs 'stat'
											'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
											'You said that the Faith itself to blame, Faith on that a little testily replied "Though I do not know. She jumped on a guy dick, That ogrebla."'

											act 'Leave':minut += 1 & gt 'vokzalGin'
										end

										act 'Yes':
											cls
											sub += 1
											minut += 5
											verafrend += 1
											gs 'stat'
											'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
											'You cheered Faith saying that this kid just Oleg. She sighed sadly "Well yes, goatskins still the."'

											act 'Leave':minut += 1 & gt 'vokzalGin'
										end
									end
								elseif veraboyrand = 2:
									'<center><img src="images/qwest/vokzal/bvtalk2.jpg"></center>'
									'faith tells "After I met Oleg Lehoy. Cool guy Laban guitar. Also lived in the dorm. We were not just met, walked together. He is not particularly insisted on having sex and not much molested me. Over time. Vyzhrat two boxes screwdriver. And it was all over the bed. No , and he did not even fucked me, He fought me like a cat. I just whined nails clutching the sheet. It was a strange sensation, pain and pleasure , that I simply enjoyed as a piece of meat, spit on me, but I like it. This bastard finished right at me and began to snore on my back. I barely managed to vybratsya from under his carcass. I got dressed and left a grudge against him."'

									act 'You might like this?':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "You might like this?", Faith on that a little testily replied "Well yes. I know that was his only hole, but I do not know why I have a factory."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'Yes':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying that this kid just Lech. She sighed sadly "Well yes, goatskins still the. Took advantage of a defenseless girl."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 3:
									'<center><img src="images/qwest/vokzal/bvtalk3.jpg"></center>'
									'faith tells "I have long ignored Lech, although he molested me and here met another guy in the club. uh, I do not remember his name, I met him for the first time in my life and the last. I got drunk trying to forget Lech, but he did not go out of my head. And then turned up pretty guy. He molested me and paw . He suggested that I go with him to the toilet. I''ve wanted to call him in the face, and then I thought, a proper feature? Why not? So I went with him to the toilet and sucked him, while caressing her pussy. When he began to cum in my mouth, I covered the orgasm itself. It was nice, he had gone out of the booth, I was still sitting on the floor with his face smeared semen and depart from orgasm. Then of course was ashamed of his behavior, but what really. What do you think, I entered as a slut?"'

									act 'Of_Course! You also vaflersha!':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "Of_Course! You''re not just a slut and you still vaflersha!", Faith on that a little testily replied "Well! I even finish from this, if more and caresses herself. What is wrong?"'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'Come on, you''re just having fun':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith said that she just had fun. She smiled at you "Well. Well, I even finish from this, if caresses herself. Nothing is wrong with that."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 4:
									'<center><img src="images/qwest/vokzal/bvtalk4.jpg"></center>'
									'faith tells "After the incident at the club . But he is such a person, until the case came to sex it is quite good-natured and funny guy, but when it comes to bed, it becomes a real pet. One day when we were fucked, and we had started doing it almost every day, he began to massage my ass. I tried to sopritivlyatsya, but he put on my resistance with the device. In general Lehoy and I lost my anal virginity. At first it hurt. But Lech pecked me in the ass every day and already I''m used to. By, is no risk to fly and I was able to relax during sex. I even began to cum during anal fondling herself between her legs."'

									act 'anal? phew! It''s disgusting!':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "anal? phew! It''s disgusting!", Faith on that a little testily replied "Come, I also found a prude."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'cool!':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying that it ''s even fun. She smiled at you "Well. Ass stretched and took a member already without tension. I even get an orgasm, what else does it?"'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 5:
									'<center><img src="images/qwest/vokzal/bvtalk5.jpg"></center>'
									'faith tells "Once again we Lehoy booze in his room, but this time invited Lech neighbor. I have already got used to the time to have sex and sat grim, understanding that sex today bummer, Lech suddenly invited me to suck him right in front of his friend. she know, I have my eyes on five kopecks became his offer, Lech but was not joking, He even pulled out his penis. I sighed and tried not to look at his friend began to suck him. His friend watched a bit of this and invited him to join Lech. I shoved the second term under the nose, I began to suck already have two. Strange feeling to handle two members. Then Lech put me cancer and began to fuck while I sucked his friend. After that we ''ve met mostly in Troy and I perprobyvala them all. And double penetration, and the two fuck me in the ass, and ended on my face. Leszek I said then still, Do not fight nature, understand, you whore, There is nothing wrong. This lasted until 4of course. Lech was on course older and graduated. He went to English, without saying goodbye and I never saw him again."'

									act 'oh my God! You really damn!':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "oh my God! You really damn!", Faith on that a little testily replied "Well , with him was a pleasure, and his friend for me was a kind of appendage to Leshke and nothing more."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'cool!':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying that it ''s even fun. She smiled at you "Well. Two guys at the same time it is certainly a little napryazhno, but still it can not be compared with one."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 6:
									'<center><img src="images/qwest/vokzal/bvtalk6.jpg"></center>'
									'faith tells "After Leszek left me, I was not myself, I cried into my pillow at night and was ready for him to flee to the edge of the world. I myself is not understood, how do I love him really. But running was not much, I have no idea where it went. I decided to find a new guy, and found. Also named Lesco, but he was a firefighter, serious guy with great prospects. I''m cool with it screwed up. All went well, until one day I myself with a fool not invited him to anal sex and licked his cock then. Then he opened his eyes , before that I was for him a young girl, but it was, I have experience already above the roof. We parted after that not even quarreled, but I saw in his eyes."'

									act 'oh my God! You really damn!':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "oh my God! You really damn!", Faith on that a little testily replied "Well, besides fucked in all the, I just had grown accustomed to everything, and my new guy was not ready."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'He still does not fit you':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying what he had still not approached. She smiled at you "Well. I fucked three years with two guys at once, besides fucked in all the, I just had grown accustomed to everything, and my new guy was not ready."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 7:
									'<center><img src="images/qwest/vokzal/bvtalk7.jpg"></center>'
									'faith tells "After I screwed up big for a firefighter, I decided not to repeat their mistakes and become acquainted with the new guy Sasha, I have carefully from itself writhes naive girl, for which something other than missionary position is a perversion. And you know? it rolled. My new boyfriend Sasha was so proud of myself when I first agreed to breaking blowjob. I honestly was funny from it all. I could swallow his segment with eggs, and comes from a girl to pose themselves and pretended to play the virgin smuschatsya. So I finished college and Sasha asked me to marry him. And you know? I refused. I tired it less bitter radish, tired of all this silly game, but to open the map and show him all what I can do and I was ashamed to just throw it."'

									act 'Well! good guy':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "Well! good guy", Faith on that a little testily replied "Well. In the bed was just a quiet horror, just lick his cock and fucking, flowed Molof Language. Thirty seconds to pull on me and all, finished. And all the licks and licks between my legs, just another hole not prolizal. I am a member inside pochuvstvovalt want, instead of licking."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'He still does not fit you':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying what he had still not approached. She smiled at you "Well. I fucked three years with two guys at once, besides fucked in all the, I just had grown accustomed to everything, and my new guy was not ready."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								elseif veraboyrand = 8:
									'<center><img src="images/qwest/vokzal/bvtalk8.jpg"></center>'
									'faith tells "After I graduated from college and broke up with Sasha, I stood in front of the selection or return to their village and there is a cow tails twist to the death or how it must be in obustraivatsya. With the guys I fatally unlucky, turned away from me luck and then I made ​​a very stupid its great. I decided to be engaged in sex for money. Yeah yeah. I became a prostitute. I thought a little bit pripodymus, earn some money and then throw. Yup, right_now. I got in a good idiot trap, I took the passport and lived in a brothel where I even could not get out of cigarettes. And is served by several people a day, sometimes carried on Saturdays, where bandyuki allowed me around and had fun poking me a bottle in the ass and cunt. I would have died somewhere or they would have killed me bandyuki played enough with me. But I was lucky, ottarabanil year whore, our brothel covered cops. I sat a little in the detention center, but the court only gave me a fine and released. The accumulation of money . I went to the provincial town and bought a room here. Then he found a guy and married it to yourself."'

									act 'prostitution? It''s fucked up! How can you?':
										cls
										dom += 1
										minut += 5
										verafrend -= 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You said indignantly "prostitution? It''s fucked up! How can you?", Faith on that a little testily replied "I was just lazy fool, who thought, that his by a pussy can conquer the whole world, my life has put in place, and I''m glad, that all ended well, could be worse."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end

									act 'Well':
										cls
										sub += 1
										minut += 5
										verafrend += 1
										gs 'stat'
										'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
										'You cheered Faith saying that all this is in the past. She smiled at you "Well. Yes, but I''m tied to this and will not come back."'

										act 'Leave':minut += 1 & gt 'vokzalGin'
									end
								end
							end
						end
					elseif veratalkrand = 2:
						horny += 10
						'Faith today that it sold out and began to tell about the lesbian experience in a hostel uni.'

						if verafrend >= 50:
							act 'Interesovatsya details':
								cls
								minut += 5
								horny += 10
								gs 'stat'
								'<center><img src="images/qwest/vokzal/lvtalk.jpg"></center>'
								'Vera began to tell "We have a girlfriend like that much and census began kissing, I had not realized, her head was between my legs. It was cool! I was just remember to orgasm, but when it is wet lye was I myself under the nose I felt disgusted. No . But honestly, I did not like. Women in general I do not like, they are soft, as semolina in the package. Tits fucked it all, I just turn up on the udder, and the ass, that men, sturdy little ass and that these loose sticks? No, a woman with a man in bed does not compare."'

								act 'Leave':minut += 1 & gt 'vokzalGin'
							end
						end
					elseif veratalkrand = 3:
						horny += 10
						'Faith today that it sold out and began to tell of her husband, before he was ogogo, but now almost impotent'

						if verafrend >= 50:
							act 'Interesovatsya details':
								cls
								minut += 5
								horny += 10
								gs 'stat'
								'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
								'Faith tells you "Well Muzhichi, that they take. When we were first married, he could every day, almost all night fuck, and now I''m probably so it become boring, he practically avoids sex."'

								act 'Leave':minut += 1 & gt 'vokzalGin'
							end
						end
					end
				end

				act 'Leave':minut += 1 & gt 'vokzalGin'
			elseif verafrend <= 0:
				'You have come to faith and greeted her. But Vera turned away from you muttered to you "Leave me alone".'

				act 'Apologize to Faith':
					cls
					sub += 1
					minut += 5
					verafrend += 1
					gs 'stat'
					'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
					'You started to apologize to Vera.'

					if verafrend <= 0:
						'Faith did not respond to your apology and turned away.'
					elseif verafrend > 0:
						'faith sighed "Well, perhaps forgive you."'
					end

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end

				act 'Leave':minut += 1 & gt 'vokzalGin'
			end
		end
	elseif verakassir = 2 and hour >= 8 and hour <= 20 and verarand = 0:
		'Near the window woman smokes in which you will learn cashier Faith.'

		act 'Chat with the cashier':
			cls
			verakassir = 3
			minut += 5
			verafrend += 10
			gs 'stat'
			'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
			'You have come to the Faith and its poprevetstvovali. Gradually, that sex with her ​​husband does not satisfy.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	elseif verakassir = 1 and hour >= 8 and hour <= 20 and verarand = 0:
		'Near the window woman smokes in which you will learn cashier Faith.'

		act 'Chat with the cashier':
			cls
			verakassir = 2
			minut += 5
			verafrend += 10
			gs 'stat'
			'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
			'You have come to the Faith and its poprevetstvovali. Gradually, Vera is married and has a child.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	elseif verakassir = 0 and hour >= 8 and hour <= 20:
		'Near the window woman smokes in which you will learn the cashier.'

		act 'Chat with the cashier':
			cls
			verakassir = 1
			minut += 5
			verafrend += 10
			gs 'stat'
			'<center><img src="images/qwest/vokzal/verasmoke.jpg"></center>'
			'You have come to the cashier and not knowing how to start a conversation asked her how long. Gradually. She wondered why you began to work as a cleaner, what you have complained about the lack of money, Faith was surprised and told, that the station in 11 and 18 hours of long-distance trains arrive and quirky people vtyuhivat passengers all garbage, which is bought at the warehouse terminal in the regional center.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end
}

--- vokdinvera ---------------------------------
# vokmantoiev
$d_vok_man_toilet_event = {
	startevtoirand = rand(0, 1)

	if startevtoirand = 0:
		vokmantoitipev = rand(0, 3)

		if vokmantoitipev = 0:
			!'
			if gloryholeVokzal = 9:gloryholeVokzal = 10 & ''
			if gloryholeVokzal = 8:gloryholeVokzal = 9 & ''
			if gloryholeVokzal = 6:gloryholeVokzal = 7 & ''
			if gloryholeVokzal = 5:gloryholeVokzal = 6 & ''
			if gloryholeVokzal = 4:gloryholeVokzal = 5 & ''
			if gloryholeVokzal = 3:gloryholeVokzal = 4 & ''
			if gloryholeVokzal = 2:gloryholeVokzal = 3 & ''
			'!
			if gloryholeVokzal = 1:gloryholeVokzal = 2 & 'you notice, that the floor, near the hole in the wall located in one of the cabins have strange white drops. You began to wipe them off the floor with a cloth and realized, it''s sperm.'
			if gloryholeVokzal = 0:gloryholeVokzal = 1 & 'You saw in one of the walls of the booth is fenced off from each other by a circular opening at the waist. You curiously examined the smooth opening and shrug continued to get out.'
		elseif vokmantoitipev = 1:
			'The toilet boss walked station and standing at urinals started writing.'

			if horny >= 50:
				act 'peep':
					cls
					minut += 1
					seepeenach += 1
					tot_seepee += 1

					if tot_seepee > 5:horny += 5

					gs 'stat'
					'<center><img src="images/qwest/vokzal/seepee.jpg"></center>'
					'You glanced at the head of the flaccid penis Station'
					'You became wash the floor in the men''s room, then began to scour bowls.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		elseif vokmantoitipev = 2:
			'The toilet and went to the police standing at the urinals began writing.'

			if horny >= 50:
				act 'peep':
					cls
					minut += 1
					seepeecop += 1
					tot_seepee += 1

					if tot_seepee > 5:horny += 5

					gs 'stat'
					'<center><img src="images/qwest/vokzal/seepee.jpg"></center>'
					'You glanced at his flaccid penis police'
					'You became wash the floor in the men''s room, then began to scour bowls.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		elseif vokmantoitipev = 3:
			'The toilet has gone what that guy standing at the urinal and began to write.'

			if horny >= 50:
				act 'peep':
					cls
					minut += 1
					seepeeman += 1
					tot_seepee += 1

					if tot_seepee > 5:horny += 5

					gs 'stat'
					'<center><img src="images/qwest/vokzal/seepee.jpg"></center>'
					'You glanced at his flaccid penis man'
					'You became wash the floor in the men''s room, then began to scour bowls.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		end
	elseif startevtoirand > 0:
		'You became wash the floor in the men''s room, then began to scour bowls.'
	end
}

--- vokmantoiev ---------------------------------
# vokzaltorg
cls
minut += 30
prodskill = vnesh + will + dom

if prodskill < 20:prodskill = 20
if prodskill > 150:minimumtov = 3
if prodskill > 100 and prodskill <= 150:minimumtov = 2
if prodskill < 100:minimumtov = 1

tovarand = rand(minimumtov, prodskill / 10)

if tovarand > tovarL:tovarand = tovarL

tovpay = tovarand * 300
money += tovpay
tovarL -= tovarand
will += rand(0, 1)
TorgVokzalTimes += 1
dom += 1
gs 'stat'
'<center><img src="images/qwest/vokzal/peron.jpg"></center>'
'You managed vtyuhat <<tovarand>> units of product, while earning <<tovpay>> rubles.'

act 'Leave':
	cls
	gs 'stat'
	'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
	'Near the platform you are already waiting for the police. "breach? Trade without proper papers?"'

	if money >= 500:
		act 'Pay (500 rubles)':
			cls
			money -= 500
			gs 'stat'
			'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
			'you paid 500 rubles police. He took the money and immediately lost interest to you.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end

	act 'Persuade to forgive':
		cls
		gs 'stat'
		'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
		'You started to persuade police captain forgive you and release.'

		if katalkinSexOnce = 0:
			schtraf = 500
			'Captain grinned "Come then now the Department. there shall understand."'

			act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
		else
			if katalkinSexDay+7 >= daystart:
				'captain grinned "Well."'

				act 'Leave':minut += 1 & gt 'vokzalGin'
			elseif katalkinSexDay + 7 < daystart:
				'The captain frowned "You long ago to me did not come, avoiding?"'

				act 'No, what do you, simply no':
					cls
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'You started arguing opravdyvatsya, that you just do not have enough time. captain grinned "Come then now the Department. Carry out bodily searches."'

					act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
				end
			end
		end
	end

	act 'Swing right':
		cls
		money = 0
		tovarL = 0
		minut += 120
		manna = 0
		gs 'stat'
		'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
		'You have decided to shake their rights, Police responded to what is to be expected, dragged you to the department, money seized and confiscated goods. Once you promuryzhili two o''clock, you still released.'

		act 'Leave':minut += 1 & gt 'vokzalGin'
	end
end

--- vokzaltorg ---------------------------------
# katalkin
gs 'stat'

if hour >= 8:'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
'Little nook in which the police are sitting.'

if hour >= 8 and hour < 22:
	'Captain Katalkin handles cases.'

	if katalkinSexOnce = 0:
		if schtraf = 0:
			'Katalkin looks at you with interest "Sit_down. can tea?"'

			act 'Drink tea':
				cls
				minut += 5
				katalkinNoexit = 0
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You sat down at the table and poured Katalkin you some tea. Captain himself sat down next to you and also began to drink tea. He almost rummage your body your lustful eyes. And suddenly you feel like you captain put his hand on his leg and a little squeezing her feverishly began to mumble his face closer to your. "you''re cute, we police are people too."'

				act 'Leave':minut += 1 & gt $curloc
				act 'Do not move':katsexetap = 0 & gt 'katalkinSex'
			end
		elseif schtraf > 0:
			'Captain Katalkin turned to you and said "In general you with fine <<schtraf>> rubles and you can go."'

			if money >= schtraf:
				act 'Pay a fine':
					cls
					money -= schtraf
					schtraf = 0
					katalkinNoexit = 0
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'You paid a fine police officer. He took the money and immediately lost interest to you.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			else
				act 'I have no money':
					cls
					money = 0
					schtraf = 0
					katalkinNoexit = 0
					kutime = 24
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'The police searched you, and took values. He frowned and said "Then sit day in jail."'

					act 'In jail':gt 'kutuzka'
				end
			end

			act 'Beg':
				cls
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You started to beg the police captain did not punish you. He looked around the empty room and then turned his face to you. "Well." His gaze slid over your figure and his sweaty hand fell on my knees to you.'

				if money >= schtraf:
					'You think to yourself, may well in FIG this captain, obviously he had to something. I have enough money for a fine.'

					act 'Pay a fine':
						cls
						money -= schtraf
						schtraf = 0
						katalkinNoexit = 0
						gs 'stat'
						'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
						'You paid a fine police officer. He took the money and immediately lost interest to you.'

						act 'Leave':minut += 1 & gt 'vokzalGin'
					end
				elseif money < schtraf:
					'You think to yourself, that out then you have no. As there is no required amount for payment of the fine.'
				end

				act 'Smile at him':katsexetap = 0 & gt 'katalkinSex'
			end
		end
	elseif katalkinSexDay < daystart:
		if schtraf = 0:
			'Katalkin looks at you with interest "Sit down <<$nickname>>. can tea?"'

			act 'Drink tea':
				cls
				minut += 5
				katalkinNoexit = 0
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You sat down at the table and poured Katalkin you some tea. Captain himself sat down next to you and also began to drink tea. He almost rummage your body your lustful eyes. Captain whispers to you grabbing you for Lyashko "Well <<$name>>, can entertain?"'

				act 'Put his hand on his pants':katsexetap = 1 & gt 'katalkinSex'
				act 'Do not move':katsexetap = 0 & gt 'katalkinSex'
			end
		elseif schtraf > 0:
			'Captain Katalkin smiling at you "Well <<$name>>, pay a fine or exhaust?"'

			if money >= schtraf:
				act 'Pay a fine':
					cls
					money -= schtraf
					schtraf = 0
					katalkinNoexit = 0
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'You paid a fine police officer. He took the money and immediately lost interest to you.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end

			act 'Work':katsexetap = 0 & gt 'katalkinSex'
		end
	else
		if schtraf = 0:
			'Katalkin sits in his papers and that is writing.'
		elseif schtraf > 0:
			'Katalkin grins "I think you''re completely fulfilled its fine."'

			act 'Bye now':
				cls
				schtraf = 0
				katalkinNoexit = 0
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You said goodbye to the police, He nodded to you "Come on, go, and then I have a lot of work".'

				act 'Leave':minut += 1 & gt $curloc
			end
		end
	end
elseif hour >= 22:
	'Captain Katalkin sitting at a table on which lay a variety of snacks and vodka worth. Next to him sat two more police.'

	if katalkinSexOnce = 1:
		if katGangMeet = 0:
			'See you Katalkin captain waved his hand and you drunkenly said "Come here <<$name>>. I ''ll introduce you to fucking guys."'

			act 'Sit down':
				cls
				minut += 5
				katalkinNoexit = 0
				katGangMeet = 1
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You sat down at a table with a drunken police campaign, you immediately poured vodka. Katalkin introduced you guys like Pasha and Sergei. "Well <<$name>>, Let''s drink to familiarity."'

				act 'A toast to familiarity':alko += 2 & minut += 5 & gt 'katalkinAlko'
			end
		else
			'See you Katalkin captain waved his hand and you drunkenly said "Come here <<$name>>. Come buhnem."'

			act 'Sit down':
				cls
				minut += 5
				katalkinNoexit = 0
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				'You sat at the table with his subordinates and Katalkinym Pasha and Sergei. You immediately poured vodka.'

				act 'Drink a glass':alko += 2 & minut += 5 & gt 'katalkinAlko'
			end
		end
	elseif katalkinSexOnce = 0:
		'IF THIS MESSAGE climbed it BAG'

		if schtraf = 0:
			'Katalkin drunkenly looking at you "Come to us at the table! Come_Over, do not be shy, here all their."'

			act 'Sit down':
				cls
				minut += 5
				katalkinNoexit = 0
				gs 'stat'
				'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
				''

				act 'Leave':minut += 1 & gt $curloc
				act 'Do not move':katsexetap = 0 & gt 'katalkinSex'
			end
		elseif schtraf > 0:
			'Katalkin drunken captain turned to you and said "In short pay fines <<schtraf>> rubles and you can get out."'

			if money >= schtraf:
				act 'Pay a fine':
					cls
					money -= schtraf
					schtraf = 0
					katalkinNoexit = 0
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'You paid a fine police officer. He took the money and immediately lost interest to you.'

					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			else
				act 'I have no money':
					cls
					money = 0
					schtraf = 0
					katalkinNoexit = 0
					kutime = 24
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'The police searched you, and took values. He frowned and said "Then sit day in jail."'

					act 'In jail':gt 'kutuzka'
				end
			end
		end
	end
elseif hour < 8:
	'The door is locked.'

	act 'Leave':minut += 1 & gt 'vokzalGin'
end

if katalkinNoexit = 0:act 'Leave':minut += 1 & gt 'vokzalGin'

--- katalkin ---------------------------------
# katalkinSex
$d_katanal = {
	act 'further':
		cls
		horny += 5
		minut += 15

		if katalkinSexOnce = 0:katalkinSexOnce = 1 & guy += 1

		KatalkinAnal += 1
		sub += 1
		gs 'stat'
		'<center><img src="images/qwest/vokzal/kat/katAnal.jpg"></center>'
		'Captain undressed and stood behind your back, loudly slapped his hand on your naked ass. You even gasped in surprise.'
		dynamic $analsex2

		act 'Further':
			cls
			minut += 3
			anal += 1
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/vokzal/kat/after.jpg"></center>'
			'Suddenly the captain grabbed your buttocks tight and groaned at you. Did you feel like your ass fills something warm. The captain finally got off and you become odevatsya.'

			act 'Brush up':minut += 1 & gt 'katalkin'
		end
	end
}

$d_katsub = {
	act 'Close your eyes':
		cls
		horny += 5
		minut += 3
		gs 'stat'
		'<center><img src="images/qwest/vokzal/kat/bend.jpg"></center>'
		'You lay back with his eyes closed and trying to enjoy the feeling of. Suddenly the captain unfolds you back to yourself and tips.'

		act 'Stand leaning':
			cls
			horny += 5
			minut += 3
			gs 'stat'
			'<center><img src="images/qwest/vokzal/kat/grop.jpg"></center>'
			'You put her hands on the wall , that would not fall and the captain pulled up her skirt and pulled your pants. You felt his fingers began to massage your ass. He hissed at you "Get up off your clothes and cancer"'

			act 'Undress and get cancer':
				cls
				horny += 5
				minut += 3
				gs 'stat'
				'<center><img src="images/qwest/vokzal/kat/katBeforeAnal.jpg"></center>'
				kattiperand = rand(0, 1)

				if kattiperand = 0:
					'You get undressed and stood in front of the captain cancer. "Spread bread" Captain told you tone brooked no argument and you obediently spread her poluzhopiya showing hole. Katalkin pressed his finger on the ring anus and frantically whispered "I''d rather fuck you in the ass. I do not want, What would you flew me."'
					dynamic $d_katanal
				elseif kattiperand = 1:
					'You get undressed and stood in front of the captain cancer. "Spread bread" Captain told you tone brooked no argument and you obediently spread her poluzhopiya showing hole. Katalkin asked feverish whisper "Do you have Gandon?"'

					act 'No':
						cls
						gs 'stat'
						'<center><img src="images/qwest/vokzal/kat/katBeforeAnal.jpg"></center>'
						'You said Captain , you do not have a condom, what Katalkin answered "Then going to fuck you in the ass."'
						dynamic $d_katanal
					end

					if prezik > 0:
						act 'Is_There':
							cls
							pose = 1
							gs 'stat'
							'<center><img src="images/qwest/vokzal/kat/sex.jpg"></center>'
							dynamic $sexudo
							dynamic $sexcum

							act 'Brush up':minut += 1 & gt 'katalkin'
						end
					end
				end
			end
		end
	end
}

$boy = 'Katalkin'
dick = 18
silavag = 0
horny += 10
schtraf = 0
katalkinNoexit = 0
katalkinSexDay = daystart
gs 'stat'

if katsexetap = 0:
	'<center><img src="images/qwest/vokzal/kat/kat.jpg"></center>'
	'Hands police captain rummage through your body trying to get here before your breasts and ass.'

	act 'Clean up his hands':
		cls
		gs 'stat'
		'<center><img src="images/qwest/vokzal/kat/kat.jpg"></center>'
		'You have become clean his hands "Well, i do not want, headache, I month." otmazyvatsya you started, but the captain seems you did not listen and continued to undress you in full.'

		act 'Stroking his pants':katsexetap = 1 & gt $curloc

		dynamic $d_katsub
	end

	dynamic $d_katsub

	if horny >= 75:
		act 'Hug him':
			cls
			horny += 5
			gs 'stat'
			'<center><img src="images/qwest/vokzal/kat/kat.jpg"></center>'
			'You hugged police captain hands and kissed him.'

			act 'Stroking his pants':katsexetap = 1 & gt $curloc

			dynamic $d_katsub
		end
	end
elseif katsexetap = 1:
	'You started stroking his pants police uniform trousers and feel like there was strengthened and hardened his cock.'

	act 'Kneel':
		cls

		if katalkinSexOnce = 0:katalkinSexOnce = 1 & guy += 1

		gs 'stat'
		'<center><img src="images/qwest/vokzal/kat/kneel.jpg"></center>'
		'You stood in front of a police officer on his knees and pulled his cock out of his pants.'

		act 'Suck':
			cls
			bj += 1
			gs 'stat'
			'<center><img src="images/qwest/vokzal/kat/bj.jpg"></center>'
			dynamic $dinrandbj

			if rand(0, 1) = 0:
				act 'Swallow cum':
					cls
					swallow += 1
					cumlip += 1
					KatalkinSwallow += 1
					gs 'stat'
					'<center><img src="images/qwest/vokzal/kat/swallow.jpg"></center>'
					dynamic $dinrandswallow

					act 'Brush up':minut += 1 & gt 'katalkin'
				end

				act 'On the face':
					cls
					facial += 1
					cumface += 1
					KatalkinFacial += 1
					gs 'stat'
					'<center><img src="images/qwest/vokzal/kat/facial.jpg"></center>'
					'You took out a member of his mouth and you immediately face splattered warm and strongly smelling sperm.'

					act 'Brush up':minut += 1 & gt 'katalkin'
				end
			else
				'Katalkin suddenly pulls his dick out of your mouth and took you by the shoulders up from his knees to his feet.'
				dynamic $d_katsub
			end
		end
	end
end

--- katalkinSex ---------------------------------
# katalkinAlko
gs 'stat'

if hour < 8:
	'The police finally drunk and fell to sleep where someone.'

	act 'Leave':minut += 1 & gt 'vokzalGin'

	exit
end

if alko < 6:
	'You drank a glass of vodka with police. You will again pour into a glass of vodka.'

	act 'drink a glass':alko += 2 & minut += 30 & gt $curloc
elseif alko >= 6:
	'You definitely tipsy and just sit on a chair.'
end

!'
if katGangbang = 0:
	end
elseif katGangbang > 0:
	if katGangbangDay = daystart:end
	if katGangbangDay < daystart:end
end
'!

act 'Leave':minut += 2 & gt 'vokzalGin'

--- katalkinAlko ---------------------------------
# kutuzka
gs 'stat'
'You sit in a small cell, where there is no toilet, no shell, is only a wooden plank. All you have to sit <<kutime>> hours.'

if kutime > 0:
	act 'sit':
		cls
		minut += 60
		kutime -= 1
		gs 'stat'
		'You sit on hard wooden planks.'

		act 'further':gt $curloc
	end
elseif kutime <= 0:
	'Finally the time of his release over and you have been released.'

	act 'Leave':minut += 1 & gt $curloc
end

--- kutuzka ---------------------------------
# gKristinaZv
gs 'stat'
'After physical training you went to the locker room with the rest of sex!. Christine immediately came up to you in front of the rest of the class sex!.'

if zverhumiliation = 0:randhumiliation = 0
if zverhumiliation = 1:randhumiliation = rand(0, 1)
if zverhumiliation = 2:randhumiliation = rand(0, 2)
if zverhumiliation = 3:randhumiliation = rand(0, 3)
if zverhumiliation >= 4:randhumiliation = rand(0, 4)

if randhumiliation = 0:
	'- Well sheep, you''re here pizdela about me, I vaflersha, so I brought you a present. Christina pulled from his bag, Dildo. Christina with dildo chpok sticked to the wall at the level of the groin. "Well <<$name>>, starts sucking forgiveness or maybe you want me to once again you broke ragged sheep mug?"'

	act 'sucking dildo':
		cls
		zverhumiliation += 1
		dilbj += 1
		sub += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/zver/dildobj.jpg"></center>'
		'You sit down in front of a dildo sticky sucker to the wall and began to suck in front of the girls in her class. Finally Christina laughed allowing you to stop and change.'

		act 'Leave':gt 'gschool'
	end
elseif randhumiliation = 1:
	'- Well sheep, you''re the type of girl sports, I think you must be a little more pump. Christina pulled from his bag, dildo and dildo sticked with chpok to the floor. "Well <<$name>>, stop lying to accept and start sucking wrung"'

	act 'sucking dildo':
		cls
		zverhumiliation += 1
		dilbj += 1
		sub += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/zver/dildobj2.jpg"></center>'
		'You took the emphasis lying down and cupped her lips dildo, then you started to do push-ups allowing dildo to penetrate deeper into your mouth. Finally Christina laughed allowing you to stop and change.'

		act 'Leave':gt 'gschool'
	end
elseif randhumiliation = 2:
	'- Well sheep, it''s time for the suction otcherednogo. Christina pulled from his bag, dildo and dildo sticked with chpok to the floor. "Well <<$name>>, start praktikovatsya"'

	act 'sucking dildo':
		cls
		zverhumiliation += 1
		dilbj += 1
		sub += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/zver/dildobj3.jpg"></center>'
		'You sit down in front of a dildo and bending low began to suck the dildo in front of odnoklasnitsy. Finally Christina laughed allowing you to stop and change.'

		act 'Leave':gt 'gschool'
	end
elseif randhumiliation = 3:
	'- Well sheep, I decided to do a bit of your development. Christina pulled from his bag, three dildos and cleave them to the mirror at the groin. "Well <<$name>>, start praktikovatsya"'

	act 'Sucking dildo':
		cls
		zverhumiliation += 1
		dilbj += 1
		sub += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/zver/dildobj4.jpg"></center>'
		'You sit down in front of a dildo and began his sosast nadrachivaya while the other two hands. Finally Christina laughed allowing you to stop and change.'

		act 'Leave':gt 'gschool'
	end
elseif randhumiliation = 4:
	'- Okay sheep, I''m busy today, so you will have to do without the traditional suction. Christina grinned and began to dress'

	act 'Leave':gt 'gschool'
end

--- gKristinaZv ---------------------------------
# JuliaMilGo
gs 'stat'
'<center><b><font color="maroon"><<$npcName[12]>> <<$npcSurName[12]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
'You came to Julia and she asked you, Will you go to her house, teach lessons.'

act 'Go with Julia':
	cls
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[12]>> <<$npcSurName[12]>></font></b></center>'
	'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
	'Do_You 15 minutes walking down the street to the home of Yulin discussing rubbish.'

	act 'Log in to the apartment':gt 'JuliaMilHome'
end

--- JuliaMilGo ---------------------------------
# JuliaMilHome
if BeInJulMilHome = 0:BeInJulMilHome = 1

gs 'stat'
'<center><b><font color="maroon"><<$npcName[12]>> <<$npcSurName[12]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
'Not a bad room, with quality furnishings, forced by all the books.'

if lernHome ! 0:
	'Julia arranges books on the table.'

	act 'Engage with Julia':
		cls
		minut += 60
		!grupNPC[14] += 10
		lernHome = 0
		lern += rand(3, 6)
		intel += rand(1, 2)
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
		'You are within an hour engaged with Julia and lessons learned.'

		act 'rest':gt $curloc
	end
elseif lernHome = 0:
	'Julia is sitting on her bed.'

	if eatJulMilDay!daystart:
		'Julia smiles at you and offers to eat together.'

		act 'Go to the kitchen with Julia':
			cls
			minut += 15
			fat += 3
			energy += 10
			water += 20
			eatJulMilDay = daystart
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
			'You went into the kitchen with Julia and ate together. Then went back to her room'

			act 'rest':gt $curloc
		end

		act 'Refuse':
			cls
			eatJulMilDay = daystart
			gt $curloc
		end
	else
		if wine = 1:
			act 'Drink wine with Julia':
				cls
				minut += 30
				wine = 0
				alko += 6
				JulMilBestFrend += 1
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
				'You offered Julia wine and she agreed. Julia brought a corkscrew and a bottle you have printed, then poured the wine by the glass. For half an hour you drank a bottle of wine along with Julia.'

				act 'rest':gt $curloc

				if horny >= 50:
					act 'Chat about sex':
						cls
						minut += 5

						if SexTalkJulia < 4:SexTalkJulia += 1

						gs 'stat'
						'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
						'You began to discuss sexual topics with Julia'

						if SexTalkJulia = 1:
							'Suddenly.'
						elseif SexTalkJulia = 2:
							'Julia while talking boasted that no longer a virgin.'

							act 'inquire details':
								cls
								minut += 5
								horny += 10
								gs 'stat'
								'<center><img src="images/qwest/alter/ev2/outdoor.jpg"></center>'
								'Julia smiled mysteriously and began to tell "I went to summer camp to rest. There met a guy named Vova. We met with him the whole shift and at the end of the evening shift observed in the forest. There began obnimatsya, kiss, it was so nice, Besides. He first dropped me on my back, but there I was stuck between the blades of what that stone, she did not understand how was on all fours, so even without a skirt and panties. And then he walked me. It hurt. she know, it does not say a hymen is also part of the body, and then break it. If you honestly the first time I was just waiting for cancer when it all finally ends. Well at least it did not last long and the guy had finished on the ground."'

								act 'rest':gt $curloc
							end

							exit
						elseif SexTalkJulia = 3:
							'Julia while talking again remembered his adventures in the camp.'

							act 'inquire details':
								cls
								minut += 5
								horny += 10
								gs 'stat'
								'<center><img src="images/qwest/alter/ev2/otrad.jpg"></center>'
								'Julia smiled mysteriously and began to tell "Well. But I still managed to sleep with Vovka before leaving the camp. We afternoon when no one was in the bedroom waded along with Vovka, he again began to harass me. Then I undressed and lay on the bed, terribly afraid that will hurt again, but it was well tolerated, Only in the beginning was a bit painful, but it quickly passed. Although I was unable to be stimulated, I was afraid, Now that the detachment somebody logs in and sees us. but there were. After that. He is from the city, I have his telefonchik. But it''s not really him vstrechatsya."'

								act 'rest':gt $curloc
							end

							exit
						elseif SexTalkJulia = 4:
							'Julia embarrassed and tells you "You''re such a funny girl <<$nickname>>. I''m with you myself am feeling absolutely no compulsion." She suddenly tilts her face to your wants and kiss you.'

							act 'Kiss Julia':
								cls
								minut += 5
								horny += 20
								gs 'stat'
								'<center><img src="images/qwest/alter/ev2/julkiss.jpg"></center>'
								'You kiss with Julia feeling her soft, smelling lips on her lips and her delicate nimble tongue gets into your mouth. Her hands gently hugs you and you chustvuete as she wraps her palms of your chest and begins to gently caress.'

								act 'relax':
									cls
									minut += 5
									horny += 20
									gs 'stat'
									'<center><img src="images/qwest/alter/ev2/jultit.jpg"></center>'
									'Julia gets your chest and slowly lowered her kisses. Finally you chustvuete as she kisses and caresses your nipples breasts. Her fingers you climb between her legs pushing your panties.'

									act 'relax':
										cls
										minut += 15

										if npcSex[12] = 0:npcSex[12] = 1 & girl += 1

										lesbian += 1
										horny = 0
										orgasm += 1
										gs 'stat'
										'<center><img src="images/qwest/alter/ev2/julick.jpg"></center>'
										'You Julia undressed and lay you on your back, Julia threw her leg over your head and buried his face between her legs you, while exposing you to their expiring crack. You touched tongue to juicy vagina and began licking her , chustvuya with the tongue Julia treat you between the legs. Soon you covered real fire and your body convulsed orgasm. Julia chustvuya your arousal and also finished her pussy convulsed start sokraschatsya front of your face, and her body pierced shiver.'

										act 'rest':gt $curloc
									end
								end

								act 'Oh you Julia, leave_me_alone':dom += 1 & gt $curloc
							end

							act 'Oh you Julia, leave_me_alone':dom += 5 & gt $curloc

							exit
						end

						act 'rest':gt $curloc
					end
				end
			end
		end

		act 'Chat with Julia':
			cls
			minut += 15
			JulMilBestFrend += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/12.jpg"></center>'
			'You talked to Julia about any nonsense.'
			tiprand = rand(0, 5)

			if tiprand = 0:'Julia mentions in passing that the earlier a friend of Natasha Belova, but she constantly took the money and did not give and Julia got sick.'

			act 'rest':gt $curloc
		end
	end
end

act 'go home':gt 'gorodok'

--- JuliaMilHome ---------------------------------
# NatBelGo
gs 'stat'
'<center><b><font color="maroon"><<$npcName[16]>> <<$npcSurName[16]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
'You came to Natasha and she asked you, Will you go to her house, teach lessons.'

act 'Go with Natasha':
	cls
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon"><<$npcName[14]>> <<$npcSurName[16]>></font></b></center>'
	'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
	'Do_You 15 minutes walking down the street to Natasha''s house discussing all the small stuff.'

	act 'Log in to the apartment':gt 'NatBelHome'
end

--- NatBelGo ---------------------------------
# NatBelHome
if BeInNatBelHome = 0:BeInNatBelHome = 1

gs 'stat'
'<center><b><font color="maroon"><<$npcName[16]>> <<$npcSurName[16]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
'Very poor room, but as the whole apartment.'

if lernHome ! 0:
	'Natasha arranges books on the table.'

	act 'Engage with Natasha':
		cls
		minut += 60
		!grupNPC[16] += 10
		lernHome = 0
		lern += rand(3, 6)
		intel += rand(1, 2)
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
		'You are within an hour engaged with Natasha and lessons learned.'

		act 'rest':gt $curloc
	end
elseif lernHome = 0:
	'Natasha is sitting on her bed.'

	act 'Chat with Natasha':
		cls
		minut += 15
		NatBelBestFrend += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
		'You talked to Natasha about any nonsense.'

		if NatBelBestFrend = 1:'Natasha recognized, she lives in a very poor family. She has no father, and her mother works for a penny at a garment factory.'
		if NatBelBestFrend >= 2:'Natasha envies, that other girls can smartly odevatsya and buy cosmetics, when she wears her mother''s things.'

		act 'further':gt $curloc
	end

	if NatDolg <= 0 and money >= 2000 and natsub > 0:
		'Natasha asked confused "<<$name>>, and you can take a couple of thousand?"'

		act 'Give money Natasha':
			cls
			minut += 15
			NatDolg = 2000
			money -= 2000
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You got the purse and gave Natasha money knowing that the money she just will not give up and that you would prefer to play with it.'

			act 'further':gt $curloc
		end
	elseif NatBelBestFrend >= 3 and NatDolg = 0 and money >= 5000 and natsub = 0:
		'Natasha looked down "<<$name>>, you are found money. Could you lend me 5000 rubles. I will give, parole."'

		act 'Lend Natasha':
			cls
			minut += 15
			NatDolg = 5000
			money -= 5000
			NatDolgDay = daystart+30
			NatBelBestFrend += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You got the purse and gave Natasha borrow money. Natasha was delighted and said, that will give them a month.'

			act 'rest':gt $curloc
		end
	elseif NatDolg>0 and NatDolgDay > daystart:
		'Natasha promises you to repay the debt <<NatDolg>> rubles, through <<NatDolgDay-daystart>> days'
	elseif NatDolg > 0 and NatDolgDay <= daystart:
		'Natasha looks at the floor "<<$name>>, I have no money, that would give back to."'

		act 'Forgive the debt Natasha':
			cls
			minut += 15
			NatDolg = 0
			NatDolgDay = 0
			NatBelBestFrend += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You have decided to forgive the debt Natasha, She was delighted and began cardiopulmonary thank you.'

			act 'rest':gt $curloc
		end

		if dom >= 10 and natotrab = 0:
			act 'claim money':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
				'You have decided not to lower the debt Natasha, and rolled her scandal, demanding the return of money. Natasha shrank together into a ball on his bed "Svetochka, sweet, forgive me. I am for you." Looking at you frightened Natasha came up with a couple of ideas, how you can use this chicken. And you evil hissed her "You''re my every last penny exhaust creature."'

				act 'on your knees! And open your mouth!':
					cls
					minut += 5
					natotrab += 1
					natsub += 1
					!!natknee
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
					'You barked at Natasha, and she immediately obediently knelt down and opened her mouth.'

					act 'Spit in her face':
						cls
						minut += 5
						natsub += 1
						NatDolg -= 500
						!!natknee
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
						'You barked at Natasha, and she immediately obediently knelt down and opened her mouth. You have collected saliva and relish Natasha spat in the face, from what she jerked and squeezed her eyes shut. you smiled, "Fair_Enough, forgive." Natasha opened her eyes which did not get asked again and harchok "forgive?" you laughed "forgive 500 rubles of debt, fool. Now you will work until the entire debt is not extinguished."'

						act 'rest':gt $curloc
					end
				end
			end
		end

		if natotrab > 0 and NatDolg > 0:
			'Natasha has yet <<NatDolg>> rubles.'

			act 'on your knees! And open your mouth!':
				cls
				minut += 5
				natotrab += 1
				natsub += 1
				!!natknee
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
				'You barked at Natasha, and she immediately obediently knelt down and opened her mouth.'

				act 'Spit in her face':
					cls
					minut += 5
					natsub += 1
					NatDolg -= 500
					!!natknee
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/natspit.jpg"></center>'
					'You barked at Natasha, and she immediately obediently knelt down and opened her mouth. You have collected saliva and relish Natasha spat in the face, from what she jerked and squeezed her eyes shut.'

					act 'rest':gt $curloc
				end

				if natsub >= 4:
					act 'Make her lick':
						cls
						minut += 5
						natsub += 1
						NatDolg -= 500

						if npcSex[16] = 0:npcSex[16] = 1 & girl += 1

						lesbian += 1
						!!horny = 0
						!!orgasm += 1
						natlesb += 1
						!!natknee
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/natlick.jpg"></center>'
						'You were forced to undress and Natasha undressing alone stood in front of her face. "Now lick!". Natasha frightened started to work.'

						if natsub < 10:
							'This Krivorukov goat even the clitoris is unable to get and only sluggishly, without enthusiasm chomps his mouth on your pussy.'

							if dom >= 20 and NatDolg >= 500:
								act 'Piss in her mouth':
									cls
									minut += 5
									natsub += 1
									NatDolg -= 500
									natpee += 1
									!!natknee
									gs 'stat'
									'<center><img src="images/qwest/alter/ev2/natpee.jpg"></center>'
									'You are angry at this bitch released urine stream in the face of Natasha. She closed her eyes and bowed face down, but not recoiled and silently doterpela flogging until the very end.'

									act 'rest':gt $curloc
								end
							end
						else
							orgasm += 1
							horny = 0
							gs 'stat'
							'Natasha carefully handles your pussy tongue and you chustvuete as you orgasm rolls.'
						end

						act 'rest':gt $curloc
					end
				end
			end

			if natsub >= 6:
				act 'call brother':
					cls
					minut += 15
					natsub += 1
					NatDolg -= 500
					natbj += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/natbj.jpg"></center>'
					'You called my brother and he quickly came to the apartment Natashkiny. Briefly explain the situation to his brother "And you, bitch, so now the cheek and took smacked, i_get_it?" Natasha jitters nodded and knelt waiting when Kolka starts fucking her in the mouth. Kolka went to Natashkiny face and took his standing member. He patted the little purple head lips Natasha and she began to lick him his tongue.'

					act 'rest':gt $curloc
				end
			end
		end
	end
end
act 'go home':gt 'gorodok'

--- NatBelHome ---------------------------------
# albinaRide
albrideday = daystart
gs 'stat'
'<center><b><font color="maroon"><<$npcName[23]>> <<$npcSurName[23]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/23.jpg"></center>'
'Albina genuinely smiling at you "Come to my World, sit, chat."'

act 'Go with Albina':
	cls
	minut += 5
	gs 'stat'
	'You sat in the back seat of a jeep, sat next to you Albina, sat behind the wheel of a hefty guy in a black jacket and took you through the town. Soon you stopped at the gate luxurious mansion and came out of the jeep.'

	act 'Go with Albina into the room':gt 'albinahome'
end

--- albinaRide ---------------------------------
# albinahome
if beinalbinahome = 0:beinalbinahome = 1

gs 'stat'

'<center><b><font color="maroon"><<$npcName[23]>> <<$npcSurName[23]>></font></b></center>'
'<center><img src="images/qwest/alter/npc/23.jpg"></center>'
''

if hour < 20:
	if npcSex[23] = 0:
		'Albina you smiling affably "<<$name>>, I have a bottle of fine wine, let''s drink."'

		act 'Drink':
			cls
			minut += 15
			alko += 2
			gs 'stat'
			'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
			'You sat down at a table and Albina brought a bottle of wine. She deftly opened a bottle and poured the wine by the glass. You drank together with Albina. She smiled and said "Once again, that warned me. I was still brought a criminal case, but to prove that it will be very difficult for them. Father of course ranting and raving. His political career was covered with a copper basin anyway, though I otmazhus, though not otmazhus."'

			act 'Ask her about the reaction of her father when he got scent of her specific business':
				cls
				minut += 15
				alko += 2
				gs 'stat'
				'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
				'You asked Albina "And how did he react to it, that you have a specific business?" Albina laughed again and poured the wine by the glass. "But he knew from the beginning." You surprise staring at Albina "What do you know?" Albina laughed "I have a very strange little family, so easy you will not understand. Let''s have a drink." You drank more wine along with Albina and she continued "Actually, my dad has the bastard. If there is a hell, then it is already there prepared a special pot, for all that he did in his life."'

				act 'Ask her how her father responded':
					cls
					minut += 15
					alko += 2
					gs 'stat'
					'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
					'You shake your head in amazement "You still speak of his father?" Albina suddenly sobered and evil hissed "How can I apply to it? Okay, you want to get into a tangle of snake, please. My dad fucked me from an early age, I do not even remember when it all began. I lived my whole life his litter. My mother, when she learned, My bastard father went to Durkee. Yes, he even had the influence it. The truth is now the scum losing ground one after the other. All his life he was a senior cop, but now retired, and as it turned out, This kid can just money complain. All his business went bankrupt, whatever the context, it do not connect. Political career is his last chance to jump into the passing train." She poured wine into glasses, and it was noticeable how her hands were shaking. "You see this rich house? Guard at the entrance, All this luxury? It''s all a chimera. My father is not something that on the verge of bankruptcy, He is already far beyond. None of my business, we would have gone begging."'

					act 'Ask her how she knows there is no business going on':
						cls
						minut += 15
						alko += 2
						gs 'stat'
						'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
						'You asked Albina "And how are you now no business going?" Albina shrugged "But I have no idea. Dad poured all the assets in the election campaign. We still have money left serious people. And now it''s over. There is not my business, nor his political career. There is only the debts and bad creditors." She grabbed the bottle and poured more wine, you drink more wine with Albina.'

						act 'Tell Albina that you didn''t got the whole picture':
							cls
							minut += 15
							alko += 2
							gs 'stat'
							'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
							'You murmured "I have it all in my head does not fit" Albina smirked "What is there to be laid. Daddy pedophile fucked me from childhood. His influence that would be enough to cover their tracks." She paused and added, "The most worthless, he made me a monster. I just have not had a chance to grow up normal. I understand all this head, but nothing I can not do already. I like to fuck, and with whom pohrenu. I''m down and out, and pervert quite capable of being a normal mother and wife." We always cold and ironic Albina had tears in her eyes and she began to pour wine into glasses.'

							act 'Drink':
								cls
								minut += 15
								alko += 2
								gs 'stat'
								'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
								'You drank wine with Albina and she took herself spoke again. "Sorry, that a bloody here. Just zadolbalo all. This provincial town anyone would get. Around one bigots. In the mouth and take all, fucked, immediately in nothing put. But men rarely goats, and strive to climb under her skirt, and then all of permission or excuse. You feel like a piece of meat. And most do not know how really nothing, although of course the ego of all th-th. I''ve said nothing about kissing, almost no one knows how to kiss." She smiled at her head tilted towards your face.'

								act 'Kiss':
									cls
									minut += 5
									horny += 20
									gs 'stat'
									'<center><img src="images/qwest/alter/albina/kiss.jpg"></center>'
									'Albina get you hot and tender kiss on the lips, you feel like the excitement of her kiss you covered.'

									act 'Kiss':
										cls
										minut += 5
										horny += 20
										gs 'stat'
										'<center><img src="images/qwest/alter/albina/kiss2.jpg"></center>'
										'Albina her hand and you felt something as her fingers penetrated you between your legs and sliding her panties to the side began to caress your pussy.'

										act 'Kiss':
											cls
											minut += 5
											horny += 20
											gs 'stat'
											'<center><img src="images/qwest/alter/albina/kiss3.jpg"></center>'
											'Albino cleverly section you without stopping to caress your expiring juices from the pussy and continuing desire to kiss you on the lips.'

											act 'Further':
												cls
												minut += 30

												if npcSex[23] = 0:npcSex[23] = 1 & girl += 1

												lesbian += 1
												horny = 0
												orgasm += 1
												gs 'stat'
												'<center><img src="images/qwest/alter/albina/lesb.jpg"></center>'
												'Albina bent between your feet and you will feel the touch of her tongue and lips to your pussy, Albino cleverly you start to lick and every movement of her wet tongue hit your swollen clit. Soon, a nice fire swept your entire body and you hit stuns orgasm. In the eyes of all faded and when you came to yourself, they saw sitting next to a pretty smiling Albina.'

												act 'Say goodbye and go home':gt 'gorodok'
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	else
		if albsporthome = 0:
			cls
			gs 'stat'
			'<center><img src="images/qwest/alter/albina/train.jpg"></center>'
			'Albina trains in his room doing stretching.'

			act 'Chat':
				cls
				albsporthome = 1
				minut += 15
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/23.jpg"></center>'
				'Albina you smiled and said, "Now I can not afford to rent a room for training, Here I train at home, that would not be out of shape. By the way, I could teach you and stripdensu and poledensu."'

				act 'Further':gt $curloc
			end
		else
			if albsportday ! daystart:
				cls
				gs 'stat'
				'<center><img src="images/qwest/alter/albina/train.jpg"></center>'
				'Albina trains in his room doing stretching. She smiles at you and asks "Well? Potreniruemsya?"'

				act 'Learn striptease (2:00)':
					cla
					*clr
					albsportday = daystart
					minut += 120
					fat -= 5
					agil += rand (1, 3)
					manna -= 8
					sweat += 3
					gs 'stat'
					! WD: Remove Dupe Images ~ '<center><img src="images/pic/stripdance.jpg"></center>'
					'<center><img src="images/etogame/stripdance.jpg"></center>'

					if dance >= 100:
						stripdance += rand(2, 10)
						'You taught Albina razdevatsya passionately dancing to the music.'

						if stripdance >= 100:'But you could not learn anything new, all that you already know how great and you know.'
					else
						dance += rand(5, 15)
						'Striptease for you too complex, you can not perform the dance moves combining them with strip. Albina recommends that you first learn to ordinary club dances.'
					end

					act 'Rest':gt $curloc
				end

				act 'Learn poledancing (2:00)':
					cla
					*clr
					albsportday = daystart
					minut += 120
					fat -= 10
					stren += rand (1, 3)
					vital += rand (1, 3)
					manna -= 5
					sweat += 3
					gs 'stat'
					'<center><img src="images/pic/poledance.jpg"></center>'

					if dance >= 100 and stripdance >= 100 and stren >= 80:
						poledance += rand(2, 5)
						'You taught Albina various acrobatics on the pole.'

						if poledance >= 100:'But you could not learn anything new, all that you already know how great and you know.'
					else
						'Already in the first exercise. It looks like this kind of dance you until the teeth'

						if stren < 80:'Albina explain to you that dances on a pole, than the ability to dance, require more physical strength.'
					end

					act 'Rest':gt $curloc
				end

				if stren < 80:
					'Albina grins "You''re still pretty weak for dancing on a pole, we can practice developing your strength."'

					act 'Develop strength (2:00)':
						cls
						albsportday = daystart
						minut += 120
						stren += rand (2, 5)
						gs 'stat'
						'<center><img src="images/qwest/alter/albina/stren.jpg"></center>'
						'You are led by Albina developed their strength by performing various exercises.'

						act 'Rest':gt $curloc
					end
				end

				act 'Tell Albina that you are not in the mood':albsportday = daystart & gt $curloc
			elseif albsportday = daystart:
				if sweat <= 0:
					if hapri <= 0:
						hapri = 1
						gs 'stat'
						'Albina grins looking at your tousled hair and took a comb combs you.'
					end

					if albdinday ! daystart:
						albdinday = daystart
						gs 'albdin'
					end
				elseif sweat > 0:
					'Albina grins "Go take a shower <<$nickname>>, you are all sweaty now."'

					act 'Get into the shower (0:15)':
						cls
						dynamic $showerdin
						minut += 15
						horny = horny + (hornyboost/10) - (hornydamp/10) + 1
						hapri = 0
						mop = 1
						sweat = -3
						if frost > 0:frost = 0

						gs 'stat'
						'<center><img src="images/pics/dush.jpg"></center>'
						'You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'

						act 'Get out of the shower':gt $curloc
					end
				end
			end
		end
	end
end

if hour >= 20:
	'Albina says, he wants to go to the disco.'

	if money >= 25:act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
end

act 'Say goodbye and go home':gt 'gorodok'

--- albinahome ---------------------------------
# albdin
temp = rand(0, 3)

if temp = 0:
	'Albina offers to play a video game.'
	act 'Play':
		cls
		minut += 60
		manna += 100
		willpower += 20
		react += rand(0, 1)
		gs 'stat'

		'<center><img src="images/qwest/alter/albina/game.jpg"></center>'
		'You and Albina laid before a huge TV which was connected set-top box.'
		'Albina turned on the game and you started to play with her.'

		if albsexday = daystart:
			act 'Rest':gt $curloc
		else
			'Albina winking at you "<<$name>>, and let''s play on the desire, if I win, I''ll do something with you, and if you win, you can do with me anything"'

			act 'Refuse':gt $curloc

			act 'Bring it on':
				cls
				albsexday = daystart

				gs 'stat'
				'<center><img src="images/qwest/alter/albina/game.jpg"></center>'

				temp = rand(1, 100)
				if react >= 75 and temp >= 40:
					albplay = 1
				elseif react >= 50 and temp >= 50:
					albplay = 1
				elseif react >= 25 and temp >= 75:
					albplay = 1
				else
					albplay = 0
				end

				if albplay = 0:
					'Albina easily beat you and laughing as the villain of the vaudeville slapped you on the ass palm "Arise cancer <<$name>>! Be my bitch."'

					if rand(0, 1) = 0:
						act 'Get on all fours':
							cls
							albsexday = daystart
							minut += 15
							$boy = 'Albina'

							if vagina < 10:dick = 10
							if vagina >= 10:dick = vagina + 5
							if npcSex[23] = 0:npcSex[23] = 1 & girl += 1

							lesbian += 1
							straponVagPass += 1
							gs 'stat'
							'<center><img src="images/qwest/alter/albina/strapon.jpg"></center>'
							'Albina took <<dick>> inch strap-on harness and attach it to yourself. Her hands stroked gently between your legs and you feel as her fingers began to caress your pussy.'
							gs 'dinsex2', 'd_strapon_vag'

							act 'Rest':gt $curloc
						end
					else
						act 'Get on all fours':
							cls
							albsexday = daystart
							minut += 15
							$boy = 'Albina'

							if anus < 10:dick = 10
							if anus >= 10:dick = anus+2
							if npcSex[23] = 0:npcSex[23] = 1 & girl += 1

							lesbian += 1
							straponAnalPass += 1
							gs 'stat'
							'<center><img src="images/qwest/alter/albina/analstrapon.jpg"></center>'
							'Albina took <<dick>> inch strap-on harness and attach it to yourself. Her hands stroked gently between your legs and you feel as her fingers began to caress your anus.'
							gs 'dinsex2', 'd_strapon_anal'

							act 'Rest':gt $curloc
						end
					end
				else
					'Albina purged you, and silently slipped into the hands of you strap. "On, Bey do not regret Chapaya."'

					act 'Put Albina on all fours and fuck her pussy':
						cls
						albsexday = daystart
						minut += 15

						if npcSex[23] = 0:npcSex[23] = 1 & girl += 1

						lesbian += 1
						straponVagAkt += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/albina/straponakt.jpg"></center>'
						'You started to peck Albina threesome pussy and she moaned and spit on his back strapon, Finally you''re just tired and stopped.'

						act 'Rest':gt $curloc
					end

					act 'Put Albina on all fours and fuck her ass':
						cls
						albsexday = daystart
						minut += 15
						if npcSex[23] = 0:npcSex[23] = 1 & girl += 1
						lesbian += 1
						straponVagAkt += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/albina/straponaktanal.jpg"></center>'
						'You started to peck Albina threesome in the ass and she moaned and spit on his back strapon, Finally you''re just tired and stopped.'

						act 'Rest':gt $curloc
					end
				end
			end
		end
	end
elseif temp = 1:
	'Albina offers with her fun trying on dresses.'
	act 'Trying on clothes':
		cls
		minut += 60
		manna += 100
		willpower += 20
		gs 'stat'
		'<center><img src="images/qwest/alter/albina/dressing.jpg"></center>'
		'You and Albina opened her huge wardrobe and began to dig into the fun rags. She was just a bottomless closet packed with a wide range of clothing and you have an hour together trying on different outfits with Albina.'

		if albsexday ! daystart:
			act 'Rest':gt $curloc
		elseif albsexday = daystart:
			act 'Rest':gt $curloc
		end
	end
elseif temp = 2:
	'Albina offers chat.'
	act 'Chat':
		cls
		minut += 60
		manna += 100
		willpower += 20
		gs 'stat'
		'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
		''

		if albsexday ! daystart:
			act 'Rest':gt $curloc
		elseif albsexday = daystart:
			act 'Rest':gt $curloc
		end
	end
elseif temp = 3:
	'Albina offers a glass of wine.'
	act 'Drink wine':
		cls
		minut += 60
		manna += 100
		willpower += 20
		alko += 4
		gs 'stat'
		'<center><img src="images/qwest/alter/albina/drunk.jpg"></center>'
		''

		if albsexday ! daystart:
			act 'Rest':gt $curloc
		elseif albsexday = daystart:
			act 'Rest':gt $curloc
		end
	end
end

--- albdin ---------------------------------
# albinaporog
gs 'stat'

if hour >= 17 and week < 6 and kanikuli = 0 and hour < 20 or hour >= 9 and week >= 6 and kanikuli = 0 and hour < 20 or hour >= 9 and kanikuli > 0 and hour < 20:
	'You rang the bell on the gate intercom and you opened guard, you said, that go to Albina. He called on the phone and after a brief conversation let you. "Albina now at. Come."'

	act 'Go into Albina''s room':gt 'albinahome'
else
	if hour >= 9:'You rang the bell on the gate intercom and you opened guard, you said, that go to Albina. He shook his head "Albina is currently not at home."'
	if hour < 9:'You rang the bell on the gate intercom and you opened guard, "Come no earlier than nine."'

	act 'Say goodbye and go home':gt 'gorodok'
end

--- albinaporog ---------------------------------
# AlbFatherQW
$din_zajava_albfather = {
	act 'Write a statement':
		cls
		minut += 1
		AlbFather = 2
		gs 'stat'
		'You have agreed to write a statement, Captain quite nodded. "You''re a smart girl and choose the right side. Come to me in the car, everything is there to arrange quick."'

		act 'Go with Chernov':
			cls
			minut += 1
			AlbZaDay = daystart
			gs 'stat'
			'You have written and signed statement to the captain, and then he let go of you.'

			act 'Escape.':gt 'gorodok'
		end
	end
}

$din_zajava_albfather_no2 = {
	act 'Refuse':
		cls
		minut += 1
		AlbFather = -1
		gs 'stat'
		'You resolutely refused to write a statement to the captain. Captain sighed sadly, "I see. You currently have acquired powerful enemies girl."'

		act 'Warn Albina':
			cls
			minut += 1
			AlbFrend = 1
			ZvezdEnd = 1
			gs 'stat'
			'You quickly dialed the number and Albina told her what had happened. Albina said thoughtfully thank you and hung up.'

			act 'Escape':gt 'gorodok'
		end
	end
}

$din_zajava_albfather_no = {
	act 'Don''t write a statement':
		cls
		minut += 1
		gs 'stat'
		'You refused to write a statement and the captain began to persuade you. "Think about the consequences. Albina not you pass, so somebody else, in the end we ourselves can take it easy now. Lack of evidence."'

		if intel >= 80:
			act 'Ask him why you should tell him anything':
				cls
				minut += 1
				gs 'stat'
				'You asked the captain if they all so good, then why are you thio them. The captain replied, "Frankly, it''s not our jurisdiction, and to act without direct application dangerous Barlovskogo we can and push, but we may not be pleasant consequences. A statement is a guarantee of success of the operation."'
				dynamic $din_zajava_albfather
				dynamic $din_zajava_albfather_no2
			end
		end

		dynamic $din_zajava_albfather
		dynamic $din_zajava_albfather_no2
	end
}

gs 'stat'
'Suddenly stops the car next to you. It comes from a man in a nice suit and suitable for you. He pulls out of Corman''s license and opened it seems. "Captain Chernov. State Security Service." You surprise spotted documents all true identity now. You said in surprise, "Why I needed you? Here what that mistake." Captain confident tone Chernov told you "No mistake, you <<$name>> <<$surname>>, let''s step aside and talk."'
act 'Move with Chernov':
	cls
	minut += 1
	gs 'stat'
	'You walked away with Captain Chernov. Along the way, you notice how it sticks armpit holster with gun. Ogladevshis Chernov begins "<<$name>>. I know that you are new to the team Zvezdushki. Just know anything but this team has been dancing. Zvezdushkam will end soon, with your help or without your help. It''s not even so important, what is important when case will be in motion, the whole town will know what you did in this team. And not even so important, engaged or not, but will not stop the gossip. give you a big fine, inform parents, school, put on record with the police. But all this can be avoided. "'

	act 'Ask him how to avoid it':
		cls
		minut += 1
		gs 'stat'

		if age < 18:'You asked the captain Chernov as possible to avoid publicity and consequences. Captain Chernov said to you "You write to the security service that Albina Barlovskaya entices you into prostitution. Besides you are underage. This extra trouble for Albina."'
		if age >= 18:'You asked the captain Chernov as possible to avoid publicity and consequences. Captain Chernov said to you "You write to the security service that Albina Barlovskaya entices you into prostitution."'

		'Captain Chernov paused, giving you time to think and continued. "If you write an application, you will be charged as the victim, no publicity will not. Actually, and no matter what will not write a statement. Next''ll have this thing in me."'

		if intel >= 70:
			act 'Ask him why a security service is engaged instead of the police':
				cls
				minut += 1
				gs 'stat'
				'You asked what is so important in Albina, she took not the police and security service. Captain bad grinned "I underestimated you, you''re a smart girl. Okay, I''ll play in the open. You know who the father of Albina? Barlovsky Boris, a retired police colonel. He served as chief of police in this town. Suppose he is retired now, but it had great communication with the police. "'

				if intel >= 75:
					act 'Tell him that he didn''t answered your question':
						cls
						minut += 1
						gs 'stat'
						'You told the captain that he did not answer the question, why now suddenly interested in the affairs of Albina why security service. The captain nodded, "It''s very simple. Albina''s father decided to go into politics and become the mayor of the town. There are certain forces that want to stop him. What could be better daughter criminals engaged in a brothel."'
						dynamic $din_zajava_albfather
						dynamic $din_zajava_albfather_no
					end
				end

				dynamic $din_zajava_albfather
				dynamic $din_zajava_albfather_no
			end
		end

		dynamic $din_zajava_albfather
		dynamic $din_zajava_albfather_no
	end
end

--- AlbFatherQW ---------------------------------
# AlbStarsEnd
ZvezdEnd = 1
AlbFather = 10
AlbinaInPrison = 1
AlbCopDay = daystart
grupTipe[23] = -10
Chernov = 10
gs 'stat'
'You walk down the street and see Albina Barlovskuyu. Near it stops the machine out people run out and put her face to the ground setting the stage for her hands behind her back and putting handcuffs. Albina outraged, but it shows the documents for her arrest for running a brothel. After a search of her rise to their feet and literally zashvyrivayut in police car, then take away.'

act 'Leave':gt 'gorodok'

--- AlbStarsEnd ---------------------------------
# arturRinok
if $ARGS[0] = 'start':
	if arturKnow = 0:
		cls
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
		'The Caucasian smiled at you and handed you a tangerine.'

		act 'Take a tangerine':
			cls
			minut += 2
			gs 'stat'
			'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
			'You took a tangerine from the hands of the Caucasian. He smiled and said you "You''re so beautiful devushka. Wai. sponges persik. Come to eat barbecue, I''ll take this chacha!"'

			act 'Refuse':
				cls
				minut += 2

				if bag = 0:$arturgift = 'handbag'
				if bag > 0:$arturgift = 'cosmetics'

				gs 'stat'
				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
				'You started to refuse and back away from the loving Caucasian. He "Wai, zachem offend? Nothing bad will not Tiebei, mom swear! Hochish, I ''ll give you <<$arturgift>>"'

				act 'Leave':gt 'Grinok'

				act 'Show interest':
					cls
					minut += 2
					gs 'stat'
					'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
					'You are interested in this property unfamiliar Caucasian. He is immediately zamtil and leaving the tray on the other Caucasians immediately came up to you and took you by the arm "Ne fear devochka, Uncle Arturik ne bites."'

					act 'Leave':gt 'Grinok'
					act 'Go with Arthur':gt 'arturHome'
				end
			end
		end
	else
		if arturday ! day:
			gt 'arturQW', 'arturQW_1'
		elseif arturday = day:
			cls
			minut += 5
			gs 'stat'

			if arturblowday ! day:
				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
				'Arthur smiled kindly and handed you a tangerine. "Wai, work to do, I''m sorry. Unless it''s quick."'

				act 'Go with Arthur':gt 'arturkiosk'
			elseif arturblowday = day:
				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
				'Arthur smiled amiably you. "Wai, work to do, I''m sorry."'

				act 'Leave':gt 'Grinok'
			end
		end
	end

	act 'Leave':gt 'Grinok'
end
if $ARGS[0] = 'work_1':
	cls
	gs 'stat'

	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
	'-Maladets <<$name>>, time has come, get to work Daraga, evening with you burst into tears'

	act 'Trade':
		cls
		hour = 18
		arturDaysWorked1 += 1
		gs 'stat'

		'<center><img src="images/qwest/alter/arturQW/arturQW_3.jpg"></center>'
		'You worked until the evening at the counter, selling fresh fruit and not very, quarreled with customers and very tired.'

		if arturDaysWorked1 >= 10:
			gt 'arturQW', 'arturQW_2'
		else
			act 'Go with Arthur':
				cls
				minut += 5
				money += 5000
				gs 'stat'

				'<center><img src="images/qwest/alter/arturQW/arturQW_4.jpg"></center>'
				'-<<$name>>, atlichna parabotala, Here you go piles deservedly earned, Arthur hands you 5000 rubles.'
				'-I like you very much helping, thank you very much Arturchik, look at him grateful eyes and you take money.'
				'-Well, you znaesh, INTO Tiebei I cry not only for the eyes krasivae, but also for the elastic ass, and tight squeezes your bread.'

				act 'Leave':gt 'Grinok'
			end
		end
	end
end

if $ARGS[0] = 'work_2':
	cls
	gs 'stat'

	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'

	if arturDaysWorked2 = 0:'-That''s my new super sexy secretary came.'

	'Quickly to work, we''ve got the usual paperwork complete ass.'

	act 'Work':
		cls
		hour = 17
		arturDaysWorked2 += 1
		gs 'stat'

		'<center><img src="images/qwest/alter/arturQW/arturQW_6.jpg"></center>'
		'You hour working at a computer, checked checked buying and selling, calculated daily expenses and income.'

		act 'Go with Arthur':
			cls
			minut += 5
			money += 10000
			gs 'stat'

			'<center><img src="images/qwest/alter/arturQW/arturQW_7.jpg"></center>'
			'-<<$name>> worked perfectly, Now I for papers can be calm.'
			'-Yes, you got a mess, I still have to deal with it all and razbyratsya.'
			'-Oh well, Óspakr Ögmundsson baby, have time to figure it out all over the spakoyno.'
			'Now let''s go eat barbecue, chacha drink, grab you by the ass and strongly squeezing rolls, Arthur suggested.'

			act 'Go with Arthur':gt 'arturHome'
			act 'Escape':gt 'Grinok'
		end
	end
end

--- arturRinok ---------------------------------
# arturHome
arturKnow = 1
minut += 15
gs 'stat'
'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
'Arthur took you to the parking lot where his black Priora. You got into the car and drove Arthur somewhere you "I lyuchshy by Del skewers, ne what rubbish in cafe, real jam." After a while.'

act 'Go to his home':
	cls
	minut += 60
	alko += 6
	$boy = 'Arthur'
	silavag = 1
	dick = 26
	arturTimes += 1
	gs 'stat'
	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
	'Arthur generously the table, you ate and drank grape skewers brew chacha and quickly tipsy. Arthur turned on the music and came up to you "Come to me devochka."'

	act 'Further':gt 'arturSex'

	if condomtalkartur = 0 and arturSex > 0:
		act 'Ask him to wear a condom':
			cls
			condomtalkartur = 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
			'You asked Arthur wear a condom, what Arthur protested "Wai, sex in a condom is like breathing through a mask. Nat!"'

			act 'Further':gt 'arturSex'
		end
	end
end

--- arturHome ---------------------------------
# arturSex
horny += 10

if arturSex = 0:arturSex = 1 & guy += 1

arturDay = day
gs 'stat'
gs 'arturdin'
'Arthur put his arm around you, and his hands began to take off your clothes and caress your body.'

act 'Kneel down':
	cls
	minut += 5
	gs 'stat'
	'<center><img src="images/qwest/alter/artur/bj.jpg"></center>'
	'You sat down on his knees before Arthur and began stroking his long, thick cock. Arthur impatiently stroking your head his sinewy hand.'

	act 'Suck':
		cls
		minut += 5
		artbj += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/bj2.jpg"></center>'
		'You have opened my mouth and my lips wrapped around a hefty cock and began to suck.'

		act 'Further':
			cls
			$artbef = 'You suck dick and Arthur grabs you by the hair.'
			dynamic $d_art_facefuck
		end
	end

	act 'Masturbate him':
		cls
		bj += 1
		$artbef = 'You began to masturbate member and Arthur immediately lost patience.'
		dynamic $d_art_facefuck
	end
end

act 'Enjoy':
	cls
	minut += 5
	horny += 10
	gs 'stat'
	'Arthur caresses you and undresses.'
	temp = rand(0, 2)

	if temp = 0:dynamic $d_art_bed
	if temp = 1:dynamic $d_art_bedmiss
	if temp = 2:dynamic $d_art_facefuck
end

--- arturSex ---------------------------------
# arturkiosk
gs 'stat'
'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
'Together with Arthur you are logged into a container that is used as a warehouse. He immediately unbuttoned his pants "Come Svetik, After working mouth."'

act 'Kneel down':
	cls
	arturTimes += 1
	minut += 15
	bj += 1
	gs 'stat'
	'<center><img src="images/qwest/alter/artur/cocksucer.jpg"></center>'
	'You sit down in front of Arthur and his lips wrapped around his fat cock. You began to suck his dick sucking it up to the throat.'

	act 'Suck':
		cls
		minut += 15
		cumlip += 1
		swallow += 1
		money += 500
		arturblowday = day
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/cocksuckercum.jpg"></center>'
		'Arthur began to cum in your mouth and you become immediately swallow sperm. After that Arthur grinned, bosses cock in his pants and said "Wai Svetka, You''re a real nipple. Here''s from Uncle Arturchik, Buy sebe konfetok." he handed to you 500 rubles.'

		act 'Leave':gt 'Grinok'
	end
end

--- arturkiosk ---------------------------------
# arturend
gs 'stat'
'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
'Arthur stood with you and then .'

act 'Brush up':
	cls
	minut += 15
	artfucktimes = 0
	artfacefucktimes = 0
	pose = 0
	cumface = 0

	if artbj > 0:artbj = 0 & bj += 1
	if artsex > 0:artsex = 0 & sex += 1
	if artanal > 0:artanal = 0 & anal += 1

	gs 'stat'
	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
	'You quickly wiped her face and Arthur made a gift to you.'

	if bag > 0:
		arturgift = rand(0, 2)

		if arturgift = 0:
			kosmetitka += 20
			'Arthur gave you a portable of cosmetics.'
		elseif arturgift = 1:
			kosmetica += 20
			'Arthur gave you a of cosmetics.'
		elseif arturgift = 2:
			money += 1000
			'Arthur said "uh, I did not have time to look for a gift for you, a thousand, itself buy, what do you like."'
		end
	elseif bag = 0:
		bag = 1
		'He gave you a handbag.'
	end

	act 'Leave':gt 'gorodok'
end

--- arturend ---------------------------------
# arturdin
$d_art_facefuck = {
	minut += 5
	throat += 1
	artfacefucktimes += 1
	artbj += 1
	picrand = rand(0, 5)
	gs 'stat'
	'<center><img src="images/qwest/alter/artur/facefuck<<picrand>>.jpg"></center>'
	'<<$artbef>> Arthur grabbed you by the hair and just planted your mouth to your huge dick.'

	if throat < dick:
		'You choke when the member to disperse flies into your throat dousing it with fire. You twists gag reflex.'
	else
		'Throat douse the fire when a member of Arthur with overclocking enters your throat and your nose rests on the curly pubic Arthur.'
	end

	if artfacefucktimes < 4:
		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_artlick
		if tipsexart = 1:dynamic $d_artchik
	elseif artfacefucktimes >= 4:
		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_art_bed
		if tipsexart = 1:dynamic $d_art_bedmiss
	end
}

$d_artlick = {
	act 'Further':
		cls
		minut += 5
		artbj += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/lick.jpg"></center>'
		'Arthur pulls his dick out of your mouth and starts to beat you on the lips, you draw out the tongue licking the head and huge dick batters you face in language and.'

		act 'Further':
			cls
			$artbef = ''
			dynamic $d_art_facefuck
		end
	end
}

$d_artchik = {
	act 'Further':
		cls
		minut += 5
		artbj += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/chik.jpg"></center>'
		'Arthur puts his dick between your cheek and teeth and easily palm strikes you on the cheek.'

		act 'Further':
			cls
			$artbef = ''
			dynamic $d_art_facefuck
		end
	end
}

$d_art_bed = {
	act 'Further':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/bed.jpg"></center>'
		'Arthur puts you on the bed up booty.'

		if artfucktimes < 4:
			artrand = rand(0, 2)

			if artrand = 0:dynamic $d_art_sexdog
			if artrand = 1:dynamic $d_art_anal
			if artrand = 2:dynamic $d_art_fist
		elseif artfucktimes >= 4:
			artrand = rand(0, 2)

			if artrand = 0:dynamic $d_art_sexdog_cum
			if artrand = 1:dynamic $d_art_cum
			if artrand = 2:dynamic $d_art_anal_cum
		end
	end
}

$d_art_bedmiss = {
	act 'Further':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/bedmiss.jpg"></center>'
		'Arthur puts you on the bed and pushes your legs.'

		if artfucktimes < 4:
			dynamic $d_art_sexmiss
		elseif artfucktimes >= 4:
			artrand = rand(0, 1)

			if artrand = 0:dynamic $d_art_sexmiss_cum
			if artrand = 1:dynamic $d_art_cum
		end
	end
}

$d_art_sexmiss = {
	act 'Further':
		cls
		minut += 5
		pose = 0
		artfucktimes += 1
		artsex += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/sexmiss.jpg"></center>'
		'Arthur is taken between your legs and you feel his hard cock rests on you in the pussy.'
		dynamic $sexstart4
		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_art_bed
		if tipsexart = 1:dynamic $d_art_bedmiss
	end
}

$d_art_sexmiss_cum = {
	act 'Further':
		cls
		minut += 5
		pose = 0
		artfucktimes += 1
		artsex += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/sexmiss.jpg"></center>'
		'Arthur is taken between your legs and you feel his hard cock rests on you in the pussy.'
		dynamic $sexstart4
		dynamic $sexcum

		act 'Further':gt 'arturend'
	end
}

$d_art_sexdog = {
	act 'Further':
		cls
		minut += 5
		artfucktimes += 1
		pose = 1
		artsex += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/sexdog.jpg"></center>'
		'Arthur grabs you with its palms for the ass and you feel his hard cock rests on your pussy.'
		dynamic $sexstart4
		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_art_bed
		if tipsexart = 1:dynamic $d_art_bedmiss
	end
}

$d_art_sexdog_cum = {
	act 'Further':
		cls
		minut += 5
		artfucktimes += 1
		pose = 1
		artsex += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/sexdog.jpg"></center>'
		'Arthur grabs you with its palms for the ass and you feel his hard cock rests on your pussy.'
		dynamic $sexstart4
		dynamic $sexcum

		act 'Further':gt 'arturend'
	end
}

$d_art_anal = {
	act 'Further':
		cls
		minut += 5
		artfucktimes += 1
		pose = 1
		artanal += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/anal.jpg"></center>'
		'Arthur grabs you with its palms for the ass and you feel his hard cock rests in your anus.'
		dynamic $analsex2
		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_art_bed
		if tipsexart = 1:dynamic $d_art_bedmiss
	end
}

$d_art_anal_cum = {
	act 'Further':
		cls
		minut += 5
		artfucktimes += 1
		pose = 1
		artanal += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/anal.jpg"></center>'
		'Arthur grabs you with its palms for the ass and you feel his hard cock rests in your anus.'
		dynamic $analsex2

		act 'Further':
			cls
			minut += 5
			lubonus = 0
			cumanus += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artur/analcreampi.jpg"></center>'
			'In a little while through time <<$boy>> groaned and you feel like your ass fills heat.'

			act 'Further':gt 'arturend'
		end
	end
}

$d_art_cum = {
	act 'Further':
		cls
		minut += 5
		cumface += 1
		facial += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/artur/cum0.jpg"></center>'
		'Arthur suddenly almost knocks you out of bed and put on his knees. In your face hits the jet of sperm.'

		act 'Further':
			cls
			minut += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/artur/cum1.jpg"></center>'
			'Then another jet of sperm gets in your face.'

			act 'Further':
				cls
				minut += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/artur/cum2.jpg"></center>'
				'Next jet of sperm gets you on the lips and in the mouth.'

				act 'Further':
					cls
					minut += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/artur/cum3.jpg"></center>'
					'Arthur finally stops to finish covering almost all of your face with his hot sperm.'

					act 'Further':gt 'arturend'
				end
			end
		end
	end
}

$d_art_fist = {
	act 'Further':
		cls
		minut += 5

		if anus < 30:anus += 3
		if artfucktimes > 0:artfucktimes -= 1

		gs 'stat'

		if anus >= 20:
			'<center><img src="images/qwest/alter/artur/fist2.jpg"></center>'
			'Arthur puts you two fingers in the ass, then adds another finger, and another .'
		end

		if anus < 20:
			'<center><img src="images/qwest/alter/artur/fist.jpg"></center>'
			'Arthur puts you in the ass finger and begins to pick it vigorously.'
		end

		tipsexart = rand(0, 1)

		if tipsexart = 0:dynamic $d_art_bed
		if tipsexart = 1:dynamic $d_art_bedmiss
	end
}

--- arturdin ---------------------------------
# arturQW
if $ARGS[0] = 'arturQW_1':
	if arturTimes >= 5 and GorSlut = 0 and vnesh >= 30:
		cls
		minut += 2
		gs 'stat'

		'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
		'-Svetka, I TEBA uzhe long time and know Harashi, you clear the calf and fully deserved my respect.'
		'-Oh, Thanks Arturchik, I''m so pleased to hear that.'
		'-Zamechayu have tebya in seme is not all right with loot, I tebe help, prihadi to MNE on weekends and budesh zarabytyvat like a queen.'

		act 'Agree':
			cls
			minut += 2
			if arturQW = 0:arturQW = 1
			gs 'stat'

			'<center><img src="images/qwest/alter/arturQW/arturQW_1.jpg"></center>'
			'-Well, if you''re really going to pay well, then I refuse sin, interested you say.'
			'-Kanechna Beauty, I did not know what otkazheshsa from maego super predlazheniya.'
			'Excited Arthur comes to your hard squeezes your ass.'
			'-So Asli biznes case settled, we will go to eat barbecue, chacha drink!'

			act 'Go with Arthur':gt 'arturHome'
			act 'Leave':gt 'Grinok'
		end
		act 'Refuse':
			cls
			minut += 2
			gs 'stat'

			'<center><img src="images/qwest/alter/arturQW/arturQW_2.jpg"></center>'
			'-Thank you for Arturchik tempting offer, but I have so much to do and, learning, dancing, volleyball, and so I do not have time to live.'
			'-As you like Beauty, my business predlazhit, with sadness on her face I told you Arthur and added:'
			'- Then ne forget inagda prihadit ka MNE visit, And now let''s go eat barbecue, chacha drink? grabbing you by the priest suggested dryly Arthur.'

			act 'Go with Arthur':gt 'arturHome'
			act 'Leave':gt 'Grinok'
		end
	else
		cls
		gs 'stat'

		'Arthur smiled kindly and handed you a tangerine. "Come to eat barbecue, chacha drink!"'

		act 'Go with Arthur':gt 'arturHome'
		act 'Leave':gt 'Grinok'
	end
end

if $ARGS[0] = 'arturQW_2':
	cls
	minut += 10
	money += 5000
	gs 'stat'

	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
	'-Sveta, you are my treasure, because tebe our pradazhi doubled, always, said, that the need for a counter seat sexy girl.'
	'-Thank Arturchik, but I''m tired of hanging around behind the counter, I think already on the termination of work you.'
	'-What? Damn it, and thought. It is fine, It is fine, a girl like you should have a decent place.'
	'I will go to increase, I fired my bookkeeper, the old hag. Now you enter on this post.'
	'You will receive twice bolshe, but should come every day 16.00, otherwise I''ll fire, despite your elastic ass.'

	act 'Agree':
		cls
		minut += 5
		if arturQW = 1:arturQW = 2
		gs 'stat'

		'<center><img src="images/qwest/alter/arturQW/arturQW_5.jpg"></center>'
		'-It changes everything, I now agree to work for you yet.'
		'-Kanechno soglasishsya, now only budesh twist times a day and getting the booty I have great grandmother.'
		'-Come Beauty, go eat barbecue, chacha drink, roughly grabbing you by the priest suggested Arthur.'

		act 'Go with Arthur':gt 'arturHome'
	end
	act 'Refuse':
		cls
		minut += 5
		gs 'stat'

		'<center><img src="images/qwest/alter/arturQW/arturQW_2.jpg"></center>'
		'-Thank you for Arturchik tempting offer, but I have so much to do and, learning, dancing, volleyball, and so I do not have time to live.'
		'-As you like Beauty, my business predlazhit, with sadness on her face I told you Arthur and added:'
		'-Then ne forget inagda prihadit ka MNE visit, And now let''s go eat barbecue, chacha drink? grabbing you by the priest suggested dryly Arthur.'

		act 'Go with Arthur':gt 'arturHome'
		act 'Leave':gt 'Grinok'
	end
end

--- arturQW ---------------------------------

# soba
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/zoo/dog2.jpg"></center>'

	if zoo >= 3 and zoodogonceday ! day:zoodogonceday = day & gt 'soba', 'hardcoredog'
	if horny >= 50 and vagina > 0 and husband = 0:act 'Play with <<$namesob>>th':gt 'soba', 'gamedog'
	if husband > 0 and week < 6 and hour < 17 and hour > 7:act 'Play with <<$namesob>>th':gt 'soba', 'gamedog'

	act 'Even walk <<$namesob>>':
		cls
		minut += 30
		gs 'stat'
		'<center><img src="images/zoo/dog_walk.jpg"></center>'
		'<center><b>You are grazed his <<$namesob>>and</center></b>'

		act 'The house':gt 'korr'

		if horny >= 70 and zoo > 0 and streetdogday ! day:act 'Coitus':dynamic $polactdog
	end

	act 'Leave':gt 'korr'

	act 'Take on euthanasia':
		sobaka = 0
		zoo = 0
		minut += 60
		gt 'korr'
	end
end

if $ARGS[0] = 'gamedog':
	cla
	*clr
	horny += 30
	gs 'stat'
	'<center><img src="images/zoo/1.jpg"></center>'
	'I called <<$namesob>>and to his bed, that would play with him. I kissed him, played with legs, stroking his neck and stomach. Suddenly, I have a pussy starts to itch. I can not understand why, but I strongly wanted sex. Suddenly I saw a member of his stallion. I came up with the idea completely obezbashennoy. I wanted to play with this member.'

	act 'Leave':dom += 5 & gt 'korr'

	act 'Writing lick':
		cla
		*clr
		'<center><img src="images/zoo/2.jpg"></center>'
		'I leaned back against the wall and spread her legs. I handed my dog ​​helped find my hole. My stallion understood, and began to lick my pussy with his tongue. It was strange and nice. His tongue licked all at once. It was very unusual. I decided to change the posture.'

		act 'Change position':
			cla
			*clr
			horny += 10
			minut += 10
			os += 10
			'<center><img src="images/zoo/4.jpg"></center>'
			'He licks my pussy with his tongue with a rough surface. For the full experience, I Spreading their delicate fingers pussy lips.'

			act 'More actions':gt 'soba', 'gamedog'
		end
	end

	act 'Take by mouth':
		cla
		*clr
		os += 10
		horny += 10
		minut += 10
		'<center><img src="images/zoo/3.jpg"></center>'
		'I herded the dog on the floor, and turned her back to yourself. With one hand I took the balls. Then I closed my eyes and tongue touched the penis. From an unusual member of the dog to lick, I realized that it''s not so scary. I suck this dick until the swelling and the appearance of the venous network. When it reaches the desired size, I substituted him her pussy.'

		act 'More actions':gt 'soba', 'gamedog'
	end

	if os > 20:
		act 'Insert dick in pussy':
			cla
			*clr
			horny += 30
			minut += 10
			gs 'stat'
			'<center><img src="images/zoo/5.jpg"></center>'
			'Having reached the desired size, excited body goes into my wet cunt. Vaginal sex with a pet is very unusual way. Dog fuck me powerful spurts. He placed deep in my crotch. And this animal brought me to orgasm. I shuddered, and holding their feet and cock, which was inside of me, and I cried. <<$namesob>>of this stuck it out and he began to tremble. It became clear what will happen next. I should very quickly up your face, that would not miss the chance to get this white liquid of my pet.'

			act 'Substitute person':
				cla
				*clr
				orgasm += 1
				horny = 0
				minut += 5
				zoo += 1
				swallow += 1
				cumface += 1
				vagina += 1
				throat += 1
				os = 0
				gs 'stat'
				'<center><img src="images/zoo/9.jpg"></center>'
				'My sex with a dog completes a powerful ejaculation, which shelled and smear all over my face, even got a few drops in the mouth. Taste natural juices - sperm, I loved.'

				if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

				act 'Release <<$namesob>> and get':gt 'korr'
			end
		end
	end
end

if $ARGS[0] = 'hardcoredog':
	cla
	*clr
	'<center><img src="images/zoo/zoof.jpg"></center>'
	'You came to <<$namesob>> in doggie was in a playful mood, he began to wag his tail and nose poke you between her legs.'

	act 'Kiss <<$namesob>>':
		cla
		*clr
		'<center><img src="images/zoo/zoof1.jpg"></center>'
		'You framed face to face <<$namesob>>, and stuck a reed'

		act 'Go with <<$namesob>> in the bedroom':
			cla
			*clr
			horny += 10
			minut += 5
			gs 'stat'
			'<center><img src="images/zoo/spa.jpg"></center>'
			'You undress and lie down on the bed put my vagina <<$namesob>>, he begins to lick her carefully lick your pussy'
			' You get wet'

			act 'Wank dick dog':
				cla
				*clr
				horny += 10
				minut += 5
				gs 'stat'
				'<center><img src="images/zoo/sog.jpg"></center>'
				'You nadrachival member <<$namesob>>'
				' Since you begin to pour juices'

				act 'Take in mouth <<$namesob>>':
					cla
					*clr
					horny += 10
					minut += 5
					gs 'stat'
					'<center><img src="images/zoo/spa1.jpg"></center>'
					'You lick dick <<$namesob>> choking on saliva'
					' You start to go crazy with excitement'

					act 'Doggy-Style before <<$namesob>>':
						cla
						*clr
						horny += 10
						minut += 5
						gs 'stat'
						'<center><img src="images/zoo/spa2.jpg"></center>'
						'Kobelek jumps on you and starts to rub a member of your vagina'
						' You or what not soobrozhaete of sexual desire'

						act 'lie on your back and help him get in <<$namesob>>':
							cla
							*clr
							minut += 5
							gs 'stat'
							'<center><img src="images/zoo/spa3.jpg"></center>'
							'You lays down on his back legs and pushes the stick in his dick hole in its expiring'

							act 'hug legs <<$namesob>>':
								cla
								*clr
								minut += 5
								gs 'stat'
								'<center><img src="images/zoo/spa4.jpg"></center>'
								'You cuddle up to her dog legs and fuck with him'
								' Covers you orgasm but you can not stop here'

								act 'fill <<$namesob>> on the back and jump on his cock':
									cla
									*clr
									minut += 5
									gs 'stat'
									'<center><img src="images/zoo/spa5.jpg"></center>'
									'You jump on the penis male'
									' You just mad with sex'

									act 'Crustaceans stand before doggie':
										cla
										*clr
										minut += 5
										gs 'stat'
										'<center><img src="images/zoo/spa6.jpg"></center>'
										'You jumped off a bent penis and cancer'
										' <<$namesob>> jumped on you and threw you a member of your broken-down pussy.
										You feel that he is ready to be discharged'

										act 'Merge with the dog in orgasm':
											cla
											*clr
											zoo += 1
											swallow += 1
											vagina += 1
											throat += 1
											orgasm += 1
											minut += 5
											horny = 0
											cumpussy += 1
											gs 'stat'
											'<center><img src="images/zoo/spa7.jpg"></center>'
											'You clung to the dog and he razryazhaetsya in you'
											'Member <<$namesob>> grappled with vashoy vagina in a strong castle'

											act 'Get out of bed':gt 'korr'

											if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'
										end
									end
								end
							end
						end
					end
				end
			end
		end

		act 'Go with <<$namesob>> the hall':
			cla
			*clr
			'<center><img src="images/zoo/zoof3.jpg"></center>'
			'You went into the hall undressed and sat on the sofa, <<$namesob>> very excited and began to jump on you'

			act 'try to push <<$namesob>>':
				cla
				*clr
				'<center><img src="images/zoo/zoof 4.jpg"></center>'
				'You tried to throw off the dog, but <<$namesob>> no longer process any attention to your attempts'

				act 'Continue to resist <<$namesob>>':
					cla
					*clr
					'<center><img src="images/zoo/zoof5.jpg"></center>'
					'Your struggle with <<$namesob>> failed, '
					'<<$namesob>> lot of stuff on the couch and went into your pussy'
					'<center><img src="images/zoo/zoof6.jpg"></center>'

					act 'Hug legs and fuck <<$namesob>>':
						cla
						*clr
						gs 'stat'
						'<center><img src="images/zoo/zoof7.jpg"></center>'
						'You surrendered passion with his doggie'
						'You covered orgasm'

						act 'Take charge of semen in the mouth':gt 'soba', 'cumshot1'
						act 'Let cums in pussy':gt 'soba', 'cumshot2'
					end
				end
			end

			act 'Substitute the ass <<$namesob>>':
				cla
				*clr
				gs 'stat'
				'<center><img src="images/zoo/zoof10.jpg"></center>'
				'You povarachivaetsya back and gets cancer'
				' take the term <<$namesob>>and go in his hole <<$namesob>> finished off with all the force you'
				'<center><img src="images/zoo/zoof9.jpg"></center>'

				act 'Take charge of semen in the mouth':gt 'soba', 'cumshot1'
				act 'Let cums in pussy':gt 'soba', 'cumshot2'
			end
		end

		act 'Leave':gt 'korr'
	end

	act 'Even walk <<$namesob>>':
		cla
		*clr
		minut += 20
		gs 'stat'
		'<center><img src="images/zoo/dog_walk.jpg"></center>'
		'<center><b>You are grazed his <<$namesob>>and see that he was very excited</center></b>'
		act 'The house':gt 'korr'

		act 'Go to a private place':
			cla
			*clr
			'<center><img src="images/zoo/yl1.jpg"></center>'
			'Do you give <<$namesob>> into the woods behind the house, pick up his dick and start nadrachivat'

			act 'Take off underwear and bend':
				cla
				*clr
				horny += 10
				minut += 5
				gs 'stat'
				'<center><img src="images/zoo/yl2.jpg"></center>'
				'You bend down before <<$namesob>>, he begins to lick your pussy'
				'You chustvuete that starts to get wet between the legs '

				act 'Suck dick in <<$namesob>>':
					cla
					*clr
					horny += 10
					minut += 10
					gs 'stat'
					'<center><img src="images/zoo/yl3.jpg"></center>'
					'You greedily suck dick <<$namesob>>'
					' This is even more exciting and you want to have sex'

					act 'Shove dick in pussy':gt 'soba', 'zoof14'
					act 'Doggy-Style before <<$namesob>>':gt 'soba', 'zoof15'
				end
			end
		end
	end
end

if $ARGS[0] = 'cumshot2':
	cla
	*clr
	zoo += 1
	swallow += 1
	vagina += 1
	throat += 1
	cumlip += 1
	orgasm += 1
	horny = 0
	minut += 25
	gs 'stat'
	'<center><img src="images/zoo/zoof8.jpg"></center>'
	'<<$namesob>> discharges into your vagina, you stick together with the dog in passion'
	'You covered orgasm'

	if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

	act 'Leave':gt 'korr'
end

if $ARGS[0] = 'cumshot1':
	cla
	*clr
	zoo += 1
	swallow += 1
	vagina += 1
	throat += 1
	cumpussy += 1
	orgasm += 1
	horny = 0
	minut += 25
	gs 'stat'
	'<center><img src="images/zoo/zoof11.jpg"></center>'
	'<<$namesob>> is discharged into the mouth'
	'You covered orgasm'

	if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

	act 'Leave':gt 'korr'
end

if $ARGS[0] = 'zoof14':
	cla
	*clr
	orgasm += 1
	horny = 0
	minut += 5
	zoo += 1
	swallow += 1
	vagina += 1
	throat += 1
	cumpussy += 1
	gs 'stat'
	'<center><img src="images/zoo/yl4.jpg"></center>'
	'You take the term <<$namesob>> and start to fuck them selves'
	'Dog discharged you, you sodragaetes orgasm'

	if REXQW = 0:act 'Look around':gt 'soba', 'zoof16'

	act 'Go home':gt 'korr'
end

if $ARGS[0] = 'zoof15':
	cla
	*clr
	orgasm += 1
	horny = 0
	minut += 5
	zoo += 1
	swallow += 1
	vagina += 1
	throat += 1
	cumpussy += 1
	gs 'stat'
	'<center><img src="images/zoo/yl5.jpg"></center>'
	'You turn your back on <<$namesob>> he jumps on you and starts fucking'
	'Dog discharged you, you sodragaetes orgasm'

	if REXQW =0:act 'Look around':gt 'soba', 'zoof16'

	act 'Go home':gt 'korr'
end

if $ARGS[0] = 'zoof16':
	cla
	*clr
	'<center><img src="images/zoo/yl6.jpg"></center>'
	'You notice in the bushes with his pants Woman'

	act 'Talk':
		cla
		*clr
		minut += 5
		REXQW = 1
		gs 'stat'
		'<center><img src="images/zoo/yl6.jpg"></center>'
		'You go up to her, thinking how to start a conversation'
		'"You see I''m keen doggie?" - She suddenly starts talking
		YES! - Joyfully exclaimed you
		"Come see me talk about your hobby" - said the girl, threw you a business card and left'

		act 'Go home':gt 'korr'
	end
end

if $ARGS[0] = 'zoof27':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/zoo/kuh2.jpg"></center>'
	'You called <<$namesob>>'
	'He ran to the kitchen wagging his tail'

	act 'Undress and give the dog to lick':
		cla
		*clr
		zoo += 1
		minut += 10
		swallow += 1
		throat += 1
		orgasm += 1
		gs 'stat'
		'<center><img src="images/zoo/kuh1.jpg"></center>'
		'You shoot yourself with things and substitute Kobel''kov pussy, he carefully licks her'
		' Orgasm you covered'

		if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

		act 'Dress and come':gt 'korr'
	end

	act 'Undress and stand in front of dog cancer':
		cla
		*clr
		zoo += 1
		minut += 10
		swallow += 1
		vagina += 1
		throat += 1
		orgasm += 1
		gs 'stat'
		'<center><img src="images/zoo/kuh.jpg"></center>'
		'You stand up doggy dog ​​jumps on you and starts fucking'
		' Orgasm you covered'

		if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

		act 'Dress and come':gt 'korr'
	end
end

if $ARGS[0] = 'zoof30':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/zoo/kuh2.jpg"></center>'
	'You undressed and called <<$namesob>>'
	'He ran into the hall delighted as a child'

	act 'Lie down on the sofa and spread her legs ':
		cla
		*clr
		horny += 10
		minut += 10
		gs 'stat'
		'<center><img src="images/zoo/zal1.jpg"></center>'
		'Kobelek ran up to you and started to lick between your legs '
		' You swept excitation'

		act 'Lie on the floor and spread her legs ':
			cla
			*clr
			horny += 10
			minut += 10
			gs 'stat'
			'<center><img src="images/zoo/zal4.jpg"></center>'
			'Dog looming over you and rubbed member'
			' Between his legs became wet'

			act 'Doggy-Style and give the dog':gt 'soba', 'doganalstile'
			act 'Embrace the feet and take dick':gt 'soba', 'dogpussystile'
		end
	end

	act 'Die of cancer and substitute pussy':
		cla
		*clr
		horny += 10
		minut += 10
		gs 'stat'
		'<center><img src="images/zoo/zal.jpg"></center>'
		'Kobelek ran up to you and started to lick between your legs '
		' You swept excitation'

		act 'Lie on the floor and spread her legs ':
			cla
			*clr
			horny += 10
			minut += 10
			gs 'stat'
			'<center><img src="images/zoo/zal4.jpg"></center>'
			'Dog looming over you and rubbed member'
			' Between his legs became wet'

			act 'Doggy-Style and give the dog':gt 'soba', 'doganalstile'
			act 'Embrace the feet and take dick':gt 'soba', 'dogpussystile'
		end
	end
end

if $ARGS[0] = 'doganalstile':
	cla
	*clr
	zoo += 1
	minut += 10
	swallow += 1
	vagina += 1
	throat += 1
	orgasm += 1
	gs 'stat'
	'<center><img src="images/zoo/zal3.jpg"></center>'
	'You stand up doggy dog ​​jumps on you and starts fucking'
	' Orgasm you covered'

	if REXQW = 1:act 'Call Sonia':gt 'soba', 'dzoof1'

	act 'Dress and come':gt 'korr'
end


if $ARGS[0] = 'dogpussystile':
	cla
	*clr
	zoo += 1
	minut += 10
	swallow += 1
	vagina += 1
	throat += 1
	orgasm += 1
	gs 'stat'
	'<center><img src="images/zoo/zal2.jpg"></center>'
	'You obhatyvaete his feet, a member easily finds its way into your pussy'
	' Orgasm you covered'

	if REXQW = 1:act 'Call Sonia':xgt 'soba', 'dzoof1'

	act 'Dress and come':gt 'korr'
end

if $ARGS[0] = 'dzoof1':
	cla
	*clr
	'Have your boy is no longer worth what a shame. But you know what to do'

	act 'Call Sonia':
		cla
		'Hi, this is <<$name>> - you say
		What is <<$name>>? Ah! the girl who loves dogs - asks Sonia
		Yes, it is - without a shadow of a doubt from your lips to pronounce
		Waiting for you in the park, in the forest. After 20 minutes - Sonia said before hanging up'

		act 'Running in the park':
			cla
			*clr
			gs 'stat'
			'<center><img src="images/zoo/dzoof1.jpg"></center>'
			'You have been seeing in the forest sitting on a bench Sonya between her legs wielded male language'

			act 'Greet Sonia':
				cla
				*clr
				gs 'stat'
				'<center><img src="images/zoo/dzoof1.jpg"></center>'
				'Hey - you said'
				'Hi, Sonia said:"Meet, this is my friend, his name is Rex"'

				act 'Meet with Rex':
					cla
					*clr
					horny += 10
					minut += 3
					gs 'stat'
					'<center><img src="images/zoo/dzoof2.jpg"></center>'
					'You came to the dog and started to play with him'
					' - Show him my pussy, said Sonya'

					act 'Show pussy':
						cla
						*clr
						horny += 10
						minut += 3
						gs 'stat'
						'<center><img src="images/zoo/dzoof2.jpg"></center>'
						'You came to the dog
						- Undress and play with him, he loves naked-smiled Sonia'

						act 'Play with Rex':
							cla
							*clr
							horny += 10
							minut += 3
							gs 'stat'
							'<center><img src="images/zoo/dzoof4.jpg"></center>'
							'You undressed and began playing with his dog.'
							'Your pussy moistened and head rushed erotic thoughts'
							'Have you noticed that the dog was excited too'
							' - I see you provoke him, and now refresh - said Sonya'
							' - How? - Asked you'
							' - Are you a little? Lips, said Sonya'

							act 'Soothe Rex':
								cla
								*clr
								minut += 5
								dzoo += 1
								lip += 1
								gs 'stat'
								'<center><img src="images/zoo/dzoof3.jpg"></center>'
								'You knelt down and began to suck Rex, he quickly discharged into your mouth.'
								'Sonia smiled and said:"Oh, you slut, seduced my boy, come to me will be punished"'

								act 'Go to Sonia':
									cla
									*clr
									minut += 10
									gs 'stat'
									'<center><img src="images/zoo/dzoof16.jpg"></center>'
									'You came to the apartment of Sonia, she turned to you and said playfully'
									'Well you''re ready to punishment?'

									act 'Hakazhi me':
										cla
										*clr
										minut += 5
										gs 'stat'
										'<center><img src="images/zoo/dzoof6.jpg"></center>'
										'Now it''s my turn to have fun, if you know what I mean - said Sonya'

										act 'Work tab':
											cla
											*clr
											minut += 5
											horny += 10
											gs 'stat'
											'<center><img src="images/zoo/dzoof7.jpg"></center>'
											'You are trapped between the legs of Sony, and began to lick her, she began to get wet.'
											'Rex ran to you and put you jealously from Sony.'
											'What are you offended boy? - Sonia said and began to play with Rex'

											act 'View Sonya Rex':
												cla
												*clr
												minut += 5
												horny += 10
												gs 'stat'
												'<center><img src="images/zoo/dzoof8.jpg"></center>'
												'You watched as Sonia flirts with Rex, head have got bad thoughts you started excited.'
												'Calm and caressed him - said Sonya.'

												act 'Caress Rex':
													cla
													*clr
													minut += 5
													horny += 10
													gs 'stat'
													'<center><img src="images/zoo/dzoof9.jpg"></center>'
													'You began to stroke and caress Rex suddenly noticed that he was excited.'

													act 'Pick up a member of Rex':
														cla
														*clr
														minut += 3
														horny += 10
														gs 'stat'
														'<center><img src="images/zoo/dzoof17.jpg"></center>'
														'You picked up a member of the dog and started to caress it.'
														'Seeing this Sonia took off her panties and sat on the sofa spread legs '

														act 'Watch':
															cla
															*clr
															minut += 3
															horny += 10
															gs 'stat'
															'<center><img src="images/zoo/dzoof10.jpg"></center>'
															'Rex ran up to Sonya and began to lick her breasts.'

															act 'Caress herself':
																cla
																*clr
																minut += 2
																horny += 10
																gs 'stat'
																'<center><img src="images/zoo/dzoof11.jpg"></center>'
																'You removed the panties and began stroking his pussy.'
																'Rex noticed wagging tail, he ran up to you and buried between her legs '
																'Sonia said with a grin:"Well let''s see who wins, " and got cancer'

																act 'Watch':
																	cla
																	*clr
																	minut += 3
																	horny += 10
																	gs 'stat'
																	'<center><img src="images/zoo/dzoof13.jpg"></center>'
																	' Rex ran from you jumped at Sonya and planted his cock into her.'
																	'You also stood near Soni cancer began to swing her ass invitingly'
																	'You want it bitch? Said Sonia'

																	act 'Yes, I want to':
																		cla
																		*clr
																		minut += 3
																		horny += 10
																		gs 'stat'
																		'<center><img src="images/zoo/Dzoof14.jpg"></center>'
																		'Sonia took Rex and put it on you, his cock quickly entered into you.'
																		'Lick me! - Said Sonya'

																		act 'Lick Sonia':
																			cla
																			*clr
																			tzoo += 1
																			zoo += 1
																			minut += 20
																			swallow += 1
																			vagina += 1
																			throat += 1
																			orgasm += 1
																			horny = 0
																			gs 'stat'
																			'<center><img src="images/zoo/dzoof15.jpg"></center>'
																			'You greedily licked her vagina and Sony behind you pecked Rex.'
																			'Rex finished in you, and then Sonya covered orgasm'
																			'She then shown the door of your apartment after throwing a few bills'

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

					act 'Send Sonia':gt 'park', 'start'
				end
			end

			act 'Change Your Mind':gt 'park', 'start'
		end
	end
end

--- soba ---------------------------------
# krol
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><img src="images/zoo/1791_640.jpg"></center>'
	'<center><<$namekrol>> rests.</center>'

	act 'Leave':gt 'korr'

	act 'Grant on skewers for meat':
		krolik = 0
		minut += 60
		money += 200
		gt 'korr'
	end
end

--- krol ---------------------------------
# popu
if $ARGS[0] = 'start':
	cla
	*clr
	clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><img src="images/zoo/parrot2.jpg"></center>'
	'<center><<$namepopu>> sitting in his cell.</center>'

	act 'Leave':gt 'korr'

	act 'Release window':
		popugai = 0
		minut += 10
		gt 'korr'
	end
end

--- popu ---------------------------------
# qwlocdog
cls
minut += 3
gs 'stat'
'You pick up the phone and a female voice tells you. "Hello <<$name>>, this is Margaret.''s Meet today in the cafe?"'

act 'Oh, I have a lot of things, I just can not today':
	cla
	qwdogiventday = day
	'(You) - Oh, I have a lot of things, I just can not segdnya.'
	'(Margarita) - Okay. Then I''ll call in a week.'

	act 'Hang up':gt 'korr'
end

act 'I do not mind.':
	cla
	QWdogReiq = 3
	qwdogiventday = day
	'(You) - I do not mind.'
	'(Margarita) - Wonderful. Then wait in the cafe.'

	act 'Hang up':gt 'korr'
end

--- qwlocdog ---------------------------------
# RimmaSexQW
cls
minut += 15
rimmaday = day
gs 'stat'
'You came to Rimma that you smiled affably. And she said, I''ll end up, can go to you?'

act 'Sorry, but I have things ':gt 'butik', 'start'

if money >= 250:
	act 'Rimma go to your home':
		cls
		minut += 30
		money -= 250
		gs 'stat'
		'Rima went to work and you caught a taxi. Machine quickly dovezla you home and you went to the apartment with Rima.'

		act 'Sex':dynamic $rimmasexdi
	end
end

$rimmasexdi = {
	cls
	minut += 30
	lesbian += 1
	RimmaSex += 1

	if RimmaSex > 21:RimmaSex = 21 & RimmaEndEvent = 1 & RimmaRandEvent = rand(2, 21)

	orgasm += 1
	horny = 0
	gs 'stat'

	if RimmaSex = 23:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			gs 'stat'
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/zoo/rimma23.jpg"></center>'
			''

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 22:
		'<center><img src="images/zoo/rimmaBJ.jpg"></center>'
		'Rima pulled the strap of her purse and necklace with a chain leash employee. You put a collar and chain handed Rimma already wore a strap. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			gs 'stat'
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/zoo/rimma22.jpg"></center>'
			''

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 21 or RimmaEndEvent = 1 and RimmaRandEvent = 21:
		'<center><img src="images/zoo/rimma21.jpg"></center>'
		'Rimma ordered you to squat and got over you. Your face was between her legs, suddenly hit you in the face of urine flow. Rimma without warning and sank just peed on you. You shock sat motionless until the jet of warm urine running down your face. After that you Rimma ordered to lick her. You began to lick at the same time and ended with Rimma.'
	elseif RimmaSex = 20 or RimmaEndEvent = 1 and RimmaRandEvent = 20:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			anus += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma20.jpg"></center>'
			'Rimma you bent and her strapon entered your ass, she began to fuck you, you covered from an orgasm that you piss. Rima laughed at you.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 19 or RimmaEndEvent = 1 and RimmaRandEvent = 19:
		'<center><img src="images/zoo/rimmaBJ.jpg"></center>'
		'Rima pulled the strap of her purse and necklace with a chain leash employee. You put a collar and chain handed Rimma already wore a strap. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			anus += 1
			vagina += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma19.jpg"></center>'
			'Rimma you put cancer and began to peck in the pussy, then pulled the strap and you put him in the ass, you were moaning held by the throat collar. Finally you are finished.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 18 or RimmaEndEvent = 1 and RimmaRandEvent = 18:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			anus += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma18.jpg"></center>'
			'Rima put you cancer and you feel like you strap rested in the anus, you groaned and tried to relax. Strap came into you and Rimma start you fuck in the ass. She grabbed you by the hair and raised arm your face without stopping to peck you. Finally you are finished.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 17 or RimmaEndEvent = 1 and RimmaRandEvent = 17:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			vagina += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma17.jpg"></center>'
			'Rimma you put cancer and has driven you strap pussy began furiously fuck you and slam you in the ass hands until you have finished.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 16 or RimmaEndEvent = 1 and RimmaRandEvent = 16:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			vagina += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma16.jpg"></center>'
			'Rima put you on your back and spread your legs, she had driven strap you in the pussy and began to furiously fuck you until you are covered orgasm.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 15 or RimmaEndEvent = 1 and RimmaRandEvent = 15:
		'<center><img src="images/zoo/rimma14.jpg"></center>'
		'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'

		act 'Further':
			cls
			cls
			minut += 30
			vagina += 1
			gs 'stat'
			'<center><img src="images/zoo/rimma15.jpg"></center>'
			'Rima does not put you over and has driven you from your saliva wet strapon in pussy, she began to furiously fuck you and soon you covered orgasm.'

			act 'Hold it':gt 'korr'
		end

		exit
	elseif RimmaSex = 14 or RimmaEndEvent = 1 and RimmaRandEvent = 14:
		anus += 8
		'<center><img src="images/zoo/rimma13.jpg"></center>'
		'Rimma you put cancer and heavily greased lubricated anus you enter you immediately became both hands, gradually she managed it and she started to fuck your ass hands until you have finished.'
	elseif RimmaSex = 13 or RimmaEndEvent = 1 and RimmaRandEvent = 13:
		anus += 8
		'<center><img src="images/zoo/rimma12.jpg"></center>'
		'Rima put you on your back and lifting your ass properly lubed your anus. Her hand came easily to you and Rima followed became poking you in the ass his second hand. Soon the two hands were you in the ass and started to fuck Rimma your ass. Soon you left off.'
	elseif RimmaSex = 12 or RimmaEndEvent = 1 and RimmaRandEvent = 12:
		anus += 6
		vagina += 5
		'<center><img src="images/zoo/rimma11.jpg"></center>'
		'Rima put you back on the bed and began to thrust one hand you in the ass, and the other hand in the vagina. Soon both hands inside you and Rima started to fuck you hands, you could not stand such pressure and finished.'
	elseif RimmaSex = 11 or RimmaEndEvent = 1 and RimmaRandEvent = 11:
		anus += 6
		'<center><img src="images/zoo/rimma10.jpg"></center>'
		'Rimma you put cancer and began to thrust his hand to you in the ass, her hand was soon entirely in your ass and she began to actively fuck your anus its river, you could not last long and roughly finished.'
	elseif RimmaSex = 10 or RimmaEndEvent = 1 and RimmaRandEvent = 10:
		anus += 6
		'<center><img src="images/zoo/rimma9.jpg"></center>'
		'Rimma you put cancer and began to fuck your ass fingers sometimes spitting on the hole. Soon she was able to stick to your ass the whole hand and you left off.'
	elseif RimmaSex = 9 or RimmaEndEvent = 1 and RimmaRandEvent = 9:
		anus += 5
		'<center><img src="images/zoo/rimma8.jpg"></center>'
		'Expanding convenient for you, Rima started to fuck your ass fingers soon from her skillful actions you covered orgasm.'
	elseif RimmaSex = 8 or RimmaEndEvent = 1 and RimmaRandEvent = 8:
		anus += 3
		'<center><img src="images/zoo/rimma7.jpg"></center>'
		'Rima put you on the back and started to caress your clitoris tongue simultaneously massaging your anus hand. Soon you covered orgasm.'
	elseif RimmaSex = 7 or RimmaEndEvent = 1 and RimmaRandEvent = 7:
		vagina += 5
		'<center><img src="images/zoo/rimma6.jpg"></center>'
		'Rima put you on the back and began to enter your fingers into the vagina until her whole hand was not inside you. Then she started to fuck you one second hand caressing your body. You began moaning in orgasm and Rimma passionately grabbed you by the throat.'
	elseif RimmaSex = 6 or RimmaEndEvent = 1 and RimmaRandEvent = 6:
		vagina += 5
		'<center><img src="images/zoo/rimma5.jpg"></center>'
		'Rima put you on the back and began to lick your clitoris. You felt her fingers penetrate your pussy and begin to fuck you. Rimma gradually introduced new fingers and now she began to fuck you in the pussy with his fist, you broke and finished.'
	elseif RimmaSex = 5 or RimmaEndEvent = 1 and RimmaRandEvent = 5:
		vagina += 2
		'<center><img src="images/zoo/rimma4.jpg"></center>'
		'Rima put you on the back and began to lick your clitoris. You felt her fingers penetrate your pussy and begin to fuck you. Soon you covered orgasm.'
	elseif RimmaSex = 4 or RimmaEndEvent = 1 and RimmaRandEvent = 4:
		'<center><img src="images/zoo/rimma3.jpg"></center>'
		'Rima put you on the back and sat on top substituting his sweaty pussy. You started to lick her and caress her arms soon Rima strongly pressed to your face her crotch finished, you also embraced orgasm.'
	elseif RimmaSex = 3 or RimmaEndEvent = 1 and RimmaRandEvent = 3:
		'<center><img src="images/zoo/rimma2.jpg"></center>'
		'Rima sat on the sofa legs spread, you dropped to her knees and began to lick her pussy with his tongue, while not forgetting to caress her pussy fingers. Rima began to moan in bliss and taking your hair harder pressed to her pussy until she began to beat in orgasm, at this time you also embraced orgasm.'
	elseif RimmaSex = 2 or RimmaEndEvent = 1 and RimmaRandEvent = 2:
		'<center><img src="images/zoo/rimma.jpg"></center>'
		'Rimma lay on top of you and offered her pussy started to lick your passion. You began to caress her tongue pussy Rimma and soon engulfed you unearthly bliss ended with orgasm.'
	end

	act 'Hold it':gt 'korr'
}

--- RimmaSexQW ---------------------------------
# bed
if $ARGS[0] = 'start':
	cla
	clr
	shour = 24 - hour
	houserabrand = rand(0, 100)
	housevorrand = rand(0, 200)
	gs 'stat'

	if hour > 22 and houserabrand < 2 and houserab = 1 and houserabday ! day and son < 10 and tanhouse1 = 1:gt 'bed', 'rab'
	if hour > 22 and housevorrand = 0 and housrA = 1 and husband = 0:gt 'bed', 'vor'

	if $clothingworntype = 'nude':
		'<center><img src="images/pics/bed.jpg"></center>'
	else
		'<center><img src="images/pics/son.jpg"></center>'
	end

	'You lie on the bed. Alarm for <<timer>> hours <<timerM>> minutes.'

	if mop ! 1:'<b><font color="red">Need to wash off makeup before going to bed.</font></b>'
	!!if daystart < 10:''
	!!if daystart >= 10 and daystart < 30:''
	!!if daystart >= 30:''

	if son > 10:
		'You are not tired.'
		act 'Try to sleep':gt 'bed2', 'dosip'
	end

	act 'Set alarm clock':gt 'budilnik', 'start'

	if son < 10:act 'Undress and go to bed':gt 'bed2'

	if dildo > 0 and horny >= 50:
		act 'Masturbate':
			cla
			*clr
			minut += 30
			mastr += 1
			manna += 15
			willpower += 15
			vagina += 1

			if husband > 0 and housrA = 1 and husbandrink ! 10:
				if week > 5 or week < 6 and hour > 16:
					cla
					*clr
					'<center><img src="images/img/hasb/m21.jpg"></center>'
					'You sit down and type dildo their pussy'

					if hour > 22 or hour < 7:'<<$husName>> looks at you, obviously a little dumbfounded.'
					if hour >= 7 and hour <= 22:'Once you get a taste of how enters the room <<$husName>>'

					if harakHusb = 0:
						'"What are you doing dear?" he asks.'
						'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
						'"And often you do that, " he asks.'
						'"Owned so often, less often in the ass, if you want to see?" asked you'

						if izvratH = 0:
							husband -= 1
							'"I''ll wait outside the door until you''re done, " he said and left. You continued to satisfy themselves rapidly and soon finished.'
							horny = 0
							orgasm += 1

							act 'Finish':gt 'bed', 'start'
						elseif izvratH = 1:
							'"Well, I do not know, " he stammered.'
							'"So you want" you said'

							act 'Show':
								cla
								*clr
								'<center><img src="images/img/hasb/m22.jpg"></center>'
								'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus <<$husName>> closely watched as the dildo disappears in your ass and then reappears. Do you see how his pants swell.'
								'"Dear anything else you want?" smiling you ask.'
								'"Can I join?" a little embarrassed he asks.'

								act 'Solve':
									cla
									*clr
									analorgasm += 1
									orgasm += 1
									horny = 0
									'<center><img src="images/img/hasb/m23.jpg"></center>'
									'<<$husName>> gets dick and starts masturbating, it is not what you expected, and at first you even felt a little sad that he did not enter into you, and began to masturbate, but then you start it even start. Have you looked at her husband who masturbate looking at the way you drive the dildo his popkui be covered and you pleasure, you screamed and fell to the table, having experienced an orgasm, dildo still sticking out of your ass. <<$husName>> yarosno masturbate looking at you stretched out on the table, you took the dildo from ass and began to lick it, looking into the eyes of her husband, from such a spectacle he immediately discharged onto the floor. You are drawn to him sticking out his lips, in a second he had passionately kissed you.'

									act 'Finish':gt 'bed', 'start'
								end
							end
						end
					elseif harakHusb = 1:
						'"That''s a number I mean you is not enough?" he asks.'
						'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'
						'"Well then, show me everything that you know how I''ll look, " he says.'
						'"And how do I do it in the ass, too, to show?" asked you'

						if izvratH = 0:
							husband += 1
							husbizvradd += 1
							'"No, do not, and yet that''s enough, " he said, and sat down on a chair began to watch. You continued to satisfy themselves rapidly and soon finished in front of her husband. <<$husName>> stood up and began to applaud "Bravo and encore again?" he said laughing.'
							'"For such a lovely audience anything, but only after the intermission, " you laughed. <<$husName>> helped you get down from the table.'
							horny = 0
							orgasm += 1

							act 'Finish':gt 'bed', 'start'
						elseif izvratH = 1:
							husband += 1
							'"And how is it necessarily demonstrate" he said.'
							'"Anything you want, " you said'

							act 'Show':
								cla
								*clr
								'<center><img src="images/img/hasb/m22.jpg"></center>'
								'You pull out the dildo from pussy and winking at her husband, insert a dildo in her anus. <<$husName>> closely watched as the dildo disappears in your ass and then reappears. Do you see how his pants swell.'
								'"Dear anything else you want?" smiling you ask.'
								'"I do not just want to but I''ll do, " he said, unbuttoning his pants and substitute member of your face.'

								act 'Take by mouth':
									cla
									*clr
									'<center><img src="images/img/hasb/m24.jpg"></center>'
									'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> to stop you, "Well, now I''ll take this hole."'

									act 'Substitute ass':
										picrand = 89
										gt 'sex', 'anal'
									end
								end
							end
						end
					elseif harakHusb = 2:
						'"What hole itching?" he asks.'
						'"I''m sorry dear, but I really need, and you''ve been busy, " you reply, without stopping to masturbate.'

						if izvratH = 0:
							husband += 1
							husbizvradd += 1
							'"Well then, open your mouth, " he said pulling member and rudely pushing it in your mouth, he held you by the hair and fucked in the mouth, saying something you did not stop masturbating. Soon he was tired of your mouth, "Now take out of this hole rubber stuff, now I''m going to fuck you"'

							act 'Spread her legs ':
								picrand = 89
								gt 'sex', 'vag'
							end
						elseif izvratH = 1:
							husband += 1
							SUB += 1
							'"Insert this crap myself in the ass and mash, I''ll popolzuyut it, as long as pine Quick" he said, pulling member. You quickly rearrange the dildo from pussy anus and mouth open submissively.'

							act 'Take by mouth':
								cla
								*clr
								'<center><img src="images/img/hasb/m24.jpg"></center>'
								'You enfold him some more flaccid penis and start sucking lips, continuing to drive the dildo his anus. When his cock finally firmed, <<$husName>> stopped you "All cup your point now I''m ass Flare."'

								act 'Substitute ass':
									picrand = 89
									gt 'sex', 'anal'
								end
							end
						end
					end
				else
					horny = 0
					orgasm += 1
					'<center><img src="images/pics/mastr.gif"></center>'
					'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

					act 'Breathe':gt 'bed', 'start'
				end
			else
				horny = 0
				orgasm += 1
				'<center><img src="images/pics/mastr.gif"></center>'
				'You dildo stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

				act 'Breathe':gt 'bed', 'start'
			end
		end
	end

	act 'Get out of bed':gt 'bed', 'fin'
	act 'Try to sleep':gt 'bed2', 'dosip'

	if zoo > 6 and housrA = 1 and dogday ! day and houserabrand < 4:gt 'bed1', 'sog1'
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM
	!savegame 'avtosave.sav'

	!'
	if housr = 1 and housrA = 1:
		if $clothingworntype = 'nude':
			$nude = 'In the corridor'
		else
			$nude = 'get_dressed'
		end

		housrA = 0
		gt 'bedr'
	end

	if houseob = 1:
		houseob = 0
		gt 'obroom','start'
	end

	if tanhouse1 = 1:
		tanhouse1 = 0
		gt 'spalnya'
	end
	'!
end

if $ARGS[0] = 'rab':
	cla
	*clr
	minut += 120
	houserabday = day
	'<center><img src="images/img/th/r0.jpg"></center>'
	'Once you get into bed as you mistress comes into the room, "What a bitch sleep going?" she said from the doorway.'
	'"Yes, " you reply.'
	'"Yes, who?" she continues.'
	'"Yes, ma''am, " you reply and sit on the bed, she was drunk and barely standing on his feet and in his hands a bottle of wine from which it often takes a sip.'
	'"That''s better, but today you have to be punished, " she lifts up her skirt and she jumps out from under the strap. "Suck, " she commanded.'

	act 'Take by mouth':
		cla
		*clr
		SUB += 2
		lesbian += 1

		if analplugIN = 1:analplugIN = 0
		if mop ! 1:mop = 0

		'<center><img src="images/img/th/r1.jpg"></center>'
		'You took the strap in his mouth and started sucking him off, not the taste of rubber gives you pleasure and you did it without much enthusiasm. Hostess, though she was drunk, but perfectly vidila that you do not try, then she started to beat podmahivat your movements, driving him deeper into your mouth. You become suspended on and did not like it.'
		'"Oh damn stubborn, lay down on the bed quickly, " with these words, she strongly pushed you on the bed.'

		act 'Lie':
			cla
			*clr
			'<center><img src="images/img/th/r2.jpg"></center>'
			'You lay on the bed and she climbed on top of you and kneeling over you, you vskhvatila his head and forcefully planted his mouth on the strap. You tried to pull away, but it was useless, her hands firmly held your head. She continued to rape your mouth, you hardly catch the moment that-be for air, and she thrust her it deeper and deeper, eventually he started to slip down your throat, and breathing was absolutely nothing. When you''re starting to lose consciousness she took it out of your throat and you handled on its side, wheezing sniffed.'
			'"And now to punishment, get up cancer, " she said. "And what if it was" you think, but do not say the hearing began.'

			act 'Rise in a pose':
				cla
				*clr
				anal += 1
				'<center><img src="images/img/th/r3.jpg"></center>'
				'You get up on all fours on the bed. "But it''s too much, " said the hostess, and erases your saliva with the strap, "You need to punish, not pooscherit. Spreading ass."'
				'Realizing that you will you breed buttocks with his hands and try to relax your ass, but you did not try, the pain pierces your body when it is with force pushes the strap you in the anus and not giving your ass to get used to gaining crazy pace, you let your buttocks and seizes blanket with hands and teeth. Tears poured from my eyes, you whine, but she still continues, finally a little tired it lowers the tempo and asks, "Well, it hurts."'
				'"Yes ma''am, very hurt" through tears you say.'
				'"Well, today I have a good bit smazhem" she says, and begins pouring wine from a bottle on the strap and your ass.'
				'"Thank you, Mrs." you say, and it is again gaining momentum. First, you got a little easier, but then the wine is dry and start to dry your skin, you become so much hurt by what you already screaming with laughter. "Why did not anyone come in and not hurt her, " you think, because your cries have been heard not only in the apartment, but also around the entrance, but no one came, neither Tanya nor Nicholas. Finally she was tired, and removing the strap out of the room without saying anything. You collapsed on the bed and whined, your ass was on fire and you were afraid to even move after spending an hour so you are asleep.'

				act 'Sleep':gt 'bed2'
			end
		end
	end

	if DOM > 20:
		act 'Refuse':
			cla
			*clr
			DOM += 1
			lesbian += 1
			orgasm += 1
			houserab = 2
			'<center><img src="images/img/th/r4.jpg"></center>'
			'"No, " you reply.'
			'"Are you syavka vyaknula, suck alive while not become worse, " she started up.'
			'"No, " answered you again.'
			'"All right, you asked for it myself, " she screamed and swung, going to hit you, you did not wait for punch and kick her in the stomach.'
			'"Bitch, " she moaned, bending in half. And then you have suffered, you jumped out of bed and vskhvativ her head hit the knee in the face, she flew into the corner, but you do not calm down, remembering the taste of her dirty boots and sneakers you get up to her and started to push it into his mouth, When you could not shove it in its entirety, you threw away and sneakers vskhvativ her hair yanked off the floor and thrown on the bed. It was lying on the bed covering her face with her hands, you jumped on the bed and embarking on her face sat on top of her. "Lick bitch lick" you yell, she tried to throw you, but nothing happened, you got right in her face, continuing to yell something she licked, you will soon feel her tongue on her pussy, but you did not care you fidgeted on her face increasing pace, soon you started excited. She did not resist sticking his tongue out and tried to catch them to your pussy, terevshuyusya wildly about her face. You start to like her submissive and you get more excited thinking about what you nasiluete it, you have even begun to think about something to put her strap-on and have fun with it as you began to lay an orgasm, you shrank his crotch in her face and finished . When you finally got off her, her whole face was covered in your discharge, she quietly got out of bed, straightened his clothes and left the room leaving you goodbye "Creature." She obviously did not forget, now you should be careful, who knows what''s on her mind.'

			act 'Breath.':gt 'bed', 'start'
		end
	end
end

if $ARGS[0] = 'vor':
	cla
	*clr
	minut += 60
	'<center><img src="images/img/spaln/g0.jpg"></center>'
	'You lay on the bed when he heard what the sound in the hallway. Once you have decided to get up to look into the room ran two masked, you do not have time to open his mouth like a knife in your throat helpful. "Only piskni bitch''ll cut." croaked one of them. They tied your hands and one went to search the apartment, and the second was to guard you. He sat and looked carefully you, then took a knife and began podit them on your body, "What scared?" he asked, thinking that it is better you keep silent, you said nothing and looked downcast gaze to the floor. "I see what''s scary, " he grinned. Then he began to feel you, you tried to pull away, but the knife was back in your throat, "Sit still bitch until the pen is not planted, " he croaked, and continued to feel you. Finally returned to the second "All get out of here, " he said.'
	'"Wait let this pacifier remember seeing what juicy" said sitting with you'

	if vnesh >= 30:
		guy += 2
		bj += 1
		sex += 1
		rape += 1
		'"And what, savory nipple, even when such happen to fuck" said the first.'

		act 'Plead':
			cla
			*clr
			minut += 30
			'<center><img src="images/img/spaln/g1.jpg"></center>'
			'You have shrunk with horror, "Well nipple kneel down and open your mouth, but see, you touch the teeth from ear to ear throat vskroy" said the second pulling member. You began to plead not touch you, but received oplevuhu knelt. He jabbed a member you on the lips, you reluctantly opened his mouth and then his cock was in your mouth, hands clenching your head, he began to fuck you in the mouth, for those too made a second, and then they tried to shove into your mouth, both terms, but decided that their members will touch each other, and that in their opinion, even if they are in the female mouth, smacks of the blue, back to the first option and proceeded to rape your mouth one by one. All event was intended to evoke disgust you, and that was the first couple of minutes, but then you are surprised to catch myself on the fact that their hands are now just lie on your head, and all the movements you make yourself and are actively working language.'
			'"Let''s get up cancer" commanded one.'

			act 'Up':
				cla
				*clr
				picrand = 38
				orgasm += 1
				'<center><img src="images/img/spaln/g2.jpg"></center>'
				'You stood up and bent over one of them stood behind and put your dick in pussy, went inside. "Yes, it all flows, listen Grey like this bitch" he said.'
				'"Mouth Shut" growled at him a second inserting dick in your mouth. They proceeded to rape you on both sides, but you are overwhelmed with desire, you stood with cancer tied his hands behind his back and the two strangers had you. You diligently podmahivat one second while sucking dick suddenly darkened eyes, the body and pleasant shiver ran you huddled in orgasm. One that had pulled your mouth dick "What''s wrong with this bitch, she has epilepsy, " he cried. "Yeah, no, I told her to please, this bitch came." said the second. They untied the hands of you, "Let''s see what she can do with her hands swagger" said one.'

				act 'Continue':xgt 'sexdvoe', 'var'
			end
		end
	elseif vnesh < 30:
		'"We bring down I said, " repeated the first "And her mouth shut, " he added. The second did not argue and taking clothes from your clostuffed into your mouth. "If earlier than half an hour you will get out, you do not live, " said the first, and they''re gone. You did not wait half an hour and started trying to break free, well that sites they really did not know how to knit and soon you managed to untie'

		act 'Assess the damage':gt 'bed', 'vorend'
	end
end

if $ARGS[0] = 'vorend':
	cla
	*clr

	if remsitr = 0:'<center><img src="images/etogame/sitr.jpg"></center>'
	if remsitr = 1:'<center><img src="images/etogame/sitr2.jpg"></center>'

	'When it was over, you walk around the apartment to see what was lost.'

	if stolmoney > 0:
		'They took <<stolmoney>> rubles from the table.'
		stolmoney = 0
	end

	if money > 0:
		'They took <<money>> rubles that you were with him.'
		money = 0
	end

	if komp = 1:
		'They took his computer.'
		komp = 0
	end

	gs 'stat'
	act 'Finish':gt 'sitr'
end

--- bed ---------------------------------
# bed1
if $ARGS[0] = 'start':
	cla
	clr
	shour = 24 - hour
	gs 'stat'
	shour = 24 - hour
	stimer = 24 - timer

	if $clothingworntype = 'nude':
		'<center><img src="images/pics/bed.jpg"></center>'
	else
		'<center><img src="images/pics/son.jpg"></center>'
	end

	'You lie on the bed. Clock wound <<timer>> hours <<timerM>> minutes.'

	if mop ! 1:'<b><font color="red">Need to wash off makeup before going to bed.</font></b>'

	!! Service on 7 = 17, time 20 = 4

	act 'Set Alarm Clock':gt 'budilnik', 'start'

	if son > 10:
		'You are not tired.'
	elseif son < 10:
		act 'Undress and go to bed':gt 'bed2'
	end

	if dildo > 0 and horny >= 50 and sex > 0:
		act 'Masturbating using dildo':
			cla
			*clr
			horny = 0
			minut += 30
			mastr += 1
			orgasm += 1
			manna += 15
			willpower += 15
			'<center><img src="images/pics/mastr.gif"></center>'
			'You phallus stuck to the floor and planted her wet pussy on him, jumping on the artificial active member you will quickly feel the excitement and orgasm you covered.'

			act 'Breathe':gt 'bed', 'start'
		end
	end

	act 'Get out of bed':
		cla
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
end

if $ARGS[0] = 'sogn':
	cla
	*clr
	horny += 10
	minut += 10
	dogday = day
	'You undressed and lay down on the bed <<$namesob>> brazenly jumped into bed and began to lick your pussy'
	'<center><img src="images/zoo/2.jpg"></center>'

	act 'Succumb to the desire':gt 'bed1', 'sog2'
	act 'Discarded dog':gt 'bed', 'start'
end

if $ARGS[0] = 'sog1':
	if zoo >= 6:
		if husband > 0 and husbandrink ! 10:
			if hour > 22 or hour < 7:
				cla
				*clr
				minut += 30
				'<center><img src="images/zoo/z1.jpg"></center>'
				'You undressed and lay down on the bed <<$namesob>> brazenly jumped into bed and began to lick your pussy.'

				if harakHusb = 0:
					zoo += 1
					horny = 0
					orgasm += 1
					'"What''s he doing dear, stop him, " cries the husband'
					'"I can not, try myself, " you reply.'
					husband -= 1
					'<<$husName>> trying to shove the dog, but he growls and snarls. "I can not get it to drive away what to do dear?" he asks.'
					'"Think of something." you reply, already slightly moaning with pleasure. <<$husName>> starts to rush through the room, periodically coming to the dog, but hearing his growl off. While <<$husName>> pacing the room dog began to jump on you.'
					'"Oh my God, that he was going to do?" shrieked <<$husName>>, Seeing the dog attempts to jump on you.'
					'"What you do not clear he wants to fuck me" you said.'
					'"Dear try again to free" pleaded husband.'

					act 'Try':
						cla
						*clr
						'<center><img src="images/zoo/z2.jpg"></center>'
						'You reluctantly start trying to push the dog and move away, but it appears to him backwards, and <<$namesob>> leans on you and all your weight is on. You feel his penis rubs against your thighs ischya hole.'

						if izvratH = 0:
							'"Oh my God, I can not look at it, " cried the husband slammed the door and ran. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. My husband came back, and you still were cancer and dog sperm flowed from your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						elseif izvratH = 1:
							'"Well get off of her, " shouts <<$husName>> at the dog, but close to it does not fit. Meanwhile, a member of the dog has found a hole and full-pecked you. You moaned and podmahivat him and your husband decided that your movement is an attempt to free you cheered "Yes <<$name>> so can get more wiggle lose it." Soon you covered orgasm, and after a few seconds dog cum inside you and radosnym ran out into the corridor. Husband looked at you standing cancer hips peremazanymi canine semen flowing out of your pussy.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'
						end

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'bedr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Well dear, whatever you say."'

							act 'Finish':gt 'bedr'
						end
					end
				elseif harakHusb = 1:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						'<<$husName>> tries ottoschit dog but he growls and grins, then he goes to the bath and what that brings old sheets, throwing her to the dog picks up the ends and picks up dog is in improvezirovannom bag.'
						'"I''ll take him now on euthanasia, " said <<$husName>>'

						act 'Allow':
							sobaka = 0
							zoo = 0
							gt 'sitr'
						end

						act 'Not authorized':
							cla
							'"No, dear, he is not guilty, he has the instincts, I''ll take it for mating and he will calm down, " you said.'
							'"Okay, look itself, your dog."'
							act 'Finish':gt 'bedr'
						end
					elseif izvratH = 1:
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						'"Can not or do not want, " said <<$husName>> smiling and continues to sit and watch as the dog you licks.'
						'"It probably does not want" you reply and deliberately pushes the legs wider. <<$husName>> looks like you moan until the dog licks you, and suddenly gets up and pulls out his dick brings to your mouth.'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z3.jpg"></center>'
							'You grab his cock and takes his mouth to suck, soon begins to cover you and you end sodragayas whole body in a second <<$husName>> ends up in your mouth. You swallow sperm and continue to suck his dick fading. Soused dog began naprygivat at you with intent nedvuhslyslennymi.'
							'"But this is too much" said <<$husName>> and tried ottoschit dog, but he growls and grins, then he goes into the tub and what that brings an old sheet, threw it at the dog picks up the ends and picks up dog is in the bag improvezirovannom.'
							'"I''ll take him now on euthanasia, " said <<$husName>>'

							act 'Allow':
								sobaka = 0
								zoo = 0
								gt 'sitr'
							end

							act 'Not authorized':
								cla
								'"No, dear, he is not guilty, he has instincts, besides from trying so hard, " you said.'
								'"Well, if he was trying so hard you can thank him" ironically husband.'

								act 'Jerk dog':
									cla
									*clr
									husband -= 1
									'<center><img src="images/zoo/z6.jpg"></center>'
									'You take the dog dick in hand and begin to masturbate after a few minutes you dog cums in her palm.'

									act 'Finish':gt 'bedr'
								end

								act 'Suck dog':
									cla
									*clr
									swallow += 1
									husband -= 40
									'<center><img src="images/zoo/z7.jpg"></center>'
									'You loshite dog on the floor and take his cock in my mouth, my husband looks at you with disgust as you sucking dog in a couple of minutes dog diluted into your mouth and you swallow sperm.'
									'"Well, you''re a pervert, " the husband says with obvious distaste.'

									act 'Finish':gt 'bedr'
								end

								act 'Finish':gt 'bedr'
							end
						end
					end
				elseif harakHusb = 2:
					'"Her dog you absolutely ohrenel, go find yourself on the street bitch and then you froze otpihni it" the husband says.'
					'"I can not, try myself, " you reply.'

					if izvratH = 0:
						manna -= 15
						willpower -= 15
						'<<$husName>> tries ottoschit dog but he growls and grins, then he smashes the dog leg in the ribs and he screeched flies into a corner, had not dog up as a husband begins to kick harder, seeing his condition, you scored in the corner and covering his head with hands close eyes. A few minutes later the dog stops.'
						'"What are you hiding there shalt here, and then krovischi from your skunk" said <<$husName>>. Opening her eyes you see a dead dog in a pool of blood.'
						'"Well, what froze shalt say to you, I do this on the trash Dogmeat''ll take." he takes the dog, wrap in sheets and make it in the trash. And you have some time to scour the blood from the floor.'

						act 'Finish':
							sobaka = 0
							zoo = 0
							gt 'bedr'
						end
					elseif izvratH = 1:
						zoo += 1
						bj += 1
						swallow += 1
						cumlip += 1
						SUB += 1
						'"What do you mean I can not, that you like the way he licks you, " shouts <<$husName>>.'
						'"No, of course you do not, " you begin to make excuses.'
						'"And I see you taschishsya whore, you all are flowing, or think I do not see, and if you like it so thank him, " he says, and seeing your not knowing look continues, "Well, what are hatched suck him alive."'

						act 'Take by mouth':
							cla
							*clr
							'<center><img src="images/zoo/z4.jpg"></center>'
							'<<$husName>> grabs a dog by the collar iderzhit until you slide on the floor under the dog. Nedozhidayas oplivuhi you hiding his lust take by mouth and takes dick dog suck, husband watching you and cheers saying that the dog loved your mouth. Soon he was bored just watch and he dropped his pants says "Well Spreads legs."'

							act 'Allow':
								cla
								*clr
								suprdolg += 1
								sex += 1
								anal += 1
								'<center><img src="images/zoo/z5.jpg"></center>'
								'You obediently spreads her legs and her husband comes to you in the pussy, he hews suck you until you have a dog, but you do not dostovlyaet pleasure. Soon her husband cums and gets "A dog that is not yet finished, something you''re not trying, as well, cup your point."'

								act 'Substitute ass':
									cla
									*clr
									analorgasm += 1
									orgasm += 1
									horny = 0
									'<center><img src="images/zoo/z8.jpg"></center>'
									'You go up to her knees and dog immediately jumps on you. prevent kneel. With one hand you Spreading buttocks, and a second guide member currently in his ass, fingering hole dog quickly enters and taken to peck your anus. Husband looked at it a little and throwing "Go otmoyus from whores" out. Left with a dog for a single you start podmahivat him and soon oschuzaete tide excitation seems sex dog surpasses her husband, his cock in your ass moves so deftly that comes after the excitement orgasm, and you fall on korachki no longer able to stand, dog makes several movements and spewing his seed you in the ass. After graduating he leaves satisfied.'

									act 'Finish':gt 'bedr'
								end
							end
						end
					end
				end
			else
				gt 'bed1', 'sogn'
			end
		elseif husband = 0 or husbandrink = 10:
			gt 'bed1', 'sogn'
		end
	end
end

if $ARGS[0] = 'sog2':
	cla
	*clr
	horny += 10
	minut += 10
	'<center><img src="images/zoo/sog.jpg"></center>'
	'You take the term <<$namesob>> and start it nadrachivat'

	act 'Take by mouth':gt 'bed1', 'sog3'
	act 'Spread her legs ':gt 'bed1', 'sog4'
end

if $ARGS[0] = 'sog3':
	cla
	*clr
	horny += 10
	minut += 10
	'<center><img src="images/zoo/sog1.jpg"></center>'
	'You greedily swallow dick <<$namesob>>'

	act 'Spread her legs ':gt 'bed1', 'sog4'
end

if $ARGS[0] = 'sog4':
	cla
	*clr
	minut += 10
	orgasm += 1
	horny = 0
	minut += 5
	zoo += 1
	swallow += 1
	vagina += 1
	throat += 1
	cumpussy += 1
	'<center><img src="images/zoo/sog2.jpg"></center>'
	'You push the legs and <<$namesob>> fuck you in your pussy'
	'Finally dog ​​ends up in you'

	act 'Hug the dog and sleep':gt 'bed2', 'dosip'
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM
	!!savegame 'avtosave.sav'

	!'
	if housr = 1 and housrA = 1:
		if $clothingworntype = 'nude':
			$nude = 'In the corridor'
		else
			$nude = 'Get dressed'
		end

		housrA = 0
		gt 'bedr'
	end
	'!
end

--- bed1 ---------------------------------
# bed2
if $ARGS[0] = 'dosip':
	dosip = 1
else
	dosip = 0
end

if disable_autosave = 0:
	if StoryLine = 0:
		savegame 'autosave.sav'
	else
		savegame 'autosave_alt.sav'
	end
end

gs 'clothing', 'strip'
health += 5
hapri = 0
InSleep = 1
cloth_vid = 0
'<center><img src="images/pics/son.jpg" ></center>'

if analplugIN = 1:analplugIN = 0 & 'Before going to bed you remove a butt plug.'
if vibratorIN = 1:vibratorIN = 0 & 'Before going to bed you remove a vibrator.'
if mop > 1:mop = 0 & vidageday = vidageday - 1 & 'Makeup smeared on the face, you think, that looks bad for sleeping with makeup, skin aging faster from this.'

if storyline = 0:
	temp = rand(1, 10)
	if temp = 1:
		'You dreaming of what it is not clear images from the past.'
	elseif temp = 2:
		'You dreamed of the moon looking at the world with his one bloody eye.'
	elseif temp = 3:
		'You dream that you are a man again.'
	else
		'You sleep without dreaming.'
	end
else
	'You sleep without dreaming.'
end

:loopson
clr
cls
minut += 1
stime += 1

if stime = 60:stime = 0 & son += 3

gs 'stat'

if hour = timer and minut = timerM:
	manna -= 10
	'Your alarm goes off.'

	if daystart < 10 and StoryLine = 0:'My first thought was how you woke up, "Damn. This is not a dream, I do now baba."'
	if daystart >= 10 and daystart < 30 and StoryLine = 0:'You sleepy little surprised popyalitsya its female body.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
elseif son > 23 and dosip = 0:
	manna -= 10
	'You slept'

	if daystart < 10 and StoryLine = 0:'My first thought was how you wake up "Damn. This is not a dream, I really now a woman."'
	if daystart >= 10 and daystart < 30 and StoryLine = 0:'With a little surprised prosoni you stare at her female body.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
elseif son > 47 and dosip = 1:
	manna -= 10
	dosip = 0
	son -= 24
	'You slept.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
else
	jump 'loopson'
end

--- bed2 ---------------------------------
# budilnik
if $ARGS[0] = 'start':
	cla
	clr
	gs 'stat'
	'<center><img src="images/etogame/bed2.jpg"></center>'
	*nl
	*nl

	if numbud = 4:'<center><b><<bud1>><<bud2>>:<<bud3>><<bud4>></b></center>'
	if numbud = 3:'<center><b><<bud1>><<bud2>>:<<bud3>></b><<bud4>></center>'
	if numbud = 2:'<center><b><<bud1>><<bud2>></b>:<<bud3>><<bud4>></center>'
	if numbud = 1:'<center><b><<bud1>></b><<bud2>>:<<bud3>><<bud4>></center>'
	if numbud = 0:'<center><<bud1>><<bud2>> : <<bud3>><<bud4>></center>'

	*nl
	'<center><b><a href="exec:gt ''budilnik'', ''1''">1</a> <a href="exec:gt ''budilnik'', ''2''">2</a> <a href="exec:gt ''budilnik'', ''3''">3</a></b></center>'
	'<center><b><a href="exec:gt ''budilnik'', ''4''">4</a> <a href="exec:gt ''budilnik'', ''5''">5</a> <a href="exec:gt ''budilnik'', ''6''">6</a></b></center>'
	'<center><b><a href="exec:gt ''budilnik'', ''7''">7</a> <a href="exec:gt ''budilnik'', ''8''">8</a> <a href="exec:gt ''budilnik'', ''9''">9</a></b></center>'
	'<center><b><a href="exec:gt ''budilnik'', ''0''">0</a></b></center>'
	'<center><b><a href="exec:gt ''budilnik'', ''Reset''">Reset</a> <a href="exec:gt ''budilnik'', ''Time''">Set the time</a></b></center>'

	act 'Put Service':
		cla
		bud1 = 0
		bud2 = 0
		bud3 = 0
		bud4 = 0
		numbud = 0
		gt 'budilnik', 'fin'
	end
end

if $ARGS[0] = 'Time':
	cla

	if bud1 > 0:
		timer = bud1 * 10
		timer += bud2
	end

	if bud2 > 0 and bud1 = 0:timer = bud2

	if bud3 > 0:
		timerM = bud3 * 10
		timerM += bud4
	end

	if bud4 > 0 and bud3 = 0:timerM = bud4
	if timer > 23:timer = 0
	if timerM > 60:timerM = 0

	'Clock wound <<timer>> hours <<timerM>> minutes.'

	act 'Service put in place':
		cla
		gt 'budilnik', 'fin'
	end
end

if $ARGS[0] = '1':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 1 & numbud = 4
	if numbud = 2:bud3 = 1 & numbud = 3
	if numbud = 1:bud2 = 1 & numbud = 2
	if numbud = 0:bud1 = 1 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '2':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 2 & numbud = 4
	if numbud = 2:bud3 = 2 & numbud = 3
	if numbud = 1:bud2 = 2 & numbud = 2
	if numbud = 0:bud1 = 2 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '3':
	cla
	!!if numbud = 4:end
	if numbud = 3:bud4 = 3 & numbud = 4
	if numbud = 2:bud3 = 3 & numbud = 3
	if numbud = 1:bud2 = 3 & numbud = 2
	if numbud = 0:bud1 = 3 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '4':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 4 & numbud = 4
	if numbud = 2:bud3 = 4 & numbud = 3
	if numbud = 1:bud2 = 4 & numbud = 2
	if numbud = 0:bud1 = 4 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '5':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 5 & numbud = 4
	if numbud = 2:bud3 = 5 & numbud = 3
	if numbud = 1:bud2 = 5 & numbud = 2
	if numbud = 0:bud1 = 5 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '6':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 6 & numbud = 4
	if numbud = 2:bud3 = 6 & numbud = 3
	if numbud = 1:bud2 = 6 & numbud = 2
	if numbud = 0:bud1 = 6 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '7':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 7 & numbud = 4
	if numbud = 2:bud3 = 7 & numbud = 3
	if numbud = 1:bud2 = 7 & numbud = 2
	if numbud = 0:bud1 = 7 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '8':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 8 & numbud = 4
	if numbud = 2:bud3 = 8 & numbud = 3
	if numbud = 1:bud2 = 8 & numbud = 2
	if numbud = 0:bud1 = 8 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '9':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 9 & numbud = 4
	if numbud = 2:bud3 = 9 & numbud = 3
	if numbud = 1:bud2 = 9 & numbud = 2
	if numbud = 0:bud1 = 9 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = '0':
	cla

	!!if numbud = 4:end
	if numbud = 3:bud4 = 0 & numbud = 4
	if numbud = 2:bud3 = 0 & numbud = 3
	if numbud = 1:bud2 = 0 & numbud = 2
	if numbud = 0:bud1 = 0 & numbud = 1

	gt 'budilnik', 'start'
end

if $ARGS[0] = 'Reset':
	cla

	bud1 = 0
	bud2 = 0
	bud3 = 0
	bud4 = 0
	numbud = 0

	gt 'budilnik', 'start'
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM

	!'
	if housr = 1 and housrA = 1:
		housrA = 0
		gt 'bedr'
	end
	'!
end

--- budilnik ---------------------------------
# divan
if $ARGS[0] = 'start':
	$divmastr = {
		cls

		minut += 15
		sweat += 1
		horny += rand(1, 5)

		if divanmastr = 0:divanmastr = 1 & mastr += 1

		gs 'stat'
		'<center><img src="images/pics/divmas.jpg"></center>'
		'You lay down on the sofa and began to fondle her one-handed chest with a finger of the other hand you started rubbing and stroking a small bump between his legs that responded to the touch of pleasant languor covering your entire body.'

		if horny >= 100:orgasm += 1 & horny = 0 & 'Suddenly a nice cramp brought your body and you covered powerful orgasm from which you groan.'

		act 'Get off the couch':divanmastr = 0 & gt 'divan', 'fin'

		if horny >= 75:act 'Proceed':dynamic $divmastr
	}

	cla
	clr
	gs 'stat'
	'<center><img src="images/pics/divan.jpg"></center>'
	'You lay down on the sofa.'

	act 'Lie':
		cla
		waiting = input ("How many minutes to wait? (Not more than 120 minutes)")

		if waiting <= 0 or waiting > 120:minut += 15
		if waiting > 0 and waiting <= 120:minut += waiting

		act 'Get off the couch':gt 'divan', 'fin'
	end

	if TV > 0:
		act 'Watch TV':
			cla
			gt 'TV', 'start'
		end
	end

	if book > 0:
		act 'Read a book (0:30)':
			cla
			*clr
			minut += 30
			horny += 5
			'<center><img src="images/pics/book.jpg"></center>'
			'You are reading a book.'

			act 'Put the book':gt 'divan', 'start'
		end
	end

	if horny >= 75:
		act 'Masturbate (0:15)':dynamic $divmastr
	end

	act 'Get off the couch':
		cla
		gt 'divan', 'fin'
	end
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM

	!'
	if housr = 1 and housrA = 1:
		housrA = 0
		gt 'sitr'
	end
	'!
end

--- divan ---------------------------------
# Komp
if $ARGS[0] = 'start':
	cla
	clr
	elektro += 5
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'With the computer happily welcomes you start window.'

	act 'Play Patience (0:15)':gt 'Komp', 'pasians'

	if GameCD > 0:act 'Play Disopl':gt 'KGDstart'
	if GameCD2 > 0:act 'Play SunDead':gt 'KGZstart'
	if GameCD3 > 0:act 'Play Albido':gt 'FSstart'

	!!act 'SunReview of the Dead':gt 'KGZstart'

	if internet > 0:
		internet = internetM / 60
		'You''ve got <<internet>> hours of Internet'

		act 'Browser':gt 'Komp', 'brows'
	end

	if karta >= 10:
		'You can pay online through your bank account. 1 hour internet costs 10 rubles. On account of <<karta>>rubles.'

		act 'Pay online bank account':
			cla
			intinp = input ("How much money to put on the internet? (h = 10 rubles)")

			if intinp <= 0 or intinp * 10 > karta:
				'Invalid amount.'
			elseif intinp * 10 <= karta:
				inttime = intinp * 10
				karta -= inttime
				internetM += intinp * 60
				internet = internetM / 60
				'You paid <<inttime>> hours of Internet, you now have <<internet>> hours of the Internet. Your account was removed <<intinp>> rubles.'
			end

			act 'Get out of the payment system':gt 'Komp', 'start'
		end
	end

	act 'Shut down the computer':
		cla
		gt 'Komp', 'fin'
	end
end

if $ARGS[0] = 'brows':
	cla
	clr
	*clr
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You entered into a search engine.'

	act 'Apartment repair site (0:15)':gt 'Komp', 'remont'

	if housr = 1 and husband = 0:act 'Rent your apartment':gt 'Komp', 'sale'

	act 'Porno (0:15)':gt 'Komp', 'porno'
	act 'Singles (0:15)':gt 'Komp', 'znak'

	if hour < 20 and hour > 7:act 'Jobs.su':gt 'Komp', 'rabota'

	act 'Cable TV services (0:15)':gt 'Komp', 'kabtv'
	act 'Online game':gt 'KGstart'

	if shantfoto > 0:act 'Search photos heroine in "In the ass."':gt 'Komp', 'foto'

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

if $ARGS[0] = 'sale':
	cla
	clr
	*clr
	minut += 2

	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You are logged in to the site for free ads.'

	if obkvsdam = 0 and housrA = 1:
		act 'Rent out your apartment':obkvsdam = 1 & gt 'Komp', 'sale'
	elseif obkvsdam > 0:
		act 'Check responses to your ad':
			cla
			if obkvsdam = 1:
				'No one has responded to your apartment ad'
			elseif obkvsdam > 1:
				if obkvsdam = 2:predsumm = 7000
				if obkvsdam = 2:predsumm = 8000
				if obkvsdam = 2:predsumm = 9000
				if obkvsdam = 2:predsumm = 10000
				'Want to stay in your apartment for a month (<<predsumm>> rubles).'

				act 'Rent':
					sdaday = day
					sdamonth = month + 1
					housr = 0
					money += predsumm
					gt 'Komp', 'start'
				end
			end

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

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

if $ARGS[0] = 'remont':
	cla
	clr
	*clr
	minut += 15
	internetM -= 60
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You are logged in apartment repairs.'

	if housr = 1:
		if rembedr = 0:
			act 'Refurbished bedrooms (50,000 rubles)':
				if money >= 50000:
					cla
					rembedr = 1
					money -= 50000
					'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
				else
					cla
					'Unfortunately, you will not have enough money.'
				end

				act 'Leave':gt 'Komp', 'remont'
			end
		end

		if remsitr = 0:
			act 'Renovate hall (50,000 rubles)':
				if money >= 50000:
					cla
					remsitr = 1
					money -= 50000
					'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
				else
					cla
					'Unfortunately, you will not have enough money.'
				end

				act 'Leave':gt 'Komp', 'remont'
			end
		end

		if remkorr = 0:
			act 'Repair corridor (50,000 rubles)':
				if money >= 50000:
					cla
					remkorr = 1
					money -= 50000
					'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
				else
					cla
					'Unfortunately, you will not have enough money.'
				end

				act 'Leave':gt 'Komp', 'remont'
			end
		end

		if remvanr = 0:
			act 'Renovate the bathroom (50,000 rubles)':
				if money >= 50000:
					cla
					remvanr = 1
					money -= 50000
					'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
				else
					cla
					'Unfortunately, you will not have enough money.'
				end

				act 'Leave':gt 'Komp', 'remont'
			end
		end

		if remkuhr = 0:
			act 'Renovate a kitchen (50,000 rubles)':
				if money >= 50000:
					cla
					remkuhr = 1
					money -= 50000
					'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
				else
					cla
					'Unfortunately, you will not have enough money.'
				end

				act 'Leave':gt 'Komp', 'remont'
			end
		end
	end

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

if $ARGS[0] = 'porno':
	cla
	clr
	*clr
	minut += 15
	internetM -= 60
	manna += 5
	elektro += 3
	willpower += rand(5, 10)
	manna += rand(10, 50)
	horny += 5
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You went to a porn site.'

	$pornomastr = {
		cls
		minut += 15
		sweat += 1
		horny += rand(10, 25)

		if divanmastr = 0:divanmastr = 1 & mastr += 1

		gs 'stat'
		'<center><img src="images/pics/kompmas.jpg"></center>'
		'You get comfortable in front of the computer with one hand and began to fondle her breasts, a finger of the other hand you started rubbing and stroking a small bump between his legs that responded to the touch of pleasant languor covering your entire body.'

		if horny >= 100:
			orgasm += 1
			horny = 0
			'Suddenly a nice cramp brought your body and you covered powerful orgasm from which you groan.'
		end

		act 'Finish':divanmastr = 0 & gt 'Komp', 'porno'

		if horny >= 50:act 'Proceed':dynamic $pornomastr
	}

	act 'Watch porn':
		cla
		'<center><img src="images/etogame/porno.jpg"></center>'
		gt 'Komp', 'porno'
	end

	if horny >= 50:act 'Masturbate (0:15)':dynamic $pornomastr

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

if $ARGS[0] = 'pasians':
	cla
	clr
	*clr
	minut += 15
	manna += 5
	elektro += 3
	willpower += rand(5, 10)
	manna += rand(10, 50)

	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You entertained for an hour unfolding of solitaire on the computer.'

	act 'Lay another 15 minutes':gt 'Komp', 'pasians'
	act 'Close Solitaire':gt 'Komp', 'start'
end

if $ARGS[0] = 'znak':
	cla
	clr
	*clr
	minut += 15
	internetM -= 60
	manna += 5
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You are logged on to a dating site.'
	'Selection of boys is only possible if there is no boyfriend.'

	if bfA <= 0:
		act 'To pick up a guy with a gentle disposition':
			cla
			gs 'boy'
			gs 'boyfrend', 'start'
			stopboy = 0
			harakBoyA = 0
			'You wrote a guy named <<$boyA>>and talked with him and left him number hoping that he will call you.'

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

		act 'To pick up a guy with a common character':
			cla
			gs 'boy'
			gs 'boyfrend', 'start'
			stopboy = 0
			harakBoyA = 1
			'You wrote a guy named <<$boyA>>and talked with him and left him number hoping that he will call you.'

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

		act 'To pick up a guy with a strong character':
			cla
			gs 'boy'
			gs 'boyfrend', 'start'
			stopboy = 0
			harakBoyA = 2
			'You wrote a guy named <<$boyA>>and talked with him and left him number hoping that he will call you.'

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

	if gor_dorm = 8:
		act 'Pick of suitors for Eugenia':
			cla
			gor_dorm = 9

			'You shoveled dozens of profiles, Before choosing a suitable in all respects candidates and sent them a letter with a proposal to meet.'
			'Now we have to wait her turn, what_is-anything with them or not.'

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

if $ARGS[0] = 'kabtv':
	cla
	clr
	*clr
	minut += 15
	internetM -= 60
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You are logged in to the website provider of cable TV.'

	if kabel = 1:
		'Do you have a cable TV (subscription fee of 300 rubles per month lifted the 25th day of)'

		act 'Abandon cable TV':
			cla
			kabel = 1
			money -= 300
			'You have disconnected cable channels, paying the current month'
			gt 'Komp', 'kabtv'
		end
	elseif kabel = 0 and TV = 1:
		'You do not have a cable TV'

		act 'Connect cable TV':
			cla
			'Unfortunately for viewing cable television requires a more modern TV'
			gt 'Komp', 'kabtv'
		end
	elseif kabel = 0 and TV >= 2:
		'You do not have a cable TV'

		act 'Connect Cable TV (300 rubles per month)':
			cla
			kabel = 1
			'You hooked up cable TV services'
			gt 'Komp', 'kabtv'
		end
	end

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

if $ARGS[0] = 'foto':
	cla
	*clr
	internetM -= 60
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'
	'You are logged in to the social network "in the ass."'

	if shantfoto > 0:
		act 'Search':
			cla
			minut += 60
			fotsearchrand = rand(0, 10)

			if fotsearchrand <= 7:
				'You did not find anyone, maybe better luck later.'

				act 'Finish':gt 'Komp', 'foto'
			end

			if fotsearchrand > 7:
				shantfoto -= 1
				'You found the heroine a photo shoot'
				gerofotorand = rand(0, 100)

				if gerofotorand > 30:
					'Judging by the photos on her page this poor girl and take her with nothing.'

					act 'Finish':gt 'Komp', 'foto'
				end

				if gerofotorand >= 5 and gerofotorand <= 30:
					shantsr += 1
					'Judging by the photos on her page is non-existent girl from the middle classes. You send her photo and asked to be transferred to your account 5000.'

					act 'Finish':gt 'Komp', 'foto'
				end

				if gerofotorand < 5:
					shantbog += 1
					'Judging by the photos on her page is very secured lady. You send her photo and asked to be transferred to your account 30000.'

					act 'Finish':gt 'Komp', 'foto'
				end
			end
		end
	end

	act 'Browser':gt 'Komp', 'brows'
end

if $ARGS[0] = 'rabota':
	cla
	*clr
	minut += 60
	internetM -= 60
	komprabota = rand(0, 10)
	gs 'stat'
	'<center><img src="images/pics/komp.jpg"></center>'

	if komprabota = 0:
		'You found an ad:"Wanted girl model looks for advertising underwear, cash on filming zavershinii 2000 rubles."'

		if vnesh < 30:
			'But you are under this description does not fit'
		elseif vnesh >= 30:
			act 'Go at':gt 'qjob', 'var1'
		end

		if hour < 20 and hour > 7:act 'Search more':gt 'Komp', 'rabota'

		act 'Finish':gt 'Komp', 'brows'
	elseif komprabota = 1:
		'You found an ad:"Wanted girl model looks for advertising underwear, cash on filming zavershinii 2000 rubles."'

		if vnesh < 30:'But you are under this description does not fit'

		if vnesh >= 30:
			act 'Go at':gt 'qjob', 'var2'
		end

		if hour < 20 and hour > 7:act 'Search more':gt 'Komp', 'rabota'

		act 'Finish':gt 'Komp', 'brows'
	elseif komprabota > 1 and komprabota < 5:
		'You found an ad:"The artist is required naturschitsa, simpotichnoy appearance, cash 1, 000 rubles."'

		if vnesh < 15:
			'But you are under this description does not fit'
		elseif vnesh >= 15:
			act 'Go at':gt 'qjob', 'var3'
		end

		if hour < 20 and hour > 7:act 'Search more':gt 'Komp', 'rabota'

		act 'Finish':gt 'Komp', 'brows'
	elseif komprabota > 4:
		'You did not find anything suitable.'

		if hour < 20 and hour > 7:act 'Search more':gt 'Komp', 'rabota'

		act 'Finish':gt 'Komp', 'brows'
	end
end

if $ARGS[0] = 'fin':gt $locM, $metkaM

--- Komp ---------------------------------
# selfPorno
if $ARGS[0] = 'start':
	clr
	gs 'stat'
	'You have spent <<selfPornVidTime>> minutes on your film and had <<videoOrgasm>> orgasms on camera.'

	if selfPornVidTime < 300:
		if $clothingworntype ! 'nude':
			act 'Strip':
				cla
				*clr
				gs 'clothing', 'strip'
				selfPornVidTime += 5
				minut += 5
				selfPornVar += 5
				horny += 5
				clr
				'You spent five minutes stripping erotically.'

				act 'Continue':gt 'selfPorno', 'start'
			end
		end


		act 'Fondle Breasts':dynamic $selfPorno_Fondle

		if $clothingworntype = 'nude':
			act 'Masturbate':dynamic $selfPorno_Masturbate
		end

		if $clothingworntype = 'nude' and dildo > 0:
			act 'Masturbate with dildo':dynamic $selfPorno_Dildo
		end

		if $clothingworntype = 'nude' and zoo >= 1:
			act 'Fuck your dog':dynamic $selfPorno_Dog
		end
	else
		'You have spent over five hours on a single video, your done with it.'
	end

	if selfPornVidTime > 0 and DVDDisk > 0:act 'Finish Video and burn to disk':dynamic $selfPorno_Disk
	if selfPornVidTime > 0:act 'Finish Video and upload to site':dynamic $selfPorno_Finish

	act 'Leave webcam program':gt 'Komp', 'start'
end

$selfPorno_Fondle = {
	cla
	*clr
	gs 'stat'
	minut += 5

	if $clothingworntype ! 'nude':
		selfPornVidTime += 5
		selfPornVar += 3
		horny += 7
		clr
		'You spent five minutes fondling your breasts through your clothes.'
	else
		selfPornVidTime += 5
		selfPornVar += 5
		horny += 10
		clr
		'You spent five minutes fondling your breasts.'
	end

	act 'Continue':gt 'selfPorno', 'start'
}

$selfPorno_Masturbate = {
	cla
	*clr
	gs 'stat'
	selfPornVidTime += 10
	minut += 10
	mastr += 1
	manna += 15
	willpower += 15
	horny += 10

	if horny <= 90:
		clr
		selfPornVar += 5
		'You spend ten minutes masturbating for the camera.'

		act 'Continue':gt 'selfPorno', 'start'
	else
		clr
		videoOrgasm += 1
		selfPornVar += 8
		'You spend ten minutes masturbating for the camera and end up orgasming.'

		act 'Continue':gt 'selfPorno', 'start'
	end
}

$selfPorno_Dildo = {
	cla
	*clr
	gs 'stat'
	selfPornVidTime += 10
	minut += 10
	mastr += 1
	manna += 15
	willpower += 15
	horny += 15
	selfPornVar += 5

	if horny <= 85:
		selfPornVar += 10
		clr
		'You spend ten minutes masturbating for the camera with a dildo.'

		act 'Continue':gt 'selfPorno', 'start'
	else
		clr
		videoOrgasm += 1
		selfPornVar += 15
		'You spend ten minutes masturbating for the camera with a dildo and end up orgasming.'

		act 'Continue':gt 'selfPorno', 'start'
	end
}

$selfPorno_Dog = {
	cla
	*clr
	gs 'stat'
	selfPornDogTime = rand(10, 25)
	selfPornVidTime += selfPornDogTime
	minut += selfPornDogTime
	zoo += 1
	manna += 15
	willpower += 15
	horny += 15
	selfPornVar += selfPornDogTime

	if horny <= 85:
		selfPornVar += 10
		clr
		'You spend <<selfPornDogTime>> minutes having sex with your dog on camera.'

		act 'Continue':gt 'selfPorno', 'start'
	else
		videoOrgasm += 1
		selfPornVar += 15
		clr
		'You spend <<selfPornDogTime>> minutes having sex with your dog on camera and end up orgasming.'

		act 'Continue':gt 'selfPorno', 'start'
	end
}

$selfPorno_Finish = {
	clr
	gs 'stat'
	webcamday = day

	if selfPornVidTime >= 0 and selfPornVidTime < 20:
		selfPornVidMoney = selfPornVar * 50 * videoOrgasm
		minut += 10
		selfPornVidTime = 0
		selfPornVar = 0
		videoOrgasm = 0
		selfPornvid += 1
		cls
		'You put together your video and upload it to a site'

		act 'Continue':gt 'Komp', 'start'
	end

	if selfPornVidTime >= 20 and selfPornVidTime < 120:
		selfPornVidMoney = selfPornVar * 100 * videoOrgasm
		minut += 10
		selfPornVidTime = 0
		selfPornVar = 0
		videoOrgasm = 0
		selfPornvid += 1
		cls
		'You put together your video and upload it to a site'

		act 'Continue':gt 'Komp', 'start'
	end

	if selfPornVidTime >= 120:
		selfPornVidMoney = selfPornVar * 75 * videoOrgasm
		minut += 10
		selfPornVidTime = 0
		selfPornVar = 0
		videoOrgasm = 0
		selfPornvid += 1
		cls
		'You put together your video and upload it to a site'

		act 'Continue':gt 'Komp', 'start'
	end
}

$selfPorno_Disk = {
	clr
	gs 'stat'
	webcamday = day
	DVDDisk -= 1
	selfPornvidDVD += 1
	minut += 10
	selfPornVidTime = 0
	selfPornVar = 0
	videoOrgasm = 0
	'You burned your porn video to a DVD.'

	act 'Continue':gt 'Komp', 'start'
}

--- selfPorno ---------------------------------
# mirror
if $ARGS[0] = 'start':
	cla
	clr
	gs 'stat'
	gs 'portmirror'
	$gt1 = 'mirror'
	$gt2 = 'fin'
	dynamic $portmirror

	act 'Move away from the mirror':
		cla
		gt '<<$gt1>>', '<<$gt2>>'
	end
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM
!'
	if housr = 1 and housrA = 1 and housrMir = 0 and fitMir = 0 and saunaYouRoom = 0:
		housrA = 0
			gt 'korr'
		end

		if housr = 1 and housrA = 1 and housrMir = 1 and fitMir = 0 and saunaYouRoom = 0:
			housrA = 0
			housrMir = 0
			gt 'bedr'
		end

		if housrA = 0 and fitMir = 1 and saunaYouRoom = 0:
			fitMir = 0
			gt 'fit', 'razd'
		end

		if housrA = 0 and stripMir = 1 and saunaYouRoom = 0:
			stripMir = 0
			gt 'stwork', 'start'
		end

		if housrA = 0 and palMir = 1 and saunaYouRoom = 0:
			palMir = 0
			gt 'palatka', 'start'
		end

		if saunaYouRoom = 1:
			saunaYouRoom = 0
			gt $locBroom, $metkaBroom
		end

		if housrA = 0 and obMir = 1:
			obMir = 0
			gt 'obroom', 'start'
		end

		if housrA = 0 and borMir = 1:
			borMir = 0
			gt 'bordel', 'start'
		end

		if housrA = 0 and tanhouse1 = 1:
			tanhouse1 = 0
			gt 'spalnya'
		end
'!
end

--- mirror ---------------------------------
# stol
if $ARGS[0] = 'start':
	cla
	clr
	gs 'stat'
	'Oddments drawer.'

	if prezik > 0:'Packing condoms, it <<prezik>> pc.'
	if tabletki > 0:'Birth control pills <<tabletki>> pc.'
	if lubri > 0:'Lubricant, enough for <<lubri>> time.'
	if krem > 0:'Sunblock <<krem>>'
	if abonement > 0:'Subscription is valid for <<abonement>> Occupation'
	if dildo > 0:'Realistic Dildo'

	act 'Close the drawer':
		cla
		gt 'stol', 'fin'
	end

	if money > 0:
		act 'Put your money in the drawer':
			cla
			stolIN = input ("How much money you want to put in the desk drawer? (Your purse contains <<money>> rubles.)")

			if stolIN <= 0 or stolIN > money:
				!!'Not correct operation.'
			else
				stolmoney += stolIN
				money -= stolIN
			end

			gt 'stol', 'fin'
		end
	end

	if stolmoney > 0:
		act 'Take money from the desk.':
			cla
			stolOUT = input ("How much money do you want place in your purse? (There is <<stolmoney>> rubles here.)")

			if stolOUT <= 0 or stolOUT > stolmoney:
				!!'Not correct operation.'
			else
				stolmoney -= stolOUT
				money += stolOUT
				!!'You debited <<kartaOUT>> rubles, now on your account <<karta>> rubles.'
			end

			gt 'stol', 'fin'
		end
	end
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM

	!'
	if housr = 1 and housrA = 1:
		housrA = 0
		gt 'sitr'
	end
	'!
end

--- stol ---------------------------------
# telefon
$objmobilaraz = {
	cla
	telotvet = rand(0, 10)
	'"Yes, I''m listening, " said a voice from the speaker.'

	if month > 5 and temper > 20 and osadki < painweather:
		act 'Invite a walk in the park':
			cla
			'YOU:Let''s go take a walk in the park.'

			if telotvet > 3:
				'<<$telsob>>:Well let an hour in the park.'

				act 'Go':gt 'parksvid'
			elseif telotvet <= 3:
				dynamic $telotkaz
			end
		end
	end

	act 'Invite to movie':
		cla
		'YOU:Come with me to the movies?'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour in the theater.'
			act 'Go':gt 'kinosvid'
		elseif telotvet <= 3:
			dynamic $telotkaz
		end
	end

	act 'Invite billiards':
		cla
		'YOU:Let''s go to the pool.'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour of billiards.'

			act 'Go':gt 'billsvid'
		elseif telotvet <= 3:
			dynamic $telotkaz
		end
	end

	act 'Invite a cafe':
		cla
		'YOU:Let''s go to the cafe.'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour in the cafe.'

			act 'Go':gt 'kafesvid'
		elseif telotvet <= 3:
			dynamic $telotkaz
		end
	end

	act 'Invite casino':
		cla
		'YOU:Let''s go to the casino go.'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour at the casino.'

			act 'Go':gt 'kazinosvid'
		elseif telotvet <= 3:
			dynamic $telotkaz
		end
	end

	act 'Hangup':gt 'telefon', 'fin'
}

$objmobilarazboy = {
	cla
	telotvet = rand(0, 10)
	'"Yes, I''m listening, " said a voice from the speaker.'

	if month > 5 and temper > 20 and osadki < painweather:
		act 'Invite a walk in the park':
			cla
			'YOU:Let''s go take a walk in the park.'

			if telotvet > 3:
				'<<$telsob>>:Well let an hour in the park.'

				act 'Go':gt 'svidboy', 'parksvid'
			elseif telotvet <= 3:
				dynamic $telotkazboy
			end
		end
	end

	act 'Invite to movie':
		cla
		'YOU:Come with me to the movies?'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour in the theater.'

			act 'Go':gt 'svidboy', 'kinosvid'
		elseif telotvet <= 3:
			dynamic $telotkaz
		end
	end

	act 'Invite billiards':
		cla
		'YOU:Let''s go to the pool.'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour of billiards.'

			act 'Go':gt 'svidboy', 'billsvid'
		elseif telotvet <= 3:
			dynamic $telotkazboy
		end
	end

	act 'Invite a cafe':
		cla
		'YOU:Let''s go to the cafe.'

		if telotvet > 3:
			'<<$telsob>>:Well let an hour in the cafe.'

			act 'Go':gt 'svidboy', 'kafesvid'
		elseif telotvet <= 3:
			dynamic $telotkazboy
		end
	end

	act 'Hangup':gt 'telefon', 'fin'
}

$telotkaz = {
	cla
	minut += 10
	'<<$telsob>>:Sorry I''m busy, come next time.'

	act 'Hangup':gt 'telefon', 'fin'
}

$telotkazboy = {
	cla
	minut += 10
	'<<$boyA>>:Sorry, I''m busy right now, come next time.'

	act 'Hangup':gt 'telefon', 'fin'
}

if $ARGS[0] = 'start':
	cla
	clr
	gs 'stat'

	if vladimirday ! day and vladimirQW = 20 and hour = 16:gt 'qwloc2'
	if vladimirday ! day and vladimirQW = 25 and hour = 16 and week = 6:gt 'qwloc3'
	if vladimirday ! day and vladimirQW = 35 and hour = 16 and week = 6:gt 'qwloc4'
	if QWdogreiqTimer = 0 and QWdogReiq = 2 and week = 7 and qwdogiventday ! day and hour >= 12:gt 'qwlocdog'

	if ring = 0:
		if number = 6:'<center><b><<num6>><<num5>>-<<num4>><<num3>>-<<num2>><<num1>></b></center>'
		if number = 5:'<center><b><<num6>><<num5>>-<<num4>><<num3>>-<<num2>></b><<num1>></center>'
		if number = 4:'<center><b><<num6>><<num5>>-<<num4>><<num3>></b>-<<num2>><<num1>></center>'
		if number = 3:'<center><b><<num6>><<num5>>-<<num4>></b><<num3>>-<<num2>><<num1>></center>'
		if number = 2:'<center><b><<num6>><<num5>></b>-<<num4>><<num3>>-<<num2>><<num1>></center>'
		if number = 1:'<center><b><<num6>></b><<num5>>-<<num4>><<num3>>-<<num2>><<num1>></center>'
		if number = 0:'<center><<num6>><<num5>>-<<num4>><<num3>>-<<num2>><<num1>></center>'

		*nl
		'<center><b><a href="exec:gt ''telefon'', ''1''">1</a> <a href="exec:gt ''telefon'', ''2''">2</a> <a href="exec:gt ''telefon'', ''3''">3</a></b></center>'
		'<center><b><a href="exec:gt ''telefon'', ''4''">4</a> <a href="exec:gt ''telefon'', ''5''">5</a> <a href="exec:gt ''telefon'', ''6''">6</a></b></center>'
		'<center><b><a href="exec:gt ''telefon'', ''7''">7</a> <a href="exec:gt ''telefon'', ''8''">8</a> <a href="exec:gt ''telefon'', ''9''">9</a></b></center>'
		'<center><b><a href="exec:gt ''telefon'', ''Reset''">Clear</a> <a href="exec:gt ''telefon'', ''0''">0</a> <a href="exec:gt ''telefon'', ''Call''">Call</a></b></center>'

		if hour >= 8 and hour <= 19:
			if telalla > 0:
				act 'Call Alla':
					$telsob = 'Alla'
					dynamic $objmobilaraz
				end
			end

			if telmasha > 0:
				act 'Call Masha':
					$telsob = 'Masha'
					dynamic $objmobilaraz
				end
			end

			if telkat > 0:
				act 'Call Kate':
					$telsob = 'Katia'
					dynamic $objmobilaraz
				end
			end

			if bfA > 0 and svidanieA = 0:
				act 'Call <<$boyA>>':dynamic $objmobilarazboy
			end
		end

		if nastjaqw = 1 and week = 6 and vnesh > 20:act 'Call Nastya':gt 'nastja', 'pos4'
		if nastjaqw = 2 and week ! 6 and zenit = 0 and nastjaday ! day:act 'Chat with Nastya':gt 'nastja', 'pos13'
		if hour >= 8 and hour <= 20 and nastjaqw = 2 and week = 6 and vnesh > 20 and nastjaday ! day:act 'On the beach with Nastya':gt 'nastja', 'pos12'
		if nastjaqw = 5 and week = 6 and nastjaday ! day:act 'Invite Nastya': gt 'nastja', 'pos22'
		if nastjaqw = 6 and nastjaday ! day:act 'Call Nastya': gt 'nastja', 'pos31'

		act 'Hangup':
			cla
			gt 'telefon', 'fin'
		end
	end

	if ring = 1:
		if ringA = 1:
			gt 'telefon', 'boyA'

			exit
		end

		if ringB = 1:
			gt 'telefon', 'boyB'

			exit
		end

		if ringC = 1:
			gt 'telefon', 'boyC'

			exit
		end
	end
end

if $ARGS[0] = 'boyA':
	cla
	clr
	ring = 0
	ringA = 0
	boydayA = day
	gs 'stat'
	svetrand = rand(0, 5)

	if svetrand = 0:$$sveta = 'cutie'
	if svetrand = 1:$sveta = 'honey'
	if svetrand = 2:$sveta = 'sweetie'
	if svetrand = 3:$sveta = 'baby'
	if svetrand = 4:$sveta = 'hot stuff'
	if svetrand = 5:$sveta = '<<$name>>'

	'Hey <<$sveta>>, it''s me, <<$boyA>>. How''s it going?'

	act 'Normally':
		cla
		'(You) - Pretty good, you?'
		'(<<$boyA>>) - just great, but I kind of miss you, can we meet today?'

		if pregtime <= dayA and pregtime >= 7 and pregtalk = 0:
			act 'Honey, you will soon become a dad.':
				cla
				pregtalk = 1
				'(You) - Honey, I''m pregnant with your child.'

				if harakBoyA = 0:
					if bfA >= 90:
						love = 1
						'(<<$boyA>>) - This is wonderful! We have to celebrate!'
						'You started talking about living together. <<$boyA>> told you that he is not against it in principle, but first he wants you to meet his parents.'
						'He warns you that his mother is very demanding and rigorous. <<$boyA>> says that he loves his mother and does not want to upher. Therefore, you must look gorgeous, wear a dress from a boutique, have well-groomed and curled hair and makeup in moderation.'
						'When you are totally ready <<$boyA>> will take you to their parents.'

						act 'Hang up.':gt 'telefon', 'fin'

						act 'Meet tonight':
							cla
							svidanieA = 1
							'(You) - How about this evening?'
							'(<<$boyA>>) - Sounds great! When can I come to pick you up?'

							act 'Set up a time.':
								cla
								meetday = daystart
								meethour = input ("Set up a time to get picked up. It is now <<hour>> o''clock.")

								if meethour <= hour or meethour > 23:meethour = 20

								'(You) -How about <<meethour>> o''clock?'
								'(<<$boyA>>) - Okay <<$sveta>>, see you at <<meethour>> o''clock.'

								act 'Hang up.':gt 'telefon', 'fin'
							end
						end
					elseif bfA < 90:
						money += 20000
						'(<<$boyA>>) - I''m not yet ready to become a dad. I''ll give you the money for an abortion. Go out and get rid of the child.'

						act 'Hang up.':gt 'telefon', 'fin'
					end
				elseif harakBoyA = 1:
					money += 20000
					'(<<$boyA>>) - I''m not yet ready to become a dad. I''ll give you the money for an abortion. Go out and get rid of the child.'

					act 'Hang up.':gt 'telefon', 'fin'
				elseif harakBoyA = 2:
					bfA = 0
					pregtalk = 0
					'(<<$boyA>>) - What? Yes you ohuel! Somewhere tucked pussy and now dumped on me. Come on you dick.'

					act 'Hang up.':gt 'telefon', 'fin'
				end
			end
		elseif pregtime > dayA and pregtime >= 7 and pregtalk = 0:
			act 'Honey, you will soon become a dad.':
				cla
				bfA = 0
				'(You) - Honey, I''m pregnant with your child.'
				'(<<$boyA>>) - How the fuck dad? We meet with you less than you''re pregnant. Sprained whore who is here, and go to him. Everything. I can not call. Goodbye.'

				act 'Hang up.':gt 'telefon', 'fin'
			end
		elseif week > 1 and week < 5 and workKafe = 1:
			act 'Sorry, I''m working today.':
				cla
				'(You) - Oh, sorry, I''m working today.'
				'(<<$boyA>>) - Okay, I''ll call tomorrow.'

				act 'Hang up.':gt 'telefon', 'fin'
			end
		end

		act 'Tonight':
			cla
			bfA += 1
			svidanieA = 1
			meetday = daystart
			'(You) - How about this evening?'
			'(<<$boyA>>) - Sounds great! When can I come to pick you up?'

			act 'Call time.':
				cla
				meethour = input ("Set up a time to get picked up. It is now <<hour>> o''clock.")

				if meethour <= hour or meethour > 23:meethour = 20

				'(You) - How about <<meethour>> o''clock?.'
				'(<<$boyA>>) - Okay <<$sveta>>, see you at <<meethour>> o''clock.'

				act 'Hang up.':gt 'telefon', 'fin'
			end
		end

		act 'I''m busy today. Call tomorrow.':
			cla
			bfA -= 1
			'(You) - I''m busy today. Call tomorrow.'

			if bfa <= 0:bfa = 0 & '(<<$boyA>>) - damn, you''ve fucked me, come on dick.'
			if bfa > 0:'(<<$boyA>>) -  Okay, I''ll call tomorrow.'

			act 'Hang up.':gt 'telefon', 'fin'
		end
	end

	act 'Leave':
		cla
		bfA = 0
		gt 'telefon', 'fin'
	end
end

if $ARGS[0] = 'boyB':
	cla
	clr
	ring = 0
	ringB = 0
	boydayB = day
	gs 'stat'
	'<<$boyB>> offers a walk.'

	act 'Leave':
		cla
		bfB = 0
		gt 'telefon', 'fin'
	end

	act 'Call tomorrow':
		cla
		bfB -= 1

		if bfB <= 0:bfB = 0 & '<<$boyB>> said he throws you.'
		if bfB > 0:'<<$boyB>> angry and hung up.'

		gt 'telefon', 'fin'
	end

	act 'Tonight':
		cla
		bfB += 1
		svidanieB = 1
		'<<$boyB>> asked how much he come to your house.'

		act 'Let 20 hours.':
			cla
			'You are warmly said goodbye and ended the conversation on this.'

			act 'Hang up.':gt 'telefon', 'fin'
		end
	end
end

if $ARGS[0] = 'boyC':
	cla
	clr
	ring = 0
	ringC = 0
	boydayC = day
	gs 'stat'
	'<<$boyC>> offers a walk.'

	act 'Leave':
		cla
		bfC = 0
		gt 'telefon', 'fin'
	end

	act 'Call tomorrow':
		cla
		bfC -= 1

		if bfC <= 0:bfC = 0 & '<<$boyC>> said he throws you.'
		if bfC > 0:'<<$boyC>> angry and hung up.'

		gt 'telefon', 'fin'
	end

	act 'Tonight':
		cla
		bfC += 1
		svidanieC = 1
		'<<$boyC>> asked how much he come to your house.'

		act 'Let 20 hours.':
			cla
			'You are warmly said goodbye and ended the conversation on this.'

			act 'Hang up.':gt 'telefon', 'fin'
		end
	end
end

if $ARGS[0] = 'Call':
	cla

	if num6 = 0 and num5 = 0 and num4 = 0 and num3 = 0 and num2 = 0 and num1 = 1:
		'Allo. This firehouse. Speak.'
	elseif num6 = 0 and num5 = 0 and num4 = 0 and num3 = 0 and num2 = 0 and num1 = 2:
		'Allo. This is the police. Speak.'
	elseif num6 = 0 and num5 = 0 and num4 = 0 and num3 = 0 and num2 = 0 and num1 = 3:
		'Allo. This ambulance. Speak.'
	else
		'Dialtone'
	end

	act 'Hangup':
		cla
		gt 'telefon', 'fin'
	end
end

if $ARGS[0] = '1':
	cla

	!!if number = 6:end
	if number = 5:num1 = 1 & number = 6
	if number = 4:num2 = 1 & number = 5
	if number = 3:num3 = 1 & number = 4
	if number = 2:num4 = 1 & number = 3
	if number = 1:num5 = 1 & number = 2
	if number = 0:num6 = 1 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '2':
	cla

	!!if number = 6:end
	if number = 5:num1 = 2 & number = 6
	if number = 4:num2 = 2 & number = 5
	if number = 3:num3 = 2 & number = 4
	if number = 2:num4 = 2 & number = 3
	if number = 1:num5 = 2 & number = 2
	if number = 0:num6 = 2 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '3':
	cla

	!!if number = 6:end
	if number = 5:num1 = 3 & number = 6
	if number = 4:num2 = 3 & number = 5
	if number = 3:num3 = 3 & number = 4
	if number = 2:num4 = 3 & number = 3
	if number = 1:num5 = 3 & number = 2
	if number = 0:num6 = 3 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '4':
	cla

	!!if number = 6:end
	if number = 5:num1 = 4 & number = 6
	if number = 4:num2 = 4 & number = 5
	if number = 3:num3 = 4 & number = 4
	if number = 2:num4 = 4 & number = 3
	if number = 1:num5 = 4 & number = 2
	if number = 0:num6 = 4 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '5':
	cla

	!!if number = 6:end
	if number = 5:num1 = 5 & number = 6
	if number = 4:num2 = 5 & number = 5
	if number = 3:num3 = 5 & number = 4
	if number = 2:num4 = 5 & number = 3
	if number = 1:num5 = 5 & number = 2
	if number = 0:num6 = 5 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '6':
	cla

	!!if number = 6:end
	if number = 5:num1 = 6 & number = 6
	if number = 4:num2 = 6 & number = 5
	if number = 3:num3 = 6 & number = 4
	if number = 2:num4 = 6 & number = 3
	if number = 1:num5 = 6 & number = 2
	if number = 0:num6 = 6 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '7':
	cla

	!!if number = 6:end
	if number = 5:num1 = 7 & number = 6
	if number = 4:num2 = 7 & number = 5
	if number = 3:num3 = 7 & number = 4
	if number = 2:num4 = 7 & number = 3
	if number = 1:num5 = 7 & number = 2
	if number = 0:num6 = 7 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '8':
	cla

	!!if number = 6:end
	if number = 5:num1 = 8 & number = 6
	if number = 4:num2 = 8 & number = 5
	if number = 3:num3 = 8 & number = 4
	if number = 2:num4 = 8 & number = 3
	if number = 1:num5 = 8 & number = 2
	if number = 0:num6 = 8 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '9':
	cla

	!!if number = 6:end
	if number = 5:num1 = 9 & number = 6
	if number = 4:num2 = 9 & number = 5
	if number = 3:num3 = 9 & number = 4
	if number = 2:num4 = 9 & number = 3
	if number = 1:num5 = 9 & number = 2
	if number = 0:num6 = 9 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = '0':
	cla

	!!if number = 6:end
	if number = 5:num1 = 0 & number = 6
	if number = 4:num2 = 0 & number = 5
	if number = 3:num3 = 0 & number = 4
	if number = 2:num4 = 0 & number = 3
	if number = 1:num5 = 0 & number = 2
	if number = 0:num6 = 0 & number = 1

	gt 'telefon', 'start'
end

if $ARGS[0] = 'Reset':
	cla
	num1 = 0
	num2 = 0
	num3 = 0
	num4 = 0
	num5 = 0
	num6 = 0
	number = 0
	gt 'telefon', 'start'
end

if $ARGS[0] = 'fin':
	cla
	num1 = 0
	num2 = 0
	num3 = 0
	num4 = 0
	num5 = 0
	num6 = 0
	number = 0
	gt $locM, $metkaM

	!'
	if housr = 1 and housrA = 1:
		housrA = 0
		gt 'korr'
	end
	'!
end

--- telefon ---------------------------------
# TV
if $ARGS[0] = 'start':
	cla
	clr
	elektro += 5
	gs 'stat'
	'<center><img src="images/pics/telek.jpg"></center>'
	'You turn on the TV and settled comfortably on the couch.'

	if TV = 1:'Ancient TV turns on and out came the sound of hoarse advertising.'
	if TV = 2:'Huge plasma joined and out came the sound of advertising smartly.'

	if kabel = 0:
		'You do not have cable, so shows only one channel at a constant advertising and news.'

		act 'Watch TV (1:00)':gt 'TV', 'nokable'
	elseif kabel = 1:
		'You have cable TV.'

		act 'Watch TV (1:00)':gt 'TV', 'kable'
	end

	if daystart < 10 and StoryLine = 0:'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it''s a bit shocking for you to see that your body is now a woman.'
	act 'Turn off the TV and get off the couch':
		cla
		gt 'TV', 'fin'
	end
end

if $ARGS[0] = 'nokable':
	cla
	clr
	*clr
	minut += 60
	manna += 3
	willpower += rand(5, 10)
	manna += rand(10, 50)
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/telek.jpg"></center>'
	'You are viewing the central channel lying on the couch. Watch almost nothing solid and cheesy advertising program.'

	if daystart < 10 and StoryLine = 0:'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it''s a bit shocking for you to see that your body is now a woman.'

	act 'Watch TV (1:00)':gt 'TV', 'nokable'
	act 'Turn off the TV and get off the couch':gt 'TV', 'fin'
end

if $ARGS[0] = 'kable':
	cla
	clr
	*clr
	minut += 60
	manna += 6
	willpower += rand(10, 20)
	manna += rand(50, 100)
	elektro += 3
	gs 'stat'
	'<center><img src="images/pics/telek.jpg"></center>'
	'You are viewing cable television.'

	if daystart < 10 and StoryLine = 0:'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it''s a bit shocking for you to see that your body is now a woman.'

	act 'Watch TV (1:00)':gt 'TV', 'kable'
	act 'Turn off the TV and get off the couch':gt 'TV', 'fin'
end

if $ARGS[0] = 'fin':
	cla
	gt $locM, $metkaM

	!'
	if housr = 1 and housrA = 1:
		housrA = 0
		gt 'sitr'
	end
	'!
end

--- TV ---------------------------------
# vann
$stirkao = {
	cla
	*clr
	minut += dirtbelo * 5
	clrbelo += dirtbelo
	poroshok -= 1
	dirtbelo = 0
	manna -= 10
	'<center><img src="images/etogame/stir.jpg"></center>'
	'You soak the clothes in a basin and add the power detergent. You then wash your clothes until they are clean.'

	act 'Finish':gt 'vann', 'start'
}

if $ARGS[0] = 'start':
	cla
	clr
	gs 'stat'

	if obdysh = 1 and vannin = 0:
		vanobrand = rand(0, 10)
		vannin = 1

		if vanobrand = 0:gt 'vann', 'v1'
		if vanobrand = 1:gt 'vann', 'v2'
		if vanobrand = 2:gt 'vann', 'v3'
	end

	vannin = 1
	'<center><img src="images/pics/wash1.jpg"></center>'

	if shampoo = 0:'You''re out of shampoo'

	if obdysh = 1 or tanhouse1 = 1 or palMir = 1 or bordysh = 1:
		if dirtbelo > 0 and poroshok > 0:'<a href="exec:dynamic $stirkao">You have clothes you can wash</a>'

		if tampon > 0 and mesec > 0 and isprok = 0:
			act 'Use a tampon (0:05)':
				cla
				*clr
				tampon -= 1
				isprok = 1
				minut += 5
				manna -= 5
				'<center><img src="images/pics/wash3.jpg"></center>'
				'You use a tampon.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
		!!Washing off cosmetics also removes cum from face
		!!clrbelo: Amount of clean panties available
		if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
			act 'Quick wash (0:15)':
				cla
				*clr

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

				dynamic $showerdin
				sweat -= 1
				minut += 15
				'<center><img src="images/pics/wash5.jpg"></center>'
				'You gave yourself a catlick, thus removing any traces of cum.'
				sweat -= 1
				minut += 15
				clrbelo -= 1
				dirtbelo += 1
				'<center><img src="images/pics/wash5.jpg"></center>'
				'You gave yourself a catlick, thus removing any traces of cum.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if cumlip > 0 or cumface > 0:
			act 'Clean your face from sperm (0:05)':
				cla
				*clr
				mop = 1
				cumlip = 0
				cumface = 0
				sweat -= 1
				minut += 5
				'<center><img src="images/etogame/facesp.jpg"></center>'
				'You clean your face and got rid of any trace of cum.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if mop ! 1:
			act 'Wash off cosmetics (0:15)':
				cla
				mop = 1
				cumface = 0
				minut += 15
				'You washed off your makeup.'

				act 'Finish':gt 'vann', 'start'
			end
		end
		!!

		if klisma = 1 and klismaday ! day:
			act 'Give yourself an enema (0:05)':
				cla
				*clr
				minut += 5
				klismaday = day
				klismaday1= 1
				'<center><img src="images/picV/klisma.jpg"></center>'
				'You put yourself an enema and clean intestines, now your ass is ready for anal sex.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if vibrator = 1 and vibratorIN = 0:
			act 'Insert the vibrator (0:05)':
				cla
				*clr
				minut += 5
				vibratorIN = 1

				if vagina < 30:vagina += 2

				'<center><img src="images/etogame/vibrator.jpg"></center>'
				'You bend over the sink and inserted the vibrator in your pussy.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if vibrator = 1 and vibratorIN = 1:
			act 'Remove the vibrator (0:05)':
				cla
				*clr
				minut += 5
				vibratorIN = 0

				if vagina < 30:vagina += 1

				'<center><img src="images/etogame/vibrator.jpg"></center>'
				'You bend over the sink and take the vibrator out of your pussy.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if analplug = 1 and analplugin = 0 and klismaday1 = 1:
			act 'Insert a butt plug (0:05)':
				cla
				*clr
				minut += 5
				analplugIN = 1

				if anus < 30:anus += 5

				'<center><img src="images/etogame/analplug.jpg"></center>'

				if butpluguse > 0:'You bent over and inserted the butt plug.'
				if butpluguse = 0:butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'

				act 'Finish':gt 'vann', 'start'
			end
		end

		if analplug = 1 and analplugin = 1:
			act 'Remove the butt plug (0:05)':
				cla
				*clr
				minut += 5
				analplugIN = 0

				if anus < 30:anus += 1

				'<center><img src="images/etogame/analplug.jpg"></center>'
				'You bent over and took out the butt plug.' & !!0.2.6: Removed unneccessary var check

				act 'Finish':gt 'vann', 'start'
			end
		end
	end

	act 'Get out':gt 'vann', 'fin'

	if mosolmaz > 0 and mosol > 0:
		act 'Rub ointment onto your pussy (0:05)':
			cla
			minut += 5
			mosolmaz -= 1
			mosol -= 5
			'You take a tube of cream and rub it onto your itchy vulva.'

			act 'Get out and get dressed':gt 'vann', 'fin'
		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>'

			if daystart < 10 and StoryLine = 0:'It is really wild to see your new body with all its smooth curves, breasts with large nipples, wide hips, and smooth legs. You begin to lather your body in the shower noticing how soft and tender it feels. Once you lather yourself with soap you wash in the shower, continuing to experience new and strange sensations.'
			if daystart >= 10 and daystart < 30 and StoryLine = 0:'You have already gotten used to a woman''s body and its softness doesn''t surprise you very much.'
			if daystart >= 30 and StoryLine = 0 or StoryLine > 0:'You carefully lather soap over your body trying not to miss any spot, and then wash off in the shower.'

			if (leghair > 0 or lobok > 0) and stanok > 0:
				act 'Get razor':gt 'vann', 'brit'
			end

			if horny >= 90:
				act 'Use the showerhead on your pussy':
					cla
					*clr
					horny = 0
					minut += 30
					mastr += 1
					orgasm += 1
					manna += 15
					willpower += 15
					'<center><img src="images/pics/wash2.jpg"></center>'
					'You place the showerhead onto your pussy and a powerful jet of warm water begins to caress you. Soon you feel a warm wave covers your entire body and you begin to shudder as the orgasm overtakes you.'

					act 'Get out and get dressed':gt 'vann', 'fin'
				end
			elseif horny >= 40 and hormy < 90:
				act 'Send shower pussy':
					cla
					*clr
					horny += 5
					minut += 30
					manna += 10
					willpower += 10
					'<center><img src="images/pics/wash2.jpg"></center>'
					'You place the showerhead onto your pussy and a powerful jet of warm water begins to caress you. At first it feels very nice, but after a while it starts to be a little bit painful. You decide to stop masturbating.'

					act 'Get out and get dressed':gt 'vann', 'fin'
				end
			end

			act 'Get out and get dressed':gt 'vann', 'fin'
		end
		act 'Take a bath (1:00)':
			cla
			*clr
			shampoo -= 1
			minut += 60
			sweat = -3
			horny += 1
			!!dirtbelo += 1
			hapri = 0
			mop = 1
			manna += 10

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

			dynamic $showerdin

			if frost > 0:frost = 0

			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

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

			if daystart < 10:'You got into the bathroom and sat down in the warm water, sticking out of the water your knees are rounded and smooth, which you blinked, you still have not got used to his new body was wildly like to look at all these roundness. Starting lather body you unwittingly turned their attention to the chest, it''s so soft and big, and when you touch her body appear in what is unfamiliar but pleasant sensations. Then you washed with soap yourself and you can already out of the bathroom.'
			if daystart >= 10 and daystart < 30:'You got into the bathroom and sat down in the warm water, you have a little accustomed to his new body and calmly soaping all these curves and bulges, then you flushed the soap.'
			if daystart >= 30:'You got into the bathroom and went into the warm water stolidly staring at his smooth legs sticking out of the water. You lathered his body and then washed soap rubbing his hands over his curves of the female body.'

			!!'You got into the bathroom and went into the warm water. Lathered body and flushed.'

			if leghair > 0 and stanok > 0 or lobok > 0 and stanok > 0:
				act 'Get razor':gt 'vann', 'brit'
			end

			if obdysh = 1:vannmastrand = rand(0, 5)

			if horny >= 90:
				act 'Direct water on pussy':
					cla
					*clr

					if obdysh = 1 and vannmastrand = 1:gt 'vann', 'v4'

					horny = 0
					minut += 30
					mastr += 1
					orgasm += 1
					manna += 15
					willpower += 15
					'<center><img src="images/pics/wash7.jpg"></center>'
					'You sent a water faucet on pussy and tight jet of warm water began to caress you. Soon you will feel like a warm wave covers your entire body and you began to shudder in orgasm.'

					act 'Get out and get dressed':gt 'vann', 'fin'
				end
			elseif horny >= 40 and horny < 90:
				act 'Direct water on pussy':
					cla
					*clr

					if obdysh = 1 and vannmastrand = 1:gt 'vann', 'v4'

					horny += 5
					minut += 30
					manna += 10
					willpower += 10
					'<center><img src="images/pics/wash7.jpg"></center>'
					'You sent a water faucet on pussy and tight jet of warm water began to caress you. At first it was not even bad, but then sleep and arousal, even as it was not nice. So you stopped masturbating.'

					act 'Get out and get dressed':gt 'vann', 'fin'
				end
			end

			act 'Get out and get dressed':gt 'vann', 'fin'
		end
	end
end

if $ARGS[0] = 'brit':
	cla
	'You rinse the razor blade which looks in good enough shape for <b><<stanok>></b> more shaves.'

	if leghair > 0 and stanok > 0:
		act 'Shave your legs (0:15)':
			cla
			*clr
			minut += 15
			leghair = -5
			horny += 5
			stanok -= 1
			'<center><img src="images/pics/shave.jpg"></center>'

			if daystart < 10:'You have decided to shave your pussy and picking up a razor realized that you do not know how to shave. To begin, you have shaved pubic hair, it was not difficult, but then you notice that near your newfound pussy hair grow too. Here you have difficulties began, you tried to pull one hand, all these soft folds to the side so the second hand to shave all the hairs. Gradually, you still managed to shave off all his hair with your new vagina. As long as you shave you hardly came out of shock contemplating his crotch which was not at all what you''re used to. But finally it was done with shaving and you flushed with foam pussy stroking your hand and wondering sensations.'
			if daystart >= 10 and daystart < 30:'You lathered her soft feet and took in hand razor. You have grown accustomed to his new body and shaved legs calmly knowing that hairy legs with your new body is not beautiful. Finally shaving was done with and you flushed foam stroking his smooth as silk legs.'
			if daystart >= 30:'You lathered his feet and took a razor. Habitual movements you shaved hair on the legs and washed shaving foam.'

			!!'You lathered up and shaved hair with them.'

			act 'Postpone machine':gt 'vann', 'brit'
		end
	end

	if lobok > 0 and stanok > 0:
		act 'Shave pubis (0:15)':
			cla
			*clr
			minut += 15
			lobok = -5
			horny += 5
			stanok -= 1

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

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

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

			if daystart < 10:'You have decided to shave pubis, lathered his foam and picking up a razor realized that he did not imagine how it shaved. To begin, you have shaved pubic hair, it was not difficult, but then you notice that near your newfound pussy hair grow too. Here you have difficulties began, you tried to pull one hand, all these soft folds to the side so the second hand to shave all the hairs. Gradually, you still managed to shave off all his hair with your new vagina. As long as you shave you hardly came out of shock contemplating his crotch which was not at all what you''re used to. But finally it was done with shaving and you flushed with foam pussy stroking her hand and wondering sensations.'
			if daystart >= 10 and daystart < 30:'You foam lathered his groin, trying not to miss a single crease on her pussy. Then neat movements began shave pussy trying not to cut. Finally you did it and you flushed foam pubic hair and pussy.'
			if daystart >= 30:'You lathered crotch and took a razor habitual movements began to shave pubic hairs and shave pussy vokurug. Finally shaving was finished and you flushed with foam pussy.'

			!!'You lathered pubis, then shaved all the hair from it.'
			act 'Postpone machine':gt 'vann', 'brit'
		end
	end

	act 'Get out and get dressed':gt 'vann', 'fin'
end

if $ARGS[0] = 'fin':
	cla
	vannin = 0
	gt $locM, $metkaM
end

if $ARGS[0] = 'brit1':
	cla
	*clr
	obbritinvent = 1
	'<center><img src="images/img/ob/brit1.jpg"></center>'
	'While you smeared pubis foam in bath guy came, you were so passionate about what did not even notice it and only when he turned on the shaver socket looked up and saw him standing in front of you with a smile and treat your crotch. A few seconds later, he looked up from your feet, and said, "Hey, do you mind that I''m here, too, shave." and noticing your not very deft movement, which still continued to put foam on pussy, he added, "I can help, if necessary, when I have an older sister flew four years ago, so the bride from her fled, that had sometimes help shave. And then with a belly that does the most. " You and presented as a boy, who was still thirteen years probably was squatting in front of the pregnant girl and shaves her pussy, it''s probably had his first sexual experience.'

	act 'Let him stay':
		cla
		*clr
		horny += 40
		'<center><img src="images/img/ob/brit2.jpg"></center>'
		'"Shave all you want, " you replied and went back to his task. A few minutes later the guy graduated and started watching you, he came closer, eventually sat down with you and help you began shortly razor was already in the hands of unego. Since you became delot nothing, you started to talk to him, "Do you often helped shave sister?"'
		'"Yes, when both first time in two weeks, and then once every two days, she then became very fractious, and only a little stubble appeared so I ran with a razor, although I bristle even this language is not felt." Then he paused, realizing that blurted out too much.'
		'"Well, you''re done, not everyone will be helping her sister in such a delicate matter." you continue pretending that nothing zatetili.'
		'"Well, how else, I have the same except it''s nobody there. So I helped her in everything, and helped clean up, and even gave birth, I shave and wash it helped. Though she herself could have, but I always requested. " until he raskazyval you noticed that in his pants narostalo excitement.'
		'"So while you lick her or just touch?" suddenly asked you.'
		'"Snatch touched well then, and began to lick." he blurted out and immediately stopped and blushed, you smiled pleased that dragged him from the truth.'
		'"And she gratified as you, or you''re not the language of work and did not deserve?" asked you, the guy looked at the floor, all red as a lobster, but then decided to be seen, that still was asleep and began to speak.'
		'"Well, why did not deserve deserved. First time by chance happened, then I do not know how to shave, well naelozil hands on her so that she had finished first I was scared and ran out of the bathroom, and sleduyuzhy day, she had me again in the bath called and told to shave, shave it well, so there was nothing. I say it so that there is shaved, and she said the language test that''s how I first lick, and when she finished when she came to me in the pants and pulls climbed began to suck . When I finished, she said that every time I do it nicely, it will be my pleasure to do so. " he finished.'
		'"Well, you do not even fuck never?" asked you already forgotten about the razor and carefully listening to the story.'
		'"Well, actually it was. When I got used to the daily blowjob, we do this for three or four times a day doing, and so she had for twenty or thirty minutes to suck in the end when I was once again granted it, and already got a member of that -would stick in her mouth, she told me to bring the cream. When I brought it she lay on her side and said we were brother and sister and therefore can not be in the pussy and ass in here can. then I rubbed her anus cream and gently began to come. And she smiled-that I did not hesitate because it is no longer a girl and my pod her pain does not deliver. Then I drove straight off to her and started to move convulsively. I loved it podmahivala my ass, and when I finished, then just milked him his anus. So then I had already stopped giving her mouth and ass just had, and when she gave birth it was then already expanse in all positions tested her ass. " raskazyval he so vividly that you have drawn the images in my head all this and soon your pussy flowed that did not escape his gaze.'
		'"Well, here I finished, something else may pobreem?" he asked, already took the shaving foam.'

		act 'Come on':
			cla
			*clr
			picrand = 74
			'<center><img src="images/img/ob/brit3.jpg"></center>'
			'"Come on, and that will shave, my chest hair does not grow." you said'
			'"Well, I''m now your whole body check" With these words, he began to put foam on you, smearing it all over your body. His hands slid over you, you melted at his touch and when he slid to your current pussy already being almost finished.'

			act 'Continue':gt 'sex', 'kuni'
		end

		act 'No thanks':gt 'vann', 'start'
	end

	act 'Scream':
		cla
		'You yelled so that you probably even on the street could be heard. "Do not you cry, I wanted to just help, and generally have to close the door." He tried to reassure you, but you only cried out. He had no choice as to jump out of the bathroom and run.'

		act 'Finish':gt 'vann', 'brit'
	end
end

if $ARGS[0] = 'v1':
	cla
	*clr
	'<center><img src="images/img/ob/v0.jpg"></center>'
	'You went into the bathroom and saw a girl sitting on the edge of the bath and feet smeared with cream.'
	'"Sorry, I''ll come later." you said and turned to leave.'
	'"Yes, okay, come on I''m almost finished, " she said with a smile. You came back and turned to the sink to wash their hands began to occupy themselves than that until she leaves. But she was not in a hurry, and in a couple of minutes you asked "Do you want your feet too smear?"'

	act 'Refuse':
		cla
		'"No, thank you" you replied.'
		'"Well, as you want" she said, and after a few minutes, finally finished and left.'

		act 'To do their job':gt 'vann', 'start'
	end

	act 'Agree':
		cla
		*clr
		picrand = 21
		'<center><img src="images/img/ob/v1.jpg"></center>'
		'"Come on, " you said, and she began to put the cream on your feet. Her hands stroked your calves, gradually rising up to the hips and then to the buttocks, she stayed on them longer. Her hands were crushed your ass down periodically to the inside of the thighs and inapplicable fingers touched your pussy, soon it happened more often. When you slightly radvinuli feet, she kept one hand there massaging your pussy, and the second continued to stroke your buttocks. Soon you will feel on your feet not only her hands, but her lips, she kissed your feet moving eventually rising up, and now her tongue slid on your buttocks, and started down to her pussy.'

		act 'Proceed':gt 'lezbsex', 'kuni'
	end
end

if $ARGS[0] = 'v2':
	cla
	*clr
	'<center><img src="images/img/ob/v2.jpg"></center>'
	'You went into the bathroom and turned to the sink to wash steel, Soon you heard behind what that strange sound. Realizing that you are not in the bathroom alone, you turned sharply and see Man standing in a bath towel around his neck. He palilsya your ass and masturbated you even a little flattered that he masturbates looking at you. He continued to selflessly masturbate unnoticed that you look at it, a few seconds later, he finally noticed and tried to cover with a towel, went to the door, muttering something under his breath, apparently it was apologies.'

	act 'Let him go':gt 'vann', 'start'

	act 'Offer help':
		cla
		*clr
		picrand = 75
		'<center><img src="images/img/ob/v3.jpg"></center>'
		'"Let me help you" escaped you. The guy paused and finally said something articulate - "What?" you podozhli him in full and running his hand under his towel groped dildo. The guy relaxed and removed the towel, you meanwhile, dropped to a crouch and took his penis in his hand began to stroke it, then led by the hand up and down. He began to moan.'

		act 'Writing lick':gt 'sex', 'kuni'
		act 'Take by mouth':gt 'sex', 'minet'

		act 'Continue':
			cla
			*clr
			cumlip += 1
			cumface += 1
			'<center><img src="images/img/ob/v4.jpg"></center>'
			'You continued to work with his hands, a minute later the guy sat on the edge of the bed and then lay down. You actin continued to wield two-handed, and judging by his moans happy he liked it. Once you''ve started thinking about what would caress his hands not only as a member in your hands began to twitch. "Damn, " you said, and immediately realized that nothing opened his mouth, pulled out his penis and flew jet of sperm you right in the face, and some got in my mouth. "Damn, you and skorostrel." told you spitting sperm. "Sorry, " mumbled and quickly gathered guy jumped out of the bathroom.'

			act 'To do their job':gt 'vann', 'start'
		end
	end
end

if $ARGS[0] = 'v3':
	cla
	*clr
	'<center><img src="images/img/ob/v5.jpg"></center>'
	'You literally fly into the bathroom and seated on the toilet. "Wow, still a little, and just peed" you thought with relief, but then you realize that edge you have someone else here, turning his head, you see a guy washable. He stands smiling and says, "Hi."'
	'"Hi, " you reply, trying pridamat something to say. "Sorry, I just have to" finally you say.'
	'"Yes, I hear very, judging by the sound for a long time, very necessary." he says, laughing. Of you still pouring down, you''re ready to sink into the ground, but can not stand. Meanwhile man climbs out of the bathroom and stood up in front of you starts to silently watch and you see his cock medleno but surely increasing. Soon he is worth and he makes a small step forward, now his dildo literally inches from your face. He shakes them a bit from your lips, clearly hinting at a blowjob. Finally it bothers you and you start talking intending to say something he would put it away from your face. But as soon as you open your mouth, as he immediately makes dvischenie pelvis and his dildo is in your mouth.'
	'"Sorry, but I am also very necessary." he said still smiling.'

	act 'Bite':
		cla
		'You squeeze teeth and covered his head with his hands, that would not prilitelo. He starts screaming and swearing, nazavaya you these words, the value of which you can not even imagine, then you squeeze even more teeth. He was no longer screaming and begging poskulivaet only release, you can see he beat podoyalsya, fearing that may remain without any member. You decompress teeth and the guy runs out into the hallway, in the buff, showering curses you.'

		act 'To do their job':gt 'vann', 'start'
	end

	act 'Suck':
		cla
		*clr
		bj += 1
		'<center><img src="images/img/ob/v6.jpg"></center>'
		'You began gently licking the head and hand massage testicles. The guy started to moan, and then he grabbed your head with both hands, legs wide apart and planted your head so that the term immediately flew down your throat, you began to choke and popytalalis away, but his hand firmly held your head. Soon he relaxed hand, you began to suck his cock swallowing himself. A few minutes later he took a member of your mouth and lift you off the toilet, turned and put the cancer.'

		act 'Continue':
			cla
			*clr
			sex += 1
			'<center><img src="images/img/ob/v7.jpg"></center>'
			'He put his penis in your vagina, and started with the power to penetrate into you, his movements were strong and deep. You do not have time podtiretsya after pee and now drops of urine running down your thighs. You looked down on the toilet and you head climbed thought "What am I doing, fuck me in an almost public toilet, I''m cancer over the toilet full of urine and on my own leg drains urine from behind a complete stranger jerk fucks me like a cheap whore. Horror I sat down, and the most disgusting thing I like how he does it. " These thoughts all your excitement vanished and you just stood and waited as he sated. Soon he pulled out of you penis and commanded that you dropped on the floor.'

			act 'Sit on the floor':
				cla
				*clr
				cumlip += 1
				cumface += 1
				cumbelly += 1
				'<center><img src="images/img/ob/v8.jpg"></center>'
				'You fell to the floor, until you sit down with you, he pulled a T-shirt.'
				'"Mouth open, now finished, " he said nayarivaya his dick hand. You opened your mouth and you splattered sperm bay you chest and face, in my mouth got a few drops that you spat.'
				'"Well, thank you, to me it lacked." said the guy dressed and walked out, leaving you on the floor all in the semen, "That ran pee" you thought.'

				act 'To do their job':gt 'vann', 'start'
			end
		end
	end
end

if $ARGS[0] = 'v4':
	cla
	*clr
	minut += 30
	mastr += 1
	'<center><img src="images/img/ob/v9.jpg"></center>'
	'You have sent water faucet on pussy and tight jet of warm water began to caress you, then you put the funnel and its place was taken by his fingers. You selflessly masturbated suddenly heard that turn on the faucet in the sink. Opening his eyes, you see a guy standing at the sink, he looked at you and smiled.'
	'"I''m sorry to interrupt, I''ll keep you will not interfere, " he said, without looking away from your pussy, which still Sherudilo your fingers.'

	act 'Scream':
		cla
		*clr
		horny = 0
		'<center><img src="images/img/ob/v10.jpg"></center>'
		'You yelled so that you most laid ears. Guy without hesitation hurried retreat and left the bathroom. You are once again left alone, but the excitement is gone and you have nothing to like.'

		act 'To do their job':gt 'vann', 'start'
	end

	act 'Cover up':
		cla
		*clr
		'<center><img src="images/img/ob/v10.jpg"></center>'
		'You began to slowly crawl to the bathroom, that would cover his naked pussy, soapy water, and tried to close the chest hand that you do not really succeed. The guy kept watch over you and his smile grew wider, and then you realize that your hand is still stroking your pussy and his eyes only excites you. Making an effort you took the hand. He walked up to you and sat on the edge of the tub, lifted out of the water loofah handed to you, "Can I help you? ... I mean back rub, " he said. You sat and stared blankly at him not knowing what to say, and his hands were pulled down again.'

		act 'Refuse':
			cla
			*clr
			'<center><img src="images/img/ob/v10.jpg"></center>'
			'"No, thank you" barely squeezed you out of yourself.'
			'"Well, as you want" a guy turned around and went to the door, on the threshold he turned "Would you shut the door, and then there is a different contingent hangs out." and walked out.'

			act 'To do their job':gt 'vann', 'start'
		end

		act 'Agree':
			cla
			*clr
			picrand = 76
			'<center><img src="images/img/ob/v11.jpg"></center>'
			'You nodded in agreement, and he immediately threw off everything and you got into the bath. He began to rub your body sponge, soon joined her and his other hand, she glided over your body, caressing his chest, then down to her pussy below. Worth his fingers touch your pussy as you shuddered and clung to him all over, his erection caught between your buttocks. He began to move up, down, and you slightly caved giving him room to maneuver, but he did not enter into you, and put his hands on your shoulders and gently pressed, you will immediately understand what he wants, knelt down and turned to face him. Here was his throbbing dildo, you took it in hand and to right in his mouth.'

			act 'Take by mouth':gt 'sex', 'minet'
		end
	end
end

--- vann ---------------------------------
# meet
if $ARGS[0] = 'start':
	minut += 15
	dayA += 1
	svidanieA = 0
	giftNum = giftNumA
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	$boy = $boyA
	$namev = $boy
	$boybody = $boybodyA
	$boybod = $boybodA
	$boyface = $boyfaceA
	!!long cock
	dick = dickA
	!! sexual force of 0 prior_to 2
	silaVag = silaVagA
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = financeA
	!!check in appearance, a parameter vnesh
	vneshBoy = vneshBoyA
	$boyClo = $boyCloA
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = figurBoyA
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = titBoyA
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = haerBoyA
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = harakBoyA
	!!perversity
	izvrat = izvratA

	if love = 3:
		'Met you <<$boyA>> and planted them in a hired wedding limousine.'

		act 'Sit in a limousine.':
			cla
			'You got into the limo, and <<$boyA>> sat in another car. Soon the limo pulled up to the palace wedding.'

			act 'Marry husband':
				cla
				minut += 60
				love = 0
				bfA = 0
				husband = 100
				husbanday = 0
				$husName = $boyA
				$husHair = $boyfaceA
				$husBody = $boybodyA
				$husFat = $boybodA
				husDick = dickA
				harakHusb = harakBoyA
				izvratH = izvratA
				silavagH = silavagA
				husbFin = financeA
				husbandMark = 1
				'The wedding took place at a cafe. There were not many guests and of course only part of the groom. It was a lot of congratulations, toasts, merrymaking and cries bitterly. By evening, all drunk and you with souped husband took home.'

				act 'Wedding night.':gt 'husbsex', 'room'
			end
		end

		exit
	elseif love = 2:
		'<<$boyA>> looks very excited and suddenly pulls the ring out of the box.'
		'(<<$boyA>>) - <<$name>>. I offer you my hand and heart with very, come for my husband.'

		act 'No. (Rasstatsya)':
			minut += 60
			bfA = 0
			pregtalk = 0
			gt 'street'
		end

		act 'Yes':
			cla
			'You agreed and put a ring on your finger. <<$boyA>> rejoiced and hugged kissed you.'
			'(<<$boyA>>) - And now you gone choose a wedding dress.'

			act 'Go for the dress':
				cla
				minut += 60
				love = 3
				'You got in a taxi with his bride and went to the store to choose a dress. You have chosen an expensive and luxurious dress and <<$boyA>> paid his purchase.'
				'After all these winding through the city and you''re tired <<$boyA>> to drive you home, warning that the next meeting you''re married.'

				act 'Leave.':gt 'street'
			end
		end

		exit
	end

	if mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 0:
		'<<$boyA>> looks very excited, he decided to look around you that you are willing to appear before his mother.'

		act 'Go to parents.':gt 'love', 'mother'

		exit
	elseif mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 1 and tanga = 1:
		'<<$boyA>> examining you decided that you are ready to appear before his friends.'

		act 'Go to friends.':gt 'love', 'frends'

		exit
	end

	if skin = 0:bfa -= 2 & $meetskin = 'worth looking at his feet'
	if skin = 1:bfa -= 1 & $meetskin = 'throws at you view'
	if skin = 2:$meetskin = 'Looking at you'
	if skin = 3:bfa += 1 & $meetskin = 'seeing you smiling'
	if skin = 4:bfa += 2 & $meetskin = 'seeing you smiling'

	if harakBoyA = 0:
		if mop <= 2 and mop > 0:bfA += 1 & $meetmop = 'you are so beautiful today.'
		if mop = 4:bfA -= 1 & $meetmop = 'great weather today.'
	elseif harakBoyA = 1:
		if mop <= 3 and mop > 0:bfA += 1 & $meetmop = 'you are so beautiful today.'
		if mop = 4:bfA -= 1 & $meetmop = 'clearly you made up, not like Halloween.'
	elseif harakBoyA = 2:
		if mop = 4:bfA += 1 & $meetmop = 'you are so beautiful today.'
		if mop <= 2 and mop > 0:bfA -= 1 & $meetmop = 'great weather today.'
	end

	if mop = 0:bfA -= 1 & $meetmop = 'Um, you have flowed cosmetics.'
	if hapri = 1 and curly > 0:bfA += 2 & $meethair = 'You have a very beautiful hairstyle.'
	if hapri = 1 and curly = 0:bfA += 1 & $meethair = 'You have pretty hair.'
	if hapri = 0:bfA -= 1 & $meethair = 'I look at you in a hurry for our meeting.'
	if harakBoyA = 0:$meet = '"Hello darling, I am glad to see you, <<$meetmop>> <<$meethair>>"'
	if harakBoyA = 1:$meet = '"Hello <<$name>>, I am glad to see you, <<$meetmop>> <<$meethair>>"'
	if harakBoyA = 2:$meet = '"Hi <<$name>>! Glad to see you, <<$meetmop>> <<$meethair>>"'

	$meetcol = ''

	if dayA > 10 and harakBoy = 2:
		if haerBoyA ! hcol:
			bfA = bfA - 5

			if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
			if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
			if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
			if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
		elseif haerBoyA = hcol:
			bfA += 1
			'<<$boyA>> says that you have a wonderful hair color.'
		end
	end

	if dayA > 20 and harakBoy = 1:
		if haerBoyA ! hcol:
			bfA = bfA - 5

			if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
			if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
			if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
			if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
		elseif haerBoyA = hcol:
			bfA += 1
			'<<$boyA>> says that you have a wonderful hair color.'
		end
	elseif dayA > 30 and harakBoy = 0:
		if haerBoyA ! hcol:
			bfA = bfA - 5

			if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
			if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
			if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
			if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
		elseif haerBoyA = hcol:
			bfA += 1
			'<<$boyA>> says that you have a wonderful hair color.'
		end
	end

	if lip = 0:$meetlip = 'thin lips'
	if lip = 1:$meetlip = 'soft lips'
	if lip = 2:$meetlip = 'plump lips'
	if lip = 3:$meetlip = 'large, plump lips'
	if lip = 4:$meetlip = 'thick and huge lips'

	'At the entrance <<$meetskin>> <<$boyA>>. You''ll see he comes to you and says. <<$meet>> <<$meetcol>>'

	if financeA = 0:$clom = 'deshovy dressed in a tracksuit.'
	if financeA = 1:$clom = 'dressed in jeans and a sweater.'
	if financeA = 2:$clom = 'dressed in a respectable and expensive jacket.'
	if harakBoyA = 0:'<<$boyA>> looks timid and not confident young man <<$clom>>'
	if harakBoyA = 1:'<<$boyA>> looks calm and confident young man <<$clom>>'
	if harakBoyA = 2:'<<$boyA>> looks cocky and brash young man <<$clom>>'

	if dayA >= 2 and financeA = 2 and giftDay < (dayA - giftNum):
		giftrand = rand(0, 2)

		if giftrand <= financeA:
			giftDayA = dayA
			giftNum += 1
			gift = rand(bfa * 20, bfa * 30)

			if gift > 2500:gift = 2500

			giftNumA = giftNum
			money += gift
			'<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> rubles.'
		end
	elseif dayA >= 5 and financeA = 1 and giftDay < (dayA - giftNum):
		giftrand = rand(0, 2)

		if giftrand <= financeA:
			giftDayA = dayA
			giftNum += 1
			gift = rand(bfa * 10, bfa * 20)

			if gift > 1500:gift = 1500

			giftNumA = giftNum
			money += gift
			'<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> rubles.'
		end
	elseif dayA >= 10 and financeA = 0 and giftDay < (dayA - giftNum):
		giftrand = rand(0, 2)

		if giftrand <= financeA:
			giftDayA = dayA
			giftNum += 1
			gift = rand(bfa * 5, bfa * 10)

			if gift > 500:gift = 500

			giftNumA = giftNum
			money += gift
			'<<$boyA>> reached into his pocket and pulled out a gift for you. He gave you <<gift>> rubles.'
		end
	end

	'<<$boybody>> <<$boybod>> <<$boyface>> walks up to you and wants to kiss you.'

	if venera < 4 and cumface = 0:
		!!cumlip
		act 'Kiss with tongue.':
			cla

			if cumlip = 0:
				'<center><img src="images/etogame/kiss.jpg"></center>'

				if harakBoyA = 0:bfa -= 2 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> blushed and pulled away.'
				if harakBoyA = 1:bfa -= 1 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> gently obsasal your language.'
				if harakBoyA = 2:bfa += 2 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> aggressively pushed his tongue into your mouth and almost started to fuck you in the mouth with his tongue.'

				act 'Finish the kiss.':xgt 'meet', 'a'

				exit
			elseif cumlip > 0:
				'<center><img src="images/etogame/cumlip.jpg"></center>'
				'<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'

				if izvrat = 1:
					bfa += 5
					DOM += 1
					'<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'

					act 'Finish the kiss.':xgt 'meet', 'a'

					exit
				else
					bfa = 0
					'<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'

					act 'Leave.':gt 'street'

					exit
				end
			end
		end

		act 'Kiss on the lips.':
			cla

			if cumlip = 0:
				'<center><img src="images/etogame/kiss1.jpg"></center>'

				if harakBoyA = 0:'You framed to kiss her lips and <<$boyA>> a little embarrassed kissed you.'
				if harakBoyA = 1:bfa += 2 & 'You framed for a kiss lips <<$boyA>> quickly kissed you.'
				if harakBoyA = 2:bfa -= 1 & 'You framed for a kiss lips <<$boyA>> juicy kiss you, pressing his lips to your firm <<$meetlip>>.'

				act 'Finish the kiss.':xgt 'meet', 'a'

				exit
			elseif cumlip > 0:
				'<center><img src="images/etogame/cumlip.jpg"></center>'
				'<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'

				if izvrat = 1:
					bfa += 5
					DOM += 1
					'<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'

					act 'Finish the kiss.':xgt 'meet', 'a'

					exit
				else
					boya = 0
					'<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'

					act 'Leave.':gt 'street'

					exit
				end
			end
		end

		act 'Kiss on the cheek.':
			cla
			DOM += 1
			'<center><img src="images/etogame/kiss2.jpg"></center>'

			if harakBoyA = 0:bfa += 1 & 'You framed and cheek <<$boyA>> timidly kissed you.'
			if harakBoyA = 1:'You framed and cheek <<$boyA>> you kissed.'
			if harakBoyA = 2:bfa -= 2 & 'You framed and cheek <<$boyA>> kissed you discouraged with views.'

			if giftDayA = dayA:
				bfa -= 3

				if harakBoyA = 0:'<<$boyA>> looks upset.'
				if harakBoyA = 1:'<<$boyA>> looks offended.'
				if harakBoyA = 2:'<<$boyA>> looks angry.'
			end

			act 'Finish the kiss.':xgt 'meet', 'a'

			exit
		end

		act 'Do not kiss.':
			cla
			DOM += 2

			if harakBoyA = 0:bfa -= 1 & 'You nodded and said hello, <<$boyA>> get confused and blushed slightly.'
			if harakBoyA = 1:bfa -= 2 & 'You nodded and said hello <<$boyA>> frowned slightly.'
			if harakBoyA = 2:bfa -= 3 & 'You nodded and said hello <<$boyA>> chuckled and grinned.'

			if giftDayA = dayA:
				bfa -= 3

				if harakBoyA = 0:'<<$boyA>> looks upset.'
				if harakBoyA = 1:'<<$boyA>> looks offended.'
				if harakBoyA = 2:'<<$boyA>> looks angry.'
			end

			act 'Next':xgt 'meet', 'a'

			exit
		end
	elseif venera >= 4:
		bfa = 0
		'<center><img src="images/etogame/venera.jpg"></center>'
		'<<$boyA>> take a closer look at you and said, "What have you got with the lips? They are very sore. Is that genital herpes? I''d better go, do not want to get infected. Goodbye."'

		act 'Leave.':gt 'street'

		exit
	elseif cumface > 0:
		'<center><img src="images/etogame/cumface.jpg"></center>'
		'<<$boyA>> take a closer look at you and said, "What have you got stuck in your hair? Is that sperm?"'

		if izvrat = 1:
			bfa += 5
			DOM += 1
			'<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'

			act 'Yes it is the sperm still have questions?':
				cla
				gs 'stat'
				'(You) - Yes, it''s sperm still have questions?'
				'<<$boyA>> shook his head.'

				xgt 'meet', 'a'
			end

			exit
		else
			boya = 0
			'<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'

			act 'Leave.':gt 'street'

			exit
		end
	end
end

if $ARGS[0] = 'a':
	if cumfrot > 0:
		'"Hey, what are you smeared?" asked <<$boyA>> looking at your ass. "It''s sperm!"'

		if izvrat = 1:
			bfa += 5
			DOM += 1
			'<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'
		else
			bfa = 0
			'<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'

			act 'Leave':gt 'street'

			exit
		end
	end

	if financeA = 0:
		if glamur = 1:
			bfa -= (harakBoyA + 1)
			'"And you dress smartly, " remarked skeptical <<$boyA>> looking at your expensive dress.'
		end

		if skirt = 1 or sport = 1:
			bfa += (harakBoyA + 1)
			'"A classy outfit, " said <<$boyA>>'
		end

		mesorand = rand(0, 1)

		if mesorand = 0:
			'<<$boyA>> offered you a beer in the stairwell.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'podezdM', 'start'

			exit
		elseif mesorand = 1:
			'<<$boyA>> suggest that you take a walk in the park.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on':gt 'parkM', 'start'

			exit
		end
	elseif financeA = 1:
		if glamur = 1 or skirt = 1:
			boyA += (harakBoyA + 1)
			'"Great clothes, " said admiringly <<$boyA>>.'
		end

		if sport = 1:
			bfa -= (harakBoyA + 1)
			'"And you''re athletic girl" skeptical noticed <<$boyA>> looking at your clothes.'
		end

		mesorand = rand(0, 2)

		if mesorand = 0:
			'<<$boyA>> suggest that you go to the movies.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'kinoM', 'start'

			exit
		elseif mesorand = 1:
			'<<$boyA>> suggest that you take a walk in the park.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'parkM', 'start'

			exit
		elseif mesorand = 2:
			'<<$boyA>> suggest that you sit in a cafe.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'kafeM', 'start'

			exit
		end
	elseif financeA = 2:
		if glamur = 1:
			bfa += (harakBoyA + 1)
			'"You''ve got great taste in clothes, " said admiringly <<$boyA>> looking at your expensive dress.'
		elseif glamur = 0:
			bfa -= harakBoyA + 1
			'"Dear naryadets" remarked skeptical <<$boyA>> examining your unpretentious clothes.'
		end

		mesorand = rand(0, 1)

		if mesorand = 0:
			'<<$boyA>> suggest that you go to a cafe.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'kafeM', 'start'

			exit
		elseif mesorand = 1:
			'<<$boyA>> suggest that you go to a restaurant.'

			act 'Sorry, but I urgently need to escape.':
				cla
				bfa -= (harakBoyA + 1)
				gt 'street'
			end

			act 'Come on.':gt 'restoranM', 'start'

			exit
		end
	end
end

--- meet ---------------------------------
# restoranM
if $ARGS[0] = 'start':
	minut += 30
	'You came to the restaurant and sat at a table. <<$boyA>> ordered the waiter food and good wine. You have to wait when you bring the food.'

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'<<$boyA>> anecdote tells you "<<$anek>>."'

	act 'Laugh':
		cla
		SUB += 1
		bfa += 1
		xgt 'restoranM', 'a'
	end

	act 'Smile':
		cla
		!!bfa -= 1
		xgt 'restoranM', 'a'
	end

	act 'Not funny':
		cla
		DOM += 1
		bfa -= 1
		xgt 'restoranM', 'a'
	end
end

if $ARGS[0] = 'a':
	minut += 30
	fat += 1
	'Finally you brought food. <<$boyA>> pour you wine and proposed a toast to love.'

	act 'Eat':
		cla
		xgt 'restoranM', 'b'
	end
end

if $ARGS[0] = 'b':
	minut += 30
	fat += 1

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		fat += 1
		'You gladly ate the food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	elseif water < 20:
		water += 20
		'You gladly drank a mug of tea.'
	end

	alko += 2
	gs 'stat'
	'After some time with food and wine, and was done with <<$boyA>> proposed to hold you.'

	act 'Go Home':gt 'sexm', 'start'
end

--- restoranM ---------------------------------
# kafeM
if $ARGS[0] = 'start':
	minut += 30
	'You''ve come to the cafe and sat at a table. <<$boyA>> ordered the waiter for food and wine. You have to wait when you bring the food.'

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'<<$boyA>> anecdote tells you "<<$anek>>."'

	act 'Laugh.':
		cla
		SUB += 1
		bfa += 1
		xgt 'kafeM', 'a'
	end

	act 'Smile.':
		cla
		xgt 'kafeM', 'a'
	end

	act 'Not funny.':
		cla
		DOM += 1
		bfa -= 1
		xgt 'kafeM', 'a'
	end
end

if $ARGS[0] = 'a':
	minut += 30
	fat += 1
	'Finally you brought food. <<$boyA>> pour you wine and proposed a toast to you.'

	act 'Eat':
		cla
		xgt 'kafeM', 'b'
	end
end

if $ARGS[0] = 'b':
	minut += 30
	fat += 1

	if energy >= 30:
		fat += 5
		'You can no longer eat.'
	elseif energy >= 20 and energy < 30:
		fat += 3
		energy += 10
		'You pushed through the power of a meal.'
	elseif energy < 20:
		energy += 20
		fat += 1
		'You gladly ate the food.'
	end

	if water >= 20:
		'You don''t need any more tea.'
	elseif water < 20:
		water += 20
		'You gladly drank a cup of tea.'
	end

	alko += 2
	gs 'stat'
	'The cafe and the music started <<$boyA>> proposed to dance.'

	act 'Dance.':
		cla
		bfa += 1
		xgt 'kafeM', 'dance'
	end

	act 'Refuse.':
		cla
		bfa -= 1
		xgt 'kafeM', 'end'
	end
end

if $ARGS[0] = 'dance':
	minut += 5
	'<center><img src="images/etogame/dance.jpg"></center>'
	'You went out with a guy on the dance floor <<$boyA>> hug you, then you started to dance together.'

	if harakBoyA = 0:
		'<<$boyA>> is very correct in dance, he hugs you and frankly embarrassed.'

		act 'Finish the dance.':
			cla
			bfa += 1
			xgt 'kafeM', 'end'
		end
	elseif harakBoyA = 1:
		'<<$boyA>> very confidently lead you to the dance.'

		act 'Finish the dance.':
			cla
			bfa += 1
			xgt 'kafeM', 'end'
		end
	elseif harakBoyA = 2:
		'<<$boyA>> grabs your butt while dancing and pressed against you, you feel through the fabric of his hard cock rests against your stomach.'
		'He whispers to you, go to the toilet.'

		act 'Finish the dance.':
			cla
			bfa += 1
			xgt 'kafeM', 'end'
		end

		act 'Go to the toilet.':xgt 'kafeM', 'tualet'
	end
end

if $ARGS[0] = 'tualet':
	minut += 30
	horny += 10
	'<<$boyA>> pulled you into the toilet and began to knead already open your chest and you climb between her legs.'

	act 'Give blowjob':gt 'kafeM', 'bj'
	act 'Bend over the toilet.':gt 'kafeM', 'sex'
end

if $ARGS[0] = 'sex':
	*clr
	sex += 1
	sexa += 1
	vagina += 1
	horny += SUB
	bfa += 2
	gs 'brosok'
	'<center><img src="images/picVA/kafe.jpg"></center>'
	'You got his dick out of his pants and masturbate him to begin with, <<$boyA>> took out a condom and put on the penis, then he made you cancer over the toilet and stabbed your quivering pussy your <<$dick>> centimeter member.'

	if horny >= 90:
		horny = 0
		manna += 15
		willpower += 15
		orgasm += 1
		'You feel like something is growing inside of you and all your bottom turned into a blazing fire pleasant fire in a minute smooth movements on the penis you had to hand over his mouth to stop up that would not scream from orgasm.'
	end

	'Soon <<$boyA>> could not resist and finished in a condom.'

	act 'Next.':gt 'kafeM', 'end'
end

if $ARGS[0] = 'bj':
	*clr
	bj += 1
	bja += 1
	swallow += 1
	cumlip += 1
	horny += SUB
	bfa += 2
	gs 'brosok'
	'<center><img src="images/picVA/kafe1.jpg"></center>'
	'You got his dick out of his pants and masturbate him to begin with, then squatted in front of him and around his lips slowly began to suck it <<$dick>> centimeter term in the closet.'
	'Soon <<$boyA>> could not resist and finished in your mouth, filling it with his tart semen you swallow cum, but she still poured out of your mouth and ran down his lips and chin.'
	'You faithfully looked into the eyes of the guy with his semen smeared face.'

	act 'Next.':gt 'kafeM', 'end'
end

if $ARGS[0] = 'end':
	minut += 30
	'<<$boyA>> offered to hold you.'

	act 'Home.':gt 'sexm', 'start'
end

--- kafeM ---------------------------------
# parkM
if $ARGS[0] = 'start':
	minut += 30
	'You leisurely stroll through the park.'

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'<<$boyA>> anecdote tells you "<<$anek>>."'

	act 'Laugh.':
		cla
		SUB += 1
		bfa += 1
		xgt 'parkM', 'a'
	end

	act 'Smile.':
		cla
		xgt 'parkM', 'a'
	end

	act 'Not funny.':
		cla
		DOM += 1
		bfa -= 1
		xgt 'parkM', 'a'
	end
end

if $ARGS[0] = 'a':
	if harakBoyA = 0:
		gs 'stihi'
		'<<$boyA>> reads poetry for you <<$stihi>>.'

		act 'Next.':gt 'parkM', 'aa'
	elseif harakBoyA = 1:
		'<<$boyA>> to take you by the hand and you are walking through the deserted dimensional paths of the park.'

		act 'Next.':gt 'parkM', 'aa'
	elseif harakBoyA = 2:
		'<<$boyA>> and stopped taking your waist hugged. "You''re a cool girl." he said and kissed you on the lips.'

		act 'Kissing.':gt 'parkM', 'kiss'

		act 'Suspended.':
			cla
			DOM += 1
			bfa -= 1
			'You removed the face from a kiss <<$boyA>> does not look happy, "Okay, <<$name>>, went on a walk as the pioneers."'

			act 'Next.':gt 'parkM', 'aa'
		end
	end
end

if $ARGS[0] = 'kiss':
	minut += 15
	bfa += 1
	horny += 5
	'<<$boyA>> kisses you and you feel his hand grabs your ass and begins to knead her. It excite you a little touch <<$boyA>> takes you by the hand and dragged into the bushes.'

	act 'Stop it.':
		cla
		DOM += 1
		bfa -= 1
		'You pulled his hand out of his hand <<$boyA>> does not look happy, "Okay, <<$name>>, went on a walk as the pioneers."'

		act 'Next.':gt 'parkM', 'aa'
	end

	act 'Go with the guy.':gt 'parkM', 'sexrand'
end

if $ARGS[0] = 'sexrand':
	cla
	clr
	*clr
	minut += 15
	bfa += 1
	horny += 15
	gs 'stat'
	'<center><img src="images/picVA/park.jpg"></center>'
	'<<$boyA>> pulled you into the bush and exposing your breasts began to lick her. It is very nice and you eyes closed immersed in what is bliss. <<$boyA>> stands in front of you on the knee and extends to your pussy.'

	act 'Stop it.':
		cla
		DOM += 1
		bfa -= 1
		'You sidestepped and covered his chest, <<$boyA>> does not look happy, "Okay, <<$name>>, went on a walk as the pioneers."'

		act 'Next.':gt 'parkM', 'aa'
	end

	act 'Afford.':gt 'parkM', 'sexrand1'
end

if $ARGS[0] = 'sexrand1':
	cla
	clr
	*clr
	minut += 15
	bfa += 1
	horny += 20
	gs 'stat'
	'<center><img src="images/picVA/park1.jpg"></center>'
	'<<$boyA>> bared your pussy and began to caress her hand, then gently, then increasing the tempo, you are very much excited, your pussy is wet and aching demanding stuff yourself. <<$boyA>> whispers to you, "Suck me!"'

	act 'We can not do that here.':
		cla
		DOM += 1
		bfa -= 1
		'You backed away from the guy and began to dress, <<$boyA>> does not look happy, "Okay, <<$name>>, went on a walk as the pioneers."'

		act 'Next':gt 'parkM', 'aa'
	end

	act 'Get on your knees':gt 'parkM', 'sexrand2'
end

if $ARGS[0] = 'sexrand2':
	cla
	clr
	*clr
	minut += 15
	bfa += 1
	horny += 5
	bj += 1
	bja += 1
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picVA/park2.jpg"></center>'
	'You knelt in front of a guy and <<$boyA>> you buried his face in his sticking <<dickA>> centimeter member. You cupped his mouth and began to suck.'
	'After a couple of minutes <<$boyA>> told you, "Baby, if you so will continue, I finish. Let''s have sex!"'

	act 'Continue to suck':gt 'parkM', 'sexrand3'
	act 'Sex':gt 'parkM', 'sexrand4'
end

if $ARGS[0] = 'sexrand3':
	cla
	clr
	*clr
	minut += 15
	bfa += 1
	horny += 5
	cumlip += 1
	swallow += 1
	gs 'stat'
	'<center><img src="images/picVA/park3.jpg"></center>'
	'You continued enthusiastically sucking dick and <<$boyA>> issuing zdavlenny moan pulled into your mouth and a vigorous stream of burning semen.'
	'You swallow choking her, but she did not want to umeschatsya in your mouths and poured out of him spreading his chin.'
	'<<$boyA>> took out a member of your mouth stuffed with Concha and tucked it into his pants, helped you climb then said goodbye and left promising to call you.'

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

if $ARGS[0] = 'sexrand4':
	cla
	clr
	*clr
	minut += 15
	sex += 1
	sexa += 1
	pose = 1
	$nameV = $boyA
	dick = dickA
	silavag = silavagA
	gs 'stat'
	'<center><img src="images/picVA/park4.jpg"></center>'
	'<<$boyA>> poctavil you on your feet and put his hands on you bowed to the ground.'
	gs 'orgazm', 'start'

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

if $ARGS[0] = 'aa':
	minut += 30
	'Walked an hour <<$boyA>> proposed to hold you.'

	act 'Home':gt 'sexm', 'start'
end

--- parkM ---------------------------------
# kinoM
if $ARGS[0] = 'start':
	minut += 30
	'You have come to the cinema. <<$boyA>> bought two tickets for the back row.'

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'While you wait for the show <<$boyA>> anecdote tells you "<<$anek>>."'

	act 'Laugh':
		cla
		SUB += 1
		bfa += 1
		xgt 'kinoM', 'a'
	end

	act 'Smile':
		cla
		xgt 'kinoM', 'a'
	end

	act 'Not funny':
		cla
		DOM += 1
		bfa -= 3
		xgt 'kinoM', 'a'
	end
end

if $ARGS[0] = 'a':
	*clr
	minut += 90
	fat += 2
	'<center><img src="images/etogame/kino.jpg"></center>'
	'Finally started the session. And you <<$boyA>> entered the room, found their seats and sat on comfortable chairs. <<$boyA>> put a big jar of popcorn on your knees and you have become his turn.'

	if harakBoyA < 2:
		act 'Hug his arm':
			cla
			bfa += 1
			'Have you hugged his hand and he kissed you, and then sat out the entire session holding hands.'
			xgt 'kinoM', 'b'
		end
	elseif harakBoyA = 2:
		act 'Hug his arm':
			cla
			bfa += 1
			'Have you hugged his hand and he kissed you, then his hand began obschupyvat your knee <<$boyA>> whispered to you, baby, I want you.'

			act 'Clean it out and watch a movie.':xgt 'kinoM', 'b'
			act 'Masturbate.':gt 'kinoM', 'hj'
			act 'Suck.':gt 'kinoM', 'bj'
			act 'Sit down on his cock.':gt 'kinoM', 'sex'
		end
	end

	act 'Watch a movie':
		cla
		bfa -= 1
		intel += 1
		'Cinema proved interesting and you sat out the entire session without interrupting the movie.'
		xgt 'kinoM', 'b'
	end
end

if $ARGS[0] = 'sex':
	*clr
	sex += 1
	sexa += 1
	vagina += 1
	horny += SUB
	bfa += 2
	gs 'brosok'
	'<center><img src="images/picVA/sinema.jpg"></center>'
	'You got his dick out of his pants and masturbate him to begin with, <<$boyA>> took out a condom and put on the penis, after that you took the <<$dick>> centimeter of his dick wet pussy and began to move slowly in the dark hall of audience.'

	if horny >= 90:
		horny = 0
		manna += 15
		willpower += 15
		orgasm += 1
		'You feel like something is growing inside of you and all your bottom turned into a blazing fire pleasant fire in a minute smooth movements on the penis you had to hand over his mouth to stop up that would not scream the entire hall from orgasm.'
	end

	'Soon <<$boyA>> could not resist and finished in a condom.'

	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'bj':
	*clr
	bj += 1
	bja += 1
	swallow += 1
	cumlip += 1
	horny += SUB
	bfa += 2
	gs 'brosok'
	'<center><img src="images/picVA/sinema1.jpg"></center>'
	'You got his dick out of his pants and masturbate him to begin with, then leaned over him and around his lips slowly began to suck it <<$dick>> centimeter member viewers in the dark hall.'
	'Soon <<$boyA>> could not resist and finished in your mouth, you have tried to swallow all the sperm because spit still nowhere.'

	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'hj':
	*clr
	hj += 1
	hja += 1
	horny += SUB
	bfa += 1
	gs 'brosok'
	'<center><img src="images/picVA/sinema2.jpg"></center>'
	'You got his dick out of his pants and began to fondle his hands in a dark room viewers.'
	'Soon, your skillful movements guy finished you in her hands, you wiped them on his handkerchief.'

	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'b':
	minut += 30
	fat += 1
	'Session ended, the lights came on in the theater and the people went to the exit <<$boyA>> proposed to hold you.'

	act 'Home':gt 'sexm', 'start'
end

--- kinoM ---------------------------------
# podezdM
if $ARGS[0] = 'start':
	minut += 15
	'<<$boyA>> said, "Let''s go to the shop, buy pivasika"'

	act 'Start embracing.':
		cla

		if harakBoyA = 0:bfa += 2
		if harakBoyA = 1:bfa += 1
		if harakBoyA = 2:bfa -= 1

		'<center><img src="images/etogame/boygo.jpg"></center>'
		'You go to embracing kiosk there <<$boyA>> buy beer and chips and you go to the nearest entrance.'
		gt 'podezdM', 'kiosk'
	end

	act 'Go hand in hand.':
		cla

		if harakBoyA = 0:bfa += 1
		if harakBoyA = 1:bfa += 2
		if harakBoyA = 2:bfa -= 1

		'<center><img src="images/etogame/boygo1.jpg"></center>'
		'You go hand in hand to stall there <<$boyA>> buy beer and chips and you go to the nearest entrance.'
		gt 'podezdM', 'kiosk'
	end

	act 'Go next.':
		cla

		if harakBoyA = 0:bfa -= 1
		if harakBoyA = 1:bfa += 1
		if harakBoyA = 2:bfa += 2

		'<center><img src="images/etogame/boygo2.jpg"></center>'
		'You go up to the kiosk, there <<$boyA>> buy beer and chips and you go to the nearest entrance.'
		gt 'podezdM', 'kiosk'
	end
end

if $ARGS[0] = 'kiosk':
	cla
	*clr
	minut += 30
	fat += 1
	manna += 10
	willpower += 10
	podrand = rand(5, 100)
	'<center><img src="images/etogame/podezdM.jpg"></center>'
	'At the entrance you guy opens a bottle of beer and delivers it to you.'

	act 'Drink a little':
		cla
		alko += 1
		gs 'stat'

		if podrand < 9:
			xgt 'podezdM', 'kiosk1'
		elseif podrand >= 9:
			gt 'podezdM', 'grup'
		end
	end

	act 'Drink a bottle':
		cla
		alko += 2
		fat += 1
		manna += 10
		willpower += 10
		gs 'stat'

		if podrand < 9:
			gt 'podezdM', 'kiosk1'
		elseif podrand >= 9:
			gt 'podezdM', 'grup'
		end
	end
end

if $ARGS[0] = 'kiosk1':
	cla
	*clr

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'<<$boyA>> drinking beer and anecdote tells you "<<$anek>>."'

	act 'Laugh':
		cla
		SUB += 1
		bfa += 1
		gt 'podezdM', 'kiosk2'
	end

	act 'Smile':
		cla
		gt 'podezdM', 'kiosk2'
	end

	act 'Not funny':
		cla
		DOM += 1
		bfa -= 1
		gt 'podezdM', 'kiosk2'
	end
end

if $ARGS[0] = 'kiosk2':
	cla
	*clr

	if harakBoyA = 0:
		if daya < 20 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif daya >= 20 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif boyonceA = 1:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		end
	elseif harakBoyA = 1:
		if daya < 10 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif daya >= 10 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif boyonceA = 1:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		end
	elseif harakBoyA = 2 and izvrat = 0:
		if daya < 3 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif daya >= 3 and boyonceA = 0:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif boyonceA = 1:
			'<<$boyA>> drank beer and offered to take you home.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		end
	elseif harakBoyA = 2 and izvrat = 1:
		if daya < 3 and boyonceA = 0:
			'<<$boyA>> drank beer and threw the bottle told you. "<<$name>>, you''re so juicy, I want you!" with these words he came up to you and hugged the waist dug its lips in yours, his tongue entered your mouth.'

			act 'Break':
				cla
				'You escaped from the grip of his, and that he has told you, "Well, what you break, you want to do this myself."'

				act 'Fuck you!.':
					cla
					DOM += 1
					bfA = 0
					gt 'street'
				end

				act 'Kissing.':
					cla
					'<<$boyA>> kisses you and his hands down to your waist on her ass and tight squeeze.'
					gt 'sexm', 'startPod'
				end
			end

			act 'Kiss':
				cla
				SUB += 1
				'<<$boyA>> kisses you and his hands down to your waist on her ass and tight squeeze.'
				gt 'sexm', 'startPod'
			end

			exit
		elseif daya >= 3 and boyonceA = 0:
			'<<$boyA>> drank beer and suggested we go to your house and fuck you in all the cracks.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		elseif boyonceA = 1:
			'<<$boyA>> drank beer and suggested we go to your house and fuck you in all the cracks.'

			act 'Go with a guy before his entrance.':gt 'sexm', 'start'

			exit
		end
	end
end

if $ARGS[0] = 'grup':
	cla
	*clr
	'<center><img src="images/etogame/podezdM1.jpg"></center>'
	'In a couple of guys got locked, they came to your boyfriend and greeted him. Boys brought vodka and a snack.'

	act 'Refuse to drink':
		cla

		if harakBoyA = 0:bfa += 1
		if harakBoyA = 1:bfa -= 1
		if harakBoyA = 2:bfa -= 2

		gt 'podezdM', 'grup1'
	end

	act 'Drink a little':
		cla
		alko += 1
		gs 'stat'

		if harakBoyA = 0:bfa += 1
		if harakBoyA = 1:bfa += 2
		if harakBoyA = 2:bfa += 1

		gt 'podezdM', 'grup1'
	end

	act 'Thump with the guys':
		cla
		alko += 2
		fat += 1
		manna += 10
		willpower += 10
		gs 'stat'

		if harakBoy = 0:bfa -= 1
		if harakBoy = 1:bfa += 1
		if harakBoy = 2:bfa += 2

		gt 'podezdM', 'grup2'
	end
end

if $ARGS[0] = 'grup1':
	cla
	*clr
	gs 'stat'
	'You tusite in porch with the guys, they poison jokes, thumps and yuk.'
	'<<$boyA>> drank beer and offered to take you home.'

	act 'Go with a guy before his entrance':gt 'sexm', 'start'
end

if $ARGS[0] = 'grup2':
	cla
	*clr
	gs 'stat'
	'You nakiryalis hard floor and floats beneath your feet, one of the guys hug your waist, that you would not have fallen.'
	'Another man cackled and began to paw you chest.'

	if harakBoyA = 0:
		'<<$boyA>> began to mumble, "You guys that can not be so!"'
		'At that drunken guys just laughed and began pulling off your clothes.'

		act 'Resist.':gt 'sexm', 'gangrape'
		act 'Surrender.':gt 'sexm', 'gangbang'

		exit
	elseif harakBoyA = 1:
		'<<$boyA>> stood up and yelled, "Hey, you ohreneli what? That''s my chick, took his hands."'
		'Guys take a back seat and loosened his grip.'

		act 'Go with a guy before his entrance.':gt 'sexm', 'start'
		act 'Shut up, I''ll decide who I sleep, go here boys.':gt 'sexm', 'gangbang'

		exit
	elseif harakBoyA = 2 and izvrat = 0:
		'<<$boyA>> stood up and silently broke a bottle over the head guy who you pawing at his chest, the guy fell to the floor and groaned. <<$boyA>> quietly and confidently said, "Who else wants some?"'
		'Guys you instantly released and moved aside.'

		act 'Go with a guy before his entrance.':gt 'sexm', 'start'
		act 'Or maybe all together ..?':gt 'sexm', 'gangbang'

		exit
	elseif harakBoyA = 2 and izvrat = 1:
		'<<$boyA>> neigh "Let this whore in a circle is empty!"'
		'Drunk guys were enthusiastic about the proposal and began pulling off your clothes.'

		act 'Resist':gt 'sexm', 'gangrape'
		act 'Surrender':gt 'sexm', 'gangbang'

		exit
	end
end

--- podezdM ---------------------------------
# sexm
if $ARGS[0] = 'start':
	cla
	*clr

	if love = 0 and bfa >= 100 and daya >= 30 and husband = 0:
		act 'Talk about cohabitation.':gt 'love', 'start'
	end

	'<<$boyA>> will guide you to the entrance.'

	if harakBoyA = 2:'<<$name>> can priglasish me over for a cup of coffee?'
	if harakBoyA = 1:'Let me kiss you, love.'
	if harakBoyA = 0:'<<$name>> yet, I''ll wait until we meet again and I will miss you.'

	act 'Kiss goodbye to':
		cla

		if boyonceA = 0:
			if harakBoyA = 2:
				if daya < 3:
					bfa += 1
					'<<$boyA>> kisses you on the lips goodbye hands and squeezes your ass.'
				elseif daya >= 3:
					bfa -= 2
					'<<$boyA>> kisses you on the lips and pulled away from the kiss mumbling irritably, "Well, so far, the dynamo."'
				end
			elseif harakBoyA = 1:
				if daya < 10:
					bfa += 2
					'<<$boyA>> kisses you on the lips goodbye hugging your waist.'
				elseif daya >= 10:
					bfa -= 2
					'<<$boyA>> kisses you on the lips goodbye and goodbye says, "How long will we as the pioneers of the handles to hold?".'
				end
			elseif harakBoyA = 0:
				if daya < 20:
					bfa += 3
					'<<$boyA>> kisses you on the lips goodbye and gently hugs your waist.'
				elseif daya >= 20:
					bfa -= 1
					'<<$boyA>> kisses you on the lips goodbye and broke away from the kiss looks at you big sad eyes.'
				end
			end
		elseif boyonceA = 1:
			if harakBoyA = 2:
				if daya < 3:
					bfa -= 2
					'<<$boyA>> kisses you on the lips goodbye hands and squeezes your ass.'
				elseif daya >= 3:
					bfa -= 3
					'<<$boyA>> kisses you on the lips and pulled away from the kiss mutters in exasperation, "What you do today you do not want sex?"'
				end
			elseif harakBoyA = 1:
				if daya < 10:
					bfa -= 1
					'<<$boyA>> kisses you on the lips goodbye hugging your waist.'
				elseif daya >= 10:
					bfa -= 2
					'<<$boyA>> kisses you on the lips goodbye goodbye and says "Okay, live a day without sex.".'
				end
			elseif harakBoyA = 0:
				if daya < 20:
					bfa += 1
					'<<$boyA>> kisses you on the lips goodbye and gently hugs your waist.'
				elseif daya >= 20:
					bfa -= 1
					'<<$boyA>> kisses you on the lips goodbye and broke away from the kiss looks at you big sad eyes.'
				end
			end
		end

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

	act 'Say goodbye':
		cla

		if boyonceA = 0:
			if harakBoyA = 2:
				if daya < 3:
					bfa -= 1
					'<<$boyA>> slightly annoyed, "Do not be a holy innocence."'
				elseif daya >= 3:
					bfa -= 3
					'<<$boyA>> irritated "So even you do not want to kiss? Oh well."'
				end
			elseif harakBoyA = 1:
				if daya < 10:
					bfa += 1
					'<<$boyA>> waved and walked out of the house.'
				elseif daya >= 10:
					bfa -= 2
					'<<$boyA>> you irritably waved goodbye and walked quickly out of the house.'
				end
			elseif harakBoyA = 0:
				if daya < 20:
					bfa += 2
					'<<$boyA>> waving you goodbye and smiling.'
				elseif daya >= 20:
					bfa -= 1
					'<<$boyA>> waving goodbye to you and looking at you big sad eyes.'
				end
			end
		elseif boyonceA = 1:
			if harakBoyA = 2:
				if daya < 3:
					bfa -= 2
					'<<$boyA>> annoyed, "Well what are you dick of yourself break your hymen?"'
				elseif daya >= 3:
					bfa -= 4
					'<<$boyA>> in a rage "squeamish?"'
				end
			elseif harakBoyA = 1:
				if daya < 10:
					bfa -= 1
					'<<$boyA>> waved and walked out of the house.'
				elseif daya >= 10:
					bfa -= 3
					'<<$boyA>> you irritably waved goodbye and walked quickly out of the house.'
				end
			elseif harakBoyA = 0:
				if daya < 20:
					bfa += 1
					'<<$boyA>> waving you goodbye and smiling.'
				elseif daya >= 20:
					bfa -= 2
					'<<$boyA>> waving goodbye to you and looking at you big sad eyes.'
				end
			end
		end

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

	if husband = 0:
		act 'To invite':
			cla
			gt 'sexm', 'room'
		end
	elseif husband > 0:
		if week < 6 and hour < 17 and hour > 7:
			act 'To invite':gt 'sexm', 'room'
		elseif week > 5 or week < 6 and hour > 16:
			act 'To say that the house husband and you can not.':
				cla

				if harakBoyA = 0:
					bfA = 0
					'"What, are you married, you obmannyvala me, and I loved you so, goodbye!" he shouted and ran away in tears.'

					act 'Go to the apartment':gt 'korr'
				elseif harakBoyA = 1:
					'"Well then, see you, I''ll call you, " he said quietly and left.'

					act 'Go to the apartment':gt 'korr'
				elseif harakBoyA = 2:
					'"My husband is not a wall, and can move up and can Climb a little higher, for example stop in the attic?" he said, grinning pretty.'

					act 'Refuse':bfa -= 1 & gt 'korr'

					act 'Agree':
						bfa += 1
						boycherdaksex = 1
						gt 'sexm', 'room'
					end
				end
			end
		end
	end
end

!!harakHusb > 0

if $ARGS[0] = 'room':
	clr
	minut += 20
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	if boycherdaksex = 1:
		'<center><img src="images/etogame/cherdak.jpg"></center>'
		'You guy climbed into the attic.'
	elseif boycherdaksex = 0:
		'<center><b><font color="maroon">Bedroom</font></b></center>'

		if rembedr = 0:'<center><img src="images/etogame/bedr.jpg"></center>'
		if rembedr = 1:'<center><img src="images/etogame/bedr2.jpg"></center>'

		'You took off his shoes and went with a guy in the bedroom.'
	end
	if harakBoyA = 2:
		'<<$boyA>> grabs you and rudely pushes you to your starting passionately kiss you and try to steal your clothes.'
		'Finally <<$boyA>> won in an unequal battle with your bra straps and you section.'

		if boyonceA = 1:
			sexrand = rand(0, 3)

			if sexrand = 0:
				'"<<$name>>, pine I huytsa juicy."'

				act 'Give blowjob':
					cla
					bfa += 3
					gt 'sexm', 'minet'
				end

				act 'I do not want to let another':gt 'sexm', 'variant'
			elseif sexrand = 1:
				'"<<$name>>, cup your ass."'

				act 'Anal':
					cla
					bfa += 5
					gt 'sexm', 'anal'
				end

				act 'Oh nafig, come on another':gt 'sexm', 'variant'
			elseif sexrand = 2:
				'"Lie down and spread your <<$name>> Lyashko."'

				act 'Spread her legs ':gt 'sexm', 'miss'
				act 'I do not want to let another':gt 'sexm', 'variant'
			elseif sexrand = 3:
				'"Arise <<$name>> crustaceans."'

				act 'Doggy-Style':gt 'sexm', 'dog'
				act 'I do not want to let another':gt 'sexm', 'variant'
			end
		elseif boyonceA = 0:
			'<<$boyA>> threw you on the bed and bit his lips to your breast.'

			act 'Sex':gt 'sexm', 'miss'
			act 'I do not want to let another':gt 'sexm', 'variant'
		end
	elseif harakBoyA = 1:
		'<<$boyA>> gently hugs you and cuddle.'
		'You undress and smoothly <<$boyA>> tells you how you want, darling.'

		act 'I want as much as you want.':
			cla

			if boyonceA = 1:
				sexrand = rand(0, 3)
				if sexrand = 0:
					'"Svetulya, I suck."'

					act 'Give blowjob':
						cla
						bfa += 2
						gt 'sexm', 'minet'
					end

					act 'I do not want to let another':gt 'sexm', 'variant'
				elseif sexrand = 1:
					'"Svetulya, I want you in the ass."'

					act 'Anal':
						cla
						bfa += 4
						gt 'sexm', 'anal'
					end

					act 'I do not want to let another':gt 'sexm', 'variant'
				elseif sexrand = 2:
					'"Svetulya, I want you."'

					act 'Spread her legs ':gt 'sexm', 'miss'
					act 'I do not want to let another':gt 'sexm', 'variant'
				elseif sexrand = 3:
					'"Svetulya, stand on all fours."'

					act 'Doggy-Style':gt 'sexm', 'dog'
					act 'I do not want to let another':gt 'sexm', 'variant'
				end
			elseif boyonceA = 0:
				'<<$boyA>> threw you on the bed and bit his lips to your breast.'

				act 'Sex':gt 'sexm', 'miss'
				act 'I do not want to let another':gt 'sexm', 'variant'
			end
		end

		act 'Propose options':gt 'sexm', 'variant'
	elseif harakBoyA = 0:
		'<<$boyA>> is shy and does not know what to do.'

		act 'Propose options':gt 'sexm', 'variant'
	end
end

if $ARGS[0] = 'variant':
	if harakBoyA = 0:bfa += 1
	if harakBoyA = 2:bfa -= 1

	'<<$boyA>> looking at you and waiting for what you say'

	act 'Spread her legs ':gt 'sexm', 'miss'
	act 'Doggy-Style':gt 'sexm', 'dog'
	act 'Anal':gt 'sexm', 'anal'
	act 'Give blowjob':gt 'sexm', 'minet'
	act 'Masturbate him':gt 'sexm', 'hand'

	if kunday ! day:
		act 'Cooney':gt 'sexm', 'kuni'
	end

	if DOM > 0 and boyonceA = 1 and harakBoyA = 0 and izvratA = 1 and strapon > 0:
		act 'Otstraponili':gt 'sexm', 'strapon'
	end
end

if $ARGS[0] = 'minet':
	*clr
	popolaini = 1
	bfA += 1
	bj += 1
	bja += 1
	dick = dickA
	harakBoy = harakBoyA
	minut += 30
	$nameV = $boyA
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/bj.jpg"></center>'
	'<<$boyA>> as a member you spent on the lips.'

	if bj = 1:'You thought, "Damn, I rolled, I sit in front of a man, and he told me in the mouth by a dick pokes."'

	gs 'oral', 'start'

	act 'Continue to suck.':
		cla
		*clr
		swallow += 1
		cumlip += 1
		bfa += 3
		'<center><img src="images/picV/swallow.jpg"></center>'
		'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boyA>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

		act 'Leave.':gt 'sexm', 'endsex'
	end

	act 'Remove the mouth.':
		cla
		*clr

		if harakBoyA = 0:
			'<center><img src="images/picV/hand.jpg"></center>'
			'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
		elseif harakBoyA = 1:
			tiprand = rand(0, 3)

			if tiprand < 3:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
			elseif tiprand = 3:
				facial += 1
				cumface += 1
				bfa += 1
				'<center><img src="images/picV/facial.jpg"></center>'
				'You took out a member and at this point <<$boyA>> is dead right on your face, covering it with warm and sticky cum.'
			end
		elseif harakBoyA = 2:
			facial += 1
			cumface += 1
			bfa += 1
			'<center><img src="images/picV/facial.jpg"></center>'
			'<<$boyA>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
		end

		act 'Leave.':gt 'sexm', 'endsex'
	end
end

if $ARGS[0] = 'hand':
	*clr
	popolaini = 1
	DOM += 1
	hj += 1
	hja += 1
	minut += 30
	horny += DOM
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/hand1.jpg"></center>'
	'You got it <<dick>> centimeter penis and began to caress her arms around his arms, moving the skin on the crimson head.'
	'Soon, your skillful movements guy finished you in her hands, covering them with warm and sticky sperm.'

	if harakBoyA = 0:bfA -= 1
	if harakBoyA = 1:bfA -= 5
	if harakBoyA = 2:bfA -= 10

	act 'Wipe your hands and carry to the door guy.':gt 'sexm', 'endsex'
end

if $ARGS[0] = 'kuni':
	*clr
	kunday = day
	DOM += 1
	kuni += 1
	minut += 30
	horny += DOM + (silaVag * 2 + 5)
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/kuni.jpg"></center>'
	'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
	'<<$boyA>> lay down between your legs and began to work the tongue on your pussy.'

	if harakBoyA = 0:bfA -= 1
	if harakBoyA = 1:bfA -= 5
	if harakBoyA = 2:bfA -= 10

	if horny >= 90:
		horny = 0
		manna += 15
		willpower += 15
		orgasm += 1
		'Man of skillful actions you covered orgasm.'
	else
		'Actions Man though they were exciting, but they started to bore you.'
	end

	act 'Further.':
		cla

		if husband > 0 and hour < 17 and hour > 7 and boycherdaksex = 0:popolaini = 2 & gt 'sexm', 'popala'

		gt 'sexm', 'variant'
	end
end

if $ARGS[0] = 'strapon':
	*clr
	DOM += 5
	pegging += 1
	minut += 30
	horny += DOM
	bfA += 5
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/pegging.jpg"></center>'
	'You got out of the drawer and put his strap. <<$boyA>> got cancer on the bed.'
	'Greased lubricated anus guy and stuck it in the strap. While you fuck his ass, he groaned, and finally finished. You remove the strap from him and went to the bathroom.'


	act 'Wipe your hands and carry to the door guy.':
		cla
		gt 'korr'
	end
end

if $ARGS[0] = 'anal':
	*clr
	popolaini = 3
	bfA += 1
	minut += 30
	anal += 1
	anala += 1

	if dickA < anus:anus += 1

	gs 'brosok'
	gs 'stat'

	'<center><img src="images/picV/dog2.jpg"></center>'

	if analplugin = 1 :
		analpluginbonus = 10
		analplugin = 0

		if anus < 16 :
			'<<$boyA>> has pulled out of your narrow and tight ass plug'
		elseif anus >= 16 :
			' <<$boyA>>pulled out of your ass juices dripping feverish stopper'
		end

		'and you feel as hard cock rested in your hole.'

		if anus + analpluginbonus < dick:
			'You screamed and bit his lip from a sharp pain when it <<dickA>> member centimeter apart your ass you entered.'
		elseif anus + analpluginbonus >= dick:
			'You groaned when his feelings of overcrowding <<dickA>> member centimeter apart your ass you entered.'
		end

		'Finally <<$boyA>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'
		cumass += 1
		minut += 3
		cumanus += 1

		if anus < dickA:anus += 1

		horny += (anus - dickA) * 3

		if horny < 1 :horny = 1

		if horny >= 100 :
			horny = 1
			orgasm += 1
			analorgasm += 1
			' In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
		end

		gs 'stat'

		act 'Hold up doors.':gt 'sexm', 'endsex'
	else
		if lubri = 0:
			lubonus = 2
			'Lubricant and you do not have <<$boyA>> spitting on his fingers became saliva to lubricate your ass.'
		elseif lubri > 0:
			lubri -= 1
			lubonus = 10
			'You got out of the box with a tube of lube and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
		end

		'<<$boyA>> put your stomach on the bed apart and began to massage your buttocks your anus with your fingers, first one, then two.'

		if anus < 10:'When your ass you entered three fingers involuntarily groaned in pain.'
		if anus >= 10:'Then the guy brought you three fingers and started to stretch your anus.'

		'<<$boyA>> pulled his fingers out of your buttocks and you feel his hard cock rested in your hole.'

		if anus + lubonus < dickA:
			'You screamed and bit his lip from a sharp pain as his cock parted your ass you entered.'
		elseif anus + lubonus >= dickA:
			'You moan from the feeling of overcrowding as his cock parted your ass you entered.'
		end

		'<<$boyA>> stopped for a moment giving your ass adapt to member protruding from it, and then started to drive them all the more insistent.'

		if anus + lubonus + 2 < dickA:
			if mop > 1:mop = 0

			'You cried and clutched his teeth into the pillow when <<dickA>> centimeter cock began to fuck your ass on full force.'
		elseif anus + lubonus + 2 >= dickA:
			'You started to moan rhythmically in time with the movements member inside you.'
		end

		'Finally <<$boyA>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'

		if klismaday ! day:
			bfA -= 8
			'<<$boyA>> took out a member of your ass and see on your dick shit said, "Oban, Charlie and the Chocolate Factory, baby, before anal enema should be done, but it is not hygienic to knead the clay by a dick."'
		elseif klismaday = day:
			bfA += 5
			cumanus += 1

			if anus < dickA:anus += 1

			horny += (anus - dickA) * 3

			if horny < 1 :horny = 1

			if horny >= 100 :
				horny = 1
				orgasm += 1
				analorgasm += 1
				' In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
			end

			'<<$boyA>> took out a member of you and kissed you went to the bathroom.'
		end

		if anus < dick:anus += 1
		gs 'stat'

		act 'Hold up doors.':lubonus = 0 & gt 'sexm', 'endsex'
	end
end

if $ARGS[0] = 'miss':
	*clr
	popolaini = 3
	bfA += 1
	sex += 1
	sexa += 1
	minut += 30
	pose = 0
	$nameV = $boyA
	dick = dickA
	silavag = silavagA
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/vag.jpg"></center>'
	'<<$boyA>> spread your legs and began to fondle her fingers pussy.'
	gs 'orgazm', 'start'

	act 'Hold up doors.':gt 'sexm', 'endsex'
end

if $ARGS[0] = 'dog':
	*clr
	popolaini = 3
	bfA += 1
	sex += 1
	sexa += 1
	minut += 30
	pose = 1
	$nameV = $boyA
	dick = dickA
	silavag = silavagA
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/dog1.jpg"></center>'
	'<<$boyA>> made you cancer and spread your bread before you enter.'
	gs 'orgazm', 'start'

	act 'Hold up doors.':gt 'sexm', 'endsex'
end

if $ARGS[0] = 'startPod':
	podrand = rand(0, 1)

	if podrand = 0:
		'<<$boyA>> whispered to you, take it in your mouth.'

		act 'Fuck off!':
			cla
			DOM += 1
			bfA = 0
			gt 'street'
		end

		act 'Stand on his heels':gt 'sexm', 'blow'
	elseif podrand = 1:
		'<<$boyA>> began to strip off your clothes.'

		act 'Fuck off!':
			cla
			DOM += 1
			bfA = 0
			gt 'street'
		end

		act 'Doggy-Style':gt 'sexm', 'doggy'
	end
end

if $ARGS[0] = 'doggy':
	bfA += 1
	sex += 1
	sexa += 1
	minut += 30
	pose = 1
	$nameV = $boyA
	dick = dickA
	silavag = silavagA
	gs 'brosok'
	gs 'stat'
	'<center><img src="images/picV/dog.jpg"></center>'
	'<<$boyA>> made you cancer and spread your bread before you enter.'
	gs 'orgazm', 'start'

	act 'Correct clothes and leave.':
		cla
		gt 'street'
	end
end

if $ARGS[0] = 'blow':
	minut += 20
	gs 'stat'
	'You squatted and <<$boyA>> pulled out his penis.'

	act 'Take by mouth':
		cla
		*clr
		bfA += 1
		bj += 1
		bja += 1
		dick = dickA
		harakBoy = harakBoyA
		minut += 30
		$nameV = $boyA
		gs 'brosok'
		gs 'stat'
		'<center><img src ="images/picV/bj.jpg"></center>'
		'<<$boyA>> as a member you spent on the lips.'

		if bj = 1:'You thought, "Damn, I rolled, I sit in front of a man, and he told me in the mouth by a dick pokes."'

		gs 'oral', 'start'

		act 'Continue to suck':
			cla
			*clr
			swallow += 1
			cumlip += 1
			'<center><img src="images/picV/swallow.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boyA>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			act 'Leave.':
				cla
				gt 'korr'
			end
		end

		act 'Remove the mouth':
			cla
			*clr

			if harakBoyA = 0:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
			elseif harakBoyA = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and <<$boyA>> you are finished in hand.'
				elseif tiprand = 3:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'You took out a member and at this point <<$boyA>> is dead right on your face, covering it with warm and sticky cum.'
				end
			elseif harakBoyA = 2:
				facial += 1
				cumface += 1
				'<center><img src="images/picV/facial.jpg"></center>'
				'<<$boyA>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
			end

			act 'Leave':
				cla
				gt 'korr'
			end
		end
	end

	act 'Masturbate him':
		cla
		*clr
		DOM += 1
		hj += 1
		hja += 1
		minut += 30
		horny += DOM
		gs 'brosok'
		gs 'stat'
		'<center><img src="images/picV/hand1.jpg"></center>'
		'You got his dick and began to caress her arms around his hands.'
		'Soon, your skillful movements guy finished you in her hands.'

		if harakBoyA = 0:bfA -= 1
		if harakBoyA = 1:bfA -= 5
		if harakBoyA = 2:bfA -= 10

		act 'Wipe your hands and walk away':
			cla
			gt 'korr'
		end
	end
end

if $ARGS[0] = 'gangrape':
	'You began struggling and one of the guys hit you with his hand on the cheek, saying, "Shut up slut Spreads and thighs! And that''ll blow fuck up now!"'

	act 'Obey':gt 'sexm', 'gangbang'

	act 'Start a fight':
		cla
		$nameV = 'Drunken mug'
		!!stats
		strenV = 100
		speedV = 20
		agilV = 10
		reactV = 10
		vitalV = 50
		intelV = 10
		willV = 10
		!!skills
		magikV = 100
		boxingV = 10
		shootV = 100
		!!parameters
		healthV = vitalV * 10 + strenV * 5
		mannaV = intelV * 10 + magikV * 10
		willpowerV = willV * 10
		BonusAtakV = 0
		BonusDefV = 0
		!!Programme of Action
		program = 0
		gangrapeFight = 1

		if spellavtoklon = 1:klon = 3
		if spellbefshild = 1:defence = 500

		gt 'fight', 'start'
	end
end

if $ARGS[0] = 'gangbang':
	if izvrat = 1:
		bfA += 5
	else
		bfa = 0
	end

	minut += 30
	gang += 1
	guy += 4
	bj += 4
	anal += 1
	sex += 1
	cumface += 1
	cumlip += 1
	facial += 1
	vagina += 1
	anus += 1
	throat += 1

	if mop > 1:mop = 0

	SUB += 3
	horny += SUB * 10
	gs 'stat'
	'<center><img src="images/picV/gangbang.jpg"></center>'
	'One of the guys live in the porch and dragged you into his apartment, there tore your clothes.'
	'Boys undressed and put you on their knees substituting peppers for maintenance. You obediently steel is processed mouth and hands fat cock like a real mnogostanochnitsa.'
	'One of the boys lay on the couch and grabbed you by the waist and pulled to his planted your pussy on his cock, you do not have time to come to his senses as your lips pressed against two wet from your saliva member.'
	'You feel like your anus lubricated than that cold and then started coming there something big and solid.'

	act 'Moan':
		cla
		*clr
		'<center><img src="images/picV/gangbang1.jpg"></center>'
		'You moan when you planted in the ass fat cock and started to fuck you in all holes.'

		if anus >= 10:
			horny += anus + SUB
			'Two members of hammering you from behind, you feel like they rub through the thin barriers according blazing between the anus and the vagina sloshing. You redoubled enthusiasm treat their two dick swollen lips from work.'
		elseif anus < 10:
			horny += (10 - anus)
			'From your eyes dripping tears from severe pain when the hard cock ramming your ass and rub through a fine stenochku with another member in your pussy.'
		end

		if horny >= 90:
			orgasm += 1
			'Sensation in the abdomen began to grow and soon your whole body as if struck shock you moan from orgasm.'
		end

		'It seems the guys have played enough with you and you have decided obkonchat face. You removed from the members and pointed to the floor.'

		act 'Get on your knees':
			cla
			*clr
			'<center><img src="images/picV/gangbang2.jpg"></center>'
			'You humbly knelt before the guys, they surrounded you and started to cum on your face, covering it with sticky, warm and fragrant sperm.'
			'After the boys ran out, they lost interest in you and began to leave.'

			act 'Leave':
				cla
				gt 'korr'
			end
		end
	end
end

if $ARGS[0] = 'popala':
	cla
	*clr

	if popolaini = 1:
		'<center><img src="images/img/hasb/p0.jpg"></center>'
		'Once you going to go into the bath that would wash as appeared on the threshold your husband caught you kneeling in front of the entire semen dipping member.'
	elseif popolaini = 2:
		'<center><img src="images/img/hasb/p5.jpg"></center>'
		'Once you have gathered to change the pose as her husband enters the room.'
	end

	!'
	if popolaini = 2:
		'<center><img src="images/img/hasb/p4.jpg"></center>'
		'Once you''ve got the taste as husband enters the room.'
	end
	'!

	if harakHusb = 0:
		'"Honey what''s happening here, what are you cheating on me, " stammered <<$husName>> looking at you.'
		'"<<$husName>> it''s not what you think it''s just sex, no feelings, I love only you. For me, it does not mean anything, come to me I''ll show you how much I love you. "Answered you do not understand how you can''t be a delusion.'

		if izvratH = 0:
			husbizvradd = 0
			husbharmin = 0
			husbandMark = 0
			husband = 0
			divorced += 1
			'"No, I''m going, you betrayed our love." he faltered and ran from the room almost sobbing.'

			if harakBoyA = 0:
				bfA = 0
				'"So you''re married, you do obmannyvala, and I loved you so, goodbye!" your guy shouted and ran after her husband.'

				act 'Leave':gt 'korr'
			elseif harakBoyA = 1:
				'"Well, I see you are not up to me, so perhaps I''ll go, but if you want I can and stay, comfort, " said <<$boyA>>'

				act 'Let him go':gt 'korr'

				act 'Let it remain':
					bfA += 1
					picrand = 83

					if popolaini = 3:picrand = 84

					xgt 'sex', 'var'
				end
			elseif harakBoyA = 2:
				'"This is a room, but oh well clown ran, and I once again ready, let''s continue, let this wimp fells" said <<$boyA>>, clearly intending to continue the evening.'

				act 'Refuse':bfA -= 1 & gt 'korr'

				act 'Continue':
					bfA += 2
					picrand = 83

					if popolaini = 3:picrand = 84

					xgt 'sex', 'var'
				end
			end
		elseif izvratH = 1:
			'"You really only love me." asked <<$husName>>.'
			'"Yes, but you come to me I sbelayu you all that he did, but it will be with love and you will understand what is the difference" you replied, still amazed at how he believes in this nonsense. <<$husName>> came up to you and you unbuttoned his pants got dick.'

			if harakBoyA = 0:
				bfA = 0
				husbizvradd = 0
				husbharmin = 0
				husbandMark = 0
				husband = 0
				divorced += 1
				'"So you''re married, you do obmannyvala, and I loved you so, you despicable liar, goodbye!" your guy shouted and ran out of the room.'
				'"He''s right, you''re a liar, and you do not deserve me, you''re a fallen woman, I do not want you vidit" burst into tears and ran your husband to follow the guy.'

				act 'Leave':gt 'korr'
			elseif harakBoyA = 1:
				'<<$boyA>> stood and watched as you fucked by her husband, "Well, my fake it, so you can not compare, let you enter into it, and I''ll give her mouth, then here is something to compare" he said.'
				'"But come on." perked <<$husName>> "Dear lie down on the bed"'

				act 'Lie down':
					cla
					*clr
					houseslut += 1
					'<center><img src="images/img/hasb/p1.jpg"></center>'
					'You lay on the bed and <<$husName>> you entered into the vagina, and <<$boyA>> lay before you substitute member to the mouth. You diligently podmahivat husband does not satisfy the lover forgetting mouth.'
					'"Maybe in another try, that would say so check in all positions and be uverrenymi to end." again proposed <<$boyA>>, and the husband agreed.'

					act 'Continue':
						bfA += 1

						if popolaini = 1:picrand = 40
						if popolaini = 2:picrand = 41
						if popolaini = 3:picrand = 42

						xgt 'sexdvoe', 'var'
					end
				end
			elseif harakBoyA = 2:
				'"That''s right, fuck her mouth, and even better Poimena her ass, and I''ll dryuchit her mouth, you look like an ass she can show your love, or not, " said <<$boyA>>, explicitly podnachivaya your husband.'
				'"Yeah, come to bed, see how you''re going to love her ass, " said <<$husName>>.'

				act 'Lie down':
					cla
					*clr
					houseslut += 1
					'<center><img src="images/img/hasb/p2.jpg"></center>'
					'You lay on the bed and <<$husName>> you entered into the anus, and <<$boyA>> lay before you substitute member to the mouth. You diligently podmahivat husband trying to put his ass on his cock to the root, not forgetting to meet her lover mouth.'
					'"Now, let me, let show your love for your cock, removed from her ass mouth." again proposed <<$boyA>>, and the husband agreed.'

					act 'Continue':
						bfA += 1

						if popolaini = 2:picrand = 41
						if popolaini = 1:picrand = 40
						if popolaini = 3:picrand = 42

						xgt 'sexdvoe', 'var'
					end
				end
			end
		end
	elseif harakHusb = 1:
		husbizvradd = 0
		husbharmin = 0
		husbandMark = 0
		husband = 0
		divorced += 1
		'"What the crap is going on here, " said <<$husName>> looking at you.'
		'"<<$husName>> it''s not what you think it''s just sex, no feelings, I love only you. For me, it does not mean anything, come to me I''ll show you how much I love you." Answer You do not understand how you can''t be a delusion.'

		if izvratH = 0:
			'"You do ohrenela slut, what love. You fuck with everyone, but I can see if she likes you go forest whore." he said and left the room, slamming the door.'

			if harakBoyA = 0:
				bfA = 0
				'"So you''re married, you do obmannyvala, and I loved you so, goodbye!" your guy shouted and ran out of the room.'

				act 'Leave':gt 'korr'
			elseif harakBoyA = 1:
				'"Well, I see you are not up to me, so perhaps I''ll go, but if you want I can and stay, comfort, " said <<$boyA>>'

				act 'Let him go':gt 'korr'

				act 'Let it remain':
					bfA += 1
					picrand = 83

					if popolaini = 3:picrand = 84

					xgt 'sex', 'var'
				end
			elseif harakBoyA = 2:
				'"This is a room, but oh well hubby dumped, and I once again ready, let''s continue, let this cuckold goes shoals horns knocks" said <<$boyA>>, clearly intending to continue the evening.'

				act 'Refuse':bfA -= 1 & gt 'korr'

				act 'Continue':
					bfA += 2
					picrand = 83

					if popolaini = 3:picrand = 84

					xgt 'sex', 'var'
				end
			end
		elseif izvratH = 1:
			bfA = 0
			'"You will then hear yourself what nonsense talking about" asked <<$husName>>.'
			'"I''m sorry" and just told you, his eyes downcast.'
			'<<$husName>> came up to you, "I''ll leave today and will file for divorce, but lastly, I will punish you, " he said rastegivaya pants and pulling member. "Well, what froze suck, whore."'

			if harakBoyA = 0:
				act 'Take by mouth':
					cla
					*clr
					'<center><img src="images/img/hasb/p3.jpg"></center>'
					'"So you''re married, you cheated on me, and I loved you so, you despicable liar, goodbye!" your guy shouted and ran out of the room.'
					'<<$husName>> did not pay attention to him, he put dick in your mouth and keeping you a head literally started to fuck you in the mouth with each thrust pushing it deeper. You frantically grabbed the air, trying not to choke as he continued, suddenly he made a sudden movement and his cock popped into your throat, you tried to pull away, but he obmatiril telling you endure. He gave you a couple of seconds to get used to the term in the throat and began to fuck your throat, you do not get enough air and you frantically began to beat him to get free, but <<$husName>> only tightened his grip on your glolovu. When you''re starting to lose consciousness, he finally finished, you feel his sperm spread on your throat, making a couple of strong aftershocks, he let you go and you collapsed on the floor coughing sperm mixed with your saliva and swallowing wheezing air. <<$husName>> looked as you writhe on the floor, spat on the floor next to you, and left.'

					act 'Leave':gt 'korr'
				end
			elseif harakBoyA = 1:
				'<<$boyA>> stood and watched as you fucked by her husband, "Well, I probably will go." he said.'
				'"Wait, let this whore for two write out" offered him <<$husName>>.'
				'"And come on, I''m with her all the more power does not intend to meet." replied <<$boyA>>'

				act 'Lie on the bed':
					cla
					*clr
					'<center><img src="images/img/hasb/p1.jpg"></center>'
					'You lay on the bed and <<$husName>> you entered into the vagina, and <<$boyA>> lay before you substitute member to the mouth. You diligently podmahivat husband does not satisfy the lover forgetting mouth.'
					'"And he still fucks very best, " said the husband.'
					'"I could not agree" supported <<$boyA>>'

					act 'Continue':
						if popolaini = 1:picrand = 40
						if popolaini = 2:picrand = 41
						if popolaini = 3:picrand = 42

						xgt 'sexdvoe', 'var'
					end
				end
			elseif harakBoyA = 2:
				'"That''s right these whores should be punished, if you want to let me help, otymeem it together so it will not be able to sit a week, " said <<$boyA>>, explicitly podnachivaya your husband.'
				'"Yes, let''s punish the bitch, and then go to the pub otpraznuem my divorce and remove a couple of bitches and punish, I stamped" said <<$husName>>.'

				act 'Lie on the bed':
					cla
					*clr
					'<center><img src="images/img/hasb/p2.jpg"></center>'
					'You lay on the bed and <<$husName>> you entered into the anus, and <<$boyA>> lay before you substitute member to the mouth. You diligently podmahivat husband trying to put his ass on his cock to the root, not forgetting to meet her lover mouth.'
					'"And the ass she still works smartly" said <<$husName>>.'
					'"Yeah, and leave me some" replied <<$boyA>>'

					act 'Continue':
						if popolaini = 1:picrand = 40
						if popolaini = 2:picrand = 41
						if popolaini = 3:picrand = 42

						xgt 'sexdvoe', 'var'
					end
				end
			end
		end
	elseif harakHusb = 2:
		fingal += 1
		'"Oh damn, " you had to hear before you fly off the wall by a powerful blow to the face.'

		if izvratH = 0:
			husbizvradd = 0
			husbharmin = 0
			husbandMark = 0
			husband = 0
			divorced += 1
			bfA = 0
			mop = 0
			minut += 120
			stolmoney = 0
			money = 0
			komp = 0
			'Lying in the corner you saw the husband gets blow after blow on the guy, and <<$boyA>> hard fighting tries to jump out the door, finally he did it and he runs out of the apartment at a breakneck pace.'
			'<<$husName>> suited to you, "Here ... you ... whore ... cock ... and pussy ... and ass ... and that''s in your mouth." he says putting a strong kick in in shivot at every word, the last word, he hits kicks you in the face and you are off. You woke up two hours later, neither the husband nor the things in the house was not yes and some of your too.'

			act 'Leave':gt 'korr'
		elseif izvratH = 1:
			bfA = 0
			houseslut += 1
			'"Oh damn, and that allowed you substitutes him their holes" asked <<$husName>>, "And you tell me now money should have to pay for the pleasure, this is my slut, " he added, referring to the guy. "And now we have it together fuck what not povadno." he added, lifting you off the floor and throwing on the bed.'

			if harakBoyA = 0:'<<$boyA>> tried to protest, but seeing your face contorted with rage husband agreed'
			if harakBoyA = 1:'<<$boyA>> acquiesced'
			if harakBoyA = 2:'<<$boyA>> gladly accepted'

			act 'Continue':
				if popolaini = 1:picrand = 40
				if popolaini = 2:picrand = 41
				if popolaini = 3:picrand = 42

				xgt 'sexdvoe', 'var'
			end
		end
	end
end

if $ARGS[0] = 'endsex':
	if husband > 0 and hour < 17 and hour > 7 and boycherdaksex = 0:gt 'sexm', 'popala'

	boycherdaksex = 0
	gt 'korr'
end

--- sexm ---------------------------------
# anekdot
anrand = rand(0, 50)

if anrand = 0:
	$anek = '- How do you feel about clowns?
	- Just do not have to provoke me on anti-government statements!'
elseif anrand = 1:
	$anek = 'Wearing a driver, dropping out of the "Okie" might accidentally throw it through the thigh.'
elseif anrand = 2:
	$anek = 'Two old men on a bench in a nursing home:
	- A grandson asked me yesterday what I did during the sexual revolution.
	- So what did you tell him?
	- Told me almost immediately captured, and the rest of life I spent dishwashing.'
elseif anrand = 3:
	$anek = 'Odessa. Is brought by the fat lady, and a few steps behind her with huge bags woven skinny husband. Strap for holding one of the bags hanging in different directions, the child. Man said sadly:
	- Fima still believe my experience:never get married!
	The boy thinks for a long time, poking a finger in the nose of his free hand, and then it is reasonable to ask:
	- Dad, who I will then share their bitter experience?'
elseif anrand = 4:
	$anek = 'Policeman - GIVE
	Chief - TRIBUTE
	Beggar - Kinh
	Doctor - take out
	Official - SUN
	Billion oligarch - QUY
	Instead of the normal wage - PRICK

	Live in Russia, but for some "Chinese" literacy ...'
elseif anrand = 5:
	$anek = 'Unlike other cats, my perfectly distinguish day and night.
	Throughout the night sleeping in the bedroom, and in the morning cheerfully runs sleep in the hall.'
elseif anrand = 6:
	$anek = 'Our Earth - is a place where aliens show their children how to live.'
elseif anrand = 7:
	$anek = 'At the press conference:
	- Anatoly Borisitch, but you promised all along the Volga River, in exchange for a voucher? Where can I get my part?
	- Take a bucket, go to Nizhny Novgorod, go to the river ...'
elseif anrand = 8:
	$anek = 'Girls, if you had a choice:world peace or neoblezayuschy manicure, what color nail polish would you choose?'
elseif anrand = 9:
	$anek = 'We as if dancing in the church - you''re the defendant, and you will be put, and if more than one hundred million stolen - you are only a witness ...'
elseif anrand = 10:
	$anek = 'Based on teachers'' wages, our government consists of vengeful Losers.'
elseif anrand = 11:
	$anek = 'Last year I asked Santa Claus become compatriot Gerard Depardieu. Who knew that the old man so perverted.'
elseif anrand = 12:
	$anek = 'A guy goes to a meeting late, nervous, can not find a place to park. Raises his face to the sky and said:
	- Lord, help me to find a place to park. I then give up drinking and going every Sunday to go to church!
	Miraculously appears free place. Guy again turned to the sky:
	- And, all is not necessary. Found!'
elseif anrand = 13:
	$anek = '- Watson, what are you smoking? Let me guess - Tobacco "Queen of Virginia" with leaves cherries jubilee issue of velvet in the box?
	- Amazingly, Holmes! How did you guess?
	- By Jove, my dear Watson! Well, not Mrs. Hudson stole that pack from my room!'
elseif anrand = 14:
	$anek = 'Comes out in the morning traffic cop on the road, his head after yesterday''s split.
	Looks - Jeep carried. Well, he stopped him in order to collect funds for the sober. Looks, and there sits a homeless person. Documents examined - though homeless machine. Well cop asked him:
	- You''re a bum. Where did you get such a cool took a wheelbarrow?
	- A new Russian drunk I offered if I make them laugh - my jeep. Well, I have them and laugh.
	- But how?
	- Yes, I''m one bald head on shit, it just grew hair, it''s killing was.
	Ment removes cap, there bald. He says:
	- And you do not care because I can?
	- Can.
	Bum shit cop on his bald head, a out of the bushes hear laughter and crying:
	- No, well, finally, so I gave him another hut and gifts.'
elseif anrand = 15:
	$anek = 'Glamorous Muscovite comes to visit the village to the grandmother.
	- Grandma, where you can go there at night?
	- In a bucket.'
elseif anrand = 16:
	$anek = 'Lesson "Fundamentals of Orthodox Culture." The teacher:
	- And remember, kids! Those who would learn to "4" and "5", will go to paradise. A
	those who will learn from the "2" and "3" - to hell!
	Little Johnny from the back row:
	- Marivanna, and that can not be alive to finish school?'
elseif anrand = 17:
	$anek = 'The slogan "strangle corruption" has been recognized as extremist calling for the violent overthrow of the existing order.'
elseif anrand = 18:
	$anek = 'Husband:
	- What in-law is coming?
	Wife:
	- Numbers or dick?'
elseif anrand = 19:
	$anek = 'English lesson.
	In the back row got a man - checking
	of the District Board. Young teacher writing on the chalkboard English phrase and asks the students to translate. The class is silent, and suddenly, with the penultimate hand pulls Vovochka desks.
	The teacher hesitated, but do nothing - has caused.
	Little Johnny:
	- That ass. Now to plant!
	The teacher, blushing with shame:
	- Little Johnny, how can you!!!
	Little Johnny said, turning to the man:
	- Do you know English - nothing to prompt!'
elseif anrand = 20:
	$anek = 'Husband to his Wife:
	- Let''s play pretend games.
	- How''s that?
	- Well, as if you were Little Red Riding Hood, and I am a wolf.
	- Class, come on!
	- Well, then, go, bake pies...'
elseif anrand = 21:
	$anek = 'That''s because Depardieu surprised when sober...'
elseif anrand = 22:
	$anek = 'Headquarters of the Ku Klux Klan:
	- Tell me, how do I join your organization?
	- It''s easy. Soak 6 blacks and one cat.
	- A cat for that?
	- Congratulations, you are taken'
elseif anrand = 23:
	$anek = 'There are three friends.
	One wife for ten years - another mistress - third betrothed (the bride).
	Well discussed their men, this and that - decided to experiment:wear leather black lingerie - sexy stockings with belt - high heels - an eye mask, and so to meet their loved ones.

	A week later found.

	"Bride" tells - He came home, I met him in stockings, wearing a mask in high heels - he attacked me said that I love of his life and we had sex all night.

	Mistress says - I went to his office - shut the door - opened the cloak - and there''s leather underwear, mask, heels - he did not say anything, but we have 5 hours of non-stop having sex.

	Wife says sheepishly - husband came home from work, I opened the door in black leather lingerie, sexy stockings and a mask - he looked at me and asked, "What''s for dinner, Batman?"'
elseif anrand = 24:
	$anek = '- Your bank gives loans on parole?
	- No problem...
	- And if I do not return?
	- You will be ashamed before God when appear.
	- When it has to be...
	- Now, if the fifth do not return, the sixth appear.'
elseif anrand = 25:
	$anek = 'Biology lesson.
	The teacher tells the children:
	- Children! You know that stamen and pistil in flowers - is the reproductive organs.
	On the back row Vovochka:
	- Damn. I smelt them.'
elseif anrand = 26:
	$anek = '- And my last one after five minutes, the server broke.
	- Is he hakep ??!
	- He mydak!'
elseif anrand = 27:
	$anek = 'A plane is flying. The pilot on the speakerphone:
	- Ladies and gentlemen, you are greeted by the captain. Listen to the information about our flight. Our flight is at an altitude of 10, 000 feet at a speed of 900 kilometers per hour, the temperature behind... Shit... A-A-A-A! .. What''s that? .. WELL, PIZDETS...
	Inside, a deathly silence.

	A minute later, again on the radio:
	- I beg your pardon our dear passengers. Just that our flight attendant knocked on my hot coffee. Did you now my white pants in front...
	A guy in the front row:
	- Your pants, it''s all garbage! You should have seen my pants back...'
elseif anrand = 28:
	$anek = 'Escaped from a zoo elephant. Call the sheriff:
	- Sir! In my garden there is a huge gray rat!!!!
	She sryvet tail cabbage......
	- And what is it doing?
	- Sir! You will not believe!.....'
elseif anrand = 29:
	$anek = 'Marriage bed - a husband and wife:
	Wife:- My dear, let''s we play role-playing games?
	Husband:- Come on.
	Wife:- You are a taxi driver, and I am a young, pretty girl who arrived, but I have no money with him to pay the fare.
	Husband:- Come on.
	Wife:- Uncle taxi driver, I have no money to pay the fare, let me go, please!
	Husband:- Go...'
elseif anrand = 30:
	$anek = 'Put a baby pacifier next to the stove, and it melted stuck to the table.
	Scored in Yandex:how to pull out the nipple?...
	Forgot that looking for...'
elseif anrand = 31:
	$anek = 'Once upon a time an old Indian told his grandson one vital truth.
	- Inside every man is a struggle, much like the struggle between two wolves.
	One wolf is evil - envy, jealousy, sorrow, selfishness, ambition, lies...
	The other wolf is good - peace, love, hope, courtesy, truth, goodness, faithfulness...
	Little Indian, touched to the heart the words of his grandfather, thought for a few moments, and then asked:
	- And what a wolf wins in the end?
	Face of an old Indian touched a faint smile, and he replied:
	- Always wins the wolf that you feed.'
elseif anrand = 32:
	$anek = 'An interview with the Russian businessman.
	Reporter:
	- Tell me what you think about the traffic police?
	Businessman:
	- Bandits uniquely. Do nothing, a complete mess on the streets, robbing drivers at every opportunity, washed-up motherfuckers.
	To .:
	- Yes, the opinion of an impartial, frankly. What do you think about Russian tamozhenikah?
	B .:
	- Hmm, I think I got a little excited about the cops. Normal in general guys are polite, do not take too much.'
elseif anrand = 33:
	$anek = '- I do not know what to do. Cockroaches tortured. Shastayut everywhere - no peace.
	- Did you buy a piece of chalk for cockroaches.
	- What helps?
	- Of course. You see - sitting in a corner, draw...'
elseif anrand = 34:
	$anek = '- Hello! Rewrite me his apartment.
	- What do you allow yourself!?
	- Oh, sorry, not with principles. Do you believe in God?'
elseif anrand = 35:
	$anek = 'It feels like an old Russian saying "fools no law" and the concept of "parliamentary immunity" are somehow connected.'
elseif anrand = 36:
	$anek = 'If money is measured in groups, I have a dimple.'
elseif anrand = 37:
	$anek = 'Policeman stops the car.
	Lowered the window, the driver of an ingratiating smile:
	"Good morning, Comrade Captain''s right please, TITLE, power of attorney, strahovochka itself, everything is as it should be, as it should..."
	With the rear seat child''s voice:
	"Dad, where''s the box?"'
elseif anrand = 38:
	$anek = '- Why are you so inflated? What happened?
	- Give her husband on Feb. 23 of fishing lures.
	- Well, all right. You have it for 10 years every weekend fishing goes. What''s wrong?
	- He''s in his hands turned, and turned and asked:What is it??'
elseif anrand = 39:
	$anek = 'Mom asks young son:
	- Little Johnny, and who ate all the candy?
	son:
	- Brownie.
	A voice from behind the stove:
	- Do not bullshit me!'
elseif anrand = 40:
	$anek = 'Pole comes to church for confession and says to the priest:
	- Ban the priest, I have sinned.
	- What is the sin, my son?
	- I cheated a Jew...
	The priest, after a brief hesitation:
	- It is not a sin, my son. It''s a miracle!'
elseif anrand = 41:
	$anek = 'University. Session. Reading room.
	A lot of people how to prepare.
	To one student comes another:
	- Hey, you''re holding the book upside down!
	- And you''re human, Freud, or what?
	- And then Freud?
	- This is - the book! What are her legs? You still say that I look down it between the pages ..!'
elseif anrand = 42:
	$anek = '- Please change the guarantor of the Constitution to guarantee...
	- Can not help, the entire batch defective.'
elseif anrand = 43:
	$anek = 'Jew, before reaching home by taxi, goes silently out of the car and starts
	fumbling in his pockets, and under his breath mutters:
	- Damn, it seems the car dropped the purse...
	Hearing this, the taxi driver presses the gas and unwound. Jew, looking after the taxi, sarcastically says:
	- A Rabinovich is not lying, it really works...'
elseif anrand = 44:
	$anek = 'Son quarrels with parents:
	- I''m tired of always be with you, always be on time! I want romance, freedom, beer, girls! I''m going, and do not try to hold me back!
	Son resolutely goes to the door. At the door of his father catches.
	- Dad, I said, do not try to stop me!
	- I''m not stopping you, son. I''m with you!'
elseif anrand = 45:
	$anek = 'Met a girl on a hen party. All night they were telling jokes,
	funny stories and shared with the other sisters their dreams...
	By the morning of the cabinet fell dead with shame lieutenant Rzhev.'
elseif anrand = 46:
	$anek = 'Turkmen President Saparmurat Niyazov in the great book "Rukhnama" proudly says that Turkmen invented the wheel, writing, smelting metals. No one denies that. Just the other nations at this time to produce computers and flew to the moon.'
elseif anrand = 47:
	$anek = '- I hesitate to put you a diagnosis...
	Probably, it is alcoholism.
	- All right, doctor. I''ll be there when you''re sober.'
elseif anrand = 48:
	$anek = 'I do not want to say old, but all the sounds that I was making once during sex, now I publish, just from your couch...'
elseif anrand = 49:
	$anek = 'Wife to her Husband says:
	- Let''s make love like in the movies! The husband agreed. Had it, as he wanted, then on her face cumshot...
	She wiped:
	- Yeah, my favorite! Other films we''re looking!!'
elseif anrand = 50:
	$anek = 'it is:
	- Tell me why if a guy had a lot of girls, he - macho, but if the girl a lot of guys - damn it?
	he:
	- You know, if one key opens many locks - a key drop dead! And if one lock fit all the keys - it''s definitely worthless castle!'
end

--- anekdot ---------------------------------
# stihi
strand = rand(0, 10)

if strand = 0:
	$stihi = 'You - the sunlight in my dark!
	You - my happiness among a heap of misery!
	You - the sense that I wanted to find.
	You - the muse. Not what one would die.

	You - the incentive to fight despite everything!
	You - the world from which there is no escape!
	Magical warmth of your gentle hand
	I warmed, probably thousands of years!

	You - faith, leading to light tops!
	You - the pain, without which love is not known.
	You - the life of callous, heartless machines!
	Worst of all - you become a stranger to me!

	I''m afraid that one day will burn all bridges.
	But I believe:with me your light forever!
	I understand now. Paradise where there is you!
	And hell - this is where you do not have with me.'

elseif strand = 1:
	$stihi = 'Why go against fate,
	She steps for us too prejudging
	Admit it, we met of dreams,
	Love opened the gates of the sacred.

	Trust me, go ahead, do not tushuy,
	I, like you, from feeling a little confused,
	Let me just one kiss,
	To rotate the spatial time.

	I''ll be your guide here,
	Sleep easily that in this world is beautiful,
	Do not argue, you lit a fire in me
	And his amber hair captivated.

	Oh, nowhere to paint your camp
	Understandably so, with the gods, the blind,
	In these eyes saw the ocean,
	His love intoxicated with happiness.

	Let me stay with you forever
	And the waves of love wander century,
	Let me whisper to you verses
	And the beauty queen enjoy.'

elseif strand = 2:
	$stihi = 'You know perfectly itself,
	That without you I can not,
	Going a little crazy
	Captivated by thy smile.

	Are speechless when,
	Opposite angel eyes,
	I always ready to repeat:
	"You are the best, period."

	In thy light and easy,
	You do not love is impossible,
	Flying high - high
	Sitting on a cloud with caution.

	Do not worry, I''m always near,
	And in sorrow and in joy will,
	Together transcend cold
	Code trust miracle.

	You know perfectly itself,
	But I say it again,
	What I''m crazy about you,
	I do not need any other happiness.'
elseif strand = 3:
	$stihi = 'Tears streaming down his cheek,
	When I think of you at night.
	I want to be with you quickly,
	Preserve thee my kitten.

	I thank God for you,
	And most of my life, I love you.
	Thank you for the fact that we have brought with you,
	Love for you, I found eternal.

	Now we wake up together forever
	And no one will separate us,
	Your love in my heart shape
	And never fly.'
elseif strand = 4:
	$stihi = 'Love you! My darling!
	You''re like a timid flower!
	With you I''m not alone
	You breathe, you live
	these lines and I do not write in vain,
	want anyone to know you - my dear!
	I am very pleased that we have linked the fate!
	I sincerely love you, soul,
	You deserve me
	Such love and respect!
	I want to hear your sweet voice,
	I always want to be near you!
	I want to hold you tight,
	And the touch of your lips, I gently!
	I want to look into your beautiful eyes,
	Looking at them, I''m like in a fairy tale ...
	Spinning and rejoicing with you,
	Under the starry sky and the moon!
	I can not without you,
	like an angel without love,
	as the sun without heaven
	as the sea without water ...'
elseif strand = 5:
	$stihi = 'Help to understand love
	And how to understand the feelings,
	Teach me how to fly,
	By the time the clouds to climb.
	Help catch a wave
	But keep your hand tight,
	I''m afraid to go to the bottom,
	As fear heart knife cuts.
	Help greet the dawn
	In Cornflower open field
	You whisper "hello"
	Enjoying thee.
	Help to forget the sadness
	And believe the word "happiness"
	But left, promise
	Do not break love apart.
	I am open to you soul,
	I am ready to embark on a given
	Your voice sounds in me,
	Eyes glowed at night.
	Help. Not that I die.
	Without love, the heart is empty,
	Angel, I love you,
	Help me understand the feelings.'
elseif strand = 6:
	$stihi = 'I write about love will not stop,
	With you I will walk in the garden again.
	In your eyes only I will look green,
	Whole body cast into a sweet shiver again.

	I did not hold back in the hands of soul excitement,
	A heart beats in the pendulum of love.
	My angel - I''ll bestow moments
	You again in this sweet night catch.

	Let your eyes radiate love again,

	And lips, whispering sweet words.
	Each other''s hands tightly hugging,
	Go crazy with happiness head.

	Let in the dream was this feeling,
	Are you a great night will extend whim.
	Love for you, a special kind of art,
	In his heart remained ardent feelings of courage.'
elseif strand = 7:
	$stihi = 'If only you had been there,
	Near everywhere and always,
	Warm and affectionate gaze,
	Warmed me in the cold.

	If only lip native,

	Gently woke in the morning,
	Thoughts, love sick,
	Steel verses yesterday.

	Beautiful life is not necessary,
	If you''re not around,
	If only you were happy
	At dawn meeting.

	If only happiness shone
	Princess my eyes,
	Just to breathe feelings,
	Light of your love.'
elseif strand = 8:
	$stihi = 'Mad wind of change
	Rips head dangerous.
	I just ask him to return,
	Make my life perfect.

	It''s so nice to live in the world,
	With a smile, greet the new day.
	And be happy on the planet,
	With Beloved, morning start.

	Go crazy when apart,
	Madly new meeting wait.
	And messages in the laptop,
	Inexorably gain.

	But maybe not, that''s exactly
	About feelings just write.
	Perceiving all cardio
	Just have to wait and wait.'
elseif strand = 9:
	$stihi = 'Rivers flow I''m ready to change,
	And change kontenenty places.
	Ready to conquer the mountain tops,
	And the satellite to the ocean floor.
	And every day to give you happiness.
	OPGW love you till skonchaniya century
	And embrace standing in the moonlight.
	I want you to know it all,
	After all, these are not empty words!'
elseif strand = 10:
	$stihi = 'In a desperate battle,
	We relocate forward.
	And drowning in prayers,
	What awaits us?

	The most difficult path,
	We have chosen.
	Each step is a careful,
	To the top of fate.

	Will not give up,
	Not one step back.
	Everything bad forget

	Important because the result.

	We love her,
	Will carry forever.
	And a happy life,
	Will live a hundred years before ...'
end
--- stihi ---------------------------------
# love
if $ARGS[0] = 'start':
	cla
	*clr

	if harakBoyA = 0:gt 'love', '0'
	if harakBoyA = 1:gt 'love', '1'
	if harakBoyA = 2:gt 'love', '2'
end

if $ARGS[0] = '0':
	cla
	*clr
	love = 1
	'You started talking about cohabitation. What <<$boyA>> told you that it is in principle not against, but first he wants you to meet his parents.'
	'He warns you that his mother is very demanding and rigorous, <<$boyA>> says that he loves her mother and does not want to upher. Therefore, you must look gorgeous, use the dress from a boutique, well-groomed and with curled hair and use cosmetics in moderation.'
	'At the next date, if are ready, <<$boyA>> will take you to their parents.'

	act 'To invite':
		cla
		gt 'sexm', 'room'
	end
end

if $ARGS[0] = 'mother':
	cla
	*clr
	minut += 60
	'<<$boyA>> to drive you to the home of his parents. You got out, took the elevator, after a call to the door you opened, it was clear that you were waiting for. You entered the apartment, you greet an elderly gray-haired muzhichek dressed in trousers and shirt, as long as you wore slippers in the hallway passed an elderly woman with thin, fastidiously pursed lips, she invited you to a table.'
	'You went to the room <<$boyA>> chair pushed you and you sat down at a table already. Mother sat in front of you your guy. She began to consider you with disgust in his eyes as bydto sat in front of her vile insect, not a girl her son. Nous, darling, and what do you do for a living?'

	if (work = 1 or cheatWork = 1) and workKafe = 1:'You answered that you are a waitress in a cafe.'
	if student > 0 and diplom = 0:'I study at the university.'
	if diplom = 1:'Graduate graduated from university.'
	if work = 0 and cheatWork = 0 and workKafe ! 1:'I''m unemployed.'

	if modelfoto > 0:
		bfA = 0
		'To which she smiled and said with disgust, "What are you not telling us how to shoot for web sites?" After these words, she laid on the table, your naked photos. "My son, my mother cares about you, this girl is not worthy of you."'
		'<<$boyA>> blushed and said, "<<$name>>, I loved you so, and you, you just deshovaya whore! Get out."'

		act 'Leave':gt 'street'

		exit
	end

	if kavslut > 0:
		bfA = 0
		'To which she smiled and said with disgust, "Son, let this slut all Armenians in the market know. Only and discuss <<$name>> waitress and her tear into all the cracks, she does not deserve it!"'
		'<<$boyA>> blushed and said, "<<$name>>, I loved you so, and you, you just deshevaya whore! Get out."'

		act 'Leave':gt 'street'

		exit
	end

	if frot > 3:
		bfA = 0
		'To which she smiled and said with disgust, "Son, this slut all perverts on the subway know and lots pulled, who''s next to her ass to settle down. She is not worthy of you!"'
		'<<$boyA>> blushed and said, "<<$name>>, I loved you so, and you, you just deshevaya whore! Get out."'

		act 'Leave':gt 'street'

		exit
	end

	if gloryhole > 30:
		bfA = 0
		'To which she smiled and said with disgust, "Son, your Svetulya moonlights members sucking sex Shope, you want a wife himself? She is not worthy of you!"'
		'<<$boyA>> blushed and said, "<<$name>>, I loved you so, and you, you just deshevaya whore! Get out."'

		act 'Leave':gt 'street'

		exit
	end

	love = 2
	'On what she tearful eyes looked at his son and said, "Very nice, Well Well son, it''s your choice who I am, that would interfere in your life, I just gave you, nursed and outgrowths, now you already have the right course forget about your mom and let it alone loves you and wishes you the best. If you need it, please, I do not forbid. "'
	'<<$boyA>> looked down, "Mom, what are you, I love you, but <<$name>> also dear to me."'
	'Mother jumped flashing eyes, "Son, you vstrechaeshsya with her recently, what do you know about her?"'
	'<<$boyA>> a long time to persuade his mother and excuses, finally she let you out of their predatory claws and you''re ready to leave.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = '1':
	cla
	*clr
	love = 1
	'You started talking about cohabitation. What <<$boyA>> told you that it is in principle not against, but first he wants to introduce you to their friends.'
	'He says that you have to look chic, the dress from a boutique, well-groomed and curled hair, cosmetics in moderation, something to envy his friends are dead.'
	'At the next vstreche once you will be totally ready <<$boyA>> will take you to your friends.'

	act 'To invite':
		cla
		gt 'sexm', 'room'
	end
end

if $ARGS[0] = 'frends':
	cla
	*clr
	'<center><img src="images/img/hasb/z0.jpg"></center>'

	if proverka1 = 0 and proverka2 = 0 and proverka3 = 0 and proverka4 = 0 and proverka5 = 0:
		minut += 180
		'<<$boyA>> to drive you to your friends. The apartment had two guys <<$boyA>> introduced you as his bride, you sat down at a table set. You talked a couple of hours of fun when everything was eaten and drunk almost all <<$boyA>> has invited you to dance, you gladly agreed. <<$boyA>> was already pretty drunk and he''s bad at dancing, but good at it you paw, his hands squeezed your buttocks, he soon ran them under her dress and continued to stroke your ass. Her skirt rode up your panties and brought to the public, the guys were sitting on the sofa without taking your eyes from your buttocks. As a result, one of the guys got up from the couch and rocking podozhel to you "Very best bum on your heifers, let check out" he said, and slapped you on the buttocks so that you already jumped. <<$boyA>> and let you napravilssya to him "You do ohrenel, it''s my girl, you can watch, you can not touch."'
	end

	if modelfoto > 0 and proverka1 = 0:
		'"Yes calm down, she removed Golo not believe climbed in Inet''s full of pictures of her naked." the guy said.'
		'"Is it true?" asked <<$boyA>> turning to you.'
		'"Yes, I filmed naked, and I did that this was not a three-fuck and just showing her beautiful body." you said'

		if intel <= 30:
			guy += 2
			picrand = 39
			bfA = 0
			'"Yes, I do not care what you were demonstrated once filmed naked whore means" with these words he threw you on the sofa. You tried to get up to leave, but <<$boyA>> stopped you, "Where are you going slut so much time powdering my brains and decided that we can just dump. Well guys Let this whore around." he said, and sat down on the sofa unbuttoned his pants "Suck" he shouted and pryatyanul your head to the perineum. Having decided that it is better not to argue with three drunken men you took his dick out of his pants and sent it into his mouth. Others also joined, one sat on the couch next to <<$boyA>> and took a member you grasped his hand and began to suck both poperemeno, the second time it took off your clothes and knelt launched language you pussy. The guy sitting on the couch and began wildly hiccup <<$boyA>> shouted at him, "Get out of here, but it still messed her whole buzz chippy" guy got up from the couch and immediately closed her mouth rushed to the toilet.'

			act 'Further':xgt 'sexdvoe', 'var'
		elseif intel > 30:
			proverka1 = 1
			'You have a few minutes to crucify about what you did not commit anything wrong and that his friends just jealous. In the end, you managed to convince him otherwise, and <<$boyA>> agree with you.'

			act 'Further':gt 'love', 'frends'
		end

		exit
	end

	if kavslut > 0 and proverka2 = 0:
		cla
		'"Yes, you wait, this whore all Armenians know, go ask any of the waitress Svetku, you her hole in detail describe" the boy said'
		'"Is it true?" asked <<$boyA>> turning to you. Do not think of anything better you plunged into mourning.'
		'"Yes, these freaks raped me several times"'

		if intel <= 50:
			guy += 2
			picrand = 39
			bfA = 0
			'"Yes, I do not care who gets raped again several times means you liked and you yourself went to them damn" with these words he threw you on the sofa. You tried to get up to leave, but <<$boyA>> stopped you, "Where are you going slut so much time powdering my brains and decided that we can just dump. Well guys Let this whore around." he said, and sat down on the sofa unbuttoned his pants "Suck" he shouted and pryatyanul your head to the perineum. Having decided that it is better not to argue with three drunken men you took his dick out of his pants and sent it into his mouth. Others also joined, one sat on the couch next to <<$boyA>> and took a member you grasped his hand and began to suck both poperemeno, the second time it took off your clothes and knelt launched language you pussy. The guy sitting on the couch and began wildly hiccup <<$boyA>> shouted at him, "Get out of here, but it still messed her whole buzz chippy" guy got up from the couch and immediately closed her mouth rushed to the toilet.'

			act 'Further':gt 'sexdvoe', 'var'
		elseif intel > 50:
			proverka2 = 1
			'You have a few minutes to crucify about what you poor and miserable, and how these have brutally raped Caucasians. In the end, you managed to convince him and <<$boyA>> hug you and said that more will not allow anyone to offend you.'

			act 'Further':gt 'love', 'frends'
		end

		exit
	end

	if frot > 3 and proverka3 = 0:
		cla
		'"Yes, you wait, this whore in the subway all the perverts know want myself to go down the subway and you can fuck her in the car right in front of everyone, " said the boy'
		'"Is it true?" asked <<$boyA>> turning to you.'
		'"What do you mean how could you think such a thing about me, if there is what that damn ride in the car so it''s something that I" cried out and you went for it.'

		if intel <= 40:
			guy += 2
			picrand = 39
			bfA = 0
			'"Mouth shut whore, I believe your friends, if they say it was you mean it was you" with these words he threw you on the sofa. You tried to get up to leave, but <<$boyA>> stopped you, "Where are you going slut so much time powdering my brains and decided that we can just dump. Well guys Let this whore around." he said, and sat down on the sofa unbuttoned his pants "Suck" he shouted and pryatyanul your head to the perineum. Having decided that it is better not to argue with three drunken men you took his dick out of his pants and sent it into his mouth. Others also joined, one sat on the couch next to <<$boyA>> and took a member you grasped his hand and began to suck both poperemeno, the second time it took off your clothes and knelt launched language you pussy. The guy sitting on the couch and began wildly hiccup <<$boyA>> shouted at him, "Get out of here, but it still messed her whole buzz chippy" guy got up from the couch and immediately closed her mouth rushed to the toilet.'

			act 'Further':gt 'sexdvoe', 'var'
		elseif intel > 40:
			proverka3 = 1
			'Deciding that the best defense is attack, you have a few minutes yelling at him. In the end, you managed to convince him and <<$boyA>> begins to soothe you saying that he does not blame you, but just asking.'

			act 'Further':gt 'love', 'frends'
		end

		exit
	end

	if gloryhole > 30 and proverka4 = 0:
		cla
		'"Yes you wait, this slut in a sex shop through a hole sucks." the guy said'
		'"Is it true?" asked <<$boyA>> turning to you.'
		'"What do you mean how could you think such a thing about me, if there is some sort of a whore in the mouth takes it so that I that if" you cried and went to him. "And you''re a freak with what is decided, that I sucked you that you have something to compare?" you started to attack the guy.'

		if intel <= 60:
			guy += 2
			picrand = 39
			bfA = 0
			'"Mouth shut whore, I believe your friends, if they say it was you mean it was you" with these words he threw you on the sofa. You tried to get up to leave, but <<$boyA>> stopped you, "Where are you going slut so much time powdering my brains and decided that we can just dump. Well guys Let this whore around." he said, and sat down on the sofa unbuttoned his pants "Suck" he shouted and pryatyanul your head to the perineum. Having decided that it is better not to argue with three drunken men you took his dick out of his pants and sent it into his mouth. Others also joined, one sat on the couch next to <<$boyA>> and took a member you grasped his hand and began to suck both poperemeno, the second time it took off your clothes and knelt launched language you pussy. The guy sitting on the couch and began wildly hiccup <<$boyA>> shouted at him, "Get out of here, but it still messed her whole buzz chippy" guy got up from the couch and immediately closed her mouth rushed to the toilet.'

			act 'Further':gt 'sexdvoe', 'var'
		elseif intel > 60:
			proverka4 = 1
			'Deciding that the best defense is attack, you have a few minutes yelling at him. In the end, you managed to convince him and <<$boyA>> begins to soothe you saying that he does not blame you, but just asking.'

			act 'Further':gt 'love', 'frends'
		end

		exit
	end

	if film > 2 and proverka5 = 0:
		cla
		'"Yes you wait, this slut in porn filmed." the guy said'
		'"Is it true?" asked <<$boyA>> turning to you.'
		'"Yes, but that was long before you, it is a mistake of youth and a couple of times, I had a very difficult time, but I do not do this for a long time" you started trying to squeeze out a tear.'

		if intel <= 70 and izvrat = 0:
			guy += 2
			picrand = 39
			bfA = 0
			'"Mouth shut slut acted in porn whore means" with these words he threw you on the sofa. You tried to get up to leave, but <<$boyA>> stopped you, "Where are you going slut so much time powdering my brains and decided that we can just dump. Well guys Let this whore around." he said, and sat down on the sofa unbuttoned his pants "Suck" he shouted and pryatyanul your head to the perineum. Having decided that it is better not to argue with three drunken men you took his dick out of his pants and sent it into his mouth. Others also joined, one sat on the couch next to <<$boyA>> and took a member you grasped his hand and began to suck both poperemeno, the second time it took off your clothes and knelt launched language you pussy. The guy sitting on the couch and began wildly hiccup <<$boyA>> shouted at him, "Get out of here, but it still messed her whole buzz chippy" guy got up from the couch and immediately closed her mouth rushed to the toilet.'

			act 'Further':gt 'sexdvoe', 'var'
		elseif intel > 70 or izvrat = 1:
			proverka5 = 1
			'You have a few minutes grovel about how you love him and that everything that came before it, was a mistake. In the end, you managed to convince him and <<$boyA>> hugs you and whispers in his ear "A couple of tricks you probably remember, then you will show."'

			act 'Further':gt 'love', 'frends'
		end

		exit
	end

	love = 2
	'"Okay, let''s go from here <<$name>>, it''s time, " said <<$boyA>> and you''re headed for the exit.'
	act 'Leave':gt 'street'
end

if $ARGS[0] = '2':
	cla
	*clr
	'(Further actions are available.)'

	act 'To invite':
		cla
		gt 'sexm', 'room'
	end
end

--- love ---------------------------------
# brosok
if boyonceA = 0:
	!!racing requirements after sex
	boyonceA = 1
	guy += 1
	!!!WD:  Probably community extension
	$bfsex += '<font color="maroon">'+$boyA+'</font>:He was a '+$boybody+' '+$boybod+' '+$boyface+'. Most of the time he was '+$boyClo+' First time we had sex was on the '+day+'th of '+$month+'. He had a '+dickA+' cm long member'

	if dickA > 20:
		$bfsex += '[:o].'
		elseif dickA > 14:
		$bfsex += '[:)].'
	else
		$bfsex += '[:(].'
	end

	if harakBoyA = 0:$bfsex += 'He was a calm and self-possessed character.<br>'
	if harakBoyA = 1:$bfsex += 'He was cheerful and sociable nature.<br>'
	if harakBoyA = 2:$bfsex += 'He was irascible and very rigid.<br>'
	!!!
	if financeA = 0:
		if harakBoyA = 0:vneshBoyA += 2
		if harakBoyA = 1:vneshBoyA += 4
		if harakBoyA = 2:vneshBoyA += 8
	elseif financeA = 1:
		if harakBoyA = 0:vneshBoyA += 6
		if harakBoyA = 1:vneshBoyA += 10
		if harakBoyA = 2:vneshBoyA += 14
	elseif financeA = 2:
		if harakBoyA = 0:vneshBoyA += 14
		if harakBoyA = 1:vneshBoyA += 18
		if harakBoyA = 2:vneshBoyA += 22
	end
end

--- brosok ---------------------------------
# down
$metka = $ARGS[0]
$loc = $CURLOC
clr
palMir = 0
bordysh = 0
housrA = 0
palMir = 0
obdysh = 0
tanhouse1 = 0
obMir = 0
houseob = 0
borMir = 0
gs 'dinam'
gs 'stat'
gs 'time'
'<center><b>Downtown</b></center>'
'<center><img src="images/etogame/down.jpg"></center>'

if shantpopala > 0:
	cla
	*clr
	hour += 8
	cumbelly += 1
	cumpussy += 1
	cumass += 1
	cumlip += 1
	cumface += 1
	cumfrot += 1
	cumanus += 1
	fingal += 1
	guy += 2
	rape += 1
	sex += 1
	bj += 1
	anal += 1
	shantpopala -= 1
	'<center><img src="images/img/centr/rape.jpg"></center>'
	'On the street close to you, a black jeep suddenly hit the brakes. You turn your head to see what''s happening and see two large men jump of it and start to run towards you in. Before you can react and run away, they grap you and drag you into the car.'
	'"You''re doing this for a living? Taking pictures of naked people in the park?", one of the shouts, holding one of the pictures to your face you''ve made awhile back and sent someone over a social network, hoping they would pay the ransom.'
	'"No...what? What the hell is going on? I don''t know what you''re talking about!", you try to explain.'
	'"Don''t lie to use you stupid bitch.", as he said that, he hits you on your head and you pass out.'
	'You wake up somewhere out of town, you''re tied up and naked. You look down on yourself and notice traces of cum on your body, it also seems like that cum is flowing from your ass and your pussy.'
	'You notice that the blokes, who captured you sit next to you and seem to have a break, some of them are smoking.'
	'"Oh, she is finally awake, then the next fuck-cycle will be far more fun.", one of the men said, as he noticed you moving. Some of them are starting to get a evil grin on their face.'
	'They got up and came back at you, barely a minute later you wished your were still knocked out, as these jackasses had their ways with. You tried to resist, but the tape hindered you from moving. Not long after, everything faded to black and you lost you consciousness again.'
	'You feel groggy as you wake up, but it feels like someone is grapping you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he shouts, then kicks you into the stomach and leaves. As you collapse on the ground holding your stomach in pain, you take a glimpse at the street and see the assholes driving away in their black jeep. The mainroad is about 200m away, you crawl most of the way there, but soon you can walk again and eventually you find your way back to one of the mainstreets.'

	act 'Leave':gt $curloc

	exit
end

if car > 0 and cardrive = 2:'In the parking stands your <a href="exec:GS ''carF'', ''start''"><<$car>></a>.'
if hour >= 8 and hour <= 22:'A kiosk is selling <a href="exec:dynamic $kiosksig">cigarettes</a>.'

act 'Wait':
	cla
	waiting = input ("How long would you like to wait? (Not more than 120 minutes)")

	if waiting <= 0 or waiting > 120:
		minut += 15
	elseif waiting > 0 and waiting <= 120:
		minut += waiting
	end

	act 'Take a look at the clock':gt curloc
end

act 'Take a cab':
	cla
	*clr
	minut += 5
	'<center><img src="images/etogame/taxi1.jpg"></center>'
	'You caught a passing taxi.'
	'"The drive will cost you <b>250 rubles</b>", the driver says.'

	if $loc ! 'street':
		act 'Go to the Residential Area':
			$loc = 'street'
			dynamic $taxi
		end
	end

	if $loc ! 'down':
		act 'Go to the City Center':
			$loc = 'down'
			dynamic $taxi
		end
	end

	if $loc ! 'Nord':
		act 'Go to the Northern Area':
			$loc = 'Nord'
			dynamic $taxi
		end
	end

	act 'Turn him down and leave':gt '<<$loc>>'
end

if tanya > 0 and tanwork = 0 and hour >= 16 and hour <= 21 and tanday ! day:'<a href="exec:gt ''tanhouse''">Apartment of Thani</a>'
if tanwork = 1:'<a href="exec:gt ''house''">Thanis</a> apartment'
if izoldaQW >= 1:'<a href="exec:gt ''qwIzoldaApp''">Isoldes</a> apartment'
if mainQW >= 1:'<a href="exec:gt ''lab'', ''start''">Karinas</a> secret hideout'
if yaq = 1:'<a href="exec:gt ''yarik'', ''start''">Yaroslavs</a> apartment'
if peter > 0:'<a href="exec:gt ''peterroom'', ''start_door''">Peters</a> apartment'
if hour >= 9 and hour <= 21:'On the main street is a store called <a href="exec:minut += 15 & gt ''NewCloShop''">"Fashionista"</a>, a clothing store exclusively for women'
if hour >= 4 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> Station is within a 5 minute walk from here.'
if week >= 4 and hour >= 15:'The trendy <a href="exec:gt ''club'', ''start''">Nightclub</a>, with it''s shining lights, attracts young people from all over the city.'
if hour >= 15 or hour <= 2:'The <a href="exec:gt ''stripclub'', ''start''">Strip Clubs</a> red lights, attracting men from all over the city.'

if hour >= 9 and hour <= 20:
	'In the center is a large <a href="exec:gt ''torgcentr''">shopping center</a>'
	'On the mainstreet, a brand new <a href="exec:gt ''budgetclothes''">G&M store</a> opened it''s doors.'
	'There is a <a href="exec:gt ''foto'', ''start''">photo studio</a> next to a popular <a href="exec:gt ''fit'', ''start''">fitness center</a>, where professional athletes can train.'
	'At the <a href="exec:gt ''bass'', ''start''">swimming pool</a>, people can train for the next beach season.'
end
'A 30 minute walk away is the <a href="exec:minut += 34 & gt ''park'', ''start''">central park</a>. You can reach all the districts of the town while walking through it. Walking to it''s center should take far less than an hour.'

if hour >= 8 and hour <= 22:'Infront of the expensive <a href="exec:gt ''restoran'', ''start''">Restaurant</a> are luxury cars parking.'

'A shop for <a href="exec:gt ''sexshop'', ''start''">sex toys</a> is open for perverts from all around the city.'

if hour >= 6 and hour <= 23:'Diner <a href="exec:gt ''burger'', ''start''">Bystroeshka</a>.'
if bordel > 0 and hour >= 20 or bordel > 0 and hour <= 3:'Inside the courtyard is the entrance to the <a href="exec:gt ''bordel''">brothel</a>.'
if pornstudio >= 1 and hour > 5:'At the <a href="exec:gt ''pornstudio'', ''start''">Porn Studio</a>, a variety of naughty movies are created'
if week < 6 and hour >= 7:'At the <a href="exec:gt ''univer'', ''start''">University</a> you can earn your diploma.'
if hour >= 6 and hour <= 23:'The <a href="exec:gt ''dorm'', ''start''">Hostel</a> offers a small, but cheap, living space, but you have to be student at the university.'
if week < 6 and hour >= 9 and hour <= 18:'You can see the most important <a href="exec:gt ''bank'', ''start''">Bank</a> in the city from here.'
if week < 6 and hour >= 8 and hour <= 17:'In the largest skyscraper is a huge <a href="exec:gt ''office'', ''start''">Project Organization</a> located.'
if hour >= 8 and hour <= 22:'At the <a href="exec:gt ''agentned''">Real Estate Agency</a> you can buy or rent an apartment.'

dynamic $din_street_cum

--- down ---------------------------------
# agentned
gs 'stat'
'<center><b><font color="maroon">Real Estate Agency</font></b></center>'
!!'<center><img src="images/etogame/bank.jpg" ></center>'

act 'Leave':gt 'down'

if StoryLine > 0 and housr = 0:
	'You can buy an apartment in a residential of 2 million. Renting an apartment costs 200 rubles per day, minimum rental is for a period of 30 days.'

	if money >= 2000000:
		act 'Buy an apartment (2,000,000 rubles)':
			cls
			money -= 2000000
			housr = 1
			BuyHous = 1
			gs 'stat'
			'You bought an apartment in the residential area.'

			act 'Leave':gt 'down'
		end
	end
end

if BuyHous ! 1:
	if money >= 6000:
		act 'Rent an apartment in residental district (6,000 rubles)':
			cls
			money -= 6000
			housr = 1
			BuyHous = 2
			ArendHouseSL += 30
			gs 'stat'
			'You rented a flat in a residential area. Now you <<ArendHouseSL>> rental days.'

			act 'Leave':gt 'down'
		end
	end
end

if ArendHouseSL > 0:'Your residential house has <<ArendHouseSL>> rental days left.'

--- agentned ---------------------------------
# bank
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Bank</font></b></center>'
	'<center><img src="images/etogame/bank.jpg"></center>'

	if karta > 0:'In the bank <<karta>> rubles'

	if BankPapper = 1 and dayBankPapper = day:
		act 'Give documents':
			cls
			minut += 15
			BankPapper = 2
			gs 'stat'
			'You went to the office and gave the documents to the manager.'

			act 'Leave':minut += 5 & gt 'down'
		end
	end

	if money > 0:
		act 'Deposit money':
			cla
			minut += 5
			kartaIN = input ("How much money you want to deposit into the account?")

			if kartaIN <= 0 or kartaIN > money:
				'Not correct operation.'
			else
				karta += kartaIN
				money -= kartaIN
				'You put on the account <<kartaIN>> rubles, now on your account <<karta>> rubles.'
			end

			act 'Move away':gt 'bank', 'start'
		end
	end

	if karta > 0:
		act 'Withdraw money':
			cla
			minut += 5
			kartaOUT = input ("How much do you want to withdraw from account?")

			if kartaOUT <= 0 or kartaOUT > karta:
				'Not correct operation.'
			else
				karta -= kartaOUT
				money += kartaOUT
				'You debited <<kartaOUT>> rubles, now on your account <<karta>> rubles.'
			end

			act 'Move away':gt 'bank', 'start'
		end
	end

	act 'Leave':gt 'down'
end

--- bank ---------------------------------
# kameraKPZ
gs 'stat'
'<center><b><font color="maroon">pre-trial chamber</font></b></center>'
'<center><img src="images/etogame/kpz.jpg"></center>'
'Large chamber with wooden benches.'

if kameraKPZ < 3:
	act 'Sit':
		cla
		minut += 60
		kameraKPZ += 1
		gs 'stat'
		'You sat on the hard wooden bench and began to consider your position.'

		act '...':gt $curloc
	end
else
	'By lattice policeman came and Anatoly Borisovich. The policeman immediately stepped aside and host bystroezhki said. "<<$name>>, <<$name>>, well, how could you?"'

	act 'Tell him how everything was.':
		cls
		minut += 60
		gs 'stat'
		'<center><img src="images/etogame/kpz.jpg"></center>'
		'You were telling Ivan tried to persuade you to have sex and you refused him as he naplel you tales about your raise and gave you the keys. As you took the envelope and gave it to Ivan. Anatoly Borisovich sad you looked through the bars. "<<$name>>. Ivan showed himself a true professional and honest person. He made his way to the main managers of the lower classes. And you mean to tell me that he was tempted by what is 650000? Risking all, his position, his career, reputation, only to have that would steal the money and annoy you? You just dishwasher. What sense would he do that? Besides Ivan decent salary and maybe soon it will become director of the branch. "'

		act 'Convinced of his innocence':
			cls
			minut += 60
			gs 'stat'
			'<center><img src="images/etogame/kpz.jpg"></center>'
			'You began to convince the owner bystroezhki his innocence. Anatoly Borisovich thinking about something. "Raison put you there is no me. I need to get my money back. And if we assume that you''re not lying, then I warmed the snake on his chest.''s What I tell you. Pohodataystvuyu I, what would you have released on bail. You where it will be a month before the trial that would clear himself. If you can not, then I''m sorry, I can not help. "'

			act 'Agree':
				cls
				minut += 260
				gs 'stat'
				'<center><img src="images/etogame/kpz.jpg"></center>'
				'Certainly no choice and you do not agree with Anatoly. He quickly went to it and after a while you have been released from the bullpen. Anatoly Borisovich met you in his car and invited you to sit down to it.'

				act 'Go with Anatoly':
					cls
					minut += 30
					PodpiskaNeviezd = 1
					IvanKvartira = 1
					gs 'stat'
					'<center><img src="images/maggot/car.jpg"></center>'
					'You got into the car and drove off. Anatoly said. "Now I''ll take you to your house. I think you need some rest. Ivan lives in the northern region, act like you know. But remember, if it is what mischief again, I''m not going to pull out. And remember girl. You have to court where it month. During this time, you should either give me back my money, or prove me guilty of Ivan, or you sit. I''ll make sure that your term would not have been suspended. Otpravishsya six years quilted stitching in some sort of wilderness surrounded by old prostitutes drug addicts, cheats and other charges. And by the court you will transfer the money to me until you have paid the entire amount. If anything, find me in bystroezhke. " You came to your house and said goodbye with Anatoly.'

					act 'Out of the car.':gt 'street'
				end
			end
		end
	end
end

--- kameraKPZ ---------------------------------
# bass
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Pool</font></b></center>'
	'<center><img src="images/etogame/bass.jpg"></center>'
	'Entrance to the pool costs 100 rubles, you must have a swimsuit.'

	act 'Leave':minut += 5 & gt 'down'

	if db >= 1 and bikini > 0 and Goraday ! day:act 'Search ZHoru':Goraday = day & gt 'klofdomhouse', 'ev42'

	if money >= 100 and bikini > 0:
		act 'Pay to swim in the pool for an hour (100 rubles)':
			cla
			minut += 5
			money -= 100
			gt 'bass', 'a'
		end
	end
end

if $ARGS[0] = 'a':
	cla
	*clr
	minut += 5
	'<center><b><font color="maroon">Pool</font></b></center>'

	if magik < 4:'<center><img src="images/etogame/bass.jpg"></center>'

	if magik >= 4 and kisameQW = 0:
		'<center><img src="images/etogame/bass1.jpg"></center>'
		'In pool floats hefty athlete, he swims with mad speed and clearly feels like a fish in water, he come to the shore to the edge of the pool and in one motion jumps right in front of you. Looking at you, he greedily smiling showing you a range of white teeth.'

		act 'Watch for swimmers':
			cla
			*clr
			kisameQW = 1
			minut += 60
			sweat = -3
			manna += 5
			willpower += 5

			if stren < 30:stren += 1

			'<center><img src="images/qwest/kisame.jpg"></center>'
			'Athlete put on a towel and walked up to you. He smiled and said "Hi sweetie My name is Kisame just for you Kitty!"'

			act 'Say hello':
				cla
				'(You) - Hi! I <<$name>>.'
				'(Plavec) - <<$name>> can swim together?'
				'Kisame without waiting grabs you by the waist and powerful jump jumps to the middle of the pool.'

				act 'Next.':gt 'kisameQW', 'start'
			end

			act 'Tell Kisame to fuck off':
				cla
				'(You) - Fuck off Kish!'
				'(Plavec) - How rude!'
				'You do not have time to blink as an athlete grabbed you by the waist and lifted over your head easily threw you into the middle of the pool.'
				'When you spitting surfaced over the water you can see how to you under the water at breakneck speed approaching Kisame.'

				act 'Next.':gt 'kisameQW', 'start'
			end
		end
	elseif kisameQW = 1 and KisameDead < 1:
		'<center><img src="images/qwest/kisameV.jpg"></center>'
		'Seeing you akulopodobny Kisame smiling "Hi baby. Want me to fill your hot mouth his shark-seed?"'

		act 'Attack Kisame':
			cla
			horny += 10
			$nameV = 'Kisame'
			!!stats
			strenV = 300
			speedV = 100
			agilV = 100
			reactV = 100
			vitalV = 200
			intelV = 100
			willV = 50
			!!skills
			magikV = 10
			boxingV = 100
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * magikV + magikV * 100 + vitalV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 5
			KisaFight = 1
			klonV = 5
			defenceV = 800

			if spellavtoklon = 1:klon = 3

			gt 'fight', 'start'
		end

		act 'Make him a blowjob under water':
			cla
			*clr
			minut += 60
			horny += 100
			sweat = -3
			manna += 5
			willpower += 5

			if stren < 40:stren += 1
			if KisameSex = 0:KisameSex = 1 & Set guy += 1

			bj += 1
			swallow += 1
			SUB += 1
			'<center><img src="images/qwest/kisameBJ.jpg"></center>'
			'You downcast eyes, Kisame smiled even wider and dragged you into the water. His strong hands pressed your face to his groin and you wrapped around his dick lips quite quickly Kisame finished your mouth.'

			act 'Out of the water':gt 'bass', 'start'
		end
	end

	act 'Swim (1:00)':
		cla
		*clr
		cumpussy = 0
		cumbelly = 0
		cumass = 0
		cumanus =0
		cumlip = 0
		cumface = 0
		cumfrot = 0
		minut += 60
		sweat = -3
		manna += 5
		willpower += 5

		if stren < 40:stren += 1

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

		act 'Out of the water':gt 'bass', 'start'
	end

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

--- bass ---------------------------------
# burger
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Diner Bystroeshka</font></b></center>'
	'<center><img src="images/etogame/burger.jpg"></center>'
	'The most nutritious food in the county, and sing a couple of kilograms dial reads bright advertising on the wall.'
	'Also in the works eatery <a href="exec:gt ''butoilet''">WC</a> to visitors.'

	if BistroBoss > 0:'<a href="exec:gt ''burgerBoss''">The Cabinet of the Director</a> Anatoly Chubais'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	if money >= 100:
		act 'Eat (100 rubles)':
			cla
			*clr
			minut += 30
			health += 10
			money -= 100
			manna += 5
			willpower += 5

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

			if energy >= 30:
				fat += 8
				'You can no longer eat.'
			elseif energy >= 20 and energy < 30:
				fat += 6
				energy += 10
				'You pushed through the power of a meal.'
			elseif energy < 20:
				energy += 20
				fat += 4
				'You gladly ate the food.'
			end

			if water >= 20:
				'You don''t need any more tea.'
			elseif water < 20:
				water += 20
				'You gladly drank a mug of tea.'
			end

			act 'Get up from the table':gt 'burger', 'start'
		end
	end

	if IvanPodstavaQW = 2:
		act 'Come into the office to Anatoly Borisovich':
			cls
			gs 'stat'
			'You went to the office of the owner. He appeared in his place, dealing with your papers. Anatoly Borisovich looked at you and said, "Well? Are there any news?"'

			act 'Leave':gt 'burger', 'start'

			if money >= 650000:
				act 'To repay the debt (650,000 rubles)':
					cls
					money -= 650000
					IvanPodstavaQW = 5
					gs 'stat'
					'Did you get the money and counted 650, 000 Arkady Borisovich. He counted the money and promised that no prosecution will be no more.'

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

			if IvanEvidence = 1:
				act 'Show proof':
					cls
					IvanPodstavaQW = 6
					IvanKvartira = 0
					IvanEvidence = 0
					gs 'stat'
					'You showed record recognition on camera Arkady Borisovich where Ivan confessed and promised to return the money. Arkady Borisovich took you record and said that the further he will understand and take a statement from the police.'

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

	if posuda = 0:
		act 'Talk about work':
			cla
			'You went into the office on which was written Manager. You met a smart girl. She began to tell you, you can work almost every day. Come in any time when running a snack bar and wash the dishes 1:00, for it will get 100 rubles immediately on hand.'

			act 'And refuse to leave':gt 'burger', 'start'

			act 'Accept work':
				cla
				posuda = 1
				'You agreed to work.'

				act 'Leave':gt 'burger', 'start'
			end
		end
	elseif posuda >= 3 and posudaA = 0:
		act 'Go to the manager':
			cla
			'You went to the office of the Manager. The girl told the manager that you are not running bad and offered you another part-time job. You can wash the floors in the morning, from 8 to 9-. 1:00 cleaning floors and is now 100 rubles immediately on hand.'

			act 'And refuse to leave':gt 'burger', 'start'

			act 'Agree to work':
				cla
				posudaA = 1
				'You agreed to work.'

				act 'Leave':gt 'burger', 'start'
			end
		end
	elseif posuda >= 1 and posudaday ! day and NoBistroWork = 0 and PersSecWork = 0:
		act 'Wash the dishes for 100 rubles (1:00)':
			cla
			*clr
			posudaday = day
			minut += 60
			posuda += 1
			manna -= 15
			money += 100
			sweat += 1

			if bistroQW = 10:bistroQW = 0

			'<center><img src="images/pics/dirt.jpg"></center>'
			'You are within an hour washed the dirty dishes from the food residue and grease. After that you were given 100 rubles for his work.'

			if vnesh >= 20 and posuda >= 7 and bistroQW < 10:
				if bistroQW = 1:
					'From the office of the owner came out and saw Bystroezhki you smiled. "<<$name>>. My offer still stands. It pays to go to a restaurant?"'
				elseif bistroQW = 0:
					bistroQW = 1
					'From the office of the owner came Bystroezhki and nearly bumped into you.'
					'- Oh, sorry. How could I not see such a charming girl.'
					'- Do not worry - you responded with a smile.'
					'- Can you meet? I Anatoly Borisovich.'
					'- <<$name>>.'
					'Anatoly took your hand and kissed it.'
					'-Would you like to dine out, and not in that hole?'
				end

				act 'Refuse':gt 'burger', 'start'

				act 'Agree':
					cls
					bistroQW = 10
					'"Let''s go first to the shop, pick up your gorgeous dress. And then the restaurant is not allowed in with anything." Said Anatoly seeing you on the street to his car.'

					act 'Get in the car':
						cls
						minut += 15
						bistroQW = 20
						gs 'stat'
						'<center><img src="images/maggot/car.jpg"></center>'
						'Anatoly Ehav in the car to take you by the hand and not let go until the very end of the road.'
						'After you have gone in a very expensive boutique with a French name.'
						'Anatoly said that you picked up the dress.'
						'After a few dresses shown, he made ​​a choice and told you to go to the dressing room.'

						act 'Go into the fitting room':
							cls
							minut += 15
							gs 'stat'
							'<center><img src="images/maggot/butic.jpg"></center>'
							'You undressed and began to inspect the dress.'
							'Suddenly went into the dressing Anatoly.'
							'- Sorry, could not resist that would not look at their beauty.'
							'Looking at dresses, Anatoly said, '
							'- I think you will here is gray. It is the way the most precious thing there is. And you know, <<$name>>, for such gifts must be very well thanks.'
							'Anatoly eyes pointed at his pants showing what he wants from you.'

							act 'Give blowjob':
								cls
								minut += 15
								bistroQW = 50
								bj += 1
								guy += 1
								swallow += 1
								cumlip += 1
								dress[24] = 1
								dressH[24] = 160
								dressB[24] = bedra
								gs 'stat'
								'<center><img src="images/maggot/bj.jpg"></center>'
								'You went down and squatted in front of Anatoly, he unbuttoned his pants and pulled out his penis. You leaned over his hard cock and kissed him, feeling his warmth. Glib tongue cock licking and sucking his struchek relish in her big wet mouth and you started to suck his dick.'
								'Soon Anatoly groaned and you feel like in your mouth spurt of warm liquid. You are not distracted from the steel blowjob swallow cum, trying not to choke. Anatoly straightened clothes and left.'
								'Disguised as you went out and seemed to Anatolia.'
								'He smiled and gestured to the seller that takes the dress.'

								act 'Exit from the boutique':
									cls
									minut += 15
									gs 'stat'
									'<center><img src="images/maggot/car.jpg"></center>'
									'Whew, <<$name>>. I that tired. Let''s go to a restaurant like some other time. Chubais told you and taking you by the hand led him to his car. You quickly get to your home and Anatoly said goodbye to you.'

									act 'Out of the car':gt 'street'
								end
							end

							act 'Crease':
								cls
								minut += 15
								gs 'stat'
								'You neznaya hesitated what to do. Anatoly Borisovich took you by the shoulders and pushed you to them, from what you squatted helplessly. He unbuttoned his pants and pulled out her own dick already risen.'

								act 'Frightened look':
									cls
									minut += 1
									bistroQW = 50
									bj += 1
									guy += 1
									!!swallow += 1
									!!cumlip += 1
									dress[24] = 1
									dressH[24] = 160
									dressB[24] = bedra
									gs 'stat'
									'<center><img src="images/maggot/pr.jpg"></center>'
									'You looked up startled and looked at Chubais and immediately you feel like a hot head of his cock rested you on the lips. Anatoly began to move his cock your lips. "Do not be shy baby, it oblizni his tongue."'

									act 'Lick':
										cls
										minut += 2
										!!swallow += 1
										!!cumlip += 1
										gs 'stat'
										'<center><img src="images/maggot/pr1.jpg"></center>'
										'You hesitantly stuck out his tongue and licked purple head. Then again and again, finally you become tongue to lick his dick the whole length of wetting his saliva.'

										act 'Licking dick':
											cls
											minut += 2
											!!swallow += 1
											!!cumlip += 1
											gs 'stat'
											'<center><img src="images/maggot/pr2.jpg"></center>'
											'You continued to lick dick and Anatoly Borisovich taking you behind your head pushed closer to the penis. You feel like you are on the lips rested member. Your wet lips parted and hot and firm flesh became a member of your mouth filling it completely. "That''s it baby, suck it now." said Anatoly Borisovich start moving your hips and slowly fuck your mouth. You cupped his lips tightly member and began to feel like skin on the penis moves along the rod.'

											act 'Sucking dick':
												cls
												minut += 2
												!!swallow += 1
												cumlip += 1
												facial += 1
												cumface += 1
												gs 'stat'
												'<center><img src="images/maggot/pr3.jpg"></center>'
												'You become actively suck dick and feel like getting tired jaw. Suddenly your mouth hot jet shot. You by surprise even released member of his mouth and slapped Next jet of sperm you on the nose. Emerged from the mouth part of the semen and hung on your chin. Anatoly Borisovich took you for stronger head began to stick your mouth ends member.'

												act 'Sit on the floor':
													cls
													minut += 2
													gs 'stat'
													'<center><img src="images/maggot/pr4.jpg"></center>'
													'Finally Anatoly Borisovich stopped and cleaned cum dick in his pants buttoned pants. You sit on the floor stunned before fitting them with semen dripping from his face, feeling quite cheesy, like nothing on earth the taste of semen. Anatoly Borisovich helped you get to his feet and quickly walked out of the dressing room. You become pytatsya erase from the face of the sperm by removing traces.'

													act 'Exit out of the dressing':
														cls
														minut += 2
														gs 'stat'
														!!'<center><img src="images/maggot/pr4.jpg"></center>'
														'You came out of the dressing room, with a red face from shame. You seem as if the surrounding is already aware of the fact that you just suck dick in a public place. Chubais said the saleswoman that he buys for you to dress her and paid. Saleswoman wrapped dress and you felt her gaze on her face when she gave you a package with the dress.'

														act 'Exit from the boutique':
															cls
															minut += 15
															gs 'stat'
															'<center><img src="images/maggot/car.jpg"></center>'
															'You came out of the boutique with Anatoly Borisovich. "Whew, <<$name>>. I that tired. Let''s go to a restaurant like some other time." Chubais told you and taking you by the hand led him to his car. You quickly get to your home and Anatoly said goodbye to you.'

															act 'Out of the car':gt 'street'
														end
													end
												end
											end
										end
									end
								end
							end

							if dom > 0:
								act 'Thank you very much. (Deny)':
									cls
									dom += 5
									'You grinned and said, "Thank you very much, " Anatoly flushed and said emphatically, "You know what I mean." then he unbuttoned his pants and pulled out a member risen.'
									'You laughed, "That''s it, I understand perfectly, you can carry this dress myself, if you think I''m laying for each bellied, fat cat, who thinks he saddled his fate and fancies himself the king of the world and brutal macho, so not par my brain baby, and its fledgling shove back into the socket until it fell out, and then I look out there in the nest next to the chick, a couple of balls hatched not because you looked, I help them hatch knee. In general, sebi away in horror, Casanova unfinished. "'
									'Antaloy erupted and began to threaten "Yes I am, I''ll fire you!"'
									'You laughed in his face, "Oh scared, all right shudder fired and then he''ll be here this rag to wash the dishes."'
									'Anatoly pale, flushed and hissing angrily jumped out of the fitting followed by your loud laughter.'

									act 'Leave':
										cla
										minut += 5
										gt 'down'
									end
								end
							end
						end
					end
				end

				exit
			elseif bistroQW = 20:
				bisrand = rand(0, 10)

				if bisrand = 10:'From the office of the owner came Bystroezhki Anatoly Borisovich and see you turned away from the arrogant mien.'
			elseif bistroQW = 56:
				'When you''re finished you suddenly approached manager Ivan. "Okay <<$name>>. Sorry. I was wrong about you. I do not know what I was bitten by a fly. We just want people to post Assistant Manager. I think you come near. Nature you have. Well? Do you agree?"'

				act 'Yes.':
					cls
					gs 'stat'
					'You agreed with the proposal to become assistant manager Ivan. Ivan immediately beamed with happiness. "Well then, you first work assignments, here''s the keys to the cabinet Borisych. Leave them while at home. Go to his office, open the safe and take it from there envelope. Do not forget to close only after themselves safe. How Come take an envelope to me. understood everything? Act! "'

					act 'I changed my mind.':
						cls
						bistroQW = 57
						gs 'stat'
						'You refused the offer of Ivan and noticed how his face flashed a shadow of annoyance. He said disappointedly you. "Well, as you know, my job offer."'

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

					act 'Take the key and go into the office Chubais.':
						cls
						bistroQW = 111
						gs 'stat'
						'Taking key Ivan you went to the office of the owner. Opened his door. Entered the office and went to the safe. Kyuchom second on the ring you opened the safe and saw there what that documents and thick envelope.'

						act 'Look in the envelope':
							cls
							$burgerIvanText = 'And looked into the envelope. Then you close the safe and headed to the exit.'
							gs 'stat'
							'You looked at the envelope and saw there a thick wad of money. Vskidku, that about half a million. From what you see you even whistled.'

							act 'Envelope attributed to Ivan':
								cls
								IvanPodstavaDay = day
								IvanPodstavaQW = 1
								NoBistroWork = 1
								gs 'stat'
								'Coming out of the office, you saw that in the corridor outside the cooler worth Ivan and talking on the cell phone. Seeing you, he waved his hand to you. You came up and gave the envelope to Ivan. He quickly picked it up and put it in his jacket pocket. After that, you nodded. You can go. You want to give him the keys to the cabinet Chubais, but Ivan shook his head and closing his hand tube told you. "Leave the keys while at home. Come tomorrow, we shall discuss the details of your new appointment."'

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

						act 'Envelope attributed to Ivan':
							cls
							$burgerIvanText = 'You took the envelope and close the safe headed out.'
							IvanPodstavaDay = day
							IvanPodstavaQW = 1
							NoBistroWork = 1
							gs 'stat'
							'Coming out of the office, you saw that in the corridor outside the cooler worth Ivan and talking on the cell phone. Seeing you, he waved his hand to you. You came up and gave the envelope to Ivan. He quickly picked it up and put it in his jacket pocket. After that, you nodded. You can go. You want to give him the keys to the cabinet Chubais, but Ivan shook his head and closing his hand tube told you. "Leave the keys while at home. Come tomorrow, we shall discuss the details of your new appointment."'

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

				act 'No.':
					cls
					bistroQW = 57
					gs 'stat'
					'You refused the offer of Ivan and noticed how his face flashed a shadow of annoyance. He said disappointedly you. "Well, as you know, my job offer."'

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

				exit
			elseif bistroQW = 50:
				'During operation, you learned that Chubais is away on business affairs and his manager replaces Ivan. When you are ready to go to work from the office manager came out and Ivan came to you in a conspiratorial tone said. "Well <<$name>>, you obviously do not want to work for those pennies? Come to me, spec. Spec work for. Salary."'

				act 'Go to the manager''s office':
					cls
					minut += 15
					bistroQW = 55
					!!bj += 1
					!!guy += 1
					!!swallow += 1
					!!cumlip += 1
					gs 'stat'
					'<center><img src="images/maggot/bj1.jpg"></center>'
					'You went into the office and closed the pre Ivan the front door of the castle, and sat down in a chair in front of you at ease lounging in it. You went to the manager and waited for what he would do, he sneered and deftly grabbed you by the hand pulling yourself.'

					act 'Bend':
						cls
						'<center><img src="images/maggot/bj2.jpg"></center>'
						'You bent over and came face to face with Ivan, he whispered, unbuttoning his pants, to "work baby mouth."'

						act 'Take by mouth':
							cls
							minut += 3
							bj += 1
							guy += 1
							gs 'stat'
							'<center><img src="images/maggot/bj3.jpg"></center>'
							'Still standing in front of Ivan you even more bent and gently licked his tongue member, then again and again. Finally you lips wrapped around his cock and began to suck his cock absorbing into your hot mouth until the very end, utykayas nose at every movement in curly pubis that tickle your nose.'
							'Ivan finally broke down and without warning began to cum in your mouth. Jet of hot liquid hit you in the mouth, you have opened wide-eyed, but you continued to suck dick spewing seed finally you had a mouth full of semen already and you could not contain it and it has emerged on your lips member Ivan.'

							act 'Swallow cum and clean his cock language':
								cls
								minut += 2
								swallow += 1
								cumlip += 1
								money += 1500
								gs 'stat'
								'<center><img src="images/maggot/bj4.jpg"></center>'
								'You squatted in front of the manager and swallowing sperm began to lick the remnants of the still standing, but quickly fall off the penis.'
								'Finally cock completely satisfied Ivan fell and gave you half thousand rubles for the work you have done.'

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

					if dom > 0 or dom = 0 and sub = 0:
						act 'Leave':
							cls
							bistroQW = 56
							gs 'stat'
							'<center><img src="images/maggot/bj1.jpg"></center>'
							'You escaped from the hands of Ivan was not expecting such a reaction. He glared at you, "I mean Borisych suck, and his deputy squeamish?" You were taken aback by these words. How does he know about what happened in the fitting room. Apparently on your face that is reflected Ivan chuckled. "Yes Borisitch raskazal himself about it. If you calculated, but the fact that you manage Okrut Borisitch, then nothing. Did you tell him something and not really needed. And I''m offering you a decent zarobotok. So, be a good boy and show me that knows your mouth. "'

							act 'Perebesh!':dom += 1 & gt 'burger', 'start'

							act 'Take by mouth':
								cls
								bistroQW = 55
								minut += 3
								bj += 1
								guy += 1
								gs 'stat'
								'<center><img src="images/maggot/bj3.jpg"></center>'
								'Still standing in front of Ivan you even more bent and gently licked his tongue member, then again and again. Finally you lips wrapped around his cock and began to suck his cock absorbing into your hot mouth until the very end, utykayas nose at every movement in curly pubis that tickle your nose.'
								'Ivan finally broke down and without warning began to cum in your mouth. Jet of hot liquid hit you in the mouth, you have opened wide-eyed, but you continued to suck dick spewing seed finally you had a mouth full of semen already and you could not contain it and it has emerged on your lips member Ivan.'

								act 'Swallow cum and clean his cock language':
									cls
									minut += 2
									swallow += 1
									cumlip += 1
									money += 1500
									gs 'stat'
									'<center><img src="images/maggot/bj4.jpg"></center>'
									'You squatted in front of the manager and swallowing sperm began to lick the remnants of the still standing, but quickly fall off the penis.'
									'Finally cock completely satisfied Ivan fell and gave you half thousand rubles for the work you have done.'

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

					exit
				end
			elseif bistroQW = 55:
				'To you and Ivan approached the manager said "I''ll see you in my office."'

				act 'Go to the manager''s office':
					cls
					bistroQW = 60
					'You went into the office, Ivan sat at the table and motioned you under the table. You understand that Ivan wants, what would you crawled under the table.'

					act 'Crawl under the table':
						cls
						minut += 3
						bj += 1
						swallow += 1
						cumlip += 1
						money += 1500
						gs 'stat'
						'<center><img src="images/maggot/bjud.jpg"></center>'
						'You crawled under the table and pulled out Ivan in front of your face his penis. You cupped his mouth and began to suck trying to incorporate it into your mouth as deeply as possible. Under the table was cramped and uncomfortable to suck, but you have coped and buccal a few minutes in your mouth poured semen Ivan you started quickly swallow, that would not ispachkatsya.'
						'Thereafter, as Ivan and for the first time took a half thousand and handed to you.'

						act 'Leave':gt 'burger', 'start'
					end
				end
			elseif bistroQW = 60:
				'Ivan that is nowhere to be seen and he has not approached you, you had the idea to check his office.'

				act 'Go to the manager''s office':
					cls
					bistroQW = 65
					'You came to the office, but it was closed, you came to the deputy manager and told you with a chuckle, "What <<$name>>? Without a" tea stick "does not work? I know all about you and our general manager. But it was not until the end of the week. And if you do not want me to tell others how you earn a living, then you go to the office and serve me. "'
					''

					act 'Obediently nod':
						cls
						bj += 1
						swallow += 1
						cumlip += 1
						cumface += 1
						guy += 1
						'<center><img src="images/maggot/bj21.jpg"></center>'
						'You went into the office and squatted before deputy manager, he took a member and put it in your face showering smell not washed crotch. You licked the salty cock and sigh of despair began to suck him. Pimply jerk lasted just a few of your movements and began violently cum in your mouth, you could not even all ubratsya mouth and ran down his lips.'

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

					act 'Send it':
						cls
						'You said contemptuously pryshavomu this boy, that he would go to hell, with its threats.'
						'Ha, listen here slut! Chief - my father, he is the master bystroezhki and Borisitch just a hired director. And if you know Borisitch fuck and suck all who offer it will bury you alive! Would silently mouth a couple of days to work and everything, and so…'
						'After these words, he called 2-movers and said'
						'- guys do not want to blow off steam on this larva? Do not worry, it will be good-natured. Serve to complete. Am I right Svetik?'

						act 'Yes':
							cls
							bistroQW = 70
							bj += 1
							guy += 3
							gruzsex += 1
							'<center><img src="images/maggot/tri.jpg"></center>'
							'You jitters mumbled yes, in front of three men and porters smiled. You quickly taking his hand was taken to the warehouse, helped you to undress and put on his knees presenting three members to serve.'
							'You began diligently to serve three members one by one and sucking their hands soon nadrachivaya men groaned and grabbed one of them is the head of the suspended member.'

							act 'Substitute person':
								cls
								cumface += 3
								facial += 1
								'<center><img src="images/maggot/tri2.jpg"></center>'
								'Hot jet of sperm slapped you in the face, you closed your eyes and just feel the skin getting stinky seed face. Soon after the bombing stopped and your face all covered with a thick layer of sticky Cum, guys looked pretty and laughed at you. After which they left the warehouse giving you myself.'
								''

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

						act 'Scream at full throat and run':bistroQW = 61 & gt 'burger', 'start'
					end
				end
			elseif bistroQW >= 65 and soplakTimes ! 3:
				'To you came pimply deputy manager and taking his hand led him into his office.'
				'In office, he sat on a chair pulled out dick and put you in front of him on all fours.'

				act 'Work mouth':
					cls
					bj += 1
					sub += 1
					'<center><img src="images/maggot/bj31.jpg"></center>'
					'You kneeling in front of a kid sitting in a chair, began to make him a blowjob diligently sucking dick, prick caressing tongue and testicles, and the barrel with one hand nadrachivaya'

					act '...':
						cls
						cumlip += 1
						money += 300
						soplakTimes += 1
						'<center><img src="images/maggot/bj32.jpg"></center>'
						'Hot jet of sperm slapped you in the mouth, you have continued to hand nadrachivat member while being careful not to drop out of his mouth a drop of nasty tasting liquid. Finally stream dried up and showing you pimply zamu mouthful Cum swallow his sperm. He grinned and tossed on the floor three hundred-dollar bills. You picked them up and hid, rose up from his knees and left the office.'
						''

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

				exit
			elseif bistroQW = 57 and BistroBoss = 0 or bistroQW >= 65 and BistroBoss = 0 and soplakTimes = 3:
				BistroBoss = 1

				if soplakTimes = 3:soplakTimes = 4

				'When you have finished, seemed on the verge of bystroezhki Anatoly Borisovich, he nodded to you "Hello <<$name>>, you''re done, come to me."'

				act 'Leave':gt 'burger', 'start'

				exit
			end

			act 'Leave':gt 'burger', 'start'
		end
	elseif posudaA >= 1 and posudaAday ! day and hour < 10 and NoBistroWork = 0 and PersSecWork = 0:
		act 'Wash the floor for 100 rubles(1:00)':
			cla
			*clr
			posudaAday = day
			minut += 60
			posuda += 1
			manna -= 15
			money += 100
			sweat += 1
			'<center><img src="images/etogame/clener1.jpg"></center>'
			'You within the hour namyvali floor eatery. After that you were given 100 rubles for his work.'

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

--- burger ---------------------------------
# burgerBoss
!!Podyablonskaya
!!Calvin Broadus Kaldazar
!!Andrew Krivorotov
!!Dennis Dobrovolsky
gs 'stat'

if BistroBoss = 10:
	if week < 6 and hour >= 9 and hour < 17:'Anatoly Borisovich sitting at the table and talking to someone on the phone.'
	if week < 6 and hour < 9 or week < 6 and hour >= 17:'Anatoly Chubais is not there.'
	if week >= 6:'Now weekends and Anatoly Chubais is not there.'

	act 'Leave':gt 'burger', 'start'

	if PersSecWork = 2:
		if week < 6 and hour < 10:'Anatoly Borisovich looked sternly at you, "<<$name>>, you''re fired, and I did not raise, go away, we''re done, I, my wife more than you."'
	elseif PersSecWork = 1:
		if week < 6 and hour < 10 and ofclo = 1:
			act 'Work':gt 'burgerWork'

			act 'Resign':
				PersSecWork = 0
				work = 0
				minut += 20

				gt 'burger', 'start'
			end

		elseif week < 6 and hour < 10 and ofclo ! 1:
			'Anatoly Borisovich looked sternly at you, "<<$name>>, what are you dressed up? Go home and change your clothes, you hooky today!"'
		end

	elseif PersSecWork = 0 and week < 6:
		if secrDiplom = 1:
			act 'Show diploma':
				cls
				minut += 1
				gs 'stat'
				'You showed diploma Anatoly Borisovich, "A labor there?"'

				act 'No':
					cls
					minut += 1
					gs 'stat'
					'You said what works elsewhere. Anatoly Borisovich smiled a little, "What could I take you to work, what would you need to quit my former employment. You think hard, I do not force you, but I''ll give you a salary normal. Polchaetsya 2500 Will the working day is longer fifty dollars a month. "'

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

				if (work = 0 and PersSecWork = 0 and cheatWork = 0) or (cheatWork = 0 and cheatWork = 1):
					act 'That labor':
						cls
						minut += 1
						gs 'stat'
						'Labor you put on the table. Anatoly Borisovich little smile, "You think well, I will not force you, but I''ll give you a salary normal. Polchaetsya 2500 Will the working day is longer fifty dollars a month. From you I need loyalty, hard work, strict compliance guidelines."'

						act 'Leave':gt 'burger', 'start'

						act 'Find a job':
							cls
							minut += 1
							work = 1
							PersSecWork = 1
							gs 'stat'
							'You agreed to become secretary Anatoly Chubais, he took your career, made a copy of passport and diploma, and began to tell. Come back every weekday at bystroezhku no later than 9 o''clock, carefully observe the dress code. Receive calls, write, print documents, in general nothing supernatural. Will work to 17ti hours, salary every month.'

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

elseif BistroBoss = 1:
	'You have entered the principal''s office. Anatoly Borisovich sitting at the table and studied the documents, you see, he put them aside and showed you invited to sit on a chair.'

	act 'Sit on a chair':
		cls
		minut += 1
		BistroBoss = 10
		gs 'stat'

		if bistroQW = 57:
			kosmetica += 200
			'You sat on a chair and smiled Anatoly Borisovich you. "I''m so glad this damn trip over. I had already missed you. Incidentally I do not come empty-handed, here''s a gift." with these words Anatoly Borisovich put on the table a of expensive cosmetics. "And yet, I want you to devote some of the details. I am married and I have kids. So do not even stutter about any marriage, this I will not go. My wife, the daughter of a very influential deputy and my current position of Director of the lousy diner time, very soon I''ll get the post of deputy minister of construction, but for now I just need to get the record in labor. So, you showed yourself a stiff upper lip, I need loyal people, and I invite you to be my secretary. Do you have passed the diploma courses secretary? "'

			if secrDiplom = 1:
				act 'Yes, I have a diploma.':
					cls
					minut += 1
					gs 'stat'
					'You said that you already have a diploma Secretary. Anatoly Borisovich smiled. "What are you still done. Listen, I now need to make a couple of calls, leave now."'

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

			elseif secrDiplom = 0 and sekrObu > 0:
				act 'I do not have a diploma, but I am a secretary.':
					cls
					minut += 1
					gs 'stat'
					'You said that you already have a diploma Secretary. Anatoly Borisovich smiled. "What are you still done. Douchishsya, come to me. Listen, I now need to make a couple of calls, leave now."'

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

			elseif secrDiplom = 0 and sekrObu = 0:
				act 'No.':
					cls
					sekrObu = 1
					minut += 1
					gs 'stat'
					'You shook his head. Anatoly Borisovich smiled. "It does not matter, I now pay for your training and once you''re done, come to me."'

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

		elseif bistroQW >= 65:
			'You sat on a chair and Chubais gave you a grim look. "I did not think you were such deshovke. What is your fee? Three weave for suction to swallow?" He pulled out his bill of 300 rubles and threw it on the floor. "Get up on your knees and work it off, as you are able, vaflersha."'

			act 'Leave':gt 'burger', 'start'

			act 'To kneel':
				cls
				minut += 5
				money += 300
				bj += 1
				swallow += 1
				cumlip += 1
				BistroBoss = 2
				BistroBossDay = day
				gs 'stat'
				'<center><img src="images/qwest/sosed/bj2.jpg"></center>'
				'You knelt down and took the money from the floor. Anatoly Borisovich member and you got tipped off his face on his solid body. Then you gripped it with his lips and began to suck as hard core feeling fills your mouth. Anatoly Borisovich his teeth with pleasure "Suck slut, now swallow, and that would be swallowed up all the drops!" You feel like you hit the sperm in her mouth and began to swallow cum quickly, that would not choke. When finished, Anatoly Borisovich took dick in pants and said, "Now get out."'

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

elseif BistroBoss = 2 and BistroBossDay = day:
	'Knocking you walked into the office to Anatoly Borisovich. He looked angrily at you, "I said, get out of here."'

	act 'Leave':gt 'burger', 'start'

elseif BistroBoss = 2 and BistroBossDay ! day:
	BistroBossDay = day
	'Knocking you walked into the office to Anatoly Borisovich. He looked darkly at you and got a bill of 300 rubles, "Get up on your knees and work it off, as you are able, vaflersha."'

	act 'Leave':gt 'burger', 'start'

	act 'To kneel':
		cls
		minut += 5
		money += 300
		bj += 1
		swallow += 1
		cumlip += 1
		BistroBossDay = day
		gs 'stat'
		'<center><img src="images/qwest/sosed/bj2.jpg"></center>'
		'You knelt down and took the money from the floor. Anatoly Borisovich member and you got tipped off his face on his solid body. Then you gripped it with his lips and began to suck as hard core feeling fills your mouth. Anatoly Borisovich his teeth with pleasure "Suck slut, now swallow, and that would be swallowed up all the drops!" You feel like you hit the sperm in her mouth and began to swallow cum quickly, that would not choke. When finished, Anatoly Borisovich took dick in pants and said, "Now get out."'

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

--- burgerBoss ---------------------------------
# burgerWork
$dinBistroWork = {
	act 'Dinner':
		cls
		minut += 30
		health += 10
		manna += 5
		willpower += 5
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You took bystroezhke food and sat at a table for dinner.'

		if energy >= 30:
			fat += 8
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			fat += 6
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			fat += 4
			'You gladly ate the food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		elseif water < 20:
			water += 20
			'You gladly drank a mug of tea.'
		end

		gs 'stat'
		dynamic $dinBistroWork3
	end
}

$dinBistroWork2 = {
	act 'Leave work':
		cls
		gs 'stat'

		if kompromatBlackMail >= 6 and ivanFilmBJ > 0:
			kobl = 0
			kobl2 = 2
		elseif kompromatBlackMail >= 6 and ivanFilmBJ = 0:
			kobl = 0
			kobl2 = 2
		elseif kompromatBlackMail < 6:
			kobl = 0
			kobl2 = 1
		end

		komblrand = rand(kobl, kobl2)

		if kompromatBlackMail >= 2:
			if komblrand = 0:
				'After work, you are going to leave bystroezhki, but you came Ivan. "Where are you going, baby? And how to suck my candy?"'

				act 'Agree':
					cls
					bj += 1
					cumlip += 1
					swallow += 1
					kompromatBlackMail += 1
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/sosed/ivanBJ.jpg"></center>'
					'Ivan took you around the corner to a dirty alley bystroezhki smelling urine. He pulled out of his pants member. "And now for the baby and try to work better." You squatted in front of Ivan and took his penis in her mouth, it was salty and not washed. You started to suck trying to act more active, what would Ivan finished as quickly as possible. Ivan finally puffed and began to cum in your mouth. You quickly swallowed shooting eyes on the sides, in the hope that no one sees. Once you swallow cum, Ivan cleaned dick in his pants "Average nipple. Now get out of here!"'

					act 'Leave':gt 'down'
				end

				dynamic $din_Ivan_work4
			elseif komblrand = 1:
				'After work, you are going to leave bystroezhki, but you came Ivan. "Where are you going, baby? And how to suck my candy?"'

				act 'Agree':
					cls
					bj += 1
					cumlip += 1
					swallow += 1
					kompromatBlackMail += 1
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/sosed/ivanBJcar.jpg"></center>'
					'Ivan took you to your car standing in the alley, he got behind the wheel and you sat next to him. Ivan got dick out of his pants and grabbed you by the hair pulled your face to his groin until his cock is not buried you in your <<$liptalk3>>. You opened your mouth and allow the members to enter between your lips. You started trying to suck harder to compress their <<$liptalk3>> on the penis that Ivan would be finished quickly. Ivan finally broke down and finished in your mouth. You continued to suck dick swallowing sperm while falling. Ivan tucked dick in his pants and said, "Okay cocksucker, get out."'

					act 'Leave':gt 'down'
				end

				dynamic $din_Ivan_work4
			elseif komblrand = 2:
				'After work, you are going to leave bystroezhki, but you came Ivan. "Where are you going, baby? And how to suck my candy?"'

				act 'Agree':
					cls
					kompromatBlackMail += 1
					minut += 5
					gs 'stat'
					'<center><img src="images/maggot/car.jpg"></center>'
					'Ivan took you to your car standing in the alley, he got behind the wheel and you sat next to him. Ivan started the car and you go to the northern region. "And do not forget baby while you slushaesh me you have a job and prospects, but it is worth to you piss me off, and all you will take off from his job as a traffic jam." Soon you come to a new building, Ivan put the car in the free space. You got out and went with Ivan in the staircase. The lift takes you up to the apartment of Ivan and he opened the door for you. Ivan, without delay, to take you by the hand and led her into the bedroom. There he sat on the bed and took out the camera. Ivan got dick out of his pants and said, "Suck it baby, how can you do, should not get a bad porn."'

					act 'Suck':
						cls
						minut += 5
						bj += 1
						ivanFilmBJ += 1
						gs 'stat'
						'<center><img src="images/qwest/sosed/ivanBJfilm.jpg"></center>'
						'You sat down on his knees in front of Ivan and clasped their <<$liptalk3>> member. Ivan sent to you in the face the camera and filmed as you suck his cock closeup. Ivan put you back on the couch and sat on your chest so that his cock was in front of your face.'

						act 'Suck':
							cls
							minut += 5
							gs 'stat'
							'<center><img src="images/qwest/sosed/ivanBJfilm2.jpg"></center>'
							'North top Ivan began to fuck you in the mouth every time a member of his firm head sticking in your throat, you suck diligently trying not to choke. While Ivan did not forget to shoot you on camera. Finally he took a dick out of your mouth.'

							act 'Open mouth':
								cls
								minut += 5
								facial += 1
								cumface += 1
								gs 'stat'
								'<center><img src="images/qwest/sosed/ivanBJfilm3.jpg"></center>'
								'Ivan began to finish you on your <<$liptalk3>> and language. Cum dripping from your lips on his chin and chest. Ivan finally turned off the camera and put it away in a drawer. "Not bad chlenososka fulfilled. Can wash up and get out."'

								act 'Leave':cumface = 0 & gt 'nord'
							end
						end
					end

					dynamic $din_Ivan_work4
				end

				dynamic $din_Ivan_work4
			end

			!!if komblrand = 3:''

			exit
		end

		gt 'burger', 'start'
	end
}

$dinBistroWork3 = {
	act 'Work':
		cls
		PSBBtimes = 2
		minut += 30
		minut += 60 * 3
		!!gs 'BurgerTip'
		gs 'stat'
		'<center><img src="images/qwest/sosed/work.jpg"></center>'

		'You sat down and started on the computer to prepare the contract.'
		dynamic $burger_work_din
		dynamic $dinBistroWork2
	end
}

if hour < 10:hour = 10 & minut = 0 & PersSecWorkTimes += 1

gs 'BurgerTip'
gs 'stat'
'<center><img src="images/qwest/sosed/work.jpg"></center>'
'You sit in front of his office cabinet Anatoly Borisovich.'

if hour < 17:
	act 'Work before lunch':
		cls
		PSBBtimes = 1
		minut += 60 * 2
		!!gs 'BurgerTip'
		gs 'stat'
		'<center><img src="images/qwest/sosed/work.jpg"></center>'
		'You sat at the table and began to prepare the agreement on the computer.'

		if TerminalPapper = 1:
			TerminalPapper = 0
			kosiakBU += 1
			'Anatoly Borisovich gave you dressing for what you are not carried documents in a storage terminal and disrupted supplies.'
		elseif TerminalPapper = 2:
			TerminalPapper = 0
			'Anatoly Borisovich thanked you for what you just delivered documents to storage terminal.'
		end
		if BankPapper = 1:
			BankPapper = 0
			kosiakBU += 1
			'Anatoly Borisovich chastised you for what you did not take the documents to the bank.'
		elseif BankPapper = 2:
			BankPapper = 0
			'Anatoly Borisovich thanked you for what you just delivered the documents to the bank.'
		end

		if BuSWworkEnd = 1 or kompromatBlackMail = 1:
			'Anatoly Borisovich came into your office and put the paper in front of you with a pen. "Write on your own. I do not need a secretary with a past like yours."'

			act 'Write a statement of resignation':
				cls
				work = 0
				PersSecWork = 2
				Pay = PersSecWorkTimes * 2500
				PersSecWorkTimes = 0
				money += Pay
				gs 'stat'
				'You wrote a statement of resignation and quickly signed his boss, he was counted out to you <<pay>> rubles your paycheck and said, "It''s over <<$name>>, get out of here."'

				act 'Leave':gt 'down'
			end

			exit
		end

		dynamic $burger_work_din
		dynamic $dinBistroWork
	end
end

!!Anatoly Borisovich Director
!!smart girl HR Manager, personnel department
!!manager Ivan, player, ILO and brave guy
!!Deputy manager, pimply boy, son of the owner bystroezhki

--- burgerWork ---------------------------------
# BurgerTip
$burger_work_din = {
	burand = rand(0, 6)

	if burand = 0:
		'You lit lamp on the table communicator. Anatoly Borisovich calls you to itself.'

		act 'Go to the office Chubais':
			cls
			gs 'stat'
			'<center><img src="images/qwest/sosed/work2.jpg"></center>'
			bossrand = rand(0, 3)

			if bossrand = 0:
				'You went into his office and approached the table Chubais. He turned his head to you "<<$name>>, bring coffee."'

				act 'Bring coffee':
					cls
					gs 'stat'
					'<center><img src="images/qwest/sosed/work3.jpg"></center>'
					'Did you go to the kitchen and prepared coffee for the boss. Then brought his boss.'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end
			elseif bossrand = 1:
				'You went into his office and approached the table Chubais. He turned his head to you "Svetochka. Take these documents, and go to the chief accountant. Formalize it and you bring them to me."'

				act 'Go to the chief accountant':
					cls
					gs 'stat'
					'<center><img src="images/qwest/sosed/work9.jpg"></center>'
					'You took the papers and went to the chief accountant. Elena G. irritably took documents, muttered something under his breath, put the signature and printed several accounts. "To Bring the Director."'

					act 'Go to the director':
						cls
						gs 'stat'
						'<center><img src="images/qwest/sosed/work2.jpg"></center>'
						'Taking the documents you went back to the director''s office and gave him the documents.'

						if PSBBtimes = 1:dynamic $dinBistroWork
						if PSBBtimes = 2:dynamic $dinBistroWork2
					end
				end
			elseif bossrand = 2:
				'You went into his office and approached the table Chubais. He turned his head to you "Svetochka. Take these documents and bring them to Ivan, let will immediately"'

				act 'Go to Ivan':
					cls
					gs 'stat'
					'<center><img src="images/qwest/sosed/work7.jpg"></center>'
					'You took the papers and went to the senior manager Ivan.'
					'Ivan sat in his office and worked on the computer. You gave him a folder with documents "Chubais said to do this immediately." Ivan took the folder from your hands and you ran eyes nodded.'

					act 'Go to her':
						cls
						gs 'stat'
						'<center><img src="images/qwest/sosed/work.jpg"></center>'
						'Documents giving you went to his office.'

						if PSBBtimes = 1:dynamic $dinBistroWork
						if PSBBtimes = 2:dynamic $dinBistroWork2
					end
				end
			elseif bossrand = 3:
				cls
				bossexrand = rand(0, 3)
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/sosed/boss<<bossexrand>>.jpg"></center>'
				'You went into his office and approached the table Chubais. He got up from the table and walked over to you'

				if bossexrand = 0:'Chubais came up to you and passionately pressed to the wall covering you with kisses.'
				if bossexrand = 1:'His hand slid down your stomach and crawled under her skirt, you felt his hand began to caress your pussy.'
				if bossexrand = 2:'He grabbed you in the ass and lifted up her skirt you began to knead your soft ass.'
				if bossexrand = 3:'Anatoly Borisovich put his hands on your hips, his hands slid up your skirt bullying.'

				act 'Kiss':
					cls
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/sosed/bossex.jpg"></center>'
					'Anatoly Borisovich sat on the couch holding you firmly in their hands. He put you over the top and began to kiss you and fondle your ass.'
					dynamic $boss_din_bj

					act 'Continue':
						cls
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/sosed/bossex2.jpg"></center>'
						'Anatoly Borisovich began to undress you and threw you back. He kissed you and you climbed his hands between her legs feeling the pussy'
						bosstipsexrand = rand(1, 10)

						if bosstipsexrand >= 3:
							dynamic $boss_din_sex2
						elseif bosstipsexrand < 3:
							'Chubais fingers began to fondle your anus and you feel like you went his finger in the ass.'
							dynamic $boss_din_anal2
						end
					end
				end

				act 'To kneel':
					cls
					gs 'stat'
					'<center><img src="images/qwest/sosed/bossex1.jpg"></center>'
					'You kneel before the head and began to unbutton his pants with his thin fingers. Anatoly Borisovich stood before you and not moving silently staring you in the face. Finally, you undid his pants and shoved his hand into his pants boss groped his cock.'

					act 'Caress cock through the briefs':
						cls
						gs 'stat'
						'<center><img src="images/qwest/sosed/bossBJ.jpg"></center>'
						'Vashie thin fingers lowered pants with the chief, and his standing member mound protruded through the panties. You kissed briefs in place mound feeling firm flesh through the fabric. Then playfully took in his mouth dick right through the panties and began to fondle.'
						dynamic $boss_din_bj
					end

					dynamic $boss_din_bj
				end
			end
		end

		exit
	elseif burand = 1:
		cls
		gs 'stat'
		'<center><img src="images/qwest/sosed/work5.jpg"></center>'

		if PSBBtimes = 1:
			bosstiprand = rand(0, 3)

			if bosstiprand = 0:
				TerminalPapper = 1
				DayTerminalPapper = day
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, take these documents to the North area, in a storage terminal, then you can be free today."'

				act 'Leave':gt 'down'
			elseif bosstiprand = 1:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, I''ll leave up for lunch. But now bring up products, you accept the products instead of me."'

				act 'Take products':
					cls
					gs 'stat'
					'To the rear entrance truck arrived with food. To you approached the driver with the instruments of acceptance. You signed the documents and ordered the baggage handlers to unload the car.'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end

			elseif bosstiprand = 2:
				BankPapper = 1
				dayBankPapper = day
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, run to the bank with these documents. How otneseshsya documents can be free today."'

				act 'Leave':gt 'down'
			elseif bosstiprand = 3:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, call programmer who have part-time, my PC is broken"'

				act 'Call programmer':
					cls
					gs 'stat'

					if sosedQW = 0:
						'Soon entered the office of a young, tall guy with a big bag. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
					elseif sosedQW > 0 and sosedKnowWork > 0:
						sosedKnowWork = 1
						'Soon the office entered Timothy, your neighbor. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
					elseif sosedQW > 0 and sosedKnowWork = 0:
						sosedKnowWork = 1
						'Soon the office entered Timothy, your neighbor. He was surprised to see you. You chatted cheerfully, Timothy is working part-time in bystroezhke, repairing office equipment, charges cartridges.'
					end

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end
			end
		elseif PSBBtimes = 2:
			bosstiprand = rand(0, 3)

			if bosstiprand = 0:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, I have to leave early today, here''s a print, well, so far." Anatoly Borisovich then left the office.'
				bburand = rand(0, 10)

				if bburand = 0:
					'To your office went senior manager Ivan.'
					dynamic $din_Ivan_work

					if kompromatLife = 0 or kompromatBlackMail > 1:
						'Ivan grinned "I need shtampulki on here these papers." You took the seal and stamp on paper Ivan.'

						if PSBBtimes = 1:dynamic $dinBistroWork
						if PSBBtimes = 2:dynamic $dinBistroWork2
					end

				elseif bburand = 1:
					'To your office assistant manager went Sergei.'
					'Sergei looked you carnivorous eyes "Anatoly Borisovich at?" You said no.'

					if sergeyPQW = 1:
						'Pimply young man chuckled and sat on the edge of the table. "<<$name>>, you''re dynamite. Cafe I invested for you, and you with me here and so cost.''s No nice of you."'
					elseif sergeyPQW = 0:
						'Pimply kid sat on the edge of the table "<<$name>> you cool the girl can descend to something?"'

						act 'No! And do not even think about it!':
							cls
							gs 'stat'
							'You have rejected this rookie and he jumped up from the table left his office.'

							if PSBBtimes = 1:dynamic $dinBistroWork
							if PSBBtimes = 2:dynamic $dinBistroWork2
						end

						act 'Come on.':
							cls
							gs 'stat'
							'<center><img src="images/qwest/sosed/work7.jpg"></center>'
							'Sergei delighted and promised to go after you left. Working time has come to an end and re-entered the office Sergei. "Come on."'

							act 'Go.':
								cls
								minut += 60
								horny += 15
								water = 24
								energy = 24
								salo += 2
								fat += 20
								gs 'stat'
								'<center><img src="images/qwest/sosed/kafe2.jpg"></center>'
								'You went with Sergei and logged in located not far from bystroezhki cafe. Sergei ordered drinks and food and you sat down at the table. Order soon earned and you began to eat and drink wine. Soon you''re a bit tipsy and the conversation flowed naturally. Sergei called the waitress and paid with her. You went out with his partner, and pimply he suddenly hugged you "<<$name>>, went to me."'

								act 'Refuse.':
									cls
									minut += 15
									sergeyPQW = 1
									gs 'stat'
									!!'<center><img src="images/qwest/sosed/kafe2.jpg"></center>'
									'You refused molestation obsessive brat and left.'

									act 'Leave.':gt 'down'
								end
							end
						end

						exit
					end

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2

				elseif bburand = 2:
					'To your office came chief accountant Lena.'
					'Lena looked disapprovingly you "Chef at home?" You said that he was gone. Lena lipped gone.'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				elseif bburand = 3:
					'To your office came personnel manager Vic.'
					'Vick you smiled "Chef at home?" You replied that he was gone. Vick said he would call the next time left.'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				elseif bburand > 3:
					'Allotted time you sat in the office alone, bored and expanding solitaire on the computer.'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end
			elseif bosstiprand = 1:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, went along with me, have fun."'

				act 'Go with Anatoly Borisovich':
					cls
					gs 'stat'
					'<center><img src="images/maggot/car.jpg"></center>'
					BurMestoRand = rand(0, 1)

					if BurMestoRand = 0:
						'You got in the car to Anatoly Borisovich and you went to the residential area of ​​the city. Soon the car stopped near the sauna. Chubais said with a smile. "I made room for us."'

						act 'Go to the sauna':
							cls
							gs 'stat'

							if SaunaWhore > 0:
								BuSWworkEnd = 1
								'You are logged in to the sauna and suddenly faced with mother at the entrance, which provided you work in the sauna. She said with surprise, "<<$name>>, what the hell, are you now indvidualka? Slugger I work, and even dare to come here?" Anatoly Borisovich wondered, "What''s going on here, then you know the <<$name>>?" Nurse laughed, "Do I know <<$name>> Yes her pussy real goldmine! Of course I know it, I have it working as a prostitute." Anatoly Borisovich blushed, "How? <<$name>>? You''re just a whore?" You began to mutter, trying to come up with on the fly how do you otmazatsya. Anatoly Borisovich shook his head. "I was wrong about you, <<$name>>." After that, he went silently out of the sauna and you heard his car left. Nurse continued to laugh at you "<<$name>>, you''re a whore, and if you manage to still Okrut decent guy, if your past will come up, then you no self-respecting man, to live is not. Consider it a free lesson to you."'

								act 'Leave':gt 'street'
							elseif SaunaWhore = 0:
								'You are logged in to the sauna and Chubais held you in luxurious rooms which he made. He quickly began to undress and you too undressed. Then he walked up to you. "<<$name>>, I suck."'

								act 'Further':
									cls
									minut += 5
									bj += 1
									gs 'stat'
									'<center><img src="images/qwest/sosed/bossBJS.jpg"></center>'
									'You squatted in front of the boss and taking dick kissed his hand. His cock began to twitch gradually rising. You prick the skin baring penis and licked it. Then you cupped member lips and began to suck him. Do you feel as a member in your mouth uvilichivaetsya gradually in size and becomes harder, finally gets full member and you suck it with sucking sounds covering saliva. Anatoly Borisovich pulls his dick out of your mouth and steers you to the bench.'

									act 'Further':
										cls
										minut += 5
										protect = 1
										$boy = 'Anatoly'
										dick = 12
										silavag = 0
										gs 'stat'
										'<center><img src="images/qwest/sosed/bossSexS.jpg"></center>'
										'Anatoly Borisovich put a condom on the penis and lay down on the bench pulling your hand to yourself. You have thrown a leg over the boss stomach and sat on top of him, then you took his hard hand and sent it into my pussy.'
										dynamic $sexstart3
										sweat = -3
										'You heard Anatoly Borisovich groaned and twitched a few times, he took you with ebya and you saw that sperm filled condom.'
										'Then you went into the shower to wash. Coming out of the shower, you saw that Anatoly Borisovich already dressed. "<<$name>>, I''ve got to run." He kissed you and left.'

										act 'Leave':gt 'street'
									end
								end
							end
						end
					elseif BurMestoRand = 1:
						'You got in the car and suddenly the phone rang boss. He frowned and picked up the receiver. "Yes dear, I will soon." He hung up. "We have to go home, <<$name>>, quick suck, and I''ll go."'

						act 'Suck':
							cls
							minut += 5
							bj += 1
							cumlip += 1
							swallow += 1
							gs 'stat'
							'<center><img src="images/qwest/sosed/bossBJcar.jpg"></center>'
							'Anatoly Borisovich sat on the couch waiting for your actions. You leaned over and unzipped his pants taking out his cock from his pants. You leaned over his groin and his lips wrapped around his flaccid penis, which gradually began to get up in your mouth. You sucked it as deep as possible and faster, trying to boss that finished. Finally Anatoly Borisovich little moan and warm liquid squirted into your mouth. Trying not ispachkad expensive car you started to swallow cum boss. After Anatoly Borisovich finished, he put his dick in pants and said goodbye to you.'

							act 'Leave':gt 'down'
						end
					end
				end

				exit
			elseif bosstiprand = 2:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, call programmer who have part-time, my PC is broken"'

				act 'Call programmer':
					cls
					gs 'stat'

					if sosedQW = 0:
						'Soon entered the office of a young, tall guy with a big bag. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
					elseif sosedQW > 0 and sosedKnowWork > 0:
						sosedKnowWork = 1
						'Soon the office entered Timothy, your neighbor. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
					elseif sosedQW > 0 and sosedKnowWork = 0:
						sosedKnowWork = 1
						'Soon the office entered Timothy, your neighbor. He was surprised to see you. You chatted cheerfully, Timothy is working part-time in bystroezhke, repairing office equipment, charges cartridges.'
					end

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end
			elseif bosstiprand = 3:
				'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, you have to stay at work today. Come to me now partners for business negotiations."'

				act 'Further':
					cls
					minut += 60
					gs 'stat'
					'By Anatoly Borisovich two men came and they settled down in his office. Anatoly Borisovich occasionally caused you that would bring coffee. An hour later, the men were gone and Anatoly Borisovich let you go.'

					act 'Leave':gt 'down'
				end
			end
		end

		exit
	elseif burand = 2:
		'To your office went senior manager Ivan.'
		dynamic $din_Ivan_work

		if kompromatLife = 0 or kompromatBlackMail > 1:
			'Ivan grinned "I need shtampulki on here these papers." You ran to the boss and he stamped on the document, and then you classify documents Ivan.'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2
		end

		exit
	elseif burand = 3:
		'To your office assistant manager went Sergei.'
		'Sergei greedily examining you said "Ivan told these documents include the main, on the signature."'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2

		exit
	elseif burand = 4:
		'To your office came GlavBukh Lena.'
		'Lena arrogant as ever with mine said "I need a print head of the payment for these." You classify documents to the chief, he slap seals and documents you gave Lena.'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2

		exit
	elseif burand = 5:
		'To your office came personnel manager Vic.'
		'She smiled at you, "I''ve brought the documents, who is retiring as always, you need to put the press." You classify documents to the chief and he slap stamps. After that you classify documents Vick.'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2

		exit
	elseif burand = 6:
		'To your office came elegantly dressed woman with an arrogant person.'

		if gossipBU < 10:
			'The lady looked scornfully asked you and disgust "at Shreds?" You nodded his head, a lady came in without knocking into the office to Anatoly Borisovich and after a while they went out together, Chubais said on the way "Yes dear, certainly today''ll come to your mother." When the woman left Antaoly Borisovich chuckled "My wife is a rare bitch."'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2
		end

		if gossipBU >= 10:
			'Lady you looked contemptuously and angrily opened the door to Anatoly Borisovich, you heard her shrill voice, "Tolia, I know all about your adventures with his sekretutkoy, and if you do not immediately vygonish this slut from work, then I myself leave you, you understand? " Anatoly Borisovich zabubnil "Yes, dear, you know, I just love you." He was red in the face out of the office and you threw the paper on the table, "Write on his own!"'

			act 'Write a statement of resignation':
				cls
				work = 0
				PersSecWork = 2
				Pay = PersSecWorkTimes * 2500
				PersSecWorkTimes = 0
				money += Pay
				gs 'stat'
				'You wrote a statement of resignation and quickly signed his boss, he was counted out to you <<pay>> rubles your paycheck and said, "It''s over <<$name>>, get out of here."'

				act 'Leave':gt 'down'
			end
		end

		exit
	end
}

$boss_ass_din = {
	bossassrand = rand(0, 3)

	if bossassrand = 0:'When you bend over to pick up the papers from the table, then got a slap on the ass savory from Anatoly Borisovich.'
}

$boss_din_bj = {
	act 'Get a member of cowards':
		cls
		numbjrand = rand(0, 14)
		wantrand = rand(0, 3)
		bj += 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/bossBJ<<numbjrand>>.jpg"></center>'
		'Did you get a member of pants around his boss and his <<$liptalk>> his lips purple head. Your tongue quickly worked on a smooth surface of the head feeling all the twists member. Clasping member you took it into his mouth to the throat and began to move her head. Your eyes stared at the curly pubic Chubais and sometimes his hair tickling your nose.'

		if wantrand = 3:
			'Anatoly Borisovich took a member of your mouth "<<$name>>, I want you."'
			dynamic $boss_din_bendover
		elseif wantrand = 2:
			'Anatoly Borisovich muffled groan "<<$name>> if you prodolzhish, then I finish"'
			dynamic $boss_din_bendover
			dynamic $boss_din_bj2
		elseif wantrand < 2:
			'Anatoly Borisovich groaned obviously going to finish.'
			dynamic $boss_din_bj_cum
		end
	end
}

$boss_din_go_toilet = {
	act 'Go to the toilet':
		cls
		gs 'stat'
		bosstoirand = rand(0, 10)

		if bosstoirand = 10:
			gossipBU += 1
			'You went to the toilet, but in the hallway accidentally collided with Ivan. Ivan looked at you with a grin and turned away went about his business.'
			dynamic $boss_din_toilet_wash
		elseif bosstoirand = 9:
			gossipBU += 1
			'You went to the toilet, but in the hallway accidentally encountered a chief accountant Lena. Lena looked at you and saw sperm muttered "whore" and went on her way.'
			dynamic $boss_din_toilet_wash
		elseif bosstoirand = 8:
			gossipBU += 1
			'You went to the toilet, but in the hallway accidentally collided with the personnel manager Vika. Vick saw you cum and her eyes widened in surprise, then she wrinkled her nose in disgust and walked away.'
			dynamic $boss_din_toilet_wash
		elseif bosstoirand = 7:
			gossipBU += 1
			'You went to the toilet, but in the hallway accidentally encountered a deputy manager Sergei. Pimply young man Serge saw semen on you and laughed, "That''s because cocksucker" after he ran somewhere.'
			dynamic $boss_din_toilet_wash
		elseif bosstoirand < 7:
			bosstoirandin = rand(0, 10)

			if bosstoirandin = 10:
				gossipBU += 1
				'You quietly slipped into the toilet, but the toilet nose to nose faced the chief accountant Lena. Lena looked at you and saw sperm muttered "whore" and went on her way.'
				dynamic $boss_din_toilet_wash2
			elseif bosstoirandin = 9:
				gossipBU += 1
				'You quietly slipped into the toilet, but the toilet faced nose to nose with the personnel manager Vika Vika saw you cum and her eyes widened in surprise, then she wrinkled her nose in disgust and walked away.'
				dynamic $boss_din_toilet_wash2
			elseif bosstoirandin < 9:
				cumface = 0
				cumfrot = 0

				if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
				if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'

				'You quietly slipped into the toilet. <<$deytoibur>><<$deytoibur2>>'

				if PSBBtimes = 1:dynamic $dinBistroWork
				if PSBBtimes = 2:dynamic $dinBistroWork2
			end
		end
	end
}

$boss_din_toilet_wash = {
	cumface = 0
	cumfrot = 0

	if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
	if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'

	'You went into the bathroom and turned the water in the sink. <<$deytoibur>><<$deytoibur2>>'

	if PSBBtimes = 1:dynamic $dinBistroWork
	if PSBBtimes = 2:dynamic $dinBistroWork2
}

$boss_din_toilet_wash2 = {
	cumface = 0
	cumfrot = 0

	if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
	if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'

	'You turned the water in the sink. <<$deytoibur>><<$deytoibur2>>'

	if PSBBtimes = 1:dynamic $dinBistroWork
	if PSBBtimes = 2:dynamic $dinBistroWork2
}

$boss_din_bj_cum = {
	act 'Remove the member of his mouth':
		cls
		gs 'stat'

		reaktrand = rand(0, 10)

		if reaktrand <= 5:
			'<center><img src="images/qwest/sosed/bossBJcum.jpg"></center>'
			'You took time member of his mouth. The hour is a member of sperm splattered on the floor, you caressed member hand until finally Anatoly Borisovich not exhausted. After that he removed his pants and member sat at the table.'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2
		elseif reaktrand > 5 and reaktrand < 9:
			cumfrot += 1
			'<center><img src="images/qwest/sosed/bossBJcum2.jpg"></center>'
			'You took time member of his mouth. The hour is a member of sperm splattered on the floor, you caressed member hand until finally Anatoly Borisovich not exhausted. then he removed the cock in his pants and sat down. Starting to brush up, you notice that you got some sperm on her blouse.'
			dynamic $boss_din_go_toilet
		elseif reaktrand >= 9:
			cumface += 1
			cumfrot += 1
			'<center><img src="images/qwest/sosed/bossBJcum3.jpg"></center>'
			'Once you have removed the member of his mouth as directed jet of sperm hit you in the face. You closed your eyes and you immediately got sperm on eyelashes. When you rubbed their eyes, they saw that the sperm just got on your clothes.'
			dynamic $boss_din_go_toilet
		end

		gs 'stat'
	end

	dynamic $boss_din_bj2
}

$boss_din_bj2 = {
	act 'Continue to suck':
		cls
		cumlip += 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/bossBJcum4.jpg"></center>'
		'You continued to suck and immediately poured into your mouth warm sperm, which was mixed with saliva while you continued to suck dick deciduous.'

		act 'Spit out':
			cls
			gs 'stat'
			'<center><img src="images/qwest/sosed/bossBJcum5.jpg"></center>'
			'When sperm ceased to flow out of the penis you spit cum rushed out of his mouth, but his mouth was nasty, sharp taste of sperm.'
			boburand = rand(0, 10)

			if boburand > 2:
				if PSBBtimes = 1:dynamic $dinBistroWork
				if PSBBtimes = 2:dynamic $dinBistroWork2
			elseif boburand <= 2:
				cumfrot += 1
				gs 'stat'
				'Spitting sperm you notice that a few drops of semen got you on her blouse.'
				dynamic $boss_din_go_toilet
			end
		end

		act 'Swallow':
			cls
			swallow += 1
			gs 'stat'
			'<center><img src="images/qwest/sosed/bossBJcum6.jpg"></center>'
			'You rushed to swallow warm and nasty sperm in the mouth but left an unpleasant taste of semen.'
			boburand = rand(0, 10)

			if boburand > 2:
				if PSBBtimes = 1:dynamic $dinBistroWork
				if PSBBtimes = 2:dynamic $dinBistroWork2
			elseif boburand <= 2:
				cumfrot += 1
				gs 'stat'
				'Spitting sperm you notice that a few drops of semen got you on her blouse.'
				dynamic $boss_din_go_toilet
			end
		end
	end
}

$boss_din_bendover = {
	act 'Lie chest on the table':
		cls
		gs 'stat'
		!!bossfuck
		'<center><img src="images/qwest/sosed/bossbendover.jpg"></center>'
		'You bent down and went chest on the table, with his hands and parted skirt ass.'
		bosstipsex = rand(0, 10)

		if bosstipsex <= 8:
			'Anatoly Borisovich rubbed a little head of his penis on your mokrenkaya pussy.'
			dynamic $boss_din_sex
		elseif bosstipsex > 8:
			'Anatoly Borisovich bent down and spit you on the ass, then you felt his finger collected saliva and you went into the anus.'
			dynamic $boss_din_anal
		end
	end
}
$boss_din_sex = {
	act 'Moan':
		cls
		bosstipsex = rand(0, 10)
		$boy = 'Anatoly'
		dick = 12
		silavag = 0
		pose = 1
		gs 'stat'
		!!bossfuck
		'<center><img src="images/qwest/sosed/bossfuck.jpg"></center>'
		'You relax and feel like your lower jaw spread logged into your body hard cock, you could not stand and make a light moan from the feeling of fullness.'
		dynamic $sexstart2
		!!dynamic $sexcum
		bosswantrand = rand(0, 10)

		if bosswantrand >= 3:
			cumass += 1
			'<<$boy>> took out of you cock and you feel like a stream of sperm you naked by the ass.'
			'You took a napkin and wiped the sperm with his bare ass, but you are not rubbing, the sperm still left on your body.'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2
		elseif bosswantrand < 3:
			'Anatoly Borisovich took a member of your pussy and uper it in your ass.'
			dynamic $boss_din_anal
		end
	end
}

$boss_din_anal = {
	act 'Relax the anus':
		cls
		bosstipsex = rand(0, 10)
		$boy = 'Anatoly'
		dick = 12
		silavag = 0
		pose = 1
		gs 'stat'
		!!bossfuck
		'<center><img src="images/qwest/sosed/bossanal.jpg"></center>'
		'You relax and feel like in your anus braced hard cock trying to push your sphincter.'
		dynamic $analsex
		!!dynamic $sexcum
		cumanus+= 1
		'<<$boy>> and groaned as you felt something in your ass was dispensed heat from the sperm.'
		'Finally Anatoly Borisovich took out your cock and the buttocks took it in his pants.'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2
	end
}

$boss_din_sex2 = {
	act 'Moan':
		cls
		bosstipsex = rand(0, 10)
		$boy = 'Anatoly'
		dick = 12
		silavag = 0
		pose = 0
		gs 'stat'
		!!bossfuck
		'<center><img src="images/qwest/sosed/bossfuck2.jpg"></center>'
		'You relax and feel like your lower jaw spread logged into your body hard cock, you could not stand and make a light moan from the feeling of fullness.'
		dynamic $sexstart2
		!!dynamic $sexcum

		bosswantrand = rand(0, 10)

		if bosswantrand >= 3:
			cumbelly += 1
			'<<$boy>> took out of you cock and you feel like a stream of sperm you naked by the ass.'
			'You took a napkin and wiped the sperm with his bare ass, but you are not rubbing, the sperm still left on your body.'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2
		elseif bosswantrand < 3:
			'Anatoly Borisovich took a member of your pussy and uper it in your ass.'
			dynamic $boss_din_anal2
		end
	end
}

$boss_din_anal2 = {
	act 'Relax the anus':
		cls
		bosstipsex = rand(0, 10)
		$boy = 'Anatoly'
		dick = 12
		silavag = 0
		pose = 0
		gs 'stat'
		!!bossfuck
		'<center><img src="images/qwest/sosed/bossanal2.jpg"></center>'
		'You relax and feel like in your anus braced hard cock trying to push your sphincter.'
		dynamic $analsex
		!!dynamic $sexcum
		cumanus+= 1
		'<<$boy>> and groaned as you felt something in your ass was dispensed heat from the sperm.'
		'Finally Anatoly Borisovich took out your cock and the buttocks took it in his pants.'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2
	end
}

$din_Ivan_work = {
	if kompromatLife > 0 and kompromatBlackMail = 0:
		'Ivan grinned "<<$name>>, <<$name>>. I could not have imagined that such a cute girl, this rich life." he put the photo on your desk. You picked her up and looked. <<$kompromatFoto>>. Ivan gladly stretched like a cat caught the mouse "<<$name>> understand, everything would be fine, but our chief claim to a political career. And in politics it''s not just that his secretary loves to act in this way. He, too, will suffer." So, you can collect things and find new employment. "When Anatoly Borisovich know, you fly out of here with a bang."'
		dynamic $din_Ivan_work2

		act 'Keep silent':
			cls
			kompromatBlackMail = 1
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/sosed/work5.jpg"></center>'
			'Ivan seeing your silence frowned slightly. "Okay, baby, you will destroy the pride." Ivan got irritated and cleaned photo in his pocket.'

			if PSBBtimes = 1:dynamic $dinBistroWork
			if PSBBtimes = 2:dynamic $dinBistroWork2

			dynamic $din_Ivan_work2
		end
	end
}

$din_Ivan_work2 = {
	act 'Ivan plead not show these pictures':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/qwest/sosed/work5.jpg"></center>'
		'You began to plead not show pictures of Ivan boss. Ivan chuckled, "I see you are ready to cooperate.''ll Go to my office to discuss."'

		act 'Go with Ivan in his office':
			cls
			kompromatBlackMail = 2
			gs 'stat'
			'You came to the office of Ivan and he closed the door with a key. "Well baby, I want to start to look at you naked. Undress!"'

			act 'Undress':
				cls
				kompromatBlackMail = 2
				gs 'stat'
				'You undressed feeling the gaze of Ivan. When you were naked in front of him, he slowly walked across the room, staring at you. His hand took you for the chest and you feel his fingers covered your nipple. "Not bad, not bad. Maybe we''ll get along and. Now on your knees bitch and open your fucking mouth wide."'

				act 'Get on your knees and open your mouth':
					cls
					kompromatBlackMail = 2
					cumface += 1
					facial += 1
					boy += 1
					gs 'stat'
					'<center><img src="images/qwest/sosed/ivanfacial.jpg"></center>'
					'You knelt down and opened his mouth. Ivan got dick out of his pants and began to masturbate in front of your face, watching you with his gaze. "I knew you''d be my whore!" sperm from his cock splattered on your face. Then another and another jet. After Ivan finished on your face, he put his dick in his pants and said, "Okay, get out of my office slut, and do not forget, I do not report anything to the chief, but you are in my hands."'

					if PSBBtimes = 1:dynamic $dinBistroWork
					if PSBBtimes = 2:dynamic $dinBistroWork2
				end
			end

			dynamic $din_Ivan_work3
		end

		dynamic $din_Ivan_work3
	end
}

$din_Ivan_work3 = {
	act 'Refuse':
		cls
		kompromatBlackMail = 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/work7.jpg"></center>'
		'You refused to undress. Ivan sighed. "All the same, you stupid pussy, and I''m tired of messing with you, it is easier to get rid of you once and for all." Ivan went to the door, opened it, and pointed out to you at the door.'

		if PSBBtimes = 1:dynamic $dinBistroWork
		if PSBBtimes = 2:dynamic $dinBistroWork2
	end
}

$din_Ivan_work4 = {
	act 'Refuse':
		cls
		kompromatBlackMail = 1
		gs 'stat'
		'<center><img src="images/qwest/sosed/work7.jpg"></center>'
		'You refused. Ivan sighed. "All the same, you stupid pussy, and I''m tired of messing with you, it is easier to get rid of you once and for all." He turned and walked away'

		act 'Leave':gt 'down'
	end
}

--- BurgerTip ---------------------------------
# butik
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	clr
	*clr
	mag = 1
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Boutique</font></b></center>'
	'<center><img src="images/etogame/butik.jpg"></center>'
	'All kind of dresses, all at 25,000 rubles'

	act 'Leave the boutique':
		cla
		minut += 5
		gt 'torgcentr'
	end

	if rand(1, 100) >= 80 and skin > 0 and lesbiQW = 0:
		'In the boutique you see a stylish and slender woman ,with about forty years old.'

		act 'Stare at the woman.':gt 'event', 'lesbi'
	end

	if QWdogreiqTimer = 0 and QWdogReiq = 1 and week = 7 and qwdogiventday ! day:
		qwdogiventday = day
		'Going into the boutique you begin to consider picking dresses on hangers.By casually taking one you try it on in passing it on your back ,you hang with mild grim face.One of the dresses unexpectedly attracts your attention , as you began to study it more closely ,you feel a strange feeling as if you were being watched'

		act 'Disregard':gt 'butik', 'start'
		act 'Look around':dynamic $butikreiqdi

		exit
	end

	if RimmaSex > 0:
		if rimmaday ! day:
			'<a href="exec:gt ''RimmaSexQW''">Rima</a> smiled at you. She bits her lip and starts shooting her eyes in your direction.'
		else
			'Rima smiled at you and continued to do her business.'
		end
	end

	if palto < 3:
		'The boutique sells a fur coat for winter - 50,000 rubles'

		if money >= 50000:
			act 'Buy a fur coat (50,000 rubles)':
				cla
				money -= 50000
				palto = 3
				$palto = 'fur coat'
				'You bought a fur coat.'

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

	if money >= 25000:
		i = 1
		:loopdress
			if dress[i] = 0:dynamic 'act ''Look at dress <<i>>'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''dress'', <<i>>, 25000'
			i += 1
		if i <= 23:jump 'loopdress'
	end
end

--- butik ---------------------------------
# butoilet
minut += 5
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">WC</font></b></center>'
'<center><img src="images/etogame/PublicToilet.jpg"></center>'
''

if tanga = 1:
	act 'Remove Underwear':
		cla
		tanga = 0
		gt $curloc
	end
end

act 'Off the toilet':gt 'burger', 'start'

act 'Look in the mirror':
	cla
	gs 'portmirror'
	$gt1 = $curloc
	$gt2 = ''
	dynamic $portmirror

	act 'Move away from the mirror':
		cla
		gt $curloc
	end
end

!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
!!Removed sweat =- 1 when cum is wiped off clothes
!!clrbelo: Amount of clean panties available
if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
	act 'Quick wash (0:15)':
		cla
		*clr

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

		dynamic $showerdin
		sweat -= 1
		minut += 15
		'<center><img src="images/pics/wash5.jpg"></center>'
		'You gave yourself a catlick, thus removing any traces of cum.'

		act 'Finish':gt $curloc
	end
end

if cumlip > 0 or cumface > 0:
	act 'Clean your face from sperm (0:05)':
		cla
		*clr
		mop = 1
		cumlip = 0
		cumface = 0
		sweat -= 1
		minut += 5
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You clean your face and got rid of any trace of cum.'

		act 'Finish':gt $curloc
	end
end

if cumfrot > 0:
	act 'Wipe the cum off your clothes (0:10)':
		cla
		*clr
		cumfrot = 0
		minut += 10
		!!'<center><img src="images/etogame/frotsp.jpg"></center>'
		'You remove traces of semen from the clothes.'

		act 'Finish':gt $curloc
	end
end
!!

if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Use a tampon (0:05)':
		cla
		*clr
		tampon -= 1
		isprok = 1
		minut += 5
		manna -= 5
		'<center><img src="images/pics/wash3.jpg"></center>'
		'You use a tampon.'

		act 'Finish':gt $curloc
	end
end

--- butoilet ---------------------------------
# cfnm
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	horny += 5
	minut += 15
	money -= 50
	gs 'stat'
	'<center><img src="images/picVA/cfnm.jpg"></center>'
	'Stripper bared your breasts and began to lick your nipples.'

	if hour < 23:
		act 'Enjoy':gt 'cfnm', 'tits'
		act 'Hand touch his penis':gt 'cfnm', 'hand'
	end

	act 'Move away':gt 'stripclub', 'stolW'
end

if $ARGS[0] = 'tits':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	gs 'stat'
	'<center><img src="images/picVA/cfnm1.jpg"></center>'
	'Stripper sucking and biting your nipples.'

	if horny < 90:
		if hour < 23:
			act 'Enjoy':gt 'cfnm', 'eat'
			act 'Hand touch his penis':gt 'cfnm', 'hand'
		end

		act 'Move away':gt 'stripclub', 'stolW'
	elseif horny >= 90:
		act 'Surrender':gt 'cfnm', 'sex'
	end
end

if $ARGS[0] = 'hand':
	cla
	clr
	*clr
	horny += 5
	minut += 15
	fotoCFNMblowjob += 1
	gs 'stat'
	'<center><img src="images/picVA/cfnmHand.jpg"></center>'
	'You took stripper dick hand and began to fondle him in front of other girls.'

	act 'Take by mouth':gt 'cfnm', 'blow'
	act 'Stop':gt 'cfnm', 'eat'
end

if $ARGS[0] = 'eat':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	gs 'stat'
	'<center><img src="images/picVA/cfnm2.jpg"></center>'
	'Stripper you covered with a towel from the surrounding put his penis into your hand.'

	if horny < 90:
		if hour < 23:
			act 'Take by mouth':gt 'cfnm', 'blow'
			act 'Wank it':gt 'cfnm', 'hand'
		end

		act 'Escape from stripper':gt 'stripclub', 'stolW'
	elseif horny >= 90:
		act 'Surrender':gt 'cfnm', 'sex'
	end
end

if $ARGS[0] = 'blow':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	bj += 1

	if stripguy = 0: stripguy = 1 & guy += 1

	gs 'stat'
	'<center><img src="images/picVA/cfnmBlow.jpg"></center>'
	'You took in her mouth dick hidden from prying eyes for a towel stripper. Other girls interested hidden from their eyes and stripper removed the towel.'

	if horny < 90:
		if hour < 23:
			act 'Suck in front of everyone.':gt 'cfnm', 'blow2'
			act 'Stop sucking.':gt 'cfnm', 'hand'
		end

		act 'Escape from stripper':gt 'stripclub', 'stolW'
	elseif horny >= 90:
		act 'Surrender':gt 'cfnm', 'sex'
	end
end

if $ARGS[0] = 'blow2':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	fotoCFNMblowjob += 1
	gs 'stat'
	'<center><img src="images/picVA/cfnmBlow2.jpg"></center>'
	'Stripper removed the towel, you blushed with shame, but he continued to suck in front of the girls laughing at you.'

	if horny < 90:
		act 'Cum on face.':gt 'cfnm', 'blow4'
		act 'Cum in mouth.':gt 'cfnm', 'blow3'

		if DOM > 0:
			act 'Closing on the floor.':gt 'cfnm', 'end'
		end
	elseif horny >= 90:
		act 'Surrender':gt 'cfnm', 'sex'
	end
end

if $ARGS[0] = 'blow3':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	cumlip += 1
	swallow += 1
	!!cumface += 1
	!!facial += 1
	SUB += 1
	fotoCFNMblowjobCum += 1
	gs 'stat'
	'<center><img src="images/picVA/swallow.jpg"></center>'
	'Stripper takes dick out of your mouth and fingering it in front of your face, you stand humbly before him on his knees with his mouth open, finally landing viscous jet of sperm in your mouth, you licks and licks tart cum from his lips, you burned with shame when the surrounding spectators whooped you.'

	act 'Escape from stripper':gt 'stripclub', 'stolW'
end

if $ARGS[0] = 'blow4':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	!!cumlip += 1
	!!swallow += 1
	cumface += 1
	facial += 1
	SUB += 1
	fotoCFNMblowjobCum += 1
	gs 'stat'
	'<center><img src="images/picVA/facial.jpg"></center>'
	'Stripper takes dick out of your mouth and fingering it in front of your face, you stand humbly kneeling before him, finally viscous jet of sperm land you on the cheek, you blush with shame when the surrounding spectators whooped you.'

	act 'Escape from stripper':gt 'stripclub', 'stolW'
end

if $ARGS[0] = 'end':
	cla
	clr
	*clr
	horny += 10
	minut += 15
	!!cumlip += 1
	!!swallow += 1
	gs 'stat'
	'<center><img src="images/picVA/end.jpg"></center>'
	'You remove a member of the stripper from his face and he ends up on the floor.'

	act 'Escape from stripper':gt 'stripclub', 'stolW'
end

if $ARGS[0] = 'sex':
	cla
	clr
	*clr
	horny = 0
	minut += 15
	!!cumlip += 1
	!!swallow += 1
	!!cumface += 1
	!!facial += 1
	sex += 1
	cumass += 1
	SUB += 5
	fotoCFNMsex += 1

	if stripguy = 0:stripguy = 1 & guy + 1

	manna += 15
	willpower += 15
	orgasm += 1
	vagina += 1
	gs 'stat'
	'<center><img src="images/picVA/sex.jpg"></center>'
	'Stripper unfolds you and puts cancer, his cock ramming your expiring moisture pussy you instantly falls orgasm. You moan and screaming, the crowd whooped and stripper puts his fingers in your mouth, you chew them in ecstasy and finally stripper takes his dick out of you and you ends up on his ass.'

	act 'Escape from stripper':gt 'stripclub', 'stolW'
end

--- cfnm ---------------------------------
# club
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Night club</font></b></center>'
	'<center><img src="images/etogame/club.jpg"></center>'
	'The entrance area of the club is full of young people. The entrance itself is guarded by the heavy and strong type of men, who check everyones passport. A Ticket costs 500 rubles.'

	act 'Leave the club':
		cla
		minut += 5
		gt 'down'
	end

	if ski = 1 and money >= 500  and mop > 1 and sweat < 1 or glamur = 1 and money >= 500 and mop > 1 and sweat < 1:
		'You can feel his eyes all over your body, but eventually he nods and lets you inside.'

		act 'Enter the club (500 rubles)':
			cla
			minut += 5
			money -= 500
			frost = 0
			gt 'club', 'inside'
		end
	else
		'The bouncer shakes his head. He tells he won''t let you in and you have no idea why.'
	end
end

if $ARGS[0] = 'inside':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Night club</font></b></center>'
	'<center><img src="images/etogame/club9.jpg"></center>'
	'<a href="exec:gt ''club'', ''vip''">Vip-room.</a>'
	'The music here is loud and the bass bumping. You can see a laser show at the stage and on the poorly lit dancefloor you see the people dancing, like there''s no tomorrow.'

	if hour <= 3 or hour >= 15:
		act 'WC':gt 'club', 'toi'
		act 'Dancefloor':gt 'club', 'dance'
		act 'Bar':gt 'club', 'bar'
	end

	act 'Leave the club':
		cla
		drunk = 0
		minut += 5
		gt 'down'
	end
end

if $ARGS[0] = 'toi':
	cla
	*clr
	'Shit, there''s a very long queue infront of the womens toilet. You can''t tell how long this is going to take.'

	act 'Wait in line':
		cla
		minut += rand(10, 30)
		vnesh += 1
		'Finally there''s a free booth for you.'

		act 'WC':gt 'club', 'tou'
	end

	act 'Go to the mens toilet':
		cla
		acta += 1
		'You slip unnoticed into the mens toilet room.'

		act 'Go into a free booth':
			randbj = rand(1, 100)

			if TQuest = 0 and horny < 50:gt 'club', 'tou'
			if TQuest = 0 and horny >= 50:gt 'Club2', 'toilet'
			if TQuest = 1:gt 'Club2', 'toilet1'
			if TQuest = 2:gt 'Club2', 'toilet2'
			if TQuest >= 3 and randbj < 60:gt 'club', 'tou'
			if TQuest >= 3 and randbj >= 60:gt 'Club2', 'toilet1'
		end
	end

	act 'Go back to the dancefloor':gt 'club', 'inside'
end

if $ARGS[0] = 'tou':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img src="images/etogame/club3.jpg"></center>'
	''

	act 'Get off the toilet':gt 'club', 'inside'

	if tanga = 1:
		act 'Remove your underwear':
			cla
			tanga = 0
			gt 'club', 'toi'
		end
	end

	act 'Look into the mirror':
		cla
		gs 'portmirror'
		$gt1 = 'club'
		$gt2 = 'tou'
		dynamic $portmirror

		act 'Move away from the mirror':
			cla
			gt 'club', 'tou'
		end
	end

	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

			act 'Finish':gt 'club', 'tou'
		end
	end

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

			act 'Finish':gt 'club', 'tou'
		end
	end

	if cumfrot > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumfrot = 0
			minut += 10
			'<center><img src="images/etogame/frotsp.jpg"></center>'
			'You use a tissue and a bit of water to remove cum stains in your clothes. '

			act 'Finish':gt 'club', 'toi'
		end
	end
	!!

	if tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut += 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use the tampon.'

			act 'Finish':gt 'club', 'tou'
		end
	end
end

if $ARGS[0] = 'dance':
	cla
	clr
	*clr
	gs 'stat'
	'<center><b><font color="maroon">The dance floor</font></b></center>'
	'<center><img src="images/etogame/club9.jpg"></center>'
	'The club is filled to the brink with people. Most of which are dancing on the dancefloor.'

	act 'Leave':gt 'club', 'inside'

	if hour <= 3 or hour >= 16:
		act 'Dance (0:30)':
			cla
			*clr
			minut += 30
			fat -= 1
			dance += 1
			manna += 10
			willpower += 10
			clrand = rand(0, 100)
			frost = 0
			'<center><img src="images/etogame/club4.jpg"></center>'
			'On the dance floor very closely, you can put a hand on his shoulder one guy to make a couple of steps and pressed her chest already to another, and in the dance, how much one can do in dance.'

			if vnesh >= clrand:
				horny += 1
				gs 'boy'
				'While you''re dancing you feel that someone is groping your ass, you turn around and see <<$boybody>> <<$boybod>> <<$boyface>>. He''s <<$boyClo>>'

				act 'Dance with him':
					cla
					*clr
					minut += 30
					dance += 1
					horny += 1 + SUB
					'<center><img src="images/etogame/club8.jpg"></center>'
					'You continue to dance with the guy on the dancefloor, but he doesn''t stop touching your. It somehow gets you excited, when a random guy is touching you in public.'

					if horny < 90:
						act 'Go to the dance floor':gt 'club', 'dance'
					end

					act 'Kiss':
						cla
						minut += 15
						horny += 1 + SUB
						dansexclub = rand(0, 1)

						if dansexclub = 1:
							'You''re passionately kissing the guy, while he''s continously groping you, always dedicating one of his hands to either your tits or your ass. "Why don''t we go to the VIP-Area. There we''ll have a bit more privacy.", he says inbetween kisses.'
							picrand = 38

							if horny < 70:
								act 'Go to the dance floor':gt 'club', 'dance'
							end

							act 'Go to Vip-room with the guy':xgt 'sex', 'var'
						elseif dansexclub = 0:
							'You''re passionately kissing the guy, while he''s continously groping you, always dedicating one of his hands to either your tits or your ass. "Let''s go to the toilet.", he says with a smile.'

							if horny < 70:
								act 'Go to the dance floor':gt 'club', 'dance'
							end

							act 'Go to the toilet with a guy':gt 'club', 'sex'
						end
					end
				end

				if clrand > 85:
					cla
					*clr
					'<center><img src="images/img/centr/dancelezb.jpg"></center>'
					'While you''re dancing you a hand groping your ass. You turn around to see who touched your, but you''re surprised to see women smiling at you, she seems to be biting her lips.'
					dansexclub = rand(0, 1)

					if dansexclub = 0:
						act '"Let''s go to the toilet, to have fun."':gt 'club', 'lezbsort'
					elseif dansexclub = 1:
						picrand = rand(13, 17)

						act '"Let''s go to VIP-Room, to have fun."':xgt 'lezbsex', 'var'
					end

					act 'Send it':gt 'club', 'inside'
				end
			end

			act 'Go away':gt 'club', 'dance'
		end

		act 'Go up to the DJ (0:30)':
			cla
			*clr
			minut += 30
			'<center><img src="images/etogame/club7.jpg"></center>'

			if alexeyQW = 0:'The DJ does not pay you any attention.'
			if alexeyQW > 0 and alexeySex = 0:
				'Alexei looks up and smiles at you, he recognizes you from the vocal school.'
			elseif alexeyQW > 0 and alexeySex > 0:
				'As Alexei sees you, he invites you into his DJ booth.'

				act 'Go into the booth':
					cls
					minut += 30
					gs 'stat'
					'<center><img src="images/etogame/club7.jpg"></center>'
					'Alexei barely talks to you as he''s only paying attention to the music.'

					if alexeyClubSex = 3 and sashaClubQW = 0:
						sashaClubQW = 1
						'Into the booth came a man, who seems to be somewhere in forties. He has a large belly, has a bald head and is wearing glasses. Alexei greeted him and introduced you to him, his name is Alexander E. and he''s the owner of the club.'
						'Alexander had a small talk with Alexei, then he left again.'

						act 'Leave the booth':gt 'club', 'dance'

						exit
					end

					if alexeyClubSex ! 3 or sashaClubQW > 0:
						act 'Leave the booth':gt 'club', 'dance'

						act 'Get on your knees and give him a BJ':
							cls
							alexeySex += 1
							alexeyClubSex += 1
							horny += 10
							bj += 1
							minut += 10
							gs 'stat'
							picrand = rand(1, 14)
							'<center><img src="images/qwest/alexey/bj<<picrand>>.jpg"></center>'
							'You kneel down and wrap your <<$liptalk>> around his cock and you begin to suck on it. Alexei helped by moving his hips back and forth, you notice his moving is in sync to the beat of the music he''s playing. After a few minutes he groans, "You better swallow it all, I don''t want anyone to clean up our mess."'
							gs 'oral', '0'

							act 'He''s cumming':
								cls
								horny += 10
								minut += 10
								swallow += 1
								cumlip += 1
								gs 'stat'
								picrand = rand(1, 14)
								'<center><img src="images/qwest/alexey/bjcum<<picrand>>.jpg"></center>'
								'Streams of sperm hit you in the mouth and began to run down your <<$liptalk>>. Alexei wiped his dick on your <<$liptalk>> and put it away in his pants.'
								'You began greedily to swallow his warm cum and use your finger to collect the drips, that escaped your mouth, then lick your finger clean. Once you''ve swallowed every last drop, you stand up again and thank him for this tasty snack.'

								act 'Leave the booth':gt 'club', 'dance'
							end
						end
					end
				end
			end

			act 'Leave the booth':gt 'club', 'dance'
		end
	end
end

if $ARGS[0] = 'bar':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">bar</font></b></center>'
	'<center><img src="images/etogame/club10.jpg"></center>'
	'You have to squeeze yourself through the crowd to get to the bar. On your way, random guys try to lay their hands around you, try to convince you into dancing or drinking with them, some even try to grope your tits or ass and some play the white knight and try to get your attention by protecting you.'

	if vnesh > 14:barsexrand = rand(0, 10)
	if barsexrand = 1:gt 'club', 'bar0'
	if barsexrand = 2:gt 'club', 'bar1'

	act 'Go back':gt 'club', 'inside'

	if alko >= 7:
		cls
		temp = rand(0, 100)

		if temp = 5:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club1.jpg"></center>'
			'You''re so drunk, you can barely remember where you live.'

			act 'Try to go home':gt 'street'

			exit
		elseif temp = 6:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club2.jpg"></center>'
			'The last thing you remember is how you sucked the cock of one of the male strippers.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 7:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand4.jpg"></center>'
			'The last thing you remember, is how you sucked someones cock in the middle of the dancefloor.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 8:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club5.jpg"></center>'
			'The last thing you remember, is how you tried to pose as a waitress.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 9:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand6.jpg"></center>'
			'The last thing you remember, is a sex scene at the tables, where a girl is bent over one and fucked by a guy from behind.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 10:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand7.jpg"></center>'
			'You see a small group of girl loosing it on the dancefloor. They''re moving like there''s no tomorrow.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 11:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand8.jpg"></center>'
			'You see two hot girls passionately kissing each other.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 12:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand9.jpg"></center>'
			'The last thing you remember, is a girl who crawled under a table, because she probably dropped her phone. But her skirt moves up and reveals her bare naked ass and the fact that she didn''t put on any panties.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 13:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand10.jpg"></center>'
			'You notice a women who is giving a guy a blowjob, then the women opens her mouth, with the cock in her hand and the guy pours champangne into her mouth.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 14:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand11.jpg"></center>'
			'You happen to notice a small group of drunken girls giggling. One of which is fingering the pussy of another girl.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 15:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand12.jpg"></center>'
			'The last thing you can remember is dancing closely with a black guy, with his hands on your hips.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 16:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club13.jpg"></center>'
			'The last thing you remember, is how you tried to dance with a random guy.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 17:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club14.jpg"></center>'
			'The last thing you remember, is how you undressed and danced half naked in front of everyone.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 18:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand15.jpg"></center>'
			'You see a guy and a girl on the dancefloor kissing each other. The guy however uses one of his hands to have some fun with the girls pussy.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 19:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand16.jpg"></center>'
			'You can see a drunken girl spreading her legs on one of the bar stools, she''s not wearing any panties and the bloke next to her takes the opportunity and fingers the girl.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 20:
			horny += 5
			gs 'stat'
			'<center><img src="images/picKav/ivrand17.jpg"></center>'
			'You can see a guy hugging and kissing a drunken girl, while another guy sucks on her exposed tits.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 21:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club21.jpg"></center>'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 22:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club22.jpg"></center>'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 23:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club23.jpg"></center>'
			'You''re so drunk that you fell asleep on the spot. A man from the security had to wake you up and escorted you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp = 24:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club24.jpg"></center>'
			'The last thing you''re able to remember is, that used the mens bathroom to pee.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'down'

			exit
		elseif temp > 24:
			horny += 5
			gs 'stat'
			'<center><img src="images/etogame/club25.jpg"></center>'
			'You''re so drunk that you fell asleep on the spot. A man from the security had to wake you up and escorted you out.'

			act 'Leave':gt 'down'

			exit
		end
	end

	if money >= 300:
		act 'Buy a drink (300 rubles)':
			cla
			*clr
			minut += 30
			fat += 1
			manna += 10
			willpower += 10
			alko += 2
			water += 5
			energy += 5
			son += 5
			horny += rand(10, 50)
			money -= 300
			frost = 0
			'<center><img src="images/etogame/club6.jpg"></center>'
			'You found a free bar stool and sat down on it. You ordered the barkeeper to mix you a cocktail and a few moments later, you sipping on a sweet one.'

			act 'Stand up':gt 'club', 'bar'
		end
	end
end

if $ARGS[0] = 'sex':
	cla
	clr
	*clr
	dynamic $venerasiak
	minut += 5
	$nameV = 'Stranger'
	dick = rand(10, 18)
	gs 'stat'
	'<center><b><font color="maroon">toilet stall</font></b></center>'
	'<center><img src="images/etogame/sex.jpg"></center>'
	'You went with the guy to the mens toilet and he dragged you into one of the free booths. He started to caress your breats and pussy, then helped you getting rid of the clothes.'

	act 'Give him a blowjob':
		cla
		*clr
		bj += 1
		guy += 1
		horny += VAF
		'<center><img src="images/picV/clubBJ.jpg"></center>'
		gs 'oral', 'start'

		act 'Take his cock out of your mouth':
			cla
			*clr

			if harakBoy = 0:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'
			elseif harakBoy = 1:
				act 'Point his cock at the floor':
					cla
					'<center><img src="images/picV/hand.jpg"></center>'
					'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'

					act 'Stand up':gt 'club', 'toi'
				end

				act 'Let him cum on your face':
					cla
					facial += 1
					cumface += 1
					'<center><img src="images/picV/clubFacial1.jpg"></center>'
					'You grabed his cock and point his "gun" at your face. He groans as he cums and you can feel hot streams of semen covering your face.'

					act 'Stand up':gt 'club', 'toi'
				end

				exit
			elseif harakBoy = 2:
				facial += 1
				cumface += 1
				SUB += 1
				'<center><img src="images/picV/clubFacial.jpg"></center>'
				'The bloke grabs your hair and cums on your face. You quickly close your eyes, but it''s too late, a few drips of semen make it into your eyes. It hurts a bit.'
			end

			act 'Stand up':gt 'club', 'toi'
		end

		act 'Swallow his cum':
			cla
			*clr
			swallow += 1
			cumlip += 1
			'<center><img src="images/picV/clubSwallow.jpg"></center>'
			'The guy came in your mouth, you can feel his hot and salty semen pouring into it. Without hesistation you swallow it, you can''t tell why, but somehow you start to enjoy the taste of fresh, warm sperm.'

			act 'Stand up':gt 'club', 'toi'
		end
	end

	act 'Doggy-Style':
		cla
		*clr
		sex += 1
		guy += 1
		horny += SUB
		vagina += 1
		'<center><img src="images/picV/clubSex.jpg"></center>'
		'You turn around and kneel on the toilet seat. "Fuck me", you say and present your ass and pussy to him.'
		'You don''t have to tell him twice, he grabs your hips, positions his cock infront of your pussy and with a strong push he enters your vagina. You moan with pleasure and you are surprised by the sheer force he used to enter you.'
		'He grunts heavy as he fucks you like the bitch in heat that you are. He continues with force and speed, if he''s slowing down, you can''t notice it, but it doesn''t take long and both of you are reaching the state of orgasm.'
		'You look at him, "Don''t you dare to cum inside.". In between his grunts he nods and a few seconds later he cums outside of you, you are relived that he at least acts a bit like a gentleman.'
		gs 'orgazm', 'start'

		act 'Stand up':gt 'club', 'toi'
	end
end

if $ARGS[0] = 'bar0':
	cla
	*clr
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img src="images/img/centr/bar0.jpg"></center>'
	'As you sit at the bar, a woman walk up to you and begins to chat with you.'
	'During the conversation you get the feeling that she''s flirting with you and before you even can react, her hands wander over your body, giving you a sensational feeling.'

	act 'Move away from her':gt 'club', 'bar'

	act 'Kiss her':
		cla
		*clr
		'<center><img src="images/img/centr/bar1.jpg"></center>'
		'Her flirting works on you. You move closer to her and begin to kiss her. At first, it feels weird for you, kissing a random woman that is, but it doesn''t take long for the kissing to move for awkward to passionately..'

		act 'Tell her to meet at the toilet':gt 'club', 'lezbsort'

		act 'Strip her':
			cla
			*clr
			lesbian += 1
			girl += 1
			'<center><img src="images/img/centr/bar2.jpg"></center>'
			'You remove her top and begin to caress and kiss her breasts. You suck on her nipples while your hand unbuttons her pants and slip your hand in to get a feel for her pussy. You are a bit surprised to find an already moistened pussy.'

			act 'Lick her pussy':
				cla
				*clr
				'<center><img src="images/img/centr/bar3.jpg"></center>'
				'"Wait a second, let me help you with my pants.", she says, panting softly into your ear, while she drops her pants. Then she sat down on a bar stool and you moved her panty aside and began to lick her womanly folds.'
				'Moments later, she moans heavy and cums. You look up to her and giggle softly. "Why don''t we switch and I make you feel good now?", she says, still panting heavy.'

				act 'Switch positions':
					cla
					*clr
					horny = 0
					'<center><img src="images/img/centr/bar4.jpg"></center>'
					'You stand up and she goes down on you, starting to lick your flower and sticking two fingers into your now wet cunt. She''s very skilled with her tongue and it takes her only minutes to make you cum.'
					'You''re blissfully smiling at her. "Thank you.", you say to her..'

					if dildo = 0:
						cla
						*clr
						'Now that the adrenalin fades away again, both you begin to blush as you notice, that the people around you stare at you. Both of you quickly dress-up again and go parted ways.'

						act 'Leave':gt 'club', 'inside'
					elseif dildo > 0:
						act 'Get dildo':
							cla
							*clr
							'<center><img src="images/img/centr/bar5.jpg"></center>'
							'She chuckles, "Ohh you think we''re done? I saw that you carry dildos with you." You blush and nod. "Use them.", she tells you.'
							'You take out your dildos, inserting one into her still wet pussy and one into your own wet cunt, you turn on their vibrations function and move them in and out, both of you are once again panting heavy.'

							act 'Give her one':
								cla
								*clr
								horny = 0
								orgasm += 1
								'<center><img src="images/img/centr/bar6.jpg"></center>'
								'You both stand up and use a dildo to move it in and out of each others pussy. She moves close to you and begins kissing you. Your feelings are overflowing and both of you come together at the same time.'
								'Now that the adrenalin fades away again, both you begin to blush as you notice, that the people around you stare at you. Both of you quickly dress-up again and go parted ways.'

								act 'Leave':gt 'club', 'inside'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'bar1':
	cla
	*clr
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img src="images/img/centr/bar7.jpg"></center>'
	'While you sit on one of the bar stools a man comes to and grabs on of your ass cheeks. "Why don''t we both have some fun together, huh?", the bloke says and you can hear, that he had more than one beer.'

	act 'Send':
		if drunk < 4:gt 'club', 'bar'
		if drunk >= 4:gt 'club', 'rape'
	end

	if DOM > 10:
		act 'Tell him to lick you':
			cla
			*clr
			kuni += 1
			'<center><img src="images/img/centr/barkuni.jpg"></center>'
			'"Sure", you say with a witty smile, "Why don''t you lick my pussy?" You stand up, remove your panties and bend over the stool. "Go on, what are you waiting for.", you tell him.'
			'He kneels down and begins to move his tongue between your folds. You immediately begin to moan softly. You close your eyes and admit to yourself, that he''s not half bad at it.'

			act 'Turn him down':gt 'club', 'bar'
			act 'Suck his cock':gt 'club', 'bar2'
			act 'Let him fuck you':gt 'club', 'bar3'
		end
	end

	act 'Blow job':gt 'club', 'bar2'
	act 'Post':gt 'club', 'bar3'
end

if $ARGS[0] = 'bar2':
	cla
	*clr
	dynamic $venerasiak
	bj += 1
	guy += 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img src="images/img/centr/barminet.jpg"></center>'
	'You bend over, unbutton his pants and take out his cock. You bite your lips in anticipation and start to suck on it with your <<$liptalk>>. He''s moaning and smiling at the fact, that a random girl at a club is giving him a header.'

	act 'Post':gt 'club', 'bar3'

	act 'Continue to suck':
		cla
		*clr
		cumlip += 1
		'<center><img src="images/img/centr/barcum.jpg"></center>'
		'You suck his cock for a few minutes and not long after, he grabs and holds your head and presses you against his crotch as he cums inside your mouth. You gag a few seconds, then feel his hot cum flowing into you and you swallow every drip of his semen.'
		'He takes his cock out and a few drips of cum land on your chin. You use your fingers to clean it up, then lick them clean. Both of you smile at each other and he eventually thank you, zips-up his pants and moves away.'

		act 'Move away':gt 'club', 'inside'
	end
end

if $ARGS[0] = 'bar3':
	cla
	*clr
	sex += 1
	cumpussy += 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img src="images/img/centr/barsex.jpg"></center>'
	'You remove your panties and sit down sideways on one of the stools. The guy unzips his cock and quickly enters your pussy. Both of you start to moan in pleasure and he kisses your neck gently. About ten minutes later of rough fucking he cums on your ass check and you pull up your panties, still breathing heavy.'

	act 'Leave':gt 'club', 'inside'
end

if $ARGS[0] = 'rape':
	cla
	*clr
	dynamic $venerasiak
	SUB += 5
	rape += 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	barraperand = rand(0, 1)

	if barraperand = 0:
		bj += 1
		'<center><img src="images/img/centr/barminet.jpg"></center>'
		'The guy notices you being heavily drunk and you couldn''t resits anything right now. He orders you to unbutton his pants, take out his cock and begin to suck on it. He grabs your hair and forces your to deepthroat it.'

		act 'Further':
			barraperand1 = rand(0, 1)

			if barraperand1 = 0:
				cla
				*clr
				cumlip += 1
				cumface += 1
				'<center><b><font color="maroon">Bar</font></b></center>'
				'<center><img src="images/img/centr/barcum.jpg"></center>'
				'A few minutes later he is finally done and pushes your head against his crotch, forcing you to swallow his cum. You can''t help but to enjoy the tase of his semen in your mouth.'

				act 'Leave':gt 'club', 'inside'
			elseif barraperand1 = 1:
				cla
				*clr
				sex += 1
				cumpussy += 1
				'<center><b><font color="maroon">Bar</font></b></center>'
				'<center><img src="images/img/centr/barsex.jpg"></center>'
				'The bloke takes his cock out of your mouth, tells you postion yourself in the stool and then he begins to fuck you roughly. As you''re drunk you barely register anmything, but you catch yourself moaning heavy. Not even ten minutes laters he takes his cock out of your pussy and cums on your ass.'

				act 'Leave':gt 'club', 'inside'
			end
		end
	elseif barraperand = 1:
		sex += 1
		cumpussy += 1
		'<center><img src="images/img/centr/barsex.jpg"></center>'
		'You are trying to send it, but your tongue drunk guy is braided and seeing that you are not able to resist, pulls out his cock turns you on a stool and saliva-moistened member enters your vagina, it tears you to force shoving his dick as deep as possible, and finally finishing the leaves.'

		act 'Leave':gt 'club', 'inside'
	end
end

if $ARGS[0] = 'lezbsort':
	cla
	*clr
	dynamic $venerasiak
	girl += 1
	lesbian += 1
	minut += 10
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img src="images/img/centr/lezbsort.jpg"></center>'
	'She follows you into the womens bathroom and you lure her into one of the empty booths.'

	act 'Lick her':gt 'club', 'lezbsort1'
	act 'Tell her to lick you':gt 'club', 'lezbsort2'
	act 'Leave her':gt 'club', 'tou'
end

if $ARGS[0] = 'lezbsort1':
	cla
	*clr
	minut += 10
	horny = 0
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img src="images/img/centr/sortukuni.jpg"></center>'
	'You remove her pants and sit down on the toilet. She happily does as you told her. She spreads her legs and you begin to lick her cunt furiously. She moans heavily and plays with her erect nipples. Some time later you make cum.'

	if hour >= 15 or hour <= 3:act 'Now it''s your turn':gt 'club', 'lezbsort2'

	act 'Leave her':gt 'club', 'tou'
end

if $ARGS[0] = 'lezbsort2':
	cla
	*clr
	minut += 10
	horny = 0
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img src="images/img/centr/sortkuni.jpg"></center>'
	'You sit donw on the toilet and move your feet up. "Lick it", you tell her. She seductively bites her lips and happily follows your orders. The woman parts your pussy lips and begins to lick your cunt. Every so often she switches between licking your pink flesh and your flower. She doesn''t stop until you cry out in pleasure and cum.'

	if hour >= 15 or hour <= 3:act 'Lick her':gt 'club', 'lezbsort1'

	act 'Leave her':gt 'club', 'tou'
end

if $ARGS[0] = 'vip':
	if vipcart = 0 and vipday ! day:
		'A security guard stops you from going any further. "I''m sorry, I can''t let your through, because you don''t own a VIP-Card. You can buy one for 10.000 rubles, which will be good for 10 visits."'

		if money >= 10000:
			act 'Buy a VIP-Card (10,000 rubles)':
				money -= 10000
				vipcart = 10
				vipday = day
				gt 'vipclub', 'start'
			end
		end
	elseif vipcart > 0 and vipday ! day:
		act 'Go to the VIP-Area':
			vipcart -= 1
			vipday = 1
			vipday = day
			gt 'vipclub', 'start'
		end
	end

	if vipday = day:act 'Go back the main area':gt 'vipclub', 'inside'

	act 'Leave him be and go away':gt 'club', 'inside'
end

--- club ---------------------------------
# danceclass
clr
minut += 5
razdtumbler = 0
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Dance Class</font></b></center>'
'<center><img src="images/etogame/danceclass.jpg"></center>'
'Modern room with good lighting and mirrors for the development of dance skills.'

act 'Modern club dancing (2:00)':
	cla
	*clr
	minut += 120
	fat -= 5
	speed+= rand(1, 3)
	manna -= 5
	sweat += 3
	dance += rand(5, 15)
	'<center><img src="images/etogame/fit1.jpg"></center>'

	if dance < 100:'You studied modern dance club, which is very popular in discos.'
	if dance >= 100:'Podcherpnut you tried something new in modern club dancing, but you all already know it.'

	act 'Leave':gt 'fit', 'razd'
end

act 'Striptease (2:00)':
	cla
	*clr
	minut += 120
	fat -= 5
	agil+= rand(1, 3)
	manna -= 8
	sweat += 3
	!!stripdance += 1
	'<center><img src="images/etogame/stripdance.jpg"></center>'

	if dance >= 100:
		stripdance += rand(2, 10)
		'You studied passionately razdevatsya dance music.'

		if stripdance >= 100:'But you could not learn anything new, it''s all you have and know how well you know.'
	elseif dance < 100:
		dance += rand(5, 15)
		'Striptease for you too complicated, you can not perform the dance moves combining them strip. Teacher recommends that you first learn ordinary club dances.'
	end

	act 'Leave':gt 'fit', 'razd'
end

act 'Dancing on a pole (2:00)':
	cla
	*clr
	minut += 120
	fat -= 10
	stren+= rand(1, 3)
	vital += rand(1, 3)
	manna -= 5
	sweat += 3
	!!poledance += 1
	'<center><img src="images/etogame/poledance.jpg"></center>'

	if dance >= 100 and stripdance >= 100 and stren >= 80:
		poledance += rand(2, 5)
		'You studied various acrobatics on the pole.'

		if poledance >= 100:'But you could not learn anything new, it''s all you have and know how well you know.'
	elseif dance < 100 or stripdance < 100 or stren < 80:
		'Already in the first exercise, you crashed with a pole. It seems this kind of dance you until the teeth'

		if stren < 80:'The teacher explained that you dance on the pole, except the ability to dance, and still requires physical strength.'
	end

	act 'Leave':gt 'fit', 'razd'
end

--- danceclass ---------------------------------
# dorm
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">share</font></b></center>'
	'<center><img src="images/etogame/dorm.jpg"></center>'

	if student > 0:
		act 'Stop by':
			cla
			minut += 5
			reccoldorm = 1
			gt 'dorm', 'korr'
		end
	elseif reccoldorm < 1 and student = 0:
		act 'Try to go':
			cla
			minut += 5
			gt 'dorm', 'in'
		end
	end

	act 'Leave':
		cla
		minut += 5
		reccoldorm = 0
		gt 'down'
	end
end

if $ARGS[0] = 'in':
	cla
	*clr
	gs 'stat'

	if student =0:
		'You do not have the student refuses vahtersha and you miss.'

		act 'Leave':gt 'down'

		if afra > 0:
			act 'Visit DeMarcus':
				cla
				'You said that you are here to see DeMarcus. Vahtersha chuckled, "Whore, sleeping with niggers, go jump on his black cock"'
				reccoldorm = 1

				act 'Sign in':gt 'dorm', 'korr'
			end
		end

		if gosh > 0:
			act 'Visit Goshi':
				cla
				'You said that you are here to see Goshin. Vahtersha chuckled, "Goshi''s next Bitch? Mozglyak Yes this is all fucked dorm now slut themselves go to him. Heh, go to your stud, bitch."'
				reccoldorm = 1

				act 'Sign in':gt 'dorm', 'korr'
			end
		end
	end
end

if $ARGS[0] = 'korr':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	clr
	*clr
	gs 'stat'
	'<center><img src="images/img/centr/obkorr.jpg"></center>'
	'Before you is a usual hostel hallway with dilapidated walls, out of some rooms music and the yelling of drunken students is heard.'

	act 'Leave':
		cla
		minut += 5
		reccoldorm = 0
		gt 'down'
	end

	if student > 0:
		act 'Your room':gt 'obroom', 'start'

		act 'Go to the shared kitchen':
			minut += 5
			gt 'obkitchen'
		end

		act 'Go to the shared bathroom':
			minut += 5
			obdysh = 1
			gt 'vann', 'start'
		end
	end

	if student > 0 and week = 5 and hour > 18 and hour < 23:
		'In the corridor rumbles music it seems the Friday party is in full swing.'

		act 'The party':gt 'vecher', 'start'
	end

	if afra > 0 and hour < 22 and hour >= 7:
		act 'DeMarcus room':
			cla
			afrand = rand(1, 2)

			if afrand = 1:
				minut += 5
				gs 'stat'
				'You knocked on the door, but he is not there.'

				act 'Leave':gt 'dorm', 'korr'
			elseif afrand = 2:
				*clr
				'You knocked on the door. After a couple of seconds the door opened and you see a large African. He smiled when he saw your snow-white smile and invited you to his room. There he quickly cleared a quite luxurious table for a student and invited you to sit at the table.'

				act 'Drink with DeMarcus':
					cls
					minut += 120
					gs 'stat'
					'You drank wine with DeMarcus and he began to grope your the chest. Then he raised your T-shirt and began to suck your nipples and play with your breasts, you become very wet.'
					afrand = rand(1, afra)

					if afrand = 1:
						if demarkus = 0:guy += 1 & demarkus = 1

						sex += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra.jpg"></center>'
						'DeMarcus lays you on the bed, and pulls out his huge black cock. Spreading your legs apart he enters your pussy.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your stomach.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 2:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						!!anal += 1
						!!cumlip += 1
						!!cumface += 1
						!!cumbutt += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra1.jpg"></center>'
						'DeMarcus lays you on the floor, and pulls out his huge black cock. Spreading your legs apart he enters your pussy.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your stomach.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 3:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						!!anal += 1
						!!cumlip += 1
						!!cumface += 1
						!!cumbutt += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra2.jpg"></center>'
						'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and spreads apart yoru ass cheeks before pushing his thick cock into your pussy.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 4:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						anal += 1
						!!cumlip += 1
						!!cumface += 1
						cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						anus += 1
						'<center><img src="images/pics2/afra4.jpg"></center>'
						'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and spreads apart yoru ass cheeks before pushing his thick cock into your asshole.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 5:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						!!anal += 1
						!!cumlip += 1
						!!cumface += 1
						!!cumbutt += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra24.jpg"></center>'
						'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and salms into your pussy stretching it to the limit.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 6:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						anal += 1
						!!cumlip += 1
						!!cumface += 1
						cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						anus += 1
						'<center><img src="images/pics2/afra16.jpg"></center>'
						'DeMarcus pushes you face down on the bed and pulled out his huge black cock. Spreading your legs apart he enters your asshole.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 7:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						anal += 1
						!!cumlip += 1
						!!cumface += 1
						cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						anus += 1
						'<center><img src="images/pics2/afra13.jpg"></center>'
						'DeMarcus lays on he bed and easily picks you up and you pushes your asshole down on his huge black cock.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 8:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						anal += 1
						!!cumlip += 1
						!!cumface += 1
						cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						anus += 1
						'<center><img src="images/pics2/afra20.jpg"></center>'
						'DeMarcus lays on the bed, you stradle him and force your asshole down on his huge black cock.'
						'You ride his thick cock unitl you orgasm a few times on his cock. He cums inside you and passes out.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 9:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						!!anal += 1
						!!cumlip += 1
						!!cumface += 1
						!!cumbutt += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra11.jpg"></center>'
						'DeMarcus lays on he bed and easily picks you up and you pushes your pussy down on his huge black cock.'
						'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 10:
						throat += 1
						sex += 1
						oral += 1
						cumface += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra3.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 11:
						throat += 1
						sex += 1
						oral += 1
						cumface += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra10.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 12:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						cumface += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra14.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 13:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra18.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 14:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra23.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 15:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra31.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 16:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra32.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 17:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra33.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 18:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra34.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 19:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra35.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 20:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra36.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 21:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra37.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 22:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra38.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 23:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra39.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 24:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra40.jpg"></center>'
						'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand = 25:
						throat += 1
						!!guy += 1
						sex += 1
						oral += 1
						!!anal += 1
						!!cumlip += 1
						cumface += 1
						!!cumbutt += 1
						!!cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						VAF += 1
						'<center><img src="images/pics2/afra41.jpg"></center>'
						'DeMarcus pushes you to your knees and you wrap your lips arround his huge black cock.'
						'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'

						act 'Leave':gt 'dorm', 'korr'
					elseif afrand >= 26:
						!!throat += 1
						!!guy += 1
						sex += 1
						!!oral += 1
						!!anal += 1
						!!cumlip += 1
						!!cumface += 1
						!!cumbutt += 1
						cumass += 1
						horny = 0
						afra += 1
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/afra42.jpg"></center>'
						'DeMarcus lays you on the bed, and pulls out his huge black cock. Spreading your legs apart he slams ino your pussy.'
						'While DeMarcus brutal pounds you wiht his member, you orgasm a few times on his dick, and then he puls out cums on you abused pussy.'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			end
		end
	end

	if afra > 10 and hour >= 8 and hour < 22:
		act 'Room African students':
			cls
			minut += 5
			gs 'stat'
			afrand = rand(1, 2)

			if afrand = 1:
				'You knocked on the door, but there was no answer.'
				act 'Leave':minut += 5 & gt 'dorm', 'korr'
			elseif afrand = 2:
				minut += 120

				if afragang = 0:afragang = 1 & guy += 6

				hour += 2
				gs 'stat'
				'You knocked on door and are greeted by a black giant. He grabs you by the arm and drags you into the room in which you see five Africans. They surrounded you and start to grab for your breasts and ass. The only words you understand are Cumdump, whore, white trash, bimbo slut.'
				afrand = rand(1, afra)

				if afrand = 1:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					afra += 1
					vagina += 1
					orgasm += 1
					'<center><img src="images/pics2/afra5.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 2:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					afra += 1
					vagina += 1
					orgasm += 1
					'<center><img src="images/pics2/afra6.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 3:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					afra += 1
					vagina += 1
					orgasm += 1
					'<center><img src="images/pics2/afra7.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 4:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra8.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 5:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra9.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 6:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra12.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 7:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra17.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 8:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra19.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns..'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 9:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra21.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 10:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra22.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 11:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra25.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand = 12:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra26.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				elseif afrand >= 13:
					throat += 1
					sex += 1
					oral += 1
					gang += 1
					anal += 1
					cumlip += 2
					cumface += 2
					cumbutt += 1
					cumass += 1
					horny = 0
					vagina += 1
					afra += 1
					orgasm += 1
					'<center><img src="images/pics2/afra27.jpg"></center>'
					'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
					'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'

					act 'Leave':gt 'dorm', 'korr'
				end
			end
		end
	end

	if afra > 20 and afragang = 1 and hour >= 8 and hour < 22:
		act 'Kendra''s room':
			cls
			minut += 15
			gs 'stat'

			if kendra = 5:
				'Kendra comes out of the room and invited you in, she is not thinking long undressed and offers her pussy for you to service.'

				act 'Unclothed':
					cla
					sex += 1
					lesb += 1
					horny = 0
					orgasm += 1
					vagina += 1
					gs 'stat'
					'Kendra slides on the strapon and fucks you hard.'
					picrand = rand(1, 5)
					'<center><img src="images/pics2/kendraStrap<<picrand>>.jpg"></center>'

					act 'Leave':gt 'dorm', 'korr'
				end
			elseif kendra =4:
				'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'
				act 'Leave':gt 'dorm', 'korr'

				act 'Get a tattoo':
					cla
					minut += 60
					kendra = 5
					tat = 5
					vnesh += 20
					gs 'stat'

					if tatlip = 0:
						tatrand = rand(1, 2)

						if tatrand = 1:
							tatlip = 1
						'<center><img src="images/body/tatlip1.jpg"></center>'
						elseif tatrand = 2:
							tatlip = 3
							'<center><img src="images/body/tatlip3.jpg"></center>'
						end
						'Kendra fills you on the lip of the tattoo of a cocksucker.'
					elseif tatlip = 1 or tatlip = 3:
						'"Agaa. So you already have it? Well done, good bitch. Now get to work!"'
					elseif tatlip > 1 and tatlip ! 3:
						'Kendra sees that you already have a tattoo on your lip. "Nothing, it''s a quick fix." - she says, and tattoos your lip with the tattoo for a cocksucker. She does it so masterfully that the old tattoo is not noticeable.'
					end

					act 'Lick Kendra':
						cla
						sex += 1
						lesb += 1
						horny = 0
						orgasm += 1
						vagina += 1
						'<center><img src="images/pics2/kendraStrap.jpg"></center>'
						'Kendra undresses and puts you on all fours, she slides on a strapon and pushes it in your pussy.'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			elseif kendra =3:
				'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'

				act 'Leave':gt 'dorm', 'korr'

				act 'Get a tattoo':
					cla
					minut += 60
					kendra = 4
					tat = 4
					vnesh += 20
					gs 'stat'

					if tatvag = 3:
						'<center><img src="images/body/tatvag3.jpg"></center>'
						'Kendra says that you already have such a stigma, a predatory smile and savory otveschshivaem you slap on the vagina'
					elseif tatvag = 0:
						'<center><img src="images/body/tatvag3.jpg"></center>'
						'Kendra tattoos you above the pussy with the whore for blacks tattoo.'
					end

					if tatvag > 0 and tatvag ! 3:
						tatvag = 3
						'<center><img src="images/body/tatvag3.jpg"></center>'
						'Kendra sees that you already have a tattoo above your pussy. "Nothing, it''s a quick fix." - she says, and tattoos you above the pussy with the whore for blacks tattoo over the old one. She does it so masterfully that old tattoo is not noticeable.'
					end

					act 'Lick Kendra':
						cla
						*clr
						lesb += 1
						horny += 20
						'<center><img src="images/pics2/kendra3.jpg"></center>'
						'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently.'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			elseif kendra = 2:
				'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'

				act 'Leave':gt 'dorm', 'korr'

				act 'Get a tattoo':
					cla
					minut += 60
					kendra = 3
					tat = 3
					vnesh += 20
					gs 'stat'

					if tatplech = 4:
						'<center><img src="images/body/tatplech4.jpg"></center>'
						'Kendra sees your tattoo on the shoulder showing you are a whore for blacks, grins and goes to bed'
					elseif tatplech = 0:
						tatplech = 4
						'<center><img src="images/body/tatplech4.jpg"></center>'
						'Kendra tattoos your shoulder with the symbol of a whore for blacks.'
					elseif tatplech > 0 and tatplech ! 4:
						tatplech = 4
						'<center><img src="images/body/tatplech4.jpg"></center>'
						'Kendra sees that you already have a tattoo on his shoulder. "Nothing, it''s a quick fix." - she says, tattoos your shoulder with the symbol of a whore for blacks over the old tattoo. She does it so masterfully that old tattoo is not noticeable.'
					end

					act 'Lick Kendra':
						cla
						*clr
						lesb += 1
						horny += 20
						'<center><img src="images/pics2/kendra2.jpg"></center>'
						'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			elseif kendra = 1:
				'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'

				act 'Leave':gt 'dorm', 'korr'

				act 'Get a tattoo':
					cla
					*clr
					minut += 60
					kendra = 2
					tat = 2
					vnesh += 20
					gs 'stat'

					if tatleg = 1 or tatleg = 2:
						'<center><img src="images/body/tatleg2.jpg"></center>'
						'Oh, what an independent girl, she already did. Now you can do what you came for.'
					elseif tatleg = 0:
						tatleg = 2
						'<center><img src="images/body/tatleg2.jpg"></center>'
						'Kendra tattoos your ankle with the symbol of a whore for blacks.'
					elseif tatleg > 2:
						tatleg = 2
						'<center><img src="images/body/tatleg2.jpg"></center>'
						'Kendra sees that you already have a tattoo in the groin. "Nothing, it''s a quick fix, we" - she says, tattoos your ankle with the symbol of a whore for blacks over the old tattoo. She does it so masterfully that theold tattoo is not noticeable.'
					end

					act 'Lick Kendra':
						cla
						*clr
						repa = 9
						lesb += 1

						if kendrasex = 0:kendrasex = 1 & girl = girl + 1

						horny += 20
						'<center><img src="images/pics2/kendra.jpg"></center>'
						'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			elseif kendra = 0:
				'A pretty African comes out of the room, she introduces herself as Kendra and says that he knows you are a Bitch for Africans. She invites you to get a proper tattoo, after which whe will allow you to lick her.'

				act 'Leave':gt 'dorm', 'korr'

				act 'Get a tattoo':
					cla
					minut += 60
					kendra = 1
					tat = 1
					vnesh += 20
					gs 'stat'

					if tatupb = 4:
						'<center><img src="images/body/tatupb4.jpg"></center>'
						'Oh, so you already have the symbol of a whore? We waste time here! Come on, eat my pussy, whore.'
					elseif tatupb = 0:
						tatupb = 4
						'<center><img src="images/body/tatupb4.jpg"></center>'
						'Kendra tattoos a tramp stamp with the word "Slut."'
					elseif tatupb > 0 and tatupb ! 4:
						tatupb = 4
						'<center><img src="images/body/tatupb4.jpg"></center>'
						'Kendra sees that you already have a tattoo on the lower back. "Nothing, it''s a quick fix" - she says, tattoos a tramp stamp with the word "Slut"over the old tattoo. She does it so masterfully that the old tattoo is not noticeable.'
					end

					act 'Lick at Kendra':
						cla
						*clr

						if kendrasex = 0:kendrasex = 1 & girl += 1

						lesb += 1
						horny += 20
						'<center><img src="images/pics2/afra30.jpg"></center>'
						'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'

						act 'Leave':gt 'dorm', 'korr'
					end
				end
			end
		end
	end

	if gosh > 0 and hour >= 8 and hour < 22:
		act 'Room Goshi':
			cla
			minut += 15
			gs 'stat'
			'Goshi opens the door and invites you inside'

			act 'Walk into Goshi''s Room':
				cla
				minut += 60

				if goshsex = 0:goshsex = 1 & guy += 1

				gs 'stat'

				'Goshi starts pushing you, fondling your breasts, and slowly undressing you'
				srand = rand(1, 3)

				if srand = 1:
					!!throat += 1
					sex += 1
					!!oral += 1
					!!anal += 1
					!!cumlip += 2
					!!cumface += 2
					!!cumbutt += 1
					cumass += 1
					horny = 0
					orgasm += 1
					vagina += 1
					picrand = rand(1, 5)

					if picrand = 1:'<center><img src="images/pics2/gosh2.jpg"></center>'
					if picrand = 2:'<center><img src="images/pics2/gosh11.jpg"></center>'
					if picrand = 3:'<center><img src="images/pics2/gosh13.jpg"></center>'
					if picrand = 4:'<center><img src="images/pics2/gosh14.jpg"></center>'
					if picrand = 5:'<center><img src="images/pics2/gosh15.jpg"></center>'

					'Goshi slides his cock into your pussy while he fucked you, you orgasm and then he cums inside you.'
					act 'Leave':gt 'dorm', 'korr'
				elseif srand = 2:
					throat += 1
					sex += 1
					oral += 1
					cumlip += 1
					cumface += 2
					picrand = rand(1, 5)

					if picrand = 1:'<center><img src="images/pics2/gosh.jpg"></center>'
					if picrand = 2:'<center><img src="images/pics2/gosh3.jpg"></center>'
					if picrand = 3:'<center><img src="images/pics2/gosh4.jpg"></center>'
					if picrand = 4:'<center><img src="images/pics2/gosh5.jpg"></center>'
					if picrand = 5:'<center><img src="images/pics2/gosh7.jpg"></center>'

					'Goshi pushes you to your knees and fucks you in the mouth, then he pulls out and cums on your face.'
					gs 'oral', '0'

					act 'Leave':gt 'dorm', 'korr'
				elseif srand = 3:
					sex += 1
					anal += 1
					cumbutt += 1
					orgasm += 1
					anus += 1
					picrand = rand(1, 5)

					if picrand = 1:'<center><img src="images/pics2/gosh6.jpg"></center>'
					if picrand = 2:'<center><img src="images/pics2/gosh8.jpg"></center>'
					if picrand = 3:'<center><img src="images/pics2/gosh9.jpg"></center>'
					if picrand = 4:'<center><img src="images/pics2/gosh10.jpg"></center>'
					if picrand = 5:'<center><img src="images/pics2/gosh12.jpg"></center>'

					'Goshi lubricates your asshole and starts flexing his fingers, then he pushes his dick inot your ass.'
					act 'Leave':gt 'dorm', 'korr'
				end
			end

			act 'Go for a walk with Goshi':
				cla
				gosh += 1
				minut += 120
				gs 'stat'
				'You walk with Goshi, it is very interesting.  He is a great conversationalist and gallant.'

				act 'Leave':gt 'dorm', 'korr'
			end
		end
	end
end

--- dorm ---------------------------------
# fit
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Fitness Center</font></b></center>'
	'<center><img src="images/etogame/fit.jpg"></center>'
	'Subscribe to the 30 classes worth 3,000 rubles'
	'Be sure to come to class in sportswear.'

	if abonement > 0:'Subscription is valid for <<abonement>> Occupation'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	if money >= 3000:
		act 'Buy a subscription (3,000 rubles)':
			cla
			money -= 3000
			abonement += 30
			'You bought a ticket for 30 lessons'

			act 'Move away from cash':gt 'fit', 'start'
		end
	end

	if abonement > 0 and fitday ! day:
		act 'Walk in dressing room':
			cla
			frost = 0
			abonement -= 1
			fitday = day
			razdtumbler = 1
			gt 'fit', 'dressing room'
		end
	end
end

if $ARGS[0] = 'dressing room':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$sexloc = $CURLOC
	$loc = $CURLOC
	$metka = $ARGS[0]
	clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Dressing</font></b></center>'
	'<center><img src="images/etogame/razd.jpg"></center>'
	'Classifieds'
	'Recruited girls section races, the winners of the competition receive cash prizes.'
	'Attention, visit the sports section razreshaetsya only with tracksuits.'

	if razdrand = 0 and tanznak = 0 and tanday ! day:
		tanday = day
		'In the locker room you notice <a href="exec:gt ''fitgirl''">cute girl</a>.'
	elseif tanznak = 2:
		cls
		tanznak = 3
		tanga = 0
		gs 'clothing', 'strip'
		tanya += 5
		'<center><img src="images/img/centr/razd4.jpg"></center>'
		'"You at least as name, maniac, and then raped her and Chesney did not even had the" asked the girl caught her breath.'
		'"I am the <<$name>>, and I will not rape you herself was not against" you said trying to find the eyes of her panties.'
		'"Looking for this?" asked the girl twirling on his finger your panties "I''m Tanya, and yet you seduced me, I did not have before the girls, and as it turned out a very good reason, I live here with my parents, if you want to come for a visit."'
		'"Okay as anything the race, briefs is true" you said holding out his hand.'
		'"Nope, do not return, there must me something to stay on the memory of the first girl." With these words, Tanya slipped your panties in his pocket and left.'

		act 'Further':gt 'fit', 'dressing room'

		exit
	end

	if begsec = 0:
		act 'Join section running':
			cla
			*clr
			minut += 5
			begsec = 1
			'You signed up for the run section.'

			act 'Leave':gt 'fit', 'dressing room'
		end
	elseif razdtumbler = 1 and sport > 0:
		act 'Go to section':gt 'beg', 'start'
		if week = 6 and beg >= 20:act '<b>Competitions on the run</b>':gt 'beg1', 'start'
	end

	act 'Take a shower (0:15)':
		cla
		*clr
		minut += 15
		sweat = -3
		horny += 1
		hapri = 0
		mop = 1
		dynamic $showerdin
		'<center><img src="images/pics/dush.jpg"></center>'
		'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'

		act 'Get out of the shower':gt 'fit', 'dressing room'
	end

	act 'Mirror':
		cla
		fitMir = 1
		gt 'mirror', 'start'
	end

	act 'Cabinet':
		cla
		gt 'clothing', 'view_clothing_list', 'wardrobe'
	end

	if razdtumbler = 1 and sport > 0:
		act 'Go to the gym':
		cla
		gt 'fit', 'gym'
	end

	act 'Go to the dance studio.':
		cla
		gt 'danceclass'
		end
	elseif razdtumbler = 0 or sport = 0:
		act 'Exit of the locker room':
			cla
			gt 'fit', 'start'
		end
	end
end

if $ARGS[0] = 'fitgirl':
	'Girl notices your look and smile turns. Girl undressing and taking toiletries goes into the shower.'

	act 'Turn away':gt 'fit', 'dressing room'

	act 'Walk into the shower behind the girl':
		cls
		minut += 15
		sweat = -3
		horny += 1
		hapri = 0
		mop = 1
		dynamic $showerdin
		shovertania += 1
		gs 'stat'
		'<center><img src="images/pics/dush.jpg"></center>'
		'Logged-in shower. There''s no one, except this girl. The girl looked around and see you smile again turned away.'
		if dom > 10:
			act 'Molest':
				cla
				*clr
				tanday = day
				gs 'stat'
				'<center><img src="images/img/centr/razd1.jpg"></center>'
				'You walk up to a girl and vskhvativ one hand on the buttock deploy to face you.'

				if vnesh < 20:
					'Girl puts you off, and shouting something about you and all your other relative, out of the locker room.'

					act '...':gt 'fit', 'dressing room'
				elseif vnesh >= 20:
					'Girl vskhvatila your hand squeezing her ass, but stopped for a moment considering you, she probably expected to see a guy or girl does.'

					act 'Take advantage of the confusion':
						cla
						*clr
						gs 'stat'
						'<center><img src="images/img/centr/razd2.jpg"></center>'
						'While she was trying to understand what is happening you pulled up her shirt and began to fondle her nipples tongue, and now her hand stroking your buttocks'

						act 'Further':tanznak = 1 & gt 'lezbsex', 'start'
					end

					act 'Wait for her reaction':
						cls
						gs 'stat'

						if vnesh < 30:
							'Girl smiling at you, but removes your hand and leaves, sending you a kiss.'

							act '...':gt 'fit', 'dressing room'
						elseif vnesh >= 30:
							cla
							*clr
							'<center><img src="images/img/centr/razd3.jpg"></center>'
							'The girl pressed to you even stronger and kisses your lips.'

							act 'Further':
								tanznak = 1
								gt 'lezbsex', 'start'
							end
						end
					end
				end
			end
		end

		act 'Out of the shower':gt 'fit', 'dressing room'
	end
end

if $ARGS[0] = 'gym':
	cla
	clr
	*clr
	minut += 5
	razdtumbler = 0
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Fitness Center</font></b></center>'
	'<center><img src="images/etogame/fit.jpg"></center>'
	'In the fitness center a lot of different programs for the physical development of the organism.'

	act 'Aerobics (Squeegee fat)':
		cla
		*clr
		minut += 120
		fat -= 10
		reakt += rand(1, 3)
		manna -= 5
		sweat += 3
		'<center><img src="images/etogame/fit1.jpg"></center>'
		'You are very vigorously the exercises for the music ebbs fat.'

		gs 'fit', 'exercise end'
	end

	act 'Trenazhorka (in force)':
		cla
		*clr
		minut += 120
		stren += rand(1, 3)
		fat -= 1
		manna -= 5
		sweat += 3
		'<center><img src="images/etogame/fit2.jpg"></center>'
		'Did you do with iron for strength.'

		gs 'fit', 'exercise end'
	end

	act 'Trenazhorka (endurance)':
		cla
		*clr
		minut += 120
		vital += rand(1, 3)
		manna -= 5
		fat -= 2
		sweat += 3

		'<center><img src="images/etogame/fit3.jpg"></center>'
		'Trainers were you doing on the development of endurance.'

		gs 'fit', 'exercise end'
	end

	act 'Tennis testing of protection (skill)':
		cla
		*clr
		minut += 120
		agil += rand(1, 3)
		fat -= 5
		manna -= 5
		sweat += 3
		TenisDef += 1

		'<center><img src="images/etogame/fit4.jpg"></center>'
		'You do tennis practicing defensive actions.'

		gs 'fit', 'exercise end'
	end

	act 'Tennis working out attacks (velocity)':
		cla
		*clr
		minut += 120
		speed += rand(1, 3)
		manna -= 5
		fat -= 5
		sweat += 3
		TenisAt += 1

		'<center><img src="images/etogame/fit4.jpg"></center>'
		'You do practicing tennis attacking actions.'

		gs 'fit', 'exercise end'
	end

	act 'Section kickboxing':gt 'fit', 'kickboxing'
end

if $ARGS[0] = 'exercise end':
	RESULT = rand(0, 19)

	act 'Further':
		if RESULT = 0:
			cla
			*clr
			'<center><img src="images/img/centr/zal1.jpg"></center>'
			'Next to you has been a nice guy.'

			act 'Leave':gt 'fit', 'dressing room'

			if dom > 0:
				act 'Covet':
					cla
					*clr
					guy += 1
					picrand = 17
					'<center><img src="images/img/centr/zal2.jpg"></center>'
					'You go up to the guy lying on the simulator, squats and start stroking his cock through his pants, man rises kisses you on the lips, then lower a little pants releasing his impressive size dildo.'

					act 'Suck':gt 'sex', 'minet'
				end
			end
		elseif RESULT = 1:
			cla
			*clr
			'<center><img src="images/img/centr/zal3.jpg"></center>'
			'Until you do, you and the guy behind suitable vskhvativ you kissing his chest in his ear, sucking the lobe.'

			if dom > 0:act 'Hit him in the balls':gt 'fit', 'dressing room'

			act 'Enjoy':
				cla
				*clr
				guy += 1
				picrand = 18
				'<center><img src="images/img/centr/zal4.jpg"></center>'
				'Guy passes you, pulls out his cock and it lays down on your chest, moving eventually head to your mouth.'

				act 'Suck':gt 'sex', 'minet'
			end
		elseif RESULT = 2:
			cla
			'Until you do, you fit girl and offers to play squash with her until her boyfriend came.'

			act 'Refuse':gt 'fit', 'dressing room'

			act 'Agree':
				cla
				*clr
				picrand = 15
				'<center><img src="images/img/centr/zal5.jpg"></center>'
				'You play fun playing with a girl, you, as well, and it is obtained is bad enough, but it just amuses you. After some time, it appears as a man and looking at your clumsy attempts nachinnaet show how to play correctly. He comes to you from behind priobnimaet and one hand on to your hand with roketkoy shows how to beat, and the second hand starts stroking your hips gradually approaching the perineum. You feel like you are in the back rests his cock looking at her, you know that she understands what is going on and wants to not less than men.'

				act 'Send perverts':gt 'fit', 'dressing room'

				act 'Enjoy':
					guy += 1
					girl += 1
					gt 'podrsex', 'var'
				end
			end
		elseif RESULT = 3:
			cla
			*clr
			'<center><img src="images/img/centr/zal6.jpg"></center>'
			'Near you engaged hedgehog one girl to suit you two guys obviously took you for girlfriends and try to start a conversation.'

			act 'Send':gt 'fit', 'dressing room'

			act 'Flirt':
				cla
				*clr
				picrand = 12
				'<center><img src="images/img/centr/zal7.jpg"></center>'
				'You chat with a guy, and you notice that he was very excited and constantly glancing behind you, turning you see that the girl is already on his haunches and with gusto sucking the second guy.'

				act 'Leave':gt 'fit', 'dressing room'

				act 'Suck':
					guy += 2
					girl += 1
					gang += 1
					gt 'sexdvanadva', 'var'
				end
			end
		else
			cla
			'You finish up your exercises and prepare to leave.'
			act 'Leave':gt 'fit', 'dressing room'
		end
	end
end

if $ARGS[0] = 'kickboxing':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	gs 'razrKik'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Kickboxing Section</font></b></center>'
	'<center><img src="images/etogame/kik.jpg"></center>'

	act 'Testing jabs on pear':
		cla
		*clr
		minut += 120
		speed += rand(1, 3)
		manna -= 5
		fat -= 4
		sweat += 3
		Jab += rand(1, 3)
		'<center><img src="images/etogame/kik1.jpg"></center>'
		'You practiced on pear jab, straight punches with long step forward. These strikes are not so powerful as the police, but they are faster.'

		act 'Leave':gt 'fit', 'dressing room'
	end

	act 'Testing power beats on a pear':
		cla
		*clr
		minut += 120
		stren += rand(1, 3)
		manna -= 5
		fat -= 4
		sweat += 3
		Punch += rand(1, 3)
		'<center><img src="images/etogame/kik1.jpg"></center>'
		'You practiced on pear powerful force capable of hitting an opponent shake. These impacts are powerful, but they are hard to get.'

		act 'Leave':gt 'fit', 'dressing room'
	end

	act 'Testing of kicks':
		cla
		*clr
		minut += 120
		stren += rand(1, 3)
		manna -= 5
		fat -= 4
		sweat += 3
		Kik += rand(1, 3)
		'<center><img src="images/etogame/kik1.jpg"></center>'
		'You practiced on pear powerful kicks able to cut down an opponent. These impacts are powerful, but are very difficult to hit.'

		act 'Leave':gt 'fit', 'dressing room'
	end

	act 'Testing of protection':
		cla
		*clr
		minut += 120
		agil += rand(1, 3)
		manna -= 5
		fat -= 4
		sweat += 3
		KikDef += rand(1, 3)
		'<center><img src="images/etogame/kik1.jpg"></center>'
		'You practiced defense movements.'

		act 'Leave':gt 'fit', 'dressing room'
	end

	act 'Sparing (training bout in the ring)':
		cla
		*clr
		round = 0
		'You need to choose a rival for sparring'

		act 'Rival':
			minut += 120
			manna -= 5
			fat -= 4
			sweat += 3
			strenV = rand(10, 20)
			speedV = rand(10, 20)
			agilV = rand(10, 20)
			reactV = rand(10, 20)
			vitalV = rand(10, 20)
			intelV = 10
			willV = 10
			!!skills
			JabV = rand(5, 20)
			PunchV = rand(5, 20)
			KikV = rand(5, 20)
			KikDefV = rand(5, 20)
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			$nameV = 'Sparring partner'
			formula = 3
			sparing = 1
			gt 'kikbox', 'start'
		end
	end

	if week >= 5:
		'You can spend an amateur fight.'

		act 'Amateur fight':
			round = 0
			minut += 120
			manna -= 5
			fat -= 4
			sweat += 3
			razrand = rand(0, 1)

			if razradKik + razrand = 0:
				strenV = rand(10, 20)
				speedV = rand(10, 20)
				agilV = rand(10, 20)
				reactV = rand(10, 20)
				vitalV = rand(10, 20)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(10, 30)
				PunchV = rand(10, 30)
				KikV = rand(10, 30)
				KikDefV = rand(10, 30)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival without discharge'
				formula = 3
				amateur = 1
			elseif razradKik + razrand = 1:
				strenV = rand(15, 25)
				speedV = rand(15, 25)
				agilV = rand(15, 25)
				reactV = rand(15, 25)
				vitalV = rand(15, 25)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(15, 35)
				PunchV = rand(15, 35)
				KikV = rand(15, 35)
				KikDefV = rand(15, 35)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival c third discharge'
				formula = 3
				amateur = 1
			elseif razradKik + razrand = 2:
				strenV = rand(20, 30)
				speedV = rand(20, 30)
				agilV = rand(20, 30)
				reactV = rand(20, 30)
				vitalV = rand(20, 30)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(30, 50)
				PunchV = rand(30, 50)
				KikV = rand(30, 50)
				KikDefV = rand(30, 50)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival co second discharge'
				formula = 3
				amateur = 1
			elseif razradKik + razrand = 3:
				strenV = rand(30, 40)
				speedV = rand(30, 40)
				agilV = rand(30, 40)
				reactV = rand(30, 40)
				vitalV = rand(30, 40)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(40, 60)
				PunchV = rand(40, 60)
				KikV = rand(40, 60)
				KikDefV = rand(40, 60)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival c first discharge'
				formula = 3
				amateur = 1
			elseif razradKik + razrand = 4:
				strenV = rand(40, 60)
				speedV = rand(40, 60)
				agilV = rand(40, 60)
				reactV = rand(40, 60)
				vitalV = rand(40, 60)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(60, 80)
				PunchV = rand(60, 80)
				KikV = rand(60, 80)
				KikDefV = rand(60, 80)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival CCM'
				formula = 3
				amateur = 1
			elseif razradKik + razrand >= 5:
				strenV = rand(60, 100)
				speedV = rand(60, 100)
				agilV = rand(60, 100)
				reactV = rand(60, 100)
				vitalV = rand(60, 100)
				intelV = 10
				willV = 10
				!!skills
				JabV = rand(80, 110)
				PunchV = rand(80, 110)
				KikV = rand(80, 110)
				KikDefV = rand(80, 110)
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				$nameV = 'Rival MS'
				formula = 3
				amateur = 1
			end

			gt 'kikbox', 'start'
		end
	end
end

--- fit ---------------------------------
# fitgirl
$dintaniastart = {
	if dom > 10:
		act 'Molest':
			cla
			*clr
			tanday = day
			gs 'stat'

			'<center><img src="images/img/centr/razd1.jpg"></center>'
			'You come to the girl and grabbed the buttocks with one hand deploy to face him'

			if vnesh < 20:
				'She pushes you, and shouting that-something about you and all your relatives, out of the locker room'

				act '...':gt 'fit', 'dressing room'
			elseif vnesh >= 20:
				'Girl vskhvatila your hand squeezes her ass, but stopped for a moment looking at you, She probably expected to see a man and certainly not for a Woman.'

				act 'Take advantage of the confusion':
					cla
					*clr
					gs 'stat'

					'<center><img src="images/img/centr/razd2.jpg"></center>'
					'While she was trying to understand what''s going on, you pulled up her shirt and began licking her nipples, and now her hand stroking your buttocks'

					act 'Further':tanznak = 1 & gt 'lezbsex', 'start'
				end

				act 'Wait for her reaction':
					cls
					gs 'stat'

					if vnesh < 30:
						'She smiles at you, but removes your hand, and leaves, I am sending you a kiss.'

						act '...':gt 'fit', 'dressing room'
					elseif vnesh >= 30:
						cla
						*clr
						'<center><img src="images/img/centr/razd3.jpg"></center>'
						'She pressed harder for you and kisses your lips.'

						act 'Further':
							tanznak = 1
							gt 'lezbsex', 'start'
						end
					end
				end
			end
		end
	end
}

gs 'stat'

'She notices your look and smile turns. She undresses and toiletries are taking the shower.'

act 'Turn':gt 'fit', 'dressing room'
act 'Going into the shower behind a girl':
	cls
	minut = minut + 15
	sweat = -3
	horny = horny + (hornyboost/10) - (hornydamp/10) + 1
	hapri = 0
	mop = 1

	dynamic $showerdin

	shovertania += 1
	gs 'stat'

	'<center><img src="images/pics/dush.jpg"></center>'
	'You are logged in shower. There''s no one, except this girl. She looked back and saw you smiling back turned.'

	dynamic $dintaniastart

	act 'Exit out of the shower':gt 'fit','dressing room'
end

--- fitgirl ---------------------------------

# foto
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Studio</font></b></center>'
	'<center><img src="images/etogame/foto.jpg"></center>'
	'In the deserted studio, only photographer sits under the light of a desk lamp, and that is doing on the computer.'

	if pfilmNO = 1:
		'You''re blacklisted, you no decent studio will not have affairs, goodbye.'

		act 'Leave':gt 'down'

		exit
	end

	if model > 0 and modelmon = month:
		'This month, for you will no longer work.'

		if pornstudio = 0:pornstudio = 2 & 'Here, take a business card. Casting pornoaktriss.'
	end

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	if parkblackmail = 2:
		act 'Look around for a blackmailer':gt 'foto', 'blackm'
	elseif model = 0 and parkblackmail ! 2:
		act 'Ask about work Centerfolds':
			cla
			minut += 5

			if vidage < 20:
				if skin < 2:
					'Girl, your acne on the face Centerfolds do nothing.'
				else
					'Hmm, undress, I look at you.'

					act 'Undress':gt 'foto', 'model'
				end
			end

			if vidage >= 20:'You asked about the work of a model, but the photographer you said "I''m sorry, but you look like a pretty mature woman, we also need young girls." this way you have indicated that you look too old for this business.'

			act 'Leave':gt 'foto', 'start'
		end
	elseif model > 0 and modelmon ! month and venera < 3:
		act 'Ask about work':gt 'foto', 'model'
	end
end

if $ARGS[0] = 'model':
	cla
	*clr

	if vnesh >= 20:
		cla
		clr
		*clr
		minut += 5

		if model = 0:model = 1

		modelpay = vnesh * 100
		modelmon = month
		gs 'stat'
		'<center><b><font color="maroon">Photographer</font></b></center>'
		'<center><img src="images/etogame/fotograph.jpg"></center>'
		'(Photographer) - well, we just need the model. So, wait a second, I''ll see exactly what we need.'
		forand = rand(1, 7)

		if forand = 1:
			'So, we need a model dressed in stockings and sexy body. Payment <<3*modelpay/2>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				minut += 180
				modelpayfin = 9 * modelpay / 2
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[1] += 1
				gs 'stat'
				'<center><img src="images/etogame/model1.jpg"></center>'
				'You dressed up in sexy clothes and three hours spent taking various poses for a photographer.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 2:
			'So, we need a model dressed in some stockings. Photos of breast and genital close-up and general pictures. Payment <<2*modelpay>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				minut += 180
				modelpayfin = 6 * modelpay
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[2] += 1
				gs 'stat'
				'<center><img src="images/etogame/model2.jpg"></center>'
				'You dressed up in sexy clothes and three hours spent taking various poses for a photographer.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 3:
			'So, we need a model dressed in sexy clothing with an open chest. Payment <<3*modelpay/2>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				minut += 180
				modelpayfin = 9 * modelpay / 2
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[3] += 1
				gs 'stat'
				'<center><img src="images/etogame/model3.jpg"></center>'
				'You dressed up in sexy clothes and three hours spent taking various poses for a photographer.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 4:
			'So, we need a model completely naked. Photos of breast and genitals, buttocks, all close-up and general pictures. Payment <<2*modelpay>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				minut += 180
				modelpayfin = 6 * modelpay
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[4] += 1
				gs 'stat'
				'<center><img src="images/etogame/model4.jpg"></center>'
				'You dressed up in sexy clothes and three hours spent taking various poses for a photographer.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 5:
			'So, we need a model completely naked, masturbating using dildo. Payment <<5*modelpay/2>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				mastr += 1
				minut += 180
				modelpayfin = 5 * 3 * modelpay / 2
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[5] += 1
				gs 'stat'
				'<center><img src="images/etogame/model5.jpg"></center>'
				'You undressed and three hours spent taking various poses for a photographer and poking holes in different dildos.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 6:
			'So, we need a model dedicated to lesbian sex with another girl. Payment <<3*modelpay>> hour.'

			act 'I do not fit':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				clr
				*clr
				slava += 1
				lesbian += 1
				minut += 180
				modelpayfin = 9 * modelpay
				money += modelpayfin
				modelfoto += 1
				girl += 1
				modelfotoTipe[6] += 1
				gs 'stat'
				'<center><img src="images/etogame/model6.jpg"></center>'
				'You undressed and three hours spent taking various poses with another girl before Pictured petting orgasms and lust.'
				'After three hours of filming photographer gave you <<modelpayfin>> rubles.'

				act 'Change into his clothes':gt 'foto', 'start'
			end
		elseif forand = 7:
			'You stripped naked and photographer busily began to examine your naked body.'
			'Photographer examined you and offered you <<modelpay>> per hour filming naked.'

			act 'Leave':gt 'foto', 'start'

			act 'Agree (3:00)':
				cla
				*clr
				minut += 180
				modelpayfin = 3 * modelpay
				money += modelpayfin
				modelfoto += 1
				modelfotoTipe[7] += 1
				'<center><img src="images/etogame/fotograph.jpg"></center>'
				'Photographer said what poses you should take, you are trying to fully implement his instructions and took the most candid poses horny females.'
				'You filmed naked 3:00 and earned <<modelpayfin>> rubles.'

				act 'Leave':gt 'foto', 'start'
			end
		end
	else
		'Photographer examined you. "I''m afraid you do not come to us."'

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

if $ARGS[0] = 'blackm':
	*clr
	gs 'stat'

	if parkblackmail = 2:
		'My name is Victor appears not familiar to you man. I pay good money to students that I have supplied new actresses. So you have to work you invested in money.'

		act 'What do you want?':
			cla
			'Nothing special <<$имя>>. Just to let you do what you like - he nodded at the pictures.'

			act 'Fucked in front of the camera?':
				cla
				'Victor smiled. -Well, yes. It''s not difficult. You continued to sit dumbfounded. Today, a lot of time is required. Come, I have everything ready and waiting for you already. -Today? - You are quite confused, but Victor nodded, and his face became rigid. You looked at the pictures and stood up. Steel toe cotton.'

				act 'Go into the room':
					cla
					'On the back of a chair hung candid lingerie and white shirt. Apparently, all of this meant to you. You dressed up and sat on the edge of the bed. At this time, two men entered the room - blond and pretty inflated to look slender brunette. -So, well, a simple scenario. - Ordered Victor, coming with his camera in the room. Girl undressing. Poraskovanney and do not delay. And then you know all the boys. And for the girls will surprise - and he winked ugly guys. You put on the bed and told to undress. Hands do not listen, but after a couple of blond poking you decided not to resist. Took off his shirt, undid the bra, and then the guys have already taken matters into their own hands. He literally ripped from you and bra and panties and fell into bed. No foreplay in was not in sight. Blond put you on all fours and abruptly entered, you have not even had time to be excited. It hurt, but he fucked sharply, sweeping and clutched his chest hurt. Second, too undressed and decided to give you in the mouth. Slender brunette has given you a good slap in the face, tears gushed from his eyes themselves.'

					act 'Open mouth':
						cla
						clr
						throat += 1
						guy += 2
						sex += 1
						bj += 1
						gang += 1
						cumlip += 1
						swallow += 1
						$nameV = 'Blond'
						pose = 1
						dick = 18
						'<center><img src="images/pics2/studia.jpg"></center>'
						'You have opened my mouth, and he shoved his cock, long and thick. You began to choke, but it literally you sit down, holding his head. They fuck you together, and walked beside Victor, no longer hiding and shooting, shoot, shoot. In his hand was a lovely big camcorder.'
						gs 'orgazm', 'start'
						' They finished together. Blonde poured everything you into the uterus. Brunette forced to swallow everything. You fell onto the bed.'

						act 'Begin to cry':
							cla
							*clr
							'You fell onto the bed and wept. Not bad, tears always look very cool, - said Victor pressing pause. Thus, <<$имя>> tempted, and boys can enjoy.'

							act 'In the shower':
								cla
								'Did you go to the shower and went to the set. There you have been waiting for. Suck on, grabbing you by the hand, pulled the blonde to her and went into her mouth. Black, meanwhile, began to stroke your ass. Why such a weasel - thought you nasazhivayas Penis blond. And then he realized where. Brunette finger began entering the hole and before you came, what he wants.'

								act 'No!':
									cla
									sex += 1
									bj += 1
									throat += 1
									anal += 1
									cumass += 1
									cumlip += 1
									cumface += 1
									'<center><img src="images/pics2/studia2.jpg"></center>'
									'You shouted No! Do not yell, good soundproofing here. And your ass is still fuck, so do not twitch and relax. - Already two fingers brunette were you. You sobbing again sucking blonde. Three fingers. At that moment, when giving your mouth quickened and was ready to cum, brunette perched member of your rings and abruptly entered. You yelled again, but the blonde quickly plugged your mouth sperm bryzhzhuschim member and roaring "Swallow, swallow, bitch" - planted itself. When he finally finished, black hair pinned you to the bed all over and started to fuck in the ass. It was just crazy sick - without lubrication, but he did not finish, then pulling out entirely, then abruptly entering again, just ripping you. Finally, you feel like it is speeding up, and you poured semen into the rectum. Nothing worse and you could not imagine.'

									act 'Substitution':
										cla
										*clr
										sex += 1
										anal += 1
										sex += 1
										cumbelly += 1
										cumass += 1
										$nameV = 'Brunet'
										pose = 1
										dick = 18
										'<center><img src="images/pics2/studia3.jpg"></center>'
										'After showering you already thought that Victor you let go, it turned out that Victor has not yet finished. Fingered you guys again, a little thin dildo fuck. It already seemed just a trifle compared with anal sex. And then you put black hair on his penis and began to fuck, lifting and dropping a little, came back blond hair and tilted you close to your chest brunette. You felt his cock on her ass and realized that they will fuck you in both holes. The second term is slowly coming into you, and you feel like they rub through the thin partition, you have just used as a whore. They fuck you two about half an hour.'
										gs 'orgazm', 'start'
										parkblackmail = 4
										studiaday = 7
										'I''ll call you when you said you still need Viktor goodbye.'

										act 'Leave':gt 'Down'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- foto ---------------------------------
# lab
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Laboratory Karina</font></b></center>'
	'<center><img src="images/qwest/lab.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	act 'Train with Juugo':
		cla
		gt 'lab', 'jugo'
	end

	act 'Train with Karin':
		cla
		gt 'lab', 'karin'
	end

	if judosparday ! day:
		act 'Sparring (Juugo, mutant power 600)':
			cla
			judosparday = day
			$nameV = 'Juugo'
			!!stats
			strenV = 600
			speedV = 60
			agilV = 60
			reactV = 50
			vitalV = 200
			intelV = 50
			willV = 50
			!!skills
			magikV = 100
			boxingV = 100
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 10 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 0
			jugoFight = 2
			gt 'fight', 'start'
		end
	end

	if karinsparday ! day:
		act 'Sparring (Karin mag6)':
			cla
			karinsparday = day
			$nameV = 'Karin'
			!!stats
			strenV = 60
			speedV = 100
			agilV = 100
			reactV = 60
			vitalV = 100
			intelV = 100
			willV = 100
			!!skills
			magikV = 100
			boxingV = 100
			shootV = 100
			!!parameters
			healthV = vitalV * 10 + strenV * 5
			mannaV = intelV * 6 + magikV * 10
			willpowerV = willV * 10
			BonusAtakV = 0
			BonusDefV = 0
			!!Programme of Action
			program = 4
			karinFight = 1
			gt 'fight', 'start'
		end
	end
end

if $ARGS[0] = 'jugo':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Juugo</font></b></center>'
	'<center><img src="images/picPRE/jugoPRE.jpg"></center>'
	'Juugo sitting on floor and looking aloof kudato in space.'

	act 'Leave':gt 'lab', 'start'

	if jugoday ! day:
		act 'Develop strength (1:00)':
			cla
			stren += rand(3, 6)
			minut += 60
			jugoday = day
			'You do exercises under the guidance of Juugo.'

			act 'Leave':gt 'lab', 'jugo'
		end

		act 'Reach speeds (1:00)':
			cla
			speed += rand(3, 6)
			minut += 60
			jugoday = day
			'You do exercises under the guidance of Juugo.'

			act 'Leave':gt 'lab', 'jugo'
		end

		act 'Develop agility (1:00)':
			cla
			agil += rand(3, 6)
			minut += 60
			jugoday = day
			'You do exercises under the guidance of Juugo.'

			act 'Leave':gt 'lab', 'jugo'
		end

		act 'Develop reaction (1:00)':
			cla
			react += rand(3, 6)
			minut += 60
			jugoday = day
			'You do exercises under the guidance of Juugo.'

			act 'Leave':gt 'lab', 'jugo'
		end

		act 'Develop endurance (1:00)':
			cla
			vital += rand(3, 6)
			minut += 60
			jugoday = day
			'You do exercises under the guidance of Juugo.'

			act 'Leave':gt 'lab', 'jugo'
		end
	end
end

if $ARGS[0] = 'karin':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Karina</font></b></center>'
	'<center><img src="images/picPRE/karinPRE.jpg"></center>'
	'Karyn as always studying something.'

	act 'Leave':gt 'lab', 'start'

	act 'I''m too fat and do not want to get fat.':
		cla
		'(You) - Karin, I oily dibilka not able to watch their weight, wave your magic wand, what would not I grew fat.'
		'(Karin) - Ugh, that''s the same ponavylazyat downs of pussy, and then I vozis with them. Dick with you, take it. Just remember, this spell forever, you''ll be able to just come and change the waist and thighs, and since boobs are made of fat, I only supreme mercy 1st size you do, a little, shoved silicone. And the decision to reverse is or whether silicone doll or live as a man, I raskoldovyvat you will not. Since you have more fat will not be absorbed and body parameters are kept magically, marvel not at the post of dystrophy and not marvel that force will fall faster from malnutrition, you will no longer internal reserves.'

		act 'No no no, I changed my mind. Will continue smarter.':gt 'lab', 'karin'

		act 'I would want that waist was ...':
			cla
			dounspell = 1
			TaliaDoun = input ("Waist in cm?")

			if TaliaDoun <= 0:TaliaDoun = 20

			act 'I would want that thighs ...':
				cla
				bedraDoun = input ("Hips in cm?")

				if bedraDoun <= 0:bedraDoun = 40
					act 'Enjoy your stupidity.':gt 'lab', 'karin'
				end
			end
		end

		if IvanPodstavaQW = 2 and poverKAR = 0 and softKAR = 0:
			act 'Ask for help with Ivan Karin':
				cla
				gs 'stat'
				'You explained the situation and asked her to Karin assistance. Karin said thoughtfully. "I do not think there is any physical evidence of the guilt of Ivan. Necessary is achieved recognition. I think it would be possible to capture and interrogate. Or drink his cunning truth serum and interrogate. Anyway it is necessary to remove it all on video."'

				act 'Military solution':
					cls
					poverKAR = 1
					gs 'stat'
					'<center><img src="images/picPRE/karinPRE.jpg"></center>'
					'You have decided to achieve recognition Ivan force. Karin told you. You go to the apartment of Ivan. There vstretishsya with Juugo. It will help resolve the issue. Just see if he will go to the second level of the press, he was distraught. At the second level of the press he turns into a monster.'

					act 'Leave':gt 'lab', 'karin'
				end

				act 'Tricky decision':
					cls
					softKAR = 1
					gs 'stat'
					'<center><img src="images/picPRE/karinPRE.jpg"></center>'
					'You have decided to achieve recognition Ivan cunning. Karin told you. You go to the apartment of Ivan. There we meet with you and obtyapaem owners.'

					act 'Leave':gt 'lab', 'karin'
				end
			end
		elseif poverKAR = 2:
			act 'Approach to Karin about attacks apartments Ivan':
				cla
				poverKAR = 3
				'You came to Karin and she sighed. "Yes, failed. Juugo caught a bullet in his head and his strength went up to the next level, it has cured, made almost invulnerable, but finally deprived of his mind. Juugo not only gained recognition for Ivan, and not just kill him, he blew part of the entrance his attack. But there are pluses. Cops think it was a gas explosion. But now you have to either pay the debt or goes to jail. "'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if karinday ! day:
			act 'Develop intelligence (1:00)':
				cla
				intel += rand(3, 6)
				minut += 60
				karinday = day
				'Did you do with Karin developing his intellect.'

				act 'Leave':gt 'lab', 'karin'
			end

			act 'Will develop (1:00)':
				cla
				will += rand(3, 6)
				minut += 60
				karinday = day
				'Did you do with Karin developing his intellect.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spelltuman = 0 and magik >= 1:
			act 'Learn technique fog (1:00)':
				cla
				minut += 60
				spelltuman = 1
				'You learned the technique call fog in battle.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellklon = 0 and magik >= 1:
			act 'Learn technique protection cloning (1:00)':
				cla
				minut += 60
				spellklon = 1
				'You learned the technique of substitution clone themselves in battle.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellstun = 0 and magik >= 2:
			act 'Learn technique paralysis (1:00)':
				cla
				minut += 60
				spellstun = 1
				'You learned the technique of paralyzing the enemy.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellwind = 0 and magik >= 2:
			act 'Learn mist blowing (1:00)':
				cla
				minut += 60
				spellwind = 1
				'You learned the technique of blowing mist.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellklon2 = 0 and magik >= 2:
			act 'Learn triple cloning (1:00)':
				cla
				minut += 60
				spellklon2 = 1
				'You learned the technique Troynova cloning.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellenergo = 0 and magik >= 3:
			act 'Learn energoschit (1:00)':
				cla
				minut += 60
				spellenergo = 1
				'You learned the technique energoschita.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if spellinit = 0 and magik >= 3:
			act 'Learn technique deceleration time (1:00)':
				cla
				minut += 60
				spellinit = 1
				'You learned the technique of time dilation.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

		if magik >= 4 and spellhel = 0:
			!!'With this level of magic I can not teach you anymore.'
				act 'Learn the technique of treatment (1:00)':
				cla
				minut += 60
				spellhel = 1
				'You learned the technique of treatment.'

				act 'Leave':gt 'lab', 'karin'
			end
		end

	if magik >= 5 and spellavtoklon = 0:
		act 'Learn technique avtoklonirovaniya (1:00)':
			cla
			minut += 60
			spellavtoklon = 1
			'You learned the technique avtoklonirovaniya. This technique allows you to enter into battle with the already created three clones.'

			act 'Leave':gt 'lab', 'karin'
		end
	end

	if magik >= 6 and spellbefshild = 0:
		act 'Learn technique prior Shield (1:00)':
			cla
			minut += 60
			spellbefshild = 1
			'You learned the technique of pre-shield. This technique allows you to enter into battle with a ready shield against physical impacts.'

			act 'Leave':gt 'lab', 'karin'
		end
	end
end

--- lab ---------------------------------
# NewCloShop
$shmotmag = {
	!!!WD:Allow view even if has no funds
	cla

	if newclo[i] ! 0:
		msg 'You already own these clothes.'
		gt $loc, $metka
	end

	view 'images/clothes/newclo/<<i>>.jpg'

	act 'Return item':
		view
		gt $loc, $metka
	end

	if money >= 3000:
		act 'Buy':
			money -= 3000
			newclo[i] = 1
			newcloH[i] = 60
			newcloB[i] = bedra
			view
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end

	act 'Leave':
		mag = 0
		minut += 15
		view
		gt 'down'
	end
	!!!
}

$metka = $ARGS[0]
$loc = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
clr
mag = 1
gs 'stat'

fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Shop "Fashionista"</font></b></center>'

!!!WD:Allow view even if has no funds
view
!!!

!!!WD:Allow view even if has no funds
act 'Leave':
	mag = 0
	minut += 15
	view
	gt 'down'
end
!!!

if hour >= 9 and hour <= 21:
	'<center><b>All clothing for 3000 rubles</font></b></center>'
	'<table><tr><a href="exec:i = 1 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/1.jpg" height="120" /></div></a> <a href="exec:i = 2 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/2.jpg" height="120" /></div></a> <a href="exec:i = 3 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/3.jpg" height="120" /></div></a> <a href="exec:i = 4 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/4.jpg" height="120" /></div></a> <a href="exec:i = 5 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/5.jpg" height="120" /></div></a> <a href="exec:i = 6 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/6.jpg" height="120" /></div></a> <a href="exec:i = 7 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/7.jpg" height="120" /></div></a> <a href="exec:i = 8 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/8.jpg" height="120" /></div></a> <a href="exec:i = 9 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/9.jpg" height="120" /></div></a> <a href="exec:i = 10 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/10.jpg" height="120" /></div></a> <a href="exec:i = 11 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/11.jpg" height="120" /></div></a> <a href="exec:i = 12 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/12.jpg" height="120" /></div></a> <a href="exec:i = 13 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/13.jpg" height="120" /></div></a> <a href="exec:i = 14 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/14.jpg" height="120" /></div></a> <a href="exec:i = 15 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/15.jpg" height="120" /></div></a> <a href="exec:i = 16 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/16.jpg" height="120" /></div></a> <a href="exec:i = 17 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/17.jpg" height="120" /></div></a> <a href="exec:i = 18 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/18.jpg" height="120" /></div></a> <a href="exec:i = 19 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/19.jpg" height="120" /></div></a> <a href="exec:i = 20 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/20.jpg" height="120" /></div></a> <a href="exec:i = 21 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/21.jpg" height="120" /></div></a> <a href="exec:i = 22 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/22.jpg" height="120" /></div></a> <a href="exec:i = 23 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/23.jpg" height="120" /></div></a> <a href="exec:i = 24 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/24.jpg" height="120" /></div></a> <a href="exec:i = 25 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/25.jpg" height="120" /></div></a> <a href="exec:i = 26 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/26.jpg" height="120" /></div></a> <a href="exec:i = 27 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/27.jpg" height="120" /></div></a> <a href="exec:i = 28 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/28.jpg" height="120" /></div></a> <a href="exec:i = 29 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/29.jpg" height="120" /></div></a> <a href="exec:i = 30 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/30.jpg" height="120" /></div></a> <a href="exec:i = 31 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/31.jpg" height="120" /></div></a> <a href="exec:i = 32 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/32.jpg" height="120" /></div></a> <a href="exec:i = 33 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/33.jpg" height="120" /></div></a> <a href="exec:i = 34 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/34.jpg" height="120" /></div></a> <a href="exec:i = 35 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/35.jpg" height="120" /></div></a> <a href="exec:i = 36 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/36.jpg" height="120" /></div></a> <a href="exec:i = 37 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/37.jpg" height="120" /></div></a> <a href="exec:i = 38 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/38.jpg" height="120" /></div></a> <a href="exec:i = 39 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/39.jpg" height="120" /></div></a> <a href="exec:i = 40 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/40.jpg" height="120" /></div></a> <a href="exec:i = 41 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/41.jpg" height="120" /></div></a> <a href="exec:i = 42 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/42.jpg" height="120" /></div></a> <a href="exec:i = 43 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/43.jpg" height="120" /></div></a> <a href="exec:i = 44 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/44.jpg" height="120" /></div></a> <a href="exec:i = 45 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/45.jpg" height="120" /></div></a> <a href="exec:i = 46 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/46.jpg" height="120" /></div></a> <a href="exec:i = 47 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/47.jpg" height="120" /></div></a> <a href="exec:i = 48 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/48.jpg" height="120" /></div></a> <a href="exec:i = 49 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/49.jpg" height="120" /></div></a> <a href="exec:i = 50 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/50.jpg" height="120" /></div></a> <a href="exec:i = 51 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/51.jpg" height="120" /></div></a> <a href="exec:i = 52 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/52.jpg" height="120" /></div></a> <a href="exec:i = 53 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/53.jpg" height="120" /></div></a> <a href="exec:i = 54 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/54.jpg" height="120" /></div></a> <a href="exec:i = 55 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/55.jpg" height="120" /></div></a> <a href="exec:i = 56 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/56.jpg" height="120" /></div></a> <a href="exec:i = 57 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/57.jpg" height="120" /></div></a> <a href="exec:i = 58 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/58.jpg" height="120" /></div></a> <a href="exec:i = 59 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/59.jpg" height="120" /></div></a> <a href="exec:i = 60 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/60.jpg" height="120" /></div></a> <a href="exec:i = 61 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/61.jpg" height="120" /></div></a> <a href="exec:i = 62 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/62.jpg" height="120" /></div></a> <a href="exec:i = 63 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/63.jpg" height="120" /></div></a> <a href="exec:i = 64 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/64.jpg" height="120" /></div></a> <a href="exec:i = 65 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/65.jpg" height="120" /></div></a> <a href="exec:i = 66 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/66.jpg" height="120" /></div></a> <a href="exec:i = 67 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/67.jpg" height="120" /></div></a> <a href="exec:i = 68 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/68.jpg" height="120" /></div></a> <a href="exec:i = 69 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/69.jpg" height="120" /></div></a> <a href="exec:i = 70 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/70.jpg" height="120" /></div></a> <a href="exec:i = 71 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/71.jpg" height="120" /></div></a> <a href="exec:i = 72 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/72.jpg" height="120" /></div></a> <a href="exec:i = 73 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/73.jpg" height="120" /></div></a> <a href="exec:i = 74 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/74.jpg" height="120" /></div></a> <a href="exec:i = 75 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/75.jpg" height="120" /></div></a> <a href="exec:i = 76 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/76.jpg" height="120" /></div></a> <a href="exec:i = 77 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/77.jpg" height="120" /></div></a> <a href="exec:i = 78 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/78.jpg" height="120" /></div></a> <a href="exec:i = 79 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/79.jpg" height="120" /></div></a> <a href="exec:i = 80 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/80.jpg" height="120" /></div></a> <a href="exec:i = 81 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/81.jpg" height="120" /></div></a> <a href="exec:i = 82 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/82.jpg" height="120" /></div></a> <a href="exec:i = 83 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/83.jpg" height="120" /></div></a> <a href="exec:i = 84 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/84.jpg" height="120" /></div></a> <a href="exec:i = 85 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/85.jpg" height="120" /></div></a> <a href="exec:i = 86 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/86.jpg" height="120" /></div></a> <a href="exec:i = 87 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/87.jpg" height="120" /></div></a> <a href="exec:i = 88 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/88.jpg" height="120" /></div></a> <a href="exec:i = 89 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/89.jpg" height="120" /></div></a> <a href="exec:i = 90 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/90.jpg" height="120" /></div></a> <a href="exec:i = 91 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/91.jpg" height="120" /></div></a> <a href="exec:i = 92 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/92.jpg" height="120" /></div></a> <a href="exec:i = 93 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/93.jpg" height="120" /></div></a> <a href="exec:i = 94 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/94.jpg" height="120" /></div></a> <a href="exec:i = 95 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/95.jpg" height="120" /></div></a> <a href="exec:i = 96 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/96.jpg" height="120" /></div></a> <a href="exec:i = 97 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/97.jpg" height="120" /></div></a> <a href="exec:i = 98 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/98.jpg" height="120" /></div></a> <a href="exec:i = 99 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/99.jpg" height="120" /></div></a> <a href="exec:i = 100 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/100.jpg" height="120" /></div></a> <a href="exec:i = 101 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/101.jpg" height="120" /></div></a> <a href="exec:i = 102 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/102.jpg" height="120" /></div></a> <a href="exec:i = 103 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/103.jpg" height="120" /></div></a> <a href="exec:i = 104 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/104.jpg" height="120" /></div></a> <a href="exec:i = 105 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/105.jpg" height="120" /></div></a> <a href="exec:i = 106 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/106.jpg" height="120" /></div></a> <a href="exec:i = 107 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/107.jpg" height="120" /></div></a> <a href="exec:i = 108 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/108.jpg" height="120" /></div></a> <a href="exec:i = 109 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/109.jpg" height="120" /></div></a> <a href="exec:i = 110 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/110.jpg" height="120" /></div></a> <a href="exec:i = 111 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/111.jpg" height="120" /></div></a> <a href="exec:i = 112 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/112.jpg" height="120" /></div></a> <a href="exec:i = 113 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/113.jpg" height="120" /></div></a> <a href="exec:i = 114 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/114.jpg" height="120" /></div></a> <a href="exec:i = 115 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/115.jpg" height="120" /></div></a> <a href="exec:i = 116 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/116.jpg" height="120" /></div></a> <a href="exec:i = 117 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/117.jpg" height="120" /></div></a> <a href="exec:i = 118 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/118.jpg" height="120" /></div></a> <a href="exec:i = 119 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/119.jpg" height="120" /></div></a> <a href="exec:i = 120 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/120.jpg" height="120" /></div></a> <a href="exec:i = 121 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/121.jpg" height="120" /></div></a> <a href="exec:i = 122 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/122.jpg" height="120" /></div></a> <a href="exec:i = 123 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/123.jpg" height="120" /></div></a> <a href="exec:i = 124 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/124.jpg" height="120" /></div></a> <a href="exec:i = 125 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/125.jpg" height="120" /></div></a> <a href="exec:i = 126 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/126.jpg" height="120" /></div></a> <a href="exec:i = 127 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/127.jpg" height="120" /></div></a> <a href="exec:i = 128 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/128.jpg" height="120" /></div></a> <a href="exec:i = 129 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/129.jpg" height="120" /></div></a> <a href="exec:i = 130 & dynamic $shmotmag"><div style="width:100%; max-width:100px; max-height:120px;"><img src="images/clothes/newclo/130.jpg" height="120" /></div></a>
	</tr></table>'
	!'
	<a href="exec:i = 1 & dynamic $shmotmag"><img src="images/clothes/newclo/1.jpg" width="100"</a> <a href="exec:i = 2 & view ''images/clothes/newclo/2.jpg'' & dynamic $shmotmag">Option2</a> <a href="exec:i = 3 & view ''images/clothes/newclo/3.jpg'' & dynamic $shmotmag">Option3</a> <a href="exec:i = 4 & view ''images/clothes/newclo/4.jpg'' & dynamic $shmotmag">Option4</a> <a href="exec:i = 5 & view ''images/clothes/newclo/5.jpg'' & dynamic $shmotmag">Option5</a> <a href="exec:i = 6 & view ''images/clothes/newclo/6.jpg'' & dynamic $shmotmag">Option6</a> <a href="exec:i = 7 & view ''images/clothes/newclo/7.jpg'' & dynamic $shmotmag">Option7</a> <a href="exec:i = 8 & view ''images/clothes/newclo/8.jpg'' & dynamic $shmotmag">Option8</a>
	<a href="exec:i = 9 & view ''images/clothes/newclo/9.jpg'' & dynamic $shmotmag">Option9</a> <a href="exec:i = 10 & view ''images/clothes/newclo/10.jpg'' & dynamic $shmotmag">Option10</a> <a href="exec:i = 11 & view ''images/clothes/newclo/11.jpg'' & dynamic $shmotmag">Option11</a> <a href="exec:i = 12 & view ''images/clothes/newclo/12.jpg'' & dynamic $shmotmag">Option12</a> <a href="exec:i = 13 & view ''images/clothes/newclo/13.jpg'' & dynamic $shmotmag">Option13</a> <a href="exec:i = 14 & view ''images/clothes/newclo/14.jpg'' & dynamic $shmotmag">Option14</a> <a href="exec:i = 15 & view ''images/clothes/newclo/15.jpg'' & dynamic $shmotmag">Option15</a> <a href="exec:i = 16 & view ''images/clothes/newclo/16.jpg'' & dynamic $shmotmag">Option16</a>
	<a href="exec:i = 17 & view ''images/clothes/newclo/17.jpg'' & dynamic $shmotmag">Option17</a> <a href="exec:i = 18 & view ''images/clothes/newclo/18.jpg'' & dynamic $shmotmag">Option18</a> <a href="exec:i = 19 & view ''images/clothes/newclo/19.jpg'' & dynamic $shmotmag">Option19</a> <a href="exec:i = 20 & view ''images/clothes/newclo/20.jpg'' & dynamic $shmotmag">Option20</a> <a href="exec:i = 21 & view ''images/clothes/newclo/21.jpg'' & dynamic $shmotmag">Option21</a> <a href="exec:i = 22 & view ''images/clothes/newclo/22.jpg'' & dynamic $shmotmag">Option22</a> <a href="exec:i = 23 & view ''images/clothes/newclo/23.jpg'' & dynamic $shmotmag">Option23</a> <a href="exec:i = 24 & view ''images/clothes/newclo/24.jpg'' & dynamic $shmotmag">Option24</a>
	<a href="exec:i = 25 & view ''images/clothes/newclo/25.jpg'' & dynamic $shmotmag">Option25</a> <a href="exec:i = 26 & view ''images/clothes/newclo/26.jpg'' & dynamic $shmotmag">Option26</a> <a href="exec:i = 27 & view ''images/clothes/newclo/27.jpg'' & dynamic $shmotmag">Option27</a> <a href="exec:i = 28 & view ''images/clothes/newclo/28.jpg'' & dynamic $shmotmag">Option28</a> <a href="exec:i = 29 & view ''images/clothes/newclo/29.jpg'' & dynamic $shmotmag">Option29</a> <a href="exec:i = 30 & view ''images/clothes/newclo/30.jpg'' & dynamic $shmotmag">Option30</a> <a href="exec:i = 31 & view ''images/clothes/newclo/31.jpg'' & dynamic $shmotmag">Option31</a> <a href="exec:i = 32 & view ''images/clothes/newclo/32.jpg'' & dynamic $shmotmag">Option32</a>
	<a href="exec:i = 33 & view ''images/clothes/newclo/33.jpg'' & dynamic $shmotmag">Option33</a> <a href="exec:i = 34 & view ''images/clothes/newclo/34.jpg'' & dynamic $shmotmag">Option34</a> <a href="exec:i = 35 & view ''images/clothes/newclo/35.jpg'' & dynamic $shmotmag">Option35</a> <a href="exec:i = 36 & view ''images/clothes/newclo/36.jpg'' & dynamic $shmotmag">Option36</a> <a href="exec:i = 37 & view ''images/clothes/newclo/37.jpg'' & dynamic $shmotmag">Option37</a> <a href="exec:i = 38 & view ''images/clothes/newclo/38.jpg'' & dynamic $shmotmag">Option38</a> <a href="exec:i = 39 & view ''images/clothes/newclo/39.jpg'' & dynamic $shmotmag">Option39</a> <a href="exec:i = 40 & view ''images/clothes/newclo/40.jpg'' & dynamic $shmotmag">Option40</a>
	<a href="exec:i = 41 & view ''images/clothes/newclo/41.jpg'' & dynamic $shmotmag">Option41</a> <a href="exec:i = 42 & view ''images/clothes/newclo/42.jpg'' & dynamic $shmotmag">Option42</a> <a href="exec:i = 43 & view ''images/clothes/newclo/43.jpg'' & dynamic $shmotmag">Option43</a> <a href="exec:i = 44 & view ''images/clothes/newclo/44.jpg'' & dynamic $shmotmag">Option44</a> <a href="exec:i = 45 & view ''images/clothes/newclo/45.jpg'' & dynamic $shmotmag">Option45</a> <a href="exec:i = 46 & view ''images/clothes/newclo/46.jpg'' & dynamic $shmotmag">Option46</a> <a href="exec:i = 47 & view ''images/clothes/newclo/47.jpg'' & dynamic $shmotmag">Option47</a> <a href="exec:i = 48 & view ''images/clothes/newclo/48.jpg'' & dynamic $shmotmag">Option48</a>
	<a href="exec:i = 49 & view ''images/clothes/newclo/49.jpg'' & dynamic $shmotmag">Option49</a> <a href="exec:i = 50 & view ''images/clothes/newclo/50.jpg'' & dynamic $shmotmag">Option50</a> <a href="exec:i = 51 & view ''images/clothes/newclo/51.jpg'' & dynamic $shmotmag">Option51</a> <a href="exec:i = 52 & view ''images/clothes/newclo/52.jpg'' & dynamic $shmotmag">Option52</a> <a href="exec:i = 53 & view ''images/clothes/newclo/53.jpg'' & dynamic $shmotmag">Option53</a> <a href="exec:i = 54 & view ''images/clothes/newclo/54.jpg'' & dynamic $shmotmag">Option54</a> <a href="exec:i = 55 & view ''images/clothes/newclo/55.jpg'' & dynamic $shmotmag">Option55</a> <a href="exec:i = 56 & view ''images/clothes/newclo/56.jpg'' & dynamic $shmotmag">Option56</a>
	<a href="exec:i = 57 & view ''images/clothes/newclo/57.jpg'' & dynamic $shmotmag">Option57</a> <a href="exec:i = 58 & view ''images/clothes/newclo/58.jpg'' & dynamic $shmotmag">Option58</a> <a href="exec:i = 59 & view ''images/clothes/newclo/59.jpg'' & dynamic $shmotmag">Option59</a> <a href="exec:i = 60 & view ''images/clothes/newclo/60.jpg'' & dynamic $shmotmag">Option60</a> <a href="exec:i = 61 & view ''images/clothes/newclo/61.jpg'' & dynamic $shmotmag">Option61</a> <a href="exec:i = 62 & view ''images/clothes/newclo/62.jpg'' & dynamic $shmotmag">Option62</a> <a href="exec:i = 63 & view ''images/clothes/newclo/63.jpg'' & dynamic $shmotmag">Option63</a> <a href="exec:i = 64 & view ''images/clothes/newclo/64.jpg'' & dynamic $shmotmag">Option64</a>
	<a href="exec:i = 65 & view ''images/clothes/newclo/65.jpg'' & dynamic $shmotmag">Option65</a> <a href="exec:i = 66 & view ''images/clothes/newclo/66.jpg'' & dynamic $shmotmag">Option66</a> <a href="exec:i = 67 & view ''images/clothes/newclo/67.jpg'' & dynamic $shmotmag">Option67</a> <a href="exec:i = 68 & view ''images/clothes/newclo/68.jpg'' & dynamic $shmotmag">Option68</a> <a href="exec:i = 69 & view ''images/clothes/newclo/69.jpg'' & dynamic $shmotmag">Option69</a> <a href="exec:i = 70 & view ''images/clothes/newclo/70.jpg'' & dynamic $shmotmag">Option70</a> <a href="exec:i = 71 & view ''images/clothes/newclo/71.jpg'' & dynamic $shmotmag">Option71</a> <a href="exec:i = 72 & view ''images/clothes/newclo/72.jpg'' & dynamic $shmotmag">Option72</a>
	<a href="exec:i = 73 & view ''images/clothes/newclo/73.jpg'' & dynamic $shmotmag">Option73</a> <a href="exec:i = 74 & view ''images/clothes/newclo/74.jpg'' & dynamic $shmotmag">Option74</a> <a href="exec:i = 75 & view ''images/clothes/newclo/75.jpg'' & dynamic $shmotmag">Option75</a> <a href="exec:i = 76 & view ''images/clothes/newclo/76.jpg'' & dynamic $shmotmag">Option76</a> <a href="exec:i = 77 & view ''images/clothes/newclo/77.jpg'' & dynamic $shmotmag">Option77</a> <a href="exec:i = 78 & view ''images/clothes/newclo/78.jpg'' & dynamic $shmotmag">Option78</a> <a href="exec:i = 79 & view ''images/clothes/newclo/79.jpg'' & dynamic $shmotmag">Option79</a> <a href="exec:i = 80 & view ''images/clothes/newclo/80.jpg'' & dynamic $shmotmag">Option80</a>
	<a href="exec:i = 81 & view ''images/clothes/newclo/81.jpg'' & dynamic $shmotmag">Option81</a> <a href="exec:i = 82 & view ''images/clothes/newclo/82.jpg'' & dynamic $shmotmag">Option82</a> <a href="exec:i = 83 & view ''images/clothes/newclo/83.jpg'' & dynamic $shmotmag">Option83</a> <a href="exec:i = 84 & view ''images/clothes/newclo/84.jpg'' & dynamic $shmotmag">Option84</a> <a href="exec:i = 85 & view ''images/clothes/newclo/85.jpg'' & dynamic $shmotmag">Option85</a> <a href="exec:i = 86 & view ''images/clothes/newclo/86.jpg'' & dynamic $shmotmag">Option86</a> <a href="exec:i = 87 & view ''images/clothes/newclo/87.jpg'' & dynamic $shmotmag">Option87</a> <a href="exec:i = 88 & view ''images/clothes/newclo/88.jpg'' & dynamic $shmotmag">Option88</a>
	<a href="exec:i = 89 & view ''images/clothes/newclo/89.jpg'' & dynamic $shmotmag">Option89</a> <a href="exec:i = 90 & view ''images/clothes/newclo/90.jpg'' & dynamic $shmotmag">Option90</a> <a href="exec:i = 91 & view ''images/clothes/newclo/91.jpg'' & dynamic $shmotmag">Option91</a> <a href="exec:i = 92 & view ''images/clothes/newclo/92.jpg'' & dynamic $shmotmag">Option92</a> <a href="exec:i = 93 & view ''images/clothes/newclo/93.jpg'' & dynamic $shmotmag">Option93</a> <a href="exec:i = 94 & view ''images/clothes/newclo/94.jpg'' & dynamic $shmotmag">Option94</a> <a href="exec:i = 95 & view ''images/clothes/newclo/95.jpg'' & dynamic $shmotmag">Option95</a> <a href="exec:i = 96 & view ''images/clothes/newclo/96.jpg'' & dynamic $shmotmag">Option96</a>
	<a href="exec:i = 97 & view ''images/clothes/newclo/97.jpg'' & dynamic $shmotmag">Option97</a> <a href="exec:i = 98 & view ''images/clothes/newclo/98.jpg'' & dynamic $shmotmag">Option98</a> <a href="exec:i = 99 & view ''images/clothes/newclo/99.jpg'' & dynamic $shmotmag">Option99</a> <a href="exec:i = 100 & view ''images/clothes/newclo/100.jpg'' & dynamic $shmotmag">Option100</a> <a href="exec:i = 101 & view ''images/clothes/newclo/101.jpg'' & dynamic $shmotmag">Option101</a> <a href="exec:i = 102 & view ''images/clothes/newclo/102.jpg'' & dynamic $shmotmag">Option102</a> <a href="exec:i = 103 & view ''images/clothes/newclo/103.jpg'' & dynamic $shmotmag">Option103</a> <a href="exec:i = 104 & view ''images/clothes/newclo/104.jpg'' & dynamic $shmotmag">Option104</a>
	<a href="exec:i = 105 & view ''images/clothes/newclo/105.jpg'' & dynamic $shmotmag">Option105</a> <a href="exec:i = 106 & view ''images/clothes/newclo/106.jpg'' & dynamic $shmotmag">Option106</a> <a href="exec:i = 107 & view ''images/clothes/newclo/107.jpg'' & dynamic $shmotmag">Option107</a> <a href="exec:i = 108 & view ''images/clothes/newclo/108.jpg'' & dynamic $shmotmag">Option108</a> <a href="exec:i = 109 & view ''images/clothes/newclo/109.jpg'' & dynamic $shmotmag">Option109</a> <a href="exec:i = 110 & view ''images/clothes/newclo/110.jpg'' & dynamic $shmotmag">Option110</a> <a href="exec:i = 111 & view ''images/clothes/newclo/111.jpg'' & dynamic $shmotmag">Option111</a> <a href="exec:i = 112 & view ''images/clothes/newclo/112.jpg'' & dynamic $shmotmag">Option112</a>
	<a href="exec:i = 113 & view ''images/clothes/newclo/113.jpg'' & dynamic $shmotmag">Option113</a> <a href="exec:i = 114 & view ''images/clothes/newclo/114.jpg'' & dynamic $shmotmag">Option114</a> <a href="exec:i = 115 & view ''images/clothes/newclo/115.jpg'' & dynamic $shmotmag">Option115</a> <a href="exec:i = 116 & view ''images/clothes/newclo/116.jpg'' & dynamic $shmotmag">Option116</a> <a href="exec:i = 117 & view ''images/clothes/newclo/117.jpg'' & dynamic $shmotmag">Option117</a> <a href="exec:i = 118 & view ''images/clothes/newclo/118.jpg'' & dynamic $shmotmag">Option118</a> <a href="exec:i = 119 & view ''images/clothes/newclo/119.jpg'' & dynamic $shmotmag">Option119</a> <a href="exec:i = 120 & view ''images/clothes/newclo/120.jpg'' & dynamic $shmotmag">Option120</a>
	<a href="exec:i = 121 & view ''images/clothes/newclo/121.jpg'' & dynamic $shmotmag">Option121</a> <a href="exec:i = 122 & view ''images/clothes/newclo/122.jpg'' & dynamic $shmotmag">Option122</a> <a href="exec:i = 123 & view ''images/clothes/newclo/123.jpg'' & dynamic $shmotmag">Option123</a> <a href="exec:i = 124 & view ''images/clothes/newclo/124.jpg'' & dynamic $shmotmag">Option124</a> <a href="exec:i = 125 & view ''images/clothes/newclo/125.jpg'' & dynamic $shmotmag">Option125</a> <a href="exec:i = 126 & view ''images/clothes/newclo/126.jpg'' & dynamic $shmotmag">Option126</a> <a href="exec:i = 127 & view ''images/clothes/newclo/127.jpg'' & dynamic $shmotmag">Option127</a> <a href="exec:i = 128 & view ''images/clothes/newclo/128.jpg'' & dynamic $shmotmag">Option128</a>
	<a href="exec:i = 129 & view ''images/clothes/newclo/129.jpg'' & dynamic $shmotmag">Option129</a> <a href="exec:i = 130 & view ''images/clothes/newclo/130.jpg'' & dynamic $shmotmag">Option130</a>
	'!
end

--- NewCloShop ---------------------------------
# office
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Office of Engineering companies</font></b></center>'
	'<center><img src="images/etogame/office.jpg"></center>'

	if workSec = 0:'Requirements:diploma proving you passed a secretary certification course.'
	if workSec = 0:'Schedule:9am to 5pm, Monday to Friday.'
	if workSec = 0:'Salary:800 rubles/day, deposited to your bank account on the 25th of the month'
	if workSec = 0:'Dress code:ust come to work in office clothes.'

	if secrDiplom = 1 and workSec = 0 and (work = 0 and workSec = 0 and cheatWork = 1):
		act 'Interview for a job':
			cla
			minut += 60
			'You''ve come to the personnel department, and after taking a look at your diploma and resume they offered you a job as secretary.'

			act 'Refuse':gt 'office', 'start'

			act 'Take the job':
				cla
				work = 1
				workSec = 1
				sekDay = 0
				'You took the work book and said that you could go to work the next business day.'

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

	if hour >= 9 and hour < 17 and workSec >= 1:'You''re late for work and you were sent home.'
	if workSec >= 1 and ofclo = 0 and hour >= 9 and hour < 17:'You are not dressed according to the corporate dress code.'

	if hour < 9 and workSec >= 1 and ofclo = 1:
		act 'Go to work':
			sekDay += 1
			hour = 9
			minut = 0
			gt 'office', 'work'
		end
	end

	if worksec = 1:
		act 'Resign':
			cla
			minut += 30
			work = 0
			workSec = 0
			'You Leave and you don''t get any money for the last month.'

			act 'Leave':gt 'down'
		end
	end

	act 'Leave':gt 'down'
end

if $ARGS[0] = 'work':
	cla
	*clr
	gs 'stat'
	'<center><b><font color="maroon">your workplace</font></b></center>'
	'<center><img src="images/etogame/sekr.jpg"></center>'
	'You sat down at your desk.'

	if fidayoffice = 0:
		fidayoffice = 1
		'The girl at the neighboring table smiled at you:"Hi, I am <<$name>>, and what is your name?"'
		'"<<$name>>, " you answered.'
		'"What, however, it is likely that they would not be confused, all the secretaries name is <<$name>>, to you here she worked also called Saint." she laughed.'
		'"Yeah, it''s that-be boss new names do not remember." you add.'
		'"Well and good laugh enough, come to work, and now the boss will come and we will arrange for the laugh at work." she said and began to disassemble the paper on the table.'
	elseif fidayoffice = 1:
		'<<$name>> as always you were buried up to your nose in papers.'
	end

	if hour < 17:
		act 'Work':
			minut += 60
			cla
			'You print documents, email, and bring your boss coffee.'
			officerand = rand(0, 15)

			if officerand > 8 and svetslut = 0:gt 'office', 'sveta'
			if officerand > 8 and svetslut = 2:gt 'office', 'boss1'
			if officerand > 8 and officelezb > 5 and officekom ! 1:gt 'office', 'komer0'
			if officerand = 10 and officekom = 1:gt 'office', 'komer1'
			if officerand = 11 and officebestslut >= 3:gt 'office', 'motiv1'
			if officerand = 12 and officebestslut >= 3:gt 'office', 'motiv2'
			if officerand = 13 and officebestslut >= 3:gt 'office', 'motiv3'

			if officerand = 9 and officeslut > 5:
				cla
				*clr
				'<center><img src="images/img/office/m0.jpg"></center>'
				'You work somewhere zapropastilas <<$name>>, chef left. In the study includes one of the managers, "Hi <<$name>>, can you help me?"'

				act 'How can I help?':
					cla
					*clr
					'<center><img src="images/img/office/m1.jpg"></center>'
					'"How can I help?" you ask.'
					'"I was told you are great at relieving stress." With these words, he went right up to you and removed his already standing member from his pants. You caught his head and began to move up to his penis.'

					act 'Take by mouth':
						picrand = 54
						officeslut += 1
						guy += 1
						gt 'sex', 'minet'
					end

					if officeslut < 10:
						act 'Send him packing':gt 'office', 'work'
				end
			end
		elseif officerand = 8 and officeslut > 5:
			cla
			*clr
			'<center><img src="images/img/office/m2.jpg"></center>'
			'You work somewhere zapropastilas <<$name>>, chef and left as an evil broke konditseoner. You get too hot and you rastegivat couple top buttons of her blouse, so now your breasts almost falling out of her. In the study includes one of the managers, "Hi <<$name>>, chef at home?".'
			'"No, I left." you answer and dive back into the paper.'
			'"It''s hot here, you." he says slowly approaching you and neotvodya look on your chest that and tries to jump out of blouses.'

			act 'Yes':
				cla
				*clr
				'<center><img src="images/img/office/m3.jpg"></center>'
				'"Yes, damn air conditioner broke down again, " you reply, without looking up.'
				'"Oh I see, you''re just weak." he begins, and suddenly cut short, turns you to itself and you jerked her blouse, well at least not the buttons scattered around, and just jumped out of the loop, bites his lips to your breast, and with all the passion starts to fondle her. You cann''t even first understand what is happening, but that is starting to like you opredelleno.'

				act 'Surrender':
					picrand = 55
					officeslut += 1
					guy += 1
					gt 'sex', 'minet'
				end

				if officeslut < 10:
					act 'Banish it':gt 'office', 'work'
				end
			end
		elseif officerand = 7 and officeslut > 5:
			cla
			*clr
			'<center><img src="images/img/office/m4.jpg"></center>'
			'You should make copies of the documents, and you went to the archive where there was a huge copier. While you copied, came into the office one of the managers, and began to search among stelozhey with folders, you do not pay any attention to him and continued to do their work. A minute later, you felt his hand on my ass. "She asks, tell the truth that you have the best ass and you''re always ready to prove it?" he said, and without waiting for your answer, he continued, "Now I will test it." With these words, his hands slid under your clothes.'

			act 'Let him':
				cla
				*clr
				officeslut += 1
				'<center><img src="images/img/office/m5.jpg"></center>'
				'You said nothing turned to him and kissed her, he began to undress you, and in a minute you were naked to the waist, and he hugged you with one hand, and the second full massaging your pussy. Your hand automatically reached for his pants and pulled out yet fully risen member and began to masturbate.'
				'"That''s clever, and now also, but mouth, " he said.'

				act 'Squatted':
					cla
					*clr
					'<center><img src="images/img/office/m6.jpg"></center>'
					'You squatted down and took his penis in her mouth, he was still sluggish and you easily absorbed it all, moved his mouth taking it in one cheek, then another, soon you will feel as he began to grow in your mouth and is now placed only his third. You selflessly sucked when the office door opened and a girl came marketer, she froze on the threshold of seeing you.'
					'"Oh, sorry, I just do not think" she said, and turned to the door.'
					'"C''mon you Masha, it has not prevented from doing what she wanted, and you can even join" he said.'
					'"No, no thank you, I will not be long." she said and went to the shelves.'
					'You keep doing blowjob not paying attention to her. A few minutes later she graduated and because vydya shelvings start watching you. Then she took the phone and started to shoot you, commenting on the record. "Here is our secretary <<$name>> sucks dick, she izvesna around the office as faultless davalka look with pleasure how she does it. <<$name>> let myself masturbate, something would have been clearly seen that you like it." You''re running a hand between her legs and began to actively play their clitoris. You damn excited that she takes you, and you are beginning to show the camera the entire process, releasing member of his mouth and licking it from the base to the head, then again taking in the mouth and with a contented purr sweetly suck it. She turned to the guy, "She will suck and let''s fuck her already, and I''ll post all gifts, and then send out around the office, let them look at our hos capable, and you try to come on, we''ll make excellent reputation whore that -would you release from the men was not, as you like when you fuck all. " With these words, she went to the corner and stopped, continuing to shoot.'
					'"Now fuck, let posolittle more, it''s so like that even do not want to interrupt."'

					act 'Continue':
						picrand = 56
						officeslut += 3
						guy += 1
						gt 'sex', 'minet'
					end
				end

				if officeslut < 10:
					act 'Banish it':gt 'office', 'work'
				end
			end

			if officeslut < 10:
				act 'Leave':gt 'office', 'work'
			end
		elseif officerand = 6 and officeslut > 5:
			cla
			*clr
			'<center><img src="images/img/office/m8.jpg"></center>'
			'You work somewhere zapropastilas <<$name>>, chef left. In the study includes one of the managers, "Hi <<$name>>, chef at home?".'
			'"No, I left." you answer and dive back into the paper.'
			'"Why are you so tense, I''ll let massazhik do." he says, and not waiting for an answer comes behind you and starts massaging your shoulders. This really helps you relax in a chair, close your eyes and enjoy, yet strong hands massaging your shoulders.'
			'"Well liked?" His voice brought you back to earth'

			act 'Yes':
				cla
				*clr
				'<center><img src="images/img/office/m9.jpg"></center>'
				'"Yes, very much, thank you, " you reply without opening his eyes.'
				'"Well thank you, it''s too much, but mutual aid will be just right." he says.'
				'"What do you mean?" you started, but opened his eyes immediately realized what he was saying. In front of your eyes was standing member, you yourself do not understand how the hand and pulled him vskhvatila mouth, and the mouth is slightly parted ready to take it dildo. "What am I doing?" flashed through your mind. "Apparently I was so used to be given to this office, it is already at the level of reflexes. So take or not to take, that is the question."'

				act 'Mark':
					picrand = 57
					officeslut += 1
					guy += 1
					gt 'sex', 'minet'
				end

				if officeslut < 10:
					act 'Banish it':gt 'office', 'work'
				end
			end
		elseif officerand = 5 and officeslut > 5:
			cla
			*clr
			'<center><img src="images/img/office/m10.jpg"></center>'
			'You work somewhere zapropastilas <<$name>>, chef left and you re-freezes the computer. Swearing you call your sysadmin and ask him to come. In the study included a sysadmin and looking at computer govoit that he take it now and tomorrow will bring. "What am I going to do tomorrow, come here now and correct." you started.'
			'"Well, no, it''s long, I have other work for many more, although we can agree and then I will fix it for you now, " he says'
			'"And how do we agree?" you ask.'
			'"Well, you''re the girl that in itself is not operational, everyone knows how you can negotiate." he says.'

			act 'And how do':
				cla
				*clr
				'<center><img src="images/img/office/m11.jpg"></center>'
				'"Yes, very simply, " he says, and respond quickly pulls out his cock.'
				'While you''re standing in a stupor pridamat trying to say, he pushes you in a chair and vskhvativ hair attracts her dildo. Once you open your mouth something to say something, as he immediately volzovalsya this and pushed his penis in your mouth.'

				act 'Suck':
					picrand = 58
					officeslut += 1
					guy += 1
					gt 'sex', 'minet'
				end

				if officeslut < 10:
					act 'Bite':
						cla
						'You squeeze teeth, he screamed and pulls his dick out of your mouth and say "Bitch!" runs out of the office. You kick the computer out of anger and lo and behold, he is running again.'

						act 'Back to work':gt 'office', 'work'
					end
				end
			end
		elseif officerand = 0 and officeslut > 20 and officebestslut < 1:
			cla
			*clr
			officebestslut = 1
			officeslut += 1
			gang += 1
			guy += 4
			'<center><img src="images/img/office/g3.jpg"></center>'
			'In office boss runs, and immediately begins to tell you, "Well, then the <<$name>>, in the conference room now sit four of our largest shareholder, I was a little nakosyachil and now I need some time to prepare the documents which your task is now to go to them and make sure that -would be for them this hour goes as well, something they would not even remember me. Well, you''re a smart girl, the whole office is fucked, so fuck four more, and I will appoint you to a position in accordance with your talents. Let''s run Sammy''s ass, let them fuck your ass today, and not mine. All run. " You got up and headed to the conferenc room, on the road thinking about what position he spoke, and what kind of talent you are, but to fuck with everyone. Entering the room you viditechetveryh men, clearly not in the best mood. "Well, I now have the same otebut" flashed in your head, but to be out late, you yourself made the reputation of the office whore. You push the skirt bares his chest and calmly climbs on the table in front of them. "Lord for your contribution to the development naschego business today you are given a present from the company, you can not only watch but also to touch wherever you like and paste it wherever you want and desire." do not believe what you do, you just close your eyes prepare for what is now holes on your living space will not leave.'

			act 'Start':
				picrand = 17
				gt 'paysex', 'var'
			end
		end

		act 'Finish':gt 'office', 'work'
	end

	act 'In the principal''s office':gt 'office', 'boss'
	act 'Corridor':gt 'office', 'kor'

	act 'Chat with Sveta':
		cla
		minut += 30
		officerand = rand(0, 10)

		if officeslut > 0 and officerand > 8:gt 'office', 'negr'

		officebolt = rand(0, 3)

		if officebolt = 0:'"Can you imagine, say, our bookkeeper at corporate which has 40, stuck to one of the managers trying to get him into office. He barely escaped." - Raskazala <<$name>>.'
		if officebolt = 1:'"Imagine, in one corporate party so I typed that danced a striptease on the table at all, then I was so ashamed, all went finger poked, I even wanted to resign, but changed her mind, boss gave me even a premium, I said that office decoration, and if the rest of the finger poke, so this is what the show is nothing to them. " - Raskazala <<$name>>.'
		if officebolt = 2:'"We had one girl, so she marketer at regular gatherings drunk and fell asleep in the common room, and woke up naked and covered in semen, around 20 prezikov used pieces lying around, I do not know how many people raped her there, but it two days later for Labour came vraskoryachku and could not sit down. " - Raskazala <<$name>>.'
		if officebolt = 3:'"Imagine, in one corporate party our sysadmin drunk and fell asleep in the toilet, so marketers girls opened his warehouse and typing older keyboards and there are boards that strapped it all to him with tape, turned knight in armor, so we all office in the morning the toilet waiting when he wakes up, he went out and only then realized that something strapped to it.''s laughter that was. " - Raskazala <<$name>>.'

		act 'Finish':gt 'office', 'work'
	end

	if svetslut = 1:
		act '<<$name>> to ask about her relationship with the boss':
			cla
			minut += 30
			svetslut = 2
			'"<<$name>> and what is your relationship with the boss?" you asked.'
			'"What has sang that <<$name>> slut barefoot sleeping?" she snapped.'
			'"No, no one spoke, I just opened the door and you are on Kolyanom with by a dick in your mouth." you answered in the same tone.'
			'"Come on do not be mad, I thought again, dear colleagues tongue to dissolve. And I with my boss so perepihnemsya in office and run away, he underpaid me for it, if you are about it." said <<$name>>'
			'"No, I was just asking." told you.'
			'"You I''m sorry that I said, just thinking that they are again forgotten what he once unsatisfied." said <<$name>>.'
			'"And why do it again?" you asked.'
			'"Yes they are already started poking fingers, and I''m just going to leave, well, took to complete the whole month. So their boss month, all" fuck "without vazilina, when I came back, so they''ll all so kind and gentle Svetochka want it, want it, hypocrisy. " she replied.'
			'"A wife that he does not?" you asked'
			'"And who knows, I''ve never seen it, well, probably does not, then when I''m back from vacation, he gave me two days out of the office almost did not issue, I took a day off after a whole day in the bathroom provolyalas not believe this walk almost could not sit down and do not say anything about, I did not close ass week. So here so unsatisfied vyebet boss or secretary, or all. And I like to be a secretary, I''m lonely, healthy, young girl and also want sex, that''s just more than a month on vacation do not go, I remember, so sit the patient becomes. " she laughed.'
			'There came into the office one of the managers with a pile of papers and you have to interrupt your conversation.'

			act 'Finish':gt 'office', 'work'
		end
	elseif svetslut = 3:
		act 'Ask about sex in the office with you.':
			cla
			minut += 30
			svetslut = 4
			'Waiting when the boss is not at home, you have decided to ask Amy about the incident in the office of the chief.'
			'"Well, it was, as you know, I''ll be back in a minute with the tea?" you asked'
			'"Well I''m sorry I could not help it when you''re out he started kissing me, and I turned on if I did not stop. I was once in the metro began groping someone, so I''m still trying his hands with clean themselves in the crush was so excited that he gave right there in the car, in front of everyone, I was so ashamed, I still do not go on the subway. Chief really wanted to stop, but I said you were not going to chat and still know the entire office. " said <<$name>>.'
			'"Are you really can not stay?" you asked.'
			'"Well, not Leavee so, I have a threshold, but it is very low. I honestly when you see these things with tea very much like what would you now, but if it is absolutely honest, I could not stop but continued especially something to you Seeing and now. " she said.'

			act 'Say it like you':
				cla
				*clr
				officelezb = 1
				'<center><img src="images/img/office/s2.jpg"></center>'
				'"Well, actually, I like you too, but only you, but he is not, so I left." told you.'
				'"But with this point in detail, " said <<$name>>, closing the door with a key and sitting on your desk, "We definitely worth to clarify this issue, so to speak delve into the basics." she continued.'

				act '"Not now"':
					cla
					'"We will investigate this issue with you, but not now, maybe later." you said'
					'"Well, just do not forget me this question very interested" said <<$name>> and opened the door back behind his desk.'

					act 'Back to work':gt 'office', 'work'
				end

				act 'Raise no objection':
					cla
					*clr
					'<center><img src="images/img/office/s3.jpg"></center>'
					'"The question really needs more careful study." With these words, you got up and threw one knee on the table. <<$name>> immediately floated hands, they slipped through your body and now she unbuttoned on your clothes.'

					act 'Continue':
						cla
						*clr
						girl += 1
						lesbian += 1
						'<center><img src="images/img/office/s4.jpg"></center>'
						'You sat down on the table allowing you to undress her. She undressed you procrastinate, licking on every bare inch of your body, her tongue was just a huge, very long and thick, you even thought about how he placed in her mouth. You are excited to have so many that felt like a puddle beneath you going out of your selections.'

						act 'Let continues':
							cla
							*clr
							orgasm += 1
							'<center><img src="images/img/office/s5.jpg"></center>'
							'You threw your feet on the table and shirokorazveli knees to the side, giving her maximum access to your pussy. <<$name>> pulled off her panties and began to push them to you in the pussy, you first want to argue, but the feel of silk sliding your pussy like you and deprive you leaned forward, urging her to continue. <<$name>> glared lips you pussy and began to caress your clitoris tongue while medleno pulling panties out of your vagina when they are almost completely vyskozili she began to push back their language, so repeated numberless times. Soon you felt that here now over.'

							act 'Come':
								cla
								'You started to finish and pleasant waves of orgasm enveloped you, when finished <<$name>> pulled out of you her panties stuffed them sede mouth and started to remove medleno literally embroidering of them every drop, "Vkusnyashka, only next time do not be so selfish, and I cease to be friends with you. " she said.'

								act 'Back to work':gt 'office', 'work'
							end

							act 'Meet each other':
								cla
								*clr
								'<center><img src="images/img/office/s7.jpg"></center>'
								'You stop the light and lay down on the table, waving her tongue between his fingers spread apart. She smiled, realizing what you want and quickly climbed onto the table. You follow her example took her panties and shoved them in her pussy, but your language is not so large and is pushed them into her vagina you did not, then did you do it with your fingers and tongue began treating her clitoris. <<$name>> at this time literally fucked you with his tongue, you create a sense of what''s inside you is not a member of a language, but very nimble and agile. After a couple of minutes you pochuvsvovali as her body began to tremble and she came in a few seconds you have followed suit, and enveloped you orgasm.'

								act 'Back to work':gt 'office', 'work'
							end
						end

						act 'Lick her':
							cla
							*clr
							'<center><img src="images/img/office/s6.jpg"></center>'
							'You helped Sveta lie down on the table and began to fondle her pussy tongue, she took her panties and began to push them into your pussy, you have removed her hand and proceeded to do. You shoved her pussy panties, then pulled them medleno and again thrust, while not ceasing tongue caress her clitoris. After a couple of minutes you pochuvsvovali as her body began to tremble, ready to finish.'

							act 'Let ends':
								cla
								'When she had finished, she said "Just let the next time you give yourself to me to meet, and I do not want vygledet selfish."'

								act 'Back to work':gt 'office', 'work'
							end

							act 'Meet each other':
								cla
								*clr
								orgasm += 1
								'<center><img src="images/img/office/s7.jpg"></center>'
								'You stopped and spihnuv <<$name>> from the table, went at it yourself, waving her tongue between his fingers spread apart. She smiled, realizing what you want and quickly climbed onto the table. You took the panties and stuffed them in her pussy, her clitoris prodolzhayaaktivno process language. <<$name>> at this time literally fucked you with his tongue, you create a sense of what''s inside you is not a member of a language, but very nimble and agile. After a couple of minutes you pochuvsvovali as her body began to tremble and she came in a few seconds you have followed suit, and enveloped you orgasm.'

								act 'Back to work':gt 'office', 'work'
							end
						end
					end

					act 'Not now':
						cla
						'"We will investigate this issue with you, but not now, maybe later." you said'
						'"Well, just do not forget me this question very interested" said <<$name>> and opened the door back behind his desk.'

						act 'Back to work':gt 'office', 'work'
					end
				end
			end

			act 'Indignant':
				cla
				'"What do you mean, I never would have joined, how do you do this came to mind. All closed the subject and do not start." cut you.'

				act 'Back to work':gt 'office', 'work'
			end
		end
	end

	if officelezb > 0 or officeslut > 0:
		act 'Pester World':
			cla
			*clr
			minut += 30
			officerand = rand(0, 10)

			if officeslut > 0 and officerand > 8:gt 'office', 'dostavka'

			lesbian += 1
			picrand = 19
			officelezb += 1
			'<center><img src="images/img/office/s8.jpg"></center>'
			'You climb on the table and legs spread wide are calling <<$name>> "<<$name>> you do not help me in an intimate question?".'
			'Sveta separates the head from the papers and her face slips smile, "Well, it does not help, be sure to help you.". With these words, she rises from the table and sent to you, simultaneously closing the door.'

				act 'Start':xgt 'lezbsex', 'var'
			end
		end
	elseif hour >= 17:
		act 'Leave work':gt 'down'
	end
end

if $ARGS[0] = 'boss':
	cla
	*clr
	minut += 15
	officerand = rand(0, 15)

	if officeslut > 0 and officerand = 10:gt 'office', 'boss2'
	if officeslut > 0 and officerand = 9:gt 'office', 'boss3'
	if officeslut > 0 and officerand = 8:gt 'office', 'boss4'
	if officeslut > 0 and officerand = 7:gt 'office', 'boss5'
	if officeslut > 0 and officerand = 6:gt 'office', 'boss6'

	gs 'stat'
	'<center><b><font color="maroon">Account Officer</font></b></center>'
	'<center><img src="images/etogame/boss.jpg"></center>'

	if officebestslut = 1:
		cla
		'"And here you are, well Come on, sit down. Came for the new appointment." he says.'
		'"And what is the position?" ask you, sitting in a chair.'
		'"Yes, actually it is not a position, and additional responsibilities, but with very good additional charge." he says.'
		'"And what do I have to do." you ask.'
		'"Yes soobstvenno nothing new will motivate some employees, and of helping to conclude contracts and delivery of objects." he says.'
		'"And how to motivate" misunderstanding you ask.'
		'"Yes, as usual, is that people get tired, naturally performance drops, deadlines are screwed, and we pay a penalty, but if they just promotivirot that work will be completed in time. Here you''ll motivate them, but as I think you yourself dogadyvaeshs, and I tell them that you will kotrolirovat their work. Well when contracting the same distracting them from a careful reading of the contract, his body. That something like this, all right? " he asks.'
		'"So you want me to become a full-time whore, and how much extra charge?" asked you do not believe in something that is not sent it immediately, but also interested in the price.'
		'"20,000 per month plus a basic salary, as well, do you agree?" he says, his face blurred satisfied smile, as if you have already agreed to.'

		act 'Agree':
			cla
			officebestslut = 3
			'"Well, I agree." you reply.'
			'"That''s good, well, then going to the city is just one solid client arrived, he is now in a hotel, go to it together. See how you can do it." he said.'

			act 'Go':gt 'office', 'motiv0'
		end

		act 'Refuse':
			cla
			'"No, thanks, I''m not a prostitute, I fuck for fun, not for money, " you reply.'
			'"Well, then fuck for fun, day gi count premium for good work. Predlogat Mind you I do I will not. So how exactly otkazyvaeshs soglasishsya or still?" he says.'

			act 'Agree':
				cla
				officebestslut = 3
				'"Well, I agree." you reply.'
				'"That''s good, well, then going to the city is just one solid client arrived, he is now in a hotel, go to it together. See how you can do it." he said.'
				act 'Go':gt 'office', 'motiv0'
			end

			act 'Refuse':
				officebestslut = 2
				gt 'office', 'work'
			end
		end
	end

	if officeslut > 0:
		act 'Harassing boss':
			cla
			*clr
			officeslut += 1
			picrand = rand(61, 63)
			'<center><img src="images/img/office/b<<picrand>>.jpg"></center>'
			'Seeing that in the study besides the chief one, you close the door with a wink to the <<$name>> she did not let her in, she smiled and makes you wagged his finger and whispered "slut." You are going to the boss on the move getting rid of clothes. Going into the dense you kiss him and say, "I''ve got a chef that it came out, you do not see?" and spreads her legs a little.'
			'"I wonder what happened to my best employee, let''s see, " he says.'

			act 'Spread her legs ':gt 'sex', 'kuni'
		end
	end

	act 'Leave the office':gt 'office', 'work'
end

if $ARGS[0] = 'kor':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">corridor</font></b></center>'
	'<center><img src="images/etogame/office.jpg"></center>'

	if hour < 17:
		act 'To their workplace':gt 'office', 'work'
		act 'Restroom':gt 'office', 'kuh'
	elseif hour >= 17:
		act 'Leave work':gt 'down'
	end
end

if $ARGS[0] = 'kuh':
	cla
	*clr
	minut += 5
	gs 'stat'
	officerand = rand(0, 10)

	if officerand > 8 and officeslut > 8:
		gt 'office', 'gang'
	elseif officerand < 2 and (officeslut > 5 or horny >= 90):
		cla
		*clr
		'<center><img src="images/img/office/m12.jpg"></center>'
		'Entering the room you can see the cooler in one of the managers, "Hello <<$name>>, to have a drink some water." seems it does not interest you want to drink or not, it just brings stakanch to your lips, literally forcing you to drink.'

		act 'Drink':
			cla
			*clr
			'<center><img src="images/img/office/m13.jpg"></center>'
			'You have no choice as a drink, you open your mouth and start drinking. His second hand starts to hug your waist. "Well at least not reached under her skirt, " you think, but its rather posmetrev smirk realized that rushed to conclusions.'
			'"That''s good girl all drunk, you''re all over this docile?" he said, and without waiting for an answer continued, "I know that obedient, I already blogged about that you are very diligent girl" with these words, his hand went up your spine and shoulder blades reaching, he began to press forward, so that you start to bend.'

			if officeslut > 5:'And without waiting for an answer continued "I know that the obedient, I already told, you are a very hardworking girl"'

			'With these words, he began to press forward, so you start to bend.'

			act 'Do not resist':
				cla
				*clr
				officeslut += 1
				'<center><img src="images/img/office/m14.jpg"></center>'
				'Second hand he unbuttoned his pants and unleashed his already standing member. The first hand has moved from the back of your head and continued to push down putting your mouth on his penis.'
				'"That fellow keep myself" he said as his cock was half you in the WTU and began stroking you on the head, you obediently began to suck his cock odnovremmeno masturbate his hand. In office paruraz someone looked, then you heard the door female giggles, like girls in marketing from the next room all the stops at the door and peeped behind you, soon the door opened a little bit and you began to distinguish the girls faces. First you wanted to stay, but his hand on your head you just pressed harder to the penis. And when the door was already half open and you will clearly see how some girls watched with interest for you, and some with phones in their hands shooting going on, this is your only spurred chustvovat and you like to have your feet your juices flowing. Would you like that, would they all vidili and turned slightly, revealing to them the best review.'

				act 'Continue':
					picrand = 59
					officeslut += 1
					guy += 1
					gt 'sex', 'minet'
				end
			end

			if officeslut < 10:
				act 'Push him away and run':gt 'office', 'work'
			end
		end

		exit
	end

	'<center><b><font color="maroon">Lounge</font></b></center>'
	'<center><img src="images/etogame/kuh.jpg"></center>'

	if hour < 17:
		act 'Eat':
			minut += 30
			health += 10
			manna += 5
			willpower += 5

			if energy >= 30:
				fat += 5
				'You can no longer eat.'
			elseif energy >= 20 and energy < 30:
				fat += 3
				energy += 10
				'You pushed through the power of a meal.'
			elseif energy < 20:
				energy += 20
				fat += 1
				'You gladly ate the food.'
			end

			if water >= 20:'You don''t need any more tea.'

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

		act 'Corridor':gt 'office', 'kor'
	elseif hour >= 17:
		act 'Leave work':gt 'down'
	end
end

if $ARGS[0] = 'sveta':
	cla
	*clr
	minut += 30
	svetslut = 1
	'<center><img src="images/img/office/s1.jpg"></center>'
	'You brought the documents to the chief for his signature, and <<$name>> had just gone to him, waiting for ten minutes you have decided to place documents. Opening the door you dumbfounded, stood at the head of the table, and <<$name>> makes him a blowjob on her knees and looking at it through the eyes of devotees. You shut the door quietly, "I hope they let me invisible" you thought.'

	act 'Back to work':gt 'office', 'work'
end

if $ARGS[0] = 'boss1':
	cla
	*clr
	minut += 30
	'<center><img src="images/img/office/b1.jpg"></center>'
	'Chief invited to the <<$name>> itself, it was not 30 minutes, you have already decided that they''re having fun again, when he called and you went into the office, you will not see anything, <<$name>> sitting on the sofa with a notebook in hand and write down something .'
	'"Come in, sit down." said the boss.'
	'You sat down next to the <<$name>> and he began raskazyvat you that you have to do. Ten minutes later, he looked at you and said, "<<$name>>, bring all three of us a cup of tea, and then we sit here for a long time."'

	act 'Bring tea':
		cla
		*clr
		'<center><img src="images/img/office/b2.jpg"></center>'
		'Returning with tea you froze in the doorway, <<$name>> lay on her side on the couch with her legs spread wide, and the chief lying behind her bored into her pussy with his cock. "This is the room and what it means, because they know that I''ll be right back, " you thought.'

		act 'Join':
			cla
			*clr
			officeslut += 1
			balls += 1
			bj += 1
			guy += 1
			girl += 1
			lesbian += 1
			'<center><img src="images/img/office/b3.jpg"></center>'
			'You put the tea tray on the sofa and knelt down and start to fondle his scrotum language. Chef takes you behind the head and presses the stronger their balls, quickly realizing that he wants you pull his balls in her mouth and start to chew as he continues to fuck <<$name>>.'

			act 'Continue':
				cla
				*clr
				'<center><img src="images/img/office/b4.jpg"></center>'
				'He pulled his cock out of the <<$name>> and put it to you standing mouth, a couple of seconds of <<$name>> join you and you started to suck his solo dildo.'

				act 'Substitute him pussy':
					cla
					*clr
					sex += 1
					'<center><img src="images/img/office/b5.jpg"></center>'
					'You get up from the couch doggy style, legs wide apart, head immediately came to you in the vagina, began to fuck her strong sweeping movements. <<$name>> twirled around a bit, sat on the floor between your legs, and her tongue began to caress your clitoris. After a few minutes he took out his cock you with the words "Well now cup your ass <<$name>>, mash it up a bit, and then sat up in a chair all day."'

					act 'Doggy-Style':
						cla
						*clr
						anal += 1
						orgasm += 1
						analorgasm += 1
						'<center><img src="images/img/office/b7.jpg"></center>'
						'You get up on the couch on all fours sticking her ass, <<$name>> immediately climbs under you and it gets you a huge tongue in pussy. Chef settles behind you and giving first World how to lick dick, you insert it into the anus. When your little ass accustomed to the member within yourself, you have lowered his head and began to indulge <<$name>> language. When the ass it hurt you began to crawl and moan, then he pulled out of you and inserted dildo <<$name>> in the mouth, for lubrication, then got into your anus. Inside you move two, on the one hand a huge Svetin tongue caressed your vagina, the other in the anus with a big dick moving speed boss, these two pistons moving in sync bringing you great pleasure, and a few minutes later you cried from nacrite you orgasm. Feed shlynuvshy of you filled Svetin mouth and removing the dildo head out of your anus sent his <<$name>> in the mouth, your mouth fills her juices gushed out, pouring through her lips and spreading over his face. He again put you in the ass dick increasing the tempo until you writhing in orgasm. Soon his cock swelled and began to throb ready to finish.'

						act 'Finish':gt 'office', 'boss0'
					end

					act 'Sit on top':
						cla
						*clr
						anal += 1
						orgasm += 1
						analorgasm += 1
						'<center><img src="images/img/office/b8.jpg"></center>'
						'You push him on the sofa and seated on top of his cock head priderzhivvaet you hips until you sit down neatly on his anus dildo, <<$name>> waits until his cock in your ass will disappear and knelt launches its huge tongue you pussy. When the ass it hurt you began to crawl and moan, then he lifts you holding the hip and takes a dildo, <<$name>> immediately takes it into his mouth, abundantly lubricating saliva, and then re-directs you in the ass. Inside you move two, on the one hand a huge Svetin tongue caressed your vagina, the other in the anus with a big dick moving speed boss, these two pistons moving in sync bringing you great pleasure, and a few minutes later you cried from nacrite you orgasm. Feed shlynuvshy of you filled Svetin mouth. He builds up the pace until you writhing in orgasm. Soon his cock swelled and began to throb ready to finish.'
						act 'Finish':gt 'office', 'boss0'
					end

				act 'Lie down on the sofa':
					cla
					*clr
					anal += 1
					orgasm += 1
					analorgasm += 1
					'<center><img src="images/img/office/b9.jpg"></center>'
					'You lie on a couch and lift your feet to the top of <<$name>> immediately gets on you substituting his ass to your face, you Spreading her buttocks with his hands and bites tongue in her anus, then massaging it, pushing inward. Chef introduces you to a member of the anus and when your little ass accustomed to the member within himself, he begins to rapidly increase the pace. Soon you can no longer caress Svetin ass but only moan under the pressure member moving with speed trains expression, and gives you pleasure, a few minutes later you cried from nacrite you orgasm. He further accelerated until you squirming in orgasm. Soon his cock swelled and began to throb ready to finish.'

					act 'Finish':gt 'office', 'boss0'
				end
			end

			act 'Substitute her pussy':
				cla
				*clr
				orgasm += 1
				'<center><img src="images/img/office/b6.jpg"></center>'
				'You sit down on the couch legs spread wide and beckon <<$name>>, her tongue was very long, you even have the feeling that you have entered into the vagina dick when it launched there own language. Chef also joined up with <<$name>> from behind, penetrating her vagina member, <<$name>> moaned and her tongue penetrated deeper into your pussy, she moved it so deftly that you have a minute later finishing her juices pouring sofa. A few minutes later her boss took out his penis and saying "Well now cup your ass <<$name>>, mash it up a bit, and then sat up in a chair all day." looked at you.'

				act 'Doggy-Style':
					cla
					*clr
					anal += 1
					orgasm += 1
					analorgasm += 1
					'<center><img src="images/img/office/b7.jpg"></center>'
					'You get up on the couch on all fours sticking her ass, <<$name>> immediately climbs under you and it gets you a huge tongue in pussy. Chef settles behind you and giving first World how to lick dick, you insert it into the anus. When your little ass accustomed to the member within yourself, you have lowered his head and began to indulge <<$name>> language. When the ass it hurt you began to crawl and moan, then he pulled out of you and inserted dildo <<$name>> in the mouth, for lubrication, then got into your anus. Inside you move two, on the one hand a huge Svetin tongue caressed your vagina, the other in the anus with a big dick moving speed boss, these two pistons moving in sync bringing you great pleasure, and a few minutes later you cried from nacrite you orgasm. Feed shlynuvshy of you filled Svetin mouth and removing the dildo head out of your anus sent his <<$name>> in the mouth, your mouth fills her juices gushed out, pouring through her lips and spreading over his face. He again put you in the ass dick increasing the tempo until you writhing in orgasm. Soon his cock swelled and began to throb ready to finish.'

					act 'Finish':gt 'office', 'boss0'
				end

				act 'Sit on top':
					cla
					*clr
					anal += 1
					orgasm += 1
					analorgasm += 1
					'<center><img src="images/img/office/b8.jpg"></center>'
					'You push him on the sofa and seated on top of his cock head priderzhivvaet you hips until you sit down neatly on his anus dildo, <<$name>> waits until his cock in your ass will disappear and knelt launches its huge tongue you pussy. When the ass it hurt you began to crawl and moan, then he lifts you holding the hip and takes a dildo, <<$name>> immediately takes it into his mouth, abundantly lubricating saliva, and then re-directs you in the ass. Inside you move two, on the one hand a huge Svetin tongue caressed your vagina, the other in the anus with a big dick moving speed boss, these two pistons moving in sync bringing you great pleasure, and a few minutes later you cried from nacrite you orgasm. Feed shlynuvshy of you filled Svetin mouth. He builds up the pace until you writhing in orgasm. Soon his cock swelled and began to throb ready to finish.'

					act 'Finish':gt 'office', 'boss0'
				end

				act 'Lie down on the sofa':
					cla
					*clr
					anal += 1
					orgasm += 1
					analorgasm += 1
					'<center><img src="images/img/office/b9.jpg"></center>'
					'You lie on a couch and lift your feet to the top of <<$name>> immediately gets on you substituting his ass to your face, you Spreading her buttocks with his hands and bites tongue in her anus, then massaging it, pushing inward. Chef introduces you to a member of the anus and when your little ass accustomed to the member within himself, he begins to rapidly increase the pace. Soon you can no longer caress Svetin ass but only moan under the pressure member moving with speed trains expression, and gives you pleasure, a few minutes later you cried from nacrite you orgasm. He further accelerated until you squirming in orgasm. Soon his cock swelled and began to throb ready to finish.'

					act 'Finish':gt 'office', 'boss0'
				end
			end
		end
	end

	act 'Leave tea and exit':
		svetslut = 3
		gt 'office', 'work'
		end
	end
end

if $ARGS[0] = 'boss0':
	cla
	*clr
	cumlip += 1
	'<center><img src="images/img/office/b10.jpg"></center>'
	'Taking out a member of your ass, and you boss gets <<$name>> kneels before his pulsating dildo. <<$name>> jet of sperm flies in the face, she immediately wraps his lips to suck from the rest, but you can only lick the drops from her face.'

	act 'Back to work':gt 'office', 'work'
end

if $ARGS[0] = 'komer0':
	cla
	*clr
	officekom = 1
	girl += 1
	lesbian += 1
	minut += 30
	gs 'stat'
	'<center><img src="images/img/office/k0.jpg"></center>'
	'You summoned Commercial Director. You went to the office at the table sat a woman much older than 30, she pointed out to you on a chair, you obediently sat down and waited.'
	'She carefully looked you up and down, and began to say "My name is Natalia, well, are you already know, and you have a new secretary, and how you work with us?"'
	'"Very well, I do not like" you began, but she stopped you gesture.'
	'"Other and you can not say, and the second secretary, I see you work well together." she said, and you just nodded confirming her words. "And how do you her tongue, though gorgeous?" she asked.'

	act 'Marvel':
		cla
		*clr
		'<center><img src="images/img/office/k1.jpg"></center>'
		'"I do not understand what you are saying" you started making a surprised face. You do not even understand how she came to you a second ago she was sitting at the table, and now stood in front of you, holding your chin. Her face was inches from your "Do not lie to me, girl, I can see through you, or do you think that when you are in the office Svetka fuck no one sees or hears me better not soritsya and then crush as cockroach. ponel You got me? " she asked, and you only nodded in response. "Well, now show me that you really ponel" With that, she lifted her skirt and turned to you naked buttocks.'

		act 'Kiss':
			cla
			*clr
			'<center><img src="images/img/office/k2.jpg"></center>'
			'You took her hips and began to kiss the buttocks, with the utmost passion. "That''s clever, I see we work well together, and now finish that start" with these words, she took off her panties and sat on the table.'

			act 'Lick':
				cla
				*clr
				'<center><img src="images/img/office/k4.jpg"></center>'
				'You knelt down and pressed his lips to her pussy, you diligently licking her pussy and clitoris. "Shove inside" she commanded, you immediately put his tongue in her vagina. "Hmm, the tongue is small, but it''s fixable, " she said, after these words, you felt something happening to you as something strange, or your tongue began to grow, whether it decreased the vagina, you are actively fucked her tongue and he took out her to the uterus, a few minutes later she finished, removing language and you realize that it does not fit in your mouth. You looked at her with horror on his face, she smiled and began to decrease your tongue back to its normal size.'
				'"All you can go the next time will be a mutual pleasure, I promise." she said. You keep looking at her feeling his tongue, "What udivlyaeshsya Misha, who is really who, and you should not be surprised magic. Okay enough to sit on the floor sheepishly, go to him." With these words, she returned to her desk. You got up and headed for the door, thinking nobody raskazyvat about what happened.'

				act 'Back to work':gt 'office', 'work'
			end
		end

		act 'Push off':
			cla
			*clr
			'<center><img src="images/img/office/k3.jpg"></center>'
			'You otolknuli her away and jumped to his feet froze, not knowing what''s going on, you pushed her in front of him, now it was not there, and then you vskhvatili strong hands behind your chest and sat back in his chair, looking up you will see it on a . She stood clutching your chest in his hands, "Do not be so rude to me, Misha, I''m angry and I can not, and then you will not maid and ochkom toilet in the station, and will be with me gentle I can give you a feel like a man again. So what to choose, we will be friends or will swallow shit until the end of the century. "'

			act 'Fight':
				over = 5
				gt 'gameover'
			end

			act 'Ask about the male image.':
				cla
				*clr
				vagina += 1
				officeman = 1
				'<center><img src="images/img/office/k5.jpg"></center>'
				'"You really can make me a man?" you asked.'
				'"I said I can not give you feel like a man again, for a few minutes, and we can have fun." she replied.'
				'"Well what do you want." you answered.'
				'"That''s smart, good girl or a boy, but oh well what''s the difference, you''re not alone and you know who you are. Now listen and remember you''ll do whatever I tell you, and that you''d better-remembered and never thought erepenitsa I will punish you now a little bit. " when she say it like you were on her desk obsolyutno naked. You could not move and say the same could not, she podozhla to you from behind and plunged his fingers into her vagina, inside they began to expand and lengthen and that is within you already wielded enormous tentacles, you tried to scream, but from the open mouth does not take off no sound. Soon she finished and you Stroud slipped from the table and began to dress. "And now back to work, I''ll get you yet." she said.'

				act 'Back to work':gt 'office', 'work'
			end
		end
	end
end

if $ARGS[0] = 'komer1':
	cla
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/img/office/k6.jpg"></center>'
	'As soon you enter the office as she dug her lips in your. "Well, that girl fun?" she asked.'

	act 'Start':
		picrand = 20
		xgt 'lezbsex', 'var'
	end

	if officeman = 1:
		act 'Becoming a Man':
			cla
			*clr
			'<center><img src="images/img/office/k7.jpg"></center>'
			'"You want to fuck me, Come here look what I got, " she said, "So you make me a man" you started and then stopped short when he heard a man''s voice, looking at yourself you realize that it has already done, "Well, what metering, come to me, let try your creation to the taste. " she said. You podozhli to her and she quickly taking out your cock, took it into his mouth and began to suck, you stood and enjoyed, not believing that the longer you suck someone''s dick while you suck.'

			act 'Fuck her':
				cla
				*clr
				'<center><img src="images/img/office/k8.jpg"></center>'
				'You pulled the cock from her mouth and lifted her benefits on the table. Inserting your dildo in her pussy fuck you started it with the force will drive a dick in her pussy, Natalia moaned with pleasure, and after a few seconds roughly finished, glaring claws at your back. You continued to fuck her teperyashnim enjoying your position, but soon you feel like something inside of you starts to change and your body moving eventually start again turn into a woman.'

				act 'Come':
					cla
					*clr
					'<center><img src="images/img/office/k9.jpg"></center>'
					'Until you finally turned into a girl, you are dragging down Natalia on the floor and just going to plunge it into his mouth dildo as he starts to cum and streams of sperm pouring on her chest, and a few drops reaches the mouth. When it ends, you re standing in front of her girlish body, and Natalia licks your sperm from his chest. "Here you have soiled, given clean now, " she says, and you go down on your knees and begin to lick his own cum from her chest.'

					act 'Back to work':gt 'office', 'work'
				end
			end
		end
	end
end

if $ARGS[0] = 'dostavka':
	cla
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/img/office/s9.jpg"></center>'
	'Once you have started to have fun as a knock on the door of the cabinet. You barely managed to stop the <<$name>>, and sat her down on a chair to fix it first, and then himself. However, she and Narov continue brakes seen it already ripped and she had ostanavitsya nemogla. You grief half sat her back in the chair and opened the door. The doorbell went courier "Well, you girls are so long, I''m tired of standing. You sign for the parcel."'

	act 'Sign':
		cla
		*clr
		'<center><img src="images/img/office/s10.jpg"></center>'
		'You get up and take the messenger of paper, something to sign, and you notice that the <<$name>> had already jumped from his chair and to right to it, finding tearing off his shirt. "And then you do not get up?" says she came up to him with an already bare-chested and grabs his crotch. You understand that the brakes she finally blew, and the choice you have left is not great.'

		act 'Shoved him':
			cla
			'You get in the papers and sign for them to foist courier pushes him out the door, "Go away, you do not see the girl is not in itself." Closing the door to the <<$name>> you turn around it, has been around completely naked, "Well, come to me, vredina." she says.'

			act 'Start':
				lesbian += 1
				picrand = 19
				officelezb += 1
				xgt 'lezbsex', 'var'
			end
		end

		act 'Close the door':
			cla
			*clr
			officeslut += 1
			'<center><img src="images/img/office/s11.jpg"></center>'
			'You close the door and see the <<$name>> turning sitting on a table with her legs spread wide, and sits next to the courier and fondles her breasts. Podshodite to him and bent removing his erection out of his pants around his lips, tongue you start to caress the head, sucking it.'

			act 'Continue':
				picrand = 26
				guy += 1
				lesbian += 1
				gt 'podrsex', 'var'
			end
		end
	end
end

if $ARGS[0] = 'negr':
	cla
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/img/office/s12.jpg"></center>'
	'While you were chatting with <<$name>> entered the room your handyman, a huge Negro with a strange name Kas was once told you that it is an abbreviation of his real name, but you could not remember it. He began to check whether the furniture is not broken, do not hang out there. <<$name>> immediately asked him to check the sofa legs. <<$name>> sat on your desk and start looking at the Casa until he lifted the couch, noticing attention to the person Kas started demonstrotivno raise sofa from different sides, vnimateelno examining each foot. The muscles in his arms and he strongly allocated them diligently demonstrated. You watched the <<$name>> that is clearly liked the idea, and judging by the movements of her hips, her panties already soaked. Suddenly she turned to you and asked quietly, "chocolates you want?"'

	act 'Want':
		cla
		*clr
		'<center><img src="images/img/office/s13.jpg"></center>'
		'"I want" without a second thought you said. <<$name>> bypassed your desk and taking you by the hand lifted from his chair "Well then, it must entice" she whispered, and his head vskhvativ you dug into your lips, trying to push your tongue in your mouth.'

		act 'Otolknut her':
			cla
			'You pushed her, with the words "Not mad?". Seeing that the situation is heating Kas rather quickly leave the room. "Well, startled chocolate, vredina" said <<$name>> and pouting defiantly returned to his desk.'

			act 'Back to work':gt 'office', 'work'
		end

		act 'Answer her':
			cla
			*clr
			officeslut += 1
			'<center><img src="images/img/office/s14.jpg"></center>'
			'You decompress lips, running her tongue inside. After a few seconds you feel like a strong hand squeezes your glutes and then penetrates below to your pussy. You degradability spreads her legs giving Casa room for maneuver, as <<$name>> removed from you, and now you kiss lips touch. You run your hand into his pants and find that there is already in full wielded <<$name>> nadrachivaya his cock.'

			act 'Continue':
				picrand = 27
				guy += 1
				lesbian += 1
				gt 'podrsex', 'var'
			end
		end
	end
end

if $ARGS[0] = 'boss2':
	cla
	*clr
	minut += 30
	officeslut += 1
	'<center><img src="images/img/office/b11.jpg"></center>'
	'"A <<$name>>, come on you just in time" with these words the chief stood up and came to you without formally launched their hands under your clothes, exposing your breasts. "I just need to pull off. Mouth So You work for a start." he continued.'

	act 'To kneel':
		cla
		*clr
		'<center><img src="images/img/office/b12.jpg"></center>'
		'"With pleasure, " you reply and then squatted down to get him and start sucking dildo. Once you''ve got the taste as the office door opened and entered the courier.'
		'"What the hell, what you need, do not you see I''m busy." the chief said, pointing at you, still sucking his cock.'
		'"So let me girl there said that you can" he says, "That bitch she asks, as she knew that I was here, " you thought, releasing a member of the mouth. "So you sign for delivery?" Courier continued, his eyes fixed on your bare ass.'
		'"Prove <<$name>>" said chef helping you climb'

		act 'Sign':
			cla
			*clr
			officeslut += 1
			'<center><img src="images/img/office/b13.jpg"></center>'
			'You quietly take the messenger of paper and turned to the table to paint at this time begins to talk with the chief courier. "How do you like her ass, though very best, but if you only knew that it could be up to her, shake <<$name>> rolls."'
			'"With pleasure, " you reply, and start shake buttocks.'
			'"You''re not shy Sun her finger in the ass, she did so fuck that cum in my pants. Raskazhite <<$name>> as you like when you''re ass dryuchat." continued supervision'
			'"Just love it when hot cock fucks my ass, I love milk it ochkom to hot seed to fill my ass." raspolyalis you. In this vryamya courier stuck his finger in your anus and you started actively fucking him.'
			'"Well, what froze shoot pants now this slut fuck us both. <<$name>> truth?" said the boss.'

			act '"Yes"':
				picrand = 24
				guy += 1
				xgt 'sexdvoe', 'var'
			end
		end

		if officeslut < 10:
			act 'Run out of the office':
				cla
				'You run out of the office, finding adjusting clothes. "Well, sailed, and who I am now going to fuck, you what?" you hear the voice of the boss behind his back, and followed you out of the office runs a courier.'

				act 'Back to work':gt 'office', 'work'
			end
		end
	end
end

if $ARGS[0] = 'boss3':
	cla
	*clr
	minut += 30
	officeslut += 1
	'<center><img src="images/img/office/b14.jpg"></center>'
	'"A <<$name>>, come on you just in time, we''re celebrating with a partner deal." said the boss sees you included in the study.'
	'"I just love to confess about you, saying that the best secretary did not find, and it works well, and fucks superbly, but he does not believe." he said pointing to the other man, "says his secretary better, so you have to <<$name>> defend the honor of the company, show him how you are able to use their holes." continued supervision'

	act 'To kneel':
		cla
		*clr
		'<center><img src="images/img/office/b15.jpg"></center>'
		'"With pleasure, " you reply, and immediately squatted pull out dildo and start sucking. You''re struggling.'
		'"Well, as I said, she asks the best sucks." smiling boss said, seeing contented individual partner.'
		'"Yeah, sucks perfectly, but as with other holes also skillfully managed?" he replied.'
		'"<<$name>> vstanovis crustaceans, arrange a test drive of your pussy, " said the boss helping you climb'

		act 'Bend':
			cla
			*clr
			'<center><img src="images/img/office/b16.jpg"></center>'
			'You bend down over the table, and plant hips, head just spit your labia, you put on the penis so that his balls hit on your hips and start moving wildly twisting hips. "Wow, that''s a nipple." was all he said.'
			'"And that you still have not tried the ass." grinned the boss. "Well, okay, I probably also to join you, this slut handles two better than one, right <<$name>>?" the boss said removing his pants.'

			act '"Yes"':
				picrand = 25
				guy += 1
				xgt 'sexdvoe', 'var'
			end
		end
	end
end

if $ARGS[0] = 'boss4':
	cla
	*clr
	minut += 30
	officeslut += 1
	'<center><img src="images/img/office/b17.jpg"></center>'
	'"A <<$name>>, come on you just in time." said the boss sees you included in the study. He walked up to you and vskhvativ hips lifted and posodil on the table, spreading your legs he knelt and pressed to your pussy, his tongue slid over your lips and clit tickling, bringing you great pleasure. You were so passionate about the process that is not immediately noticed as one entered the office of the company''s managers. When you finally will see him, he was standing a few feet away from you, carefully watching the process.'

	act 'Beckon':
		cla
		*clr
		orgasm += 1
		officeslut += 1
		'<center><img src="images/img/office/b18.jpg"></center>'
		'You beckon him with a gesture, and he immediately suited to you and starts to fondle your breasts. Operations initially did not even notice him, and continues to lick your pussy, but when you are covering an orgasm and you ended up with a cry, he looks up and sees him. "Well, she asks, well, slut, you love when you fuck two members, well, now we''ll fuck what froze take your pants." he said.'

		act 'Start':
			picrand = 26
			guy += 1
			xgt 'sexdvoe', 'var'
		end
	end

	if officeslut < 10:
		act 'Run out of the office':gt 'office', 'work'
	end
end

if $ARGS[0] = 'gang':
	cla
	*clr
	guy += 3
	bj += 3
	swallow += 6
	minut += 30
	officeslut += 1
	gang += 1

	'<center><img src="images/img/office/g0.jpg"></center>'
	'Going to the rest room you will see in it the three managers. "A <<$name>>, hello, we are just talking about you, do you want to ask something." said one of them coming to you.'
	'"Yes, and what you want to know?" you asked. At this time, the others also come to you, literally surrounded.'
	'"Oh, just a sheer trifle you ever once in all holes fucked." asked one, and immediately began skolzmt six hands on your body.'
	'"Hey, stop otstante" you tried to escape, but it was useless.'
	'"Come on, everyone knows that the first whore in the office and you like to be davalkoy, so do not erepensya and kneel and suck." With these words, they lowered you on your knees and taking out members began poking them in your face.'

	act 'Suck':
		cla
		*clr
		'<center><img src="images/img/office/g1.jpg"></center>'
		'Nothing to do, you have opened my mouth and began to serve them one by one, first medleno reluctantly moving eventually got the taste and began to go out of their way.'
		'"You look like razduharilis that like to suck?" said one.'
		'"Yes" stricter able to answer you with a member in the mouth. You veering from one member to another and did not know what to take for that, would satisfy all.'
		'"Come on guys, let''s in a row, and then this whore already dizzy from so many members of the" one of them said, and they were lined up in front of you.'

		act 'Suck':
			cla
			*clr
			'<center><img src="images/img/office/g2.jpg"></center>'
			'You began to suck one while the other two hands masturbate, and when he had finished, swallowing sperm, and moved to the next, continuing nadrachivat other-that would not have fallen so passed two laps, and you could not stop continuing with pleasure milking their members and swallow cum. "That nanasytnaya, a couple of liters of sperm and swallowed all the little, so it must often feed" laughed one. "Yeah, she asks spermoedka" supported the second. "Okay, we all in her mouth, but in your mouth, let''s have all the holes fuck off." said third'

			act 'Start':
				picrand = 16
				gt 'paysex', 'var'
			end
		end
	end
end

if $ARGS[0] = 'boss5':
	cla
	*clr
	minut += 30
	officeslut += 1
	'<center><img src="images/img/office/b19.jpg"></center>'
	'"A <<$name>>, come on you just in time, I have so stiff neck Mash it up a bit, " said the boss sees you included in the study. You immediately go up to him and start to massage his neck and shoulders.'
	'"So, okay?" asked you about ten minutes later.'
	'"Yes <<$name>> is perfect, it remains to remove the tension." he says.'

	act 'Take off':
		cla
		*clr
		swallow += 1
		bj += 1
		'<center><img src="images/img/office/b20.jpg"></center>'
		'You bend down to his crotch member of freeing from captivity pants, take by mouth fledgling boss dildo and start sucking odnovremmeno Shchekotov yayscha his hand, soon it swells and is hardly fit in your mouth. A few minutes later you feel like it starts to pulsate, the chief lays down on your head and your hand deeper inserts his dildo your mouth so that it rests in your throat and starts to cum. You frantically swallows not to choke when the stream has dried up, you lick the remnants of the seed with his dick and already going to clean it back in your pants, as chief stops you. "Clever, I''ll let podlagodaryu" With these words, he gets up and sits in a chair you and throws your feet.'

		act 'Start':
			picrand = 60
			gt 'sex', 'kuni'
		end
	end

	if officeslut < 10:
		act 'Refuse':gt 'office', 'work'
	end
end

if $ARGS[0] = 'boss6':
	cla
	*clr
	spank += 1
	minut += 30
	officeslut += 1
	'<center><img src="images/img/office/b21.jpg"></center>'
	'"A <<$name>>, come on you just in time. Go to the archive and bring me back some projects, " said the boss sees you included in the study. You quickly go to the archives and brought together all the necessary papers are returned to the office, and the thing at the very table you drop all the documents and they scatter in all directions, now you two hours to lay them into folders. Chef today is clearly not in the best mood, he starts yelling at you and then walks up to you and vskhvativ neck throws a side. You swooped on his desk and spread on it, tears streamed from his eyes, and he continues to yell at you'

	act 'Further':
		cla
		*clr
		'<center><img src="images/img/office/b22.jpg"></center>'
		'He walks up to you and pulling the belt of his trousers begins to smack you. You squeeze teeth and endure until the belt runs through your buttocks, tired he lifts her skirt and you spit on your anus with a sweep puts you in the ass dick, you cried out and he throws a belt you in the mouth, and continues to furiously fuck your ass soon it starts slowing down. Slightly recovering himself, he knocks you off the table and commands to open his mouth.'

		act 'Open mouth':
			picrand = 64
			gt 'sex', 'minet'
		end
	end
end

if $ARGS[0] = 'motiv0':
	cla
	*clr
	minut += 180
	'<center><img src="images/img/office/m15.jpg"></center>'
	'You come with the head to the hotel and go up to the room to the client. While the chef with the client to discuss the contract you park yourself on the bed and pretend that something down. When it comes to controversial issues, chief transplanted to you on the bed and starts stroking you. His hands glide over your body then crept under her skirt then stroking his chest, soon your skirt is Zadran to the waist. Customer looks to you between the legs without taking his eyes, seeing this boss says "can make a little break to relax." and you vskhvativ crotch pulls up, you go and find yourself standing on all fours on the bed with a bare ass. "You''re like <<$name>> help us relax?" appeals to you boss.'

	act 'Of course':
		cla
		*clr
		'<center><img src="images/img/office/m16.jpg"></center>'
		'"With pleasure, help" you reply and looking at customer beckon with his finger, he gets up and as you can see in his trousers bulged impressive size penis. He walks up to you and you grabbing his penis, first spend tongue over his trousers, then they start to kiss and try to take by mouth directly with pants, chef at this time wielding fingers in your pussy. When you remove the last member of the client out of his pants, pulls out his boss and joins you.'

		act 'Start':
			picrand = 29
			guy += 1
			xgt 'sexdvoe', 'var'
		end
	end
end

if $ARGS[0] = 'motiv1':
	cla
	*clr
	minut += 120
	picrand = rand(65, 68)

	'<center><img src="images/img/office/m<<picrand>>.jpg"></center>'
	'It suits you and the boss says, "So now come <<$name>> one client, your task is to convince him to sign a contract. So dui in the conference room"'
	'"Already running" you reply and head to the conference room. After a few minutes the client belongs doovor you give him and when he begins to read, you start to seduction, then you lightly touch his chest shaking all over, then spend yourself on the thighs slightly lifting her skirt and populate my hand, close your eyes while back and vygidaete . Soon your efforts reach the goal, the client no longer looks to the contract, but only to you. Convinced that he is ready, you have higher lifts up her skirt and spreads her legs so that it can be clearly seen that there is between them. You put one hand on his foot and start to stroke it gradually approaching the already noticeable bulging mound in his pants, he did not wait. It first hand "accidentally" spit your hips and then you push the legs even wider, he starts stroking your hips, getting higher and that his hand was already under your skirt regard namoknuvshey already pretty pussy. You unbutton his pants, and release his dildo.'

	act 'Start':
		guy += 1
		gt 'sex', 'minet'
	end
end

if $ARGS[0] = 'motiv2':
	cla
	*clr
	officerand2 = rand(1, 4)

	if officerand2 = 1:gt 'office', 'motiv4'

	picrand = rand(69, 73)
	minut += 240
	swallow += 2
	bj += 2
	guy += 2

	'<center><img src="images/img/office/m<<picrand>>.jpg"></center>'
	'It suits you and the boss says, "So <<$name>>, you need to go to the object, there is one of our masters became strongly with late deadlines works promotiviruy it as you are able."'
	'"Well, have a meal." you answer and go to the site.'
	'Arriving at the object you see a guy who goes from corner to corner and does almost nothing. Seeing you he begins to portray violent activities. "So what do you like polzash sleepy fly" you say.'
	'"I work, but the timing is just unreal, " he says.'
	'"Or maybe it''s not unrealistic deadlines, and you just do not want to work?" you ask.'
	'"No I work, I just do not physically have time to do everything." he says.'
	'"And let so if you three hours this is done, I thank you." you say.'
	'"How would you not thank me, but I did three hours does not have time, then work for a few days at least, " he says.'
	'"Is that you just do not know how I ever thank you." you say'
	'"How''s that?" he asks.'
	'"Well, look, I''ll make you a small down payment and get a finish as the rest" With these words, you go up to him and pulled out his cock. The guy opened his mouth in surprise.'

	act 'Take by mouth':
		cla
		*clr
		'<center><img src="images/img/office/m0<<picrand>>.jpg"></center>'
		'You took the head in her mouth and started sucking slowly. Then you have it swallowed the the most balls, he twitched, but not fired. And you continued to lick the head and trunk, with hand caressed his balls. He lasted about five minutes, and then his cock throbbed in his mouth and you flew a jet of sperm. When you swallow cum, then licked the remnants of his cock and took it back into his pants. "So, you, have time to finish in three hours, " you asked.'
		'He said nothing, and immediately began vskhvativshis tool for work. Two hours later it was all over. Guy standing in front of you with a satisfied smile on his face, "I''m finished, " he said at a little breather.'
		'"Good for you, keep up the good work and we''ll meet again, well, now accept my gratitude. But while I waited for you, it was Leavee cool, maybe you have a little razogreesh" you said and spread her legs showing him her pussy. The guy did not waste time on words and immediately latched on to your crotch.'

		act 'Start':gt 'sex', 'kuni'
	end
end

if $ARGS[0] = 'motiv3':
	cla
	*clr
	picrand = rand(30, 33)
	officerand2 = rand(1, 4)

	if officerand2 = 1:gt 'office', 'motiv5'

	minut += 240
	swallow += 2
	bj += 2
	guy += 2

	'<center><img src="images/img/office/m<<picrand>>.jpg"></center>'
	'It suits you and the boss says, "So <<$name>>, you need to go to the object, there a couple of our artists have become much late with deadlines works promotiviruy them as you are able."'
	'"Well, have a meal." you answer and go to the site.'
	'Arriving at the object you see two masters who obsolyutno do nothing. Seeing you they did not even try to portray the kind of work. "So what are you seated" you say.'
	'"We have a break, " they replied.'
	'"And your break did not last, you''re the last three days have not done anything" you started'
	'"Listen, it''s not so simple, as you need to be here to think, and then if we now do that tomorrow we will have to redo, in general there are three more days." said one'
	'"And let us so if you three hours as should all think and do, I thank you, " you say.'
	'"How would you thank us, but do it here in three hours did not turn out, then work for three days, at least" meets the second.'
	'"That you just do not know how I ever thank you." you say'
	'"How''s that?" asks both in unison.'
	'"Well, look, I''ll make you a small down payment, and the rest are done now" with these words, you approach them and get them members. They look at each other udevlenno.'

	act 'Take by mouth':
		cla
		*clr
		'<center><img src="images/img/office/m0<<picrand>>.jpg"></center>'
		'Clasping his lips a member of one of them and lowering the tongue on the head, made a few moves up and down. Then took his balls in her palm and began to fondle them, and a second hand at this time caressing another member. Sometimes you let a member of his mouth, giving him the opportunity to look at how you play the tongue with his head. He lasted about two minutes, and then his cock throbbed in his mouth and you flew a jet of sperm. When you swallow sperm, then switched to the second, repeating the whole procedure. "So, you will have time to three hours to finish, something to get the main prize?" asked you when swallowed semen second and rose from his knees.'
		'"Sure have time" with one voice and said they vskhvativshis for tool started to work. Two hours later it was all over. They come to you and proudly announced, "We have finished."'
		'"That''s well done, now take your gratitude" you said, throwing off her clothes.'

		act 'Start':xgt 'sexdvoe', 'var'
	end
end

if $ARGS[0] = 'motiv4':
	cla
	*clr
	picrand = 29
	minut += 180
	guy += 1
	'<center><img src="images/img/office/m17.jpg"></center>'
	'It suits you and the boss says, "So <<$name>>, you need to go to the object, there is one of our masters became strongly with late deadlines works promotiviruy it as you are able."'
	'"Well, have a meal." you answer and go to the site.'
	'Once you get out of the office as you catches <<$name>>. "I''ll go with you, " she said.'
	'"Well, let''s go." you reply.'
	'Arriving at the object you see a guy who goes from corner to corner and does almost nothing. Seeing you he begins to portray violent activities. Only are you going to say something like wedged <<$name>> "Well, what we''re barely moving, do not want to sleep with two at once."'
	'"What?" he said in surprise.'
	'"Well then, we have been sent, they say there is such a master work, skilled, responsible, go cheer him, to thank for the good work. And we come and see it?" run against it at the guy.'
	'"What?" still with a surprised look, he says.'
	'"Lazy gouging, that''s what. And do you think that''s what we reward you" continues to shine.'
	'"So I put this, that''ll do it now." he says, and adds a little thinking "And you did not breed?".'
	'"We, you, yes you hurt we need to breed, so see if two hours later all done, get both of us, and something you would not doubt I''ll now make a small down payment." says <<$name>> and falling to her knees and pulling his dick.'

	act 'Watch':
		cla
		*clr
		'<center><img src="images/img/office/m18.jpg"></center>'
		'You watch as his cock disappears in her mouth <<$name>>, she carefully licked it, caressing the head tongue, then swallow it whole, so that its language Shchekotov balls. The sight you get wet between the legs, and once you decide to join, as it ends with a long groan <<$name>> pouring sperm in her mouth. "So, you, have time to finish in two hours, " you ask him while licking the remnants of the seed of <<$name>> with his dildo.'
		'He said nothing, and immediately began vskhvativshis tool for work. Two hours later it was all over. Guy standing in front of you with a satisfied smile on his face, "I''m finished, " he said at a little breather.'
		'"Good girl, now go to us, " praised him starting to undress <<$name>>, you have followed'

		act 'Start':gt 'podrsex', 'var'
	end
end

if $ARGS[0] = 'motiv5':
	cla
	*clr
	picrand = 34
	minut += 180
	guy += 2
	'<center><img src="images/img/office/m19.jpg"></center>'
	'It suits you and the boss says, "So <<$name>>, you need to go to the object, there a couple of our artists have become much late with deadlines works promotiviruy them as you are able."'
	'"Well, have a meal." you answer and go to the site.'
	'Arriving at the object you see only one of the two masters who had to finish the finish sauna. While he did not see you, you go out in the back find towels and undressed in one turn around. You go back to the master, seeing you he looks dumbfounded look "What are you doing here girl?" Finally he asks.'
	'"Yes, that''s thought to warm up, and you are still poking around, and can be done just quickly take a steam together?" you reply.'
	'"What?" he said in surprise.'
	'"That you''re not intelligent, I say that I have time, though small, but a couple of hours, I can wait, and if you follow it all the time to finish then allowed to rub my back, and not just her." you say.'
	'"And if I finish, and you run away?" still with a surprised look, he says.'

	act 'Undress':
		cla
		*clr
		'<center><img src="images/img/office/m20.jpg"></center>'
		'"And where naked run away" and you reply off his towel on the bench and seated him.'
		'He looks at you with even more surprised look. "Well, what you got, time that goes" you say'
		'"Yes, of course, is already running" he says, and starts to work. An hour later, he finishes, "All done." happily announces it.'
		'"Well, come to me." you say, pushing the legs invitingly.'

		act 'Start':
			cla
			*clr
			'<center><img src="images/img/office/m21.jpg"></center>'
			'Once you jump on him, as the door bursts into the second, with a package of food and beer.'
			'He walks up to you galloping on a limb and did not seem to think of any better then asks "Girl, and you do not want to eat?"'
			'You quickly grab his pants, "Well, I would taste the sausage" you say.'
			'He immediately starts to undress. "You said the same sausage, sausage and not skinny." laughs first.'
			'"So you''re a toothpick from it" meets the second, and extracts from his pants his dignity, which is more like a decent loaf of sausage than a sausage.'

			act 'Continue':xgt 'sexdvoe', 'var'
		end
	end
end

--- office ---------------------------------
# restoran
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Restaurant</font></b></center>'
	'<center><img src="images/etogame/restoran.jpg"></center>'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	!!eto there_were glamur > 1 and vnesh > 50
	if glamur >= 1 and mop > 1 and hapri = 1 and sweat <= 0:
		'A man at the entrance table politely interested in what you prefer in the VIP room or in the common room'

		if money >= 5000:
			act 'VIP room (5,000 rubles)':
				cla
				money -= 5000
				gt 'restoran', 'vip'
			end
		end

		act 'Common room':gt 'restoran', 'zal'
	else
		'It suits you man and politely informs you that with a similar appearance to the restaurant can not.'
	end

	act 'Out of the restaurant':
		cla
		minut += 5
		gt 'down'
	end

	if vladimirday = day and vladimirQW = 21 and hour = 20:gt 'qwmeet'
end

if $ARGS[0] = 'zal':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">restaurant, common room</font></b></center>'
	'<center><img src="images/etogame/restoran2.jpg"></center>'
	'The room was pretty good atmosphere. Soft lighting and light furniture. Until you hear the sounds of music, the clink of glasses and female laughter. It seems you can finally relax a little.'
	!!etogame
	nastjarand = rand(0, 100)

	if nastjarand > 80 and nastjaqw = 0 and energy > 15 and nastjaday ! day:
		cls
		nastjaday = day
		gs 'stat'
		'<center><img src="images/etogame/nastja1.jpg"></center>'
		'In the hall you notice a pretty girl, wondering why she was sitting alone. She looks pretty good. While you looked at prekrastno stranger she caught your eye on himself and suddenly looked at you.'

		act 'Look down':
			cla
			'She turned away'

			act 'Leave':gt 'restoran', 'zal'
		end

		act 'Smile at her':gt 'nastja', 'pos1'
	end

	if money >= 5000:
		act 'Eat (5,000 rubles)':
			cla
			minut += 60
			energy =22
			fat += 5
			water = 22
			willpower += 30
			manna = manna + 80
			health = health + 20
			money -= 5000
			'On the recommendation of a chef, a wonderful dish you ordered and ate with pleasure in a noisy restaurant hall.'

			act 'Leave':gt 'restoran', 'zal'
		end
	end

	act 'Leave':minut += 5 & gt 'restoran', 'start'
end

if $ARGS[0] = 'vip':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Restaurant, VIP room</font></b></center>'
	'<center><img src="images/etogame/restoran3.jpg"></center>'
	'Caught in the vip box you caught yourself thinking that smile involuntarily. In the bed of a calm and friendly atmosphere. Soft lighting and furniture in the Empire style. You hear soft music. Finally, your new weak feminine essence, albeit briefly, but can feel safe.'

	if money >= 5000:
		act 'Eat (5,000 rubles)':
			cla
			minut += 60
			energy = 22
			fat += 5
			water = 22
			willpower += 30
			manna = manna + 100
			health = health + 20
			money -= 5000
			gs 'stat'
			'On the recommendation of a chef, a wonderful dish you ordered and ate with pleasure in the cozy vip room of the restaurant.'

			act 'Leave':gt 'restoran', 'vip'
		end
	end
	act 'Leave':
		cla
		minut += 5
		gt 'restoran', 'start'
	end
end
--- restoran ---------------------------------
# salon
if $ARGS[0] = 'start':
	$zavivka = {
		minut += 60
		curly += 10
		money -= 1000

		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You curled hair.'
		act 'Leave':gt 'salon', 'start'
	}

	$pokraska={
		cla
		money -= 1000
		gs 'stat'
		'You get paid and sat down in the chair, you went and asked the girl beautician what color you would like repainted.'

		if hcol ! 0:
			act 'black':
				cla
				minut += 60
				hcol = 0

				if salonrand = 0 and masha = 0:gt 'salon','0'
				gs 'stat'
				'Do you dye your hair.'
				act 'Leave':gt 'salon', 'start'
			end
		end

		if hcol ! 1:
			act 'Brown color':
				cla
				minut += 60
				hcol = 1

				if salonrand = 0 and masha = 0:gt 'salon','0'
				gs 'stat'
				'Do you dye your hair.'
				act 'Leave':gt 'salon', 'start'
			end
		end

		if hcol ! 2:
			act 'red color':
				cla
				minut += 60
				hcol = 2

				if salonrand = 0 and masha = 0:gt 'salon','0'
				gs 'stat'
				'Do you dye your hair.'
				act 'Leave':gt 'salon', 'start'
			end
		end

		if hcol ! 3:
			act 'Light color':
				cla
				minut +=60
				hcol = 3

				if salonrand = 0 and masha = 0:gt 'salon','0'
				gs 'stat'
				'Do you dye your hair.'

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

	$solyariy = {
		minut += 60
		tan += 10
		money -= 1000

		if salonrand > 6 and nastjaqw > 2:gt 'etoexhib', 'pos1'
		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You sunbathe in the solarium.'
		act 'Leave':gt 'salon', 'start'
	}

	$resnici = {
		minut += 60
		resnic += 1
		money -= 5000

		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You lengthen lashes.'

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

	$epilyaciya = {
		minut += 60
		leghair = -20
		lobok = -20
		money -= 5000

		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You had a full body hair removal.'
		act 'Leave':gt 'salon', 'start'
	}

	$ozdormas = {
		minut += 60
		salo -= 2
		vidageday += 3
		money -= 5000
		gs 'stat'

		if salonrand = 0:
			cla
			*clr
			picrand = rand(25, 28)
			'<center><img src="images/img/centr/mass.jpg"></center>'
			'During the massage guy is interested and his fingers start to slip masljannye it in your pussy then in the ass.'

			act 'Indignant':gt 'salon', 'start'

			act 'Enjoy':
				guy += 1
				gt 'sex', 'minet'
			end
		end


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

	$tatyadd = {
		cla
		minut += 60
		gs 'stat'

		if tatlip = 0:
			act 'View on the lip tattoo number 1':
				cla
				*clr
				'<center><img src="images/body/tatlip1.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatlip = 1
					horny += 5
					money -= 8000
					minut += 60
					vaf += 10
					gs 'stat'
					'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'

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

			act 'View on the lip tattoo number 2':
				cla
				*clr
				'<center><img src="images/body/tatlip2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatlip = 2
					horny += 5
					money -= 8000
					minut += 60
					vaf += 10
					gs 'stat'
					'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'

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

			act 'View on the lip tattoo number 3':
				cla
				*clr
				'<center><img src="images/body/tatlip3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatlip = 3
					horny += 5
					money -= 8000
					minut += 60
					vaf += 10
					gs 'stat'
					'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'

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

		if tatplech = 0:
			act 'View tattoo on his shoulder, "flowers"':
				cla
				*clr
				'<center><img src="images/body/tatplech1.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatplech = 1
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open the shoulders and you stuffed tattoo.'

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

			act 'View tattoo on his shoulder, "butterfly"':
				cla
				*clr
				'<center><img src="images/body/tatplech2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatplech = 2
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open the shoulders and you stuffed tattoo.'

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

			act 'View tattoo on his shoulder, "flowers number 2"':
				cla
				*clr
				'<center><img src="images/body/tatplech3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatplech = 3
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open shoulders, and you stuffed tattoo.'

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

			act 'View tattoo on his shoulder, "Queen of Spades"':
				cla
				*clr
				'<center><img src="images/body/tatplech4.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatplech = 4
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open shoulders, and you stuffed tattoo.'

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

		if tatback = 0:
			act 'View tattoo "wings" on the back number 1':
				cla
				*clr
				'<center><img src="images/body/tatb1.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatback = 1
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open back, and you are stuffed tattoo.'

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

			act 'View tattoo "wings" on the back number 2':
				cla
				*clr
				'<center><img src="images/body/tatb2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatback = 2
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open back, and you are stuffed tattoo.'

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

			act 'View tattoo "corset" on the back':
				cla
				*clr
				'<center><img src="images/body/tatb3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatback = 3
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open back, and you are stuffed tattoo.'

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

			act 'View tattooed "characters" on the back':
				cla
				*clr
				'<center><img src="images/body/tatb4.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatback = 4
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, open back, and you are stuffed tattoo.'

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

		if tatupb = 0:
			act 'View tattoo on the lower back number 1':
				cla
				*clr
				'<center><img src="images/body/tatupb1.jpg"></center>'
				'Tattoo on the lower back is traditionally called trump stamp, shlyuhino stigma tattoo girls are not burdened weight behavior.'

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

				act 'A tattoo':
					cla
					tatupb = 1
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on the lower back.'

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

			act 'View tattoo on the lower back number 2':
				cla
				*clr
				'<center><img src="images/body/tatupb2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatupb = 2
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on the lower back.'

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

			act 'View tattoo on the lower back number 3':
				cla
				*clr
				'<center><img src="images/body/tatupb3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatupb = 3
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on the lower back.'

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

			act 'View tattoo on the lower back number 4':
				cla
				*clr
				'<center><img src="images/body/tatupb4.jpg"></center>'
				'Tattoo on the lower back is traditionally called trump stamp, shlyuhino stigma tattoo girls are not burdened weight behavior.'

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

				act 'A tattoo':
					cla
					tatupb = 4
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on the lower back.'

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

		if tatvag = 0:
			act 'View tattoo in the groin "Stars"':
				cla
				*clr
				'<center><img src="images/body/tatvag.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatvag = 1
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you''re shooting underwear stuffed tattoo in the groin.'

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

			act 'View tattoo in the groin "Lick me"':
				cla
				*clr
				'<center><img src="images/body/tatvag2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatvag = 2
					horny += 5
					money -= 8000
					minut += 60
					gs 'stat'
					'You lie on the couch, and you''re shooting underwear stuffed tattoo in the groin.'

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

			act 'View tattoo in the groin "Black Owned"':
				cla
				*clr
				'<center><img src="images/body/tatvag3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatvag = 3
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you''re shooting underwear stuffed tattoo in the groin.'

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

			act 'View tattoo in the groin "Lucky"':
				cla
				*clr
				'<center><img src="images/body/tatvag4.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatvag = 4
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you''re shooting underwear stuffed tattoo in the groin.'

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

			act 'View tattoo in the groin "Angel of sin"':
				cla
				*clr
				'<center><img src="images/body/tatvag5.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatvag = 5
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you''re shooting underwear stuffed tattoo in the groin.'

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

		if tatleg = 0:
			act 'View a tattoo on her ankle number 1':
				cla
				*clr
				'<center><img src="images/body/tatleg1.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatleg = 1
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on her ankle.'

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

			act 'View a tattoo on her ankle number 2':
				cla
				*clr
				'<center><img src="images/body/tatleg2.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatleg = 2
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on her ankle.'

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

			act 'View a tattoo on her ankle number 3':
				cla
				*clr
				'<center><img src="images/body/tatleg3.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatleg = 3
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on her ankle.'

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

			act 'View a tattoo on her ankle number 4':
				cla
				*clr
				'<center><img src="images/body/tatleg4.jpg"></center>'

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

				act 'A tattoo':
					cla
					tatleg = 4
					horny += 5
					money -= 8000
					vnesh += 5
					minut += 60
					gs 'stat'
					'You lie on the couch, and you packed a tattoo on her ankle.'

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

	$uhodkosha = {
		minut += 60
		skin += 1
		money -= 15000

		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You mask the face, after a while removed her beautician.'

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

	$delgub = {
		minut += 60
		lip -= 1
		money -= 15000
		gs 'stat'
		'You have reduced the lips.'

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

	$addgub = {
		minut += 60
		lip += 1
		money -= 25000
		gs 'stat'
		'You increased the lips.'

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

	$addglaza = {
		minut += 60
		glaraz += 1
		money -= 30000
		gs 'stat'
		'You have increased eye.'

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

	$addtitki = {
		minut += 60
		silicone += 10
		money -= 150000
		gs 'stat'
		'You have inserted silicone breast increasing their size by 10 cm'

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

	$delshir = {
		minut += 60
		fat = 0
		salo = 0
		money -= 150000
		gs 'stat'
		'You totally suck the fat out of the body.'

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

	$omoloshenie = {
		minut += 60
		vidageday += 50
		money -= 250000

		if salonrand = 0 and masha = 0:gt 'salon', '0'

		gs 'stat'
		'You spent rejuvenation procedures, they can not turn the clock to sleep, they can only stop the aging at the time.'

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

	$dshorthair={
		minut += 60
		money -= 1000
		shorthair = 1
		shorthairday = 0
		gs 'stat'
		'You have cut her hair very short hair making you a boy.'

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

	$permtatbro={
		minut += 60
		money -= 6000
		browper = 1
		gs 'stat'
		'You have made a permanent tattoo eyebrows.'
		act 'Leave':gt 'salon','start'
	}

	$sexloc = $CURLOC

	if week = 1 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
	if week = 3 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
	if week = 5 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'

	cla
	clr
	*clr
	salonrand = rand(0, 9)
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Beauty</font></b></center>'
	'<center><img src="images/etogame/salon.jpg"></center>'
	'Approach to <a href="exec:gt ''salon'', ''1''">the administrator.</a>'

	if money >= 1000:'<a href="exec:dynamic $zavivka ">Curl the hair - 1,000 rubles</a>'
	if money < 1000:'Curl the hair - 1,000 rubles'
	if money >= 1000:'<a href="exec:dynamic $pokraska ">Dye your hair - 1,000 rubles</a>'
	if money < 1000:'hair coloring 1,000 rubles'
	if money >= 1000:'<a href="exec:dynamic $solyariy">Solarium - 1,000 rubles</a>'
	if money < 1000:'Solarium - 1,000 rubles'
	if money >= 1000:'<a href="exec:dynamic $dshorthair ">short hairstyle - 1,000 rubles</a>'
	if money < 1000:'short hairstyle - 1,000 rubles'
	if money >= 5000:'<a href="exec:dynamic $resnici">Elongation eyelashes - sput 5</a>'
	if money < 5000:'Lengthening eyelashes - 5,000 rubles'
	if money >= 5000:'<a href="exec:dynamic $epilyaciya">Complete removal - sput 5</a>'
	if money < 5000:'Complete Hair Removal - 5,000 rubles'
	if money >= 5000:'<a href="exec:dynamic $ozdormas">Wellness massage (accelerates fat, rejuvenates the body), 5,000 rubles</a>'
	if money < 5000:'Wellness massage (accelerates fat, rejuvenates the body), 5,000 rubles'
	if money >= 6000 and browper=0:'<a href="exec: dynamic $permtatbro">Permanent tattoo eyebrows - 6,000 rubles</a>'
	if money < 6000 and browper = 1:'Permanent tattoo eyebrows - 6,000 rubles'
	if money >= 8000:'<a href="exec:dynamic $tatyadd">Tatuiroka or piercing - 8,000 rubles</a>'
	if money < 8000:'Tatuiroka or piercing - 8,000 rubles'
	if money >= 15000:'<a href="exec:dynamic $uhodkosha">Skin Care - 15,000 rubles</a>'
	if money < 15000:'Skin Care - 15,000 rubles'
	if money >= 15000 and lip > 0:'<a href="exec:dynamic $delgub">Reduction of the lips - 15,000 rubles</a>'
	if money < 15000 or lip < 1:'Lip Reduction - 15,000 rubles'
	if money >= 25000 and lip < 4:'<a href="exec:dynamic $addgub">Lip Augmentation - 25,000 rubles</a>'
	if money < 25000 or lip >= 4:'Lip augmentation - 25,000 rubles'
	if money >= 30000:'<a href="exec:dynamic $addglaza">Increase the eye - 30,000 rubles</a>'
	if money < 30000:'Increased eye - 30,000 rubles'
	if money >= 150000:'<a href="exec:dynamic $addtitki">Breast Augmentation - 150,000 rubles</a>'
	if money < 150000:'Breast Augmentation - 150,000 rubles'
	if money >= 150000:'<a href="exec:dynamic $delshir">Suction fat - 150,000 rubles</a>'
	if money < 150000:'Suction of fat - 150,000 rubles'
	if money >= 250000:'<a href="exec:dynamic $omoloshenie">Procedures for rejuvenation - 250,000 rubles</a>'
	if money < 250000:'Rejuvenation - 250,000 rubles'

	if hour < 8 or hour > 20:
		cls
		'Beauty is closed and you are asked to retire.'

		act 'Leave':minut += 5 & gt 'torgcentr'

		exit
	end

	act 'Leave':minut += 5 & gt 'torgcentr'
end

if $ARGS[0] = '0':
	cla
	*clr
	cumfrot += 1
	'<center><img src="images/img/centr/pri1.jpg"></center>'
	'During the procedure, the girl manages to stain your clothes which is a liquid, it is now on the traces are very similar to sperm. You start to vomuschatsya suits you and the administrator tries to reassure you, that obyaschaya girl will be punished and you offthe cost of chemical cleaning in Ramer 5000rub.'

	act 'Agree':money += 5000 & gt 'salon', 'start'

	if DOM > 10:
		act 'Require punish now':
			cla
			orgasm += 1
			DOM += 1
			'Administrator looks at you not knowing what you want'
			'"What is not clear, I want something to punish this bitch now" started to resent you.'
			'"Do you want something to punish her?" asked the receptionist'
			'"Fuck it here with me, " cried you.'
			'"Sorry, but I can not do that, " stammered guy'

			act '"All you can"':
				cla
				*clr
				'<center><img src="images/img/centr/pri2.jpg"></center>'
				'"All you can" you said and rastegnuv pants guy got his dick dildo strongly excited by it was clear that the guy really like your idea of ​​punishment.'

				act '"Suck it bitch"':
					cla
					*clr
					'<center><img src="images/img/centr/pri3.jpg"></center>'
					'With these words, you pulled the girl''s head to the penis and she obediently around his lips.'
					'"Moving, deeper" you customized Woman'

					act '"Put her cancer"':
						cla
						*clr
						'<center><img src="images/img/centr/pri4.jpg"></center>'
						'Man obediently put her cancer, and put his dildo in her vagina, the girl quietly vzvignula, and the guy went into the role fucked her yarosno shoving member as deeply as possible into it. You took her hand and put on her pubis, she obediently began to massage your clitoris'

						act '"Plant it on top"':
							cla
							*clr
							'<center><img src="images/img/centr/pri5.jpg"></center>'
							'Man sat on a chair, she quickly hopped on top and started jumping, you took her buttocks and each time it jump with power lowered it to a member of the girl cried, and you continued to stick it on his dildo.'

							act '"Lie down on the floor"':
								cla
								*clr
								'<center><img src="images/img/centr/pri6.jpg"></center>'
								'The girl lay on the floor, and fell in with Perrin side, you''re sat on the girl''s face she did not give you a chance to give the order and once your pussy was in the zone dosigaemosti her tongue began to lick you trying not to miss a millimeter your pussy, both outside and inside , how many missed her tongue. Soon pleasant wave covered you and you left off sitting on her face'

								act '"Finish"':
									cla
									*clr
									telmasha = 1
									masha += 1
									'<center><img src="images/img/centr/pri7.jpg"></center>'
									'The guy stood up, lifted her to her knees and discharged, filling her mouth, face and chest with hot sperm'
									'"That''s necessary to punish bitches" with these words, you take a card girl "So you have Masha, I can call you, you have a good tongue" with these words you left on the floor leaving the girl all in the semen.'

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

if $ARGS[0] = '1':
	cla
	minut += 5

	if worksalon = 0:
		'You ask whether you take on the job.'

		if masash < 10:
			'You do not be able to come when you learn'

			act 'Move away':gt 'salon', 'start'
		elseif masash >= 10:
			'"Well, we need a masseuse.''ll Work Monday, Wednesday and Friday from 9 to 10 hours, and come out to replace, will work up to 19 hours. Not come, you will not be counted this day in wages. Salary listed 25 th, for each an elaborate shift - 800 rubles. "'
			'"Labor should hand over to the personnel department. You understand, will work?"'

			if (work = 0 and worksalon = 0) or cheatWork = 1:
				act 'Move away':gt 'salon', 'start'

				act 'Find a job':
					cla
					worksalon = 1
					work = 1
					'You classify working in the personnel department.'

					act 'Move away':gt 'salon', 'start'
				end
			end

			act 'Move away':gt 'salon', 'start'
		end
	elseif worksalon = 1:
		act 'Resign':gt 'salon', 'discharge'
		act 'Move away':gt 'salon', 'start'
	end
end

if $ARGS[0] = 'beginwork':
	cla
	*clr
	'<center><b><font color="maroon">Beauty</font></b></center>'
	'<center><img src="images/etogame/salon.jpg"></center>'
	'You have replaced a beauty salon.'

	act 'Start work':
		smena += 1
		gt 'worksalon', 'start'
	end

	act 'Resign':gt 'salon', 'discharge'
end

if $ARGS[0] = 'discharge':
	cla
	minut += 10
	worksalon = 0
	work = 0
	pay = smena * 800
	money += pay
	smena = 0
	'The administrator looked at you:"Here is your payment <<pay>> rubles and employment history. Goodbye."'

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

--- salon ---------------------------------
# hairsalon
if $ARGS[0] = 'start':
	cla
	cls
	'<center><b><font color="maroon">The Golden Curl Salon</font></b></center>'
	'<center>A well reviewed hair salon, capable of creating the most beautiful hairstyles. For a price of course.</center>'
	'<center>Next to the check out are two aisles filled with premium merchandise for you hair, including Scrunchies, Hairpins and Shampoo.</center>'
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	if hour =< 8 or hour >= 20:
		cls
		'The hair salon is closed. You should come back during their working hours.'
		act 'Leave':minut += 2 & gt 'torgcentr'
		exit
	end

	''
	'<a href=' + iif(money >= 750, '"exec:gt ''hairsalon'', ''cuthair''"', '') + '>Get a haircut - 750 rubles</a>'
	''
	'<a href=' + iif(money >= 500, '"exec:gt ''hairsalon'', ''curlhair''"', '') + '>Get your hair curled - 500 rubles</a>'
	''
	'<a href=' + iif(money >= 1000, '"exec:gt ''hairsalon'', ''dyehair''"', '') + '>Get your hair dyed - 1000 rubles</a>'
	''
	'<a href=' + iif(money >= 1250, '"exec:gt ''hairsalon'', ''braidhair''"', '') + '>Get your hair braided - 1250 rubles</a>'

	act 'Leave':minut += 2 & gt 'torgcentr'

	if money >= 100:
		act 'Buy Scrunchies - 100 rubles':
			cls
			money -= 100
			hscrunch += 10
			'You pay the cashier and bought the small box.'

			act 'Move away':gt 'hairsalon', 'start'
		end
	end

	if money >= 120:
		act 'Buy Hair accessories - 120 rubles':
			cls
			money -= 120
			hpingrip += 10
			'You pay the cashier and bought the small box.'

			act 'Move away':gt 'hairsalon', 'start'
		end
	end
end

if $ARGS[0] = 'cuthair':
	cla
	*clr
	'You approach the female hairdresser and ask, "Hi, I would like to get my hair cut. Can someone do it now or do I have to wait?"'
	'She smiles, "Sure thing, have you already decided on how much we shall cut off?"'

	act 'Change your mind':gt 'hairsalon', 'start'

	if hairlength > 10:
		act 'Very short':
			cla
			*clr
			'"I''d like to have my hair cut very short", you say.'
			'"Of course", she says with a friendly smile on her face, while leading you to a free seat.'
			'"Yes, please", you answer and sit down.'

			act 'Sit down':
				cla
				*clr
				minut += 30
				hairlength = 10
				money -= 750
				'About half an hour later she is done and what''s left from you former hairstyle is a very short buzzcut.'
				'You stand up and pay the women at the counter.'

				act 'Look in the mirror':gt 'hairsalon', 'mirror'
			end
		end
	end

	if hairlength > 31:
		act 'Short, but not too short':
			cla
			*clr
			'"I''d like to have my hair cut short, but not too short", you tell her.'
			'"I know what you mean, that''s not problem at all", she says, as she turns around one of the free seats and makes a gesture to you, to sit down.'

			act 'Sit down':
				if hairlength > 60:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", she tells you.'

					act 'Yes':
						cla
						*clr
						minut += 30
						hairlength = 31
						hbangs = 1
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 31
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end
				else
					cla
					*clr
					minut += 30
					hairlength = 31
					hapri = 1
					money -= 750
					'30 minutes later, she is done cutting your hair. And you have now a hairstyle, which barely reaches your earlobes.'
					'You stand up and pay the women at the counter.'

					act 'Look in the mirror':gt 'hairsalon', 'mirror'
				end
			end
		end
	end

	if hairlength > 81:
		act 'About chin-line length':
			cla
			*clr
			'"Could you cut my hair back to my chin line, please?", you ask her.'
			'"Sure, no problem", she tells you getting a chair for you ready.'

			act 'Sit down.':
				if hairlength > 90:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", she tells you.'

					act 'Yes':
						cla
						*clr
						minut += 30
						hairlength = 81
						hbangs = 1
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. Your new hairstyle goes down to you chin-line and you have a fringe, covering your forehead.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 81
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. Your new hairstyle goes down to you chin-line.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end
				else
					cla
					*clr
					minut += 30
					hairlength = 31
					hapri = 1
					money -= 750
					'30 minutes later, she is done cutting your hair. Your new hairstyle goes down to you chin-line.'
					'You stand up and pay the women at the counter.'

					act 'Look in the mirror':gt 'hairsalon', 'mirror'
				end
			end
		end
	end

	if hairlength > 161:
		act 'Shoulder Length':
			cla
			*clr
			'"I would like to have my hair cut back to about the height of my shoulder. Would you please be so kind and do that?", you ask her.'
			'"Sure, no problem", she tells you, geasturing you, to sit down into a free chair.'

			act 'Sit down.':
				if hairlength > 170:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", she tells you.'

					act 'Yes':
						cla
						*clr
						minut += 30
						hairlength = 161
						hbangs = 1
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. Your hair now goes just to your shoulders and you have a fringe, covering your forehead.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 161
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. Your hair now goes just to your shoulders..'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end
				else
					cla
					*clr
					minut += 30
					hairlength = 161
					hapri = 1
					money -= 750
					'30 minutes later, she is done cutting your hair. Your hair now goes just to your shoulders..'
					'You stand up and pay the women at the counter.'

					act 'Look in the mirror':gt 'hairsalon', 'mirror'
				end
			end
		end
	end

	if hairlength > 261:
		act 'About Brastrap length':
			cla
			*clr
			'"Could you cut my hair back to where my bra-strap sits?", you ask her.'
			'"That''s absolutely no problem.", she says, when gesturing you sit down on one of the free seat'

			act 'Sit down.':
				if hairlength > 280:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", she tells you.'

					act 'Yes':
						cla
						*clr
						minut += 30
						hairlength = 261
						hbangs = 1
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. She cut your hair back to about the line where your bra sits, in addition she made you a fringe, covering your forehead, as requested.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 261
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. She cut your hair back to about the line where your bra sits.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end
				else
					cla
					*clr
					minut += 30
					hairlength = 261
					hapri = 1
					money -= 750
					'30 minutes later, she is done cutting your hair. She cut your hair back to about the line where your bra sits.'
					'You stand up and pay the women at the counter.'

					act 'Look in the mirror':gt 'hairsalon', 'mirror'
				end
			end
		end
	end

	if hairlength > 401:
		act 'Cut the tips':
			cla
			*clr
			'"Could you cut my hair back a bit?", you ask her. '
			'"Wow, your hair is beautiful! But, sure, that''s no problem.", she tells you, geasturing you, to sit down into a free chair.'

			act 'Sit down.':
				if hairlength > 401:
					cla
					*clr
					'"Before we begin, I need to ask, if I should cut you a fringe or not.", she tells you.'

					act 'Yes':
						cla
						*clr
						minut += 30
						hairlength = 401
						hbangs = 1
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. She just cuts the tips of your, barely making it shorter and as requested, she cut you a nice fringe, , which now covers your forehead.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end

					act 'No':
						cla
						*clr
						minut += 30
						hairlength = 401
						hapri = 1
						money -= 750
						'30 minutes later, she is done cutting your hair. She just cuts the tips of your, barely making it shorter.'
						'You stand up and pay the women at the counter.'

						act 'Look in the mirror':gt 'hairsalon', 'mirror'
					end
				else
					cla
					*clr
					minut += 30
					hairlength = 401
					hapri = 1
					money -= 750
					'30 minutes later, she is done cutting your hair. She just cuts the tips of your, barely making it shorter. '
					'You stand up and pay the women at the counter.'

					act 'Look in the mirror':gt 'hairsalon', 'mirror'
				end
			end
		end
	end
end

if $ARGS[0] = 'curlhair':
	cls
	if hairlength <= 80:
		'"Sorry, your hair is too short to curl."'
		act 'Move away':gt 'hairsalon', 'start'
	elseif curly = 10:
		'"Your hair is already as curly as I can make it."'
		act 'Move away':gt 'hairsalon', 'start'
	elseif hbraids > 0:
		'"Your hair is in braids right now, to curl it I would have to remove them. Is that what you want me to do?"'
		act 'Yes':
			cla
			minut += 20
			hbraids = 0
			curly = 10
			money -= 500
			'Your braids were removed and your hair was curled instead.'
			gs 'stat'
			act 'Look in the mirror':gt 'hairsalon', 'mirror'
		end

		act 'No':gt 'hairsalon', 'start'
	else
		minut += 20
		curly = 10
		money -= 500
		'You have your hair curled.'
		gs 'stat'
		act 'Look in the mirror':gt 'hairsalon', 'mirror'
	end
end

if $ARGS[0] = 'dyehair':
	clr
	cla
	'You ask the woman hairdresser, if she could dye your hair.'
	'"Sure.", she says.'
	'"Which colour would like to have your hair dyed in?"'

	act 'Change your mind':gt 'hairsalon', 'start'

	if hcol ! 0:
		act 'Black':
			cla
			*clr
			'"Black", you say, "I want it to be raven black, dark as the night, please."'
			'"Sure thing!", she answer in a happy tone, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", she says happily as she turns around one of the seats for you.'

			act 'Sit down':
				cla
				*clr
				minut += 60
				hcol = 0
				money -= 1000
				'About an hour later, everything should be dried up and the female hairdress comes back to you.'
				'She removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay the 1000 rubles.'

				act 'Look in the mirror':gt 'hairsalon', 'mirror'
			end
		end
	end

	if hcol ! 1:
		act 'Brown':
			cla
			*clr
			'"I''d like to have my hair brown", you say.'
			'"Sure thing!", she answer in a happy tone, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", she says happily as she turns around one of the seats for you.'

			act 'Sit down':
				cla
				*clr
				minut += 60
				hcol = 1
				money -= 1000
				'About an hour later, everything should be dried up and the female hairdress comes back to you.'
				'She removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay the 1000 rubles.'

				act 'Look in the mirror':gt 'hairsalon', 'mirror'
			end
		end
	end

	if hcol ! 2:
		act 'Red':
			cla
			*clr
			'"I''d like to have my in a fiercely red", you say with a devilish grin.'
			'"Sure thing!", she laughs, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", she says happily as she turns around one of the seats for you.'

			act 'Sit down':
				cla
				*clr
				minut += 60
				hcol = 2
				money -= 1000
				'About an hour later, everything should be dried up and the female hairdress comes back to you.'
				'She removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay the 1000 rubles.'

				act 'Look in the mirror':gt 'hairsalon', 'mirror'
			end
		end
	end

	if hcol ! 3:
		act 'Blonde':
			cla
			*clr
			'"Blonde! Blondes have more fun. I want to see if that is true!", you giggle.'
			'"Blondes definately have more fun!", she says with a wink, "Why don''t you take a seat?"'
			'"We''ll be done in no time!", she says happily as she turns around one of the seats for you.'

			act 'Sit down':
				cla
				*clr
				minut += 60
				hcol = 3
				money -= 1000
				'About an hour later, everything should be dried up and the female hairdress comes back to you.'
				'She removes the dryer hood. "And we''re all done."'
				'You stand up from the chair and pay the 1000 rubles.'

				act 'Look in the mirror':gt 'hairsalon', 'mirror'
			end
		end
	end

	gs 'stat'
end

if $ARGS[0] = 'braidhair':
	cla
	*clr
	'"I''d like to have my hair braided. Could you do that?", you as the female hairdresser.'

	if hbraids = 20:
		'"Sorry, your hair is already braided as well as I can do."'
		act 'Move away':gt 'hairsalon', 'start'
		exit
	elseif hairlength <= 80:
		'"Sorry, your hair is too short for me to braid it."'
		act 'Move away':gt 'hairsalon', 'start'
		exit
	elseif hairlength > 400:
		'"Sorry, your hair is too long to make a braid that will not fall apart."'
		act 'Move away':gt 'hairsalon', 'start'
	end

	'She takes a look at you hair and nods, "Sure, you have beautiful, long hair, it shouldn''t be a problem at all."'
	'The hairdresser tells you to sit down on one of the free seats and she''ll get on it immediately.'

	act 'Sit down':
		cla
		*clr
		'"Just relax, we''ll be done in no time.", she tells you.'

		act 'Relax':
			cla
			*clr
			minut += 40
			hbraids = 20
			money -= 1250
			'"And we are done.", she says.'
			'You stand up and pay her at the counter.'

			act 'Look in the mirror':gt 'hairsalon', 'mirror'
		end
	end
end

if $ARGS[0] = 'mirror':
	cls
	'<center><img src="<<FUNC(''$face_image'')>>"></center>'
	'<center>You look at your new hairstyle in the mirror.</center>'
	act 'Move away':gt 'hairsalon', 'start'
end

--- hairsalon ---------------------------------
# sexshop
if $ARGS[0] = 'start':
	$loc = $CURLOC
	$metka = $ARGS[0]
	$sexloc = $CURLOC
	cla
	*clr

	if kendra > 0 and rand(1, 10) = 10:gt 'sexshop', 'kendra'
	if tanga = 0 and rand(1, 10) = 10:gt 'sexshop', 'shprod'

	minut += 5
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	clr
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Sex Toys</font></b></center>'
	'<center><img src="images/etogame/sexshop.jpg"></center>'
	'Lubricant - 300 rubles'
	'Dildo - 800 rubles'
	'Vibrator - 1,300 rubles'
	'Strap 1,200 rubles'
	'Butt plug 1,200 rubles'
	'In the basement are the private booths for viewing porn movies (50 rubles 15 minutes).'

	act 'Leave':
		cla
		ghnow = 0
		minut += 5
		gt 'down'
	end

	if SUB >= 100 and analplug = 1 and dildo = 1 and vnesh > 26 and Peter = 0:
		if rand(0, 1) = 1:
			'You see an interesting looking middle-aged man, apparently he is the owner of this store.'

			act 'Introduce yourself to the owner of the store' :
				cla
				*clr
				'<center><img src="images/peter/peter.jpg"></center>'
				'I''m Peter, I''ve been watching you for a long time. I often see you here. I think it will be interesting...'

				act 'Go with Peter':gt 'Peterroom', 'start'

				act 'Leave':
					cla
					ghnow = 0
					minut += 5
					gt 'down'
				end
			end
		end
	end

	act 'Go to the basement':gt 'sexshop', 'podval'

	if gloryhole >= 20 and pornstudio = 0:
		'You notice out of the corner your eye, that the seller is trying to get your attention.'

		act 'Approach to learn what we wants':
			cla
			*clr
			minut += 5
			'In general, you give a great blowjob, everyone knows that. Do you want to earn extra money in the porn business as an actress? The pay there is certainly better than here, and cocks, maybe even more. Well? Other options will not be as good!'

			act 'Agree':
				cla
				*clr
				minut += 5
				gs 'stat'
				'<center><img src="images/studia/Pierre_1.jpg"></center>'
				'You came to the studio, looking for someone to look, who to approach to the issue.'
				'To you approached by a young man who introduced Peter, you are greeted and met.'

				act 'Set out the purpose of your visit':
					cla
					*clr
					minut = minut + 60
					'<center><img src="images/studia/Pierre_2.jpg"></center>'
					'Peter smiled and said that the new actresses are always welcome, just terrible, of course, in the business do not take. On the first couple of auditions will take place, if you like the public - you can not take them.'
					'I''ll tell you that here and how, but under one condition - you have to undress.'

					act 'Undress':
						cla
						*clr
						'<center><img src="images/studia/casting_3.jpg"></center>'
						'First there is a casting actresses - as I said, if you are terrible - you can not hope only comes when you have a beautiful appearance.'

						act '......':
							cla
							*clr
							'<center><img src="images/studia/model_0.jpg"></center>'
							'Then she selected for the lead role.'
							'Here you have to be the most beautiful.'

							act '......':
								cla
								*clr
								'<center><img src="images/studia/Film_0.jpg"></center>'
								'Well then filming itself - an interesting and exciting process'
								'And the output we get ....'

								act '......':
									cla
									*clr
									'<center><img src="images/studia/dvd-disс.jpg"></center>'
									'Then on what I make money.'

									act 'Everything is clear, but how and where everything is for sale? Maybe I want to see for yourself ..':
										cla
										*clr
										'<center><img src="images/studia/Pierre_2.jpg"></center>'
										'The sauna is in a residential area we have one man .. And in a sex shop, how could you understand there garters. Now here are thinking about selling in the university. If we have this who helped - increased profits used well, with dividend entitlements assistant, of course.'

										act 'And any problems with the law?':
											cla
											*clr
											'<center><img src="images/studia/ment_0.jpg"></center>'
											'Specifically for you - yet. We''ve got their contracts with the cops, maybe in the future you will be able to help us to keep them in power, but for now - I told you all have to try on the weekend.'

											act 'Well like all realized':
												cla
												*clr
												'<center><img src="images/studia/Pierre_2.jpg"></center>'
												'Boy, girl, enjoy yourself and do not take away I have more time'
												pornstudio = 3
												gt 'pornstudio', 'start'
											end
										end
									end
								end
							end
						end
					end
				end
			end

			act 'Refuse':
				cla
				*clr
				pornstudio = 1
				gt 'sexshop', 'start'
			end
		end
	end

	if money >= 300:
		act 'Buy lubricant 300 rubles':
			cla
			*clr
			portion = input ("How much you want to buy?")

			if portion*300 > money:'You do not have enough money.'

			if portion*300 <= money:
				lubri += portion * 5
				money -= portion * 300
				minut += 5
				'<center><img src="images/etogame/kassa.jpg"></center>'
				'You bought some lubricant and paid the cashier.'
			end

			act 'Move away from the counter':gt 'sexshop', 'start'
		end
	end

	if pornMagazine <= 1 and money >= 400:
		act 'Buy a porn magazine (400 rubles)':
			cls
			minut += 5
			money -= 400
			pornMagazine = 50
			gs 'stat'
			'You bought a porn magazine and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 800 and dildo = 0:
		act 'Buy dildo (800 rubles)':
			cla
			*clr
			minut += 15
			dildo = 1
			money -= 800
			'<center><img src="images/etogame/kassa.jpg"></center>'
			'You bought a dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop', 'start'
		end
	end

	if money >= 1500 and middildo = 0:
		act 'Buy 15cm long dildo (1,500 rubles)':
			cla
			*clr
			minut += 15
			middildo = 1
			money -= 1500
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 15cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 2500 and largedildo = 0:
		act 'Buy 20cm long dildo (2,500 rubles)':
			cla
			*clr
			minut += 15
			largedildo = 1
			money -= 2500
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 20cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 4500 and bigdildo = 0:
		act 'Buy 25cm long dildo (4,500 rubles)':
			cla
			*clr
			minut += 15
			bigdildo = 1
			money -= 4500
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 25cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 6500 and extradildo = 0:
		act 'Buy 30cm long dildo (6,500 rubles)':
			cla
			*clr
			minut += 15
			extradildo = 1
			money -= 6500
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 30cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 8500 and superdildo = 0:
		act 'Buy 35cm long dildo (8,500 rubles)':
			cla
			*clr
			minut += 15
			superdildo = 1
			money -= 8500
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 35cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 12000 and maddildo = 0:
		act 'Buy 40cm long dildo (12,000 rubles)':
			cla
			*clr
			minut += 15
			maddildo = 1
			money -= 12000
			'<center><img src="images/etogame/kassa.jpg" ></center>'
			'You bought a 40cm long dildo and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop','start'
		end
	end

	if money >= 1300 and vibrator = 0:
		act 'Buy vibrator (1,300 rubles)':
			cla
			*clr
			minut += 15
			vibrator = 1
			money -= 1300
			'<center><img src="images/etogame/kassa.jpg"></center>'
			'You bought a vibrator and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop', 'start'
		end
	end

	if money >= 1200 and strapon = 0:
		act 'Buy a strapon (1,200 rubles)':
			cla
			*clr
			minut += 15
			strapon = 1
			money -= 1200
			'<center><img src="images/etogame/kassa.jpg"></center>'
			'You bought a strapon and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop', 'start'
		end
	end

	if money >= 1200 and analplug = 0:
		act 'Buy butt plug 1,200 rubles':
			cla
			*clr
			minut += 15
			analplug = 1
			money -= 1200
			'<center><img src="images/etogame/kassa.jpg"></center>'
			'You bought a butt plug and paid the cashier.'

			act 'Move away from the counter':gt 'sexshop', 'start'
		end
	end

	if money >= 1000:
		i = 1
		:loophooker
			if hooker[i] = 0:dynamic 'act ''Look at hooker outfit <<i>>'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''hooker'', <<i>>, 1000'
			i += 1
			if i = 6:i = 201
		if i <= 205:jump 'loophooker'
	end
end

if $ARGS[0] = 'podval':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Basement with cubicles for watching movies</font></b></center>'
	'<center><img src="images/etogame/gloryholeBooths1.jpg"></center>'
	''

	act 'Go to a free booth':gt 'sexshop', 'pip'
	act 'Go to the toilet':gt 'sexshop', 'toi'

	if masharab = 1:act 'Go to Masha':gt 'masharoom', 'start'

	act 'Walk out basement':gt 'sexshop', 'start'
end

if $ARGS[0] = 'toi':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img src="images/etogame/PublicToilet.jpg"></center>'
	''

	if tanga = 1:
		act 'Remove Underwear':
			cla
			tanga = 0
			gt 'sexshop', 'toi'
		end
	end

	act 'Look in the mirror':
		cla
		gs 'portmirror'
		$gt1 = 'sexshop'
		$gt2 = 'toi'
		dynamic $portmirror

		act 'Move away from the mirror':
			cla
			gt 'sexshop', 'toi'
		end
	end

	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if (cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0) and clrbelo > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

			act 'Finish':gt 'sexshop', 'toi'
		end
	end

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

			act 'Finish':gt 'sexshop', 'toi'
		end
	end

	if cumfrot > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumfrot = 0
			minut += 10
			!!'<center><img src="images/etogame/frotsp.jpg"></center>'
			'You remove traces of cum from your clothes.'

			act 'Leave':gt 'sexshop', 'toi'
		end
	end
	!!

	if tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut += 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use a tampon.'

			act 'Finish':gt 'sexshop', 'toi'
		end
	end

	act 'Off the toilet':gt 'sexshop', 'podval'
end

if $ARGS[0] = 'pip':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	!!gloryholeBooths
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)

	'<center><b><font color="maroon">Booth movies</font></b></center>'
	'<center><img src="images/etogame/ghBooths.jpg"></center>'
	'Small cabinet with a TV on the wall, terminal and two holes in the walls at waist level.'

	if ghnow > 0:'You served <<ghnow>> cocks.'

	act 'Get out of the booth':gt 'sexshop', 'podval'

	if money >= 50 and hour < 23:
		act 'Stick 50 rubles in the machine':
			cla
			money -= 50
			minut += 15
			horny += 5
			manna += 5
			'Once you have paid the money the TV on the wall showing porn.'
			'You sat in a chair and watched porn, you began to get a little excited.'

			act 'The movie ended':gt 'sexshop', 'pip'

			if horny >= 50:
				act 'Masturbate':
					cla
					horny += 10
					manna += 10
					'You caress your pussy with your fingers and enjoy the pleasant sensation between your legs.'

					if horny >= 100:
						orgasm += 1
						horny = 0
						manna += 15
						willpower += 15
						mastr += 1
						'Gradually the pleasurable sensations spread throughout the body and you orgasm.'
					end

					act 'The movie ended':gt 'sexshop', 'pip'
				end
			end


			if rand(1, 10) >= 10 - (cumlip * 2):
				'You hear the TV turn on in the next stall.'

				act 'Stick a finger in the hole (to serve the stranger)':
					cla
					*clr
					ghnow += 1
					money += 300
					fingerRand = rand(1, 5)
					! WD: Rename missing Image ~  'ghFinger.jpg' to 'ghFinger5.jpg'
					'<center><img src="images/etogame/ghFinger<<fingerRand>>.jpg"></center>'
					'You poke your finger in the hole showing that you are ready to serve the stranger.'
					'The stranger slipped 300 rubles into the hole, and then his cock stuck out of the hole.'

					act 'Sucking dick':
						cla
						*clr
						horny += VAF
						guy += 1
						bj += 1
						gloryhole += 1
						swallow += 1
						cumlip += 1
						dynamic $venerasiak
						ghprand = rand(1, 38)
						'<center><img src="images/picV/gloryhole<<ghprand>>.jpg"></center>'
						'You take the cock in your mouth and began to suck him, jerking his cock with your struggling lips.'

						if horny >= 100:
							VAF += 1
							orgasm += 1
							horny = 0
							manna += 15
							willpower += 15
							lip += 1
							'<b>Suddenly as you are sucking dick you orgasm yourself. Between your legs blazing fire and waves of pleasure fill your body, you moan but continue to suck.</b>'
						end

						'Finally the stranger began to cum in your mouth filling it with a huge amount of sperm. Once you''ve licked all the sperm from a his cock, the man leaves the booth.'

						act 'Wipe your face':gt 'sexshop', 'pip'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'kendra':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/img/centr/shkend.jpg"></center>'
	'In the store you can see Kendra, trying on latex clothes.'
	'"Who do we have here, my favorite bitch, come to me and I am already very excited to choose a toy, now we can test something on the spot" Kendra laughs, sitting down on the table and opening your legs.'

	act 'Away from her':gt 'sexshop', 'start'

	if DOM > 10:act 'First serve':gt 'sexshop', 'kendra4'

	act 'Serve Kendra':
		cla
		*clr
		SUB += 1
		!!girl += 1
		lesbian += 1
		'<center><img src="images/img/centr/shkend1.jpg"></center>'
		'You quickly throw off clothes and knelt before her pussy and lick her eagerly. As long as you carefully suck Kendra as squeals and praises your tongue, saying that no tounge has pleased her much as yours.'
		'"Now pick anything from the toys" says Kendra"'

		act 'Give her a dildo':gt 'sexshop', 'kendra1'
		act 'Give her a strapon':gt 'sexshop', 'kendra2'
	end
end

if $ARGS[0] = 'kendra1':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/img/centr/shkend2.jpg"></center>'
	'You take a dildo, and licking her pussy insert into Kendra. While you with one hand fucks the dildo in her pussy, the second caress her clit trying to bring her to orgasm. Kendra writhes sitting on the table carefully adjusting your movements to the beat.'

	pipirand = rand(0, 3)

	if pipirand > 0:
		orgasm += 1
		'Then Kendra starts spasming as her whole body orgasms, you also feel yourself crest the wave of orgasm. Slightly recovering yourself, Kendra looks at you: "You are a beautiful bitch, totaly committed to serving me."'

		act 'Finish':gt 'sexshop', 'start'
	end

	if pipirand = 0:
		act 'Oops ...':
			cla
			*clr
			sweat += 1
			'<center><img src="images/img/centr/shkend4.jpg"></center>'
			'Suddenly, when she is ready to cum, Kendra begin pissin, her urine flowing allong the dildo and your coating your hand.'
			'Damn!" you cried out and were about to drop the dildo.'
			'"Let''s finish up, slut!" cried Kendra'

			act 'Leave her':gt 'sexshop', 'kendra3'

			act 'Continue':
				cla
				*clr
				sweat += 3
				SUB += 2
				horny = 0
				'<center><img src="images/img/centr/shkend3.jpg"></center>'
				'You dutifully continue to thrust the dildo, still stroking her clit, but the excitement is already gone. Her urine dripping from the dildo on your hand and now your stomach and thighs, your are totally covered in her urine.'
				'Finally she finished, "And now Carney me, and then I become dirty." commanded Kendra'

				act 'Leave her':gt 'sexshop', 'kendra3'

				act 'Lick':
					cla
					*clr
					SUB += 2
					'<center><img src="images/img/centr/shkend5.jpg"></center>'
					'You dutifully move closer to her pussy and began to slowly lick the urine from her thighs and pussy.'
					'"Keep going you slut," Kendra orders you. You began to lick faster, eeping from retching from urine taste in the mouth with difficulty.'
					'"That''s clever, come see me often. Have fun." With these words Kendra dresses and leaves, leaving you sitting on the floor in a puddle of her urine.'

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

if $ARGS[0] = 'kendra2':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/img/centr/shkend8.jpg"></center>'
	'Kendra slides on the strapon and looking at you asks, "Well, beauty in which hole do you want it?'

	act 'In the vagina':
		cla
		*clr
		sex += 1
		vagina += 1
		orgasm += 1
		horny = 0
		'<center><img src="images/img/centr/shkend10.jpg"></center>'
		'Kendra sits in a chair and you jump on top of her strap-on, slding it into your pussy. You ride the strapon, and Kendra drives up from he bottom you trying to shove it as far into your pussy as possible. Several minutes pass and such thrust force you to orgasm, and you slide off the chair with Kendra.'
		'"That''s clever, come see me often. Have fun." With these words Kendra dresses and leaves.'

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

	act 'In the ass':
		cla
		*clr
		anal += 1
		orgasm += 1
		anus += 1
		horny = 0
		'<center><img src="images/img/centr/shkend9.jpg"></center>'
		'You jump up on the table and spreads your legs, Kendra gently slides in the strapon into your aas and gives your ass time to adjust to it. Then she begins to thrust, the strapon slides inside your ass and you soon start to moan. Seeing that you enjoy the process, Kendra begins to slowly accelerate, and you slide yoru hand to your pussy and finger your clit. After a few minutes you orgasm, as your hole body convulsies and shuders you sldie down cuddle and cuddle Kendra so that the strapon is buired all the way in your ass, you close your eyes and drift off.'
		'When you come to, Kendra is already dressed, "Well, you orgasmed slut, I will have to find a double dildoed strapon. I want to see what you will do with two shafts buried in you" with that Kendra leaves.'

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

if $ARGS[0] = 'kendra3':
	cla
	*clr
	minut += 10
	anal += 1
	anus += 1
	rape += 1
	'<center><img src="images/img/centr/shkend6.jpg"></center>'
	'"Oh damn, now I''m going to teach obedience," with these words Kendra jumps up and throws you on to the table taht she sat on a moment ago. Falling on the table you swipe back, and while you''re writhing in pain on the table, Kendra slides on a strapon. Pressing your hands to the table your hips are forced back and she pushes it into your ass, with out any lubricant on it. Added pain to the pain of yoru burnign ass your asshole is torn open. Kendra fucks with you with force into your ass calling you a worthless bitch fit only to be used.'
	'When she finally tires, you just slump to the floor from the table and land with a thud.'
	'"On your knees slut, " she hissed.'

	act 'To kneel':
		cla
		*clr
		'<center><img src="images/img/centr/shkend7.jpg"></center>'
		'You scrambled to your knees, your backside aching terribly, and it seems dripping blood.'
		'"Suck" commands Kendra pushing the strapon to your face. You look at the strapon, coated in traces of your blood.'
		'"Yes suck already." Kendra cried and grabs your hair, you reflexively opened your mouth to scream, but Kendra pushes in the strapon before you can get a word out. She fucks you in the mouth with the same strapon she used a few minutes ago on your ass.'
		'When she finally calms down and let go of your hair, you can''t do nothing but to fall to the floor. Kendra leanes over you and says, "Remember bitch, you do what I say or I will let you sit naked on all fours on the street, I will stay nearby and let whoever wants to fuck you until you have learned your lesson. I have to go now," she gets dressed and leaves.'

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

if $ARGS[0] = 'kendra4':
	cla
	*clr
	minut += 10
	orgasm += 1
	horny = 0
	picrand = rand(11, 12)
	'<center><img src="images/img/centr/shkend<<picrand>>.jpg"></center>'
	'Kendra looks surprised at you until you tear off your clothes.'
	'Naked you turned to her and stick out your ass "Well look, you bring me to orgasm and we can try strapon"'

	if picrand = 11:'Kendra kneels down and begins to lick your pussy, her tongue slides all over your sex, your sensitive clit and dipping into the vagina a few minutes of her effort, you left off.'
	if picrand = 12:'Kendra kneels down and her tongue sticks out tryign to slide into your ass, you writhe as she her tounge saneks and twists inside your ass. Her fingers penetrating your pussy for a few minutes, and the feeling of her tounge in your ass and her fingers in your pussy brings you to a shuddering orgasm.'

	'"Well, I will try to fulfill your desires?" Kendra says, catching her breath. "Now my turn.'

	act 'Give her strapon':gt 'sexshop', 'kendra2'

	if DOM > 25:act '"Perebesh"':gt 'sexshop', 'start'
end

if $ARGS[0] = 'shprod':
	cla
	*clr
	minut += 5
	'<center><img src="images/img/centr/shprod.jpg"></center>'
	'The cashier is right in front of you offering to help and holding a miniskirt "Girl this is very you, will you try it on"'

	act 'Refuse':gt 'sexshop', 'start'

	act 'Try':
		cla
		*clr
		picrand = 47
		'<center><img src="images/img/centr/shprod1.jpg"></center>'
		'You wear the skirt out of the booth and pose in the mirror, you do not have panties on and the skirt is so short that looks more like a belt and does not cover anything.  All your charms are visible from all directions.'
		'Approaching the mirror you are considering this so-called skirt, and the cashier kneels behind you and starts praising your ass in that skirt, his hands already wander around your hips and he get his lips as close to your butt as he can, he says that he wants to kiss on your skin.  Words soon cease and just the touch of his lips to your skin remains, closer and closer to your pussy.'

		act 'Push him away':gt 'sexshop', 'start'
		act 'Let him':gt 'sex', 'kuni'
	end
end

--- sexshop ---------------------------------
# shopdacha
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Shop for all homes</font></b></center>'
'<center><img src="images/etogame/shopdacha.jpg"></center>'
'In this store you can buy a cottage in a cooperative, land for cottage for 1.5 million and pay for all the buildings.'
'All payment shop produces a bank card. On your map now <<karta>> rubles.'

act 'Leave':minut += 5 & gt 'torgcentr'

if hour < 8 or hour > 20:
	'Shop is closed and you are asked to retire.'
else
	if karta >= 30000 and dachaest = 0:
		act 'Buy a cottage (30,000 rubles)':
			cls
			karta -= 30000
			dachaest = 1
			minut += 15
			etoexhib = 0
			gs 'stat'
			'You bought a house with a garden in the dacha cooperative at 5 km. along the northern road.'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 1500000 and placeMansion = 0:
		act 'Buy land for Mansion (1,500,000 rubles)':
			cls
			karta -= 1500000
			placeMansion = 1
			minut += 5
			gs 'stat'
			'You have bought land for Mansion'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 500000 and placeMansion = 1:
		act 'Connect water, electricity (500,000 rubles)':
			cls
			karta -= 500000
			placeMansion = 2
			minut += 5
			gs 'stat'
			'You paid for a connection of services to the site'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 1500000 and placeMansion = 2:
		act 'Build Mansion''s shell for (1,500,000 rubles)':
			cls
			karta -= 1500000
			placeMansion = 3
			minut += 5
			gs 'stat'
			'You paid for the construction of the Mansion''s shell'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 500000 and placeMansion = 3 and ymanrem[3] = 0:
		act 'Build rooms for (500, 000 rubles)':
			cls
			karta -= 500000
			ymanrem[3] = 1
			minut += 5
			gs 'stat'
			'You paid for the construction of the Mansion''s rooms'

			act 'Leave':gt $curloc
		end
	end

	if placeMansion >= 2:
		if karta >= 800000 and placeMansion >= 2 and banaMansion = 0:
			act 'Build baths for (800,000 rubles)':
				cls
				karta -= 800000
				banaMansion = 1
				minut += 5
				gs 'stat'
				'You paid for the construction of the Mansion''s bathrooms'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 500000 and placeMansion >= 2 and bassMansion = 0:
			act 'Build pool for (500,000 rubles)':
				cls
				karta -= 500000
				bassMansion = 1
				minut += 5
				gs 'stat'
				'You paid for the construction of the Mansion''s pool'

				act 'Leave':gt $curloc
			end
		end
	end
	if placeMansion = 3:
		if karta >= 250000 and placeMansion = 3 and ymanrem[3] = 1:
			act 'Pay for repairs Hall (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[3] = 2
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 150000 and placeMansion = 3 and ymanrem[3] = 2:
			act 'Pay lounge furniture for (150,000 rubles)':
				cls
				karta -= 150000
				ymanrem[3] = 3
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[4] = 0:
			act 'Pay for repairs bedroom (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[4] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 300000 and placeMansion = 3 and ymanrem[4] = 1:
			act 'Pay bedroom furniture for (300,000 rubles)':
				cls
				karta -= 300000
				ymanrem[4] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[5] = 0:
			act 'Pay bathroom renovation for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[5] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[5] = 1:
			act 'Pay for bathroom furniture and fixtures for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[5] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture and sanitary ware.'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[6] = 0:
			act 'Pay renovated kitchen for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[6] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 350000 and placeMansion = 3 and ymanrem[6] = 1:
			act 'Pay kitchen furniture for (350,000 rubles)':
				cls
				karta -= 250000
				ymanrem[6] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture for the kitchen.'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[7] = 0:
			act 'Pay for repairs hall for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[7] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[7] = 1:
			act 'Pay furniture hall for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[7] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture for the hall'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[8] = 0:
				act 'Pay for repairs fireplace room for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[8] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[8] = 1:
			act 'Pay for the purchase of furniture for the fireplace room for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[8] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture.'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[9] = 0:
			act 'Children''s room to pay for repairs (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[9] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[9] = 1:
			act 'Pay for the purchase of furniture for the nursery (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[9] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[10] = 0:
			act 'Pay for repairs library for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[10] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[10] = 1:
			act 'Pay for the purchase of furniture for libraries for (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[10] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[11] = 0:
			act 'Pay for repairs gym (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[11] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[11] = 1:
			act 'Pay furniture gym (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[11] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture for the gym'

				act 'Leave':gt $curloc
			end
		end

		if karta >= 250000 and placeMansion = 3 and ymanrem[12] = 0:
			act 'Pay for repair of the (250,000 rubles)':
				cls
				karta -= 250000
				ymanrem[12] = 1
				minut += 5
				gs 'stat'
				'You pay for repairs'

				act 'Leave':gt $curloc
			end
		elseif karta >= 250000 and placeMansion = 3 and ymanrem[12] = 1:
			act 'Pay for the purchase of furniture for the office (250,000)':
				cls
				karta -= 250000
				ymanrem[12] = 2
				minut += 5
				gs 'stat'
				'You paid for the purchase of furniture.'

				act 'Leave':gt $curloc
			end
		end
	end
end

--- shopdacha ---------------------------------
# sportShop
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Sporting goods store</font></b></center>'
	'<center><img src="images/etogame/sportshop.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'torgcentr'
	end

	act 'In the women''s clothing department':
		cla
		minut += 5
		gt 'sportshop', 'clo'
	end

	if skak = 0 and money >= 500:
		act 'Buy rope (500 rubles)':
			cla
			minut += 5
			money -= 500
			skak = 1

			act 'Pick up a package':gt 'sportshop', 'start'
		end
	end

	if obruch = 0 and money >= 1500:
		act 'Buy hoop (1,500 rubles)':
			cla
			minut += 5
			money -= 1500
			obruch = 1

			act 'Pick up a package':gt 'sportshop', 'start'
		end
	end

	if bookYog = 0 and money >= 1500:
		act 'Buy benefits of yoga (1,500 rubles)':
			cla
			minut += 5
			money -= 1500
			bookYog = 1

			act 'Pick up a package':gt 'sportshop', 'start'
		end
	end

	!!!WD: Doesn''t exists anymore in 1.0.5
	if remsitr = 1 and treadmill = 0 and money >= 5000:
		act 'Treadmill 5000 rubles':
			cla
			minut += 5
			money -= 5000
			treadmill = 1
			'The attendant informed that they can send it directly to your house.'

			act 'Give the address':gt 'sportshop', 'start'
		end
	end
	!!!
end

if $ARGS[0] = 'clo':
	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	cla
	clr
	*clr
	mag = 1
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Department of women''s clothing.</font></b></center>'
	'<center><img src="images/etogame/sportshop.jpg"></center>'
	'All clothing costs 4,000 rubles, sportswear dimensionless.'

	act 'Get out of the department':
		cla
		minut += 5
		gt 'sportshop', 'start'
	end

	if money >= 4000:
		i = 1
		:loopyoga
			if yoga[i] = 0:dynamic 'act ''Look at sportswear <<i>>'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''yoga'', <<i>>, 4000'
			i += 1
		if i <= 18:jump 'loopyoga'
	end
end

--- sportShop ---------------------------------
# stripclub
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Strip Club</font></b></center>'
	'<center><img src="images/etogame/stripclub.jpg"></center>'
	scrand = rand(1, 100)

	if scrand <= 40 and stripday ! day:
		stripday = day
		cfnm = 1
	elseif scrand > 40 and stripday ! day:
		stripday = day
		cfnm = 0
	end

	if cfnm = 1:'Today''s program, male striptease, ticket 500 rub.'
	if cfnm = 0:'Today''s program, striptease, ticket 500 rub.'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	if stripdolg > 0 and money >= 50000:
		act 'Pay a fine of (50,000 rubles)':
			stripdolg = 0
			money -= 50000
			gt 'stripclub', 'start'
		end
	end

	if stripdolg = 0:
		if cfnm = 1 and money >= 500 and hour < 23:
			act 'Pay 500 rubles and enter':
				cla
				money -= 500
				minut += 5
				frost = 0
				gt 'stripclub', 'forwoman'
			end
		elseif cfnm = 0 and money >= 500 and hour < 23:
			act 'Pay 500 rubles and enter':
				cla
				money -= 500
				minut += 5
				frost = 0
				gt 'stripclub', 'forman'
			end
		end

		if stripdance > 0 and stripwork = 0:
			act 'Talk to the manager about the work as a stripper':
				cla
				minut += 15
				gs 'stat'
				'You performed in the manager''s office. In the office, a young man asked you to sit down and began his speech. "We are working every day from 15 to 2 nights. Sometimes there are days of male strippers. Strippers we do not pay, only provide costumes. This is to ensure that there was an incentive to earn a tip. Just stripper can dance lap dance for a fee client but this should be of interest to the client, with each lap dance stripper gets 800 rubles, 200 is the club can not otkazyvatsya from private dances. And if a lap dance is a solid stripdens, then dance on stage involves a lot of work on the pole. Unless you dance on a pole, it is not pozortes. with interchangeable I do not hurry, strippers themselves when they want to come to work. schedule is free, I just do not want your labor, and work as a stripper can be combined with other types of work. So how? Satisfied? "'

				act 'No':gt 'stripclub', 'start'

				act 'Yes':
					cls
					stripwork = 1
					'Yes, I''m happy with everything you nodded. Manager held you in the fitting room and showed a woman who is responsible for the costumes. It introduced you to the chief of security, who wrote you Propus and left leaving you.'

					if cfnm = 0:act 'Osmatrivatsya':gt 'stwork', 'start'

					if cfnm = 1:
						'Today the program male striptease, so some guys behind the scenes.'

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

		if cfnm = 0 and stripwork > 0:
			act 'Walk in dressing room':frost = 0 & gt 'stwork', 'start'
		elseif cfnm > 0 and stripwork > 0:
			'Today there is no work, male striptease.'
		end
	end
end

if $ARGS[0] = 'forman':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Strip Club</font></b></center>'
	'<center><img src="images/etogame/stripclub1.jpg"></center>'
	'On the stage in the main hall are the girls undress to the music, there is a service privat dance, worth 1000 rubles for the dance.'

	act 'Leave':
		cla
		minut += 5
		gt 'stripclub', 'start'
	end

	if hour < 23:
		act 'Sit at a table near the stage and watch striptease':gt 'stripclub', 'stol'

		if money >= 1000:
			act 'Order a lap dance (1,000 rubles)':gt 'stripclub', 'privat'
		end

		if money >= 5000:
			act 'Order a special show (5,000 rubles)':
				stprrand = rand(0, 1)

				if stprrand = 0:gt 'stripclub', 'stpr1'
				if stprrand = 1:gt 'stripclub', 'stpr2'
			end
		end
	end
end

if $ARGS[0] = 'privat':
	cla
	clr
	*clr
	money -= 1000
	minut += 60
	horny += 25
	DOM += 1

	gs 'stat'
	privrand = rand(0, 4)

	if privrand = 0:
		'<center><img src="images/img/centr/priv2.jpg"></center>'
		'During the girls keen on and begin to caress you frankly.'

		act 'Finish':gt 'stripclub', 'forman'
		act 'Let them':gt 'stripclub', 'privsex'
	elseif privrand > 0:
		'<center><img src="images/etogame/privat.jpg"></center>'
		'Very hot girls dancing around you, you feel as an aphrodisiac.'

		if money >= 1000:
			act 'Another lap dance (1,000 rubles)':gt 'stripclub', 'privat'
		end

		act 'Go to scene':gt 'stripclub', 'forman'
	end
end

if $ARGS[0] = 'stol':
	cla
	clr
	*clr
	gs 'stat'
	'<center><img src="images/etogame/stripclub2.jpg"></center>'
	'On the stage lit girl dancing and undressing smartly before strenuous male audience.'

	act 'See striptease':
		cla
		*clr
		clr
		gs 'stat'
		minut += 15
		'<center><img src="images/etogame/stripclub4.jpg"></center>'
		'Girl dancing around you clearly raschityvaya on tips.'

		if money >= 50:
			act 'Shove her 50 rubles':
				cla
				*clr
				horny += 5
				minut += 15
				money -= 50
				'<center><img src="images/etogame/stripclub6.jpg"></center>'
				'You are stuck in the 50 rubles stripper panties and she invitingly start wagging her hips and shake tits in front of you, you feel like you gradually begin to be excited.'

				act 'Further':gt 'stripclub', 'stol'
			end
		end

		act 'Downcast eyes':
			cla
			horny -= 5
			minut += 15
			'You decided not to give money to a stripper and took from her eyes, you feel a little ashamed and excitation decreases.'

			act 'Further':gt 'stripclub', 'stol'
		end
	end

	act 'Away from the scene':gt 'stripclub', 'forman'
end

if $ARGS[0] = 'forwoman':
	cla
	clr
	*clr
	stripguy = 0
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Strip Club</font></b></center>'
	'<center><img src="images/etogame/stripclub1.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'stripclub', 'start'
	end

	if hour < 23 and zenit > 0 and minifoto = 0:
		act 'Photograph':
			minut += 10
			'As soon as you get the camera to you immediately approached security guard, and said that there should not be removed, you apologize and hide the camera in her purse.'
		end
	elseif hour < 23 and minifoto > 0:
		act 'Photograph':
			cla
			minut += 60
			'You remove the mini camera and start to gently remove walking down the hall.'
			stripfotorand = rand(0, 10)

			if stripfotorand < 2:
				minifoto = 0
				stripdolg = 1
				'It suits you and tight security guard taking you by the hand leads to the output, the output is already waiting for the administrator, it takes you a camera, and says that you have a fine of 50, 000 rubles. and until you pay to join the club can no longer.'

				act 'Leave':gt 'stripclub', 'start'
			elseif stripfotorand >= 2 and stripfotorand < 6:
				shantfoto += 1
				'You can not do it normally take a picture, the girls surrounding obscure charts, then the guard comes very close, but in the end you still manage to make a normal picture.'

				act 'Leave':gt 'stripclub', 'start'
			elseif stripfotorand >= 6:
				'You can not do it normally take a picture, the girls surrounding obscure charts, then the guard comes very close.'

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

	if hour < 23:
		act 'Sit at a table near the stage and watch striptease':gt 'stripclub', 'stolW'
	end
end

if $ARGS[0] = 'stolW':
	cla
	clr
	*clr
	stripguy = 0
	gs 'stat'
	'<center><img src="images/picVA/stripW.jpg"></center>'
	'On stage act and inflated athletic guys, girls squeal and shoved them money in the heat.'

	if hour < 23:
		act 'See striptease':
			cla
			*clr
			clr
			gs 'stat'
			minut += 15
			'<center><img src="images/picVA/stripW1.jpg"></center>'
			'To you a stripper came and hugged you.'

			if money >= 50:
				act 'Shove him 50 rubles':
					cla
					*clr
					horny += 5
					minut += 15
					money -= 50
					'<center><img src="images/picVA/stripW2.jpg"></center>'
					'You shoved 50 rubles strippers and he sat on a chair you started dancing in front of you, he pulled off melting and you''ll see who gets his dick. Stripper took you to his chest, trying to get her out from under her blouse.'

					act 'Stop':gt 'stripclub', 'stolW'
					!!act 'Touch his hand member':gt 'cfnm', 'start'
					act 'Let him expose your breasts':gt 'cfnm', 'start'
				end
			end

			act 'Downcast eyes':
				cla
				horny -= 5
				minut += 15
				'You decided not to give money to strippers and looked away from him, you feel a little ashamed and arousal decreases.'

				act 'Further':gt 'stripclub', 'stolW'
			end
		end
	end

	act 'Away from the scene':gt 'stripclub', 'forwoman'
end

if $ARGS[0] = 'privsex':
	cla
	*clr
	horny = 0
	orgasm += 1
	'<center><img src="images/img/centr/priv3.jpg"></center>'
	'You widely spreads her legs and has been one lick your pussy, bringing you to orgasm, and the second continues to caress the body.'

	act 'Finish':gt 'stripclub', 'forman'
	act 'More':gt 'stripclub', 'privsex1'
end

if $ARGS[0] = 'privsex1':
	cla
	*clr
	girl += 2
	lesbian += 1
	privpicrand = rand(4, 7)
	'<center><img src="images/img/centr/priv<<privpicrand>>.jpg"></center>'
	'You caress each other.'

	act 'Finish':gt 'stripclub', 'forman'

	if hour > 23:
		act 'More':gt 'stripclub', 'privsex1'
	end
end

if $ARGS[0] = 'stpr1':
	cla
	*clr
	horny += 30
	'<center><img src="images/img/centr/prsex1.jpg"></center>'
	'The room includes two girls with a strap, and begin to fuck each other.'

	act 'Finish':gt 'stripclub', 'forman'

	act 'Join':
		cla
		*clr
		SUB += 3
		girl += 2
		lesbian += 1
		sex += 1
		anal += 1
		'<center><img src="images/img/centr/prsex2.jpg"></center>'
		'You undress and kneels in front of the girls, they against you and substitute Strap to your face, you start vskhvativ Strap them greedily sucking, licking the remnants of their juices.'

		act 'Doggy-Style':
			cla
			*clr
			'<center><img src="images/img/centr/prsex3.jpg"></center>'
			'You get up cancer and one of the girls comes to you in the pussy as you continue to suck the second.'

			act 'In Two Smoking Barrels':
				cla
				*clr
				horny = 0
				orgasm += 1
				'<center><img src="images/img/centr/prsex4.jpg"></center>'
				'You sodites one of the threesome and the second girl enters you into the anus, they fuck you in both holes bringing to Orgs.'

				act 'Further':
					cla
					*clr
					cumlip += 1
					cumface += 1
					cumbrest += 1
					'<center><img src="images/img/centr/prsex5.jpg"></center>'
					'When you are finished, the girls stand over you and out of their threesome poured liquid to taste much like a sperm, it is poured into your mouth, face and chest.'

					act 'Finish':gt 'stripclub', 'forman'
				end
			end
		end
	end
end

if $ARGS[0] = 'stpr2':
	cla
	*clr
	girl += 2
	lesbian += 1
	'<center><img src="images/img/centr/prsex6.jpg"></center>'
	'The room includes two girls with a strap in his hand, they strip you and freeze in anticipation of your wishes.'

	act 'Fuck them':
		cla
		*clr
		DOM += 3
		'<center><img src="images/img/centr/prsex7.jpg"></center>'
		'You wear the strap, and the girls kneel and begin to suck it.'

		act 'Fuck them':gt 'stripclub', 'stpr3'
	end

	act 'Surrender':
		cla
		*clr
		SUB += 3
		'<center><img src="images/img/centr/prsex8.jpg"></center>'
		'You get up on his knees, and girls wear Vibrators and give you their sucking you with joy and doing.'

		act 'Surrender':gt 'stripclub', 'stpr4'
	end
end

if $ARGS[0] = 'stpr3':
	cla
	*clr
	horny = 0
	orgasm += 1
	prsexrand = rand(9, 13)
	'<center><img src="images/img/centr/prsex<<prsexrand>>.jpg"></center>'
	'You fuck them as your heart wants, eventually ends themselves.'

	if hour > 23:
		act 'More':gt 'stripclub', 'stpr3'
	end

	act 'Finish':gt 'stripclub', 'forman'
end

if $ARGS[0] = 'stpr4':
	cla
	*clr
	horny = 0
	orgasm += 1
	prsexrand = rand(14, 19)
	'<center><img src="images/img/centr/prsex<<prsexrand>>.jpg"></center>'
	'They twirl as you want, then fucking couple then one by one, in the end you end.'

	if hour > 23:
		act 'More':gt 'stripclub', 'stpr4'
	end

	act 'Finish':gt 'stripclub', 'forman'
end

--- stripclub ---------------------------------
# stwork
if $ARGS[0] = 'start':
	$stripgirl = {
		cls
		gs 'stat'
		striptalkrand = rand(0, 10)

		if striptalkrand = 0:$striptalk = 'Have you heard? Then came one somehow the girl, all so beautiful, but the stage was full of zero can not do anything, so it only booed.'
		if striptalkrand = 1:$striptalk = 'I''m telling you, men give birth to girls with tattoos.'
		if striptalkrand = 2:$striptalk = 'On a pole over much more profitable than just dance striptease, easier to excite the customer, but this pole is difficult.'
		if striptalkrand = 3:$striptalk = 'Phew, it does not go out on stage, going back all sweaty, disheveled hair and makeup certainly splyvet. Here one can go bankrupt cosmetics.'
		if striptalkrand = 4:$striptalk = 'Generally these private dances, though guaranteed money but it is not on the scene can make more money.'
		if striptalkrand = 5:$striptalk = 'Then the girl was ugly one, came on the scene, immediately let her boo, but she started spinning around a pole, customers jaw dropped, it is not bad earned.'
		if striptalkrand = 6:$striptalk = 'And why the manager never says male or female day? I recently rushed to work, even nail broke, I take refuge, and here these bears jump on stage. Turned around and went back.'
		if striptalkrand = 7:$striptalk = 'Some dechonki told that they had problems arise on the job. For many stritizersha power whore.'
		if striptalkrand = 8:$striptalk = 'Here one fat woman trying to dance on the pole, so muzzle flopped on the floor and put a strong bruise.'
		if striptalkrand = 9:$striptalk = 'Recently one zhirnuhu raised a laugh in the hall. Like and simpotnaya and dances well, but to no avail.'
		if striptalkrand = 10:$striptalk = 'I heard a decent clubs abroad strippers themselves pay for the right to work in the club.'

		'Girls are engaged with their appearance in the mirror fun chatting about all sorts of trivia.'
		'<<$striptalk>>'

		act 'Move away':gt $curloc, 'start'
	}

	$stripohr = {
		cls
		gs 'stat'
		'Hefty bored guard at the door. Seeing you it lazily throws "Hello <<$name>>."'

		act 'Move away':gt $curloc, 'start'
	}

	$striptoilet2 = {
		cls
		gs 'stat'
		'You rinsed the razor blade which will be enough for <<stanok>> time.'

		if leghair > 0 and stanok > 0:
			act 'Shave your legs (0:15)':
				cla
				*clr
				minut += 15
				leghair = -5
				horny += 5
				stanok -= 1
				'<center><img src="images/pics/shave.jpg"></center>'
				'You lathered up and shaved hair with them.'

				act 'Postpone machine':dynamic $striptoilet2
			end
		end

		if lobok > 0 and stanok > 0:
			act 'Shave pubis (0:15)':
				cla
				*clr
				minut += 15
				lobok = -5
				horny += 5
				stanok -= 1
				'<center><img src="images/pics/shave3.jpg"></center>'
				'You lathered pubis, then shaved all the hair from it.'

				act 'Postpone machine':dynamic $striptoilet2
			end
		end

		act 'Out of the shower and get dressed':dynamic $striptoilet
	}

	$striptoilet = {
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/Toilet.jpg"></center>'
		'Dirty and smelly toilet that seems to have never been cleaned'

		if tanga = 1:
			act 'Remove Underwear':
				cla
				tanga = 0
				dynamic $striptoilet
			end
		end

		act 'Look in the mirror':
			cla
			gs 'portmirror'
			$gt1 = 'stwork'
			$gt2 = ''
			dynamic $portmirror

			act 'Move away from the mirror':
				cla
				dynamic $striptoilet
			end
		end

		if mop ! 1:
			act 'Wash off makeup':
				cla
				*clr
				minut += 5
				mop = 1
				'<center><img src="images/etogame/mop.jpg"></center>'
				'You flushed makeup.'

				act 'Leave':dynamic $striptoilet
			end
		end

		act 'Take a shower (0:15)':
			cla
			*clr
			minut += 15
			sweat = -3
			horny += 1
			hapri = 0
			mop = 1
			cumpussy = 0
			cumbelly = 0
			cumass = 0
			cumanus = 0
			cumlip = 0
			cumface = 0
			cumanus =0
			'<center><img src="images/pics/dush.jpg"></center>'
			'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'

			if leghair > 0 and stanok > 0 or lobok > 0 and stanok > 0:
				act 'Get razor':dynamic $striptoilet2
			end

			if horny >= 90:
				act 'Send shower pussy':
					cla
					*clr
					horny = 0
					minut += 30
					mastr += 1
					orgasm += 1
					manna += 15
					willpower += 15
					'<center><img src="images/pics/wash2.jpg"></center>'
					'You sent a shower pussy and tight jet of warm water began to caress you. Soon you will feel like a warm wave covers your entire body and you began to shudder in orgasm.'

					act 'Get out and get dressed':dynamic $striptoilet
				end
			elseif horny >= 40 and hormy < 90:
				act 'Send shower pussy':
					cla
					*clr
					horny += 5
					minut += 30
					manna += 10
					willpower += 10
					'<center><img src="images/pics/wash2.jpg"></center>'
					'You sent a shower pussy and tight jet of warm water began to caress you. First you were very nice, but after a while, even as it was painful. Excitation of sleep and you stop masturbating.'

					act 'Get out and get dressed':dynamic $striptoilet
				end
			end

			act 'Out of the shower and get dressed':dynamic $striptoilet
		end

		!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
		!!Removed sweat =- 1 when cum is wiped off clothes
		!!clrbelo: Amount of clean panties available
		if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
			act 'Quick wash (0:15)':
				cla
				*clr

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

				dynamic $showerdin
				sweat -= 1
				minut += 15
				'<center><img src="images/pics/wash5.jpg"></center>'
				'You gave yourself a catlick, thus removing any traces of cum.'

				act 'Finish':dynamic $striptoilet
			end
		end

		if cumlip > 0 or cumface > 0:
			act 'Wash cum off face (0:15)':
				cla
				*clr
				mop = 1
				cumlip = 0
				cumface = 0
				sweat -= 1
				minut += 15
				'<center><img src="images/etogame/facesp.jpg"></center>'
				'You clean your face and got rid of any trace of cum.'
				act 'Finish':dynamic $striptoilet
			end
		end

		if cumfrot > 0:
			act 'Wipe the cum off your clothes (0:10)':
				cla
				*clr
				cumfrot = 0
				minut += 10
				!!'<center><img src="images/etogame/frotsp.jpg"></center>'
				'You remove traces of cum from the clothes.'

				act 'Finish':dynamic $striptoilet
			end
		end
		!!

		act 'Off the toilet':gt $curloc, 'start'
	}
	$sexloc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	clr
	minut += 5
	stripMir = 1
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Dressing for strippers</font></b></center>'
	'<center><img src="images/etogame/striprazd.jpg"></center>'
	'On the wall of the <a href="exec:gt ''mirror'', ''start''">mirrors</a> to whom <a href="exec:dynamic $stripgirl">girls</a> lead myself up before performances.'
	'<a href="exec:stripMir = 0 & gt ''stripclub'', ''start''">Do not noticeable, steel door</a> in the hallway overlooks the back yard and all the staff goes through the door to work, and not through the front door. About this entry is always worth <a href="exec:dynamic $stripohr">guard</a>.'
	'Behind wooden door located <a href="exec:dynamic $striptoilet">toilet for staff</a>'
	if tatplech > 0:stripKoef = rand(1, 3)
	if tatback > 0:stripKoef2 = rand(1, 3)
	if tatback > 0:stripKoef3 = rand(1, 3)
	if tatupb > 0:stripKoef4 = rand(3, 6)
	if tatleg > 0:stripKoef5 = rand(1, 3)

	publichot = vnesh - 10 + stripKoef + stripKoef2 + stripKoef3 + stripKoef4 + stripKoef5
	publichotstart = publichot

	if hour >= 15 or hour <= 2:
		if mop >= 4:
			if hapri = 1:
				if sweat <= 0:
					if leghair <= 0 and lobok <= 0:
						if fingal <= 0:
							act 'Go on stage':stpredmet = 3 & gt 'stwork2'
						else
							'With such a black eye as you have nothing to do on stage.'
						end
					else
						'There is nothing more terrible than a stripper with hairy legs or pubis, in this form can not work.'
					end
				else
					'Lord, from you the same stinks like a horse, one must first wash.'
				end
			else
				'Not with this disheveled hair pokazyvatsya in public.'
			end
		else
			'Need to work very defiant makeup.'
		end
	else
		'Working time is over. Time to go home.'
	end
end

--- stwork ---------------------------------
# stwork2
!!minut += 15
clr
gs 'stat'
'<center><b><font color="maroon">Stage</font></b></center>'
'<center><img src="images/etogame/stripclub1.jpg"></center>'

if publichot < 10:$pubhot = 'and boo you, screams are heard "remove this stupid cow"'
if publichot >= 10 and publichot < 20:$pubhot = 'and you boo'
if publichot >= 20 and publichot < 30:$pubhot = 'Catching and frankly bored drinking and talking among themselves'
if publichot >= 30 and publichot < 60:$pubhot = 'sometimes throws at you accompanied by smiles views'
if publichot >= 60 and publichot < 70:$pubhot = 'and legim interest examined you and conduct conversations with each other over a beer'
if publichot >= 70 and publichot < 80:$pubhot = 'interest examined with you'
if publichot >= 80 and publichot < 90:$pubhot = 'with strained faces, some even visible sweat on their foreheads'
if publichot >= 90:$pubhot = 'forgotten about his drinking, whooped and rumble money'

'Men sitting in front of the stage <<$pubhot>>.'

if hour >= 15 or hour <= 2:
	if stpredmet > 0:
		act 'Striptease 5 minutes (<<stpredmet>> items of clothing)':
			cls
			minut += 5
			stpredmet -= 1
			sweat += 1
			fat -= 3
			manna -= rand(5, 10)

			if stpredmet = 1:sweat += 1
			if stpredmet = 0:hapri = 0 & stripdancesum += 1

			publichot += rand(stripdance/30, stripdance/10)

			if publichotstart = publichot:publichot -= rand(5, 10) & publichotstart = publichot

			gs 'stat'
			'<center><img src="images/etogame/stripclub2.jpg"></center>'
			'You danced on stage undressing in public.'

			if ves > rost-90:
				vesrand = rand(0, 100)

				if vesrand >= 75:
					publichot -= rand(5, 10)
					'In the hall they laugh at you, "Look how fat she hang out. Aga and ass shaking like jelly."'
				end
			end

			dynamic $pubhotdi

			act 'further':gt $curloc
		end

		act 'Dance around a pole 5 minutes (<<stpredmet>> garments)':
			cls
			minut += 5
			stpredmet -= 1
			sweat += 2
			fat -= 5
			manna -= rand(10, 50)

			if stpredmet = 1:hapri = 0
			if stpredmet = 0:mop = 0 & stripdancesum += 1

			hapri = 0
			publichot += rand(stripdance / 20, stripdance / 5)+ rand(poledance / 20, poledance / 5)

			if publichotstart = publichot:publichot -= rand(5, 10) & publichotstart = publichot

			gs 'stat'
			'<center><img src="images/etogame/strippole.jpg"></center>'
			'You danced around the pole showing acrobatics and sexy undressing in public.'

			if ves > rost-90:
				vesrand = rand(0, 100)

				if vesrand >= 75:
					'Performing another trick on the pole you have not kept your weight and crashed to the floor. The crowd laughed, "Hey, hippopotamus, stomp at the swamp where it came from."'
					publichot = 15
					fingalrand = rand(0, 100)

					if fingalrand >= 75:
						fingal += rand(2, 5)
						'When you fall, you greatly venerated person on the floor and it seems you have a bruise on his face blurred.'
					end
				end

				if vesrand >= 50:
					publichot -= rand(5, 10)
					'In the hall they laugh at you, "Look how fat she hang out. Aga and ass shaking like jelly."'
				end
			end

			dynamic $pubhotdi

			act 'further':gt $curloc
		end
	end

	if stpredmet = 0:
		if publichot >= 80 and publichot < 90:
			privatrand = rand(0, 100)

			if privatrand >= 90:
				'After the dance, the guard showed you that you have a customer for a private dance.'
				dynamic $privatdancedi
				exit
			end
		end

		if publichot >= 90:
			privatrand = rand(0, 100)

			if privatrand >= 70:
				'After the dance, the guard showed you that you have a customer for a private dance.'
				dynamic $privatdancedi
				exit
			end
		end
	end
else
	'Working time is over. Time to go home.'
end

act 'Quit the stage':gt 'stwork', 'start'


$pubhotdi = {
	if publichot < 30:
		payrand = 0
		'Nobody even paid any attention to your movements on the stage.'
	elseif publichot >= 30 and publichot < 60:
		payrand = 0
		'A couple of people looked at you but no more than that, you tip no one has.'
	elseif publichot >= 60 and publichot < 70:
		payrand = rand(0, 1)

		if payrand = 0:
			'A couple of people looked at you but no more than that, you tip no one has.'
		elseif payrand = 1:
			paymoneyrand = rand(1, 3)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		end
	elseif publichot >= 70 and publichot < 80:
		payrand = rand(0, 5)

		if payrand = 0:
			'Tip you no one has.'
		elseif payrand = 1:
			paymoneyrand = rand(1, 3)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 2:
			paymoneyrand = rand(2, 4)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 3:
			paymoneyrand = rand(3, 5)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 4:
			paymoneyrand = rand(4, 6)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 5:
			paymoneyrand = rand(5, 10)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		end
	elseif publichot >= 80 and publichot < 90:
		payrand = rand(0, 10)

		if payrand = 0:
			'Tip you no one has.'
		elseif payrand = 1:
			paymoneyrand = rand(1, 3)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 2:
			paymoneyrand = rand(2, 4)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 3:
			paymoneyrand = rand(3, 5)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 4:
			paymoneyrand = rand(4, 6)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 5:
			paymoneyrand = rand(5, 10)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 6:
			paymoneyrand = rand(7, 12)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 7:
			paymoneyrand = rand(10, 15)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 8:
			paymoneyrand = rand(15, 20)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 9:
			paymoneyrand = rand(20, 30)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 10:
			paymoneyrand = rand(30, 50)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		end
	elseif publichot >= 90:
		payrand = rand(0, 15)

		if payrand = 0:
			'Tip you no one has.'
		elseif payrand = 1:
			paymoneyrand = rand(1, 3)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 2:
			paymoneyrand = rand(2, 4)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 3:
			paymoneyrand = rand(3, 5)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 4:
			paymoneyrand = rand(4, 6)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 5:
			paymoneyrand = rand(5, 10)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 6:
			paymoneyrand = rand(7, 12)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 7:
			paymoneyrand = rand(10, 15)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 8:
			paymoneyrand = rand(15, 20)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 9:
			paymoneyrand = rand(20, 30)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 10:
			paymoneyrand = rand(30, 40)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 11:
			paymoneyrand = rand(40, 50)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 12:
			paymoneyrand = rand(50, 60)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 13:
			paymoneyrand = rand(60, 70)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 14:
			paymoneyrand = rand(70, 80)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		elseif payrand = 15:
			paymoneyrand = rand(80, 100)
			money += paymoneyrand * 10
			'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
		end
	end
}

$privatdancedi = {
	act 'Go for a lap dance':
		cls
		minut += 30
		money += 800
		sweat = 1
		hapri = 0
		mop = 0
		fat -= 5
		stripdancesum += 1

		if stprrand = 0:gt 'stwork2', 'pr1'
		if stprrand = 1:gt 'stwork2', 'pr2'
		if stprrand = 2:gt 'stwork2', 'pr3'

		gs 'stat'
		'<center><img src="images/etogame/privatstrip.jpg"></center>'
		'In a separate room to the music you within half an hour showed different erotic dancing client.'

		act 'Go to the locker room':gt 'stwork', 'start'
	end
}

if $ARGS[0] = 'pr1':
	cla
	*clr
	!!money += 2000
	'<center><img src="images/img/centr/pr1.jpg"></center>'
	'Four-bedded before you dance guys, after a while they offer you service them in full for 5000 rubles.'

	act 'Leave':gt 'stwork', 'start'

	act 'Agree':
		gang += 1
		guy += 4
		picrand = 12
		money += 5000
		gt 'paysex', 'var'
	end
end

if $ARGS[0] = 'pr2':
	cla
	*clr
	!!money += 2000
	'<center><img src="images/img/centr/pr2.jpg"></center>'
	'You dance in front of a guy while he fingering, he soon offers, serve it in full for 3000 rubles.'

	act 'Leave':gt 'stwork', 'start'

	act 'Agree':
		guy += 1
		picrand = 39
		money += 3000
		xgt 'sex', 'var'
	end
end

if $ARGS[0] = 'pr3':
	cla
	*clr
	!!money += 2000
	'<center><img src="images/img/centr/pr3.jpg"></center>'
	'You with another dancer portray leysbiyskie game after a few minutes you offer to make your games more realistic for each 2000rub.'

	act 'Leave':gt 'stwork', 'start'

	act 'Agree':
		girl += 1
		lesbian += 1
		picrand = 18
		money += 2000
		xgt 'lezbsex', 'var'
	end
end

--- stwork2 ---------------------------------
# torgcentr
gs 'stat'
'<center><b>Shopping mall</b></center>'
'<center><img src="images/img/centr/torgcentr.jpg"></center>'
'On the other side <a href="exec:gt ''young_shop''">Shop-Keys Pussy</a> sells clothing for young adults and a <a href="exec:gt ''sportShop'', ''start''">sporting goods store</a>.'

if hour >= 8 and hour <= 20:
	'Elite <a href="exec:gt ''butik'', ''start''">Boutique</a> with a fashionable and expensive clothes.'
	'Next to it there is an expensive <a href="exec:gt ''salon'', ''start''">Beauty Salon</a>.'
	'<a href="exec:GT ''sportShop'',''start''">Sporting goods store</a>.'
	'<a href="exec:gt ''zoomagazine'',''start''">Pet-shop</a>'
	'<a href="exec:gt ''shopdacha''">Shop Stores</a>.'
	'<a href="exec:minut += 3 & gt ''hairsalon'', ''start''">The Golden Curl Salon</a>.'
	'<a href="exec:gt ''bouling''">Bowling</a>, <a href="exec:gt ''billiard''">billiard</a> and <a href="exec:gt ''kino''">theater</a>.'
	'Located on the ground floor <a href="exec:gt ''shop'', ''start''">network supermarket</a> takoyzhe in the residential area.'
end

act 'Leave':gt 'down'

--- torgcentr ---------------------------------
# univer
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">The University of</font></b></center>'
	'<center><img src="images/etogame/univer.jpg"></center>'

	if student = 0 and abiturient = 0:'Preparatory courses cost 15,000'

	'Examinations for admission to the University are held in August.'
	'All lectures begin with a 8:00, late for a lecture is not allowed.'

	if student > 0:'You learn how to <<semestr>> semester <<kurs>> course'

	if abiturient = 1:'You entrant.'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	if student = 0 and abiturient = 0 and money >= 15000 and month < 9 and diplom = 0 and age >= 17:
		''

		act 'Pay for training course (15,000 rubles)':
			cla
			minut += 5
			money -= 15000
			abiturient = 1
			'You paid 15,000 for preparatory courses. Classes start in 21chas, on weekdays'

			act 'Move away':gt 'univer', 'start'
		end
	elseif abiturient >= 1 and month < 9 and hour < 21 and week < 6:
		act 'Attend preparatory courses (1:00)':
			cla
			*clr
			minut += 60
			abiturient += 1
			intel += 1
			'<center><img src="images/etogame/Classroom.jpg"></center>'
			'You were engaged in preparatory courses within an hour.'

			act 'Get out of class':gt 'univer', 'start'
		end
	end

	if month = 8 and student = 0 and diplom = 0 and age >= 17:
		'You can try to take an entrance exam.'

		act 'Take the entrance exam (1:00)':
			cla
			*clr
			minut += 60
			'<center><img src="images/etogame/Classroom.jpg"></center>'
			'You passed the entrance exam to university.'

			if intel + abiturient >= 100:
				student = 1
				kurs = 1
				semestr = 1
				abiturient = 0
				'You have successfully passed the entrance exams and can start training in September.'
			else
				'You failed the entrance exam.'
			end

			act 'Get out of class':gt 'univer', 'start'
		end
	end

	if week < 6 and student > 0 and month > 8 and month < 12:
		!! 1st semester
		act 'Go to the deanery':
			cla

			if semestr = 2 and examen = 0:examen = 2

			gt 'univer', 'dekanat'
		end
	elseif week < 6 and student > 0 and month > 1 and month < 5:
		!! 2nd semester
		act 'Go to the deanery':
			cla

			if semestr = 1 and examen = 0:examen = 2

			gt 'univer', 'dekanat'
		end
	elseif week < 6 and student > 0 and month = 12 and examen = 0 and semestr = 1:
		!! 1st semester exams
		act 'Go for exams':gt 'univer', 'examen'
	elseif week < 6 and student > 0 and month = 5 and examen = 0 and semestr = 2:
		!! 2nd semester exams
		act 'Go for exams':gt 'univer', 'examen'
	end
end

if $ARGS[0] = 'dekanat':
	$sexloc = $CURLOC
	cla
	clr
	*clr
	minut += 5

	if examen = 1:
		examen = 0

		if semestr = 2:
			semestr = 1
			kurs += 1
		elseif semestr = 1:
			semestr = 2
		end
	elseif examen = 2:
		student = 0
		kurs = 0
		semestr = 0
		abiturient = 0
		stipuha = 0
		lektor = 0

		'YOU expelled from university.'
	end

	if kurs = 2:
		diplom = 1
		student = 0
		kurs = 0
		semestr = 0
		abiturient = 0
		stipuha = 0
		'YOU awarded a diploma.'
	end

	gs 'stat'
	'<center><b><font color="maroon">Dean</font></b></center>'
	'<center><img src="images/etogame/dekanat.jpg"></center>'
	'You learn how to <<semestr>> semester <<kurs>> course'
	'Prior to the session must pass <<kurs>> coursework. More welcomed and encouraged during the session.'

	if kursovikD > 0:'You passed <<kursovikD>> coursework.'

	act 'Escape from the dean''s office':gt 'univer', 'start'

	if hour < 8 and student > 0:
		act 'At the lecture':
			cla
			*clr
			minut += 360
			hour = 14
			minut = 0
			lektor += 1
			intel += 1
			'<center><img src="images/etogame/Classroom1.jpg"></center>'
			'You were sitting in lectures and recorded for teacher notes.'
			zanrand = rand(0, 9)

			if zanrand = 0:
				minut += 60
				'During class lecturer starts you ask, but you did not really say you can not, and he says something to you stayed after school.'
				'Classes are over, but you have to stay.'

				act 'Remain in the classroom':
					cla
					*clr
					zanpicrand = rand(1, 3)
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/img/oldtown/zan<<zanpicrand>>.jpg"></center>'
					'After the class lecturer explains to you for an hour thing.'

					act 'Leave':gt 'univer', 'dekanat'

					act 'Seduce':
						cla
						*clr

						if zanpicrand = 1:picrand = 44
						if zanpicrand = 2:picrand = 45
						if zanpicrand = 3:picrand = 46

						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/img/oldtown/zan1<<zanpicrand>>.jpg"></center>'
						'You grab his penis, he reflexively pulls away, but then relaxes and allows you to continue.'

						act 'Blow job':gt 'sex', 'minet'
					end
				end
			elseif zanrand = 1:
				minut += 60
				'During class lecturer starts you ask, but you did not really say you can not, and he says something to you stayed after school.'
				'Classes are over, but you have to stay.'

				act 'Remain in the classroom':
					cla
					*clr
					zanpicrand = rand(4, 6)
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/img/oldtown/zan<<zanpicrand>>.jpg"></center>'
					'After exercising for an hour lecturer explains to you another girl the importance of its subject.'

					act 'Leave':gt 'univer', 'dekanat'

					act 'Seduce':
						cla
						*clr

						if zanpicrand = 4:picrand = 20
						if zanpicrand = 5:picrand = 21
						if zanpicrand = 6:picrand = 22

						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/img/oldtown/zan1<<zanpicrand>>.jpg"></center>'
						'You go down on your knees and grab his penis, the other girl looks at you with round eyes, but then also starts to stick to the teacher to design, he resists a little at first, but then completely given into your hand.'

						act 'Blow job':gt 'podrsex', 'var'
					end
				end
			end

			act 'Exit from the audience':gt 'univer', 'dekanat'
		end
	end

	if kursovik >= 100:
		act 'Pass the course work':
			cla
			*clr
			intel += 1
			kursovik = 0
			kursovikD += 1
			'<center><img src="images/etogame/Classroom1.jpg"></center>'
			'You passed the course work.'

			act 'Exit from the audience':gt 'univer', 'dekanat'
		end
	end
end

if $ARGS[0] = 'examen':
	cla
	clr
	*clr
	minut += 60
	gs 'stat'
	'<center><b><font color="maroon">Exam</font></b></center>'
	'<center><img src="images/etogame/examen.jpg"></center>'

	if lektor > 55 and kursovikD >= kurs:
		examen = 1
		kursovikD = 0
		stipuha = 1
		lektor = 0
		!!1200
		'You are well attended classes and you have no outstanding coursework, exam so you put a gun.'
		jump 'exitexamem'
	end

	if ((intel >= 80) or (lektor > 40 and lektor <= 55)) and kursovikD >= kurs:
		examen = 1
		kursovikD = 0
		stipuha = 0
		lektor = 0
		'You answered all the questions in the ticket and you have no outstanding coursework, so you score? Exam.'

		act 'Exit from the audience':gt 'univer', 'dekanat'

		exit
	end

	if (intel >= 100) and kursovikD >= kurs + 10:
		examen = 1
		kursovikD = 0
		stipuha = 1
		lektor = 0
		'You showed great zeal and independence in learning, so you put a gun exam.'
		jump 'exitexamem'
		!!exit
	end

	if (intel < 70 and lektor <= 40) or kursovikD < kurs:
		examen = 2
		stipuha = 0
		'You do not pass the exam.'
	end

	if examen = 0:
		examen = 2
		stipuha = 0
		'You do not pass the exam.'
	end

	:exitexamem

	act 'Exit from the audience':gt 'univer', 'dekanat'
end

--- univer ---------------------------------
# yarik
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Apartment businessman Yaroslav</font></b></center>'
	'<center><img src="images/yaroslav/3609.11_paradniy_pod-ezd.jpg"></center>'

	act 'Ring the doorbell':
		cla

		if hour >= 16 and hour <= 17 and yaq = 1:
			'You have reached the door and you opened'

			act 'Take the apartment':gt 'yarik', 'yaqw'
		else
			'You rang the doorbell but no one answers.'

			act 'Leave':
				cla
				minut += 5
				gt 'down'
			end
		end
	end
end

if $ARGS[0] = 'yaqw':
	cla
	*clr
	'<center><img src="images/yaroslav/1365154132_studentka-ischet-rabotu-1.jpg" width = 750 height = 450 ></center>'
	'Oh <<$name>>! Hi! Come on. - Said Yaroslav.'

	act 'Come and listen to Yaroslav':
		cla
		*clr
		'<center><img src="images/yaroslav/1365154130_studentka-ischet-rabotu-2.jpg" width = 750 height = 450 ></center>'
		'I need you wiped the dust socks cleaned and washed clothes.'

		act 'Okay':
			cla
			clr
			minut += 20
			gs 'stat'
			'<b>You cleaned the apartment to Yaroslav, as he sat for some papers and read them.</b>'
			'Suddenly he came to you. <<$name>>, you can go to wipe tile in the bathroom?'

			act 'Sorry, I can not, you need to run':
				cla
				minut += 120
				manna += 50
				money += 2000
				uborkayar += 1
				'I dare not detain you. Here are your two pieces. Come even if you want. It happens.'
				gt 'down'
			end

			act 'Good':
				cla
				*clr
				minut += 10
				'<center><img src="images/yaroslav/1365154198_studentka-ischet-rabotu-3.jpg" width = 750 height = 450 ></center>'
				'Damn. Forced me to scrub his bathroom, well rabotenka to what I sunk - grumbled to myself - my manicure, my clothes - all messed up, well at least we have to earn money for the club.'

				act 'Scrubbing the floor':
					cla
					*clr
					minut += 5
					'<center><img src="images/yaroslav/1365154197_studentka-ischet-rabotu-4.jpg" width = 750 height = 450 ></center>'
					'Apparently decided to check how I cope, Jaroslav came into the bathroom and stood in the entrance, but when he saw me, sexually embarked crustaceans and nadraivayuschuyu foam sponge floor, all thoughts about the quality of flew out of his head.'

					act 'Indignant':
						cla
						*clr
						'<center><img src="images/yaroslav/1365154177_studentka-ischet-rabotu-5.jpg" width = 750 height = 450 ></center>'
						'- Hey! - I spun around - that you pyalites on my ass? - I cried indignantly, but immediately appreciate the richness of the men I had a plan of making tip.'

						act 'Up':
							cla
							*clr
							'<center><img src="images/yaroslav/1365154183_studentka-ischet-rabotu-6.jpg" width = 750 height = 450 ></center>'
							'Yaroslav I started making excuses stopped, stood up to his full height and making eyes master of the house, she began to rub the transparent wall. Listen, I''m here I want to earn a little tip that would be enough for me on new fashionable clothes. I hope you do not mind? - I defiantly said Yaroslav.'

							act 'Become dirty':
								cla
								*clr
								'<center><img src="images/yaroslav/1365154181_studentka-ischet-rabotu-7.jpg" width = 750 height = 450 ></center>'
								'- But I do not know anything really - I said, squeezing themselves with soapy sponge - you see, all soiled, where I am now in a wet t-shirt, it would have to stay and wait until dry.'

								act 'Remove the T-shirt':
									cla
									*clr
									'<center><img src="images/yaroslav/1365154123_studentka-ischet-rabotu-8.jpg" width = 750 height = 450 ></center>'
									'With these words, I pulled off his soaked shirt and impressive her bra, then squeezed over the remaining foam asked Yaroslav - Could you help me, I need to dry and then I''m so wet ...'

									act 'Listen Yaroslav':
										cla
										*clr
										'<center><img src="images/yaroslav/1365154153_studentka-ischet-rabotu-9.jpg" width = 750 height = 450 ></center>'
										'It has long been understood what I am, Jaroslav overexcited, taking plump wallet out of his pants, turned to me - You said that you did not have enough money - I suggest you combine business with pleasure.'

										act 'See what happens next':
											cla
											*clr
											minut += 10
											'<center><img src="images/yaroslav/1365154194_studentka-ischet-rabotu-10.jpg" width = 750 height = 450 ></center>'
											'Taking cock from his pants, he continues - Show me what you can do with their hands and get a good tip.'

											act 'Mark member':
												cla
												*clr
												'<center><img src="images/yaroslav/1365154141_studentka-ischet-rabotu-13.jpg" width = 750 height = 450 ></center>'
												'Satisfied that I could so easily dissolve a man on the headstock, I took his penis in her pen, she began to take her up and down, then speeding up slowing the pace, his pink lips clung to his lips lustful men and sticking his tongue stuck in his mouth.'

												act 'Fall down':
													cla
													*clr
													'<center><img src="images/yaroslav/1365154216_studentka-ischet-rabotu-12.jpg" width = 750 height = 450 ></center>'
													'Then I slowly dropped to her knees and began to swallow his farm to his sensual mouth, licking it like ice cream. Jaroslav not expecting such abilities at such a young girl moaned with pleasure, being sprayed stronger, not wanting to push dick in her mouth and into my tender pussy.'

													act 'Sucking dick':
														cla
														*clr
														minut += 20
														'<center><img src="images/yaroslav/1365154178_studentka-ischet-rabotu-11.jpg" width = 750 height = 450 ></center>'
														'- Want to earn more? - I asked the man. In response, I moaned and without ceasing to swallow cock furiously nodded.'

														act 'Up':
															cla
															*clr
															'<center><img src="images/yaroslav/1365154172_studentka-ischet-rabotu-14.jpg" width = 750 height = 450 ></center>'
															'- Well, I know that you''re a good girl. Saying this, he stuck his phallus out of my mouth and took me in his arms, seated on the countertop.'

															act 'Extend the legs ':
																cla
																*clr
																'<center><img src="images/yaroslav/1365154194_studentka-ischet-rabotu-15.jpg" width = 750 height = 450 ></center>'
																'Taking off his pants, he was flexing with my vagina, thrusting his strong male hands in my crack.'

																act 'Savoury':
																	cla
																	*clr
																	'<center><img src="images/yaroslav/1365154144_studentka-ischet-rabotu-16.jpg" width = 750 height = 450 ></center>'
																	'However, not enduring a long, he rubbed his penis to sexual sponges, and then sharply vognul him inside.'

																	act 'Moan':
																		cla
																		*clr
																		'<center><img src="images/yaroslav/1365154203_studentka-ischet-rabotu-17.jpg" width = 750 height = 450 ></center>'
																		'Grabbing me comfortably, he became a force to shove your dick in my pussy very young, I''m from such pressure moaned, clutching her legs nails to distract from the pain that delivers huge penis men, developing my pussy.'

																		act 'Savoury':
																			cla
																			*clr
																			minut += 20
																			'<center><img src="images/yaroslav/1365154147_studentka-ischet-rabotu-18.jpg" width = 750 height = 450 ></center>'
																			'Big dick Yaroslav continued to ram my pussy. I was moaning and panting.'

																			act 'Ask':
																				cla
																				*clr
																				minut += 20
																				'<center><img src="images/yaroslav/1365154175_studentka-ischet-rabotu-19.jpg" width = 750 height = 450 ></center>'
																				'- I hope you will not forget to thank me for my ability - I asked. In response Jaroslav nodded and stuck only stronger term in the warm, wet cunt, working it like a piston.'

																				act 'Expand':
																					cla
																					*clr
																					'<center><img src="images/yaroslav/1365154194_studentka-ischet-rabotu-20.jpg" width = 750 height = 450 ></center>'
																					'<center><img src="images/yaroslav/1365154188_studentka-ischet-rabotu-21.jpg" width = 750 height = 450 ></center>'
																					'Unfolding me, he grabbed me by the leg and began to pull me over, in unison with the movements of the pelvis with the other hand extending into my mouth ajar sexually.'

																					act 'Breathe':
																						cla
																						*clr
																						minut += 20
																						'Finally poking him, he heard my sigh of grief, and played with a member smuglovo ringlet near the anus, several times drove the head of the penis in my razdrochenny valve.'
																						'<center><img src="images/yaroslav/1365154232_studentka-ischet-rabotu-22.jpg" width = 750 height = 450 ></center>'
																						'<center><img src="images/yaroslav/1365154212_studentka-ischet-rabotu-23.jpg" width = 750 height = 450 ></center>'
																						'<center><img src="images/yaroslav/1365154145_studentka-ischet-rabotu-24.jpg" width = 750 height = 450 ></center>'

																						act 'Get off':
																							cla
																							*clr
																							'<center><img src="images/yaroslav/1365154164_studentka-ischet-rabotu-26.jpg" width = 750 height = 450 ></center>'
																							'<center><img src="images/yaroslav/1365154143_studentka-ischet-rabotu-25.jpg" width = 750 height = 450 ></center>'
																							'Then lowered me to the floor, he lay on his back, and I started to pull on his dick, stretching my bread. I moved her hips, occasionally poprygivaya his bolt again and thrusting it into the full depth.'

																							act 'Peel and substitute person':
																								cla
																								*clr
																								minut += 5
																								horny = 0
																								vagina += 1
																								throat += 1
																								orgasm += 1
																								'<center><img src="images/yaroslav/1365154169_studentka-ischet-rabotu-27.jpg" width = 750 height = 450 ></center>'
																								'As soon as the feeling began to moan loudly Yaroslav, and as his cock grew in the final rush, I jumped off the man and on his knees, eagerly opened her mouth in anticipation, as I will have to warm thick liquid splashing of a man''s penis, gave me so many pleasant minutes. And finally escaped from the phallus jet seed that filled my face and chest.'

																								act 'In the bathroom':
																									cla
																									*clr
																									minut += 20
																									sweat = 0
																									hapri = 0
																									'<center><img src="images/yaroslav/1365154231_studentka-ischet-rabotu-28.jpg" width = 750 height = 450 ></center>'
																									'- Good girl, you''re a very good worker, ran up to me after class, I''ll help you with the earnings. Now go rinse and I will calculate for your excellent work - said Yaroslav.'

																									act 'Get dressed up and go':
																										cla
																										money += 3000
																										uborkayar += 1
																										minut += 25
																										gt 'down'
																									end
																								end
																							end
																						end
																					end
																				end
																			end
																		end
																	end
																end
															end
														end
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end

		act 'Leave':gt 'down'
	end

	act 'Leave':gt 'down'
end

--- yarik ---------------------------------
# zoomagazine
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Pet Shop</font></b></center>'
	'<center><img src="images/zoo/1277894267_dsc_0544.jpg" width = 650 height = 450 ></center>'
	'Dog - 3000 rubles'
	'Rabbit - 2000 rubles'
	'Parrot - 3000 rubles'

	if money >= 3000 and sobaka = 0:
		act 'Buy a dog (3000 rubles)':
			cla
			*clr
			'<center><img src="images/zoo/1277894267_dsc_0544.jpg" width = 650 height = 450 ></center>'

			act 'Hello, I would like to get a dog':
				cla
				*clr
				'<center><img src="images/zoo/1277894267_dsc_0544.jpg" width = 650 height = 450 ></center>'
				'<center><b>Sorry, but we were only male dogs.</center></b>'

				act 'Buy a dog':
					cla
					*clr
					minut += 10
					sobaka += 1
					money -= 3000
					'<center><img src="images/zoo/dog1.jpg" width = 600 height = 500 ></center>'
					'<center><b>You bought a dog-Dalmatians.</center></b>'
					$namesob = input ('I''ll call the dog ...')

					act 'Move away from the counter':gt 'zoomagazine', 'start'
				end

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

	if money >= 2000 and krolik = 0:
		act 'Buy a rabbit (2000 rubles)':
			cla
			*clr
			minut += 10
			krolik += 1
			money -= 2000
			'<center><img src="images/zoo/x_2b1d398b.jpg"></center>'
			'<center><b>You bought a rabbit.</center></b>'
			$namekrol = input ("I call rabbit ...")

			act 'Move away from the counter':gt 'zoomagazine', 'start'
		end
	end

	if money >= 3000 and popugai = 0:
		act 'Buy a parrot (3000 rubles)':
			cla
			*clr
			minut += 10
			popugai += 1
			money -= 3000
			'<center><img src="images/zoo/parrot1.jpg"></center>'
			'<center><b>You bought a parrot.</center></b>'
			$namepopu = input ("I call parrot ...")

			act 'Move away from the counter':gt 'zoomagazine', 'start'
		end
	end

	act 'Leave':gt 'torgcentr'
end

--- zoomagazine ---------------------------------
# budgetclothes
$budgetshort = {
	cla

	act 'Remove item.':gt $loc, $metka

	if short[i] = 0 and money >= 2000:
		act 'Buy (2,000 rubles)':
			money -= 2000
			short[i] = 1
			shortH[i] = 60
			shortB[i] = bedra
		 	gt $loc, $metka
		 end
	else
		gt $loc, $metka
	end
}

$budgetskirt = {
	cla

	act 'Remove item.':gt $loc, $metka

	if skirt[i] = 0 and money >= 2000:
		act 'Buy (2,000 rubles)':
			money -= 2000
			skirt[i] = 1
			skirtH[i] = 60
			skirtB[i] = bedra
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end
}

$budgetdress = {
	cla

	act 'Remove item.':gt $loc, $metka

	if dress[i] = 0 and money >= 4500:
		act 'Buy (4,500 rubles)':
			money -= 4500
			dress[i] = 1
			dressH[i] = 60
			dressB[i] = bedra
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end
}

$budgetprofi = {
	cla

	act 'Remove item.':gt $loc, $metka

	if profi[i] = 0 and money >= 3000:
		act 'Buy (3,000 rubles)':
			money -= 3000
			profi[i] = 1
			profiH[i] = 60
			profiB[i] = bedra
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end
}

$budgetpants = {
	cla

	act 'Remove item.':gt $loc, $metka

	if pants[i] = 0 and money >= 1750:
		act 'Buy (1,750 rubles)':
			money -= 1750
			pants[i] = 1
			pantsH[i] = 60
			pantsB[i] = bedra
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end
}

$budgetjeans = {
	cla

	act 'Remove item.':gt $loc, $metka

	if jeans[i] = 0 and money >= 1500:
		act 'Buy (1,500 rubles)':
			money -= 1500
			jeans[i] = 1
			jeansH[i] = 60
			jeansB[i] = bedra
			gt $loc, $metka
		end
	else
		gt $loc, $metka
	end
}

$metka = $ARGS[0]
$loc = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
mag = 1
'<center><b><font color="maroon">Welcome to G & M - Trendy Styles for EVERYONE</font></b></center>'
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

act 'Leave the store':
	cla
	minut = minut + 3
	gt 'down'
end

! WD: Rename 'png' clothing images as scripts are only using 'jpg' ~  
if hour >= 9 and hour <= 21:
	'<table>
	<tr>
	<center><b>Jeans Department - Prices:1500 Rubles</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans208.jpg" height="200" /></div></a>	<a href="exec:i = 209 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans209.jpg" height="200" /></div></a>	<a href="exec:i = 210 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans210.jpg" height="200" /></div></a>	<a href="exec:i = 211 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans211.jpg" height="200" /></div></a>	<a href="exec:i = 212 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans212.jpg" height="200" /></div></a>	<a href="exec:i = 213 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans213.jpg" height="200" /></div></a>	<a href="exec:i = 214 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans214.jpg" height="200" /></div></a>	<a href="exec:i = 215 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans215.jpg" height="200" /></div></a>	<a href="exec:i = 216 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans216.jpg" height="200" /></div></a>	<a href="exec:i = 217 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans217.jpg" height="200" /></div></a>	<a href="exec:i = 218 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans218.jpg" height="200" /></div></a>	<a href="exec:i = 219 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans219.jpg" height="200" /></div></a>	<a href="exec:i = 220 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans220.jpg" height="200" /></div></a>	<a href="exec:i = 221 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans221.jpg" height="200" /></div></a>	<a href="exec:i = 222 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans222.jpg" height="200" /></div></a>	<a href="exec:i = 223 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans223.jpg" height="200" /></div></a>	<a href="exec:i = 224 & dynamic $budgetjeans"><div style="width:100	%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans224.jpg" height="200" /></div></a>	<a href="exec:i = 225 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans225.jpg" height="200" /></div></a>	<a href="exec:i = 226 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans226.jpg" height="200" /></div></a>	<a href="exec:i = 227 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans227.jpg" height="200" /></div></a>	<a href="exec:i = 228 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans228.jpg" height="200" /></div></a>	<a href="exec:i = 229 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans229.jpg" height="200" /></div></a>	<a href="exec:i = 230 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans230.jpg" height="200" /></div></a>	<a href="exec:i = 231 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans231.jpg" height="200" /></div></a>	<a href="exec:i = 232 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans232.jpg" height="200" /></div></a>	<a href="exec:i = 236 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans236.jpg" height="200" /></div></a>	<a href="exec:i = 237 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans237.jpg" height="200" /></div></a>	<a href="exec:i = 238 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans238.jpg" height="200" /></div></a>	<a href="exec:i = 239 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans239.jpg" height="200" /></div></a>	<a href="exec:i = 240 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans240.jpg" height="200" /></div></a>	<a href="exec:i = 241 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans241.jpg" height="200" /></div></a>	<a href="exec:i = 243 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans243.jpg" height="200" /></div></a>	<a href="exec:i = 244 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans244.jpg" height="200" /></div></a>	<a href="exec:i = 245 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans245.jpg" height="200" /></div></a>	<a href="exec:i = 246 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans246.jpg" height="200" /></div></a>	<a href="exec:i = 247 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans247.jpg" height="200" /></div></a>	<a href="exec:i = 248 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans248.jpg" height="200" /></div></a>	<a href="exec:i = 249 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans249.jpg" height="200" /></div></a>	<a href="exec:i = 250 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans250.jpg" height="200" /></div></a>	<a href="exec:i = 251 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans251.jpg" height="200" /></div></a>	<a href="exec:i = 252 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans252.jpg" height="200" /></div></a>	<a href="exec:i = 253 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans253.jpg" height="200" /></div></a>	<a href="exec:i = 254 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans254.jpg" height="200" /></div></a>	<a href="exec:i = 255 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans255.jpg" height="200" /></div></a>	<a href="exec:i = 256 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans256.jpg" height="200" /></div></a>	<a href="exec:i = 257 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans257.jpg" height="200" /></div></a>	<a href="exec:i = 258 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans258.jpg" height="200" /></div></a>	<a href="exec:i = 259 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans259.jpg" height="200" /></div></a>	<a href="exec:i = 260 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans260.jpg" height="200" /></div></a>	<a href="exec:i = 261 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans261.jpg" height="200" /></div></a>	<a href="exec:i = 262 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans262.jpg" height="200" /></div></a>	<a href="exec:i = 263 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans263.jpg" height="200" /></div></a>	<a href="exec:i = 264 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans264.jpg" height="200" /></div></a>	<a href="exec:i = 265 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans265.jpg" height="200" /></div></a>	<a href="exec:i = 266 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans266.jpg" height="200" /></div></a>	<a href="exec:i = 267 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans267.jpg" height="200" /></div></a>	<a href="exec:i = 268 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans268.jpg" height="200" /></div></a>	<a href="exec:i = 269 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans269.jpg" height="200" /></div></a>	<a href="exec:i = 270 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans270.jpg" height="200" /></div></a>	<a href="exec:i = 271 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans271.jpg" height="200" /></div></a>	<a href="exec:i = 272 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans272.jpg" height="200" /></div></a>	<a href="exec:i = 273 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans273.jpg" height="200" /></div></a>	<a href="exec:i = 274 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans274.jpg" height="200" /></div></a>	<a href="exec:i = 275 & dynamic $b	udgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans275.jpg" height="200" /></div></a>	<a href="exec:i = 276 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans276.jpg" height="200" /></div></a>	<a href="exec:i = 278 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans278.jpg" height="200" /></div></a>	<a href="exec:i = 279 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans279.jpg" height="200" /></div></a>	<a href="exec:i = 280 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans280.jpg" height="200" /></div></a>	<a href="exec:i = 281 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans281.jpg" height="200" /></div></a>	<a href="exec:i = 282 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans282.jpg" height="200" /></div></a>	<a href="exec:i = 283 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans283.jpg" height="200" /></div></a>	<a href="exec:i = 285 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans285.jpg" height="200" /></div></a>	<a href="exec:i = 286 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans286.jpg" height="200" /></div></a>	<a href="exec:i = 287 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans287.jpg" height="200" /></div></a>	<a href="exec:i = 289 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans289.jpg" height="200" /></div></a>	<a href="exec:i = 290 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans290.jpg" height="200" /></div></a>	<a href="exec:i = 291 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans291.jpg" height="200" /></div></a>	<a href="exec:i = 292 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans292.jpg" height="200" /></div></a>	<a href="exec:i = 293 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans293.jpg" height="200" /></div></a>	<a href="exec:i = 294 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans294.jpg" height="200" /></div></a>	<a href="exec:i = 295 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans295.jpg" height="200" /></div></a>	<a href="exec:i = 297 & dynamic $budgetjeans"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/jeans297.jpg" height="200" /></div></a>
	<center><b>Leggings and other skin tight pants - Prices:1750</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants208.jpg" height="200" /></div></a>	<a href="exec:i = 210 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants210.jpg" height="200" /></div></a>	<a href="exec:i = 211 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants211.jpg" height="200" /></div></a>	<a href="exec:i = 212 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants212.jpg" height="200" /></div></a>	<a href="exec:i = 213 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants213.jpg" height="200" /></div></a>	<a href="exec:i = 214 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants214.jpg" height="200" /></div></a>	<a href="exec:i = 215 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants215.jpg" height="200" /></div></a>	<a href="exec:i = 216 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants216.jpg" height="200" /></div></a>	<a href="exec:i = 217 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants217.jpg" height="200" /></div></a>	<a href="exec:i = 218 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants218.jpg" height="200" /></div></a>	<a href="exec:i = 219 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants219.jpg" height="200" /></div></a>	<a href="exec:i = 220 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants220.jpg" height="200" /></div></a>	<a href="exec:i = 221 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants221.jpg" height="200" /></div></a>	<a href="exec:i = 222 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants222.jpg" height="200" /></div></a>	<a href="exec:i = 223 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants223.jpg" height="200" /></div></a>	<a href="exec:i = 226 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants226.jpg" height="200" /></div></a>	<a href="exec:i = 227 & dynamic $budgetpants"><div style="width:100	%; max-width:200px; max-height:200px;"><img src="images/clothes/pants227.jpg" height="200" /></div></a>	<a href="exec:i = 228 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants228.jpg" height="200" /></div></a>	<a href="exec:i = 230 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants230.jpg" height="200" /></div></a>	<a href="exec:i = 231 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants231.jpg" height="200" /></div></a>	<a href="exec:i = 232 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants232.jpg" height="200" /></div></a>	<a href="exec:i = 233 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants233.jpg" height="200" /></div></a>	<a href="exec:i = 234 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants234.jpg" height="200" /></div></a>	<a href="exec:i = 235 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants235.jpg" height="200" /></div></a>	<a href="exec:i = 236 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants236.jpg" height="200" /></div></a>	<a href="exec:i = 237 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants237.jpg" height="200" /></div></a>	<a href="exec:i = 238 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants238.jpg" height="200" /></div></a>	<a href="exec:i = 239 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants239.jpg" height="200" /></div></a>	<a href="exec:i = 240 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants240.jpg" height="200" /></div></a>	<a href="exec:i = 241 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants241.jpg" height="200" /></div></a>	<a href="exec:i = 242 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants242.jpg" height="200" /></div></a>	<a href="exec:i = 243 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants243.jpg" height="200" /></div></a>	<a href="exec:i = 244 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants244.jpg" height="200" /></div></a>	<a href="exec:i = 245 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants245.jpg" height="200" /></div></a>	<a href="exec:i = 246 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants246.jpg" height="200" /></div></a>	<a href="exec:i = 247 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants247.jpg" height="200" /></div></a>	<a href="exec:i = 248 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants248.jpg" height="200" /></div></a>	<a href="exec:i = 249 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants249.jpg" height="200" /></div></a>	<a href="exec:i = 250 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants250.jpg" height="200" /></div></a>	<a href="exec:i = 251 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants251.jpg" height="200" /></div></a>	<a href="exec:i = 252 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants252.jpg" height="200" /></div></a>	<a href="exec:i = 253 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants253.jpg" height="200" /></div></a>	<a href="exec:i = 254 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants254.jpg" height="200" /></div></a>	<a href="exec:i = 255 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants255.jpg" height="200" /></div></a>	<a href="exec:i = 256 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants256.jpg" height="200" /></div></a>	<a href="exec:i = 257 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants257.jpg" height="200" /></div></a>	<a href="exec:i = 258 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants258.jpg" height="200" /></div></a>	<a href="exec:i = 259 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants259.jpg" height="200" /></div></a>	<a href="exec:i = 260 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants260.jpg" height="200" /></div></a>	<a href="exec:i = 261 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants261.jpg" height="200" /></div></a>	<a href="exec:i = 262 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants262.jpg" height="200" /></div></a>	<a href="exec:i = 263 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants263.jpg" height="200" /></div></a>	<a href="exec:i = 264 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants264.jpg" height="200" /></div></a>	<a href="exec:i = 265 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants265.jpg" height="200" /></div></a>	<a href="exec:i = 266 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants266.jpg" height="200" /></div></a>	<a href="exec:i = 267 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants267.jpg" height="200" /></div></a>	<a href="exec:i = 268 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants268.jpg" height="200" /></div></a>	<a href="exec:i = 269 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants269.jpg" height="200" /></div></a>	<a href="exec:i = 270 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants270.jpg" height="200" /></div></a>	<a href="exec:i = 271 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants271.jpg" height="200" /></div></a>	<a href="exec:i = 273 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants273.jpg" height="200" /></div></a>	<a href="exec:i = 274 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants274.jpg" height="200" /></div></a>	<a href="exec:i = 275 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants275.jpg" height="200" /></div></a>	<a href="exec:i = 276 & dynamic $b	udgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants276.jpg" height="200" /></div></a>	<a href="exec:i = 277 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants277.jpg" height="200" /></div></a>	<a href="exec:i = 278 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants278.jpg" height="200" /></div></a>	<a href="exec:i = 279 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants279.jpg" height="200" /></div></a>	<a href="exec:i = 280 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants280.jpg" height="200" /></div></a>	<a href="exec:i = 281 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants281.jpg" height="200" /></div></a>	<a href="exec:i = 282 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants282.jpg" height="200" /></div></a>	<a href="exec:i = 283 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants283.jpg" height="200" /></div></a>	<a href="exec:i = 284 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants284.jpg" height="200" /></div></a>	<a href="exec:i = 285 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants285.jpg" height="200" /></div></a>	<a href="exec:i = 286 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants286.jpg" height="200" /></div></a>	<a href="exec:i = 287 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants287.jpg" height="200" /></div></a>	<a href="exec:i = 288 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants288.jpg" height="200" /></div></a>	<a href="exec:i = 289 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants289.jpg" height="200" /></div></a>	<a href="exec:i = 290 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants290.jpg" height="200" /></div></a>	<a href="exec:i = 291 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants291.jpg" height="200" /></div></a>	<a href="exec:i = 292 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants292.jpg" height="200" /></div></a>	<a href="exec:i = 293 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants293.jpg" height="200" /></div></a>	<a href="exec:i = 294 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants294.jpg" height="200" /></div></a>	<a href="exec:i = 295 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants295.jpg" height="200" /></div></a>	<a href="exec:i = 296 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants296.jpg" height="200" /></div></a>	<a href="exec:i = 297 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants297.jpg" height="200" /></div></a>	<a href="exec:i = 298 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants298.jpg" height="200" /></div></a>	<a href="exec:i = 299 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"	><img src="images/clothes/pants299.jpg" height="200" /></div></a>	<a href="exec:i = 300 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants300.jpg" height="200" /></div></a>	<a href="exec:i = 301 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants301.jpg" height="200" /></div></a>	<a href="exec:i = 302 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants302.jpg" height="200" /></div></a>	<a href="exec:i = 303 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants303.jpg" height="200" /></div></a>	<a href="exec:i = 304 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants304.jpg" height="200" /></div></a>	<a href="exec:i = 305 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants305.jpg" height="200" /></div></a>	<a href="exec:i = 306 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants306.jpg" height="200" /></div></a>	<a href="exec:i = 307 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants307.jpg" height="200" /></div></a>	<a href="exec:i = 309 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants309.jpg" height="200" /></div></a>	<a href="exec:i = 311 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants311.jpg" height="200" /></div></a>	<a href="exec:i = 312 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants312.jpg" height="200" /></div></a>	<a href="exec:i = 313 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants313.jpg" height="200" /></div></a>	<a href="exec:i = 314 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants314.jpg" height="200" /></div></a>	<a href="exec:i = 315 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants315.jpg" height="200" /></div></a>	<a href="exec:i = 316 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants316.jpg" height="200" /></div></a>	<a href="exec:i = 317 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants317.jpg" height="200" /></div></a>	<a href="exec:i = 318 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants318.jpg" height="200" /></div></a>	<a href="exec:i = 319 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants319.jpg" height="200" /></div></a>	<a href="exec:i = 320 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants320.jpg" height="200" /></div></a>	<a href="exec:i = 320 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants320.jpg" height="200" /></div></a>	<a href="exec:i = 321 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants321.jpg" height="200" /></div></a>	<a href="exec:i = 322 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants322.jpg" height="200" /></div></a>	<a href="exec:i = 324 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants324.jpg" height="200" /></div></a>	<a hr	ef="exec:i = 325 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants325.jpg" height="200" /></div></a>	<a href="exec:i = 326 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants326.jpg" height="200" /></div></a>	<a href="exec:i = 327 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants327.jpg" height="200" /></div></a>	<a href="exec:i = 328 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants328.jpg" height="200" /></div></a>	<a href="exec:i = 329 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants329.jpg" height="200" /></div></a>	<a href="exec:i = 330 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants330.jpg" height="200" /></div></a>	<a href="exec:i = 331 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants331.jpg" height="200" /></div></a>	<a href="exec:i = 332 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants332.jpg" height="200" /></div></a>	<a href="exec:i = 333 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants333.jpg" height="200" /></div></a>	<a href="exec:i = 334 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants334.jpg" height="200" /></div></a>	<a href="exec:i = 335 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants335.jpg" height="200" /></div></a>	<a href="exec:i = 336 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants336.jpg" height="200" /></div></a>	<a href="exec:i = 337 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants337.jpg" height="200" /></div></a>	<a href="exec:i = 338 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants338.jpg" height="200" /></div></a>	<a href="exec:i = 339 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants339.jpg" height="200" /></div></a>	<a href="exec:i = 341 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants341.jpg" height="200" /></div></a>	<a href="exec:i = 342 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants342.jpg" height="200" /></div></a>	<a href="exec:i = 343 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants343.jpg" height="200" /></div></a>	<a href="exec:i = 344 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants344.jpg" height="200" /></div></a>	<a href="exec:i = 345 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants345.jpg" height="200" /></div></a>	<a href="exec:i = 346 & dynamic $budgetpants"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/pants346.jpg" height="200" /></div></a>
	<center><b>Hot Shorts for a Hot Summer day - Prices:2000 Rubles</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short208.jpg" height="200" /></div></a>	<a href="exec:i = 209 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short209.jpg" height="200" /></div></a>	<a href="exec:i = 210 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short210.jpg" height="200" /></div></a>	<a href="exec:i = 211 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short211.jpg" height="200" /></div></a>	<a href="exec:i = 212 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short212.jpg" height="200" /></div></a>	<a href="exec:i = 213 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short213.jpg" height="200" /></div></a>	<a href="exec:i = 214 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short214.jpg" height="200" /></div></a>	<a href="exec:i = 215 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short215.jpg" height="200" /></div></a>	<a href="exec:i = 216 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short216.jpg" height="200" /></div></a>	<a href="exec:i = 217 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short217.jpg" height="200" /></div></a>	<a href="exec:i = 218 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short218.jpg" height="200" /></div></a>	<a href="exec:i = 219 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short219.jpg" height="200" /></div></a>	<a href="exec:i = 220 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short220.jpg" height="200" /></div></a>	<a href="exec:i = 221 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short221.jpg" height="200" /></div></a>	<a href="exec:i = 222 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short222.jpg" height="200" /></div></a>	<a href="exec:i = 223 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short223.jpg" height="200" /></div></a>	<a href="exec:i = 224 & dynamic $budgetshort"><div style="width:100	%; max-width:200px; max-height:200px;"><img src="images/clothes/short224.jpg" height="200" /></div></a>	<a href="exec:i = 225 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short225.jpg" height="200" /></div></a>	<a href="exec:i = 226 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short226.jpg" height="200" /></div></a>	<a href="exec:i = 227 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short227.jpg" height="200" /></div></a>	<a href="exec:i = 228 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short228.jpg" height="200" /></div></a>	<a href="exec:i = 229 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short229.jpg" height="200" /></div></a>	<a href="exec:i = 230 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short230.jpg" height="200" /></div></a>	<a href="exec:i = 231 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short231.jpg" height="200" /></div></a>	<a href="exec:i = 232 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short232.jpg" height="200" /></div></a>	<a href="exec:i = 233 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short233.jpg" height="200" /></div></a>	<a href="exec:i = 234 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short234.jpg" height="200" /></div></a>	<a href="exec:i = 235 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short235.jpg" height="200" /></div></a>	<a href="exec:i = 236 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short236.jpg" height="200" /></div></a>	<a href="exec:i = 237 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short237.jpg" height="200" /></div></a>	<a href="exec:i = 238 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short238.jpg" height="200" /></div></a>	<a href="exec:i = 239 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short239.jpg" height="200" /></div></a>	<a href="exec:i = 240 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short240.jpg" height="200" /></div></a>	<a href="exec:i = 241 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short241.jpg" height="200" /></div></a>	<a href="exec:i = 242 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short242.jpg" height="200" /></div></a>	<a href="exec:i = 244 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short244.jpg" height="200" /></div></a>	<a href="exec:i = 245 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short245.jpg" height="200" /></div></a>	<a href="exec:i = 246 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short246.jpg" height="200" /></div></a>	<a href="exec:i = 247 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short247.jpg" height="200" /></div></a>	<a href="exec:i = 248 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short248.jpg" height="200" /></div></a>	<a href="exec:i = 249 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short249.jpg" height="200" /></div></a>	<a href="exec:i = 250 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short250.jpg" height="200" /></div></a>	<a href="exec:i = 251 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short251.jpg" height="200" /></div></a>	<a href="exec:i = 252 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short252.jpg" height="200" /></div></a>	<a href="exec:i = 253 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short253.jpg" height="200" /></div></a>	<a href="exec:i = 255 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short255.jpg" height="200" /></div></a>	<a href="exec:i = 256 & dynamic $budgetshort"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/short256.jpg" height="200" /></div></a>
	<center><b>Our Outfit-Collection with skirts in (almost) all lenghts - Prices:2000 Rubles</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt208.jpg" height="200" /></div></a>	<a href="exec:i = 209 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt209.jpg" height="200" /></div></a>	<a href="exec:i = 210 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt210.jpg" height="200" /></div></a>	<a href="exec:i = 211 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt211.jpg" height="200" /></div></a>	<a href="exec:i = 212 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt212.jpg" height="200" /></div></a>	<a href="exec:i = 213 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt213.jpg" height="200" /></div></a>	<a href="exec:i = 214 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt214.jpg" height="200" /></div></a>	<a href="exec:i = 215 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt215.jpg" height="200" /></div></a>	<a href="exec:i = 216 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt216.jpg" height="200" /></div></a>	<a href="exec:i = 217 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt217.jpg" height="200" /></div></a>	<a href="exec:i = 218 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt218.jpg" height="200" /></div></a>	<a href="exec:i = 219 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt219.jpg" height="200" /></div></a>	<a href="exec:i = 221 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt221.jpg" height="200" /></div></a>	<a href="exec:i = 222 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt222.jpg" height="200" /></div></a>	<a href="exec:i = 223 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt223.jpg" height="200" /></div></a>	<a href="exec:i = 224 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt224.jpg" height="200" /></div></a>	<a href="exec:i = 225 & dynamic $budgetskirt"><div style="width:100	%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt225.jpg" height="200" /></div></a>	<a href="exec:i = 226 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt226.jpg" height="200" /></div></a>	<a href="exec:i = 227 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt227.jpg" height="200" /></div></a>	<a href="exec:i = 228 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt228.jpg" height="200" /></div></a>	<a href="exec:i = 229 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt229.jpg" height="200" /></div></a>	<a href="exec:i = 230 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt230.jpg" height="200" /></div></a>	<a href="exec:i = 232 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt232.jpg" height="200" /></div></a>	<a href="exec:i = 233 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt233.jpg" height="200" /></div></a>	<a href="exec:i = 234 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt234.jpg" height="200" /></div></a>	<a href="exec:i = 235 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt235.jpg" height="200" /></div></a>	<a href="exec:i = 237 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt237.jpg" height="200" /></div></a>	<a href="exec:i = 238 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt238.jpg" height="200" /></div></a>	<a href="exec:i = 239 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt239.jpg" height="200" /></div></a>	<a href="exec:i = 240 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt240.jpg" height="200" /></div></a>	<a href="exec:i = 242 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt242.jpg" height="200" /></div></a>	<a href="exec:i = 243 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt243.jpg" height="200" /></div></a>	<a href="exec:i = 245 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt245.jpg" height="200" /></div></a>	<a href="exec:i = 246 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt246.jpg" height="200" /></div></a>	<a href="exec:i = 247 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt247.jpg" height="200" /></div></a>	<a href="exec:i = 248 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt248.jpg" height="200" /></div></a>	<a href="exec:i = 249 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt249.jpg" height="200" /></div></a>	<a href="exec:i = 250 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt250.jpg" height="200" /></div></a>	<a href="exec:i = 251 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt251.jpg" height="200" /></div></a>	<a href="exec:i = 252 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt252.jpg" height="200" /></div></a>	<a href="exec:i = 253 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt253.jpg" height="200" /></div></a>	<a href="exec:i = 254 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt254.jpg" height="200" /></div></a>	<a href="exec:i = 255 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt255.jpg" height="200" /></div></a>	<a href="exec:i = 256 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt256.jpg" height="200" /></div></a>	<a href="exec:i = 257 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt257.jpg" height="200" /></div></a>	<a href="exec:i = 258 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt258.jpg" height="200" /></div></a>	<a href="exec:i = 259 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt259.jpg" height="200" /></div></a>	<a href="exec:i = 260 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt260.jpg" height="200" /></div></a>	<a href="exec:i = 261 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt261.jpg" height="200" /></div></a>	<a href="exec:i = 262 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt262.jpg" height="200" /></div></a>	<a href="exec:i = 263 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt263.jpg" height="200" /></div></a>	<a href="exec:i = 264 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt264.jpg" height="200" /></div></a>	<a href="exec:i = 265 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt265.jpg" height="200" /></div></a>	<a href="exec:i = 266 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt266.jpg" height="200" /></div></a>	<a href="exec:i = 267 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt267.jpg" height="200" /></div></a>	<a href="exec:i = 268 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt268.jpg" height="200" /></div></a>	<a href="exec:i = 269 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt269.jpg" height="200" /></div></a>	<a href="exec:i = 270 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt270.jpg" height="200" /></div></a>	<a href="exec:i = 271 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt271.jpg" height="200" /></div></a>	<a href="exec:i = 272 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt272.jpg" height="200" /></div></a>	<a href="exec:i = 273 & dynamic $budgetskirt"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/skirt273.jpg" height="200" /></div></a>
	<center><b>Need something for a nights out? Sexy Dresses! - Prices 4500 Rubles</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress208.jpg" height="200" /></div></a>	<a href="exec:i = 209 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress209.jpg" height="200" /></div></a>	<a href="exec:i = 210 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress210.jpg" height="200" /></div></a>	<a href="exec:i = 211 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress211.jpg" height="200" /></div></a>	<a href="exec:i = 212 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress212.jpg" height="200" /></div></a>	<a href="exec:i = 213 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress213.jpg" height="200" /></div></a>	<a href="exec:i = 214 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress214.jpg" height="200" /></div></a>	<a href="exec:i = 215 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress215.jpg" height="200" /></div></a>	<a href="exec:i = 216 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress216.jpg" height="200" /></div></a>	<a href="exec:i = 217 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress217.jpg" height="200" /></div></a>	<a href="exec:i = 218 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress218.jpg" height="200" /></div></a>	<a href="exec:i = 219 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress219.jpg" height="200" /></div></a>	<a href="exec:i = 220 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress220.jpg" height="200" /></div></a>	<a href="exec:i = 221 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress221.jpg" height="200" /></div></a>	<a href="exec:i = 222 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress222.jpg" height="200" /></div></a>	<a href="exec:i = 223 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress223.jpg" height="200" /></div></a>	<a href="exec:i = 224 & dynamic $budgetdress"><div style="width:100	%; max-width:200px; max-height:200px;"><img src="images/clothes/dress224.jpg" height="200" /></div></a>	<a href="exec:i = 225 & dynamic $budgetdress"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/dress225.jpg" height="200" /></div></a>
	<center><b>Do you need a professional dress for your work? - Prices 3000 Rubles</font></b></center>
	<a href="exec:i = 201 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi201.jpg" height="200" /></div></a>	<a href="exec:i = 202 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi202.jpg" height="200" /></div></a>	<a href="exec:i = 203 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi203.jpg" height="200" /></div></a>	<a href="exec:i = 204 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi204.jpg" height="200" /></div></a>	<a href="exec:i = 205 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi205.jpg" height="200" /></div></a>	<a href="exec:i = 206 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi206.jpg" height="200" /></div></a>	<a href="exec:i = 207 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi207.jpg" height="200" /></div></a>	<a href="exec:i = 208 & dynamic $budgetprofi"><div style="width:100%; max-width:200px; max-height:200px;"><img src="images/clothes/profi208.jpg" height="200" /></div></a>
	</tr>
	</table>'
end

--- budgetclothes ---------------------------------
# Nord
$metka = $ARGS[0]
$loc = $CURLOC
$metkaStreet = $ARGS[0]
$locStreet = $CURLOC
gs 'dinam'
clr
gs 'stat'
gs 'time'
'<center><b>Northern region</b></center>'
'<center><img src="images/etogame/nord.jpg"></center>'

!!act 'Exit to the northern highway':minut += 15 & nroad = 0 & gt 'road'
act 'Wait':
	cla
	waiting = input ("How long would you like to wait? (Not more than 120 minutes)")

	if waiting <= 0 or waiting > 120:
		minut += 15
	elseif waiting > 0 and waiting <= 120:
		minut += waiting
	end

	act 'Take a look at the clock':gt curloc
end

act 'Take a cab':
	cla
	*clr
	minut += 5
	'<center><img src="images/etogame/taxi1.jpg"></center>'
	'You caught a passing taxi.'
	'"The drive will cost you <b>250 rubles</b>", the driver says.'

	if $loc ! 'street':
		act 'Go to the Residential Area':
			$loc = 'street'
			dynamic $taxi
		end
	end

	if $loc ! 'down':
		act 'Go to the City Center':
			$loc = 'down'
			dynamic $taxi
		end
	end

	if $loc ! 'Nord':
		act 'Go to the Northern Area':
			$loc = 'Nord'
			dynamic $taxi
		end
	end

	act 'Turn him down and leave':gt '<<$loc>>'
end

if car > 0:
	if cardrive = 3 or cardrive >= 6 and cardrive <= 9:'In the parking stands your <a href="exec:GS ''carF'', ''start''"><<$car>></a>.'
end

if hour >= 8 and hour <= 22:'A kiosk is selling <a href="exec:dynamic $kiosksig">cigarettes</a>.'

'<a href="exec:minut += 15 & gt ''vokzal''">Train Station</a> to get to the small Town.'

if slavaQW >= 1:'<a href="exec:gt ''qwBarPolet''">Bar "Flight"</a>.'

litltown = 0
'There is a <a href="exec:gt ''zaprF'', ''start''">Gas</a> Station near the street'

if hour >= 5 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> Station is within a 5 minute walk from here.'
if hour >= 9 and hour <= 17 and week > 1:'<a href="exec:gt ''autosalonF'', ''start''">Car Dealership</a>'
if hour >= 9 and hour <= 20 and week < 7:'<a href="exec:gt ''autoservisF'', ''start''">Repair Shop</a>'
if hour >= 9 and hour <= 17 and week > 1:'Used <a href="exec:gt ''autotraidF'', ''start''">Car Dealership</a>'
if hour >= 9 and hour <= 17 and week < 6:'<a href="exec:gt ''dk'', ''start''">The House of Culture named after Lenin</a>'
if hour >= 9 and hour <= 17 and week < 6 and bumtolik > 3:'<a href="exec:gt ''buklinik'', ''start''">Mercy clinic</a>'
if hour >= 8 and hour <= 20:'The parking lot, which is engulfed in bright lights, belongs to a <a href="exec:gt ''shop'', ''start''">Supermarket</a>'
if hour >= 12 and hour <= 19:'Above the door to a basement room is a bright neon sign for a <a href="exec:gt ''pirsingsalon''">piercing parlor</a>'
if tobiQW >= 1:'The old mansion, home to <a href="exec:gt ''kakuzu'', ''start''">Kakuzu</a>'

'There is a huge building, with bright lights, which houses a <a href="exec:gt ''casino''">Casino</a> and a hotel.'

if hour >= 14 or hour < 4:'Located far away from the buildings <a href="exec:gt ''lakecafe'', ''main''">barbecue</a>.'
if jouryResult = 10:'In one of the building you can find <a href="exec:gt ''youry''">Georges</a> flat'
if IvanKvartira > 0:'In one of these building is <a href="exec:gt ''ivanRoom''">Manager Ivans</a> apartment'

'A long and high fence, which is build around the <a href="exec:gt ''Terminal''">storage terminal</a>'
dynamic $din_street_cum

--- Nord ---------------------------------
# Terminal
minut += 5

clr
gs 'stat'
!'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'!
'<center><b><font color="maroon">Storage terminal</font></b></center>'
'<center><img src="images/etogame/terminal.jpg"></center>'
'A plurality of storage buildings to which drive up truck for loading and unloading.'

act 'Leave':
	cla
	minut += 5
	gt 'nord'
end

if TerminalPapper = 1 and DayTerminalPapper = day:
	act 'Classified documents':
		cls
		minut += 15
		TerminalPapper = 2
		gs 'stat'
		fcolor = rgb(0, 0, 0)
		bcolor = rgb(255, 255, 255)
		lcolor = rgb(106, 90, 205)
		'You went to the office and gave the documents to the manager.'

		act 'Leave':minut += 5 & gt 'nord'
	end
end

if money >= 100:
	act 'Buy small items (100 rubles)':
		cls
		minut += 15
		gs 'stat'
		'You went to the office and spoke with the manager about buying small things.'

		if tovarskladlevel = 0:
			if tovarL >= 30:
				'Thinking a bit you realize, you just have nowhere to store the goods and decide to unsubscribe from the purchase.'
			elseif tovarL < 30:
				maxtov = 30 - tovarL
				'Do you have a place for storage <<maxtov>> One unit of product.'

				act 'Buy':
					cls
					gs 'stat'
					'Do you have a place for storage <<maxtov>> One unit of product.'
					tovarpokup = input("How much product you want to buy at a price 100 rubles apiece?")

					if tovarpokup > maxtov or tovarpokup * 100 > money:
						'Manager shakes his head "No, so it will not work"'
					else
						tovarL += tovarpokup
						money -= tovarpokup * 100
						gs 'stat'
						'You bought <<tovarpokup>> One unit of small goods and now you have stored <<tovarL>> One unit of product.'
					end

					act 'Leave':minut+=5&gt $curloc
				end
			end
		end

		act 'Leave':minut += 5 & gt 'nord'
	end

	if YouCanGar > 0:
		act 'Buy small items for the car storage (100 rubles)':
			cls
			minut += 15
			gs 'stat'
			'You went to the office and spoke with the manager about buying small things.'

			if tovarskladlevel = 0:
				if GarTorgItem >= 100:
					'Thinking a bit you realize, you just have nowhere to store the goods and decide to unsubscribe from the purchase.'
				elseif GarTorgItem < 100:
					maxtov = 100 - GarTorgItem
					'Do you have a place for storage <<maxtov>> One unit of product.'

					act 'Buy':
						cls
						gs 'stat'
						'Do you have a place for storage <<maxtov>> One unit of product.'
						tovarpokup = input("How much product you want to buy at a price 100 rubles apiece?")

						if tovarpokup > maxtov or tovarpokup * 100 > money:
							'Manager shakes his head "No, so it will not work"'
						else
							GarTorgItem += tovarpokup
							money -= tovarpokup * 100
							gs 'stat'
							'You bought <<tovarpokup>> One unit of small goods in the garage and now you have stored <<GarTorgItem>> One unit of product.'
						end

						act 'Leave':minut += 5 & gt $curloc
					end
				end
			end

			act 'Leave':minut += 5 & gt 'nord'
		end
	end
end

--- Terminal ---------------------------------
# ivanRoom
clr
minut += 5
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Apartment manager Ivan</font></b></center>'
'<center><img src="images/etogame/podezdhr.jpg"></center>'
'Apartment door Ivan steel, with good locks.'

act 'Leave':
	cla
	minut += 5
	gt 'nord'
end

if poverKAR = 1:
	'You came to the door behind you and Ivan heard a rustling. You turned and saw Juugo. He walked up to you and said, "Ivan the apartment. You to take this camera and shoot. Now we''ll get him."'

	act 'Come on we''ll get this monster':
		cls
		IvanKvartira = 0
		poverKAR = 2
		minut += 15
		gs 'stat'
		'<center><img src="images/etogame/gun.jpg"></center>'
		'Juugo went to the door, you notice a tattoo on his face woke up and came to life, covering his skin black lines. Line broke and you saw like Juugo fists began to increase. He growled and punched the door. The door slammed bent. Juugo hand grabbed the door and opened it, pulling out the lock. Juugo with a roar broke into the apartment. You ran into the apartment after Juugo and saw Ivan left the room holding a gun. Ivan shot and Juugo twitched, then Ivan shot again and again. Juugo fell to the floor. Ivan ran out of ammo and he began frantically reloading the gun.'

		if dom > 0:
			act 'Embed Ivan':
				cls
				gs 'stat'
				!!'<center><img src="images/etogame/gun.jpg"></center>'
				'You ran to Ivan with a plan to kick him while he reloads the gun. Ivan suddenly jumped back into the room and slammed the door in your face. The inertia you bumped into the door. Immediately slammed a shot and splinters flew out the door, but the bullet did not accidentally hurt you and shrieking flew past. Behind you heard what that movement and as you saw in the hallway on his feet gets Juugo, tightened his wounds. Even the bullet hole in his forehead became rapidly tightened. Pokryvatsya body became black and what is a scab on his head grew horns. Juugo shouted furiously "NOW YOU DIE!" and rushed to the wooden door behind which hid Ivan turning it into pieces and flinging you aside. You saw that Ivan lying on the floor in blood and without movement, the gun fell from his hand weakened. Juugo with a triumphant cry rushed to Ivan and became powerful blows beat the motionless body. You have seen how just a second Juugo turned his head to a bloody pulp Ivan. Juugo but did not stop there and you feel like it''s going to force, concentrating in his hand. The air smelled of ozone and there was a nasty, thin squeal. You understand that now Juugo hit than it is very powerful.'

				act 'Run':
					cls
					gs 'stat'
					!!'<center><img src="images/etogame/gun.jpg"></center>'
					'You turned and ran out of the apartment. Rear hit powerful explosion shook the house, ringing in your ears and you fell on the floor. Looking around you realize that Ivan apartment collapsed, sticking out of the doorway chip concrete slab in the air spinning dust, ears ringing.'

					act 'Run away from the entrance':gt 'nord'
				end
			end
		end

		act 'Freeze in horror':
			cls
			gs 'stat'
			'<center><img src="images/etogame/gun.jpg"></center>'
			'You froze in horror and looked at Ivan and Juugo. Juugo was lying in blood, his head was a decent bullet hole from which flowed bloody mess. Ivan quickly reloaded and sent it to you. Juugo suddenly rolled over on the floor and you have seen how his wounds tightened. Body is covered with black and what that crust. Ivan started and pointing the gun at Juugo shot at it. Bullets whistled hit the wall deflects off the body Juugo. Juugo finally turned into what that monster with horns and jumped to his feet angrily screamed "NOW YOU DIE!" Ivan began to retreat, trying to reload the gun. Juugo lightning jumped him and hit Ivan zashvyrnuv him like a rag doll in the room. You saw that Ivan lying on the floor in blood and without movement, the gun fell from his hand weakened. Juugo with a triumphant cry rushed to Ivan and became powerful blows beat the motionless body. You have seen how just a second Juugo turned his head to a bloody pulp Ivan. Juugo but did not stop there and you feel like it''s going to force, concentrating in his hand. The air smelled of ozone and there was a nasty, thin squeal. You understand that now Juugo hit than it is very powerful.'

			act 'Run':
				cls
				gs 'stat'
				!!'<center><img src="images/etogame/gun.jpg"></center>'
				'You turned and ran out of the apartment. Rear hit powerful explosion shook the house, ringing in your ears and you fell on the floor. Looking around you realize that Ivan apartment collapsed, sticking out of the doorway chip concrete slab in the air spinning dust, ears ringing.'

				act 'Run away from the entrance':gt 'nord'
			end
		end
	end
end

if softKAR = 1:
	'You came to kavrtire Ivan Karin and see there. She adjusted her glasses and told you. "Ivan is now in her apartment."'

	act 'What''s the plan?':
		cls
		horny = 0
		gs 'stat'
		'<center><img src="images/picPRE/karinPRE.jpg"></center>'
		'Karin began to explain, "I can impose on you a temporary spell. Ivan did not recognize you. We seduce him, this means I have enough to smell it and immediately vozbudishsya. Main us to control myself. Then when he is ready he will offer drink, Hems him the means that would unleash his tongue. write his confession on camera. And the hat. "'

		act 'Let''s get down':
			cls
			minut += 5
			horny += 10
			gs 'stat'
			'<center><img src="images/picPRE/karinPRE.jpg"></center>'
			'Karina something probomotala and touched your face with his hand. She removed his hand and said, "Everything you do not know Ivan, here hold this bottle. Here strong aphrodisiac that works when his sniffing. Beware, we are not immune to it." Karin gave you bubble and you sprinkled a little front door, trying not to inhale the aroma. Karin rang the bell at the door and the door opened. Ivan appeared on the threshold, he looked a little bewildered at you. Karin smiled sweetly Ivan "We life of social surveys, can we ask you a few questions?" Ivan aside gesture inviting you to go to the apartment.'

			act 'Enter the apartment':
				cls
				minut += 5
				horny += 50
				gs 'stat'
				'<center><img src="images/picPRE/karinPRE.jpg"></center>'
				'Together with Karin you entered the apartment and went to Ivan in his living room. The room was clean and cozy. Ivan invited you to sit on the sofa and sat down in front of you. Karin began to ask questions about sex Ivan. Ivan looked surprisingly calm for a man fell under the aphrodisiac. You tried not to breathe and still feel its impact. Karin elbow and pushed you to your eyes showed vial.'

				act 'Splash secretly':
					cls
					minut += 5
					horny += 25
					gs 'stat'
				'<center><img src="images/picPRE/karinPRE.jpg"></center>'
				'While distracted Karin Ivan showing him her cleavage, you secretly still gushed aphrodisiac in the air and feel like themselves became excited. Karin all alluring and seductive talked with Ivan trying to seduce him, you even noticed her cheeks were flushed. But Ivan reacted Leavee calmly at what is happening and you barely noticed as he was interested, but did not notice any signs of arousal. Meanwhile Karin again poked you in the ribs.'

					act 'Splash again':
						cls
						minut += 5
						horny += 25
						gs 'stat'
						'<center><img src="images/picPRE/karinPRE.jpg"></center>'
						'Karin got up from the sofa and turning his back to Ivan leaned over and began fumbling in his bag seductively curving. Ivan looked curiously at the bottom Karin and quietly looked away. You gushed again and felt like your pussy swelled and began to demand attention. Karin meanwhile sat on the sofa. It was evident that an aphrodisiac and it acted. She reddened lips, cheeks reddened and she frantically clutched his feet. Ivan looked at you with interest, but again, no sign of the beyond excitement showed. Karin broke down and snatched you from the hands of the bubble. She stood up and asked Ivan to smell perfume, and tell her what he thinks of them. Ivan smiled at it and said, "Sorry, I have a cold. Leavee odors do not feel." Karin helplessly sat on the couch all her cunning plan with magic and alchemy collapsed on the banal cold.'

						act 'Suggest a drink':
							cls
							minut += 5
							gs 'stat'
							'<center><img src="images/picPRE/karinPRE.jpg"></center>'
							'You are offered a drink to Ivan. He chuckled, "Girls, I do not know what you''re up here, but no. Themselves think two unfamiliar girl, come to my house, asking me stupid questions, entice, offer a drink, you can klofelinschitsy? Podolete me something else, and I pass out ? " Karin noticeably flustered realizing that her plan raspolzsya at the seams. Ivan got up from the couch and invited you to leave the apartment. Karin tried to take something else. But Ivan was already up and you see off Vym nothing left to do but to proceed to the exit.'

							act 'Leave the apartment':
								cls
								minut += 5
								softKAR = 0
								gs 'stat'
								'<center><img src="images/picPRE/karinPRE.jpg"></center>'
								'Together with Karin you left the apartment and Ivan closed the door behind you. Karin angrily slammed fist into his palm. "The devil. Well, who would have thought? Okay, I ran. Disassemble itself."'

								act 'Go out of the house':gt 'nord'
							end
						end

						act 'Be silent':
							cls
							minut += 5
							gs 'stat'
							'<center><img src="images/qwest/Threesome.jpg"></center>'
							'You helplessly silent, but Karin was found first. "Runny nose? I know the perfect remedy for a cold." Karin came to Ivan and put her hand on his nose began to massage his. Eyes on Ivan became clear that nasmortk began to pass and he began to feel an aphrodisiac. Ivan grabbed Karin and drew her to him. She tried resisting, but very powerful aphrodisiac, and she lashed out at Ivan began to kiss him. Second hand Ivan attracted you to her. You feel powerful excitement of the situation.'

							act '...':
								cls
								minut += 5
								softKAR = 2
								gs 'stat'
								'<center><img src="images/qwest/Threesome1.jpg"></center>'
								'Karin kissing Ivan began to unbutton his pants. Finally hard cock Ivan was on the loose. Karin leaned to the penis and began to suck. Ivan dug its lips in your lips and began to kiss you under the greedy smack Karina. Ivan took your head in his hands and sent it to his groin.'

								act 'Suck a cock together with Karin':
									cls
									minut += 5
									guy += 1

									if KarinSex = 0:KarinSex = 1 & girl += 1

									bj += 1
									gang += 1
									gs 'stat'
									'<center><img src="images/qwest/Threesome2.jpg"></center>'
									'Exhausted from morbid craving you moaning along with Karin, suck dick, vylizyvyete balls. You greedily bites his lips into a hard and hot flesh Crimson member, trying to suck in his mouth as much as possible.'

									act '....':
										cls
										minut += 5

										gs 'stat'
										'<center><img src="images/qwest/Threesome3.jpg"></center>'
										'Karin Ivan dropped onto his back and tearing on the go with their clothes jumped on top of his cock. While Karin furiously rides a member Ivan you caress his testicles and stroking ass Karin.'

										act 'Sit pussy on Ivan''s face':
											cls
											minut += 5
											kuni += 1
											gs 'stat'
											'<center><img src="images/qwest/Threesome4.jpg"></center>'
											'While Karin skips out on a limb you walked Ivan and transferred through the leg by placing his head in front of her pussy on his face. Ivan began to lick your pussy, incredible bliss enveloped you. Ivan after a while you took off your face and put Karin back.'

											act '69 Karin':
												cls
												minut += 5
												lesb += 1
												sex += 1
												vagina += 1
												orgasm += 1
												gs 'stat'
												'<center><img src="images/qwest/Threesome5.jpg"></center>'
												'You started to lick pussy Karin and felt as something solid Bound you expiring juices pussy. When a hard cock parted the folds of your pussy, you suffocated from surging feelings for you. Do you dizzy and took possession of the whole body bliss, you suddenly gripped the present orgasm shuddering convulsions, you heard their cry as if the part of the body and felt Karin under you also began to shudder from orgasm. Ivan groaned and pulled his penis out of you, he grabbed you with Karin and put you in front of him on his knees.'

												act 'On your knees':
													cls
													minut += 5
													facial += 1
													cumface += 1
													gs 'stat'
													'<center><img src="images/qwest/Threesome6.jpg"></center>'
													'You knelt together with Karin and Ivan began to masturbate his penis in front of your faces. Suddenly flew out of his cock and hot jet of sperm hit on your faces. Member of some more time flying jet of sperm fall on your face with Karin. But Ivan finally dried out and helplessly sat on the couch trying to catch my breath. Karin whispered to you, cameras ready.'

													act 'Cooking chamber':
														cls
														softKAR = 10
														IvanEvidence = 1
														cumface = 0
														gs 'stat'
														'<center><img src="images/picPRE/karinPRE.jpg"></center>'
														'You secretly prepared a camera sending it out of her purse at Ivan and included it. Karin meanwhile handed him a glass of water, Ivan thirsty drank water and Karin asked him. Tell me how you stole from his boss. Ivan grinned "Elementary, I lost in the casino and I urgently need money. I knew this old asshole lie in the safe money on bribes. This slut did not give me a dishwasher. And I was born a brilliant plan. Naboltal that I fool her take the manager. Yeah, how did the manager. And Imagine this fool fell for such nonsense. I gave her the keys that stole. arose where the camera will not see me, and sent it to the cleaning lady pridurochnuyu take money. She brought them to me, "said Karin "And where is the money?" Ivan said sadly "long ringing. Know, holy card debt." Karin grinned, "it''s done. Ivan And you go to sleep." Ivan immediately snoring on the couch. Karin turned to you. "Yes, I almost screwed up because of his cold. Good lesson for you. Everything can not go according to plan. Thought I had to paralyze him, but I have since tried once. Paralyzed object choked when I poila. Hardly its pumping. Okay, let''s go faster. umoemsya''s just. " You just quickly washed up in the bathroom, along with Karin, flush sperm. She obviously avoiding your eyes and you will be worth on the street, she immediately began to say goodbye to you.'

														act 'Leave':gt 'nord'
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- ivanRoom ---------------------------------
# dk
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>House of Culture named after Lenin</b></center>'
	'<center><img src="images/etogame/dk4.jpg"></center>'
	'Hours:9 to 17, the weekend Saturday, Sunday.'

	if hour >= 9 and hour <= 17 and week < 6:
		act 'Go to the House of Culture':gt 'dk', 'holl'
	end

	if avtoskul >= 1 and avtoskul < 11 and skulday ! day and week >= 6 and money >= 1000 and age >= 18:
		act 'Driver Training class (1,000 rubles) (2:00)':
			cla
			*clr
			money -= 1000
			skulday = day
			avtoskul += 1
			minut += 120
			'<center><img src="images/etogame/dk2.jpg"></center>'
			'You studied by modern methods driving.'

			act 'Leave':gt 'dk', 'holl'
		end
	end

	act 'Leave':gt 'nord'
end

if $ARGS[0] = 'holl':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>House of Culture</b></center>'
	'<center><img src="images/etogame/dk1.jpg"></center>'
	'Available services, driving school, payment 30, 000 rubles. 10 classes, at any time convenient for you during the working day at home culture.'
	'Education office programs, degree-granting Secretary. 15, 000 rubles, training period of 30 days.'
	!!'Medium for new opportunities - only here only freebie.'
	'On the wall hangs sign.'
	'Singing lessons - 500 rubles per session.'
	'Massage lessons - 5,000 rubles per session.'
	'Personal growth course - 1,000 rubles per session.'

	!'
	act 'Go to a medium':
		cla
		*clr
		minut += 30
		killobj
		addobj 'Back'
		'You did not understand, if anything happened, and mixed feelings came from the charlatan.'

		act 'Leave':gt 'dk', 'holl'
	end
	'!

	if money >= 1000:
		act 'Personal Growth class cost 1,000 rubles (1:00)':
			cls
			money -= 1000
			dom += 5
			minut += 60
			gs 'stat'
			'You are in for an hour with other visitors and played up leading different life situations and learn to be a winner in life situations, to defend their interests. After the course, you feel that your dominance grew.'

			act 'Leave':gt 'dk', 'holl'
		end
	end

	if secrDiplom = 0 and sekrObu > 0:sekrObuA = sekrObu - 1 & 'Trained on the Secretary-General <<sekrObuA>> 30 days of'

	if hour >= 9 and hour <= 17 and week < 6:
		if vokalday ! day and alexeySex > 0 and alexeyVopros = 2:
			act 'Go to singing lessons':
				cls
				alexeyQW += 1
				vokal += 1
				vokalday = day
				horny += 30
				gs 'stat'
				'You are engaged in an hour with Alexei vocal that every now and then caressed your foot, then touch the ass, then stroked his chest.'
				deystrand = rand(0, 10)

				if deystrand >= 8:
					'After time spent Alexei turned to you "Today I can not <<$name>>, a lot of work, I suck quick."'

					act 'Get on your knees and take in the mouth':
						cls
						alexeySex += 1
						horny += 10
						bj += 1
						minut += 10
						gs 'stat'
						picrand = rand(1, 14)
						'<center><img src="images/qwest/alexey/bj<<picrand>>.jpg"></center>'
						'You kneel before him and clasped his dick <<$liptalk>> began to suck. Alexei helped hips almost peck you in the mouth. Finally he groaned "Catch huesoska their rations if that is on the floor, lick will make."'
						gs 'oral', '0'

						act 'Substitute mouth':
							cls
							horny += 10
							minut += 10
							swallow += 1
							cumlip += 1
							gs 'stat'
							picrand = rand(1, 14)
							'<center><img src="images/qwest/alexey/bjcum<<picrand>>.jpg"></center>'
							'Jet of sperm hit you in the mouth and began to run down your <<$liptalk>>. Alexei wiped his dick on your <<$liptalk>> and put it away in his pants.'
							'You began diligently to swallow warm, stinky sperm and semen to collect the remains of spilled from his chin. Once you swallow a seed, you licked his lips and rose up from the floor were about to leave.'

							act 'Leave':gt 'dk', 'holl'
						end
					end
				else
					'After the lesson, Lech taking you by the hand led to his home.'

					if sashaClubQW = 0:act 'Go':gt 'alex'

					if sashaClubQW > 0:
						ivrand = rand(0, 10)

						if ivrand < 8:act 'Go':gt 'alex'
						if ivrand >= 8:act 'Go':gt 'alexgang'
					end
				end
			end
		elseif money >= 500 and vokalday ! day and alexeySex > 0 and alexeyVopros = 1:
			act 'Singing lesson cost 500 rubles':
				cls
				money -= 500
				alexeyQW += 1
				vokal += 1
				vokalday = day
				gs 'stat'
				'You are engaged in an hour with Alexei vocals, which gave no indication that when you otduplil it in all holes.'

				act 'Leave':gt 'dk', 'holl'
			end
		elseif money >= 500 and vokalday ! day and alexeySex > 0 and alexeyVopros = 0:
			act 'Singing lesson cost 500 rubles':
				cls
				alexeyQW += 1
				vokal += 1
				vokalday = day
				gs 'stat'
				'You are logged in to the office to Alexei. He guiltily looked at you and said. "Sorry, this is a musician first and foremost a creative person, and only then, drunken rednecks."'
				'You could not help smiling at the memory as you dragged the carcass of his teacher sleeping with his back, where he was snoring peacefully.'
				'Alexei open smile came up to you. "<<$name>>. We can now proceed in two ways. Now we both forget that between us and that it would not continue to learn as in what happened, or we can vstrechatsya. Vstrechatsya If we, as a true gentleman, I will not charge you fee, but will be very hard to invite you to come and visit. Choose. "'

				act 'Let''s forget that between us that it was.':
					cls
					money -= 500
					alexeyVopros = 1
					'You offered Alexei forget what happened and gave him 500 rubles per lesson Lech nodded sadly and began to teach you vocal.'

					act 'Leave':gt 'dk', 'holl'
				end

				act 'If you do not napivatsya so, then we could try again.':
					cls
					alexeyVopros = 2
					'You playfully smiled and told him that you do not mind him vstrechatsya if it will not be so napivatsya. Alexei smiled with relief. "That''s good. And now engaged." The remaining time you have dedicated classes.'

					act 'Leave':gt 'dk', 'holl'
				end
			end
		elseif money >= 500 and vokalday ! day and alexeySex = 0:
			act 'Singing lesson cost 500 rubles (1:00)':
				cls
				minut += 60
				money -= 500
				alexeyQW += 1
				vokal += 1
				vokalday = day
				gs 'stat'
				!!'<center><img src="images/etogame/dk2.jpg"></center>'

				if alexeyQW = 1:
					'You entered the office where he was man with long hair pulled back in a ponytail. He looked at you confident look and well-modulated voice said. "Come on girl, you''re on the vocals?" You nodded his head and gave him 500 rubles. He put them in his pocket and inserted introduced "I''m Alex, and you?" You answered him saying that your name is <<$name>>. After that, the man began to deal with you. You did not notice as an hour passed. You went out and the man politely said goodbye to you.'
				elseif alexeyQW = 2:
					horny += 10
					'Alexei met you and pick up the money began to deal with you when you have something that did not work, he touched his hand to explain is the face. Not knowing for what, you is a little excited.'
				elseif alexeyQW >= 3 and alexeyQW < 7:
					horny += 10
					'Alexei met you and pick up the money began to deal with you when you have something that did not work, he touched his hand to explain is the face. Not knowing for what, you is a little excited. After training, he politely said goodbye to you.'
				elseif alexeyQW >= 7 and alexeyQW < 10:
					horny += 20
					'Alexei met you and pick up the money began to deal with you when you have something that did not work, he touched his hand to explain is the face. Not knowing for what, you is exciting. Alexei looked at you as if you''ve seen right through and sometimes you just smiled easily.'
				elseif alexeyQW = 10 and alexeyVQW = 0:
					'Even during the lessons you caught his teacher smell of alcohol. After classes, you came to Alex and offered you go to somewhere together.'

					act 'Go with Alexei':
						cls
						'Alexei took you by the elbow and led somewhere along the way telling you about myself, he was a professional musician. Laban where only can work in DC phonics, moonlights as a DJ in a club. In you, he immediately saw the talent, the voice you have not delivered, but he is rapidly developing that Alex just blown your data. The conversation you did not even notice how came to the door. Alexei charmingly smiled and invited you to his home.'

						act 'Leave':gt 'nord'

						act 'Alexei go home':
							cls
							alexeyVQW += 1
							minut += 120
							gs 'stat'
							'Alexei lives in a studio apartment, all the decoration which says that he was a bachelor, a musician and a rare wino. Lying on the floor of the bottle, in the room are huge concert speakers occupying floor kamnaty worth what that equipment. Alexei put you on the sofa and brought alcohol with a snack. He sat on Odal from you on an armchair. And you started drinking. Lech helpful, simple, cheerful guy with a rich biography and interesting outlook on life, you have been very pleased with him obschatsya but Alex quickly tipsy and frankly looked drunk.'
							'He looked at you and said intelligent look "Well <<$name>>, you do not just agreed to come to visit me? I think it''s time to go to the main action. Come to me."'
							'You think to yourself, what is he still arrogant, but did not expect to get up and not solid legs went to the chair where he sat Lech.'
							'When you come to a chair Alex brazenly took dick out of his pants and winked at you, "Well, do not be shy, everything on your own."'

							act 'Get on your knees and take in the mouth':
								cls
								guy += 1
								alexeySex = 1
								horny += 10
								bj += 1
								minut += 10
								gs 'stat'
								'<center><img src="images/qwest/alexey/bj.jpg"></center>'
								'You kneel in front of him and stared at his cock, he is really great, is not less than 20 centimeters. Caressed his hands clasped you your dick <<$liptalk>> and began to suck. While you are smacking their lips on a dick flushed, Lech took the mug with beer and began to sip her pointedly. After that, he dismissed you from the penis and dragged onto the bed.'
								gs 'oral', '0'

								act 'Unclothed':
									cls
									minut += 10
									$nameV = 'Alexey'
									$boy = $nameV
									dick = 20
									silavag = 2
									pose = 1
									gs 'stat'
									'<center><img src="images/qwest/alexey/sex.jpg"></center>'
									'Hardly you undressed as Alesya practically force pulled you on the bed and put the cancer.'
									dynamic $sexstart
									'Alexei slapped you in the ass with his hand and said, "I see people at once, you''re a real slut, and your place is cancer or kneeling with by a dick in your mouth. You''re the one that you want."'
									dynamic $sexstart2
									'During sex Alex stuck somehow smeared cream finger in the ass and began to move it there. Soon he took his dick out of your pussy and stuck to them stared you in the ass.'

									act 'Moan':
										cls
										minut += 10
										$nameV = 'Alexey'
										$boy = $nameV
										dick = 20
										silavag = 2
										pose = 1
										gs 'stat'
										'<center><img src="images/qwest/alexey/anal.jpg"></center>'
										dynamic $analsex
										gs 'BDsex', 'ancum'
										'Alexei had finished fell on your back and kissed you on the cheek. You lay underneath without knowing what to do. Soon he heard snoring Alexis. You tried to push apart but it does. With difficulty you got rid of it with herself on the bed and crawled out from under his sleeping carcass. Lech slept soundly filling the room leaping to their snoring. You indignantly dressed and decided to leave the apartment.'

										act 'Leave':gt 'nord'
									end
								end
							end
						end
					end
				end

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if avtoskul = 0 and money >= 30000 and prava = 0 and age >= 18:
			act 'Book a driver training course (30,000 rubles)':
				cla
				money -= 30000
				avtoskul = 1
				!!'<center><img src="images/etogame/dk2.jpg"></center>'
				'You paid the money in cash and can now learn every day on the right within 2 hours.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if secrDiplom = 0 and sekrObu = 0 and money >= 15000:
			act 'Book a secretarial course (15,000 rubles)':
				cla
				money -= 15000
				sekrObu = 1
				!!'<center><img src="images/etogame/dk2.jpg"></center>'
				'You paid the money in cash and can now learn every day at the secretary within 2 hours. 10 training days total.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if sekrObu > 0 and sekrObu < 11 and secrday ! day:
			act 'Learn from the Secretary (2:00)':
				cla
				*clr
				secrday = day
				sekrObu += 1
				minut += 120
				'<center><img src="images/etogame/kurs.jpg"></center>'
				'You went into the office with computers, mostly student in such courses are women. In class the teacher came and started to tell you the intricacies of the Secretary and the basics of working in the office programs.'

				if cumfrot > 0:horny += 10 & 'You nervously fumble on a chair trying to hide the stain of semen on her ass, but it seems out worse. You started to pay attention to the other student.'

				act 'Leave':gt 'dk', 'holl'
			end
		elseif sekrObu >= 11 and secrday ! day:
			act 'Get Secretary diploma':
				cla
				*clr
				secrday = day
				sekrObu = 0
				minut += 15
				secrDiplom = 1
				'<center><img src="images/etogame/kurs.jpg"></center>'
				'You went into the office with computers, mostly student in such courses are women. In class the teacher came and started to tell you the intricacies of the Secretary and the basics of working in the office programs.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if avtoskul >= 1 and avtoskul < 11 and skulday ! day and age >= 18:
			act 'Learn from the right (2:00)':
				cla
				*clr
				skulday = day
				avtoskul += 1
				minut += 120
				'<center><img src="images/etogame/dk2.jpg"></center>'
				'You studied by modern methods driving.'

				!!if nikpravaQW = 1:end

				act 'Leave':gt 'dk', 'holl'
			end
		elseif avtoskul >= 11 and skulday ! day and age >= 18:
			act 'Pass on the right (2:00)':
				cla
				*clr
				minut += 120
				avtoskul = 0
				prava = 1
				minut += 120
				'<center><img src="images/etogame/dk3.jpg"></center>'
				'You went with traffic cops within 2 hours of the city, he was satisfied and did not find what pridratsya.'
				'You gave ready-law.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if money >= 5000 and masash < 10 and masashshoolday ! day:
			act 'Learn massage (5,000 rubles)':
				cla
				masashshoolday = day
				money -= 5000
				masash += 1
				minut += 120
				gs 'stat'
				'You two o''clock studied massage'

				if masash = 10:'You are issued a certificate of course completion masseurs.'

				act 'Leave':gt 'dk', 'holl'
			end
		end
	end

	act 'Leave':gt 'nord'
end

--- dk ---------------------------------
# kakuzu
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mansion Kakuzu</b></center>'
	'<center><img src="images/etogame/mansion.jpg"></center>'
	'Old gloomy mansion, which even at the local gun-shot approach fear and sincerely believe that lives there that is very bad. No need to have some sort of skills that make your system, from the death blows.'

	act 'Enter the mansion':gt 'kakuzu', 'mansion'
	act 'Leave':gt 'nord'
end

if $ARGS[0] = 'mansion':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Mansion Kakuzu</b></center>'
	'<center><img src="images/etogame/mansion1.jpg"></center>'
	'The room sits Kakuzu not paying any attention to you'

	act 'Talk to Kakuzu':gt 'kakuzu', 'mansion1'
	act 'Leave':gt 'kakuzu', 'start'
end

if $ARGS[0] = 'mansion1':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Kakuzu</b></center>'
	'<center><img src="images/qwest/kakuzu.jpg"></center>'

	if tobiQW = 1:'I know who you are and what you need. Pay 100 pieces and then I move, that would teach you how to achieve affinity with the elements.'
	if tobiQW = 2:'You have <<srodpaper>> sheets of paper to determine the affinity of the elements. If you run out of paper, you have to buy more at Kakuzu 10 thousand sheet.'

	if money >= 100000 and tobiQW = 1:
		act 'Here''s the money (100,000 rubles)':
			cla
			money -= 100000
			tobiQW = 2
			srodpaper = 10
			'You put money in front of Kakuzu. He threw them in a drawer without even looking.'
			'You asked, "Do not even going to count?" What Kakuzu said quietly, "if there is not enough even if the ruble, I will find and kill you."'
			'(Kakuzu) - Listen to me carefully. Elemental there are five pieces, '
			'fire - this school has the most powerful of all the damage and the weakest protection. But there is nothing better school fire that would nail the opponent with a single blow.'
			'lightning - this school each his hit paralyzes opponent weaker than damage from the fire, but if you''re hooked by lightning, then quickly you will achieve any.'
			'wind - weak loss, weak defense, but no fog, no clones can not save them from the wind, any offensive spell destroys clones wind and fog, plus Spell wind is almost impossible to dodge.'
			'Plot - protective school, but the attacks are very dangerous ground if the enemy attack misses, then will stick in the ground and can not move. Just near the ground is the most powerful of all protection, protection of land and regenerate itself absolute defense to attack the enemy.'
			'Water - Damage to the school is small, but all spells manna water taken from the enemy, the same high level of water protection is very dangerous, she eats manna from an enemy, regenerates, although it is weaker cham similar land protection.'
			'Affinity with the elements means that you can learn this particular element. You can not explore another element after selecting affinity until izuchish element completely. I''ll give you 10 sheets of paper magic. Each sheet cost me 5, 000 rubles. Concentrate the energy in a piece of paper and when you succeed, then you can either start over and hope for another element, or select the element on which you managed skontsentrirovatsya.'

			act 'Mark sheets':gt 'kakuzu', 'mansion1'
		end
	elseif tobiQW = 2 and srodpaper <= 0 and money >= 10000:
		act 'I need another paper (10,000 rubles)':
			cla
			money -= 10000
			srodpaper += 1
			'You gave money and Kakuzu handed a sheet of paper.'

			act 'Mark sheets':gt 'kakuzu', 'mansion1'
		end
	end

	if tobiQW = 2:
		act 'Tell us again about the elements':
			cla
			'(Kakuzu) - Stupid, listen and remember. Elemental there are five pieces, '
			'fire - this school has the most powerful of all the damage and the weakest protection. But there is nothing better school fire that would nail the opponent with a single blow.'
			'lightning - this school each his hit paralyzes opponent weaker than damage from the fire, but if you''re hooked by lightning, then quickly you will achieve any.'
			'wind - weak loss, weak defense, but no fog, no clones can not save them from the wind, any offensive spell destroys clones wind and fog, plus Spell wind is almost impossible to dodge.'
			'Plot - protective school, but the attacks are very dangerous ground if the enemy attack misses, then will stick in the ground and can not move. Just near the ground is the most powerful of all protection, protection of land and regenerate itself absolute defense to attack the enemy.'
			'Water - Damage to the school is small, but all spells manna water taken from the enemy, the same high level of water protection is very dangerous, she eats manna from an enemy, regenerates, although it is weaker cham similar land protection.'
			'Affinity with the elements means that you can learn this particular element. You can not explore another element after selecting affinity until izuchish element completely. I''ll give you 10 sheets of paper magic. Each sheet cost me 5, 000 rubles. Concentrate the energy in a piece of paper and when you succeed, then you can either start over and hope for another element, or select the element on which you managed skontsentrirovatsya.'

			act 'Move away':gt 'kakuzu', 'mansion1'
		end
	end

	if tobiQW = 2 and srodpaper > 0 and manna < 2000:'You do not have the forces that continue to concentration.'

	if tobiQW = 2 and srodpaper > 0 and manna >= 2000:
		act 'Concentrating the energy in the sheet of paper (1:00)':
			cla
			minut += 60
			manna -= 2000
			sweat += 5

			if srodstvo = 0:srodrand = rand(1, 5)

			'You concentrate energy in the sheet of paper. You feel that you are spending a huge amount of mana for this action.'
			srodstvo += rand(1, 10)

			if srodstvo < 100:
				'You get tired and sweating like a horse, but your efforts have lead to anything.'

				act 'Move away':gt 'kakuzu', 'mansion1'
			elseif srodstvo >= 100:
				srodpaper -= 1

				if srodrand = 1:'Paper broke in your hands. Kakuzu nodded approvingly affinity with fire. Will you fix it?'
				if srodrand = 2:'Paper electrified in your hands, and from sparks. Kakuzu nodded approvingly affinity with lightning. Will you fix it?'
				if srodrand = 3:'Paper hardened in your hands. Kakuzu nodded approvingly affinity with the land. Will you fix it?'
				if srodrand = 4:'Paper shattered to pieces in your hands. Kakuzu nodded approvingly affinity with the wind. Will you fix it?'
				if srodrand = 5:'Paper soaked in your hands. Kakuzu nodded approvingly affinity for water. Will you fix it?'

				act 'Secure affinity':
					cla
					tobiQW = 3
					stihia = srodrand
					srodstvo = 0
					gt 'kakuzu', 'mansion1'
				end

				act 'Unsubscribe from this affinity':
					srodstvo = 0
					gt 'kakuzu', 'mansion1'
				end
			end
		end
	end

	if tobiQW = 3 and manna < 1000:
		'Kakuzu tells you "You have almost no energy, you need to rest."'
	elseif tobiQW = 3 and manna >= 1000:
		if stihia = 1:
			if magik >= 6 and spellfire1 = 0:
				act 'Learn Flame (1:00)':
					cla
					manna -= 1000
					minut += 60

					spellfireL += rand(1, 10)

					if spellfireL < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellfire1 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 7 and spellfire2 = 0:
				act 'Study the release of fire (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellfire2L += rand(1, 10)

					if spellfire2L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellfire2 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 8 and spellfire3 = 0:
				act 'Study Barrier fire (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellfire3L += rand(1, 10)

					if spellfire3L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellfire3 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 9 and spellfire4 = 0:
				act 'Study Firestorm (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellfire4L += rand(1, 10)

					if spellfire4L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellfire4 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 10 and spellfire5 = 0:
				act 'Learn Flame Shield (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellfire5L += rand(1, 10)

					if spellfire5L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellfire5 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end
		end

		if stihia = 2:
			if magik >= 6 and spellele1 = 0:
				act 'Study Discharge (1:00)':
					cla
					manna -= 1000
					minut += 60
					spelleleL += rand(1, 10)

					if spelleleL < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellele1 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 7 and spellele2 = 0:
				act 'Learn Lightning (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellele1L += rand(1, 10)

					if spellele1L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellele2 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 8 and spellele3 = 0:
				act 'Electro study barrier (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellele2L += rand(1, 10)

					if spellele2L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellele3 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 9 and spellele4 = 0:
				act 'Dance study thousands of birds (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellele3L += rand(1, 10)

					if spellele3L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellele4 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 10 and spellele5 = 0:
				act 'Study Plyaschuschaya sphere (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellele4L += rand(1, 10)

					if spellele4L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellele5 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end
		end

		if stihia = 3:
			if magik >= 6 and spellert1 = 0:
				act 'Study Quicksand (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellertL += rand(1, 10)

					if spellertL < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellert1 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 7 and spellert2 = 0:
				act 'Active protection study (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellert2L += rand(1, 10)

					if spellert2L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellert2 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 8 and spellert3 = 0:
				act 'Study Chasm (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellert3L += rand(1, 10)

					if spellert3L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellert3 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 9 and spellert4 = 0:
				act 'Absolute protection study (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellert4L += rand(1, 10)

					if spellert4L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellert4 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 10 and spellert5 = 0:
				act 'Study Sando (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellert5L += rand(1, 10)

					if spellert5L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellert5 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end
		end

		if stihia = 4:
			if magik >= 6 and spellwind1 = 0:
				act 'Learn Gust (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellwind1L += rand(1, 10)

					if spellwind1L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellwind1 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 7 and spellwind2 = 0:
				act 'Horrific study pressure (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellwind2L += rand(1, 10)

					if spellwind2L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellwind2 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 8 and spellwind3 = 0:
				act 'Vacuum protective sphere (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellwind3L += rand(1, 10)

					if spellwind3L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellwind3 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 9 and spellwind4 = 0:
				act 'Vacuum Rockets (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellwind4L += rand(1, 10)

					if spellwind4L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellwind4 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end

			if magik >= 10 and spellwind5 = 0:
				act 'Devouring vacuum (1:00)':
					cla
					manna -= 1000
					minut += 60
					spellwind5L += rand(1, 10)

					if spellwind5L < 100:
						'You diligently spell for an hour, but could not grasp it.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					else
						spellwind5 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end
		end

	if stihia = 5:
		if magik >= 6 and spellwater1 = 0:
			act 'Creek study manna (1:00)':
				cla
				manna -= 1000
				minut += 60
				spellwaterL += rand(1, 10)

				if spellwaterL < 100:
					'You diligently spell for an hour, but could not grasp it.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				else
					spellwater1 = 1
					'Finally you will able to study the spell.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				end
			end
		end

		if magik >= 7 and spellwater2 = 0:
			act 'Flooding study (1:00)':
				cla
				manna -= 1000
				minut += 60
				spellwater2L += rand(1, 10)

				if spellwater2L < 100:
					'You diligently spell for an hour, but could not grasp it.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				else
					spellwater2 = 1
					'Finally you will able to study the spell.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				end
			end
		end

		if magik >= 8 and spellwater3 = 0:
			act 'Water bubble study (1:00)':
				cla
				manna -= 1000
				minut += 60
				spellwater3L += rand(1, 10)

				if spellwater3L < 100:
					'You diligently spell for an hour, but could not grasp it.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				else
					spellwater3 = 1
					'Finally you will able to study the spell.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				end
			end
		end

		if magik >= 9 and spellwater4 = 0:
			act 'Water study shark missile (1:00)':
				cla
				manna -= 1000
				minut += 60
				spellwater4L += rand(1, 10)

				if spellwater4L < 100:
					'You diligently spell for an hour, but could not grasp it.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				else
					spellwater4 = 1
					'Finally you will able to study the spell.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				end
			end
		end

		if magik >= 10 and spellwater5 = 0:
			act 'Study the Great Flood (1:00)':
				cla
				manna -= 1000
				minut += 60
				spellwater5L += rand(1, 10)

				if spellwater5L < 100:
					'You diligently spell for an hour, but could not grasp it.'

					act 'Move away':gt 'kakuzu', 'mansion1'
				else
					spellwater5 = 1
						'Finally you will able to study the spell.'

						act 'Move away':gt 'kakuzu', 'mansion1'
					end
				end
			end
		end
	end

	act 'Leave':gt 'kakuzu', 'mansion'
end

--- kakuzu ---------------------------------
# youry
$roomyour = {
	$nameV = 'Yuri'
	$boy = $nameV
	dick = 18
	silavag = 2
	harakBoy = 1
	NoGuy = 1
	gtGuy = 1
	finance = 1

	act 'On the bed':gt 'BDsex', 'start'
}

clr
minut += 5
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Flat George</font></b></center>'
'<center><img src="images/peter/peterdoor.jpg"></center>'

act 'Leave':
	cla
	minut += 5
	gt 'nord'
end

act 'Ring the doorbell':
	cla

	if hour > 16:
		'You rang the doorbell. The door opened very quickly, stood on the threshold Yuri. He invited you to enter.'

		act 'Login to Jury':
			cls
			minut += 15
			gs 'stat'
			'You entered the apartment to Yuri, he held you in the hall and sat on a chair. Went into the kitchen and priens bottle of champagne with grapes.'

			act 'Drinking with Yuri':
				cls
				minut += 15
				gs 'stat'
				'You are listening to as Yuri praises your sex skills drank champagne. Yuri suggested we go to bed.'
				dynamic $roomyour
			end
		end

		exit
	else
		'You rang the doorbell, but nobody answered you.'
	end

	act 'Away from the door':gt $curloc
end

--- youry ---------------------------------
# alex
minut += 30
horny += 10
gs 'stat'
'Arriving at the apartment Lech that hour dragged various alcohol and made a starter, then you sat down at a table in the hall talking to each other.'
'Finally you opyaneli and Lech attracted you to her.'

act 'Get on your knees and take it in your mouth':
	cls
	alexeySex += 1
	horny += 10
	bj += 1
	minut += 10
	gs 'stat'
	picrand = rand(1, 14)
	'<center><img src="images/qwest/alexey/bj<<picrand>>.jpg"></center>'
	'You kneel before him and clasped his dick <<$liptalk>> began to suck. Alexei lying relaxed and caught the buzz finally he dismissed you from the members and led to the bed.'
	gs 'oral', '0'

	act 'Strip':
		cls
		minut += 10
		$nameV = 'Alexey'
		$boy = $nameV
		dick = 20
		silavag = 2
		pose = 1
		gs 'stat'
		'<center><img src="images/qwest/alexey/sex.jpg"></center>'
		'Hardly you undressed as Alesya practically force pulled you on the bed and put the cancer.'
		dynamic $sexstart
		'Alexei slapped you in the ass with his hand and said, "Well, how are flowing already a slut? Like ass twist on dick?"'
		dynamic $sexstart2
		'During sex Alex stuck somehow smeared cream finger in the ass and began to move it there. Soon he took his dick out of your pussy and stuck to them stared you in the ass.'

		act 'Moan':
			cls
			minut += 10
			$nameV = 'Alexey'
			$boy = $nameV
			dick = 20
			silavag = 2
			pose = 1
			gs 'stat'
			'<center><img src="images/qwest/alexey/anal.jpg"></center>'
			dynamic $analsex
			gs 'BDsex', 'ancum'
			'Alexei had finished with you slipped and went into the bathroom.'

			act 'Leave':gt 'nord'
		end
	end
end

--- alex ---------------------------------

# alexgang
minut += 30
horny += 10
gs 'stat'
'Arriving at the apartment Lech that hour dragged various alcohol and made a starter, then you sat down at a table in the hall talking to each other.'
'At this moment, the doorbell rang, Lech went to open. You heard a man''s voice in the hallway, "Hi Lech, I do not opazdal?" Lech said, "Come."'

if alexgangbang = 0:
	'You''re a little surprised, who would it be. At this moment entered the room Alexander E., nightclub owner. He greeted you and sat down on a chair.'
	'Alex began pouring alcohol and you have been drinking threesome.'
	'Alex finally put down the bottle aside and got dick out of his pants. "Crawl here" You looked at him in surprise and looked at Sasha. Lech urged you "C''mon, do not tushuysya, everything is fine."'
else
	'Entered the room Alexander E., nightclub owner. He greeted you and sat down on a chair.'
	'Alex began pouring alcohol and you have been drinking threesome.'
	'Alex finally put down the bottle aside and got dick out of his pants. "Crawl here"'
end

act 'Get on your knees and give head':
	cls
	alexgangbang += 1
	horny += 10
	bj += 1
	minut += 10
	gs 'stat'
	picrand = rand(1, 14)
	'<center><img src="images/qwest/alexey/bj<<picrand>>.jpg"></center>'
	'You knelt before him and clasped his dick <<$liptalk>> began to suck. Alexei sat relaxed and caught the buzz finally he dismissed you from the members and led to the bed.'
	gs 'oral', '0'
	'Lech you lifted and moved to the bed where Sasha was sitting. He put you on all fours, face to Sasha.'

	act 'Give Sasha a blowjob':
		cls

		if sashaclubsex = 0:sashaclubsex = 1 & guy += 1

		gang += 1
		alexgangbang += 1
		horny += 10
		bj += 1
		minut += 10
		$nameV = 'Alexey'
		$boy = $nameV
		dick = 20
		silavag = 2
		pose = 1
		cumlip += 1
		swallow += 1
		gs 'stat'
		picrand = rand(1, 10)
		'<center><img src="images/qwest/alexey/gang<<picrand>>.jpg"></center>'
		'Standing on all fours, you started to suck Sasha. He was not big and soft dick hard standing in your mouth. Working hard but you got his cock stiffen.'
		dynamic $sexstart
		'Dangle your body from bumps in the ass during frictions and Lehi nebilo you need to move your head during a blow job, you just have to work on the lips clasping member tightly.'
		dynamic $sexstart2
		'Sasha came too in your mouth. Sperm was not much and you can easily swallow all.'

		act 'Leave':gt 'nord'
	end
end

--- alexgang ---------------------------------
# lakecafe
if $ARGS[0] = 'main':
	cla
	*clr
	barrnd = rand(1, 3)
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	'<center><img src="images/LakeCafe/LakeCafe.jpg"></center>'
	'Naiobyknovenneyshaya barbecue, of which there are many in the vast country.'
	'The cost of lunch - 75 rubles'
	'Opening hours cafe - 14:00 to 04:00'
	*nl

	if hour >= 14 or hour < 4:
		if barmenshameet = 0:
			if barrnd = 1:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and polishes glasses'
			if barrnd = 2:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and wipes the table'
			if barrnd = 3:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and something mixes'
		elseif barmenshameet = 1:
			if barrnd = 1:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> and polishes glasses'
			if barrnd = 2:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> table and rubs'
			if barrnd = 3:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> and something mixes'
		end

		if week = 1 and hour = 22:
			LCWorkRand = rand(1,6)

			if LCWorkRand = 1:
				randguycafe = rand(3, 6)

				if LCwork = 0:'One of the tables sits a group of men and drinks, talking loudly and laughing.'
				if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start1''"><<randguycafe>> men</a> and drinks, talking loudly and laughing.'
			elseif LCWorkRand = 2:
				if LCwork = 0:'One of the tables sits an older man and eating barbecue.'
				if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start2''">an older man</a> and eating barbecue.'
			elseif LCWorkRand = 3:
				if LCwork = 0:'One of the tables sit two men and a drink.'
				if LCwork = 1:'One of the tables sit <a href="exec:gt ''LCwork'', ''start3''">two men</a> and drink.'
			elseif LCWorkRand = 4:
				if LCwork = 0:'One of the tables sit a guy with a girl and talk about something.'
				if LCwork = 1:'One of the tables sit <a href="exec:gt ''LCwork'', ''start4''">boy and girl</a> and talk about something.'
			elseif LCWorkRand = 5:
				if LCwork = 0:'One of the tables sits a girl, and dining.'
				if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start5''">girl</a>, and dining.'
			elseif LCWorkRand = 6:
				if LCwork = 0:'One of the tables sits a fat man and talking on the phone.'
				if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start6''">fat man</a> and talking on the phone.'
			end
		end

		'- <a href="exec:gt ''laketoilet'', ''main''">Toilet</a>'

		if money >= 75:
			act 'Eat 75 rubles':
				cla
				*clr
				minut += 30
				health += 10
				money -= 75
				manna += 5
				willpower += 5
				'<center><img src="images/pics/food.jpg"></center>'

				if energy >= 30:
						fat += 5
						'You can no longer eat.'
				elseif energy >= 20 and energy < 30:
					fat += 3
					energy += 10
					'You pushed through the power of a meal.'
				elseif energy < 20:
					energy += 20
					fat += 1
					'You gladly ate the food.'
				end

				if water >= 20:
					'You don''t need any more tea.'
				elseif water < 20:
					water += 20
					'You gladly drank a mug of tea.'
				end

				act 'Get up from the table':minut += 20 & gt 'lakecafe', 'main'
			end
		end
	end

	if LCwork2 >= 1 and LCwork2day ! day and hour = 18:
		act 'Help in the kitchen':gt 'LCwork', 'Kitchen'
	end

	act 'Leave':minut += 2 & gt 'nord'
end

if $ARGS[0] = 'barmensha':
	cls
	gs 'stat'
	'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'

	if barmenshameet = 0:
		'The bartender looked at your eyes and, with a smile, asked:'
		'-Would that something?'
	elseif barmenshameet = 1:
		'Eugene smiled, when you come to it'
		'Hi! - She said with a smile'
	end

	if hour >= 14 or hour < 4:
		if barmenshameet = 0:
			act 'Chat':
				cla
				*clr
				barmenshameet = 1
				JenyaLC = 10
				minut += 30
				gs 'stat'
				'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
				'You chatted with bartender. During the conversation, you found out that her name is Eugene and it works here with his girlfriend, Angela, in which a cook on the barbecue.'

				act '...':gt 'lakecafe', 'barmensha'
			end
		end

		if barmenshameet = 1:
			act 'Chat':
				cla
				*clr

				if JenyaLC < 60:JenyaLC += 3

				minut += 30
				gs 'stat'
				'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
				'You talk about the affairs of Zhenya, work, life and all sorts of trivia.'

				act '...':gt 'lakecafe', 'barmensha'
			end
		end

		if JenyaLC >= 60 and horny > 50:
			act 'Flirt':
				cla
				*clr
				minut += 10
				gs 'stat'
				'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
				'You chat with Eugene, making it ambiguous hints. Eugene seems to understand you and invites you to go for it. You agree to abide with her to the kitchen.'

				act '...':
					if JenyaLCfirst = 0:gt 'LCporn', 'firsttime'
					if JenyaLCfirst = 1:gt 'LCporn', 'sex'
				end
			end
		end

		if JenyaLC >= 35:
			act 'Ask about work':
				cla
				*clr
				'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'

				if LCworkwork2 < 1:
					'You ask about the work of Eugene. She tells you that her sister needed help in the kitchen, come in 18 hours you need to work half an hour, during which you will be paid 175 rubles.'
					LCworkwork2 = 1
					LCwork2 = 1

					act '...':
						minut += 4
						gt 'lakecafe', 'barmensha'
					end
				else
					'You ask about the work of Eugene. It reminds you that her sister needed help in the kitchen, come in 18 hours you need to work half an hour, get paid 175 rubles.'

					act '...':
						minut += 4
						gt 'lakecafe', 'barmensha'
					end
				end
			end
		end

		if JenyaLC >= 80:
			act 'Ask about the "special" work':
				cla
				*clr
				'<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'

				if LCworkwork = 0:
					'You ask Zhenyu about the "special" work. It tells you that on Monday, at 22 o''clock, in the cafe visitors who need quality "service." Pay from 500 to 2, 000 rubles.'

					act '...':
						LCworkwork = 1
						LCwork = 1
						minut += 4
						gt 'lakecafe', 'barmensha'
					end
				elseif LCworkwork = 1:
					'You ask about the work of Eugene. It reminds you of conditions:on Mondays, at 22 o''clock, you will need to "serve" certain visitors. Paid for it from 500 to 2000 rubles.'

					act '...':
						minut += 3
						gt 'lakecafe', 'barmensha'
					end
				end
			end
		end
	end

	act 'Move away':gt 'lakecafe', 'main'
end

--- lakecafe ---------------------------------
# laketoilet
if $ARGS[0] = 'main':
	cla
	*clr
	LCtoiletiventrand = rand(1, 100)

	if hour < 4 and LCtoiletiventrand >= 83:
		'<center><img src="images/LakeCafe/ToiletSexStart.jpg"></center>'
		'You went to the bathroom and saw a man in the corner drochaschego. It seems he did not see you.'

		act 'Be company':
			gt 'LCporn', 'toiletsex'
		end

		act 'Off the toilet':gt 'lakecafe', 'main'
	else
		clr
		gs 'stat'
		'<center><img src="images/LakeCafe/Toilet.jpg"></center>'
		'Dirty and smelly toilet that seems to have never been cleaned'

		if tanga = 1:
			act 'Remove Underwear':
				cla
				tanga = 0
				gt 'laketoilet', 'main'
			end
		end

		act 'Look in the mirror':
			cla
			gs 'portmirror'
			$gt1 = 'laketoilet'
			$gt2 = 'main'
			dynamic $portmirror

			act 'Move away from the mirror':
				cla
				gt 'laketoilet', 'main'
			end
		end

		!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
		!!Removed sweat =- 1 when cum is wiped off clothes
		!!clrbelo: Amount of clean panties available
		if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
			act 'Quick wash (0:15)':
				cla
				*clr

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

				dynamic $showerdin
				sweat -= 1
				minut += 15
				'<center><img src="images/pics/wash5.jpg"></center>'
				'You gave yourself a catlick, thus removing any traces of cum.'

				act 'Finish':gt 'laketoilet', 'main'
			end
		end

		if cumlip > 0 or cumface > 0:
			act 'Clean your face from sperm (0:05)':
				cla
				*clr
				cumlip = 0
				cumface = 0
				sweat -= 1
				minut += 5
				'<center><img src="images/etogame/facesp.jpg"></center>'
				'You clean your face and got rid of any trace of cum.'

				act 'Finish':gt 'laketoilet', 'main'
			end
		end

		if cumfrot > 0:
			act 'Wipe the cum off your clothes (0:10)':
				cla
				*clr
				cumfrot = 0
				minut += 10
				! WD: Remove Dupe Images ~ '<center><img src="images/pic/frotsp.jpg"></center>'
				'<center><img src="images/etogame/frotsp.jpg"></center>'
				'You remove traces of cum from your clothes.'

				act 'Finish':dynamic $kafetualet
			end
		end
		!!

		if tampon > 0 and mesec > 0 and isprok = 0:
			act 'Use a tampon (0:05)':
				cla
				*clr
				tampon -= 1
				isprok = 1
				minut += 5
				manna -= 5
				'<center><img src="images/pics/wash3.jpg"></center>'
				'You use a tampon.'

				act 'Finish':dynamic $kafetualet
			end
		end

		act 'Off the toilet':gt 'lakecafe', 'main'
	end
end

--- laketoilet ---------------------------------
# LCporn
if $ARGS[0] = 'firsttime':
	cla
	*clr
	JenyaLCfirst = 1
	gs 'stat'
	'You walk into the kitchen, then fold into the pantry. Eugene looks at you look awkward and says:'
	'-This may scare you a bit, but you had to someday find out ...'
	'She priopuskaet skirt and you see ... dick! Eugene begins to caress his fingers, looking at you. She touches your chest.'
	'<center><img src="images/LakeCafe/LakeFirstTime.jpg"></center>'

	act 'Proceed':
		cla
		*clr
		randlcpic = rand(1, 7)
		!!sex += 1
		sexfuta += 1
		!!cumass += 1
		!!cumpussy += 1
		JenyaLC += 5
		minut += 40
		$nameV = 'Zhenya'
		$boy = 'Zhenya'
		dick = 17
		silavag = 1
		pose = 1
		gs 'stat'
		'<center><img src="images/LakeCafe/RandSex1/<<randlcpic>>.jpg"></center>'
		'You allow it to continue. She takes off your clothes and you lie on the mattress together.'
		dynamic $sexudo
		dynamic $sexcum

		act 'Leave':gt 'Lakecafe', 'main'
	end

	act 'Leave':
		cla
		*clr
		JenyaLC -= 10
		minut += 7
		gs 'stat'
		'Frightened, you get away from the barbecue.'

		act '...':gt 'nord'
	end
end

if $ARGS[0] = 'sex':
	cla
	*clr
	'<center><img src="images/LakeCafe/LakeFirstTime.jpg"></center>'
	'Eugene leads you to the cloand looks at you expectantly.'

	act 'Vaginal':
		cla
		*clr
		sexfuta += 1
		JenyaLC += 5
		minut += 40
		horand = rand(1, 100)
		$nameV = 'Zhenya'
		$boy = 'Zhenya'
		dick = 17
		silavag = 1
		pose = 1
		randlcpic = rand(1, 7)
		'<center><img src="images/LakeCafe/RandSex1/<<randlcpic>>.jpg"></center>'
		'Zhenya you undress, and then lie down on the mattress.'
		dynamic $sexudo
		dynamic $sexcum
		gs 'stat'

		act 'Leave':gt 'Lakecafe', 'main'
	end

	act 'Oral':
		cla
		*clr
		bj += 1
		sexfuta += 1
		JenyaLC += 5
		minut += 20
		cumface += 1
		facial += 1
		minut += 40
		$nameV = 'Zhenya'
		$boy = 'Zhenya'
		horand = rand(1, 100)
		randlcpic = rand(1, 7)
		'<center><img src="images/LakeCafe/RandSex2/<<randlcpic>>.jpg"></center>'
		'Zhenya undress you, then you are clasped her jaw member. Eugene takes vases by the hair and fucks you in the mouth. Groaning, Jack pulled out his cock and cum on you face, then dressed and came out of the closet.'
		gs 'oral', '0'
		gs 'stat'

		act 'Leave':gt 'Lakecafe', 'main'
	end
end

if $ARGS[0] = 'toiletsex':
	cla
	*clr
	dick = 14
	hj += 1
	$nameV = 'Muzhik'
	$boy = 'Muzhik'
	'<center><img src="images/LakeCafe/ToiletSexEnd.jpg"></center>'
	'You came from behind and hugged the man. Going down to his cock, you started nadrachivat it. Man stopped you took my hand and led through the back door into the street. Relegating you for dustbins, he bent and began to fuck you.'
	dynamic $sexudo
	dynamic $sexcum

	act 'Leave':gt 'laketoilet', 'main'
end

--- LCporn ---------------------------------
# LCwork
if $ARGS[0] = 'start1':
	cla
	*clr
	horand = rand(1, 100)+ 40
	facial += 1
	gang += 1
	slutty += 1
	anal += 1
	bj += 1
	dynamic $venerasiak
	randLCpay = rand(500, 2000)
	minut += 140
	guy += randguycafe

	if vagina < 20:vagina += randguycafe

	'<center><img src="images/LakeCafe/LakeWork/1a.jpg"></center>'
	'You walk up to a group of men and say that today you serve them. They get up and lead you to the car. During the trip they were stroking your boobs and legs, put their hands in her panties and fingers in his mouth. When you came, they stripped and put you in position. You guys ripped into all the cracks, and then obkonchali your entire body.'

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

	act '...':
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/LakeWork/1b.jpg"></center>'
		'They gave you wash and able to take to the house. You got for it <<randLCpay>> rubleyyu'


		act '...':money += randLCpay & gt 'street'
	end
end

if $ARGS[0] = 'start2':
	cla
	*clr
	horand = rand(1, 100)
	sex += 1
	slutty += 1
	facial += 1
	cumface += 1
	randLCpay = rand(500, 2000)
	minut += 140

	if vagina < 18:vagina += 1

	guy += 1
	dynamic $venerasiak
	'<center><img src="images/LakeCafe/LakeWork/2a.jpg"></center>'
	'You walk up to the old man and say that you have come to serve him. He gets up priobnimaet you and you go with him to his car. He takes you into the woods, where you stop and undresses. He spread your legs and fuck you in the pussy, then finished on your face.'

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

	act '...':
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/LakeWork/2b.jpg"></center>'
		'He got into his car and drove you home. For this you got <<randLCpay>> rubles.'

		act '...':money += randLCpay & gt 'street'
	end
end

if $ARGS[0] = 'start3':
	cla
	*clr
	horand = rand(1, 100) + 20
	sex += 1
	anal += 1
	bj += 1
	slutty += 1
	facial += 1
	cumface += 1
	cumlip += 1
	randLCpay = rand(500, 2000)
	minut += 140
	guy += 2

	if vagina < 18:vagina += 2

	dynamic $venerasiak
	'<center><img src="images/LakeCafe/LakeWork/3a.jpg"></center>'
	'You walk up to the two guys and say you go with them today. They lead you into the car and taken to the apartment, where you fuck in all the cracks. Groaning, they got their huytsy and finished on your face.'

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

	act '...':
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/LakeWork/3b.jpg"></center>'
		'Without giving you a wash, they kicked you out of the house. For this you got <<randLCpay>> rubles.'

		act '...':money += randLCpay & gt 'Nord'
	end
end

if $ARGS[0] = 'start4':
	cla
	*clr
	horand = rand(1, 100) + 20
	sex += 1
	kuni += 1
	gang += 1
	lesbian += 1
	anal += 1
	bj += 1
	slutty += 1
	cumbelly += 1
	randLCpay = rand(500, 2000)
	minut += 140
	girl += 1
	guy += 1

	if vagina < 18:vagina += 1

	dynamic $venerasiak
	'<center><img src="images/LakeCafe/LakeWork/4a.jpg"></center>'
	'You go up to the couple and say that today serve them. They lead you to his apartment. You start with a girl every way to please the guy. After a while the man could not resist and you finished on the tummy. His girlfriend licked a little seed from your belly.'

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

	act '...':
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/LakeWork/4b.jpg"></center>'
		'You went out of their apartment and came to the house. For this you got <<randLCpay>> rubles.'

		act '...':money += randLCpay & gt 'street'
	end
end

if $ARGS[0] = 'start5':
	cla
	*clr
	horand = rand(1, 100)
	lesbian += 1
	kuni += 1
	slutty += 1
	randLCpay = rand(500, 2000)
	girl += 1
	dynamic $venerasiak
	'<center><img src="images/LakeCafe/LakeWork/5.jpg"></center>'
	'You walk up to a girl and say that you are with her today. It leads you to his apartment. Girl you start to fondle each other, Suva fingers and all objects in their holes. After playing, she lets you.'

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

	'You came out of her apartment and came to the house. For this you got <<randLCpay>> rubles.'
	gs 'stat'

	act '...':money += randLCpay & gt 'street'
end

if $ARGS[0] = 'start6':
	cla
	*clr
	horand = rand(1, 100)
	sex += 1
	hj += 1
	facial += 1
	slutty += 1
	randLCpay = rand(500, 2000)
	guy += 1

	if vagina < 18:vagina += 1

	dynamic $venerasiak
	'<center><img src="images/LakeCafe/LakeWork/6a.jpg"></center>'
	'You go up to the fat man, and say that today serve it. He leads you to the car and drives to his house, where you fucking vagina. Groaning, he pulled out his dick and you masturbate member took semen on your face.'

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

	act '...':
		cls
		gs 'stat'
		'<center><img src="images/LakeCafe/LakeWork/6b.jpg"></center>'
		'You went out of their apartment and came to the house. For this you got <<randLCpay>> rubles.'

		act '...':money += randLCpay & gt 'street'
	end
end

if $ARGS[0] = 'Kitchen':
	cla
	*clr
	minut += 90
	LCwork2 += 1
	money += 175
	LCwork2day = day
	'<center><img src="images/LakeCafe/KitchenWorkCafe.jpg"></center>'
	'You wash the dishes, floors, chop vegetables, cook food for half an hour, for what you give your deserved 175 rubles.'

	act '...':
		gs 'stat'
		gt 'lakecafe', 'main'
	end
end

--- LCwork ---------------------------------
# pirsingsalon
$pirsyaz = {
	cls
	minut += 30
	money -= 5000
	pirsA = 1
	pirs_pain_ton = 7
	gs 'stat'
	'<center><img src="images/etogame/pirsing.jpg"></center>'
	'Master pierced tongue and put you back post.'

	act 'Leave':gt $curloc
}

$pirsyazout = {
	cls
	minut += 30
	money -= 5000
	pirsA = 0
	gs 'stat'
	'<center><img src="images/etogame/pirsing.jpg"></center>'
	'Master took the post of your tongue.'

	act 'Leave':gt $curloc
}

$pirsgub = {
	cls
	minut += 30
	money -= 6000
	pirsB = 1
	gs 'stat'
	'<center><img src="images/etogame/pirsing2.jpg"></center>'
	'Master your lip pierced and put a ring there.'

	act 'Leave':gt $curloc
}

$pirsgubout = {
	cls
	minut += 30
	money -= 6000
	pirsB = 0
	gs 'stat'
	'<center><img src="images/etogame/pirsing2.jpg"></center>'
	'Master took the ring out of your lips.'

	act 'Leave':gt $curloc
}

$pirsysh = {
	cls
	minut += 30
	money -= 3000
	pirsC = 1
	gs 'stat'
	'Master your ears pierced and put back earrings.'

	act 'Leave':gt $curloc
}

$pirsyshout = {
	cls
	minut += 30
	money -= 3000
	pirsC = 0
	gs 'stat'
	'Master took earrings from your ears.'

	act 'Leave':gt $curloc
}

$pirsnos = {
	cls
	minut += 30
	money -= 5000
	pirsD = 1
	gs 'stat'
	'Master your nose pierced and put the ring back.'

	act 'Leave':gt $curloc
}

$pirsnosout = {
	cls
	minut += 30
	money -= 5000
	pirsD = 0
	gs 'stat'
	'Master took the ring out of your nose.'

	act 'Leave':gt $curloc
}

$pirsbro = {
	cls
	minut += 30
	money -= 5000
	pirsE = 1
	gs 'stat'
	'Master pierced eyebrow and put you back post.'

	act 'Leave':gt $curloc
}

$pirsbroout = {
	cls
	minut += 30
	money -= 5000
	pirsE = 0
	gs 'stat'
	'Master took the post of your eyebrows.'

	act 'Leave':gt $curloc
}

$pirssos = {
	cls
	minut += 30
	money -= 10000
	pirsF = 1
	nippain = 2
	nippainday = daystart
	gs 'stat'
	'Master pierced nipples and you put there rings.'

	act 'Leave':gt $curloc
}

$pirssosout = {
	cls
	minut += 30
	money -= 10000
	pirsF = 0
	gs 'stat'
	'Master took out of your nipple rings.'

	act 'Leave':gt $curloc
}

$pirsvla = {
	cls
	minut += 30
	money -= 25000
	pirsG = 1
	painpub = 2
	painpubday = daystart
	gs 'stat'
	'Master you pierced labia and vagina put there post.'

	act 'Leave':gt $curloc
}

$pirsvlaout = {
	cls
	minut += 30
	money -= 25000
	pirsG = 0
	gs 'stat'
	'Master took the post of your labia.'

	act 'Leave':gt $curloc
}

$pirspyp = {
	cls
	minut += 30
	money -= 10000
	pirsN = 1
	gs 'stat'
	'Master pierced navel and put you back post.'

	act 'Leave':gt $curloc
}

$pirspypout = {
	cls
	minut += 30
	money -= 10000
	pirsN = 0
	gs 'stat'
	'Master took the post from your navel.'

	act 'Leave':gt $curloc
}

gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b>Piercing Salon</b></center>'
'<center><img src="images/etogame/pirsingstudia.jpg"></center>'
'Small cabin where the master of a loner.'

if hour >= 12 and hour < 20 and pirsA = 0 and money >= 5000:'<a href="exec:dynamic $pirsyaz">Make a tongue piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsA = 1 and money >= 5000:'<a href="exec:dynamic $pirsyazout">Remove tongue piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsB = 0 and money >= 6000:'<a href="exec:dynamic $pirsgub">Make a lip piercing 6000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsB = 1 and money >= 6000:'<a href="exec:dynamic $pirsgubout">Remove Lippenpiercing 6000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsC = 0 and money >= 3000:'<a href="exec:dynamic $pirsysh">Make piercings 3000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsC = 1 and money >= 3000:'<a href="exec:dynamic $pirsyshout">Remove piercings 3000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsD = 0 and money >= 5000:'<a href="exec:dynamic $pirsnos">Make a nose piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsD = 1 and money >= 5000:'<a href="exec:dynamic $pirsnosout">Remove nose piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsE = 0 and money >= 5000:'<a href="exec:dynamic $pirsbro">Make an eyebrow piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsE = 1 and money >= 5000:'<a href="exec:dynamic $pirsbroout">Remove eyebrow piercing 5000 rub.</a>.'
if hour >= 12 and hour < 20 and pirsF = 0 and money >= 10000:'<a href="exec:dynamic $pirssos">Make a nipple piercing 10, 000 rubles.</a>.'
if hour >= 12 and hour < 20 and pirsF = 1 and money >= 10000:'<a href="exec:dynamic $pirssosout">Remove nipple piercings 10, 000 rubles.</a>.'
if hour >= 12 and hour < 20 and pirsN = 0 and money >= 10000:'<a href="exec:dynamic $pirspyp">Make a navel piercing 10, 000 rubles.</a>.'
if hour >= 12 and hour < 20 and pirsN = 1 and money >= 10000:'<a href="exec:dynamic $pirspypout">Remove navel piercings 10, 000 rubles.</a>.'
if hour >= 12 and hour < 20 and pirsG = 0 and money >= 25000:'<a href="exec:dynamic $pirsvla">Make a vagina piercing 25, 000 rubles.</a>.'
if hour >= 12 and hour < 20 and pirsG = 1 and money >= 25000:'<a href="exec:dynamic $pirsvlaout">Remove the vagina piercing 25, 000 rubles.</a>.'

act 'Leave':gt 'nord'

--- pirsingsalon ---------------------------------
# vokzal
clr
gs 'stat'
gs 'time'
'<center><h4>Station</h4></center>'
'<center><img src="images/etogame/vokzal.jpg"></center>'


temp = rand(1, 100)

if temp > 70:'You see <a href="exec:gt ''etoexhib'', ''pos54''">suspicious character.</a>'

act 'Leave':minut += 15 & gt 'nord'
act 'Exit to the northern highway':minut += 15 & nroad = 0 & gt 'road'

if money >= 200:
	act 'Buy a ticket to the town':
		cls
		money -= 200
		minut += 15
		gs 'stat'
		'<center><img src="images/etogame/electri.jpg"></center>'
		'You paid for the ticket and boarded the train going in the town.'
		'After 15 minutes the train stopped at the station.'

		act 'To go further':
			cls
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'After 15 minutes the train stopped at the station.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped at the station.'

				act 'To go further':
					cls
					minut += 15
					gs 'stat'
					'<center><img src="images/etogame/electri.jpg"></center>'
					'After 15 minutes the train stopped in the Township.'

					act 'Leave':minut += 5 & nroad = 20 & gt 'VokzalG'
				end

				act 'Leave':minut += 5 & nroad = 15 & gt 'road'
			end

			act 'Leave':minut += 5 & nroad = 10 & gt 'road'
		end

		act 'Leave':minut += 5 & nroad = 5 & gt 'road'
	end
end

--- vokzal ---------------------------------
# obekt
clr
gs 'stat'
gs 'time'
'<center><h4>An object</h4></center>'
'<center><img src="images/etogame/obekt.jpg"></center>'
'Construction at the site is stopped and the territory silence, only the guard walks.'
if car > 0 and cardrive = 12:
	cardrive = 12
	'In the parking stands <a href="exec:gs ''carF'', ''start''">your <<$car>></a>.'
end

act 'Penetrate to the construction site':
	cls
	minut += 5
	gs 'stat'

	if ObjektOpen = 0:
		if ObjektBil = 0:ObjektBil = 1
			'Construction guarded very carefully, just not be able to enter.'

			act 'Leave':gt $curloc
		else
			gt 'obekt2'
		end
	end

	!!if ObjektBil = 1:end

	act 'Go on the road':minut += 15 & nroad = 16 & gt 'road'

--- obekt ---------------------------------
# obekt2
clr
gs 'stat'
gs 'time'
'<center><h4>An object</h4></center>'
'<center><img src="images/etogame/obekt.jpg"></center>'
'At the construction site is not technology, but still worth a construction trailer in which sits a watchman. Failure in the land closed the iron plate.'
act 'Failure to penetrate the':
	cls
	minut += 10
	gs 'stat'
	gt 'dangeon'
end

act 'Exit from the construction site.':
	cls
	minut += 5
	gs 'stat'
	gt 'obekt'
end

--- obekt2 ---------------------------------
# dangeon
$dundincif = {
	cls
	gs 'stat'
	'8809 = 6'
	'7111 = 0'
	'2172 = 0'
	'6666 = 4'
	'1111 = 0'
	'3213 = 0'
	'7662 = 2'
	'9312 = 1'
	'0000 = 4'
	'2222 = 0'
	'3333 = 0'
	'5555 = 0'
	'8193 = 3'
	'8096 = 5'
	'7777 = 0'
	'9999 = 4'
	'7756 = 1'
	'6855 = 3'
	'9881 = 5'
	'5531 = 0'
	'Have a smart sense in such tomfoolery, because often clever fool walks.'

	act 'Move away from labels':gt $curloc
}

$dundinboch = {
	cls

	if openstateDM2 = 0:openstateDM2 = 1

	gs 'stat'
	'Chimes hear soon reconcile those who quarrel.'

	act 'Move away from the barrel':gt $curloc
}

$dundinsvitok = {
	cls
	svitokRTS = 1
	heart += 1
	gs 'stat'
	'You picked up the scroll and he crumbled. As if you breathed in the wind. You listen to the feelings and understand that you have something changed. You feel like somewhere, as if in another dimension another beating heart belongs to you, which will die for you in battle.'

	act 'Move away':gt $curloc
}

gs 'stat'

if dungeonMark = 0:
	'<center><img src="images/picPRE/dunPRE.jpg"></center>'
	'The man-made cave in depth which shows the door.'

	act 'Get out of the dungeon':minut += 5 & gt 'obekt2'
	act 'Enter the door':minut += 5 & dungeonMark = 1 & gt $curloc
elseif dungeonMark = 1:
	'<center><img src="images/picPRE/dunPRE1.jpg"></center>'
	'Quite large and deserted room in which there is nothing but a bunch of bones in the corner.'

	act 'Leave':minut += 5 & dungeonMark = 0 & gt $curloc
	act 'Go deep into':minut += 5 & dungeonMark = 2 & gt $curloc
elseif dungeonMark = 2:
	if svitokRTS = 1:exit

	'<center><img src="images/picPRE/dunPRE2.jpg"></center>'
	'Dilapidated gallery in the recesses of which are visible doors to other rooms.'

	act 'Exit from the gallery':minut += 5 & dungeonMark = 1 & gt $curloc
	act 'Sign in 1yu room':minut += 5 & dungeonMark = 3 & gt $curloc

	act 'Sign in 2w room':
		cls

		if openstateDM = 1:
			minut += 5
			dungeonMark = 4
			gt $curloc
		end

		if openstateDM = 0:
			:markanotherrand
			DMN[1] = rand(0, 9)
			DMN[2] = rand(0, 9)
			DMN[3] = rand(0, 9)
			DMN[4] = rand(0, 9)

			if DMN[1] = DMN[2] and DMN[1] = DMN[3] and DMN[1] = DMN[4]:jump 'markanotherrand'
			if DMN[1] = 8 and DMN[2] = 8 and DMN[3] = 0 and DMN[4] = 9:jump 'markanotherrand'
			if DMN[1] = 7 and DMN[2] = 1 and DMN[3] = 1 and DMN[4] = 1:jump 'markanotherrand'
			if DMN[1] = 2 and DMN[2] = 1 and DMN[3] = 7 and DMN[4] = 2:jump 'markanotherrand'
			if DMN[1] = 3 and DMN[2] = 2 and DMN[3] = 1 and DMN[4] = 3:jump 'markanotherrand'
			if DMN[1] = 7 and DMN[2] = 6 and DMN[3] = 6 and DMN[4] = 2:jump 'markanotherrand'
			if DMN[1] = 9 and DMN[2] = 3 and DMN[3] = 1 and DMN[4] = 2:jump 'markanotherrand'
			if DMN[1] = 8 and DMN[2] = 1 and DMN[3] = 9 and DMN[4] = 3:jump 'markanotherrand'
			if DMN[1] = 8 and DMN[2] = 0 and DMN[3] = 9 and DMN[4] = 6:jump 'markanotherrand'
			if DMN[1] = 7 and DMN[2] = 7 and DMN[3] = 5 and DMN[4] = 6:jump 'markanotherrand'
			if DMN[1] = 6 and DMN[2] = 8 and DMN[3] = 5 and DMN[4] = 5:jump 'markanotherrand'
			if DMN[1] = 9 and DMN[2] = 8 and DMN[3] = 8 and DMN[4] = 1:jump 'markanotherrand'
			if DMN[1] = 5 and DMN[2] = 5 and DMN[3] = 3 and DMN[4] = 1:jump 'markanotherrand'

			i = 0
			numdmr = 0
			:markdnm
			i += 1

			if DMN[i] = 0 or DMN[i] = 6 or DMN[i] = 9:
				numdmr += 1
			elseif DMN[i] = 8:
				numdmr += 2
			end

			if i < 4:jump 'markdnm'

			numberOSDM = input("<<DMN[1]>><<DMN[2]>><<DMN[3]>><<DMN[4]>> >= ?")

			if numberOSDM < 0 or numberOSDM > 8 or numdmr ! numberOSDM:
				msg("Silence, nothing has changed")
				gt $curloc
			else
				openstateDM = 1
				msg("In the door that just clicked")
				gt $curloc
			end
		end
	end

	if openstateDM2 = 2:act 'Sign in third room':minut += 5 & dungeonMark = 5 & gt $curloc
elseif dungeonMark = 3:
	'<center><img src="images/picPRE/dunPRE3.jpg"></center>'
	'The room in which the middle stands a stone dais on which are various dusty bottles.'
	'Scrawled on the wall of what is <a href="exec:dynamic $dundincif">signs</a>.'

	act 'Leave the room':minut += 5 & dungeonMark = 2 & gt $curloc
elseif dungeonMark = 4:
	'<center><img src="images/picPRE/dunPRE4.jpg"></center>'
	'Small room in which there are what that <a href="exec:dynamic $dundinboch">Drums</a>.'

	act 'Leave the room':minut += 5 & dungeonMark = 2 & gt $curloc

	if openstateDM2 = 1:
		'In another barrel you see a device where you can enter numbers.'

		act 'Enter the numbers':
			cls
			numberOSDM2 = input("12, 1, 1, 1, 2, 1, 3, ?, ?, ?, ?")

			if numberOSDM2 = rikudootvet:
				openstateDM2 = 2
				msg("Outside that it rattled.")
			else
				msg("Silence, nothing has changed")
			end

			gt $curloc
		end
	end
elseif dungeonMark = 5:
	'<center><img src="images/picPRE/dunPRE5.jpg"></center>'
	'The room in which the middle, sitting on a stone throne cobwebbed skeleton.'

	if svitokRTS = 0:'In the hands of a skeleton lying <a href="exec:dynamic $dundinsvitok">scroll</a>.'

	act 'Leave the room':minut += 5 & dungeonMark = 2 & gt $curloc
end

--- dangeon ---------------------------------
# dachain
clr
gs 'stat'
gs 'time'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Cottage</font></b></center>'
'<center><img src="images/etogame/dachain.jpg"></center>'
'Your favorite summer residence.'

if hour >= 6 and hour <= 20 and etoexhib = 11:'Kopashatsya working in the garden, hmm ... maybe sometime <a href="exec:gt ''etoexhib'', ''pos10''">motivate</a> for them to work quicker and smarter.'
if hour >= 6 and hour <= 20 and etoexhib = 12:'Leave in <a href="exec:gt ''etoexhib'', ''pos11''">garden in lingerie and robe.</a>'
if hour >= 6 and hour <= 20 and etoexhib = 13 and temp ! day:'I wonder how to <a href="exec:gt ''etoexhib'', ''pos12''">garden</a>'

if hour < 23:
	act 'Lie on the couch':
		cla
		minut += 60

		if son < 30:
			son += 5
		else
			son = 29
		end

		'I relax lying on the couch.'

		act 'Pull':gt 'dachain'
	end
end

if hour >= 23:
	act 'Sleep in a bed':
		cla
		*clr
		tanga = 1
		health += 5
		hapri = 0
		InSleep = 1
		cloth_vid = 0
		'<center><img src="images/pics/son.jpg"></center>'

		if analplugIN = 1:analplugIN = 0 & 'Before going to bed you took a butt plug.'
		if vibratorIN = 1:vibratorIN = 0 & 'Before going to bed you remove the vibrator.'

		if mop > 1:mop = 0 & vidageday -= 1 & 'Cosmetics smeared face, you think that looks bad for sleeping with makeup, skin ages faster from it.'

		gs 'stat'
		'You slept'

		act 'Up':
			cla
			InSleep = 0
			minut += 480
			son = 30
			gt 'dachain'
		end
	end
end

act 'Go outside':minut += 15 & gt 'dachamy'

--- dachain ---------------------------------
# dachamy
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Cottage</h4></center>'
'<center><img src="images/etogame/dachamy.jpg"></center>'
'Your favorite summer residence.'

act 'Go into the house':gt 'dachain'

if hour < 23 and hour >= 7:
	act 'Inspect garden':
		cla
		minut += 5

		if etoexhib < 16:gt 'dachaogr0'
		if etoexhib = 16:gt 'dachaogr'
	end
end

act 'Exit the alley':minut += 15 & gt 'dachi'

--- dachamy ---------------------------------
# dachaogr
$metka = $ARGS[0]
$loc = $CURLOC
$metkaBed = $ARGS[0]
$locBed = $CURLOC
$metkaP = $ARGS[0]
$locP = $CURLOC
$metkaFight = $ARGS[0]
$locFight = $CURLOC
*clr
gs 'stat'
gs 'time'
!'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'!
'<center><h4>Garden</h4></center>'

if month > 4 and month < 10:
	'<center><img src="images/etogame/vspah.jpg"></center>'
	'Well-kept garden.'
elseif month <= 4 or month >= 10:
	'<center><img src="images/etogame/vspah.jpg"></center>'
	'Not for planting season'
end

act 'Leave':
	minut += 5
	gt 'dachamy'
end

--- dachaogr ---------------------------------
# dachaogr0
clr
gs 'stat'
gs 'time'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

'<center><b><font color="maroon">Vegetable</font></b></center>'
'<center><img src="images/etogame/burjan.jpg"></center>'

if etoexhib < 11:
	'Whole vegetable garden overgrown with weeds and weeds. Any crop here outgrowths impossible. Looks like the former owners did not care about him. We must figure out how to dig up the garden.'
elseif etoexhib = 11:
	'Working with lazy and smoke breaks dig in the ground, pull weeds.'
elseif etoexhib >= 12 and etoexhib < 14:
	'Workers digging the ground. Stumps removed.'
elseif etoexhib = 14 and temp ! day:
	cls
	gs 'stat'
	'<center><b><font color="maroon">Vegetable</font></b></center>'
	'<center><img src="images/etogame/vspah.jpg"></center>'
	'Your kitchen garden plowed. Razchercheny beds neatly. Planted with apple trees.'
	'Satisfied drunken workers rest in the shade. Clearly, for the money they took a drink. And, apparently under doping, finished faster.'

	act 'Pay':gt 'etoexhib', 'pos14'
elseif etoexhib = 15 and temp ! day:
	cls
	gs 'stat'
	'<center><b><font color="maroon">Vegetable</font></b></center>'
	'<center><img src="images/etogame/vspah.jpg"></center>'
	'Your kitchen garden plowed. Razchercheny beds neatly. Planted with apple trees.'
	'Tired workers rest in the shade.'

	act 'Pay money (3,000 rubles)':
		cla
		*clr
		money -= 3000
		etoexhib = 16
		gs 'stat'
		'You paid a working 3000 rubles.'

		act 'To lodge':minut += 15 & gt 'dachamy'
	end

	if etoexhib = 15 and horny > 30:
		act 'Pay body':gt 'etoexhib', 'pos13'
	end
end

act 'To lodge':minut += 15 & gt 'dachamy'

--- dachaogr0 ---------------------------------
# dachi
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Suburban Cooperative</h4></center>'
'<center><img src="images/etogame/dachi.jpg"></center>'

if car > 0 and cardrive = 18:
	cardrive = 18
	'In the parking stands <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
end

'Initially alley dug into the ground <a href="exec:gt ''etoexhib'', ''pos7''">column with ads</a>.'
'At the end of the alley to be <a href="exec:gt ''etoexhib'', ''pos6''">a spring with spring water</a>.'

if dachaest = 1:
	'Either <a href="exec:gt ''dachamy'', ''start''">suburban area</a>.'
	'On the contrary your 6 acres situated exactly the same <a href="exec:gt ''etoexhib'', ''pos8''">plot neighbor</a>.'
end

if etoexhib < 13:'You chuvtvuete slight presence of magic.'

act 'Stroll through the alleys':gt 'etoexhib', 'pos2'
act 'Exit the highway':minut += 15 & nroad = 5 & gt 'road'

--- dachi ---------------------------------
# graveyard
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Cemetery</h4></center>'
'<center><img src="images/etogame/graveyard.jpg"></center>'
'A very peaceful place immersed in the silence of circumferential philosophical thoughts about the impermanence of life.'
'At the far end of the cemetery you can see the dilapidated building, which used to be whether the crypt, or chapel.'
act 'Exit the highway':minut += 15 & nroad = 3 & gt 'road'

act 'Go to the crypt':
	cls
	minut += 15
	gs 'stat'
	gs 'time'
	'<center><img src="images/etogame/graveyard2.jpg"></center>'
	'Barred windows protect windows covered with dust all around the bushes.'

	act 'Exit the highway':minut += 15 & gt $curloc
end

--- graveyard ---------------------------------
# locmansion
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>cottage settlement</h4></center>'
'<center><img src="images/etogame/locmansion.jpg"></center>'
'Elite settlement which can afford to live only the cream of society.'

if car > 0 and cardrive = 19:
	cardrive = 19
	'In the parking stands <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
end

act 'Exit the highway':minut += 15 & nroad = 1 & gt 'road'

if placeMansion > 0:'<a href="exec:gt ''youplace''">Your Land</a>.'

--- locmansion ---------------------------------
# motel
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Motel</h4></center>'
'<center><img src="images/etogame/motel.jpg"></center>'
'Roadside motel where truckers stop for something to eat and sleep.'

act 'Exit the highway':minut += 15 & nroad = 14 & gt 'road'

--- motel ---------------------------------
# road
$polustanok = {
	cls
	gs 'stat'
	'Ordinary railway platform.'

	act 'Leave':minut += 10 & nroad = 5 & gt 'road'

	if money >= 150:
		act 'Buy a ticket to the town (150 rubles)':
			cls
			money -= 150
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'
			'After 15 minutes the train stopped at the station.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped at the station.'

				act 'To go further':
					cls
					minut += 15
					gs 'stat'
					'<center><img src="images/etogame/electri.jpg"></center>'
					'After 15 minutes the train stopped in the Township.'

					act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalG'
				end

				act 'Leave':minut += 15 & nroad = 15 & gt 'road'
			end

			act 'Leave':minut += 10 & nroad = 10 & gt 'road'
		end
	end

	if money >= 50:
		act 'Buy a ticket to the Centre (50 rubles)':
			cls
			money -= 50
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'
			'After 15 minutes the train stopped at the Centre.'

			act 'Leave':minut += 5 & nroad = 0 & gt 'Vokzal'
		end
	end
}

$polustanok2 = {
	cls
	gs 'stat'
	'Ordinary railway platform.'

	act 'Leave':minut += 10 & nroad = 10 & gt 'road'

	if money >= 100:
		act 'Buy a ticket to the town (100 rubles)':
			cls
			money -= 100
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'
			'After 15 minutes the train stopped at the station.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped in the Township.'

				act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalG'
			end

			act 'Leave':minut += 10 & nroad = 15 & gt 'road'
		end
	end

	if money >= 100:
		act 'Buy a ticket to the Center (100 rubles)':
			cls
			money -= 100
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped at the Centre.'

				act 'Leave':minut += 5 & nroad = 0 & gt 'Vokzal'
			end

			act 'Leave':minut += 20 & nroad = 5 & gt 'road'
		end
	end
}

$polustanok3 = {
	cls
	gs 'stat'
	'Ordinary railway platform.'

	act 'Leave':minut += 15 & nroad = 15 & gt 'road'

	if money >= 50:
		act 'Buy a ticket to the town (50 rubles)':
			cls
			money -= 100
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'
			'After 15 minutes the train stopped in the Township.'

			act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalG'
		end
	end

	if money >= 150:
		act 'Buy a ticket to the Center (150 rubles)':
			cls
			money -= 150
			minut += 15
			gs 'stat'
			'<center><img src="images/etogame/electri.jpg"></center>'
			'You paid for the ticket and boarded the train going in the town.'

			act 'To go further':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/etogame/electri.jpg"></center>'
				'After 15 minutes the train stopped at the station.'

				act 'To go further':
					cls
					minut += 15
					gs 'stat'
					'<center><img src="images/etogame/electri.jpg"></center>'
					'After 15 minutes the train stopped at the Centre.'

					act 'Leave':minut += 5 & nroad = 0 & gt 'Vokzal'
				end

				act 'Leave':minut += 5 & nroad = 5 & gt 'road'
			end

			act 'Leave':minut += 20 & nroad = 10 & gt 'road'
		end
	end
}

$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Northern Highway</h4></center>'
'<center><img src="images/etogame/road.jpg"></center>'
'<center><<nroad>> km</center>'
'Highway which carried cars at high speed, with the hum of the wind enveloping sweep wagon.'

if car > 0 and cardrive = 19 and ncarroad = nroad:'Standing on the sidelines <a href="exec:gs ''carF'', ''start''">your <<$car>></a>.'
if nroad = 0:act 'Go to town':minut += 60 & gt 'nord'
if nroad = 16:act 'Go to object':minut += 60 & gt 'obekt'
if nroad = 20:act 'Go to town':minut += 60 & gt 'gorodok'
if nroad < 20:act 'Go north':minut += 60 & nroad += 1 & gt $curloc
if nroad > 0:act 'Go south':minut += 60 & nroad -= 1 & gt $curloc

if nroad = 0:
	'Outskirts of the town which brought sad ramshackle huts of kryazhestyh trees.'
	'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
elseif nroad = 1:
	'Not podaleku from the city could be seen <a href="exec:minut += 15 & gt ''locmansion''">houses</a>.'
elseif nroad = 2:
	''
elseif nroad = 3:
	'Podaleku not seen from the road <a href="exec:minut += 15 & gt ''graveyard''">cemetery</a>.'
elseif nroad = 4:
	''
elseif nroad = 5:
	'Not podaleku from the road is <a href="exec:dynamic $polustanok">railway stop</a> next to which is <a href="exec:minut += 15 & gt ''dachi''">cottage cooperative</a>.'
elseif nroad = 6:
	''
elseif nroad = 7:
	''
elseif nroad = 8:
	''
elseif nroad = 9:
	''
elseif nroad = 10:
	'Not podaleku from the road is <a href="exec:dynamic $polustanok2">railway stop</a>.'
elseif nroad = 11:
	''
elseif nroad = 12:
	''
elseif nroad = 13:
	''
elseif nroad = 14:
	'Near the road is <a href="exec:minut += 15 & gt ''motel''">motel</a>'
elseif nroad = 15:
	'Not podaleku from the road is <a href="exec:dynamic $polustanok3">railway stop</a>.'
elseif nroad = 16:
	'Not podaleku is seen from the road abandoned building.'
elseif nroad = 17:
	''
elseif nroad = 18:
	''
elseif nroad = 19:
	''
elseif nroad = 20:
	'Highway abuts the old provincial town.'
	'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
end

--- road ---------------------------------
# gadukino
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>village Gadyukino</h4></center>'

if month >= 5 and month <= 9:
	'<center><img src="images/pic/gadukino.jpg"></center>'
else
	'<center><img src="images/pic/gadukino_winter.jpg"></center>'
end

'A small village with a rickety wooden houses.'

if StoryLine = 1:'In one <a href="exec:minut += 5 & gt ''Gaddvor''">huts live your grandparents</a>.'

act 'Exit the highway':minut += 30 & nroad = 15 & gt 'road'

--- gadukino ---------------------------------
# youplace
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'time'
'<center><h4>Your Land</h4></center>'

if placeMansion < 2:'<center><img src="images/etogame/yzemelniy.jpg"></center>'
if placeMansion = 2:'<center><img src="images/etogame/ystart.jpg"></center>'
if placeMansion = 3:'<center><img src="images/etogame/yosobnak.jpg"></center>'

''

if car > 0 and cardrive = 18:
	cardrive = 18
	'<a href="exec:gs ''carF'', ''start''">Your <<$car>></a> is parked here.'
end

act 'Go to the village':minut += 15 & gt 'locmansion'

if bassMansion = 1:'<a href="exec:gt ''ybass''">Pool</a>.'
if banaMansion >= 1:'<a href="exec:gt ''yban''">Bath</a>.'
if placeMansion = 3:'<a href="exec:gt ''ymans''">Go inside</a>.'

if karta >= 1500000 and placeMansion = 0:
	act 'Buy land for cottage (1,500,000)':
		cls
		karta -= 1500000
		placeMansion = 1
		minut += 5
		gs 'stat'
		'You have bought land for cottage'

		act 'Leave':gt $curloc
	end
end

if karta >= 500000 and placeMansion = 1:
	act 'Pay for water, electricity and building foundations (500,000 rubles)':
		cls
		karta -= 500000
		placeMansion = 2
		minut += 5
		gs 'stat'
		'You paid for a supply of communications to the site and zero cycle'

		act 'Leave':gt $curloc
	end
end

if karta >= 1500000 and placeMansion = 2:
	act 'Pay for the construction and external finish of the building (1,500,000 rubles)':
		cls
		karta -= 1500000
		placeMansion = 3
		minut += 5
		gs 'stat'
		'You paid for the construction of housing mansion'

		act 'Leave':gt $curloc
	end
end

if karta >= 500000 and placeMansion = 3 and ymanrem[3] = 0:
	act 'Pay for the construction of rooms (500,000 rubles)':
		cls
		karta -= 500000
		ymanrem[3] = 1
		minut += 5
		gs 'stat'
		'You paid for the construction of the rooms.'

		act 'Leave':gt $curloc
	end
end

if placeMansion => 2:
	if karta >= 800000 and banaMansion = 0:
		act 'Pay for the construction of baths (800,000 rubles)':
			cls
			karta -= 800000
			banaMansion = 1
			minut += 5
			gs 'stat'
			'You paid for the construction of baths.'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 500000 and bassMansion = 0:
		act 'Pay for the construction of the basement (500,000 rubles)':
			cls
			karta -= 500000
			bassMansion = 1
			minut += 5
			gs 'stat'
			'You paid for the construction of the pool'

			act 'Leave':gt $curloc
		end
	end
end
if placeMansion = 3:
	if karta >= 250000 and ymanrem[3] = 1:
		act 'Pay for repairs Hall (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[3] = 2
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end

	elseif karta >= 150000 and ymanrem[3] = 2:
		act 'Pay lounge furniture (150,000 rubles)':
			cls
			karta -= 150000
			ymanrem[3] = 3
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[4] = 0:
		act 'Pay for repairs sleeping (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[4] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 300000 and ymanrem[4] = 1:
		act 'Pay bedroom furniture (300,000 rubles)':
			cls
			karta -= 300000
			ymanrem[4] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[5] = 0:
		act 'Pay bathroom renovation (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[5] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[5] = 1:
		act 'Pay for furniture and fixtures for the bathroom (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[5] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture and sanitary ware.'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[6] = 0:
		act 'Pay renovated kitchen (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[6] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 350000 and ymanrem[6] = 1:
		act 'Pay kitchen furniture (350,000 rubles)':
			cls
			karta -= 250000
			ymanrem[6] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture for the kitchen.'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[7] = 0:
		act 'Pay for repairs hall (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[7] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[7] = 1:
		act 'Pay furniture hall (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[7] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture for the hall'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[8] = 0:
		act 'Pay for repairs fireplace room (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[8] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[8] = 1:
		act 'Pay for the purchase of furniture for the fireplace room (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[8] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture.'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[9] = 0:
		act 'Children''s room to pay for repairs (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[9] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[9] = 1:
		act 'Pay for the purchase of furniture for the nursery (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[9] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[10] = 0:
		act 'Pay for repairs library (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[10] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[10] = 1:
		act 'Pay for the purchase of furniture for libraries (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[10] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[11] = 0:
		act 'Pay for repairs gym (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[11] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[11] = 1:
		act 'Pay furniture gym (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[11] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture for the gym'

			act 'Leave':gt $curloc
		end
	end

	if karta >= 250000 and ymanrem[12] = 0:
		act 'Pay for repair of the (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[12] = 1
			minut += 5
			gs 'stat'
			'You pay for repairs'

			act 'Leave':gt $curloc
		end
	elseif karta >= 250000 and ymanrem[12] = 1:
		act 'Pay for the purchase of furniture for the office (250,000 rubles)':
			cls
			karta -= 250000
			ymanrem[12] = 2
			minut += 5
			gs 'stat'
			'You paid for the purchase of furniture.'

			act 'Leave':gt $curloc
		end
	end
end

--- youplace ---------------------------------
# furi
gs 'stat'
'<center><img src="images/qwest/alter/ev2/furi.jpg"></center>'
'Paved area near the road where there are trucks.'

act 'Leave':minut += 5 & gt 'road'
act 'hitch-hiking':
	cls
	gs 'stat'
	'<center><img src="images/qwest/alter/ev2/furi.jpg"></center>'

	if nroad = 0:'You asked the driver, if he can give you a lift to town.'
	if nroad = 20:'You asked the driver, if he can give you a lift to town.'

	'The driver looked at you with a grin "hitchhiker? Heh. Of course I can. But you have to thank me for it." man slapped his palm on your ass.'

	act 'Leave':minut += 5 & gt $curloc

	act 'I agree':
		cls
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/furi.jpg"></center>'
		'You said to the driver, that you agree. Drove immediately asks you "Do you have a condom?"'

		act 'No':
			cls
			gs 'stat'
			'You said cage , you do not have a condom. Drove shook his head "Without a condom to fuck you , so fuck off."'

			act 'Leave':minut += 5 & gt $curloc

			act 'persuade':
				cls
				gs 'stat'
				'You started to persuade the driver to drive you and approve, that you are clean. Drove a little thought, and said "Fair_Enough, to hell with you, Hop into the car."'

				act 'Leave':minut += 5 & gt $curloc
				act 'Get into the wagon':minut += 5 & furisex = 100 & gt 'furisex'
			end
		end

		if prezik > 0:
			act 'Is_There':
				cls
				gs 'stat'
				'You said that you have preziki. Carrier approached the wagon and opened the door for you "Then zaprygivayem."'

				act 'Leave':minut += 5 & gt $curloc
				act 'Get into the wagon':minut += 5 & furisex = 0 & gt 'furisex'
			end
		end
	end
end

if trfatherQW = 1:
	act 'Ask about Mikhail Kuznetsov':
		cls
		minut += 5
		trfatherQW = 2
		gs 'stat'

		'<center><img src="images/qwest/alter/trfatherQW/trfatherQW_1.jpg"></center>'
		'-Good afternoon! Do not remember, you have not previously worked for a man named Mikhail Kuznetsov?'
		'-What-is a familiar name, remember this. Hell, where I could hear the name.., so it, I used to otavarivalsya warehouse terminal, in the northern area of ​​the city, so you go in there and asked around there, Th anything and can prompt, i do not know anymore'
		'-Thank you, you very much, and you gleefully jumped, hoping to find his father'
		'-Come here often, ride to the city with the wind'

		act 'Move away':gt $loc, $metka
	end
end

--- furi ---------------------------------
# furisex
minut += 5
gs 'stat'

if furisex = 0:
	'The driver got into the wagon and started the engine. The car started up and went hard on the road. in minutes 15 the driver stopped the car on the roadside.'

	act 'Look on the driver':furisex = 1 & gt $curloc
elseif furisex = 1:
	'You looked at the cage, he grinned "hatched? It''s time to work out a trip. Undress and climb into a sleeping bag."'

	act 'Undress and get into the sleeping bag':furisex = 2 & gt $curloc
elseif furisex = 2:
	'You undressed in front of a carrier and climbed into the sleeping bag. The driver climbed up to you and pulled off his pants. "Put on a condom"'

	act 'Wear a condom hands':furisex = 3 & gt $curloc
	act 'Wear a condom mouth':furisex = 4 & gt $curloc
elseif furisex = 3:
	'<center><img src="images/qwest/alter/ev2/condomput.jpg"></center>'
	'You have printed a condom and pulled it to the guy standing member.'

	act 'suck':furisex = 5 & gt $curloc
elseif furisex = 4:
	'<center><img src="images/qwest/alter/ev2/condomput2.jpg"></center>'
	'You have printed a condom and shoved it into his mouth himself holding between the lips, then began to wear a condom on her mouth standing member, gradually you got.'

	act 'suck':furisex = 5 & gt $curloc
elseif furisex = 5:
	bj += 1
	guy += 1
	furibj += 1
	'<center><img src="images/qwest/alter/ev2/condombj.jpg"></center>'
	'You began to suck cock in condom lubricant feeling on your lips, Finally the man broke down and finished in a condom.'

	act 'get_dressed':furisex = 6 & gt $curloc
elseif furisex = 6:
	'A guy took a condom with a penis and dressed sat behind the wheel and the car started soon you go.'

	act 'Leave':
	furisex = 0

	if nroad = 0:nroad = 20 & gt 'gorodok'
	if nroad = 20:nroad = 0 & gt 'nord'
	end
elseif furisex = 100:
	'The driver got into the wagon and started the engine. The car started up and went hard on the road. Carrier turned his head to you "Huyli vypyalilas? Tips and suck."'

	act 'suck':furisex = 101 & gt $curloc
elseif furisex = 101:
	bj += 1
	guy += 1
	furibj += 1
	venrand = rand(0, 100)

	if venrand >= 70:dynamic $veneradinitog

	cumlip += 1
	'<center><img src="images/qwest/alter/ev2/furibj.jpg"></center>'
	'You tilt the driver and got his cock, then took it into his mouth and began to suck. Carrier habitually led the wagon on the road, and smacking his lips on his cock. Finally drove discharged into your mouth Bay him all his cumshot. There was nowhere to spit out and you swallow his cum. Finally stopped the van and drove skaschal , that you come.'

	act 'Leave':
	furisex = 0

	if nroad = 0:nroad = 20 & gt 'gorodok'
	if nroad = 20:nroad = 0 & gt 'nord'
	end
end

--- furisex ---------------------------------
# ybass
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Swimming Pool</font></b></center>'
'<center><img src="images/etogame/ybass.jpg"></center>'

act 'Go to your house':minut += 5 & gt 'youplace'

--- ybass ---------------------------------
# yban
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Bath</font></b></center>'
'<center><img src="images/etogame/yban.jpg"></center>'

act 'Go to your house':minut += 5 & gt 'youplace'

--- yban ---------------------------------
# ymans
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">House</font></b></center>'
'<center>Hall</center>'

if ymanrem[3] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[3] = 1:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[3] = 2:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[3] = 3:'<center><img src="images/etogame/ymans.jpg"></center>'
if ymanrem[3] = 3:'<a href="exec:gt ''mirror'', ''start''">The mirror</a> hangs on the wall'
if ymanrem[3] >= 1:act 'Bedrooms':minut += 1 & gt 'ybedr'
if ymanrem[3] >= 1:act 'Bathroom':minut += 1 & gt 'yvan'
if ymanrem[3] >= 1:act 'Kitchen':minut += 1 & gt 'ykuh'
if ymanrem[3] >= 1:act 'Living Room':minut += 1 & gt 'yzal'
if ymanrem[3] >= 1:act 'Fireplace room':minut += 1 & gt 'ykamin'
if ymanrem[3] >= 1:act 'Nursery':minut += 1 & gt 'ydet'
if ymanrem[3] >= 1:act 'Library':minut += 1 & gt 'ybib'
if ymanrem[3] >= 1:act 'Gymnasium':minut += 1 & gt 'ysport'
if ymanrem[3] >= 1:act 'Cabinet':minut += 1 & gt 'ykabinet'
if $clothingworntype ! 'nude':act 'Go outside':minut += 5 & gt 'youplace'

--- ymans ---------------------------------
# ybedr
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">House</font></b></center>'
'<center>Bedroom</center>'

if ymanrem[4] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[4] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[4] = 2:'<center><img src="images/etogame/ybedr.jpg"></center>'
if ymanrem[4] = 2:'Bright and beautiful room, with a nice <a href="exec:gt ''bed'', ''start''">double bed</a>. Near the entrance is a modern <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">wardrobe</a>. Against the wall are a table and a <a href="exec:gt ''mirror'', ''start''">mirror</a>'

act 'Leave the room':minut += 1 & gt 'ymans'

--- ybedr ---------------------------------
# yvan
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">House</font></b></center>'
'<center>Bathroom</center>'

if ymanrem[5] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[5] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[5] = 2:'<center><img src="images/etogame/yvan.jpg"></center>'
if ymanrem[5] = 2:'On the wall hangs a <a href="exec:gt ''mirror'', ''start''">mirror</a>'

if tampon > 0:
	'On a shelf are tampons in a pack. You have <b><<tampon>></b> left'
else
	'<b><font color="red">You have no tampons left.</font></b>'
end

if stanok > 0:'On a shelf you have razor blades, you can use them <b><<stanok>></b> times.'
if dirtbelo > 0:'In the cart is <font color="red"><b><<dirtbelo>></b></font> pieces of dirty laundry.'

if poroshok > 0:
	'Under the bath is some washing powder, which is enough for <b><<poroshok>></b> washes.'
else
	'<b><font color="red">You do not have any detergent to wash your clothes.</font></b>'
end

if clrbelo > 0:
	'In the locker there are <font color="blue"><b><<clrbelo>></b></font> clean underwear.'
else
	'<b><font color="red">You can not wash yourself, because you do not have clean underwear.</font></b>'
end

if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2:
	husband += 5
	poroshok -= 2
	husporday = day
	'Washing machine washed your husbands smelly socks and his clothes.'
end

if dirtbelo > 0 and poroshok >= dirtbelo:
	clrbelo += dirtbelo
	poroshok -= dirtbelo
	dirtbelo = 0
	'Washing machine washed your laundry'
elseif poroshok < dirtbelo:
	'You ran out of powder for washing machine.'
end

act 'Leave the room':minut += 1 & gt 'ymans'

if tanga = 0:
	act 'Wear underwear':
		cla
		tanga = 1
		gt $curloc
	end
elseif tanga = 1:
	act 'Take off underwear':
		cla
		tanga = 0
		gt $curloc
	end
end

if tampon > 0 and mesec > 0 and isprok = 0:
	act 'Use a tampon (0:05)':
		cla
		*clr
		tampon -= 1
		isprok = 1
		minut += 5
		manna -= 5
		'<center><img src="images/pics/wash3.jpg"></center>'
		'You use a tampon.'

		act 'Finish':gt $curloc
	end
end

!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
!!Washing off cosmetics also removes cum from face
!!clrbelo: Amount of clean panties availableniform in all toilet/bathroom locations
if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0 and clrbelo > 0:
	act 'Quick wash (0:15)':
		cla
		*clr

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

		dynamic $showerdin
		sweat -= 1
		minut += 15
		'<center><img src="images/pics/wash5.jpg"></center>'
		'You gave yourself a catlick, thus removing any traces of cum.'

		act 'Finish':gt $curloc
	end
end

if cumlip > 0 or cumface > 0:
	act 'Clean your face from sperm (0:05)':
		cla
		*clr
		cumlip = 0
		cumface = 0
		sweat -= 1
		minut += 5
		'<center><img src="images/etogame/facesp.jpg"></center>'
		'You clean your face and got rid of any trace of cum.'

		act 'Finish':gt $curloc
	end
end

if mop ! 1:
	act 'Wash off cosmetics (0:15)':
		cla
		mop = 1
		cumface = 0
		minut += 15
		'You washed off your makeup.'

		act 'Finish':gt $curloc
	end
end
!!

if klisma = 1 and klismaday ! day:
	act 'Give yourself an enema (0:05)':
		cla
		*clr
		minut += 5
		klismaday = day
		klismaday1= 1
		'<center><img src="images/picV/klisma.jpg"></center>'
		'You put yourself an enema and clean intestines, now your ass is ready for anal sex.'

		act 'Finish':gt $curloc
	end
end

if vibrator = 1 and vibratorIN = 0:
	act 'Insert the vibrator in your vagina (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 1
		if vagina < 30:vagina += 2
		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and inserted the vibrator in your pussy.'

		act 'Finish':gt $curloc
	end
elseif vibrator = 1 and vibratorIN = 1:
	act 'Remove the vibrator (0:05)':
		cla
		*clr
		minut += 5
		vibratorIN = 0

		if vagina < 30:vagina += 1

		'<center><img src="images/etogame/vibrator.jpg"></center>'
		'You bend over the sink and take the vibrator out of your pussy.'

		act 'Finish':gt $curloc
	end
end

if analplug = 1 and analplugin = 0 and klismaday1 = 1:
	act 'Insert a butt plug (0:05)':
		cla
		*clr
		minut += 5
		analplugIN = 1

		if anus < 30:anus += 5

		'<center><img src="images/etogame/analplug.jpg"></center>'

		if butpluguse > 0:'You bent over and inserted the butt plug.'
		if butpluguse = 0:butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'

		act 'Finish':gt $curloc
	end
elseif analplug = 1 and analplugin = 1:
	act 'Remove the butt plug (0:05)':
		cla
		*clr
		minut += 5
		analplugIN = 0

		if anus < 30:anus += 1

		'<center><img src="images/etogame/analplug.jpg"></center>'
		'You bent over and took out the butt plug.' & !!0.2.6: Removed unneccessary var check

		act 'Finish':gt $curloc
	end
end

--- yvan ---------------------------------
# ykuh
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Mansion</font></b></center>'
'<center>Kitchen</center>'

if ymanrem[6] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[6] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[6] = 2:'<center><img src="images/etogame/ykun.jpg"></center>'
if ymanrem[6] = 2:''

if dirttarelka > 0 and fairy >= dirttarelka:
	cltarelka += dirttarelka
	fairy -= dirttarelka
	dirttarelka = 0
	'Dishwasher washed your dirty dishes.'
elseif fairy < dirttarelka:
	'Tou have no more dishwashing detergent.'
end

if cltarelka > 0:
	'In the cabinet you have <b><<cltarelka>></b> clean plates'
else
	'<b><font color="red">You don''t have any clean plates left.</font></b>'
end

if dirttarelka > 0:'In the sink are <b><<dirttarelka>></b> dirty dishes. <a href="exec:dynamic $dirtarm">Wash the dishes</a>.'

if fairy > 0:
	'Under the sink is some dishwashing detergent, which is enough for <b><<fairy>></b> times.'
else
	'<b><font color="red">You have nothing to wash dishes with. You should buy some dishwashing detergent.</font></b>'
end

if eda > 0:
	if cltarelka = 0 or edahot > 0:$edagot = ''
	if cltarelka > 0 and edahot = 0:$edagot = '<a href="exec:dynamic $edagotd">Cook meal (0:30)</a>'

	'In the refrigerator is enough food for <b><<eda>></b> servings. <<$edagot>>'
elseif edaD = 0 and eda = 0:
	'<b><font color="red">The fridge is empty, you have nothing to eat.</font></b>'
end

act 'Leave the room':minut += 1 & gt 'ymans'

if edahot > 0:'<a href="exec:dynamic $edahotd">On the table is a cooked meal.</a>'

if pranik > 0:
	'You have <<pranik>> cookies.'
	act 'Drink tea with cookies (0:05)':
		cla
		*clr
		minut += 5
		pranik -= 1
		health += 30
		manna += 100
		energy += 20
		water += 20
		fat += 50
		frost = 0
		gs 'stat'
		'<center><img src="images/pics/food.jpg"></center>'
		'You drank tea with cookies, sweet and very bad for your figure, but so good.'

		act 'Get up from the table':gt $curloc
	end
end

if edaD > 0:
	'In the refrigerator is some healthy meals that''s good for <b><<edaD>></b> servings.'

	act 'Cook some dietary food (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'

		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You are not hungry but you ate it anyway.'
		elseif energy < 20:
			energy += 20
			'You gladly ate some cooked food.'
		end

		if water >= 20:
			'You don''t want to drink anymore.'
		elseif water < 20:
			water += 20
			'You gladly drank a mug of tea.'
		end

		act 'Get up from the table':gt $curloc
	end
end

if fatdel > 0:
	act 'Consume fat burners':
		cla
		*clr
		fatdel -= 1
		fat -= 25

		if fat < 0:fat = 0

		'You drank fat burning capsule. These capsules operate gradually and results will not be seen immediately.'

		act 'Get up from the table':gt $curloc
	end
end

act 'Drink':
	cla
	minut += 5

	if water >= 20:
		'You are not thirsty.'
	elseif water < 20:
		water += 20
		'You gladly drank a glass of water.'
	end

	act 'Get up from the table':gt $curloc
end

if husband > 0 and husbanday > 0 and huseatday ! day and eda >= 2:
	act 'Cook a meal for your husband, 2 servings (1:00)':
		cla
		*clr
		husband += 5
		eda -= 2
		minut += 60
		huseatday = day
		manna -= 25
		'<center><img src="images/pics/cook.jpg"></center>'
		'You cooked some food for your husband.'

		act 'Put the food on the table':gt $curloc
	end
end

if lekarstvo > 0:
	'You have <<lekarstvo>> tablets.'

	if sick > 0 and lekarday ! day:
		act 'Take a pill':
			cla
			*clr
			minut += 5
			lekarday = day
			lekarstvo -= 1
			sick -= sick * 20 / 100
			lekrand = rand(1, 9)
			'<center><img src="images/inBed/lekr1.jpg"></center>'
			'You took the pill'

			act 'Move away':gt $curloc
		end
	end
end

if vitamin > 0:
	'You have <<vitamin>> vitamins.'

	if vitaminday ! day:
		act 'Take some vitamins':
			cla
			*clr
			minut += 5
			vitaminday = day
			vitamin -= 1
			frost = 0

			if KandidozOnce = 1:Kandidoz -= 2
			if GerpesOnce = 1:Gerpes -= 2
			if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)

			skinvan += 1

			if skinvan = 20:skinvan = 0 & skin += 1

			'You took vitamins'

			act 'Move away':gt $curloc
		end
	end
end

--- ykuh ---------------------------------
# yzal
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">House</font></b></center>'
'<center>Living Room</center>'
!!!does not exists in 0.2.6
if TV = 0:$TV = 'That would be a great place for TV, which you do not have'
if TV = 1:$TV = 'Ancient <a href="exec:gt ''TV'', ''start''">TV</a>'
if TV = 2:$TV = 'huge plasma <a href="exec:gt ''TV'', ''start''">TV</a>'
!!!
if ymanrem[7] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[7] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[7] = 2:'<center><img src="images/etogame/yzal.jpg"></center>'
if ymanrem[7] = 2:'<<$TV>> . Luxury <a href="exec:gt ''divan'', ''start''">leather sofa</a>'

act 'Leave the room':minut += 1 & gt 'ymans'

--- yzal ---------------------------------
# ykamin
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Detached</font></b></center>'
'<center>Fireplace room</center>'

if ymanrem[8] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[8] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[8] = 2:'<center><img src="images/etogame/ykamin.jpg"></center>'
if ymanrem[8] = 2:'<a href="exec:gt ''stol'', ''start''">Table</a>'

act 'Leave the room':minut += 1 & gt 'ymans'

--- ykamin ---------------------------------
# ydet
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Detached</font></b></center>'
'<center>Children</center>'

if ymanrem[9] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[9] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[9] = 2:'<center><img src="images/etogame/ydet.jpg"></center>'
if ymanrem[9] = 2:''

act 'Leave the room':minut += 1 & gt 'ymans'

--- ydet ---------------------------------
# ybib
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Detached</font></b></center>'
'<center>Library</center>'

if ymanrem[10] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[10] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[10] = 2:'<center><img src="images/etogame/ybib.jpg"></center>'
if ymanrem[10] = 2:''

act 'Leave the room':minut += 1 & gt 'ymans'

--- ybib ---------------------------------
# ysport
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Detached</font></b></center>'
'<center>Gym</center>'
'In the hall is enough space for a variety of sport activities'

if ymanrem[11] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[11] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[11] = 2:'<center><img src="images/etogame/ysport.jpg"></center>'
if ymanrem[11] = 2:''



!!! does not exists in 1.0.5
if treadmillday ! day:
	'<a href="exec:dynamic $sitr_tread_d">Treadmill</a>'
end
!!!

if obruchday ! day:'<a href="exec:dynamic $sitrobrd">Twist hoop</a>'
if bookYogday ! day:'<a href="exec:dynamic $sitryogd">Meditation</a>'
if skakday ! day:'<a href="exec:dynamic $sitrskakd">Jumping rope</a>'
if pressday ! day:'<a href="exec:dynamic $sitrpressd">Abdominal Exercises</a>'
if pushday ! day:'<a href="exec:dynamic $sitrpushd">Push-ups</a>'

act 'Leave the room':minut += 1 & gt 'ymans'

--- ysport ---------------------------------
# ykabinet
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
'<center><b><font color="maroon">Detached</font></b></center>'
'<center>Cabinet</center>'

if ymanrem[12] = 0:'<center><img src="images/etogame/ynill.jpg"></center>'
if ymanrem[12] = 1:'<center><img src="images/etogame/yrem.jpg"></center>'
if ymanrem[12] = 2:'<center><img src="images/etogame/ykabinet.jpg"></center>'
if ymanrem[12] = 2:'<a href="exec:gt ''Komp'', ''start''">computer</a>'

act 'Leave the room':minut += 1 & gt 'ymans'

--- ykabinet ---------------------------------
# BDSM
$metka = $ARGS[0]
$loc = $CURLOC
cla
clr
*clr
gs 'stat'
'You came to the where all was ready for filming a porn movie.'

act 'Begin participating in the shooting':
	cla
	*clr

	if hcol = 0:'<center><img src="images/studia/Brunette_2.jpg"></center>'
	if hcol = 1:'<center><img src="images/studia/Brown_2.jpg"></center>'
	if hcol = 2:'<center><img src="images/studia/Redhead_2.jpg"></center>'
	if hcol = 3:'<center><img src="images/studia/Blonde_2.jpg"></center>'

	'You started filming a scene with two actors'

	act 'Shoot a scene with blowjob':
			cla
			*clr
			guy += 2
			bj += 2
			gang += 1

			if hcol = 0:'<center><img src="images/studia/Brunette_3.jpg"></center>'
			if hcol = 1:'<center><img src="images/studia/Brown_3.jpg"></center>'
			if hcol = 2:'<center><img src="images/studia/Redhead_3.jpg"></center>'
			if hcol = 3:'<center><img src="images/studia/Blonde_3.jpg"></center>'

			'You cupped his lips and took a dick into the palm of the second member of the actor and began to work vigorously for the camera, alternately sucking members and trying to pull his mouth at once both members.'

			act 'Get into doggy-style':
				cla
				*clr
				anal += 1
				anus += 1

				if hcol = 0:'<center><img src="images/studia/Brunette_4.jpg"></center>'
				if hcol = 1:'<center><img src="images/studia/Brown_4.jpg"></center>'
				if hcol = 2:'<center><img src="images/studia/Redhead_4.jpg"></center>'
				if hcol = 3:'<center><img src="images/studia/Blonde_4.jpg"></center>'

				'One of the actors made you cancer and began rudely thrust you his hard cock in the ass, after his cock entered into you, he began furiously fuck you in the ass, but you continued to suck vtrogo ...'

				act 'Sit on top...':
					cla
					*clr

					if hcol = 0:'<center><img src="images/studia/Brunette_5.jpg"></center>'
					if hcol = 1:'<center><img src="images/studia/Brown_5.jpg"></center>'
					if hcol = 2:'<center><img src="images/studia/Redhead_5.jpg"></center>'
					if hcol = 3:'<center><img src="images/studia/Blonde_5.jpg"></center>'

				'You famously sat on one dick ass and continued to suck the other ...'

				act 'Continue movements':
					cla
					*clr

					if hcol = 0:'<center><img src="images/studia/Brunette_6.jpg"></center>'
					if hcol = 1:'<center><img src="images/studia/Brown_6.jpg"></center>'
					if hcol = 2:'<center><img src="images/studia/Redhead_6.jpg"></center>'
					if hcol = 3:'<center><img src="images/studia/Blonde_6.jpg"></center>'

					'Peasants and swapped prodlolzhili to fuck you'

					act 'Prepare for double penetration':
						cla
						*clr
						sex += 1
						vagina += 1

						if hcol = 0:'<center><img src="images/studia/Brunette_7.jpg"></center>'
						if hcol = 1:'<center><img src="images/studia/Brown_7.jpg"></center>'
						if hcol = 2:'<center><img src="images/studia/Redhead_7.jpg"></center>'
						if hcol = 3:'<center><img src="images/studia/Blonde_7.jpg"></center>'

						'You got pussy on one member, and felt like a second penis enters you itching anus and broken-'

						act 'Enjoy':
							cla
							*clr

							if hcol = 0:'<center><img src="images/studia/Brunette_8.jpg"></center>'
							if hcol = 1:'<center><img src="images/studia/Brown_8.jpg"></center>'
							if hcol = 2:'<center><img src="images/studia/Redhead_8.jpg"></center>'
							if hcol = 3:'<center><img src="images/studia/Blonde_8.jpg"></center>'

							'Outstretched legs, you will enjoy the activities in the two bow members hammering your body as pistons, you groan and roll Spreading his arms to the operator was convenient to take close-up.'

							act 'Time to finish...':
								cla
								*clr
								facial += 1
								swallow += 1

								if hcol = 0:'<center><img src="images/studia/Brunette_9.jpg"></center>'
								if hcol = 1:'<center><img src="images/studia/Brown_9.jpg"></center>'
								if hcol = 2:'<center><img src="images/studia/Redhead_9.jpg"></center>'
								if hcol = 3:'<center><img src="images/studia/Blonde_9.jpg"></center>'

								'Boys took out their thick members of you and you readily vsali before them on their knees and opened his mouth lustfully awaiting sperm guys did not take long and soon the hot jet of sperm began to lash down your face and drip down his chin on his chest.'

								act 'Get paid':
									cla
									clr
									*clr
									minut = minut + 480
									film = film + 1
									BDSMfilm = BDSMfilm + 1
									money = money + vnesh * 500
									actr = 0
									gs 'stat'

									'<center><img src="images/studia/dvd-disс.jpg"></center>'
									'You spent 9 hours on filming'
									'and received <<vnesh * 500>> rubles in cash'

									act 'Leave the studio':gt 'down'
								end
							end
						end
					end
				end
			end
		end
	end
end

--- BDSM ---------------------------------
# toilet
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/cabin.jpg"></center>'
	'Do you hear any noises at some of the booths ...'

	act 'Come up with a toilet':
		cla
		minut += 5
		gt 'sexshop', 'podval'
	end

	act 'Look at each booth':
		cla
		clr
		*clr
		gs 'stat'
		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pry_1.jpg"></center>'
		'You looked into the booth and all ....'
		toisexrand = rand(0, 100)

		if toisexrand < 66 :
			act 'And anyone not found ...':
				minut += 10
				cla
				clr
				*clr
				gs 'stat'
				$ImageNeededPlacholder
				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/cabin_0.jpg"></center>'
				'And all the booths were empty'

				act 'Come up with a toilet':gt 'sexshop', 'podval'
			end
		elseif toisexrand >= 66 :
			act 'Saw a naked girl masturbating ....':
				toigirlrand = rand(1, 2)

				if toigirlrand = 1:
					minut += 10
					cla
					clr
					*clr
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_1.jpg"></center>'
					'You know her, this girl watched porn in the next stall ....'
					'You have enabled cell phone and started filming herself as she caresses ...'

					act 'Enter into the booth and show that bitch ....':gt 'toilet', '1'
					act 'You took a good movie on a mobile phone and gone ...':gt 'toilet', '0'
				elseif toigirlrand = 2:
					minut += 10
					cla
					clr
					*clr
					gs 'stat'
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_1.jpg"></center>'
					'You know her - this girl watched porn in the next stall ....'
					'You have enabled cell phone and started filming herself as she caresses ...'

					act 'Enter into the booth and show that bitch ....':gt 'toilet', '2'
					act 'You took a good movie on a mobile phone and gone ...':gt 'toilet', '0'
				end
			end
		end
	end
end

if $ARGS[0] = '0':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 10
	horny = horny + 50
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
	'Finding and viewing movies on your phone you are very excited ...'

	act 'Delete movie and walk out basement ...':gt 'sexshop', 'start'

	act 'Sell ​​clip on one of the porn sites ...!':
		cla
		*clr
		bankfond = bankfond + 1000
		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
		'Uploading videos on the Internet, you sold it to porn site for 1000 rubles!'
		'You transferred the money to the account ...'

		act 'Walk out basement ...':gt 'sexshop', 'start'
	end
end

if $ARGS[0] = '1':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	clr
	gs 'stat'
	gs 'time'
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_2.jpg"></center>'
	'You knocked on the stall and she opened the door a little delay'
	'She had to get dressed, but her cheeks were glowing eyes and ran - she realized that he slept ...'
	'You:- Well, what a good rest? I wrote down all your pranks on mobile ...'
	'She:- Why? What do you want?'
	'You:- Are you rested? And I want to relax again ... So take off your clothes and do what I say ...'
	'Otherwise, it is a video on the Internet today is! Gee-gee-gee ...'

	act 'She agreed and took off her bra ...':
		cla
		*clr
		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_3.jpg"></center>'
		'Nipples on her small breasts excitedly sticking ...'
		'Looking at her you excited and your cock swollen ...'
		'She looked at you and waiting for further orders ....'
		'You:- Take off your pants and kiss my dick ...'

		act '...':
			cla
			*clr
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_4.jpg"></center>'
			'Removing panties she got down on her knees and kiss your cock ...'
			'Kissing is certainly nice, but I want a good suction ...'

			act 'Let ka kiddie more active ....':
				cla
				*clr
				$ImageNeededPlacholder
				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_5.jpg"></center>'
				'She began actively otsayvat you ...'
				'You are excited and want to shove her cock in my mouth a little deeper ....'

				act 'Put in your mouth most tomatoes ...':
					cla
					*clr
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_6.jpg"></center>'
					'You are rude and started to fuck her deep in her mouth ...'
					'Probably need to try it with coarser ...'

					act 'Swat hair and bend to the toilet ...':
						cla
						*clr
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_7.jpg"></center>'
						'Bent his head to the toilet you started to insult her ...'
						'You called her a dirty whore and her slave ...'
						'Bitch was excited and kept saying:- Yes, my lord!'

						act 'Dunk your head in the toilet and wash ...':
							cla
							*clr
							$ImageNeededPlacholder
							! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_8.jpg"></center>'
							'You okunli her head in the ass ...'
							'She was trembling with excitement and asked her to cum in her mouth ...'

							act 'Give her suck ...':
								cla
								*clr
								$ImageNeededPlacholder
								! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_9.jpg"></center>'
								'She began to masturbate you substituting your sexy mouth ...'
								'Reaching the peak of excitement you removed it aside ...'
								'You:- Get on your knees bitch! Open your mouth and wait!'

								act '...':
									cla
									*clr
									$ImageNeededPlacholder
									! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_10.jpg"></center>'
									'He dutifully stood up and looking into your eyes waited for the apogee ...'
									'You discharge of semen in her mouth, and a few drops fell on the rim of the toilet ...'
									'Continuing to play the role of the Master, you said ...'

									act '- Swallow the whole sperm and lick the toilet bowl ...':
										horny = 0
										girl += 1
										minut += 30
										sexm = sexm + 1
										manna = manna + 25
										cla
										*clr
										clr
										gs 'stat'
										$ImageNeededPlacholder
										! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_11.jpg"></center>'
										'Resignedly she began to lick clean the toilet ...'
										'And you thought:"Do not offer if she participated in the filming of" ...'
										'Judging by her inclination to obey - it could play in the genre BDSM'
										'These films are more expensive than usual, and actresses such genre is not enough ...'
										'You:- Listen sweetheart! You''re gorgeous! I have a proposal for you ...'

										act 'I needed an actress in the genre BDSM':
											BDSMactressrand = rand(1, 2)
												if BDSMactressrand = 1:
													cla
													*clr
													BDSMactress = BDSMactress + 1
													$ImageNeededPlacholder
													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_1.jpg"></center>'
													'It:- This is an interesting aredlozhenie. Where and when?'
													'You:- Come to the casting on Saturday! Shooting on Sundays!'
													'She:- I agree!'
													'You:- I am very pleased'

													act 'Here, take a business card! And to meet ...':gt 'sexshop', 'start'
												end

												if BDSMactressrand = 2:
												cla
												*clr
												$ImageNeededPlacholder
												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/oblom_1.jpg"></center>'
												'She:- Fuck you for dick! Goat!'
												'You:Honey, what are you so? I thought you like domination!'
												'She:- Yes, I fear with almost peed - thought you were some kind of maniac!'
												'You:- Well, sorry neponyatochka out! Video phone I remove as dogovorivatsya!'

												act 'Go ...':
													cla
													*clr
													bankfond = bankfond + 1000
													$ImageNeededPlacholder
													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
													'- That''s because of a bitch! - You might think ....'
													'You I still become a star! Though on the Internet!'
													'And finding a movie on your phone, sold it to one of the porn sites for 1000 rubles!'
													'You transferred the money to the account ...'

													act 'Walk out basement':gt 'sexshop', 'start'
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = '2':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	clr
	gs 'stat'
	gs 'time'
	$ImageNeededPlacholder
	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_2.jpg"></center>'
	'You knocked on the stall and she opened the door a little delay'
	'She had to get dressed, but her cheeks were glowing eyes and ran - she realized that he slept ...'
	'You:- Well, what a good rest? I wrote down all your pranks on mobile ...'
	'She:- Why? What do you want?'
	'You:- Are you rested? And I want to relax again ... So take off your clothes and do what I say ...'
	'Otherwise, it is a video on the Internet today is! Gee-gee-gee ...'

	act 'She agreed and took off her blouse ...':
		cla
		*clr
		$ImageNeededPlacholder
		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_3.jpg"></center>'
		'Nipples on her small breasts excitedly sticking ...'
		'Looking at her you excited and your cock swollen ...'
		'She looked at you and waiting for further orders ....'
		'You:- Take off your pants and suck my dick ...'

		act '...':
			cla
			*clr
			$ImageNeededPlacholder
			! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_4.jpg"></center>'
			'Removing panties she knelt down and began to suck you dick ...'
			'It''s certainly nice, but I want a good suction ...'

			act 'Let ka kiddie more active ....':
				cla
				*clr
				$ImageNeededPlacholder
				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_5.jpg"></center>'
				'She began actively otsayvat you ...'
				'You are excited and want to shove her cock in my mouth a little deeper ....'

				act 'Put in your mouth most tomatoes ...':
					cla
					*clr
					$ImageNeededPlacholder
					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_6.jpg"></center>'
					'You are rude and started to fuck her deep in her mouth ...'
					'Probably need to try it with coarser ...'

					act 'Swat hair and bend to the toilet ...':
						cla
						*clr
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_7.jpg"></center>'
						'Bent his head to the toilet you started to insult her ...'
						'You called her a dirty whore and her slave ...'
						'You:- Female lick the toilet!'
						'She:- Yes my lord!'

						act 'Dunk your head in the toilet and wash ...':
							cla
							*clr
							$ImageNeededPlacholder
							! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_8.jpg"></center>'
							'You okunli her head in the ass ...'
							'She was trembling with excitement and asked her to cum in her mouth ...'

							act 'Give it a lick dick ...':
								cla
								*clr
								$ImageNeededPlacholder
								! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_9.jpg"></center>'
								'She began to lick your dick their sexual tongue ...'
								'Reaching the peak of excitement you finished in her mouth ...'
								'You:- swallow cum bitch! Open your mouth and show me how you did it!'

								act '...':
									cla
									*clr
									$ImageNeededPlacholder
									! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_10.jpg"></center>'
									'He dutifully swallowed and opened her mouth ...'
									'Have you checked - she really swallowed every drop posleedney ...'
									'You:- Well, ka bitch conducted on hand between your legs and show me ...'

									act '....':
										cla
										clr
										*clr
										horny = 0
										girl += 1
										minut += 30
										sexm = sexm + 1
										manna = manna + 25
										gs 'stat'
										$ImageNeededPlacholder
										! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_11.jpg"></center>'
										'Groaning she held her fingers on her pussy ...'
										'Sheath of her was full of grease - you can see that she was excited ...'
										'And you thought:"Do not offer if she participated in the filming of" ...'
										'Judging by her inclination to obey - it could play in the genre BDSM'
										'These films are more expensive than usual, and actresses such genre is not enough ...'
										'You:- Listen sweetheart! You''re gorgeous! I have a proposal for you ...'

										act 'I needed an actress in the genre BDSM':
											BDSMactressrand = rand(1, 2)

											if BDSMactressrand = 1:
												cla
												*clr
												BDSMactress = BDSMactress + 1
												$ImageNeededPlacholder
												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_3.jpg"></center>'
												'It:- This is an interesting aredlozhenie. Where and when?'
												'You:- Come to the casting on Saturday! Shooting on Sundays!'
												'She:- I agree!'
												'You:- I am very pleased'

												act 'Here, take a business card! And to meet ...':gt 'sexshop', 'start'
											elseif BDSMactressrand = 2:
												cla
												*clr
												$ImageNeededPlacholder
												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/oblom_1.jpg"></center>'
												'She:- Fuck you for dick! Goat!'
												'You:Honey, what are you so? I thought you like domination!'
												'She:- Yes, I fear with almost peed - thought you were some kind of maniac!'
												'You:- Well, sorry neponyatochka out! Video phone I remove as dogovorivatsya!'

												act 'Go ...':
													cla
													*clr
													bankfond = bankfond + 1000
													$ImageNeededPlacholder
													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
													'- That''s because of a bitch! - You might think ....'
													'You I still become a star! Though on the Internet!'
													'And finding a movie on your phone, sold it to one of the porn sites for 1000 rubles!'
													'You transferred the money to the account ...'

													act 'Walk out basement':gt 'sexshop', 'start'
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

--- toilet ---------------------------------
# film
if $ARGS[0] = 'movie':
	cla
	clr
	gs 'stat'

	!!pfilmA
	if pfilmA >= 5:
		cla
		pfilmA = 0
		pfilm = 0
		film = film + 1
		'You dosnyal in the film.'

		act 'Approach to Peter':gt 'pornstudio', 'start'
		act 'Finish':gt 'down'
	end

	if hour >= 22 and pfilmA < 5:
		cla
		'Time is too late for filming'

		act 'Go home':gt 'down'
	elseif hour < 22 and pfilmA < 5 and pfilm > 0:
		cla
		minut += 60
		money += 1000

		if pfilmA = 0:guy+= 1

		bj += 1
		pfilmA += 1
		gs 'stat'
		'You undress and start shooting.'
		prand = rand(1, 2)

		if prand = 1:
			porand = rand(1, 10)

			'<center><img src="images/picBJ/bj<<porand>>.jpg"></center>'
			'You suck dick for an hour at the actor portraying the passion and lust. Really hard to concentrate when there are fixtures, Assistant, you continually shoved the camera to face.'
		elseif prand = 2:
			facial += 1
			porand = rand(1, 10)

			'<center><img src="images/picBJ/fa<<picrand>>.jpg"></center>'
			'You suck dick for an hour at the actor portraying the passion and lust. He ends up on your face, you lick the sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
		end

		act 'Finish':gt 'down'

		if hour < 22:act 'Acting on':gt 'film', 'movie'
	end
end

if $ARGS[0] = 'movie2':
cla
clr
gs 'stat'

	!!pfilmB
	if pfilmB >= 10:
		cla
		pfilmB = 0
		pfilm = 0
		film = film + 1
		'You dosnyal in the film.'

		act 'Approach to Peter':gt 'pornstudio', 'start'
		act 'Go home':gt 'down'
	end

	if h >= 22 and pfilmB < 10:
		cla
		'Time is too late for filming'

		act 'Go home':gt 'down'
	elseif hour < 22 and pfilmB < 10 and pfilm > 0:
		cla
		minut += 60
		money += 3000

		if pfilmB = 0:guy += 1

		pfilmB += 1
		gs 'stat'
		'You undress and start shooting.'
		prand = rand(1, 3)

		if prand = 1:
			bj += 1
			porand = rand(1, 10)
			'<center><img src="images/picBJ/bj<<picrand>>.jpg"></center>'
			'You suck dick for an hour at the actor portraying the passion and lust. Really hard to concentrate when there are fixtures, Assistant, you continually shoved the camera to face.'
		elseif prand = 2:
			anus += 1
			anal += 1
			porand = rand(1, 10)

			'<center><img src="images/pics/anal<<picrand>>.jpg"></center>'
			'An hour you fucked in the ass for the camera, you do not pleasant, but you portray passion and pleasure. Finally, the actor does not stand up and fills your ass with his sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
		elseif prand = 3:
			sex += 1
			vagina+= 1
			facial += 1

			porand = rand(0, 1)

			if porand = 0:
				picrand = rand(1, 5)
				'<center><img src="images/pics/vagcow<<picrand>>.jpg"></center>'
			else
				picrand = rand(1, 5)
				'<center><img src="images/pics/vagdog<<picrand>>.jpg"></center>'
			end

			'You have an hour before the camera, you portray passion and lust. He ends up on your face, you lick the sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
		end

		act 'Go home':gt 'down'

		if hour < 22:act 'Acting on':gt 'film', 'movie2'
	end
end

--- film ---------------------------------
# pornstudio
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	gs 'stat'
	! WD: Correct Image path ~ "images/studia/studiа_0.jpg" Cyrillic characters
	'<center><img src="images/studia/studia_0.jpg"></center>'

	act 'Leave':gt 'down'

	if hour < 10 or hour > 22:
		'The Porn studio is closed.'
		exit
	end

	'Manager''s office opened.'

	act 'Go to the manager':gt 'pornstudio', 'manager'

	act 'Visit the manager assistant':
		cla
		*clr
		minut += 5
		gs 'stat'
		'There is a young guy tapping on the computer keys in a small office.'
		'<font color="#0D42C0"> "How can I help you?"</font>'

		if pfilmSTOP = 0:
			act 'What''s the rating on my videos?':
				cla
				minut += 5
				gs 'stat'

				if film = 0:
					'"You have no videos."'
				else
					'"Do you <<film>> videos. Their rating is still very low, quite simply, they are almost nobody is looking."'
					'The guy whispers "By the way if you suddenly want to, I can contribute to their removal from the network - if you go down to the price."'

					act 'Tell me more':
						cla
						minut += 5
						films_stop_payment = film * 40000
						gs 'stat'
						'So long as little video views, we are not very interested in them, and I can remove them. But will have to pay all the costs of the studio, about 40, 000 each. A total amount of <<films_stop_payment>>. In addition, site-hoster does not love these models, so that the more you do not get a job with us.'

						if money >= films_stop_payment:
							act 'Agree':
								minut += 5
								money -= films_stop_payment
								pfilmSTOP = 1
								film = 0
								gs 'stat'
								'So, your video removed. Have a nice day.'

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

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

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

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

	if bomzQW = 1 and week = 4 and workDisk = 0:
		act 'Arrive for work':
			cls
			minut += 15
			gs 'stat'
			'We made inquiries about you, and have decided that you come to us. The essence is this:We give you a couple of drives, and deliver them to you in the sauna, where you are given an envelope, you bring it to us immediately. Upon return now 5000. Shuttling need every Friday after opening the studio. If you agree, then passes on Friday unacceptable, choose safe mode of transport.'

			act 'No, I do not fit (to leave)':bomzQW = -1 & gt 'down'

			act 'Agree to work':
				cls
				minut += 15
				gs 'stat'
				'Today, it will take you to our people. In the future, will get themselves because Fridays control us increase, but watch out for each lonely girl coming from us - too costly for them.'

				act 'Well, show':
					cls
					workDisk = 1
					minut += 15
					gs 'stat'
					'You slipped into a jeep standing at the entrance, and you have brought to the sauna.'

					if saunasex = 1:
						'You recall how you were brought into the sauna, but then you were so excited that they could not remember anything sensible.'
					elseif sauna > 0:
						'A sauna, you recall it, it close to your home.'
					else
						'This sauna is located near your home, it is strange that you did not notice it before.'
					end

					'You went to the sauna, you have presented to local managers. Lucidly explained to you who need to deliver, and that it is necessary to return the envelope on the same day when you gave him. Do not forget to remind about the use of secure transport. On this with you goodbye until tomorrow.'

					act 'Leave':bomzQW = 2 & gt 'street'
				end
			end
		end
	end

	if workDisk = 1 and week = 5:
		act 'Take the disk':
			cls
			minut += 5
			workDisk = 2
			gs 'stat'
			'You are given a disk, and specify whether you remember all the instructions. You nod with your head and goes for the exit with the disc. Moving away from the studio near you heard someone else came out of a nearby building and head for you. <font color="magenta"> "Avoid deserted places, maybe this will blow over"</font> you had hoped, and went on.'

			act 'Leave':gt 'down'
		end
	elseif workDisk = 3 and week = 5:
		act 'Give the envelope':
			cls
			minut += 5
			workDisk = 4
			gs 'stat'

			if konvert = 0:
				workDolg = 200000
				workDolgDay = 7
				'Starting to dig in your things you are struckd in terror. No envelope. You search everything again, but you didn''t find the envelope.'
				'-WHAT!! But how could you let this happen! You know in what you have gotten into?!'
				'You stand there not squeezing out a single word. Sounds like your situation is really deplorable.'
				'The Manager grabs the phone explaining the situation to the other party. After listening to a couple of minutes, he hung up.'
				'<font color="#0D42C0"> So-so</font>  - he said - <font color="#0D42C0"> his boss was in a good mood, so I have good news. You have a week. Until next Friday evening you shall bring into the studio 200000. If you bring - we separate. You can not work as an actress with us anymore.</font>'
				'<font color="#0D42C0">Otherwise, there will be consequences.</font>'
			else
				konvert = 0
				money += 5000
				'You gave the envelope to the manager and he gave you 5,000 rubles.'
			end

			act 'Leave':gt 'down'
		end
	end

	if workDolg > 0 and money >= workDolg:
		act 'Repay your debt':
			cls
			minut += 5
			workDisk = 0
			money -= workDolg
			workDolg = 0
			gs 'stat'
			'You gave the money that you owed to the studio.'

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

	if pfilmNO = 1 and pfilmNoVenera = 1 and Venera = 0:
		act 'Show the certificate about STD''s cured':
			cls
			minut += 5
			pfilmNoVenera = 0
			pfilmNO = 0
			gs 'stat'
			'You gave a certificate that your sexually transmitted diseases is cured. They promised to consider your reinstatement as a porn actress.'

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

if $ARGS[0] = 'manager':
	cla
	*clr
	minut += 5
	gs 'stat'
	! WD: Correct Image path ~ "images/studia/studiа_0.jpg" Cyrillic characters
	'<center><img src="images/studia/studia_0.jpg"></center>'
	'Boss porn studio met you welcome and gestured you sit on the couch.'

	if pfilmNO = 1:
		'You''re blacklisted, you no decent studio will not have affairs, goodbye.'
		act 'Leave':gt 'pornstudio', 'start'
		exit
	end

	if pfilmSTOP = 1:
		'I''m sorry I thought you were retired...'
		act 'Leave':gt 'pornstudio', 'start'
		exit
	end

	if pfilmday = daystart and pfilm > 0:
		'Do not distract me from my work. Like I said, tomorrow shooting.'
		act 'Leave':gt 'pornstudio', 'start'
		exit
	end

	if pfilmday >= daystart + 2:
		pfilmNO = 1
		'You did not come to the shooting. Plucked them. I paid a lot of dough assistants, actors, cameramen, plus rental studio, and you took it and threw me. No, with you I do not want to work and am submitting your name in the blacklist.'
		act 'Leave':gt 'pornstudio', 'start'
		exit
	end

	if pfilm > 0 and hour >= 10 and hour <= 12:
		if hour = 10:'Come on honey inspection.'
		if hour = 11:'Do not be late, my patience is not eternal, strictly tells you Peter. Vividly honey inspection.'
		if hour = 12:'What the dick? There''s only one waiting for you. Hurry honey inspection.'

		pfilmday = day
		act 'Go for medical check-up':
			cla
			*clr
			minut += 5
			gs 'stat'
			'You went into the office where the doctor was waiting in a white robe. He quickly pulled on rubber gloves and briefly told you undress.'
			'You removed the clothes and sat in the high gynecological chair legs apart. The doctor came up to you and started inspection. After inspection, he took a syringe and took you out of the vein blood samples.'
			'Now after half an hour and will be ready tests, if you have at least something, they will show.'

			act 'Wait':
				cla
				*clr
				minut += 30
				gs 'stat'

				if venera > 0:
					pfilmNO = 1
					pfilmNoVenera = 1
					'Your analysis showed a sexually transmitted disease. doctor told you and called Peter. Peter looked at the piece of paper with analyzes.'
					'Well, as long as you have an STD you can''t make films.'
					act 'Leave':gt 'pornstudio', 'start'
				else
					'Well Well, you''re clean. Go into the dressing room'

					act 'Go to the dressing room':
						cla
						*clr
						minut += 30
						hapri = 1
						mop = 4
						gs 'stat'
						'In the dressing room waiting for you already lean and withered as roach woman.'

						if pfilm > 3:'The first cases you put a powerful enema.'

						'You put in front of the mirror, brushed and laid makeup.'
						!!if the scene with anal, then enema.

						act 'Go to the set':
							if pfilm = 1:
								cla
								*clr
								minut += 30
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'On one side stands the actor <<$pakter>> and examining pornozhurnal Fingering member.'

								act 'Removed':
									cla
									*clr
									minut += 30
									hj += 1
									gs 'stat'
									'<center><img src="images/studia/hj.gif"></center>'
									'<<$pakter>> lay on the bed and put his penis. You lay down beside him and took his penis in his hand. Smeared his chest and a member of the actor, you started it nadrachivat eldu.'

									act 'Masturbate on chest':
										cla
										*clr
										minut += 5
										'<center><img src="images/studia/hjcumontits.gif"></center>'
										'<<$pakter>> began to finish your chest, and you continued to jerk his cock squeezing his hot cum on himself.'

										act 'Walk in shower':
											cla
											*clr
											minut += 5
											sweat = -3
											horny += 1
											mop = 1
											cumpussy = 0
											cumbelly = 0
											cumass = 0
											cumanus =0
											cumlip = 0
											cumface = 0
											'<center><img src="images/pics/dush.jpg"></center>'
											'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

											act 'Go to Peter':gt 'pornstudio', 'postvideo'
										end
									end
								end
							elseif pfilm = 2:
								cla
								*clr
								minut += 30
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'On one side stands the actor <<$pakter>> and examining pornozhurnal Fingering member.'

								act 'Removed':
									cla
									*clr
									minut += 30
									hj += 1
									gs 'stat'
									'<center><img src="images/studia/hj.gif"></center>'
									'<<$pakter>> lay on the bed and put his penis. You lay down beside him and took his penis in his hand. Smeared his chest and a member of the actor, you started it nadrachivat eldu.'

									act 'Take by mouth':
										cla
										*clr
										bj += 1
										minut += 5
										'<center><img src="images/studia/bj.gif"></center>'
										'<<$pakter>> sat on the bed and you have settled down between his legs taking his cock in her mouth and began to suck the head.'

										act 'Suck':
											cla
											*clr
											minut += 5
											'<center><img src="images/studia/deep.gif"></center>'
											'<<$pakter>> began to fuck you in the mouth by driving his cock down your throat every move.'
											'Finally he took a member of you. It is time to remove ejaculation.'

											act 'Sit on your knees and open your mouth':
												cla
												*clr
												minut += 5
												cumlip += 1
												facial += 1
												gs 'stat'
												'<center><img src="images/studia/cum.gif"></center>'
												'<<$pakter>> finished in your mouth, whipping a hot stream of sperm you by language and once in the throat.'

												act 'Clean the mouth from his cock sperm':
													cla
													*clr
													minut += 5
													cumface += 1
													swallow += 1
													gs 'stat'
													'<center><img src="images/studia/bj2.gif"></center>'
													'You began to gently clean his cock swallowing sperm from her dedication and looking into his eyes.'

													act 'Walk in shower':
														cla
														*clr
														minut += 5
														sweat = -3
														horny += 1
														mop = 1
														cumpussy = 0
														cumbelly = 0
														cumass = 0
														cumanus =0
														cumlip = 0
														cumface = 0
														'<center><img src="images/pics/dush.jpg"></center>'
														'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

														act 'Go to Peter':gt 'pornstudio', 'postvideo'
													end
												end
											end
										end
									end
								end
							elseif pfilm = 3:
								cla
								*clr
								minut += 30
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'On one side stands the actor <<$pakter>> and examining pornozhurnal Fingering member.'

								act 'Removed':
									cla
									*clr
									minut += 30
									hj += 1
									gs 'stat'
									'<center><img src="images/studia/hj.gif"></center>'
									'<<$pakter>> lay on the bed and put his penis. You lay down beside him and took his penis in his hand. Smeared his chest and a member of the actor, you started it nadrachivat eldu.'

									act 'Take by mouth':
										cla
										*clr
										bj += 1
										minut += 5
										'<center><img src="images/studia/bj.gif"></center>'
										'<<$pakter>> sat on the bed and you have settled down between his legs taking his cock in her mouth and began to suck the head.'

										act 'Suck':
											cla
											*clr
											minut += 5
											'<center><img src="images/studia/deep.gif"></center>'
											'<<$pakter>> began to fuck you in the mouth by driving his cock down your throat every move.'

											act 'Stand up doggy style':
												cla
												*clr
												sex += 1
												vagina += 1
												minut += 15
												'<center><img src="images/studia/sex.gif"></center>'
												'You got up on all fours and <<$pakter>> you drove his dick in pussy on the most balls. He began to fuck you hard-hitting all case you on the behind and if it did not hold hands tenaciously your buttocks, then you would definitely have fallen after the first blow.'

												act 'Sit on your knees and open your mouth':
													cla
													*clr
													minut += 5
													cumlip += 1
													facial += 1
													gs 'stat'
													'<center><img src="images/studia/cum.gif"></center>'
													'<<$pakter>> finished in your mouth, whipping a hot stream of sperm you by language and once in the throat.'

													act 'Clean the mouth from his cock sperm':
														cla
														*clr
														minut += 5
														cumface += 1
														swallow += 1
														gs 'stat'
														'<center><img src="images/studia/bj2.gif"></center>'
														'You began to gently clean his cock swallowing sperm from her dedication and looking into his eyes.'

														act 'Walk in shower':
															cla
															*clr
															minut += 5
															sweat = -3
															horny += 1
															mop = 1
															cumpussy = 0
															cumbelly = 0
															cumass = 0
															cumanus =0
															cumlip = 0
															cumface = 0
															'<center><img src="images/pics/dush.jpg"></center>'
															'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

															act 'Go to Peter':gt 'pornstudio', 'postvideo'
														end
													end
												end
											end
										end
									end
								end
							elseif pfilm = 4:
								cla
								*clr
								minut += 30
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'On one side stands the actor <<$pakter>> and examining pornozhurnal Fingering member.'

								act 'Removed':
									cla
									*clr
									minut += 30
									hj += 1
									gs 'stat'
									'<center><img src="images/studia/hj.gif"></center>'
									'<<$pakter>> lay on the bed and put his penis. You lay down beside him and took his penis in his hand. Smeared his chest and a member of the actor, you started it nadrachivat eldu.'

									act 'Take by mouth':
										cla
										*clr
										bj += 1
										minut += 5
										'<center><img src="images/studia/bj.gif"></center>'
										'<<$pakter>> sat on the bed and you have settled down between his legs taking his cock in her mouth and began to suck the head.'

										act 'Suck':
											cla
											*clr
											minut += 5
											'<center><img src="images/studia/deep.gif"></center>'
											'<<$pakter>> began to fuck you in the mouth by driving his cock down your throat every move.'

											act 'Stand up doggy style':
												cla
												*clr
												sex += 1
												vagina += 1
												minut += 5
												'<center><img src="images/studia/sex.gif"></center>'
												'You got up on all fours and <<$pakter>> you drove his dick in pussy on the most balls. He began to fuck you hard-hitting all case you on the behind and if it did not hold hands tenaciously your buttocks, then you would definitely have fallen after the first blow.'
												'Finally the actor pulled out of you cock and you feel like it touches you in the anus.'

												act 'Relax the anus':
													cla
													*clr
													anal += 1
													anus += 1
													minut += 5
													'<center><img src="images/studia/sex.gif"></center>'
													'You tried as best they could relax the anus that would painlessly Hollow member. <<$pakter>> gradually came into your ass and began to peck your ass like a steam hammer.'

													act 'Sit on your knees and open your mouth':
														cla
														*clr
														minut += 5
														cumlip += 1
														facial += 1
														gs 'stat'
														'<center><img src="images/studia/cum.gif"></center>'
														'<<$pakter>> finished in your mouth, whipping a hot stream of sperm you by language and once in the throat.'

														act 'Clean the mouth from his cock sperm':
															cla
															*clr
															minut += 5
															cumface += 1
															swallow += 1
															gs 'stat'
															'<center><img src="images/studia/bj2.gif"></center>'
															'You began to gently clean his cock swallowing sperm from her dedication and looking into his eyes.'

															act 'Go to the shower':
																cla
																*clr
																minut += 5
																sweat = -3
																horny += 1
																mop = 1
																cumpussy = 0
																cumbelly = 0
																cumass = 0
																cumanus =0
																cumlip = 0
																cumface = 0
																'<center><img src="images/pics/dush.jpg"></center>'
																'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

																act 'Go to Peter':gt 'pornstudio', 'postvideo'
															end
														end
													end
												end
											end
										end
									end
								end
							elseif pfilm = 5:
								cla
								*clr
								minut += 30
								gang += 1
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								akrand2 = rand(1, 4)
								if akrand2 >= akrand:akrand2 += 1
								if akrand2 = 1:$pakter2 = 'Alexei'
								if akrand2 = 2:$pakter2 = 'Sergey'
								if akrand2 = 3:$pakter2 = 'George'
								if akrand2 = 4:$pakter2 = 'Ignat'
								if akrand2 = 5:$pakter2 = 'Simeon'
								if akrand2 = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand2 = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand2 = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand2 = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand2 = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'Actors <<$pakter>> and <<$pakter2>> peppers before play dirty magazines that would lead them to a state of combat readiness.'

								act 'Removed':
									cla
									*clr
									minut += 10
									bj += 2
									gs 'stat'
									'<center><img src="images/studia/tbj.gif"></center>'
									'Cast members got started and you bash them in the face.'

									act 'Suck':
										cla
										*clr
										minut += 15
										gs 'stat'
										'<center><img src="images/studia/tbj2.gif"></center>'
										'You started to suck both members trying to deprive no one attention, caressing them with his tongue, lips and sucked.'

										act 'Fuck':
											cla
											*clr
											minut += 15
											sex += 1
											vagina += 1
											gs 'stat'
											'<center><img src="images/studia/three.gif"></center>'
											'You got up on all fours and <<$pakter>> you drove his dick in pussy until you have aspirated <<$pakter2>>.'

											act 'Anal':
												cla
												*clr
												minut += 15
												anal += 1
												anus += 1
												gs 'stat'
												'<center><img src="images/studia/threea.gif"></center>'
												'<<$pakter>> drove a screw you in the ass until you have aspirated <<$pakter2>>.'

												act 'Cum on face':
													cla
													*clr
													minut += 5
													cumface += 1
													facial += 1
													gs 'stat'
													'<center><img src="images/studia/tcum.gif"></center>'
													'<<$pakter2>> finished in your mouth, whipping a hot stream of sperm you by language and once in the throat.'

													act 'Go to the shower':
														cla
														*clr
														minut += 5
														sweat = -3
														horny += 1
														mop = 1
														cumpussy = 0
														cumbelly = 0
														cumass = 0
														cumanus =0
														cumlip = 0
														cumface = 0
														'<center><img src="images/pics/dush.jpg"></center>'
														'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

														act 'Go to Peter':gt 'pornstudio', 'postvideo'
													end
												end
											end
										end
									end
								end
							else
								cla
								*clr
								minut += 30
								gang += 1
								gs 'stat'

								akrand = rand(1, 5)
								if akrand = 1:$pakter = 'Alexei'
								if akrand = 2:$pakter = 'Sergey'
								if akrand = 3:$pakter = 'George'
								if akrand = 4:$pakter = 'Ignat'
								if akrand = 5:$pakter = 'Simeon'
								if akrand = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								akrand2 = rand(1, 4)
								if akrand2 >= akrand:akrand2 += 1
								if akrand2 = 1:$pakter2 = 'Alexei'
								if akrand2 = 2:$pakter2 = 'Sergey'
								if akrand2 = 3:$pakter2 = 'George'
								if akrand2 = 4:$pakter2 = 'Ignat'
								if akrand2 = 5:$pakter2 = 'Simeon'
								if akrand2 = 1 and aksex1 = 0:aksex1 = 1 & guy += 1
								if akrand2 = 2 and aksex2 = 0:aksex2 = 1 & guy += 1
								if akrand2 = 3 and aksex3 = 0:aksex3 = 1 & guy += 1
								if akrand2 = 4 and aksex4 = 0:aksex4 = 1 & guy += 1
								if akrand2 = 5 and aksex5 = 0:aksex5 = 1 & guy += 1

								'On the site already bustling assistants installing lighting, so that there were no shadows.'
								'Actors <<$pakter>> and <<$pakter2>> peppers before play dirty magazines that would lead them to a state of combat readiness.'

								act 'Removed':
									cla
									*clr
									minut += 10
									bj += 2
									gs 'stat'
									'<center><img src="images/studia/tbj.gif"></center>'
									'Cast members got started and you bash them in the face.'

									act 'Suck':
										cla
										*clr
										minut += 15
										gs 'stat'
										'<center><img src="images/studia/tbj2.gif"></center>'
										'You started to suck both members trying to deprive no one attention, caressing them with his tongue, lips and sucked.'

										act 'Fuck':
											cla
											*clr
											minut += 15
											sex += 1
											vagina += 1
											gs 'stat'
											'<center><img src="images/studia/three.gif"></center>'
											'You got up on all fours and <<$pakter>> you drove his dick in pussy until you have aspirated <<$pakter2>>.'

											act 'Anal':
												cla
												*clr
												minut += 15
												anal += 1
												anus += 1
												gs 'stat'
												'<center><img src="images/studia/threea.gif"></center>'
												'<<$pakter>> drove a screw you in the ass until you have aspirated <<$pakter2>>.'

												act 'Double Penetration':
													cla
													*clr
													minut += 15
													anus += 1
													vagina += 1
													gs 'stat'
													'<center><img src="images/studia/three2.gif"></center>'
													'<<$pakter>> lay down and you sat down on his cock pussy <<$pakter2>> came from behind and you feel his penis penetrates your anus. You guys started to peck holes in two, hard dicks rubbing against each other through the thin stenochku in your body.'

													act 'Cum on face':
														cla
														*clr
														minut += 5
														cumface += 1
														facial += 1
														gs 'stat'
														'<center><img src="images/studia/tcum.gif"></center>'
														'<<$pakter2>> finished in your mouth, whipping a hot stream of sperm you by language and once in the throat.'

														act 'Walk in shower':
															cla
															*clr
															minut += 5
															sweat = -3
															horny += 1
															mop = 1
															cumpussy = 0
															cumbelly = 0
															cumass = 0
															cumanus =0
															cumlip = 0
															cumface = 0
															'<center><img src="images/pics/dush.jpg"></center>'
															'Logged-in shower cubicle and turned on the shower. Lathered body and washed off in the shower by removing all traces of semen from his body.'

															act 'Go to Peter':gt 'pornstudio', 'postvideo'
														end
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
		exit
	end

	if pfilm > 0 and hour > 12:
		pfilmday = day
		'I told you not to be late? Said. Get out of here, I''m out for you a lot of money lost. Actors paid assistants, operator, doctor, and because of you slut, shooting all failed.'
		'Either you come tomorrow and work for free, or get out and I know you do not want.'

		act 'Himself worked for free moron':
			pfilmNO = 1
			pfilm = 0
			gt 'pornstudio', 'start'
		end

		act 'Well, in return for free':
			pfilmNOPAY = 1
			gt 'pornstudio', 'start'
		end
		exit
	end

	if firstkasting = 0:
		'You sat down on the sofa and asked the boss. I see you for the first time with us. Want to rent a porno movie?'

		act 'I changed my mind':gt 'pornstudio', 'start'

		act 'Yes':
			cla
			minut += 5
			gs 'stat'
			'You have confirmed their desire to play in a porn movie. Boss nodded. All right. First you need to spend casting.'
			'Take off your clothes, let me see your body.'

			act 'I changed my mind':gt 'pornstudio', 'start'

			act 'Unclothed':
				cla
				minut += 5
				gs 'stat'
				'You undressed in front of the boss, he got up from his chair and walked eyeing you. "Lie down on the couch and spread your legs."'

				act 'I changed my mind':gt 'pornstudio', 'start'

				act 'Lie down on the sofa and spread her legs ':
					cla
					minut += 5
					gs 'stat'
					'You lay down on the couch and pushed her feet. Boss took fotoaparat and took a few pictures, explaining that it is for the portfolio. After that, the boss asked you to kneel.'

					act 'To kneel':
						cla
						minut += 5
						gs 'stat'
						'You got up from the couch and knelt in front of the boss. He took a few more pictures. "Now open your mouth and stick your tongue as if you now face will finish."'

						act 'Open mouth stick um language':
							cla
							minut += 5
							gs 'stat'
							'You have opened my mouth and stuck out her tongue. Boss again sfotkal you. "Not bad, now suck my thumb" He put in your mouth as his thick finger sordelka.'

							act 'Thumb sucking':
								cla
								minut += 5
								gs 'stat'
								'You started to suck his thumb trying to look sexier as possible. Boss touched your breast with the other hand while you were busy with his finger.'
								'He pulled his finger out of your mouth, you said curtly, "get dressed." and sat down at the table. You quickly got dressed and sat on the couch.'
								'(Boss) - I can call Peter. Firstly you need a nickname for filming.'

								act 'Called alias':
									cla
									firstkasting = 1
									$pfname = input ("What will be your alias?")

									if $pfname <= 0:$pfname = '<<$name>> Huesoskina'

									'<<$pfname>>, um, okay, go. Now listen, the composition of pornographic men have a permanent, all before shooting pass medical examination. You''ll also pass a medical examination. If you find any sign of a sexually transmitted disease, then dosvidaniya forever. This point is clear? Take care of health. I''m not going to jeopardize his actors.'
									'We shoot films not so often. About once a month.'
									''
									'We''ll see. That we need.'

									act '.....':gt 'pornstudio', 'man'
								end
							end
						end
					end
				end
			end
		end
	elseif film = 0 and pfilm = 0:
		'So, you''re new girl, and we just have an order for a brand new girl. In the genre handdzhob. You''ll have to masturbate guy, and he would finish your chest. All this for 3,000.'

		act 'Agree':
			cla
			pfilm = 1
			pfilmday = daystart
			'Thus, the survey will be tomorrow. Come to 10:00. Do not be late.'

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

		act 'I changed my mind':gt 'pornstudio', 'start'
	elseif film > 0:
		if daystart > pffilmday and pfilm = 0:
			'Come on <<$pfname>>. So, let''s see what I can pick up for you.'
			frand = rand(1, 6)
			if frand = 1:'Job handles need podorochit guy and he pulls on his chest. 2000.'
			if frand = 2:'Do blowjob guy, ending in the mouth and face. 3 thousand.'
			if frand = 3:'Classical, first blowjob, then sex with the end in the mouth and face. 5000.'
			if frand = 4:'Tough classic, first blowjob, then sex, then anal and ending up in the mouth and face. 6000.'
			if frand = 5:'Group sex with two guys in all holes, but without double penetration. 7000.'
			if frand = 6:'Threesome with two guys with double penetration. 9000.'

			act 'Perhaps wait for more suitable suggestions':
				pffilmday = daystart + 1
				gt 'pornstudio', 'start'
			end

			act 'Agree':
				cla
				pfilm = frand
				pfilmday = daystart
				'Thus, the survey will be tomorrow. Come to 10:00. Do not be late.'

				act 'Leave':gt 'pornstudio', 'start'
			end
		else
			if pffilmday - daystart > 0:
				'Sorry <<$pfname>>, now there is no work for you. Come back <<pffilmday-daystart>> days.'
			elseif pffilmday - daystart = 0:
				'Sorry <<$pfname>>, now there is no work for you. Come back tomorrow.'
			end

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

	'Peter said on the phone, he covers up the phone for a second. "Listen, while not up to you, how come some other time."'

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

if $ARGS[0] = 'postvideo':
	cla
	*clr
	minut += 30
	film += 1
	gs 'stat'

	if pfilm = 1:pfcash = 2000 & $filmtext = ' where you snimalilis as otdrachivali guy and he descended on your boobs.'
	if pfilm = 2:pfcash = 3000 & $filmtext = ' where you snimalilis aspirated as a member of the guy and he goes down you in the mouth and face.'
	if pfilm = 3:pfcash = 5000 & $filmtext = ' where you snimalilis aspirated as a member of the guy, then he fucked you and cum in your mouth.'
	if pfilm = 4:pfcash = 6000 & $filmtext = ' where you snimalilis aspirated as a member of the guy, then he fucked you in the pussy and ass and pulled you into his mouth.'
	if pfilm = 5:pfcash = 7000 & $filmtext = ' where you snimalilis as you in all holes hollows two men.'
	if pfilm = 6:pfcash = 9000 & $filmtext = ' where you snimalilis as you hammering in all holes two men and even double penetration.'

	$pfilmhistory += film + ') shot on '+year+'.'+$month+'.'+day+':'+$filmtext+'<br>'

	if pfilmNOPAY = 0:
		money += pfcash
		'Peter you counted <<pfcash>> per shot in the film and wished good luck.'
	else
		pfilmNOPAY = 0
		'You have fulfilled his sentence and the film was made for free.'
	end

	pfilm = 0

	if film < 10:filmkoef = 2
	if film >= 10 and film < 20:filmkoef = 5
	if film >= 20:filmkoef = 10

	pffilmday = daystart+(film + filmkoef)
	pfilmday = 0

	'I think we will have a job for you no earlier than one <<pffilmday-daystart>>day.'

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

--- pornstudio ---------------------------------
# BDman
if $ARGS[0] = 'givi':
	!!stopboy = 0
	$boy = 'Givi Karapetovich'
	$boybody = 'small'
	$boybod = 'thick'
	$boyface = 'bald'
	!!long cock
	dick = 20
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 10
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 1
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'ashot':
	!!stopboy = 0
	$boy = 'Ashot'
	$boybody = 'average growth'
	$boybod = 'muscular'
	$boyface = 'black-haired'
	!!long cock
	dick = 18
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 1
	!!check in appearance, a parameter vnesh
	vneshBoy = 15
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'arthur':
	!!stopboy = 0
	$boy = 'Arthur'
	$boybody = 'average growth'
	$boybod = 'muscular'
	$boyface = 'black-haired'
	!!long cock
	dick = 19
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'abdula':
	!!stopboy = 0
	$boy = 'Abdul'
	$boybody = 'long'
	$boybod = 'skinny'
	$boyface = 'gray'
	!!long cock
	dick = 21
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'hasan':
	!!stopboy = 0
	$boy = 'Hasan'
	$boybody = 'average growth'
	$boybod = 'abdominous'
	$boyface = 'black-haired'
	!!long cock
	dick = 18
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'kamil':
	!!stopboy = 0
	$boy = 'Camille'
	$boybody = 'average growth'
	$boybod = 'thin'
	$boyface = 'black-haired'
	!!long cock
	dick = 20
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'aslan':
	!!stopboy = 0
	$boy = 'Aslan'
	$boybody = 'small'
	$boybod = 'thin'
	$boyface = 'black-haired'
	!!long cock
	dick = 17
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

if $ARGS[0] = 'muhtar':
	!!stopboy = 0
	$boy = 'Mukhtar'
	$boybody = 'small'
	$boybod = 'thick'
	$boyface = 'black-haired'
	!!long cock
	dick = 18
	!! sexual force of 0 prior_to 2
	silaVag = 2
	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
	finance = 2
	!!check in appearance, a parameter vnesh
	vneshBoy = 25
	$boyClo = 'dressed in a leather jacket and cap'
	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
	figurBoy = 2
	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
	titBoy = 2
	!!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
	haerBoy = 3
	!!character 0 - soft, 1 -norm 2 - aggressor
	harakBoy = 2
	!!perversity
	izvrat = 1
end

--- BDman ---------------------------------
# BDsex
if $ARGS[0] = 'start':
	!!range of interactions
	!!gs 'BDsex', 'start'
	minut += 3

	if NoGuy = 0:guy += 1

	horny += 10
	gs 'stat'
	'<center><img src="images/picKav/petting.jpg"></center>'

	if harakBoy = 0:
		'<<$boy>> hugs you and gently caress your breasts.'

		act 'Order him to lick you':gt 'BDsex', 'kuni'
		act 'Stroke his cock':gt 'BDsex', 'hj'
		act 'Take by mouth':gt 'BDsex', 'minet'
		act 'Lie on your back and spread your legs ':gt 'BDsex', 'sex'
		act 'Go on all fours':gt 'BDsex', 'sex2'
		act 'Do anal':gt 'BDsex', 'anal2'
	elseif harakBoy = 1:
		'<<$boy>> you and skillfully caresses your breasts.'
		brand = rand(0, 100)

		if brand < 70:
			'<<$boy>> you hugs and caresses your pussy with his fingers.'
			trand = rand(0, 2)

			if trand < 2:
				'It puts you in the back.'

				act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
			else
				'It turns your stomach.'

				act 'Stand on all fours':gt 'BDsex', 'sex2'
			end

			act 'Suck him':gt 'BDsex', 'minet'
		else
			'<<$boy>> baby, caressed my mouth.'

			act 'Stroke his cock':gt 'BDsex', 'hj'
			act 'Take by mouth':gt 'BDsex', 'minet'
			act 'Tell him you prefer to lay down and happily spreading your legs for him':gt 'BDsex', 'sex'
		end
	elseif harakBoy = 2:
		'<<$boy>> hugs you and passionately caress your breasts.'
		brand = rand(0, 100)

		if brand < 70:
			'<<$boy>> caresses your pussy with his fingers.'
			trand = rand(0, 2)

			if trand < 2:
				'It puts you in the back.'

				act 'Lie on your back and spread your legs ':gt 'BDsex', 'sex'
			else
				'It turns your stomach.'

				act 'Go on all fours':gt 'BDsex', 'sex2'
			end
		elseif brand >= 70 and brand < 90:
			'<<$boy>> takes you behind your head and pulls you to face your penis.'

			act 'Take by mouth':gt 'BDsex', 'minet'
				if dom > 0:
					act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
					act 'Stand on all fours':gt 'BDsex', 'sex2'
				end
			elseif brand >= 90:

			'<<$boy>> tells you that he wants you in the ass.'

			act ' Do anal':gt 'BDsex', 'anal2'

			if dom > 0:
				act 'I do not want to! Lie on your back and spread her legs ':gt 'BDsex', 'sex'
				act 'Tell him that you''ll go into a doggystyle position, but that your ass is a no-go':gt 'BDsex', 'sex2'
				act 'Take by mouth':gt 'BDsex', 'minet'
			end
		end
	end
end

if $ARGS[0] = 'kuni':
	minut += 15
	DOM += 1
	kuni += 1
	horny += DOM + (silaVag * 2 + 5)
	gs 'stat'
	'<center><img src="images/picV/kuni.jpg"></center>'
	'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
	'<<$boy>> lay down between your legs and began to work the tongue on your pussy.'

	if horny >= 90:
		horny = 0
		manna += 15
		willpower += 15
		orgasm += 1
		'Man of skillful actions you covered orgasm.'
	else
		'Actions Man though they were exciting, but they started to bore you.'
	end

	act 'Stroking his cock':gt 'BDsex', 'hj'
	act 'Take by mouth':gt 'BDsex', 'minet'
	act 'Lie on your back and spread your legs ':gt 'BDsex', 'sex'
	act 'Go on all fours':gt 'BDsex', 'sex2'
	act 'Do anal':gt 'BDsex', 'anal2'
end

if $ARGS[0] = 'sex':
	!!missionary position
	minut += 10
	pose = 0
	gs 'stat'
	'<center><img src="images/picV/vag.jpg"></center>'
	gs 'BDsex', 'org'
	givfinrand = rand(0, 10)

	if harakBoy > 0:
		if givfinrand >= 8:
			'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'

			act 'Substitute person':gt 'BDsex', 'facial'
			act 'Open your mouth':gt 'BDsex', 'swallow'

			exit
		end
	end

	givfinrand = rand(0, 10)

	if harakBoy = 2:
		if givfinrand >= 8:
			'Suddenly <<$boy>> you took out a member and began to fondle your ass preparing it to penetrate.'

			act 'Do anal':gt 'BDsex', 'anal2'

			exit
		end
	end

	gs 'BDsex', 'cum'

	act 'Leave':gt 'BDsex', 'end'
end


if $ARGS[0] = 'sex2':
	!cancer
	minut += 10
	pose = 1
	gs 'stat'
	picrand = rand(1, 5)
	'<center><img src="images/pics/vagdog<<picrand>>.jpg"></center>'
	gs 'BDsex', 'org'
	givfinrand = rand(0, 10)

	if harakBoy > 0:
		if givfinrand >= 8:
			'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'

			act 'Substitute person':gt 'BDsex', 'facial'
			act 'Open mouth':gt 'BDsex', 'swallow'

			exit
		end
	end

	givfinrand = rand(0, 10)

	if harakBoy = 2:
		if givfinrand >= 8:
			'Suddenly <<$boy>> you took out a member and began to fondle your ass preparing it to penetrate.'

			act 'Anal':gt 'BDsex', 'anal2'

			exit
		end
	end

	gs 'BDsex', 'cum'

	act 'Leave':gt 'BDsex', 'end'
end


if $ARGS[0] = 'sex3':
	!!to top
	minut += 10
	pose = 0
	gs 'stat'
	picrand = rand(1, 5)
	'<center><img src="images/pics/vagcow<<picrand>>.jpg"></center>'
	gs 'BDsex', 'org'
	gs 'BDsex', 'cum'
end

if $ARGS[0] = 'anal':
	!!missionary position
	minut += 10
	gs 'stat'
	gs 'bdsex', 'an'
	gs 'bdsex', 'ancum'
end


if $ARGS[0] = 'anal2':
	!!cancer
	minut += 10
	gs 'stat'
	picrand = rand(1, 10)
	'<center><img src="images/pics/anal<<picrand>>.jpg"></center>'
	gs 'bdsex', 'an'
	givfinrand = rand(0, 10)

	if harakBoy > 0:
		if givfinrand >= 8:
			'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'

			act 'Substitute person':gt 'BDsex', 'facial'
			act 'Open mouth':gt 'BDsex', 'swallow'

			exit
		end
	end

	gs 'bdsex', 'ancum'
	act 'Leave':gt 'BDsex', 'end'
end


if $ARGS[0] = 'anal3':
	!!to top
	gs 'bdsex', 'an'
	gs 'bdsex', 'ancum'
end

if $ARGS[0] = 'hj':
	!!handjob
	hj += 1
	minut += 5
	gs 'stat'
	'<center><img src="images/picV/hand1.jpg"></center>'
	'You got it <<dick>> centimeter penis and began to caress her arms around his arms, moving the skin on the crimson head.'
	bjrand = rand(0, 100)

	if bjrand >= 75:
		if harakBoy = 0:
			'<<$boy>> moaned, "I''m going to come."'

			act 'Let ends':
				cla
				*clr
				'<center><img src="images/picV/hand2.jpg"></center>'
				'<<$boy>> finished her hands covering you in their hot and sticky cum.'

				act 'Leave':gt 'BDsex', 'end'
			end

			act 'Take by mouth':gt 'BDsex', 'minet'
			act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
		elseif harakBoy = 1:
			'<<$boy>> groaned "<<$name>> take in the mouth or let sex going to do."'

			act 'Take by mouth':gt 'BDsex', 'minet'
			act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
		else
			brand = rand(0, 100)

			if brand < 70:
				'<<$boy>> caresses your pussy with his fingers.'
				trand = rand(0, 2)

				if trand < 2:
					'It puts you in the back.'

					act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
				else
					'It turns your stomach.'

					act 'Stand on all fours':gt 'BDsex', 'sex2'
				end
			elseif brand >= 70 and brand < 80:
				'<<$boy>> tells you that he wants you in the ass.'

				act 'Anal':gt 'BDsex', 'anal2'

				if dom > 5:
					act 'I do not want to! Lie on your back and spread her legs ':gt 'BDsex', 'sex'
					act 'I''ll get cancer, but not in the ass ladies!':gt 'BDsex', 'sex2'
					act 'Take by mouth':gt 'BDsex', 'minet'
				end
			elseif brand >= 80:
				'<<$boy>> tightens your face to its members.'

				act 'Take by mouth':gt 'BDsex', 'minet'
			end
		end
	else
		'<<$boy>> Now finish.'

		act 'Substitute person':gt 'BDsex', 'facial'
		act 'Open mouth':gt 'BDsex', 'swallow'
	end
end

if $ARGS[0] = 'minet':
	!!blowjob
	minut += 5
	gs 'stat'
	picrand = rand(1, 5)
	'<center><img src="images/picV/bj<<picrand>>.jpg"></center>'
	gs 'bdsex', 'autobj'
	bjrand = rand(0, 100)

	if bjrand >= 75:
		if harakBoy = 0:
			'<<$boy>> moaned, "I''m going to come."'

			act 'In the palm of your hand':
				cla
				*clr
				'<center><img src="images/picV/hand2.jpg"></center>'
				'<<$boy>> finished her hands covering you in their hot and sticky cum.'

				act 'Leave':gt 'BDsex', 'end'
			end

			act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
		elseif harakBoy = 1:
			'<<$boy>> groaned "<<$name>> take in the mouth or let sex going to do."'

			act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
		else
			brand = rand(0, 100)

			if brand < 70:
				'<<$boy>> caresses your pussy with his fingers.'
				trand = rand(0, 2)

				if trand < 2:
					'It puts you in the back.'

					act 'Lie on your back and spread her legs ':gt 'BDsex', 'sex'
				else
					'It turns your stomach.'

					act 'Stand on all fours':gt 'BDsex', 'sex2'
				end
			elseif brand >= 70:
				'<<$boy>> tells you that he wants you in the ass.'

				act 'Anal':gt 'BDsex', 'anal2'

				if dom > 0:
					act 'I do not want to! Lie on your back and spread her legs ':gt 'BDsex', 'sex'
					act 'I''ll get cancer, but not in the ass ladies!':gt 'BDsex', 'sex2'
				end
			end
		end
	else
		'<<$boy>> Now finish.'

		act 'Substitute person':gt 'BDsex', 'facial'
		act 'Open mouth':gt 'BDsex', 'swallow'

		if harakBoy = 0:
			act 'In the palm of your hand':
				cla
				*clr
				'<center><img src="images/picV/hand2.jpg"></center>'
				'<<$boy>> finished her hands covering you in their hot and sticky cum.'

				act 'Leave':gt 'BDsex', 'end'
			end
		end
	end
end

if $ARGS[0] = 'facial':
	facial += 1
	cumface += 1
	minut += 3
	gs 'stat'
	picrand = rand(1, 5)
	'<center><img src="images/pics/facial<<picrand>>.jpg"></center>'
	'Thick jet of sperm hit sharply smelling you in the face.'

	act 'Brush up':gt 'BDsex', 'end'
end

if $ARGS[0] = 'swallow':
	swallow += 1
	cumlip += 1
	minut += 3
	gs 'stat'
	picrand = rand(1, 10)
	'<center><img src="images/pics/cum<<picrand>>.jpg"></center>'
	'Thick jet of sperm hit sharply smelling your mouth.'

	act 'Brush up':gt 'BDsex', 'end'
end

if $ARGS[0] = 'end':
	NoGuy = 0

	if InYouHome = 1:
		InYouHome = 0
		'<<$boy>> politely said goodbye and left.'

		act 'Leave':gt 'korr'

		exit
	end

	if harakBoy = 0:
		minut += 15
		sweat = -3
		horny += 1
		hapri = 1
		mop = 1
		dynamic $showerdin
		'<center><img src="images/pics/dush.jpg"></center>'
		'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'
	elseif harakBoy = 1:
		if cumface > 0:cumface = 0

		'You have washed and <<$boy>> began to hurry you.'
	elseif harakBoy = 2:
		'<<$boy>> has not given you even go to the bathroom.'
	end

	if finance > 0:
		if finance = 1:money += 300
		if finance = 2:money += 500
		'<<$boy>> give you money for a taxi and evicted from the apartment.'
	elseif finance = 0:
		'<<$boy>> you are evicted from the apartment.'
	end

	if GoToGuy = 0:
		act 'Leave':
			gorand = rand(0, 2)

			if gorand = 0:gt 'street'
			if gorand = 1:gt 'down'
			if gorand = 2:gt 'nord'
		end
	elseif GoToGuy > 0:
		act 'Leave':
			if GoToGuy = 1:GoToGuy = 0 & gt 'nord'
			if GoToGuy = 2:GoToGuy = 0 & gt 'street'
		end
	end
end

if $ARGS[0] = 'org':
	protect = 0
	vidageday -= 1
	if tabletki <= 0 and prezik > 0:
		prezik -= 1
		protect = 1
		'<<$boy>> you took a condom and put it on your <<dick>> centimeter member.'
	end

	if mesec > 0:
		!!periods, orgasm is not possible
		horny = 0
		manna -= 10
		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.'
	elseif mesec <= 0 and vagina > 0:
		!!no monthly
		!!horny - excitement
		!!vagina - the elasticity of the vagina
		!!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
		!!dick - penis Man
		!!orgazm - Total coefficient of pleasure
		!!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
		smazka = horny / 10
		prinat = smazka + vagina

		if dick >= prinat * 2:
			!!member of the critical features more years
			if silavag = 0:orgazm = 0
			if silavag = 1:orgazm = 1
			if silavag = 2:orgazm = 2
		elseif dick < prinat * 2 and dick > prinat:
			!!member more options gg
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny >= 80 and horny < 90:orgazm = 3
				if horny >= 70 and horny < 80:orgazm = 2
				if horny >= 60 and horny < 70:orgazm = 1
				if horny < 60:orgazm = 0
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny >= 70 and horny < 80:orgazm = 3
				if horny >= 60 and horny < 70:orgazm = 2
				if horny >= 50 and horny < 60:orgazm = 1
				if horny < 50:orgazm = 0
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny >= 60 and horny < 70:orgazm = 3
				if horny >= 50 and horny < 60:orgazm = 2
				if horny >= 40 and horny < 50:orgazm = 1
				if horny < 40:orgazm = 0
			end
		elseif dick <= prinat and dick >= vagina:
			!!Member fewer opportunities gg
			if silavag = 0:
				if horny >= 80:orgazm = 5
				if horny >= 60 and horny < 80:orgazm = 4
				if horny >= 40 and horny < 60:orgazm = 3
				if horny < 40:orgazm = 2
			elseif silavag = 1:
				if horny >= 70:orgazm = 5
				if horny >= 50 and horny < 70:orgazm = 4
				if horny >= 30 and horny < 50:orgazm = 3
				if horny < 30:orgazm = 2
			elseif silavag = 2:
				if horny >= 60:orgazm = 5
				if horny >= 40 and horny < 60:orgazm = 4
				if horny >= 20 and horny < 40:orgazm = 3
				if horny < 20:orgazm = 2
			end
		elseif dick <= prinat and dick < vagina:
			if silavag = 0:
				if horny >= 100:orgazm = 5
				if horny >= 90 and horny < 100:orgazm = 4
				if horny < 90:orgazm = 6
			elseif silavag = 1:
				if horny >= 90:orgazm = 5
				if horny >= 80 and horny < 90:orgazm = 4
				if horny < 80:orgazm = 6
			elseif silavag = 2:
				if horny >= 80:orgazm = 5
				if horny >= 70 and horny < 80:orgazm = 4
				if horny < 70:orgazm = 6
			end
		end

		if orgazm = 0:
			horny = 0
			manna -= 15
			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.'
		elseif orgazm = 1:
			horny -= 10
			manna -= 10
			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.'
		elseif orgazm = 2:
			horny -= 5
			manna -= 5
			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.'
		elseif orgazm = 3:
			!!horny += 5
			manna += 5
			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.'
		elseif orgazm = 4:
			!!horny += 10
			manna += 10
			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.'
		elseif orgazm = 5:
			horny = 0
			manna += 15
			willpower += 15
			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.'
		elseif orgazm = 6:
			horny += 5
			manna += 5
			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:vagina += 1
	elseif vagina = 0 and mesec <= 0:
		horny = 0
		manna -= 15
		willpower -= 15
		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
end

if $ARGS[0] = 'cum':
	if protect ! 1:
	!!unprotected sex
	finrand = rand(0, 1)
		if finrand = 0:
			!!inside
			cumpussy += 1
			'<<$boy>> groaned and you feel like jet of sperm hit you inside your body.'

			if tabletki <= 0 and mesec <= 0:
				gs 'preg'
				manna -= 15
				willpower -= 15
				'Hell, because after all, you can fly, you thought with horror.'
			end
		elseif finrand = 1:
			!!out
			if pose = 0:
				cumbelly += 1
				'<<$boy>> groaned and removing a member of you finished your stomach.'
			elseif pose = 1:
				cumass += 1
				'<<$boy>> groaned and removing a member of you finished on your ass.'
			end
		end
	elseif protect = 1:
		protect = 0
		'<<$boy>> groaned and you realized that he had finished in the condom.'
	end

	pose = 0
end

if $ARGS[0] = 'autobj':
	bj += 1
	'You little fingers caress <<dick>> centimeter term then cupped his mouth and began to suck.'

	if harakBoy = 0:
		'<<$boy>> closed his eyes in pleasure and enjoying the caress of your lips.'
	elseif harakBoy = 1:
		'<<$boy>> staring you in the face until your lips glide over his hard dick.'
	elseif harakBoy = 2:
		if mop > 1:mop = 0
		hapri = 0
		throat += 1
		'<<$boy>> to take you by the hair and began to fuck you in the mouth, from blows to the throat member you tears flowed from his eyes.'
	end

	horny += throat + SUB + VAF - DOM
	'Hard and hot cock slides in your wet her mouth filling it completely, your lips tightly wrapped around his dick caressing.'

	if horny >= 100:
		VAF += 1
		orgasm += 1
		horny = 20
		manna += 15
		willpower += 15
		lipkoef += 1

		if lipkoef > 50:
			lipkoef = 0
			lip += 1
		end

		'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
	end

	!!'Finally <<$boy>> groaned and you realize that now he will start to finish.'
end

if $ARGS[0] = 'an':
	!'
	if analplugin = 1:
		analpluginbonus = 10
		analplugin = 0

		if anus < 16:'<<$boy>> has pulled out of your narrow and tight ass plug'

		if anus >= 16:'<<$boy>> pulled out of your ass juices dripping feverish stopper and you feel as hard cock rested in your hole.'

		if anus + analpluginbonus < dick:'You screamed and bit his lip from a sharp pain when it <<dick>> member centimeter apart your ass you entered.'
		if anus + analpluginbonus >= dick:'You groaned when his feelings of overcrowding <<dick>> member centimeter apart your ass you entered.'

		!!gs 'BDsex', 'ancum'
	end
	'!

	if analplugin = 1:
		!!WD:No Anal Lube if Anal Plug
		!!analpluginbonus = 10
		lubonus = 15
		analplugin = 0
		'<<$boy>> has pulled out of your narrow and tight butt plug'
	end

	if dick < anus:anus += 1

	if lubri = 0:
		lubonus = 2
		'Lubricant and you do not have <<$boy>> spitting on his fingers became saliva to lubricate your ass.'
	elseif lubri > 0:
		lubri -= 1
		lubonus = 10
		'You took a tube of lubricant and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
	end

	if lubonus = 0:
		if lubri > 0:
			lubri -= 1
			lubonus = 10
			'You took a tube of lubricant and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
		else
			lubonus = 2
			'You do not have any lubricant so <<$boy>> spits on his fingers and uses saliva to lubricate your ass.'
		end
	end

	'<<$boy>> put your stomach on the bed apart and began to massage your buttocks your anus with your fingers, first one, then two.'

	if anus < 10:'When your ass you entered three fingers involuntarily groaned in pain.'
	if anus >= 10:'Then the guy brought you three fingers and started to stretch your anus.'

	'<<$boy>> pulled his fingers out of your buttocks and you feel his hard cock rested in your hole.'

	if anus + lubonus < dick:'You screamed and bit his lip from a sharp pain when it <<dick>> member centimetre apart your ass you entered.'
	if anus + lubonus >= dick:'You groaned when his feelings of overcrowding <<dick>> member centimeter apart your ass you entered.'

	'<<$boy>> stopped for a moment giving your ass adapt to member protruding from it, and then started to drive them all the more insistent.'

	if anus + lubonus + 2 < dick:
		if mop > 1:mop = 0

		'You cried and clutched his teeth into the pillow when <<dick>> centimeter cock began to fuck your ass on full force.'
	elseif anus + lubonus + 2 >= dick:
		'You started to moan rhythmically in time with the movements member inside you.'
	end
	anal += 1
end

if $ARGS[0] = 'ancum':
	'Finally <<$boy>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'
	cumass += 1
	minut += 3
	cumanus += 1

	if anus < dick:anus += 1

	horny += (anus - dick) * 3

	if horny < 1:
		horny = 1
	elseif horny >= 100:
		horny = 1
		orgasm += 1
		analorgasm += 1
		'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
	end
end

--- BDsex ---------------------------------
# boy
!!'<<$boy>> <<$boybody>> <<$boybod>> <<$boyface>>. <<$boy>> <<$boyClo>>'
!!Randomly male names
Set boynamerand = rand(1, 38)

if boynamerand = 1: $boy = 'Alexander'
if boynamerand = 2: $boy = 'Alexey'
if boynamerand = 3: $boy = 'Albert'
if boynamerand = 4: $boy = 'Anatoly'
if boynamerand = 5: $boy = 'Anton'
if boynamerand = 6: $boy = 'Arkady'
if boynamerand = 7: $boy = 'Andrew'
if boynamerand = 8: $boy = 'Boris'
if boynamerand = 9: $boy = 'Vadim'
if boynamerand = 10:$boy = 'Valentine'
if boynamerand = 11:$boy = 'Valery'
if boynamerand = 12:$boy = 'Basil'
if boynamerand = 13:$boy = 'Victor'
if boynamerand = 14:$boy = 'Vitaly'
if boynamerand = 15:$boy = 'Vladimir'
if boynamerand = 16:$boy = 'Vyacheslav'
if boynamerand = 17:$boy = 'Gennady'
if boynamerand = 18:$boy = 'George'
if boynamerand = 19:$boy = 'Gregory'
if boynamerand = 20:$boy = 'Denis'
if boynamerand = 21:$boy = 'Eugene'
if boynamerand = 22:$boy = 'Yegor'
if boynamerand = 23:$boy = 'Ivan'
if boynamerand = 24:$boy = 'Igor'
if boynamerand = 25:$boy = 'Kirill'
if boynamerand = 26:$boy = 'Leonid'
if boynamerand = 27:$boy = 'Maxim'
if boynamerand = 28:$boy = 'Michael'
if boynamerand = 29:$boy = 'Oleg'
if boynamerand = 30:$boy = 'Paul'
if boynamerand = 31:$boy = 'Peter'
if boynamerand = 32:$boy = 'Semen'
if boynamerand = 33:$boy = 'Sergey'
if boynamerand = 34:$boy = 'Stepan'
if boynamerand = 35:$boy = 'Fedor'
if boynamerand = 36:$boy = 'Edward'
if boynamerand = 37:$boy = 'Yuri'
if boynamerand = 38:$boy = 'Jacob'

$namev = $boy

!!appearance
boybodyrand = rand(1, 3)

if boybodyrand = 1: $boybody = 'tall'
if boybodyrand = 2: $boybody = 'average'
if boybodyrand = 3: $boybody = 'short'

boybodrand = rand(1, 4)

if boybodrand = 1: $boybod = 'thin'
if boybodrand = 2: $boybod = 'athletic'
if boybodrand = 3: $boybod = 'chunky'
if boybodrand = 4: $boybod = 'fat'

boyfacerand = rand(1, 3)

if boyfacerand = 1: $boyface = 'black'
if boyfacerand = 2: $boyface = 'brunet'
if boyfacerand = 3: $boyface = 'blond'

!!size eldy
grdikrand = rand(0, 100)

if grdikrand < 80:dick = rand(12, 18)
if grdikrand >= 80 and grdikrand < 90:dick = rand(8, 12)
if grdikrand >= 90:dick = rand(18, 25)

!! sexual force
silaVag = rand(0, 2)

!!variable is responsible for guy
boyonce = 0

!!Variables responsible for any features like
!!security, is responsible for the money and requirements
harakBoy = rand(0, 2)
finance = rand(0, 2)

if finance = 0:
	!!Gopnik beggar or a hard worker
	!!check in appearance Primary
	if harakBoy = 0:vneshBoy = rand(0, 2)
	if harakBoy = 1:vneshBoy = rand(0, 4)
	if harakBoy = 2:vneshBoy = rand(0, 8)

	$boyClo = 'wearing a tracksuit.'
elseif finance = 1:
	!!middle_peasant
	!!check in appearance
	if harakBoy = 0:vneshBoy = rand(0, 4)
	if harakBoy = 1:vneshBoy = rand(0, 6)
	if harakBoy = 2:vneshBoy = rand(0, 8)

	$boyClo = 'wearing jeans and a sweater.'
elseif finance = 2:
	!!middle_peasant
	!!check in appearance
	if harakBoy = 0:vneshBoy = rand(4, 8)
	if harakBoy = 1:vneshBoy = rand(6, 8)
	if harakBoy = 2:vneshBoy = rand(8, 10)

	$boyClo = 'wearing an expensive suit.'
end

!!requirements of the figure, chest size, hair color.
!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
figurBoy = rand(0, 2)
!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
titBoy = rand(0, 2)
!!0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
haerBoy = rand(0, 3)
!!character 0 - soft, 1 -norm 2 - aggressor
randizvrat = rand(0, 100)

if randizvrat < 80:izvrat = 0
if randizvrat >= 80:izvrat = 1

--- boy ---------------------------------
# boyfrend
if $ARGS[0] = 'start':
	if bfA = 0 and stopboy = 0:
		stopboy = 1
		gs 'boyfrend', 'A'
	elseif bfA > 0 and bfB = 0 and stopboy = 0:
		stopboy = 1
		gs 'boyfrend', 'B'
	elseif bfA > 0 and bfB > 0 and bfC = 0 and stopboy = 0:
		stopboy = 1
		gs 'boyfrend', 'C'
	elseif bfA > 0 and bfB > 0 and bfC > 0 and stopboy = 0:
		'Hmm, you are already three boyfriend, why do you need a fourth?'
	end
end

if $ARGS[0] = 'A':
	!!stopboy = 0
	$boyA = $boy
	boybodyrandA = boybodyrand
	$boybodyA = $boybody
	boybodrandA = boybodrand
	$boybodA = $boybod
	boyfacerandA = boyfacerand
	$boyfaceA = $boyface
	dickA = dick
	silaVagA = silaVag
	financeA = finance
	vneshBoyA = vneshBoy
	$boyCloA = $boyClo
	figurBoyA = figurBoy
	titBoyA = titBoy
	haerBoyA = haerBoy
	harakBoyA = harakBoy
	boydayA = day
	bfA = 1
	daya = 0
	boyonceA = 0
	izvratA = izvrat
	giftDayA = 0
	giftNumA = 0
	love = 0
end

if $ARGS[0] = 'B':
	!!stopboy = 0
	$boyB = $boy
	boybodyrandB = boybodyrand
	$boybodyB = $boybody
	boybodrandB = boybodrand
	$boybodB = $boybod
	boyfacerandB = boyfacerand
	$boyfaceB = $boyface
	dickB = dick
	silaVagB = silaVag
	financeB = finance
	vneshBoyB = vneshBoy
	$boyCloB = $boyClo
	figurBoyB = figurBoy
	titBoyB = titBoy
	haerBoyB = haerBoy
	harakBoyB = harakBoy
	boydayB = day
	bfB = 1
	dayb = 0
	boyonceB = 0
end

if $ARGS[0] = 'C':
	!!stopboy = 0
	$boyC = $boy
	boybodyrandC = boybodyrand
	$boybodyC = $boybody
	boybodrandC = boybodrand
	$boybodC = $boybod
	boyfacerandC = boyfacerand
	$boyfaceC = $boyface
	dickC = dick
	silaVagC = silaVag
	financeC = finance
	vneshBoyC = vneshBoy
	$boyCloC = $boyClo
	figurBoyC = figurBoy
	titBoyC = titBoy
	haerBoyC = haerBoy
	harakBoyC = harakBoy
	boydayC = day
	bfC = 1
	dayc = 0
	boyonceC = 0
end

--- boyfrend ---------------------------------
# boylove
if $ARGS[0] = 'haer':
	if haerBoyA ! hcol:
		bfA -= 1

		if haerBoyA = 0:'<<$boyA>> says that you are very beautiful, although he likes brunettes.'
		if haerBoyA = 1:'<<$boyA>> says that you are very beautiful, although he likes the brown-haired.'
		if haerBoyA = 2:'<<$boyA>> says that you are very beautiful, although he likes red.'
		if haerBoyA = 3:'<<$boyA>> says that you are very beautiful, although he likes blondes.'
	elseif haerBoyA = hcol:
		bfA += 1
		'<<$boyA>> says that you have beautiful hair.'
	end
end

if $ARGS[0] = 'figure':
	if figurBoyA = 0:
		if bedra < 80:
			bfA += 1
			'<<$boyA>> tells you that you have a perfect figure.'
		elseif bedra >= 80:
			bfA -= 1
			'<<$boyA>> says that you love him despite the fact that he always met with skinny.'
		end
	elseif figurBoyA = 1:
		if bedra > 80 and bedra < 100:
			bfA += 1
			'<<$boyA>> tells you that you have a perfect figure.'
		elseif bedra <= 80:
			bfA -= 1
			'<<$boyA>> asks whether you have anorexia.'
		elseif bedra >= 100:
			bfA -= 1
			'<<$boyA>> asks whether you are going on a diet.'
		end
	elseif figurBoyA = 2:
		if bedra >= 100:
			bfA += 1
			'<<$boyA>> tells you that you have a perfect figure.'
		elseif bedra < 100:
			bfA -= 1
			'<<$boyA>> says that you are beautiful, but the woman should be in the body.'
		end
	end
end

if $ARGS[0] = 'tits':
	!!titBoyA
	if titBoyA = 0:
		if tits < 3:
			bfA += 1
			'<<$boyA>> tells you that you have beautiful breasts.'
		elseif tits >= 3:
			bfA -= 1
			'<<$boyA>> says that you love him despite the fact that he prefers small breasts.'
		end
	elseif titBoyA = 1:
		if tits >= 3 and tits <= 4:
			bfA += 1
			'<<$boyA>> tells you that you have perfect breasts.'
		elseif tits < 3:
			bfA -= 1
			'<<$boyA>> says that you are beautiful, though small breasts.'
		elseif tits > 4:
			bfA -= 1
			'<<$boyA>> says that you have a really huge breasts.'
		end
	elseif titBoyA = 2:
		if tits > 4:
			bfA += 1
			'<<$boyA>> tells you that you have a great chest.'
		elseif tits <= 4:
			bfA -= 1
			'<<$boyA>> says that you are beautiful, though small breasts.'
		end
	end
end

--- boylove ---------------------------------

# svi
if $ARGS[0] = 'poor':
	minut += 20

	if Venera >= 3:
		bfA = 0
		'<<$boyA>> you saw signs of venereal disease and dumped you.'

		act 'Leave':gt 'street'

		exit
	end

	if sweat > 1:
		!!sweating
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
		if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'
		if harakBoyA = 3:'<<$boyA>> tells you that it appeared urgent business.'
		if harakBoyA = 4:'<<$boyA>> wrinkles her nose in disgust and tells you that she appeared urgent business.'
		if harakBoyA = 5:'<<$boyA>> tells you that you would not hurt to wash.'

		act 'Leave':gt 'street'

		exit
	end

	if $clothingworntype = 'vatnik':
		!!quilted_jacket
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
		if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'
		if harakBoyA = 3:'<<$boyA>> tells you that it appeared urgent business.'
		if harakBoyA = 4:'<<$boyA>> scornfully looks at you and tells you that she had her urgent business.'
		if harakBoyA = 5:'<<$boyA>> tells you that you are in rags like a scarecrow.'

		act 'Leave':gt 'street'

		exit
	end

	if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
		bfA = 0
		'<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'

		act 'Leave':gt 'street'

		exit
	end

	if daya < 10 and boyonceA = 0:
		!!candy buketny period
		vstrand = rand(0, 2)

		if vstrand = 0:
			'<<$boyA>> offers a walk in the park.'

			act 'Walk in the park':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You walked in the park with a guy. <<$boyA>> telling stories and jokes hunted.'

				act 'To invite':
					cla
					if dayA < 3:bfA -= 1
					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 1:
			'<<$boyA>> offers to go to the cinema.'

			act 'Go to the cinema':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You went to the cinema for a new movie. <<$boyA>> hug you.'

				act 'Hug his hand':
					cla
					bfA += 1
					'You watch a movie guy hugging hand. Finally the film ends.'

					act 'To invite':
						cla
						if dayA < 3:bfA -= 1
						gt 'svidan', 'kvartA'
					end

					act 'Say goodbye and go home':
						cla
						bfA += 1
						gt 'street'
					end
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 2:
			'<<$boyA>> offers a drink pivasika in porch.'

			act 'Drink beer':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'<<$boyA>> bought pivasika and crackers and you went with him to the porch, where drinking and fun chatting.'

				act 'To invite':
					cla

					if dayA < 3:bfA -= 1

					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		end
	elseif daya >= 10 and boyonceA = 0:
		'<<$boyA>> says he''s a grown man and he is not satisfied platonic relationship.'

		act 'Leave':
			cla
			bfA = 0
			gt 'street'
		end

		act 'Agrees to have sex':
			cla
			*clr
			minut += 20
			'You agreed to have sex. <<$boyA>> happy.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'
			act 'Go into the bushes':gt 'svidan', 'kustA'
		end

		exit
	end

	if dayA > 15:gs 'boylove', 'haer'
	if dayA > 30:gs 'boylove', 'figure'
	if dayA > 60:gs 'boylove', 'tits'

	if boyonceA > 0:
		'<<$boyA>> offers to hang out in the stairwell with pivasikom.'

		act 'Potusit':
			cla
			minut += 60
			fat += 1
			bfA += 1
			'You drank beer in the stairwell with her boyfriend. <<$boyA>> hugged you and said that he wants you.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'
			act 'Go into the bushes':gt 'svidan', 'kustA'
		end

		act 'Refuse':
			cla
			bfA -= 1
			gt 'street'
		end
	end
end

if $ARGS[0] = 'norm':
	minut += 20

	if Venera >= 3:
		bfA = 0
		'<<$boyA>> you saw signs of venereal disease and dumped you.'

		act 'Leave':gt 'street'

		exit
	end

	if sweat > 1:
		!!sweating
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
		if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'

		act 'Leave':gt 'street'

		exit
	end

	if $clothingworntype = 'vatnik':
		!!quilted_jacket
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
		if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'

		act 'Leave':gt 'street'

		exit
	end

	if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
		bfA = 0
		'<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'

		act 'Leave':gt 'street'

		exit
	end

	if daya < 10 and boyonceA = 0:
		!!candy buketny period
		vstrand = rand(0, 2)

		if vstrand = 0:
			'<<$boyA>> offers to go to the cafe.'

			act 'Go to the cafe':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You went to a cafe with a guy. <<$boyA>> telling stories and jokes hunted.'

				act 'To invite':
					cla

					if dayA < 3:bfA -= 1

					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 1:
			'<<$boyA>> offers to go to the cinema.'

			act 'Go to the cinema':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You went to the cinema for a new movie. <<$boyA>> hug you.'

				act 'Hug his hand':
					cla
					bfA += 1
					'You watch a movie guy hugging hand. Finally the film ends.'

					act 'To invite':
						cla

						if dayA < 3:bfA -= 1

						gt 'svidan', 'kvartA'
					end

					act 'Say goodbye and go home':
						cla
						bfA += 1
						gt 'street'
					end
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 2:
			'<<$boyA>> provides for a walk.'

			act 'Walk':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'<<$boyA>> to take you by the arm and you were walking down the street talking.'

				act 'To invite':
					cla

					if dayA < 3:bfA -= 1

					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		end
	elseif daya >= 10 and boyonceA = 0:
		'<<$boyA>> says he''s a grown man and he is not satisfied platonic relationship.'

		act 'Leave':
			cla
			bfA = 0
			gt 'street'
		end

		act 'Agrees to have sex':
			cla
			*clr
			minut += 20
			'You agreed to have sex. <<$boyA>> happy.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'

			act 'Go in his car':gt 'svidan', 'carA'
		end

		exit
	end

	if dayA > 12 and skin < 2:bfA -= 1
	if dayA > 12:gs 'boylove', 'haer'
	if dayA > 24:gs 'boylove', 'figure'
	if dayA > 48:gs 'boylove', 'tits'
	if dayA > 22 and glaraz < 1:bfA -= 1
	if dayA > 40 and lip < 1:bfA -= 1

	if boyonceA > 0:
		'<<$boyA>> offers sit in a cafe.'

		act 'The cafe':
			cla
			minut += 60
			fat += 1
			bfA += 1
			'You came to the cafe <<$boyA>> ordered a full table and you sat talking and having fun. <<$boyA>> hugged you and said that he wants you.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'
			act 'Go in his car':gt 'svidan', 'carA'
		end

		act 'Refuse':
			cla
			bfA -= 1
			gt 'street'
		end
	end
end

if $ARGS[0] = 'reach':
	minut += 20

	if Venera >= 3:
		bfA = 0
		'<<$boyA>> you saw signs of venereal disease and dumped you.'

		act 'Leave':gt 'street'

		exit
	end

	if sweat > 1:
		!!вsweating
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
		if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'

		act 'Leave':gt 'street'

		exit
	end

	if $clothingworntype = 'vatnik':
		!!quilted_jacket
		bfA -= 1

		if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
		if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
		if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'

		act 'Leave':gt 'street'

		exit
	end

	if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
		bfA = 0
		'<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'

		act 'Leave':gt 'street'

		exit
	end

	if dayA > 5 and skin < 3:bfA -= 1
	if dayA > 10:gs 'boylove', 'haer'
	if dayA > 20:gs 'boylove', 'figure'
	if dayA > 30:gs 'boylove', 'tits'
	if dayA > 10 and glaraz < 2:bfA -= 1
	if dayA > 6 and lip < 2:bfA -= 1
	if dayA > 8 and resnic < 1:bfA -= 1

	if daya < 10 and boyonceA = 0:
		!!candy buketny period
		vstrand = rand(0, 2)

		if vstrand = 0:
			'<<$boyA>> offers to go to the cafe.'

			act 'Go to the cafe':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You went to a cafe with a guy. <<$boyA>> telling stories and jokes hunted.'

				act 'To invite':
					cla

					if dayA < 3:bfA -= 1

					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 1:
			'<<$boyA>> offers to go to the cinema.'

			act 'Go to the cinema':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'You went to the cinema for a new movie. <<$boyA>> hug you.'

				act 'Hug his hand':
					cla
					bfA += 1
					'You watch a movie guy hugging hand. Finally the film ends.'

					act 'To invite':
						cla

						if dayA < 3:bfA -= 1

						gt 'svidan', 'kvartA'
					end

					act 'Say goodbye and go home':
						cla
						bfA += 1
						gt 'street'
					end
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		elseif vstrand = 2:
			'<<$boyA>> offers to go to the restaurant.'

			act 'Go to the restaurant':
				cla
				minut += 60
				fat += 1
				bfA += 1
				'<<$boyA>> has led you to the restaurant. There waiter quickly covered table and you sat enjoying the food, wine and socializing'

				act 'To invite':
					cla

					if dayA < 3:bfA -= 1

					gt 'svidan', 'kvartA'
				end

				act 'Say goodbye and go home':
					cla
					bfA += 1
					gt 'street'
				end
			end

			act 'Refuse':
				cla
				bfA -= 1
				gt 'street'
			end
		end
	elseif daya >= 10 and boyonceA = 0:
		'<<$boyA>> says he''s a grown man and he is not satisfied platonic relationship.'

		act 'Leave':
			cla
			bfA = 0
			gt 'street'
		end

		act 'Agrees to have sex':
			cla
			*clr
			minut += 20
			'You agreed to have sex. <<$boyA>> happy.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'
			act 'Go to him':gt 'svidan', 'hisA'
		end

		exit
	elseif boyonceA > 0:
		'<<$boyA>> offers sit in a cafe.'

		act 'The cafe':
			cla
			minut += 60
			fat += 1
			bfA += 1
			'You came to the cafe <<$boyA>> ordered a full table and you sat talking and having fun. <<$boyA>> hugged you and said that he wants you.'

			act 'Go to your apartment':gt 'svidan', 'kvartA'
			act 'Go to him':gt 'svidan', 'hisA'
		end

		act 'Refuse':
			cla
			bfA -= 1
			gt 'street'
		end
	end
end

--- svi ---------------------------------
# svidan
if $ARGS[0] = 'start':
	if svidanieA = 1 and svidanieB = 1 and svidanieC = 1:
		bfA = 0
		bfB = 0
		bfC = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		manna = 0
		willpower -= 30
		'<<$boyA>>, <<$boyB>> and <<$boyC>> come up to you, then look at each other in bewilderment. They understand everything and go. <<$boyC>> throws you goodbye "Well, you whore!"'

		act 'Leave.':gt 'street'

		exit
	elseif svidanieA = 1 and svidanieB = 1 and svidanieC = 0:
		bfA -= 1
		bfB = 0
		!!bfC = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		manna -= 10
		willpower -= 20
		'<<$boyA>> and <<$boyB>> come up to you, then look at each other in bewilderment. <<$boyA>> asked what kind of bloke you pinned. At that <<$boyB>> is outraged that he''s your guy and not this half-wit.'

		if bfA > 0:'<<$boybodyA>> <<$boybodA>> <<$boyA>> punches his rival''s face. <<$boyB>> falls to the ground with a broken face. <<$boyA>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if bfA <= 0:'<<$boyA>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$boyB>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':gt 'street'

		exit
	elseif svidanieA = 1 and svidanieB = 0 and svidanieC = 1:
		bfA -= 1
		!!bfB = 0
		bfC = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		manna -= 10
		willpower -= 20
		'<<$boyA>> and <<$boyC>> come up to you, then look at each other in bewilderment. <<$boyA>> asked what the dick from the mountain to you pinned. At that <<$boyC>> is outraged that he''s your guy and not this half-wit.'

		if bfA > 0:'<<$boybodyA>> <<$boybodA>> <<$boyA>> punches his rival''s face. <<$boyC>> falls to the ground with a broken face. <<$boyA>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if bfA <= 0:'<<$boyA>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$boyC>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':gt 'street'

		exit
	elseif svidanieA = 0 and svidanieB = 1 and svidanieC = 1:
		bfB -= 1
		!!bfB = 0
		bfC = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		manna -= 10
		willpower -= 20
		'<<$boyB>> and <<$boyC>> come up to you, then look at each other in bewilderment. <<$boyB>> asked what the dick from the mountain to you pinned. At that <<$boyC>> is outraged that he''s your guy and not this half-wit.'

		if bfb > 0:'<<$boybodyB>> <<$boybodB>> <<$boyB>> punches his rival''s face. <<$boyC>> falls to the ground with a broken face. <<$boyB>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if bfb <= 0:'<<$boyB>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$boyC>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':gt 'street'

		exit
	elseif svidanieA = 1 and svidanieB = 0 and svidanieC = 0:
		dayA += 1
		svidanieA = 0
		willpower += rand(5, 10)
		manna += rand(5, 10)

		if harakBoy = 0:
			if mop <= 2 and mop > 0:bfA += 1
			if mop = 4:bfA -= 1
		elseif harakBoy = 1:
			if mop <= 3 and mop > 0:bfA += 1
			if mop = 4:bfA -= 1
		elseif harakBoy = 2:
			if mop = 4:bfA += 1
			if mop <= 2 and mop > 0:bfA -= 1
		end

		'<<$boybodyA>> <<$boybodA>> <<$boyA>> comes up to you and kisses you welcoming.'

		if dayA >= 30:
			giftrand = rand(0, 2)

			if giftrand <= financeA:
				gift = rand(bfa * 10, bfa * 50)
				money += gift
				'<<$boyA>> made a gift to you <<gift>> rubles.'
			end
		end

		act 'Kiss.':gt 'svidan', 'a'
			act 'Avoid kissing.':
			cla
			bfA -= 1
			gt 'svidan', 'a'
		end

		exit
	elseif svidanieA = 0 and svidanieB = 1 and svidanieC = 0:
		dayB += 1
		svidanieB = 0
		'<<$boybodyb>> <<$boybodb>> <<$boyb>> comes up to you and kisses you welcoming.'

		act 'Kiss.':gt 'svidan', 'b'

		exit
	elseif svidanieA = 0 and svidanieB = 0 and svidanieC = 1:
		dayc += 1
		svidaniec = 0
		'<<$boybodyc>> <<$boybodc>> <<$boyc>> comes up to you and kisses you welcoming.'

		act 'Kiss.':gt 'svidan', 'c'

		exit
	end
end

if $ARGS[0] = 'a':
	if financeA = 0:gt 'svi', 'poor'
	if financeA = 1:gt 'svi', 'norm'
	if financeA = 2:gt 'svi', 'reach'
end

if $ARGS[0] = 'kustA':
	*clr
	minut += 20
	'You hid in the corner and ukromnoi <<$boyA>> pulled out his penis.'

	act 'Take by mouth':
		cla
		*clr
		bfA += 1

		if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

		bj += 1
		dick = dickA
		harakBoy = harakBoyA
		minut += 30
		$nameV = $boyA
		'<center><img src="images/picV/bj.jpg"></center>'
		'You kneel and <<$nameV>> pulled out his penis and offered it to your face.'
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			cumlip += 1
			'<center><img src="images/picV/swallow.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			act 'Leave.':
				cla
				gt 'street'
			end
		end

		act 'Remove the mouth.':
			cla
			*clr

			if harakBoyA = 0:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
			elseif harakBoyA = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
				elseif tiprand = 3:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'You took out a member and at this point <<$nameV>> is dead right on your face, covering it with warm and sticky cum.'
				end
			elseif harakBoyA = 2:
				facial += 1
				cumface += 1
				'<center><img src="images/picV/facial.jpg"></center>'
				'<<$nameV>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
			end

			act 'Leave':
				cla
				gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'carA':
	*clr
	minut += 20
	'You got in the car and <<$boyA>> hug you and started kissing.'

	act 'Sex':
		cla
		*clr
		bfA += 1

		if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

		sex += 1
		minut += 30
		pose = 0
		$nameV = $boyA
		dick = dickA
		silavag = silavagA
		'<center><img src="images/picV/vag.jpg"></center>'
		'<<$nameV>> you put on your back and spread your legs.'
		gs 'orgazm', 'start'

		act 'Leave.':
			cla
			gt 'street'
		end
	end

	act 'Take by mouth':
		cla
		*clr
		bfA += 1

		if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

		bj += 1
		dick = dickA
		harakBoy = harakBoyA
		minut += 30
		$nameV = $boyA
		'<center><img src="images/picV/bj.jpg"></center>'
		'You kneel and <<$nameV>> pulled out his penis and offered it to your face.'
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			cumlip += 1
			'<center><img src="images/picV/swallow.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			act 'Leave.':
				cla
				gt 'street'
			end
		end

		act 'Remove the mouth.':
			cla
			*clr

			if harakBoyA = 0:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
			elseif harakBoyA = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
				elseif tiprand = 3:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'You took out a member and at this point <<$nameV>> is dead right on your face, covering it with warm and sticky cum.'
				end
			elseif harakBoyA = 2:
				facial += 1
				cumface += 1
				'<center><img src="images/picV/facial.jpg"></center>'
				'<<$nameV>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
			end

			act 'Leave.':
				cla
				gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'hisA':
	*clr
	minut += 20
	'Once you have entered the apartment <<$boyA>> hug you and started kissing.'

	act 'Sex':
		cla
		*clr
		bfA += 1

		if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

		sex += 1
		minut += 30
		pose = 0
		$nameV = $boyA
		dick = dickA
		silavag = silavagA
		'<center><img src="images/picV/vag.jpg"></center>'
		'<<$nameV>> you put on your back and spread your legs.'
		gs 'orgazm', 'start'

		act 'Leave.':
			cla
			gt 'street'
		end
	end

	act 'Take by mouth':
		cla
		*clr
		bfA += 1

		if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

		bj += 1
		dick = dickA
		harakBoy = harakBoyA
		minut += 30
		$nameV = $boyA
		'<center><img src="images/picV/bj.jpg"></center>'
		'You kneel and <<$nameV>> pulled out his penis and offered it to your face.'
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			cumlip += 1
			'<center><img src="images/picV/swallow.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			act 'Leave.':
				cla
				gt 'street'
			end
		end

		act 'Remove the mouth.':
			cla
			*clr

			if harakBoyA = 0:
				'<center><img src="images/picV/hand.jpg"></center>'
				'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
			elseif harakBoyA = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
				elseif tiprand = 3:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'You took out a member and at this point <<$nameV>> is dead right on your face, covering it with warm and sticky cum.'
				end
			elseif harakBoyA = 2:
				facial += 1
				cumface += 1
				'<center><img src="images/picV/facial.jpg"></center>'
				'<<$nameV>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
			end

			act 'Leave.':
				cla
				gt 'street'
			end
		end
	end
end

if $ARGS[0] = 'kvartA':
	*clr
	minut += 20
	if housr > 0:housrA = 1 & housrMir = 0

	'Once you have entered the apartment <<$boyA>> hug you and started kissing.'

	if husband = 0:
		act 'Sex':
			cla
			*clr
			bfA += 1

			if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

			sex += 1
			minut += 30
			pose = 0
			$nameV = $boyA
			dick = dickA
			silavag = silavagA
			'<center><img src="images/picV/vag.jpg"></center>'
			'<<$nameV>> you put on your back and spread your legs.'
			gs 'orgazm', 'start'

			act 'Hold up doors.':
				cla
				gt 'mirror', 'fin'
			end
		end

		act 'Take by mouth':
			cla
			*clr
			bfA += 1

			if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

			bj += 1
			dick = dickA
			harakBoy = harakBoyA
			minut += 30
			$nameV = $boyA
			'<center><img src="images/picV/bj.jpg"></center>'
			'You kneel and <<$nameV>> pulled out his penis and offered it to your face.'
			gs 'oral', 'start'

			act 'Continue to suck.':
				cla
				*clr
				swallow += 1
				cumlip += 1
				'<center><img src="images/picV/swallow.jpg"></center>'
				'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$nameV>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

				act 'Hold up doors.':
					cla
					gt 'mirror', 'fin'
				end
			end

			act 'Remove the mouth.':
				cla
				*clr

				if harakBoyA = 0:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
				elseif harakBoyA = 1:
					tiprand = rand(0, 3)

					if tiprand < 3:
						'<center><img src="images/picV/hand.jpg"></center>'
						'You remove a member from his mouth and <<$nameV>> you are finished in hand.'
					elseif tiprand = 3:
						facial += 1
						cumface += 1
						'<center><img src="images/picV/facial.jpg"></center>'
						'You took out a member and at this point <<$nameV>> is dead right on your face, covering it with warm and sticky cum.'
					end
				elseif harakBoyA = 2:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'<<$nameV>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
				end

				act 'Hold up doors.':
					cla
					gt 'mirror', 'fin'
				end
			end

			act 'Masturbate him':
				cla
				*clr

				if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

				DOM += 1
				hj += 1
				minut += 30
				horny += DOM
				'<center><img src="images/picV/hand1.jpg"></center>'
				'You stripped and put the guy on the bed, while they themselves sat next to him and began to fondle his penis hands.'
				'Soon, your skillful movements guy finished you in her hands.'

				if harakBoyA = 0:bfA -= 1
				if harakBoyA = 1:bfA -= 5
				if harakBoyA = 2:bfA -= 10

				act 'Wipe your hands and hold up to the door.':
					cla
					gt 'mirror', 'fin'
				end
			end

			if DOM > 1 and kunday ! day and mesec <= 0:
				act 'Cooney':
					cla
					*clr
					kunday = day

					if boyonceA = 0:boyonceA = 1 & guy += 1 & vneshBoyA += 10

					DOM += 1
					kuni += 1
					minut += 30
					horny += DOM + (silaVag * 2 + 5)
					'<center><img src="images/picV/kuni.jpg"></center>'
					'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
					'<<$boyA>> lay down between your legs and began to work the tongue on your pussy.'

					if harakBoyA = 0:bfA -= 1
					if harakBoyA = 1:bfA -= 5
					if harakBoyA = 2:bfA -= 10

					if horny >= 90:
						horny = 0
						manna += 15
						willpower += 15
						orgasm += 1
						'Man of skillful actions you covered orgasm.'
					else
						'Actions Man though they were exciting, but they started to bore you.'
					end
				end

				act 'Further.':
					cla
					gt 'svidan', 'kvartA'
				end
			end
		end
	end
end

--- svidan ---------------------------------
# Alphabet
act 'Go to the corridor':gt 'floor'

clr
gs 'stat'
'<center><b>Dorm room</b></center>'
$ImageNeededPlacholder
! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/obskom.jpg"></center>'
'Narrow room with a single window, wooden floor, three <a href="exec:gt ''Beds'', ''choice''">beds</a>, a small <a href="exec:gt ''table''">table</a> and a few chairs. At the entrance stands an old <a href="exec:gt ''cupboard''">wardrobe</a> attached to which is an old <a href="exec:gt ''zerkaloO''">mirror</a>.'



if palto = 1:'Near the entrance hangs a simple, long-sleeved velvet jacket'
if palto = 2:'Near the entrance hangs a woman''s winter coat'
if palto = 3:'Near the entrance hangs an old-fashioned lady''s coat'
if daystart = 0:daystart = 1
if house = 1 and student = 0:
	house = 0
	'You are being evicted from the dormitory. You found yourself looking through the computer ads for a place to stay,knowing that you will remain without a roof over your head as soon as you pass the dormitory''s exit.'
end

act 'Roommate Vicky':
	cla
	clr
	gs 'stat'
	'Vicky is sitting on her bed and is as always painting her nails.'

	act 'Room':gt 'dorm'
		if hour < 23:
			act 'Chat with Vicky (1:00)':
			cla
			hour += 1
			Vika += 5
			kosmskill += 1

			if repa < 30:repa += 1

			talkrand = rand(0, 18)

			if talkrand = 0:'You started talking with Vicky, and she tells you about the boys she''s met, about parties she''s been in, and about the latest in fashion and cosmetics.'
			if talkrand = 1:'Vicky told you about the time she was in a cafe and a guy invited her to dance after paying for her bill.'
			if talkrand = 2:'Vicky told you that she used to work as a waitress at a strip bar, which is quite a lucrative job for students, although customers are often perverts.'
			if talkrand = 3:'Vicky told you that several groups of beautiful girls who were running at the college sports competitions, went on a European level sports competition and earned big money, but of course she has heard rumors of their laziness so they must have fucked to win.'
			if talkrand = 4:'Vicky told you that one of her friends got knocked up from a guy who did not have time to pull out of her. But Vicky is smarter, she buys condoms from a pharmacy. 100% satisfaction guarantee.'
			if talkrand = 5:'.Vicky told you that you can stay as long as you want,but before looking to buy an apartment or a car you should get a PC, and search through the Internet'
			if talkrand = 6:'Vicky told you how one of her friends, bought a car, rented a spot in the market and hired a saleswoman. Now he only buys goods in stock and brings them to the market himself and money is flowing his way.'
			if talkrand = 7:'Vicky told you about that one winter she went outside without a coat and got a bad cold.'
			if talkrand = 8:'Vicky tells you about a girlfriend who did not know how to lose weight, then started going to the sauna and lost weight. True, it was costly but worth it!'
			if talkrand = 9:'Vicky told you that she used to be very fond of diets, but they deteriorated skin and caused acme, and generally started to cause more harm than good. Now Vicky eats three full meals a day and has only become more beautiful for it.'
			if talkrand = 10:'Vicky said that she used to go to dances and strip live on the Internet, even managed to get into a nightclub''s live sex show, but she quickly got tired of it.'
			if talkrand = 11:'Vicky said that one time in the park, she accidentally went to a gloryhole and was offered money for sex, but she did not want to ruin her reputation. Besides, a large number of partners from early will only age you faster!'
			if talkrand = 12:'Vicky told you how she was filmed naked in studio once, not a dirty job exactly, but her reputation suffered anyway when the movie went public.'
			if talkrand = 13:'Vicky told you of a friend, one that everyone perceived as a slut, who arranged several parties in the cafe at her own expense, in an attempt to improve her image.'
			if talkrand = 14:'Vicky told you a horror story about how a pretty girl that did not wash her feet and did not shave, eventually became so terrible that everyone kilometers around her ran from her.'
			if talkrand = 15:'Vicky told you that she always buys extra tampons, and  if she goes without a monthly then quickly she would degenerate into a slut.'
			if talkrand = 16:'Vic told you how one of her boyfriends wanted anal sex, but she had no Vaseline.'
			if talkrand = 17:'Vicky said that last summer she sunbathed herself on the beach. For this, in reality she had bought a swimsuit, but it came in handy in the winter as well since she could go to the pool. The pool is not a bad way to maintain a healthy body.'
			if talkrand = 18:'Vicky said that an interesting psychological effect is that as long as you are not short on money shopping helps you forget things and get better.'

			act 'Room':gt 'dorm'
		end

		if Vika > 10:
			cla

			if vikavecher = 0:vikavecher = 1

			'Vicky told you that a party is planned regularly, and always on Fridays. You can go there with Vicky.'

			act 'Go to a party':gt 'party', 'beginning'
			act 'Don''t go to a party':gt 'dorm'
		end

		if Vika > 10 and Vzaem = 0:
			act 'Borrow money from Vicky (1,000 rubles)':
				cla
				money += 1000
				Vzaem = 1
				'Vicky fumbled in her purse and lent you 1,000 rubles in debt'

				act 'Room':gt 'dorm'
			end
		elseif Vika > 10 and Vzaem = 1 and money >= 1000:
			act 'Lent Vicky some money (1,000 rubles)':
				cla
				money -= 1000
				Vzaem = 0
				Vika += 5
				'You gave Vicky 1,000 rubles taking you in debt'

				act 'Room':gt 'dorm'
			end
		end

		if vikasex > 0 and Vika > 20:
			act 'Offer fun':
				cla
				hour += 1
				$girl = 'Vetch'
				gt 'lesb', 'beginning'
			end
		end
	end
end

act 'Roommate Galya':
	cla
	clr
	gs 'stat'
	'Galya overlaid textbooks and bison.'

	act 'Room':gt 'dorm'

	if hour < 23:
		act 'Study with Galya (1:00)':
			cla
			hour += 1
			intel += 1
			Gala += 5

			if repa > 1:repa -= 1

			'You piled your textbooks one upon the other and began to prepare to study together with Galya.'

			act 'Room':gt 'dorm'
		end

		if Gala > 10 and Gzaem = 0:
			act 'Borrow money from Ghalya (1,000 rubles)':
				cla
				money += 1000
				Gzaem = 1
				'Galya rummaged in her purse and lent you 1,000 rubles in debt'

				act 'Room':gt 'dorm'
			end
		elseif Gala > 10 and Gzaem = 1 and money >= 1000:
			act 'Lent Ghaliya some money (1,000 rubles)':
				cla
				money -= 1000
				Gzaem = 0
				Gala += 5
				'You gave Galya 1,000 rubles taking you in debt'

				act 'Room':gt 'dorm'
			end
		end
	end
end

!'
act 'Test':
	newboy = 1
	gs 'boy'
	gs 'boyopred'

	act 'Room':gt 'dorm'
end
'!

--- Alphabet ---------------------------------
# party
if $ARGS[0] = 'beginning':
	cla

	if vikavecher = 1:
		gt 'party', 'first'
	elseif vikavecher > 1:
		gt 'party', 'evening'
	end
end

if $ARGS[0] = 'first':
	cla
	vikavecher = 2
	'You have come to the party with Vika. The party was held in the male dormitory, the company of beautiful girls and guys were drinking, dancing to the music and fun.'
	'Are you politely said hello, but of particular interest to you, nobody showed'

	act 'Be overmodest':
		cla
		clr
		hour = 23
		fairy = 1
		gs 'stat'

		'You modestly sat in a corner, that would not interfere with other fun. To you started glued what that small, long-haired guy. The other guys he was called explicitly for a laugh and otherwise as a fairy and did not call.'

		act 'Leave':gt 'Loka'
	end

	act 'Cheerful':
		cla
		hour = 23
		fairy = 2
		'You drank vodka together with all and struck up a conversation gradually. You dovlno strongly opyaneli and started dancing with sex. What is a little boy with a gentle girlish face and long blond hair trying to provide you clumsy attentions. The other guys he was called explicitly for a laugh and was referred to as a fairy. Gradually you kick in the trash and bran.'
		'You woke up in a strange room, lying on his stomach, thank god clothes, then no you are not drunk ripped.'

		if jeans = 2:'<center><img src="images/picparty/jeanscum.jpg"></center>'
		if jeans ! 2:'<center><img src="images/picparty/skirtcum.jpg"></center>'

		'What''s this? Damn! What that bastard, you dragged into another room and obkonchal your ass.'

		act 'Leave':gt 'Loka'
	end
end

if $ARGS[0] = 'evening':
	cla
	'You have come to the party, a lot of beautiful girls and guys, drink, dance and hang out.'

	act 'Sit modestly':
		cla
		h = 23
		zrand = rand(50, 100)

		if vnesh < zrand:
			cla
			'You modestly sat watching the whole party opened others.'
		act 'Leave':gt 'Loka'
	elseif vnesh >= zrand:
		cla
		'You modestly modestly sat in a corner, but a guy came up to you and started to talk to you.'

		act 'Snub and go':gt 'Lok'
			act 'Keep the conversation':
				cla
				'Party ends and your new friend offers you to spend'

				act 'Refuse':gt 'Loka'

				act 'Go with a guy':
					newboy = 1
					gs 'boy'
					gs 'boyopred'
					gt 'Loka'
				end
			end
		end
	end

	act '<<$name>>':
		cla
		h = 23
		horny -= 10
		'You have fun, dance and Bukhaev.'
		itrand = rand(1, 10)

		if itrand = 1:xgt 'party', 'result'
		if itrand = 2:xgt 'party', 'result2'
		if itrand = 3:xgt 'party', 'result3'
		if itrand = 4:xgt 'party', 'result4'
		if itrand = 5:xgt 'party', 'result5'
		if itrand = 6:xgt 'party', 'result6'
		if itrand = 7:xgt 'party', 'result7'
		if itrand = 8:xgt 'party', 'result8'
		if itrand = 9:xgt 'party', 'result9'
		if itrand = 10:xgt 'party', 'result10'
	end
end

if $ARGS[0] = 'result':
	cla
	repa += 1
	'<center><img src="images/picparty/itog.jpg"></center>'
	'Gradually you distribute alcohol as hell and you start to feel sick, you end vechereniki spent hugging the toilet.'

	act 'Leave':gt 'Loka'
end

if $ARGS[0] = 'result2':
	cla
	repa += 1
	'<center><img src="images/picparty/itog2.jpg"></center>'
	'You danced and hooligans, you had the idea to dance with Vika, ended your dance light lesbian show with savory lingering kisses.'

	act 'Leave':gt 'Lok'

	act 'Vika leave an empty room':
		cla
		$girl = 'Vetch'

		if vikasex = 0:vikasex = 1 & sexf += 1

		gt 'lesb', 'beginning'
	end
end

if $ARGS[0] = 'result3':
	cla
	repa += 1
	'<center><img src="images/picparty/itog3.jpg"></center>'
	'You nakiryalis and slept in the next room with a few hardcore sex.'

	act 'Leave':gt 'Loka'
end

if $ARGS[0] = 'result4':
	cla
	repa += 1
	'<center><img src="images/picparty/itog4.jpg"></center>'
	'You get opyaneli and began to molest girls, how come you and do not understand, but you have exposed breasts and Vic kiss and lick your nipples in front of everyone.'

	act 'Leave':gt 'Loka'

	act 'Vika leave an empty room':
		cla
		$girl = 'Vetch'

		if vikasex = 0:vikasex = 1 & sexf += 1

		gt 'lesb', 'beginning'
	end
end

if $ARGS[0] = 'result5':
	cla
	repa += 1
	'<center><img src="images/picparty/itog5.jpg"></center>'

	if throat > 10:money += 100 & 'Fun and drinking, you had an argument about the girl that will be able to shove down your throat it a whole banana, not great wisdom that you have done with success and at the table. The girl gave you 100 rubles.'
	if throat <= 10:money -= 100 & 'Fun and drinking, you had an argument about the girl that will be able to shove down your throat myself a banana, you have choked on a half a banana and lost the argument. Then you gave 100 rubles.'

	act 'Leave':gt 'Loka'
end

if $ARGS[0] = 'result6':
	cla
	repa += 1
	'<center><img src="images/picparty/itog6.jpg"></center>'
	'You all evening molested girl with big breasts begging her to kiss her breasts. By evening, the two of you got drunk in the trash and then you climbed her face in his chest and began kissing them.'

	act 'Leave':gt 'Loka'
end

if $ARGS[0] = 'result7':
	cla
	repa += 1
	'<center><img src="images/picparty/itog7.jpg"></center>'
	'Natreskavshis in zyuzyu you bared her breasts and started licking her nipples.'

	act 'Leave':gt 'Loka'
end

if $ARGS[0] = 'result8':
	cla
	repa += 1
	'<center><img src="images/picparty/itog8.jpg"></center>'
	'You ran with Vika Vika became sex with what that guy is not known. You were lying next fun chatting with her until Vika tore drunk in the trash is not familiar guy.'

	act 'Leave':gt 'Loka'

	act 'Caress Vic':
		cla
		*clr
		$girl = 'Vetch'
		sex += 1

		if vikasex = 0:vikasex = 1 & sexf += 1

		! WD: Correct Image path ~ "images/picvag/tri.jpg"
		'<center><img src="images/picVA/tri.jpg"></center>'
		'You kiss and fondle breasts Vicki, she is very excited and you have decided to give her to lick your pussy.'

		if horny < 100:'You started to get tired of licking and wanted to continue'
		if horny >= 100:horny = 0 & 'Muscles of the vagina began to decline sharply, the entire abdomen as if covered hot wave of pleasure, you scream from a powerful orgasm.'

		'The guy pulls his dick out of Vicki and lifting it inserts his penis into her mouth.'

		act 'Watch':
			cla
			*clr
			! WD: Correct Image path ~ "images/picvag/tri4.jpg"
			'<center><img src="images/picVA/tri4.jpg"></center>'
			'Vick guy cums in her mouth. Vicki peremazanny lips in semen and it stretches to you that would have kissed her.'

			act 'Kissing with Vika':
				cla
				*clr
				cumlip += 1
				! WD: Correct Image path ~ "images/picvag/tri3.jpg"
				'<center><img src="images/picVA/tri3.jpg"></center>'
				'You''re kissing licking each other''s cum.'

				act 'Leave':gt 'Loka'
			end
		end

		act 'Suck together with Vika':
			cla
			*clr
			sexm += 1
			oral += 1
			cumface += 1
			! WD: Correct Image path ~ "images/picvag/tri2.jpg"
			'<center><img src="images/picVA/tri2.jpg"></center>'
			'You fucked by dick together with Vika finally ends Perrin you on the face.'

			act 'Kissing with Vika':
				cla
				*clr
				cumlip += 1
				! WD: Correct Image path ~ "images/picvag/tri3.jpg"
				'<center><img src="images/picVA/tri3.jpg"></center>'
				'You''re kissing licking each other''s cum.'

				act 'Leave':gt 'Loka'
			end
		end
	end
end

if $ARGS[0] = 'result9':
	cla
	repa += 1
	'<center><img src="images/picparty/itog9.jpg"></center>'
	'Girls love to have fun, you two had a drunken girlfriends lesbian show right at the party. Caressing, kissing and squeezing each other in front of everyone.'

	act 'Leave':gt 'Lok'
end

if $ARGS[0] = 'result10':
	cla
	repa += 1
	'<center><img src="images/picparty/itog10.jpg"></center>'
	'You got drunk and danced with what that guy who you dirty paw tits.'

	act 'Leave':gt 'Loka'

	act 'Touch for pants':
		cla
		repa += 1
		sexm += 1
		gs 'boy'
		gt 'BJ', 'beginning'
	end
end

--- party ---------------------------------
# Mall
hour += 1
horny += 1
clr
gs 'stat'
'<center><b>Market</b></center>'
! WD: Correct Image path ~ "images/etogame/rinok2.jpg"
'<center><img src="images/etogame/rinok.jpg"></center>'
'Bustling market, you can buy in the market place to buy clothes or for 30,000 rubles and receive income from the outlet, but for the purchase and delivery of course need to have a car. You can trade yourself or hire a saleswoman.'

if car = 0:
	money -= 20
	'You get on the shuttle bus and pay the fare of 20 rubles.'
elseif car > 0 and benzin > 0:
	benzin -= 1
	gs 'stat'
	'You reached into your <<$marka>>.'
elseif car > 0 and benzin <= 0:
	money -= 20
	gs 'stat'
	'You ran out of gas and you had to go on the bus, paying the fare of 20 rubles.'
end
act 'Buy':gt 'RynokP', 'selection'
act 'Go home':gt 'street'

if rinwork > 0 and hour < 9:
	act 'Salesmen':
		cla
		clr
		*clr
		hour = 17
		fat += 5
		vnesh -= 1
		monrand = rand(500, 2000)
		money += monrand

		gs 'stat'
		'You all day selling things in the market and earned <<monrand>> rubles'
		rinrand = rand(1, 100)

		if rinrand < 70 and palevorin = 0 and rinhoz = 0:
			act 'Go home':gt 'street'
		elseif rinrand >= 70 and palevorin = 0 and rinhoz = 0:
			'To you approached the owner of the tent and began to pester you, promising to write premium'

			act 'Refuse':
				cla
				money -= 2000
				'The owner imposes on you a fine of 2, 000 rubles'

				act 'Go home':gt 'street'
			end

			act 'Ogle':gt 'RynokHoz', 'beginning'
		elseif rinrand < 60 and palevorin = 0 and rinhoz = 1:
			act 'Go home':gt 'street'
		elseif rinrand >= 60 and palevorin = 0 and rinhoz = 1:
			'To you approached the owner of the tent and began to pester you, promising to write premium'

			act 'Refuse':
				cla
				money -= 2000
				'The owner imposes on you a fine of 2, 000 rubles'

				act 'Go home':gt 'street'
			end

			act 'Ogle':gt 'RynokHoz', 'beginning'
		elseif rinrand < 60 and palevorin = 1:
			'On the market there is a rumor among the sellers that you fucks boss tray'

			act 'Go home':gt 'street'
		elseif rinrand >= 60 and palevorin = 1:
			'To you approached the owner of the tent and began to pester you, promising to write premium'

			act 'Refuse':
				cla
				money -= 2000
				'The owner imposes on you a fine of 2, 000 rubles'

				act 'Go home':gt 'street'
			end

			act 'Ogle':gt 'RynokHoz', 'beginning'
		elseif rinrand < 40 and palevorin = 2:
			'On the market there is a rumor among the sellers that you fucks boss tray with buddies'
			slutrand = rand(1, 100)

			if slutrand >= 70:
				'After work, you came to the Armenian and tried to persuade you a blowjob.'

				act 'Agree':gt 'RynokHoz', 'opusteha2'
			end

			act 'Go home':gt 'street'
		elseif rinrand >= 40 and rinrand < 70 and palevorin = 2:
			'To you approached the owner of the tent and began to pester you, promising to write premium'

			act 'Refuse':
				cla
				money -= 2000
				'The owner imposes on you a fine of 2, 000 rubles'

				act 'Go home':gt 'street'
			end

			act 'Ogle':gt 'RynokHoz', 'beginning'
		elseif rinrand >= 70 and palevorin = 2:
			'To you approached the owner of the tent c already familiar to you guys and they began to entice you to perform oral sex, promising to write premium'

			act 'Refuse':
				cla
				money -= 2000
				'The owner imposes on you a fine of 2, 000 rubles'

				act 'Go home':gt 'street'
			end

			act 'Ogle':gt 'RynokHoz', 'opusteha'
		end
	end

	act 'Resign':
		cla
		work = 0
		rinwork = 0
		'You are fired.'

		act 'Go home':gt 'street'
	end
end

if busRinok = 0 and money >= 30000 and car > 0:
	act 'Buy a place in the market for a month (30,000 rubles)':
		cla
		busRinok = 30
		money -= 30000
		'You bought a place in the market for 30, 000 rubles. You need the goods'

		act 'Go home':gt 'street'
	end
end

if busRinok > 0 and tovarR > 0 and rinhour ! number:
	act 'Trade independently':
		cla
		clr
		fat -= 2
		rinhour = number
		torghour = 16 - rinhour
		torgrand = rand(1, 50)

		if tovarR >= torgrand:tovarR -= torgrand
		if tovarR < torgrand:torgrand = tovarR & tovarR = 0

		torgmoney = torgrand * 200
		money += torgmoney
		hour = 17
		torgmoney = 0
		gs 'stat'
		'You''ve earned a day <<torgmoney>> rubles, sold out <<torgrand>> pieces of the item, you have <<tovarR>> units of goods.'
		act 'Go home':gt 'street'
	end

	if rinokTorg = 0 and rinhour ! number:
		act 'Hire a saleswoman':
			cla
			rinokTorg = 1
			'You hired saleswoman 1000 rubles per day'

			act 'Go home':gt 'street'
		end
	elseif rinokTorg = 1 and rinhour ! number and tovarR > 0:
		act 'Release the goods saleswoman.':
			cla
			rinokTorgW = 1
			rinhour = number
			torghour = 16 - rinhour
			torgrand = rand(1, 50)

			if tovarR >= torgrand:tovarR -= torgrand
			if tovarR < torgrand:torgrand = tovarR & tovarR = 0

			torgmoney = torgrand * 200
			'You have given goods saleswoman, she can trade on their own.'

			act 'Go home':gt 'street'
		end
	end
end

if rinokTorg = 1 and rinhour ! number:
	act 'Dismiss saleswoman':
		cla
		rinokTorg = 0
		'You fired saleswoman'

		act 'Go home':gt 'street'
	end
end

--- Mall ---------------------------------
# Club2
if $ARGS[0] = 'tualet1':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/pics/glory.jpg"></center>'
	'You went into the booth and closed the door. The walls are covered with obscene graffiti in the walls and booths carved strange round holes. Sitting on the toilet you hear what that noise in the next stall. Through the hole in the wall you looked someone''s eyes.'
	'In a hole in the wall squeezed fat cock. Lustful voice said, "here''s a yum yum, baby."'
	'This is so not surprisingly, that you do not believe in the reality of what is happening to touch the finger member. It is hard and hot.'

	act 'Leave':gt 'club', 'inside'

	act 'Take a closer look':
		cla
		*clr
		vaf += 1

		if TQuest = 1:TQuest = 2

		guy += 1
		bj+= 1
		horny += 5
		throat += 1
		'<center><img src="images/pics/glory1.jpg"></center>'
		'You lean against a member, it''s so big, warm and solid, you licked it, then again and again.'

		act 'Cover lips':
			cla
			*clr
			'<center><img src="images/pics/glory2.jpg"></center>'
			'You bows member lips and start sucking it, trying to take it as deep as possible.'
			'Suddenly, in your mouth and poured hot tart liquid.'

			act 'Swallow':
				cla
				*clr
				vaf += 2
				swallow += 1
				cumlip += 1
				money += 2000
				'<center><img src="images/pics/glory3.jpg"></center>'
				'You dial a mouthful of sperm, and then swallow it, sperm is not tasty, sticky and sharp taste.'
				'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears pushes two thousandths bills.'

				act 'Leave':gt 'club', 'inside'
			end

			act 'Spit out':
				cla
				cumface += 1
				money += 1000
				'<center><img src="images/pics/glory3.jpg"></center>'
				'You dial a mouthful of sperm, the sperm is not tasty, sticky and sharp, you spit it on the floor.'
				'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears pokes thousandth bill.'

				act 'Leave':gt 'club', 'inside'
			end
		end
	end
end

if $ARGS[0] = 'toilet':
	cla
	clr
	*clr
	horny += 20
	gs 'stat'
	'You pee sitting on the toilet and began to wipe the vagina toilet paper. Apparently you pressed too hard because you embraced the thrill of touching between the legs.'

	act 'Leave':gt 'street'

	act 'Caress herself':
		cla
		TQuest = 1
		horny = 0
		mastr += 1
		orgasm += 1
		money += 1000
		gs 'stat'
		'<center><img src="images/pics/tomas.jpg"></center>'
		'You caress his fingers swollen pussy until you orgasm does not cover.'
		'After orgasm, you take it easy, but hear from the next stall pant, look at the wall you see that someone is peeking through the hole located in the wall.'
		'The man behind the wall and realized that found giggled, great show. Eye of the holes in the wall and disappeared into it squeezed thousandth bill.'

		act 'Leave':gt 'club', 'inside'
	end
end

if $ARGS[0] = 'toilet2':
	cla
	*clr
	'You sit in a booth and hear how you behind the toilet comes someone to slam the door adjacent booths. Before you came that the two of them.'
	'Voice from the next stall told you - do not be afraid baby, we will not hurt you, on the contrary, we will give you a couple of delicious candy with cream filling.'

	act 'Leave':gt 'club', 'inside'

	act 'Wait':
		cla
		slutiness += 10
		'<center><img src="images/pics/glory4.jpg"></center>'
		'On both sides of your booth through holes in the walls climbed members. Voice on the wall said, come on, baby, come on, we''re fed.'
		'You took both members of the hands and began to caress them, then bent over to one of the members and took it into his mouth.'
		wait 3000
		cla
		*clr
		'<center><img src="images/pics/glory5.jpg"></center>'
		'You enthusiastically fucked by both members in turn.'
		wait 3000
		cla
		*clr
		'<center><img src="images/pics/glory6.jpg"></center>'
		'Finally one of the men ends up in your mouth.'
		'You lick and start to finish processing the second term.'
		wait 3000
		cla
		*clr
		'<center><img src="images/pics/glory7.jpg"></center>'
		'The second man also lowers your mouth.'
		'You nakonchal mouthful hand you wipe the face, but in semen smeared all your face.'
		horand = rand(1, 100)

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

		wait 3000
		money += 3000
		'Glad voice said from behind the wall - you''re a great pacifier, I think you''ve earned a reward.'
		'Three thousand ruble banknote pokes through the hole in the wall.'
		wait 1000
		TQuest = 3

		if pornstudio = 0:pornstudio = 2

		guy += 2
		bj+= 2
		swallow += 2
		cumlip += 2
		deep += 2
		'A male voice said - it works for you. Take another card, if you want to come to have fun and make money.'

		act 'Leave':gt 'club', 'inside'
	end
end

--- Club2 ---------------------------------

# Menu.{Treatment}
ARGS[0] = otg_Menu_Compliance[ARGS[0]-1]
!----------
if ARGS[0] = 0:exit
!----------
$ARGS[0] = dyneval("$Result = $<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_F']")
$ARGS[1] = dyneval("$Result = $<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_M']")
!----------
dynamic "
	if $ARGS[1] <> '' or ($ARGS[0] <> '' and LOC $ARGS[0]):
		<<$otg_Menu_Current>>_Time = MSECSCOUNT-<<$otg_Menu_Current>>_Time
		otg_Menu_Time = <<$otg_Menu_Current>>_Time
		<<$otg_Menu_Current>>_Selected = -1
		<<$otg_Menu_Current>>_VybrannyyPunkt = <<ARGS[0]>>
		!----------
		$ARGS[3] = $<<$otg_Menu_Current>>_ModuliSobyty['when you select']
		if $ARGS[3] <> '':dynamic $ARGS[3],$<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_W']"+dyneval("$Result = $<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_P']")+"
		!----------
		if $ARGS[1] <> '':
			dynamic $ARGS[1]"+dyneval("$Result = $<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_P']")+"
		else
			GS $ARGS[0]"+dyneval("$Result = $<<$otg_Menu_Current>>_Parameters['<<ARGS[0]>>_P']")+"
		end
	else
		MSG 'Location ''<<$ARGS[0]>>'' Found!'
end
",$ARGS[0],$ARGS[1]

--- Menu.{Treatment} ---------------------------------

# KGstart
$KGOLklassvibor = {
	cls
	'You must select a character class.'

	if KGOLrace = 1:
		'For people available classes:Warrior, Thief, Mage.'

		act 'Warrior':$KGOLklass = 'Warrior' & KGOLklass = 1 & dynamic $KGOLklassvibor2
		act 'Thief':$KGOLklass = 'Thief' & KGOLklass = 2 & dynamic $KGOLklassvibor2
		act 'Magician':$KGOLklass = 'Magician' & KGOLklass = 3 & dynamic $KGOLklassvibor2
	elseif KGOLrace = 2:
		'For elves available classes Priest, Archer.'

		act 'Priest':$KGOLklass = 'Priest' & KGOLklass = 4 & dynamic $KGOLklassvibor2
		act 'Archer':$KGOLklass = 'Archer' & KGOLklass = 5 & dynamic $KGOLklassvibor2
	else
		'Classes available for zveroidov Barbarian.'

		act 'Barbarian':$KGOLklass = 'Barbarian' & KGOLklass = 6 & dynamic $KGOLklassvibor2
	end
}

$KGOLklassvibor2 = {
	cls
	KGOLexp = 0
	KGOLlvl = 1
	KGOLbrona = 0
	KGOLwpower = 0
	'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
	if KGOLklass = 1:
		KGOLstren = 30
		KGOLspeed = 20
		KGOLvital = 30
		KGOLintel = 20
	elseif KGOLklass = 2:
		KGOLstren = 20
		KGOLspeed = 30
		KGOLvital = 20
		KGOLintel = 30
	elseif KGOLklass = 3:
		KGOLstren = 10
		KGOLspeed = 20
		KGOLvital = 20
		KGOLintel = 50
	elseif KGOLklass = 4:
		KGOLstren = 10
		KGOLspeed = 10
		KGOLvital = 10
		KGOLintel = 70
	elseif KGOLklass = 5:
		KGOLstren = 20
		KGOLspeed = 40
		KGOLvital = 10
		KGOLintel = 30
	else
		KGOLstren = 40
		KGOLspeed = 10
		KGOLvital = 40
		KGOLintel = 10
	end

	KGHP = KGOLvital * 10
	KGManna = KGOLintel * 10

	act 'Play':KGOLpers = 1 & gt 'KGOLgame'

	act 'Delete a character':
		KGOLpers = 0
		gt $curloc
	end
}

minut += 1
gs 'stat'

if KFOnLineReaga > 0:
	'Welcome to the game Vertep World. You can play more <<KFOnLineReaga>> days'
	'At any time you can pay with a credit card that would extend the duration of the account.'
	'30 days 1000 rubles, on your credit card <<karta>>rubles'

	if KGOLpers > 0:
		'You can get in the game your character, or delete it'
		'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'

		act 'Play':gt 'KGOLgame'

		act 'Delete a character':
			KGOLpers = 0
			gt $curloc
		end
	else
		'You can create a character'

		act 'Create a character':
			cls
			$KGOLname = input("Enter your nickname")

			if $KGOLname <= 0:msg 'Not valid nickname' & gt $curloc

			'Your nickname <<$KGOLname>>'
			'You must select the player race'

			act 'Man':$KGOLrace = 'Man' & KGOLrace = 1 & dynamic $KGOLklassvibor
			act 'Elf':$KGOLrace = 'Elf' & KGOLrace = 2 & dynamic $KGOLklassvibor
			act 'Zveroid':$KGOLrace = 'Zveroid' & KGOLrace = 3 & dynamic $KGOLklassvibor
		end
	end

	if karta >= 1000:
		act 'Payment akkuaunta':
			karta -= 1000
			KFOnLineReaga += 30
			gt $curloc
		end
	end

	if karta > 0:
		act 'Donat money in the game (1rub = 1moneta)':
			cla
			KGOLdonat = input("How much money do you want zadonatit?")

			if KGOLdonat <= 0 or KGOLdonat > karta:
				msg 'Not valid operation'
			else
				karta -= KGOLdonat
				KGOLmoney += KGOLdonat
				msg 'Transferred to your account <<KGOLdonat>> coins'
			end

			gt $curloc
		end
	end
else
	'Welcome to the online game Vertep World'
	'To play this game you have to pay 1, 000 rubles for 30 days with a credit card.'

	if karta >= 1000:
		act 'Payment':
			karta -= 1000
			KFOnLineReaga += 30
			gt $curloc
		end
	end
end

act 'Leave':gt 'Komp', 'start'

--- KGstart ---------------------------------
# KGOLgame
$KGOLstat = {
	clr
	'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
	'<a href="exec:dynamic $KGOLstat2">Close Statistics</a>'

	if KGOLneedExp > 0:pl 'Total experiment <<KGOLexp>>, it is necessary to next level <<KGOLneedExp>> experience'
	if KGOLneedExp <= 0:pl '<a href="exec:dynamic $KGOLrise"><font color="red">You need to increase the level.</font></a>'

	'Power <<KGOLstren>>, speed and evasion <<KGOLspeed>>, endurance <<KGOLvital>>Intelligence <<KGOLintel>>, armor protection <<KGOLbrona>>, the bonus damage from weapons <<KGOLwpower>>'
	''
	'<center>Exodus</center>'
	'<<$KGOLset>>'
	'<<$KGOLset2>>'
	'<<$KGOLset3>>'
	'<<$KGOLset4>>'
	'<<$KGOLset5>>'
	''
	'<center>Equipment</center>'

	if KGOLpotionH > 0:pl 'Health potions <<KGOLpotionH>> pieces. <a href="exec:KGOLpotionH -= 1 & KGHP += 100 & gs ''stat'' & gt $curloc"><font color="red">Drink.</font></a>'
	if KGOLpotionM > 0:pl 'Mana potions <<KGOLpotionM>> pieces. <a href="exec:KGOLpotionM -= 1 & KGManna += 100 & gs ''stat'' & gt $curloc"><font color="red">Drink.</font></a>'

	'<center>PVE</center>'
	'Ratio <<KGOLWin>>, losses <<KGOLLoss>>'
	'<center>PVP</center>'
	'Ratio <<KGOLpvpWin>>, losses <<KGOLpvpLoss>>'
}

$KGOLstat2 = {
	gs 'stat'
}

minut += 1
gs 'stat'

if KGOLset= 0:$KGOLset = 'On the head there is nothing'
if KGOLset2 = 0:$KGOLset2 = 'Body simple clothes'
if KGOLset3 = 0:$KGOLset3 = 'Simple shoes on his feet'
if KGOLset4 = 0:$KGOLset4 = 'No gloves on hands'
if KGOLset5 = 0:$KGOLset5 = 'No weapon'
KGHPMAX = KGOLvital * 10
KGMannaMax = KGOLintel * 10

if KGHP > KGHPMAX:KGHP = KGHPMAX
if KGManna > KGMannaMax:KGManna = KGMannaMax

KGOLbrona -= KGOLbronaMod
KGOLbronaMod = 0
KGOLstren -= KGOLstrenMod
KGOLstrenMod = 0
KGOLspeed -= KGOLspeedMod
KGOLspeedMod = 0
KGOLvital -= KGOLvitalMod
KGOLvitalMod = 0
KGOLintel -= KGOLintelMod
KGOLintelMod = 0
KGOLwpower -= KGOLwpowerMod
KGOLwpowerMod = 0
KGOLcooldown = 0

if KGHP < KGHPMAX and KGOLhirka > 0:
	kghneed = KGHPMAX - KGHP

	if KGOLhirka >= kghneed:
		KGOLhirka -= kghneed
		KGHP = KGHPMAX
	else
		KGHP = KGOLhirka
		KGOLhirka = 0
	end
end

if KGHP < 0:KGHP = 0

gs 'KGOLexpa'
'<a href="exec:gt ''KGstart''">Get out of the game</a>'
'<a href="exec:dynamic $KGOLstat">View Statistics</a>'
'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
'Life <<KGHP>>, the manna <<KGManna>>'

if KGHP < KGHPMAX:'You''ve got <<KGHP*100/KGHPMAX>>% of life'
if KGManna < KGMannaMax:'You''ve got <<KGManna*100/KGMannaMax>>% of manna'
if KGOLhirka > 0:'Hirka can restore automatically <<KGOLhirka>> health units'
if KGOLPrizeM > 0:'You have <<KGOLmoney>> coins'
if KGOLneedExp <= 0:'<a href="exec:dynamic $KGOLrise"><font color="red">You need to increase the level.</font></a>'
if KGOLpoint > 0:'<a href="exec:dynamic $KGOLrise"><font color="red">You have not allocated skill points.</font></a>'
if KGOLspellpoint >= 4:'<a href="exec:dynamic $KGOLrise2"><font color="red">You can choose your skill.</font></a>'

'<<KGOLspellpoint>>'
''
'<center><b>Countryside</b></center>'
'You are in the picturesque village where to spawn characters stand motionless. NPC standing pillars and in the distance one can see the monsters.'

act 'Approach the NPC':
	cls

	minut += 1

	if KGOLmqw = 12 and KGOLlvl >= 5:
		KGOLmqw = 13
		'(NPS) - <<$KGOLname>> you need to kill the royal 10t beetles. Reward 200 experience.'
	elseif KGOLmqw = 13 and KGOLqwvip >= 10:
		KGOLqwvip = 0
		KGOLmqw = 14
		KGOLexp += 200
		'(NPS) - <<$KGOLname>> congratulations, that''s a reward of 200 experience.'
	elseif KGOLmqw = 10 and KGOLlvl >= 5:
		KGOLmqw = 11
		'(NPS) - <<$KGOLname>> you need to kill toads 10t. Reward 100 experience.'
	elseif KGOLmqw = 11 and KGOLqwvip >= 10:
		KGOLqwvip = 0
		KGOLmqw = 12
		KGOLexp += 100
		'(NPS) - <<$KGOLname>> congratulations, that''s a reward of 100 experience.'
	elseif KGOLmqw = 8:
		KGOLmqw = 9
		'(NPS) - <<$KGOLname>> you need to kill 30t young cacti. Then I''ll give you a helmet.'
	elseif KGOLmqw = 9 and KGOLqwvip >= 30:
		KGOLqwvip = 0
		KGOLmqw = 10
		KGOL= 1
		KGOLbrona += 2
		$KGOL= 'Helm of rough skin'
		'(NPS) - <<$KGOLname>> congratulations, here''s your helmet.'
	elseif KGOLmqw = 6:
		KGOLmqw = 7
		'(NPS) - <<$KGOLname>> you need to kill wolves 25t toothless. Then I''ll give you mittens.'
	elseif KGOLmqw = 7 and KGOLqwvip >= 25:
		KGOLqwvip = 0
		KGOLmqw = 8
		KGOLset4 = 1
		KGOLbrona += 2
		$KGOLset4 = 'Gauntlets of rough skin'
		'(NPS) - <<$KGOLname>> congratulations, here''s your mittens.'
	elseif KGOLmqw = 4:
		KGOLmqw = 5
		'(NPS) - <<$KGOLname>> you need to kill 20t sundews. Then I will give you boots.'
	elseif KGOLmqw = 5 and KGOLqwvip >= 20:
		KGOLqwvip = 0
		KGOLmqw = 6
		KGOLset3 = 1
		KGOLbrona += 2
		$KGOLset3 = 'Rugged Leather Boots'
		'(NPS) - <<$KGOLname>> congratulations, here are your boots.'
	elseif KGOLmqw = 2:
		KGOLmqw = 3
		'(NPS) - <<$KGOLname>> you need to kill 10t rainbow beetles. Then I will give you armor.'
	elseif KGOLmqw = 3 and KGOLqwvip >= 10:
		KGOLqwvip = 0
		KGOLmqw = 4
		KGOLset2 = 1
		KGOLbrona += 10
		$KGOLset2 = 'Simple armor'
		'(NPS) - <<$KGOLname>> congratulations, here''s your armor.'
	elseif KGOLmqw = 0:
		KGOLmqw = 1
		'(NPS) - <<$KGOLname>> you need to kill prey 5t colors. Then I''ll give you a weapon.'
	elseif KGOLmqw = 1 and KGOLqwvip >= 5:
		KGOLqwvip = 0
		KGOLmqw = 2
		KGOLset5 = 1
		KGOLwpower = 10

		if KGOLklass = 1 or KGOLklass = 6:$KGOLset5 = 'In the hands of a simple sword'
		if KGOLklass = 2:$KGOLset5 = 'In the hands of ordinary daggers'
		if KGOLklass = 3 or KGOLklass = 4:$KGOLset5 = 'In the hands of a simple staff'
		if KGOLklass = 5:$KGOLset5 = 'In the hands of a simple bow'
		'(NPS) - <<$KGOLname>> congratulations, here''s your gun.'
	end

	act 'Leave':gt $curloc
end

act 'Go to the store':
	cls

	minut += 1

	if KGOLmoney >= 300:
		act 'Buy health potion 300':
			KGOLmoney -= 300
			KGOLpotionH += 1
			gt $curloc
		end
	end

	if KGOLmoney >= 300:
		act 'Buy a potion of mana 300':
			KGOLmoney -= 300
			KGOLpotionM += 1
			gt $curloc
		end
	end

	if KGOLmoney >= 1500 and KGOLhirka <= 0:
			act 'Buy hirka 1500':
			KGOLmoney -= 1500
			KGOLhirka += 10000
			gt $curloc
		end
	end

	act 'Leave':gt $curloc
end

if KGHP < KGHPMAX or KGManna < KGMannaMax:
	act 'Regenerate (1:00)':
		cls
		minut += 60
		KGHP = KGHPMAX
		KGManna = KGMannaMax
		'It was very sad. You''ve been sitting for an hour to regenerate your character. But free.'

		act 'Leave':gt $curloc
	end
end

if KGHP > 0:
	act 'Farm near the village':
		cls
		minut += 1
		KGOLdist = rand(1, 10)
		'On a variety of monsters roam the field'

		act 'Predatory flower':
			gs 'KGOLenemy', '0'
			gt 'KGOLfight'
		end

		act 'Iridescent beetle':
			gs 'KGOLenemy', '1'
			gt 'KGOLfight'
		end

		act 'Sundew':
			gs 'KGOLenemy', '2'
			gt 'KGOLfight'
		end

		act 'Toothless dog':
			gs 'KGOLenemy', '3'
			gt 'KGOLfight'
		end

		act 'Young cactus':
			gs 'KGOLenemy', '4'
			gt 'KGOLfight'
		end
	end
end

if KGOLlvl >= 5 and KGHP > 0:
	act 'Farm near the mill':
		cls
		minut += 1
		KGOLdist = rand(1, 10)
		'Mill about a variety of monsters roam'

		act 'Toad':
			gs 'KGOLenemy', '5'
			gt 'KGOLfight'
		end

		act 'Royal beetle':
			gs 'KGOLenemy', '6'
			gt 'KGOLfight'
		end

		act 'Spotted mantis':
			gs 'KGOLenemy', '7'
			gt 'KGOLfight'
		end

		act 'Plague Rat':
			gs 'KGOLenemy', '8'
			gt 'KGOLfight'
		end

		act 'Prickly cactus':
			gs 'KGOLenemy', '9'
			gt 'KGOLfight'
		end
	end

	act 'Boss Level 5':
		gs 'KGOLboss', '1'
		gt 'KGOLfight'
	end
end

--- KGOLgame ---------------------------------
# KGOLenemy
if $ARGS[0] = '0':
	$KGname = 'Predatory flower'
	KGOLstrenV = 10
	KGOLspeedV = 10
	KGOLvitalV = 10
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(1, 3)
	KGOLPrizeM = rand(10, 30)
	KGOLennum = 0
	KGOLbronaV = 0
	KGOLneedDist = 10
	KGOLpowerV = KGOLintelV
end

if $ARGS[0] = '1':
	$KGname = 'Iridescent beetle'
	KGOLstrenV = 20
	KGOLspeedV = 10
	KGOLvitalV = 10
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(2, 5)
	KGOLPrizeM = rand(15, 35)
	KGOLennum = 1
	KGOLbronaV = 0
	KGOLneedDist = 4
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '2':
	$KGname = 'Sundew'
	KGOLstrenV = 20
	KGOLspeedV = 20
	KGOLvitalV = 10
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(3, 7)
	KGOLPrizeM = rand(20, 40)
	KGOLennum = 2
	KGOLbronaV = 0
	KGOLneedDist = 5
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '3':
	$KGname = 'Toothless dog'
	KGOLstrenV = 25
	KGOLspeedV = 20
	KGOLvitalV = 20
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(5, 10)
	KGOLPrizeM = rand(30, 50)
	KGOLennum = 3
	KGOLbronaV = 0
	KGOLneedDist = 5
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '4':
	$KGname = 'Young cactus'
	KGOLstrenV = 25
	KGOLspeedV = 25
	KGOLvitalV = 20
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(7, 14)
	KGOLPrizeM = rand(35, 60)
	KGOLennum = 4
	KGOLbronaV = 0
	KGOLneedDist = 6
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '5':
	$KGname = 'Toad'
	KGOLstrenV = 25
	KGOLspeedV = 30
	KGOLvitalV = 25
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(10, 18)
	KGOLPrizeM = rand(40, 65)
	KGOLennum = 5
	KGOLbronaV = 0
	KGOLneedDist = 6
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '6':
	$KGname = 'Royal beetle'
	KGOLstrenV = 25
	KGOLspeedV = 30
	KGOLvitalV = 35
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(12, 20)
	KGOLPrizeM = rand(45, 65)
	KGOLennum = 6
	KGOLbronaV = 0
	KGOLneedDist = 4
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '7':
	$KGname = 'Spotted mantis'
	KGOLstrenV = 35
	KGOLspeedV = 30
	KGOLvitalV = 35
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(14, 22)
	KGOLPrizeM = rand(50, 70)
	KGOLennum = 7
	KGOLbronaV = 0
	KGOLneedDist = 4
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '8':
	$KGname = 'Plague Rat'
	KGOLstrenV = 40
	KGOLspeedV = 30
	KGOLvitalV = 40
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(16, 24)
	KGOLPrizeM = rand(55, 75)
	KGOLennum = 8
	KGOLbronaV = 0
	KGOLneedDist = 4
	KGOLpowerV = KGOLstrenV
end

if $ARGS[0] = '9':
	$KGname = 'Prickly cactus'
	KGOLstrenV = 40
	KGOLspeedV = 40
	KGOLvitalV = 40
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(18, 20)
	KGOLPrizeM = rand(60, 85)
	KGOLennum = 9
	KGOLbronaV = 0
	KGOLneedDist = 4
	KGOLpowerV = KGOLstrenV
end

!!if $ARGS[0] = '10': end

--- KGOLenemy ---------------------------------
# KGOLboss
if $ARGS[0] = '1':
	$KGname = 'BOSS "Blue rat"'
	KGOLstrenV = 30
	KGOLspeedV = 30
	KGOLvitalV = 100
	KGOLintelV = 10
	KGHPV = KGOLvitalV * 10
	KGMannaV = KGOLintelV * 10
	KGOLPrizeExp = rand(25, 50)
	KGOLPrizeM = rand(150, 350)
	KGOLennumBoss = 1
	KGOLbronaV = 0
	KGOLneedDist = 3
	KGOLpowerV = KGOLstrenV
	KGOLennum = -1
end


!!if $ARGS[0] = '2':end
!!if $ARGS[0] = '3':end
!!if $ARGS[0] = '4':end
!!if $ARGS[0] = '5':end

--- KGOLboss ---------------------------------
# KGOLfight
minut += 1
gs 'stat'

if otkathirki > 0:otkathirki -= 1

if KGHP < KGHPMAX and KGOLhirka > 0 and otkathirki <= 0:
	kghneed = KGHPMAX - KGHP
	otkathirki = 3

	if KGOLhirka >= kghneed:
		KGOLhirka -= kghneed
		KGHP = KGHPMAX
	else
		KGHP = KGOLhirka
		KGOLhirka = 0
	end
end

if KGOLdist < 0:KGOLdist = 0

if KGOLtimer > 0:
	KGOLtimer -= 1

	if KGOLtimer <= 0:
		KGOLbrona -= KGOLbronaMod
		KGOLbronaMod = 0
		KGOLstren -= KGOLstrenMod
		KGOLstrenMod = 0
		KGOLspeed -= KGOLspeedMod
		KGOLspeedMod = 0
		KGOLvital -= KGOLvitalMod
		KGOLvitalMod = 0
		KGOLintel -= KGOLintelMod
		KGOLintelMod = 0
		KGOLwpower -= KGOLwpowerMod
		KGOLwpowerMod = 0
	end
end

if unvis > 0:'You are invisible'
if poison > 0:poison -= 1 & KGHPV -= KGOLspell4 * 10 & 'The poison causes damage to the enemy <<KGOLspell4 * 10>>'
if firecircle > 0:firecircle -= 1 & KGHPV -= KGOLspell9 * 50 & 'Circle of fire causes damage to the enemy <<KGOLspell9 * 50>>'

'Life <<KGHP>>, the manna <<KGManna>>'
'<<$KGname>> Life <<KGHPV>>manna <<KGMannaV>>'

if KGOLhirka > 0:'Hirka can restore automatically <<KGOLhirka>> health units'
if otkathirki > 0:'Hirka retrace through <<otkathirki>> moves.'

'Distance <<KGOLdist>>'

if KGOLtimer > 0:'Obkast will act more <<KGOLtimer>> Rounds'
if KGOLcooldown > 0:'Rollback skills completed by <<KGOLcooldown>> Rounds'
!!end of fight

if KGHP <= 0:
	KGOLloss += 1
	poison = 0
	firecircle = 0
	manna -= 100
	'You lost the fight'

	act 'Go to Rep.':gt 'KGOLgame'

	exit
end

if KGHPV <= 0:
	poison = 0
	firecircle = 0
	KGOLWin += 1
	KGOLmoney += KGOLPrizeM
	KGOLexp += KGOLPrizeExp
	manna += 100
	'<<$KGname>> fell. You win the fight.'
	'You got <<KGOLPrizeM>> coins and <<KGOLPrizeExp>> experience'

	if KGOLennumBoss = 1 and boss5lvl = 0:boss5lvl = 1 & KGOLhirka += 5000 & 'With boss tumbled small hirka'
	if KGOLennum = 0 and KGOLmqw = 1:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 1 and KGOLmqw = 3:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 2 and KGOLmqw = 5:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 3 and KGOLmqw = 7:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 4 and KGOLmqw = 9:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 5 and KGOLmqw = 11:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
	if KGOLennum = 6 and KGOLmqw = 13:KGOLqwvip += 1 & 'Another mob zafarmlen quest for'

	act 'Disengage':gt 'KGOLgame'

	exit
end

!!initiative
KGOLiniV = rand(KGOLspeedV / 2, KGOLspeedV * 2)
KGOLini = rand(KGOLspeed / 2, KGOLspeed * 2)

	if KGOLini = KGOLiniV:
		hodrand = rand(0, 1)

		if hodrand = 0:KGOLini = 1 & KGOLiniV = 0
		if hodrand = 1:KGOLini = 0 & KGOLiniV = 1
	end

	if KGOLini > KGOLiniV:KGOLiniSUM += 1
	if KGOLini < KGOLiniV:KGOLiniSUM -= 1
	if KGOLiniSUM > 3:KGOLini = 0 & KGOLiniV = 1 & KGOLiniSUM = 0
	if KGOLiniSUM < -3:KGOLini = 1 & KGOLiniV = 0 & KGOLiniSUM = 0

	!!moves
	if KGOLini > KGOLiniV or unvis > 0:
		'Now your turn'

		if KGOLklass = 1:
			!!warrior
			if KGOLdist < 3:
				act 'Attack':
					cla
					KGOLpower = KGOLstren + KGOLwpower
					dynamic $KGOLatk

					act 'Further':gt $curloc
				end

				if KGOLspell > 0 and KGManna >= KGOLspell * 10:
					act 'Powerful blow (<<KGOLspell * 10>> manna)':
						cla
						KGManna -= KGOLspell
						KGOLpower = KGOLstren + KGOLwpower+(KGOLspell * 100)
						dynamic $KGOLatk

						act 'Further':gt $curloc
					end
				end

				if KGOLspell2 > 0 and KGManna >= KGOLspell2 * 10:
					act 'Multiple shot (<<KGOLspell2 * 10>> manna)':
						cla
						KGManna -= KGOLspell2
						KGOLpower = KGOLstren + KGOLwpower
						KGLOloop = KGOLspell2 + 1
						dynamic $KGOLatkKGOLspell2

						act 'Further':gt $curloc
					end
				end

				if KGOLspell3 > 0 and KGManna >= KGOLspell3 * 10 and KGOLcooldown <= 0:
					act 'Increase armor (<<KGOLspell3 * 10>> manna)':
						cla
						KGManna -= KGOLspell3
						KGOLbronaMod += KGOLspell3 * 5
						KGOLtimer += KGOLspell3 + 1
						KGOLcooldown += KGOLspell3 + 3

						act 'Further':gt $curloc
					end
				end
			end

		elseif KGOLklass = 2:
			!!thief
			if KGOLdist < 5:
				act 'Attack':
					cla
					KGOLpower = KGOLstren + KGOLwpower
					dynamic $KGOLatk

					act 'Further':gt $curloc
				end

				if KGOLspell4 > 0 and KGManna >= KGOLspell4 * 10:
					act 'Sneaky shot (<<KGOLspell4 * 10>> manna)':
						cla
						KGManna -= KGOLspell4
						KGOLpower = KGOLstren + KGOLwpower+(KGOLspell5 * 100)
						dynamic $KGOLatk

						act 'Further':gt $curloc
					end
				end

				if KGOLspell5 > 0 and KGManna >= KGOLspell5 * 10:
					act 'Poison Blade (<<KGOLspell5 * 10>>manna)':
						cla
						KGManna -= KGOLspell5
						KGOLpower = KGOLstren + KGOLwpower
						dynamic $KGOLatkPoison

						act 'Further':gt $curloc
					end
				end

				if KGOLspell6 > 0 and KGManna >= KGOLspell6 * 10 and KGOLcooldown <= 0:
					act 'Invisibility (<<KGOLspell6 * 10>> manna)':
						cla
						KGManna -= KGOLspell6
						unvis += KGOLspell6 + 1
						KGOLcooldown += KGOLspell6 + 3

						act 'Further':gt $curloc
					end
				end
			end
		elseif KGOLklass = 3:
			!!magican
			act 'Attack':
				cla
				KGOLpower = KGOLintel + KGOLwpower
				dynamic $KGOLatk

				act 'Further':gt $curloc
			end

			if KGOLspell7 > 0 and KGManna >= KGOLspell7 * 10:
				act 'Faerboll (<<KGOLspell7 * 10>> manna)':
					cla
					KGManna -= KGOLspell7
					KGOLpower = rand(KGOLspell7 * 100, KGOLspell7 * 200)
					dynamic $KGOLatkFB

					act 'Further':gt $curloc
				end
			end

			if KGOLspell8 > 0 and KGManna >= KGOLspell8 * 10:
				act 'Dropping (<<KGOLspell5 * 10>> manna)':
					cla
					KGManna -= KGOLspell5
					KGOLdist += rand(KGOLspell5 * 10, KGOLspell5 * 50)
					'You flung the enemy and now the distance between you <<KGOLdist>> meter'

					act 'Further':gt $curloc
				end
			end

			if KGOLspell9 > 0 and KGManna >= KGOLspell9 * 10 and KGOLcooldown <= 0:
				act 'Circle of fire (<<KGOLspell9 * 10>> manna)':
					cla
					KGManna -= KGOLspell9
					firecircle += KGOLspell9 + 1
					KGOLcooldown += KGOLspell9 + 3
					'Everything around you is burning hellfire'

					act 'Further':gt $curloc
				end
			end
		elseif KGOLklass = 4:
			!!priest
			act 'Attack':
				cla
				KGOLpower = KGOLintel + KGOLwpower
				dynamic $KGOLatk

				act 'Further':gt $curloc
			end
		elseif KGOLklass = 5:
			!!archer
			act 'Attack':
				cla
				KGOLpower = KGOLspeed + KGOLwpower
				dynamic $KGOLatk

				act 'Further':gt $curloc
			end
		else
			!!barbarian
			if KGOLdist < 2:
				act 'Attack':
					cla
					KGOLpower = KGOLstren + KGOLwpower
					dynamic $KGOLatk

					act 'Further':gt $curloc
				end
			end
		end

		if KGOLdist > 0:
			act 'Flee to the enemy':
				KGOLdist -= rand(KGOLspeed/20, KGOLspeed/10)
				gt $curloc
			end
		end

		act 'Flee from the enemy':
			KGOLdist += rand(KGOLspeed/20, KGOLspeed/10)
			gt $curloc
		end

		if KGOLpotionH > 0:
			act 'Drink a health potion':
				KGOLpotionH -= 1
			KGHP += 100
			gt $curloc
		end
	end

	if KGOLpotionM > 0:
		act 'Drink the potion manna':
			KGOLpotionM -= 1
			KGManna += 100
			gt $curloc
		end
	end
else
	'Now opponents'

	if KGOLdist <= KGOLneedDist:
		'<<$KGname>> attacks you'
		dynamic $KGOLatkV
	else
		KGOLdist -= rand(KGOLspeedV/20, KGOLspeedV/10)
		'<<$KGname>> running toward you'
	end

	act 'Further':gt $curloc
end

--- KGOLfight ---------------------------------
# KGOLexpa
KGOLneedExpNextLvl = (KGOLlvl * 10) * KGOLlvl
KGOLneedExp = KGOLneedExpNextLvl - KGOLexp

if KGOLneedExp <= 0 and KGOLlvl > KGOLlvlr:KGOLlvlr = KGOLlvl & KGOLpoint += 10 & KGOLspellpoint += 1 & KGOLlvl += 1 & KGOLexp = 0

$KGOLatk = {
	KGOLzasV = rand(KGOLspeedV / 4, KGOLspeedV)
	KGOLataka = rand(KGOLspeed / 2, KGOLspeed * 2)

	if KGOLataka >= KGOLzasV:
		if KGOLataka >= KGOLzasV * 2:
			KGHPnpow = rand(KGOLpower / 2, KGOLpower)
			KGHPV -= KGHPnpow
			'<font color="green">CRETE <<KGHPnpow>></font>'
		else
			KGHPnpow = rand(KGOLpower / 10, KGOLpower / 4)
			KGHPntpow = KGHPnpow - KGOLbronaV

			if KGHPntpow <= 0:KGHPntpow = 1

			KGHPV -= KGHPnpow
			'<font color="blue">Contact with <<KGHPnpow>></font>'
		end
	else
		'<font color="red"><<$KGname>> dodged your attack</font>'
	end
}

$KGOLatkPoison = {
	KGOLzasV = rand(KGOLspeedV / 4, KGOLspeedV)
	KGOLataka = rand(KGOLspeed / 2, KGOLspeed * 2)

	if KGOLataka >= KGOLzasV:
		poison += KGOLspell4 + 1

		if KGOLataka >= KGOLzasV * 2:
			KGHPnpow = rand(KGOLpower / 2, KGOLpower)
			KGHPV -= KGHPnpow
			'<font color="green">CRETE <<KGHPnpow>></font>'
		else
			KGHPnpow = rand(KGOLpower/10, KGOLpower / 4)
			KGHPntpow = KGHPnpow - KGOLbronaV

		if KGHPntpow <= 0:KGHPntpow = 1
			KGHPV -= KGHPnpow
			'<font color="blue">Contact with <<KGHPnpow>></font>'
		end
	else
		'<font color="red"><<$KGname>> dodged your attack</font>'
	end
}

$KGOLatkFB = {
	KGHPV -= KGOLpower
	'<font color="green">Faerbol inflicts damage <<KGOLpower>> U</font>'
}

$KGOLatkV = {
	KGOLzas = rand(KGOLspeed/4, KGOLspeed)
	KGOLatakaV = rand(KGOLspeedV/2, KGOLspeedV * 2)

	if KGOLatakaV >= KGOLzas:
		if KGOLatakaV >= KGOLzas * 2:
			KGHPnpow = rand(KGOLpowerV / 2, KGOLpowerV)
			KGHP -= KGHPnpow
			'<font color="red">CRETE <<KGHPnpow>></font>'
		else
			KGHPnpow = rand(KGOLpowerV/10, KGOLpowerV / 4)
			KGHPntpow = KGHPnpow - KGOLbrona

			if KGHPntpow <= 0:KGHPntpow = 1

			KGHP -= KGHPnpow
			'<font color="brown">Contact with <<KGHPnpow>></font>'
		end
	else
		'<font color="green">You dodged the attack</font>'
	end
}

$KGOLrise = {
	cls
	'<center><b>increasing the screen layer</b></center>'
	'Power <<KGOLstren>>, speed and evasion <<KGOLspeed>>, endurance <<KGOLvital>>Intelligence <<KGOLintel>>'
	'Improve skills points available <<KGOLpoint>>'

	if KGOLpoint > 0:
		act 'Force':
			KGOLstren += 1
			KGOLpoint -= 1
			dynamic $KGOLrise
	end

		act 'Speed ​​/Dodge':
			KGOLspeed += 1
			KGOLpoint -= 1
			dynamic $KGOLrise
		end

		act 'Endurance':
			KGOLvital += 1
			KGOLpoint -= 1
			dynamic $KGOLrise
		end

		act 'Intelligence':
			KGOLintel += 1
			KGOLpoint -= 1
			dynamic $KGOLrise
		end
	end

	act 'Exit the screen improve':gt 'KGOLgame'
}

$KGOLrise2 = {
	cls
	'<center><b>Screen skills</b></center>'
	'Available skill points increase <<KGOLspellpoint/4>>'
	''
	if KGOLspellpoint >= 4:
		if KGOLklass = 1:
			!!warrior
			'Powerful punch Skill =<<KGOLspell>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Multiple blow Skill =<<KGOLspell2>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell2 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Increased armor Skill =<<KGOLspell3>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell3 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		elseif KGOLklass = 2:
			!!thief
			'Sneaky blow Skill =<<KGOLspell4>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell4 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Poison Blade, Skill =<<KGOLspell5>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell5 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Invisibility Skill =<<KGOLspell6>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell6 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		elseif KGOLklass = 3:
			!!magican
			'Faerbol, Skill =<<KGOLspell7>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell7 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Dropping, Skill =<<KGOLspell8>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell8 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Circle of fire, Skill =<<KGOLspell9>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell9 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		elseif KGOLklass = 4:
			!!priest
			'Hit, Skill =<<KGOLspell10>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell10 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Treatment Skill =<<KGOLspell11>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell11 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Obkast, Skill =<<KGOLspell12>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell12 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		elseif KGOLklass = 5:
			!!archer
			'Powerful shot, Skill =<<KGOLspell13>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell13 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Triple shot, Skill =<<KGOLspell14>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell14 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Regen mana Skill =<<KGOLspell15>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell15 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		else
			!!barbarian
			'Thunderbolt, Skill =<<KGOLspell16>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell16 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Stan Skill =<<KGOLspell17>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell17 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
			'Recovery, Skill =<<KGOLspell18>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell18 += 1 & dynamic $KGOLrise2">Attach a skill point</a>'
		end
	end

	act 'Exit the screen skills':gt 'KGOLgame'
}


$KGOLatkKGOLspell2 = {
	:multiloop
	KGLOloop -= 1
	dynamic $KGOLatk

	if KGLOloop > 0:jump 'multiloop'
}

--- KGOLexpa ---------------------------------
# KGDstart
'<center><b>Disopl</b></center>'
''

if KGDsave > 0:act 'Load a saved game':gt 'KGDgame'

act 'Play a new game':
	KGDsave = 1
	KGDmoney = 1000
	KGDHP = 100
	KGDlvl = 1
	KGDexp = 0
	KGDdam = 10
	KGDkarta = 5
	KGDsput2 = 0
	KGDsput3 = 0
	KGDsput4 = 0
	KGDsput5 = 0
	KGDsput6 = 0
	KGDday = 1
	KGDfarm = 0
	KGDlvlr = 0
	KGDlvlr2 = 0
	KGDlvlr3 = 0
	KGDlvlr4 = 0
	KGDlvlr5 = 0
	KGDlvlr6 = 0
	KGDpartyCreate = 0
	gt 'KGDgame'
end

act 'Leave':gt 'Komp', 'start'

--- KGDstart ---------------------------------
# KGDgame
minut += 1
gs 'stat'
gs 'KGDexp'
'<center><b>Date <<KGDday>></b></center>'
'<center><b>Your town</b></center>'
'<center>Buildings</center>'
'Tower Hero, which stores <<KGDmoney>> Resources'
'Farms <<KGDfarm>> pieces'
''
'<center><b>List Party hero (6t people maximum)</b></center>'
'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'

if KGDsput2 > 0:'<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
if KGDsput3 > 0:'<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
if KGDsput4 > 0:'<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
if KGDsput5 > 0:'<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
if KGDsput6 > 0:'<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'

''
'<center><b>Brands for</b></center>'
'Do you own <<KGDkarta>>% of'

act 'Next Day':
	cls
	KGDbrod = 0
	KGDday += 1
	KGDmoney += KGDkarta * 5 + KGDfarm * 10

	gt $curloc
end

if KGDmoney >= 150 and KGDfarm > KGDkarta:
	act 'Build a farm (150 resources)':
	cls
	KGDmoney -= 150
	KGDfarm += 1
	gt $curloc
	end

end

act 'Arrange the soldiers':
	cls
	KGDpartyCreate = 1
	$kgdplace = '1st place empty'
	$kgdplace2 = '2nd place is empty'
	$kgdplace3 = '3rd place is empty'
	$kgdplace4 = '4th place is empty'
	$kgdplace5 = '5th place is empty'
	$kgdplace6 = '6th place is empty'
	kgdplace = 0
	kgdplace2 = 0
	kgdplace3 = 0
	kgdplace4 = 0
	kgdplace5 = 0
	kgdplace6 = 0
	gt 'KGDparty'
end

if KGDbrod = 0 and KGDpartyCreate > 0:
	act 'Win territory':
		cls
		KGDbrod = 1
		gt 'KGDbefore'
	end
end

if KGDsput6 = 0 and KGDmoney >= 250:
	act 'Hire a satellite (250 resources)':
		cls
		KGDmoney -= 250
		KGDpartyCreate = 0

		act 'Warrior':
			if KGDsput2 = 0:
				$KGDname2 = 'Warrior'
				KGDlvl2 = 1
				KGDHP2 = 100
				KGDdam2 = 10
				KGDsput2 = 1
				KGDexp2 = 0
				gt $curloc
				exit
			end

			if KGDsput3 = 0:
				$KGDname3 = 'Warrior'
				KGDlvl3 = 1
				KGDHP3 = 100
				KGDdam3 = 10
				KGDsput3 = 1
				KGDexp3 = 0
				gt $curloc
				exit
			end

			if KGDsput4 = 0:
				$KGDname4 = 'Warrior'
				KGDlvl4 = 1
				KGDHP4 = 100
				KGDdam4 = 10
				KGDsput4 = 1
				KGDexp4 = 0
				gt $curloc
				exit
			end

			if KGDsput5 = 0:
				$KGDname5 = 'Warrior'
				KGDlvl5 = 1
				KGDHP5 = 100
				KGDdam5 = 10
				KGDsput5 = 1
				KGDexp5 = 0
				gt $curloc
				exit
			end

			if KGDsput6 = 0:
				$KGDname6 = 'Warrior'
				KGDlvl6 = 1
				KGDHP6 = 100
				KGDdam6 = 10
				KGDsput6 = 1
				KGDexp6 = 0
				gt $curloc
				exit
			end
		end

		act 'Magician':
			if KGDsput2 = 0:
				$KGDname2 = 'Magician'
				KGDlvl2 = 1
				KGDHP2 = 60
				KGDdam2 = 20
				KGDsput2 = 1
				KGDexp2 = 0
				gt $curloc
				exit
			end

			if KGDsput3 = 0:
				$KGDname3 = 'Magician'
				KGDlvl3 = 1
				KGDHP3 = 60
				KGDdam3 = 20
				KGDsput3 = 1
				KGDexp3 = 0
				gt $curloc
				exit
			end

			if KGDsput4 = 0:
				$KGDname4 = 'Magician'
				KGDlvl4 = 1
				KGDHP4 = 60
				KGDdam4 = 20
				KGDsput4 = 1
				KGDexp4 = 0
				gt $curloc
				exit
			end

			if KGDsput5 = 0:
				$KGDname5 = 'Magician'
				KGDlvl5 = 1
				KGDHP5 = 60
				KGDdam5 = 20
				KGDsput5 = 1
				KGDexp5 = 0
				gt $curloc
				exit
			end

			if KGDsput6 = 0:
				$KGDname6 = 'Magician'
				KGDlvl6 = 1
				KGDHP6 = 60
				KGDdam6 = 20
				KGDsput6 = 1
				KGDexp6 = 0
				gt $curloc
				exit
			end
		end

		act 'Archer':
			if KGDsput2 = 0:
				$KGDname2 = 'Archer'
				KGDlvl2 = 1
				KGDHP2 = 80
				KGDdam2 = 15
				KGDsput2 = 1
				KGDexp2 = 0
				gt $curloc
				exit
			end

			if KGDsput3 = 0:
				$KGDname3 = 'Archer'
				KGDlvl3 = 1
				KGDHP3 = 80
				KGDdam3 = 15
				KGDsput3 = 1
				KGDexp3 = 0
				gt $curloc
				exit
			end

			if KGDsput4 = 0:
				$KGDname4 = 'Archer'
				KGDlvl4 = 1
				KGDHP4 = 80
				KGDdam4 = 15
				KGDsput4 = 1
				KGDexp4 = 0
				gt $curloc
				exit
			end

			if KGDsput5 = 0:
				$KGDname5 = 'Archer'
				KGDlvl5 = 1
				KGDHP5 = 80
				KGDdam5 = 15
				KGDsput5 = 1
				KGDexp5 = 0
				gt $curloc
				exit
			end

			if KGDsput6 = 0:
				$KGDname6 = 'Archer'
				KGDlvl6 = 1
				KGDHP6 = 80
				KGDdam6 = 15
				KGDsput6 = 1
				KGDexp6 = 0
				gt $curloc
				exit
			end
		end

		act 'Priest':
			if KGDsput2 = 0:
				$KGDname2 = 'Priest'
				KGDlvl2 = 1
				KGDHP2 = 40
				KGDdam2 = 20
				KGDsput2 = 1
				KGDexp2 = 0
				gt $curloc
				exit
			end

			if KGDsput3 = 0:
				$KGDname3 = 'Priest'
				KGDlvl3 = 1
				KGDHP3 = 40
				KGDdam3 = 20
				KGDsput3 = 1
				KGDexp3 = 0
				gt $curloc
				exit
			end

			if KGDsput4 = 0:
				$KGDname4 = 'Priest'
				KGDlvl4 = 1
				KGDHP4 = 40
				KGDdam4 = 20
				KGDsput4 = 1
				KGDexp4 = 0
				gt $curloc
				exit
			end

			if KGDsput5 = 0:
				$KGDname5 = 'Priest'
				KGDlvl5 = 1
				KGDHP5 = 40
				KGDdam5 = 20
				KGDsput5 = 1
				KGDexp5 = 0
				gt $curloc
				exit
			end

			if KGDsput6 = 0:
				$KGDname6 = 'Priest'
				KGDlvl6 = 1
				KGDHP6 = 40
				KGDdam6 = 20
				KGDsput6 = 1
				KGDexp6 = 0
				gt $curloc
				exit
			end
		end
	end
end

act 'Quit Game':gt 'Komp', 'start'

--- KGDgame ---------------------------------
# KGDexp
KGDneedExpNextLvl = (KGDlvl * 10) * KGDlvl
KGDneedExp = KGDneedExpNextLvl - KGDexp

if KGDneedExp <= 0 and KGDlvl > KGDlvlr:KGDlvlr = KGDlvl & KGDlvl += 1 & KGDexp = 0 & KGDHP += 10 & KGDdam += 5

KGDneedExpNextLvl2 = (KGDlvl2 * 10) * KGDlvl2
KGDneedExp2 = KGDneedExpNextLvl2 - KGDexp2

if KGDneedExp2 <= 0 and KGDlvl2 > KGDlvlr2:KGDlvlr2 = KGDlvl2 & KGDlvl2 += 1 & KGDexp2 = 0 & KGDHP2 += 10 & KGDdam2 += 5

KGDneedExpNextLvl3 = (KGDlvl3 * 10) * KGDlvl3
KGDneedExp3 = KGDneedExpNextLvl3 - KGDexp3

if KGDneedExp3 <= 0 and KGDlvl3 > KGDlvlr3:KGDlvlr3 = KGDlvl3 & KGDlvl3 += 1 & KGDexp3 = 0 & KGDHP3 += 10 & KGDdam3 += 5

KGDneedExpNextLvl4 = (KGDlvl4 * 10) * KGDlvl4
KGDneedExp4 = KGDneedExpNextLvl4 - KGDexp4

if KGDneedExp4 <= 0 and KGDlvl4 > KGDlvlr4:KGDlvlr4 = KGDlvl4 & KGDlvl4 += 1 & KGDexp4 = 0 & KGDHP4 += 10 & KGDdam4 += 5

KGDneedExpNextLvl5 = (KGDlvl5 * 10) * KGDlvl5
KGDneedExp5 = KGDneedExpNextLvl5 - KGDexp5

if KGDneedExp5 <= 0 and KGDlvl5 > KGDlvlr5:KGDlvlr5 = KGDlvl5 & KGDlvl5 += 1 & KGDexp5 = 0 & KGDHP5 += 10 & KGDdam5 += 5

KGDneedExpNextLvl6 = (KGDlvl6 * 10) * KGDlvl6
KGDneedExp6 = KGDneedExpNextLvl6 - KGDexp6

if KGDneedExp6 <= 0 and KGDlvl6 > KGDlvlr6:KGDlvlr6 = KGDlvl6 & KGDlvl6 += 1 & KGDexp6 = 0 & KGDHP6 += 10 & KGDdam6 += 5

--- KGDexp ---------------------------------
# KGDbefore
KGDhealth = KGDHP
KGDhealth2 = KGDHP2
KGDhealth3 = KGDHP3
KGDhealth4 = KGDHP4
KGDhealth5 = KGDHP5
KGDhealth6 = KGDHP6
gt 'KGDfight'

--- KGDbefore ---------------------------------
# KGDfight
'Your Party'
'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
''
'Game enemy'
''
'First line. <<$kgdplacev>> <<$kgdplacev2>> <<$kgdplacev3>>'
'Second line. <<$kgdplacev4>> <<$kgdplacev5>> <<$kgdplacev6>>'

act 'Leave':gt 'KGDgame'

!!here I am and crap, niasilil group fight

--- KGDfight ---------------------------------
# KGDparty
'In part 2 of the line, front, protects a back. Each maximum of 3 fighter.'
''

if KGDrazm = 0:
	'Hero. Level <<KGDlvl>>Life <<KGDHP>>damage <<KGDdam>>. <a href="exec:KGDrazm = 1 & KGDsubsp = 1 & dynamic $kgddin">Post</a>'
else
	'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'
end

if KGDsput2 > 0:
	if KGDrazm2 = 0:
		'<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>, damage <<KGDdam2>>. <a href="exec:KGDrazm2 = 1 & KGDsubsp = 2 & dynamic $kgddin">Place</a>'
	else
		'<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
	end
end

if KGDsput3 > 0:
	if KGDrazm3 = 0:
		'<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>, damage <<KGDdam3>>. <a href="exec:KGDrazm3 = 1 & KGDsubsp = 3 & dynamic $kgddin">Place</a>'
	else
		'<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
	end
end

if KGDsput4 > 0:
	if KGDrazm4 = 0:
		'<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>, damage <<KGDdam4>>. <a href="exec:KGDrazm4 = 1 & KGDsubsp = 4 & dynamic $kgddin">Place</a>'
	else
		'<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
	end
end

if KGDsput5 > 0:
	if KGDrazm5 = 0:
		'<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>, damage <<KGDdam5>>. <a href="exec:KGDrazm5 = 1 & KGDsubsp = 5 & dynamic $kgddin">Place</a>'
	else
		'<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
	end
end

if KGDsput6 > 0:
	if KGDrazm6 = 0:
		'<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>, damage <<KGDdam6>>. <a href="exec:KGDrazm6 = 1 & KGDsubsp = 6 & dynamic $kgddin">Place</a>'
	else
		'<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'
	end
end

'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'

$kgddin = {
	cls
	'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
	'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'

	if kgdplace = 0:
		act '1st place':
			kgdplace = 1

			if KGDsubsp = 1:$kgdplace = 'Hero' & KGDsput = 1
			if KGDsubsp = 2:$kgdplace = $KGDname2 & KGDsput2 = 1
			if KGDsubsp = 3:$kgdplace = $KGDname3 & KGDsput3 = 1
			if KGDsubsp = 4:$kgdplace = $KGDname4 & KGDsput4 = 1
			if KGDsubsp = 5:$kgdplace = $KGDname5 & KGDsput5 = 1
			if KGDsubsp = 6:$kgdplace = $KGDname6 & KGDsput6 = 1

			gt $curloc
		end
	end

	if kgdplace2 = 0:
		act '2nd place':
			kgdplace2 = 1

			if KGDsubsp = 1:$kgdplace2 = 'Hero' & KGDsput = 2
			if KGDsubsp = 2:$kgdplace2 = $KGDname2 & KGDsput2 = 2
			if KGDsubsp = 3:$kgdplace2 = $KGDname3 & KGDsput3 = 2
			if KGDsubsp = 4:$kgdplace2 = $KGDname4 & KGDsput4 = 2
			if KGDsubsp = 5:$kgdplace2 = $KGDname5 & KGDsput5 = 2
			if KGDsubsp = 6:$kgdplace2 = $KGDname6 & KGDsput6 = 2

			gt $curloc
		end
	end

	if kgdplace3 = 0:
		act '3rd place':
			kgdplace3 = 1

			if KGDsubsp = 1:$kgdplace3 = 'Hero' & KGDsput = 3
			if KGDsubsp = 2:$kgdplace3 = $KGDname2 & KGDsput2 = 3
			if KGDsubsp = 3:$kgdplace3 = $KGDname3 & KGDsput3 = 3
			if KGDsubsp = 4:$kgdplace3 = $KGDname4 & KGDsput4 = 3
			if KGDsubsp = 5:$kgdplace3 = $KGDname5 & KGDsput5 = 3
			if KGDsubsp = 6:$kgdplace3 = $KGDname6 & KGDsput6 = 3

			gt $curloc
		end
	end

	if kgdplace4 = 0:
		act '4th place':
			kgdplace4 = 1

			if KGDsubsp = 1:$kgdplace4 = 'Hero' & KGDsput = 4
			if KGDsubsp = 2:$kgdplace4 = $KGDname2 & KGDsput2 = 4
			if KGDsubsp = 3:$kgdplace4 = $KGDname3 & KGDsput3 = 4
			if KGDsubsp = 4:$kgdplace4 = $KGDname4 & KGDsput4 = 4
			if KGDsubsp = 5:$kgdplace4 = $KGDname5 & KGDsput5 = 4
			if KGDsubsp = 6:$kgdplace4 = $KGDname6 & KGDsput6 = 4

			gt $curloc
		end
	end

	if kgdplace5 = 0:
		act '5th place':
			kgdplace5 = 1

			if KGDsubsp = 1:$kgdplace5 = 'Hero' & KGDsput = 5
			if KGDsubsp = 2:$kgdplace5 = $KGDname2 & KGDsput2 = 5
			if KGDsubsp = 3:$kgdplace5 = $KGDname3 & KGDsput3 = 5
			if KGDsubsp = 4:$kgdplace5 = $KGDname4 & KGDsput4 = 5
			if KGDsubsp = 5:$kgdplace5 = $KGDname5 & KGDsput5 = 5
			if KGDsubsp = 6:$kgdplace5 = $KGDname6 & KGDsput6 = 5

			gt $curloc
		end
	end

	if kgdplace6 = 0:
		act '6th place':
			kgdplace6 = 1

			if KGDsubsp = 1:$kgdplace6 = 'Hero' & KGDsput = 6
			if KGDsubsp = 2:$kgdplace6 = $KGDname2 & KGDsput2 = 6
			if KGDsubsp = 3:$kgdplace6 = $KGDname3 & KGDsput3 = 6
			if KGDsubsp = 4:$kgdplace6 = $KGDname4 & KGDsput4 = 6
			if KGDsubsp = 5:$kgdplace6 = $KGDname5 & KGDsput5 = 6
			if KGDsubsp = 6:$kgdplace6 = $KGDname6 & KGDsput6 = 6

			gt $curloc
		end
	end
}

act 'Leave':gt 'KGDgame'

--- KGDparty ---------------------------------
# KGZstart
minut += 1
nosave = 1
gs 'stat'
KGZrec = KGZday * 24 + KGZhour - 32

if KGZrecord < KGZrec:KGZrecord = KGZrec

'<center><b>Sunset Dead</b></center>'
'<center><b>Record <<KGZrecord>> hours</b></center>'

if KGZdost = 1:'Achievement:Found Fort Bragg'

'Is a survival game, the task will hold as much as possible.'

if KGZHP > 0:act 'Load a saved game':gt 'KGZgame'

act 'Play a new game':
	cls
	KGZHP = 100
	KGZplace = 0
	KGZday = 1
	KGZhour = 8
	KGZsup = 3
	KGZmedkit = 1
	KGZcopcar = 0
	KGZgun = 0
	bullet = 0
	KGZgun2 = 0
	bullet2 = 0
	KGZgun3 = 0
	bullet3 = 0
	KGZgenerator = 0
	KGZbolgarka = 0
	KGZcopdoor = 0
	KGZratia = 0
	KGZfortQW = 0
	KGZfortOru = 0
	KGZgranade = 0
	KGZdost = 0
	KGZgruzBenz = 0
	KGZgruzBenzMark = 0
	KGZgruzovik = 0
	KGZlok = 0
	KGZlok2 = 0
	KGZweapon = 0
	'INTRODUCTION'
	'DeGross entertainment'
	'in collaboration with'
	'PAPA_GANS inc.'
	'are'
	'Sundead.'
	'As harsh and merciless this world. Not that past life was better or worse. All its advantages and disadvantages. You were probably wondering, what kind of a zombie apocalypse, there are pros? I''ll tell you ... Freedom. Freedom of action and freedom of choice, everyone is free to do what really wants. For me, the beginning of the end of the world, was liberation. And even now, I realize that I was only here because of their choice, their freedom.'
	'In a past life I was an ordinary man:he went to work, met a girl, paying loans and was going to fly on vacation at some resort. On a day when everything changed, I woke up surprisingly early, the sun''s rays coming through the curtains and joyfully heralded a new day, and with it the complete collapse of the old society.'
	'My girl was not there, then I thought that she had gone to work early. How wrong I was. To my surprise, the apartment was not the light, and I put the coffee brewed in the old. Normally I do not have time to watch it, but that day I decided not to rush to work, and simply enjoy the morning. Fire a couple of balls, said that it would be necessary to go to the grocery store and absorb rather take breakfast and read long deferred detective.'
	'My peace interrupted some noise outside the front door. I heard heart-rending cries, which ended after a few seconds. Still not understanding what was happening, I grabbed the phone and quickly dialed 911. As the tube was silence, frightening and ruthless, no beeps, no sound at all, just my own echo was given in the endless corridors of radio waves.'

	act 'Play':gt 'KGZgame'
end

act 'Leave':nosave = 0 & gt 'Komp', 'start'

--- KGZstart ---------------------------------
# KGZgame
minut += 1
gs 'stat'
gs 'KGZdyn'

if KGZHP <= 0:
	cla
	*clr
	'<center><b>GAME OVER</b></center>'

	act 'Quit Game':gt 'KGZstart'

	exit
end

if KGZhour >= 6 and KGZhour <= 21:
	KGZsvet = 1
else
	KGZsvet = 0
end

'<a href="exec:gt ''KGZstart''">Get out of the game</a>'
'Health <<KGZHP>>. Day <<KGZday>>, h <<KGZhour>>.'

if KGZsup <= 0:'You have no provisions, you are starving!'

'Edged weapons:<<$KGZweapon>>'

if KGZgun > 0:'<<$KGZgun>>'
if KGZgun2 > 0:'<<$KGZgun2>>'
if KGZgun3 > 0:'<<$KGZgun3>>'

if KGZgenerator > 0:
	if KGZbenzin = 0:$KGZbenzin = 'But the generator does not work because you do not have gasoline.'
	if KGZbenzin = 1:$KGZbenzin = 'You have filled a full tank of gasoline.'

	'Do you have a portable generator runs on gasoline. <<$KGZbenzin>>'
end

if KGZbolgarka > 0:'Do you have a Bulgarian powered by electricity.'
if KGZratia = 1:'Do you have a radio.'

''

if KGZplace = 0:
	'<center><b>Apartment</b></center>'
	'Your apartment is a safe place. The apartment is stored provisions, which will be enough to <<KGZsup>> days'

	if KGZmedkit > 0:
		'First aid kits <<KGZmedkit>> pieces'

		if KGZHP < 100:
			act 'Treated':
				cls
				KGZhour += 1
				KGZHP = 100
				KGZmedkit -= 1
				minut += 1
				gs 'stat'
				'You heal health through kits.'

				act 'Further':gt $curloc
			end
		end
	end

	act 'Laze':
		cls
		KGZhour += 1
		minut += 1
		gs 'stat'
		'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'

		act 'Further':gt $curloc
	end

	act 'Leave the apartment':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 1
		KGZbatl = 0
		gs 'stat'
		'You cautiously left the apartment trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
elseif KGZplace = 1:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Street</b></center>'
	'On the street the broken machine, lie the corpses.'

	if KGZbatl = 0:
		'Roam the streets <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(5, 30)
				if KGZsvet = 2:KGZdist = rand(3, 10)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod
	end
elseif KGZplace = 2:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Shop</b></center>'
	'In store stale air from spoiled food and dead.'

	if KGZbatl = 0:
		'Wander around the store <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(3, 10)
				if KGZsvet = 2:KGZdist = rand(2, 8)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod2
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod2
	end
elseif KGZplace = 3:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Hospital</b></center>'
	'Hospital floor littered with papers and dead bodies of patients and physicians.'

	if KGZbatl = 0:
		'Wander around the hospital <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(3, 10)
				if KGZsvet = 2:KGZdist = rand(2, 8)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod3
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod3
	end
elseif KGZplace = 4:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Boulevard</b></center>'
	'On the boulevard cluster of abandoned and wrecked cars everywhere corpses.'

	if KGZbatl = 0:
		'Wander along the boulevard <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(5, 30)
				if KGZsvet = 2:KGZdist = rand(3, 10)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod4
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod4
	end
elseif KGZplace = 5:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Hunting Store</b></center>'
	'In hunting stores all counters are flipped, things scattered on the floor and something where visible decaying corpses.'

	if KGZbatl = 0:
		'Roam around the room <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 6) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod5
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod5
	end
elseif KGZplace = 6:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Police station</b></center>'
	'At the police station the police corpses scattered on the floor, tables overturned and papers strewn all around.'

	if KGZbatl = 0:
		'Roam around the room <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 5) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod6
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod6
	end
elseif KGZplace = 7:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Drugstore</b></center>'
	'In store everything upside down and smells mertvyachinoy.'

	if KGZbatl = 0:
		'Roam around the room <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 5) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod7
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod7
	end
elseif KGZplace = 8:
	KGZdead = rand(KGZday * 2, KGZday * 4)
	'<center><b>Route</b></center>'
	'On the highway, a huge traffic jam of abandoned cars, where there are some broken machines and the dead bodies.'

	if KGZbatl = 0:
		'Wander along the highway <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(5, 30)
				if KGZsvet = 2:KGZdist = rand(3, 10)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod8
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod8
	end
elseif KGZplace = 9:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Threading</b></center>'
	'At the gas station is a pair of abandoned cars. No electricity and speakers only work in manual mode.'

	if KGZbatl = 0:
		'Roam around the room <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 5) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod9
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod9
	end
elseif KGZplace = 10:
	KGZdead = rand(KGZday * 5, KGZday * 10)

	if KGZplaceA = 20:KGZplace = 100 & gt $curloc
	if KGZplaceA = 10:KGZplace = 11 & gt $curloc
	if KGZplaceA = 0:KGZplace = 8 & gt $curloc

	'<center><b>Highway in Fort Bragg</b></center>'
	'<center><b><<KGZplaceA>>th kilometer</b></center>'
	'On the highway are broken machines are corpses.'

	if KGZbatl = 0:
		'Wander along the highway <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':
				if KGZsvet = 1:KGZdist = rand(5, 30)
				if KGZsvet = 2:KGZdist = rand(3, 10)

				gt 'KGZfight'
			end
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod10
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod10
	end
elseif KGZplace = 11:
	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Fort Bragg</b></center>'
	'Fort Bragg is a small building surrounded by a fence.'

	if KGZbatl = 0:
		'Roam around the fort <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(3, 10) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod11
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod11
	end
elseif KGZplace = 12:
	if KGZdost = 0:KGZdost = 1

	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Roof Fort Bragg</b></center>'
	'On the roof is full of lying motionless rotting bodies, many spent cartridges.'
	'Provisions enough for <<KGZsup>> day'

	if KGZfortQW > 0:'<a href="exec:dynamic $KGZvincent">Young tired man in the form of Ranger</a>, sits leaning on a sniper rifle.'
	if KGZmedkit > 0:
		'First aid kits <<KGZmedkit>> pieces'

		if KGZHP < 100:
			act 'Treated':
				cls
				KGZhour += 1
				KGZHP = 100
				KGZmedkit -= 1
				minut += 1
				gs 'stat'
				'You heal health through kits.'

				act 'Further':gt $curloc
			end
		end
	end

	act 'Rest':
		cls
		KGZhour += 1
		minut += 1
		gs 'stat'
		'You have settled on the convenient roof, not taking his eyes off the hatch which can climb dead.'

		act 'Further':gt $curloc
	end

	act 'Exit to the fort':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 11
		KGZbatl = 0
		gs 'stat'
		'You gently down into the hatch, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
elseif KGZplace = 13:
	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Fort Bragg</b></center>'
	'<center><b>Food Storage</b></center>'
	'Stock dark and heard noises.'

	if KGZbatl = 0:
		'Wander around the warehouse <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 3) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod13
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod13
	end
elseif KGZplace = 14:
	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Fort Bragg</b></center>'
	'<center><b>Infirmary</b></center>'
	'In the hospital is dark and heard noises.'

	if KGZbatl = 0:
		'By Infirmary roam <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 3) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod14
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod14
	end
elseif KGZplace = 15:
	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Fort Bragg</b></center>'
	'<center><b>Arms</b></center>'
	'In the armory dark and heard noises.'

	if KGZbatl = 0:
		'On weapons roam <<KGZdead>>Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(2, 3) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod15
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod15
	end
elseif KGZplace = 16:
	KGZdead = rand(KGZday * 10, KGZday * 20)
	'<center><b>Fort Bragg</b></center>'
	'<center><b>Garage</b></center>'
	'The garage is dark and heard noises.'

	if KGZbatl = 0:
		'Roam around the garage <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

		act 'Srazhatsya':KGZdist = rand(2, 3) & gt 'KGZfight'
	else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod16
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod16
	end
elseif KGZplace = 100:
	KGZdead = rand(KGZday * 20, KGZday * 30)
	'<center><b>City Koldkrik</b></center>'
	'The city was destroyed and fires could be seen.'

	if KGZbatl = 0:
		'Roam the streets <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(10, 30) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod100
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod100
	end
elseif KGZplace = 101:
	'<center><b>House</b></center>'
	'This home is a safe place. The house is kept provision, which will be enough to <<KGZsup>> days'

	if KGZmedkit > 0:
		'First aid kits <<KGZmedkit>> pieces'

		if KGZHP < 100:
			act 'Treated':
				cls
				KGZhour += 1
				KGZHP = 100
				KGZmedkit -= 1
				minut += 1
				gs 'stat'
				'You heal health through kits.'

				act 'Further':gt $curloc
			end
		end
	end

	act 'Laze':
		cls
		KGZhour += 1
		minut += 1
		gs 'stat'
		'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'

		act 'Further':gt $curloc
	end

	act 'Out of the house':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 100
		KGZbatl = 0
		gs 'stat'
		'You cautiously left the apartment trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
elseif KGZplace = 102:
	KGZdead = rand(KGZday * 5, KGZday * 10)
	'<center><b>Supermarket</b></center>'
	'At the supermarket, dark and heard noises.'

	if KGZbatl = 0:
		'Roam the halls of the Trade <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod102
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod102
	end
elseif KGZplace = 200:
	KGZdead = rand(KGZday, KGZday * 2)
	'<center><b>Forest</b></center>'
	'In the dark forest and heard noises.'

	if KGZbatl = 0:
		'Wander through the woods <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(10, 30) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod200
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod200
	end
elseif KGZplace = 201:
	KGZdead = rand(KGZday, KGZday * 3)
	'<center><b>Farm</b></center>'
	'Large fenced farm fence.'

	if KGZbatl = 0:
		'Wander around the neighborhood <<KGZdead>> Dead'
		KGZagr = rand(0, 10)

		if KGZagr <= 8:
			'Sensing you dead immediately rush to the attack.'

			act 'Srazhatsya':KGZdist = rand(10, 30) & gt 'KGZfight'
		else
			'Fortunately, you do not notice the dead.'
			dynamic $KGZvihod201
		end
	else
		'The Walking Dead is not visible.'
		dynamic $KGZvihod201
	end
elseif KGZplace = 202:
	'<center><b>House</b></center>'
	'This home is a safe place. The house is kept provision, which will be enough to <<KGZsup>> days'

	if KGZmedkit > 0:
		'First aid kits <<KGZmedkit>> pieces'

		if KGZHP < 100:
			act 'Treated':
				cls
				KGZhour += 1
				KGZHP = 100
				KGZmedkit -= 1
				minut += 1
				gs 'stat'
				'You heal health through kits.'

				act 'Further':gt $curloc
			end
		end
	end

	act 'Laze':
		cls
		KGZhour += 1
		minut += 1
		gs 'stat'
		'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'

		act 'Further':gt $curloc
	end

	act 'Out of the house':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 201
		KGZbatl = 0
		gs 'stat'
		'You cautiously left the apartment trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
end

--- KGZgame ---------------------------------
# KGZdyn
if KGZweapon = 0:$KGZweapon = 'Fists' & $KGZweapona = 'Fist'
if KGZweapon = 1:$KGZweapon = 'Baton' & $KGZweapona = 'Shillelagh'
if KGZweapon = 2:$KGZweapon = 'Ax' & $KGZweapona = 'Ax'
if KGZgun > 0:$KGZgun = 'Pistol, cartridges <<bullet>>piece'
if KGZgun2 > 0:$KGZgun2 = 'Shotgun cartridges <<bullet2>>piece'
if KGZgun3 > 0:$KGZgun3 = 'Automatic, cartridges <<bullet3>>piece'

if KGZhour >= 24:
	KGZhour -= 24
	KGZday += 1

	if KGZsup = 0:
		KGZHP -= 10
	else
		KGZsup -= 1
	end
end

$KGZvihod = {
	if KGZweapon = 0:KGZweapon = 1 & 'You found a good cudgel lying on the pavement and took her'

	act 'Go to the apartment':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 0
		KGZbatl = 0
		gs 'stat'
		'You went to the apartment carefully trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the store':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'You cautiously went to the store with smashed storefronts trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the hospital':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 3
		KGZbatl = 0
		gs 'stat'
		'You went to the hospital carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the boulevard':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 4
		KGZbatl = 0
		gs 'stat'
		'You gingerly walked down the street, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
}

$KGZvihod2 = {
	act 'Go to the street':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 1
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search provisions':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you started searching the store looking for food.'
		KGZsupoisk = rand(0, 100)

		if KGZsupoisk = 100:
			KGZsup += 1
			'You found enough food to stretch another day.'
		elseif KGZday < KGZsupoisk:
			KGZsup += 1
			'You found enough food to stretch another day.'
		else
			'You are not able to find anything edible, all that you have found rotten and no good for eating.'
		end

		act 'Further':gt $curloc
	end
}

$KGZvihod3 = {
	act 'Go to the street':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 1
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search kits':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you started searching the hospital looking kit.'
		KGZsupoisk = rand(0, 100)

		if KGZsupoisk = 100:
			KGZmedkit += 1
			'You have found a first aid kit.'
		elseif KGZday < KGZsupoisk:
			KGZmedkit += 1
			'You have found a first aid kit.'
		else
			'You are not able to find anything useful.'
		end

		act 'Further':gt $curloc
	end
}

$KGZvihod4 = {
	act 'Go to the street to the side of his house':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 1
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the hunting store':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 5
		KGZbatl = 0
		gs 'stat'
		'You carefully went hunting store trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the police station':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 6
		KGZbatl = 0
		gs 'stat'
		'You cautiously went to the police station trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the hardware store':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 7
		KGZbatl = 0
		gs 'stat'
		'You cautiously went to the hardware store trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZcopcar = 0:
		act 'Search the police car':
			cls
			KGZhour += 1
			minut += 1
			!!KGZplace = 2
			KGZbatl = 1
			KGZcopcar = 1
			bullet += 10
			gs 'stat'
			'Noiselessly you started searching the police car.'

			if KGZgun = 0:KGZgun = 1 & 'You have found a pistol'

			'You found 10t ammunition for the gun.'

			act 'Further':gt $curloc
		end
	end

	act 'Go on the highway':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 8
		KGZbatl = 0
		gs 'stat'
		'You cautiously walked towards the highway trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
}

$KGZvihod5 = {
	act 'Leave the store':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 4
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search salesroom':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		bulletrand = rand(3, 20)
		bullet2 += bulletrand
		gs 'stat'
		'Noiselessly you started searching the hunting store.'

		if KGZgun2 = 0:KGZgun2 = 1 & 'You found a shotgun'

		'You have found <<bulletrand>>to be shotgun cartridges.'

		act 'Further':gt $curloc
	end
}

$KGZvihod6 = {
	act 'Get Outside':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 4
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search the police station':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		bulletrand = rand(3, 20)
		bullet += bulletrand
		gs 'stat'
		'Noiselessly you started searching the police station.'

		if KGZgun = 0:KGZgun = 1 & 'You have found a pistol'

		'You have found <<bulletrand>>be ammo for the gun.'

		act 'Further':gt $curloc
	end

	if KGZcopdoor = 0:
		'Armed room is locked on a massive iron door which can be opened only grinder, but the trouble is, there is no electricity.'

		if KGZgenerator > 0 and KGZbenzin > 0 and KGZbolgarka > 0:
			act 'Uncover grinder armed room':
				cls
				KGZhour += 1
				minut += 1
				KGZcopdoor = 1
				KGZbatl = 0
				bullet3 += 500
				KGZdead = KGZday * 10
				gs 'stat'
				'Noiselessly you started searching the police station.'

				if KGZgun3 = 0:KGZgun3 = 1 & 'You found Machine'

				'You have found 500 tons of ammunition for machine.'
				'The noise from the grinder ran dead and attacked you.'

				act 'Srazhatsya':KGZdist = rand(5, 8) & gt 'KGZfight'
			end
		end
	elseif KGZcopdoor = 1:
		'Armory room is empty, just a bunch of dead on the floor, according to a recent fight with you.'

		if KGZratia = 0:
			act 'Pick up radio':
				cls
				KGZhour += 1
				minut += 1
				KGZratia = 1
				KGZbatl = 1
				gs 'stat'
				'You have found a radio. Including it you heard the voice repeating the same phrase. "Everyone who hears me. Safe Haven is 10m kilometer highway. Go to Fort Bragg."'

				act 'Further':gt $curloc
			end
		end
	end
}

$KGZvihod7 = {
	act 'Get Outside':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 4
		KGZbatl = 0
		gs 'stat'
		'You carefully went into the street trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search the store':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you started searching the hardware store.'

		if KGZweapon < 2:
			KGZweapon = 2
			'You found an ax'

			act 'Further':gt $curloc

			exit
		end

		if KGZgenerator = 0:
			KGZgenerator = 1
			'You found refillable portable generator gasoline.'

			act 'Further':gt $curloc

			exit
		end

		if KGZbolgarka = 0:
			KGZbolgarka = 1
			'You found grinder is powered by electricity.'

			act 'Further':gt $curloc

			exit
		end

		'You did not find anything useful.'

		act 'Further':gt $curloc
	end
}

$KGZvihod8 = {
	act 'Exit at Boulevard':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 4
		KGZbatl = 0
		gs 'stat'
		'You went to the boulevard carefully trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the gas station':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 9
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you went to the gas station.'

		act 'Further':gt $curloc
	end

	if KGZratia > 0:
		act 'Go in the direction of Fort Bragg':
			cls
			KGZhour += 1
			minut += 1
			KGZplace = 10
			KGZplaceA = 1
			KGZbatl = 0
			gs 'stat'
			'Noiselessly you went toward Fort Bragg.'

			act 'Further':gt $curloc
		end
	end
}

$KGZvihod9 = {
	act 'Exit the highway':
		cls
		KGZhour += 1
		minut += 1
		KGZplace = 8
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZbenzin = 0:
		act 'Pour gasoline':
			cls
			KGZhour += 1
			minut += 1
			KGZbenzin = 1
			KGZbatl = 0
			gs 'stat'
			'Noiselessly you poured gasoline from the column.'

			act 'Further':gt $curloc
		end
	end
}

$KGZvihod10 = {
	if KGZplaceA < 10:$KGZplaceA = 'Fort Bragg' & $KGZplaceB = 'from the city'
	if KGZplaceA > 10:$KGZplaceA = 'from the city' & $KGZplaceB = 'Fort Bragg'

	act 'Go in the direction <<$KGZplaceA>>':
		cls
		KGZhour += 1
		minut += 1
		KGZplaceA += 1
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go in the direction <<$KGZplaceB>>':
		cls
		KGZhour += 1
		minut += 1
		KGZplaceA -= 1
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZplaceA > 10:
		act 'Go to the forest':
			cls
			KGZhour += 1
			minut += 1
			KGZbatl = 0
			KGZplace = 200
			gs 'stat'
			'You have gone off the highway into the woods.'

			act 'Further':gt $curloc
		end
	end
}

$KGZvihod11 = {
	if KGZfortQW = 0:'From the roof of a shot is fired with a sniper rifle.'
	if KGZfortQW = 0:'The man on the roof screaming you. "Fort Bragg fell. I stayed living person. Save me. Ammo I end, and ghouls and climb."'

	act 'Probivatsya the roof':
		cls
		KGZhour += 1
		minut += 1

		if KGZfortQW = 0:KGZfortQW = 1

		KGZplace = 12
		KGZbatl = 0
		KGZdead = rand(KGZday * 20, KGZday * 30)
		gs 'stat'
		'You ran into a fort surrounded on all sides dead.'

		act 'Srazhatsya':KGZdist = rand(5, 12) & gt 'KGZfight'
	end

	act 'Go to the side of the highway (the side leading to the city)':
		cls
		KGZhour += 1
		minut += 1
		KGZplaceA = 9
		KGZplace = 10
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the side of the highway (leading side of the city)':
		cls
		KGZhour += 1
		minut += 1
		KGZplaceA = 11
		KGZplace = 10
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZfortQW = 2:
		act 'Probivatsya on food warehouse':
			cls
			KGZhour += 1
			minut += 1
			KGZplace = 13
			KGZbatl = 0
			KGZdead = rand(KGZday * 20, KGZday * 30)
			gs 'stat'
			'You ran to the warehouse surrounded on all sides dead.'

			act 'Srazhatsya':KGZdist = rand(5, 12) & gt 'KGZfight'
		end

		act 'Probivatsya infirmary':
			cls
			KGZhour += 1
			minut += 1
			KGZplace = 14
			KGZbatl = 0
			KGZdead = rand(KGZday * 20, KGZday * 30)
			gs 'stat'
			'You ran into the hospital surrounded on all sides dead.'

			act 'Srazhatsya':KGZdist = rand(5, 12) & gt 'KGZfight'
		end

		act 'Probivatsya armory':
			cls
			KGZhour += 1
			minut += 1
			KGZplace = 15
			KGZbatl = 0
			KGZdead = rand(KGZday * 20, KGZday * 30)
			gs 'stat'
			'You ran into the hospital surrounded on all sides dead.'

			act 'Srazhatsya':KGZdist = rand(5, 12) & gt 'KGZfight'
		end

		act 'Probivatsya in garage':
			cls
			KGZhour += 1
			minut += 1
			KGZplace = 16
			KGZbatl = 0
			KGZdead = rand(KGZday * 20, KGZday * 30)
			gs 'stat'
			'You ran into the hospital surrounded on all sides dead.'

			act 'Srazhatsya':KGZdist = rand(5, 12) & gt 'KGZfight'
		end
	end
}


$KGZvihod13 = {
	act 'Exit at Fort Bragg':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 11
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search the warehouse':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you started searching the dark warehouse.'
		udacharand = rand(0, 1)

		if udacharand = 1:
			KGZsuprand = rand(1, 3)
			KGZsup += KGZsuprand
			'You have found the diet <<KGZsuprand>> days'
		elseif udacharand = 0:
			KGZdead = rand(KGZday * 5, KGZday * 10)
			'On the box seemed barely visible in the dark and dead with uterine howling toward you.'

			act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'

			exit
		end

		act 'Further':gt $curloc
	end
}

$KGZvihod14 = {
	act 'Exit at Fort Bragg':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 11
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search the infirmary':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'
		'Noiselessly you started searching the dark infirmary.'
		udacharand = rand(0, 1)

		if udacharand = 1:
			KGZmedkit += 1
			'You have found a first aid kit'
		elseif udacharand = 0:
			KGZdead = rand(KGZday * 5, KGZday * 10)
			'On the box seemed barely visible in the dark and dead with uterine howling toward you.'

			act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'

			exit
		end

		act 'Further':gt $curloc
	end
}

$KGZvihod15 = {
	act 'Exit at Fort Bragg':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 11
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Search armory':
		cls
		KGZhour += 1
		minut += 1
		!!KGZplace = 2
		KGZbatl = 0
		gs 'stat'

		if KGZfortOru = 1:
			'In Munitions nothing useful.'
		elseif KGZfortOru = 0:
			KGZfortOru = 1
			'In Munitions you find ammunition for machine 300 pieces and 10 grenades.'
			KGZgranade += 10
			bullet3 += 300
		end

		'.'

		act 'Further':gt $curloc
	end
}

$KGZvihod16 = {
	act 'Exit at Fort Bragg':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 11
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZgruzovik = 0:
		act 'Climb into the truck':
			cls
			KGZhour += 1
			minut += 1
			!!KGZplace = 2
			KGZbatl = 0
			gs 'stat'

			if KGZgruzBenz = 1:
				'You sat in the cab on the driver''s seat and brought the truck.'

				act 'Go':
					cls
					'Truck uterine growled jumped into the courtyard of the fort where a crowd had gathered the dead, you go to cut into the crowd and began to push the ghouls, the engine speed drops, the engine roared overwrought gliding over crushed bodies, dead hands clung to the cabin. Some ghouls hung on the cabin in the mirror was clear that the body you have climbed too dead. Gate to the fort closed and they have to knock.'

					act 'Clear the gate':
						cls
						'You disperse truck hit the gate of the fort. You strongly shaken and rattled the gate collapsed. Something like a truck drove out of the courtyard of the fort on the highway clogged.'

						act 'Drive along the highway into town':
							cls
							KGZgruzovik = 1
							KGZplace = 10
							KGZplaceA = 9
							KGZdead = rand(KGZday * 50, KGZday * 100)
							'Your truck surrounded by a ring of the dead tried to clear the road of traffic jams. But you get stuck. There is no choice, already dead truck stuck like flies.'

							act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'
						end

						act 'Ride on the highway out of town':
							cls
							KGZgruzovik = 2
							KGZplace = 10
							KGZplaceA = 11
							KGZdead = rand(KGZday * 50, KGZday * 100)
							'Your truck surrounded by a ring of the dead tried to clear the road of traffic jams. But you get stuck. There is no choice, already dead truck stuck like flies.'

							act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'
						end

						act 'To go along the side of the city':
							cls
							KGZgruzovik = 3
							KGZplace = 10
							KGZplaceA = 7
							KGZdead = rand(KGZday * 50, KGZday * 100)
							'Your truck surrounded by a ring of the dead went on slippery roadside. When the truck crushed corpses wheel very punt and you still make a mistake, the truck slid into a ditch and overturned. There is no choice, already dead truck stuck like flies.'

							act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'
						end

						act 'To go along the side of the city':
							cls
							KGZgruzovik = 4
							KGZplace = 10
							KGZplaceA = 13
							KGZdead = rand(KGZday * 50, KGZday * 100)
							'Your truck surrounded by a ring of the dead went on slippery roadside. When the truck crushed corpses wheel very punt and you still make a mistake, the truck slid into a ditch and overturned. There is no choice, already dead truck stuck like flies.'

							act 'Srazhatsya':KGZdist = rand(5, 10) & gt 'KGZfight'
						end
					end
				end
			elseif KGZgruzBenz = 0:
				KGZgruzBenzMark = 1
				'Heck, empty tank truck, standing next column, you only need to fill.'
			end

			act 'Get out of the cab':gt $curloc
		end
	end

	if KGZgruzBenzMark = 1:
		act 'Exit at Fort Bragg':
			cls
			KGZhour += 1
			minut += 1
			KGZbatl = 0
			KGZgruzBenz = 1
			gs 'stat'
			'You carefully tucked truck gasoline.'

			act 'Further':gt $curloc
		end
	end
}


$KGZvihod100 = {
	act 'Wander through the dead city':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 100
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'
		KGZlocrand = rand(0, 100)

		if KGZlocrand >= 90 and KGZlok = 0:
			KGZlok = 1
			'You have found a solid house with iron bars on the windows'

			act 'Enter the house':KGZplace = 101 & gt $curloc
		elseif KGZlocrand >= 80 and KGZlok2 = 0:
			KGZlok2 = 1
			'You find a large supermarket where when it sold a variety of goods'

			act 'Sign in to supermarket':KGZplace = 102 & gt $curloc
		end

		act 'Further':gt $curloc
	end

	act 'Go to the side of the highway':
		cls
		KGZhour += 1
		minut += 1
		KGZplaceA = 19
		KGZplace = 10
		KGZbatl = 0
		gs 'stat'
		'You went to the highway carefully, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	if KGZlok = 1:act 'Enter the house':KGZhour += 1 & KGZplace = 101 & gt $curloc
	if KGZlok2 = 1:act 'Sign in to supermarket':KGZhour += 1 & KGZplace = 102 & gt $curloc
}

$KGZvihod102 = {
	act 'Get out of the supermarket':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 100
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Scour supermarket':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		gs 'stat'
		'You gently started to fumble in search of useful, trying not to stumble on the dead.'
		udarand = rand(0, 100)

		if udarand >= 90:
			tiprand = rand(0, 1)
			if tiprand = 0:KGZsup += 1 & 'You are lucky and you find food'
			if tiprand = 1:KGZmedkit += 1 & 'You are lucky and you find a first aid kit'
		end

		act 'Further':gt $curloc
	end
}

$KGZvihod200 = {
	act 'Walk through the woods to the highway':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 10
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Walk through the woods from the highway':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 201
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
}

$KGZvihod201 = {
	act 'Go to the forest':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 200
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end

	act 'Go to the farmhouse':
		cls
		KGZhour += 1
		minut += 1
		KGZbatl = 0
		KGZplace = 202
		gs 'stat'
		'You went cautiously, trying not to stumble on the dead.'

		act 'Further':gt $curloc
	end
}

$KGZvincent = {
	cls

	if KGZfortQW = 1:KGZfortQW = 2

	'The fort has arsenal and warehouse with food, hospital and garage with trucks. But a lot of dead, really a lot. Several soldiers tried to break but died. Some tried to use flamethrowers, but still dead burn, they manage to reach the man and the end. From the fort should leave as soon as possible.'

	act 'Further':gt $curloc
}

$KGZfizatk = {
	if KGZweapon = 0:
		KGZuspeh = rand(0, 100)

		if KGZuspeh <= 30:
			KGZdead -= 1
			'You were very good ghouls fist on the head and he fell stopping moves.'
		else
			'Ghoul irreversible no attention to your punch.'
		end
	elseif KGZweapon = 1:
		KGZuspeh = rand(0, 100)

		if KGZuspeh <= 50:
			KGZdead -= 1
			'You were very good ghouls club head and he fell stopping moves.'
		else
			'Ghoul irreversible no attention to your clubbing.'
		end
	elseif KGZweapon = 2:
		KGZuspeh = rand(0, 100)

		if KGZuspeh <= 70:
			KGZdead -= 1
			'You were very good ghouls ax on the head and he fell stopping moves.'
		else
			'Ghoul irreversible no attention to your ax blow.'
		end
	end

	if KGZdead > 0:
		kgzuron = rand(KGZdead * 2, KGZdead * 5)
		KGZHP -= kgzuron
		'<<KGZdead>> dead clutching at you, trying to tear.'
		'<b><font color="red">you have caused damage <<kgzuron>> units.</font></b>'
	end
}

$KGZgunatk = {
	KGZuspeh = rand(0, 100)
	if KGZdist <= 5:
		if KGZuspeh <= 90:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	elseif KGZdist <= 10:
		if KGZuspeh <= 80:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	else
		if KGZuspeh <= 70:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	end
}

$KGZgunatk2 = {
	KGZuspeh = rand(0, 100)

	if KGZdist <= 5:
		if KGZuspeh <= 100:
			KGZdead -= 1
			'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	elseif KGZdist <= 10:
		if KGZuspeh <= 70:
			KGZdead -= 1
			'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	else
		if KGZuspeh <= 50:
			KGZdead -= 1
			'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	end
}

$KGZgunatk3 = {
	KGZuspeh = rand(0, 100)

	if KGZdist <= 5:
		if KGZuspeh <= 70:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	elseif KGZdist <= 10:
		if KGZuspeh <= 95:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	else
		if KGZuspeh <= 85:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You hit the dead.'
		end
	end
}

$KGZgunatk4 = {
	:KGZmarkgun
	KGZbulgun -= 1
	KGZuspeh = rand(0, 100)

	if KGZdead > 0:
		if KGZdist <= 5:
			if KGZuspeh <= 80:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		elseif KGZdist <= 10:
			if KGZuspeh <= 70:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		else
			if KGZuspeh <= 60:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		end
	end

	if KGZbulgun > 0:jump 'KGZmarkgun'
}

$KGZgunatk5 = {
	:KGZmarkgunb
	KGZbulgun -= 1
	KGZuspeh = rand(0, 100)

	if KGZdead > 0:
		if KGZdist <= 5:
			if KGZuspeh <= 70:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		elseif KGZdist <= 10:
			if KGZuspeh <= 60:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		else
			if KGZuspeh <= 50:
				KGZdead -= 1
				'You put a bullet in his head and he fell ghoul stopping moves.'
			else
				'You hit the dead.'
			end
		end
	end

	if KGZbulgun > 0:jump 'KGZmarkgunb'
}

$KGZdeadmanatk = {
	if KGZdist > 0:KGZdist -= 1

	if KGZdead > 0 and KGZdist <= 2:
		kgzuron = rand(KGZdead * 2, KGZdead * 5)
		KGZHP -= kgzuron
		'<<KGZdead>> dead clutching at you, trying to tear.'
		'<b><font color="red">you have caused damage <<kgzuron>> units.</font></b>'
	elseif KGZdist > 2 and KGZdead > 0:
		'<<KGZdead>> The Dead wheezing and limping approach you.'
	end
}

$KGZgranatk = {
	KGZuspeh = rand(0, 100)
	KGZgranade -= 1
	'You threw a grenade into the Dead'

	if KGZdist <= 5:
		KGZdist += rand(1, 5)
		KGZdead -= rand(5, 20)
		KGZHP -= rand(5, 20)
		'Powerful explosion threw the dead in different directions'
		'You hurt by a grenade'
	elseif KGZdist <= 10:
		KGZdist += rand(1, 3)
		KGZdead -= rand(3, 10)
		'Powerful explosion threw the dead in different directions'
	else
		if KGZuspeh <= 5:
			KGZdead -= 1
			'You put a bullet in his head and he fell ghoul stopping moves.'
		else
			'You do not dokinuli grenade and it exploded harmlessly.'
		end
	end
}

--- KGZdyn ---------------------------------
# KGZfight
minut += 1
gs 'stat'
gs 'KGZdyn'

if KGZHP <= 0:
	cla
	*clr
	manna -= 100
	'<center><b>GAME OVER</b></center>'

	act 'Quit Game':gt 'KGZstart'

	exit
end

if KGZdead <= 0:
	cls
	KGZbatl = 1
	manna += 100
	'All the dead were silent on the ground.'

	act 'Leave':gt 'KGZgame'

	exit
end

if GZdist < 0:GZdist = 0

!!'<a href="exec:gt ''KGZstart''">Get out of the game</a>'
'Health <<KGZHP>>. Day <<KGZday>>, h <<KGZhour>>.'
'Edged weapons:<<$KGZweapon>>'

if KGZgun > 0:'<<$KGZgun>>'
if KGZgun2 > 0:'<<$KGZgun2>>'
if KGZgun3 > 0:'<<$KGZgun3>>'

'To you run <<KGZdead>> dead. They are at a distance <<KGZdist>> meters.'

if KGZdost = 1:
	'Vincent fires a rifle.'
	KGZdead -= 1
	'One of the dead falls with prostrelyanny head.'

	if KGZdead <= 0:gt $curloc
end

if KGZgun > 0 and bullet > 0:
	act 'Shoot a gun':
		cls
		bullet -= 1
		dynamic $KGZgunatk
		dynamic $KGZdeadmanatk

		act 'Further':gt $curloc
	end
end


if KGZgun2 > 0 and bullet2 > 0:
	act 'Shoot a shotgun':
		cls
		bullet2 -= 1
		dynamic $KGZgunatk2
		dynamic $KGZdeadmanatk

		act 'Further':gt $curloc
	end
end

if KGZgun3 > 0 and bullet3 > 0:
	act 'Shoot a machine gun (single)':
		cls
		bullet3 -= 1
		dynamic $KGZgunatk3
		dynamic $KGZdeadmanatk

		act 'Further':gt $curloc
	end

	if bullet3 >= 3:
		act 'Shoot a machine gun (short burst)':
			cls
			bullet3 -= 3
			KGZbulgun = 3
			dynamic $KGZgunatk4
			dynamic $KGZdeadmanatk

			act 'Further':gt $curloc
		end
	end

	if bullet3 >= 10:
		act 'Shoot a machine gun (long queue)':
			cls
			bullet3 -= 10
			KGZbulgun = 10
			dynamic $KGZgunatk5
			dynamic $KGZdeadmanatk

			act 'Further':gt $curloc
		end
	end
end

if KGZgranade > 0:
	act 'Throw a grenade':
		cls
		dynamic $KGZgranatk

		act 'Further':gt $curloc
	end
end

if KGZdist <= 2:
	act 'Strike <<$KGZweapona>>':
		cls
		dynamic $KGZfizatk

		act 'Further':gt $curloc
	end
else
	act 'Wait':
		cls
		KGZdist -= 1
		gt $curloc
	end

	act 'Go to meet the dead':
		cls
		KGZdist -= 2
		gt $curloc
	end

	act 'Scoot':
		cls

		if KGZdead >= 10:
			KGZdist -= 5
			'Dead too much and they surrounded you, you can not escape.'

			act 'Fuck!':gt $curloc
		else
			KGZdedrandrun = rand(0, 1)

			if KGZdedrandrun = 0:
				KGZbatl = 1
				'You managed to escape from the dead.'

				act 'Leave':gt 'KGZgame'
			elseif KGZdedrandrun = 1:
				KGZdist -= 5
				KGZdead += rand(KGZdead, KGZdead * 5)
				'You have stumbled upon other dead and now you have to fight with a lot of dead.'

				act 'Fuck!':gt $curloc
			end
		end
	end
end

--- KGZfight ---------------------------------
# FSstart
minut += 1
nosave = 1
gs 'stat'
'<center><b>Albida</b></center>'
'.'
'<b>Your current character</b>'
'<<$FSpers>>'

if FSpers = 1:act 'Load a saved game':gt 'KGZgame'

act 'Play a new game':
	cls
	FSfemin = 0
	FSfigur = 0
	FScolor = 0
	FSface = 0
	FSskin = 0
	FShvost = 0
	dicktipe = 0
	FSdick = 18
	FSvagina = 0
	FStits = 0
	FStitsLine = 0
	FSpers = 1
	FSday = 0
	FShour = 8
	FSsup = 1
	FSplace = 0
	FSgem = 0
	FSmedkit = 0

	FSlvl = 1
	FSexp = 0
	FSstren = 10
	FSspeed = 10
	FSagil = 10
	FSreakt = 10
	FSvital = 10
	FSHP = FSvital * 10

	FSbrona = 0
	FSweaponDam = 0

	$FSname = input("Enter nickname")

	if $FSname <= 0:$FSname = 'Player'

	'Character Name <<$FSname>>'

	act 'Play':gt 'FSgame'
end


act 'Leave':nosave = 0 & gt 'Komp', 'start'

--- FSstart ---------------------------------
# FSgame
minut += 1
gs 'stat'
gs 'FSstat'
'<center><b>Hotel room</b></center>'
''

if FSmedkit > 0:
	'First aid kits <<FSmedkit>> pieces'

	if FSHP < 100:
		act 'Treated':
			cls
			FShour += 1
			FSHP = 100
			FSmedkit -= 1
			minut += 1
			gs 'stat'
			'You heal health through kits.'

			act 'Further':gt $curloc
		end
	end
end

act 'Laze':
	cls
	FShour += 1
	minut += 1
	gs 'stat'
	'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'

	act 'Further':gt $curloc
end

act 'Leave the room':
	cls
	FShour += 1
	minut += 1
	gs 'stat'
	!!'You left the room.'
	gt 'FSroom'
end

--- FSgame ---------------------------------
# FSstat
FSneedExpNextLvl = (FSlvl * 10)*FSlvl
FSneedExp = FSneedExpNextLvl - FSexp

if FSneedExp <= 0 and FSlvl > FSlvlr:FSlvlr = FSlvl & FSpoint += 5 & FSlvl += 1 & FSexp = 0

if FSfemin < 45:$FSfemin = 'Men'
if FSfemin >= 45 and FSfemin >= 55:$FSfemin = 'Androgynous'
if FSfemin > 55:$FSfemin = 'Female'

if FSfigur < 45:$FSfigur = 'Male figure'
if FSfigur >= 45 and FSfigur >= 55:$FSfigur = 'Androgynous figure'
if FSfigur > 55:$FSfigur = 'Female figure'

if FScolor < 0:FScolor = 0
if FScolor > 5:FScolor = 5
if FScolor = 0:$FScolor = 'Black hair' & $FSsherst = 'Black'
if FScolor = 1:$FScolor = 'Brown hair' & $FSsherst = 'Brown'
if FScolor = 2:$FScolor = 'Foxy hair' & $FSsherst = 'Redhead'
if FScolor = 3:$FScolor = 'Blonde hair' & $FSsherst = '<<$name>>'
if FScolor = 4:$FScolor = 'Pink hair' & $FSsherst = 'Pink'
if FScolor = 5:$FScolor = 'White hair' & $FSsherst = 'White'

if FSface <= 0:$FSface = '<<$FSfemin>> person. <<$FScolor>>'
if FSface = 1:$FSface = '<<$FSfemin>> a person with cat ears and nose. <<$FScolor>>'
if FSface = 2:$FSface = '<<$FSfemin>> a person with dog ears and nose. <<$FScolor>>'
if FSface = 3:$FSface = '<<$FSfemin>> A person with fox ears and nose. <<$FScolor>>'
if FSface = 4:$FSface = '<<$FSfemin>> The person with the protruding ears and nose. <<$FScolor>>'
if FSface = 5:$FSface = '<<$FSfemin>> A person with cow''s ears and nose. <<$FScolor>>'
if FSface >= 6:$FSface = '<<$FSfemin>> a person with ears and nose like a lizard. <<$FScolor>>'

if FSskin <= 0:$FSskin = 'Normal skin'
if FSskin = 1:$FSskin = '<<$FSsherst>> The fur on the body'
if FSskin >= 2:$FSskin = 'Scales on body'

if FShvost <= 0:$FShvost = ''
if FShvost = 1:$FShvost = 'Cat''s tail'
if FShvost = 2:$FShvost = 'Dog''s tail'
if FShvost = 3:$FShvost = 'Foxtail'
if FShvost = 4:$FShvost = 'Horse''s tail'
if FShvost = 5:$FShvost = 'Cow''s Tail'
if FShvost >= 6:$FShvost = 'Reptile tail'

if dicktipe <= 0:$dicktipe = 'Normal male'
if dicktipe = 1:$dicktipe = 'Conical, covered with soft spines cat'
if dicktipe = 2:$dicktipe = 'Red, a large dog at the base node'
if dicktipe = 3:$dicktipe = 'Covered with coarse, black leather bull'
if dicktipe >= 4:$dicktipe = 'Powerful horse'

if FSdick > 0:$FSdick = '<<$dicktipe>> long dick <<FSdick>>, see'
if FSdick <= 0:$FSdick = ''

if FSvagina > 0:$FSvagina = 'Between the legs of you is Snatch.'
if FSvagina <= 0:$FSvagina = ''

if FStits = 1:$FStitrazm = 'AA'
if FStits = 2:$FStitrazm = 'A resolution'
if FStits = 3:$FStitrazm = 'size B'
if FStits = 4:$FStitrazm = 'size C'
if FStits = 5:$FStitrazm = 'size D'
if FStits = 6:$FStitrazm = 'size E'
if FStits = 7:$FStitrazm = 'size F'
if FStits > 8:$FStitrazm = 'size F +'

if FStits > 0 and FStitsLine = 0:$FStits = 'Female breast <<$FStitrazm>>'
if FStits > 0 and FStitsLine = 1:$FStits = 'Two pairs of women''s breasts <<$FStitrazm>>'
if FStits > 0 and FStitsLine >= 2:$FStits = 'Three pairs of nipples <<$FStitrazm>>'

if FSpers = 0:$FSpers = 'You have no character'
if FSpers > 0:$FSpers = '<<$FSname>>. <<$FSface>> <<$FSfigur>> <<$FStits>> <<$FSskin>> <<$FShvost>> <<$FSdick>> <<$FSvagina>>'
'Level <<FSlvl>>, exp <<FSexp>>, need for next level <<FSneedExp>> exp'
'Life <<FSHP>>'
'Strength <<FSstren>>'
'Speed <<FSspeed>>'
'Agility <<FSagil>>'
'Initiative <<FSreakt>>'
'Endurance <<FSvital>>'


if FShour >= 24:
	FShour -= 24
	FSday += 1

	if FSsup = 0:
		FSHP -= 10
	else
		FSsup -= 1
	end
end

if FSHP > 100:FSHP = 100

'<a href="exec:gt ''FSstart''">Get out of the game</a>'
'Day <<FSday>>, h <<FShour>>'
'<<FSgem>> of coins. Food enough for <<FSsup>> days'
''

$FSatk = {
	KGOLzas = rand(FSagilV / 4, FSagilV)
	KGOLataka = rand(FSspeed / 2, FSspeed * 2)

	if KGOLataka >= KGOLzas:
		if KGOLataka >= KGOLzas * 2:
			KGHPnpow = rand(FSstren/2, FSstren)+ rand(FSweaponDam/2, FSweaponDam)
			FSHPV -= KGHPnpow
			'<font color="green">CRETE <<KGHPnpow>></font>'
		else
			KGHPnpow = rand(FSstren/4, FSstren/2)+ rand(FSweaponDam/4, FSweaponDam/2)
			KGHPntpow = KGHPnpow - FSbronaV

			if KGHPntpow <= 0:KGHPntpow = 1

			FSHPV -= KGHPnpow
			'<font color="blue">Contact with <<KGHPnpow>></font>'
		end
	else
		'<font color="red"><<$FSnameV>> dodged your attack</font>'
	end
}

$FSatkV = {
	KGOLzas = rand(FSagil / 4, FSagil)
	KGOLataka = rand(FSspeedV / 2, FSspeedV * 2)

	if KGOLataka >= KGOLzas:
		if KGOLataka >= KGOLzas * 2:
			KGHPnpow = rand(FSstrenV/2, FSstrenV)+ rand(FSweaponDamV/2, FSweaponDamV)
			FSHP -= KGHPnpow
			'<font color="red">CRETE <<KGHPnpow>></font>'
		else
			KGHPnpow = rand(FSstrenV/4, FSstrenV/2)+ rand(FSweaponDamV/4, FSweaponDamV/2)
			KGHPntpow = KGHPnpow - FSbrona

			if KGHPntpow <= 0:KGHPntpow = 1

			FSHP -= KGHPnpow
			'<font color="brown">Contact with <<KGHPnpow>></font>'
		end
	else
		'<font color="green">You dodged the attack</font>'
	end
}

--- FSstat ---------------------------------
# FSfight
minut += 1
gs 'stat'
'Your health <<FSHP>>.'
'<<$FSnameV>>Health <<FSHPV>>'

!!end of the fight
if FSHP <= 0:
	FSloss += 1
	'You lost the fight'

	act 'Leave':gt 'FSgame'

	exit
end

if FSHPV <= 0:
	FSWin += 1
	'<<$FSnameV>> fell. You win the fight.'
	'You got <<FSPrizeM>> coins and <<FSPrizeExp>> experience'

	act 'Disengage':gt 'FSgame'

	exit
end

!!initiative
KGOLiniV = rand(FSreaktV / 2, FSreaktV * 2)
KGOLini = rand(FSreakt / 2, FSreakt * 2)

if KGOLini = KGOLiniV:
	hodrand = rand(0, 1)

	if hodrand = 0:KGOLini = 1 & KGOLiniV = 0
	if hodrand = 1:KGOLini = 0 & KGOLiniV = 1
end

if KGOLini > KGOLiniV:KGOLiniSUM += 1
if KGOLini < KGOLiniV:KGOLiniSUM -= 1
if KGOLiniSUM > 3:KGOLini = 0 & KGOLiniV = 1 & KGOLiniSUM = 0
if KGOLiniSUM < -3:KGOLini = 1 & KGOLiniV = 0 & KGOLiniSUM = 0

!!moves
if KGOLini > KGOLiniV:
	'Now your turn'

	act 'Attack':
		cls
		''
		dynamic $FSatk

		act 'Further':gt $curloc
	end
else
	'Now opponents'
	'<<$FSnameV>> attacks you'
	dynamic $FSatkV

	act 'Further':gt $curloc
end

--- FSfight ---------------------------------
# FSroom
minut += 1
gs 'stat'
gs 'FSstat'
'<center><b>Street</b></center>'

act 'Walk into a room':
	cls
	FShour += 1
	minut += 1
	gs 'stat'
	!!'You left the room.'
	gt 'FSgame'
end

act 'Wander':
	cls
	FShour += 1
	minut += 1
	gs 'stat'
	'You wander through the deserted streets.'

	act 'Further':gt $curloc
end

--- FSroom ---------------------------------
# young_shop
if $ARGS[0] = 'start':
	$sexloc = $CURLOC
	gs 'stat'

	act 'Finish the job':dynamic $endwork
end

$endwork = {
	!!if young_shop_work = 1 and young_shop_miss < 3:
	cla

	if week = 5 and young_shop_salary > 0:
		act '<font color="green">Get a Salary</font>':gt 'andrey'
	else
		act '<b>Get out of the shop</b>':
			minut += 3
			gt 'torgcentr'
		end
	end
}

$sexloc = $CURLOC
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

'<b><center><font size="4">Keys-pussy</font></center></b>'
'<center><img src="images/pictures/young_shop.jpg"></center>'
'Small shop clothing for young people. Mostly pretty bold outfits for emancipated young people with attractive bodies.'
'Manager works from 10:00 to 18:00.'

!!if young_shop_work = 0:
	act '<font color="navy">Login to the manager</font>':
		minut += 1
		gt 'andrey'
	end
!!end

act '<b>Get out of the shop</b>':
	minut += 3
	gt 'torgcentr'
end

act '<font color="navy">Department of Women''s Clothing</font>':
	minut += 1
	gt 'sell_young_clothes'
end

if hour = 15 and young_shop_work = 1 and week < 6:
	act 'Work':
		cla
		inWorkYoungShop = 1
		young_shop_salary += 1
		minut += 135
		gs 'stat'
		'I cleaned two o''clock in the department to get better and hang clothes, serving customers. Rabotenka not dusty and even pretty good.'
		random = rand(1, 80)

		if random > 50 and random <= 55:gt 'young_shop', '0'
		if random > 55 and random <= 60:gt 'young_shop', '1'
		if random > 60 and random <= 65:gt 'young_shop', '2'
		if random > 65 and random <= 70:gt 'young_shop', '3'
		if random > 70 and random <= 75:gt 'young_shop', '4'
		if random > 75 and random <= 80:gt 'young_shop', '5'

		if random >= 1 and random <= 20 and (kira <> 0 or young_shop_salary < 3):
			'Regular unremarkable day at work comes to an end.'

			act 'Finish the job':dynamic $endwork
		elseif random >= 1 and random <= 20 and kira = 0 and young_shop_salary >= 3:
			cla
			*clr
			kira = 1
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'Twenty minutes before the end of the day a lady comes up to me with a girl glamorous appearance. Girl constantly turns and asks the woman:'
			'- Mom, is not necessary. Let''s buy in stores .. Well, MAAM ..'
			'- Stop acting up! All your classmates in such clothes go, I do not want my girl over bullied because she is not like all! - Woman full of determination and certainly not going to change his intentions.'
			'- Hello, I help you? - With a smile on his face I come to my mother and daughter.'
			'Lady inspects appraising me down so the head and turns to his daughter:'
			'- You see, Kira, a girl a little older than you, and dressed .. - she does not have time to finish the sentence, because Vick starts acting up again:'
			'- Well, just as no one goes! I can not on the street in this form appear, and even without a bra. I''ll see it all!'
			'- And why not? - Woman throws up his hands in surprise. - It would be ashamed, do not you still have grown! So, that''s enough, I''m tired.'
			'She turns to me with a haughty smile and looks me in the eye:'
			'- Girl, tell me, your clothes fit like my children Kira? - A little nod and she says clearly just waiting for a positive response.'

			act 'Yes, of course':
				cla
				*clr
				'<center><img src="images/pictures/young_shop_quest9.jpg"></center>'
				'Throwing another look at the girl, I confidently replied:'
				'- Naturally! All my friends buy clothes only in this shop. We have a transparent blouse kakraz that will look great on your daughter! And there is a suitable size. And yes, all our products are designed to be worn without a bra - I quickly find the right size and helpfully stretch blouse tearful Kira. - Booth there, you can try!'
				'Woman takes daughter in his arms and carries with it a little in the cabanas. 7 minutes later, they returned.'
				'- As I thought, you are well this blouse! By the way, this model has just arrived in our shop, she created a beautiful Italian designer .. - I am happy to pronounce.'
				'- Yes, all Kirin girlfriends will be jealous! And how much is this beauty?'
				'- Exclusive offer - only 2, 400.'
				'I notice that Cyrus already resigned to his fate and decide to provoke it a bit:'

				act 'With a mini-skirt better':
					cla
					*clr
					'- You know, with a mini-skirt on your blouse revealed 100%. Look at this model, imagine how great it will look on your daughter!'
					'- What do I have it all? .. - Not hoping for a positive outcome, sighs Cyrus.'
					'Woman takes her skirt in hand, twirls it inspects for defects and marriage, and with a confident expression leads daughter-in dressing room.'
					'- And such as skirts worn without panties or am I mistaken? - Woman looking back at me.'
					'- It is highly desirable - I say, nodding.'
					'- Clear.'
					'After a couple of minutes behind the curtain begins some scuffling. Apparently the girl again started to act up and hang back. Mom, are pretty scruffy and tired, out of the booth and asks for help:'
					'- She always rests, can you do something you do?'
					'In the words of the woman''s face becomes clear to me that if my daughter now I do not get rid of underwear completely, they will simply leave and do not buy, and I would lose the premium that could earn for this sale.'
					'I go into the booth and see Kira, who, despite his tearful appearance, looks amazing in a new outfit. It is a pity that there are unlikely to have the words right impact, but if I do it myself, then shy skromnyasha Cyrus probably did not even try to stop me.'

					act 'Persuade Cyrus':
						*clr
						delact 'Persuade Cyrus'
						'I decide to address their psychological skills and persuade Cyrus off her panties.'

						if intel >= 50:
							cla
							*clr
							$ImageNeededPlacholder
							! WD: IMAGE NEEDED ~ '<center><img src="images/pictures/characters/photo_dressed_[$vika]_13.src="></center>'
							'Fortunately Kira very trusting girl, and my leadership qualities are not pumped. I managed to convince her that absolutely should not be embarrassed and that the mother wants for her nothing but good.'
							'Vick slowly puts his hands under her skirt and pulls off her panties.'
							'- You feel like a breeze blowing from the bottom? Imagine how nice it would be to go walking on the street.'
							'- What if someone sees?'
							'- Oh, do not be greedy - I clap on the shoulder Cyrus. - Let them look and dream. All your friends will envy you and ask why when you''re with them, all the guys only look at you.'
							'I bring Kira from the locker room and pass panties her mother.'
							'- Once an awkward, but you can afford to leave them, or throw it away? I want to wean my daughter from underwear, and then all of these purchases will be wasted. Hide from her panties and bras all until she gets used.'
							'I decide to leave the panties themselves and shove them in her purse. Mom is paying at the cash register and takes her daughter dressed in a new blouse and mini-skirt.'
							'Kira looks and smiles at me goodbye, and then leaves, flashing naked booty in every breeze.'

							act 'Finish the job':dynamic $endwork
						else
							'Unfortunately, despite my best efforts, I can not get her to talk and there is only one way out ..'

							act 'Remove her panties':
								cla
								*clr
								$ImageNeededPlacholder
								! WD: IMAGE NEEDED ~ '<center><img src="images/pictures/characters/photo_dressed_[$vika]_13.png"></center>'
								'- Well, - I bend over and thrust his hands under her skirt Kira. The girl could not even imagine that it''s possible.'
								'I lift my mini skirt and slowly Cyrus pulls off her panties. Bares her pussy is right before my eyes at a distance of 10 centimeters. I notice that the girl is very excited because of this situation and her panties a little wet. Delicate aroma hit my nose and I smiled.'
								'Kira took off her panties, I show her wet spot, and then hide behind panties and get out of the booth.'
								'- We managed to agree - smile I pretend that I managed to persuade Cyrus off her panties on their own.'
								'- Oh, how wonderful, wonderful - a woman and her daughter examines and decides to buy a blouse and mini-skirt.'
								'Before leaving Cyrus thanked me, and I wink at her, to which she gives a very pleasant smile.'

								act 'Finish the job':dynamic $endwork
							end
						end
					end
				end
			end

			act 'No, it is too early':
				cla
				*clr
				'- Sorry, but it is too early to wear such clothes. Especially since she does not want - I breed hands.'
				'- How so? I see on TV that they all go to these outfits! - Woman looks at me with disbelief. She obviously could not imagine that she would be against the clothing worn by itself and which should sell.'
				'"Glamorous m revised zomboyaschik clearly wants whore of the daughters do" - I think, looking into the eyes of the lady and ulybayus.'
				act 'Convince a woman':
					cla
					delact 'Convince a woman'
					'This can not be so leave! I resolve to do everything in my power to convince strange mother.'

					if intel >= 60:
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/pictures/characters/photo_dressed_[$vika]_13.png"></center>'
						'- You seriously think so, but I do ..? - Glamorous lady ponders my words their meager umishkom and decides to eat them meaning. - Okay, let''s go to a regular store.'
						'Before leaving Cyrus smiles at me and says:'
						'- Thank you .. bye! - Girl waving me handle and runs after her mother.'

						act 'Finish the job':dynamic $endwork
					else
						$ImageNeededPlacholder
						! WD: IMAGE NEEDED ~ '<center><img src="images/pictures/characters/photo_dressed_[$vika]_13.png"></center>'
						'- What are you saying? And on TV, so wrong show? What I''m talking to you all! - Glamorous lady could not understand the meaning of my words. - All Kira, we go to another store.'
						'Before leaving, the girl thanked me for trying to save her and runs away after mama.'

						act 'Finish the job':dynamic $endwork
					end
				end
			end
		elseif random = 21:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'I''m just finishing cute blouses hanging from the new collection, as the old lady comes up to me 70 years and begins a long, dull monologue from which I learned a lot about himself, his work, the contemporary fashion and a long tradition.'
			'To start grandmother complains modern society and its mores:floss, corruption, drugs, seals and everything. Then she remembers the old happy time when the grass was greener and women at age 18 married virgins:'
			'- And now that .. That''s my granddaughter in the classroom no virgins left. And she is in 7th grade student, they have there 15 girls in the classroom! How so .. And one girl, Lena name like already made three abortion. What is this world - grandmother prichetala 20 minutes and I could not manage to calm her down and show the door of the store.'
			'- Here''s granddaughter, you also learn at school is probably why you dress, do not you ashamed?'

			act 'Shame on you!':
				cla
				'- And why I should be ashamed of that? I did nothing wrong and depraved do not! It''s just beautiful clothes, fashion is now such that it will not Stalinist times.'
				'- Yeah, when Comrade Stalin would this just could not happen! - Here begins a new lecture about old times, honesty, integrity, correctness.'
				'Old lady long crucified, but it is also finally get bored and she begins to waddle to the door, showering our shop and curses of modern youth.'

				act 'Finish the job':dynamic $endwork
			end

			act 'It is only at work so':
				cla
				'- Of course a shame, but I can not be different. Need to earn money, works not want to eat. And my sister, and it is necessary to take care of her - I long crucified, talking about his plight and promising grandmother never go out like this.'
				'Finally grandmother, satisfied with my answer, I praise and begins with the cross, wish me happiness and kindness.'
				'I''m an old lady with relief to the exit.'

				act 'Finish the job':dynamic $endwork
			end
		elseif random = 22:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'<center><img src="images/pictures/young_shop_quest2.jpg"></center>'
			'Passing the cabanas, I hear strange noises from there. Perhaps some dresses, but there''s something wrong.'
			'Going on about the curiosity, I''m making sure that I did not notice, look inside and see a rather strange picture:'
			'Whether a couple doterpela not, whether they have nowhere else, whether they are just perverts. It is difficult to say, and now it is a special value has not.'
			'I watch as the cute girl is very skillfully suck a man''s penis and I do not know how to react. Watching them, I can not continue - that think of me if they see as an employee spying for customers to change clothes.'

			if horny >= 80:
				'I''m too excited to ignore what is happening or disperse representation.'

				act 'Eavesdrop':
					cla
					*clr
					'I decide to stand next to the cabin and listen to the joy of a young couple. I listen as she licks smacking and sucking cock. Then she makes a strange rattle and nature of changes occurring.'
					'- Do they not confine blowjob? - I look down again to the booth and see what was wrong. The guy holding the girl''s hair and pulls her mouth firmly on the penis. I have never seen a girl with such force fucked in the throat.'
					'- She can suffocate - but instead to help minetchitsa I spend a hand through her hardened nipples and rush to the skirt.'
					'Then I hear the guy starts moaning, and the girl coughed plaintively asks him:'
					'- Come on, come on, Cum on my face, yes .. - I once again look in the booth.'

					act 'Look into the booth':
						cla
						*clr
						horny += 10
						'<center><img src="images/pictures/young_shop_quest3.jpg"></center>'
						'All the girl''s face covered with thick sperm.'
						'Guy again puts cock into her mouth so she choby brushed his semen. Then he quietly begins to wear pants, watching as the girl palms collects sperm from her face and hides it in his mouth.'
						'I decide a little bit away from the booth, and then they can suddenly go out and caught me. A minute later, a pair of shows and I see that she is not very carefully wiped her face and traces of sperm visible to the naked eye.'
						'As such, the steam coming out of the store into the street.'

						act 'Finish the job':dynamic $endwork
					end
				end
			elseif horny < 80:
				act 'Ignore':
					cla
					*clr
					'This is clearly not my business, and just snoop and eavesdrop somehow indecent. Of course, I could get rid of them, but I do not want to deprive young people of good memories and spoil their fun.'
					'I am going away from the booth and start folding scattered visitors blouses and hang them in places. After a few minutes, a couple out of the booth and I see traces of semen on the girl''s face. All my efforts to overcome smile turn into failure, and I''m just her hand.'
					'Meanwhile blowjob with her boyfriend out of the store into the street.'

					act 'Finish the job':dynamic $endwork
				end

				act 'Disperse':
					cla
					*clr
					'Ahem, uh .. - I expectorate. - You all right, can you help?'
					'- Yeah, you can come in and help - I hear the muffled voice of the guy. - Ouch, that hurts.'
					'Girl takes out a member of his mouth and hit the guy in the balls, loudly says:'
					'- We now finish and exit.'
					'A minute later the pair shows the booth and the girl gives to me a shy smile and a little blushing, takes her boyfriend out of the store.'

					act 'Finish the job':dynamic $endwork
				end
			end
		elseif random = 23:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'I go to the cabanas and find there left shirt. Just remember that she was put on a shopper who is 5 minutes ago bought a blouse and it is gone from the store. Apparently, she decided to throw a t-shirt and just left in the booth.'
			'I decide to wait until the end of the shift, the shopper can return. An hour passes and my shift ends, nobody''s shirt comes. I carefully look around her:ordinary shirt, almost new, no holes, no dirt no. Can pick yourself?'

			act 'Pick up a':
				cla
				'Before leaving, I take a shirt with a. Girl she did not need, and I am not so rich to almost throw new things.'

				if wear_chest_have_[6] = 0:
					'no action'
				else
					'<b>- Although, I also already has one. With such a pile of things as I have, it''s easy and lured .. Okay, the second is the same I do not need - I leave the T-shirt in the store.</b>'
				end

				act 'Finish the job':dynamic $endwork
			end

			act 'Finish the job':dynamic $endwork
		elseif random = 24:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'I went in today I cabanas and not approached collect clothes that left another buyer after fitting. Accidentally drops a mini-skirt and lifting it, I notice a very inconspicuous element on the baseboard. I immediately throws the heat:'
			'- Yes, it''s a hidden camera - the thought pierced me like an arrow. I could not think what we have in store you might find something like that!'
			'What to do now, should probably tell the manager, he will understand, or .. What if he knows? No, this can not be.'

			act 'Tell about the camcorder':
				cla
				'I''m breaking in without knocking at the manager''s office and start chattering about what happened.'
				'- Hey, hey, <<$name>>, calm down! What happened??'
				'- There, there, in the booth, - trembling hands I point in the direction of changing booths. - Faster!'
				'Manager reluctantly rises from his chair and goes for me. Going into the booth, he squats and pulls the camera glued to the plinth.'
				'- It is necessary to call .. - I begin to prompt the manager, but he interrupts me in mid-sentence:'
				'- Wait, we should think - manager stands and twirls kamerku hands. - If we call the cops, here is a start .. Shop closed, pereroyut all here, and more can be fined or something worse. As host learns so completely freaked pouvolnyaet indiscriminately.'
				'- Let''s just like this:Now you calm down and go home, and I''m here all inspection. We all problems to anything! You vigilance premium good we write only a word or anyone, okay?'
				'- Yes, of course - my shift anyway coming to an end and I decide to just go home and forget about everything.'

				act 'Finish the job':dynamic $endwork
			end

			act 'Keep silent':
				cla
				'I take a few deep breaths and force myself to calm down, bring my thoughts in order.'
				'- I did not install the camera, am not responsible, I can always say that and never knew about it. In the booth, I do not dress up. Generally, girls who will remove the camera still does not know, but someone look, entertain, work. I do not mind.'
				'I decide not to touch the camera and just keep working.'

				act 'Finish the job':dynamic $endwork
			end
		elseif random = 25:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'Man approached me 40 years and asks for help in choosing clothes for her little daughter:'
			'- Hello, my beauty, help me to choose a gift for my daughter''s birthday.'
			'- Yes, of course. What''s her size?'
			'- Yes, I do not even know .. Well, her figure like yours, only smaller breasts. Maybe you will try out for yourself?'
			'- In principle, I do not mind, now you pick up a suit. And how old is your daughter? - I do not work, visitors today for some reason are not shown, so that the fitting clothing is a great way to while away a few minutes.'
			'- It is much younger than you, but does not develop for years, the figure is less than 16 do not give! - Buyer''s eyes sparkled as he began to think about his daughter.'

			if intel >= 40:
				'Struck me as boiling water .. Yes, he''s a pedophile, he can choose his little daughter such clothes, but still with a smile on his face. Maybe I need to do something about it? ..'

				act 'Pass pedophile':
					cla
					'- I am happy for you to try on a few options. Wait here, and I''ll run to the store and immediately find all the blouses and skirts to fit and will try! - Trying not to betray nervousness, I ulabyyus men who hide behind the door to the premises.'
					'Describing all the manager, I''m going to the warehouse, quickly find several options of clothes and change into running the booth. Pedophile lustfully watching as I''m better in front of him once skirt, go to the store when several policemen.'
					'Pedoisteriya in full swing, in that the police do not even think to listen to the arguments of men, pinned it leads to a patrol car.'
					'- Nothing, now send your daughter to workers care, they will understand psychologists your fault or not - with these words derive cops guy from the store.'

					act 'Finish the job':dynamic $endwork
				end
			end

			act 'Try on clothes':
				if intel >= 40:
					cla
					*clr
					'Actually, it''s none of my business if his daughter not satisfied with something, she herself may apply to the authorities, and I still can not destroy the whole family, with his nose where it should not!'
				elseif intel < 40:
					cla
					*clr
					horny += 30
					gs 'stat'
					'Suspecting nothing, I say that now all children precocious develop.'
					'I go to the warehouse and collect all the clothes that fit me, back to cabanas ..'
					'Man constantly jokes and makes a very nice compliments about my figure. Every time I''m hiding behind a curtain booth, he tries to peep how I dress up and continues to laugh it off when I notice it.'
					'During the show, he kept spinning me on the spot, trying to see what is hidden under a skirt and my chest feels a considering blouses.'
					'His actions seem to me a little suspicious, but I write it off on haroshie mood and sociability.'
					'Once I finally try on all the skirts and blouses, he chooses and asks me to change once more.'
					'- What a beauty, for my daughter it will look simply amazing. Listen .. and you do not want to make some money?'
					'- In what sense? - I was surprised to breed hands.'
					'- You know, you''re so beautiful and sexy, I''m very excited looking at you! I will pay 5000 if you just billeting in this clothes, with his skirt. Naturally, no panties and bra. Nothing else to do.'
				end

				act 'Refuse':
					cla
					*clr
					'<center><img src="images/pictures/young_shop_quest4.jpg"></center>'
					'- What are you, crazy? I''m not going to do that! - A blatant bid I just discouraged. - You do not have to persuade me, it just will not! Go to offer his daughter is.'
					'- Make sure you will do so - buyer out of the booth and waits until I will disguise myself, and will give him clothes, then calmly pays and leaves the store. I''m disgusted look after him.'

					act 'Finish the job':dynamic $endwork
				end

				if horny >= 80:
					delact 'Refuse'
					'<font size="3">I''m too excited to refuse such an offer.</font>'
				end

				act 'Agree':
					cla
					*clr
					money += 5000
					horny += 10
					msg 'Excited buyer pulls out of his pocket and handed me a purse <b>5000</b> RR'
					gs 'stat'
					'- Okay, but the more I will not do anything! - 5, 000 rubles - a great motivator and it would be foolish to ignore such a sum.'
					if horny >= 100:'Yes, and my body just craves to have someone look at it.'
					'I unfasten and disavow her bra baring her breasts to a stranger. Then I thrust his hands under her skirt and slowly removes her panties.'
					'I pull a little blouse to podcherktut its almost bare chest and thrust his hand under her skirt to slowly remove her panties.'
					'I unfasten and disavow her bra baring her breasts to a stranger.'
					'Licking his lips, I''ll take the edge mini skirts and little back arching back, begin to lift the edges up. Meanwhile man unzips his fly and vynimet already hardened member and humid outside.'
					'I flushed with excitement, standing in the locker room without panties and bra, lifting her skirt so that my pussy is perfectly visible, and look at how male jerking his cock. Do not have time to recover as the man begins to wheeze, and realize that he is now to finish.'
					'Suddenly he takes a step forward and lays down his hand on my shoulder. Strong movement he puts me on my knees. I want to argue against such behavior, citing our agreement, but I understand that just do not have time to do it. Man starts muffled moan and I understand that his cock explode.'

					act 'Close your eyes':
						cla
						*clr
						horny += 10
						facial += 1
						cumface += 1
						gs 'stat'
						'<center><img src="images/pictures/young_shop_quest8.jpg"></center>'
						'I have nowhere to go. I barely have time to close his eyes before a powerful jet of sperm hitting me in the face. Then another. I feel a strong masculine fragrance. Cum completely covers my face, hair gets in and begins to flow on clothes, leaving a thick spots.'

						if vaf > 10:
							swallow += 1
							cumlip += 1
							gs 'stat'
							'It''s so much on me, I''m starting to collect sperm in his hands, and then with great pleasure to lick her fingers.'
							'This smell and taste is driving me crazy, my legs give way and I feel like the underbelly begins to shudder. I''m coming.'
							'Recovering, I see a man standing over me and smiling:'
							'- You voskhotitelna, beautiful! Let''s take your clothes off, I buy these clothes - here I begin to speak, you need to bring new things, and these get dirty, or at least clean, but the buyer interrupts me. - No, I do not need to be cleaned, these tracks will remind me of the wonderful moments with you.'
							'I undress and dress up in their clothes, then quickly run to the locker room. My shift had time to finish until I measure all of these outfits, and before leaving we must put himself in order.'

							act 'Finish the job':dynamic $endwork
						else
							'When sperm flows cease to beat me in the face, I open my eyes and see right before your eyes appetizing big dick, all covered with sperm. It emanates a strong masculine fragrance.'

							if vaf > 0:
								swallow += 1
								cumlip += 1
								'I do not hold back and take a cock in her mouth. It turns out that he has not completely drained and I feel like the last time he flinches and my mouth filled with sperm. I am very neat and clean out the member took out his mouth.'
							end

							'I raise my eyes to the buyer and smile at him.'
							'- You voskhotitelna, beautiful! Let''s take your clothes off, I buy these clothes - here I begin to speak, you need to bring new things, and these get dirty, or at least clean, but the buyer interrupts me. - No, I do not need to be cleaned, these tracks will remind me of the wonderful moments with you.'
							'I undress and dress up in their clothes, then quickly run to the locker room. My shift had time to finish until I measure all of these outfits, and before leaving we must put himself in order.'

							act 'Finish the job':dynamic $endwork
						end
					end
				end

				act 'Finish the job':dynamic $endwork
			end
		elseif random = 26:
			*clr
			cla
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'<<$name>>, see here - approached me Nastya. - I''ve got a nice blouse, new, but with a slight defect. The manager is going to put it at a good discount <b>-70%</b>, may want to take yourself?'
			'In store we have it for <b>2400</b> rubles sold, you can buy <b>720</b>. Look at this:'

			act 'Finish the job':dynamic $endwork
		elseif random = 27:
			*clr
			cla
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'<center><img src="images/pictures/young_shop_quest5.jpg"></center>'
			'In the shop go 2 guys very glamorous appearance and begin to consider the transparent blouses. I often notice them in this neighborhood probably live somewhere near. They constantly go together and holding hands. I go to the guys and helpfully interested in:'

			act 'Help you?':
				cla
				'- Hello, I see you pick up a gift for his girls, can you help?'

				if vnesh < 50:
					'Guys appreciatively examine me from head to toe and one of them says with disdain:'
					'- Get out, nasty, without you understand, you most need the help! - And starts insulting discuss my appearance with her boyfriend.'
					'I am going away from them and beckons me another customer.'

					act 'Finish the job':dynamic $endwork
				else
					'Guys appreciatively examine me from head to toe and one of them says with interest:'
					'- What a pretty girl. Do not worry, my beauty, we do with a mustache! - The guy waving me goodbye, and took his friend''s hand, starts admiringly discuss my appearance.'
					'I am going away from them and beckons me another customer.'

					act 'Finish the job':dynamic $endwork
				end
			end
		elseif random = 28:
			*clr
			cla
			money += 1000
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'<center><img src="images/pictures/young_shop_quest6.jpg"></center>'
			'In store tumble three boozy woman of indeterminate age, dressed in clothes podrypannuyu. All as one in torn kalgotkah, colorful miniskirts and dirty T-shirts.'
			'- Whores? - I ask Nastia.'
			'- Oh, by the way, you see the one in the red skirt? - Nastya nods toward the ugliest of them. - She studied in a parallel class.'
			'- She''s what, 18 years?? Horror, what brings dissolute lifestyle - I declare accusingly.'
			'- Depraved nothing to do with - says Nastya. - Some girls have been on the order of more guys than her, but they do not look! You just have to look after themselves, not plump and dope Shiryaev in the doorways.'
			'Slut, not even an example, choose the first available things and carry them to the cashier. Nastya''s friend throws a pile on the counter dirty crumpled rubles and pulling a face says:'
			'- Procedure? - No answer, virgins take their belongings and leave the store.'
			'- Here you go, you half - Nastya puts me a pile of rubles. - They are a little short changed, not in cash to lay down the same ..'

			act 'Finish the job':dynamic $endwork
		elseif random >= 29 and random <= 34:
			*clr
			cla
			'<b><center><font size="4"><font color="black">Case for paper</font></center></b>'
			'In the beginning of the shift manager asked me to come to him after work, but the reasons are not named.'
			'I approached the door to his office and I''m going to knock. Then I noticed that the door was slightly preotkryta and look inside.'

			act 'Look inside':
				cla
				'<center><img src="images/pictures/young_shop_quest10.jpg"></center>'
				'Then my eyes opened obscene picture. Andrew M. is facing the monitor, his pants pulled down, and in the hands of a member. The manager looks at the monitor and fingering his penis, which put on a condom. Almost immediately he throws back his head and starts to cum.'
				'Filling a condom with sperm, he removes it wipes member and throws a condom in the waste basket. Then he starts to pull his pants and walk toward the door.'
				'I''m trying not to make a sound, run back from the door and hide behind the boxes near the service exit. Andrei Mikhailovich, noticing nothing, to pass into the toilet. I''m out of his hiding place and I go to his office. Out of curiosity, I look to the monitor and see the stage from selected German porn. Then I throw a look into the basket and see her lying in a condom full of sperm.'

				act 'Wait for the manager':
					cla
					'With a smile, I step away from the table manager, representing what I''d do if he saw me at the monitor, and even with a condom in her hand.'
					'A minute later, Andrew M. returns:'
					'- And, <<$name>>, fellow that came! Wait, I''ll give you a piece of paper, you need to sign it - the manager comes to his desk for a long time and finally goes through the papers handed me some paper.'
					'I thought in my head is not on pieces of paper, in that I do not read, sign and return the document manager. After saying goodbye, I''m going back to the shop floor.'

					act 'Finish the job':dynamic $endwork
				end

				act 'Take the condom':
					cla
					*clr
					'<center><img src="images/pictures/condom_cum.jpg"></center>'
					'I decide a little hooliganism. Reaches into the basket and takes out a condom. It is slippery and still warm. I pick up a condom over his head to see through it to the light bulb. Then suddenly I hear the door open to the study. Another half a second and I noticed with a condom in her hand! I do not even have extra moment to hide his hands behind his back.'

					act 'In your mouth!':
						cla
						'I have no other options .. I barely have time to shove a condom in her mouth, as I see Andrei''s eyes:'
						'- And, <<$name>>, fellow that came! Wait, I''ll give you a piece of paper, you need to sign it - the manager comes to his desk for a long time and finally goes through the papers handed me some paper.'
						'I absolutely do not read it and then sign, then utter:'
						'- Dohvianiya - I vygozhu the office and run straight to the locker room and took out a condom from his mouth, I throw it in the trash.'
						'Well, that Andrew M. tied condom before thrown, otherwise I would have had a mouth full of sperm!'

						act 'Finish the job':dynamic $endwork
					end
				end
			end
		elseif random >= 35 and random <= 39:
			cla
			*clr
			'<b><center><font size="4">Case for paper</font></center></b>'

			if katia = 1:
				'Kate comes again today. She is a very shy girl and difficult to understand what''s on her mind. I told her several times asked the question, what it comes to, selects and buys nothing, but she always remained silent. I simply want to help.'
				'It is a pity that the staff is forbidden to invite friends to shop and chat with them, because of this I have to stay away from Katie''s on. Although, if I could talk to her, I doubt that we would have made a constructive dialogue. Usually all the questions she answers:"I do not know, " "simple, " or "Well .." and silence.'
				'I think that Kate is constantly looking at me, and when we found the views, she smiles, blushes and turns away.'

			elseif katia = 0:
				katia = 1
				'Very often in the shop comes a strange girl with brown hair. Today she again appeared. As usual it is very long walks through the cabin and that thread examines, but I have never seen anything so she was trying on.'
				'I constantly get the impression that she was looking at me. When I raise my eyes, I can see how it starts to fuss, turns and glares at the nearest skirt begins to examine with interest.'
				'I tried many times to come and offer assistance, but it is constantly lowers her eyes, blushes and mutters under his breath:'
				'- No, thanks, I''ll handle it, - a minute after that, she just runs away from the store.'
				'Actually, I do not even remember that she ever bought something for ever just walks considers chooses. She dressed simply, but not poor, can not say that she can not afford and just comes to dream.'
				'It kind of strange ..'
			end

			act 'Finish the job':dynamic $endwork
		elseif random >= 40 and random <= 44:
			cla
			*clr
			'<b><center><font size="4"><font color="black">Cool time</font></center></b>'
			'No buyer for the rest of my shift. I calmly chatting with Nastya broken 2:00. She normally talks about her sexual experiences and feelings.'
			'Today she decides to relive their first sexual experience. This is her favorite subject, I even lost count of how many times she told me everything is described in detail. One pleases, although she is not confused and always calls the same number of guys that she lost her virginity in the school locker room after phys-ry.'

			act 'Finish the job':dynamic $endwork
		elseif random >= 45 and random <= 50:
			cla
			*clr
			gs 'stat'
			'<b><center><font size="4"><font color="black">Heavy day</font></center></b>'
			'Buyers rod like a cornucopia. I''m knackered all. Tell me one, gave the other, find the third, fourth bring fifth generally stick with incomprehensible conversations. Well, that did not work all day, and just two hours.'
			'At the end of my shift manager comes and asks to stay for an hour.'
			'- Listen, <<$name>>, there is such a thing:she can see - we have a blockage. Hang on for an hour, and I''ll award Naquin, you will not regret!'

			act 'Good':
				cla
				minut+= 70
				young_shop_bonus += 3
				gs 'stat'
				'- It seems that I have no choice:I can not throw you to the wolves!'
				'After working for an hour, I was very tired, but the thought of premium warms the soul.'


				act 'Finish the job':dynamic $endwork
			end

			act 'I can not':
				cla
				if young_shop_bonus > 0:young_shop_bonus -= 1
				'- If any other day, but today I can not .. - I begin to make excuses, but the manager just shrugs his hand:'
				'- Okay, go home, you''ll manage without. Just do not count on a bonus for today!'

				act 'Finish the job':dynamic $endwork
			end
		end
	end
end

if hour >= 8 and hour <= 18 and young_shop_work = 1 and young_shop_miss >= 3 and week < 6:gt 'andrey'

if hour > 21 or hour < 8 or week >= 6:
	cla
	'Sorry, but the store is closed, - guard comes up to me. - Proceed to the exit.'
	'<b><center><font color="red">The store is closing.</font></center></b>'

	act '<b>Get out of the shop</b>':gt 'torgcentr'
end

gs 'stat'

if $ARGS[0] = '0':
	cla
	'In the shop includes a black man and rassmatiraet long underwear for those asking you to try underwear, referring to the fact that you have a figure as his girlfriend.'

	act 'Refuse':dynamic $endwork

	act 'Change into the booth':
		cla
		'You went into the booth and showed him dressed underwear, dressed in his clothes, you make a purchase.'

		act 'Leave':dynamic $endwork
	end

	act 'To change when it':
		cla
		*clr
		guy += 1
		picrand = 19
		'<center><img src="images/img/centr/mag0.jpg"></center>'
		'You begin to change right in front of him, twisting his back in front of him and otherwise demonstrating all its charms, soon you have achieved the desired when you have once again pushed the legs demonstiruya her pussy he stood in front of you on your knees and pressed his lips to your crotch'

		act 'Entertain':gt 'sex', 'kuni'
	end
end

if $ARGS[0] = '1':
	cla
	'In man enters the store and long rassmatiraet women''s clothing, for those asking you to try, citing the fact that you have a figure as his girlfriend.'

	act 'Refuse':dynamic $endwork

	act 'Change into the booth':
		cla
		*clr
		picrand = 29
		'<center><img src="images/img/centr/mag1.jpg"></center>'
		'You begin to change into a booth, and you notice that the guy spying on you through loosely closed curtain.'

		act 'Close the curtain':dynamic $endwork
		act 'Lay back room':guy += 1 & gt 'sex', 'minet'
	end
end

if $ARGS[0] = '2':
	cla
	*clr
	'<center><img src="images/img/centr/mag2.jpg"></center>'
	'In store includes young couple, they long walk around the store and constantly watch over you and what you are arguing. As a result, they still come up to you and the girl strongly embarrassed trying to explain what they want from her zbivchevogo Raskaz you understand that it devstvenitsa and is not yet ready with the melt, but also does not want to lose the guy, so he finds the girls at once , and she oversees the process, it offers 2000rub. for sex with her boyfriend right there with her.'

	act 'Refuse':dynamic $endwork

	act 'Agree':
		guy += 1
		money += 2000
		picrand = 35
		gt 'sex', 'minet'
	end
end

if $ARGS[0] = '3':
	cla
	*clr
	'<center><img src="images/img/centr/mag3.jpg"></center>'
	'In the store includes the company guys long walk down the hall arguing about something, and after that come up to you and announces to you that they had an argument, you''re a little osharanenaya listens essence of the dispute. It turned out that they had an argument that you can not tell whose cock suck black or white, and the winners will fuck you.'

	act 'Send them':dynamic $endwork

	act 'Ask what you get':
		cla
		picrand = 15
		'You ask what you will with this guys laugh and say that you unforgettable feeling.'

		act 'Send them':dynamic $endwork

		act 'Lay back room':
			cla
			*clr
			guy += 2
			'<center><img src="images/img/centr/mag4.jpg"></center>'
			'You make the guys in the back room they despise pants pulling its members, and you are blindfolded and you start trying every member of the taste, but you have not tried and could not guess which is which, two white guys win, the rest come from the back room.'

			act 'Prize winners':xgt 'sexdvoe', 'var'
		end
	end
end

if $ARGS[0] = '4':
	cla
	*clr
	'<center><img src="images/img/centr/mag5.jpg"></center>'
	'Half-day in-store rubbing two Guys are always flirting with you and trying to work, they have to pinch you for nars ass, after several unsuccessful attempts to send them, you are quite desperate to get rid of them.'

	act 'Call the manager':
		cla
		'The manager quickly shoved the guys from the store.'

		act 'Finish the job':dynamic $endwork
	end

	act 'Give them':
		guy += 2
		picrand = 16
		xgt 'sexdvoe', 'var'
	end
end

if $ARGS[0] = '5':
	cla
	'In the store stopped two girls, about an hour you showed them the goods while they are constantly concerned you as if by accident, when they bought all they wanted, one of them came up to you and whether you can sporosila kiss on the lips, you''re a little dumbfounded by such a manifestation votes on the machine answered duty phrase:'
	'"Of course, all that you wish"'
	'"Well, then takes off her panties, I want to kiss your lips sex"'

	act 'Send them':dynamic $endwork

	act 'Remove briefs':
		cla
		*clr
		girl += 2
		lesbian += 1
		'<center><img src="images/img/centr/mag6.jpg"></center>'
		'You shoot panties sodites on the counter and spreads her legs, she crouches to your pussy lips then licking clit then fucking your vagina with his long tongue, it bears fruit and a couple of minutes you flinch from orgasm.'

		act 'Thank her':
			cla
			*clr
			'<center><img src="images/img/centr/mag7.jpg"></center>'
			'You lozhite girl on the floor and dig into her crotch lips caressing tongue her pussy, soon she grabs your head and strongly pressed to her ends violently, her juices spreading over your lips and chin.'

			act 'Further':
				cla
				*clr
				'<center><img src="images/img/centr/mag8.jpg"></center>'
				'The second girl all this time stood on the sidelines and watching you masturbate when you are finished she sat in a chair and spread her legs wide to call you:'
				'"Hey girls and completely forget about me"'
				'The two of you went to the girl and knelt began to lick her pussy, your tongues constantly in contact, it was like what a strange kiss'

				act 'Further':
					cla
					*clr
					'<center><img src="images/img/centr/mag9.jpg"></center>'
					'One of the girls walked away, leaving you alone to meet her friend, you diligently licked her clitoris without forgetting stuff tongue in her vagina. Soon she squeezed his feet and your head was trapped between her thighs, you have nothing to breathe, and from it a flood in your mouth when she finally opened her legs then your whole face was in her secretions, and they ran down her thighs, you again floated his tongue carefully licking her thighs, leaving them a drop of juice.'

					act 'Leave':dynamic $endwork
				end
			end
		end
	end
end

--- young_shop ---------------------------------
# sell_young_clothes
$metka = $ARGS[0]
$loc = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
mag = 1
'<b><center><font size="4">Women''s Clothing</font></center></b>'

act '<font color="navy">Go</font>':
	minut += 1
	gt 'young_shop'
end

i = 1
:loopodekis
	if odekis[i] = 0:dynamic 'act ''Look at youth clothing <<i>>'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''odekis'', <<i>>, 10000'
	i += 1
if i <= 10:jump 'loopodekis'

--- sell_young_clothes ---------------------------------
# andrey
'<b><center><font size="4">Manager Andrew M. Sobulyagin</center></b>'

if hour >= 18:
	msg '<center>Andrew M. Sobulyagin goodbye and leaves. His work day ended</center>'
	gt 'young_shop'
end

if young_shop_work = 0:
	'I knock on the door and walk into a room to the manager. He sits at a table and reading some papers.'

	act 'Talk about work':
		cla
		minut += 5
		'The manager tells me that the store needs a girl consultant to work in the evening. Salary small but stable.'
		'Begin work on the next working day after employment.'
		'<b>Details</b>need to work 5 days a week (Monday-Friday) at 2:00. Salary - 800 rubles per day. Work need to come in 15 hours. Salary paid every week on Friday according to hours worked. 3 for truancy fired from his job.'

		act 'Consider the conditions and come at another time':gt 'young_shop'

		if ((work = 0 and young_shop_work = 0 and cheatWork = 0) or (young_shop_work = 0 and cheatWork = 1)) and hour < 15:
			'If operating conditions suit me, I can now fill in the blanks and sign documents.'

			act 'Get this job':
				work = 1
				young_shop_work = 1
				minut += 5

				if week >= 1 and week <= 4:msg '<b><center>I get a job in youth clothing store ''Kies pussy''. Starting tomorrow</center></b>'
				if week = 5:msg '<b><center>I get a job in youth clothing store ''Kies pussy''. Starting on Monday</center></b>'

				gt 'young_shop'
			end
		end
	end

	act 'Leave':gt 'young_shop'
elseif young_shop_work = 1:
	'I knock on the door and walk into a room to the manager. Andrew M. Sobulyagin normally picks papers, incidentally examining pictures of naked girls in the monitor.'

	if week = 5 and young_shop_salary > 0:
		'- Hello <<$name>>. For salary come from?'

		act 'Get salary':
			minut += 15

			!'
			if char_responsible < 400 and young_shop_bonus >= 1:
				young_shop_bonus -= 2

				if young_shop_bonus < 0:young_shop_bonus = 0
				bonus_mood -= 100
				'<<$name>>, you are very irresponsible work, I have to deprive you of some bonuses! Try better.'
			elseif char_responsible >= 600:
				'<<$name>>, you are a very responsible person! Keep up the good work. Oh yeah, you also relies nadbavochka.'
				young_shop_bonus += 2
				bonus_mood += 100
			end
			'!

			money += young_shop_salary * 800 + young_shop_bonus * 200
			young_shop_salary = 0
			young_shop_bonus = 0
			msg '<center>I worked <b><<young_shop_salary>></b> days and get paid <b><<young_shop_salary * 800>></b> rubles and bonus <b><<young_shop_bonus * 200>></b> rubles. Total <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles</center>'
			'The manager counts I <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles and received my signature again puts his nose in the paper.'

			act 'Leave':gt 'young_shop'
		end

		exit
	end

	if young_shop_miss >= 3:
		cla
		'- What kind of people! - Andrew M. leans back in his studio. - Where have you been? We agreed truancy 3 - dismissal.'

		act 'Agree to dismissal':
			cla
			young_shop_work = 2
			young_shop_miss = 0
			char_honest += 5
			work = 0
			bonus_mood -= 100
			minut +=15
			'- Well, I did not get to go to work every day - I sigh.'
			'Manager pulls paper and begins to fill the blanks. A few minutes later he hands me some papers and I put a signature.'
			'More I do not work in the store.'

			if young_shop_salary > 0 or young_shop_bonus > 0:
				money += young_shop_salary * 800 + young_shop_bonus * 200
				young_shop_salary = 0
				young_shop_bonus = 0
				msg 'For <b><<young_shop_salary>></b> days I get paid <b><<young_shop_salary * 800>></b> and a bonus rubles <b><<young_shop_bonus * 200>></b> rubles. Total <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles'
				'Andrew M. counts I <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles.'
			end

			act 'Leave':gt 'young_shop'
		end

		act 'Beg to not be dismissed':
			cla
			'- But I can not lose my job! It is very necessary to me - I have already in tears. - Please do not fire me.'
			'- Then you have only one option:lock the door and show how your lips are able to convince - Andrew M. rises to his feet and taken the right hand for balls.'

			act 'Escape':
				minut += 2
				gt 'young_shop'
			end

			act 'Lock the door and get on your knees':
				cla
				minut += 15

				if sobulaginsex = 0:sobulaginsex = 1 & guy += 1

				bj += 1
				swallow += 1
				cumlip += 1
				young_shop_miss = 2
				young_shop_salary = 1
				young_shop_bonus = 2
				'"It''s for work, go home and do nothing bad will happen" - I try to calm myself while lock the door. I turned to see how Sobulyagin unzips his pants and throws Mighty 18 centimeter penis. I go over and get up on his knees, his eyes closed.'
				'- What is stuck? Let''s start! - Andrew grins.'
				'I open my eyes and take a dick in both hands. From a distance of 5 centimeters, he seems to be simply overwhelming. I slightly open mouth and his tongue. First I lick the head, then the whole barrel member. A few minutes later I put my dick in your mouth and start doing translational movements of the head, the head is constantly licking tongue. I have a feeling that it grows in my mouth.'
				'I am very fond of their occupation and do not notice as a member starts hitting streaks of sperm into my throat and into the airways. Struggling, I try not to stay and keep coughing, but I have enough on just 15 seconds. Clearing his throat, I open my eyes and see the manager buttons fly and goes to leave.'
				'- And you did so! Such a valuable employee I can not dismiss. Spis absenteeism and you''ll write the last award for his efforts. And you go home to work today you can not go out, have worked! Only to any more truancy was not! - With these words he comes out of the office, and I''m starting to put itself in order.'

				act 'Leave':gt 'young_shop'
			end
		end
		if cheatWork = 1:
			act 'Reset counter truancy (Cheat)':
				young_shop_miss = 0
				gt 'young_shop'
			end

			if cheatWorkKiskis = 0:
				act 'Disable counter truancy (Cheat)':
					cheatWorkKiskis = 1
					young_shop_miss = 0
					gt 'young_shop'
				end

			elseif cheatWorkKiskis = 1:
				act 'Enable counter truancy (Cheat)':
					cheatWorkKiskis = 0
					gt 'young_shop'
				end
			end
		end
	elseif young_shop_miss < 3:
		act 'Resign':
			cla
			'- I would like to resign - I come to the table manager.'
			'- Are you sure? Of course, I can arrange everything right Wait - Andrew M. scratching his head. - But then suddenly, ?'

			act 'Change your mind':
				'- You know, I should still think about it - I''m moving back to the door. - Come on, I''ll come next time.'
				'- Right, something else may like?'

				act 'Leave':gt 'young_shop'
			end

			act 'Resign':
				young_shop_work = 3
				young_shop_miss = 0
				work = 0
				'- No, I already thought about it very thoroughly!'
				'Okay, owner - a gentleman! - Manager fills several forms and gave me lictochki signature.'

				if young_shop_salary > 0 or young_shop_bonus > 0:
					money += young_shop_salary * 800 + young_shop_bonus * 200
					young_shop_salary = 0
					young_shop_bonus = 0
					msg '<center>For <b><<young_shop_salary>></b> days I get paid <b><<young_shop_salary * 800>></b> rubles and bonus <b><<young_shop_bonus * 200>></b> rubles. Total <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles</center>'
					'Andrew M. counts I <b><<young_shop_salary * 800 + young_shop_bonus * 200>></b> rubles.'
				end

				act 'Leave':gt 'young_shop'
			end
		end
	end

	act 'Leave':gt 'young_shop'
elseif (work = 0 and young_shop_work = 2 and cheatWork = 0) or (young_shop_work = 2 and cheatWork = 1):
	act 'Beg to return to work':
		cla
		'- I do not even know - Andrei Mikhailovich obviously do not want to hire progulschitsu.'
		'- Oh, please! I''ll do anything, I really need this job! - I do not even know how to convince him ..'
		'- Anything? Ha! I know what you could do - open the eyes of the manager begins to evaluate my body. - Frankly, I fuck you in the ass, and then you and I still otsosesh. Hand?'

		act 'Tell him you would never do this':
			cla
			'Paint rushed to my face. I''m even a little stunned by what he heard:'
			'- Do you want me to do anal sex, and then I''ll have to lick all the juices from your penis? - It does not even fit in my head. - I will not do it!'
			'- Do you want, how you want! - Andrew M. clearly upset.'

			act 'Leave':gt 'young_shop'
		end

		act 'Agree':
			young_shop_work = 1
			work = 1
			minut += 60
			'That''s not fair! You know how I need this job - I want to try to convince Andrew Sobulyagina.'
			'- I only give you a chance. Actually, according to the rules, I should have told you categorically refuse! So I''m doing pretty good deed - the manager rises from his chair. - Decide.'
			'- Okay, I agree - it seems that this is the best way out. - Thank you.'
			'Andrew goes to the door and locks it, and I undress before the goal.'
			'- And you have me shalunishka! - He comes up behind me and hugged starts to finger her nipples.'
			'I''m getting more comfortable in and lean forward. Spreading buttocks with both hands and close my eyes.'
			'- Okay, we can do without foreplay - Sobulyagin immediately swing plants with cock right up my ass and I turbid in the head from a sharp tearing pain.'
			'Coming to myself I only when Andrew puts me naked on the couch in his office:'
			'- I got so carried away your hole that did not manage to take out time and finished in your anus - the manager scratching his head. - Then I saw you some strange:glass eyes, to touch or words not react. You do not worry, everything was perfect! So get dressed and go home, I''ll work now decorated.'
			'I got up and slowly begin to dress. Hands some cotton and listen hard, and anus just lit. Dressing, I wipe his aching ass palm and fingers is dirty brown sperm.'
			'- Thank you very much! - I''m trying to smile on his face.'

			if week >= 1 and week <= 4:msg '<b><center>I get a job in youth clothing store '' '' Kies pussy. Starting tomorrow</center></b>'
			if week = 5:msg '<b><center>I get a job in youth clothing store '' '' Kies pussy. Starting on Monday</center></b>'

			act 'Leave':gt 'young_shop'
		end
	end

	act 'Leave':gt 'young_shop'
elseif young_shop_work = 3:
	'The manager is not against me again take on the job, so I quit on their own, and was not fired for absenteeism.'

	act 'Back to work':
		cla
		work = 1
		young_shop_work = 1
		minut += 15
		'- And we are waiting for you! - Andrew M. gave me forms. - I even argued with Valera from the male department, that you come back to us!'
		'I fill forms and return them to the manager.'

		if week >= 1 and week <= 4:msg '<b><center>I get a job in youth clothing store '' '' Kies pussy. Starting tomorrow</center></b>'
		if week = 5:msg '<b><center>I get a job in youth clothing store '' '' Kies pussy. Starting on Monday</center></b>'

		act 'Leave':gt 'young_shop'
	end

	act 'Leave':gt 'young_shop'
end

--- andrey ---------------------------------
# gopnew
$gopsexboy1 = {
	cla

	if VasanTut = 3:
		$guygop = 'Vasya'

		if vasansex = 0:vasansex = 1 & guy += 1
	end

	if BerezaTut = 3:
		if berezasex = 0:berezasex = 1 & guy += 1

		$guygop = 'Birch'
	end

	if VitekTut = 3:
		if viteksex = 0:viteksex = 1 & guy += 1

		$guygop = 'Witek'
	end

	if KostilTut = 3:
		if kostilsex = 0:kostilsex = 1 & guy += 1

		$guygop = 'Spike'
	end

	if UdmurtTut = 3:
		if udmurtsex = 0:udmurtsex = 1 & guy += 1

		$guygop = 'Udmurt'
	end

	if SeriTut = 3:
		if serisex = 0:serisex = 1 & guy += 1

		$guygop = 'Gray'
	end

	act 'Post':gt 'gopnew', '1'
	act 'Suck':gt 'gopnew', '11'
	act 'Writing in the ass':gt 'gopnew', '12'
}


if $ARGS[0] = 'start':
	'<center><b>Yard at the house</b></center>'
	'<center><img src="images/etogame/dvor.jpg"></center>'
	'You walk slowly around the yard, you go to a meeting a few guys gopnicheskogo species, with pivasom, Semko and caps.'
	gtalkrand = rand(0, 10)

	if gtalkrand = 0:$goptalk = 'vaflersha'
	if gtalkrand = 1:$goptalk = 'waffle-iron'
	if gtalkrand = 2:$goptalk = 'shkvarnaya'
	if gtalkrand = 3:$goptalk = 'whore'
	if gtalkrand = 4:$goptalk = 'Tvaryny'
	if gtalkrand = 5:$goptalk = 'nipple'
	if gtalkrand = 6:$goptalk = 'sheep'
	if gtalkrand = 7:$goptalk = 'Shmarov'
	if gtalkrand = 8:$goptalk = 'slut'
	if gtalkrand = 9:$goptalk = 'huesoska'
	if gtalkrand = 10:$goptalk = 'blyadushka'

	gtalkrand = rand(0, 10)

	if gtalkrand = 0:$goptalk2 = 'how many cocks sucked today?'
	if gtalkrand = 1:$goptalk2 = 'want to take the canine?'
	if gtalkrand = 2:$goptalk2 = 'you struhnya on fucked.'
	if gtalkrand = 3:$goptalk2 = 'Th silent? Mouthful Of Cum scored?'
	if gtalkrand = 4:$goptalk2 = 'and in your mouth already Ssali? Or not?'
	if gtalkrand = 5:$goptalk2 = 'what hollow you have more? Ass or pussy?'
	if gtalkrand = 6:$goptalk2 = 'I came out of shock, and wipe your ass forgot podlizhesh tongue?'
	if gtalkrand = 7:$goptalk2 = 'come to me for a ride on a scooter hairy.'
	if gtalkrand = 8:$goptalk2 = 'berushka you in the mouth? Or a beggar in the ass?'
	if gtalkrand = 9:$goptalk2 = 'want in your mouth Nass, that sea smell?'
	if gtalkrand = 10:$goptalk2 = 'struhnyu you like to lick?'

	gs 'gopwho'
	gs 'goplust'

	if opusk > 0:
		'Yo <<$goptalk>>, <<$goptalk2>> <<$gopnik>>'

		act 'Wait until suitable Gopnik':
			cla
			'To you came Gopnik'

			if gopopusday ! day:
				'Babosy you brought us?.'

				if money >= 2000:
					act 'Giving money':
						cla
						money -= 2000
						gopopusday = day
						'You gave money goparyam.'

						act 'Leave.':gt 'street'

						if GLust > 0:
							cla
							'<<$gopnik>>'
							'Come with us on a stick of tea.'

							act 'Go with Gopnik':gt 'gopnew', 'sexstart'
						end
					end
				else
					act 'Guys, please, I have no money':
						cla
						'You cried, "Guys, please, I have no money", you will immediately embedded in the stomach, ebalo Zavala crud. I see you''re not vkurivaesh the seriousness of your situation. Soot this scum in the car, go punish her.'

						act 'In the car':gt 'gopnew', 'degrading'
					end
				end
			elseif gopopusday = day:
				if GLust > 0:
					cla
					'<<$gopnik>>'
					'Come with us on a stick of tea.'

					act 'Go with Gopnik':gt 'gopnew', 'sexstart'
				else
					'Okay, stomp out of here before we''re kind.'

					act 'Leave.':gt 'street'
				end
			end
		end

		act 'To pretend that you did not notice.':
			cla
			'You tried to pretend that did not see Gopnik and went to his house.'

			if gopopusday = day:
				'Gopnik neighing "Looking as rushed. Probably her fresh dick kisnet there, and we distract her."'

				act 'Run into the apartment.':gt 'street'
			elseif gopopusday ! day:
				'Gopnik immediately overtaken and surrounded you. "You slut struhnya in ears or something hit? Slyshish Not that appeal to you."'
				'Babosy you brought us?.'

				if money >= 2000:
					act 'Giving money':
						cla
						money -= 2000
						gopopusday = day
						'You gave money goparyam.'

						act 'Leave.':gt 'street'

						if GLust > 0:
							cla
							'<<$gopnik>>'
							'Come with us on a stick of tea.'

							act 'Go with Gopnik':gt 'gopnew', 'sexstart'
						end
					end
				else
					act 'Guys, please, I have no money':
						cla
						'You cried, "Guys, please, I have no money", you will immediately embedded in the stomach, ebalo Zavala crud. I see you''re not vkurivaesh the seriousness of your situation. Soot this scum in the car, go punish her.'

						act 'In the car':gt 'gopnew', 'degrading'
					end
				end
			end
		end

		exit
	end

	if sipovka > 0:
		'Hey sipovka shout you Gopnik. <<$gopnik>>'

		if GLust > 0:
			cla
			'Come with us on a stick of tea.'

			act 'Go with Gopnik':gt 'gopnew', 'sexstart'
			act 'Leave.':gt 'street'
		else
			'Okay, stomp out of here before we''re kind.'

			act 'Leave.':gt 'street'
		end

		exit
	end

	if rosetka > 0:
		'Hey socket shout you Gopnik. <<$gopnik>>'

		if GLust > 0:
			cla
			'Come with us on a stick of tea.'

			act 'Go with Gopnik':gt 'gopnew', 'sexstart'
			act 'Leave.':gt 'street'
		else
			'Okay, stomp out of here before we''re kind.'

			act 'Leave.':gt 'street'
		end

		exit
	end

	if loh > 0:
		'Hey lohushka shout you Gopnik. <<$gopnik>>'

		if gopdolg > 0 and gopdaydolg > daystart:
			'Do not forget about the debt.'
		elseif gopdolg > 0 and gopdaydolg <= daystart:
			'Well, slut, brought the money?'

			if money >= gopdolg:
				act 'Pay.':
					cla
					money -= gopdolg
					gopdolg = 0
					'You gave <<gopdolg>> Gopnik rubles.'

					act 'Leave.':gt 'street'
				end
			else
				'You''ve admitted that you have no money to pay that Gopnik. They chuckled, then get up on his knees, slut.'

				act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
			end

			exit
		end

		act 'Leave.':gt 'street'

		exit
	end

	if gnewQW = 4:
		'! Hey, sweetie <<$name>>, go pivas drink? <<$gopnik>>'

		act 'I would like to, but I''m in a hurry':
			cla
			'(You) - Sorry, but I''m in a hurry'
			'(Bob) - Come on, sit half an hour and have a chat, have time.'

			act 'Drink pivasika':gt 'gopnew', 'pivas'
			act 'Go':gt 'street'
		end

		act 'Drink pivasika':gt 'gopnew', 'pivas'
	elseif gnewQW = 3:
		gopota += 5
		gnewQW = 4
		'Great light you say cops swept, but you''re done no one handed, sit down raskazhesh as passed. <<$gopnik>>'
		'You sat down and began to tell Gopnik, omitting some details. When you are finished, one of Gopnik said, "We find this Cop bitch on a leash and you lurk, you will klasnaya sobachenka" they began to laugh, and you also laughed along with them.'

		act 'Leave.':gt 'street'
	elseif gnewQW = 2:
		'Hey, sweetie <<$name>>, go pivas drink, or you can walk through the park in good pootzhimat suckers? <<$gopnik>>'

		act 'I would like a beer, but I''m in a hurry':
			cla
			'(You) - Sorry, but I''m in a hurry'
			'(Bob) - Come on, sit half an hour and have a chat, have time.'

			act 'Drink pivasika':gt 'gopnew', 'pivas'
			act 'Leave':gt 'street'
		end

		act 'Drink pivasika':gt 'gopnew', 'pivas'

		act 'Go to delyugu':
			*clr
			cla
			'<center><img src="images/etogame/park.jpg"></center>'
			goprandwork = rand(1, 100)

			if goprandwork < 75:
				cla
				minut += 60
				gopota += 1
				'You poshlyatsya with Kompashki but suckers can not see.'

				act 'Go home':gt 'street'
			elseif goprandwork >= 75 and goprandwork < 95:
				cla
				gopstop += 1
				gopota += 1
				minut += 60
				'You boys overcame mobilku but passing Mobil pawnshop you got money only for pivas.'

				act 'Go home':gt 'street'
			elseif goprandwork >= 95:
				cla
				gopstop += 1
				gopota += 1
				minut += 60
				randmon = rand(50, 500)
				money += randmon
				'You boys have pressed suckers money and CellPhones, surrendering to the pawnshop you share the money you got <<randmon>> rubles.'

				act 'Go home':gt 'street'
			end
		end
	elseif gnewQW = 1:
		'Hey, sweetie <<$name>>, go pivas drink? <<$gopnik>>'

		act 'I would like to, but I''m in a hurry':
			cla
			'(You) - Sorry, but I''m in a hurry'
			'(Bob) - Come on, sit half an hour and have a chat, have time.'

			act 'Drink pivasika':gt 'gopnew', 'pivas'
			act 'Go':gt 'street'
		end

		act 'Drink pivasika':gt 'gopnew', 'pivas'
	elseif gnewQW = 0:
		'One of them gets better cap thieves step is sent to you. "Hi, are you cool chick, will pivas for dating?"'

		act 'Drink pivasika':gt 'gopnew', 'pivas'

		act 'No':
			cla
			'You shook your head and going to go further, but Gopnik is not going to give up so easy.'
			'(Gopnik) - Yes, relax you, no you did not do anything, we are decent guys, and not what you scumbags.'

			act 'Okay, let''s go drink some beer':gt 'gopnew', 'pivas'
			act 'I said no.':
				cla
				*clr
				'You refused hooligan already sharply, making it clear they do not intend to drink a beer with them. Gopar squinted angrily, "squeamish our society?"'

				act 'Okay, let''s go drink some beer':gt 'gopnew', 'pivas'

				act 'Get off me':
					cla
					'You rudely told to fuck off hooligan, but he grabbed you by the arm and hissed angrily.'
					'"You''re not right bitch, you came to the well-intentioned, but you rude. I ask from you for that."'
					'Gopar took you by the hand and pulled into the driveway.'

					act 'Resist':
						cla
						'You tried to pry his hand out of his grasp and immediately received a resounding podschechinu that nearly knocked you to the ground.'
						'He roughly pulled you into the driveway and up the wall.'

						act 'What do you want from me?':gt 'gopnew', 'bazar'
					end

					act 'Submit':
						cla
						'You dutifully trudged over Gopnik. He roughly pulled you into the driveway and up the wall.'

						act 'What do you want from me?':gt 'gopnew', 'bazar'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'pivas':
	minut += 30
	gs 'stat'
	'<center><b>Do COURT HOUSE</b></center>'
	'<center><img src="images/etogame/dvor.jpg"></center>'
	'You and the guys went to the playground, where they boarded on the bench.'

	if cumface > 0 or cumlip > 0 or cumfrot > 0:
		'Bob looked closer to you, "shit, you''re in the same struhne, ohuet and sat with us zaforshmachennaya pivas drink, let''s go bitch, need to talk"'

		act 'Go through the gate with boys':gt 'gopnew', 'bazar'

		exit
	end

	if gnewQW > 0:
		'You sat down with the guys on the bench and began to drink beer.'
		'To the playground came burly Udmurt and shaved bald on Grey.'

		if film > 0:
			pfknowrand = rand(0, 100)
			if film >= pfknowrand:filmknow = 1
		end

		if filmknow = 1:
			'Udmurt sat on the bench and does not lower his eyes off you. Suddenly he turned to you sipyaschim rough voice "is heard, where I could see you before?"'
			'You shrugged, so who knows where, I live here. Udmurt scratched his head. "Epta tochnyak, look guys." Udmurt got Mobil and began to show that that kid.'
			'You hear from the speakers as a woman''s phone moans and sucking sounds. Guys with one voice cracked a "ohuet, you''re a whore."'
			'Udmurt silently turned the phone screen to you and you see that it is a video where you suck dick.'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end

		if kavslut >= 3:
			kavknowrand = rand(0, 100)

			if kavknowrand >= 95:kavslutknow = 1
		end

		if kavslutknow = 1:
			'Gray looked at you and evil grin. "Hold on guys, I''ll tell you one prikolyuhu now. Anyway, I cook Ashot, well of local rygalovki, told how they Givi waitress in all holes zhuchat after work. He showed me that Shmarev. Anyway, you are now with her pivas Bukhaev , ha ha, prikinte it you schA struhnyu Ashot pivasom in the bottle is empty, eh? "'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end

		if frot >= 3:
			frotknowrand = rand(0, 100)

			if frot >= frotknowrand:frotknow = 1
		end

		if frotknow = 1:
			'Gray looked at you and evil grin. "Hold on guys, I''ll tell you one prikolyuhu now. Anyway, I for one huylo pogonyalom Grater such prikolyuhu said he rides on the subway and babsky zhoptsam sticks that would rub on them. So says was got on the subway faultless slut ready suffering always ass podstvait friendship. He sfotkal it on mobile. So this is your <<$name>> is the very slut underground, in a joke right?'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end
	elseif gnewQW = 0:
		gnewQW = 1
		'Guys introduced, the one who invited you to call Bob Nail, long blond birch, small, swarthy and apelike Witek and skinny guy named Crutch.'
		'Bob baklashku printed with pivasom and drank from it, then handed baklashku circle.'
		'To the playground came not tall and burly shaven bald guy with gold teeth.'
		'Fortress introduction of Udmurtia and Goldtooth turned gray.'

		if film > 0:
			pfknowrand = rand(0, 100)

			if film >= pfknowrand:filmknow = 1
		end

		if filmknow = 1:
			'Udmurt sat on the bench and does not lower his eyes off you. Suddenly he turned to you sipyaschim rough voice "is heard, where I could see you before?"'
			'You shrugged, so who knows where, I live here. Udmurt scratched his head. "Epta tochnyak, look guys." Udmurt got Mobil and began to show that that kid.'
			'You hear from the speakers as a woman''s phone moans and sucking sounds. Guys with one voice cracked a "ohuet, you''re a whore."'
			'Udmurt silently turned the phone screen to you and you see that it is a video where you suck dick.'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end

		if kavslut >= 3:
			kavknowrand = rand(0, 100)

			if kavknowrand >= 95:kavslutknow = 1
		end

		if kavslutknow = 1:
			'Gray looked at you and evil grin. "Hold on guys, I''ll tell you one prikolyuhu now. Anyway, I cook Ashot, well of local rygalovki, told how they Givi waitress in all holes zhuchat after work. He showed me that Shmarev. Anyway, you are now with her pivas Bukhaev , ha ha, prikinte it you schA struhnyu Ashot pivasom in the bottle is empty, eh? "'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end

		if frot >= 3:
			frotknowrand = rand(0, 100)

			if frot >= frotknowrand:frotknow = 1
		end

		if frotknow = 1:
			'Gray looked at you and evil grin. "Hold on guys, I''ll tell you one prikolyuhu now. Anyway, I for one huylo pogonyalom Grater such prikolyuhu said he rides on the subway and babsky zhoptsam sticks that would rub on them. So says was got on the subway faultless slut ready suffering always ass podstvait friendship. He sfotka it on mobile. So this is your <<$name>> is the very slut underground, in a joke right?'
			'Bob angrily threw a beer bottle to the side. "You bastard beer obschakovoe their fucking lips zafarshmachila. Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end

		if bomjshet >= 3:
			bomjknowrand = rand(0, 100)

			if bomjknowrand >= 95:bomjknow = 1
		end

		if bomjknow = 1:
			'Gray for a few minutes then looked at you, then phone, squinting as if something looked at. After he gave the kid a mobile phone and said, "Listen, pozyrte, I immediately threw trash, and there is any woman boobs homeless showed she not?". The phone went on her hands, then looked at him, then at you. You blushed, then Bob said, "Shit, yeah exactly it!"'
			'Bob angrily threw a beer bottle to the side. "You do bomzhiha ohuel us yashkatsya? Come on, you have to market."'

			act 'Go through the gate with boys':gt 'gopnew', 'bazar'

			exit
		end
	end

	gopota += 1
	'You sat on a bench and drank beer with Gopnik.'
	'<<$gopnik>>'

	if gnewQW > 1:
		if VasanTut = 2 or BerezaTut = 2 or VitekTut = 2 or KostilTut = 2 or UdmurtTut = 2 or SeriTut = 2:gt 'gopnew', 'sexstart'
	end

	act 'Go':gt 'street'
end

if $ARGS[0] = 'bazar':
	'You frightened mumbled "What do you want from me?". And at that moment it hit you in the stomach. "Shut up, bitch."'
	'Go to first goparyu joined his three buddies and surrounded you.'
	'(Gopar) - You''re a bitch is not particularly right. I Vasya nail. I know the area at all, and you saucy slut specifically roughened. You owe me!'
	'Bob rudely shook you by the shoulders, "you agree bitch?"'

	if magic > 0:'At this point, you felt someone''s evil and powerful magical force that suppresses your and does not use against Gopnik.'
		act 'Agree':
			cla
			*clr
			'Bob turned to cronies. "Everyone has heard? She agreed that she owed me and that she''s a bitch."'

			act 'I''m not a bitch!':
				cla
				*clr
				'Who snitch, that in the mouth fuck?'

				act 'Yes':
					cla
					*clr
					'Then huyli you waiting for? Take on the tusk, you''re pizdobolka. Eyewitnesses confirm. You do agree that you bitch and napizdela us that you''re not a bitch. Also agreed that pizdobolov in mouth fuck.'

					act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'

					act 'Refuse':
						cla
						*clr
						'You said tvordo not. And then in my head like a shell burst. Bob hit you in the face with his fist. You flew from his hard hitting and venerated nape of the wall. Legs were like cotton and the strength to stand left.'

						act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
					end
				end

				act 'No':
					cla
					*clr
					'You ohuel? Pizdabolka! Immediately you are strongly embedded in the stomach and forces stay on his feet left.'

					act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
				end

				act 'I do not pizzhu!':
					cla
					*clr
					'You bitch twice napizdela! Guys, have you heard? Guys readily confirmed. Bob turned to you. "I''ll bitch now''ll knock your teeth if you will still complain."'
					'You agree that you pizdobolka?'

					act 'Agree':
						cla
						*clr
						'You agree not see another way out. Bob nodded and said, "Well, if I agree, then on my knees, I''m your fucking dick shove his mouth to complain could no longer."'

						act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
					end

					act 'No':
						cla
						*clr
						'You ohuel? Pizdabolka! Immediately you are strongly embedded in the stomach and forces stay on his feet left.'

						act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
					end
				end
			end

			act 'Keep silent':
				cla
				*clr
				'So understood. You bitch and specifically nakosyachila. Now you owe me.'

				act 'How much?':gt 'gopnew', 'dolg'
			end
		end

		act 'No!':
			cla
			*clr
			'Explain why you do not agree. You what? I think pizdobolom?'

			act 'Yes, you pizdobol':
				cla
				*clr
				'You ohuel? Pizdabolka! Immediately you are strongly embedded in the stomach and forces stay on his feet left.'

				act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
			end

			act 'No, you do not pizdobol':
				cla
				*clr
				'Well, then it turns out that you bitch and pizdobolka.'

				act 'Agree':
					cla
					'So understood. You''re a bitch, and specifically pisdobolka nakosyachila. Now you owe me.'

					act 'How much?':gt 'gopnew', 'dolg'
				end

				act 'Disagree':
					cla
					'Th you bitch, stubborn. After this roar Bob punched you in the face with his fist.'

					act 'Kneel before Gopnik':gt 'gopnew', 'rapebj'
				end
			end
		end
end

if $ARGS[0] = 'rapebj':
	minut += 3
	rape += 1
	'<center><img src="images/pictures/rapebj.jpg"></center>'
	'Bob pulled out his dick not washed and put it in front of several sanitimetrah your face. He growled "Hula tupish you bitch? Razevat ebalo."'

	act 'Clasp member lips':
		cla
		*clr

		if vasansex = 0:vasansex = 1 & guy += 1

		bj += 1
		'<center><img src="images/pictures/rapebj1.jpg"></center>'
		'You cupped jaws purple member Bob that being in front of your face just seemed huge and slowly began to suck.'
		'Bob growled at you, "What is this garbage? Suck on normal, vaflersha."'

		act 'Try':gt 'gopnew', 'tf'
		act 'Suck suck as':gt 'gopnew', 'tf'
	end

	act 'Lick dick language':
		cla
		*clr

		if vasansex = 0:vasansex = 1 & guy += 1

		bj += 1
		'<center><img src="images/pictures/rapebj2.jpg"></center>'
		'You have opened my mouth and gently touched to hot tongue member.'
		'Bob growled at you, "What is this garbage? Suck on normal, vaflersha."'

		act 'Suck':gt 'gopnew', 'tf'
		act 'Lick on':gt 'gopnew', 'tf'
	end

		act 'No!':
		cla
		*clr

		if vasansex = 0:vasansex = 1 & guy += 1

		bj += 1
		'<center><img src="images/pictures/rapebj3.jpg"></center>'
		'Bob grabbed you by the hair with one hand, and the other severely squeezed his throat and planted your mouth on his hat.'

		act 'Chokes':gt 'gopnew', 'tf'
	end
end

if $ARGS[0] = 'tf':
	minut += 3
	throat += 1
	'<center><img src="images/pictures/rapebjt2.jpg"></center>'
	'Bob holding your hair began to fuck you in the mouth. His cock hit you in the throat causing gagging reaction and causing tears to flow from his eyes.'
	'You gasp from these bumps in the throat.'

	act '.....':
		cla
		*clr
		minut += 3
		'<center><img src="images/pictures/rapebjt.jpg"></center>'
		'Suddenly Bob severe blow member drove it down your throat to the ground and began to hold you over the head. You feel that you are going to throw up.'

		act '.....':
			cla
			*clr
			minut += 3
			facial += 1
			cumface += 1
			if mop ! 1:mop = 0
			gs 'stat'
			'<center><img src="images/pictures/rapebjcum.jpg"></center>'
			'Bob abruptly pulled out of your throat cock and started to cum on your face, covering it with sperm. He growled at you, "What are you waiting whore lowered? Pure language."'

			act 'Brushing your tongue':
				cla
				*clr
				minut += 3
				swallow += 1
				cumlip += 1
				gs 'stat'
				'<center><img src="images/pictures/rapebjcum2.jpg"></center>'
				'You cupped his lips smeared with warm sperm head and began to suck her cum swallowing.'
				'Soon Vasyanya is tired and he tore your mouth from cleaning his penis "Now listen here Shmarov. Lowered vaflersha You fucking slut and proshmandovka now as an apology will come every day and pay me two mower, and I fuck you like them earn, right? If you do not bring it, I''ll shove a bottle in the pussy and in the belly pendalya ladies that she would burst your pizden tearing to shreds. And do not try to hide from me, I love you''ll get out of the ground, and mentovku stated my sidekick in the woods you will take out, vobyut ass handle of a shovel and then bury this shovel in the ass. You all right? "'
				'And do not forget bitch, you my property and have no voting rights. My buddies can have fun with you when they want to, okay? Whore.'

				act 'Yes':
					cla
					*clr
					minut += 3
					opusk = 1
					'<center><img src="images/pictures/spit.jpg"></center>'
					'Bob grabbed you by the hands and spit in your face, and then hit you in the stomach and you fell.'
					'Someone of the guys said, "John, come on, enough already with that whore." Bob growled "Use boys, slut."'
					'In the driveway ran what that man and hissed "Atas boys, garbage" Lightning Gopnik resorbed from the gateway leaving you lying on the pavement in Concha, saliva, tears and snot.'

					act 'Leave':gt 'street'
				end
			end
		end
	end
end

if $ARGS[0] = 'dolg':
	minut += 3
	loh += 1
	gopdolg = money + stolmoney + karta + 10000
	gopdaydolg = daystart + 10

	'After 10 days, you give <<gopdolg>> rubles. And I do not fuck where you''re going to take them, though by a pussy bidding, I FSUs, that the money was.'
	'Where to find us you know, if she does not come, then we will come to you and deal with you harshly. Truncated? Now get out of here slut.'

	act 'Leave':gt 'street'

	act 'Guys, this is too much, I do not have that kind of money':
		cla
		'(You) - Guys, this is too much, I do not have that kind of money'
		'(Bob) - Who is the fuck?'

		act 'Leave':gt 'street'

		act 'Maybe something like a different take?':
			cla
			'(You) - Maybe something like a different take?'
			'(Bob) - Well, you can work out a debt in kind.'

			act 'Leave':gt 'street'

			act 'Payment in kind':
				sipovka += 1
				gopdolg = 0
				VasanTut = 3
				gt 'gopnew', 'sexstart'
			end
		end
	end
end

if $ARGS[0] = 'sexstart':
	!!rosetka
	!!sipovka
	minut += 3

	if opusk > 0 or sipovka > 0:
		if GLust = 1:
			if tiprand = 0:gt 'gopnew', '1'
			if tiprand = 1:gt 'gopnew', '11'
			if tiprand = 2:gt 'gopnew', '12'
		end

		if GLust = 2:gt 'gopnew', '2'
		if GLust = 3:gt 'gopnew', '3'
		if GLust = 4:gt 'gopnew', '4'
		if GLust = 5:gt 'gopnew', '5'
		if GLust = 6:gt 'gopnew', '6'
	elseif opusk = 0 and sipovka = 0:
		if GLust = 2:
			'Two Gopnik suggest you go with them to the gateway'
			act 'Agrees to fuck with two':sipovka += 1 & gt 'gopnew', '2'
		elseif GLust = 3:
			'Three Gopnik suggest you go with them to the gateway'
			act 'Agrees to fuck with three':sipovka += 1 & gt 'gopnew', '2'
		elseif GLust = 4:
			'Four Gopnik suggest you go with them to the gateway'
			act 'Agrees to fuck with four':sipovka += 1 & gt 'gopnew', '2'
		elseif GLust = 5:
			'Five Gopnik suggest you go with them to the gateway'
			act 'Agrees to fuck with five':sipovka += 1 & gt 'gopnew', '2'
		elseif GLust = 6:
			'Six Gopnik suggest you go with them to the gateway'
			act 'Agrees to fuck with six':sipovka += 1 & gt 'gopnew', '2'
		end

		if VasanTut = 2:
			'Bob offers you to go with him into the driveway'
			act 'Go with Vasyanya':VasanTut = 3 & dynamic $gopsexboy1
		end

		if BerezaTut = 2:
			'Birch offers you to go with him into the driveway'
			act 'Go with Birch':BerezaTut = 3 & dynamic $gopsexboy1
		end

		if VitekTut = 2:
			'Witek offers you to go with him into the driveway'
			act 'Go with Vic':VitekTut = 3 & dynamic $gopsexboy1
		end

		if KostilTut = 2:
			'Crutch offers you to go with him into the driveway'
			act 'Go with crutches':KostilTut = 3 & dynamic $gopsexboy1
		end

		if UdmurtTut = 2:
			'Udmurt offers you to go with him into the driveway'
			act 'Go with Udmurtia':UdmurtTut = 3 & dynamic $gopsexboy1
		end

		if SeriTut = 2:
			'Grey offers you to go with him into the driveway'
			act 'Go with Grey':SeriTut = 3 & dynamic $gopsexboy1
		end

		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = '1':
	minut += 15
	vagina += 1
	sex += 1
	cumass += 1
	gs 'stat'
	picrand = rand(1, 6)
	'<center><img src="images/pics/gopslut<<picrand>>.jpg"></center>'
	'<<$guygop>> gets you to a secluded place where posture and fucks.'
	horand = rand(1, 100)

	if horand > horny:
		horny += 10
		'You were not satisfied'
	else
		horny = 0
		orgasm += 1
		'You covered orgasm'
	end

	'<<$guygop>> commits you to wipe your ass and dick on your ass. After that wears pants and goes thump on.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = '11':
	minut += 15
	bj += 1
	throat += 1
	gs 'stat'
	picrand = rand(1, 10)
	'<center><img src="images/pics/bj<<picrand>>.jpg"></center>'
	'You remove a member Gopnik and take it in his mouth sucking diligently.'
	!'
	horand = rand(1, 100)

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

	'Do you feel that <<$guygop>> now finish'
	'!
	gs 'oral', '0'

	act 'Continue to suck':
		cla
		*clr
		picrand = rand(1, 10)
		'<center><img src="images/pics/cum<<picrand>>.jpg"></center>'
		'A powerful jet of sperm hits you in the mouth'

		act 'Swallow':
			cla
			cumlip += 1
			swallow += 1
			'You swallow sperm <<$guygop>> wipes his dick on your lips and leaves.'

			act 'Leave':gt 'street'
		end

		act 'Spit out':
			cla
			cumlip += 1
			'You spat out semen on the ground.'

			act 'Leave':gt 'street'
		end
	end

	act 'Remove the mouth':
		cla
		picrand = rand(1, 5)
		'<center><img src="images/pics/facial<<picrand>>.jpg"></center>'
		bjrand = rand(0, 1)
		if bjrand = 0:
			'You have time to take out of his mouth and a member <<$guygop>> commits past you.'
		elseif bjrand = 1:
			cumface += 1
			'<<$guygop>> ends up on your face.'
			'All your face sticky and hot sperm, Gopnik wipes member of your lips and leaves.'
		end

		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = '12':
	minut += 15
	anal += 1
	anus += 1
	cumass += 1
	gs 'stat'

	picrand = rand(1, 6)
	'<center><img src="images/pics/gopslut<<picrand>>.jpg"></center>'
	'<<$guygop>> gets you to a secluded place where posture and fucks.'
	horand = rand(1, 100)

	if horand > horny:
		horny += 10
		'You were not satisfied'
	else
		horny = 0
		orgasm += 1
		'You covered orgasm'
	end

	'<<$guygop>> commits you to wipe your ass and dick on your ass. After that wears pants and goes thump on.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = '2':
	minut += 30
	gs 'stat'

	if VasanTut = 3:
		$namgop = 'Vasya'
	else
		$namgop = ''
	end

	if BerezaTut = 3:
		$namgop2 = 'Birch'
	else
		$namgop2 = ''
	end

	if VitekTut = 3:
		$namgop3 = 'Witek'
	else
		$namgop3 = ''
	end

	if KostilTut = 3:
		$namgop4 = 'Spike'
	else
		$namgop4 = ''
	end

	if UdmurtTut = 3:
		$namgop5 = 'Udmurt'
	else
		$namgop5 = ''
	end

	if SeriTut = 3:
		$namgop6 = 'Gray'
	else
		$namgop6 = ''
	end

	$namgopsum = '<<$namgop>> <<$namgop2>> <<$namgop3>> <<$namgop4>> <<$namgop5>> <<$namgop6>> got its members and began to strip off your clothes.'

	if GLust ! 2:tiprand = rand(0, 1)

	if tiprand = 0 and GLust ! 2:
		bj += 3
		gang += 1
		throat += 3
		cumlip += 2
		cumface += 1
		gs 'stat'
		picrand = rand(1, 11)
		'<center><img src="images/pics/tri<<picrand>>.jpg"></center>'
		'<<$namgopsum>>. They put you into a crouch and began to beat their members in the face and you in turn have you in my mouth.'
		horand = rand(1, 100)

		if horand > horny:
			horny += 10
			'You were not satisfied'
		else
			horny = 0
			orgasm += 1
			'You covered orgasm'
		end

		'They obkonchali you all the face and mouth.'

		act 'Leave':gt 'street'
	elseif tiprand = 1 or GLust = 2:
		bj = bj + 1
		vagina += 1
		sex += 1
		anal += 1
		anus += 5
		gang += 1
		throat += 3
		cumlip += 2
		cumface += 1
		gs 'stat'
		picrand = rand(1, 15)
		'<center><img src="images/pics/gang<<picrand>>.jpg"></center>'
		'<<$namgopsum>>. They started to fuck you in all holes at a time.'
		horand = rand(1, 100)

		if horand > horny:
			horny += 10
			'You were not satisfied'
		else
			horny = 0
			orgasm += 1
			'You covered orgasm'
		end

		'Otimeli you in all holes and obkonchali from all sides.'

		act 'Leave':gt 'street'
	end
end

if $ARGS[0] = 'degrading':
	minut += 120
	vagina += 10
	anus += 10
	anal += 1
	sex += 1
	rape += 1
	gopopusday = day
	gs 'stat'

	if VasanTut = 3 and vasansex = 0:vasansex = 1 & guy += 1
	if BerezaTut = 3 and berezasex = 0:berezasex = 1 & guy += 1
	if VitekTut = 3 and viteksex = 0:viteksex = 1 & guy += 1
	if KostilTut = 3 and kostilsex = 0:kostilsex = 1 & guy += 1
	if UdmurtTut = 3 and udmurtsex = 0:udmurtsex = 1 & guy += 1
	if SeriTut = 3 and serisex = 0:serisex = 1 & guy += 1

	if VasanTut = 3:
		$namgop = 'Vasya'
	else
		$namgop = ''
	end

	if BerezaTut = 3:
		$namgop2 = 'Birch'
	else
		$namgop2 = ''
	end

	if VitekTut = 3:
		$namgop3 = 'Witek'
	else
		$namgop3 = ''
	end

	if KostilTut = 3:
		$namgop4 = 'Spike'
	else
		$namgop4 = ''
	end

	if UdmurtTut = 3:
		$namgop5 = 'Udmurt'
	else
		$namgop5 = ''
	end

	if SeriTut = 3:
		$namgop6 = 'Gray'
	else
		$namgop6 = ''
	end

	$namgopsum = '<<$namgop>> <<$namgop2>> <<$namgop3>> <<$namgop4>> <<$namgop5>> <<$namgop6>> got its members and began to strip off your clothes.'

	degrand = rand(1, 8)
	'<center><img src="images/pictures/deg<<picrand>>.jpg"></center>'
	'Gopota mocks you, you hit on the cheeks and breasts. Tuck in pussy different objects and spit in your face. After playing Gopnik release you.'

	act 'Leave':gt 'street'
end

--- gopnew ---------------------------------
# goplust
GLust = 0

VasanLust = rand(0, 100)

if VasanLust >= 50 and VasanTut = 1:
	VasanTut = 2
	GLust += 1
	$gopV = 'Bob nail looks at you look greedy'
elseif VasanLust < 80 and VasanTut = 1:
	$gopV = 'Bob nail looks at you with indifference'
elseif VasanTut = 0:
	$gopV = ''
end

BerezaLust = rand(0, 100)

if BerezaLust >= 60 and BerezaTut = 1:
	BerezaTut = 2
	GLust += 1
	$gopB = 'Birch looks at you with interest'
elseif BerezaLust < 95 and BerezaTut = 1:
	$gopB = 'Birch does not look at you'
elseif BerezaTut = 0:
	$gopB = ''
end

VitekLust = rand(0, 100)

if VitekLust >= 60 and VitekTut = 1:
	VitekTut = 2
	GLust += 1
	$gopVi = 'Vitek on driving with your breasts look'
elseif VitekLust < 90 and VitekTut = 1:
	$gopVi = 'Witek delves into the phone'
elseif VitekTut = 0:
	$gopVi = ''
end

KotilLust = rand(0, 100)

if KotilLust >= 70 and KostilTut = 1:
	KostilTut = 2
	GLust += 1
	$gopK = 'Crutch rummage your figure leer'
elseif KotilLust < 90 and KostilTut = 1:
	$gopK = 'Crutch schelykaet Semyon'
elseif KostilTut = 0:
	$gopK = ''
end

UdmurtLust = rand(0, 100)

if UdmurtLust >= 80 and UdmurtTut = 1:
	UdmurtTut = 2
	GLust += 1
	$gopU = 'Udmurt hard stare and stare at you as you see in his pants, the bulge between his legs grow.'
elseif UdmurtLust < 90 and UdmurtTut = 1:
	$gopU = 'Udmurt squats and spits on asphalt'
elseif UdmurtTut = 0:
	$gopU = ''
end

SeriLust = rand(0, 100)

if SeriLust >= 90 and SeriTut = 1:
	SeriTut = 2
	GLust += 1
	$gopS = 'Grey spits on the pavement through their gold teeth and grinning mischievously staring at your feet.'
elseif SeriLust < 95 and SeriTut = 1:
	$gopS = 'Gray turned away and talking on the phone'
elseif SeriTut = 0:
	$gopS = ''
end

$gopnik = '<<$gopV>> <<$gopB>> <<$gopVi>> <<$gopK>> <<$gopU>> <<$gopS>>'

--- goplust ---------------------------------
# gopwho
VasanTut = 1
brand = rand(1, 100)

if brand >= 40:
	BerezaTut = 1
else
	BerezaTut = 0
end

vrand = rand(1, 100)

if vrand >= 50:
	VitekTut = 1
else
	VitekTut = 0
end

krand = rand(1, 100)

if krand >= 60:
	KostilTut = 1
else
	KostilTut = 0
end

urand = rand(1, 100)

if urand >= 70:
	UdmurtTut = 1
else
	UdmurtTut = 0
end

srand = rand(1, 100)

if srand >= 80:
	SeriTut = 1
else
	SeriTut = 0
end

--- gopwho ---------------------------------
# avtonorm
if car = 1:normhour = 20
if car = 2:normhour = 20
if car = 3:normhour = 20
if car = 4:normhour = 20
if car = 5:normhour = 20
if car = 6:normhour = 20
if car = 7:normhour = 20
if car = 8:normhour = 20
if car = 9:normhour = 15
if car = 10:normhour = 18
if car = 11:normhour = 15
if car >= 95:normhour = 50

if wrek = 0:
	normneed = tehcar - teh
	normrem = normneed * normhour
elseif wrek = 1:
	normneed = tehcar - teh
	normremK = (normneed * normhour) * 70
	normrem = (normneed * normhour) + normremK
end

--- avtonorm ---------------------------------
# avt
!!tehNT = 200
!!tehT = rand(10, 200)

if tehT >= tehNT * 75 / 100:$tehT = 'Machine in excellent condition.'
if tehT < tehNT * 75 / 100 and tehT >= tehNT * 50 / 100:$tehT = 'When the engine has what is background noise'
if tehT < tehNT * 50 / 100 and tehT >= tehNT * 25 / 100:$tehT = 'Machine rumbles and smokes.'
if tehT < tehNT * 25 / 100:$tehT = 'As this bowl was able to be got is not clear.'

if carT = 1:
	if tehT >= tehNT * 75 / 100:bupay = rand(100000, 180000)
	if tehT < tehNT * 75 / 100 and tehT >= tehNT * 50 / 100:bupay = rand(60000, 130000)
	if tehT < tehNT * 50 / 100 and tehT >= tehNT * 25 / 100:bupay = rand(35000, 65000)
	if tehT < tehNT * 25 / 100:bupay = rand(15000, 50000)
elseif carT = 2:
	if tehT >= tehNT * 75 / 100:bupay = rand(80000, 100000)
	if tehT < tehNT * 75 / 100 and tehT >= tehNT * 50 / 100:bupay = rand(50000, 90000)
	if tehT < tehNT * 50 / 100 and tehT >= tehNT * 25 / 100:bupay = rand(30000, 60000)
	if tehT < tehNT * 25 / 100:bupay = rand(15000, 40000)
end

--- avt ---------------------------------
# avb
if car = 1:
	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(50000, 100000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(40000, 60000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(20000, 40000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(10000, 20000)
	end
elseif car > 1 and car < 6:
	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(100000, 200000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(80000, 120000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(60000, 90000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 70000)
	end
elseif car >= 6 and car < 11:
	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(150000, 220000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(100000, 160000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(80000, 120000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 90000)
	end
elseif car >= 11 and car <= 12:
	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)

	if wrek = 0:
		if teh >= tehcar * 75/100 and wrek = 0:bupay = rand(70000, 100000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(40000, 80000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(20000, 60000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(10000, 30000)
	end
elseif car = 95:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(500000, 900000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(400000, 600000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(300000, 500000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 300000)
	end
elseif car = 96:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
	end
elseif car = 97:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(1000000, 1800000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(540000, 1200000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(150000, 550000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 160000)
	end
elseif car = 98:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
	end
elseif car = 99:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(2000000, 3800000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(1540000, 2200000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(550000, 1550000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 560000)
	end
elseif car = 100:
	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)

	if wrek = 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 5800000)
		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1550000, 2550000)
		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1560000)
	end
end

--- avb ---------------------------------
# zaprF
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Gas Station</b></center>'
	'<center><img src="images/etogame/zapr.jpg"></center>'
	'Announcement, in connection with the features of the device gas stations, all cars to refuel a full tank.'
	'Cost of 1 liter of petrol 30 rubles.'

	if car > 0:
		if cardrive = 6 or cardrive = 21:'On refueling costs your <a href="exec:GS ''carF'', ''start''"><<$car>></a>.'
	end

	zprbenz = 40 - benz

	if benz < 40 and car > 0 and cardrive = 6 or benz < 40 and car > 0 and cardrive = 21:
		zprbenz = 40 - benz

		if zprbenz * 30 <= money:
			act 'Fill petrol':
				cla
				*clr
				benz = 40
				zprpay = zprbenz * 30
				money -= zprpay

				if pol > 0:'<center><img src="images/etogame/zapr1.jpg"></center>'

				'You have filled a full tank and paid <<zprpay>> rubles.'

				act 'Remove gun':gt 'zaprF', 'start'
			end
		else
			'You do not have enough money at the gas station.'
		end
	end

	if car > 0:
		act 'Buy a canister of gasoline with up to 5 liters of 150 rubles':
			cla
			kanistra += 1
			money -= 150
			'You bought a canister of gasoline. (It is automatically added to the trunk)'

			act 'Remove gun':gt 'zaprF', 'start'
		end
	end

	act 'Leave':
		if cardrive = 6:
			gt 'nord'
		elseif cardrive = 21:
			gt 'gorodok'
		elseif litltown = 0:
			gt 'nord'
		elseif litltown = 1:
			gt 'gorodok'
		end
	end
end

--- zaprF ---------------------------------
# autosalonF
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	cartraid = 1
	gs 'stat'
	'<center><b>Auto Show</b></center>'
	'<center><img src="images/etogame/manager.jpg"></center>'
	'List of vehicles for sale'
	'<a href="exec:gs ''carF1'', ''car''">2107</a>. - New price 200,000 rubles'
	'<a href="exec:gs ''carF1'', ''car2''">2115</a>. - New price 310,000 rubles'
	'<a href="exec:gs ''carF1'', ''car3''">2113</a>. - New price 290,000 rubles'
	'<a href="exec:gs ''carF1'', ''car4''">2114</a>. - New price 300,000 rubles'
	'<a href="exec:gs ''carF1'', ''car5''">VAZ 2110</a>. - New price 350,000 rubles'
	'<a href="exec:gs ''carF1'', ''car6''">VAZ Kalina</a>. - New price 400,000 rubles'
	'<a href="exec:gs ''carF1'', ''car7''">WHA Pryor</a>. - New price 450,000 rubles'
	'<a href="exec:gs ''carF1'', ''car8''">Chevrolet Niva</a>. - New price 500,000 rubles'
	'<a href="exec:gs ''carF1'', ''car9''">UAZ HUNTER</a>. - New price 500,000 rubles'
	'<a href="exec:gs ''carF1'', ''car10''">UAZ Patriot</a>. - New price 600,000 rubles'
	'<a href="exec:gs ''carF1'', ''car95''">Mitsubishi l200</a>. - New price 1,000,000 rubles'
	'<a href="exec:gs ''carF1'', ''car96''">Audi Q7</a>. - New price 5,000,000 rubles'
	'<a href="exec:gs ''carF1'', ''car97''">Cadillac Escalade</a>. - New price 2,000,000 rubles'
	'<a href="exec:gs ''carF1'', ''car98''">Porsche Cayenne</a>. - New price 5,000,000 rubles'
	'<a href="exec:gs ''carF1'', ''car99''">BMW X6</a>. - New price 4,500,000 rubles'
	'<a href="exec:gs ''carF1'', ''car100''">Mercedes-Benz S 600</a>. - New price 8,000,000 rubles'

	act 'Talk to the manager':gt 'autosalonF', 'manager1'
	act 'Leave':gt 'Nord'
end

if $ARGS[0] = 'manager1':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	gs 'stat'
	minut += 5
	'<center><b>Auto Show</b></center>'
	'<center><img src="images/etogame/manager.jpg"></center>'
	'In the bank <<karta>> rubles'
	'The manager smiled and said affably. To purchase, you must have the right and enough cash in the bank, we do not work for cash. As it is impossible to have two cars, I am sorry, but this new law antiprobkovy City Hall.'

	act 'Leave':gt 'Nord'
		if prava = 1 and car = 0:
			if karta >= 200000:
				act 'Buy VAZ 2107 (200,000 rubles)':
					cla
					*clr
					karta -= 200000
					$car = '2107'
					car = 1
					benz = 3
					cardrive = 8
					teh = 200
					tehcar = 200
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 310000:
				act 'Buy VAZ 2115 (310,000 rubles)':
					cla
					*clr
					karta -= 310000
					$car = '2115'
					car = 2
					benz = 3
					cardrive = 8
					teh = 300
					tehcar = 300
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end

			end

			if karta >= 290000:
				act 'Buy VAZ 2113 (290,000 rubles)':
					cla
					*clr
					karta -= 290000
					$car = '2113'
					car = 3
					benz = 3
					cardrive = 8
					teh = 290
					tehcar = 290
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 300000:
				act 'Buy VAZ 2114 (300,000 rubles)':
					cla
					*clr
					karta -= 300000
					$car = '2114'
					car = 4
					benz = 3
					cardrive = 8
					teh = 300
					tehcar = 300
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 350000:
				act 'Buy VAZ 2110 (350,000 rubles)':
					cla
					*clr
					karta -= 350000
					$car = 'VAZ 2110'
					car = 5
					benz = 3
					cardrive = 8
					teh = 350
					tehcar = 350
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 400000:
				act 'Buy VAZ Kalina (400,000 rubles)':
					cla
					*clr
					karta -= 400000
					$car = 'VAZ Kalina'
					car = 6
					benz = 3
					cardrive = 8
					teh = 400
					tehcar = 400
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 450000:
				act 'Buy VAZ Priora (450,000 rubles)':
					cla
					*clr
					karta -= 450000
					$car = 'VAZ PRIORA'
					car = 7
					benz = 3
					cardrive = 8
					teh = 450
					tehcar = 450
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 500000:
				act 'Buy Chevrolet Niva (500,000 rubles)':
					cla
					*clr
					karta -= 500000
					$car = 'Chevrolet Niva'
					car = 8
					benz = 3
					cardrive = 8
					teh = 500
					tehcar = 500
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 500000:
				act 'Buy UAZ Hunter (500,000 rubles)':
					cla
					*clr
					karta -= 500000
					$car = 'UAZ HUNTER'
					car = 9
					benz = 3
					cardrive = 8
					teh = 300
					tehcar = 300
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 600000:
				act 'Buy UAZ Patriot (600,000 rubles)':
					cla
					*clr
					karta -= 600000
					$car = 'UAZ PATRIOT'
					car = 10
					benz = 3
					cardrive = 8
					teh = 400
					tehcar = 400
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 1000000:
				act 'Buy Mitsubishi l200 (1,000,000 rubles)':
					cla
					*clr
					karta -= 1000000
					$car = 'Mitsubishi l200'
					car = 95
					benz = 3
					cardrive = 8
					teh = 2000
					tehcar = 2000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 5000000:
				act 'Buy Audi Q7 (5,000,000 rubles)':
					cla
					*clr
					karta -= 5000000
					$car = 'Audi Q7'
					car = 96
					benz = 3
					cardrive = 8
					teh = 5000
					tehcar = 5000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 2000000:
				act 'Buy Cadillac Escalade (2,000,000 rubles)':
					cla
					*clr
					karta -= 2000000
					$car = 'Cadillac Escalade'
					car = 97
					benz = 3
					cardrive = 8
					teh = 4000
					tehcar = 4000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'autosalonF', 'manager'
				end
			end

			if karta >= 5000000:
				act 'Buy Porsche Cayenne (5,000,000 rubles)':
					cla
					*clr
					karta -= 5000000
					$car = 'Porsche Cayenne'
					car = 98
					benz = 3
					cardrive = 8
					teh = 3000
					tehcar = 3000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 4500000:
				act 'Buy BMW X6 (4,500,000 rubles)':
					cla
					*clr
					karta -= 4500000
					$car = 'BMW X6'
					car = 99
					benz = 3
					cardrive = 8
					teh = 4000
					tehcar = 4000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end

			if karta >= 8000000:
				act 'Buy Mercedes-Benz S 600 (8,000,000 rubles)':
					cla
					*clr
					karta -= 8000000
					$car = 'Mercedes-Benz S 600'
					car = 100
					benz = 3
					cardrive = 8
					teh = 8000
					tehcar = 8000
					wrek = 0
					'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'

					act 'Leave':gt 'Nord'
				end
			end
		end
end

--- autosalonF ---------------------------------
# autoservisF
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	gs 'stat'
	gs 'avtonorm'
	'<center><b>Service and repair</b></center>'
	'<center><img src="images/etogame/autoservis1.jpg"></center>'

	if cardrive = 7:
		if wrek = 0:
			if teh >= tehcar * 75 / 100:'Master your car inspected and said that she does not need any repairs or maintenance in those.'

			if teh < tehcar * 75 / 100:
				'Master looked at your car and said that the cost of work <<normrem>>.'

				if money >= normrem:
					act 'Pay and repair':
						cla
						*clr
						money -= normrem
						minut += 60
						teh = tehcar
						wrek = 0
						'<center><img src="images/etogame/autoservis2.jpg"></center>'
						'You sat for an hour in the recreation room pretending that watching TV is finally repaired the car and you have paid in cash <<normrem>> rubles'

						act 'Leave':gt 'Nord'
					end
				end
			end
		elseif wrek = 1:
			'Master prisvisnul looking at your unit and said that the cost of work <<normrem>>.'

			if money >= normrem:
				act 'Pay and repair':
					cla
					*clr
					money -= normrem
					minut += 60
					tehcar = tehcar / 2
					teh = tehcar
					wrek = 0
					'<center><img src="images/etogame/autoservis2.jpg"></center>'
					'You sat for an hour in the recreation room pretending that watching TV is finally repaired the car and you have paid in cash <<normrem>> rubles'
					'Master before giving clues told you that you would not have tried to bring the car to this state.'

					act 'Leave':gt 'Nord'
				end
			end
		end
	end

	if cardrive ! 7:'Master smiled and said, "Girl, I need a car to see what though, that what you say. Fetches it to the car service, we''ll see."'

	if wrek = 1 and cardrive ! 7 and car > 0:
		'At the service station operates a service evacuation of damaged cars to service centers, the cost in 2500'

		if money >= 2500:
			act 'Pay for towing service (2,500 rubles) (1:00)':
				cla
				*clr
				money -= 2500
				cardrive = 7
				minut += 60
				'<center><img src="images/etogame/autoservis2.jpg"></center>'
				'You sat for an hour in the service station, waiting when will bring your car. Finally the time has passed and your car was delivered to the gate Car.'

				act 'Back to the car service station':gt 'autoservisF', 'start'
			end
		end
	end

	act 'Leave':gt 'Nord'
end

--- autoservisF ---------------------------------
# autotraidF
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Car</b></center>'
	'<center><img src="images/etogame/autotraid.jpg"></center>'
	'Machine can only be bought if you have permission. And you can not have two cars.'

	if hour <= 17:
		if car > 0:act 'Approach the car salesman':gt 'autotraidF', 'manager1'

		act 'View cars put up for sale':gt 'autotraidF', 'car'
	end

	act 'Leave':gt 'Nord'
end

if $ARGS[0] = 'manager1':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Car</b></center>'
	'<center><img src="images/etogame/autotraid.jpg"></center>'
	gs 'avb'

	if cardrive = 9 and car > 0:
		'Fence walked around the car and offered you for it <<bupay>> rubles'

		act 'Sell ​​for (<<bupay>> rubles) (1:00)':
			cla
			minut += 60
			money = money + bupay
			car = 0
			'You sold your car.'

			act 'Leave':gt 'Nord'
		end
	elseif cardrive ! 9:
		'Fence says that he needs to look at the car before you a price, and if you want, it will call a tow truck for 2500 that would take your car to the market.'

		if money >= 2500:
			act 'Pay for towing service to the car market (2,500 rubles) (1:00)':
				cla
				minut += 60
				cardrive = 9
				money -= 2500
				'You gave the money and waited for an hour and when you bring a car, you will finally see her tow truck unloaded near the market.'

				act 'Go to car salesman':gt 'autotraidF', 'manager1'
			end
		end
	end

	act 'Leave':gt 'Nord'
end

if $ARGS[0] = 'car':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	*clr
	minut += 5
	carT = 0
	gs 'stat'
	'<center><b>Car</b></center>'
	'<center><img src="images/etogame/autotraid.jpg"></center>'
	'So many cars in the parking lot that you can spend a lifetime and never osmotrish all machines, even if the machines on the go, you can understand their technical condition, the machine moves is not a cat in a bag can be a bargain, and can be a waste money, and do not forget, you still deliver it to the service will need.'

	if hour <= 17:
		act 'Inspect 2107 (on the go)':
			cla
			*clr
			'<center><b>2107 (on the move)</b></center>'
			'<center><img src="images/picar/car.jpg"></center>'
			tehNT = 200
			tehT = rand(10, tehNT)
			carT = 1
			gs 'avt'
			'<<$tehT>> The dealer wants <<bupay>> rubles'

			act 'Leave':gt 'autotraidF', 'car'

			if car = 0 and prava = 1 and money >= bupay:
				act 'Buy (<<bupay>> rubles)':
					cla
					money -= bupay
					$car = '2107'
					car = 1
					benz = 3
					cardrive = 9
					teh = tehT
					tehcar = 200
					wrek = 0
					'You pay <<bupay>> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.'

					act 'Leave':gt 'Nord'
				end
			end
		end

		act 'Inspect 2107 (doesn''t move)':
			cla
			*clr
			tehNT = 200
			tehT = rand(10, tehNT)
			bupay = rand(10000, 50000)
			'The machine is not on the move. Merchant wants to <<bupay>> rubles'

			act 'Leave':gt 'autotraidf', 'car'

			if car = 0 and prava = 1 and money >= bupay:
				act 'Buy <<bupay>>rubles':
					cla
					money -= bupay
					$car = '2107'
					car = 1
					benz = 3
					cardrive = 9
					teh = tehT
					tehcar = 200
					wrek = 1
					'You pay <<bupay>> rubles and bought a car. Merchant put her near the market.'

					act 'Leave':gt 'Nord'
				end
			end
		end

		act 'Inspect GAZ 3102 (on the go)':
			cla
			*clr
			'<center><b>3102 GAS (on the move)</b></center>'
			'<center><img src="images/picar/car11.jpg"></center>'
			tehNT = 1000
			tehT = rand(10, tehNT)
			carT = 2
			gs 'avt'
			'<<$tehT>> The dealer wants <<bupay>> rubles'

			act 'Leave':gt 'autotraidf', 'car'

			if car = 0 and prava = 1 and money >= bupay:
				act 'Buy <<bupay>>rubles':
					cla
					money -= bupay
					$car = 'GAZ 3102'
					car = 11
					benz = 5
					cardrive = 9
					teh = tehT
					tehcar = 1000
					wrek = 0
					'You pay <<bupay>> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.'

					act 'Leave':gt 'Nord'
				end
			end
		end

		act 'Inspect 3110 (on the go)':
			cla
			*clr
			'<center><b>3110 (on the move)</b></center>'
			'<center><img src="images/picar/car12.jpg"></center>'
			tehNT = 800
			tehT = rand(10, tehNT)
			carT = 2
			gs 'avt'
			'<<$tehT>> The dealer wants <<bupay>> rubles'

			act 'Leave':gt 'autotraidF', 'car'

			if car = 0 and prava = 1 and money >= bupay:

			act 'Buy (<<bupay>> rubles)':
					cla
					money -= bupay
					$car = '3110'
					car = 12
					benz = 5
					cardrive = 9
					teh = tehT
					tehcar = 800
					wrek = 0
					'You pay <<bupay>> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.'

					act 'Leave':gt 'Nord'
				end
			end
		end
	end

	act 'Leave':gt 'Nord'
end

--- autotraidF ---------------------------------
# carF
$enddrive = {
	if cardrive = 1:gt 'street'
	if cardrive = 2:gt 'down'
	if cardrive = 3:gt 'Nord'
	if cardrive = 4:gt 'lake', 'start'
	if cardrive = 5:gt 'park', 'start'
	if cardrive = 6:gt 'zaprF', 'start'
	if cardrive = 7:gt 'autoservisF', 'start'
	if cardrive = 8:gt 'autosalonF', 'start'
	if cardrive = 9:gt 'autotraidF', 'start'
	if cardrive = 10:gt 'park', 'whore'
	if cardrive = 11:gt 'sauna'
	if cardrive = 12:gt 'obekt'
	if cardrive = 18:gt 'youplace'
	if cardrive = 19:gt 'road'
	if cardrive = 20:gt 'gorodok'
	if cardrive = 21:gt 'zaprF', 'start'
}

if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 1
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><<$car>></b></center>'
	'<center><img src="images/picar/car<<car>>.jpg"></center>'

	act 'Move away from the machine':dynamic $enddrive

	if kanistra > 0:
		'In the trunk <<kanistra>> pc. five-liter jerry cans of gasoline.'

		if benz <= 35:
			act 'Pour canister into the tank':
				cla
				benz += 5
				kanistra -= 1
				'You filled canister of gasoline in the tank.'

				act 'Move away':gt 'carF', 'start'
			end
		end
	end

	act 'Get in the car':gt 'carF', 'salon'
end

if $ARGS[0] = 'salon':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 1
	gs 'stat'
	'<center><b><<$car>></b></center>'
	'<center><img src="images/picar/salon<<car>>.jpg"></center>'
	'Gasoline - <<benz>> liters, fuel tank capacity of 40 liters.'

	if teh <= 0:teh = 0 & wrek = 1
	if teh <= 0 or wrek = 1:$teh = 'Car will not start, it needs repairs.'
	if teh >= tehcar * 75 / 100 and wrek = 0:$teh = 'Machine in excellent condition.'
	if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:$teh = 'When moving the machine you have any noises'
	if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:$teh = 'Car crash and barely rides.'
	if teh < tehcar * 25 / 100 and wrek = 0:$teh = 'As this bowl can still go, is a mystery even to the designers.'

	'<<$teh>>'

	if cardrive = 1:'Through the windshield you see the residential area.'
	if cardrive = 2:'Through the windshield you see downtown.'
	if cardrive = 3:'Through the windshield you see the northern region.'
	if cardrive = 4:'Through the windshield you see the lake.'
	if cardrive = 5:'Through the windshield you see the park.'
	if prava = 0:'You have no rights.'

	act 'Out of the car':dynamic $enddrive

	if benz > 0 and wrek = 0 and prava > 0:
		if teh >= tehcar * 75 / 100 and wrek = 0:
			wrekrand = rand(0, 1000)

			if wrekrand = 1000:wrek = 1
		elseif teh < tehcar * 75 / 100 and teh >= tehcar * 50/100 and wrek = 0:
			wrekrand = rand(0, 100)

			if wrekrand = 100:wrek = 1
		elseif teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:
			wrekrand = rand(0, 100)

			if wrekrand >= 80:wrek = 1
		elseif teh < tehcar * 25 / 100 and wrek = 0:
			wrekrand = rand(0, 100)

			if wrekrand >= 40:wrek = 1
		elseif wrek = 1:
			'Something clattered loudly and the engine stalled.'

			act 'Fuck':gt 'carF', 'salon'
		end

		if alko > 0:
			dpsrand = rand(0, 100)

			if dpsrand <= alko:
				'Policeman stops you, he looks at your condition and requests to breath into a tube. You breathe and instrument panel lights red lamochka.'
				'Traffic police snorts and writes something in his cell, and then shows you. There is written sms with the number 50000'
				'Or let''s make the report. Now operates divestment forever for driving not sober.'

				if money >= 50000:
					act 'Give a bribe (50,000 rubles)':
						cla
						money = money - 50000
						'You pay and the policeman warns you that you will not be riding in this state.'

						act 'In the salon':gt 'carF', 'salon'
					end
				end

				act 'Come on, all under the law':
					cla
					prava = 0
					'Disempower you, not for driving sober.'

					act 'In the salon':gt 'carF', 'salon'
				end

				exit
			end
		elseif alko >= 10:
			avarand = rand(0, 100)

			if avarand >= 50:
				teh /= 2
				wrek = 1
				'You with a drunk crashed into a tree, breaking the car into pieces.'

				act 'In the salon':gt 'carF', 'salon'

				exit
			end
		end

		if wrek = 0:
			if cardrive >= 20:
				if cardrive ! 3:
					act 'Go to town':
						cla
						minut += 75
						benz -= 1
						teh -= rand(3, 6)
						cardrive = 3
						'You are more than an hour drive on the highway that would get here before the city.'
						dynamic $enddrive
					end
				end

				if cardrive ! 21:
					act 'Go to the gas station':
						cla
						minut += 15
						benz -= 1
						teh -= rand(1, 3)
						cardrive = 21
						'You get 15 minutes to the destination.'
						dynamic $enddrive
					end
				end
			end

			if placeMansion > 0 and cardrive ! 18:
				act 'Go to your site':
					cla

					if cardrive >= 20:
						minut += 60
						benz -= 1
						teh -= rand(1, 3)
						cardrive = 18
					else
						minut += 15
						benz -= 1
						teh -= rand(1, 3)
						cardrive = 18
					end

					'You drive to the town.'
					dynamic $enddrive
				end
			end

			if cardrive ! 1:
				act 'Go to the residential area':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 1
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 2:
				act 'Go to city center':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 2
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 3:
				act 'Go to the northern area':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 3
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 4:
				act 'Go to the lake':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 4
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 5:
				act 'Go to the park':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 5
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 6:
				act 'Go to the gas station':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 6
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 7:
				act 'Go to the car wash':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 7
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 8:
				act 'Go to a car dealership':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 8
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 9:
				act 'Go to the car market':
					cla
					minut += 15
					benz -= 1
					teh -= rand(1, 3)
					cardrive = 9
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 12:
				act 'Go on to':
					cla
					minut += 60
					benz -= 1
					teh -= rand(2, 5)
					cardrive = 12
					'You get 15 minutes to the destination.'
					dynamic $enddrive
				end
			end

			if cardrive ! 20:
				act 'Go to town':
					cla
					minut += 75
					benz -= 1
					teh -= rand(3, 6)
					cardrive = 20
					'You eat more than an hour on the highway to the town.'
					dynamic $enddrive
				end
			end

			act 'Go around the track (1:00)':
				cla
				'You go on the road.'
				numberRoad = input("In which city will stop (from 0 to 20)")

				if numberRoad >= 0 and numberRoad <= 20:
					cardrive = 19
					nroad = numberRoad
					ncarroad = numberRoad
				end

				xgt 'carF', 'salon'
			end

			act 'To drive on the track (1:00)':
				cla
				minut += 60
				benz -= 4
				teh -= rand(2, 6)
				manna += 20
				wipo += 10
				'You go to the track and having fun Likhachev, then turn back.'

				act 'Finish':xgt 'carF', 'salon'
			end
		end
	end
end

--- carF ---------------------------------
# carF1
if $ARGS[0] = 'car':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ 2107</b></center>'
	'<center><img src="images/picar/car.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon.jpg"></center>'

		act 'Leave':gt 'carF1', 'car'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car2':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ 2115</b></center>'
	'<center><img src="images/picar/car2.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon2.jpg"></center>'

		act 'Leave':gt 'carF1', 'car2'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car3':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ 2113</b></center>'
	'<center><img src="images/picar/car3.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon3.jpg"></center>'

		act 'Leave':gt 'carF1', 'car3'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car4':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ 2114</b></center>'
	'<center><img src="images/picar/car4.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon4.jpg"></center>'

		act 'Leave':gt 'carF1', 'car4'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car5':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ 2119</b></center>'
	'<center><img src="images/picar/car5.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon5.jpg"></center>'

		act 'Leave':gt 'carF1', 'car5'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car6':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'

	'<center><b>VAZ Kalina</b></center>'
	'<center><img src="images/picar/car6.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon6.jpg"></center>'

		act 'Leave':gt 'carF1', 'car6'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car7':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>VAZ Pryor</b></center>'
	'<center><img src="images/picar/car7.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon7.jpg"></center>'

		act 'Leave':gt 'carF1', 'car7'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car8':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Chevrolet Niva</b></center>'
	'<center><img src="images/picar/car8.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon8.jpg"></center>'

		act 'Leave':gt 'carF1', 'car8'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car9':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>UAZ HUNTER</b></center>'
	'<center><img src="images/picar/car9.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon9.jpg"></center>'

		act 'Leave':gt 'carF1', 'car9'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car10':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>UAZ Patriot</b></center>'
	'<center><img src="images/picar/car10.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon10.jpg"></center>'

		act 'Leave':gt 'carF1', 'car10'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car95':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Mitsubishi l200</b></center>'
	'<center><img src="images/picar/car95.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon95.jpg"></center>'

		act 'Leave':gt 'carF1', 'car95'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car96':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'


	'<center><b>Audi Q7</b></center>'
	'<center><img src="images/picar/car96.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon96.jpg"></center>'

		act 'Leave':gt 'carF1', 'car96'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car97':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Cadillac Escalade</b></center>'
	'<center><img src="images/picar/car97.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon97.jpg"></center>'

		act 'Leave':gt 'carF1', 'car97'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car98':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'


	'<center><b>Porsche Cayenne</b></center>'
	'<center><img src="images/picar/car98.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon98.jpg"></center>'

		act 'Leave':gt 'carF1', 'car98'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car99':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>BMW X6</b></center>'
	'<center><img src="images/picar/car99.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon99.jpg"></center>'

		act 'Leave':gt 'carF1', 'car99'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

if $ARGS[0] = 'car100':
	$metka = $ARGS[0]
	$loc = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b>Mercedes-Benz S 600</b></center>'
	'<center><img src="images/picar/car100.jpg"></center>'

	act 'Sit in the lounge':
		cla
		*clr
		'<center><img src="images/picar/salon100.jpg"></center>'

		act 'Leave':gt 'carF1', 'car100'
	end

	act 'Leave':
		cla

		if cartraid = 1:gt 'autosalonF', 'start'
		if cartraid = 2:gt 'autotraidF', 'manager'
	end
end

--- carF1 ---------------------------------
# qwBarPolet
minut += 5
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)

'<center><b><font color="maroon">Bar "Flight"</font></b></center>'

if hour >= 10:
	'<center><img src="images/qwest/kim/bar.jpg"></center>'
	'At the bar sat a few visitors. Bartender with a face scarred missing pours beer mugs.'
else
	'The bar is closed and inlet written "hours with 10 to 24-hours."'
end

act 'Leave':gt 'nord'

--- qwBarPolet ---------------------------------
# qwbereg
$qwvlsexhjdy = {
	act 'Pat his hand between her legs':
		cls
		minut += 5
		VladimirHJ += 1
		hj += 1
		gs 'stat'
		'<center><img src="images/qwest/sex/hand.jpg"></center>'
		'You started stoking by Vladimir crotch and felt his cock gets. He unzipped and pulled standing member who put you in her hands.'
		'You started to caress her slender fingers hard and hot cock Vladimir.'

		act 'Masturbate him':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/sex/hand2.jpg"></center>'
			'You started stroking his cock harder and soon finished Vladimir groaning in your hands.'

			act '...':gt 'qwbereg2'
		end

		act 'To take by mouth':
			cls
			minut += 5
			bj += 1
			VladimirBJ += 1
			gs 'stat'
			'<center><img src="images/qwest/sex/bj.jpg"></center>'
			'After going down on his knees with his lips wrapped around you a member of Vladimir and began to suck him absorbing every move his hard cock to the throat and abundantly wetting saliva.'
			'Finally Vladimir began stonoat and he is about to finish.'

			act 'Continue to suck':
				cla
				*clr
				swallow += 1
				cumlip += 1
				'<center><img src="images/picV/swallow.jpg"></center>'
				'Hot jet of sperm hit you in the mouth. You started to swallow cum, and Vladimir continued to finish in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

				act '....':gt 'qwbereg2'
			end

			act 'Remove the mouth':
				cla
				*clr
				tiprand = rand(0, 1)
				if tiprand = 1:
					'<center><img src="images/picV/hand.jpg"></center>'
					'You remove a member from his mouth and Vladimir finished you in the palm.'
				elseif tiprand = 0:
					facial += 1
					cumface += 1
					'<center><img src="images/picV/facial.jpg"></center>'
					'You took out a member and at this point Vladimir discharged directly on your face, covering it with warm and sticky cum.'
				end

				act '....':gt 'qwbereg2'
			end
		end
	end
}

minut += 30
gs 'stat'
'<center><b><font color="maroon">The boat</font></b></center>'
'<center><img src="images/qwest/vladimir/kater.jpg"></center>'
'Boat moored to the bank and Glory jumping from a boat tethered moorings. Everyone began to descend from the boat to shore. Vladimir said "Thank you now razvezet home and then pick me up and light."'
'Nikolai, Vitaliy and Isolde said goodbye and got into the car. Glory sat behind the wheel and drove off. You stayed near the boat together with Vladimir.'
'Vladimir gathered the remnants of food in a bag and threw it in the trash. Boxes with untouched food delivered to the deck until you wiped with a damp cloth table on the deck.'
'Finally with the cleaning has been completed and Vladimir sat on the sofa to rest on deck.'

act 'To sit next to':
	cls
	'<center><b><font color="maroon">Vladimir</font></b></center>'
	'<center><img src="images/qwest/vladimir/001.jpg"></center>'
	'You sat next to Vladimir, and he hugged you by the shoulders. "Well, how do you walk?"'

	act 'It was not bad. Great boat':
		cla
		'(You) - It was not bad. Great you have a boat.'
		'(Vladimir) - not my boat. Lent one friend pokatatsya. Absolutely no time to rest, so you have to combine business meetings with the rest.'
		'Vladimir leaned to your face trying to kiss him.'

		act 'Kiss.':
			cla
			minut += 5
			horny += 10
			VladimirSex += 1
			guy += 1
			gs 'stat'
			'You started kissing with Vladimir sitting on the couch. His hands slid to your chest and began to knead her through clothing.'
			dynamic $qwvlsexhjdy

			act 'Savoury':
				cls
				minut += 5
				horny += 15
				gs 'stat'
				'<center><img src="images/qwest/sex/tits.jpg"></center>'
				'Vladimir lifted your shirt and began to lick and suck your breasts. Gentle warmth pierced you and you become very good caresses Vladimir.'
				dynamic $qwvlsexhjdy

				act 'Savoury':
					cla
					minut += 5
					horny += 15
					DOM += 1
					kuni += 1
					gs 'stat'
					'<center><img src="images/qwest/sex/kuni.jpg"></center>'
					'Vladimir started to remove your clothes that would get here before your pussy. He began to caress your tongue pussy.'

					if horny >= 90:
						horny = 0
						manna += 15
						willpower += 15
						orgasm += 1
						'Skillful actions of Vladimir orgasm you covered.'
					else
						'Actions Vladimir though they were exciting, but they started to bore you.'
					end

					dynamic $qwvlsexhjdy

					act 'Give him':
						cls
						sex += 1
						minut += 30
						pose = 0
						$nameV = 'Vladimir'
						dick = 16
						silavag = 1
						'<center><img src="images/picV/vag.jpg"></center>'
						'<<$nameV>> spread your legs and began to fondle her fingers pussy.'
						gs 'orgazm', 'start'

						act '...':gt 'qwbereg2'
					end
				end
			end
		end
	end
end

--- qwbereg ---------------------------------
# qwbereg2
minut += 15
vladimirday = day
vladimirQW = 35
gs 'stat'
'<center><img src="images/qwest/vladimir/car.jpg"></center>'
'Once you''ve finished with Wladimir fuck how to berth drove Audi. Glory came out of it and invited you to get in the car.'
'You sat in the back seat of the car and Vladimir, pleased, though tired and sat down next to you. Glory vtopil as usual and flew down the road.'
'Soon you were already around your porch. Vladimir promised to call you and left with Slava.'

act 'Go home':gt 'street'

--- qwbereg2 ---------------------------------
# QwestDisdock
!!in location stat at any place
if qwestonce = 0:
	qwestonce = 1
	!!ADDQST 'qwest/qwest.qsp'
end

!!reference to a transition
!!located in the location park  array luna
if vladimirQW = 0 and hour >= 9 and hour <= 20 and week > 5:'<a href="exec:gt ''qwloc''">Near the fence strong man stands and looks at you</a>.'
!!in location korr
if vladimirday ! day and vladimirQW = 20 and hour = 16:'<a href="exec:gt ''qwloc2''">The phone rings</a>.'
!!in location telefon array start
if vladimirday ! day and vladimirQW = 20 and hour = 16:gt 'qwloc2'
!!in location restoran array start
if vladimirday = day and vladimirQW = 21 and hour = 20:gt 'qwmeet'
!!in location korr
if vladimirday ! day and vladimirQW = 25 and hour = 16 and week = 6:'<a href="exec:gt ''qwloc3''">The phone rings</a>.'
!!in location telefon array start
if vladimirday ! day and vladimirQW = 25 and hour = 16 and week = 6:gt 'qwloc3'
!!street
if vladimirday = day and vladimirQW = 30 and hour >= 16 and week = 6:'<a href="exec:gt ''qwmeet2''">Before your porch worth audit and near stolidly worth waiting for you driver Glory</a>.'

!!down
if izoldaQW >= 1:'<a href="exec:gt ''qwIzoldaApp''">Flat Isolde</a>.'
!!nord
if slavaQW >= 1:'<a href="exec:gt ''qwBarPolet''">Bar "Flight"</a>.'

--- QwestDisdock ---------------------------------
# qwIzoldaApp
minut += 15
gs 'stat'

if hour >= 16 and izoldaday ! day:
	'<center><b><font color="maroon">Isolda</font></b></center>'
	'<center><img src="images/qwest/kolan/izolda.jpg"></center>'
	'Door you opened Isolde. "Hello <<$name>>, come on."'

	act 'Leave':gt 'down'

	act 'Enter the apartment':
		cla
		minut += 30
		izoldaday = day
		izoldaQW += 1
		gs 'stat'

		if izoldaQW < 5:
			'You went to the apartment and Isolde you spent in the kitchen. There she poured tea, and you yourself. You sat at the table and began to chat about all sorts of trivia.'
		elseif izoldaQW >= 5 and izoldaSex = 0:
			'Isolde suggested that you drink wine. You agreed and went to the kitchen. Isolde opened a bottle of wine and poured two glasses. You drank it.'

			if izoldaQW >= 10 and izoldaSex = 0:
				'Soon you both drunk and Isolde invited you to go to the lounge to relax.'

				act 'Go Isolde':
					cls
					girl += 1
					lesbian += 1
					izoldaSex = 1
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/kolan/izoldasex.jpg"></center>'
					'The room suddenly Isolde you kissed and hugged her gently.'

					act 'Kiss Isolde':
						cls
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/kolan/izoldasex1.jpg"></center>'
						'Isolde''s head gently slipped from your lips to your breasts and began to caress them.'

						act '...':
							cls
							horny += 10
							gs 'stat'
							'<center><img src="images/qwest/kolan/izoldasex2.jpg"></center>'
							'Isolde you dropped on the couch and gently kisses covering section. Once you lay down on her back, she began to lick your pussy.'

							act '...':
								cls
								horny = 0
								orgasm += 1
								gs 'stat'
								'<center><img src="images/qwest/kolan/izoldasex3.jpg"></center>'
								'Blonde turned and climbed on you without stopping to lick your pussy. She throw the leg over you up her sweaty and expiring juices crack for sex. You started to caress her clitoris tongue and kiss her luscious lips, finally you both shook orgasm.'

								act 'Leave':gt 'down'
							end
						end
					end
				end
			end
		elseif izoldaSex > 0:
			'Isolde offer you a drink of wine and you have gone with her to the kitchen, drinking a bottle she took you by the hand and led her into the room.'

			act 'Go Isolde':
				cls
				lesbian += 1
				izoldaSex += 1
				horny += 10
				gs 'stat'
				'<center><img src="images/qwest/kolan/izoldasex.jpg"></center>'
				'The room suddenly Isolde you kissed and hugged her gently.'

				act 'Kiss Isolde':
					cls
					horny += 10
					gs 'stat'
					'<center><img src="images/qwest/kolan/izoldasex1.jpg"></center>'
					'Isolde''s head gently slipped from your lips to your breasts and began to caress them.'

					act '...':
						cls
						horny += 10
						gs 'stat'
						'<center><img src="images/qwest/kolan/izoldasex2.jpg"></center>'
						'Isolde you dropped on the couch and gently kisses covering section. Once you lay down on her back, she began to lick your pussy.'

						act '...':
							cls
							horny = 0
							orgasm += 1
							gs 'stat'
							'<center><img src="images/qwest/kolan/izoldasex3.jpg"></center>'
							'Blonde turned and climbed on you without stopping to lick your pussy. She throw the leg over you up her sweaty and expiring juices crack for sex. You started to caress her clitoris tongue and kiss her luscious lips, finally you both shook orgasm.'

							act 'Leave':gt 'down'
						end
					end
				end
			end
		end

		act 'Leave':gt 'down'
	end
else
	'You rang the bell but no one answered you.'

	act 'Leave':gt 'down'
end

--- qwIzoldaApp ---------------------------------
# qwloc
$qwnamedy = {
	act '<<$name>>':
		cla
		vladimirQW = 10
		'(You) - <<$name>>'
		'(Vladimir) - Beautiful name to match you. I unfortunately have to go, but would like to meet with you again. Go to the restaurant to talk. Leave me your phone number, I''ll call you tomorrow.'

		act 'No (Go)':
			cla
			vladimirQW = 2
			'You turned on the man and went away from him.'

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

		act 'Dictate the phone number':
			cla
			vladimirQW = 20
			vladimirday = day
			'You dictated phone Vladimir and he wrote it down in a small notebook in leather cover.'

			act 'Leave':gt 'park', 'luna'
		end
	end
}

$qwvladdy = {
	'(Male) - Hello. Vladimir I, I loved you, I would like pointeresovatsya your name.'
	dynamic $qwnamedy

	act 'Sorry, I''m busy.':
		cla
		vladimirQW = 1
		'(You) - Sorry, I''m busy.'
		'(Vladimir) - Well, what are you? I will not bite. Just want to know the name from the charming stranger.'
		dynamic $qwnamedy

		act 'Yet I go (Go)':
			cla
			vladimirQW = 2
			'You turned on the man and went away from him.'

			act 'Leave':gt 'park', 'luna'
		end
	end
}

minut += 5
gs 'stat'
gs 'time'
'<center><b><font color="maroon">Man</font></b></center>'
'<center><img src="images/qwest/vladimir/001.jpg"></center>'

if mop > 1 and hapri = 1:
	'Man standing near the fence and noticed your opinion you smiled.'

	act 'Come to a man':
		cla
		'You went to the man and he went away from the fence toward you.'
		dynamic $qwvladdy
	end

	act 'Smile':
		cla
		'You the man smiled at him and he went away from the fence toward you.'
		dynamic $qwvladdy
	end

	act 'Unscrew':
		cla
		'You turned away from the man and heard in his footsteps behind him.'
		dynamic $qwvladdy
	end
else
	'The man looked at you and turned away.'

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

--- qwloc ---------------------------------
# qwloc2
gs 'stat'
'You pick up the phone and a male voice said, "Hello <<$name>>, is Vladimir, remember we are not met for a long time in the park?"'

act 'Hello, of course I remember':
	cla
	vladimirQW = 21
	'(You) - Hey, of course I remember.'
	'(Vladimir) - My suggestion is to go to the restaurant is still in force. As you look at it?'

	act 'Oh, I have a lot of things, I just can not today.':
		cla
		vladimirQW = 20
		vladimirday = day
		'(You) - Oh, I have a lot of things, I just can not segdnya.'
		'(Vladimir) - Okay. Then I''ll call you tomorrow at 4 pm.'

		act 'Hang up':gt 'korr'
	end

	act 'I do not mind':
		cla
		vladimirQW = 21
		vladimirday = day
		'(You) - I do not mind.'
		'(Vladimir) - Wonderful. Then come to the restaurant in 20 hours.'

		act 'Hang up':gt 'korr'
	end
end

--- qwloc2 ---------------------------------
# qwloc3
gs 'stat'
'You pick up the phone and a male voice said, "Hello <<$name>>, is Vladimir, you want to ride on a boat?"'

act 'Oh, I have a lot of things, I just can not today':
	cla
	vladimirday = day
	'(You) - Oh, I have a lot of things, I just can not segdnya.'
	'(Vladimir) - Okay. Then I''ll call you tomorrow at 4 pm.'

	act 'Hang up':gt 'korr'
end

act 'I do not mind':
	cla
	vladimirQW = 30
	vladimirday = day
	'(You) - I do not mind.'
	'(Vladimir) - Wonderful. Now for you to come my driver and drive Thank you.'

	act 'Hang up':gt 'korr'
end

--- qwloc3 ---------------------------------
# qwloc4
gs 'stat'
'You pick up the phone and a male voice said, "Hello <<$name>>, is Vladimir, can converge to something?"'

act 'Oh, I have a lot of things, I just can not today':
	cla
	vladimirday = day
	'(You) - Oh, I have a lot of things, I just can not segdnya.'
	'(Vladimir) - Okay. Then I''ll call you tomorrow at 4 pm.'

	act 'Hang up':gt 'korr'
end

act 'I do not mind':
	cla
	vladimirQW = 40
	vladimirday = day
	'(You) - I do not mind.'
	'(Vladimir) - Wonderful. Now for you to come my driver and drive Thank you.'

	act 'Hang up':gt 'korr'
end

--- qwloc4 ---------------------------------
# qwmeet
$qwmeetdy = {
	'The door opened and the driver Cars filed your hand.'

	act 'Leaning out of the car on the driver''s hand':
		cls
		minut += 3
		gs 'stat'
		'<center><img src="images/qwest/kim/001.jpg"></center>'
		'Stepping out of the car you just now spotted the driver. It appeared to be a young man of Asian origin. He seemed confident guy smiled at you and impudent.'
		'Vladimir looked out of the car "This is my driver, Glory. He will bully you. Svetulya yet, I''ll call you."'
		'Asian smiled again and you shut the back door. Leaping into the driver''s seat, he again looked at you greedy, undressing eyes and slammed the door with a smirk. The car skidded to immediately jumped up and flew away disappearing into the distance.'

		act 'Go home.':gt 'street'
	end
}

minut += 5
vladimirQW = 25
vladimirday = day
gs 'stat'
'<center><b><font color="maroon">Vladimir</font></b></center>'
'<center><img src="images/qwest/vladimir/001.jpg"></center>'
'Once you have entered the door of the restaurant came to you with Vladimir lush bouquet of roses. Hello <<$name>>. Well, let''s go to a restaurant?'

act 'Mark bouquet and go to a restaurant with Vladimir':
	cla
	minut += 3
	gs 'stat'
	'You''re a little confused took a bouquet of roses and hands of Vladimir and he took you by the elbow led you to the restaurant. He led you to a table where the table plate "Special order" and substituting the chair you sit invited.'

	act 'Sit on a chair':
		cla
		minut += 3
		gs 'stat'
		'Waiter to bring you a menu and Vladimir asked you not to hesitate and order whatever you want.'

		act 'Make an order':
			cla
			minut += 3
			gs 'stat'
			'You made the order and the waiter taking the menu away. At the table, there was an awkward pause. Vladimir paused and asked. "You <<$name>> who work for?"'

			if workrin = 1:
				$qwvladwork = 'I work in the market.'
			elseif young_shop_work = 1:
				$qwvladwork = 'I work in a store.'
			elseif workKafe > 0:
				$qwvladwork = 'I work as a waitress in a cafe.'
			else
				$qwvladwork = 'By and large, nothing.'
			end

			act '<<$qwvladwork>>':
				cla
				minut += 15
				gs 'stat'
				'(You) - <<$qwvladwork>>'
				'(Vladimir) - Right. I know not a big desk, a business. Buy, Sell, for short.'
				'At this time the waiter brought to the table order. After the plates were placed. Vladimir continued.'
				'"I''m 40 years old. Married and has a child. With his wife have been a long time nothing binds and I''m ready to divorce her at any time."'
				'Vladimir poured the wine into the glasses and offered the first toast to the friendship.'

				act 'Have a drink':
					cla
					minut += 15
					energy = 21
					water = 21
					gs 'stat'
					'You drank wine and began to dig in the salad fork. Vladimir said. "Let''s move on you, I hope you do not mind?" You shake your head confirming that you too this official communication style is not very much.'
					'Vladimir continued "In business laws wolf. Impossible to stand still, we must constantly evolve. Now I open another business. Therefore could take you to work."'
					'You chewed salad and stared at him. "We just met, you do not know me."'
					'Vladimir nodded "Yes, but you''re a special girl. Unique. I just feel it."'
					'The restaurant has played live music and Vladimir invited you to tenets.'

					act 'Dancing with Vladimir':
						cla
						minut += 15
						gs 'stat'
						'Vladimir took you by the hand and led to the dance floor. There he you firmly embraced and began to carry on a dance. Do you feel like dancing your breasts pressed against his chest Vladimir and his hot hands tightly holding your waist.'
						'Soon the dance ended and Vladimir pododvinuv you a chair to help you sit down. You continue to dine and talk. At this time, Vladimir did not affect serious topics and told how he recently went to a ski resort.'
						'Once you ate and drank Vladimir suggested you carry home. He paid the waiter left a generous tip, and took you by the hand to come with you from the restaurant.'

						act 'Out of the restaurant':
							cls
							minut += 15
							gs 'stat'
							'<center><img src="images/qwest/vladimir/car.jpg"></center>'
							'The restaurant car was already prepared for you to Vladimir, he helped you to sit in the back seat and beating machine sat next to you. The driver closed the door and sat behind the wheel. Without turning, he asked where to go and you called him your address.'
							'You practically flew through the streets at breakneck speed. The driver was a real ace, he deftly around a turn and went around barely moving machines have never hit the brakes. Very quickly you come to your porch. Vladimir remarked sadly, "I unfortunately have to have a couple of things to do, so I''m in a hurry. I''ll call you tomorrow."'
							'He leaned over to kiss you you seeking.'

							act 'Give a kiss on the cheek':
								cla
								'You framed cheek and gently kissed you, Vladimir.'
								dynamic $qwmeetdy
							end

							act 'Kiss on the lips':
								cla
								'You kissed the lips of Vladimir. Its strong and firm lips gently digging into your soft and gentle sponge.'
								dynamic $qwmeetdy
							end
						end
					end
				end
			end
		end
	end
end

--- qwmeet ---------------------------------
# qwmeet2
$qwmeetkatdy = {
	'After the kiss, Vladimir took you by the hand went to acquaint you with your friends. Near the motor yacht talked two men and one woman.'
	'Vladimir brought you to the thin one man is not of a certain age, with a rigid, fastidious person. This Nicholas is <<$name>>.'

	act 'Very nice':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Nick</font></b></center>'
		'<center><img src="images/qwest/kolan/001.jpg"></center>'
		'Nicholas did not close the flashing eyes looked at you and said politely pointed "Very nice."'
		'Vladimir brought you to the girl standing next to Nicholas and introduced you to each other. "It''s Isolde is <<$name>>."'

		act 'Very nice':
			cls
			minut += 5
			gs 'stat'
			'<center><b><font color="maroon">Isolda</font></b></center>'
			'<center><img src="images/qwest/kolan/izolda.jpg"></center>'
			'Young blonde smiled at and greeted you.'
			'Vladimir brought you to my second friend. "It Vitaly is <<$name>>."'

			act 'Very nice':
				cls
				minut += 5
				gs 'stat'
				'<center><b><font color="maroon">Vitali</font></b></center>'
				'<center><img src="images/qwest/marafet/001.jpg"></center>'
				'The man looked at you mad eyes and smiled. "Hello beautiful, welcome to our warm company"'
				'Vladimir looked "Well, since we''re all here, let''s go on the boat." Nicholas looked at the driver''s glory. "Hey Banzai, lend and moorings at the helm." Asian nodded and began fussing around the boat.'

				act 'Vzayti aboard boats':
					cls
					minut += 5
					gs 'stat'
					'<center><b><font color="maroon">The boat</font></b></center>'
					'<center><img src="images/qwest/vladimir/kater.jpg"></center>'
					'You boarded the boat and Asian Glory which Nicholas called Banzai cast off and deftly jumped on the boat. Glory started the boat and rushed to the river at full speed.'
					'Nicholas sat down on a seat on the deck beside him and Vitaly flopped. Vladimir started fussing on the deck but Nicholas interrupted him "Vova, stop running, let us make love to girls. Sit down and talk."'
					'Isolde, after Nicholas ducked into the cabin.'

					act 'Go to the cabin after Isolde':
						cls
						minut += 5
						gs 'stat'
						'<center><b><font color="maroon">Cabin</font></b></center>'
						'<center><img src="images/qwest/kolan/izolda.jpg"></center>'
						'The cabin was a box with a variety of provisions and Isolde competently serve food on a tray. She nodded to the tomatoes, cut yourself yet. You started taking a knife to cut tomatoes.'

						act 'Ask about her and Nicholas':
							cla
							minut += 5
							gs 'stat'
							'You asked that binds her and Nicholas. Isolde immediately responded, "We are not married but dating. Nicholas blank, do not have anyone Nigo, no wife, no children. He''s a very influential person in the city, with one mention of it all start to go toe the line."'
							'Nicholas mediates and resolves a variety of issues and disputes. The very same Isolde according to her works in one his room, he does almost nothing and gets not a bad salary. Nicholas gave her there.'

							act 'Ask about Vitali':
								cla
								minut += 5
								gs 'stat'
								'You asked who is Vitaly. Isolde shrugged, "do not really know, Nikolai his cop calls. So probably he is cop."'

								act 'Ask about the glory':
									cla
									minut += 5
									gs 'stat'
									'You asked whether she knows the glory, she smiled, "I do not know, but all the time around the Banzai Koli rubs, he rubbed his driver to Vovka. Brazen and crazy type, a really great driver. He kind of master of sport of racing."'

									act 'Come on deck with a tray':gt 'qwpaluba'
								end
							end
						end
					end
				end
			end
		end
	end
}


$qwslavady = {
	'Glory is not looking at you said "<<$name>>, where you met Volodya?"'
	'You''re a little surprised that the driver called his boss told him but Volodya that you meet in the park.'
	'The driver smiled "Yeah I remember. Carried I have it in the park with his wife and child. Then you already know that he has a wife and child, and?"'
	'You nodded, "Yes, he told me." Glory chuckled avoiding another car at full speed "is clear. Cinderella found her prince on a white horse."'
	'Police siren wailed from behind and began to demand that the megaphone would audi stopped. Glory and laughed even harder pressed the gas to the floor. "Not even a man who was born to catch up with me."'
	'The machine flew quite a crazy speed and cars moving in the same direction disappeared behind you without having appear before you. Glory brought the car out of the city and sirens became audible. He grinned, "I told them thin intestine catch up with me."'
	'Soon audi flew to the river and stopped near the pier on which are so few people. Glory out of the car and helped you vybratsya.'
	'To you walked Vladimir.'

	act 'Give a kiss on the cheek':
		cls
		'<center><b><font color="maroon">Vladimir</font></b></center>'
		'<center><img src="images/qwest/vladimir/001.jpg"></center>'
		'You framed cheek and gently kissed you, Vladimir.'
		dynamic $qwmeetkatdy
	end

	act 'Kiss on the lips':
		cls
		'<center><b><font color="maroon">Vladimir</font></b></center>'
		'<center><img src="images/qwest/vladimir/001.jpg"></center>'
		'You kissed the lips of Vladimir. Its strong and firm lips gently digging into your soft and gentle sponge.'
		dynamic $qwmeetkatdy
	end
}

minut += 3
gs 'stat'
'<center><img src="images/qwest/kim/001.jpg"></center>'
'Glory smiled and gestured you get in the car on the front passenger seat.'

act 'Sit next to the driver':
	cls
	minut += 3
	gs 'stat'
	'<center><img src="images/qwest/kim/002.jpg"></center>'
	'You took a seat next to the driver. Glory came to the door and slammed it shut. He walked over to his seat and sat behind the wheel moved. Glory again flew through the city spit on traffic lights, signs and other cars.'
	dynamic $qwslavady
end

act 'Sit in the back seat':
	cls
	minut += 3
	gs 'stat'
	'<center><img src="images/qwest/kim/002.jpg"></center>'
	'You defiantly took a backseat and Glory hmyknuv shut the door behind you. He walked over to his seat and sat behind the wheel moved. Glory again flew through the city spit on traffic lights, signs and other cars.'
	dynamic $qwslavady
end

--- qwmeet2 ---------------------------------
# qwmeet3
minut += 3
gs 'stat'
'<center><img src="images/qwest/kim/001.jpg"></center>'
'Glory smiled and gestured you get in the car on the front passenger seat.'

act 'Sit next to the driver':
	cls
	minut += 3
	gs 'stat'
	'<center><img src="images/qwest/kim/002.jpg"></center>'
	'You took a seat next to the driver. Glory came to the door and slammed it shut. He walked over to his seat and sat behind the wheel moved. Glory again flew through the city spit on traffic lights, signs and other cars.'

	if slavaQW > 0:slavaQW += 1 & 'As long as you drove through the city, not by constraint, you chatted with Slava.'
	if slavaQW = 0:slavaQW = 1 & 'As long as you drove through the city, Glory told you that he tusit in my spare time at the bar located Flying in the northern region of the city.'

	dynamic $qwmeetdin
end

act 'Sit in the back seat':
	cls
	minut += 3
	gs 'stat'
	'<center><img src="images/qwest/kim/002.jpg"></center>'
	'You defiantly took a backseat and Glory hmyknuv shut the door behind you. He walked over to his seat and sat behind the wheel moved. Glory again flew through the city spit on traffic lights, signs and other cars.'
	dynamic $qwmeetdin
end

$qwmeetdin = {
	'Finally the car stopped near the restaurant.'

	act 'Out of the car':
		cls
		minut += 60
		energy = 21
		water = 21
		vladimirday = day
		vladimirQW = 35
		gs 'stat'
		'The restaurant you already met Vladimir. He will spend a reserved table. You drank and ate together with Vladimir, who spoke little and mostly compliments.'

		if VladimirKnowAboutHusband = 0:
			'Then you came out of the restaurant and sat in the car with Vladimir, Thank you belive drove to your home. Vladimir pointedly whispered, "can priglasish me to her?"'

			act 'Sorry, but I still have a case':gt 'street'

			if husband <= 0:
				act 'Invite':
					cls
					minut += 15
					$nameV = 'Vladimir'
					$boy = 'Vladimir'
					dick = 16
					silavag = 1
					NoGuy = 1
					InYouHome = 1
					harakBoy = 0
					finance = 2
					money += 5000
					'You passed with Vladimir in the bedroom. Vladimir skeptical osvotrel your humble abode and took out his wallet. I hope you will not mind if I give you money? He handed you five thousand. You hid a little money you offered.'

					act '...':gt 'BDsex', 'start'
				end
			elseif husband > 0 and VladimirKnowAboutHusband = 0:
				act 'I am married':
					cls
					VladimirKnowAboutHusband = 1
					'You told Vladimir that you have a husband. He kept apologizing and said goodbye to you.'

					act 'Leave.':gt 'street'
				end
			end
		elseif VladimirKnowAboutHusband = 1:
			'After the meal you left the restaurant and got into the car with Vladimir. He suggested that you go to him, to a safe place.'

				act 'Sorry, but I still have a case':gt 'street'

				act 'Agree':
					cls
					minut += 15
					$nameV = 'Vladimir'
					$boy = 'Vladimir'
					dick = 16
					silavag = 1
					NoGuy = 1
					harakBoy = 0
					finance = 2
					GoToGuy = 2
					'Glory to you belive drove a rented apartment Vladimir. You got out and went up to the apartment.'
					'In the apartment you have been with Vladimir in the bedroom.'

					act '...':gt 'BDsex', 'start'
				end
			end
		end
}

--- qwmeet3 ---------------------------------
# qwpaluba
minut += 30
energy = 21
water = 21
gs 'stat'
'<center><b><font color="maroon">The boat</font></b></center>'
'<center><img src="images/qwest/vladimir/kater2.jpg"></center>'
'You brought the tray on the deck and put it on the table in front of men. Vladimir began pouring a glass of vodka and showed you sit on a chair inviting. Isolde came and also brought a variety of eatables on the tray.'
'You all but Glory sat at a table on the deck and after Vladimir vodka poured the glasses. Nicholas raised a toast "For the ladies present here."'
'All drank the stack and returned to their conversations. Vladimir floor vote in what is explained Nicholas. And frankly Vitaly sgaretu lounged smoking and staring at your feet.'
'Isolde stood leaning his hands on the gunwale and considered neighborhood. Glory led boat on the river.'

act 'Approach to Isolde':
	cls
	izoldaQW = 1
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Isolda</font></b></center>'
	'<center><img src="images/qwest/kolan/izolda.jpg"></center>'
	'Glory began to make a turn that would return to the place from where you left. You clung to a rail next to Isolde, that would not fall, Nicholas shouted "Banzai, be careful, do not you carry firewood."'
	'Once you have chatted boat lined with Isolde about trifles. She called you my address in the city center and invited to come to anything like it.'
	'The boat finally dropped the course and began to stick to the shore where you sail for a walk.'

	act 'Disembark':gt 'qwbereg'
end

act 'Approach to Glory':
	cls
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Glory</font></b></center>'
	'<center><img src="images/qwest/kim/001.jpg"></center>'
	'Glory grinned when he saw you. "Hold on tight, I''m going to turn." You clung to railings and Asian rider banked on the river boat turning. Nicholas shouted "Banzai, be careful, do not you carry firewood."'
	'The driver smiled, "I can not help myself, I love speed. Do you like speed?"'

	act 'Not very':
		cla
		slavaQW = 1
		'(You) - Not really.'
		'(Glory) - You just do not feel it yet. What would you love to feel the speed it should be. I hang out in the evenings in the northern region, near the bar, "Flight", come back.'
		'The boat finally dropped the course and began to stick to the shore where you sail for a walk.'

		act 'Disembark':gt 'qwbereg'
	end

	act 'Yes.':
		cla
		slavaQW = 1
		'(You) - Yes.'
		'(Glory) - In the evening, I hung out in the northern region, in the bar, "Flight", come back, I''ll show you what real speed.'
		'The boat finally dropped the course and began to stick to the shore where you sail for a walk.'

		act 'Disembark':gt 'qwbereg'
	end
end

act 'Talk with Vitali':
	cls
	minut += 15
	gs 'stat'
	'<center><b><font color="maroon">Vitali</font></b></center>'
	'<center><img src="images/qwest/marafet/001.jpg"></center>'
	'You started talking with Vitali, he acknowledged that working with the police to the rank of captain. At this time, the boat banked sharply and began to go on the turn, you are not expecting such slid from the couch and grabbed the Vitali that would not fall. Nicholas shouted "Banzai, be careful, do not you carry firewood."'
	'Vitaliy you grabbed that you would not have fallen to the floor. After the boat leveled network it helped you on the couch, and his hands slid over your body and stopped by the ass. Then he took his hands with a sigh and poured vodka.'
	'The boat finally dropped the course and began to stick to the shore where you sail for a walk.'

	act 'Disembark':gt 'qwbereg'
end

--- qwpaluba ---------------------------------
# Prostitute
if $ARGS[0] = 'start':
	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaSex = $ARGS[0]
	$locSex = $CURLOC
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	gs 'time'
	'<center><b><font color="maroon">Hooker</font></b></center>'
	'<center><img src="images/etogame/park2.jpg"></center>'

	if hour >= 16 and hour <= 23:
		if whoreQW = 2:
			'Prostitutes look at you with curiosity.'
		elseif whoreQW = 1:
			'Prostitutes look at you with interest.'

			act 'Talk':
				cla
				whoreQW = 2
				'You went to a prostitute and asked her how things are done here at all. She began to explain. "We are free, do not work on anyone, but because of this many problems. Svimi Stella with her friends sometimes beat us and rob and sometimes come petty thugs and rob us of the money. If you want to work here, you have to pay and Stella and Bandyuk . course you cool, you can try to besiege Stella and her friends, but the bandits do not advise contact. And yet, you do not peck on customers, if you nebudesh dressed like a slut, you can buy some clothes in a sex shop. "'

				act 'Move away':gt 'prostitute', 'start'
			end
		elseif whoreQW = 0:
			'Hey, you´re not one of us, would valyl from our point, and that the teeth will not collect.'

			act 'Fuck you!':
				cla
				minut += 15
				$nameV = 'Stoned prostitute'
				!!stats
				strenV = 20
				speedV = 30
				agilV = 30
				reactV = 30
				vitalV = 50
				intelV = 10
				willV = 10
				!!skills
				magikV = 10
				boxingV = 10
				shootV = 10
				!!parameters
				healthV = vitalV * 10 + strenV * 5
				mannaV = intelV * 10 + magikV * 10
				willpowerV = willV * 10
				BonusAtakV = 0
				BonusDefV = 0
				!!Programme of Action
				program = 0
				prostitutFight = 1

				if spellavtoklon = 1:klon = 3
				if spellbefshild = 1:defence = 500

				gt 'fight', 'start'
			end

			act 'And how to become one of your own?':
				cla
				'And how to become one of your own? You asked. Brazen prostitute grinned spat. To do this, you have to pay Stella.'

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

				act 'I agree':
					cla
					whoreQW = 2
					'You agreed. Prostitute told you that you need to buy the appropriate clothing in sex Shope. Then customers will immediately understand that you´re a prostitute.'

					act 'Move away':gt 'prostitute', 'start'
				end
			end
		end

		if whoreQW > 1 and $clothingworntype = 'hooker' and son > 0:
			act 'Stand on the panel (0:15)':
				cla
				minut += 10

				if rand(0, (vnesh + hour) * 2) < 20:
					'No you are not interested.'

					act 'Leave':gt 'prostitute', 'start'
				else
					proseventrand = rand(1, 20)

					if proseventrand = 1:
						'To you black jeep pulled up, opened the window and leaned out healthy brazen face. "Hey slut, it´s time to pay tribute. Shtukar Come here and get out on work."'

						if money >= 1000:
							act 'Giving money':
								cla
								money -= 1000
								'You gave the money big man in the jeep. He put them in his pocket and left.'

								act 'Move away':gt 'prostitute', 'start'
							end
						elseif money < 1000:
							act 'I have not earned much':
								cla
								money = 0
								'You big man began to explain that you have not earned it grabbed you by the arm and threw him into a jeep, there you have it brushed pocket and said that he will teach you how to work.'

								act 'Work':
									$nameV = 'bandit'
									$boy = 'Bandit'
									dick = rand(18, 21)
									gt 'blowPR', 'start'
								end
							end
						end

						act 'Fuck you!':
							cla
							minut += 15
							$nameV = 'Bandit'
							!!stats
							strenV = 200
							speedV = 30
							agilV = 20
							reactV = 20
							vitalV = 150
							intelV = 10
							willV = 10
							!!skills
							magikV = 10
							boxingV = 10
							shootV = 10
							!!parameters
							healthV = vitalV * 10 + strenV * 5
							mannaV = intelV * 10 + magikV * 10
							willpowerV = willV * 10
							BonusAtakV = 0
							BonusDefV = 0
							!!Programme of Action
							program = 0
							prostitutFight = 2

							if spellavtoklon = 1:klon = 3
							if spellbefshild = 1:defence = 500

							gt 'fight', 'start'
						end
					elseif proseventrand = 2:
						'To you approached a prostitute. "I hear you, slut, if you do not want problems, you have to pay Stella. Pyatihatnik Come here and get out on work."'

						if money >= 500:
							act 'Giving money':
								cla
								money -= 500
								'You gave the money to the prostitute, she turned and walked away.'

								act 'Move away':gt 'prostitute', 'start'
							end
						elseif money < 500:
							act 'I have not earned much':
								cla
								money = 0
								'You started zhalovatsya that do not earn much money. You searched prostitute taking everything of value and left.'

								act 'Move away':gt 'prostitute', 'start'
							end
						end

						act 'Fuck you!':
							cla
							minut += 15
							$nameV = 'Prostitute'
							!!stats
							strenV = 50
							speedV = 50
							agilV = 40
							reactV = 30
							vitalV = 60
							intelV = 10
							willV = 10
							!!skills
							magikV = 10
							boxingV = 10
							shootV = 10
							!!parameters
							healthV = vitalV * 10 + strenV * 5
							mannaV = intelV * 10 + magikV * 10
							willpowerV = willV * 10
							BonusAtakV = 0
							BonusDefV = 0
							!!Programme of Action
							program = 0
							prostitutFight = 3

							if spellavtoklon = 1:klon = 3
							if spellbefshild = 1:defence = 500

							gt 'fight', 'start'
						end
					else
						'To you a car drove up.'
						prosti = 0
						if proseventrand <= 8:
							'The client wants to blow and asks how much it will cost.'
						elseif proseventrand <= 14:
							'Client wants sex and asks how much it will cost.'
						else
							'Client wants anal and asks how much it will cost.'
						end

						act 'Leave':gt 'prostitute', 'start'

						if ProsMoney > 0:
							act '<<ProsMoney * 100>> rubles':
								cls
								gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
							end
						end

						act 'Assign a price':
							cls
							gs 'stat'
							ProsMoney = input("Enter a number below, which will multiplied by 100")

							if ProsMoney < 1:
								'The client looked at you in amazement and muttered "what that fucker." Then started the car and drove away.'

								act 'Leave':gt 'prostitute', 'start'
							else
								gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
							end
						end
					end
				end
			end
		end
	end

	act 'Leave':
		cla
		minut += 5
		prosta = 0
		gt 'park', 'start'
	end
end

if $ARGS[0] = 'work1':
	!! ARGS 1 - blow job, sex, anal

	'<center><img src="images/etogame/park2.jpg"></center>'
	'You told the client that <<$ARGS[1]>> will cost <<ProsMoney * 100>> rubles.'

	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

	if vnpr >= 0:
		if ProsMoney = 1:
			gt 'prostitute', 'work2', $ARGS[1]
			exit
		else
			if vnpr >= rand(0, 30):
				if $ARGS[1] = 'blow job':KlientMON = rand(1, 10)
				if $ARGS[1] = 'sex':KlientMON = rand(3, 25)
				if $ARGS[1] = 'anal':KlientMON = rand(5, 40)

				if KlientMON >= ProsMoney:
					gt 'prostitute', 'work2', $ARGS[1]
					exit
				else
					if rand(0, 1) = 1:
						'The client grins and offers <<KlientMON * 100>> per job.'

						act 'Agree':
							ProsMoney = KlientMON
							gt 'prostitute', 'work2', $ARGS[1]
							exit
						end

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

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

if $ARGS[0] = 'work2':
	!! ARGS 1 - blow job, sex, anal
	'The client nods his head and opens the door of his car.'
	act 'Get into the client''s car':
		cla
		clr
		*clr
		gs 'boy'
		slutty += 1
		minut += 1
		guy += 1
		bj += 1
		throat += 1
		prosta = 1

		if rand(1, 100) >= 70:dynamic $venerasiak

		gs 'stat'
		'<center><img src="images/img/prost/bj.jpg"></center>'
		'Your hand slid crotch guy and unzipped his pants. You shoved his hand into his pants and pulled out his cock.'

		if prezik > 0:
			act 'Wear a condom on the penis mouth':
				cla
				clr
				*clr
				minut += 5
				prezik -= 1
				gs 'stat'
				picrand = rand(1, 7)
				'<center><img src="images/img/prost/bjp<<picrand>>.jpg"></center>'
				'You pulled his lips a condom on the penis'

				if $ARGS[1] = 'blow job':
					'Your lips slide down the barrel client until he cums in a condom.'

					act 'Finish':gt 'prostitute', 'start'
				elseif $ARGS[1] = 'sex':
					'Client sufficiently warmed up and you can continue.'

					act 'Further':
						cla
						clr
						*clr
						prosti = 0
						minut += 15
						sex += 1
						protect = 1
						gs 'stat'

						if rand(0, 1) = 0:
							'<center><img src="images/img/prost/sexcar.jpg"></center>'
							'You obediently lay naked in the back seat until your dick hole logged.'
							gs 'orgazm', 'start'
						else
							! WD: Correct Image path ~ "images/img/img/prost/sexcar2.jpg"
							'<center><img src="images/img/prost/sexcar2.jpg"></center>'
							'Standing on all fours, you felt like you were planting confident movement on the penis.'
							gs 'orgazm', 'start'
						end

						act 'Leave':gt 'prostitute', 'start'
					end
				elseif $ARGS[1] = 'anal':
					'Client sufficiently warmed up and you can continue.'

					act 'Further':
						cla
						clr
						*clr
						minut += 1
						prosti = 0
						anal += 1
						money += ProsMoney * 100
						gs 'stat'
						dickK = dick * 10 / 100

						if dickK < 1:dickK = 1
						anus += dickK

						'<center><img src="images/img/prost/anal.jpg"></center>'
						'You got cancer and client uper you in your anus <<dick>> centimeter member.'

						if anus < dick:
							fun = 0
							'Ass ached when the member entered her client waited for a bit until your ass adapt and gradually began to move his cock in you, gradually accelerating.'
						end

						if anus >= dick:
							horny += anus
							'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
						end

						'Finally, the client does not stand up and ends in a condom.'

						act 'Leave':gt 'prostitute', 'start'
					end
				end
			end
		else
			act 'Mark cock in her mouth':
				cla
				clr
				*clr
				dynamic $venerasiak
				minut += 5
				gs 'stat'
				picrand = rand(8, 13)
				'<center><img src="images/img/prost/bjp<<picrand>>.jpg"></center>'
				'You clasped lips member.'

				act 'Suck':
					*clr
					cla

					if $ARGS[1] = 'blow job':
						bjrand = rand(1, 100)

						if bjrand <= 50:
							if bj <= 15:
								cumlip += 1
								'<center><img src="images/img/prost/bjm.jpg"></center>'
								'You clumsy movements suck dick customer until he cums in your mouth, making you wince from the unpleasant taste of sperm.'
							else
								cumlip += 1
								'<center><img src="images/img/prost/bjm2.jpg"></center>'
								'Your trained sponge glide up and down, bringing pleasure to the customer. Very soon you will feel the taste of his seed that you swallow with delight to the last drop.'
							end
						elseif bjrand <= 80:
							if bj <= 15:
								cumface += 1
								if mop > 1:mop = 0
								'<center><img src="images/img/prost/bjf.jpg"></center>'
								'You clumsy movements suck dick client suddenly you he pulls his dick, ending on your face, you do not have time to blink, a little sperm gets you in the eye, but, despite the burning, you can not cry, you can only smile.'
							else
								cumface += 1
								'<center><img src="images/img/prost/bjf2.jpg"></center>'
								'Your trained sponge glide up and down, bringing pleasure to the customer as soon as the client has released your mouth, you realize that your face is now flooded with sperm. You have time, tilt the head back with her eyes closed, heavy drops falling on your chin, forcing to smile at the thought of not smeared makeup.'
							end
						else
							if bj <= 15:
								cumfrot += 1
								'<center><img src="images/img/prost/bjt2.jpg"></center>'
								'You clumsy movements suck dick client, it stretches hands to your chest trying to expose it. You moaned, letting him know that was not the deal. Dissatisfied client continued to have you in my mouth. You have already relaxed, as a client, pushing, pulled wet from saliva member. His eyes closed, you feel like a drop of sperm not fall on your face and chest! Surprised you open your eyes in horror when he saw in the semen-stained clothing, and pretty smiling customer.'
							else
								money += 500
								'<center><img src="images/img/prost/bjt.jpg"></center>'
								'Your trained sponge glide up and down, bringing pleasure to the customer. He stretches his hands to your chest did not patiently trying to expose her, you understand everything without words. Exposing boobs you become even more carefully to work his mouth when he was already on the brink, you have stepped back sharply, slipping back with the member in a moment became a client shoot sperm on your carefully when substituted hemisphere. Left happy, he handed you another Piatihatki.'
							end
						end

						act 'Finish':gt 'prostitute', 'start'
					elseif $ARGS[1] = 'sex':
						'Client sufficiently warmed up and you can continue.'

						act 'Further':
							cla
							clr
							*clr
							prosti = 0
							minut += 15
							sex += 1
							gs 'stat'
							prostRand = rand(1, 100)

							if prostRand <= 50:
								pose = 1
								picpRand = rand(1, 7)
								'Becoming cancer, you feel hot prick seeking to get into the vagina.'
								gs 'orgazm', 'start'
							elseif prostRand <= 75:
								pose = 1
								picpRand = rand(8, 10)
								'Standing on all fours, you felt like a hole braced member.'
								gs 'orgazm', 'start'
							else
								pose = 0
								picpRand = rand(11, 17)
								'You were ordered to undress and lie down on the hood of the car.'
								gs 'orgazm', 'start'
							end

							'<center><img src="images/img/prost/sexcar<<picpRand>>.jpg"></center>'

							act 'Leave':gt 'prostitute', 'start'
						end
					elseif $ARGS[1] = 'anal':
						'Client sufficiently warmed up and you can continue.'

						act 'Further':
							cla
							clr
							*clr
							minut += 1
							prosti = 0
							gs 'stat'
							dickK = dick * 10 / 100

							if dickK < 1:dickK = 1
							anus += dickK

							!! the first cowl image is cowl, not cowl1
							picrand = rand(2, 6)
							'<center><img src="images/img/prost/cowl<<picrand>>.jpg"></center>'
							'As soon as you lay on the hood of the car, legs apart, you stared into the anus <<dick>> centimeter member.'

							if anus < dick:
								fun = 0
								'A sharp pain pierced member of stuck in the ass, making you wince groan. Customer waited patiently until your anus, get used to stretching, but you still could not get rid of the nagging pain. Fake smile, through the desire to end this torture quickly, you give the signal to start the action. Client was cautious, starting with the slow movements in the anus, gradually accelerating, he forgot about your suffering, surrendering his own enjoyment, and not noticing as "goods", writhes and moans in pain.'
							else
								horny += anus
								'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
							end

							if klismaday ! day:
								act 'Escape':
									cla
									*clr
									gs 'stat'
									'You were going to get the money but instead heard swearing. "You fear that the nipple completely lost my whole bolt in your shit, you do not know that I have a dick, and not brush the toilet, get out of here while intact, but money can not forget."'

									act 'Leave':gt 'prostitute', 'start'

									act 'Be rude':
										cla
										*clr
										money += ProsMoney * 100
										manna -= 30
										health -= 30
										willpower -= 30
										bj += 1
										throat += 1
										gs 'stat'
										'<center><img src="images/img/prost/bjr.jpg"></center>'
										'"Hey, I did not understand, chase my money ..." you did not get to finish. Man hit you strong blow to the chest, from which you crashed to the ground. "Money is wanted, well, what a bitch I''ll give them to you, but you are correct his mistake" after these words he drove you exhaling stench dick in her mouth. You were choking from the stench, but there was nothing, his eyes closed, as if saying yes, you tried to keep from vomiting, fear of causing mayhem. The stranger had you in my mouth, trying to touch every movement of your lips their balls. His cock soon became clean, but it did not stop him, it seemed an eternity before he again finished right in the throat. Looking at you roll in a mixture of saliva and vomit, he laughed and said no more words thrown in your face money.'

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

									if intel >= 50:
										act 'Make amends':
											cla
											*clr
											bj += 1
											throat += 1
											gs 'stat'
											'<center><img src="images/img/prost/bjr1.jpg"></center>'
											'You understand everything perfectly, you are at fault, and you correct client insanely angry and seems ready to tear you to pieces. You decide to make amends, his guilt polish smeared mouth organ client.'

											act 'Suck':
												cla
												*clr
												vagina += 1
												money += ProsMoney * 110
												gs 'stat'
												'<center><img src="images/img/prost/sexcar20.jpg"></center>'
												'Bitter taste in the mouth of feces did not give you a taste of diluted semen. Freeing your mouth working, customer ordered to lie on the grass. You humbly and even with a certain touch of acting talent was acting innocent doll while you fuck. Client warmed your able mouth twitching long over you, quickly ran into the condom. While you lay recovering on your body fall three green paper, he was satisfied, happy smile you think.'

												act 'Escape':gt 'prostitute', 'start'
											end
										end
									end
								end
							else
								money += 2000
								cumanalRand = rand(0, 2)

								if cumanalRand = 0:
									anal += 1
									cumanal = cumass + 1
									'Suddenly the anus was empty, the client abruptly yanked member before it drops the seed watered half your ass.'
								elseif cumanalRand = 1:
									anal += 1
									cumfrot += 1
									'Suddenly the anus was empty, the client abruptly yanked a member before his seed rain drops fell on your body, dirtying clothes traces of dairy.'
								else
									anal += 1
									cumanus += 1
									'Customer traffic have become sharp and painful it literally rammed in the ass you finally feel like you''re inside you flowing sperm all over you think.'
								end

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

--- Prostitute ---------------------------------

# Menu.Info
*nl 'Module to work with the menu'
*nl 'Version:1.0'
*nl 'Author:Olegus t.Gl. (C) 2011'
*nl 'Website:http://olegus.ifiction.ru'
*nl 'e-mail:olegus.tgl@gmail.com'
*nl 'icq:145 540 276'
*nl 'Forum topic:http://forum.ifiction.ru/viewtopic.php?id=1527'

--- Menu.Info ---------------------------------

# Menu.Create
if $ARGS[0] = '':EXIT
!!----------
$ARGS[0] = 'otg_Menyu_' + $ARGS[0]
!!----------
killvar '<<$ARGS[0]>>'
killvar '<<$ARGS[0]>>_Parameters'
killvar '<<$ARGS[0]>>_Selected'
killvar '<<$ARGS[0]>>_VybrannyyPunkt'
killvar '<<$ARGS[0]>>_Time'
killvar '<<$ARGS[0]>>_ModuliSobyty'

--- Menu.Create ---------------------------------

# Menu.Add
if $ARGS[0] = '' or $ARGS[1] = '':EXIT
!!----------
if $ARGS[1] = '---' or lcase($ARGS[1]) = 'separator':
	dynamic "$otg_Menyu_<<$ARGS[0]>>[] = '-:-'"

	exit
end
!!----------
ARGS[10] = arrsize('ARGS')
if ARGS[10] < 3:$ARGS[2] = ''
if ARGS[10] < 4:$ARGS[3] = ''
!!----------
$ARGS[0] = 'otg_Menyu_<<$ARGS[0]>>'
$ARGS[1] = replace($ARGS[1], '''', '''''')
if $ARGS[2] <> '':$ARGS[2] = ':' + replace($ARGS[2], '''', '''''')
if $ARGS[3] <> '':$ARGS[3] = replace($ARGS[3], '''', '''''')
!!----------
dynamic "
	$<<$ARGS[0]>>[] = '<<$ARGS[1]>>:Menu.Processing<<$ARGS[2]>>'
	$<<$ARGS[0]>>_parameters[str(arrsize('<<$ARGS[0]>>'))+'_W'] = '<<$ARGS[1]>>'
	$<<$ARGS[0]>>_parameters[str(arrsize('<<$ARGS[0]>>'))+'_F'] = '<<$ARGS[3]>>'
"
!!----------
$ARGS[3] = ''
if ARGS[10] > 4:
	ARGS[11] = 4
	:otg_menyu_metka_1

	if ARGS[11] < ARGS[10]:
		if $ARGS[ARGS[11]] <> '':
			$ARGS[3] += ',''' + replace($ARGS[ARGS[11]], '''', '''''') + ''''
		else
			if ARGS[ARGS[11]] <> 0:
				$ARGS[3] += ', ' + str(ARGS[ARGS[11]])
			else
				$ARGS[3] += ''' '''
			end
		end

		ARGS[11] += 1

		jump 'otg_menyu_metka_1'
	end
end
!!----------
dynamic "
	$<<$ARGS[0]>>_parameters[str(arrsize('<<$ARGS[0]>>'))+'_P'] = '<<replace($ARGS[3], '''', '''''')>>'
"

--- Menu.Add ---------------------------------

# Menu.AddCondition
if $ARGS[0] = '' or $ARGS[1] = '':EXIT
!!----------
ARGS[10] = dyneval("Result = arrsize('otg_Menyu_<<$ARGS[0]>>')")

if dyneval("$Result = $otg_Menyu_<<$ARGS[0]>>[<<ARGS[10]>>-1]") = '-:-':exit
!!----------
dynamic "
	$otg_Menyu_<<$ARGS[0]>>_parameters['<<ARGS[10]>>y'] = '<<replace($ARGS[1], '''', '''''')>>'
"
--- Menu.AddCondition ---------------------------------

# Menu.AddModule
if $ARGS[0] = '' or $ARGS[1] = '':EXIT
!!----------
ARGS[10] = dyneval("Result = arrsize('otg_Menyu_<<$ARGS[0]>>')")
if dyneval("$Result = $otg_Menyu_<<$ARGS[0]>>[<<ARGS[10]>>-1]") = '-:-':EXIT
!!----------
dynamic "
	$otg_Menyu_<<$ARGS[0]>>_parameters['<<ARGS[10]>>_M'] = '<<replace($ARGS[1], '''', '''''')>>'
"

--- Menu.AddModule ---------------------------------

# Menu.AddEvent

if $ARGS[0] = '' or $ARGS[1] = '':exit
!!----------
$ARGS[1] = lcase(trim($ARGS[1]))
!!----------
if $ARGS[1] = 'when you select':
	dynamic "$otg_Menyu_<<$ARGS[0]>>_ModuliSobyty['<<$ARGS[1]>>'] = '<<replace($ARGS[2], '''', '''''')>>'"
elseif $ARGS[1] = 'selecting processing after':
	dynamic "$otg_Menyu_<<$ARGS[0]>>_ModuliSobyty['<<$ARGS[1]>>'] = '<<replace($ARGS[2], '''', '''''')>>'"
elseif $ARGS[1] = 'failure of the choice':
	dynamic "$otg_Menyu_<<$ARGS[0]>>_ModuliSobyty['<<$ARGS[1]>>'] = '<<replace($ARGS[2], '''', '''''')>>'"
end

--- Menu.AddEvent ---------------------------------

# Menu.Call
if $ARGS[0] = '':EXIT
!!----------
ARGS[10] = arrsize('otg_Menyu_<<$ARGS[0]>>')
if ARGS[10] = 0:EXIT
!!----------
$otg_Menu_Current = 'otg_Menyu_<<$ARGS[0]>>'

killvar 'otg_Menyu_Vyzyvaemoe'
killvar 'otg_Menu_Compliance'
!!----------

ARGS[11] = 0

:otg_menyu_metka_2
if ARGS[11] < ARGS[10]:
	dynamic "

		$ARGS[0] = $<<$otg_Menu_Current>>_parameters['<<ARGS[11]+1>>y']
		if $ARGS[0] = '':
			$otg_Menyu_Vyzyvaemoe[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]

			otg_Menu_Compliance[] = <<ARGS[11]+1>>
		else
			if dyneval($ARGS[0]) <> 0:

				$otg_Menyu_Vyzyvaemoe[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]

				otg_Menu_Compliance[] = <<ARGS[11]+1>>
			end
		end
	"

	ARGS[11] += 1

	!!----------
	jump 'otg_menyu_metka_2'
end
!!----------

otg_Menu_Time = 0
dynamic "
	<<$otg_Menu_Current>>_selected = 0
	<<$otg_Menu_Current>>_VybrannyyPunkt = 0
	<<$otg_Menu_Current>>_time = MSECSCOUNT

"
!!----------
menu 'otg_Menyu_Vyzyvaemoe'
!!----------
dynamic "

	if <<$otg_Menu_Current>>_selected = 0:
		<<$otg_Menu_Current>>_time = MSECSCOUNT-<<$otg_Menu_Current>>_time
		$ARGS[0] = $<<$otg_Menu_Current>>_ModuliSobyty['failure of the choice']

		if $ARGS[0]<>'':dynamic $ARGS[0]
	else

		$ARGS[0] = $<<$otg_Menu_Current>>_ModuliSobyty['selecting processing after']
		if $ARGS[0]<>'':dynamic $ARGS[0], $<<$otg_Menu_Current>>_parameters[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_Z']"+dyneval("$Result = $<<$otg_Menu_Current>>_parameters[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_P']")+"

	end
"
!!----------
killvar 'otg_Menyu_Tekuschee'
killvar 'otg_Menyu_Vyzyvaemoe'
killvar 'otg_Menu_Compliance'
!!----------

Result = dyneval("Result = otg_Menyu_<<$ARGS[0]>>_selected")

--- Menu.Call ---------------------------------

# Menu.Chosen

if $ARGS[0] = '':exit
Result = dyneval("Result = otg_Menyu_<<$ARGS[0]>>_selected")

--- Menu.Chosen ---------------------------------

# Menu.Time

if $ARGS[0] = '':
	Result = otg_Menu_Time
else
	Result = dyneval("Result = otg_Menyu_<<$ARGS[0]>>_time")

end
--- Menu.Time ---------------------------------

# Menu.Destroy

if $ARGS[0] = '':exit

GS 'Menu.Create', $ARGS[0]
--- Menu.Destroy ---------------------------------

# casino
minut += 10
gs 'stat'
'<right><img src="images/casino/zdcasino.jpg"></right>'
'You stand in front of the door of the huge building casinos.'

act 'Sign in casino':gt 'hall'

act 'Back in the northern area':gt 'nord'

!!if tobiQW < 1000:tobiQW = 1000

--- casino ---------------------------------
# mqroom
clr
minut += 5
gs 'stat'
'<center><img src="images/casino/oldman1.jpg"></center>'
'You have gone with Plato Aristarkhovich to his room, he sat down at the table and you scroll from his pocket, put it in front of him.'
'Plato became Aristarkhovich scrutinize scroll. You shifted from foot to foot in anticipation of what he would say.'
'(Plato Aristarkhovich) - a very curious thing. Despite the fact that most of the characters familiar to me, common sense written eludes my understanding. I knew only a few phrases. What is called the scroll and scroll Rikudo need to stomp on the foot print. Print - it''s that big character in the center of the scroll.'
'(You) - stamp his foot? This is why?'
'(Plato Aristarkhovich) - I have no idea. ''d Never met. But that''s the phrase clearly indicates that it is necessary to stamp on the central characters. Next there is something about the growth of the forces, but it is unclear.'

act 'Put a roll on the floor and stamp his foot.':
	cla
	*clr
	magika = 1
	'You put a roll on the floor and stamped his foot on the large central characters.'
	'Bright flash and scroll erupted beneath your feet. You felt something, a breeze and you dramatically headache.'

	act 'Fuck! As head pops!':
		cla
		'My head was pounding and buzzed like a steam hammer. You flew thought:"Now I think I will have a stroke." You grabbed his head and sat down in a chair, unable to think about anything.'
		'Plato Aristarkhovich fussing around, "what the hell is going on, do not worry, I''ll get the doctor."'
		'The man ran from the room and soon returned with the girl. She came up to you and you took his hand under the chin.'

		act 'Look into her eyes.':
			cla
			*clr
			inited = 1
			music_on = 1
			volume = 100
			$music_theme = 'orochimaru'
			gs 'init_music'
			! WD: Correct Image path ~ "images/casino/oro.jpg"
			'<center><img src= "images/picbat/orotimaru.jpg"></center>'
			'Mother of God. Just thought you looked into her eyes. Deathly pale skin, cold and cruel snake eyes. Creature grinned.'
			'(Creature) - "So you see my true face. Wonderful." Hissed the snake creature voice.'
			'Looking into those eyes and you only managed to whisper, "Who are you?". Creature chuckled "Long story, you do not stand it and will soon die."'
			'At this point you are physically, the whole body felt as reality is broken and something terrible and powerful wedged in reality, trying to see you with his one eye.'
			'Creature with snake eyes sharply turned and looked at the door. "He came! I must skedaddle" - angrily hissed the creature. At this moment the door to the room and shattered into pieces in the doorway appeared a dark silhouette.'

			act 'Look at the stranger.':
				cla
				*clr
				! WD: Correct Image path ~ "images/casino/tobi.jpg"
				'<center><img src="images/picbat/tobi.jpg"></center>'
				'In the doorway stood a man in a black robe, on which were painted red clouds. His face covered with a mask slit for the eyes. You feel a huge force pervading space literally coming out of that eye. The masked man said dully, "Here we saw each other and Orochimaru. Again will flee?"'
				'Zmeeglazoe creature with a female body and snake hissed angrily eyes:"What else can I do Toby? Tsukuyomi While you run, I can only escape. But believe me, I change everything very quickly. You hunter of becoming a victim."'
				'Suddenly a man in a mask named Toby zmeeglazogo attacked, he rushed forward, trying to grab zmeeglazogo throat. At Orochimaru literally flew out of the sleeve snake toward Toby, but to your surprise snake flew through Toby and crashed into the door jamb.'
				'Toby grabbed Orochimaru hand by the throat and lifted like a feather on the ground. "Now you die!" - Tobey said grimly. Zmeeglazy gaped and crackled as you heard his jaw out of his mouth, something began to appear. Toby said in surprise:"What kind of trick, die with dignity."'
				'But zmeeglazy not want to die and leave in the hands of Toby empty shell, he literally flew out of his mouth.'
				'You watched in amazement through the headache Toby holding empty zmeeglazogo skin, and the zmeeglazy stands apart. It lasted a second and Orochimaru grabbed you as a feather, jumped out the window from the tenth floor.'

				act 'Scream in panic.':
					cla
					*clr
					! WD: Correct Image path ~ "images/casino/oro.jpg"
					'<center><img src= "images/picbat/orotimaru.jpg"></center>'
					'Seeing the approaching ground, you panicked with the thought that now you die. But zmeeglazy hold you in my arms, landed on his feet, after breaking leg kick asphalt. You are seeing this strange creature in the face, it was cold and focused. Suddenly something crackled and looked down, you saw the legs zmeeglazogo turn into a snake''s tail.'
					'Sitting in steel hands Orochimaru, you literally flew through the streets, winding alleys and flying fences. You flew over the ground with terrific speed, without having to even understand where you are. Very quickly, the city remained behind and swept Orochimaru using his snake tail has the fields and forests. You feel physically as reality collapses behind you. Your pursuer Toby did not let it, tearing reality teleported trying to overtake you.'
					'With a busy person zmeeglazogo started dripping sweat. It hissed:"You too feel. He overtakes us. Remember, if I do not save, you will not save anybody. You''ll be dead soon." Suddenly you hear a thunderous voice "Shinra Tensei" and it was a feeling that you have flown on the wall. You where it was thrown and you rolling on the grass edge of the eye noticing that zmeeglazy also flew from the impact.'

					act 'Raise your head.':
						cla
						*clr
						! WD: Correct Image path ~ "images/casino/pain.jpg"
						'<center><img src= "images/picbat/pain.jpg"></center>'
						'Near you stood a tall, thin man with bright red hair, covered with piercings. Even the figure could be seen that it is not one-eyed Toby. Although hoodie was exactly the same, black with red clouds drawings.'
						'Orochimaru raised his head and hissed, "Payne!" Skinny guy walked slowly towards Orochimaru:"No one can just walk away from Dawn. Now I''m done with your immortal life."'
						'Zmeeglazy opened his mouth, and from there flew sword blades. But even Payne did not blink, the blade before it reached him a few centimeters, shattering into pieces. "That''s all you can Orochimaru? Skedaddle from Toby right in my hands, and before his death show such miserable spell?"'
						'Payne raised his hand in a fist and opened his hand. "CHIBAKU Tensei" - he said and flew out of his hand a small black ball and gently began to soar in the sky. Orochimaru yelled "No!"'
						'You feel how your body felt a little sand from the ground began to rise into the air and fly to the ball. Soon you too was lifted off the ground and pull the black ball. You clung to a tree stump that you are not utyanulo. This black hole realized you this guy with piercings just on my eyes and created a black hole there now we will tighten and grind. Pieces of land began to come off and fly toward the black hole. Trees cracked. Orochimaru with a cry rushed travel along the ground to you. He grabbed you and then you both get off the ground and carried to the black ball.'

						act 'Look at Orochimaru.':
							cla
							*clr
							! WD: Correct Image path ~ "images/casino/oro.jpg"
							'<center><img src= "images/picbat/orotimaru.jpg"></center>'
							'Orochimaru, holding your hands, grinning. But you feel his fear. You quickly flew into a black hole, located high in the sky and realized that once there, you with zmeeglazym perish.'
							'Orochimaru hissed:"There is one last hope. I open my mouth, and you stick your hand in there, I have a scroll inside, you open it up and put her hand. Obey or we both die."'
							'Zmeeglazy opened her mouth so that there is not that hand, and you could get through a whole. You fastidiously hand shoved in his mouth and essentially felt there scroll. Removing it you quickly scroll unfurled, freaked characters.'
							'Looking up you realized that you have a few seconds before getting in touch with the black hole.'

							act 'Attach a hand to press on the scroll.':
								cla
								*clr
								cursed = 1
								music_on = 0
								! WD: Correct Image path ~ "images/casino/oro.jpg"
								'<center><img src= "images/picbat/orotimaru.jpg"></center>'
								'You put a hand to scroll and scroll lightning burned. You embraced the same strange feeling that when approaching Toby. There was a feeling that reality has broken, but this time the center of this hole were you. The sensation you tore the fact that Orochimaru his teeth to you in the neck. You pierced stunning pain. Suddenly zmeeglazy let you go, and with all his strength hurled towards the ground away from the black hole. You understand that it is all spent force trying to save you from a devastating spell Payne.'
								'You flew down against the force of the black hole, while watching the black hole reached Orochimaru and his body began to break apart. But Orochimaru smiled despite his terrible, deadly pain and agony of his dying body. Finally there was only from zmeeglazogo bloody mess that swallowed the hole. Momentum imparted to you last effort Orochimaru ended and you began again to draw a black hole. You flew to her side feeling as you gradually get out of reality, a little bit more and you will be far from this place.'
								'But a black hole is close, you felt the impact of it, trying to tear you apart.'

								act 'Close your eyes':gt 'tuman'
							end
						end
					end
				end
			end
		end
	end
end

--- mqroom ---------------------------------
# authors1
clr
minut += 10
gs 'stat'
'<center><img src="images/casino/avt.jpg"></center>'
'Rules of the game are very simple:toss a coin 10 rubles and pull lever. jackpot 100,000 rubles.'


act 'Pull the lever':
	if money >= 10:
		clr
		money -= 10
		x_10 = rand(1, 1000)

		if x_10 = 1000:
			money += 100000
			msg 'You won the jackpot! Congratulations!'
		elseif x_10 < 1000 and x_10 >= 850:
			money += 20
			msg 'Congratulations, you have won 20 rubles'
		elseif x_10 >= 500 and x_10 < 850:
			money += 10
			msg 'congratulations, you have won 10 rubles'
		elseif x_10 < 500:
			minut += 10
			msg 'Alas you lose, try again'
		end

		gt 'authors1'
	else
		msg 'And how are you going to play without money? Come back when you find the necessary amount'
		gt 'authors1'
	end
end

act 'Back to the hall':gt 'igravt'

--- authors1 ---------------------------------
# authors2
clr
minut += 10
gs 'stat'
'<center><img src="images/casino/avt.jpg"></center>'
'Rules of the game are very simple:toss a coin 100 rubles and pull lever. Jackpot million rubles.'

act 'Pull the lever':
	if money >= 100:
		clr
		money -= 100
		x_10 = rand(1, 1000)

		if x_10 = 1000:
			money += 1000000
			msg 'You won the jackpot! Congratulations!'
		elseif x_10<1000 and x_10 > 850:
			money += 200
			msg 'Congratulations, you have won 200 rubles'
		elseif x_10 > 500 and x_10 <= 850:
			money += 100
			msg 'congratulations, you have won 100 rubles'
		elseif x_10 <= 500:
			msg 'Alas you lose, try again'
		end

		gt 'authors2'
	else
		msg 'And how are you going to play without money? Come back when you find the necessary amount'
		gt 'authors2'
	end
end

act 'Back to the hall':gt 'igravt'

--- authors2 ---------------------------------
# authors3
clr
minut += 10
gs 'stat'
'<center><img src="images/casino/avt.jpg"></center>'
'Rules of the game are very simple:toss a coin 1000 rubles and pull lever. jackpot 10,000,000 rubles.'


act 'Pull the lever':
	if money >= 1000:
		clr
		money -= 1000
		x_10 = rand(1, 1000)

		if x_10 = 1000:
			money += 10000000
			msg 'You won the jackpot! Congratulations!'
		elseif x_10 < 1000 and x_10 >= 990:
			money += 2000
			msg 'Congratulations, you have won 2000 rubles'
		elseif x_10 >= 850 and x_10 < 990:
			money += 1000
			msg 'congratulations, you have won 1,000 rubles'
		elseif x_10 < 850:
			msg 'Alas you lose, try again'
		end

		gt 'authors3'
	else
		msg 'And how are you going to play without money? Come back when you find the necessary amount'
		gt 'authors3'
	end
end

act 'Back to the hall':gt 'igravt'

--- authors3 ---------------------------------
# amrul
clr
minut += 5
kh = 0
chnch = 0
mb = 0
du = 0
series = 0
chi = 100
x_rul = 100
gs 'stat'
'<center><img src="images/casino/amrul.jpg"></center>'
'You leaned over the table.'

act 'Make a bet':
	st_1 = input 'Enter the amount'

	if money < st_1:
		msg 'You have enough money'
		gt 'roulette'
	elseif st_1 < 0:
		msg 'Wrong, try again'
		gt 'amrul'
	elseif st_1 > 1000:
		msg 'The maximum rate of 1000 rubles'
		gt 'amrul'
	end

	money -= st_1
	gt 'rate'
end

act 'Move away from the table':gt 'roulette'

--- amrul ---------------------------------
# saloon
act 'Back in the hall':gt 'hall'

--- saloon ---------------------------------
# bldzh
clr
minut += 10
gs 'stat'
'<right><img src="images/casino/stolbd.jpg"></right>'
'You are standing at a table game Blackjack'

act 'Approach to the dealer':gt 'croupier1'
act 'Sit at the table':gt 'igrkart1'
act 'Move away from the table':gt 'cards'

--- bldzh ---------------------------------
# hotel
clr
minut += 5
nom_o[1] = 100
nom_o[2] = 1000
nom_o[3] = 10000
nom_o[4] = 100000
gs 'stat'
'<right><img src="images/casino/metrd.jpg"></right>'

if tobiQW < 2000:'In the hotel lobby deserted and alone bored girl at the reception.'
if tobiQW >= 2000 and tobiQW < 2100:'In the lobby of the hotel is very crowded. Everywhere swarm comely old men in scanty jacket with patches on the elbows.'

if tobiQW = 2001:
	'you notice, that one of the visitors of the hotel, sitting in a chair, reading a book, which are written squiggles, similar to the ones that scroll.'
	act 'Excuse_Me, to disturb. And in what language it is written?':
		cla
		*clr
		'<right><img src="images/casino/oldman.jpg"></right>'
		'(Do_You) - Excuse_Me, to disturb. And in what language it is written?'
		'(The_Man) - This amiable, Old Japanese language. what? You are good in rare languages?'
		'(Do_You) - not at all, but I have a parchment, in which the characters are written very similar.'
		'(The_Man) - prelyubopytny! You can take a look?'
		'(Do_You) - Well!'
		'(The_Man) - ah yes, right word, it''s me. me, by_the_way, Plato called Aristarkhovich, and you?'
		'(Do_You) - You can simply Igor.'
		'(Plato Aristarkhovich) - Come to my room, if you do not mind.'

		act 'Go with a man':gt 'mqroom'
	end
end

act 'Come to the reception desk':gt 'rack'
act 'To lift':gt 'elevator'
act 'Back in the hall':gt 'hall'

--- hotel ---------------------------------
# igravt
clr
minut += 10
gs 'stat'
'<right><img src="images/casino/zaligravt.jpg"></right>'
'You enter the room and see a lot of slot machines and a bunch of people around them. Heard ringing constantly twitching handles and falling coins.'
'On the left side of the hall is very little availability.'
'Apparently there is less than the required rate of all but small gains.'
'The right of the people less and they bet more.'
'Well, in the back of the room sitting unit.'
'There''s biggest bet required, but the corresponding jackpot - 10 million rubles.'

act 'For machines for 10 rubles':
	minut += 10
	gt 'authors1'
end

act 'For machines for 100 rubles':gt 'authors2'
act 'For machines for 1000 rubles':gt 'authors3'
act 'Back in the hall':gt 'hall'

--- igravt ---------------------------------
# igrkart1
!!by Master Set (blakarchont@gmail.com)
!!HOME GAMES
clr
minut += 5
gs 'stat'

if turn = 0:
	cla
	'<right><img src="images/casino/stavkacw.jpg"></right>'
	' Please give me your bets, gentlemen.'

	act 'Make a bet':
		money -= deal
		turn = 1
		deal = input 'Enter the amount'

		if money < deal:
			msg 'You have enough money'
			gt 'igrkart1'
		elseif deal < 0:
			msg 'Wrong, try again.'
			gt 'igrkart1'
		elseif deal > 1000:
			msg 'The maximum rate of 1000 rubles.'
			gt 'igrkart1'
		end

		gt 'igrkart1'
	end

	act 'Move away from the table':gt 'bldzh'
end

!!the cards are dealt
if turn = 1:
	cla
	'<right><img src="images/casino/cartbd.jpg"></right>'
	' The dealer deals the cards:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$d_card[1] = $number[number] + $suit[suit]
	d_points = points[number]
	suit = rand(1, 4)
	number = rand(1, 13)
	$p_card[1] = $number[number] + $suit[suit]
	p_points = points[number]
	suit = rand(1, 4)
	number = rand(1, 13)
	$p_card[2] = $number[number] + $suit[suit]
	p_points += points[number]

	if p_points = 22:
		p_points = 21
	elseif p_points < 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'

		act 'Enough':
			turn = 3
			gt 'igrkart1'
		end

		act 'Another card':
			turn = 2
			gt 'igrkart1'
		end
	elseif p_points = 21:
		prise = deal * 3
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'BLACK JACK!'

		act 'Pick up the win (<<prise>> rubles)':
			money += prise
			turn = 0
			gt 'igrkart1'
		end
	end
end

!!Additional cards
if turn = 2:
	cla
	'<right><img src="images/casino/cartbde.jpg"></right>'
	'The dealer deals one more card:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$p_card[3] = $number[number] + $suit[suit]
	p_points += points[number]

	if p_points <= 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'

		act 'Enough':
			turn = 3
			gt 'igrkart1'
		end

		act 'Another card':
			turn = 22
			gt 'igrkart1'
		end

	elseif p_points > 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'
		'Bust! You lose.'

		act '...':
			turn = 0
			gt 'igrkart1'
		end
	end
end

if turn = 22:
	cla
	'<right><img src="images/casino/cartbde.jpg"></right>'
	'The dealer deals one more card:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$p_card[4] = $number[number] + $suit[suit]
	p_points += points[number]

	if p_points <= 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'
		'  <<$p_card[4]>>'

		act 'Enough':
			turn = 3
			gt 'igrkart1'
		end

		act 'Another card':
			turn = 222
			gt 'igrkart1'
		end
	elseif p_points > 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'
		'  <<$p_card[4]>>'
		'Bust! You lose.'

		act '...':
			turn = 0
			gt 'igrkart1'
		end
	end
end

if turn = 222:
	cla
	'<right><img src="images/casino/cartbde.jpg"></right>'
	'The dealer deals one more card:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$p_card[5] = $number[number] + $suit[suit]
	p_points += points[number]

	if p_points <= 21:
		'Bank card:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'
		'  <<$p_card[4]>>'
		'  <<$p_card[5]>>'

		act 'Enough':
			turn = 3
			gt 'igrkart1'
		end
	elseif p_points > 21:
		'Map of dealer:'
		'  <<$d_card[1]>>'
		'__________________________'
		'Player Maps:'
		'  <<$p_card[1]>>'
		'  <<$p_card[2]>>'
		'  <<$p_card[3]>>'
		'  <<$p_card[4]>>'
		'  <<$p_card[5]>>'
		'Bust! You lose.'

		act '...':
			turn = 0
			gt 'igrkart1'
		end
	end
end


!!Transoms Bank''s cards
if turn = 3:
	cla
	'<right><img src="images/casino/cartbde.jpg"></right>'
	'Dealer gets cards:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$d_card[2] = $number[number] + $suit[suit]
	d_points += points[number]

	if p_points = 22:
		p_points = 21
	elseif d_points >= 17:
		'Bank cards:'
		'  <<$d_card[1]>>'
		'  <<$d_card[2]>>'
		'Points dealer:<<d_points>>'
		'__________________________'
		'Player Points <<p_points>>'
		'__________________________'

		if d_points > p_points:
			'Casinos won'

			act '...':
				turn = 0
				gt 'igrkart1'
			end
		elseif d_points = p_points:
			'Draw'

			act 'Take a bet':
				money += deal
				turn = 0
				gt 'igrkart1'
			end
		elseif d_points < p_points:
			'Player won'
			prise = deal * 2

			act 'Pick up the win (<<prise>> rubles).':
				money += prise
				turn = 0
				gt 'igrkart1'
			end
		end
	elseif d_points < 17:
		suit = rand(1, 4)
		number = rand(1, 13)
		$d_card[3] = $number[number] + $suit[suit]
		d_points += points[number]

		if d_points <= 21:
			'The dealer''s cards:'
			'  <<$d_card[1]>>'
			'  <<$d_card[2]>>'
			'  <<$d_card[3]>>'
			'Points dealer:<<d_points>>'
			'__________________________'
			'Player Points <<p_points>>'
			'__________________________'

			if d_points > p_points:
				'Casinos won'

				act '...':
					turn = 0
					gt 'igrkart1'
				end
			elseif d_points = p_points:
				'Draw'

				act 'Take a bet':
					money += deal
					turn = 0
					gt 'igrkart1'
				end
			elseif d_points < p_points:
				'Player won'
				prise = deal * 2

				act 'Pick up the win (<<prise>> rubles).':
					money += prise
					turn = 0
					gt 'igrkart1'
				end
			end
		elseif d_points > 21:
			prise = deal * 2
			'The dealer''s cards:'
			'  <<$d_card[1]>>'
			'  <<$d_card[2]>>'
			'  <<$d_card[3]>>'
			'__________________________'
			'Busting!'
			'__________________________'
			'Player won'

			act 'Pick up the win (<<prise>> rubles)':
				money += prise
				turn = 0
				gt 'igrkart1'
			end
		end
	end
end

--- igrkart1 ---------------------------------
# igrkart2
clr
minut += 5
gs 'stat'

if turn1 = 0:
	cla
	'<right><img src="images/casino/stavkacw.jpg"></right>'
	' Please give me your bets, gentlemen.'

	act 'Make a bet':
		money -= deal
		turn1 = 1
		deal = input 'Enter the amount'

		if money < deal:
			msg 'You have enough money'
			gt 'igrkart2'
		elseif deal < 0:
			msg 'Wrong, try again.'
			gt 'igrkart1'
		elseif deal > 1000:
			msg 'The maximum rate of 1000 rubles.'
			gt 'igrkart1'
		end

		gt 'igrkart2'
	end

	act 'Move away from the table':gt 'kazvar'
end

if turn1 = 1:
	cla
	nich = 0
	'<right><img src="images/casino/stavkacw.jpg"></right>'

	act 'Put another draw':
		turn1 = 2
		nich = 1

		if money < deal:
			msg 'You have enough money'
			turn1 = 2
			nich = 0
			gt 'igrkart2'
		else
			money -= deal
		end

		gt 'igrkart2'
	end

	act 'Continue without an additional rate':
		turn1 = 2
		nich = 0
		gt 'igrkart2'
	end
end

if turn1 = 2:
	cla
	'<right><img src="images/casino/cartcw.jpg"></right>'
	' The dealer deals the cards:'
	'...'
	suit = rand(1, 4)
	number = rand(1, 13)
	$di_card[1] = $number[number] + $suit[suit]
	di_points = points[number]
	di_poi = number
	suit = rand(1, 4)
	number = rand(2, 14)
	$pl_card[1] = $number[number] + $suit[suit]
	pl_points = points[number]
	pl_poi = number
	wait 1000
	'Map of dealer:'
	'  <<$di_card[1]>>'

	'__________________________'
	'Player Maps:'

	'  <<$pl_card[1]>>'

	if di_poi > pl_poi:
		' '
		'Casinos won'

		act 'You lost':
			turn1 = 0
			gt 'igrkart2'
		end
	elseif di_poi < pl_poi:
		' '
		'You won'
		act 'You have won (<<2 * deal>> rubles)':
			money += 2 * deal
			turn1 = 0
			gt 'igrkart2'
		end
	elseif di_poi = pl_poi:
		if nich = 1:
			' '
			'You won'

			act 'You have won (<<11 * deal>> rubles)':
				money += 11 * deal
				turn1 = 0
				gt 'igrkart2'
			end
		else
			turn1 = 3
			gt 'igrkart2'
		end
	end
end

if turn1 = 3:
	act 'Continue to play':
		cla

		if money < deal:
			msg 'You have enough money'
			gt 'igrkart2'
		else
			money -= deal
		end

		'<right><img src="images/casino/cartcw.jpg"></right>'
		' The dealer deals the cards:'
		'...'
		suit = rand(1, 4)
		number = rand(1, 13)
		$di_card[2] = $number[number] + $suit[suit]
		di_points = points[number]
		di_poi = number
		suit = rand(1, 4)
		number = rand(2, 14)
		$pl_card[2] = $number[number] + $suit[suit]
		pl_points = points[number]
		pl_poi = number
		'Map of dealer:'
		'  <<$di_card[1]>>'
		'  <<$di_card[2]>>'
		'__________________________'
		'Player Maps:'
		'  <<$pl_card[1]>>'
		'  <<$pl_card[2]>>'

		if di_poi > pl_poi:
			' '
			'Casinos won'

			act 'You lost':
				turn1 = 0
				gt 'igrkart2'
			end
		elseif di_poi < pl_poi:
			' '
			'You won'

			act 'You have won (<<4 * deal>> rubles)':
				money += 4 * deal
				turn1 = 0
				gt 'igrkart2'
			end
		elseif di_poi = pl_poi:
			' '
			'Again draw'

			act 'Pick up (<<3 * deal>> rubles)':
				money += 3 * deal
				turn1 = 0
				gt 'igrkart2'
			end
		end
	end

	act 'Pick up half your bet':
		if deal mod 2 = 1:deal += 1

		money += deal / 2
		gt 'igrkart2'
	end
end

--- igrkart2 ---------------------------------
# kazvar
clr
minut += 10
gs 'stat'

'<right><img src="images/casino/stolcw.jpg"></right>'
'You are standing at the table games in Casino War'

act 'Approach to the dealer':gt 'croupier2'
act 'Sit at the table':gt 'igrkart2'
act 'Move away from the table':gt 'cards'

--- kazvar ---------------------------------
# cards
clr
minut += 10
gs 'stat'
'<right><img src="images/casino/zalcart.jpg"></right>'
'In the hall a lot of free games tables in Blackjack and Casino Wars.'

act 'To the table game Blackjack':gt 'bldzh'
act 'To the table games in Casino War':gt 'kazvar'
act 'Back in the hall':gt 'hall'
!!SYMBOLS
!! ♥
!! ♠
!! ♦
!! ♣
!!deck of cards
$suit[1] = 'peak'
$symbol[1] = '♠'
$suit[2] = 'Clubs'
$symbol[2] = '♣'
$suit[3] = 'worms'
$symbol[3] = '♥'
$suit[4] = 'tambourine'
$symbol[4] = '♦'

$number[1] = 'Ace'
points[1] = 11
$number[2] = 'Deuce'
points[2] = 2
$number[3] = 'Three'
points[3] = 3
$number[4] = 'Four'
points[4] = 4
$number[5] = 'Five'
points[5] = 5
$number[6] = 'Six'
points[6] = 6
$number[7] = 'Seven'
points[7] = 7
$number[8] = 'Eight'
points[8] = 8
$number[9] = 'Nine'
points[9] = 9
$number[10] = 'Ten'
points[10] = 10
$number[11] = 'Jack'
points[11] = 10
$number[12] = 'Lady'
points[12] = 10
$number[13] = 'King'
points[13] = 10
$number[14] = 'Ace'
points[14] = 11

--- cards ---------------------------------
# croupier
clr
minut += 5
gs 'stat'
'<right><img src="images/casino/crup.jpg"></right>'
'- How can I help you?'

act 'Ask rules':
	msg 'The rules are very simple.
	First you choose the amount you want to bet.
	But note that in our casino maximum rate is 1000 rubles.
	Then you choose what to put their money. There are 5 types of bets:
	Color - 1 to 1
	Chet/Odd - 1 to 1
	Small/Large- 1 to 1
	Dozen - 1 to 2
	Series - 1 to 2
	Number - 1 to 36
	Well, then it all depends on your luck.'
	gt 'croupier'
end

act 'Move away from the dealer':gt 'roulette'

--- croupier ---------------------------------
# croupier1
clr
minut += 5
gs 'stat'
'<right><img src="images/casino/crupbd.jpg"></right>'
'- How can I help you?'

act 'Ask rules':
	msg 'Do you know how to play blackjack? Well then listen.
	Goal of the game - to score more points than the dealer, but not more than 21.
	Different cards offer different amounts of points.
	Ace = 11

	Cards with pictures = 10
	The rest of their face value

	(i.e. 9 = 9 8 = 8 etc.)
	After bidding the dealer deals the cards. But note that in our casino maximum rate is 1000 rubles. You two and one currently. Next you can gather additionally card or say enough, then the dealer will begin to gather additionally card itself. So in the end who has the most points he won. Returns 1 to 1.
	That''s all. Enjoy the game'
	gt 'croupier1'
end

act 'Move away from the dealer':gt 'bldzh'

--- croupier1 ---------------------------------
# croupier2
clr
minut += 5
gs 'stat'
'<right><img src="images/casino/crupcw.jpg"></right>'
'- How can I help you?'

act 'Ask rules':
	msg 'The rules are very simple.
	First you choose the amount you wish to wager.
	But note that in our casino maximum rate is 1000 rubles.
	The dealer deals the cards, whose card is more on par and he won. Returns 1 to 1.
	When nobody''s given you a choice:take half of your bet or continue playing (Your bid is automatically doubled). Whose card is more on par and he won. Returns 1 to 1. Draw When you receive a payment for an increase equal to your bet is returned to you and your total bet.
	Also, after the rate you are given the opportunity to bet on a draw. Then, in case of a tie the payment will be 10 to 1.
	Enjoy the game)'
	gt 'croupier2'
end

act 'Move away from the dealer':gt 'kazvar'

--- croupier2 ---------------------------------
# elevator
act 'Back':gt 'hotel'


act 'Go to your room':
	msg 'Excuse_Me, but the elevator is not working'
	gt 'elevator'

!'
	if nomer = 0:
		msg 'You have not paid for this hotel'
		gt 'elevator'
	elseif nomer = 1:
		gt 'number1'
	elseif nomer = 2:
		gt 'number2'
	elseif nomer = 3:
		gt 'number3'
	elseif nomer = 4:
		gt 'number4'
	end
'!
end

--- elevator ---------------------------------

# Maria1
'- How can I help you?'

act 'Move away':gt 'rack'

if nom_1 = 0:
	act 'Ask about plans for the evening':
		cla
		'- What are you doing tonight?'
		'- Meeting with her husband. Anything else?'

		act 'Move away':gt 'rack'
	end

	if tobiQW = 2000:
		act 'Why in the hotel so crowded?':
			cla
			tobiQW = 2001
			'- Why so crowded in the hotel?'
			'- Then stop members of Congress rare languages, as they call themselves quack.'

			act 'Move away':gt 'rack'
		end
	end
end

if nomer = 0:
	*clr

	act 'Stay':
		cla
		'- I would like to stay'
		'- Well, what would you like?'

		act 'Cheap room':
			'- Cheap room'
			nomer = 1
			nom_1 = 1
			gt 'maria1'
		end

		act 'Standard Room':
			'- Standard Room'
			nomer = 2
			nom_1 = 1
			gt 'maria1'
		end

		act 'Suite':
			'- Suite'
			nomer = 3
			nom_1 = 1
			gt 'maria1'
		end

		act 'Presidential Suite':
			'- Presidential Suite'
			nomer = 4
			nom_1 = 1
			gt 'maria1'
		end
	end
end

if nom_1 = 1 and flag = 0:
	cla
	*clr
	sto_nom = nom_o[nomer]
	'- You shoot a room for one night.'
	'- It will cost <<sto_nom>>'

	act 'Pay':
		if sto_nom > money:
			msg 'Not enough money'
			srokarend = 0
			nomer = 0
			nom_1 = 0
			gt 'maria1'
		end

		cla
		money -= sto_nom
		flag = 1
		nom_1 = 0
		nom_nom = rand(1, 1000)
		'Thank you for using our services'
		'Your room <<nom_nom>>'

		act 'Goodbye':gt 'rack'
	end

	act 'Change Your Mind':
		nomer = 0
		nom_1 = 0
		gt 'maria1'
	end
end

if nom_1 = 0:
	act 'Move away':gt 'rack'
end

--- Maria1 ---------------------------------
# headwaiter
clr
minut += 5
gs 'stat'
'<right><img src="images/casino/metrd.jpg"></right>'
'You want something from me?'

act 'Move away':gt 'hall'

--- headwaiter ---------------------------------
# number1
'bedroom'
'toilet-shower'

--- number1 ---------------------------------
# number2
'lounge'
'bedroom'
'toilet-shower'

--- number2 ---------------------------------
# number3
'lounge'
'bathroom'
'bar'
'bedroom'

--- number3 ---------------------------------
# number4
'pool'
'jacuzzi'
'bar'
'bedroom'
'bathroom'
'lounge'

--- number4 ---------------------------------
# result
cla
clr
minut += 5
gs 'stat'
x_rul = 100
x_rul = rand(0, 36)

if x_rul = 0:
	$color = ' '
else
	if x_rul = 1 or x_rul = 3 or x_rul = 5 or x_rul = 7 or x_rul = 9 or x_rul = 12 or x_rul = 14 or x_rul = 16 or x_rul = 18 or x_rul = 19 or x_rul = 21 or x_rul = 23 or x_rul = 25 or x_rul = 27 or x_rul = 30 or x_rul = 32 or x_rul = 34 or x_rul = 36:
		$color = 'red'
	else
		$color = 'black'
	end
end

'<right><img src="images/casino/resul.jpg"></right>'
''
'The ball stopped at <<x_rul>> <<$color>>'

if kh ! 0:
	if kh = 1:
		if x_rul = 1 or x_rul = 3 or x_rul = 5 or x_rul = 7 or x_rul = 9 or x_rul = 12 or x_rul = 14 or x_rul = 16 or x_rul = 18 or x_rul = 19 or x_rul = 21 or x_rul = 23 or x_rul = 25 or x_rul = 27 or x_rul = 30 or x_rul = 32 or x_rul = 34 or x_rul = 36:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	elseif kh = 2:
		if x_rul = 2 or x_rul = 4 or x_rul = 6 or x_rul = 8 or x_rul = 10 or x_rul = 11 or x_rul = 13 or x_rul = 15 or x_rul = 17 or x_rul = 20 or x_rul = 22 or x_rul = 24 or x_rul = 26 or x_rul = 28 or x_rul = 29 or x_rul = 31 or x_rul = 33 or x_rul = 35:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	end

elseif chnch ! 0:
	if chnch = 1:
		chnch = 0

		if x_rul mod 2 = 0:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif chnch = 2:
		chnch = 0

		if x_rul mod 2 = 1:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	end

elseif mb ! 0:
	if mb = 1:
		mb = 0
		if x_rul > 0 and x_rul < 19:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif mb = 2:
		mb = 0
		if x_rul > 18 and x_rul < 37:
			act 'You have won <<2 * st_1>>':
				money += 2 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	end

elseif du ! 0:
	if du = 1:
		du = 0

		if x_rul > 0 and x_rul < 13:
			act 'You have won <<3 * st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif du = 2:
		du = 0

		if x_rul > 12 and x_rul < 25:
			act 'You have won <<3 * st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif du = 3:
		du = 0
		if x_rul > 24 and x_rul < 37:
			act 'You have won <<3 * st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	end

elseif series ! 0:
	if series = 1:
		series = 0

		if x_rul = 1 or x_rul = 4 or x_rul = 7 or x_rul = 10 or x_rul = 13 or x_rul = 16 or x_rul = 19 or x_rul = 22 or x_rul = 25 or x_rul = 28 or x_rul = 31 or x_rul = 34:
			act 'You have won <<3*st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif series = 2:
		series = 0

		if x_rul = 2 or x_rul = 3 or x_rul = 8 or x_rul = 11 or x_rul = 14 or x_rul = 17 or x_rul = 20 or x_rul = 23 or x_rul = 26 or x_rul = 29 or x_rul = 32 or x_rul = 35:
			act 'You have won <<3*st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end

	elseif series = 3:
		series = 0

		if x_rul = 3 or x_rul = 4 or x_rul = 9 or x_rul = 12 or x_rul = 15 or x_rul = 18 or x_rul = 21 or x_rul = 24 or x_rul = 27 or x_rul = 30 or x_rul = 33 or x_rul = 36:
			act 'You have won <<3*st_1>>':
				money += 3 * st_1
				gt 'amrul'
			end
		else
			act 'You lost':gt 'amrul'
		end
	end


elseif chi ! 100:
	if chi = x_rul:
		act 'You have won <<37 * st_1>>':
			money += 37 * st_1
			gt 'amrul'
		end
	else
		act 'You lost':gt 'amrul'
	end
end

--- result ---------------------------------
# roulette
clr
minut += 10
gs 'stat'
'<right><img src="images/casino/ruletka.jpg"></right>'
'You came to the table with American roulette.'

act 'Approach to the dealer':gt 'croupier'
act 'Play':gt 'amrul'
act 'Back in the hall':gt 'hall'

--- roulette ---------------------------------
# rate
clr
cla
minut += 5
kh = 0
chnch = 0
mb = 0
du = 0
series = 0
chi = 100
gs 'stat'
'<right><img src="images/casino/stavkaru.jpg"></right>'
'What will be put?'

act 'Red / Black':
	act 'Red':
		kh = 1
		gt 'result'

	end

	act 'Black':
		kh = 2
		gt 'result'
	end
end

act 'Even / Odd':
	act 'Even':
		chnch = 1
		gt 'result'
	end

	act 'Odd':
		chnch = 2
		gt 'result'
	end
end

act 'Small / Large':
	act 'Small: 1-18':
		mb = 1
		gt 'result'
	end

	act 'Large: 19-36':
		mb = 2
		gt 'result'
	end
end

act 'Dozen':
	act 'first dozen: 1-12':
		du = 1
		gt 'result'
	end

	act 'Two Dozen:13-24':
		du = 2
		gt 'result'
	end

	act 'third dozen:25-36':
		du = 3
		gt 'result'
	end
end

act 'Series':
	act 'First row: 1, 4, 7, 10, 13, 16, 19, 22, 25, 28, 31, 34':
		series = 1
		gt 'result'
	end

	act 'Second row: 2, 5, 8, 11, 14, 17, 20, 23, 26, 29, 32, 35':
		series = 2
		gt 'result'
	end

	act 'Third row: 3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36':
		series = 3
		gt 'result'
	end
end

act 'Number':
	chi = input 'Enter a number from 0-36'

	if chi < 0 and chi > 36:
		msg 'Said that it was only from 0 to 36'
		gt 'rate'
	end

	gt 'result'
end

act 'Nothing':gt 'amrul'

--- rate ---------------------------------
# rack
'You are standing at the front reception and you smiling young girl behind the counter'

act 'See the description of the rooms':
	cla
	*clr
	'The choice available to 4 types of rooms:'
	'1. Budget Room'
	'2. Standard rooms'
	'3. Suite'
	'4. Presidential Suite'

	act 'Finish reading':gt 'rack'
end

act 'Talk to a girl at the reception':gt 'Maria1'
act 'Move away from the rack':gt 'hotel'

--- rack ---------------------------------
# theater
act 'Back in the hall':gt 'hall'

--- theater ---------------------------------
# Hall
clr
*clr
minut += 5
gs 'stat'
'<right><img src="images/casino/zdcasino.jpg"></right>'
'You entered the foyer of the building of a giant casino.'
'You can go:'

act 'Get out of the casino':gt 'casino'

picrand = rand(1, 3)

'<right><img src="images/casino/hcasino<<picrand>>.jpg"></right>'
'By <a href="exec:gt ''headwaiter''">the head waiter</a>'
'In the Hall <a href="exec:gt ''igravt''">slot machines</a>'
'In room games <a href="exec:gt ''roulette''">Roulette</a>'
'In room games <a href="exec:gt ''cards''">Cards</a>'
!!'In <a href="exec:gt ''restaurant''">restaurant</a>'
!!'In <a href="exec:gt ''saloon''">Bar</a>'
!!'In <a href="exec:gt ''theater''">Theatre</a>'
'K <a href="exec:gt ''hotel''">Hotel</a>'

--- Hall ---------------------------------

# $menu_skills
dynamic $objskills

--- $menu_skills ---------------------------------

# $menu_descrip
dynamic $objdescrip

--- $menu_descrip ---------------------------------

# $menu_statistika
dynamic $objstatistika

--- $menu_statistika ---------------------------------

# $menu_mobila
dynamic $objmobila

--- $menu_mobila ---------------------------------

# $menu_magic
dynamic $objmagic

--- $menu_magic ---------------------------------

# $menu_face
view FUNC('$face_image')

--- $menu_face ---------------------------------

# $menu_body
dynamic $objbody

--- $menu_body ---------------------------------

# $menu_clothes
clr
if $clothingworntype = 'nude':
	view 'images/clothes/nude.jpg'
	pl 'You´re not dressed.'
elseif cloth_vid = 1:
	view 'images/etogame/bimboView.jpg'
	pl 'You are dressed like a bimbo.'
else
	view FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
	pl 'You are wearing ' + FUNC('$clothing_name', $clothingworntype, clothingwornnumber) + '.'

	if $clothingworntype ! 'vatnik' and $clothingworntype ! 'sforma' and $clothingworntype ! 'ero':
		$RESULT = '(strength '
		dynamic '$RESULT += <<$clothingworntype>>H[<<clothingwornnumber>>]'
		if $clothingworntype ! 'yoga' and $clothingworntype ! 'sarafan':
			$RESULT += ', hip size '
			dynamic '$RESULT += <<$clothingworntype>>B[<<clothingwornnumber>>]'
		end
		$RESULT += ')'
		'<<$RESULT>>'
	end
end

--- $menu_clothes ---------------------------------

# $menu_tattoos
dynamic $objtattoos

--- $menu_tattoos ---------------------------------

# $menu_pirs
dynamic $objpirsing

--- $menu_pirs ---------------------------------

# $menu_obnovit
gs 'stat'

--- $menu_obnovit ---------------------------------

# $menu_bloknot
dynamic $objbloknot

--- $menu_bloknot ---------------------------------

# $menu_avariya
dynamic $objavariya

--- $menu_avariya ---------------------------------

# $menu_addoldmenu
dynamic $objoldmenu

--- $menu_addoldmenu ---------------------------------

# $menu_autosave
dynamic $objautosave

--- $menu_autosave ---------------------------------

# $menu_automatica
gs 'automatics'
dynamic $automatica

--- $menu_automatica ---------------------------------

# $menu_cheat
dynamic $objcheat_menu

--- $menu_cheat ---------------------------------

# beg
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	razdtumbler = 0
	'<center><img src="images/etogame/fit1.jpg"></center>'
	'You are stretching and warming up before your practice. From where you are you can see your coach, Ygor Y., coaching other athletes.'

	act 'Section races':
		cla
		*clr
		minut += 120
		speed += rand(1, 3)
		manna -= 5
		fat -= 5
		sweat += 3
		beg += rand(2, 5)
		'<center><img src="images/etogame/fit5.jpg"></center>'
		'You ran around the stadium practicing the skill of running and developing speed.'

		act 'Leave':gt 'fit', 'razd'
	end
end

if begsec > 0:
	act 'Go to coaching':
		cla
		' Igor Y. in his coaching. You are interested in your success at it.'

		if beg < 50:
			'You have to train, you have not even the third digit is not pulling in the main race and athleticism dyhalka. More importantly what would not be overweight, but diets undermine physical shape, so the coach recommends to use the sauna to dry.'

			act 'Leave':gt 'beg', 'start'
		elseif beg >= 50 and razradbegEG = 0:
			'You''re doing fine, really well done, you can have a very good sporting future. May even become European champion. But remember, the key to victory, dyhalka, athleticism and an ounce.'

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

--- beg ---------------------------------
# beg1
if $ARGS[0] = 'start':
	cla
	*clr
	clr
	gs 'stat'
	minut += 60
	kolsorev += 1
	begmon = month

	if razradbeg = 0:
		'You write in a group beginners.'

		act 'Exit on the treadmill':xgt 'beg1', 'br'
	elseif razradbeg = 1:
		'You write in a group treterazryadnikov.'

		act 'Exit on the treadmill':xgt 'beg1', '3'
	elseif razradbeg = 2:
		'You recorded in the second group of bits. City Championship.'

		act 'Exit on the treadmill':xgt 'beg1', '2'
	elseif razradbeg = 3:
		'You recorded in the first group of bits. Championship field.'

		act 'Exit on the treadmill':xgt 'beg1', '1'
	elseif razradbeg = 4:
		'You write in the CCM group. Championship region.'

		act 'Exit on the treadmill':xgt 'beg1', 'kms'
	elseif razradbeg = 5:
		'You write in the group Masters of Sports. Russian Championship.'

		act 'Exit on the treadmill':xgt 'beg1', 'ross'
	elseif razradbeg >= 6 and razradbeg < 16:
		'You write in the group International Master of Sports. Qualifying competition for access to the European Championship.'

		act 'Exit on the treadmill':xgt 'beg1', 'kval'
	elseif razradbeg = 16:
		if razradbegK < 8:
			cla
			razradbegK = 0
			razradbeg = 6
			'You have not been qualified for the European Championship.'

			act 'Leave':gt 'fit', 'razd'
		elseif razradbegK >= 8:
			cla
			razradbegK = 0
			razradbeg = 6
			'You write for the European Championship.'

			act 'Exit on the treadmill':xgt 'beg1', 'evro'
		end
	end
end

if $ARGS[0] = 'br':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = salo + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 10:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 10 and begresult < 20:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 20 and begresult < 30:'You fought hard, but only managed to take 6th place.'
	if begresult >= 30 and begresult < 40:'You fought hard, but only managed to take 5th place.'
	if begresult >= 40 and begresult < 50:'You fought hard, but only managed to take 4th place.'
	if begresult >= 50 and begresult < 60:bronzebeg += 1 & money += 100 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 100 rubles'
	if begresult >= 60 and begresult < 70:silverbeg += 1 & money += 500 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 500 rubles'
	if begresult >= 70:razradbeg = 1 & goldbeg += 1 & money += 1000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 1, 000 rubles and third sports category on the run.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = '3':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = salo + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 70:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 70 and begresult < 80:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 80 and begresult < 90:'You fought hard, but only managed to take 6th place.'
	if begresult >= 90 and begresult < 100:'You fought hard, but only managed to take 5th place.'
	if begresult >= 100 and begresult < 110:'You fought hard, but only managed to take 4th place.'
	if begresult >= 110 and begresult < 120:bronzebeg += 1 & money += 500 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 500 rubles'
	if begresult >= 120 and begresult < 130:silverbeg += 1 & money += 1000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 1, 000 rubles'
	if begresult >= 130:razradbeg = 2 & goldbeg += 1 & money += 2000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 2, 000 rubles and 2nd sports category on the run.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = '2':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = salo + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 130:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 130 and begresult < 140:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 140 and begresult < 150:'You fought hard, but only managed to take 6th place.'
	if begresult >= 150 and begresult < 160:'You fought hard, but only managed to take 5th place.'
	if begresult >= 160 and begresult < 170:'You fought hard, but only managed to take 4th place.'
	if begresult >= 170 and begresult < 180:bronzebeg += 1 & money += 1000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 1, 000 rubles'
	if begresult >= 180 and begresult < 190:silverbeg += 1 & money += 2000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 2, 000 rubles'
	if begresult >= 200:razradbeg = 3 & goldbeg += 1 & money += 3000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 3000 rubles and 1st sports category on the run. You become the champion of the city on the run.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = '1':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = salo + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 200:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 200 and begresult < 210:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 210 and begresult < 220:'You fought hard, but only managed to take 6th place.'
	if begresult >= 230 and begresult < 240:'You fought hard, but only managed to take 5th place.'
	if begresult >= 240 and begresult < 250:'You fought hard, but only managed to take 4th place.'
	if begresult >= 250 and begresult < 260:bronzebeg += 1 & money += 2000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 2, 000 rubles'
	if begresult >= 260 and begresult < 270:silverbeg += 1 & money += 3000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 3, 000 rubles'
	if begresult >= 270:razradbeg = 4 & goldbeg += 1 & money += 4000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 4000 rubles and the title of the CCM on the run. You become a champion of the region.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = 'kms':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = salo + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 270:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 270 and begresult < 280:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 280 and begresult < 290:'You fought hard, but only managed to take 6th place.'
	if begresult >= 290 and begresult < 300:'You fought hard, but only managed to take 5th place.'
	if begresult >= 300 and begresult < 310:'You fought hard, but only managed to take 4th place.'
	if begresult >= 310 and begresult < 320:bronzebeg += 1 & money += 3000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 3, 000 rubles'
	if begresult >= 320 and begresult < 330:silverbeg += 1 & money += 4000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 4, 000 rubles'
	if begresult >= 330:razradbeg = 5 & goldbeg += 1 & money += 5000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 5000 rubles and the title of Master of Sports in the run. You become a champion of the region.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = 'ross':
	cla
	beg += 1
	fat -= 10
	begplus = beg + speed + vital + rand(1, 20)
	begminus = (salo * 2) + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 330:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 330 and begresult < 340:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 340 and begresult < 350:'You fought hard, but only managed to take 6th place.'
	if begresult >= 350 and begresult < 360:'You fought hard, but only managed to take 5th place.'
	if begresult >= 360 and begresult < 370:'You fought hard, but only managed to take 4th place.'
	if begresult >= 370 and begresult < 380:bronzebeg += 1 & money += 4000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 4, 000 rubles'
	if begresult >= 380 and begresult < 390:silverbeg += 1 & money += 5000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 5, 000 rubles'
	if begresult >= 390:razradbeg = 6 & goldbeg += 1 & money += 6000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 6000 rubles and the title of International Master of Sports on the run. You become the champion of Russia.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = 'kval':
	cla
	beg += 1
	fat -= 10
	razradbeg += 1
	begplus = beg + speed + vital + rand(1, 20)
	begminus = (salo * 3) + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 450:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 450 and begresult < 500:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 500 and begresult < 550:'You fought hard, but only managed to take 6th place.'
	if begresult >= 550 and begresult < 600:'You fought hard, but only managed to take 5th place.'
	if begresult >= 600 and begresult < 650:'You fought hard, but only managed to take 4th place.'
	if begresult >= 650 and begresult < 700:razradbegK += 1 & bronzebeg += 1 & money += 5000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 5, 000 rubles'
	if begresult >= 700 and begresult < 800:razradbegK += 1 & silverbeg += 1 & money += 10000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 10, 000 rubles'
	if begresult >= 800:razradbegK += 1 & goldbeg += 1 & money += 15000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 15 thousand rubles.'

	act 'Leave':gt 'down'
end

if $ARGS[0] = 'evro':
	cla
	beg += 1
	fat -= 10
	razradbeg += 1
	begplus = beg + speed + vital + rand(1, 20)
	begminus = (salo * 4) + rand(1, 20)
	begresult = begplus - begminus
	'<center><img src="images/etogame/begsor.jpg"></center>'
	'Women''s 400 meters race. You change clothes and go out on the treadmill. Get up at the start. Distributed starting shot.'

	if begresult <= 0:'You barely managed to reach the finish line, what place is really there, of course you are the last.'
	if begresult > 0 and begresult < 450:'You are not bad ran for dilettante course, as ranked last 8th place.'
	if begresult >= 450 and begresult < 550:'You fought hard, but managed to take only 7 penultimate place.'
	if begresult >= 700 and begresult < 800:'You fought hard, but only managed to take 6th place.'
	if begresult >= 800 and begresult < 1000:'You fought hard, but only managed to take 5th place.'
	if begresult >= 1000 and begresult < 1300:'You fought hard, but only managed to take 4th place.'
	if begresult >= 1300 and begresult < 1800:razradbegEB += 1 & money += 10000 & 'You fought hard and managed to take 3rd place prize. You get a bronze medal and a prize of 10 thousand rubles'
	if begresult >= 1800 and begresult < 2500:razradbegES += 1 & money += 15000 & 'You fought hard and managed to take the 2nd place prize. You get a silver medal and a prize of 15, 000 rubles'
	if begresult >= 2500:razradbegEG += 1 & money += 20000 & 'You fought hard and managed to take 1st place. You get a gold medal, a prize of 20 thousand rubles. You are the champion of Europe.'

	act 'Leave':gt 'down'
end

--- beg1 ---------------------------------
# dinam
$taxi = {
	cla
	*clr
	minut += 15

	if workDisk = 3 and konvert = 1:
		badrand = rand(0, 100)

		if badrand >= 98:konvert = 0
	end

	if money >= 250:
		money -= 250
		gt '<<$loc>>'
	elseif money < 250:
		'<center><img src="images/picV/car.jpg"></center>'
		bj += 1
		guy += 1
		swallow += 1
		cumlip += 1
		dynamic $venerasiak
		'You have no money to pay the taxi driver that. He drove to somehow garages and taking out a member of his pants, you said "No money - then practiced."'
		'You are a taxi driver leaned over his fly and took his penis in her mouth. After a few minutes of mouth taxi driver is dead in your mouth and you were forced to swallow his cum.'

		act 'Leave':gt $loc
	end
}

--- dinam ---------------------------------
# husb

if $ARGS[0] = 'start':
	clr
	gs 'stat'

	if week < 6:
		if hour > 22 or hour < 7:'
			Your husband <<$husName>> lying in bed opens his eyes. "What do you want? Night already, go to sleep."'
		elseif hour = 7:
			'<<$husName>> sitting at the kitchen table.'
		elseif hour = 17:
			'<<$husName>> sitting at the kitchen table.'
		elseif hour > 17 and hour <= 22:
			'<<$husName>> sitting on a couch and watching television.'
		end
	else
		if hour > 22 or hour < 7:
			'Your husband <<$husName>> lying in bed opens his eyes. "What do you want? Night already, go to sleep."'
		elseif hour = 7:
			'<<$husName>> sitting at the kitchen table.'
		elseif hour > 7 and hour < 17:
			'<<$husName>> sitting on the couch and watching TV.'
		elseif hour = 17:
			'<<$husName>> sitting at the kitchen table.'
		elseif hour > 17 and hour <= 22:
			'<<$husName>> sitting on the couch and watching TV.'
		end
	end

	act 'Leave':gt $loc, $metka

	if husbandsexday < 4:
		act 'Sex with my husband.':gt 'husbsex', 'room'
	end
end

--- husb ---------------------------------
# husbSex
if $ARGS[0] = 'room':
	clr
	minut += 60
	$nameV = $husName
	dick = husDick
	silavag = silavagH
	husbandsexday += 1
	suprdolg += 1
	sexrand = rand(0, 3)
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Bedroom</font></b></center>'

	if rembedr = 0:'<center><img src="images/etogame/bedr.jpg"></center>'
	if rembedr = 1:'<center><img src="images/etogame/bedr2.jpg"></center>'

	'You went with her husband in the bedroom.'
	'<<$husName>> grabs you and rudely pushes you to your starting passionately kiss you and try to steal your clothes.'

	'Finally <<$husName>> won in an unequal battle with your bra straps and you section.'

	if husbdolg = 0:
		cla
		*clr
		sexrand = 4
		husbdolg = 1
		'<center><img src="images/img/hasb/d0.jpg"></center>'
		'Only <<$husName>> climbed on you going to get in, someone stole it from you, and you will see two men in the room. One stood by the bed holding your husband''s hair, the second slightly to the side with a gun in his hand.'
		'"What a moron to pay you?" he asked what kept her husband.'
		'"I said I would do anything, I have no money now, but a month later I would do anything, " replied <<$husName>>.'
		'"This had to think about when you sit down at the table, and we need the money now, " continued the bandit.'
		'"But where I''ll take them now, face or what?" pleaded <<$husName>>.'
		'"Do not give birth to himself, we now have them in all your swirls look for holes, and you have 100, 000, " said the bandit.'

		if harakHusb < 2:
			'"Do not touch her, I''ll bring you all, tomorrow everything will be back" said <<$husName>>.'
			'"Come again tomorrow, but tomorrow and not touch, and look for today, but beautiful, open your mouth, but on wider-that would be just two instead of" neigh bandit.'
		elseif harakHusb = 2:
			'"Not the boys, well, for it is not a sin and the debt write off, look what Kral." said <<$husName>>.'
			if vnesh < 15:'"Oh nah, what stole, she only wash the floors in a public toilet" replied the bandit.'
			if vnesh >= 15 and vnesh < 30:'"Well, never mind such popolzovavshis possible, but at a discount does not pull" replied the bandit.'
			if vnesh > 30:'"Yes, a good chick, but forget about the discount, put that payment for our costs, " laughed a bandit.'
		end

		if vnesh >= 15:'"And you have a good little wife, now we will try it and probably will take away with you let your favor is done, as well as run for refund, unless of course want to go back" bandit laughed.'

		if money+stolmoney+karta >= 100000:
			act 'Offer money':
				cla

				if money >= 100000 and husbdolg = 1:money -= 100000 & husbdolg = 2
				if money + stolmoney >= 100000 and husbdolg = 1:money += stolmoney - 100000 & husbdolg = 2 & stolmoney = 0
				if money + stolmoney + karta >= 100000 and husbdolg = 1:money += stolmoney + karta - 100000 & husbdolg = 2 & stolmoney = 0 & karta = 0

				'"I have money, I shall repay the debt" you said.'
				'"Good for you, but for the cost will still have to pay, " said the bandit grinning.'

				act 'Open mouth':gt 'husbSex', 'dolg'
			end
		end

		act 'Open mouth':gt 'husbSex', 'dolg'
	end

	if sexrand = 0:
		'"<<$name>>, pine I huytsa juicy."'

		act 'Give blowjob':
			cla
			husband += 1
			gt 'husbsex', 'minet'
		end

		act 'I do not want to let another':husband -= 1 & gt 'husbsex', 'variant'
	elseif sexrand = 1:
		'"<<$name>>, cup your ass."'

		act 'Anal':
			cla
			husband += 2
			gt 'husbsex', 'anal'
		end

		act 'Oh nafig, come on another':husband -= 1 & gt 'husbsex', 'variant'
	elseif sexrand = 2:
		'"Lie down and spread your <<$name>> Lyashko."'

		act 'Spread her legs ':gt 'husbsex', 'miss'
		act 'I do not want to let another':husband -= 1 & gt 'husbsex', 'variant'
	elseif sexrand = 3:
		'"Arise <<$name>> crustaceans."'

		act 'Doggy-Style':gt 'husbsex', 'dog'
		act 'I do not want to let another':husband -= 1 & gt 'husbsex', 'variant'
	end
end

if $ARGS[0] = 'dolg':
	cla
	*clr
	minut += 30
	guy += 2
	sex += 1
	anal += 1
	bj += 1
	'<center><img src="images/img/hasb/d1.jpg"></center>'
	'Bandits got their members and tried to push you in the mouth both at once, you tried to open his mouth as wide as possible, but the second term so really not fit, you end up with spit on the case and began to suck them one by one. Soon they got tired and hurl you to bed, she began to talk to who you first shove.'

	act 'Further':
		cla
		*clr
		'<center><img src="images/img/hasb/d2.jpg"></center>'
		'They began to twirl you all they want, each several times pereprobaval all your holes. Sometime you glanced at her husband.'

		if harakHusb = 0 and izvratH = 0:'He huddled in the corner and cried quietly, not looking in your direction.'
		if harakHusb = 0 and izvratH = 1:'He huddled in the corner and quietly wept ukratkoy looking in your direction, it was evident that he was very excited.'
		if harakHusb = 1 and izvratH = 0:'He stood to the side, turned to the wall and did not look at you.'
		if harakHusb = 1 and izvratH = 1:'He stood aside and watched you, it was evident that he was very excited.'
		if harakHusb = 2 and izvratH = 0:'He stood to the side and not looking at you loud swearing, cursing that card, then himself, then calling you horny slut.'

		if harakHusb = 2 and izvratH = 1:
			cla
			*clr
			picrand = 18
			'<center><img src="images/img/hasb/d2.jpg"></center>'
			'They began to twirl you all they want, each several times pereprobaval all your holes. Sometime you glanced at her husband.'
			'He stood aside and watched you masturbate currently a member. In the end, he could not resist and went to bed, as well, you want to, but it''s my bitch and I''ll fuck her too. The bandits did not object.'
			act 'Further':gt 'paysex', 'var'
		end


		act 'Finish':gt 'husbSex', 'dolgend'
	end
end

if $ARGS[0] = 'dolgend':
	cla
	*clr
	cumpussy = 0
	cumbelly = 0
	cumass = 0
	cumanus = 0
	cumlip = 0
	cumface = 0
	cumanus = 0
	gs 'stat'
	'<center><img src="images/img/hasb/d3.jpg"></center>'
	'When it was over, they took you to the bathroom and ordered to put himself in order, then led into the bedroom.'

	if vnesh >= 15 and husbdolg = 1:
		cla
		husbdolg = 2
		workDolg += 100000
		'"Well, babe, we''re gone c debts husband kind work" said one grinning.'

		act 'Go':
			cla
			leghair = -5
			lobok = -5
			sweat = -3
			hapri = 1
			mop = 3
			'You have come to the sauna. Bandits have been dragged into what that room and started to explain. "You''re going to live here and work until not rasplatishsya debt. All clear? Try that buzz or escape, all we''ll bullet to the head and stabbed in the woods bury, truncated?"'
			'You frightened nodded, realizing that they are not joking.'

			act 'Look around':gt 'saunaroom'
		end

		exit
	elseif vnesh >= 15 and husbdolg = 2:
		cla
		husbdolg = 3
		saunaWorkWhore = 1
		'"Well babe, worked well, there is a desire to work more come to the sauna, where a job for you there, " said one grinning.'

		act 'Finish':gt 'bedr'
	end

	if vnesh < 15:'"How frights not comb it frights remain" one said, looking at you. "Okay, go away, and you brought the money tomorrow, and then tomorrow we will be to fuck you." said second your husband.'

	act 'Finish':gt 'bedr'
end

if $ARGS[0] = 'variant':
	'<<$husName>> looking at you and waiting for what you say'

	act 'Spread her legs ':gt 'husbsex', 'miss'
	act 'Doggy-Style':gt 'husbsex', 'dog'
	act 'Anal':gt 'husbsex', 'anal'
	act 'Give blowjob':gt 'husbsex', 'minet'
	act 'Masturbate him':gt 'husbsex', 'hand'

	if kundayH ! day:
		act 'Cooney':gt 'husbsex', 'kuni'
	end

	if DOM > 0 and harakHusb = 0 and izvratH = 1 and strapon > 0:
		act 'Otstraponili':gt 'husbsex', 'strapon'
	end
end

if $ARGS[0] = 'minet':
	*clr
	gs 'brosok'
	bj += 1
	minut += 30
	'<center><img src="images/picV/bj.jpg"></center>'
	'Her husband <<husDick>> centimeter member held you on the lips.'
	if bj = 1:'You thought, "Damn, I rolled, I sit in front of a man, and he told me in the mouth by a dick pokes."'
	gs 'oral', 'start'

	act 'Continue to suck.':
		cla
		*clr
		swallow += 1
		cumlip += 1
		husband += 1
		'<center><img src="images/picV/swallow.jpg"></center>'
		'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$husName>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

		act 'Leave.':
			cla
			gt 'vanr'
		end
	end

	act 'Remove the mouth.':
		cla
		*clr
		tiprand = rand(0, 1)

		if tiprand = 0:
			facial += 1
			cumface += 1
			husband += 1
			'<center><img src="images/picV/facial.jpg"></center>'
			'You took out a member and at this point <<$husName>> is dead right on your face, covering it with warm and sticky cum.'
		elseif tiprand = 1:
			husband -= 1
			'<center><img src="images/picV/hand.jpg"></center>'
			'You remove a member from his mouth and <<$husName>> you finished in the palm.'
		end

		act 'Leave.':
			cla
			gt 'vanr'
		end
	end
end

if $ARGS[0] = 'hand':
	*clr
	gs 'brosok'
	DOM += 1
	hj += 1
	minut += 30
	horny += DOM
	'<center><img src="images/picV/hand1.jpg"></center>'
	'You got it <<husDick>> centimeter penis and began to caress her arms around his arms, moving the skin on the crimson head.'
	'Soon, your skillful movements husband finished you in her hands, covering them with warm and sticky sperm.'

	act 'Go to the bathroom.':
		cla
		gt 'vanr'
	end
end

if $ARGS[0] = 'kuni':
	*clr
	kunday = day
	gs 'brosok'
	DOM += 1
	kuni += 1
	minut += 30
	horny += DOM + (silaVag * 2 + 5)
	'<center><img src="images/picV/kuni.jpg"></center>'
	'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
	'<<$husName>> lay down between your legs and began to work the tongue on your pussy.'

	if horny >= 90:
		horny = 0
		manna += 15
		willpower += 15
		orgasm += 1
		'Man of skillful actions you covered orgasm.'
	else
		'Actions husband though they were exciting, but they started to bore you.'
	end

	act 'Further.':
		cla
		gt 'husbsex', 'variant'
	end
end

if $ARGS[0] = 'strapon':
	*clr
	gs 'brosok'
	DOM += 5
	pegging += 1
	minut += 30
	horny += DOM
	'<center><img src="images/picV/pegging.jpg"></center>'
	'You got out of the drawer and put his strap. <<$husName>> got cancer on the bed.'
	'Greased lubricated anus husband and stuck him in the strap. While you fuck his ass, he groaned, and finally finished. You remove the strap from him and went to the bathroom.'

	act 'Go to the bathroom.':
		cla
		gt 'vanr'
	end
end

if $ARGS[0] = 'anal':
	*clr
	gs 'brosok'
	anal += 1
	minut += 30

	if analplugin = 1 :
		'<center><img src="images/picV/dog2.jpg"></center>'
		analpluginbonus = 10
		analplugin = 0
		cumass += 1
		minut += 3
		cumanus += 1
		if anus < husDick:anus += 1

		horny += ((anus - husDick) * 3)
		'<center><img src="images/picV/dog2.jpg"></center>'

		if anus < 16:'<<$husName>> has pulled out of your narrow and tight butt plug'
		if anus >= 16:'<<$husName>>pulled out of your ass juices dripping feverish stopper and you feel as hard cock rested in your hole.'

		if anus + analpluginbonus < husDick:
			'You screamed and bit his lip from a sharp pain when it <<husDick>> member centimeter apart your ass you entered.'
		elseif anus + analpluginbonus >= husDick:
			'You groaned when his feelings of overcrowding <<husDick>> member centimeter apart your ass you entered.'
		end

		'Finally <<$husName>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'

		if horny < 1:
			horny = 1
		elseif horny >= 100 :
			horny = 1
			orgasm += 1
			analorgasm += 1
			'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
		end

		act 'Go to the bathroom.':
			cla
			gt 'vanr'
		end
	end

	if husDick < anus:anus += 1
	'<center><img src="images/picV/dog2.jpg"></center>'

	if lubri = 0:
		lubonus = 2
		'Lubricant and you do not have <<$husName>> spitting on his fingers became saliva to lubricate your ass.'
	elseif lubri > 0:
		lubri -= 1
		lubonus = 10
		'You got out of the box with a tube of lube and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
	end

	'<<$husName>> put your stomach on the bed apart and began to massage your buttocks your anus with your fingers, first one, then two.'

	if anus < 10:'When your ass you entered three fingers involuntarily groaned in pain.'
	if anus >= 10:'Then the guy brought you three fingers and started to stretch your anus.'

	'<<$husName>> pulled his fingers out of your buttocks and you feel his hard cock rested in your hole.'

	if anus + lubonus < husDick:'You screamed and bit his lip from a sharp pain as his cock parted your ass you entered.'
	if anus + lubonus >= husDick:'You moan from the feeling of overcrowding as his cock parted your ass you entered.'

	'<<$husName>> stopped for a moment giving your ass to adjust to the protruding member in it, and then started to drive them all the more insistent.'

	if anus + lubonus + 2 < husDick:
		if mop > 1:mop = 0
		'You cried and clutched his teeth into the pillow when <<husDick>> centimeter cock began to fuck your ass on full force.'
	elseif anus + lubonus + 2 >= husDick:
		'You started to moan rhythmically in time with the movements member inside you.'
	end

	'Finally <<$husName>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'

	if klismaday ! day:
		husband -= 1
		'<<$husName>> took out a member of your ass and see on your dick shit said, "Damn. <<$name>> my ass before sex."'
	elseif klismaday = day:
		husband += 5
		'<<$husName>> took out a member of you and kissed you went to the bathroom.'
	end

	if anus < husDick:anus += 1

	act 'Go to the bathroom.':
		cla
		lubonus = 0
		gt 'vanr'
	end
end

if $ARGS[0] = 'miss':
	*clr
	husband += 1
	gs 'brosok'
	sex += 1
	minut += 30
	pose = 0
	$nameV = $husName
	dick = husDick
	silavag = silavagH
	'<center><img src="images/picV/vag.jpg"></center>'
	'<<$husName>> spread your legs and began to fondle her fingers pussy.'
	gs 'orgazm', 'start'

	act 'Go to the bathroom.':
		cla
		gt 'vanr'
	end
end

if $ARGS[0] = 'dog':
	*clr
	husband += 1
	gs 'brosok'
	sex += 1
	minut += 30
	pose = 1
	$nameV = $husName
	dick = husDick
	silavag = silavagH
	'<center><img src="images/picV/dog1.jpg"></center>'
	'<<$husName>> poctavil you cancer and spread your bread before you enter.'
	gs 'orgazm', 'start'

	act 'Go to the bathroom.':
		cla
		gt 'vanr'
	end
end

--- husbSex ---------------------------------
# indik
if $ARGS[0] = '1':
	if a >= 100 : $ind = '<font color="green"> ██████████ <<a1>></font>'
	if a < 100 and a >= 90 :$ind = '<font color="green"> █████████_ <<a1>></font>'
	if a < 90 and a >= 80 :$ind = '<font color="green"> ████████__ <<a1>></font>'
	if a < 80 and a >= 70 :$ind = '<font color="green"> ███████___ <<a1>></font>'
	if a < 70 and a >= 60 :$ind = '<font color="blue"> ██████____ <<a1>></font>'
	if a < 60 and a >= 50 :$ind = '<font color="blue"> █████_____ <<a1>></font>'
	if a < 50 and a >= 40 :$ind = '<font color="blue"> ████______ <<a1>></font>'
	if a < 40 and a >= 30 :$ind = '<font color="red"> ███_______ <<a1>></font>'
	if a < 30 and a >= 20 :$ind = '<font color="red"> ██________ <<a1>></font>'
	if a < 20 and a >= 10 :$ind = '<font color="red"> █_________ <<a1>></font>'
	if a < 10 and a >= 1 : $ind = '<font color="red"> ▓_________ <<a1>></font>'
	if a <= 0 : $ind = '<font color="red"> __________ <<a1>></font>'
end

if $ARGS[0] = '2':
	if a >= 100 : $ind = '<font color="red"> ██████████ </font>'
	if a < 100 and a >= 90 :$ind = '<font color="red"> █████████_ </font>'
	if a < 90 and a >= 80 :$ind = '<font color="red"> ████████__ </font>'
	if a < 80 and a >= 70 :$ind = '<font color="orange"> ███████___ </font>'
	if a < 70 and a >= 60 :$ind = '<font color="orange"> ██████____ </font>'
	if a < 60 and a >= 50 :$ind = '<font color="yellow"> █████_____ </font>'
	if a < 50 and a >= 40 :$ind = '<font color="yellow"> ████______ </font>'
	if a < 40 and a >= 30 :$ind = '<font color="green"> ███_______ </font>'
	if a < 30 and a >= 20 :$ind = '<font color="green"> ██________ </font>'
	if a < 20 and a >= 10 :$ind = '<font color="blue"> █_________ </font>'
	if a < 10 and a >= 1 : $ind = '<font color="blue"> ▓_________ </font>'
	if a <= 0 : $ind = '<font color="blue"> __________ </font>'
end

--- indik ---------------------------------
# klofdomhouse1
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5

	act 'Ring the doorbell':
		cla

		if klofQW = 2 and hour >= 16 and klofday ! day:
			gt 'klofdomhouse', 'ev1'
		elseif klofQW > 2 and hour >= 16 and klofday ! day:
			gt 'klofdomhouse', 'start1'
		else
			'No one home'

			act 'Go home':gt 'street'
		end
	end

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev1':
	cla
	*clr
	klofday = day
	minut += 5
	'<center><img src="images/klof/klof.jpg"></center>'
	'You rang the doorbell.'
	'You do not open and you want to leave, but then the door opened.'
	'Hi-<<$name>> said'
	'-And that you said (smiling) male-through.'

	act 'Stop by':gt 'klofdomhouse', 'ev2'
end

if $ARGS[0] = 'ev2':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 1.JPG"></center>'
	'You looked around the apartment was a pigsty, the walls papered with peeled everywhere strewn socks.'
	'How pathetic something you guys here rebya - you said and smiled, eyes met the guy.'
	'Nothing, we just arrived in this city soon obzhivaya said grinning guy.'
	'- Clear. We are never met.'
	'- Call me Zhora, and my sidekick Senya, and now just quickly clean this up in the apartment.'

	act 'Clean up':gt 'klofdomhouse', 'ev4'

	if sub < 30 and horny < 75:
		act 'Leave':gt 'klofdomhouse', 'ev3'
	end
end

if $ARGS[0] = 'ev3':
	cla
	*clr
	minut += 5
	klofQW -= 1

	if dom > 0:dom += 5
	if sub > 0:sub -= 5

	'<center><img src="images/qwest/pnx.jpg"></center>'
	'You decided that the guy above you just izdevaetsya and left.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'ev4':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 3.JPG"></center>'
	'Remove ZHore you approached and asked.'
	'Jora-you promised money and entertainment, but so far I have not seen what this'
	'Well-look, as I said we are not in a long time, until now we need a girl for home services'
	'- When will become closer acquainted, talk about business.'
	'- Now be a good girl and I discussed'

	act 'Open your legs ZHore':gt 'klofdomhouse', 'ev5'
end

if $ARGS[0] = 'ev5':
	cla
	*clr
	minut += 5
	sex += 1
	vagina += 1
	'<center><img src="images/klof/klof 4.jpg"></center>'
	'Jora began to fuck you in the pussy, suddenly the door opened.'
	'Into the room came Senya and said, "Suck my cock baby ka"'

	act 'Get a mouth Cenis':gt 'klofdomhouse', 'ev6'
end

if $ARGS[0] = 'ev6':
	cla
	*clr
	hour += 23
	minut += 5
	klofQW += 1
	cla
	*clr
	money += 200
	bj += 1
	cumface += 1
	cumpussy += 1
	'<center><img src="images/klof/klof 5.jpg"></center>'
	'Jora zhetko pecked in your pussy, Xian fucked you in the mouth.'
	horand = rand(1, 100)

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

	'You are dressed and ready to go home.'
	'To you approached and handed the money Jora:"Earned crumb"'

	if bj >= anal and bj >= sex:
		callnm = 1
	elseif anal >= oral and anal >= sex:
		callnm = 2
	elseif Sex >= bj and Sex >= anal:
		callnm = 3
	elseif vaf >= 100:
		callnm = 4
	end

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'start1':
	cla
	*clr
	klofday = day
	minut += 5
	gt 'klofdomhouse', 'ev7'
end

if $ARGS[0] = 'ev7':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 1.JPG"></center>'
	'You went to the apartment'

	act 'Say hello to the guys':gt 'klofdomhouse', 'ev8'
end

if $ARGS[0] = 'ev8':
	cla
	*clr
	minut += 5
	'<center><img src="images/klof/klof 6.jpg"></center>'
	'Hey baby, guys said, you ogolid breasts and began to fondle you.'
	'- Hello boys miss me? - You said and blushed'

	act 'Entertain ZHoru':gt 'klofdomhouse', 'ev9'
	act 'entertain Senya':gt 'klofdomhouse', 'ev10'
	act 'Entertain both':gt 'klofdomhouse', 'ev19'
	act 'Ask Zhora about affairs':gt 'klofdomhouse', 'ev20'
end

if $ARGS[0] = 'ev9':
	cla
	*clr

	act 'Writing in the pussy ZHore.':gt 'klofdomhouse', 'ev13'
	act 'Writing in the ass ZHore.':gt 'klofdomhouse', 'ev14'
	act 'ZHore suck.':gt 'klofdomhouse', 'ev19'
end

if $ARGS[0] = 'ev13':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	vagina += 1
	sex += 1
	cumpussy += 1
	'Jora zhetko pecked in your pussy.'
	picrand = rand(7, 9)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	horand = rand(1, 100)

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

	'You feel that Jora razryazhaetsya you.'
	'<center><img src="images/klof/klof 10.jpg"></center>'
	'You are dressed and ready to go home.'
	'Jora handed you the money, "Earned crumb"'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev14':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	anal += 1
	anus += 1
	cumass += 1
	picrand = rand(11, 13)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'Jora with full force hammer you in the ass.'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		'<center><img src="images/klof/klof 14.jpg"></center>'
		'Jora discharge you in the ass, in the ass and inserts gag'
		'You are dressed and ready to go home.'
		'Jora handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev15':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	bj += 1
	cumface += 1
	picrand = rand(15, 17)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'You passionately clasped Zhorin member lips.'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		picrand = rand(18, 20)
		'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
		'Jora discharged in your face'
		'You are dressed and ready to go home.'
		'Jora handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev10':
	cla
	*clr

	act 'Writing in the pussy Seine.':gt 'klofdomhouse', 'ev 16'
	act 'Writing in the ass Seine.':gt 'klofdomhouse', 'ev 17'
	act 'Suck Seine.':gt 'klofdomhouse', 'ev 18'
end

if $ARGS[0] = 'ev 16':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	vagina += 1
	sex += 1
	picrand = rand(7, 9)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'Hsien zhetko pecked in your pussy.'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		'<center><img src="images/klof/klof 10.jpg"></center>'
		'You feel that Jora razryazhaetsya you.'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev 17':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	cumass += 1
	anal += 1
	anus += 1
	picrand = rand(11, 13)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'Hsien with full force hammer you in the ass.'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		'<center><img src="images/klof/klof 14.jpg"></center>'
		'Hsien discharge you in the ass, in the ass and inserts gag'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev 18':
	cla
	*clr
	minut += 30
	klofQW += 1
	money += 100
	bj += 1
	guy += 1
	cumlip += 1
	picrand = rand(15, 17)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'You passionately clasped Senenin member lips.'
	horand = rand(1, 100)

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

	act '....':
		cla
		*clr
		facial += 1
		picrand = rand(18, 20)

		'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
		'Hsien discharged in your face'
		'You are dressed and ready to go home.'
		'Hsien handed you the money, "Earned crumb"'

		act 'Go home':gt 'street'
	end
end

if $ARGS[0] = 'ev19':
	cla
	*clr
	minut += 30
	klofQW += 2
	money += 200
	sex += 1
	bj += 1
	cumface += 1
	facial += 1
	cumpussy += 1
	vagina += 1
	picrand = rand(21, 23)
	'<center><img src="images/klof/klof <<picrand>>.jpg"></center>'
	'Jora brutally fuck you in the mouth and pussy Cenya dryuchit'
	horand = rand(1, 100)

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

	'Finally they both finished, one in the pussy, the other on the face.'
	'You are dressed and ready to go home.'
	'Boys stretched you money, "Earned crumb"'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev20':
	cla
	*clr
	klofday = day
	minut += 5
	'<center><img src="images/klof/klof.jpg"></center>'

	'If you want to talk serious business with our boss'

	act 'Talk to the boss':
		cla

		if klofQW < 10:gt 'klofdomhouse', 'ev21'
		if klofQW >= 10:gt 'klofdomhouse', 'ev22'
	end
end

if $ARGS[0] = 'ev21':
	cla
	*clr
	'From the room came an ugly old man'
	'<center><img src="images/klof/klof24.jpg"></center>'
	'"Too early you climb into our business" - he said.'

	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev22':
	cla
	*clr
	'From the room came an ugly old man'
	'<center><img src="images/klof/klof24.jpg"></center>'
	'Boss looked closely at you and said, "Come to me, look at what you''re ready for the money"'

	act 'Go to the boss room.':gt 'klofdomhouse', 'ev23'
	act 'Go home':gt 'street'
end

if $ARGS[0] = 'ev23':
	cla
	*clr
	'You went into the room boss surprisingly it was well renovated and furnished'
	'<center><img src="images/klof/klof25.jpg"></center>'
	'Well Well take off your clothes and show yourself - said the boss'

	act 'Show yourself':gt 'klofdomhouse', 'ev24'
	act 'Send it to .....':gt 'street'
end

if $ARGS[0] = 'ev24':
	cla
	*clr
	'You sat on the bed'
	'<center><img src="images/klof/klof 26.jpg"></center>'

	act 'Show breast':gt 'klofdomhouse', 'ev25'
end

if $ARGS[0] = 'ev25':
	cla
	*clr
	'You bared her breasts'
	'<center><img src="images/klof/klof 26 (1).jpg"></center>'

	act 'Show ass':gt 'klofdomhouse', 'ev26'
end

if $ARGS[0] = 'ev26':
	cla
	*clr
	! WD: Correct Image path ~ "images/klof/klof 26</center>.jpg"
	'<center><img src="images/klof/klof 26.jpg"></center>'
	'You pokazli his ass'

	act 'Remove dress':gt 'klofdomhouse', 'ev27'
end

if $ARGS[0] = 'ev27':
	cla
	*clr
	'<center><img src="images/klof/klof 26 (4).jpg"></center>'
	'You took off her dress'

	act 'Seduce the boss':gt 'klofdomhouse', 'ev28'
end

if $ARGS[0] = 'ev27':
	cla
	*clr
	'<center><img src="images/klof/klof 26 (6).jpg"></center>'
	'You sat on the bed and pushed the legs '

	act 'Seduce the boss':gt 'klofdomhouse', 'ev28'
end

if $ARGS[0] = 'ev28':
	cla
	*clr
	! WD: Correct Image path ~ "images/klof/1284364hjl.jpg)"
	'<center><img src="images/klof/1284364hjl.jpg"></center>'
	'You turned on its side and the boss showed their charms'

	act 'Spin the ass before the boss':gt 'klofdomhouse', 'ev29'
end

if $ARGS[0] = 'ev29':
	cla
	*clr
	'<center><img src="images/klof/1284365sgp.jpg"></center>'
	'You turned on its side and the boss showed their charms'

	act 'Seduce the boss':gt 'klofdomhouse', 'ev29'
end

--- klofdomhouse1 ---------------------------------
# Peterroom
if $ARGS[0] = 'start_door':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Apartment Peter</font></b></center>'
	'<center><img src="images/peter/peterdoor.jpg"></center>'

	act 'Leave':
		cla
		minut += 5
		gt 'down'
	end

	act 'Ring the doorbell':
		cla

		if petersexday < 1:
			petersexday += 1
			'You called, Peter opened the door.'
			'- Come on, get changed. I am now.'

			act 'Take the apartment':gt 'peterroom', 'start'
		else
			'You rang the doorbell but no one answers.'

			act 'Leave':
				cla
				minut += 5
				gt 'down'
			end
		end
	end
end

if $ARGS[0] = 'start':
	cla
	*clr

	if peter > 0 :
		peterrand = rand(1, 2)
		'<center><img src="images/peter/9.jpg"></center>'
		'You get undressed, pinned collar and prepared. From the next room came the voice of Peter Vlasnyi:- Who is my whore?'

		act 'I, my lord ...':
			petersex = petersex + 1

			if analplugin = 1 :gt 'peterroom', 'klap'
			if peterrand < 2 :gt 'peterroom', 'd1'
			if peterrand > 1 :gt 'peterroom', 'd2'
		end
	elseif peter < 1 :
		petersexday += 1
		minut += 10
		'<center><img src="images/peter/1.jpg"></center>'
		'undressing and dressing it. He put a collar in front of you you picked up this narrow strip of skin with rivets and thinking.'

		act 'Wear' :
			*clr
			cla
			'<center><img src="images/peter/2.jpg"></center>'
			'You put the collar. Peter stroked whip you on the cheek:'
			'- Lustful girl! Stand up, turn around, hands behind your back!'
			'You execute the command and hands snap handcuffs.'

			if analplugin = 1 :
				analplugin = 0
				'And what have we here? Peter pulled the tip of the tube sticking out of the ass, and pulled her'
			end

			act 'smile':
				cla
				*clr
				gs 'stat'
				'<center><img src="images/peter/3.jpg"></center>'
				'Peter pulled you by the collar, put on his knees in front of him and ordered:- Come on bitch, now open your mouth raunchy.'

				act 'submit':
					cla
					*clr
					'<center><img src="images/peter/4.jpg"></center>'
					'Peter unbuttoned his pants and pulled out his dick 25santimetrovy. He grabbed you by the hair and put in your mouth the head of his penis. You obediently around her lips sucking and caressing his tongue, feeling as it increases and strains in your mouth.'

					act 'continue Composition' :
						cla
						*clr
						'<center><img src="images/peter/5.jpg"></center>'
						'And then Peter bent and you rudely and impatiently thrust member in your pussy and started to fuck like a blow-up doll. A few minutes later, he stopped and pulled his cock pushed you to the floor and ordered:'
						'- Crawl me, bitch!'

						act 'creep' :gt 'peterroom', 'klap'
					end
				end

				act 'does not comply' :
					cla
					*clr
					'<center><img src="images/peter/4_1.jpg"></center>'
					'-Have to punish - Peter with these words you crossed over the table and put you in the anus plug. - Pop up earlier than end flogging, will receive the same amount:- Peter became the side of you, spread the whip and started whipping. counting aloud strikes interspersed with your shouts and sobs ...'
					'- ... Ask me to fuck you, nine docile litter?'

					act 'Yes! I''ll be your whore!' :gt 'peterroom', 'klap'
				end
			end
		end

		act 'Leave':gt 'down'
	end
end

if $ARGS[0] = 'klap':
	cla
	*clr
	horny += 10
	gs 'stat'
	'<center><img src="images/peter/6.jpg"></center>'
	'Peter on a leash led you into the bedroom. Knocked on the huge bed and tied his hands and feet.'
	'Then deftly put into your mouth gag:- ball on the strap and fastened it at the back.'
	'- I love, <<$name>>, as you moan, but when you''re talking about, you start talking nonsense. So it is better groan, honey ...'

	act 'moo':
		cla
		*clr
		'<center><img src="images/peter/7.jpg"></center>'
		'. Peter bore down on you from above. - Check how much you sweet ass? - Said Peter'

		if analplugin = 1 :
			analplugin = 0
			', Pulled a butt plug'
		end

		'and put his huge erection to your anus entered it in half. You gasped in pain, and mooing in gag. - And I see you can not wait to get his ass completely - Peter saw your reaction and began to fuck your ass with every stroke penetrating deeper and deeper until his penis did not completely sink into you, and the balls hard slap on the buttocks. He fucks you so intense that you feel like my knees start to shake, and out of pussy and your juices flowing buttocks.'

		act 'moo' :
			cla
			*clr
			horny += SUB - DOM + (anus - 25) * 3
			anal += 1
			'<center><img src="images/peter/8.jpg"></center>'
			'He continues to stick you faster, then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'

			if anus < 25:anus += 1

			if horny >= 100:
				horny = 1
				orgasm += 1
				analorgasm += 1
				'in the ass was hot and orgasm you covered from head.'
			end

			'Ass to squelch freed from his penis. Peter sat on the bed, breathing heavily, and you remained lying bound, feeling of ass fucked slowly follows sperm.'

			act 'relax' :gt 'peterroom', 'end'
		end
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	SUB += 1
	minut += 30
	gs 'stat'
	'<center><img src="images/peter/vanroom.jpg"></center>'
	'- You were great - said Peter and smacking you on the cheek, picked up and carried you to the bathroom where you showered together.'

	act 'Get out' :
		cla
		*clr
		peter += 1
		minut += 20
		'<center><img src="images/peter/mash.jpg"></center>'
		'You walked down the yard, and stopped the car, Peter. He kissed you on the lips and said:'
		'- <<$name>>, you really brighten up my lonely and gray existence. Your appearance is as the light in the dark, or a breath of fresh air ... I hope to see you again. But now I''m sorry things. You a lift?'


		act 'In the center' :gt 'down'
		act 'The house' :gt 'street'
	end
end

if $ARGS[0] = 'd1':
	cla
	*clr
	horny += SUB - DOM + (anus - 25) * 3
	anal += 1

	if anus < 25:anus += 1
	'<center><img src="images/peter/d1-1.jpg"></center>'
	'Peter connects your hands behind your back. His hands take you by the hips and lifted your ass, placing you cancer. You dutifully lean and Peter catches the rope to the hook.'

	act 'sucking her fingers':
		cla
		*clr
		'<center><img src="images/peter/d1-2.jpg"></center>'
		'Peter pushes your hands halves drives his cock in the ass. You gasped in pain, and mooing in gag. - And I see you can not wait to get his ass completely - Peter saw your reaction and began to fuck your ass with every stroke penetrating deeper and deeper until his penis did not completely sink into you, and the balls hard slap on the buttocks.'

		act 'moan':
			cla
			*clr
			'<center><img src="images/peter/d1-3.jpg"></center>'
			'He fucks you so intense that you feel like my knees start to shake, and the legs from the pussy juices flow down your.'

			act 'moan':
				cla
				*clr
				'<center><img src="images/peter/d1-4.jpg"></center>'
				'He continues to stick you faster'

				if horny >= 100:
					orgasm += 1
					analorgasm += 1

					'You are very excited that grew in the ass sweet languor, and then suddenly become a hot orgasm and covered you with his head. Simultaneously with you ends Peter pounding dick deeper and filling your insides hot stream of sperm ....'
				elseif horny < 100:
					' and then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'
				end

				'Ass to squelch freed from his penis. Peter sat on the bed, breathing heavily, and you remained kneeling with protruding upward booty fucked from which the legs dripping sperm.'

				act 'further' :gt 'peterroom', 'end'
			end
		end
	end
end

if $ARGS[0] = 'd2':
	cla
	*clr
	horny += SUB + VAF - DOM + (throat - 25) * 3
	'<center><img src="images/peter/d2-1.jpg"></center>'
	'Peter put you on your knees, then lifted your head and holding her hands to force your mouth planted its piston. His head slipped down his throat, but he did not rest on this, continuing to press. And its 25 centimeter count began to enter into you further.'

	act 'suck':
		cla
		*clr
		'<center><img src="images/peter/d2-2.jpg"></center>'
		'- Cosi better whore! Inch by inch, pushing relentlessly pounding him deeper and deeper. After another push me you felt that your lips into something rested. And in a moment you realize that it is all inside.'

		act 'moan':
			cla
			*clr
			'<center><img src="images/peter/d2-3.jpg"></center>'
			'Tears streamed from his eyes, and Peter began slowly began to move. He took his hands away from your head, and now you hands grabbed his buttocks and continued to sit down on his spear. You trembling, you are lost in sensation between the legs fire raged in the chest ached pleasantly shamelessness and sense of awareness of their depravity.'

			act 'moo':
				cla
				*clr
				SUB += 1
				bj += 1
				'<center><img src="images/peter/d2-4.jpg"></center>'
				'Peter began to finish and stopped drove a member as far as possible, you feel like you are somewhere deep pours his sperm., And on his balls your saliva flowing ...'

				if horny >= 100:
					VAF += 1
					willpower += 15
					lipkoef += 1
					orgasm += 1
					'Suddenly you start you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned and shuddered with orgasm, but Peter gripped you do not allow members to slip out of his mouth ...'
				end

				act 'Swallow' :gt 'peterroom', 'end'
			end
		end
	end
end

--- Peterroom ---------------------------------
# portnoi2
poshvalldrop = 0
o = 0
:jensmet
o += 1

if jeans[o] = 1 and jeansB[o]!bedra:poshvalldrop += 1
if o ! 5:jump 'jensmet'

o = 0
:shortmet
o += 1

if short[o] = 1 and shortB[o]!bedra:poshvalldrop += 1
if o ! 5:jump 'shortmet'

o = 0
:skirtmet
o += 1

if skirt[o] = 1 and skirtB[o]!bedra:poshvalldrop += 1
if o ! 5:jump 'skirtmet'

o = 0
:dressmet
o += 1

if dress[o] = 1 and dressB[o]!bedra:poshvalldrop += 1
if o ! 24:jump 'dressmet'

o = 0
:profimet
o += 1

if profi[o] = 1 and profiB[o]!bedra:poshvalldrop += 1
if o ! 2:jump 'profimet'

o = 0
:pantsmet
o += 1

if pants[o] = 1 and pantsB[o]!bedra:poshvalldrop += 1
if o ! 5:jump 'pantsmet'

o = 0
:latexmet
o += 1

if latex[o] = 1 and latexB[o]!bedra:poshvalldrop += 1
if o ! 2:jump 'latexmet'

o = 0
:hookermet
o += 1

if hooker[o] = 1 and hookerB[o]!bedra:poshvalldrop += 1
if o ! 5:jump 'hookermet'

o = 0
:odekismet
o += 1

if odekis[o] = 1 and odekisB[o]!bedra:poshvalldrop += 1
if o ! 10:jump 'odekismet'

o = 0
:newclomet
o += 1

if newclo[o] = 1 and newcloB[o]!bedra:poshvalldrop += 1
if o ! 130:jump 'newclomet'

if money < poshvalldrop * 500:
	'You do not have enough money to resize all of your clothing. The total cost would be <<poshvalldrop * 500>> rubles.'

	act 'Leave':gt 'clener', 'start'

	exit
elseif money >= poshvalldrop * 500:
	money -= poshvalldrop * 500
	o = 0
	:jensmet1
	o += 1

	if jeans[o] = 1 and jeansB[o]!bedra:jeansB[o] = bedra
	if o ! 5:jump 'jensmet1'

	o = 0
	:shortmet1
	o += 1

	if short[o] = 1 and shortB[o]!bedra:shortB[o] = bedra
	if o ! 5:jump 'shortmet1'

	o = 0
	:skirtmet1
	o += 1

	if skirt[o] = 1 and skirtB[o]!bedra:skirtB[o] = bedra
	if o ! 5:jump 'skirtmet1'

	o = 0
	:dressmet1
	o += 1

	if dress[o] = 1 and dressB[o]!bedra:dressB[o] = bedra
	if o ! 24:jump 'dressmet1'

	o = 0
	:profimet1
	o += 1

	if profi[o] = 1 and profiB[o]!bedra:profiB[o] = bedra
	if o ! 2:jump 'profimet1'

	o = 0
	:pantsmet1
	o += 1

	if pants[o] = 1 and pantsB[o]!bedra:pantsB[o] = bedra
	if o ! 5:jump 'pantsmet1'

	o = 0
	:latexmet1
	o += 1

	if latex[o] = 1 and latexB[o]!bedra:latexB[o] = bedra
	if o ! 2:jump 'latexmet1'

	o = 0
	:hookermet1
	o += 1

	if hooker[o] = 1 and hookerB[o]!bedra:hookerB[o] = bedra
	if o ! 5:jump 'hookermet1'

	o = 0
	:odekismet1
	o += 1

	if odekis[o] = 1 and odekisB[o]!bedra:odekisB[o] = bedra
	if o ! 10:jump 'odekismet1'

	o = 0
	:newclomet1
	o += 1

	if newclo[o] = 1 and newcloB[o]!bedra:newcloB[o] = bedra
	if o ! 130:jump 'newclomet1'

	'You resize all clothing for <<poshvalldrop*500>> rubles.'

	act 'Leave':gt 'clener', 'start'

	exit
end

--- portnoi2 ---------------------------------
# sexorg
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 30
	sweat += 1
	picrand = rand(0, 1)
	gs 'stat'
	gt 'sexorg', 'var'
end

if $ARGS[0] = 'var':
	sexorgrand = rand(0, 6)

	if sexorgrand = 0:
		cla
		*clr
		horny += 10
		sexvar += 1

		if orsxbj = 0:
			bj += 1
			orsxbj = 1
		end

		'<center><img src="images/img/sexorg/minet<<picrand>>.jpg"></center>'
		'You two suck his cock, then take turns licking it with his dildo, touching tongues.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 1:
		cla
		*clr
		horny += 10
		sexvar += 1
		'<center><img src="images/img/sexorg/vag<<picrand>>.jpg"></center>'
		'While she enjoys her pussy in a member, you also find yourself iteresnoe employment.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 2:
		cla
		*clr
		horny += 10
		sexvar += 1

		if orsxsex = 0:
			sex += 1
			orsxsex = 1
		end

		'<center><img src="images/img/sexorg/uvag<<picrand>>.jpg"></center>'
		'He comes into you, his cock moving inside your pussy bringing you pleasure, this time she did not lose too found something to do.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 3:
		cla
		*clr
		horny += 10
		sexvar += 1
		'<center><img src="images/img/sexorg/anal<<picrand>>.jpg"></center>'
		'Do you like the sight of his cock in her ass and sweet until she yells trying to absorb all of it, too, you did not get lost.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 4:
		cla
		*clr
		horny += 10

		if orsxanal = 0:
			anal += 1
			pdsxanal = 1
		end

		'<center><img src="images/img/sexorg/uanal<<picrand>>.jpg"></center>'
		'When he enters you in the anus you hurt a little, but soon the pain goes away and its place is taken by a pleasant feeling, while his moving dildo in your ass it is not sitting idly by.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 5:
		cla
		*clr
		horny += 10

		if orsxbj = 0:
			bj += 1
			orsxbj = 1
		end

		if orsxsex = 0:
			sex += 1
			orsxsex = 1
		end

		if orsxanal = 0:
			anal += 1
			orsxanal = 1
		end

		'<center><img src="images/img/sexorg/udp<<picrand>>.jpg"></center>'
		'Two men enter into you and you moan with pleasure feeling both dildo move inside.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	elseif sexorgrand = 6:
		cla
		*clr
		horny += 10
		sexvar += 1
		'<center><img src="images/img/sexorg/dp<<picrand>>.jpg"></center>'
		'When they enter into it as a couple you get a little jealous seeing how she enjoys.'

		act 'More':gt 'sexorg', 'var'

		if sexvar >= 3:act 'Finish.':gt 'sexorg', 'end'
	end
end

if $ARGS[0] = 'end':
	cla
	*clr
	orsxbj = 0
	orsxsex = 0
	orsxanal = 0
	sexvar = 0
	cumlip = 1

	if horny >= 80:
		horny = 0
		orgasm += 1
	end

	'<center><img src="images/img/sexorg/cum<<picrand>>.jpg"></center>'
	'They came, and you lick the cum off each other.'

	act 'Leave':gt $sexloc, 'start'
end

--- sexorg ---------------------------------
# $stock_item
!! generic function to be used to stock items in stores
!! see # pharmacy for an example of use

count = ARGS[0]
$item = $ARGS[1]
price = ARGS[2]
$variable_name = $ARGS[3]
$location = $ARGS[4]
dynamic 'in_inventory = <<$variable_name>>'

$buy_link = '<a' + iif(money >= price, ' href="exec: gs ''$buy_item'', <<count>>, ''<<$item>>'', <<price>>, ''<<$variable_name>>'', ''<<$location>>''">buy ','>buy ') + count + '</a>'

$RESULT = '<tr>' + _
'<td align="center"><<$item>></td>' + _
'<td align="right">(you have <<in_inventory>>)</td>' + _
'<td align="right"><<$buy_link>></td>' + _
'<td align="left">for <<price>> rubles</td>' + _
'</tr>'

--- $stock_item ---------------------------------

# $single_stock_item
!! generic function to be used to stock single purchase items in stores
!! see # shop, specifically the household appliances section for an example of use

!! ARGS 0 is the value identifying when the item is owned
!! it is assumed that anything >= the value is acceptable, this allows for upgrades like regular tv to plasma
!! ARGS 1 is the item description
!! ARGS 2 is the price
!! ARGS 3 is the variable name for the item
!! ARGS 4 is the location to go back to

!! This will check to see if the item is already owned
dynamic "$RESULT = iif(<<$ARGS[3]>> >= <<ARGS[0]>>, '', 'not owned')"
if $RESULT = '':
	exit
end

$RESULT = '<tr>' + _
'<td align="center"><<$ARGS[1]>></td>' + _
'<td align="left">costs <<ARGS[2]>> rubles</td>' + _
'<td align="right">'

if money >= ARGS[2]:
	$RESULT += '<a href="exec: gs ''$buy_single_item'', <<ARGS[0]>>, ''<<$ARGS[1]>>'', <<ARGS[2]>>, ''<<$ARGS[3]>>'', ''<<$ARGS[4]>>''">buy</a>'
end

$RESULT += '</td></tr>'

--- $single_stock_item ---------------------------------
# $buy_item
!! call this to actually buy an item from a store

count = ARGS[0]
$item = $ARGS[1]
price = ARGS[2]
$variable_name = $ARGS[3]
$location = $ARGS[4]

dynamic "set <<$variable_name>> += <<count>>"
set money -= price
$message = '<font color="green">You bought <<count>> <b><<$item>></b>.</font>'
gt $location, $message

--- $buy_item ---------------------------------
# $buy_single_item
!! This buys an item and sets the value of the underlying variable to the specific value
!! For example, buying a plasma tv sets tv = 2

!! ARGS 0 is the value to set the variable to
!! ARGS 1 is the item description
!! ARGS 2 is the price
!! ARGS 3 is the variable name for the item
!! ARGS 4 is the location to go back to

dynamic "set <<$ARGS[3]>> = <<ARGS[0]>>"
set money -= ARGS[2]
gt $ARGS[4], '<font color="green">You bought a <b><<$ARGS[1]>></b>.</font>'

--- $buy_single_item ---------------------------------
# $face_image

!! These images are missing from my copy of the image folder, so I am commenting them out for now
!!if glass = 2:
!!	$RESULT = 'images/body/hcolglass<<hcol>>.jpg'
!!	exit
!!end
!!if glass = 1:
!!	$RESULT = 'images/body/nerd.jpg'
!!	exit
!!end
!!if shorthair = 1:
!!	$RESULT = 'images/body/SHcol<<hcol>>.jpg'
!!	exit
!!end


$RESULT = 'images/body/hairstyles/'

!! length
if hairlength > 400:
	$RESULT += 'vlng'
elseif hairlength > 260:
	$RESULT += 'lng'
elseif hairlength > 160:
	$RESULT += 'medlo'
elseif hairlength > 80:
	$RESULT += 'med'
elseif hairlength > 30:
	$RESULT += 'short'
else
	$RESULT += 'vshort'
end
$RESULT += '/'

!! style
if hbraids > 0:
	$RESULT += 'braids'
elseif hpigtail > 0:
	$RESULT += 'pigtails'
elseif curly > 0 and hbangs > 0 and hpingripw > 0:
	$RESULT += 'curly-bangs-buns'
elseif curly > 0 and hbangs > 0 and hscrunchw > 0:
	$RESULT += 'curly-bangs-scrunch'
elseif curly > 0 and hbangs > 0:
	$RESULT += 'curly-bangs'
elseif curly > 0 and hpingripw > 0:
	$RESULT += 'curly-buns'
elseif curly > 0 and hscrunchw > 0:
	$RESULT += 'curly-scrunch'
elseif hbangs > 0 and hpingripw > 0:
	$RESULT += 'bangs-buns'
elseif hbangs > 0 and hscrunchw > 0:
	$RESULT += 'bangs-scrunch'
elseif curly > 0:
	$RESULT += 'curly'
elseif hbangs > 0:
	$RESULT += 'bangs'
elseif hpingripw > 0:
	$RESULT += 'buns'
elseif hscrunchw > 0:
	$RESULT += 'scrunch'
else
	$RESULT += 'normal'
end
$RESULT += '/'

!! color
$RESULT += 'hcol<<hcol>>.jpg'

--- $face_image ---------------------------------

# etoexhib
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:
			'Water in you no longer climbs.'
		elseif water < 20:
			water += 20
			'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:
		act 'Buy milk':
			cla
			*clr
			money -= 300
			minut += 30
			frost = 0
			edahot = 0
			health += 10
			manna += 20
			gs 'stat'

			if energy >= 30:
				fat += 2
				'You don''t want do drink more.'
			elseif energy >= 20 and energy < 30:
				fat = fat + 1
				energy = energy + 10
			elseif energy < 20:
				energy += 20

				'You gladly drank goat''s milk.'
			end

			act 'Leave':gt 'dachi'
		end
	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 = day
	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 = day
	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 = day
			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 = day
			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
			cumass += 1
			cumlip += 1
			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
			cumass += 1
			cumlip += 1
			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
			cumpussy = 0
			cumbelly = 0
			cumass = 0
			cumlip = 0
			cumface = 0
			cumfrot = 0
			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
			cumpussy = 0
			cumbelly = 0
			cumass = 0
			cumlip = 0
			cumface = 0
			cumfrot = 0
			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">House of Culture</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 >= 5 and vnesh < 30:
						'<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 >= 30:
						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 Hall. It''s pretty clean and quiet. Sitting at the table technicals. 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 disgraced entrusted to you honorable mission of the teacher! So you have no place in our ranks! Take your documents. You are fired!'

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

		exit
	end

	if teachlevel = 0:'You could not explain the technicals to whom you come on and the personnel department, it does not let you.'
	if teachlevel >= 1 and teachlevel < 10:'You do not deserve to be a teacher.'
	if teachlevel >= 10 and teachlevel < 20:'Applies to you as a young, inexperienced intern.'
	if teachlevel >= 20 and teachlevel < 30:'You already have a certain reputation.'
	if teachlevel >= 30 and teachlevel < 50:'You respectable teacher.'
	if teachlevel >= 50 and teachlevel < 70:'Turn to you for advice.'
	if teachlevel >= 70 and teachlevel < 90:'Your experience and knowledge known outside the Lyceum.'
	if teachlevel >= 90:'You personify education.'

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

				act 'Resign':
					cla
					workPTU = 0
					'Now you do not work here anymore.'

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

				act 'Exit to Hall':gt 'etoexhib', 'pos19'
			elseif workPTU = 0:
				cla
				*clr
				minut += 15
				gs 'stat'
				'<center><b><font color="maroon">Human Resource Department</font></b></center>'
				'<center><img src="images/etogame/ptu_cadr.jpg"></center>'
				'Good day! Welcomed the hiring manager you girl. And told me that they need a certified teacher for doing electives. Working days from Monday to Saturday from 14.00 to 16.00. Payment 300 rubles for one day of training. For nonresident available 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.'
				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 'Go to the train station':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'

	act 'Go inside the hall':gt 'etoexhib', 'pos19'
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>'
	'<center><img src="images/etogame/PTU_lesson0.jpg"></center>'
	'You went to class and ready to begin class. Students divided into groups, chatting with each other, someone laughing, someone talking on the phone, someone buried in the tablet. Generally regular youth.'

	act 'Start session':
		cla
		minut = 0
		hour = 14
		gt 'etoexhib', 'pos27'
	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.'

				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.'

				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 ofclo = 1 and mop = 1 or ofclo = 1 and 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>'
	'- Welcome, <<$name>>! Hope you like to work for us. If you have any questions for me, I''m listening.'

	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/ptu_stolovaya.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)':
		cla
		*clr
		money -= 100
		minut += 30
		gs 'stat'
		frost = 0
		edahot = 0
		health = health + 10
		manna = manna + 20

		if energy >= 30:
			fat += 5
			'You do not want to eat.'
		elseif energy >= 20 and energy < 30:
			fat = fat + 3
			energy = energy + 10
		elseif energy < 20:
			energy += 20
			fat += 1
			'You ate with pleasure.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		elseif water < 20:
			water += 20
			'You gladly drank a cup of tea.'
		end

		act 'Finish':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.'
	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':
	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
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/stir.jpg"></center>'
			'<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 tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut += 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use a tampon.'

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

	!!!
	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

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

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

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

	!!0.2.6	extension: Washing off cosmetics also removes cum from face
	if mop ! 1:
		act 'Wash off cosmetics (0:15)':
			cla
			mop = 1
			cumface = 0
			minut += 15
			gs 'stat'
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/facesp.jpg"></center>'
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You washed off your makeup.'

			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

	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 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':
	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 dirtbelo > 0 and poroshok > 0:
		act 'Wash clothes':
			cla
			*clr
			minut += dirtbelo * 5
			clrbelo += dirtbelo
			poroshok -= 1
			dirtbelo = 0
			manna -= 10
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/stir.jpg"></center>'
			'<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 tampon > 0 and mesec > 0 and isprok = 0:
		act 'Use a tampon (0:05)':
			cla
			*clr
			tampon -= 1
			isprok = 1
			minut += 5
			manna -= 5
			'<center><img src="images/pics/wash3.jpg"></center>'
			'You use a tampon.'

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

	!!!
	!!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
	!!Removed sweat =- 1 when cum is wiped off clothes
	!!clrbelo: Amount of clean panties available
	if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
		act 'Quick wash (0:15)':
			cla
			*clr

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

			dynamic $showerdin
			sweat -= 1
			minut += 15
			'<center><img src="images/pics/wash5.jpg"></center>'
			'You gave yourself a catlick, thus removing any traces of cum.'

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

	if cumlip > 0 or cumface > 0:
		act 'Clean your face from sperm (0:05)':
			cla
			*clr
			mop = 1
			cumlip = 0
			cumface = 0
			sweat -= 1
			minut += 5
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You clean your face and got rid of any trace of cum.'

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

	!!0.2.6	extension: Washing off cosmetics also removes cum from face
	if mop ! 1:
		act 'Wash off cosmetics (0:15)':
			cla
			mop = 1
			cumface = 0
			minut += 15
			gs 'stat'
			! WD: Remove Dupe Images ~ '<center><img src="images/pic/facesp.jpg"></center>'
			'<center><img src="images/etogame/facesp.jpg"></center>'
			'You washed off your makeup.'

			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

	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
			cumass += 1
			cumlip += 1
			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 ! day:
		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':
	cla
	*clr
	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':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/roof.jpg"></center>'
	'The roof of your apartment building.'

	if temper >= 20 and bikini > 0 and hour >= 6 and hour <= 20:
		act 'Zagarat (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':
		cls
		gt 'etoexhib', 'pos52'
	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 diplom = 0 and fakediplom = 0 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.'
			'- Sveta, 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 ---------------------------------
# vokBimbo
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 30
	horny += 10
	gs 'stat'

	if cumlip = 0:
		'<center><img src="images/etogame/vokBimbo1.jpg"></center>'
		'You stand in the middle of the station mens room in a rather revealing outfits. What did you just think.'
	elseif cumlip > 0:
		'<center><img src="images/etogame/vokBimbo11.jpg"></center>'
		'You stand in the middle of the station mens room all scruffy and the male sperm.'
	end
	temp = rand(1, 10)

	if temp > 8:
		'Toilet door opens and in comes a young guy. Sees you, he was taken aback by surprise.'
		act 'To pretend that straightens her hair.':gt 'vokBimbo', 'pos4'
		if horny > 50:
			act 'Look at him with lust.':gt 'vokBimbo', 'pos2'
		end
	elseif temp < 3:
		'Toilet door opens and it comes, little man in his fifties.'
		act 'To pretend that straightens her hair.':gt 'vokBimbo', 'pos4'
		if horny > 50:
			act 'Look at the stranger with lust.':gt 'vokBimbo', 'pos3'
			end
	elseif temp = 5:
		'Toilet door opens and in comes a company of local drunks.'
		act 'To pretend that straightens her hair.':gt 'vokBimbo', 'pos4'
		if horny > 70:
			act 'Look them in the eyes with lust.':gt 'vokBimbo', 'pos6'
			end
	end
	act 'wait for men':gt 'vokBimbo', 'pos1'
	act 'Leave':gt 'vokzalGin'
end

if $ARGS[0] = 'pos2':
	cla
	*clr
	minut += 30
	horny += 5
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo2.jpg"></center>'
	'Unfamiliar man blushed and went into the booth.'
	act 'Come to him in the booth.':gt 'vokBimbo', 'pos22'
	act 'Leave':gt 'vokzalGin'
end

if $ARGS[0] = 'pos22':
	cla
	*clr
	minut += 30
	horny += 20
	cumlip += 1
	bj += 1
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo22.jpg"></center>'
	'Without knocking you burst into the booth. The guy standing with rastegnutoy pants and looks at you. You get up on your knees and grab it. First he otbrykivayutsya, but soon you are able to take in his mouth has got stronger member and you are taking hard suck. After a while the guy starts moaning, grabs your head and starts to cum.'
	horand = rand (1, 100)

	if horand > horny:horny += 10 & 'You were not satisfied'
	if horand <= horny:horny = 0 & orgasm += 1 & 'You covered orgasm'
	act 'Get out of the booth.':gt 'vokBimbo', 'pos1'
act 'Leave':gt 'vokzalGin'
end


if $ARGS[0] = 'pos3':
	cla
	*clr
	minut += 30
	horny += 5
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo2.jpg"></center>'
	'Little man smiled and went toward you unbuttoning his pants.'
	act 'Kneel.':gt 'vokBimbo', 'pos33'
	act 'Run out of toilet':gt 'vokzalGin'
end

if $ARGS[0] = 'pos33':
	cla
	*clr
	minut += 30
	horny += 10
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo33.jpg"></center>'
	'A guy came up to you in a dense and you smiled at him, and he was not tsaremonyas added a member to your mouth and began to push through with the force of cock deep into his throat. You could not breathe, but luckily he loosened his grip and you could dial the air. Guy continued to fuck you in the mouth simultaneously stripping.'

	act 'Pull the panties and masturbate':gt 'vokBimbo', 'pos333'
end

if $ARGS[0] = 'pos333':
	cla
	*clr
	minut += 30
	horny += 10
	cumlip += 1
	bj += 1
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo333.jpg"></center>'
	'Unfamiliar man let you go and you slipped on a dirty floor mens room in the same shoes. On your clothes lying everywhere.'
	'- And youre hot! Well, nows try your ass girl, but then I Manka anywhere except my forehand did not give.'

	act 'Next':gt 'vokBimbo', 'pos3333'
end

if $ARGS[0] = 'pos3333':
	cla
	*clr
	minut += 30
	horny += 10
	cumass += 1
	anal += 1
	gs 'stat'
	horand = rand (1, 100)

	if horand > horny:Set horny = horny + 10 & 'You were not satisfied'
	if horand <= horny:Set horny = 0 & orgasm += 1 & 'You covered orgasm'
	'<center><img src="images/etogame/vokBimbo3333.jpg"></center>'
	'Barker turned your face to the wall and entered sharply in the ass. A sharp pain hit you like a shock. Tears streamed from his eyes, and you try to escape, but strong hands held your delicate female body. Git continued furiously peck your poor ass and the pain gradually started to recede. Guy fucked you long enough, you might even be surprised how it can so long to finish. Finally, and you managed to get the pleasure and the pain receded. You started to moan softly.'
	'- Like, yeah, girl? Come here often, be my whore toilet, ha ha!'
	'C dork these words began to twitch and finish you in the ass. He let go of you prostrate.'

	act 'Next':gt 'vokBimbo', 'pos33333'
end

if $ARGS[0] = 'pos33333':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo33333.jpg"></center>'
	'You slipped on a dirty floor does not even move in the forces, and the man continued to squeeze out all the remnants of cum on your body.'
	'- What do you whore wallow here in the closet. I had no idea what happens.'
	'C these words unfamiliar man pulls out a marker and wrote to you on the chest "Toilet whore."'
	'-Thats how it will be clear who you are really, ha ha ha!'
	'Finally, mocking at you, a stranger coming out of the closet.'

	act 'dress':gt 'vokBimbo', 'pos1'
end

if $ARGS[0] = 'pos4':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo4.jpg"></center>'
	'You pretend not to notice anything. Should be about you think that you are so stupid, that mixed up the mens room with a female.'

	act 'wait':gt 'vokBimbo', 'pos1'
	act 'Leave':gt 'vokzalGin'
end

if $ARGS[0] = 'pos5':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo1.jpg"></center>'
	'You ran into the toilet stall and closed. What a shame if somebody saw you were here. Heart was pounding. '

	act 'Run out of toilet':gt 'vokzalGin'
end

if $ARGS[0] = 'pos6':
	cla
	*clr
	minut += 10
	horny += 5
	gs 'stat'
	'<center><img src="images/etogame/vokBimbo2.jpg"></center>'
	'- Come on, who is here with us! - Hear drunken jubilation from the crowd. '

	act 'undress':gt 'vokBimbo', 'pos66'
	act 'Run out of toilet':gt 'vokzalGin'
end

if $ARGS[0] = 'pos66':
	cla
	*clr
	minut += 10
	horny += 30
	cloth_vid = 0
	mop = 0
	gang += 1
	cumass += 1
	cumlip += 1
	vagina += 1
	horand = rand (1, 100)
	gs 'stat'

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

	'<center><img src="images/etogame/vokBimbo66.jpg"></center>'
	'A crowd of local drunks, fuck you in all the cracks, commenting on the vulgar jokes in your address. Pinching and poking you dirty fingers into the anus and mouth.'
	'- To fuck youre beautiful! I had these beauties are not fucked.'
	'- Oooh, Im straight into her pussy nakonchal fuck I last 5 years ago and that guy fucked in the zone.'
	'("Yuck how disgusting!" - You think. "This man is a man fucked in anal passage, and now fucks my tender pussy. Oh Nooo!")'
	'You fucked crowd of men, it seems someone had entered the toilet and succeeds those who have already satisfied. So you have lost count of the men.'
	'Finally, all filled with sperm you stay alone in the bathroom. With some difficulty climbing you collect scattered on the floor stuff.'

	act 'dress':gt 'vokBimbo', 'pos1'
end

--- vokBimbo ---------------------------------
# parkBimbo
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 10
	horny += 5
	gs 'stat'
	'<center><img src="images/etogame/parkBimbo1.jpg"></center>'
	'The old man pointed out to you on his pants, and then you saw the wrinkled, but standing member.'
	'- And what? 67 years old and he was standing in 18 And the thing is charging and pouring, lady!'
	if horny > 50:act 'Mark member of the old mans hand':gt 'parkBimbo', 'pos2'
	act 'Spin the finger at his temple':gt 'gskver'
end

if $ARGS[0] = 'pos2':
	cla
	*clr
	minut += 10
	horny += 10
	cumlip += 1
	bj += 1
	gs 'stat'
	'<center><img src="images/etogame/parkBimbo2.jpg"></center>'
	'You took the old mans cock and took him to a tree. He was taken aback and began to turn his head in search of help. But nowhere to go.'
	' Having got him behind a tree, you immediately began to suck his cock.'
	'Not have to wait long and soon he began to finish.'
	'Oh, oh, lady, thats my present for you in your old age pripodnesla.'
	horand = rand (1, 100)
		 if horand > horny:horny += 10 & 'You were not satisfied'
		 if horand <= horny:horny = 0 & orgasm += 1 & 'You covered orgasm'
	act 'finish':gt 'gskver'
end
--- parkBimbo ---------------------------------
# ptu_dush
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><b><font color="maroon">Women''s shower</font></b></center>'
	'<center><img src="images/etogame/ptu_jen.jpg"></center>'
	'Shower is divided into two sections, a dressing room with lockers and fine wood itself shower with tiled floor and walls. Making sure that no one in the shower, you''re going to lock the door, but with annoyance discover that the castle is not, not even a simple rod, perhaps because it is necessary in public showers or it is done for security purposes. But what to do, you can not walk then smashing. After all, you''re here why do not you?'

	act 'Strip (negative to reputation)':gt 'ptu_dush', 'pos2'
	act 'In the hall':gt 'etoexhib', 'pos33'
end

if $ARGS[0] = 'pos2':
	cla
	*clr
	minut += 15
	teachlevel -= 1
	horny += 3
	hapri = 0
	mop = 1
	sweat = -3
	gs 'stat'
	'<center><b><font color="maroon">shower</font></b></center>'
	'<center><img src="images/etogame/ptu_dush.jpg"></center>'
	'You quickly take a shower, hoping that no one catches you not.'
	act 'Dress and come':gt 'etoexhib', 'pos33'
	end
--- ptu_dush ---------------------------------
# nastja
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/nastja.jpg"></center>'
	'Girl smiling at you in return! What is she cute!'

	act 'Come to meet you.':
		cla
		*clr
		minut += 5
		gs 'stat'
		'<center><img src="images/etogame/nastja.jpg"></center>'
		'You:- Hi! I <<$name>>! Nevozrazhaesh if I sit down? (Funny, thought you acquainted with the girl in the restaurant, just like in the good old days.)'
		'Girl:- Hi! I Nastya. Of course, keep me company!'

		act '- Why do you sit alone, even in a restaurant?':
			cla
			*clr
			nastjaqw = 1
			minut += 60
			gs 'stat'
			'<center><img src="images/etogame/nastja.jpg"></center>'
			'Nastya:- The same question I ask and you!'
			'You:- Well, I have a pretty rough life! Have to be independent.'
			'Nastya:- So I have the same story. Oh, you''d know ...'
			'(You talked for an hour with Nastya, she was surprisingly pleasant conversationalist. Before leaving, you exchanged phone numbers and agreed on Saturdays selected somewhere together.)'

			act 'Leave':gt 'restoran', 'zal'
		end
	end
	act 'Leave':gt 'restoran', 'zal'
end

if $ARGS[0] = 'pos4':
	cla
	*clr
	minut += 30
	gs 'stat'
	'<center><img src="images/etogame/tel_talk.jpg"></center>'
	'Any time you hear beeps. Finally at the end of the call.'
	''
	'You:- Nastya, a greeting! This <<$name>>. Remember me, we met in a restaurant?'
	'Nastya:- Hi, <<$name>>! Well, of course I do!'
	'You:- How about we go out together?'
	'Nastya:- Yes, with pleasure. Come on in half an hour I''ll come after you.'
	'(You give yourself up. Finally, Nastya comes up to you in a taxi and go to the beginning of the offers in the cafe.)'
	act 'Go to cafe':gt 'nastja', 'pos5'
end

if $ARGS[0] = 'pos5':
	cla
	*clr
	minut += 60
	nastjaqw = 2
	gs 'stat'
	'<center><img src="images/etogame/1party0.jpg"></center>'
	'You arrive at a karaoke cafe "Mast".'
	'Nastya:- I like it here, and you can sing and beautiful views of the river. Let''s choose a table on the veranda, I love to sit in the fresh air!'
	'You occupy a table with a beautiful view of the waterfront.'
	'Nastya:- <<$name>>, choose what we drink!'

	act 'Champagne!':gt 'nastja', 'pos6'
	act 'And let''s vodka!':gt 'nastja', 'pos7'
	act 'I do not drink alcohol.':gt 'nastja', 'pos8'
end

if $ARGS[0] = 'pos6':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1shamp0.jpg"></center>'
	'You bring salads and champagne. Nice chatting with you Nastya. It turns out you have a lot in common. Anastasia says that she likes to be the center of attention.'
	'Yes, it outfit on it is really very frank! With her figure to attract attention not be easy.'
	'Meanwhile ends is the second bottle of champagne and you decently hopped thinking whether to tell her about his sexual escapades.'

	act 'Modestly silent and listen only to Nastya.':gt 'nastja', 'pos9'
	act 'Tell us about your very best sex.':gt 'nastja', 'pos10'
	act 'Share everything that happened to you, since you became a girl.':gt 'nastja', 'pos10'
end

if $ARGS[0] = 'pos7':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1party.jpg"></center>'
	'You bring salads, starters and vodka. You will have fun chatting with Nastya. It turns out you have a lot in common. Anastasia says that she likes to be the center of attention. Like when men look at her. And sometimes she is, as it were, by chance, showing them more than I should!'
	'Yes, it outfit on it is really very frank! With her figure to attract attention not be easy.'
	'Meanwhile, a carafe of vodka is half empty and you decently hopped think to tell whether her about his sexual escapades.'

	act 'Tell us about your very best sex.':gt 'nastja', 'pos10'
	act 'Share everything that happened to you, since you became a girl.':gt 'nastja', 'pos11'
end

if $ARGS[0] = 'pos8':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1shamp0.jpg"></center>'
	'Nastya:- Really? Sorry ... Well Well arrange evening tea (smiling at you). You brought salads, tea and sweets. Nice chatting with you Nastya. Anastasia says that her father powerful man in town. Childhood that she gets everything she wants. But, at the same time, it has always attracted "simple pleasures, " she likes to be the center of attention and interaction with people.'
	'Yes, it outfit on it is really very frank! With her figure to attract attention not be easy.'
	'You had a wonderful time. Leaving the cafe Nastya insisted that he would pay the bill herself. You went out and waiting for a taxi. Nastya suddenly notices opposite horizontal bars cafes and happily tells you:'
	'-She asks, I did not hang a hundred years on the bar, went some fun!'

	act 'Go for Nastya':
		cla
		*clr
		horny += 30
		minut += 60
		gs 'stat'
		'<center><img src="images/etogame/1turnik.jpg"></center>'
		'On the bar engaged in local yard boy. Nastya jokingly pushed him right on his high kabluchischah grabs the horizontal bar, spectators and hangs so that her breasts right in front of the poor boy with round eyes. Then she straightens up on straight arms and leg lifts so that the guy opens his mouth involuntarily.'
		'Finally, she jumps off the horizontal bar. And smacking the boy''s cheek and giggling, takes you by the hand and ran towards the taxi drove up.'
		'Now it is clear in the center of any attention she likes to be!'

		act 'Went home':gt 'street'
	end
end

if $ARGS[0] = 'pos9':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/nastja.jpg"></center>'
	'You had a wonderful time. Leaving the cafe Nastya insisted that he would pay the bill herself. You went out and waiting for a taxi.'
	'Nastya:-<<$name>>, listen I want the toilet, I quickly the race for the fence, and you have to guard, okay?'
	'You are:- Why is it so difficult, I want, let''s go back to the cafe?'
	'Nastya:- No, no, all I can not! - With these words she runs for garages.'

	act 'Wait girlfriend':
		cls
		minut += 5
		gs 'stat'
		'<center><img src="images/etogame/1shamp3.jpg"></center>'
		'As luck would turn out because tubby little man and goes in your favor.'

		act 'Warn girlfriend':
			cls
			minut += 5
			gs 'stat'
			'You warn Nastya and she hid quietly finishes his business.'
			'- Thank you, <<$name>>! I''ll go to guard.'

			act 'Go write for the fences':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/etogame/1shamp1.jpg"></center>'
				'You quietly do their business, when suddenly I heard loud voices.'
				'- Wai what nut, what a beauty!'
				'- Hey, what are you doing girl, we''re a den sweep! Are you at home can not piss.'
				''
				'About horror, turning you see two janitors migrant workers! Where did Anastasia looked!'
				'<center><img src="images/etogame/1shamp4.jpg"></center>'
				'- Oh, oh, oh! Do not look, please! - And only you can say, clumsily trying to pull her panties. But the excitement your hands are shaking and it would be convenient if you are bent. While showing her crotch guest workers.'

				act 'Dress and panties leaning vypyachena ass!':
					cls
					horny += 50
					minut += 60
					gs 'stat'
					'<center><img src="images/etogame/1shamp2.jpg"></center>'
					'- Ohh - distributed by the janitors.'

					act 'Run out and leave with Nastya taxi.':gt 'street'
				end
			end
		end

		act 'Peep that will':
			cls
			horny += 30
			minut += 60
			gs 'stat'
			'You do not warn Nastya and peasant skirted you goes beyond the fences, behind which hid Nastya. Minute pause. And suddenly.'
			'- Ooh, girl, you should be ashamed. - I hear the voice of happy peasant cunning.'
			'- Chtooo! Shame on you! Immediately turn away! - Babbles Nastya bare-ass, trying to pull her panties.'
			'<center><img src="images/etogame/1shamp2.jpg"></center>'
			'A minute later she comes out red as a lobster. And you said smiling:- Count up, I was some guy with a naked booty caught.'

			act 'Get in a cab and went home':gt 'street'
		end
	end
end

if $ARGS[0] = 'pos10':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1shamp0.jpg"></center>'
	'Nastia you tell about their sexual experiences. It can be seen that the theme of her much interested. Nastya tells you that it is always brought up in severity. And intimacy with a man she has ever had.'
	'And somehow to throw their sexual energy, it is sometimes fun that engaged Wirth.'
	'You had a wonderful time. Leaving the cafe Nastya insisted that he would pay the bill herself. You went out and waiting for a taxi.'
	'- I figured out how quickly we catch a ride! Look! - Said Nastya drunk.'

	act 'Look at Nastya.':
		cla
		*clr
		horny += 40
		minut += 60
		gs 'stat'
		'<center><img src="images/etogame/1avtostop.jpg"></center>'
		'C that, she rips off her dress and begins to vote in shorts and heels.'
		'Crazy, you think. Fortunately, on the road so no one seemed to. And Nastya chill and getting your adrenaline rush wears dress.'
		'Now it is clear in the center of any attention she likes to be!'
		'Meanwhile, taxi rides.'

		act 'Went home':gt 'street'
	end
end

if $ARGS[0] = 'pos11':
	cla
	*clr
	minut += 5
	gs 'stat'
	'<center><img src="images/etogame/1party2.jpg"></center>'
	'Nastia you tell about their sexual experiences. It can be seen that the theme of her much interested. Nastya tells you that it is always brought up in severity. And intimacy with a man she has ever had.'
	'And somehow to throw their sexual energy, it is sometimes fun that engaged Wirth.'
	'You drank so much, that I could hardly get up from the table. Leaving the cafe Nastya insisted that he would pay the bill herself. You went out and stand embraced.'
	'- <<$name>>, went for a walk along the shore. - Offered Nastya.'

	act 'Down to the river.':
		cls
		horny += 50
		minut += 60
		gs 'stat'
		'<center><img src="images/etogame/1party3.jpg"></center>'
		'- Hey, let''s refresh, all summer I have never bathed! - Squeals Nastya he ran into the cold water.'
		'- Oh, Momma, it''s cold!.'
		'You continue to rage and tear each groomsman dress staying in one, wet underwear.'

		act 'Further':
			cls
			gs 'stat'
			'<center><img src="images/etogame/1party4.jpg"></center>'
			'- Oh, she asks, and suddenly someone is watching us!.'
			'- Then Let''s enjoy it! - With these words, you tear off the livchik and circling it above his head.'

			act 'Further':
				cls
				gs 'stat'
				'<center><img src="images/etogame/1party5.jpg"></center>'
				' '
				'Cool and a little sober, you manage to get dressed up and went out to the road to hail a cab.'

				act 'Wait for a taxi':
					cla
					*clr
					'<center><img src="images/etogame/1party6.jpg"></center>'
					'While waiting for a taxi, you Nastya weaken sat on the curb ...'
					'- Get up, young lady, it''s time to go home! - Suddenly sounded in his ear. It turns out that while waiting for a taxi, I fell asleep. Added a piquant situation that my legs were spread wide. Should be considered cabbie horoshenechko between my legs. Damn Nastya did not even brought my legs together!'
					'I, red with shame and hops sit in a taxi with Nastya.'

					act 'Went home':gt 'street'
				end
			end
		end
	end
end

if $ARGS[0] = 'pos12':
	cla
	*clr
	minut += 10
	manna += 100
	nastjaqw = 3
	gs 'stat'
	'<center><img src="images/etogame/tel_talk.jpg"></center>'
	'Any time you hear beeps. Finally at the end of the call.'
	''
	'You:- Nastya, hello! How are you?'
	'Nastya:- Hi, <<$name>>! Wow we''re in last Saturday walked. I remembered all week. Let''s Put on a swimsuit and plateshko shorter, go down to the beach to sunbath. Tam.Nu meet all kisses, bye-bye!'
	'You:- Ok, I''ll gladly come!'

	act 'Hangup':gt 'telefon', 'fin'
end

if $ARGS[0] = 'pos13':
	cla
	*clr
	minut += 30
	manna += 30
	nastjaday = day
	gs 'stat'
	'<center><img src="images/etogame/tel_talk.jpg"></center>'
	'Any time you hear beeps. Finally at the end of the call.'
	''
	'You:- Nastya, a greeting! What''s new?'
	'Nastya:- Hello, <<$name>>!'
	'(You chatted as much as half an hour. Nastya also said that loves to be photographed. Would have been nice to buy the camera down and go with her out into the countryside.'

	act 'Hangup':gt 'telefon', 'fin'
end

if $ARGS[0] = 'pos14':
	cla
	*clr
	minut += 30
	manna += 30
	nastjaday = day
	nastjaqw = 4
	gs 'stat'
	'<center><img src="images/etogame/2hello.jpg"></center>'
	'You see, Nastya. Her short dresses with exciting cut that you even thought, "How is she does not hesitate to go out then."'
	'Nastya:- Well, finally, I''m tired of waiting already! Went to change into swimsuits.'

	act 'Going to the beach cabin':gt 'nastja', 'pos15'
end

if $ARGS[0] = 'pos15':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><img src="images/etogame/2bcabin.jpg"></center>'
	'You come to the beach huts.'
	'Nastya:- Yeah. It''s not like Vivaldi. - Says Nastya looking at dilapidated cabins.'
	'You:- Okay, go get changed, I''ll wait for you. I even wore a swimsuit at home.'

	act 'Nastya wait':gt 'nastja', 'pos16'
end

if $ARGS[0] = 'pos16':
	cla
	*clr
	minut += 10
	horny += 10
	gs 'stat'
	'<center><img src="images/etogame/2bgirl.jpg"></center>'
	'While waiting for Nastia, you decide to explore the beach and bathing people. You notice where begins nudist beach is out of the water naked girl. And she has such a delicious form that looks all the male part of the beach were fixed on her. You imagine yourself in the place of this girl. And the thoughts, be naked in front of a crowd, you''re a little excited.'
	'Nastya:- I''m ready! Hey, where are you staring. - You hear a voice behind Nastia. You turn around and look at the girl Nastya specify. You see the first surprise, then, sly smile and a twinkle in her eyes. It is evident that it is a sight too much.'
	'You:- disguised? Come choose a comfortable place to sunbathe.'

	act 'Choose a location':gt 'nastja', 'pos17'
end

if $ARGS[0] = 'pos17':
	cla
	*clr
	minut += 60
	manna += 100
	gs 'stat'
	'<center><img src="images/etogame/2bimbos.jpg"></center>'
	'You have the time. Sunbathe, swim, drink milkshakes that Nastya picked up from home. Photograph on lake background. And potehonku start to get tired.'
	'Nastya:- This girl who bathed naked. You would be able to so, take and undress in front of strangers? - With a smile asks you Nastya. Turns me so I always what you dreamed this, but shy and afraid that think about.'

	act 'Interested in':gt 'nastja', 'pos19'
	act 'Not interested':gt 'nastja', 'pos18'
end

if $ARGS[0] = 'pos18':
	cla
	*clr
	minut += 20
	gs 'stat'
	'<center><img src="images/etogame/2bend.jpg"></center>'
	'You:- I do not think that it''s okay to show her body to strangers. In addition, dangerous, may think that you are easily accessible and start to molest or rape. Besides, now all phones with a good camera can take pictures and put it on the Internet.'
	'Nastya:- Yeah, maybe you''re right. It''s just a fantasy.'
	'You have talked to various women''s issues and zasobiralis home.'

	act 'Home':gt 'street'
end

if $ARGS[0] = 'pos19':
	cla
	*clr
	minut += 10
	manna += 100
	horny += 30
	gs 'stat'
	'<center><img src="images/etogame/2btalk.jpg"></center>'
	'You:- I also fantasized on the subject. It''s very exciting when you watch. Of course, there is a risk that someone will respond correctly, some naoret grandmother. Or phone sfotkayte and then lay out in the internet. But, really want to try.'
	'Nastya:- I have an idea, now check how we are brave. You see guys play ball, went to play with them ... topless?'
	'You look around the sides. Around full of people. Including men and boys. You and admired before, but that would be bare-chested. You even blushed a little. But Nastya already untied the strap in his bathing suit. Nowhere to retreat.'

	act 'Bare breasts':gt 'nastja', 'pos20'
end

if $ARGS[0] = 'pos20':
	cla
	*clr
	minut += 20
	manna += 30
	gs 'stat'
	'<center><img src="images/etogame/2bvolley.jpg"></center>'
	'Nastia you are standing in the midst of the beach with bare chest. You literally nape feel chained to you views.'
	'"- Where are you looking at, dog!" - Sounds somewhere nearby. "Biff!" A woman bet a peasant magazine over the cap. Apparently someone so admired the views that he forgot about his wife.'
	'Nastya:- Well, nothing terrible has happened. Went to play.'
	'You play ball with the guys and girls. Any inconvenience, except that ridiculous bouncing breasts during the game. To the delight of the boys and girls envy.'

	act 'Finish the game':gt 'nastja', 'pos21'
end

if $ARGS[0] = 'pos21':
	cla
	*clr
	minut += 20
	nastjaqw = 5
	gs 'stat'
	'<center><img src="images/etogame/2bslp.jpg"></center>'
	'Plenty enough of you return to your seat and lying, no one is shy, spreading his arms and showing off her body to everyone.'
	'Nastya:- <<$name>>, imagine how all these louts want us now. Language and would like to show. Hee-hee.'
	'You have a little lie on the beach and decided it''s time to get ready.'

	act 'Home':gt 'street'
end

if $ARGS[0] = 'pos22':
	cla
	*clr
	minut += 10
	manna += 100
	nastjaQW = 6
	gs 'stat'

	'<center><img src="images/etogame/tel_talk.jpg"></center>'
	'what-While you hear beeps. Finally.'
	'Nastya: - Hello? (you hear a sad voice Nasty)'
	'Do_You: - Nastya, hi! How is it going? Why are you so sad?'
	'Nastya: - Hello! Yup, like_this, trouble at work.'
	'Do_You: - Fair_Enough, come to me, open a bottle of wine, and you tell me everything. What have you got there at work.'
	'Nastya: - Thank_U, Sveta! I will come!'

	act 'Hang up':gt 'nastja', 'pos23'
end

if $ARGS[0] = 'pos23':
	cla
	*clr
	minut += 30
	nastjaday = day
	gs 'stat'

	'<center><img src="images/etogame/nast_home.jpg"></center>'
	'After half-hours doorbell rings.'
	'You see Nastya. Without makeup and in casual clothes, she looks so cute.'
	'You Nastya is convenient to arrange a room on the couch, open a bottle of wine and start telling each other their secrets.'
	'From the conversation , everyone thinks Nastya, just beautiful and you agree with them. She is a good student and is constantly looking for-something new in life. She has quite a strong character, You ''ve seen how she argued with those who were older or more of its. Also, who_are, as it considers, below its status. however, this does not prevent her from making friends, whom she had a whole sea.'
	'Also, Nastya could not last long at any work. First, and then fired under various pretexts, or she goes, speaking, what_is "such work is not for me".'
	'Do_You: - Is_Not_Clear, What you can not work, because the location is excellent?!'
	'Nastya: - Yup,but_the...'

	act 'further_On':gt 'nastja', 'pos24'
end

if $ARGS[0] = 'pos24':
	cla
	*clr
	minut += 120
	energy -= 20
	manna = manna + 10
	willpower = willpower + 10
	alko += 2
	water = water + 5
	son = son + 5
	horny += rand(10,30)
	gs 'stat'

	'<center><img src="images/etogame/wines.jpg"></center>'
	'In the meantime.'
	'Do_You: - It would be necessary that-something to eat. Come ''ll order pizza, reluctantly cook.'
	'(You call to order a pizza and order a large pizza hot.)'
	''
	'(you see, Nastya for a moment about what-then thought .)'
	'Nastya: - Sveta, Let''s listen to fun too. I ''ve seen on the Internet. Girl orders a pizza, and she throws a towel over his naked body, type of the shower ran. Well, towel "by_chance" flies down. I have long dreamed of such, but one house nizachto would not risk. And you is not scared.'

	act 'agree':gt 'nastja', 'pos26'
	act 'Opt_Out':gt 'nastja', 'pos25'
end

if $ARGS[0] = 'pos25':
	cla
	*clr
	minut += 30
	energy += 20
	money -= 100
	gs 'stat'

	'<center><img src="images/etogame/nast_home.jpg"></center>'
	'Nastya: - hmmm, bore you Sveta!'
	'You have half an hour chattering, eat pizza delivered and followed up Nastya taxi.'

	act 'Back_Home':gt 'korr'
end

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

	'<center><img src="images/etogame/nast_home.jpg"></center>'
	'Do_You: - ahaha! I do not even know! Come on. And who will pay the price? You or I? hee-hee.'
	'Nastya: - Bring_It_On, Both will be in towels, and then how it goes!'
	'(The doorbell rings)'
	'As long as you have discussed your shameless plan, the provider has already come. You look at Nastya, she did not have time to undress completely and stands in his underwear. You also only one towel.'

	act 'go to open':gt 'nastja', 'pos27'
	act 'View with a smile on Nastya':gt 'nastja', 'pos29'
end

if $ARGS[0] = 'pos27':
	cla
	*clr
	minut += 10
	horny += rand(10,20)
	gs 'stat'

	'<center><img src="images/etogame/2del.jpg"></center>'
	'You asked who was there, and you responded "pizza Delivery".'
	'On the threshold stood a friendly young man .'
	'It seems he was not confused, then, that you were in a towel.'
	'How can throw this towel, to look casually slip in your head. you understand, that a young man waiting for payment, and the money you have in your wallet. This is your chance, you go to the purse, and report the required amount, relax the towel, just holding his hand. Nasty nowhere to be seen, but you think you hear a little chuckle perceptible. When you turn to the front door, you notice that the peddler curiously looks into the depths of the apartment, but seeing you immediately opeshivaet.'

	act 'give money':gt 'nastja', 'pos28'
end

if $ARGS[0] = 'pos28':
	cla
	*clr
	minut += 10
	horny += rand(30,50)
	exhibi += 2
	gs 'stat'

	'<center><img src="images/etogame/towel.jpg"></center>'
	'You give money and at this point the towel fall to the ground. "oh" you scream and stretch the money, but boy standing stock-still and staring at your body. Then you bend to pick up a towel and overlook your ass. At_Last, one hand holding a towel, and the other holding money. You say goodbye to a peddler.'
	'- oh,oh, oh i''m sorry, how can it be!'
	'- nothing, heh. This_Happens. You have a beautiful body...heh.'

	act 'close the door':gt 'nastja', 'pos30'
end

if $ARGS[0] = 'pos29':
	cla
	*clr
	minut += 10
	horny += rand(10,30)
	exhibi += 1
	gs 'stat'

	'<center><img src="images/etogame/2nastdel.jpg"></center>'
	'You smile Nastya. she, blushed and took a deep breath, ran to open the door.'
	'- good afternoon, your... the_pizza!(from_The-Nasty behind you looked at the peddler. Little man was taken aback and stole glances at the magnificent young body.)'
	'- Oh ya, at_last-I quench your hunger. (Said as much as possible and sexier Nastya licked. You could not resist and burst out laughing.)'
	'Jagger has two minutes counting two outstretched bills while staring at the wall chest, then even tried that-say something, but said nothing. Finally Nastya, Say Thank You, slammed the door almost pinched his nose.'

	act 'pop!':gt 'nastja', 'pos30'
end

if $ARGS[0] = 'pos30':
	cla
	*clr
	minut += 30
	energy += 20
	gs 'stat'

	'<center><img src="images/etogame/2_towel.jpg"></center>'
	'- ahaha, damn_it, pipets!!!.'
	'(You Nastya squealing in delight from PROGRESS)'

	if exhibi = 1:'- Sveta, I put the phone on the record and all filmed.'
	if exhibi = 2:'- Sveta, I shot everything on camera, Do not be afraid of your face there to be seen.'

	'You talked about their experiences. revised video. How else can come up with mischief.'
	'Looks like you both liked naked in public, this caused a huge surge of adrenaline.'
	'You had a great time and agreed with Nastya will call the next day.'

	act 'further_On':gt 'korr'
end

if $ARGS[0] = 'pos31':
	cla
	*clr
	minut += 10
	manna += 100
	nastjaQW = 7
	gs 'stat'

	'<center><img src="images/etogame/tel_talk.jpg"></center>'
	'what-While you hear beeps. Finally.'
	'Nastya: - Hello, Sveta, hi! I have the news, remember our video with a pizza delivery?'
	'Do_You: - This will not forget!'
	'Nastya: - so, I showed it to my friend the photographer, sorry could not resist, he said, would buy it from me for good money. '
	'Do_You: - come on, cool.'
	'Nastya: - said: "remove More, persons will be more expensive" although i, show categorically against persons!'
	'Do_You: - and I.'
	'Nastya: - Well, are ideas, Call, hee-hee!'
	'Do_You: - So_Long-as_long_as.'

	act 'Hang up':gt 'korr'
end

--- nastja ---------------------------------
# Timofei
minut += 1
sosedDay = day
gs 'stat'
'<center><img src="images/qwest/sosed/sosed.jpg"></center>'
'Timothy shakes ashes in a jar and you nod "Hello."'

act 'Say hello and leave':gt 'etoexhib', 'pos51'

act 'Chat':
	cls
	minut += 15
	Sosed += 1
	gs 'stat'
	'<center><img src="images/qwest/sosed/sosed.jpg"></center>'

	if sosedSlut = 0:
		if sosed = 1:
			'Timothy says that studying in college and soon it will end.'
		elseif sosed = 2:
			'Timothy says that he lives with his mother, his father lives in a divorce with his mother and live with another family.'
		elseif sosed = 3:
			'Timothy tells us that soon he will finish studying for law and father promised to give him a car.'
		elseif sosed = 4:
			'Timothy says that he and his childhood studying dance and still, he and his team are sometimes the house of culture.'
		elseif sosed = 5:
			'Timothy tells us that in the evenings he earns repairing computers.'
		elseif sosed = 6:
			'Timothy says that after college he was going to go to college, that he had not been taken into the army.'
		elseif sosed >= 7:
			'Timothy fun talking to you about life, computers, wheelbarrows.'
		end
	elseif sosedSlut = 1:
		'You are trying to strike up a conversation, but Timothy responsible monosyllables and extinguished a cigarette goes home.'
	end

	act 'Say goodbye and leave':gt 'etoexhib', 'pos51'
end

--- Timofei ---------------------------------
# TimofeiMetro
minut += 1
sosedMetroDay = day
gs 'stat'
! Missing Image
!!'<center><img src="images/qwest/sosed.jpg"></center>'
'Timothy saw you and said hello, "Hello <<$name>>."'

if cumfrot= 0 and cumface = 0 and sosedSlut = 0:'You chatted with Timothy while riding the subway.'

if sosedSlut = 1:
	'After greeting Timothy all kind shows that he is not interested in your further communication.'
elseif sosedSlut = 0:
	if cumfrot > 0 or cumface > 0:
		sosedSlut = 1

		if cumface > 0:
			'He looked puzzled at your face. "<<$name>>, your face is smeared in something." He stared at you and after a moment he realized that you cum on her face. "What''s that? Cum?"'
		else
			'He started chatting with you fun, then suddenly noticed semen on your clothes, his eyes widened noticeably "What''s that? Cum?"'
		end

		act 'Excuses':
			cls
			gs 'stat'
			'You began to make excuses, claiming that it is all an accident and you are absolutely innocent. But Timothy frankly do not believe you and listen to you without interest.'

			act 'Get out of the car':gt 'metro', 'start'
		end
	end
end

act 'Get out of the car':gt 'metro', 'start'

--- TimofeiMetro ---------------------------------
# balkon
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Apartment Balcony</font></b></center>'

	if $clothingworntype = 'nude':
		'<center><img src="images/community/balcony_naked1.jpg"></center>'
	elseif tanga = 0:
		'<center><img src="images/community/balcony_dressed1.jpg"></center>'
	else
		'<center><img src="images/community/balcony_underwear1.jpg"></center>'
	end

	'You went to the balcony.'

	if hour >= 0 and hour <= 6:
		'It''s dark outside. Street lamps illuminate the empty street below.'
	elseif hour = 7:
		'Morning is dawning out on the street, birds are singing in the trees.'
	elseif hour >= 8 and hour <= 19:
		'It''s clear day out on the street. You can see some people walking by.'
	elseif hour >= 20 and hour <= 23:
		'It''s twilight and the street below you is dimly lit.'
	end

	if $clothingworntype = 'nude':
		if sosedBalDay ! day:
			if rand(1, 4) = 4:
				'A neighbor from the opposite building is out on his balcony and looking at your naked body.'
				act 'Look at the neighbor':gt 'balkon2', 'sosed'
			else
				'No one pays you any attention.'
			end
		else
			'No one pays you any attention.'
		end
	end

	if sigaret >= 1:act 'Light a cigarette':gt 'balkon2', 'kurit'

	!!!Probably CV edition
	if horny >= 50:
		act 'Masturbate':gt 'balkon2', 'masopt'
	end
	!!!

	act 'Approach the railing':gt 'balkon2', 'niz'
	act 'Leave the balcony':gt 'sitr'
end

--- balkon ---------------------------------
# balkon2

if $ARGS[0] = 'kurit':
	cla
	clr
	*clr
	minut += 10
	vikureno += 1
	sigaret -= 1
	son += 1
	gs 'stat'
	'<center><img src="images/etogame/kurit.jpg"></center>'
	'You lit a cigarette...'

	act 'Throw a cigarette over the railing...':gt 'balkon', 'start'
end

if $ARGS[0] = 'demo1':
	cla
	clr
	*clr
	horny += rand(30, 50)
	minut += 5
	sosedBalDay = day

	if exhibi = 2:exhibi = 3

	gs 'stat'
	'<center><font size="5" color="maroon"><b>Balcony</b></font></center>'

	if tanga = 1:'<center><img src="images/community/balcony_underwear3.jpg"></center>'
	if tanga = 0:'<center><img src="images/community/balcony_naked3.jpg"></center>'

	'<center>You defiantly posing on the balcony, to the delight of the neighbor. He eagerly looking at you furiously masturbate. 5 minutes later he came and went to his apartment.</center>'

	act 'Further':gt 'balkon', 'start'
end

if $ARGS[0] = 'palec1':
	cla
	clr
	*clr
	horny += rand(10, 30)
	minut += 1
	sosedBalDay = day
	gs 'stat'

	if tanga = 1:'<center><img src="images/community/fuckyou_underwear.jpg"></center>'
	if tanga = 0:'<center><img src="images/community/fuckyou_naked.jpg"></center>'

	'<center>You showed neighbor thumb and he was gone from the balcony.</center>'

	act 'Further':gt 'balkon', 'start'
end

if $ARGS[0] = 'niz':
	cla
	clr
	*clr
	gs 'stat'

	if alcohol < 12:
		if $clothingworntype = 'nude':
			'<center><img src="images/community/balcony_naked2.jpg"></center>'
		elseif tanga = 1:
			'<center><img src="images/community/balcony_underwear2.jpg"></center>'
		else
			'<center><img src="images/community/balcony_dressed2.jpg"></center>'
		end

		act 'Enjoy the view':
			if hour >= 8 and hour <= 19:
				'<center><img src="images/etogame/bal1.jpg"></center>'
			else
				'<center><img src="images/etogame/bal2.jpg"></center>'
			end

			'You look at the panorama from your private balcony.'

			act 'Further':gt 'balkon', 'start'
		end
	else
		'You had no idea your apartment was so high. You don''t feel comfortable there ...'

		act 'Further':gt 'balkon', 'start'
	end
end

if $ARGS[0] = 'sosed':
	cla
	clr
	*clr
	gs 'stat'
	'<center><b><font color="maroon">Balcony</font></b></center>'
	'<center><img src="images/etogame/sosed.jpg"></center>'
	'<center>Neighbor on the left on the balcony, looking at you carefully.</center>'

	act 'Demonstrate your body':gt 'balkon2', 'demo1'
	act 'Show pervert thumb':gt 'balkon2', 'palec1'
end

!!!Probably CV edition
if $ARGS[0] = 'masopt':
	cla
	*clr
	clr
	gs 'stat'
	minut += 15
	mastr += 1
	manna += 15
	willpower += 15
	horny = 0
	orgasm += 1
	'<center><img src="images/community/balcony_dildo.jpg"></center>'

	if dildo = 1:
		act 'Masturbate your pussy with your dildo':
			cla
			*clr
			vagina += rand(0, 2)
			badildo = rand(1, 2)

			if badildo = 1:'<center><img src="images/community/balcony_dildo1.jpg"></center>'
			if badildo = 2:'<center><img src="images/community/balcony_dildo2.jpg"></center>'

			'After pleasuring yourself intensily with the dildo you reach the orgasm and feel more calm.'

			act 'Finish':gt 'balkon', 'start'
		end

		act 'Masturbate and use your dildo with your ass':
			cla
			*clr
			minut += 10
			analorgasm += 1
			anal += 1
			anus += rand(0, 2)
			'<center><img src="images/community/balcony_anal1.gif"></center>'
			'I feel that my whole ass is burning'

			act 'Continue':
				cla
				*clr
				'<center><img src="images/community/balcony_anal2.gif"></center>'
				'An immense pleasure overtake you. Your body shivers like in the cold.'

				act 'Go back':gt 'balkon', 'start'
			end
		end
	end

	act 'Masturbate':
		cla
		*clr
		vagina += rand(0, 1)
		gt 'balkon2', 'finger'
	end
end

if $ARGS[0] = 'finger':
	cla
	*clr
	clr
	'<center><img src="images/community/balcony_mas1-1.jpg"></center>'
	'You lick your fingers preparing them for your pussy.'

	act 'Insert finger':
		cla
		*clr
		'<center><img src="images/community/balcony_mas1-2.jpg"></center>'
		'Slowly put my finger into my pussy.'

		act 'Next':
			cla
			*clr
			'<center><img src="images/community/balcony_mas1-3.jpg"></center>'
			'I feel like in heaven. Slowly my pussy gets wet.'

			act 'Stand':
				cla
				*clr
				'<center><img src="images/community/balcony_mas1-4.jpg"></center>'
				if exhibi >= 0:

					if exhibi = 1:exhibi = 2
					'You look around to see if you have an audience.'

					visit = rand(0, 0)

					if visit = 0:
						vagina += 1
						'You can''t see anyone.'

						act 'Insert fingers':gt 'balkon2', 'finger_solo'
					else
						'I notice that someone seems to be enjoying the show as much as I am.'

						!!act 'Invite':gt 'balkon2', 'beatafriend'
						act 'Ignore and continue to play':gt 'balkon2', 'finger_solo'
					end
				else
					'Overtaken by the thrill of the risk of being caught in so a compromising act and the exciment of your skilled fingers you enjoy a great orgasm.'
					'Still a bit dizzy, you try to gather your clothes.'

					act 'Dress up':gt 'balkon', 'start'
				end
			end
		end
	end
end

if $ARGS[0] = 'finger_solo':
	cla
	*clr
	clr
	'<center><img src="images/community/balcony_mas1-5.jpg"></center>'
	'The feeling is now so intense that you ignore everything surrounding you.'

	act 'Next':
		cla
		*clr
		'<center><img src="images/community/balcony_mas1-6.jpg"></center>'
		'Your pussy is so wet that it is leaking liquids and you cant think in nothing else than ... Faster!Faster!'

		act 'Faster':
			cla
			*clr
			'<center><img src="images/community/balcony_mas1-7.jpg"></center>'
			'Ohh ahh...'

			act 'Faster':
				cla
				*clr
				'<center><img src="images/community/balcony_mas1-8.jpg"></center>'
				'Ohh ahh...'

				act 'Do it':
					cla
					*clr
					'<center><img src="images/community/balcony_mas1-9.jpg"></center>'
					'You can''t hold any longer!'

					act 'Orgasm':
						cla
						*clr
						'<center><img src="images/community/balcony_orgasm.jpg"></center>'
						'You are shivering after such an intense pleasure. You can see some of your neighbours even aplauding your performance.'
						'A bit surprised with the audience you try to gather your clothes.'

						act 'Dress Up':
							cla
							*clr
							'<center><img src="images/community/balcony_mas1-10.jpg"></center>'

							act 'Leave':gt 'balkon', 'start'
						end
					end
				end
			end
		end
	end
end
!!!

--- balkon2 ---------------------------------
# dom_gor
act 'On 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 take to the streets.</font></b>'
		xgt $curloc
	else
		xgt 'gorodok'
	end

end
$metkaM = $ARGS[0]
$locM = $CURLOC
clr
gs 'stat'
gs 'time'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'<center><b><font color="maroon">Your room</font></b></center>'
'<center><img src="images/etogame/kom_gor.jpg"></center>'
'Your room in a hostel. The room is small, there is only the minimum necessary. 2 sleepers, <a href="exec:gt ''gor_mirror'', ''start''">mirror</a>, <a href="exec:gt ''gor_exh'', ''pos1''">hanger</a>, <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">cupboard</a> for things and a small TV.'

if cloth_vid = 2 and teachlevel > 20 and parkrunday ! day and hour < 21 and hour > 6:
	act 'Jogging on the Square (1:00)':
		cla
		*clr
		parkrunday = day
		minut += 30
		manna += 10
		willpower -= 10
		beg += 1
		fat -= 8
		speed += 1
		sweat += 3
		! WD: Remove Dupe Images ~ '<center><img src="images/pic/parkbeg.jpg"></center>'
		'<center><img src="images/etogame/parkbeg.jpg"></center>'
		'You did a few laps around the park. Out of breath, sweaty and tired.'
		parkrand = rand (0, 10)

		if parkrand > 4 and beguch < 3:
			'In the park you met a disciple of the school and asked to go for a run with you.'
			act 'Run together':
				cla
				*clr
				beguch += 1
				'<center><img src="images/etogame/stop.jpg"></center>'
				'You run with the pupil sometimes stopping and chatting with ease.'
				'Disciple:- Svetlana, you are so beautiful, you are all so fond of! You:- Hmm, thank you!'

				act 'Complete a run':gt 'gskver'
			end
		elseif parkrand >4 and beguch >= 3 and beguch < 6:
			'In the park you met a disciple of the school and asked to go for a run with you.'

			act 'Run together':
				cla
				*clr
				beguch += 1
				'<center><img src="images/etogame/stop2.jpg"></center>'
				'Have you stopped to do stretching exercises muscles.'
				'Disciple:- Ahh if our girls would be at least a little like you! You:- You just got used to them, get to know them!'
				act 'Complete a run':gt 'gskver'
			end
		elseif parkrand >4 and beguch >= 6 and beguch < 9:
			'In the park you met a disciple of the school and asked to go for a run with you.'
			act 'Run together':
				cla
				*clr
				beguch += 1
				horny += 3
				'<center><img src="images/etogame/stop3.jpg"></center>'
				'You run with the pupil sometimes stopping and chatting with ease.'
				''
				'Disciple:- Svetlana, can I take a picture of you! You are:- What are you going to do then with my photo, and the wretch!'
				'Disciple:- No, no, I will not forgive her masturbate! You:- Aha! I did not say that!'
				'Student:- Im sorry, was a bad idea. You:- Yes, Im kidding! Fotkay, just me then do not forget to copy.'
				''
				'You picked up a background, stood in a pose and you photographed.'
				act 'Complete a run':gt 'gskver'
			end
		end

		act 'Complete a run':gt 'gskver'
	end
end

if hour < 23:
	act 'Lie on the couch (1:00)':
		cla
		minut += 60
		if son < 30:
			son += 5
		else
			son = 29
		end
		'I relax lying on the couch.'

		act 'Stretch':gt 'dom_gor'
	end
end

if hour >= 23:
	act 'Sleep in a bed':
		cla
		*clr
		tanga = 1
		health += 5
		hapri = 0
		InSleep = 1
		cloth_vid = 0
		gs 'stat'
		'<center><img src="images/pics/son.jpg"></center>'
		if analplugIN = 1:analplugIN = 0 & 'Before going to bed you remove the butt plug.'
		if vibratorIN = 1:vibratorIN = 0 & 'Before going to bed you remove the vibrator.'
		if mop > 1:mop = 0 & vidageday -= 1 & 'Cosmetics smeared face, you think that looks bad for sleeping with makeup, skin ages faster from it.'

		'You slept'

		act 'Get Up':
			cla
			InSleep = 0
			minut += 480
			son = 30
			gt 'dom_gor'
		end
	end
end

if eda > 0:'In the refrigerator stored food that''s good for <b><<eda>></b> servings.'
if edaD = 0 and eda = 0:'<b><font color="red">The fridge is almost empty, nothing to eat at all.</font></b>'
if edaD > 0:'The refrigerator is kept healthy meal that''s good for <b><<edaD>></b> servings.'

if eda >= 1:
	act 'Prepare meals (2:00)':
		cla
		*clr
		eda -= 1
		minut += 120
		frost = 0
		edahot = 0
		health += 10
		manna += 20
		gs 'stat'

		if energy >= 30:
			fat += 2
			'You do not want to eat and drink.'
		elseif energy < 30:
			energy += 25
			fat += 1
			'You gladly ate.'
		end

		if water < 20:
			water += 20
			'You gladly drank a cup of tea.'
		elseif water >= 20:
			'You don''t need any more tea.'
		end
		act 'Get up from the table':gt 'dom_gor'
	end
end

if edaD > 0:
	act 'Eat diet food (0:30)':
		cla
		*clr
		frost = 0
		minut += 30
		health += 10
		manna += 20
		edaD -= 1
		'<center><img src="images/pics/food.jpg"></center>'
		if energy >= 30:
			'You can no longer eat.'
		elseif energy >= 20 and energy < 30:
			energy += 10
			'You pushed through the power of a meal.'
		elseif energy < 20:
			energy += 20
			'You gladly ate cooked food.'
		end

		if water >= 20:
			'You don''t need any more tea.'
		elseif water < 20:
			water += 20
			'You gladly drank a cup of tea.'
		end

		act 'Get up from the table':gt 'dom_gor'
	end
end

if gor_dorm > 0:act 'In a shared bathroom':gt 'etoexhib', 'pos41'

--- dom_gor ---------------------------------
# comendant
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 10
	gs 'stat'
	'<center><b><font color="maroon">commandant hostel</font></b></center>'
	'<center><img src="images/etogame/comendant.jpg"></center>'
	'Commandant ulybchiv hostel and friendly.'
	act 'Become acquainted':gt 'comendant', 'pos2'
end

if $ARGS[0] = 'pos2':
	cla
	*clr
	minut += 5
	gor_dorm = 1
	gs 'stat'
	'<center><b><font color="maroon">commandant hostel</font></b></center>'
	'<center><img src="images/etogame/comendant.jpg"></center>'
	'You:- Good afternoon! I am in the direction of the school, so all the necessary documents.'
	'...'
	'- Yes, it seems all right. Welcome to our town. My name is Peter, you can simply Petya.'
	'- <<$name>>.'
	'- So will teach, well, this is lucky to get such a tomboy charming teacher.'
	'- Thank you.'
	'- So, here are your keys, the room number on the key fob. Kitchen and bathroom at the end of the corridor, although the water often disable the utility. If there are problems, please contact me.'
	act 'In the room':gt 'dom_gor'
end

if $ARGS[0] = 'pos3':
	cla
	*clr
	minut += 5
	gor_dorm = 3
	gs 'stat'
	'<center><b><font color="maroon">commandant hostel</font></b></center>'
	'<center><img src="images/etogame/comendant_what.jpg"></center>'
	'You:- Hello! It''s just a mess, you saw in what condition the pipe in the bathroom. Because the water turned off and that the pipes from nothing left.'
	'...'
	'- Ooh, what you say.'
	'- Yes, I myself checked the riser, and I can show you come on.'
	'- It''s an outrage! I immediately call a plumber. So here''s the thing.'
	'- Hmm, I hope ...'
	'- I immediately take measures, thank you. Sorry for the inconvenience.'
	'(Hmm, strange type)'
	act 'In the room':gt 'dom_gor'
end

--- comendant ---------------------------------
# portmirror
$portmirror = {
	cla
	*clr
	'<center><img src="<<FUNC(''$face_image'')>>"></center>'
	'<<$hair>> <<$mop>> <<$skin>> <<$vnesh>>'
	if daystart < 10 and StoryLine = 0:'In the mirror, you looked quite strange woman''s face which is exactly copied all your actions. You hardly get to accept the idea that it is now is you.'
	if daystart >= 10 and daystart < 30 and StoryLine = 0:'From the mirror looks at you a woman''s face, to which you have become accustomed to, but sometimes, no, no and yes flash the idea that it is not your face.'
	if kosmetica > 0:'Cosmetics <<kosmetica>>'
	if kosmetica = 0:'You have no makeup.'

	if lipbalm > 0:'Lip Balm <<lipbalm>>'
	if lipbalm = 0:'You have no lip balm left.'

	if hapri = 0 and AutoHapri = 1:
		minut += 3
		hapri = 1
		'You brush your hair'
	end

	if mop = 1 and kosmetica > 0 and AutoMakeup = 1:
		mop = AutoMakeupType
		if kosmetica < 3 and mop = 4:mop = 3
		if kosmetica < 2 and mop = 3:mop = 2
		if kosmetica < 1 and mop ! 1:
			mop = 1
			'You have no make-up left'
		else
			if mop = 2:
				'Applied light make-up'
				minut -= 3
				kosmetica -= 1
			end

			if mop = 3:
				'Applied natural make-up'
				minut -= 5
				kosmetica -= 2
			end

			if mop = 4:
				'Applied heavy make-up'
				minut -= 10
				vidageday -= 1
				kosmetica -= 3
			end
		end
	end

	if lipbalm > 0 and lipbalmstat <= 0 and AutoLipBalm = 1:
		minut -= 10
		lipbalm -= 1
		lipkoef += rand(5, 15)
		if lipkoef > 50:
			lipkoef = 0
			lip += 1
		end

		lipbalmstat += 8
		'You smeared lip moisturizing balm'
	end

	if hapri = 0:
		act 'Brush your hair':
			cla
			minut += 3
			hapri = 1
			act 'View results':dynamic $portmirror
		end
	end

	if mop = 1 and kosmetica > 0:
		act 'Apply makeup':
			cla
			*clr
			'<center><img src="images/etogame/mop.jpg"></center>'
			act 'Light make-up':
				cla
				minut += 3
				kosmetica -= 1
				mop = 2
				recmop = mop
				'You legonechko summed eyes and lips a little tint.'
				act 'View results':dynamic $portmirror
			end

			if kosmetica >= 2:
				act 'Natural makeup':
					cla
					minut += 5
					kosmetica -= 2
					mop = 3
					recmop = mop
					'You lipstick, summed up his eyes and eyelids.'
					act 'View results':dynamic $portmirror
				end
			end

			if kosmetica >= 3:
				act 'Heavy makeup':
					cla
					minut += 10
					kosmetica -= 3
					vidageday -= 1
					mop = 4
					recmop = mop
					'You densely nakrasili eyes, eyelids and mascara, lip contour nakrasili pencil and lipstick.'
					act 'View results':dynamic $portmirror
				end
			end
		end
	end

	if lipbalm > 0 and lipbalmstat <= 0:
		act 'Smear lip balm moisturizing':
			cla
			minut += 10
			lipbalm -= 1
			lipkoef += rand(5, 15)
			if lipkoef > 50:
				lipkoef = 0
				lip += 1
			end

			lipbalmstat += 8
			'You smeared lip moisturizing balm.'
			act 'View results':dynamic $portmirror
		end
	end

	act 'Move away from the mirror':
		cla
		if $gt2 = '':
			if $gt1 = 'stwork':dynamic $striptoilet
			if $gt1 = 'kafedinamic':dynamic $kafetualet
			if $gt1 = 'vokzalGin':
				if vokzalToilet = 1:dynamic $din_vokzalg_toilet_f
				if vokzalToilet = 2:dynamic $din_vokzalg_toilet_m
			end
			if $gt1 ! 'stwork' and $gt1 ! 'kafedinamic' and $gt1 ! 'vokzalGin':gt '<<$gt1>>'
		else
			gt '<<$gt1>>', '<<$gt2>>'
		end
	end
}
--- portmirror ---------------------------------
# gor_mirror
if $ARGS[0] = 'start':
	cla
	clr
	'<center><img src="<<FUNC(''$face_image'')>>"></center>'
	'<<$hair>> <<$mop>> <<$skin>> <<$vnesh>>'

	if kosmetica > 0:'Cosmetics <<kosmetica>>'
	if kosmetica = 0:'You have no makeup.'

	if hapri = 0:
		act 'coiffured':
			cla
			minut += 3
			hapri = 1

			act 'View results':gt 'gor_mirror', 'start'
		end
	end

	if mop = 1 and kosmetica > 0:
		act 'Apply makeup':
			cla
			*clr
			'<center><img src="images/etogame/mop.jpg"></center>'

			act 'Light make-up':
				cla
				minut += 3
				kosmetica -= 1
				mop = 2
				'You legonechko summed eyes and lips a little tint.'

				act 'View results':gt 'gor_mirror', 'start'
			end

			if kosmetica >= 2:
				act 'normal makeup':
					cla
					minut += 5
					kosmetica -= 2
					mop = 3
					'You lipstick, summed up his eyes and eyelids.'

					act 'View results':gt 'gor_mirror', 'start'
				end
			end

			if kosmetica >= 3:
				act 'calling makeup':
					cla
					minut += 10
					kosmetica -= 3
					vidageday -= 1
					mop = 4
					'You heavily nakrasili eyes, eyelids and mascara, lip contour nakrasili pencil and lipstick.'

					act 'View results':gt 'gor_mirror', 'start'
				end
			end
		end
	end

	if lipbalm > 0 and lipbalmstat <= 0:
		act 'Smear lip balm moisturizing':
			cla
			minut += 10
			lipbalm -= 1
			lipbalmstat += 8
			lipkoef += rand(5, 15)

			if lipkoef > 50:
				lipkoef = 0
				lip += 1
			end

			'You smeared lip moisturizing balm.'

			act 'View results':gt 'gor_mirror', 'start'
		end
	end

	act 'Move away from the mirror':
		cla
		gt 'dom_gor'
	end
end

--- gor_mirror ---------------------------------
# gor_exh
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 5
	gs 'stat'

	if cloth_vid = 1:
		'<center><img src="images/etogame/cloth_bimbo.jpg"></center>'
	else
		'<center><img src="<<FUNC(''$face_image'')>>"></center>'
	end

	if $clothingworntype = 'nude':
		if tanga = 0:'<center><img src="images/etogame/fat2.jpg"></center>'
		if tanga = 1:'<center><img src="images/etogame/fat1.jpg"></center>'
	end

	if exhibi >= 2 and ski = 1 and hcol = 3 and lip >= 3 and skin >= 2 and mop = 4 or glamur = 1 and hcol = 3 and lip >= 3 and skin >= 2 and mop = 4:
		act 'Dress like Bimbo':
			cla
			*clr
			cloth_vid = 1
			'<center><img src="images/etogame/cloth_bimbo.jpg"></center>'
			'You are dressed in the style of bimbos, now you can not be taken seriously.'

			act 'Leave':gt 'dom_gor'
		end
	end

	if pants[5] = 1:
		act 'Use leggings as pants sports':
			cla
			*clr
			cloth_vid = 2
			'<center><img src="images/etogame/leggins.jpg"></center>'
			'If much of their stretch, they become transparent. Are you sure that they can play sports on the street?'

			act 'Leave':gt 'dom_gor'
		end
	end

	if exhibi < 1:'We do not yet have finished dresses.'
	if exhibi >= 1:' can stretch leggings and a short T-shirt, and as such to enter the run.'
	if exhibi >= 2:'If I will wear a skirt or short dress, repainted in blonde, put on a well-groomed skin ton of makeup, youll look just like a bimbo.'
	'You have in your wardrobe includes:'
	if bikini > 0:'bikini.'
	if pants[5] = 1:'Leggings.'
	if jeans[1] = 1 or jeans[2] = 1 or jeans[3] = 1 or jeans[4] = 1 or jeans[5] = 1:'Usual jeans.'
	if yoga[1] = 1 or yoga[2] = 1 or yoga[3] = 1 or yoga[4] = 1 or yoga[5] = 1 or yoga[6] = 1 or yoga[7] = 1 or yoga[8] = 1 or yoga[9] = 1 or yoga[10] = 1 or yoga[11] = 1 or yoga[12] = 1 or yoga[13] = 1 or yoga[14] = 1 or yoga[15] = 1 or yoga[16] = 1 or yoga[17] = 1 or yoga[18] = 1:'Sportivki.'
	if sarafan[1] = 1 or sarafan[2] = 1 or sarafan[3] = 1:'sundresses.'
	if short[1] = 1 or short[2] = 1 or short[3] = 1 or short[4] = 1 or short[5] = 1:'shorts.'
	if skirt[1] = 1 or skirt[2] = 1 or skirt[3] = 1 or skirt[4] = 1 or skirt[5] = 1:'Skirts.'
	if profi[1] = 1 or profi[2] = 1:'Business clothes.'

	act 'Finish':gt 'dom_gor'
end

--- gor_exh ---------------------------------
# buklinik
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5

	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy clinic</b></center>'
	'<center><img src="images/etogame/bukli.jpg"></center>'
	'Hours:9 to 17, the weekend Saturday, Sunday.'
	temp = rand(1, 10)
	if temp = 9:'You see the crowd of homeless people trying to get to a shelter.'
	if temp = 2:'You see a homeless person trying to get into a shelter.'
	if temp = 3:'You see an old man who came to the shelter.'

	if hour >= 9 and hour <= 17 and week < 6:
		act 'Go to the clinic':gt 'buklinik', 'holl'
	end



	act 'Leave':gt 'nord'
end

if $ARGS[0] = 'holl':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. hall</b></center>'
	'<center><img src="images/etogame/bukli_holl.jpg"></center>'
	'Hospital corridor.'
	if bumtolik > 4:'Things are stored on<a href="exec:gt ''buklinik'', ''sklad''"> stock</a>.'
	if bumtolik > 5:'The entrance is located<a href="exec:gt ''buklinik'', ''registr3''"> Registry</a>.'
	if bumtolik > 5:'Opposite the registry is<a href="exec:gt ''buklinik'', ''olga2''"> Olga Account</a>.'
	if bumtolik > 5:'At the end of the corridor<a href="exec:gt ''buklinik'', ''shower''"> shower room</a>.'
	if bumtolik = 6:'<a href="exec:gt ''buklinik'', ''spal''">Number of people</a>.'
	if bumtolik > 6:'Sleeps. (I go there any more naked)'
	if bumtolik > 5:'<a href="exec:gt ''buklinik'', ''stol''">Family Dining Room</a> residents.'
	if bumtolik > 5:'office in charge<a href="exec:gt ''buklinik'', ''sec''"> Jeanne</a>.'
	if bumtolik > 5:'Account coordinator<a href="exec:gt ''buklinik'', ''dir''"> faith</a>.'


	if bumtolik = 4:
		act 'Apply to the registry':gt 'buklinik', 'registr'
	end



	act 'Leave':gt 'nord'
end

if $ARGS[0] = 'registr':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. desk</b></center>'
	'<center><img src="images/etogame/bukli_reg.jpg"></center>'
	'In registature sit two women in white coats.'

	if bumtolik = 4:'You:- Hello, my name is <<$name>>, I am with the work. Girl named Olga gave me this card, said that you need employees.'
	'Registrar:- Hello! We are very pleased to see you. But I''m afraid you refuse, the fact is that we need volunteers, ie your work will not be paid. A job to be very complicated. Will have to take care of the elderly and the homeless to feed and clothe.'


	act 'I knew you, I have to think':gt 'nord'
	act 'agree':gt 'buklinik', 'registr2'
end

if $ARGS[0] = 'registr2':
	cla
	clr
	*clr
	minut += 15
	bumtolik = 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. desk</b></center>'
	'<center><img src="images/etogame/bukli_reg.jpg"></center>'
	'You:- Well, I think I can handle it. Where do I start?'
	'Registrar:- I am happy to hear that. Fill out the form. And me, store copies of your passport and if there is documentation of education diploma courses, all that is, perhaps, in the future, you can find paid work.'
	'(You fill out the form)'
	'Registator:- Well, there you have a membership card. The corridor the first door on the right, get to the warehouse, where she will meet Olga show you everything.'


	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'registr3':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. desk</b></center>'
	'<center><img src="images/etogame/bukli_reg.jpg"></center>'
	'In registature usually sit either Karina or Regina.'

	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'sklad':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. warehouse</b></center>'
	'<center><img src="images/etogame/bukli_sklad.jpg"></center>'
	'Warehouse all packages littered with things.'

	if bumtolik = 5:act 'Find Olga':gt 'buklinik', 'olga'

	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'olga':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Your colleague Olga</b></center>'
	'<center><img src="images/etogame/bukli_olga.jpg"></center>'
	'(Olga - groomed and cute brunette with a kind smile.)'

	if bumtolik = 5:
		'- Olga, hello. I am <<$name>>, you remember me? I decided to respond to your call. And ready for duty. At the reception told me that you show here.'
		'- <<$name>>, good afternoon! Good for you, welcome! Let me briefly tell you how we work. We are volunteers and therefore our work is not paid. You can come at any time during working hours. Work is very different, because you attached to me, the first time the job will receive from me.'
		'Olga:- You do not mind go to you?'
		'You:- I am in favor.'
		'Olga:- Well, let me spend a tour for you. Here we have a warehouse that we bought for the needy. We packed up his boxes and transported to the destination.'
	end

	act 'By office manager':gt 'buklinik', 'sec'
end

if $ARGS[0] = 'sec':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Your colleague Jeanne</b></center>'
	'<center><img src="images/etogame/bukli_sec.jpg"></center>'
	'(Jeanne and cheerful young blonde)'

	if bumtolik = 5:
		'Olga:- Meet, it is our office manager Joan. Zhannochka we responsible for everything. If there are organizational issues addressed her.'
		'Olga:- Zhannochka <<$name>> is our new volunteer.'
		'Jeanne:- Wow! And you young <<$name>> bold. Very pleased to meet you!'
		'You:- Thank you, mutually.'
		act 'To the head':gt 'buklinik', 'dir'
	elseif bumtolik > 5:
		'- Hello, <<$name>>!'
		act 'In the corridor':gt 'buklinik', 'holl'
	end
end

if $ARGS[0] = 'dir':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Your colleague Vera</b></center>'
	'<center><img src="images/etogame/bukli_dir.jpg"></center>'
	'(Vera overbearing and well-groomed lady)'


	if bumtolik = 5:
		'Olga:- And this is our coordinator Vera ...'
		'Vera:- Simply Vera.'
		'Olga:- Vera is not only our coordinator, but the mastermind, she came up with it and created our organization.'
		'You:- Very nice, <<$name>>!'
		'Vera:- Welcome to contact us. (Vera you smile)'
		act 'complete familiarity':gt 'buklinik', 'olga2'
	elseif bumtolik > 5:
		'- Hello, <<$name>>!'
		act 'In the corridor':gt 'buklinik', 'holl'
	end
end

if $ARGS[0] = 'shower':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. shower room</b></center>'
	'<center><img src="images/etogame/bukli_show.jpg"></center>'
	'Shared shower for guests'
	'Here guests take a shower. Better unnecessarily here not to meddle.'

	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'stol':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. dining room</b></center>'
	'<center><img src="images/etogame/bukli_stol.jpg"></center>'
	'Dining room for guests'
	'Here guests take their food. Very lean diet, but they do.'

	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'spal':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Mercy Clinic. bedrooms</b></center>'
	'<center><img src="images/etogame/bukli_spal.jpg"></center>'
	'Sleeping space for guests.'
	'Who are there only. Alcoholics and homeless, vagrants and drug addicts. There are just people who have nowhere to sleep.'

	if bumtolik = 6:
		act 'hello':gt 'buklinik_event', 'pos1'
	end

	act 'In the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'olga2':
	cla
	clr
	*clr
	minut += 15
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b>Your colleague Olga</b></center>'
	'<center><img src="images/etogame/bukli_olga.jpg"></center>'
	'(Olga - groomed and cute brunette with a kind smile.)'

	if bumtolik > 5:'- Hello, <<$name>>!'
	if buklinikDay = day:'- Today there is no more work, we can relax.'
	if bumtolik = 7 and buklinikDay ! day:'- <<$name>>, We need help <a href="exec:gt ''buklinik_event'', ''pos6''">feed the needy</a>.'
	if bumtolik >= 8 and buklinikDay ! day: '- <<$name>>, here is the address of one <a href="exec:GT ''buklinik_event'',''pos8''">elderly man</a>, go see him help with the housework.'
	if bumtolik = 9 and buklinikDay ! day: '- <<$name>>, Need help persuade a wino not wander the streets, and come to live with <a href="exec:GT ''buklinik_event'',''pos9''">to_us</a>.'
	if bumtolik = 5:
		bumtolik = 6
		'Olga:- Continue along the corridor beds, showers and a dining room where guests can eat for free. See there is nothing special. Well, that''s all. At the reception we sit two girls - Regina and Karina, you''ve seen them.'
		'We were still coming the other volunteers, but you yourself to meet them at the meeting.'
		'You can look around here, if that appeals to me.'
	end

	act 'In the corridor':gt 'buklinik', 'holl'
end
--- buklinik ---------------------------------
# buklinik_event
if $ARGS[0] = 'pos1':
	cla
	*clr
	minut += 30
	buklinikDay = day
	gs 'stat'
	'<center><img src="images/etogame/bukli_spal.jpg"></center>'
	'The room was a male and you have decided that it is necessary to introduce them.'
	'You:- Good afternoon! My name is <<$name>>, I am your new employee volunteer, I will help you as much.'

	'Men in the room pay attention to you.'
	'Resident 1:- Hello, girl, Vladimir! What are you standing in the doorway, come in, sit down, I''ll introduce you to all.'

	act 'Enter the room':gt 'buklinik_event', 'pos2'

	act 'Staying at the door':gt 'buklinik_event', 'pos5'

	act 'Get out into the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'pos2':
	cla
	*clr
	bumtolik = 7
	gs 'stat'
	'<center><img src="images/etogame/bukli_pos2.jpg"></center>'
	'You''ve decided that nothing bad will happen if you go into the room, look at what''s inside the life of these unfortunate people.'
	'You:- Thank you, I really do not last long. Only acquainted. First day.'
	'When you walk past the seated men, you see how they are and looking at you. They did not hesitate to look at your chest and legs.'
	'They should be for a long time there were no women.'

	'Vladimir:- Sit down young lady.'

	'You seated at a small table in the center of the room. On all sides surround you face strangers. Mostly elderly, but as one with a hangover.'

	'Vladimir:- Meet it Vitaly is Paul Afanasyevitch Oleg O., Kostya and lame Albert.'
	'From the crowd:- So you''ll help us, it''s good to help me not hurt. Long time I did not help women.'
	'- Yeah, and me! So young, smooth skin and smells delicious.'

	act 'Try to get away':gt 'buklinik_event', 'pos3'
end

if $ARGS[0] = 'pos3':
	cla
	*clr
	manna -= 20
	horny += 3
	gs 'stat'
	'<center><img src="images/etogame/bukli_grop2.jpg"></center>'
	'You:- I think I''ll. I must go. Ahh, what you''re doing, stop it!'
	'You tried to get up and leave. But someone kept you in the thigh.'
	'From the crowd:- Where? And as the same, help? You must help us her ass.'
	'You feel like someone squeezed your buttocks.'
	'- Come on, show us your tits delicious!'
	'C these words, lame Albert hugged you for your waist, with the force drew me so that you bumped into him. A second hand started to pull your clothes baring breasts.'
	'Aah! - You yell, that is urine.'
	'Bah!'

	act 'Look at the door':gt 'buklinik_event', 'pos4'
end

if $ARGS[0] = 'pos4':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/etogame/bukli_angry.jpg"></center>'
	'Olga stood in the doorway and she was just furious.'

	'- What are you arranged? Launder you feed, give B! But this is not enough! Ungrateful swine!'
	'Olga decisive step toward the you took you by the hand and led into the corridor.'
	'- Man first day of work, all volunteers scared away. Well, I''ll deal with you more!'
	'(She slammed the door and you were alone in the corridor)'
	'- <<$name>>, are you okay?'
	'- Yes. A little scared.'
	'- What do you think, do not drop your guard. They only give a reason.'

	act '- Okay, I get it.':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'pos5':
	cla
	*clr
	manna -= 5
	bumtolik = 7
	gs 'stat'
	'<center><img src="images/etogame/bukli_spal.jpg"></center>'
	'You:- Thank you, me, and it is convenient.'

	'Men in the room lost interest in you and started their business.'
	'Vladimir:- Well, hello, hello! What then priperlas, go do not bother.'
	'You:- Hmm! Ham!'

	act 'Get out into the corridor':gt 'buklinik', 'holl'
end

if $ARGS[0] = 'pos6':
	cla
	*clr
	gs 'stat'
	'<center><img src="images/etogame/bukli_eat.jpg"></center>'
	'Olga:- Thank you for agreeing. Nothing special, just to Spread plates on the tables. And try not to be rude, if someone starts to stick, be considerate. Keep apron dress, you do not accidentally get dirty.'
	'("Molested! Delicacy! She must be kidding me, because of the case." - Think you.)'
	act 'spacing plates':gt 'buklinik_event', 'pos7'
end

if $ARGS[0] = 'pos7':
	cla
	*clr
	buklinikDay = day
	gs 'stat'
	'<center><img src="images/etogame/bukli_eat2.jpg"></center>'
	if bumtolik > 7:
		'You quietly spacing plates on the tables.'
	elseif bumtolik = 7:
		bumtolik = 8
		'You calmly carried the plates on the table. Yet because of one of the tables you have not addressed sassy tone:'
		'- Wow, look what the buffer! They are what size, beauty?'
		'- What !? But how ... Uh ... I do not mind your business! - You blurt.'
	end
	act 'Finish':gt 'buklinik', 'olga2'
end

if $ARGS[0] = 'pos8':
	cla
	*clr

	if bumtolik = 8:bumtolik = 9

	buklinikDay = day
	minut += 120
	manna += 20
	gs 'stat'
	'<center><img src="images/etogame/bukli_sitter1.jpg"></center>'
	'You come to the right and two hours of help around the house the old man. The old man was very grateful to you and you felt the joy and peace.'
	act 'Finish':gt 'buklinik', 'olga2'
end

if $ARGS[0] = 'pos9':
	cla
	*clr
	buklinikDay = day
	minut += 120
	gs 'stat'
	'<center><img src="images/etogame/bukli_mission.jpg"></center>'
	'You with other volunteers searched the park and found all the same tramp was talking about Olga.'
	'Female volunteer:- Come out come with us, we''ll take you to a good place.'
	'Tramp:- No way! I''m good here. Come visit speaking panties, make the old man company, hehe.'
	'Girl:- That''s the same old pervert the <<$name>> you have any ideas as to lure him from there?'

	if horny>50 and tanga = 1 and ski = 1 or horny > 50 and tanga = 1 and glamur = 1:
		act 'There is one idea':gt 'buklinik_event', 'pos10'
	end
	act 'I have no idea':gt 'buklinik', 'olga2'
end

if $ARGS[0] = 'pos10':
	cla
	*clr
	bumtolik = 10
	horny += 10
	gs 'stat'
	'<center><img src="images/etogame/bukli_mission1.jpg"></center>'
	'You are so excited that comes to mind is incredible idea to lure pervert lit up her panties. You get up in the position right in front of the shelter and utter tramps "- Dear, I have something for you there!"'
	'All who stood by protruding eyes from the sight of what he saw.'
	'But it looks like the plan worked, as soon as the old man saw a hot young body, he involuntarily potenulsya to you and got out of the asylum.'
	'"- Grab it!" - commanding you to volunteers. Stricken aides did not immediately realize that you told them and staring at your ass.'
	'You already afraid that now the old man with dirty hands will grab you in the ass, but some of the volunteers came to his senses and stopped the poor old man.'
	'Volunteer:- You will come with us!'
	'Bum:- What! No! I am a free man! Have no right! Oh, you''re a liar! Watch out!'
	'The old man was taken away. And you expressed gratitude.'
	'Female volunteer:- Hmm, unusual and how you came to a head !?'
	'It looks like the people at the clinic learned their new assistant in a new way.'

	act 'Finish':gt 'buklinik', 'olga2'
end

--- buklinik_event ---------------------------------
# generation
y = 0
:markmonthfightx
y += 1
:markturnirotbory
x = 0
:markturnirotborz
x += 1
turnirFighter[x] = rand(2, NPCrost)

if x < 2:jump 'markturnirotborz'

if turnirFighter[1] = turnirFighter[2]:jump 'markturnirotbory'

a = turnirFighter[1]
i = turnirFighter[2]
gs 'Autofight'
turnirFighter[1] = 0
turnirFighter[2] = 0

if y < 20:jump 'markmonthfightx'

--- generation ---------------------------------

# Autofight
if Formula = 0:Formula = 3

$endurdin = {
	Ken = (musle[a] / 100) * Kus / 100

	if ken <= 0:ken = 1

	Kene = (musle[i] / 100) * Kuse / 100

	if kene <= 0:kene = 1

	KoefUder = rand(Uder * 20 / 100, Uder)
	KoefUderE = rand(Udere * 20 / 100, Udere)
	KoefBros = rand(Brosok * 20 / 100, Brosok)
	KoefBrosE = rand(Brosoke * 20 / 100, Brosoke)
	KoefProt = rand(Zash * 20 / 100, Zash)
	KoefProtE = rand(Zashe * 20 / 100, Zashe)
}

$uderdin = {
	Kus = 5
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = (strenW / 2) + agilW + rand(0, lustW) + KoefUder
	Aktiv = Aktiv * endur / endurMax
	Passiv = (((strenWE + (agilWE / 2)) * koefE) / 100) + rand (0, lustWE) + KoefProtE
	Passiv = Passiv * endurE / endurMaxE
}

$uderdinE = {
	Kus = 10
	Kuse = 5
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = (strenWE / 2) + agilWE + rand(0, lustWE) + KoefUdere
	Aktiv = Aktiv * endurE / endurMaxE
	Passiv = (((strenW + (agilW / 2)) * koef) / 100) + rand(0, lustW) + KoefProt
	Passiv = Passiv * endur / endurMaxE
}

$brosdin = {
	Kus = 10
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = strenW + (agilW / 2) + rand(0, lustW) + KoefBros
	Aktiv = Aktiv * endur / endurMax
	Passiv = (((strenWE / 2) + agilWE) * koefE / 100) + rand(0, lustWE) + KoefProtE
	Passiv = Passiv * endurE / endurMaxE
}

$brosdinE = {
	Kus = 10
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = strenWE + (agilWE / 2) + rand(0, lustWE) + KoefBrosE
	Aktiv = Aktiv * endurE / endurMaxE
	Passiv = (((strenW / 2) + agilW) * koef / 100) + rand(0, lustW) + KoefProt
	Passiv = Passiv * endur / endurMax

}

point = 0
pointE = 0
$nameE = $nikname[i]
$nameA = $nikname[a]
strenW = musle[a] / 10
strenWE = musle[i] / 10
agilW = flex[a] / 10
agilWE = flex[i] / 10
lustMax = wipo[a]
lustMaxE = wipo[i]
lustW = lustMax
lustWE = lustMaxe
Brosok = Bteh[a] / 10
BrosokE = Bteh[i] / 10
Uder = Uteh[a] / 10
Udere = Uteh[i] / 10
Zash = Zteh[a] / 10
Zashe = Zteh[i] / 10
resultFight = 0
endurMax = stamina[a] / 10
endurMaxE = stamina[i] / 10
endur = endurMax
endurE = endurMaxE
croonce = 0
round = 1
rMin = 8
stoper = 0
Ku = 0
Kb = 0
Kz = 0
KuE =0
KbE= 0
KzE = 0
if strenW > strenWE:
	point += 1
	lustW += 1
	crouch = 1
elseif strenW < strenWE:
	pointE += 1
	lustWE += 1
	crouch = 0
elseif strenW = strenWE:
		varrand = rand(0, 1)

		if varrand = 0:crouch = 1
		if varrand=1:crouch=0
end
:markFightCrouch
stoper = 0

if crouch = 1:
	enrand = rand(0, 1)
	arand = rand(0, 1)

	if arand = 0:
		endur -= 2

		if enrand = 0:
			pointE += 1
			jump 'markfight'
		elseif enrand = 1:
			point += 2
			endurE -= 1
			jump 'markfight1'
		end
	elseif arand = 1:
		endur -= 1

		if enrand = 0:
			point += 1
			jump 'markfight2'
		elseif enrand = 1:
			pointE += 1
			endurE -= 1
			jump 'markfight3'
		end
	end
else
	enrand = rand(0, 1)
	arand = rand(0, 1)

	if arand = 0:
		if enrand = 0:
			point += 1
			endurE -= 2
			jump 'markfightE'
		elseif enrand = 1:
			pointE += 1
			endurE -= 1
			jump 'markfightE1'
		end
	elseif arand = 1:
		endur -= 1

		if enrand = 0:
			pointE += 2
			endurE -= 2
			jump 'markfightE2'
		elseif enrand = 1:
			point += 1
			endurE -= 1
			jump 'markfightE3'
		end
	end
end

:markfight
koef = 100
koefE = 90
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		arand = rand(0, 1)

		if arand = 0:
			dynamic $uderdin

			if Aktiv > Passiv:
				point += 1
				Ku += 1
				stoper = 0
				jump 'markfight2'
			elseif Aktiv < Passiv:
				pointE += 1
				KzE += 1
				stoper = 0
				jump 'markfight3'
			elseif Aktiv = Passiv:
				jump 'markfight'
			end
		elseif arand = 1:
			dynamic $brosdin

			if Aktiv > Passiv:
				point += 2
				lustW += 1
				Kb += 1
				stoper = 0
				jump 'markfight1'
			elseif Aktiv < Passiv:
				pointE += 1
				KzE += 1
				stoper = 0
				jump 'markfight3'
			elseif Aktiv = Passiv:
				jump 'markfight'
			end
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	jump 'markRoundStop'
end

:markfight1
koef = 100
koefE = 85
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdin

		if Aktiv > Passiv:
			point += 1
			Ku += 1
			stoper = 0
			jump 'markfight2'
		elseif Aktiv < Passiv:
			pointE += 1
			KzE += 1
			stoper = 0
			jump 'markfight3'
		elseif Aktiv = Passiv:
			jump 'markfight1'
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	jump 'markRoundStop'
end

:markfight2
koef = 100
koefE = 80
lustE -= 1
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdin
		endurE -= 2

		if Aktiv >= Passiv:
			point += 1
			lustWE -= 1
			Ku += 1
			jump 'markfight2'
		elseif Aktiv < Passiv:
			pointE += 1
			KzE += 1
			stoper = 0
			jump 'markfight3'
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	point += 3
	jump 'markRoundStop'
end

:markfight3
koef = 100
koefE = 100
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		arand = rand(0, 1)

		if arand = 0:
			dynamic $uderdin

			if Aktiv > Passiv:
				point += 1
				Ku += 1
				stoper = 0
				jump 'markfight2'
			elseif Aktiv <= Passiv:
				pointE += 1
				KzE += 1
				jump 'markRoundStop'
			end
		elseif arand = 1:
			dynamic $brosdin

			if Aktiv > Passiv:
				point += 2
				lustW += 1
				Kb += 1
				stoper = 0
				jump 'markfight1'
			elseif Aktiv <= Passiv:
				pointE += 1
				KzE += 1
				jump 'markRoundStop'
			end
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	jump 'markRoundStop'
end

:markfightE
koef = 90
koefE = 100
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		deystrand = rand(0, 1)

		if deystrand = 0:
			dynamic $uderdinE

			if Aktiv > Passiv:
				pointE += 1
				KuE += 1
				stoper = 0
				jump 'markfightE1'
			elseif Aktiv < Passiv:
				point += 1
				Kz += 1
				stoper = 0
				jump 'markfightE3'
			elseif Aktiv = Passiv:
				jump 'markfightE'
			end
		elseif deystrand = 1:
			dynamic $brosdinE

			if Aktiv > Passiv:
				pointE += 2
				lustWE += 1
				KbE += 1
				stoper = 0
				jump 'markfightE2'
			elseif Aktiv < Passiv:
				point += 1
				Kz += 1
				stoper = 0
				jump 'markfightE3'
			elseif Aktiv = Passiv:
				jump 'markfightE'
			end
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	point += 1
	jump 'markRoundStop'
end

:markfightE1
koef = 80
koefE = 100
lust -= 1
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdinE
		endur -= 2

		if Aktiv >= Passiv:
			pointE += 1
			lustW -= 1
			KuE += 1
			jump 'markfightE1'
		elseif Aktiv < Passiv:
			point += 1
			Kz += 1
			stoper = 0
			jump 'markfightE3'
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	pointE += 3
	jump 'markRoundStop'
end

:markfightE2
koef = 85
koefE = 100
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdinE

		if Aktiv > Passiv:
			pointE += 1
			KuE += 1
			stoper = 0
			jump 'markfightE1'
		elseif Aktiv < Passiv:
			point += 1
			Kz += 1
			stoper = 0
			jump 'markfightE3'
		elseif Aktiv = Passiv:
			jump 'markfightE2'
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	point += 1
	jump 'markRoundStop'
end

:markfightE3
koef = 100
koefE = 100
rMin -= 1
stoper += 1

if endur <= 0 or lustW <= 0:jump 'markSubLoss'
if endurE <= 0 or lustWE <= 0:jump 'markSubWin'

if stoper < 3:
	if rMin > 0:
		deystrand = rand(0 ,1)

		if deystrand = 0:
			dynamic $uderdinE

			if Aktiv > Passiv:
				pointE += 1
				KuE += 1
				stoper = 0
				jump 'markfightE1'
			elseif Aktiv <= Passiv:
				point += 1
				Kz += 1
				jump 'markRoundStop'
			end
		elseif deystrand = 1:
			dynamic $brosdinE

			if Aktiv > Passiv:
				pointE += 2
				lustWE += 1
				KbE += 1
				stoper = 0
				jump 'markfightE2'
			elseif Aktiv <= Passiv:
				point += 1
				Kz += 1
				jump 'markRoundStop'
			end
		end
	else
		jump 'markRoundEnd'
	end
elseif stoper >= 3:
	point += 1
	jump 'markRoundStop'
end

:markRoundStop
stoper = 0

if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1

croonce = 0
jump 'markFightCrouch'

:markSubWin
resultFight = 0
jump 'markEndFight'

:markSubLoss
resultFight = 4
jump ' markEndFight'

:markRoundEnd
round += 1
rMin = 8
stoper = 0

if round = Formula + 1:
	if point > pointE:
		resultFight = 1
	elseif point < pointE:
		resultFight=3
	elseif point = pointE:
		resultFight=2
	end

	jump 'markEndFight'
elseif round < Formula + 1:
	endur += lustW * 25 / 100
	endurE += lustWE *25 / 100

	if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
	if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1

	croonce = 0
	jump 'markFightCrouch'
end

:markEndFight
if NoView = 0:'<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
if NoView = 0:'<<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
if NoView = 0:'<<point>> points <<$nameA>> <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
if NoView = 0:'<<pointE>> points <<$nameE>> <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws,  <<KzE>> successful defenses.'

if resultFight = 0:
	wipo[a] += 2
	wipo[i] -= 1
	rating[a] += 2
	rating[i] -= 5
	strand = rand(0, 2)

	if strand = 0:musle[a] += 10
	if strand = 1:flex[a] += 10
	if strand = 2:stamina[a] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[a] += 10
	if tehrand = 1:Uteh[a] += 10
	if tehrand = 2:Zteh[a] += 10
	if NoView = 0:'<b><<$nameA>> won surrender</b>'

	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>wins by submission</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat surrender</font>'
	win[a] += 1
	SubWin[a] += 1
	loss[i] += 1
	SubLoss[i] += 1
elseif resultFight = 1:
	wipo[a] += 1
	rating[a] += 1
	rating[i] -= 3
	strand = rand(0, 2)

	if strand = 0:musle[a] += 10
	if strand = 1:flex[a] += 10
	if strand = 2:stamina[a] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[a] += 10
	if tehrand = 1:Uteh[a] += 10
	if tehrand = 2:Zteh[a] += 10
	if NoView = 0:'<b><<$nameA>> won</b>'

	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>victory</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat</font>'
	win[a] += 1
	loss[i] += 1
elseif resultFight = 2:
	rating[a] -= 1
	rating[i] -= 1

	if NoView = 0:'<b>The result of the fight a draw</b>'

	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=black>draw</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=black>draw</font>'
	draw[a] += 1
	draw[i] += 1
elseif resultFight = 3:
	wipo[i] += 1
	rating[a] -= 3
	rating[i] += 1
	strand = rand(0, 2)

	if strand = 0:musle[i] += 10
	if strand = 1:flex[i] += 10
	if strand = 2:stamina[i] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[i] += 10
	if tehrand = 1:Uteh[i] += 10
	if tehrand = 2:Zteh[i] += 10
	if NoView = 0:'<b><<$nameE>> won</b>'

	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>victory</font>'
	win[i] += 1
	loss[a] += 1
elseif resultFight = 4:
	wipo[i] += 2
	wipo[a] -= 1
	rating[a] -= 5
	rating[i] += 2
	strand = rand(0, 2)

	if strand = 0:musle[i] += 10
	if strand = 1:flex[i] += 10
	if strand = 2:stamina[i] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[i] += 10
	if tehrand = 1:Uteh[i] += 10
	if tehrand = 2:Zteh[i] += 10
	if NoView = 0:'<b><<$nameE>> won surrender</b>'

	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat surrender</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>wins by submission</font>'
	win[i] += 1
	SubWin[i] += 1
	loss[a] += 1
	SubLoss[a] += 1
end

--- Autofight ---------------------------------

# beforeFW
$endurdin = {
	Ken = (musle / 100) * Kus / 100

	if ken <= 0:ken = 1

	Kene = (musle[i] / 100) * Kuse / 100

	if kene <= 0:kene = 1

	KoefUder = rand(Uder * 20 / 100, Uder)
	KoefUderE = rand(Udere * 20 / 100, Udere)
	KoefBros = rand(Brosok * 20 / 100, Brosok)
	KoefBrosE = rand(Brosoke * 20 / 100, Brosoke)
	KoefProt = rand(Zash * 20 / 100, Zash)
	KoefProtE = rand(Zashe*20 / 100, Zashe)
}

$uderdin = {
	Kus = 5
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = (strenw / 2) + agilw + rand(0, lustw) + KoefUder
	Aktiv = Aktiv * endur / endurMax
	Passiv = (((strenwE + (agilwE / 2)) * koefE) / 100) + rand(0, lustwE) + KoefProtE
	Passiv = Passiv * endurE / endurMaxE
}

$uderdinE = {
	Kus = 10
	Kuse = 5
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = (strenwE / 2) + agilwE + rand(0, lustwE) + KoefUdere
	Aktiv = Aktiv * endurE / endurMaxE
	Passiv = (((strenw + (agilw / 2)) * koef) / 100) + rand(0, lustw) + KoefProt
	Passiv = Passiv * endur / endurMaxE
}

$brosdin = {
	Kus = 10
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = strenw + (agilw / 2) + rand(0, lustw) + KoefBros
	Aktiv = Aktiv * endur / endurMax
	Passiv = (((strenwE / 2) + agilwE) * koefE / 100) + rand(0, lustwE) + KoefProtE
	Passiv = Passiv * endurE / endurMaxE
}

$brosdinE = {
	Kus = 10
	Kuse = 10
	dynamic $endurdin
	endur -= ken
	endurE -= kene
	Aktiv = strenwE + (agilwE / 2) + rand(0, lustwE) + KoefBrosE
	Aktiv = Aktiv * endurE / endurMaxE
	Passiv = (((strenw / 2) + agilw) * koef / 100) + rand(0, lustw) + KoefProt
	Passiv = Passiv * endur / endurMax
}

!!power, throws
!!flexibility, protection,
!!speed, initiative
!!equipment,
!!endurance
a = 1
point = 0
pointE = 0
$nameE = $nikname[i]
$nameA = $nikname[a]
strenw = musle[1] / 10
strenwE = musle[i] / 10
agilw = flex[1] / 10
agilwE = flex[i] / 10
lustMax = wipo[1]
lustMaxE = wipo[i]
lustw = lustMax
lustwe = lustMaxe
Brosok = Bteh[1] / 10
BrosokE = Bteh[i] / 10
Uder = Uteh[1] / 10
Udere = Uteh[i] / 10
Zash = Zteh[1] / 10
Zashe = Zteh[i] / 10

resultFight = 0
endurMax = stamina[1] / 10
endurMaxE = stamina[i] / 10
endur = endurMax
endurE = endurMaxE
croonce = 0
round = 1
rMin = 8
stoper = 0
Ku = 0
Kb = 0
Kz = 0
KuE = 0
KbE = 0
KzE = 0
!!minus the endurance of fat
!!force depends on the endurance
!!speed depends on the endurance

if Formula = 0:Formula = 3

'<center><b>before round</b></center>'
'<center><img src="images/pic/fight/bef.jpg"></center>'
'you and <<$nameE>> greeted each other.'
'Referee required to start a fight on his hands.'

act 'Fight on his hands':
	cls
	!!picture
	'<center><img src="images/pic/fight/arm.jpg"></center>'

	if strenw > strenwE:
		point += 1
		lustw += 1
		crouch = 1
		$text = 'Stand your opponent on all fours, and you catch him from behind.'
		'You won the fight on his hands.'
	elseif strenw < strenwE:
		pointE += 1
		lustwE += 1
		crouch = 0
		$text = 'You get up on all fours, and your opponent to catch him from behind.'
		'You lost the battle on his hands.'
	elseif strenw = strenwE:
		varrand = rand(0, 1)

		if varrand = 0:crouch = 1 & $text = 'Stand your opponent on all fours, and you catch him from behind.'

		if varrand = 1:crouch = 0 & $text = 'You get up on all fours, and your opponent to catch him from behind.'
		'Quest on hand ended in a draw. The referee tossed the coin, that would determine the winner.'
	end

	'Referee stopped you and commanded <<$text>>'

	act 'Follow the instructions referees':gt 'FightCrouch'
end

--- beforeFW ---------------------------------

# FightStat
if endur > endurMax * 75 / 100:$endur = 'You are active and vigorous'
if endur > endurMax * 50 / 100 and endur <= endurMax * 75 / 100:$endur = 'You are strongly sweating'
if endur > endurMax * 25 / 100 and endur <= endurMax * 50 / 100:$endur = 'Are you tired and short of breath'
if endur <= endurMax * 25 / 100:$endur = 'You just clueless on where you are very tired'
if endure > endurMaxe * 75 / 100:$endure = '<<$nameE>> active and cheerful'
if endure > endurMaxe * 50 / 100 and endure <= endurMaxe * 75 / 100:$endure = '<<$nameE>> much sweating'
if endure > endurMaxe * 25 / 100 and endure <= endurMaxe * 50 / 100:$endure = '<<$nameE>> tired and pants'
if endure <= endurMaxe * 25 / 100:$endure = '<<$nameE>> hardly worth from severe fatigue'
if lustw > lustMax * 75 / 100:$lust = 'You are determined to show it to your opponent what''s what'
if lustw > lustMax * 50 / 100 and lustw <= lustMax * 75 / 100:$lust = 'You''re a little puzzled by the tenacity rivals'
if lustw > lustMax * 25 / 100 and lustw <= lustMax * 50 / 100:$lust = 'Are you afraid of her rival'
if lustw <= lustMax * 25 / 100:$lust = 'You are in a very real terror and on the verge of panic'
if lustwe > lustMaxe * 75 / 100:$luste = '<<$nameE>> bravely drills you with his unyielding gaze'
if lustwe > lustMaxe * 50 / 100 and lustwe <= lustMaxe * 75 / 100:$luste = '<<$nameE>> looks a little surprised'
if lustwe > lustMaxe * 25 / 100 and lustwe <= lustMaxe * 50 / 100:$luste = '<<$nameE>> looks frightened'
if lustwe <= lustMaxe * 25 / 100:$luste = '<<$nameE>> looks bruised and finished here now screwy panic'

'<center><b>round <<round>> </b></center>'
'<center><b>Left before the end of the round <<rMin>> minutes </b></center>'
''
'your record <<win[1]>> - <<loss[1]>> - <<draw[1]>> <<SubWin[1]>> / <<SubLoss[1]>>'
'<<$nameE>> record <<win[i]>> - <<loss[i]>> - <<draw[i]>> <<SubWin[i]>> / <<SubLoss[i]>>'
''
'<<$endur>> . <<$lust>> .'
'<<$endurE>> . <<$lustE>> .'

'you scored <<point>> points'
'<<$nameE>> scored <<pointE>> points'
''
''
''

--- FightStat ---------------------------------
# FightCrouch
!!rMin -= 1
gs 'fightStat'
stoper = 0
'<center><img src="images/pic/fight/cro.jpg"></center>'

if crouch = 1:
	enrand = rand(0, 1)

	if enrand = 0:$text = '<<$nameE>> prizhimetsya to the floor'

	if enrand = 1:$text = '<<$nameE>> trying to roll over on his back'

	if enrand = 2:$text = '<<$nameE>> tries to counter roll'

	'<<$nameE>> is on all fours in front of you.'

	act 'produce cast':
		cls
		endur -= 2
		'You are trying to make a throw. <<$text>>'

		if enrand = 0:
			pointE += 1
			'<center><img src="images/pic/fight/cron.jpg"></center>'
			'Opponent managed pressed to the floor and you can not perform a roll.'

			act '...':gt 'fightfw'
		elseif enrand = 1:
			point += 2
			endurE -= 1
			'<center><img src="images/pic/fight/crob.jpg"></center>'
			'You have intercepted an attempt to rival roll over and roll performed.'

			act '...':gt 'fight1'
		end
	end

	act 'Make an attempt to hold':
		cls
		endur -= 1
		'You are attempting to hold. <<$text>>'

		if enrand = 0:
			point += 1
			'<center><img src="images/pic/fight/crou.jpg"></center>'
			'Opponent is pressed to the floor and you will easily manage to fix it.'

			act '...':gt 'fight2'
		elseif enrand = 1:
			pointE += 1
			endurE -= 1
			'<center><img src="images/pic/fight/cronu.jpg"></center>'
			'Opponent flipped onto his back did not hold you to spend dvavaya.'

			act '...':gt 'fight3'
		elseif enrand = 2:
			''
		end
	end
else
	enrand = rand(0, 1)

	if enrand = 0:$text = '<<$nameE>> tries to throw'
	if enrand = 1:$text = '<<$nameE>> trying to make an attempt to hold'

	'You are standing on all fours in front of rival.'

	act 'Pressed to the floor':
		cls
		'You pressed to the floor. <<$text>>'

		if enrand = 0:
			point += 1
			endurE -= 2
			'<center><img src="images/pic/fight/cron.jpg"></center>'
			'Opponent has no time to attempt a shot.'

			act '...':gt 'fightE'
		elseif enrand = 1:
			pointE += 1
			endurE -= 1
			'<center><img src="images/pic/fight/crou.jpg"></center>'
			'Opponent successfully a hold.'

			act '...':gt 'fightE1'
		end
	end

	act 'Upside down on your back':
		cls
		endur -= 1
		'You are trying to roll over on his back. <<$text>>'

		if enrand = 0:
			pointE += 2
			endurE -= 2
			'<center><img src="images/pic/fight/crob.jpg"></center>'
			'Opponent easily captures and holds you throw.'

			act '...':gt 'fightE2'
		elseif enrand = 1:
			point += 1
			endurE -= 1
			'<center><img src="images/pic/fight/cronu.jpg"></center>'
			'You pull out of the seizure of the opponent and turn on the back.'

			act '...':gt 'fightE3'
		end
	end
end

--- FightCrouch ---------------------------------
# fightFW
$resultUderDin = {
	if Aktiv > Passiv:
		point += 1
		Ku += 1
		'<center><img src="images/pic/fight/fu.jpg"></center>'
		'You have successfully commit rival'

		act '...':stoper = 0 & gt 'fight2'
	elseif Aktiv < Passiv:
		pointE += 1
		KzE += 1
		'<center><img src="images/pic/fight/fu1.jpg"></center>'
		'You can not do anything about my opponent flips.'

		act '...':stoper = 0 & gt 'fight3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
	end
}

$resultBrosDin = {
	if Aktiv > Passiv:
		point += 2
		lustw += 1
		Kb += 1
		'<center><img src="images/pic/fight/fb.jpg"></center>'
		'You have successfully throw the opponent'

		act '...':stoper = 0 & gt 'fight1'
	elseif Aktiv < Passiv:
		pointE += 1
		KzE += 1
		'<center><img src="images/pic/fight/fu1.jpg"></center>'
		'You can not do anything about my opponent turned over on his back.'

		act '...':stoper = 0 & gt 'fight3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
	end
}

!!you top
!!opponent lying on his stomach -10%
koef = 100
koefE = 90
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f.jpg"></center>'
'<<$nameE>> lying on his stomach, while you sit on top of it. <<$nameE>> trying to wriggle out.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		act 'Make an attempt to hold':
			cls
			dynamic $uderdin
			dynamic $resultUderDin
		end

		act 'Make an attempt to throw':
			cls
			dynamic $brosdin
			dynamic $resultBrosDin
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	'The referee blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'

	act 'up':gt 'RoundStop'
end

--- fightFW ---------------------------------

# fight1
$resultUderDin = {
	if Aktiv > Passiv:
		point += 1
		Ku += 1
		'<center><img src="images/pic/fight/f1u.jpg"></center>'
		'You have successfully commit rival'

		act '...':stoper = 0 & gt 'fight2'
	elseif Aktiv < Passiv:
		pointE += 1
		KzE += 1
		'<center><img src="images/pic/fight/f1u1.jpg"></center>'
		'You can not do anything about my opponent flips.'

		act '...':stoper = 0 & gt 'fight3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f1u2.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
	end
}

!!you top
!!opponent lies on his back after throwing -15%
koef = 100
koefE = 85
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f1.jpg"></center>'
'<<$nameE>> lying on his back after throwing a little confused, while you sit on top of it. <<$nameE>> trying to wriggle out.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		act 'Make an attempt to hold':
			cls
			dynamic $uderdin
			dynamic $resultUderDin
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	'The referee blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'

	act 'Get up':gt 'RoundStop'
end

--- fight1 ---------------------------------
# fight2
$resultUderDin = {
	endurE -= 2

	if Aktiv >= Passiv:
		point += 1
		lustwE -= 1
		Ku += 1
		'<center><img src="images/pic/fight/f2u.jpg"></center>'
		'You have successfully hold rival'

		act '...':gt 'fight2'
	elseif Aktiv < Passiv:
		pointE += 1
		KzE += 1
		'<center><img src="images/pic/fight/f2u2.jpg"></center>'
		'You can not do anything about my opponent flips.'

		act '...':stoper = 0 & gt 'fight3'
	end
}

!!you have committed opponent
!!you sit on top
!!opponent lying on his stomach under you -20%
koef = 100
koefE = 80
lustwE -= 1
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f2.jpg"></center>'
'<<$nameE>> lies beneath you . <<$nameE>> desperately trying to slip out of the bend of your capture.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		act 'hold_On':
			cls
			dynamic $uderdin
			dynamic $resultUderDin
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	point += 3
	'The referee blows a whistle and throws you. Your time to attack happened. For the successful holding you get immediately 3 points.'

	act 'Get up':gt 'RoundStop'
end

--- fight2 ---------------------------------
# fight3
$resultUderDin = {
	if Aktiv > Passiv:
		point += 1
		Ku += 1
		'<center><img src="images/pic/fight/f3u.jpg"></center>'
		'You have successfully commit rival'

		act '...':stoper = 0 & gt 'fight2'

	! if Aktiv <= Passiv:
	else
		pointE += 1
		KzE += 1
		'<center><img src="images/pic/fight/f3u2.jpg"></center>'
		'You can not do anything about my opponent breaks lock.'

		act '...':gt 'RoundStop'
	end
}

$resultBrosDin = {
	if Aktiv > Passiv:
		point += 2
		lustw += 1
		Kb += 1
		'<center><img src="images/pic/fight/f3b.jpg"></center>'
		'You have successfully throw the opponent'

		act '...':stoper = 0 & gt 'fight1'
	! if Aktiv <= Passiv:
	else
		pointE +=1
		KzE += 1
		'<center><img src="images/pic/fight/f3u2.jpg"></center>'
		'You can not do anything about my opponent breaks lock.'

		act '...':gt 'RoundStop'
	end
}

!!you top
!!opponent bottom facing you
koef = 100
koefE = 100
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f3.jpg"></center>'
'<<$nameE>> supine, while you sit on top of it. <<$nameE>> trying to throw you off the.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'

if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		act 'Make an attempt to hold':
			cls
			dynamic $uderdin
			dynamic $resultUderDin
		end

		act 'Make an attempt to throw':
			cls
			dynamic $brosdin
			dynamic $resultBrosDin
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	pointE += 1
	'The referee blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'

	act 'Get up':gt 'RoundStop'
end

--- fight3 ---------------------------------
# FightE
$resultUderDinE = {
	cls

	if Aktiv > Passiv:
		pointE += 1
		KuE += 1
		'<center><img src="images/pic/fight/fu.jpg"></center>'
		'<<$nameE>> successfully captures you'

		act '...':stoper = 0 & gt 'fightE1'
	elseif Aktiv < Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/fu1.jpg"></center>'
		'<<$nameE>> you can not do anything and you turn.'

		act '...':stoper = 0 & gt 'fightE3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
end
}

$resultBrosDinE = {
	cls

	if Aktiv > Passiv:
		pointE += 2
		lustwE += 1
		KbE += 1
		'<center><img src="images/pic/fight/fb.jpg"></center>'
		'<<$nameE>> successfully throws you'

		act '...':stoper = 0 & gt 'fightE2'
	elseif Aktiv < Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/fu1.jpg"></center>'
		'<<$nameE>> you can not do anything and you turn.'

		act '...':stoper = 0 & gt 'fightE3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
	end
}

!!You are on the bottom of the abdomen -10%
!!opponent top
koef = 90
koefE = 100
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f.jpg"></center>'
'You lie on your stomach below, and <<$nameE>> sits on you.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		deystrand = rand(0, 1)

		if deystrand = 0:
			dynamic $uderdinE
			dynamic $resultUderDinE
			exit
		elseif deystrand = 1:
			dynamic $brosdinE
			dynamic $resultBrosDinE
			exit
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	point += 1
	'The referee blows a whistle and throws you. Time rivals to attack happened. You get one point.'

	act 'up':gt 'RoundStop'
end

--- FightE ---------------------------------
# FightE1
$resultUderDinE = {
	cls
	endur -= 2

	if Aktiv >= Passiv:
		pointE += 1
		lustw -= 1
		KuE += 1
		'<center><img src="images/pic/fight/f2u.jpg"></center>'
		'<<$nameE>> successfully keeps you'

		act '...':gt 'fightE1'
	elseif Aktiv < Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/f2u2.jpg"></center>'
		'<<$nameE>> you can not do anything and you turn.'

		act '...':stoper = 0 & gt 'fightE3'
	end
}

!!You are on the bottom of the abdomen -20%
!!Opponent top a hold
koef = 80
koefE = 100
lustw -= 1
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f2.jpg"></center>'
'<<$nameE>> recorded a hold of you and.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdinE
		dynamic $resultUderDinE
		exit
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	pointE += 3
	'The referee blows a whistle and throws you. rival gets 3 points for successful retention.'

	act 'up':gt 'RoundStop'
end

--- FightE1 ---------------------------------
# FightE2
$resultUderDinE = {
	cls

	if Aktiv > Passiv:
		pointE += 1
		KuE += 1
		'<center><img src="images/pic/fight/f1u.jpg"></center>'
		'<<$nameE>> successfully captures you'

		act '...':stoper = 0 & gt 'fightE1'
	elseif Aktiv < Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/f1u1.jpg"></center>'
		'<<$nameE>> you can not do anything and you turn.'

		act '...':stoper = 0 & gt 'fightE3'
	elseif Aktiv = Passiv:
		'<center><img src="images/pic/fight/f1u2.jpg"></center>'
		'You have two little turns and you are struggling without success.'

		act '...':gt $curloc
	end
}

!!You from the bottom on the back after throwing -15%
!!opponent top
koef = 85
koefE = 100
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f1.jpg"></center>'
'You lie below a little stunned after throwing, and <<$nameE>> sits on you.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		dynamic $uderdinE
		dynamic $resultUderDinE
		exit
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	point += 1
	'The referee blows a whistle and throws you. Time rivals to attack happened. You get one point.'

	act 'up':gt 'RoundStop'
end

--- FightE2 ---------------------------------
# FightE3
$resultUderDinE = {
cls

	if Aktiv > Passiv:
		pointE += 1
		KuE += 1
		'<center><img src="images/pic/fight/f3u.jpg"></center>'
		'<<$nameE>> successfully captures you'

		act '...':stoper = 0 & gt 'fightE1'
	elseif Aktiv <= Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/f3u2.jpg"></center>'
		'<<$nameE>> you can not do anything and you slip out of the capture.'

		act '...':gt 'RoundStop'
end
}

$resultBrosDinE = {
	cls

	if Aktiv > Passiv:
		pointE += 2
		lustwE += 1
		KbE += 1
		'<center><img src="images/pic/fight/f3b.jpg"></center>'
		'<<$nameE>> successfully throws you'

		act '...':stoper = 0 & gt 'fightE2'
	elseif Aktiv <= Passiv:
		point += 1
		Kz += 1
		'<center><img src="images/pic/fight/f3u2.jpg"></center>'
		'<<$nameE>> you can not do anything and you slip out of the capture.'

		act '...':gt 'RoundStop'
	end
}

!!You from the bottom on the back
!!opponent top
koef = 100
koefE = 100
rMin -= 1
stoper += 1
gs 'fightStat'
'<center><img src="images/pic/fight/f3.jpg"></center>'
'You lie on your back from the bottom, and <<$nameE>> sits on you.'

if endur <= 0 or lustw <= 0:gt 'SubLoss'
if endurE <= 0 or lustwE <= 0:gt 'SubWin'

if stoper < 3:
	if rMin > 0:
		deystrand = rand(0, 1)

		if deystrand = 0:
			dynamic $uderdinE
			dynamic $resultUderDinE
			exit
		elseif deystrand = 1:
			dynamic $brosdinE
			dynamic $resultBrosDinE
			exit
		end
	else
		'The referee blows a whistle and throws you. End of round.'

		act 'up':gt 'RoundEnd'
	end
elseif stoper >= 3:
	point += 1
	'The referee blows a whistle and throws you. Time rivals to attack happened. You get one point.'

	act 'up':gt 'RoundStop'
end

--- FightE3 ---------------------------------
# RoundEnd
round += 1
rMin = 8
stoper = 0

	if round = Formula + 1:
		'The duel ended with an opponent and you call for verdict'

		if point > pointE:
			!win[1] += 1
			!loss[i] += 1
			'The referee raises your hand as a sign of your victory.'
			resultFight = 1
		elseif point < pointE:
			!win[i] += 1
			!loss[1] += 1
			'The referee raises his hand as a sign of its rival wins.'
			resultFight = 3
		elseif point = pointE:
			!draw[1] += 1
			!draw[i] += 1
			'The referee raises your hand and arm rival announcing a draw.'
			resultFight = 2
		end

		act '...':gt 'EndFight'
	elseif round < Formula + 1:
		endur += lustw * 25 / 100
		endurE += lustwe * 25 / 100

		if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
		if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1

		croonce = 0
		'<center><b>The break between rounds</b></center>'

		if crouch = 1:$text = 'Stand your opponent on all fours, and you catch him from behind.'
		if crouch = 0:$text = 'You get up on all fours, and your opponent to catch him from behind.'

		'You rest for a while and hear the whistle Referee announces the beginning of the next round.'
		'referee ordered <<$text>>'

		act 'Follow the instructions referees':gt 'FightCrouch'
end

--- RoundEnd ---------------------------------
# RoundStop
gs 'fightStat'
stoper = 0

if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1

croonce = 0

if crouch = 1:$text = 'Stand your opponent on all fours, and you catch him from behind.'
if crouch = 0:$text = 'You get up on all fours, and your opponent to catch him from behind.'

'The referee raises you with an opponent and commands. <<$text>>'

act 'Follow the instructions referees':gt 'FightCrouch'

--- RoundStop ---------------------------------
# SubWin
!!win[1] += 1
!!SubWin[1] += 1
!!loss[i] += 1
!!SubLoss[i] += 1
resultFight = 0
'<<$nameE>> Referee signals, he could no longer continue to fight and surrender.'

act '...':gt 'EndFight'

--- SubWin ---------------------------------
# SubLoss
!!win[i] += 1
!!SubWin[i] += 1
!!loss[1] += 1
!!SubLoss[1] += 1
resultFight = 4
'You gave the signal the referee, that can no longer continue to fight and surrender.'

act '...':gt 'EndFight'

--- SubLoss ---------------------------------
# EndFight
!'
!!Here the conditions of the match
!!honors, punishment
'you have <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
'At rival <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws, <<KzE>> successful defenses.'

if resultFight = 0:
	wipo[1] += 2
	wipo[i] -= 1
	rating[1] += 2
	rating[i] -= 5
	!!You won the surrender
elseif resultFight = 1:
	wipo[1] += 1
	rating[1] += 1
	rating[i] -= 3
	!!you won
elseif resultFight = 2:
	rating[1] -= 1
	rating[i] -= 1
	!!draw
elseif resultFight = 3:
	wipo[i] += 1
	rating[1] -= 3
	rating[i] += 1
	!!you lost
elseif resultFight = 4:
	wipo[i] += 2
	wipo[1] -= 1
	rating[1] -= 5
	rating[i] += 2
	!!you lost surrender
end

act '...':gt $loc

if Ku > Kb:
	if Ku > Kz:Uteh[1] += 10
elseif Kb > Ku:
	if Kb > Kz:Bteh[1] += 10
elseif Kz > Kb:
	if Kz > Ku:Zteh[1] += 10
end
'!

'<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
'<<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
'<<point>> points <<$nameA>> <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
'<<pointE>> points <<$nameE>> <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws, <<KzE>> successful defenses.'

if resultFight = 0:
	wipo[a] += 2
	wipo[i] -= 1
	rating[a] += 2
	rating[i] -= 5
	strand = rand(0, 2)
	!!if strand = 0:musle[a] += 10
	!!if strand = 1:flex[a] += 10
	!!if strand = 2:stamina[a] += 10
	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[a] += 10
	if tehrand = 1:Uteh[a] += 10
	if tehrand = 2:Zteh[a] += 10

	'<b><<$nameA>> won surrender</b>'
	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="green">wins by submission</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="red">defeat surrender</font>'
	win[a] += 1
	SubWin[a] += 1
	loss[i] += 1
	SubLoss[i] += 1
elseif resultFight = 1:
	wipo[a] += 1
	rating[a] += 1
	rating[i] -= 3
	strand = rand(0, 2)
	!!if strand = 0:musle[a] += 10
	!!if strand = 1:flex[a] += 10
	!!if strand = 2:stamina[a] += 10
	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[a] += 10
	if tehrand = 1:Uteh[a] += 10
	if tehrand = 2:Zteh[a] += 10

	'<b><<$nameA>> won</b>'
	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="green">victory</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="red">defeat</font>'
	win[a] += 1
	loss[i] += 1
elseif resultFight = 2:
	rating[a] -= 1
	rating[i] -= 1
	'<b>The result of the fight a draw</b>'
	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="black">draw</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="black">draw</font>'
	draw[a] += 1
	draw[i] += 1
elseif resultFight = 3:
	wipo[i] += 1
	rating[a] -= 3
	rating[i] += 1
	strand = rand(0, 2)

	if strand = 0:musle[i] += 10
	if strand = 1:flex[i] += 10
	if strand = 2:stamina[i] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[i] += 10
	if tehrand = 1:Uteh[i] += 10
	if tehrand = 2:Zteh[i] += 10

	'<b><<$nameE>> won</b>'
	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="red">defeat</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="green">victory</font>'
	win[i] += 1
	loss[a] += 1
elseif resultFight = 4:
	wipo[i] += 2
	wipo[a] -= 1
	rating[a] -= 5
	rating[i] += 2
	strand = rand(0, 2)

	if strand = 0:musle[i] += 10
	if strand = 1:flex[i] += 10
	if strand = 2:stamina[i] += 10

	tehrand = rand(0, 2)

	if tehrand = 0:Bteh[i] += 10
	if tehrand = 1:Uteh[i] += 10
	if tehrand = 2:Zteh[i] += 10

	'<b><<$nameE>> won surrender</b>'
	$spisok[a] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="red">defeat surrender</font>'
	$spisok[i] += '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color="green">wins by submission</font>'
	win[i] += 1
	SubWin[i] += 1
	loss[a] += 1
	SubLoss[a] += 1
end

act '...':gt $loc

--- EndFight ---------------------------------
# ratinglist
$loc = $curloc
gs 'stat'
nums = 0
:marknulator
nums += 1
if rating[nums]<0 and slut[nums] = 0 and loss[nums] >= 10 and win[nums]*2 < loss[nums]:slut[nums] = 1
if rating[nums] < 0:rating[nums] = 0
if nums < NPCnum:jump 'marknulator'

!!QAZAM
!!PGIF
$npc[0] = '<font color="green"><b><<$nikname[0]>></b></font> rating <<rating[0]>> <b><<winw[0]>>-<<lossw[0]>>-<<draww[0]>> <<SubWin[0]>>/<<SubLoss[0]>></b> <a href="exec:i = 0 & gt ''npcview''">see</a>'
$npc[1] = '<font color="green"><b><<$nikname[1]>></b></font> rating <<rating[1]>> <b><<win[1]>>-<<loss[1]>>-<<draw[1]>> <<SubWin[1]>>/<<SubLoss[1]>></b> <a href="exec:i = 1 & gt ''npcview''">see</a>'
$npc[2] = '<b><<$nikname[2]>></b> rating <<rating[2]>> <b><<win[2]>>-<<loss[2]>>-<<draw[2]>> <<SubWin[2]>>/<<SubLoss[2]>></b> <a href="exec:i = 2 & gt ''npcview''">see</a>'
$npc[3] = '<b><<$nikname[3]>></b> rating <<rating[3]>> <b><<win[3]>>-<<loss[3]>>-<<draw[3]>> <<SubWin[3]>>/<<SubLoss[3]>></b> <a href="exec:i = 3 & gt ''npcview''">see</a>'
$npc[4] = '<b><<$nikname[4]>></b> rating <<rating[4]>> <b><<win[4]>>-<<loss[4]>>-<<draw[4]>> <<SubWin[4]>>/<<SubLoss[4]>></b> <a href="exec:i = 4 & gt ''npcview''">see</a>'
$npc[5] = '<b><<$nikname[5]>></b> rating <<rating[5]>> <b><<win[5]>>-<<loss[5]>>-<<draw[5]>> <<SubWin[5]>>/<<SubLoss[5]>></b> <a href="exec:i = 5 & gt ''npcview''">see</a>'
$npc[6] = '<b><<$nikname[6]>></b> rating <<rating[6]>> <b><<win[6]>>-<<loss[6]>>-<<draw[6]>> <<SubWin[6]>>/<<SubLoss[6]>></b> <a href="exec:i = 6 & gt ''npcview''">see</a>'
$npc[7] = '<b><<$nikname[7]>></b> rating <<rating[7]>> <b><<win[7]>>-<<loss[7]>>-<<draw[7]>> <<SubWin[7]>>/<<SubLoss[7]>></b> <a href="exec:i = 7 & gt ''npcview''">see</a>'
$npc[8] = '<b><<$nikname[8]>></b> rating <<rating[8]>> <b><<win[8]>>-<<loss[8]>>-<<draw[8]>> <<SubWin[8]>>/<<SubLoss[8]>></b> <a href="exec:i = 8 & gt ''npcview''">see</a>'
$npc[9] = '<b><<$nikname[9]>></b> rating <<rating[9]>> <b><<win[9]>>-<<loss[9]>>-<<draw[9]>> <<SubWin[9]>>/<<SubLoss[9]>></b> <a href="exec:i = 9 & gt ''npcview''">see</a>'
$npc[10] = '<b><<$nikname[10]>></b> rating <<rating[10]>> <b><<win[10]>>-<<loss[10]>>-<<draw[10]>> <<SubWin[10]>>/<<SubLoss[10]>></b> <a href="exec:i = 10 & gt ''npcview''">see</a>'
$npc[11] = '<b><<$nikname[11]>></b> rating <<rating[11]>> <b><<win[11]>>-<<loss[11]>>-<<draw[11]>> <<SubWin[11]>>/<<SubLoss[11]>></b> <a href="exec:i = 11 & gt ''npcview''">see</a>'
$npc[12] = '<b><<$nikname[12]>></b> rating <<rating[12]>> <b><<win[12]>>-<<loss[12]>>-<<draw[12]>> <<SubWin[12]>>/<<SubLoss[12]>></b> <a href="exec:i = 12 & gt ''npcview''">see</a>'
$npc[13] = '<b><<$nikname[13]>></b> rating <<rating[13]>> <b><<win[13]>>-<<loss[13]>>-<<draw[13]>> <<SubWin[13]>>/<<SubLoss[13]>></b> <a href="exec:i = 13 & gt ''npcview''">see</a>'
$npc[14] = '<b><<$nikname[14]>></b> rating <<rating[14]>> <b><<win[14]>>-<<loss[14]>>-<<draw[14]>> <<SubWin[14]>>/<<SubLoss[14]>></b> <a href="exec:i = 14 & gt ''npcview''">see</a>'
$npc[15] = '<b><<$nikname[15]>></b> rating <<rating[15]>> <b><<win[15]>>-<<loss[15]>>-<<draw[15]>> <<SubWin[15]>>/<<SubLoss[15]>></b> <a href="exec:i = 15 & gt ''npcview''">see</a>'
$npc[16] = '<b><<$nikname[16]>></b> rating <<rating[16]>> <b><<win[16]>>-<<loss[16]>>-<<draw[16]>> <<SubWin[16]>>/<<SubLoss[16]>></b> <a href="exec:i = 16 & gt ''npcview''">see</a>'
$npc[17] = '<b><<$nikname[17]>></b> rating <<rating[17]>> <b><<win[17]>>-<<loss[17]>>-<<draw[17]>> <<SubWin[17]>>/<<SubLoss[17]>></b> <a href="exec:i = 17 & gt ''npcview''">see</a>'
$npc[18] = '<b><<$nikname[18]>></b> rating <<rating[18]>> <b><<win[18]>>-<<loss[18]>>-<<draw[18]>> <<SubWin[18]>>/<<SubLoss[18]>></b> <a href="exec:i = 18 & gt ''npcview''">see</a>'
$npc[19] = '<b><<$nikname[19]>></b> rating <<rating[19]>> <b><<win[19]>>-<<loss[19]>>-<<draw[19]>> <<SubWin[19]>>/<<SubLoss[19]>></b> <a href="exec:i = 19 & gt ''npcview''">see</a>'
$npc[20] = '<b><<$nikname[20]>></b> rating <<rating[20]>> <b><<win[20]>>-<<loss[20]>>-<<draw[20]>> <<SubWin[20]>>/<<SubLoss[20]>></b> <a href="exec:i = 20 & gt ''npcview''">see</a>'
$npc[21] = '<b><<$nikname[21]>></b> rating <<rating[21]>> <b><<win[21]>>-<<loss[21]>>-<<draw[21]>> <<SubWin[21]>>/<<SubLoss[21]>></b> <a href="exec:i = 21 & gt ''npcview''">see</a>'
$npc[22] = '<b><<$nikname[22]>></b> rating <<rating[22]>> <b><<win[22]>>-<<loss[22]>>-<<draw[22]>> <<SubWin[22]>>/<<SubLoss[22]>></b> <a href="exec:i = 22 & gt ''npcview''">see</a>'
$npc[23] = '<b><<$nikname[23]>></b> rating <<rating[23]>> <b><<win[23]>>-<<loss[23]>>-<<draw[23]>> <<SubWin[23]>>/<<SubLoss[23]>></b> <a href="exec:i = 23 & gt ''npcview''">see</a>'
$npc[24] = '<b><<$nikname[24]>></b> rating <<rating[24]>> <b><<win[24]>>-<<loss[24]>>-<<draw[24]>> <<SubWin[24]>>/<<SubLoss[24]>></b> <a href="exec:i = 24 & gt ''npcview''">see</a>'
$npc[25] = '<b><<$nikname[25]>></b> rating <<rating[25]>> <b><<win[25]>>-<<loss[25]>>-<<draw[25]>> <<SubWin[25]>>/<<SubLoss[25]>></b> <a href="exec:i = 25 & gt ''npcview''">see</a>'
$npc[26] = '<b><<$nikname[26]>></b> rating <<rating[26]>> <b><<win[26]>>-<<loss[26]>>-<<draw[26]>> <<SubWin[26]>>/<<SubLoss[26]>></b> <a href="exec:i = 26 & gt ''npcview''">see</a>'
$npc[27] = '<b><<$nikname[27]>></b> rating <<rating[27]>> <b><<win[27]>>-<<loss[27]>>-<<draw[27]>> <<SubWin[27]>>/<<SubLoss[27]>></b> <a href="exec:i = 27 & gt ''npcview''">see</a>'
$npc[28] = '<b><<$nikname[28]>></b> rating <<rating[28]>> <b><<win[28]>>-<<loss[28]>>-<<draw[28]>> <<SubWin[28]>>/<<SubLoss[28]>></b> <a href="exec:i = 28 & gt ''npcview''">see</a>'
$npc[29] = '<b><<$nikname[29]>></b> rating <<rating[29]>> <b><<win[29]>>-<<loss[29]>>-<<draw[29]>> <<SubWin[29]>>/<<SubLoss[29]>></b> <a href="exec:i = 29 & gt ''npcview''">see</a>'
$npc[30] = '<b><<$nikname[30]>></b> rating <<rating[30]>> <b><<win[30]>>-<<loss[30]>>-<<draw[30]>> <<SubWin[30]>>/<<SubLoss[30]>></b> <a href="exec:i = 30 & gt ''npcview''">see</a>'
$npc[31] = '<b><<$nikname[31]>></b> rating <<rating[31]>> <b><<win[31]>>-<<loss[31]>>-<<draw[31]>> <<SubWin[31]>>/<<SubLoss[31]>></b> <a href="exec:i = 31 & gt ''npcview''">see</a>'
$npc[32] = '<b><<$nikname[32]>></b> rating <<rating[32]>> <b><<win[32]>>-<<loss[32]>>-<<draw[32]>> <<SubWin[32]>>/<<SubLoss[32]>></b> <a href="exec:i = 32 & gt ''npcview''">see</a>'
$npc[33] = '<b><<$nikname[33]>></b> rating <<rating[33]>> <b><<win[33]>>-<<loss[33]>>-<<draw[33]>> <<SubWin[33]>>/<<SubLoss[33]>></b> <a href="exec:i = 33 & gt ''npcview''">see</a>'
$npc[34] = '<b><<$nikname[34]>></b> rating <<rating[34]>> <b><<win[34]>>-<<loss[34]>>-<<draw[34]>> <<SubWin[34]>>/<<SubLoss[34]>></b> <a href="exec:i = 34 & gt ''npcview''">see</a>'
$npc[35] = '<b><<$nikname[35]>></b> rating <<rating[35]>> <b><<win[35]>>-<<loss[35]>>-<<draw[35]>> <<SubWin[35]>>/<<SubLoss[35]>></b> <a href="exec:i = 35 & gt ''npcview''">see</a>'
$npc[36] = '<b><<$nikname[36]>></b> rating <<rating[36]>> <b><<win[36]>>-<<loss[36]>>-<<draw[36]>> <<SubWin[36]>>/<<SubLoss[36]>></b> <a href="exec:i = 36 & gt ''npcview''">see</a>'
$npc[37] = '<b><<$nikname[37]>></b> rating <<rating[37]>> <b><<win[37]>>-<<loss[37]>>-<<draw[37]>> <<SubWin[37]>>/<<SubLoss[37]>></b> <a href="exec:i = 37 & gt ''npcview''">see</a>'
$npc[38] = '<b><<$nikname[38]>></b> rating <<rating[38]>> <b><<win[38]>>-<<loss[38]>>-<<draw[38]>> <<SubWin[38]>>/<<SubLoss[38]>></b> <a href="exec:i = 38 & gt ''npcview''">see</a>'
$npc[39] = '<b><<$nikname[39]>></b> rating <<rating[39]>> <b><<win[39]>>-<<loss[39]>>-<<draw[39]>> <<SubWin[39]>>/<<SubLoss[39]>></b> <a href="exec:i = 39 & gt ''npcview''">see</a>'
$npc[40] = '<b><<$nikname[40]>></b> rating <<rating[40]>> <b><<win[40]>>-<<loss[40]>>-<<draw[40]>> <<SubWin[40]>>/<<SubLoss[40]>></b> <a href="exec:i = 40 & gt ''npcview''">see</a>'
$npc[41] = '<b><<$nikname[41]>></b> rating <<rating[41]>> <b><<win[41]>>-<<loss[41]>>-<<draw[41]>> <<SubWin[41]>>/<<SubLoss[41]>></b> <a href="exec:i = 41 & gt ''npcview''">see</a>'
$npc[42] = '<b><<$nikname[42]>></b> rating <<rating[42]>> <b><<win[42]>>-<<loss[42]>>-<<draw[42]>> <<SubWin[42]>>/<<SubLoss[42]>></b> <a href="exec:i = 42 & gt ''npcview''">see</a>'
$npc[43] = '<b><<$nikname[43]>></b> rating <<rating[43]>> <b><<win[43]>>-<<loss[43]>>-<<draw[43]>> <<SubWin[43]>>/<<SubLoss[43]>></b> <a href="exec:i = 43 & gt ''npcview''">see</a>'
$npc[44] = '<b><<$nikname[44]>></b> rating <<rating[44]>> <b><<win[44]>>-<<loss[44]>>-<<draw[44]>> <<SubWin[44]>>/<<SubLoss[44]>></b> <a href="exec:i = 44 & gt ''npcview''">see</a>'
$npc[45] = '<b><<$nikname[45]>></b> rating <<rating[45]>> <b><<win[45]>>-<<loss[45]>>-<<draw[45]>> <<SubWin[45]>>/<<SubLoss[45]>></b> <a href="exec:i = 45 & gt ''npcview''">see</a>'
$npc[46] = '<b><<$nikname[46]>></b> rating <<rating[46]>> <b><<win[46]>>-<<loss[46]>>-<<draw[46]>> <<SubWin[46]>>/<<SubLoss[46]>></b> <a href="exec:i = 46 & gt ''npcview''">see</a>'
$npc[47] = '<b><<$nikname[47]>></b> rating <<rating[47]>> <b><<win[47]>>-<<loss[47]>>-<<draw[47]>> <<SubWin[47]>>/<<SubLoss[47]>></b> <a href="exec:i = 47 & gt ''npcview''">see</a>'
$npc[48] = '<b><<$nikname[48]>></b> rating <<rating[48]>> <b><<win[48]>>-<<loss[48]>>-<<draw[48]>> <<SubWin[48]>>/<<SubLoss[48]>></b> <a href="exec:i = 48 & gt ''npcview''">see</a>'
$npc[49] = '<b><<$nikname[49]>></b> rating <<rating[49]>> <b><<win[49]>>-<<loss[49]>>-<<draw[49]>> <<SubWin[49]>>/<<SubLoss[49]>></b> <a href="exec:i = 49 & gt ''npcview''">see</a>'
$npc[50] = '<b><<$nikname[50]>></b> rating <<rating[50]>> <b><<win[50]>>-<<loss[50]>>-<<draw[50]>> <<SubWin[50]>>/<<SubLoss[50]>></b> <a href="exec:i = 50 & gt ''npcview''">see</a>'
$npc[51] = '<b><<$nikname[51]>></b> rating <<rating[51]>> <b><<win[51]>>-<<loss[51]>>-<<draw[51]>> <<SubWin[51]>>/<<SubLoss[51]>></b> <a href="exec:i = 51 & gt ''npcview''">see</a>'
$npc[52] = '<b><<$nikname[52]>></b> rating <<rating[52]>> <b><<win[52]>>-<<loss[52]>>-<<draw[52]>> <<SubWin[52]>>/<<SubLoss[52]>></b> <a href="exec:i = 52 & gt ''npcview''">see</a>'
$npc[53] = '<b><<$nikname[53]>></b> rating <<rating[53]>> <b><<win[53]>>-<<loss[53]>>-<<draw[53]>> <<SubWin[53]>>/<<SubLoss[53]>></b> <a href="exec:i = 53 & gt ''npcview''">see</a>'
$npc[54] = '<b><<$nikname[54]>></b> rating <<rating[54]>> <b><<win[54]>>-<<loss[54]>>-<<draw[54]>> <<SubWin[54]>>/<<SubLoss[54]>></b> <a href="exec:i = 54 & gt ''npcview''">see</a>'
$npc[55] = '<b><<$nikname[55]>></b> rating <<rating[55]>> <b><<win[55]>>-<<loss[55]>>-<<draw[55]>> <<SubWin[55]>>/<<SubLoss[55]>></b> <a href="exec:i = 55 & gt ''npcview''">see</a>'
$npc[56] = '<b><<$nikname[56]>></b> rating <<rating[56]>> <b><<win[56]>>-<<loss[56]>>-<<draw[56]>> <<SubWin[56]>>/<<SubLoss[56]>></b> <a href="exec:i = 56 & gt ''npcview''">see</a>'
$npc[57] = '<b><<$nikname[57]>></b> rating <<rating[57]>> <b><<win[57]>>-<<loss[57]>>-<<draw[57]>> <<SubWin[57]>>/<<SubLoss[57]>></b> <a href="exec:i = 57 & gt ''npcview''">see</a>'
$npc[58] = '<b><<$nikname[58]>></b> rating <<rating[58]>> <b><<win[58]>>-<<loss[58]>>-<<draw[58]>> <<SubWin[58]>>/<<SubLoss[58]>></b> <a href="exec:i = 58 & gt ''npcview''">see</a>'
$npc[59] = '<b><<$nikname[59]>></b> rating <<rating[59]>> <b><<win[59]>>-<<loss[59]>>-<<draw[59]>> <<SubWin[59]>>/<<SubLoss[59]>></b> <a href="exec:i = 59 & gt ''npcview''">see</a>'
$npc[60] = '<b><<$nikname[60]>></b> rating <<rating[60]>> <b><<win[60]>>-<<loss[60]>>-<<draw[60]>> <<SubWin[60]>>/<<SubLoss[60]>></b> <a href="exec:i = 60 & gt ''npcview''">see</a>'
$npc[61] = '<b><<$nikname[61]>></b> rating <<rating[61]>> <b><<win[61]>>-<<loss[61]>>-<<draw[61]>> <<SubWin[61]>>/<<SubLoss[61]>></b> <a href="exec:i = 61 & gt ''npcview''">see</a>'
$npc[62] = '<b><<$nikname[62]>></b> rating <<rating[62]>> <b><<win[62]>>-<<loss[62]>>-<<draw[62]>> <<SubWin[62]>>/<<SubLoss[62]>></b> <a href="exec:i = 62 & gt ''npcview''">see</a>'
$npc[63] = '<b><<$nikname[63]>></b> rating <<rating[63]>> <b><<win[63]>>-<<loss[63]>>-<<draw[63]>> <<SubWin[63]>>/<<SubLoss[63]>></b> <a href="exec:i = 63 & gt ''npcview''">see</a>'
$npc[64] = '<b><<$nikname[64]>></b> rating <<rating[64]>> <b><<win[64]>>-<<loss[64]>>-<<draw[64]>> <<SubWin[64]>>/<<SubLoss[64]>></b> <a href="exec:i = 64 & gt ''npcview''">see</a>'
$npc[65] = '<b><<$nikname[65]>></b> rating <<rating[65]>> <b><<win[65]>>-<<loss[65]>>-<<draw[65]>> <<SubWin[65]>>/<<SubLoss[65]>></b> <a href="exec:i = 65 & gt ''npcview''">see</a>'
$npc[66] = '<b><<$nikname[66]>></b> rating <<rating[66]>> <b><<win[66]>>-<<loss[66]>>-<<draw[66]>> <<SubWin[66]>>/<<SubLoss[66]>></b> <a href="exec:i = 66 & gt ''npcview''">see</a>'
$npc[67] = '<b><<$nikname[67]>></b> rating <<rating[67]>> <b><<win[67]>>-<<loss[67]>>-<<draw[67]>> <<SubWin[67]>>/<<SubLoss[67]>></b> <a href="exec:i = 67 & gt ''npcview''">see</a>'
$npc[68] = '<b><<$nikname[68]>></b> rating <<rating[68]>> <b><<win[68]>>-<<loss[68]>>-<<draw[68]>> <<SubWin[68]>>/<<SubLoss[68]>></b> <a href="exec:i = 68 & gt ''npcview''">see</a>'
$npc[69] = '<b><<$nikname[69]>></b> rating <<rating[69]>> <b><<win[69]>>-<<loss[69]>>-<<draw[69]>> <<SubWin[69]>>/<<SubLoss[69]>></b> <a href="exec:i = 69 & gt ''npcview''">see</a>'
$npc[70] = '<b><<$nikname[70]>></b> rating <<rating[70]>> <b><<win[70]>>-<<loss[70]>>-<<draw[70]>> <<SubWin[70]>>/<<SubLoss[70]>></b> <a href="exec:i = 70 & gt ''npcview''">see</a>'
$npc[71] = '<b><<$nikname[71]>></b> rating <<rating[71]>> <b><<win[71]>>-<<loss[71]>>-<<draw[71]>> <<SubWin[71]>>/<<SubLoss[71]>></b> <a href="exec:i = 71 & gt ''npcview''">see</a>'
$npc[72] = '<b><<$nikname[72]>></b> rating <<rating[72]>> <b><<win[72]>>-<<loss[72]>>-<<draw[72]>> <<SubWin[72]>>/<<SubLoss[72]>></b> <a href="exec:i = 72 & gt ''npcview''">see</a>'
$npc[73] = '<b><<$nikname[73]>></b> rating <<rating[73]>> <b><<win[73]>>-<<loss[73]>>-<<draw[73]>> <<SubWin[73]>>/<<SubLoss[73]>></b> <a href="exec:i = 73 & gt ''npcview''">see</a>'
$npc[74] = '<b><<$nikname[74]>></b> rating <<rating[74]>> <b><<win[74]>>-<<loss[74]>>-<<draw[74]>> <<SubWin[74]>>/<<SubLoss[74]>></b> <a href="exec:i = 74 & gt ''npcview''">see</a>'
$npc[75] = '<b><<$nikname[75]>></b> rating <<rating[75]>> <b><<win[75]>>-<<loss[75]>>-<<draw[75]>> <<SubWin[75]>>/<<SubLoss[75]>></b> <a href="exec:i = 75 & gt ''npcview''">see</a>'
$npc[76] = '<b><<$nikname[76]>></b> rating <<rating[76]>> <b><<win[76]>>-<<loss[76]>>-<<draw[76]>> <<SubWin[76]>>/<<SubLoss[76]>></b> <a href="exec:i = 76 & gt ''npcview''">see</a>'
$npc[77] = '<b><<$nikname[77]>></b> rating <<rating[77]>> <b><<win[77]>>-<<loss[77]>>-<<draw[77]>> <<SubWin[77]>>/<<SubLoss[77]>></b> <a href="exec:i = 77 & gt ''npcview''">see</a>'
$npc[78] = '<b><<$nikname[78]>></b> rating <<rating[78]>> <b><<win[78]>>-<<loss[78]>>-<<draw[78]>> <<SubWin[78]>>/<<SubLoss[78]>></b> <a href="exec:i = 78 & gt ''npcview''">see</a>'
$npc[79] = '<b><<$nikname[79]>></b> rating <<rating[79]>> <b><<win[79]>>-<<loss[79]>>-<<draw[79]>> <<SubWin[79]>>/<<SubLoss[79]>></b> <a href="exec:i = 79 & gt ''npcview''">see</a>'
$npc[80] = '<b><<$nikname[80]>></b> rating <<rating[80]>> <b><<win[80]>>-<<loss[80]>>-<<draw[80]>> <<SubWin[80]>>/<<SubLoss[80]>></b> <a href="exec:i = 80 & gt ''npcview''">see</a>'
$npc[81] = '<b><<$nikname[81]>></b> rating <<rating[81]>> <b><<win[81]>>-<<loss[81]>>-<<draw[81]>> <<SubWin[81]>>/<<SubLoss[81]>></b> <a href="exec:i = 81 & gt ''npcview''">see</a>'
$npc[82] = '<b><<$nikname[82]>></b> rating <<rating[82]>> <b><<win[82]>>-<<loss[82]>>-<<draw[82]>> <<SubWin[82]>>/<<SubLoss[82]>></b> <a href="exec:i = 82 & gt ''npcview''">see</a>'
$npc[83] = '<b><<$nikname[83]>></b> rating <<rating[83]>> <b><<win[83]>>-<<loss[83]>>-<<draw[83]>> <<SubWin[83]>>/<<SubLoss[83]>></b> <a href="exec:i = 83 & gt ''npcview''">see</a>'
$npc[84] = '<b><<$nikname[84]>></b> rating <<rating[84]>> <b><<win[84]>>-<<loss[84]>>-<<draw[84]>> <<SubWin[84]>>/<<SubLoss[84]>></b> <a href="exec:i = 84 & gt ''npcview''">see</a>'
$npc[85] = '<b><<$nikname[85]>></b> rating <<rating[85]>> <b><<win[85]>>-<<loss[85]>>-<<draw[85]>> <<SubWin[85]>>/<<SubLoss[85]>></b> <a href="exec:i = 85 & gt ''npcview''">see</a>'
$npc[86] = '<b><<$nikname[86]>></b> rating <<rating[86]>> <b><<win[86]>>-<<loss[86]>>-<<draw[86]>> <<SubWin[86]>>/<<SubLoss[86]>></b> <a href="exec:i = 86 & gt ''npcview''">see</a>'
$npc[87] = '<b><<$nikname[87]>></b> rating <<rating[87]>> <b><<win[87]>>-<<loss[87]>>-<<draw[87]>> <<SubWin[87]>>/<<SubLoss[87]>></b> <a href="exec:i = 87 & gt ''npcview''">see</a>'
$npc[88] = '<b><<$nikname[88]>></b> rating <<rating[88]>> <b><<win[88]>>-<<loss[88]>>-<<draw[88]>> <<SubWin[88]>>/<<SubLoss[88]>></b> <a href="exec:i = 88 & gt ''npcview''">see</a>'
$npc[89] = '<b><<$nikname[89]>></b> rating <<rating[89]>> <b><<win[89]>>-<<loss[89]>>-<<draw[89]>> <<SubWin[89]>>/<<SubLoss[89]>></b> <a href="exec:i = 89 & gt ''npcview''">see</a>'
$npc[90] = '<b><<$nikname[90]>></b> rating <<rating[90]>> <b><<win[90]>>-<<loss[90]>>-<<draw[90]>> <<SubWin[90]>>/<<SubLoss[90]>></b> <a href="exec:i = 90 & gt ''npcview''">see</a>'
$npc[91] = '<b><<$nikname[91]>></b> rating <<rating[91]>> <b><<win[91]>>-<<loss[91]>>-<<draw[91]>> <<SubWin[91]>>/<<SubLoss[91]>></b> <a href="exec:i = 91 & gt ''npcview''">see</a>'
$npc[92] = '<b><<$nikname[92]>></b> rating <<rating[92]>> <b><<win[92]>>-<<loss[92]>>-<<draw[92]>> <<SubWin[92]>>/<<SubLoss[92]>></b> <a href="exec:i = 92 & gt ''npcview''">see</a>'
$npc[93] = '<b><<$nikname[93]>></b> rating <<rating[93]>> <b><<win[93]>>-<<loss[93]>>-<<draw[93]>> <<SubWin[93]>>/<<SubLoss[93]>></b> <a href="exec:i = 93 & gt ''npcview''">see</a>'
$npc[94] = '<b><<$nikname[94]>></b> rating <<rating[94]>> <b><<win[94]>>-<<loss[94]>>-<<draw[94]>> <<SubWin[94]>>/<<SubLoss[94]>></b> <a href="exec:i = 94 & gt ''npcview''">see</a>'
$npc[95] = '<b><<$nikname[95]>></b> rating <<rating[95]>> <b><<win[95]>>-<<loss[95]>>-<<draw[95]>> <<SubWin[95]>>/<<SubLoss[95]>></b> <a href="exec:i = 95 & gt ''npcview''">see</a>'
$npc[96] = '<b><<$nikname[96]>></b> rating <<rating[96]>> <b><<win[96]>>-<<loss[96]>>-<<draw[96]>> <<SubWin[96]>>/<<SubLoss[96]>></b> <a href="exec:i = 96 & gt ''npcview''">see</a>'
$npc[97] = '<b><<$nikname[97]>></b> rating <<rating[97]>> <b><<win[97]>>-<<loss[97]>>-<<draw[97]>> <<SubWin[97]>>/<<SubLoss[97]>></b> <a href="exec:i = 97 & gt ''npcview''">see</a>'
$npc[98] = '<b><<$nikname[98]>></b> rating <<rating[98]>> <b><<win[98]>>-<<loss[98]>>-<<draw[98]>> <<SubWin[98]>>/<<SubLoss[98]>></b> <a href="exec:i = 98 & gt ''npcview''">see</a>'
$npc[99] = '<b><<$nikname[99]>></b> rating <<rating[99]>> <b><<win[99]>>-<<loss[99]>>-<<draw[99]>> <<SubWin[99]>>/<<SubLoss[99]>></b> <a href="exec:i = 99 & gt ''npcview''">see</a>'
$npc[100] = '<b><<$nikname[100]>></b> rating <<rating[100]>> <b><<win[100]>>-<<loss[100]>>-<<draw[100]>> <<SubWin[100]>>/<<SubLoss[100]>></b> <a href="exec:i = 100 & gt ''npcview''">see</a>'
$npc[101] = '<b><<$nikname[101]>></b> rating <<rating[101]>> <b><<win[101]>>-<<loss[101]>>-<<draw[101]>> <<SubWin[101]>>/<<SubLoss[101]>></b> <a href="exec:i = 101 & gt ''npcview''">see</a>'
$npc[102] = '<b><<$nikname[102]>></b> rating <<rating[102]>> <b><<win[102]>>-<<loss[102]>>-<<draw[102]>> <<SubWin[102]>>/<<SubLoss[102]>></b> <a href="exec:i = 102 & gt ''npcview''">see</a>'
$npc[103] = '<b><<$nikname[103]>></b> rating <<rating[103]>> <b><<win[103]>>-<<loss[103]>>-<<draw[103]>> <<SubWin[103]>>/<<SubLoss[103]>></b> <a href="exec:i = 103 & gt ''npcview''">see</a>'
$npc[104] = '<b><<$nikname[104]>></b> rating <<rating[104]>> <b><<win[104]>>-<<loss[104]>>-<<draw[104]>> <<SubWin[104]>>/<<SubLoss[104]>></b> <a href="exec:i = 104 & gt ''npcview''">see</a>'
$npc[105] = '<b><<$nikname[105]>></b> rating <<rating[105]>> <b><<win[105]>>-<<loss[105]>>-<<draw[105]>> <<SubWin[105]>>/<<SubLoss[105]>></b> <a href="exec:i = 105 & gt ''npcview''">see</a>'
$npc[106] = '<b><<$nikname[106]>></b> rating <<rating[106]>> <b><<win[106]>>-<<loss[106]>>-<<draw[106]>> <<SubWin[106]>>/<<SubLoss[106]>></b> <a href="exec:i = 106 & gt ''npcview''">see</a>'
$npc[107] = '<b><<$nikname[107]>></b> rating <<rating[107]>> <b><<win[107]>>-<<loss[107]>>-<<draw[107]>> <<SubWin[107]>>/<<SubLoss[107]>></b> <a href="exec:i = 107 & gt ''npcview''">see</a>'
$npc[108] = '<b><<$nikname[108]>></b> rating <<rating[108]>> <b><<win[108]>>-<<loss[108]>>-<<draw[108]>> <<SubWin[108]>>/<<SubLoss[108]>></b> <a href="exec:i = 108 & gt ''npcview''">see</a>'
$npc[109] = '<b><<$nikname[109]>></b> rating <<rating[109]>> <b><<win[109]>>-<<loss[109]>>-<<draw[109]>> <<SubWin[109]>>/<<SubLoss[109]>></b> <a href="exec:i = 109 & gt ''npcview''">see</a>'
$npc[110] = '<b><<$nikname[110]>></b> rating <<rating[110]>> <b><<win[110]>>-<<loss[110]>>-<<draw[110]>> <<SubWin[110]>>/<<SubLoss[110]>></b> <a href="exec:i = 110 & gt ''npcview''">see</a>'
$npc[111] = '<b><<$nikname[111]>></b> rating <<rating[111]>> <b><<win[111]>>-<<loss[111]>>-<<draw[111]>> <<SubWin[111]>>/<<SubLoss[111]>></b> <a href="exec:i = 111 & gt ''npcview''">see</a>'
$npc[112] = '<b><<$nikname[112]>></b> rating <<rating[112]>> <b><<win[112]>>-<<loss[112]>>-<<draw[112]>> <<SubWin[112]>>/<<SubLoss[112]>></b> <a href="exec:i = 112 & gt ''npcview''">see</a>'
$npc[113] = '<b><<$nikname[113]>></b> rating <<rating[113]>> <b><<win[113]>>-<<loss[113]>>-<<draw[113]>> <<SubWin[113]>>/<<SubLoss[113]>></b> <a href="exec:i = 113 & gt ''npcview''">see</a>'
$npc[114] = '<b><<$nikname[114]>></b> rating <<rating[114]>> <b><<win[114]>>-<<loss[114]>>-<<draw[114]>> <<SubWin[114]>>/<<SubLoss[114]>></b> <a href="exec:i = 114 & gt ''npcview''">see</a>'
$npc[115] = '<b><<$nikname[115]>></b> rating <<rating[115]>> <b><<win[115]>>-<<loss[115]>>-<<draw[115]>> <<SubWin[115]>>/<<SubLoss[115]>></b> <a href="exec:i = 115 & gt ''npcview''">see</a>'
$npc[116] = '<b><<$nikname[116]>></b> rating <<rating[116]>> <b><<win[116]>>-<<loss[116]>>-<<draw[116]>> <<SubWin[116]>>/<<SubLoss[116]>></b> <a href="exec:i = 116 & gt ''npcview''">see</a>'
$npc[117] = '<b><<$nikname[117]>></b> rating <<rating[117]>> <b><<win[117]>>-<<loss[117]>>-<<draw[117]>> <<SubWin[117]>>/<<SubLoss[117]>></b> <a href="exec:i = 117 & gt ''npcview''">see</a>'
$npc[118] = '<b><<$nikname[118]>></b> rating <<rating[118]>> <b><<win[118]>>-<<loss[118]>>-<<draw[118]>> <<SubWin[118]>>/<<SubLoss[118]>></b> <a href="exec:i = 118 & gt ''npcview''">see</a>'
$npc[119] = '<b><<$nikname[119]>></b> rating <<rating[119]>> <b><<win[119]>>-<<loss[119]>>-<<draw[119]>> <<SubWin[119]>>/<<SubLoss[119]>></b> <a href="exec:i = 119 & gt ''npcview''">see</a>'
$npc[120] = '<b><<$nikname[120]>></b> rating <<rating[120]>> <b><<win[120]>>-<<loss[120]>>-<<draw[120]>> <<SubWin[120]>>/<<SubLoss[120]>></b> <a href="exec:i = 120 & gt ''npcview''">see</a>'
$npc[121] = '<b><<$nikname[121]>></b> rating <<rating[121]>> <b><<win[121]>>-<<loss[121]>>-<<draw[121]>> <<SubWin[121]>>/<<SubLoss[121]>></b> <a href="exec:i = 121 & gt ''npcview''">see</a>'
$npc[122] = '<b><<$nikname[122]>></b> rating <<rating[122]>> <b><<win[122]>>-<<loss[122]>>-<<draw[122]>> <<SubWin[122]>>/<<SubLoss[122]>></b> <a href="exec:i = 122 & gt ''npcview''">see</a>'
$npc[123] = '<b><<$nikname[123]>></b> rating <<rating[123]>> <b><<win[123]>>-<<loss[123]>>-<<draw[123]>> <<SubWin[123]>>/<<SubLoss[123]>></b> <a href="exec:i = 123 & gt ''npcview''">see</a>'
$npc[124] = '<b><<$nikname[124]>></b> rating <<rating[124]>> <b><<win[124]>>-<<loss[124]>>-<<draw[124]>> <<SubWin[124]>>/<<SubLoss[124]>></b> <a href="exec:i = 124 & gt ''npcview''">see</a>'
$npc[125] = '<b><<$nikname[125]>></b> rating <<rating[125]>> <b><<win[125]>>-<<loss[125]>>-<<draw[125]>> <<SubWin[125]>>/<<SubLoss[125]>></b> <a href="exec:i = 125 & gt ''npcview''">see</a>'
$npc[126] = '<b><<$nikname[126]>></b> rating <<rating[126]>> <b><<win[126]>>-<<loss[126]>>-<<draw[126]>> <<SubWin[126]>>/<<SubLoss[126]>></b> <a href="exec:i = 126 & gt ''npcview''">see</a>'
$npc[127] = '<b><<$nikname[127]>></b> rating <<rating[127]>> <b><<win[127]>>-<<loss[127]>>-<<draw[127]>> <<SubWin[127]>>/<<SubLoss[127]>></b> <a href="exec:i = 127 & gt ''npcview''">see</a>'
$npc[128] = '<b><<$nikname[128]>></b> rating <<rating[128]>> <b><<win[128]>>-<<loss[128]>>-<<draw[128]>> <<SubWin[128]>>/<<SubLoss[128]>></b> <a href="exec:i = 128 & gt ''npcview''">see</a>'
$npc[129] = '<b><<$nikname[129]>></b> rating <<rating[129]>> <b><<win[129]>>-<<loss[129]>>-<<draw[129]>> <<SubWin[129]>>/<<SubLoss[129]>></b> <a href="exec:i = 129 & gt ''npcview''">see</a>'
$npc[130] = '<b><<$nikname[130]>></b> rating <<rating[130]>> <b><<win[130]>>-<<loss[130]>>-<<draw[130]>> <<SubWin[130]>>/<<SubLoss[130]>></b> <a href="exec:i = 130 & gt ''npcview''">see</a>'
$npc[131] = '<b><<$nikname[131]>></b> rating <<rating[131]>> <b><<win[131]>>-<<loss[131]>>-<<draw[131]>> <<SubWin[131]>>/<<SubLoss[131]>></b> <a href="exec:i = 131 & gt ''npcview''">see</a>'
$npc[132] = '<b><<$nikname[132]>></b> rating <<rating[132]>> <b><<win[132]>>-<<loss[132]>>-<<draw[132]>> <<SubWin[132]>>/<<SubLoss[132]>></b> <a href="exec:i = 132 & gt ''npcview''">see</a>'
$npc[133] = '<b><<$nikname[133]>></b> rating <<rating[133]>> <b><<win[133]>>-<<loss[133]>>-<<draw[133]>> <<SubWin[133]>>/<<SubLoss[133]>></b> <a href="exec:i = 133 & gt ''npcview''">see</a>'
$npc[134] = '<b><<$nikname[134]>></b> rating <<rating[134]>> <b><<win[134]>>-<<loss[134]>>-<<draw[134]>> <<SubWin[134]>>/<<SubLoss[134]>></b> <a href="exec:i = 134 & gt ''npcview''">see</a>'
$npc[135] = '<b><<$nikname[135]>></b> rating <<rating[135]>> <b><<win[135]>>-<<loss[135]>>-<<draw[135]>> <<SubWin[135]>>/<<SubLoss[135]>></b> <a href="exec:i = 135 & gt ''npcview''">see</a>'
$npc[136] = '<b><<$nikname[136]>></b> rating <<rating[136]>> <b><<win[136]>>-<<loss[136]>>-<<draw[136]>> <<SubWin[136]>>/<<SubLoss[136]>></b> <a href="exec:i = 136 & gt ''npcview''">see</a>'
$npc[137] = '<b><<$nikname[137]>></b> rating <<rating[137]>> <b><<win[137]>>-<<loss[137]>>-<<draw[137]>> <<SubWin[137]>>/<<SubLoss[137]>></b> <a href="exec:i = 137 & gt ''npcview''">see</a>'
$npc[138] = '<b><<$nikname[138]>></b> rating <<rating[138]>> <b><<win[138]>>-<<loss[138]>>-<<draw[138]>> <<SubWin[138]>>/<<SubLoss[138]>></b> <a href="exec:i = 138 & gt ''npcview''">see</a>'
$npc[139] = '<b><<$nikname[139]>></b> rating <<rating[139]>> <b><<win[139]>>-<<loss[139]>>-<<draw[139]>> <<SubWin[139]>>/<<SubLoss[139]>></b> <a href="exec:i = 139 & gt ''npcview''">see</a>'
$npc[140] = '<b><<$nikname[140]>></b> rating <<rating[140]>> <b><<win[140]>>-<<loss[140]>>-<<draw[140]>> <<SubWin[140]>>/<<SubLoss[140]>></b> <a href="exec:i = 140 & gt ''npcview''">see</a>'
$npc[141] = '<b><<$nikname[141]>></b> rating <<rating[141]>> <b><<win[141]>>-<<loss[141]>>-<<draw[141]>> <<SubWin[141]>>/<<SubLoss[141]>></b> <a href="exec:i = 141 & gt ''npcview''">see</a>'
$npc[142] = '<b><<$nikname[142]>></b> rating <<rating[142]>> <b><<win[142]>>-<<loss[142]>>-<<draw[142]>> <<SubWin[142]>>/<<SubLoss[142]>></b> <a href="exec:i = 142 & gt ''npcview''">see</a>'
$npc[143] = '<b><<$nikname[143]>></b> rating <<rating[143]>> <b><<win[143]>>-<<loss[143]>>-<<draw[143]>> <<SubWin[143]>>/<<SubLoss[143]>></b> <a href="exec:i = 143 & gt ''npcview''">see</a>'
$npc[144] = '<b><<$nikname[144]>></b> rating <<rating[144]>> <b><<win[144]>>-<<loss[144]>>-<<draw[144]>> <<SubWin[144]>>/<<SubLoss[144]>></b> <a href="exec:i = 144 & gt ''npcview''">see</a>'
$npc[145] = '<b><<$nikname[145]>></b> rating <<rating[145]>> <b><<win[145]>>-<<loss[145]>>-<<draw[145]>> <<SubWin[145]>>/<<SubLoss[145]>></b> <a href="exec:i = 145 & gt ''npcview''">see</a>'
$npc[146] = '<b><<$nikname[146]>></b> rating <<rating[146]>> <b><<win[146]>>-<<loss[146]>>-<<draw[146]>> <<SubWin[146]>>/<<SubLoss[146]>></b> <a href="exec:i = 146 & gt ''npcview''">see</a>'
$npc[147] = '<b><<$nikname[147]>></b> rating <<rating[147]>> <b><<win[147]>>-<<loss[147]>>-<<draw[147]>> <<SubWin[147]>>/<<SubLoss[147]>></b> <a href="exec:i = 147 & gt ''npcview''">see</a>'
$npc[148] = '<b><<$nikname[148]>></b> rating <<rating[148]>> <b><<win[148]>>-<<loss[148]>>-<<draw[148]>> <<SubWin[148]>>/<<SubLoss[148]>></b> <a href="exec:i = 148 & gt ''npcview''">see</a>'
$npc[149] = '<b><<$nikname[149]>></b> rating <<rating[149]>> <b><<win[149]>>-<<loss[149]>>-<<draw[149]>> <<SubWin[149]>>/<<SubLoss[149]>></b> <a href="exec:i = 149 & gt ''npcview''">see</a>'
$npc[150] = '<b><<$nikname[150]>></b> rating <<rating[150]>> <b><<win[150]>>-<<loss[150]>>-<<draw[150]>> <<SubWin[150]>>/<<SubLoss[150]>></b> <a href="exec:i = 150 & gt ''npcview''">see</a>'
$npc[151] = '<b><<$nikname[151]>></b> rating <<rating[151]>> <b><<win[151]>>-<<loss[151]>>-<<draw[151]>> <<SubWin[151]>>/<<SubLoss[151]>></b> <a href="exec:i = 151 & gt ''npcview''">see</a>'
$npc[152] = '<b><<$nikname[152]>></b> rating <<rating[152]>> <b><<win[152]>>-<<loss[152]>>-<<draw[152]>> <<SubWin[152]>>/<<SubLoss[152]>></b> <a href="exec:i = 152 & gt ''npcview''">see</a>'
$npc[153] = '<b><<$nikname[153]>></b> rating <<rating[153]>> <b><<win[153]>>-<<loss[153]>>-<<draw[153]>> <<SubWin[153]>>/<<SubLoss[153]>></b> <a href="exec:i = 153 & gt ''npcview''">see</a>'
$npc[154] = '<b><<$nikname[154]>></b> rating <<rating[154]>> <b><<win[154]>>-<<loss[154]>>-<<draw[154]>> <<SubWin[154]>>/<<SubLoss[154]>></b> <a href="exec:i = 154 & gt ''npcview''">see</a>'
$npc[155] = '<b><<$nikname[155]>></b> rating <<rating[155]>> <b><<win[155]>>-<<loss[155]>>-<<draw[155]>> <<SubWin[155]>>/<<SubLoss[155]>></b> <a href="exec:i = 155 & gt ''npcview''">see</a>'
$npc[156] = '<b><<$nikname[156]>></b> rating <<rating[156]>> <b><<win[156]>>-<<loss[156]>>-<<draw[156]>> <<SubWin[156]>>/<<SubLoss[156]>></b> <a href="exec:i = 156 & gt ''npcview''">see</a>'
$npc[157] = '<b><<$nikname[157]>></b> rating <<rating[157]>> <b><<win[157]>>-<<loss[157]>>-<<draw[157]>> <<SubWin[157]>>/<<SubLoss[157]>></b> <a href="exec:i = 157 & gt ''npcview''">see</a>'
$npc[158] = '<b><<$nikname[158]>></b> rating <<rating[158]>> <b><<win[158]>>-<<loss[158]>>-<<draw[158]>> <<SubWin[158]>>/<<SubLoss[158]>></b> <a href="exec:i = 158 & gt ''npcview''">see</a>'
$npc[159] = '<b><<$nikname[159]>></b> rating <<rating[159]>> <b><<win[159]>>-<<loss[159]>>-<<draw[159]>> <<SubWin[159]>>/<<SubLoss[159]>></b> <a href="exec:i = 159 & gt ''npcview''">see</a>'
$npc[160] = '<b><<$nikname[160]>></b> rating <<rating[160]>> <b><<win[160]>>-<<loss[160]>>-<<draw[160]>> <<SubWin[160]>>/<<SubLoss[160]>></b> <a href="exec:i = 160 & gt ''npcview''">see</a>'
$npc[161] = '<b><<$nikname[161]>></b> rating <<rating[161]>> <b><<win[161]>>-<<loss[161]>>-<<draw[161]>> <<SubWin[161]>>/<<SubLoss[161]>></b> <a href="exec:i = 161 & gt ''npcview''">see</a>'
$npc[162] = '<b><<$nikname[162]>></b> rating <<rating[162]>> <b><<win[162]>>-<<loss[162]>>-<<draw[162]>> <<SubWin[162]>>/<<SubLoss[162]>></b> <a href="exec:i = 162 & gt ''npcview''">see</a>'
$npc[163] = '<b><<$nikname[163]>></b> rating <<rating[163]>> <b><<win[163]>>-<<loss[163]>>-<<draw[163]>> <<SubWin[163]>>/<<SubLoss[163]>></b> <a href="exec:i = 163 & gt ''npcview''">see</a>'
$npc[164] = '<b><<$nikname[164]>></b> rating <<rating[164]>> <b><<win[164]>>-<<loss[164]>>-<<draw[164]>> <<SubWin[164]>>/<<SubLoss[164]>></b> <a href="exec:i = 164 & gt ''npcview''">see</a>'
$npc[165] = '<b><<$nikname[165]>></b> rating <<rating[165]>> <b><<win[165]>>-<<loss[165]>>-<<draw[165]>> <<SubWin[165]>>/<<SubLoss[165]>></b> <a href="exec:i = 165 & gt ''npcview''">see</a>'
$npc[166] = '<b><<$nikname[166]>></b> rating <<rating[166]>> <b><<win[166]>>-<<loss[166]>>-<<draw[166]>> <<SubWin[166]>>/<<SubLoss[166]>></b> <a href="exec:i = 166 & gt ''npcview''">see</a>'
$npc[167] = '<b><<$nikname[167]>></b> rating <<rating[167]>> <b><<win[167]>>-<<loss[167]>>-<<draw[167]>> <<SubWin[167]>>/<<SubLoss[167]>></b> <a href="exec:i = 167 & gt ''npcview''">see</a>'
$npc[168] = '<b><<$nikname[168]>></b> rating <<rating[168]>> <b><<win[168]>>-<<loss[168]>>-<<draw[168]>> <<SubWin[168]>>/<<SubLoss[168]>></b> <a href="exec:i = 168 & gt ''npcview''">see</a>'
$npc[169] = '<b><<$nikname[169]>></b> rating <<rating[169]>> <b><<win[169]>>-<<loss[169]>>-<<draw[169]>> <<SubWin[169]>>/<<SubLoss[169]>></b> <a href="exec:i = 169 & gt ''npcview''">see</a>'
$npc[170] = '<b><<$nikname[170]>></b> rating <<rating[170]>> <b><<win[170]>>-<<loss[170]>>-<<draw[170]>> <<SubWin[170]>>/<<SubLoss[170]>></b> <a href="exec:i = 170 & gt ''npcview''">see</a>'
$npc[171] = '<b><<$nikname[171]>></b> rating <<rating[171]>> <b><<win[171]>>-<<loss[171]>>-<<draw[171]>> <<SubWin[171]>>/<<SubLoss[171]>></b> <a href="exec:i = 171 & gt ''npcview''">see</a>'
$npc[172] = '<b><<$nikname[172]>></b> rating <<rating[172]>> <b><<win[172]>>-<<loss[172]>>-<<draw[172]>> <<SubWin[172]>>/<<SubLoss[172]>></b> <a href="exec:i = 172 & gt ''npcview''">see</a>'
$npc[173] = '<b><<$nikname[173]>></b> rating <<rating[173]>> <b><<win[173]>>-<<loss[173]>>-<<draw[173]>> <<SubWin[173]>>/<<SubLoss[173]>></b> <a href="exec:i = 173 & gt ''npcview''">see</a>'
$npc[174] = '<b><<$nikname[174]>></b> rating <<rating[174]>> <b><<win[174]>>-<<loss[174]>>-<<draw[174]>> <<SubWin[174]>>/<<SubLoss[174]>></b> <a href="exec:i = 174 & gt ''npcview''">see</a>'
$npc[175] = '<b><<$nikname[175]>></b> rating <<rating[175]>> <b><<win[175]>>-<<loss[175]>>-<<draw[175]>> <<SubWin[175]>>/<<SubLoss[175]>></b> <a href="exec:i = 175 & gt ''npcview''">see</a>'
$npc[176] = '<b><<$nikname[176]>></b> rating <<rating[176]>> <b><<win[176]>>-<<loss[176]>>-<<draw[176]>> <<SubWin[176]>>/<<SubLoss[176]>></b> <a href="exec:i = 176 & gt ''npcview''">see</a>'
$npc[177] = '<b><<$nikname[177]>></b> rating <<rating[177]>> <b><<win[177]>>-<<loss[177]>>-<<draw[177]>> <<SubWin[177]>>/<<SubLoss[177]>></b> <a href="exec:i = 177 & gt ''npcview''">see</a>'
$npc[178] = '<b><<$nikname[178]>></b> rating <<rating[178]>> <b><<win[178]>>-<<loss[178]>>-<<draw[178]>> <<SubWin[178]>>/<<SubLoss[178]>></b> <a href="exec:i = 178 & gt ''npcview''">see</a>'
$npc[179] = '<b><<$nikname[179]>></b> rating <<rating[179]>> <b><<win[179]>>-<<loss[179]>>-<<draw[179]>> <<SubWin[179]>>/<<SubLoss[179]>></b> <a href="exec:i = 179 & gt ''npcview''">see</a>'
$npc[180] = '<b><<$nikname[180]>></b> rating <<rating[180]>> <b><<win[180]>>-<<loss[180]>>-<<draw[180]>> <<SubWin[180]>>/<<SubLoss[180]>></b> <a href="exec:i = 180 & gt ''npcview''">see</a>'
$npc[181] = '<b><<$nikname[181]>></b> rating <<rating[181]>> <b><<win[181]>>-<<loss[181]>>-<<draw[181]>> <<SubWin[181]>>/<<SubLoss[181]>></b> <a href="exec:i = 181 & gt ''npcview''">see</a>'
$npc[182] = '<b><<$nikname[182]>></b> rating <<rating[182]>> <b><<win[182]>>-<<loss[182]>>-<<draw[182]>> <<SubWin[182]>>/<<SubLoss[182]>></b> <a href="exec:i = 182 & gt ''npcview''">see</a>'
$npc[183] = '<b><<$nikname[183]>></b> rating <<rating[183]>> <b><<win[183]>>-<<loss[183]>>-<<draw[183]>> <<SubWin[183]>>/<<SubLoss[183]>></b> <a href="exec:i = 183 & gt ''npcview''">see</a>'
$npc[184] = '<b><<$nikname[184]>></b> rating <<rating[184]>> <b><<win[184]>>-<<loss[184]>>-<<draw[184]>> <<SubWin[184]>>/<<SubLoss[184]>></b> <a href="exec:i = 184 & gt ''npcview''">see</a>'
$npc[185] = '<b><<$nikname[185]>></b> rating <<rating[185]>> <b><<win[185]>>-<<loss[185]>>-<<draw[185]>> <<SubWin[185]>>/<<SubLoss[185]>></b> <a href="exec:i = 185 & gt ''npcview''">see</a>'
$npc[186] = '<b><<$nikname[186]>></b> rating <<rating[186]>> <b><<win[186]>>-<<loss[186]>>-<<draw[186]>> <<SubWin[186]>>/<<SubLoss[186]>></b> <a href="exec:i = 186 & gt ''npcview''">see</a>'
$npc[187] = '<b><<$nikname[187]>></b> rating <<rating[187]>> <b><<win[187]>>-<<loss[187]>>-<<draw[187]>> <<SubWin[187]>>/<<SubLoss[187]>></b> <a href="exec:i = 187 & gt ''npcview''">see</a>'
$npc[188] = '<b><<$nikname[188]>></b> rating <<rating[188]>> <b><<win[188]>>-<<loss[188]>>-<<draw[188]>> <<SubWin[188]>>/<<SubLoss[188]>></b> <a href="exec:i = 188 & gt ''npcview''">see</a>'
$npc[189] = '<b><<$nikname[189]>></b> rating <<rating[189]>> <b><<win[189]>>-<<loss[189]>>-<<draw[189]>> <<SubWin[189]>>/<<SubLoss[189]>></b> <a href="exec:i = 189 & gt ''npcview''">see</a>'
$npc[190] = '<b><<$nikname[190]>></b> rating <<rating[190]>> <b><<win[190]>>-<<loss[190]>>-<<draw[190]>> <<SubWin[190]>>/<<SubLoss[190]>></b> <a href="exec:i = 190 & gt ''npcview''">see</a>'
$npc[191] = '<b><<$nikname[191]>></b> rating <<rating[191]>> <b><<win[191]>>-<<loss[191]>>-<<draw[191]>> <<SubWin[191]>>/<<SubLoss[191]>></b> <a href="exec:i = 191 & gt ''npcview''">see</a>'
$npc[192] = '<b><<$nikname[192]>></b> rating <<rating[192]>> <b><<win[192]>>-<<loss[192]>>-<<draw[192]>> <<SubWin[192]>>/<<SubLoss[192]>></b> <a href="exec:i = 192 & gt ''npcview''">see</a>'
$npc[193] = '<b><<$nikname[193]>></b> rating <<rating[193]>> <b><<win[193]>>-<<loss[193]>>-<<draw[193]>> <<SubWin[193]>>/<<SubLoss[193]>></b> <a href="exec:i = 193 & gt ''npcview''">see</a>'
$npc[194] = '<b><<$nikname[194]>></b> rating <<rating[194]>> <b><<win[194]>>-<<loss[194]>>-<<draw[194]>> <<SubWin[194]>>/<<SubLoss[194]>></b> <a href="exec:i = 194 & gt ''npcview''">see</a>'
$npc[195] = '<b><<$nikname[195]>></b> rating <<rating[195]>> <b><<win[195]>>-<<loss[195]>>-<<draw[195]>> <<SubWin[195]>>/<<SubLoss[195]>></b> <a href="exec:i = 195 & gt ''npcview''">see</a>'
$npc[196] = '<b><<$nikname[196]>></b> rating <<rating[196]>> <b><<win[196]>>-<<loss[196]>>-<<draw[196]>> <<SubWin[196]>>/<<SubLoss[196]>></b> <a href="exec:i = 196 & gt ''npcview''">see</a>'
$npc[197] = '<b><<$nikname[197]>></b> rating <<rating[197]>> <b><<win[197]>>-<<loss[197]>>-<<draw[197]>> <<SubWin[197]>>/<<SubLoss[197]>></b> <a href="exec:i = 197 & gt ''npcview''">see</a>'
$npc[198] = '<b><<$nikname[198]>></b> rating <<rating[198]>> <b><<win[198]>>-<<loss[198]>>-<<draw[198]>> <<SubWin[198]>>/<<SubLoss[198]>></b> <a href="exec:i = 198 & gt ''npcview''">see</a>'
$npc[199] = '<b><<$nikname[199]>></b> rating <<rating[199]>> <b><<win[199]>>-<<loss[199]>>-<<draw[199]>> <<SubWin[199]>>/<<SubLoss[199]>></b> <a href="exec:i = 199 & gt ''npcview''">see</a>'
$npc[200] = '<b><<$nikname[200]>></b> rating <<rating[200]>> <b><<win[200]>>-<<loss[200]>>-<<draw[200]>> <<SubWin[200]>>/<<SubLoss[200]>></b> <a href="exec:i = 200 & gt ''npcview''">see</a>'
$npc[201] = '<b><<$nikname[201]>></b> rating <<rating[201]>> <b><<win[201]>>-<<loss[201]>>-<<draw[201]>> <<SubWin[201]>>/<<SubLoss[201]>></b> <a href="exec:i = 201 & gt ''npcview''">see</a>'
$npc[202] = '<b><<$nikname[202]>></b> rating <<rating[202]>> <b><<win[202]>>-<<loss[202]>>-<<draw[202]>> <<SubWin[202]>>/<<SubLoss[202]>></b> <a href="exec:i = 202 & gt ''npcview''">see</a>'
$npc[203] = '<b><<$nikname[203]>></b> rating <<rating[203]>> <b><<win[203]>>-<<loss[203]>>-<<draw[203]>> <<SubWin[203]>>/<<SubLoss[203]>></b> <a href="exec:i = 203 & gt ''npcview''">see</a>'
$npc[204] = '<b><<$nikname[204]>></b> rating <<rating[204]>> <b><<win[204]>>-<<loss[204]>>-<<draw[204]>> <<SubWin[204]>>/<<SubLoss[204]>></b> <a href="exec:i = 204 & gt ''npcview''">see</a>'
$npc[205] = '<b><<$nikname[205]>></b> rating <<rating[205]>> <b><<win[205]>>-<<loss[205]>>-<<draw[205]>> <<SubWin[205]>>/<<SubLoss[205]>></b> <a href="exec:i = 205 & gt ''npcview''">see</a>'
$npc[206] = '<b><<$nikname[206]>></b> rating <<rating[206]>> <b><<win[206]>>-<<loss[206]>>-<<draw[206]>> <<SubWin[206]>>/<<SubLoss[206]>></b> <a href="exec:i = 206 & gt ''npcview''">see</a>'
$npc[207] = '<b><<$nikname[207]>></b> rating <<rating[207]>> <b><<win[207]>>-<<loss[207]>>-<<draw[207]>> <<SubWin[207]>>/<<SubLoss[207]>></b> <a href="exec:i = 207 & gt ''npcview''">see</a>'
$npc[208] = '<b><<$nikname[208]>></b> rating <<rating[208]>> <b><<win[208]>>-<<loss[208]>>-<<draw[208]>> <<SubWin[208]>>/<<SubLoss[208]>></b> <a href="exec:i = 208 & gt ''npcview''">see</a>'
$npc[209] = '<b><<$nikname[209]>></b> rating <<rating[209]>> <b><<win[209]>>-<<loss[209]>>-<<draw[209]>> <<SubWin[209]>>/<<SubLoss[209]>></b> <a href="exec:i = 209 & gt ''npcview''">see</a>'
$npc[210] = '<b><<$nikname[210]>></b> rating <<rating[210]>> <b><<win[210]>>-<<loss[210]>>-<<draw[210]>> <<SubWin[210]>>/<<SubLoss[210]>></b> <a href="exec:i = 210 & gt ''npcview''">see</a>'
$npc[211] = '<b><<$nikname[211]>></b> rating <<rating[211]>> <b><<win[211]>>-<<loss[211]>>-<<draw[211]>> <<SubWin[211]>>/<<SubLoss[211]>></b> <a href="exec:i = 211 & gt ''npcview''">see</a>'
$npc[212] = '<b><<$nikname[212]>></b> rating <<rating[212]>> <b><<win[212]>>-<<loss[212]>>-<<draw[212]>> <<SubWin[212]>>/<<SubLoss[212]>></b> <a href="exec:i = 212 & gt ''npcview''">see</a>'
$npc[213] = '<b><<$nikname[213]>></b> rating <<rating[213]>> <b><<win[213]>>-<<loss[213]>>-<<draw[213]>> <<SubWin[213]>>/<<SubLoss[213]>></b> <a href="exec:i = 213 & gt ''npcview''">see</a>'
$npc[214] = '<b><<$nikname[214]>></b> rating <<rating[214]>> <b><<win[214]>>-<<loss[214]>>-<<draw[214]>> <<SubWin[214]>>/<<SubLoss[214]>></b> <a href="exec:i = 214 & gt ''npcview''">see</a>'
$npc[215] = '<b><<$nikname[215]>></b> rating <<rating[215]>> <b><<win[215]>>-<<loss[215]>>-<<draw[215]>> <<SubWin[215]>>/<<SubLoss[215]>></b> <a href="exec:i = 215 & gt ''npcview''">see</a>'
$npc[216] = '<b><<$nikname[216]>></b> rating <<rating[216]>> <b><<win[216]>>-<<loss[216]>>-<<draw[216]>> <<SubWin[216]>>/<<SubLoss[216]>></b> <a href="exec:i = 216 & gt ''npcview''">see</a>'
$npc[217] = '<b><<$nikname[217]>></b> rating <<rating[217]>> <b><<win[217]>>-<<loss[217]>>-<<draw[217]>> <<SubWin[217]>>/<<SubLoss[217]>></b> <a href="exec:i = 217 & gt ''npcview''">see</a>'
$npc[218] = '<b><<$nikname[218]>></b> rating <<rating[218]>> <b><<win[218]>>-<<loss[218]>>-<<draw[218]>> <<SubWin[218]>>/<<SubLoss[218]>></b> <a href="exec:i = 218 & gt ''npcview''">see</a>'
$npc[219] = '<b><<$nikname[219]>></b> rating <<rating[219]>> <b><<win[219]>>-<<loss[219]>>-<<draw[219]>> <<SubWin[219]>>/<<SubLoss[219]>></b> <a href="exec:i = 219 & gt ''npcview''">see</a>'
$npc[220] = '<b><<$nikname[220]>></b> rating <<rating[220]>> <b><<win[220]>>-<<loss[220]>>-<<draw[220]>> <<SubWin[220]>>/<<SubLoss[220]>></b> <a href="exec:i = 220 & gt ''npcview''">see</a>'
$npc[221] = '<b><<$nikname[221]>></b> rating <<rating[221]>> <b><<win[221]>>-<<loss[221]>>-<<draw[221]>> <<SubWin[221]>>/<<SubLoss[221]>></b> <a href="exec:i = 221 & gt ''npcview''">see</a>'
$npc[222] = '<b><<$nikname[222]>></b> rating <<rating[222]>> <b><<win[222]>>-<<loss[222]>>-<<draw[222]>> <<SubWin[222]>>/<<SubLoss[222]>></b> <a href="exec:i = 222 & gt ''npcview''">see</a>'
$npc[223] = '<b><<$nikname[223]>></b> rating <<rating[223]>> <b><<win[223]>>-<<loss[223]>>-<<draw[223]>> <<SubWin[223]>>/<<SubLoss[223]>></b> <a href="exec:i = 223 & gt ''npcview''">see</a>'
$npc[224] = '<b><<$nikname[224]>></b> rating <<rating[224]>> <b><<win[224]>>-<<loss[224]>>-<<draw[224]>> <<SubWin[224]>>/<<SubLoss[224]>></b> <a href="exec:i = 224 & gt ''npcview''">see</a>'
$npc[225] = '<b><<$nikname[225]>></b> rating <<rating[225]>> <b><<win[225]>>-<<loss[225]>>-<<draw[225]>> <<SubWin[225]>>/<<SubLoss[225]>></b> <a href="exec:i = 225 & gt ''npcview''">see</a>'
$npc[226] = '<b><<$nikname[226]>></b> rating <<rating[226]>> <b><<win[226]>>-<<loss[226]>>-<<draw[226]>> <<SubWin[226]>>/<<SubLoss[226]>></b> <a href="exec:i = 226 & gt ''npcview''">see</a>'
$npc[227] = '<b><<$nikname[227]>></b> rating <<rating[227]>> <b><<win[227]>>-<<loss[227]>>-<<draw[227]>> <<SubWin[227]>>/<<SubLoss[227]>></b> <a href="exec:i = 227 & gt ''npcview''">see</a>'
$npc[228] = '<b><<$nikname[228]>></b> rating <<rating[228]>> <b><<win[228]>>-<<loss[228]>>-<<draw[228]>> <<SubWin[228]>>/<<SubLoss[228]>></b> <a href="exec:i = 228 & gt ''npcview''">see</a>'
$npc[229] = '<b><<$nikname[229]>></b> rating <<rating[229]>> <b><<win[229]>>-<<loss[229]>>-<<draw[229]>> <<SubWin[229]>>/<<SubLoss[229]>></b> <a href="exec:i = 229 & gt ''npcview''">see</a>'
$npc[230] = '<b><<$nikname[230]>></b> rating <<rating[230]>> <b><<win[230]>>-<<loss[230]>>-<<draw[230]>> <<SubWin[230]>>/<<SubLoss[230]>></b> <a href="exec:i = 230 & gt ''npcview''">see</a>'
$npc[231] = '<b><<$nikname[231]>></b> rating <<rating[231]>> <b><<win[231]>>-<<loss[231]>>-<<draw[231]>> <<SubWin[231]>>/<<SubLoss[231]>></b> <a href="exec:i = 231 & gt ''npcview''">see</a>'
$npc[232] = '<b><<$nikname[232]>></b> rating <<rating[232]>> <b><<win[232]>>-<<loss[232]>>-<<draw[232]>> <<SubWin[232]>>/<<SubLoss[232]>></b> <a href="exec:i = 232 & gt ''npcview''">see</a>'
$npc[233] = '<b><<$nikname[233]>></b> rating <<rating[233]>> <b><<win[233]>>-<<loss[233]>>-<<draw[233]>> <<SubWin[233]>>/<<SubLoss[233]>></b> <a href="exec:i = 233 & gt ''npcview''">see</a>'
$npc[234] = '<b><<$nikname[234]>></b> rating <<rating[234]>> <b><<win[234]>>-<<loss[234]>>-<<draw[234]>> <<SubWin[234]>>/<<SubLoss[234]>></b> <a href="exec:i = 234 & gt ''npcview''">see</a>'
$npc[235] = '<b><<$nikname[235]>></b> rating <<rating[235]>> <b><<win[235]>>-<<loss[235]>>-<<draw[235]>> <<SubWin[235]>>/<<SubLoss[235]>></b> <a href="exec:i = 235 & gt ''npcview''">see</a>'
$npc[236] = '<b><<$nikname[236]>></b> rating <<rating[236]>> <b><<win[236]>>-<<loss[236]>>-<<draw[236]>> <<SubWin[236]>>/<<SubLoss[236]>></b> <a href="exec:i = 236 & gt ''npcview''">see</a>'
$npc[237] = '<b><<$nikname[237]>></b> rating <<rating[237]>> <b><<win[237]>>-<<loss[237]>>-<<draw[237]>> <<SubWin[237]>>/<<SubLoss[237]>></b> <a href="exec:i = 237 & gt ''npcview''">see</a>'
$npc[238] = '<b><<$nikname[238]>></b> rating <<rating[238]>> <b><<win[238]>>-<<loss[238]>>-<<draw[238]>> <<SubWin[238]>>/<<SubLoss[238]>></b> <a href="exec:i = 238 & gt ''npcview''">see</a>'
$npc[239] = '<b><<$nikname[239]>></b> rating <<rating[239]>> <b><<win[239]>>-<<loss[239]>>-<<draw[239]>> <<SubWin[239]>>/<<SubLoss[239]>></b> <a href="exec:i = 239 & gt ''npcview''">see</a>'
$npc[240] = '<b><<$nikname[240]>></b> rating <<rating[240]>> <b><<win[240]>>-<<loss[240]>>-<<draw[240]>> <<SubWin[240]>>/<<SubLoss[240]>></b> <a href="exec:i = 240 & gt ''npcview''">see</a>'
$npc[241] = '<b><<$nikname[241]>></b> rating <<rating[241]>> <b><<win[241]>>-<<loss[241]>>-<<draw[241]>> <<SubWin[241]>>/<<SubLoss[241]>></b> <a href="exec:i = 241 & gt ''npcview''">see</a>'
$npc[242] = '<b><<$nikname[242]>></b> rating <<rating[242]>> <b><<win[242]>>-<<loss[242]>>-<<draw[242]>> <<SubWin[242]>>/<<SubLoss[242]>></b> <a href="exec:i = 242 & gt ''npcview''">see</a>'
$npc[243] = '<b><<$nikname[243]>></b> rating <<rating[243]>> <b><<win[243]>>-<<loss[243]>>-<<draw[243]>> <<SubWin[243]>>/<<SubLoss[243]>></b> <a href="exec:i = 243 & gt ''npcview''">see</a>'
$npc[244] = '<b><<$nikname[244]>></b> rating <<rating[244]>> <b><<win[244]>>-<<loss[244]>>-<<draw[244]>> <<SubWin[244]>>/<<SubLoss[244]>></b> <a href="exec:i = 244 & gt ''npcview''">see</a>'
$npc[245] = '<b><<$nikname[245]>></b> rating <<rating[245]>> <b><<win[245]>>-<<loss[245]>>-<<draw[245]>> <<SubWin[245]>>/<<SubLoss[245]>></b> <a href="exec:i = 245 & gt ''npcview''">see</a>'
$npc[246] = '<b><<$nikname[246]>></b> rating <<rating[246]>> <b><<win[246]>>-<<loss[246]>>-<<draw[246]>> <<SubWin[246]>>/<<SubLoss[246]>></b> <a href="exec:i = 246 & gt ''npcview''">see</a>'
$npc[247] = '<b><<$nikname[247]>></b> rating <<rating[247]>> <b><<win[247]>>-<<loss[247]>>-<<draw[247]>> <<SubWin[247]>>/<<SubLoss[247]>></b> <a href="exec:i = 247 & gt ''npcview''">see</a>'
$npc[248] = '<b><<$nikname[248]>></b> rating <<rating[248]>> <b><<win[248]>>-<<loss[248]>>-<<draw[248]>> <<SubWin[248]>>/<<SubLoss[248]>></b> <a href="exec:i = 248 & gt ''npcview''">see</a>'
$npc[249] = '<b><<$nikname[249]>></b> rating <<rating[249]>> <b><<win[249]>>-<<loss[249]>>-<<draw[249]>> <<SubWin[249]>>/<<SubLoss[249]>></b> <a href="exec:i = 249 & gt ''npcview''">see</a>'
$npc[250] = '<b><<$nikname[250]>></b> rating <<rating[250]>> <b><<win[250]>>-<<loss[250]>>-<<draw[250]>> <<SubWin[250]>>/<<SubLoss[250]>></b> <a href="exec:i = 250 & gt ''npcview''">see</a>'
$npc[251] = '<b><<$nikname[251]>></b> rating <<rating[251]>> <b><<win[251]>>-<<loss[251]>>-<<draw[251]>> <<SubWin[251]>>/<<SubLoss[251]>></b> <a href="exec:i = 251 & gt ''npcview''">see</a>'
$npc[252] = '<b><<$nikname[252]>></b> rating <<rating[252]>> <b><<win[252]>>-<<loss[252]>>-<<draw[252]>> <<SubWin[252]>>/<<SubLoss[252]>></b> <a href="exec:i = 252 & gt ''npcview''">see</a>'
$npc[253] = '<b><<$nikname[253]>></b> rating <<rating[253]>> <b><<win[253]>>-<<loss[253]>>-<<draw[253]>> <<SubWin[253]>>/<<SubLoss[253]>></b> <a href="exec:i = 253 & gt ''npcview''">see</a>'
$npc[254] = '<b><<$nikname[254]>></b> rating <<rating[254]>> <b><<win[254]>>-<<loss[254]>>-<<draw[254]>> <<SubWin[254]>>/<<SubLoss[254]>></b> <a href="exec:i = 254 & gt ''npcview''">see</a>'
$npc[255] = '<b><<$nikname[255]>></b> rating <<rating[255]>> <b><<win[255]>>-<<loss[255]>>-<<draw[255]>> <<SubWin[255]>>/<<SubLoss[255]>></b> <a href="exec:i = 255 & gt ''npcview''">see</a>'
$npc[256] = '<b><<$nikname[256]>></b> rating <<rating[256]>> <b><<win[256]>>-<<loss[256]>>-<<draw[256]>> <<SubWin[256]>>/<<SubLoss[256]>></b> <a href="exec:i = 256 & gt ''npcview''">see</a>'
$npc[257] = '<b><<$nikname[257]>></b> rating <<rating[257]>> <b><<win[257]>>-<<loss[257]>>-<<draw[257]>> <<SubWin[257]>>/<<SubLoss[257]>></b> <a href="exec:i = 257 & gt ''npcview''">see</a>'
$npc[258] = '<b><<$nikname[258]>></b> rating <<rating[258]>> <b><<win[258]>>-<<loss[258]>>-<<draw[258]>> <<SubWin[258]>>/<<SubLoss[258]>></b> <a href="exec:i = 258 & gt ''npcview''">see</a>'
$npc[259] = '<b><<$nikname[259]>></b> rating <<rating[259]>> <b><<win[259]>>-<<loss[259]>>-<<draw[259]>> <<SubWin[259]>>/<<SubLoss[259]>></b> <a href="exec:i = 259 & gt ''npcview''">see</a>'
$npc[260] = '<b><<$nikname[260]>></b> rating <<rating[260]>> <b><<win[260]>>-<<loss[260]>>-<<draw[260]>> <<SubWin[260]>>/<<SubLoss[260]>></b> <a href="exec:i = 260 & gt ''npcview''">see</a>'
$npc[261] = '<b><<$nikname[261]>></b> rating <<rating[261]>> <b><<win[261]>>-<<loss[261]>>-<<draw[261]>> <<SubWin[261]>>/<<SubLoss[261]>></b> <a href="exec:i = 261 & gt ''npcview''">see</a>'
$npc[262] = '<b><<$nikname[262]>></b> rating <<rating[262]>> <b><<win[262]>>-<<loss[262]>>-<<draw[262]>> <<SubWin[262]>>/<<SubLoss[262]>></b> <a href="exec:i = 262 & gt ''npcview''">see</a>'
$npc[263] = '<b><<$nikname[263]>></b> rating <<rating[263]>> <b><<win[263]>>-<<loss[263]>>-<<draw[263]>> <<SubWin[263]>>/<<SubLoss[263]>></b> <a href="exec:i = 263 & gt ''npcview''">see</a>'
$npc[264] = '<b><<$nikname[264]>></b> rating <<rating[264]>> <b><<win[264]>>-<<loss[264]>>-<<draw[264]>> <<SubWin[264]>>/<<SubLoss[264]>></b> <a href="exec:i = 264 & gt ''npcview''">see</a>'
$npc[265] = '<b><<$nikname[265]>></b> rating <<rating[265]>> <b><<win[265]>>-<<loss[265]>>-<<draw[265]>> <<SubWin[265]>>/<<SubLoss[265]>></b> <a href="exec:i = 265 & gt ''npcview''">see</a>'
$npc[266] = '<b><<$nikname[266]>></b> rating <<rating[266]>> <b><<win[266]>>-<<loss[266]>>-<<draw[266]>> <<SubWin[266]>>/<<SubLoss[266]>></b> <a href="exec:i = 266 & gt ''npcview''">see</a>'
$npc[267] = '<b><<$nikname[267]>></b> rating <<rating[267]>> <b><<win[267]>>-<<loss[267]>>-<<draw[267]>> <<SubWin[267]>>/<<SubLoss[267]>></b> <a href="exec:i = 267 & gt ''npcview''">see</a>'
$npc[268] = '<b><<$nikname[268]>></b> rating <<rating[268]>> <b><<win[268]>>-<<loss[268]>>-<<draw[268]>> <<SubWin[268]>>/<<SubLoss[268]>></b> <a href="exec:i = 268 & gt ''npcview''">see</a>'
$npc[269] = '<b><<$nikname[269]>></b> rating <<rating[269]>> <b><<win[269]>>-<<loss[269]>>-<<draw[269]>> <<SubWin[269]>>/<<SubLoss[269]>></b> <a href="exec:i = 269 & gt ''npcview''">see</a>'
$npc[270] = '<b><<$nikname[270]>></b> rating <<rating[270]>> <b><<win[270]>>-<<loss[270]>>-<<draw[270]>> <<SubWin[270]>>/<<SubLoss[270]>></b> <a href="exec:i = 270 & gt ''npcview''">see</a>'
$npc[271] = '<b><<$nikname[271]>></b> rating <<rating[271]>> <b><<win[271]>>-<<loss[271]>>-<<draw[271]>> <<SubWin[271]>>/<<SubLoss[271]>></b> <a href="exec:i = 271 & gt ''npcview''">see</a>'
$npc[272] = '<b><<$nikname[272]>></b> rating <<rating[272]>> <b><<win[272]>>-<<loss[272]>>-<<draw[272]>> <<SubWin[272]>>/<<SubLoss[272]>></b> <a href="exec:i = 272 & gt ''npcview''">see</a>'
$npc[273] = '<b><<$nikname[273]>></b> rating <<rating[273]>> <b><<win[273]>>-<<loss[273]>>-<<draw[273]>> <<SubWin[273]>>/<<SubLoss[273]>></b> <a href="exec:i = 273 & gt ''npcview''">see</a>'
$npc[274] = '<b><<$nikname[274]>></b> rating <<rating[274]>> <b><<win[274]>>-<<loss[274]>>-<<draw[274]>> <<SubWin[274]>>/<<SubLoss[274]>></b> <a href="exec:i = 274 & gt ''npcview''">see</a>'
$npc[275] = '<b><<$nikname[275]>></b> rating <<rating[275]>> <b><<win[275]>>-<<loss[275]>>-<<draw[275]>> <<SubWin[275]>>/<<SubLoss[275]>></b> <a href="exec:i = 275 & gt ''npcview''">see</a>'
$npc[276] = '<b><<$nikname[276]>></b> rating <<rating[276]>> <b><<win[276]>>-<<loss[276]>>-<<draw[276]>> <<SubWin[276]>>/<<SubLoss[276]>></b> <a href="exec:i = 276 & gt ''npcview''">see</a>'
$npc[277] = '<b><<$nikname[277]>></b> rating <<rating[277]>> <b><<win[277]>>-<<loss[277]>>-<<draw[277]>> <<SubWin[277]>>/<<SubLoss[277]>></b> <a href="exec:i = 277 & gt ''npcview''">see</a>'
$npc[278] = '<b><<$nikname[278]>></b> rating <<rating[278]>> <b><<win[278]>>-<<loss[278]>>-<<draw[278]>> <<SubWin[278]>>/<<SubLoss[278]>></b> <a href="exec:i = 278 & gt ''npcview''">see</a>'
$npc[279] = '<b><<$nikname[279]>></b> rating <<rating[279]>> <b><<win[279]>>-<<loss[279]>>-<<draw[279]>> <<SubWin[279]>>/<<SubLoss[279]>></b> <a href="exec:i = 279 & gt ''npcview''">see</a>'
$npc[280] = '<b><<$nikname[280]>></b> rating <<rating[280]>> <b><<win[280]>>-<<loss[280]>>-<<draw[280]>> <<SubWin[280]>>/<<SubLoss[280]>></b> <a href="exec:i = 280 & gt ''npcview''">see</a>'
$npc[281] = '<b><<$nikname[281]>></b> rating <<rating[281]>> <b><<win[281]>>-<<loss[281]>>-<<draw[281]>> <<SubWin[281]>>/<<SubLoss[281]>></b> <a href="exec:i = 281 & gt ''npcview''">see</a>'
$npc[282] = '<b><<$nikname[282]>></b> rating <<rating[282]>> <b><<win[282]>>-<<loss[282]>>-<<draw[282]>> <<SubWin[282]>>/<<SubLoss[282]>></b> <a href="exec:i = 282 & gt ''npcview''">see</a>'
$npc[283] = '<b><<$nikname[283]>></b> rating <<rating[283]>> <b><<win[283]>>-<<loss[283]>>-<<draw[283]>> <<SubWin[283]>>/<<SubLoss[283]>></b> <a href="exec:i = 283 & gt ''npcview''">see</a>'
$npc[284] = '<b><<$nikname[284]>></b> rating <<rating[284]>> <b><<win[284]>>-<<loss[284]>>-<<draw[284]>> <<SubWin[284]>>/<<SubLoss[284]>></b> <a href="exec:i = 284 & gt ''npcview''">see</a>'
$npc[285] = '<b><<$nikname[285]>></b> rating <<rating[285]>> <b><<win[285]>>-<<loss[285]>>-<<draw[285]>> <<SubWin[285]>>/<<SubLoss[285]>></b> <a href="exec:i = 285 & gt ''npcview''">see</a>'
$npc[286] = '<b><<$nikname[286]>></b> rating <<rating[286]>> <b><<win[286]>>-<<loss[286]>>-<<draw[286]>> <<SubWin[286]>>/<<SubLoss[286]>></b> <a href="exec:i = 286 & gt ''npcview''">see</a>'
$npc[287] = '<b><<$nikname[287]>></b> rating <<rating[287]>> <b><<win[287]>>-<<loss[287]>>-<<draw[287]>> <<SubWin[287]>>/<<SubLoss[287]>></b> <a href="exec:i = 287 & gt ''npcview''">see</a>'
$npc[288] = '<b><<$nikname[288]>></b> rating <<rating[288]>> <b><<win[288]>>-<<loss[288]>>-<<draw[288]>> <<SubWin[288]>>/<<SubLoss[288]>></b> <a href="exec:i = 288 & gt ''npcview''">see</a>'
$npc[289] = '<b><<$nikname[289]>></b> rating <<rating[289]>> <b><<win[289]>>-<<loss[289]>>-<<draw[289]>> <<SubWin[289]>>/<<SubLoss[289]>></b> <a href="exec:i = 289 & gt ''npcview''">see</a>'
$npc[290] = '<b><<$nikname[290]>></b> rating <<rating[290]>> <b><<win[290]>>-<<loss[290]>>-<<draw[290]>> <<SubWin[290]>>/<<SubLoss[290]>></b> <a href="exec:i = 290 & gt ''npcview''">see</a>'
$npc[291] = '<b><<$nikname[291]>></b> rating <<rating[291]>> <b><<win[291]>>-<<loss[291]>>-<<draw[291]>> <<SubWin[291]>>/<<SubLoss[291]>></b> <a href="exec:i = 291 & gt ''npcview''">see</a>'
$npc[292] = '<b><<$nikname[292]>></b> rating <<rating[292]>> <b><<win[292]>>-<<loss[292]>>-<<draw[292]>> <<SubWin[292]>>/<<SubLoss[292]>></b> <a href="exec:i = 292 & gt ''npcview''">see</a>'
$npc[293] = '<b><<$nikname[293]>></b> rating <<rating[293]>> <b><<win[293]>>-<<loss[293]>>-<<draw[293]>> <<SubWin[293]>>/<<SubLoss[293]>></b> <a href="exec:i = 293 & gt ''npcview''">see</a>'
$npc[294] = '<b><<$nikname[294]>></b> rating <<rating[294]>> <b><<win[294]>>-<<loss[294]>>-<<draw[294]>> <<SubWin[294]>>/<<SubLoss[294]>></b> <a href="exec:i = 294 & gt ''npcview''">see</a>'
$npc[295] = '<b><<$nikname[295]>></b> rating <<rating[295]>> <b><<win[295]>>-<<loss[295]>>-<<draw[295]>> <<SubWin[295]>>/<<SubLoss[295]>></b> <a href="exec:i = 295 & gt ''npcview''">see</a>'
$npc[296] = '<b><<$nikname[296]>></b> rating <<rating[296]>> <b><<win[296]>>-<<loss[296]>>-<<draw[296]>> <<SubWin[296]>>/<<SubLoss[296]>></b> <a href="exec:i = 296 & gt ''npcview''">see</a>'
$npc[297] = '<b><<$nikname[297]>></b> rating <<rating[297]>> <b><<win[297]>>-<<loss[297]>>-<<draw[297]>> <<SubWin[297]>>/<<SubLoss[297]>></b> <a href="exec:i = 297 & gt ''npcview''">see</a>'
$npc[298] = '<b><<$nikname[298]>></b> rating <<rating[298]>> <b><<win[298]>>-<<loss[298]>>-<<draw[298]>> <<SubWin[298]>>/<<SubLoss[298]>></b> <a href="exec:i = 298 & gt ''npcview''">see</a>'
$npc[299] = '<b><<$nikname[299]>></b> rating <<rating[299]>> <b><<win[299]>>-<<loss[299]>>-<<draw[299]>> <<SubWin[299]>>/<<SubLoss[299]>></b> <a href="exec:i = 299 & gt ''npcview''">see</a>'
$npc[300] = '<b><<$nikname[300]>></b> rating <<rating[300]>> <b><<win[300]>>-<<loss[300]>>-<<draw[300]>> <<SubWin[300]>>/<<SubLoss[300]>></b> <a href="exec:i = 300 & gt ''npcview''">see</a>'

'<center><b>league table</b></center>'
'<center>only <<NPCnum>> athletes</center>'
$ratMax = ''
$rat100 = ''
$rat99 = ''
$rat98 = ''
$rat97 = ''
$rat96 = ''
$rat95 = ''
$rat94 = ''
$rat93 = ''
$rat92 = ''
$rat91 = ''
$rat90 = ''
$rat89 = ''
$rat88 = ''
$rat87 = ''
$rat86 = ''
$rat85 = ''
$rat84 = ''
$rat83 = ''
$rat82 = ''
$rat81 = ''
$rat80 = ''
$rat79 = ''
$rat78 = ''
$rat77 = ''
$rat76 = ''
$rat75 = ''
$rat74 = ''
$rat73 = ''
$rat72 = ''
$rat71 = ''
$rat70 = ''
$rat69 = ''
$rat68 = ''
$rat67 = ''
$rat66 = ''
$rat65 = ''
$rat64 = ''
$rat63 = ''
$rat62 = ''
$rat61 = ''
$rat60 = ''
$rat59 = ''
$rat58 = ''
$rat57 = ''
$rat56 = ''
$rat55 = ''
$rat54 = ''
$rat53 = ''
$rat52 = ''
$rat51 = ''
$rat50 = ''
$rat49 = ''
$rat48 = ''
$rat47 = ''
$rat46 = ''
$rat45 = ''
$rat44 = ''
$rat43 = ''
$rat42 = ''
$rat41 = ''
$rat40 = ''
$rat39 = ''
$rat38 = ''
$rat37 = ''
$rat36 = ''
$rat35 = ''
$rat34 = ''
$rat33 = ''
$rat32 = ''
$rat31 = ''
$rat30 = ''
$rat29 = ''
$rat28 = ''
$rat27 = ''
$rat26 = ''
$rat25 = ''
$rat24 = ''
$rat23 = ''
$rat22 = ''
$rat21 = ''
$rat20 = ''
$rat19 = ''
$rat18 = ''
$rat17 = ''
$rat16 = ''
$rat15 = ''
$rat14 = ''
$rat13 = ''
$rat12 = ''
$rat11 = ''
$rat10 = ''
$rat9 = ''
$rat8 = ''
$rat7 = ''
$rat6 = ''
$rat5 = ''
$rat4 = ''
$rat3 = ''
$rat2 = ''
$rat1 = ''
$rat0 = ''
$ratMin = ''
num = 0
:markratingwrite
num += 1

if rating[num] > 100:$ratMax += $npc[num] + ''
if rating[num] = 100:$rat100 += $npc[num] + ''
if rating[num] = 99:$rat99 += $npc[num] + ''
if rating[num] = 98:$rat98 += $npc[num] + ''
if rating[num] = 97:$rat97 += $npc[num] + ''
if rating[num] = 96:$rat96 += $npc[num] + ''
if rating[num] = 95:$rat95 += $npc[num] + ''
if rating[num] = 94:$rat94 += $npc[num] + ''
if rating[num] = 93:$rat93 += $npc[num] + ''
if rating[num] = 92:$rat92 += $npc[num] + ''
if rating[num] = 91:$rat91 += $npc[num] + ''
if rating[num] = 90:$rat90 += $npc[num] + ''
if rating[num] = 89:$rat89 += $npc[num] + ''
if rating[num] = 88:$rat88 += $npc[num] + ''
if rating[num] = 87:$rat87 += $npc[num] + ''
if rating[num] = 86:$rat86 += $npc[num] + ''
if rating[num] = 85:$rat85 += $npc[num] + ''
if rating[num] = 84:$rat84 += $npc[num] + ''
if rating[num] = 83:$rat83 += $npc[num] + ''
if rating[num] = 82:$rat82 += $npc[num] + ''
if rating[num] = 81:$rat81 += $npc[num] + ''
if rating[num] = 80:$rat80 += $npc[num] + ''
if rating[num] = 79:$rat79 += $npc[num] + ''
if rating[num] = 78:$rat78 += $npc[num] + ''
if rating[num] = 77:$rat77 += $npc[num] + ''
if rating[num] = 76:$rat76 += $npc[num] + ''
if rating[num] = 75:$rat75 += $npc[num] + ''
if rating[num] = 74:$rat74 += $npc[num] + ''
if rating[num] = 73:$rat73 += $npc[num] + ''
if rating[num] = 72:$rat72 += $npc[num] + ''
if rating[num] = 71:$rat71 += $npc[num] + ''
if rating[num] = 70:$rat70 += $npc[num] + ''
if rating[num] = 69:$rat69 += $npc[num] + ''
if rating[num] = 68:$rat68 += $npc[num] + ''
if rating[num] = 67:$rat67 += $npc[num] + ''
if rating[num] = 66:$rat66 += $npc[num] + ''
if rating[num] = 65:$rat65 += $npc[num] + ''
if rating[num] = 64:$rat64 += $npc[num] + ''
if rating[num] = 63:$rat63 += $npc[num] + ''
if rating[num] = 62:$rat62 += $npc[num] + ''
if rating[num] = 61:$rat61 += $npc[num] + ''
if rating[num] = 60:$rat60 += $npc[num] + ''
if rating[num] = 59:$rat59 += $npc[num] + ''
if rating[num] = 58:$rat58 += $npc[num] + ''
if rating[num] = 57:$rat57 += $npc[num] + ''
if rating[num] = 56:$rat56 += $npc[num] + ''
if rating[num] = 55:$rat55 += $npc[num] + ''
if rating[num] = 54:$rat54 += $npc[num] + ''
if rating[num] = 53:$rat53 += $npc[num] + ''
if rating[num] = 52:$rat52 += $npc[num] + ''
if rating[num] = 51:$rat51 += $npc[num] + ''
if rating[num] = 50:$rat50 += $npc[num] + ''
if rating[num] = 49:$rat49 += $npc[num] + ''
if rating[num] = 48:$rat48 += $npc[num] + ''
if rating[num] = 47:$rat47 += $npc[num] + ''
if rating[num] = 46:$rat46 += $npc[num] + ''
if rating[num] = 45:$rat45 += $npc[num] + ''
if rating[num] = 44:$rat44 += $npc[num] + ''
if rating[num] = 43:$rat43 += $npc[num] + ''
if rating[num] = 42:$rat42 += $npc[num] + ''
if rating[num] = 41:$rat41 += $npc[num] + ''
if rating[num] = 40:$rat40 += $npc[num] + ''
if rating[num] = 39:$rat39 += $npc[num] + ''
if rating[num] = 38:$rat38 += $npc[num] + ''
if rating[num] = 37:$rat37 += $npc[num] + ''
if rating[num] = 36:$rat36 += $npc[num] + ''
if rating[num] = 35:$rat35 += $npc[num] + ''
if rating[num] = 34:$rat34 += $npc[num] + ''
if rating[num] = 33:$rat33 += $npc[num] + ''
if rating[num] = 32:$rat32 += $npc[num] + ''
if rating[num] = 31:$rat31 += $npc[num] + ''
if rating[num] = 30:$rat30 += $npc[num] + ''
if rating[num] = 29:$rat29 += $npc[num] + ''
if rating[num] = 28:$rat28 += $npc[num] + ''
if rating[num] = 27:$rat27 += $npc[num] + ''
if rating[num] = 26:$rat26 += $npc[num] + ''
if rating[num] = 25:$rat25 += $npc[num] + ''
if rating[num] = 24:$rat24 += $npc[num] + ''
if rating[num] = 23:$rat23 += $npc[num] + ''
if rating[num] = 22:$rat22 += $npc[num] + ''
if rating[num] = 21:$rat21 += $npc[num] + ''
if rating[num] = 20:$rat20 += $npc[num] + ''
if rating[num] = 19:$rat19 += $npc[num] + ''
if rating[num] = 18:$rat18 += $npc[num] + ''
if rating[num] = 17:$rat17 += $npc[num] + ''
if rating[num] = 16:$rat16 += $npc[num] + ''
if rating[num] = 15:$rat15 += $npc[num] + ''
if rating[num] = 14:$rat14 += $npc[num] + ''
if rating[num] = 13:$rat13 += $npc[num] + ''
if rating[num] = 12:$rat12 += $npc[num] + ''
if rating[num] = 11:$rat11 += $npc[num] + ''
if rating[num] = 10:$rat10 += $npc[num] + ''
if rating[num] = 9:$rat9 += $npc[num] + ''
if rating[num] = 8:$rat8 += $npc[num] + ''
if rating[num] = 7:$rat7 += $npc[num] + ''
if rating[num] = 6:$rat6 += $npc[num] + ''
if rating[num] = 5:$rat5 += $npc[num] + ''
if rating[num] = 4:$rat4 += $npc[num] + ''
if rating[num] = 3:$rat3 += $npc[num] + ''
if rating[num] = 2:$rat2 += $npc[num] + ''
if rating[num] = 1:$rat1 += $npc[num] + ''
if rating[num] = 0:$rat0 += $npc[num] + ''
if rating[num] < 0:$ratMin += $npc[num] + ''
if num < NPCnum:jump 'markratingwrite'
if $ratMax!'':'<<$ratMax>>'
if $rat100!'':'<<$rat100>>'
if $rat99!'':'<<$rat99>>'
if $rat98!'':'<<$rat98>>'
if $rat97!'':'<<$rat97>>'
if $rat96!'':'<<$rat96>>'
if $rat95!'':'<<$rat95>>'
if $rat94!'':'<<$rat94>>'
if $rat93!'':'<<$rat93>>'
if $rat92!'':'<<$rat92>>'
if $rat91!'':'<<$rat91>>'
if $rat90!'':'<<$rat90>>'
if $rat89!'':'<<$rat89>>'
if $rat88!'':'<<$rat88>>'
if $rat87!'':'<<$rat87>>'
if $rat86!'':'<<$rat86>>'
if $rat85!'':'<<$rat85>>'
if $rat84!'':'<<$rat84>>'
if $rat83!'':'<<$rat83>>'
if $rat82!'':'<<$rat82>>'
if $rat81!'':'<<$rat81>>'
if $rat80!'':'<<$rat80>>'
if $rat79!'':'<<$rat79>>'
if $rat78!'':'<<$rat78>>'
if $rat77!'':'<<$rat77>>'
if $rat76!'':'<<$rat76>>'
if $rat75!'':'<<$rat75>>'
if $rat74!'':'<<$rat74>>'
if $rat73!'':'<<$rat73>>'
if $rat72!'':'<<$rat72>>'
if $rat71!'':'<<$rat71>>'
if $rat70!'':'<<$rat70>>'
if $rat69!'':'<<$rat69>>'
if $rat68!'':'<<$rat68>>'
if $rat67!'':'<<$rat67>>'
if $rat66!'':'<<$rat66>>'
if $rat65!'':'<<$rat65>>'
if $rat64!'':'<<$rat64>>'
if $rat63!'':'<<$rat63>>'
if $rat62!'':'<<$rat62>>'
if $rat61!'':'<<$rat61>>'
if $rat60!'':'<<$rat60>>'
if $rat59!'':'<<$rat59>>'
if $rat58!'':'<<$rat58>>'
if $rat57!'':'<<$rat57>>'
if $rat56!'':'<<$rat56>>'
if $rat55!'':'<<$rat55>>'
if $rat54!'':'<<$rat54>>'
if $rat53!'':'<<$rat53>>'
if $rat52!'':'<<$rat52>>'
if $rat51!'':'<<$rat51>>'
if $rat50!'':'<<$rat50>>'
if $rat49!'':'<<$rat49>>'
if $rat48!'':'<<$rat48>>'
if $rat47!'':'<<$rat47>>'
if $rat46!'':'<<$rat46>>'
if $rat45!'':'<<$rat45>>'
if $rat44!'':'<<$rat44>>'
if $rat43!'':'<<$rat43>>'
if $rat42!'':'<<$rat42>>'
if $rat41!'':'<<$rat41>>'
if $rat40!'':'<<$rat40>>'
if $rat39!'':'<<$rat39>>'
if $rat38!'':'<<$rat38>>'
if $rat37!'':'<<$rat37>>'
if $rat36!'':'<<$rat36>>'
if $rat35!'':'<<$rat35>>'
if $rat34!'':'<<$rat34>>'
if $rat33!'':'<<$rat33>>'
if $rat32!'':'<<$rat32>>'
if $rat31!'':'<<$rat31>>'
if $rat30!'':'<<$rat30>>'
if $rat29!'':'<<$rat29>>'
if $rat28!'':'<<$rat28>>'
if $rat27!'':'<<$rat27>>'
if $rat26!'':'<<$rat26>>'
if $rat25!'':'<<$rat25>>'
if $rat24!'':'<<$rat24>>'
if $rat23!'':'<<$rat23>>'
if $rat22!'':'<<$rat22>>'
if $rat21!'':'<<$rat21>>'
if $rat20!'':'<<$rat20>>'
if $rat19!'':'<<$rat19>>'
if $rat18!'':'<<$rat18>>'
if $rat17!'':'<<$rat17>>'
if $rat16!'':'<<$rat16>>'
if $rat15!'':'<<$rat15>>'
if $rat14!'':'<<$rat14>>'
if $rat13!'':'<<$rat13>>'
if $rat12!'':'<<$rat12>>'
if $rat11!'':'<<$rat11>>'
if $rat10!'':'<<$rat10>>'
if $rat9!'':'<<$rat9>>'
if $rat8!'':'<<$rat8>>'
if $rat7!'':'<<$rat7>>'
if $rat6!'':'<<$rat6>>'
if $rat5!'':'<<$rat5>>'
if $rat4!'':'<<$rat4>>'
if $rat3!'':'<<$rat3>>'
if $rat2!'':'<<$rat2>>'
if $rat1!'':'<<$rat1>>'
if $rat0!'':'<<$rat0>>'
if $ratMin!'':'<<$ratMin>>'

!'act '<center><b>To fight between 2mja NPCs</b></center>':
	cls
	a = input("Fighter in the red corner number of 2 prior_to 7")
	'In the red corner <<$nikname[a]>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
	i = input("Fighter in the blue corner of the number of 2 prior_to 7")
	'In the blue corner <<$nikname[i]>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
	gs 'Autofight'

	act 'further':gt $curloc
	end
'!

act 'Leave':gt 'gorodok'
!'
act '<center><b>h</b></center>':
	cls
	minut += 60
	gt $curloc
end

act '<center><b>randomly fight</b></center>':
	cls
	:markturnirotbor2
	x = 0
	:markturnirotbor
	x += 1
	turnirFighter[x] = rand(2, NPCnum)

	if x < 2:jump 'markturnirotbor'
	if turnirFighter[1] = turnirFighter[2]:jump 'markturnirotbor2'

	a = turnirFighter[1]
	i = turnirFighter[2]

	gs 'Autofight'

	act 'further':gt $curloc
end

act '<center><b>randomly 4 battlefield</b></center>':
	cls
	y = 0
	:markmonthfight1
	y += 1
	:markturnirotbor2
	x = 0
	:markturnirotbor
	x += 1
	turnirFighter[x] = rand(2, NPCnum)

	if x < 2:jump 'markturnirotbor'
	if turnirFighter[1] = turnirFighter[2]:jump 'markturnirotbor2'

	a = turnirFighter[1]
	i = turnirFighter[2]
	gs 'Autofight'
	turnirFighter[1] = 0
	turnirFighter[2] = 0

	if y < 4:jump 'markmonthfight1'

	act 'further':gt $curloc
end

act '<center><b>randomly 10 fights</b></center>':
	cls
	y = 0
	:markmonthfights
	y += 1
	:markturnirotborss
	x = 0
	:markturnirotborsss
	x += 1
	turnirFighter[x] = rand(2, NPCnum)

	if x < 2:jump 'markturnirotborsss'
	if turnirFighter[1] = turnirFighter[2]:jump 'markturnirotborss'

	a = turnirFighter[1]
	i = turnirFighter[2]
	gs 'Autofight'
	turnirFighter[1] = 0
	turnirFighter[2] = 0

	if y < 10:jump 'markmonthfights'

	act 'further':gt $curloc
end
'!

!'
act '<center><b>The_item</b></center>':
	kolvo[0] += 1
	$item[0] = $curloc
	gt $curloc
end

act '<center><b>The_item1</b></center>':
	kolvo[1] += 1
	$item[1] = $curloc
	gt $curloc
end

act '<center><b>The_item2</b></center>':
	kolvo[2] += 1
	$item[2] = $curloc
	gt $curloc
end

act '<center><b>The_item3</b></center>':
	kolvo[3] += 1
	$item[3] = $curloc
	gt $curloc
end

act '<center><b>The_item4</b></center>':
	kolvo[4] += 1
	$item[4] = $curloc
	gt $curloc
end

act '<center><b>The_item5</b></center>':
	kolvo[5] += 1
	$item[5] = $curloc
	gt $curloc
end
'!

!!gs 'OnLoc'

--- ratinglist ---------------------------------
# npc
i = NPCnow
:markgenernpc
i += 1
!!power and moral qualities
slut[i] = 0
musle[i] = rand(25, 100)
flex[i] = rand(25, 80)
stamina[i] = rand(200, 300)
wipo[i] = rand(30, 60)
!!equipment
Bteh[i] = rand(0, 100)
Uteh[i] = rand(0, 100)
Zteh[i] = rand(0, 100)

if i = 2:
	musle[i] = 200
	flex[i] = 100
	stamina[i] = 300
	wipo[i] = 100
	!!equipment
	Bteh[i] += 200
	Uteh[i] += 200
	Zteh[i] += 200
elseif i = 10:
	musle[i] += 50
	wipo[i] += 30
elseif i = 15:
	musle[i] += 30
	flex[i] += 40
	stamina[i] += 100
	wipo[i] += 20
	!!equipment
	Bteh[i] += 20
	Uteh[i] += 20
	Zteh[i] += 20
elseif i = 32:
	musle[i] += 100
	flex[i] += 100
elseif i = 36:
	flex[i] += 100
elseif i = 51:
	Bteh[i] += 100
	Uteh[i] += 100
	Zteh[i] += 100
elseif i = 52:
	stamina[i] += 300
	wipo[i] += 60
elseif i = 60:
	musle[i] += 200
	wipo[i] += 40
elseif i = 78:
	flex[i] += 50
	wipo[i] += 30
elseif i = 100:
	musle[i] += 100
	flex[i] += 100
	stamina[i] += 200
	wipo[i] += 30
	!!equipment
	Bteh[i] += 100
	Uteh[i] += 100
	Zteh[i] += 100
elseif i = 107:
	musle[i] += 10
	flex[i] += 10
	stamina[i] += 100
	wipo[i] += 100
elseif i = 123:
	flex[i] += 100
	stamina[i] += 100
	wipo[i] += 30
elseif i = 137:
	musle[i] += 70
	wipo[i] += 20
elseif i = 170:
	musle[i] += 100
	stamina[i] += 100
	wipo[i] += 30
elseif i = 235:
	Bteh[i] += 100
	Uteh[i] += 100
	Zteh[i] += 100
elseif i = 236:
	flex[i] += 60
	stamina[i] += 100
	wipo[i] += 20
elseif i = 255:
	musle[i] += 30
	flex[i] += 30
	stamina[i] += 100
	wipo[i] += 60
	!!equipment
	Bteh[i] += 400
	Uteh[i] += 400
	Zteh[i] += 400
elseif i = 265:
	musle[i] += 100
	flex[i] += 100
	stamina[i] += 150
	wipo[i] += 80
	!!equipment
	Bteh[i] += 60
	Uteh[i] += 60
	Zteh[i] += 60
end

irand = i
gs 'namer'

if i < NPCnum:jump 'markgenernpc'

--- npc ---------------------------------
# namer
!irand=RAND(2,100)

if irand=2:$nikname[i]='Sid Blekovich'
if irand=3:$nikname[i]='The same'
if irand=4:$nikname[i]='Shard of Happiness'
if irand=5:$nikname[i]='prikolistka'
if irand=6:$nikname[i]='Damned wretch'
if irand=7:$nikname[i]='surprise'
if irand=8:$nikname[i]='angel'
if irand=9:$nikname[i]='diva'
if irand=10:$nikname[i]='puzzle'
if irand=11:$nikname[i]='rainbow'
if irand=12:$nikname[i]='ocharovashka'
if irand=13:$nikname[i]='Zaya'
if irand=14:$nikname[i]='vredina'
if irand=15:$nikname[i]='hooligan'
if irand=16:$nikname[i]='Shady Layden'
if irand=17:$nikname[i]='Lucy'
if irand=18:$nikname[i]='shooting star'
if irand=19:$nikname[i]='princess'
if irand=20:$nikname[i]='summer'
if irand=21:$nikname[i]='bunting'
if irand=22:$nikname[i]='shocking'
if irand=23:$nikname[i]='Saharok'
if irand=24:$nikname[i]='Marmeladka'
if irand=25:$nikname[i]='rogue'
if irand=26:$nikname[i]='Kitty'
if irand=27:$nikname[i]='chocolate'
if irand=28:$nikname[i]='Knop'
if irand=29:$nikname[i]='Barbie'
if irand=30:$nikname[i]='spring'
if irand=31:$nikname[i]='Bambi'
if irand=32:$nikname[i]='tigress'
if irand=33:$nikname[i]='dragonfly'
if irand=34:$nikname[i]='Carmen'
if irand=35:$nikname[i]='melody'
if irand=36:$nikname[i]='black Mamba'
if irand=37:$nikname[i]='second'
if irand=38:$nikname[i]='dream'
if irand=39:$nikname[i]='Indira'
if irand=40:$nikname[i]='conflict'
if irand=41:$nikname[i]='cat'
if irand=42:$nikname[i]='bead'
if irand=43:$nikname[i]='snowflake'
if irand=44:$nikname[i]='Deja Vu'
if irand=45:$nikname[i]='SFA-Murka'
if irand=46:$nikname[i]='wally'
if irand=47:$nikname[i]='Amelie'
if irand=48:$nikname[i]='fairy'
if irand=49:$nikname[i]='moon'
if irand=50:$nikname[i]='Nochka'
if irand=51:$nikname[i]='rebel'
if irand=52:$nikname[i]='zamorochka'
if irand=53:$nikname[i]='Laffka'
if irand=54:$nikname[i]='lady'
if irand=55:$nikname[i]='Buttons'
if irand=56:$nikname[i]='ice'
if irand=57:$nikname[i]='imp'
if irand=58:$nikname[i]='calypso'
if irand=59:$nikname[i]='caprice'
if irand=60:$nikname[i]='enema Karlovna'
if irand=61:$nikname[i]='cobra'
if irand=62:$nikname[i]='sweetie'
if irand=63:$nikname[i]='Kysya'
if irand=64:$nikname[i]='lagoon'
if irand=65:$nikname[i]='Laletta'
if irand=66:$nikname[i]='ocean'
if irand=67:$nikname[i]='vamp'
if irand=68:$nikname[i]='dark'
if irand=69:$nikname[i]='legend'
if irand=70:$nikname[i]='Lorelei'
if irand=71:$nikname[i]='Foxy'
if irand=72:$nikname[i]='Young lion'
if irand=73:$nikname[i]='luxury'
if irand=74:$nikname[i]='era'
if irand=75:$nikname[i]='shrew'
if irand=76:$nikname[i]='Brunnhilde'
if irand=77:$nikname[i]='manyachka'
if irand=78:$nikname[i]='Hella Gelot'
if irand=79:$nikname[i]='Medea'
if irand=80:$nikname[i]='Vega'
if irand=81:$nikname[i]='Vivian Undo'
if irand=82:$nikname[i]='Magari'
if irand=83:$nikname[i]='Skyler'
if irand=84:$nikname[i]='Frau Barracuda'
if irand=85:$nikname[i]='Kakunov'
if irand=86:$nikname[i]='Pandora''s box'
if irand=87:$nikname[i]='Black Widow'
if irand=88:$nikname[i]='Yunibra'
if irand=89:$nikname[i]='Fraulein Farbisianna'
if irand=90:$nikname[i]='viper'
if irand=91:$nikname[i]='sun'
if irand=92:$nikname[i]='fox'
if irand=93:$nikname[i]='nymph'
if irand=94:$nikname[i]='steel'
if irand=95:$nikname[i]='Fa la la'
if irand=96:$nikname[i]='Daniel Ankaran'
if irand=97:$nikname[i]='babe'
if irand=98:$nikname[i]='bomb'
if irand=99:$nikname[i]='viola'
if irand=100:$nikname[i]='Poyson'


if irand=101:$nikname[i]='Shiz'
if irand=102:$nikname[i]='Kukaryamba'
if irand=103:$nikname[i]='Tobacco'
if irand=104:$nikname[i]='Kapitolka'
if irand=105:$nikname[i]='heron'
if irand=106:$nikname[i]='princess'
if irand=107:$nikname[i]='domino'
if irand=108:$nikname[i]='Tyapa'
if irand=109:$nikname[i]='hedgehog'
if irand=110:$nikname[i]='thorn'
if irand=111:$nikname[i]='nut'
if irand=112:$nikname[i]='Zara'
if irand=113:$nikname[i]='Jussi'
if irand=114:$nikname[i]='arrow'
if irand=115:$nikname[i]='twilight'
if irand=116:$nikname[i]='black beast'
if irand=117:$nikname[i]='Vectra'
if irand=118:$nikname[i]='Extreme'
if irand=119:$nikname[i]='Crazy'
if irand=120:$nikname[i]='mixer'
if irand=121:$nikname[i]='Midnight'
if irand=122:$nikname[i]='Tantsorsha'
if irand=123:$nikname[i]='gymnast'
if irand=124:$nikname[i]='Gerda'
if irand=125:$nikname[i]='mini'
if irand=126:$nikname[i]='Verona'
if irand=127:$nikname[i]='Klepa'
if irand=128:$nikname[i]='Wadjet'
if irand=129:$nikname[i]='maya'
if irand=130:$nikname[i]='Selene'
if irand=131:$nikname[i]='Rhea'
if irand=132:$nikname[i]='Nuth'
if irand=133:$nikname[i]='Loy'
if irand=134:$nikname[i]='ha ha'
if irand=135:$nikname[i]='breeze'
if irand=136:$nikname[i]='shadow'
if irand=137:$nikname[i]='She-wolf'
if irand=138:$nikname[i]='muskrat'
if irand=139:$nikname[i]='Catan'
if irand=140:$nikname[i]='avalanche'
if irand=141:$nikname[i]='Chernosnezhka'
if irand=142:$nikname[i]='ballerina'
if irand=143:$nikname[i]='Wild Cat'
if irand=144:$nikname[i]='el terrible of'
if irand=145:$nikname[i]='infanta'
if irand=146:$nikname[i]='Lissa Be-spendthrift'
if irand=147:$nikname[i]='Gagalu'
if irand=148:$nikname[i]='Moonshine Township'
if irand=149:$nikname[i]='Gingemma'
if irand=150:$nikname[i]='Belfeba'
if irand=151:$nikname[i]='Karkalyga'
if irand=152:$nikname[i]='Shayzi'
if irand=153:$nikname[i]='Pledovka'
if irand=154:$nikname[i]='ruler'
if irand=155:$nikname[i]='fuzz'
if irand=156:$nikname[i]='harpy'
if irand=157:$nikname[i]='Chuchundra'
if irand=158:$nikname[i]='spider'
if irand=159:$nikname[i]='baggage'
if irand=160:$nikname[i]='Dvuhstvolka'
if irand=161:$nikname[i]='tomboy'
if irand=162:$nikname[i]='taiga'
if irand=163:$nikname[i]='Mistress Belladonna'
if irand=164:$nikname[i]='Asia'
if irand=165:$nikname[i]='Split Sky'
if irand=166:$nikname[i]='JUST Mi'
if irand=167:$nikname[i]='Miss Bainbridge'
if irand=168:$nikname[i]='jazz'
if irand=169:$nikname[i]='Dilishes'
if irand=170:$nikname[i]='big Momma'
if irand=171:$nikname[i]='Defiance'
if irand=172:$nikname[i]='Iron Blonde'
if irand=173:$nikname[i]='geisha'
if irand=174:$nikname[i]='Lily of the valley'
if irand=175:$nikname[i]='Vortex'
if irand=176:$nikname[i]='Cruella DeVill'
if irand=177:$nikname[i]='cyclist'
if irand=178:$nikname[i]='Ragnarok'
if irand=179:$nikname[i]='lady Dragon'
if irand=180:$nikname[i]='Flora'
if irand=181:$nikname[i]='boorish'
if irand=182:$nikname[i]='chaos'
if irand=183:$nikname[i]='lamp'
if irand=184:$nikname[i]='predator'
if irand=185:$nikname[i]='The April moon'
if irand=186:$nikname[i]='black Star'
if irand=187:$nikname[i]='shrapnel'
if irand=188:$nikname[i]='euphoria'
if irand=189:$nikname[i]='Electra'
if irand=190:$nikname[i]='ogress'
if irand=191:$nikname[i]='Nutty'
if irand=192:$nikname[i]='fantasy'
if irand=193:$nikname[i]='Short story'
if irand=194:$nikname[i]='Snow'
if irand=195:$nikname[i]='Sinister'
if irand=196:$nikname[i]='crumb'
if irand=197:$nikname[i]='melons'
if irand=198:$nikname[i]='Lolita'
if irand=199:$nikname[i]='wagtail'
if irand=200:$nikname[i]='Fairy tale'
if irand=201:$nikname[i]='branch'
if irand=202:$nikname[i]='heart of the Ocean'
if irand=203:$nikname[i]='fallen Angel'
if irand=204:$nikname[i]='Medvedka'
if irand=205:$nikname[i]='explosion'
if irand=206:$nikname[i]='Whack'
if irand=207:$nikname[i]='sinner'
if irand=208:$nikname[i]='keeper'
if irand=209:$nikname[i]='mistress of Death'
if irand=210:$nikname[i]='pathos'
if irand=211:$nikname[i]='Ston Falls'
if irand=212:$nikname[i]='Lost'
if irand=213:$nikname[i]='mustard'
if irand=214:$nikname[i]='hysterics'
if irand=215:$nikname[i]='Lenore'
if irand=216:$nikname[i]='Tumanik'
if irand=217:$nikname[i]='Grand lady'
if irand=218:$nikname[i]='Fanny Hill'
if irand=219:$nikname[i]='Nosolomka'
if irand=220:$nikname[i]='Basta'
if irand=221:$nikname[i]='milk'
if irand=222:$nikname[i]='granny'
if irand=223:$nikname[i]='The old lady Flo'
if irand=224:$nikname[i]='magpie'
if irand=225:$nikname[i]='icicle'
if irand=226:$nikname[i]='meridian'
if irand=227:$nikname[i]='module'
if irand=228:$nikname[i]='Strekotusha'
if irand=229:$nikname[i]='Azazel'
if irand=230:$nikname[i]='Gabriella'
if irand=231:$nikname[i]='tiara'
if irand=232:$nikname[i]='huntsman'
if irand=233:$nikname[i]='dream'
if irand=234:$nikname[i]='supernova'
if irand=235:$nikname[i]='Karnedzh'
if irand=236:$nikname[i]='blackout'
if irand=237:$nikname[i]='schoolgirl'
if irand=238:$nikname[i]='Kasia'
if irand=239:$nikname[i]='Caprice Night'
if irand=240:$nikname[i]='Tomboy'
if irand=241:$nikname[i]='Wild Horse'
if irand=242:$nikname[i]='sweetheart'
if irand=243:$nikname[i]='splinter'
if irand=244:$nikname[i]='log'
if irand=245:$nikname[i]='gymnast'
if irand=246:$nikname[i]='Zhep Ebrilo'
if irand=247:$nikname[i]='Hearts Spades'
if irand=248:$nikname[i]='Heartbreakers'
if irand=249:$nikname[i]='Roxy Devine'
if irand=250:$nikname[i]='The worst'
if irand=251:$nikname[i]='arrow'
if irand=252:$nikname[i]='bully'
if irand=253:$nikname[i]='emerald'
if irand=254:$nikname[i]='Rosalind'
if irand=255:$nikname[i]='Bounty hunter'
if irand=256:$nikname[i]='The coolest'
if irand=257:$nikname[i]='doublet'
if irand=258:$nikname[i]='secretary Lulu'
if irand=259:$nikname[i]='officer Sandy'
if irand=260:$nikname[i]='water dancer'
if irand=261:$nikname[i]='Chess player'
if irand=262:$nikname[i]='Sportwoman'
if irand=263:$nikname[i]='Miss January'
if irand=264:$nikname[i]='Beretta'
if irand=265:$nikname[i]='Preacher''s daughter'
if irand=266:$nikname[i]='la Guerra'
if irand=267:$nikname[i]='amazing'
if irand=268:$nikname[i]='Koalmayner'
if irand=269:$nikname[i]='Brown Sugar'
if irand=270:$nikname[i]='Stilhand'
if irand=271:$nikname[i]='Honey Girl'
if irand=272:$nikname[i]='islander'
if irand=273:$nikname[i]='La Poeta del Ring'
if irand=274:$nikname[i]='Mary Jo Sanders'
if irand=275:$nikname[i]='pupa'
if irand=276:$nikname[i]='bee Sting'
if irand=277:$nikname[i]='lady daisy'
if irand=278:$nikname[i]='Fury'
if irand=279:$nikname[i]='A Matador'
if irand=280:$nikname[i]='Mary Sue'
if irand=281:$nikname[i]='la Maravilla'
if irand=282:$nikname[i]='Sarah Rosenblum'
if irand=283:$nikname[i]='Parazitka'
if irand=284:$nikname[i]='heat'
if irand=285:$nikname[i]='Meydzhik'
if irand=286:$nikname[i]='stealth Bomber'
if irand=287:$nikname[i]='phrase'
if irand=288:$nikname[i]='Alcorn'
if irand=289:$nikname[i]='Smoker'
if irand=290:$nikname[i]='El Dynamite'
if irand=291:$nikname[i]='Anna Pascal'
if irand=292:$nikname[i]='Panama'
if irand=293:$nikname[i]='bird Tracy'
if irand=294:$nikname[i]='Knizhnitsa'
if irand=295:$nikname[i]='bluestocking'
if irand=296:$nikname[i]='canteen-keeper'
if irand=297:$nikname[i]='Baroness Meredith DeKavalkal'
if irand=298:$nikname[i]='warrior'
if irand=299:$nikname[i]='killer'
if irand=300:$nikname[i]='Capitol Hill'

if irand=301:$nikname[i]=''
if irand=302:$nikname[i]=''
if irand=303:$nikname[i]=''
if irand=304:$nikname[i]=''
if irand=305:$nikname[i]=''
if irand=306:$nikname[i]=''
if irand=307:$nikname[i]=''
if irand=308:$nikname[i]=''
if irand=309:$nikname[i]=''
if irand=310:$nikname[i]=''
if irand=311:$nikname[i]=''
if irand=312:$nikname[i]=''
if irand=313:$nikname[i]=''
if irand=314:$nikname[i]=''
if irand=315:$nikname[i]=''
if irand=316:$nikname[i]=''
if irand=317:$nikname[i]=''
if irand=318:$nikname[i]=''
if irand=319:$nikname[i]=''
if irand=320:$nikname[i]=''
if irand=321:$nikname[i]=''
if irand=322:$nikname[i]=''
if irand=323:$nikname[i]=''
if irand=324:$nikname[i]=''
if irand=325:$nikname[i]=''
if irand=326:$nikname[i]=''
if irand=327:$nikname[i]=''
if irand=328:$nikname[i]=''
if irand=329:$nikname[i]=''
if irand=330:$nikname[i]=''

--- namer ---------------------------------
# namer1
!!irand = rand(2, 100)
if irand = 2:$nameprov = 'Sid Blekovich'
if irand = 3:$nameprov = 'The same'
if irand = 4:$nameprov = 'Shard of Happiness'
if irand = 5:$nameprov = 'prikolistka'
if irand = 6:$nameprov = 'Damned wretch'
if irand = 7:$nameprov = 'surprise'
if irand = 8:$nameprov = 'angel'
if irand = 9:$nameprov = 'diva'
if irand = 10:$nameprov = 'puzzle'
if irand = 11:$nameprov = 'rainbow'
if irand = 12:$nameprov = 'ocharovashka'
if irand = 13:$nameprov = 'Zaya'
if irand = 14:$nameprov = 'vredina'
if irand = 15:$nameprov = 'hooligan'
if irand = 16:$nameprov = 'Shady Layden'
if irand = 17:$nameprov = 'Lucy'
if irand = 18:$nameprov = 'shooting star'
if irand = 19:$nameprov = 'princess'
if irand = 20:$nameprov = 'summer'
if irand = 21:$nameprov = 'bunting'
if irand = 22:$nameprov = 'shocking'
if irand = 23:$nameprov = 'Saharok'
if irand = 24:$nameprov = 'Marmeladka'
if irand = 25:$nameprov = 'rogue'
if irand = 26:$nameprov = 'Kitty'
if irand = 27:$nameprov = 'chocolate'
if irand = 28:$nameprov = 'Knop'
if irand = 29:$nameprov = 'Barbie'
if irand = 30:$nameprov = 'spring'
if irand = 31:$nameprov = 'Bambi'
if irand = 32:$nameprov = 'tigress'
if irand = 33:$nameprov = 'dragonfly'
if irand = 34:$nameprov = 'Carmen'
if irand = 35:$nameprov = 'melody'
if irand = 36:$nameprov = 'black Mamba'
if irand = 37:$nameprov = 'second'
if irand = 38:$nameprov = 'dream'
if irand = 39:$nameprov = 'Indira'
if irand = 40:$nameprov = 'conflict'
if irand = 41:$nameprov = 'cat'
if irand = 42:$nameprov = 'bead'
if irand = 43:$nameprov = 'snowflake'
if irand = 44:$nameprov = 'Deja Vu'
if irand = 45:$nameprov = 'SFA-Murka'
if irand = 46:$nameprov = 'wally'
if irand = 47:$nameprov = 'Amelie'
if irand = 48:$nameprov = 'fairy'
if irand = 49:$nameprov = 'moon'
if irand = 50:$nameprov = 'Nochka'
if irand = 51:$nameprov = 'rebel'
if irand = 52:$nameprov = 'zamorochka'
if irand = 53:$nameprov = 'Laffka'
if irand = 54:$nameprov = 'lady'
if irand = 55:$nameprov = 'Buttons'
if irand = 56:$nameprov = 'ice'
if irand = 57:$nameprov = 'imp'
if irand = 58:$nameprov = 'calypso'
if irand = 59:$nameprov = 'caprice'
if irand = 60:$nameprov = 'enema Karlovna'
if irand = 61:$nameprov = 'cobra'
if irand = 62:$nameprov = 'sweetie'
if irand = 63:$nameprov = 'Kysya'
if irand = 64:$nameprov = 'lagoon'
if irand = 65:$nameprov = 'Laletta'
if irand = 66:$nameprov = 'ocean'
if irand = 67:$nameprov = 'vamp'
if irand = 68:$nameprov = 'dark'
if irand = 69:$nameprov = 'legend'
if irand = 70:$nameprov = 'Lorelei'
if irand = 71:$nameprov = 'Foxy'
if irand = 72:$nameprov = 'Young lion'
if irand = 73:$nameprov = 'luxury'
if irand = 74:$nameprov = 'era'
if irand = 75:$nameprov = 'shrew'
if irand = 76:$nameprov = 'Brunnhilde'
if irand = 77:$nameprov = 'manyachka'
if irand = 78:$nameprov = 'Hella Gelot'
if irand = 79:$nameprov = 'Medea'
if irand = 80:$nameprov = 'Vega'
if irand = 81:$nameprov = 'Vivian Undo'
if irand = 82:$nameprov = 'Magari'
if irand = 83:$nameprov = 'Skyler'
if irand = 84:$nameprov = 'Frau Barracuda'
if irand = 85:$nameprov = 'Kakunov'
if irand = 86:$nameprov = 'Pandora''s box'
if irand = 87:$nameprov = 'Black Widow'
if irand = 88:$nameprov = 'Yunibra'
if irand = 89:$nameprov = 'Fraulein Farbisianna'
if irand = 90:$nameprov = 'viper'
if irand = 91:$nameprov = 'sun'
if irand = 92:$nameprov = 'fox'
if irand = 93:$nameprov = 'nymph'
if irand = 94:$nameprov = 'steel'
if irand = 95:$nameprov = 'Fa la la'
if irand = 96:$nameprov = 'Daniel Ankaran'
if irand = 97:$nameprov = 'babe'
if irand = 98:$nameprov = 'bomb'
if irand = 99:$nameprov = 'viola'
if irand = 100:$nameprov = 'Poyson'


if irand = 101:$nameprov = 'Shiz'
if irand = 102:$nameprov = 'Kukaryamba'
if irand = 103:$nameprov = 'Tobacco'
if irand = 104:$nameprov = 'Kapitolka'
if irand = 105:$nameprov = 'heron'
if irand = 106:$nameprov = 'princess'
if irand = 107:$nameprov = 'domino'
if irand = 108:$nameprov = 'Tyapa'
if irand = 109:$nameprov = 'hedgehog'
if irand = 110:$nameprov = 'thorn'
if irand = 111:$nameprov = 'nut'
if irand = 112:$nameprov = 'Zara'
if irand = 113:$nameprov = 'Jussi'
if irand = 114:$nameprov = 'arrow'
if irand = 115:$nameprov = 'twilight'
if irand = 116:$nameprov = 'black beast'
if irand = 117:$nameprov = 'Vectra'
if irand = 118:$nameprov = 'Extreme'
if irand = 119:$nameprov = 'Crazy'
if irand = 120:$nameprov = 'mixer'
if irand = 121:$nameprov = 'Midnight'
if irand = 122:$nameprov = 'Tantsorsha'
if irand = 123:$nameprov = 'gymnast'
if irand = 124:$nameprov = 'Gerda'
if irand = 125:$nameprov = 'mini'
if irand = 126:$nameprov = 'Verona'
if irand = 127:$nameprov = 'Klepa'
if irand = 128:$nameprov = 'Wadjet'
if irand = 129:$nameprov = 'maya'
if irand = 130:$nameprov = 'Selene'
if irand = 131:$nameprov = 'Rhea'
if irand = 132:$nameprov = 'Nuth'
if irand = 133:$nameprov = 'Loy'
if irand = 134:$nameprov = 'ha ha'
if irand = 135:$nameprov = 'breeze'
if irand = 136:$nameprov = 'shadow'
if irand = 137:$nameprov = 'She-wolf'
if irand = 138:$nameprov = 'muskrat'
if irand = 139:$nameprov = 'Catan'
if irand = 140:$nameprov = 'avalanche'
if irand = 141:$nameprov = 'Chernosnezhka'
if irand = 142:$nameprov = 'ballerina'
if irand = 143:$nameprov = 'Wild Cat'
if irand = 144:$nameprov = 'el terrible of'
if irand = 145:$nameprov = 'infanta'
if irand = 146:$nameprov = 'Lissa Be-spendthrift'
if irand = 147:$nameprov = 'Gagalu'
if irand = 148:$nameprov = 'Moonshine Township'
if irand = 149:$nameprov = 'Gingemma'
if irand = 150:$nameprov = 'Belfeba'
if irand = 151:$nameprov = 'Karkalyga'
if irand = 152:$nameprov = 'Shayzi'
if irand = 153:$nameprov = 'Pledovka'
if irand = 154:$nameprov = 'ruler'
if irand = 155:$nameprov = 'fuzz'
if irand = 156:$nameprov = 'harpy'
if irand = 157:$nameprov = 'Chuchundra'
if irand = 158:$nameprov = 'spider'
if irand = 159:$nameprov = 'baggage'
if irand = 160:$nameprov = 'Dvuhstvolka'
if irand = 161:$nameprov = 'tomboy'
if irand = 162:$nameprov = 'taiga'
if irand = 163:$nameprov = 'Mistress Belladonna'
if irand = 164:$nameprov = 'Asia'
if irand = 165:$nameprov = 'Split Sky'
if irand = 166:$nameprov = 'JUST Mi'
if irand = 167:$nameprov = 'Miss Bainbridge'
if irand = 168:$nameprov = 'jazz'
if irand = 169:$nameprov = 'Dilishes'
if irand = 170:$nameprov = 'big Momma'
if irand = 171:$nameprov = 'Defiance'
if irand = 172:$nameprov = 'Iron Blonde'
if irand = 173:$nameprov = 'geisha'
if irand = 174:$nameprov = 'Lily of the valley'
if irand = 175:$nameprov = 'Vortex'
if irand = 176:$nameprov = 'Cruella DeVill'
if irand = 177:$nameprov = 'cyclist'
if irand = 178:$nameprov = 'Ragnarok'
if irand = 179:$nameprov = 'lady Dragon'
if irand = 180:$nameprov = 'Flora'
if irand = 181:$nameprov = 'boorish'
if irand = 182:$nameprov = 'chaos'
if irand = 183:$nameprov = 'lamp'
if irand = 184:$nameprov = 'predator'
if irand = 185:$nameprov = 'The April moon'
if irand = 186:$nameprov = 'black Star'
if irand = 187:$nameprov = 'shrapnel'
if irand = 188:$nameprov = 'euphoria'
if irand = 189:$nameprov = 'Electra'
if irand = 190:$nameprov = 'ogress'
if irand = 191:$nameprov = 'Nutty'
if irand = 192:$nameprov = 'fantasy'
if irand = 193:$nameprov = 'Short story'
if irand = 194:$nameprov = 'Snow'
if irand = 195:$nameprov = 'Sinister'
if irand = 196:$nameprov = 'crumb'
if irand = 197:$nameprov = 'melons'
if irand = 198:$nameprov = 'Lolita'
if irand = 199:$nameprov = 'wagtail'
if irand = 200:$nameprov = 'Fairy tale'
if irand = 201:$nameprov = 'branch'
if irand = 202:$nameprov = 'heart of the Ocean'
if irand = 203:$nameprov = 'fallen Angel'
if irand = 204:$nameprov = 'Medvedka'
if irand = 205:$nameprov = 'explosion'
if irand = 206:$nameprov = 'Whack'
if irand = 207:$nameprov = 'sinner'
if irand = 208:$nameprov = 'keeper'
if irand = 209:$nameprov = 'mistress of Death'
if irand = 210:$nameprov = 'pathos'
if irand = 211:$nameprov = 'Ston Falls'
if irand = 212:$nameprov = 'Lost'
if irand = 213:$nameprov = 'mustard'
if irand = 214:$nameprov = 'hysterics'
if irand = 215:$nameprov = 'Lenore'
if irand = 216:$nameprov = 'Tumanik'
if irand = 217:$nameprov = 'Grand lady'
if irand = 218:$nameprov = 'Fanny Hill'
if irand = 219:$nameprov = 'Nosolomka'
if irand = 220:$nameprov = 'Basta'
if irand = 221:$nameprov = 'milk'
if irand = 222:$nameprov = 'granny'
if irand = 223:$nameprov = 'The old lady Flo'
if irand = 224:$nameprov = 'magpie'
if irand = 225:$nameprov = 'icicle'
if irand = 226:$nameprov = 'meridian'
if irand = 227:$nameprov = 'module'
if irand = 228:$nameprov = 'Strekotusha'
if irand = 229:$nameprov = 'Azazel'
if irand = 230:$nameprov = 'Gabriella'
if irand = 231:$nameprov = 'tiara'
if irand = 232:$nameprov = 'huntsman'
if irand = 233:$nameprov = 'dream'
if irand = 234:$nameprov = 'supernova'
if irand = 235:$nameprov = 'Karnedzh'
if irand = 236:$nameprov = 'blackout'
if irand = 237:$nameprov = 'schoolgirl'
if irand = 238:$nameprov = 'Kasia'
if irand = 239:$nameprov = 'Caprice Night'
if irand = 240:$nameprov = 'Tomboy'
if irand = 241:$nameprov = 'Wild Horse'
if irand = 242:$nameprov = 'sweetheart'
if irand = 243:$nameprov = 'splinter'
if irand = 244:$nameprov = 'log'
if irand = 245:$nameprov = 'gymnast'
if irand = 246:$nameprov = 'Zhep Ebrilo'
if irand = 247:$nameprov = 'Hearts Spades'
if irand = 248:$nameprov = 'Heartbreakers'
if irand = 249:$nameprov = 'Roxy Devine'
if irand = 250:$nameprov = 'The worst'
if irand = 251:$nameprov = 'arrow'
if irand = 252:$nameprov = 'bully'
if irand = 253:$nameprov = 'emerald'
if irand = 254:$nameprov = 'Rosalind'
if irand = 255:$nameprov = 'Bounty hunter'
if irand = 256:$nameprov = 'The coolest'
if irand = 257:$nameprov = 'doublet'
if irand = 258:$nameprov = 'secretary Lulu'
if irand = 259:$nameprov = 'officer Sandy'
if irand = 260:$nameprov = 'water dancer'
if irand = 261:$nameprov = 'Chess player'
if irand = 262:$nameprov = 'Sportwoman'
if irand = 263:$nameprov = 'Miss January'
if irand = 264:$nameprov = 'Beretta'
if irand = 265:$nameprov = 'Preacher''s daughter'
if irand = 266:$nameprov = 'la Guerra'
if irand = 267:$nameprov = 'amazing'
if irand = 268:$nameprov = 'Koalmayner'
if irand = 269:$nameprov = 'Brown Sugar'
if irand = 270:$nameprov = 'Stilhand'
if irand = 271:$nameprov = 'Honey Girl'
if irand = 272:$nameprov = 'islander'
if irand = 273:$nameprov = 'La Poeta del Ring'
if irand = 274:$nameprov = 'Mary Jo Sanders'
if irand = 275:$nameprov = 'pupa'
if irand = 276:$nameprov = 'bee Sting'
if irand = 277:$nameprov = 'lady daisy'
if irand = 278:$nameprov = 'Fury'
if irand = 279:$nameprov = 'A Matador'
if irand = 280:$nameprov = 'Mary Sue'
if irand = 281:$nameprov = 'la Maravilla'
if irand = 282:$nameprov = 'Sarah Rosenblum'
if irand = 283:$nameprov = 'Parazitka'
if irand = 284:$nameprov = 'heat'
if irand = 285:$nameprov = 'Meydzhik'
if irand = 286:$nameprov = 'stealth Bomber'
if irand = 287:$nameprov = 'phrase'
if irand = 288:$nameprov = 'Alcorn'
if irand = 289:$nameprov = 'Smoker'
if irand = 290:$nameprov = 'El Dynamite'
if irand = 291:$nameprov = 'Anna Pascal'
if irand = 292:$nameprov = 'Panama'
if irand = 293:$nameprov = 'bird Tracy'
if irand = 294:$nameprov = 'Knizhnitsa'
if irand = 295:$nameprov = 'bluestocking'
if irand = 296:$nameprov = 'canteen-keeper'
if irand = 297:$nameprov = 'Baroness Meredith DeKavalkal'
if irand = 298:$nameprov = 'warrior'
if irand = 299:$nameprov = 'killer'
if irand = 300:$nameprov = 'Capitol Hill'

--- namer1 ---------------------------------
# namecreator
$so[1] = 'A'
$so[2] = 'E'
$so[3] = 'And'
$so[4] = 'Oh'
$so[5] = 'Do'
$so[6] = 'E'
$so[7] = 'Yu'
$so[8] = 'I'

$sol[1] = 'and'
$sol[2] = 'e'
$sol[3] = 'and'
$sol[4] = 'about'
$sol[5] = 'at'
$sol[6] = 'e'
$sol[7] = 'th'
$sol[8] = 'I'

$wo[1] = 'B'
$wo[2] = 'B'
$wo[3] = 'T'
$wo[4] = 'D'
$wo[5] = 'F'
$wo[6] = 'W'
$wo[7] = 'K'
$wo[8] = 'L'
$wo[9] = 'M'
$wo[10] = 'H'
$wo[11] = 'P'
$wo[12] = 'P'
$wo[13] = 'From'
$wo[14] = 'T'
$wo[15] = 'F'
$wo[16] = 'X'

$wol[1] = 'b'
$wol[2] = 'in'
$wol[3] = 'g'
$wol[4] = 'd'
$wol[5] = 'Well'
$wol[6] = 'h'
$wol[7] = 'to'
$wol[8] = 'l'
$wol[9] = 'm'
$wol[10] = 'n'
$wol[11] = 'n'
$wol[12] = 'r'
$wol[13] = 'with'
$wol[14] = 't'
$wol[15] = 'f'
$wol[16] = 'x'

FirstWord = 0
$nikname[i] = ''
tiprand = (0, 1)

if tiprand = 0:
	if FirstWord = 0:
		wordrand = rand(1, 16)
		$nikname[i] += $wo[wordrand]
	end
elseif tiprand = 1:
	if FirstWord = 0:
		wordrand = rand(1, 8)
		$nikname[i] += $so[wordrand]
	end
end

--- namecreator ---------------------------------
# npcview
'<center><b><<$nikname[i]>></b></center>'
'rating <<rating[i]>>'

if i > 0:'record <<win[i]>> Win - <<loss[i]>> lesions - <<draw[i]>>draws <<SubWin[i]>> wins by submission/<<SubLoss[i]>> lesions surrender'
if i = 0:'record <<winw[i]>> Win - <<lossw[i]>> lesions - <<draww[i]>>draws <<SubWin[i]>> wins by submission/<<SubLoss[i]>> lesions surrender'

''
''
'power <<musle[i]>>'
'flexibility <<flex[i]>>'
'endurance <<stamina[i]>>'
'Moralnovolevye quality <<wipo[i]>>'
''
'throwing techniques <<Bteh[i]>>'
'appliances hold <<Uteh[i]>>'
'Protective equipment <<Zteh[i]>>'
''

if slut[i] > 0 and porno = 1:'Packed with a brand whore.'

''
''
''
'<<$spisok[i]>>'
'test <<i>>'

act 'Go_Out':gt $loc

if i ! 1:
	act 'To fight with you':gt 'beforeFW'
end

if i ! 1:
	if predlog > 0 and predlog!i and predlog2 = 0:
		act 'Suggest a fight with <<$nikname[predlog]>>':
			cls
			a = predlog
			'In the red corner <<$nikname[a]>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
			 !!i = predlog2
			'In the blue corner <<$nikname[i]>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
			gs 'Autofight'
			predlog = 0
			predlog2 = 0

			act 'further':gt $loc
		end
	elseif predlog = 0:
		act 'offer battle':predlog = i & gt $loc
	end
end

--- npcview ---------------------------------
# sny
$d_dima_end = {
	act 'wipe your eyes':
		cls
		minut += 5
		SNYnoseGang += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/facial2.jpg"></center>'
		'Rubbed his eyes you saw, Dimka that came to the table and pulled out of the hiding place the camera works , whereupon its disabled "Hey Ghosh, vidos turned very best with this whore."'

		if NosovRevenge = 1:
			NosovRevenge = 2
			daynosovrevenge = daystart
			'Noses turned to you "Well slut, here you dovyebalas."'
		end

		act 'Leave':gt 'gorodok'
	end
}

$d_dima_kiss = {
	act 'Kiss':
		cls
		minut += 5
		horny += 10
		!!1 and 4
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/pett.jpg"></center>'
		'You kiss with Dimka and he slowly undresses you. His hands gently wrapped around you and you get up on his knees and lie down on the sofa breast.'

		 act 'wait':
			cls
			minut += 5
			horny += 10
			!1 and 4
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/pett2.jpg"></center>'
			'Member of Dimka poked you in the pussy and you decide to help him apart their buns that would facilitate access.'

			act 'wait':
				cls
				minut += 5
				$boy = 'Dima'
				silavag = 1
				dick = 16

				if npcSex[1] = 0:npcSex[1] = 1 & guy += 1

				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/fuck.jpg"></center>'
				dynamic $sexstart
				dynamic $sexstart2
				!dynamic $sexcum
				'Suddenly, each Dimka and sits next to you pulled out his penis.'

				act 'Take by mouth':
					cls
					minut += 5

					if npcSex[4] = 0:npcSex[4] = 1 & guy += 1

					bj += 1

					if protect = 1:condomDima = 1

					gang += 1
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/fuck2.jpg"></center>'
					'You bows member Ghosh and start to suck absorbing his mouth to the throat.'
					dynamic $sexstart4
					dynamic $sexcum

					act 'Suck':
						cls
						minut += 5
						cumface += 1
						facial += 1
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/facial.jpg"></center>'
						'Gosh takes dick out of your mouth and the jet of sperm hit you in the face.'

						if condomDima = 1:
							act 'further':
								cls
								facial += 1
								cumface += 1
								gs 'stat'
								'<center><img src="images/qwest/alter/ev2/cond.jpg"></center>'
								'Dimka takes off his penis with a condom and squeezes cum out of it on your face.'
								dynamic $d_dima_end
							end
						elseif condomDima = 0:
							dynamic $d_dima_end
						end
					end
				end
			end
		end
	end
}

$d_otvali_nosov = {
	act 'hey! Beat_It!':
		cls
		minut += 5
		gs 'stat'

		if alko < 6:
			if dom >= 10:
				if horny < 90:
					'You pushed yourself from Dimka "hey! Beat_It! Are you, ohrenel something?"'

					act 'Leave':gt 'gorodok'
				elseif horny >= 90:
					'You want to push Dimka, but nice fire broke out in the lower abdomen with fury, your pussy just begging to fill it than ever.'
					dynamic $d_dima_kiss
				end
			else
				'You tried otsanitsya from Dimka, but he would not let you.'
				dynamic $d_dima_kiss
			end
		else
			'You managed to squeeze out something unintelligible .'
			dynamic $d_dima_kiss
		end
	end
}

alkoblock = 1
gs 'stat'

if snyqw = 0:
	'Classmates gathered together under the guidance of the teacher on the desk brought tea and sweets. Albina head out of it asked "And where Kotov?" Ryzhov hemmed "He was already drunk and lying drunk in the house shit." Shulga said looking around "And Sonya ." The teacher said "Well."'

	act 'drink tea, with buns':
		cls
		minut += 30
		fat = fat + 3
		energy = energy + 10
		water = water +20
		gs 'stat'
		'Within half an hour all clinked cups drinking tea and buns devoured. Finally all ate and teacher putting a tape recorder on the table said "Now cool disco." From the speakers the music started. All began to slowly get up from behind the desk.'

		act 'Get up from the table':
			cls
			minut += 30
			snyqw = 1
			gs 'stat'
			'The next half hour passed actually very sad. The boys broke into his pile somewhere and run regularly. The girls broke into a pile and discussed the problems and ways to apply makeup to the skin scrub. Teacher seems to have bothered pechonok stuck at school and she became the happiest face "Well guys, Happy New Year. And I''ll go home, still need to prepare for the holiday." Discordant chorus teacher congratulated the new year .'

			act 'Help clear the table':gt $curloc
		end
	end
end

if snyqw = 1:
	'You began to help clear the table other girls. In boys, meanwhile, prevailed what that recovery.'

	if GorSlut >= 3:
		'To you came Shul''ga and loudly slamming ass said "Hey lowered, do you even come here Nahuas? There are normal people tusyat, and your place on the Parasha, with the cheek by a dick."'

		act 'to_be_silent':
			cls
			minut += 15
			gs 'stat'
			'You silently turned away from Shulgi. He grabbed you by the arm "You cho some cheeky?"'

			if AlbinaBlockHumiliation = 1:
				GorSlut -= 1
				'To you came Albina "Slysh you, uebok. You do not seem to last vkuril our conversation? Fuck off of it, i_get_it?" But Shul''ga apparently had already somewhere plunk and bravely began to run into Albina "You called someone uebkom? A? you cho, Ramsey beguiled creature?" Albina smiled most charming smile Shulga and then abruptly stuck between his legs his knee, from what Shul''ga howling fell to the floor. Albina squatted beside rolling on the floor Shulgi "Will you still complain, come large and powerful uncle of the office of funeral services and bury you." Shul''ga curled into a ball on the floor howling "bitch!!!" Albina got to his feet and suddenly with all his strength Shulga kicked in the ribs "It was you who called a bitch?" Shul''ga howled and wailed even more "Do not you! This is me in pain." Albina grinned and sat down next to him suddenly patting him on the head. "You see, can also be a smart boy." Then he stood up and said you "Okay <<$name>>, better really go away. See how you reacts to kids, Corn is not their eyes once again."'

				act 'Leave':gt 'gschool'
			else
				'you wailed "Yes. What do you want it?" Shul''ga grinned, "as cho? New Year''s gift to you on the cheek vlupit. In short go to the toilet, Hare vyebyvatsya."'

				act 'Go to the toilet':snyqw = 2 & minut += 15 & gt $curloc
			end
		end
	elseif GorSlut <= 2:
		'Suddenly you called one of the boys "<<$name>>, let''s go to our."'

		act 'come_Up':
			cls
			minut += 5
			gs 'stat'
			'You came to the guys, those in tihushku jammed vodka. Dan Ryzhov, as the main plant handed you a glass.'

			act 'drink':
				cls
				minut += 5
				alko += 3
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/drunk.jpg"></center>'
				'You drank vodka and your throat burned flame. You even suffocated but you immediately stretched pickle, you quickly skhrumkali it. Dimka Nosov appealed to all, "Hey people! My ancestors left for the new year to meet, Come to me. arrange a get-together!" All happy, as the evening school was completely not interesting.'

				if grupNPC[1] = 0:
					grupNPC[1] = 50
					NosovRevenge = 1
					'Dimka Nosov addressed to you in a floor vote. "<<$name>>, you and I have had disagreements. I sincerely apologize for his misbehavior. I hope you will not give up and you will come to the party."'
				end

				act 'Go to the party':snyqw = 3 & minut += 30 & gt $curloc
				act 'Leave':gt 'gschool'
			end

			act 'unsubscribe drink':
				cls
				minut += 5
				gs 'stat'
				'You refused to drink vodka as you did not try to persuade. Dimka Nosov appealed to all, "Hey people! My ancestors left for the new year to meet, Come to me. arrange a get-together!" All happy, as the evening school was completely not interesting.'

				if grupNPC[1] = 0:
					grupNPC[1] = 50
					NosovRevenge = 1
					'Dimka Nosov addressed to you in a floor vote. "<<$name>>, you and I have had disagreements. I sincerely apologize for his misbehavior. I hope you will not give up and you will come to the party."'
				end

				act 'Go to the party':snyqw = 3 & minut += 30 & gt $curloc
				act 'Leave':gt 'gschool'
			end
		end
	end
elseif snyqw = 2:
	'In the outhouse Shul''ga immediately lowered his pants and said "Mr. Cho nipple, to the trough."'

	act 'suck':
		cls
		minut += 5
		KlassBlowBang = 1
		gang += 1
		bj += 10
		sub += 100

		if npcSex[1] = 0:npcSex[1] = 1 & guy += 1
		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
		if npcSex[3] = 0:npcSex[3] = 1 & guy += 1
		if npcSex[4] = 0:npcSex[4] = 1 & guy += 1
		if npcSex[5] = 0:npcSex[5] = 1 & guy += 1
		if npcSex[6] = 0:npcSex[6] = 1 & guy += 1
		if npcSex[7] = 0:npcSex[7] = 1 & guy += 1
		if npcSex[8] = 0:npcSex[8] = 1 & guy += 1
		!if gnpcSex[9] = 0:gnpcSex[9] = 1 & guy += 1
		if npcSex[10] = 0:npcSex[10] = 1 & guy += 1
		if npcSex[11] = 0:npcSex[11] = 1 & guy += 1
		if GorSlut < 5:GorSlut = 5

		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/snybj.jpg"></center>'
		'You sit down in front Shulga and began to suck his dick. The toilet includes a few guys in your class, were soon all the boys in your class, except Kotova, who is rumored to have been drunk surrounded you. Someone unzipped his fly and pulled out a member, he was joined by another'

		act 'serve classmates':
			cls
			minut += 5
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/snyfilming.jpg"></center>'
			'You slurp on one dick with his mouth, while other members of the palms nayarivaya, casually looking up you see , Nosov that takes you on camera.'

			act 'suck':
				cls
				minut += 5
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/snyblowbang.jpg"></center>'
				'You serve dicks not even having time to understand who owns a particular member. Classmates already lined up in a circle .'

				act 'suck':
					cls
					minut += 5
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/snyblowbang2.jpg"></center>'
					'One member even rubs against your crown, yet you treat members, mouth is already starting to get tired.'

					act 'suck':
						cls
						minut += 5
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/snyblowbang3.jpg"></center>'
						'Many of the guys in front of your face drochat, until you swallow another dick.'

						act 'suck':
							cls
							minut += 5
							cumface += 5
							cumlip += 5
							cumfrot += 1
							gs 'stat'
							'<center><img src="images/qwest/alter/ev2/snycum.jpg"></center>'
							'Finally you start to cum on face covering his sperm. Semen from 10five cocks your face is completely covered with slime and clothes soaked with sperm.'

							act 'Leave':gt 'gschool'
						end
					end
				end
			end
		end
	end
elseif snyqw = 3:
	if music_on = 0:
		inited = 1
		music_on = 1
		volume = 100
		$music_theme = 'gnewyear'
		gs 'init_music'
	end

	'<center><img src="images/qwest/alter/ev2/tusa3.jpg"></center>'
	'The whole class went to Dimka Nosov home. Along the way. Dimka house included music, girls quickly the table and the class began to celebrate the new year. You too stuck in the hands of a glass of vodka.'

	act 'drink':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/drunk.jpg"></center>'
		'You drank vodka from glasses and immediately ate'

		act 'tusit':snyqw = 4 & minut += 5 & gt $curloc
	end

	act 'unsubscribe drink':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/tusa3.jpg"></center>'
		'You refused to drink as you do not have to persuade.'

		act 'tusit':snyqw = 4 & minut += 5 & gt $curloc
	end
elseif snyqw = 4:
	'<center><img src="images/qwest/alter/ev2/tusa4.jpg"></center>'
	'Boys and girls to relax and start easy communication. Someone poured more vodka into the glasses and handed you a glass of vodka.'

	act 'drink':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/drunk.jpg"></center>'
		'You drank vodka from glasses and immediately ate'

		act 'tusit':snyqw = 5 & minut += 5 & gt $curloc
	end

	act 'unsubscribe drink':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/tusa4.jpg"></center>'
		'You refused to drink as you do not have to persuade.'

		act 'tusit':snyqw = 5 & minut += 5 & gt $curloc
	end
elseif snyqw = 5:
	'<center><img src="images/qwest/alter/ev2/tusa5.jpg"></center>'
	'Albina came to the center of the room and began to dance incendiary. It was joined by Kate and her sister Vick. While you were watching the girls, you again stuck in his hand a glass of vodka.'

	act 'drink':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/drunk.jpg"></center>'
		'You drank vodka from glasses and immediately ate'

		act 'tusit':snyqw = 6 & minut += 5 & gt $curloc
	end

	act 'unsubscribe drink':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/tusa5.jpg"></center>'
		'You refused to drink as you do not have to persuade.'

		act 'tusit':snyqw = 6 & minut += 5 & gt $curloc
	end
elseif snyqw = 6:
	'<center><img src="images/qwest/alter/ev2/tusa6.jpg"></center>'
	'Albina and Katja in full light the middle of the room. And suddenly Albina covers the face and hands Katja kisses her on the lips. The room is carried howling kids require continuing. You do not understand how, but in your hand again was full glass of vodka. The girls .'

	act 'drink':
		cls
		minut += 15
		alko += 3
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/drunk.jpg"></center>'
		'You drank vodka from glasses and immediately ate'

		act 'tusit':snyqw = 7 & minut += 5 & gt $curloc
	end

	act 'unsubscribe drink':
		cls
		minut += 15
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/tusa6.jpg"></center>'
		'You refused to drink as you do not have to persuade.'

		act 'tusit':snyqw = 7 & minut += 5 & gt $curloc
	end
elseif snyqw = 7:
	if alko >= 10:
		'<center><img src="images/qwest/alter/ev2/vomit.jpg"></center>'
		'You felt my stomach contents rapidly beginning to break out. Dale you Rushed to the toilet.'

		act 'barf':
			cls
			minut += 60 * alko
			gs 'stat'

			if NosovRevenge = 0:
				partyPantyCum = 1
				cumfrot += 1
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/vom.jpg"></center>'
				'You woke up on the bed in the room Dimka Nosov. My head hurts the whole body aches and you feel, that you have the pope wet panties, turning his head you see, shorts that some sort of white mucus. You poke a finger in the mucus and hold the finger -to-nose, pungent smell of sperm hits you nose. At this point enters the room Nosov. Seeing your panties smeared with sperm he begins to laugh "dammit. I thought that here in the room before you no one gets, but hell. Already someone had otebal you." The noise in the room drop a few tousled heads, hear the whisper "Th there?" another voice responds "Yes nicho, Svetku someone otebal."'

				act 'Leave':gt 'gorodok'
			elseif NosovRevenge = 1:
			! WD: Move missing Image ~ "tatvag6.jpg" from "images\picBody" to "images\Body"
				'<center><img src="images/body/tatvag6.jpg"></center>'
				'You woke up lying on the couch which is awkward. With difficulty raising his head you understand, it is a place you are not familiar, listening to the feelings you understand , that you have a very sore and burns pubic, looking between her legs you saw, that you wear panties, lowered their ofigeli you just by what he saw. Pubic tattoo emblazoned svezhevybitaya.'

				if tatvag = 1:'You probably killed an old tattoo with a new.'
				if tatvag = 2:'You probably killed an old tattoo with a new.'
				if tatvag = 3:'You probably killed an old tattoo with a new.'
				if tatvag = 4:'You probably killed an old tattoo with a new.'
				if tatvag = 5:'You probably killed an old tattoo with a new.'

				tatvag = 6
				lobok = -10
				gs 'stat'
				'Looking closer you read, English has been written word SLUT, whore and letters lay tattooed girl in stockings. You began to resent, although it was more like a moo and moans, your voice come what that man said he will "Well. And it was here, plowshares, that urgently needs to tattoo." You stare at the man "What the hell tattoo?" The man rolled his eyes "Oh God, first drunk, and then wonder why it. Here is a sketch of a tattoo where your signature." You looked at the signature, indeed it was your.'

				act 'Leave':gt 'gorodok'
			end
		end
	elseif alko >= 6 and alko < 10:
		'<center><img src="images/qwest/alter/ev2/tit.jpg"></center>'
		'You are quite tipsy and has not thinking. Someone''s hands pull you into the center of the room where the dancing boys and girls. Nosov suddenly pulls off her blouse exposing you to your chest in front of the class. You have become sluggish otbivatsya and hysterical laughter pytatsya pull her blouse back on his chest. Dimka takes you by the hand and drags somewhere.'

		act 'hey! Where are you my taschisch?':snyqw = 10 & minut += 5 & gt $curloc
	elseif alko > 0 and alko < 6:
		'<center><img src="images/qwest/alter/ev2/alb.jpg"></center>'
		'You are a little drunk and you have fun. you notice, Albina that sits on the couch and kissing Vanka Prokhorov and Fedka Kozlov paw her breasts. Looking around you notice, that Katja nowhere.'

		act 'Search Katja':
			cls
			minut += 5
			SeeKatBang = 1
			KatjaLust += 10
			KatjaSlut += 10
			horny += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/ev2/kat.jpg"></center>'
			'You began to walk around the apartment in search of Katja, behind one of the doors you hear women moaning and creaking beds. Looking back you a little of what he saw ofigeli. On the bed stands cancer Katka Meynold, straight into the back of her dress and furiously hammer Slavik Warriors. Katka only moans when fat cock enters her to the core and eggs beaten her pubes. Slavik finally growled finished right in Katya and fell on its side, he whispered to her "Katja, I''m in love with you for a long time, do not think, that is , I just dream vstrechatsya with you." Kate muttered something and it seems blacked.'

			act 'Go into the room':snyqw = 8 & minut += 5 & gt $curloc
		end
	elseif alko = 0:
		'<center><img src="images/qwest/alter/ev2/idi.jpg"></center>'
		'You are quite sober look at these raging idiots that surround you.'

		act 'Leave':gt 'gorodok'
	end
elseif snyqw = 8:
	'<center><img src="images/qwest/alter/ev2/tusa8.jpg"></center>'
	'Back in the main room, you saw, that odnoklaniki continue to thump. Albina, with Vanka and Fedka, in the room no. Girls like mad in the middle of the room and Kristinka Zvereva even let down her pants around his ass pokazavaya.'

	act 'Search Albina':
		cls
		minut += 5
		horny += 10
		seeAlbinaFuck = 1
		gs 'stat'
		'<center><img src="images/qwest/alter/ev2/albgang.jpg"></center>'
		'You began to walk around the apartment in search of Albina, behind one of the doors you hear women moaning and creaking beds. Looking back you see how Fedka and Vanka fucked hard Albina. Albina covered in sweat and smeared makeup on the face muffled groans when a member Fedka enters her throat, from what is noticeably thicker. Judging by the angle of inclination of the penis and ass Albina Vanka did not razmenivatsya to detail and pulls Albinku ass.'

		act 'Go into the room':snyqw = 9 & minut += 5 & gt $curloc
	end
elseif snyqw = 9:
	'<center><img src="images/qwest/alter/ev2/tusa9.jpg"></center>'
	'Virtually the entire company already census , someone lying in the butt, who is trying to hang out. It suits you Nosov "And you''re still light on his feet? good_for_you, others are ready, let''s_go, help me with something."'

	act 'I have to go now':
		cls
		minut += 15
		gs 'stat'
		'You said Dimka, you have time to go.'

		act 'Leave':gt 'gorodok'
	end

	act 'Let''s go':snyqw = 10 & minut += 5 & gt $curloc
elseif snyqw = 10:
	'<center><img src="images/qwest/alter/ev2/kiss.jpg"></center>'
	'Being alone in the room with Dimka Nosov, he began to paw at your chest and sucked his lips to yours in the long slobbery kiss.'

	if NosovRevenge = 1:
		dynamic $d_dima_kiss
		dynamic $d_otvali_nosov
	else
		if dimaFilm = 1:
			dynamic $d_dima_kiss
		else
			dynamic	$d_dima_kiss
			dynamic $d_otvali_nosov
		end
	end
 end

--- sny ---------------------------------
# card
gs 'stat'

act 'Pull the card':
	cls
	dynamic $d_slut_horny
	minut += 1
	gs 'stat'
	papkarand = rand(0, 4)

	if papkarand = 0:$papkacard = 'a'
	if papkarand = 1:$papkacard = 'b'
	if papkarand = 2:$papkacard = 'c'
	if papkarand = 3:$papkacard = 'd'
	if papkarand = 4:$papkacard = 'j'
	if papkarand = 4:
		numcard = rand(1, 2)
		nomcard = 10
	else
		numcard = rand(2, 14)

		if numcard < 10:nomcard = numcard
		if numcard >= 10:nomcard = 10
	end

	'<center><img src="images/qwest/card/<<$papkacard>>/<<$papkacard>><<numcard>>.jpg"></center>'
	'Denomination card <<nomcard>>'

	act 'Put in the stocks':gt $curloc
end

act 'remove card':gt $loc
!!act 'Playing cards':gt 'blackjack'

--- card ---------------------------------
# blackjack
gs 'stat'
num = 1
:markcard
papkarand[num] = rand(0, 4)

if papkarand[num] = 0:$papkacard[num] = 'a'
if papkarand[num] = 1:$papkacard[num] = 'b'
if papkarand[num] = 2:$papkacard[num] = 'c'
if papkarand[num] = 3:$papkacard[num] = 'd'
if papkarand[num] = 4:$papkacard[num] = 'j'

if papkarand[num] = 4:
	numcard[num] = rand(1, 2)
	nomcard[num] = 10
else
	numcard[num] = rand(2, 14)

	if numcard[num] < 10:nomcard[num] = numcard[num]
	if numcard[num] >= 10:nomcard[num] = 10
end

num += 1

if num < 10:jump 'markcard'

sumcard = nomcard[1]+nomcard[2]
'<center><img src="images/qwest/card/<<$papkacard[1]>>/<<$papkacard[1]>><<numcard[1]>>.jpg"><img src="images/qwest/card/<<$papkacard[2]>>/<<$papkacard[2]>><<numcard[2]>>.jpg"></center>'
'denomination cards <<sumcard>>'

act 'Remove card':gt $loc

--- blackjack ---------------------------------