if second of hit then hitit;
if target of wield then flame;
if target of examines then glow;

##hitit:
$type = (thrusts,slashes,stabs,hacks at,pierces,rips,rends,wounds,impales);
$attack = (viscously,cruely,bruttaly,fiercely,wildly,wickedly);
$part = (head,arm,leg,shoulder,hand,foot);
$recoils = (recoils,flinches,yelps);
$smile = (smiles,grins,beams,smirks);
$pain = (pain,agony,anguish,misery);
print "[$init_obj] $attack $type [$target]'s $part with [$actor].";
print "[$init_obj] $smile as [$target] $recoils in $pain.";

##flame:
$spray = (sprays out,spurts out,erupts,surges out,bursts out,);
$fire = (flames,fire,magma,lava);
print "The hilt of the [$actor] unlatches and $spray $fire.";

##glow:
$shine = (glows,shines,glints);
$color = (crimson,red,maroon);
print "[$actor]'s blade $shine a bright $color";