if second of hit then healwielder;
##healwielder:
$maxh = $init_obj's healthmax;
$hlth = $init_obj's health;
if $hlth < $init_obj's healthmax then healthem;
##healthem:
add 1 to $hlth;
set $init_obj's health = $hlth;
print "[$init_obj] looks a little healthier";