# katalkinAlko
gs 'stat'

if hour < 8:
	'The police finally drunk and fell to sleep where someone.'

	act 'Leave':minut += 1 & gt 'vokzalGin'

	exit
end

if alko < 6:
	'You drank a glass of vodka with police. You will again pour into a glass of vodka.'

	act 'drink a glass':alko += 2 & minut += 30 & gt $curloc
end

if alko >= 6:'You definitely tipsy and just sit on a chair.'
!!if katGangbang = 0:end

if katGangbang > 0:
	!!if katGangbangDay = daystart:end
	!!if katGangbangDay < daystart:end
end

act 'Leave':minut += 2 & gt 'vokzalGin'

--- katalkinAlko ---------------------------------