get $target in 105016;
if $target > 0 then getit else fail;

##getit:
set $target's loc = $actor's loc;
clear $target,all;
refresh $target;
msg $loc,$actor,0,0,'force',"force:look $loc";
say 'grab',"[$actor] reaches into [105016] and pulls out [$target]";

##fail:
var $click_cmd to 'grab';
var $desc_intro to 'Click on the object you want to grab:

';
look 105016,list;
msg $loc,$actor,$actor,0,'force',"force:look 105016,list";