##tickloc:runsub ticked;

##ticked:
runsub checkhost/10;

##checkhost:
$host = $actor's host;
if $host > 0 then ch2;

##ch2:
if $host's material like living then ch3;

##ch3:
$m = $host's mana;
if $m < $host's manamax then gain1;

##gain1:
add 1 to $m;
set $host's mana to $m;
$verb = (glows,brightens,sparkles,flashes);
say 'msg',"[$host]'s [$actor] $verb for a moment, then fades.";