##tickloc:
runsub healit;

##healit:
if $actor's health < $actor's healthmax then doit else end;

##doit:
set $actor's health to $actor's healthmax;