if target of use then strengthenit;
if target of spin then castit;
if second of hit then dohit;

##strengthenit:
set $actor's healthmax to 75;
set $actor's manamax to 75;
set $actor's mana to $actor's manamax;
set $actor's health to $actor's healthmax;
print "[$actor] shines with an eerie glow...";

##castit:
call "cast fire at $target";

##dohit: runsub dodangle;

##dodangle:
$hlt = $init_obj's health;
if $hlt < $init_obj's healthmax then healthem;

##healthem:
add 1 to $hlt;
set $init_obj's health = $hlt;
print "A strange light from [$actor] shines onto [$init_obj]!";
print "[$init_obj] looks a little healthier";