##use:runsub isitme;
##isitme:
if $actor eq $target then comm else end;

##comm:
set $actor's output to 20297;
var $outobj to $actor's output;
var $outloc to $outobj's loc;
var $chop to 18982;
msg $outloc,$actor,0,0,'msg',"You can hear some cracks coming from [$outobj]...";
msg $outloc,$actor,0,0,'msg',"...[$init_obj] tries to make contact...";
msg $outloc,$actor,0,0,'msg',"- [$chop], this is [$init_obj]calling from [$loc], do you read?";
say 'msg',"[$init_obj] contacts [$chop] through the [$actor].";