##use:runsub isitme;

##isitme:
if $actor eq $target then talktoit;

##talktoit:
say 'sound',"[$actor] says 'Hey how are you doing?'";

say 'sound',"[$actor] waves and jumpes up and down in excitement of seeing [$init_obj]";