glife/locations/bed2

# bed2
if $ARGS[0] = 'dosip':
	dosip = 1
else
	dosip = 0
end

if disable_autosave = 0:
	if StoryLine = 0:
		savegame 'autosave.sav'
	else
		savegame 'autosave_alt.sav'
	end
end

gs 'clothing', 'strip'
health += 5
hapri = 0
InSleep = 1
cloth_vid = 0
'<center><img src="images/pics/son.jpg" ></center>'

if analplugIN = 1:analplugIN = 0 & 'Before going to bed you remove a butt plug.'
if vibratorIN = 1:vibratorIN = 0 & 'Before going to bed you remove a vibrator.'
if mop > 1:mop = 0 & vidageday = vidageday - 1 & 'Makeup smeared on the face, you think, that looks bad for sleeping with makeup, skin aging faster from this.'

if storyline = 0:
	temp = rand(1, 10)
	if temp = 1:
		'You dreaming of what it is not clear images from the past.'
	elseif temp = 2:
		'You dreamed of the moon looking at the world with his one bloody eye.'
	elseif temp = 3:
		'You dream that you are a man again.'
	else
		'You sleep without dreaming.'
else
	'You sleep without dreaming.'
end

:loopson
clr
cls
minut += 1
stime += 1

if stime = 60:stime = 0 & son += 3

gs 'stat'

if hour = timer and minut = timerM:
	manna -= 10
	'Your alarm goes off.'

	if daystart < 10 and StoryLine = 0:'My first thought was how you woke up, "Damn. This is not a dream, I do now baba."'
	if daystart >= 10 and daystart < 30 and StoryLine = 0:'You sleepy little surprised popyalitsya its female body.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
elseif son > 23 and dosip = 0:
	manna -= 10
	'You slept'

	if daystart < 10 and StoryLine = 0:'My first thought was how you wake up "Damn. This is not a dream, I really now a woman."'
	if daystart >= 10 and daystart < 30 and StoryLine = 0:'With a little surprised prosoni you stare at her female body.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
elseif son > 47 and dosip = 1:
	manna -= 10
	dosip = 0
	son -= 24
	'You slept.'

	act 'Get out of bed and get dressed (0:15)':
		cla
		gs 'clothing', 'wear_last_worn'
		InSleep = 0
		minut += 15
		tanga = 1
		gt 'bed', 'fin'
	end

	act 'Get out of bed':
		cla
		InSleep = 0
		gt 'bed', 'fin'
	end

	act 'Try to sleep':gt 'bed2', 'dosip'
else
	jump 'loopson'
end

--- bed2 ---------------------------------