##use:runsub isitme;

##isitme: if $actor eq $target then itsme else end;

##itsme:
var $vol to (loudly,quietly,softly,gently,beguilingly,mournfully);
load $actor's songlist;
var $how to (quite well, beautifully,slightly off key,with ease);
say 'msg',"[$init_obj] $vol plays $randomitem $how on [$actor]";