glife/locations/284_stwork2

# stwork2
!set minut += 15
'<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>>.'
clr
gs 'stat'
$pubhotdi = {
if publichot < 30: payrand = 0 & 'Nobody even paid any attention to your movements on the stage.'
if publichot >= 30 and publichot < 60: payrand = 0 & 'A couple of people looked at you but no more than that, you tip no one has.'
if 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.'
	if payrand = 1:
	paymoneyrand = RAND(1,3)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
end
if publichot >= 70 and publichot < 80:
payrand = RAND(0,5)
	if payrand = 0: 'Tip you no one has.'
	if payrand = 1:
	paymoneyrand = RAND(1,3)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 2:
	paymoneyrand = RAND(2,4)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 3:
	paymoneyrand = RAND(3,5)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 4:
	paymoneyrand = RAND(4,6)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 5:
	paymoneyrand = RAND(5,10)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
end

if publichot >= 80 and publichot < 90:
payrand = RAND(0,10)
	if payrand = 0: 'Tip you no one has.'
	if payrand = 1:
	paymoneyrand = RAND(1,3)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 2:
	paymoneyrand = RAND(2,4)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 3:
	paymoneyrand = RAND(3,5)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 4:
	paymoneyrand = RAND(4,6)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 5:
	paymoneyrand = RAND(5,10)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 6:
	paymoneyrand = RAND(7,12)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 7:
	paymoneyrand = RAND(10,15)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 8:
	paymoneyrand = RAND(15,20)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 9:
	paymoneyrand = RAND(20,30)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 10:
	paymoneyrand = RAND(30,50)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
end
if publichot >= 90:
payrand = RAND(0,15)
	if payrand = 0: 'Tip you no one has.'
	if payrand = 1:
	paymoneyrand = RAND(1,3)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 2:
	paymoneyrand = RAND(2,4)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 3:
	paymoneyrand = RAND(3,5)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 4:
	paymoneyrand = RAND(4,6)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 5:
	paymoneyrand = RAND(5,10)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 6:
	paymoneyrand = RAND(7,12)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 7:
	paymoneyrand = RAND(10,15)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 8:
	paymoneyrand = RAND(15,20)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 9:
	paymoneyrand = RAND(20,30)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 10:
	paymoneyrand = RAND(30,40)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 11:
	paymoneyrand = RAND(40,50)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 12:
	paymoneyrand = RAND(50,60)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 13:
	paymoneyrand = RAND(60,70)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 14:
	paymoneyrand = RAND(70,80)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
	if payrand = 15:
	paymoneyrand = RAND(80,100)
	money += paymoneyrand * 10
	'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
	end
end
}

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'

$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
!set 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':
	set gang += 1
	set guy += 4
	set picrand = 12
	set money += 5000
	gt 'paysex','var'
	end
end

if $ARGS[0] = 'pr2':
cla
*clr
!set 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':
	set guy += 1
	set picrand = 39
	set money += 3000
	xgt 'sex','var'
	end
end

if $ARGS[0] = 'pr3':
cla
*clr
!set 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':
	set girl += 1
	set lesbian += 1
	set picrand = 18
	set money += 2000
	xgt 'lezbsex','var'
	end
end
--- stwork2 ---------------------------------