[Nex]

Жми "Пробел".

Graphics 320,240,32,2

health# = 100

While Not KeyDown (1)
Cls ()
	If KeyDown (57) Then health = health -0.1
		If health <=0 Then
			Text 0,0,"Вы умерли"
			Delay 1000
			End 
		Else
			Text 0,0,health
		EndIf 
Flip
Wend
End