# 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 ---------------------------------