##push:runsub isitme;
##talk:runsub isitme2;
##arrives:runsub hi;

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

##ups:
say 'msg',"[$actor] says 'I hope that this was an accident...'";

##hi:
var $how to (swiftly,casually,slowly,,nimbly,enthusiastically);
var $greet to (Greetings.,Good day.,Bonjour.,);
say 'xmoves',"[$actor] walks $how towards [$init_obj] and says '$greet Welcome to the main hall of the Xianus' Palace. Here you can usually find him when he is offline.";

##isitme2:
if $actor eq $target then find else end;

##find:

var $dest to 15760;
var $dloc to $dest's loc;

say 'msg',"[$actor] says '[$dest] is currently in [$dloc].'";
say 'msg',"[$actor] says ' It was a pleasure for me to help you.'";