##tickloc: runsub healit/10;
if second of hit then doit;

##healit:
print "[$actor] materializes some snow to repair itself";
$hlth = $actor's health;
$hlthm = $actor's healthmax;
if $hlth < $hlthm then repairit else end;

##repairit:
add 1 to $hlth;
set $actor's health to $hlth;

##doit:
print "[$init_obj] hurls [$actor] with startling speed!";
$hit1 to (slams,smashes,blasts);
print "[$actor] $hit1 into [$target]";
print "[$actor] reforms itself and returns to [$init_obj]'s hand";