# vokmantoiev

if $ARGS[0] = 'start':
	cls
	vokzalToilet = 0
	gs 'stat'

	'<center><h4>Pavlovsk train station interior</h4></center>'
	'<center><img src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'
	'You are at the station''s restrooms, you can find the <a href="exec:minut += 1 & gt ''vokmantoiev'', ''female''">ladies'' room</a> and <a href="exec:minut += 1 & gt ''vokmantoiev'', ''male''">men''s room</a> here.'

	act 'Return to the station':minut += 1 & gt 'vokzalGin'
end

if $ARGS[0] = 'female':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
    $location_type = 'bathroom'
	cls
	vokzalToilet = 1
	gs 'stat'
	'<center><h4>The ladies'' room</h4></center>'
	'<center><img src="images/locations/shared/bathroom/publictoilet.jpg"></center>'
	'You open the door to the ladies'' room and go in.'

	act 'Leave':minut += 1 & gt 'vokmantoiev', 'start'

	act 'Look in the mirror':gt 'mirror', 'start'

	if spdirtyc > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumspclnt = 6
			gs 'cum_cleanup'
			minut += 10

			'You wipe the cum off your clothes and thoroughly rinse out the stains with water.'

			act 'Finish':gt 'vokmantoiev', 'female'
		end
	end

	dynamic $tampon
	dynamic $quickwash
	dynamic $basin
end

if $ARGS[0] = 'male':
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
    $location_type = 'public_indoors'
	cls
	vokzalToilet = 2
	gs 'stat'
	'<center><h4>The men''s room</h4></center>'
	'<center><img src="images/locations/shared/bathroom/publictoilet.jpg"></center>'
	'You open the door to the men''s room and go in.'

	if bimbolevel >= 1:
		act 'Wait and see if someone finds you':gt 'vokBimbo', 'pos1'
		act 'Quickly enter a stall':gt 'vokBimbo', 'pos5'
	end
	act 'Leave':minut += 1 & gt 'vokmantoiev', 'start'

	act 'Look in the mirror':gt 'mirror', 'start'

	if spdirtyc > 0:
		act 'Wipe the cum off your clothes (0:10)':
			cla
			*clr
			cumspclnt = 6
			gs 'cum_cleanup'
			minut += 10

			'You wipe the cum off your clothes and thoroughly rinse out the stains with water.'

			act 'Finish':gt 'vokmantoiev', 'female'
		end
	end

	dynamic $tampon
	dynamic $quickwash
	dynamic $basin
end

if $ARGS[0] = '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 there is a puddle of a strange white liquid on the floor, near the hole in the wall between two stalls. When you take a piece of cloth and attempt to clean it, you realize it''s sperm. Suddenly the hole in the wall makes sense to you.'
			if gloryholeVokzal = 0:gloryholeVokzal = 1 & 'You notice that in the wall between two of the toilet stalls, there is a circular hole around waist height. The edges of the hole are smooth. You shrug and keep cleaning, not thinking anything of it.'
		elseif vokmantoitipev = 1:
			'The station manager walks over to one of the urinals while you work, and lowers his pants just enough to pull his dick out. At least you think so, you can''t actually see.'

			if pcs_horny >= 50:
				act 'Try to sneak a peek':
					cls
					minut += 1
					seepeenach += 1
					tot_seepee += 1

					if tot_seepee > 5:pcs_horny += 5

					gs 'stat'
					'<center><img src="images/locations/pavlovsk/trainstation/event/seepee.jpg"></center>'
					'You try and sneak a glance at his penis and succeed. It''s flacid, and a stream of urine is steadily flowing from it. When he''s done, he washes his hands before he leaves.'
					'You wash the floor in the men''s room, and ponder whether you should move out for a minute when you hear a man loudly evacuate his bowels. You decide against it and just focus on finishing your cleaning work as fast as you can, doing your best to ignore the smell.'

					gs 'arousal', 'voyeur', 3
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		elseif vokmantoitipev = 2:
			'The police captain, Katalkin, walks over to one of the urinals while you work. He lowers his pants just enough to pull his dick out and you can hear the clattering of urine against the urinal porcelain.'

			if pcs_horny >= 50:
				act 'Try to sneak a peek':
					cls
					minut += 1
					seepeecop += 1
					tot_seepee += 1

					if tot_seepee > 5:pcs_horny += 5

					gs 'stat'
					'<center><img src="images/locations/pavlovsk/trainstation/event/seepee.jpg"></center>'
					'You try and sneak a glance at his penis and succeed. It''s flacid, and a stream of urine is steadily flowing from it. He doesn''t wash his hands when he leaves... gross!'
					'You wash the floor in the men''s room, and ponder whether you should move out for a minute when you hear a man loudly evacuate his bowels. You decide against it and just focus on finishing your cleaning work as fast as you can, doing your best to ignore the smell.'

					gs 'arousal', 'voyeur', 3
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		elseif vokmantoitipev = 3:
			'A random passenger walks over to one of the urinals while you work. He lowers his pants just enough to pull his dick out and you can hear the clattering of urine against the urinal porcelain.'

			if pcs_horny >= 50:
				act 'Try to sneak a peek':
					cls
					minut += 1
					seepeeman += 1
					tot_seepee += 1

					if tot_seepee > 5:pcs_horny += 5

					gs 'stat'
					'<center><img src="images/locations/pavlovsk/trainstation/event/seepee.jpg"></center>'
					'You try and sneak a glance at his penis and succeed. It''s flacid, and a stream of urine is steadily flowing from it. He doesn''t wash his hands when he leaves.'
					'You wash the floor in the men''s room, and ponder whether you should move out for a minute when you hear a man loudly evacuate his bowels. You decide against it and just focus on finishing your cleaning work as fast as you can, doing your best to ignore the smell.'

					gs 'arousal', 'voyeur', 3
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Leave':minut += 1 & gt 'vokzalGin'
				end
			end
		end
	elseif startevtoirand > 0:
		'You wash the floor in the men''s room, and ponder whether you should move out for a minute when you hear a man loudly evacuate his bowels. You decide against it and just focus on finishing your cleaning work as fast as you can, doing your best to ignore the smell.'
	end
end

--- vokmantoiev ---------------------------------