if second of hit then dohit;

##dohit: runsub howhurt;

##howhurt:
var $one to (flashes, swings, spins, twirls, stabs, thrusts, slashes);
var $two to (quickly, steadily, forcefully, rapidly);
print "[$init_obj] $one [$actor] $two at [$target]";