if second of hit then momana;

##momana:
$mm = $actor's host's mana;
add 1 to $mm;
quickset $actor's host = "mana=$mm";
print "mm = $mm";