Begin argonia
Short utro
Short den
Short vecher
Short noch
	if ( GameHour >= 7)
		if ( GameHour <= 9)
			if (utro == 0 )
				positionCell x y z 90 "SeydaNeen"
				set utro to 1
				set den to 0
				set vecher to 0
				set noch to 0
			endif
else
if ( GameHour >= 9)
		if ( GameHour <= 20)
			if (den == 0 )
				positionCell x y z 90 "SeydaNeen"
				set utro to 0
				set den to 1
				set vecher to 0
				set noch to 0
			endif
else
	if ( GameHour >= 20)
		if ( GameHour <= 22)
			if (vecher == 0 )
				positionCell x y z 90 "SeydaNeen"
				set utro to 0
				set den to 0
				set vecher to 1
				set noch to 0
			endif
else
	if ( GameHour >= 22)
		if ( GameHour <= 7)
			if (noch == 0 )
				positionCell x y z 90 "SeydaNeen"
				set utro to 0
				set den to 0
				set vecher to 0
				set noch to 1
			endif
		endif
endif
End argonia