# Maria1
'- How can I help you?'

act 'Move away':gt 'rack'

if nom_1 = 0:
	act 'Ask about plans for the evening':
		cla
		'- What are you doing tonight?'
		'- Meeting with her husband. Anything else?'

		act 'Move away':gt 'rack'
	end

	if tobiQW = 2000:
		act 'Why in the hotel so crowded?':
			cla
			tobiQW = 2001
			'- Why so crowded in the hotel?'
			'- Then stop members of Congress rare languages, as they call themselves quack.'

			act 'Move away':gt 'rack'
		end
	end
end

if nomer = 0:
	*clr

	act 'Stay':
		cla
		'- I would like to stay'
		'- Well, what would you like?'

		act 'Cheap room':
			'- Cheap room'
			nomer = 1
			nom_1 = 1
			gt 'maria1'
		end

		act 'Standard Room':
			'- Standard Room'
			nomer = 2
			nom_1 = 1
			gt 'maria1'
		end

		act 'Suite':
			'- Suite'
			nomer = 3
			nom_1 = 1
			gt 'maria1'
		end

		act 'Presidential Suite':
			'- Presidential Suite'
			nomer = 4
			nom_1 = 1
			gt 'maria1'
		end
	end
end

if nom_1 = 1 and flag = 0:
	cla
	*clr
	sto_nom = nom_o[nomer]
	'- You shoot a room for one night.'
	'- It will cost <<sto_nom>>'

	act 'Pay':
		if sto_nom > money:
			msg 'Not enough money'
			srokarend = 0
			nomer = 0
			nom_1 = 0
			gt 'maria1'
		end

		cla
		money -= sto_nom
		flag = 1
		nom_1 = 0
		nom_nom = rand(1, 1000)
		'Thank you for using our services'
		'Your room <<nom_nom>>'

		act 'Goodbye':gt 'rack'
	end

	act 'Change Your Mind':
		nomer = 0
		nom_1 = 0
		gt 'maria1'
	end
end

if nom_1 = 0:
	act 'Move away':gt 'rack'
end

--- Maria1 ---------------------------------