{$VERSION 3.1.1000}
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 
wait 100 
thread "REGENERATION" 

:REGENERATION_22
wait 10 
if 
   Player.Defined($PLAYER_CHAR)
jf @REGENERATION_22 

:REGENERATION_42
wait 1400 
if and
   not Actor.Dead($PLAYER_ACTOR)
   not wasted_or_busted 
jf @REGENERATION_42 
$REGENERATION = Actor.Health($PLAYER_ACTOR)
$REGENERATION += 1 
Actor.Health($PLAYER_ACTOR) = $REGENERATION
wait 1600 
jump @REGENERATION_42