if second of hit then hurt;

##hurt:
print "[$actor] turns crimson for a moment, then it passes";

##tickloc:
runsub whattodo;

##whattodo:
runsub checkonme;

##checkonme:
if $actor's health < $actor's healthmax then repairme else end;

##repairme:
set $actor's health to $actor's healthmax;
print "[$actor] suddenly looks repaired";