# Gresep
$metka = $ARGS[0]
$loc = $CURLOC
'
Receptionist
'
''
'Behind the counter stands a pretty brunette.'
clr
gs 'stat'
if GotelWork = 0 and GotelRoom = 0:
if BeInOtel < 10:'The girl smiles at you and asks "the desired number? 500 rubles per day."'
if BeInOtel >= 10:'Girl slyly smiling at you and asks "the desired number? 500 rubles per day. Or you are in another case?"'
!'if money >= 500:
act 'pay room':
cls
money -= 500
Goteldaytot = daystart + 1
GotelRoom = 1
gs 'stat'
'You pay at the hotel.'
act 'Leave':gt 'Gotel'
end
end
'!
act 'Ask for work':
cls
if GermanQW = 0:GermanQW = 1
gs 'stat'
'You asked the girl working at the hotel. She shrugged, "The hiring of workers engaged in the host Herman Hotels Leonidovich, it is mainly in the hotel with 12 prior_to 13."'
act 'Leave':gt 'Gotel'
end
end
act 'Leave':gt 'Gotel'
if GotelRoom > 0:
act 'Go into the room':gt 'Gotelroom'
end
--- Gresep ---------------------------------