# salon
if $ARGS[0] = 'start':
gs 'stat'
$zavivka = {
set minut += 60
set curly += 10
set money -= 1000
if salonrand = 0 and masha = 0: gt 'salon','0'
'You curled hair.'
gs 'stat'
gt 'salon','start'
}
$solyariy = {
set minut += 60
set tan += 10
set money -= 1000
if salonrand > 6 and nastjaqw > 2: gt 'etoexhib','pos1'
if salonrand = 0 and masha = 0: gt 'salon','0'
'You sunbathe in the solarium.'
gs 'stat'
gt 'salon','start'
}
$resnici = {
set minut += 60
set resnic += 1
set money -= 5000
if salonrand = 0 and masha = 0: gt 'salon','0'
'You lengthen lashes.'
gs 'stat'
gt 'salon','start'
}
$epilyaciya = {
set minut += 60
set leghair = -20
set lobok = -20
set money -= 5000
if salonrand = 0 and masha = 0: gt 'salon','0'
'You had a full body hair removal.'
gs 'stat'
gt 'salon','start'
}
$ozdormas = {
set minut += 60
set salo -= 2
set vidageday += 3
set money -= 5000
if salonrand = 0:
	cla
	*clr
	'<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.'
	set picrand = rand(25,28)
	act 'Indignant': gt 'salon','start'
	act 'Enjoy':
		set guy += 1
		gt 'sex','minet'
		end
	end
gs 'stat'
gt 'salon','start'
}
$tatyadd = {
!set minut += 60
cla
if tatlip = 0:
	act 'View on the lip tattoo number 1':
		cla
		*clr
		'<center><img src="images\body\tatlip1.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatlip = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			set vaf += 10
			gs 'stat'
			'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View on the lip tattoo number 2':
		cla
		*clr
		'<center><img src="images\body\tatlip2.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatlip = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			set vaf += 10
			gs 'stat'
			'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View on the lip tattoo number 3':
		cla
		*clr
		'<center><img src="images\body\tatlip3.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatlip = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			set vaf += 10
			'You lie on the couch, and you open your mouth stuffed with a tattoo on his lip.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatplech = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open the shoulders and you stuffed tattoo.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattoo on his shoulder, "butterfly"':
		cla
		*clr
		'<center><img src="images\body\tatplech2.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatplech = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open the shoulders and you stuffed tattoo.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatplech = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open shoulders, and you stuffed tattoo.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatplech = 4
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open shoulders, and you stuffed tattoo.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatback = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open back, and you are stuffed tattoo.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatback = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open back, and you are stuffed tattoo.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattoo "corset" on the back':
		cla
		*clr
		'<center><img src="images\body\tatb3.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatback = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open back, and you are stuffed tattoo.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattooed "characters" on the back':
		cla
		*clr
		'<center><img src="images\body\tatb4.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatback = 4
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, open back, and you are stuffed tattoo.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatupb = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on the lower back.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatupb = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on the lower back.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatupb = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on the lower back.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatupb = 4
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on the lower back.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatvag = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you´re shooting underwear stuffed tattoo in the groin.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattoo in the groin "Lick me"':
		cla
		*clr
		'<center><img src="images\body\tatvag2.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatvag = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you´re shooting underwear stuffed tattoo in the groin.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattoo in the groin "Black Owned"':
		cla
		*clr
		'<center><img src="images\body\tatvag3.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatvag = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you´re shooting underwear stuffed tattoo in the groin.'
			act 'Exit': gt 'salon','start'
			end
		end
	act 'View tattoo in the groin "Lucky"':
		cla
		*clr
		'<center><img src="images\body\tatvag4.jpg"></center>'
		act 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatvag = 4
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you´re shooting underwear stuffed tattoo in the groin.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatvag = 5
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you´re shooting underwear stuffed tattoo in the groin.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatleg = 1
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on her ankle.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatleg = 2
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on her ankle.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatleg = 3
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on her ankle.'
			act 'Exit': 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 'Exit': gt 'salon','start'
		act 'A tattoo':
			cla
			Set tatleg = 4
			Set horny += 5
			Set money -= 8000
			minut += 60
			gs 'stat'
			'You lie on the couch, and you packed a tattoo on her ankle.'
			act 'Exit': gt 'salon','start'
			end
		end
	end
gs 'stat'
}
$uhodkosha = {
set minut += 60
set skin += 1
set money -= 15000
if salonrand = 0 and masha = 0: gt 'salon','0'
'You mask the face, after a while removed her beautician.'
gs 'stat'
gt 'salon','start'
}
$delgub = {
set minut += 60
set lip -= 1
set money -= 15000
'You have reduced the lips.'
gs 'stat'
gt 'salon','start'
}
$addgub = {
set minut += 60
set lip += 1
set money -= 25000
'You increased the lips.'
gs 'stat'
gt 'salon','start'
}
$addglaza = {
set minut += 60
set glaraz += 1
set money -= 30000
'You have increased eye.'
gs 'stat'
gt 'salon','start'
}
$addtitki = {
set minut += 60
set silicone += 10
set money -= 150000
'You have inserted silicone breast increasing their size by 10 cm'
gs 'stat'
gt 'salon','start'
}
$delshir = {
set minut += 60
set fat = 0
set salo = 0
set money -= 150000
'You totally suck the fat out of the body.'
gs 'stat'
gt 'salon','start'
}
$omoloshenie = {
set minut += 60
set vidageday += 50
set money -= 250000
if salonrand = 0 and masha = 0: gt 'salon','0'
'You spent rejuvenation procedures, they can not turn the clock to sleep, they can only stop the aging at the time.'
gs 'stat'
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
set salonrand = rand(0,9)
set minut += 5
'<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 $solyariy ">Solarium - 1tyr</a>'
if money < 1000: 'Solarium - 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), 5000 rubles</a>'
if money < 5000: 'Wellness massage (accelerates fat, rejuvenates the body), 5000 rubles'
if money >= 8000: '<a href="exec: dynamic $tatyadd ">Tatuiroka or piercing - 8 thousand</a>'
if money < 8000: 'Tatuiroka or piercing - eight thousand 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 - sput 15</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 - sput 25</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 - sput 250</a>'
if money < 250000: 'Rejuvenation - 250,000 rubles'
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
	'Beauty is closed and you are asked to retire.'
	act 'QUIT': set minut += 5 & gt 'torgcentr'
	exit
	end
act 'QUIT': set minut += 5 & gt 'torgcentr'
end

if $ARGS[0] = '0':
cla
*clr
set 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 offset the cost of chemical cleaning in Ramer 5000rub.'
act 'Agree': set money += 5000 & gt 'salon','start'
if DOM > 10:
	act 'Require punish now':
		cla
		set orgasm += 1
		set 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
								'<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.'
								set telmasha = 1
								set masha += 1
								act 'Leave': gt 'salon','start'
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = '1':
set minut += 5
cla
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'
		end
	if 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:
			act 'Move away': gt 'salon','start'
			act 'Find a job':
				cla
				set worksalon = 1
				set work = 1
				'You classify working in the personnel department. "'
				act 'Move away': gt 'salon','start'
				end
			end
		act 'Move away': gt 'salon','start'
		end
	end
if 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':
	set smena += 1
	gt 'worksalon','start'
	end
act 'Resign': gt 'salon','discharge'
end

if $ARGS[0] = 'discharge':
cla
set minut += 10
set worksalon = 0
set work = 0
set pay = smena * 800
set money += pay
set smena = 0
'The administrator looked at you: "Here is your payment <<pay>> rubles and employment history. Goodbye."'
act 'Leave': gt 'salon','start'
end
if $ARGS[0] = 'early':
	cla
	'<center><B><font color = maroon>Beauty</font></B></center>'
	'<center><img src="images\etogame\salon.jpg"></center>'
	act 'Wait until work begins':
		hour = 9
		minut = 0
		gt 'salon','start'
	end
end
--- salon ---------------------------------