glife/locations/laketoilet

# laketoilet

if $ARGS[0] = 'main':
	CLOSE ALL

	$metka = $ARGS[0]
	$loc = $CURLOC
	$metkaM = $ARGS[0]
	$locM = $CURLOC
    $location_type = 'bathroom'
	cla
	*clr
	LCtoiletiventrand = rand(1, 100)

	if hour < 4 and LCtoiletiventrand >= 83:
		'<center><img src="images/lakecafe/toiletsexstart.jpg"></center>'
		'When you enter the restroom, you catch a horny man slowly jerk himself off. He hasn''t noticed you yet.'

		act 'Seduce him':
			gt 'LCporn', 'toiletsex'
		end

		act 'Leave the restroom':gt 'lakecafe', 'main'
	else
		clr
		gs 'stat'
		'<center><img src="images/lakecafe/toilet.jpg"></center>'
		'The single restroom the diner has. From the dirt and smell, you don''t think this toilet has ever been cleaned before. Ugh...'

		act 'Look in the mirror':
			cla
			$gt1 = 'laketoilet'
			$gt2 = 'main'
			gt 'portmirror'

			act 'Move away from the mirror':
				cla
				gt 'laketoilet', 'main'
			end
		end

		if spdirtyc > 0:
			act 'Wipe the cum off your clothes (0:10)':
				cla
				*clr
				cumspclnt = 6
				gs 'cum_cleanup'
				minut += 10
				'<center><img src="images/etogame/frotsp.jpg"></center>'
				'You spend ten minutes wiping and rinsing the cum stains out of your clothes. By the end, all that remain of them are some damp spots that should dry up in a few minutes.'

				act 'Continue':gt 'laketoilet', 'main'
			end
		end

		dynamic $tampon
		dynamic $quickwash
		dynamic $basin

		act 'Leave the restroom':gt 'lakecafe', 'main'
	end
end

--- laketoilet ---------------------------------