glife/locations/vokdin

# 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'
			'<center><img src="images/pic/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/pic/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/pic/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/pic/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
			'<center><img src="images/pic/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
			'<center><img src="images/pic/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
			'<center><img src="images/pic/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>'
	'<center><img src="images/pic/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>'
	'<center><img src="images/pic/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 ---------------------------------