##push:runsub isitme;

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

##movethem:
var $dest to 34993;
msg $loc,$actor,0,0,'msg',"POOF!!!";
set $init_obj's loc to $dest;
clear $init_obj,all;
msg $loc,$actor,0,0,'force',"force:look $loc";

msg $dest,$actor,0,0,'msg',"All of [$init_obj]'s problems have been solved because they went to Staples!!! Hoooooooooooraaaaaaaaaaaaaaaaaaay!!!!!";
msg $dest,$actor,0,0,'force',"force:look $dest";