COWbrowse

You are looking at a command called push

push {object}

Push an object in your current location off what it was put on (or undr or behind etc..)
eg:
create a small cat
create a gigantic elehant
put the cat on the elephant
pose it as riding

If you dont want the car riding that elephant any more just push the cat - you may hear a gentle thud as a result.

Notice that the cat is no longer on the elephant and has also lost its pose.

Scripting notes
Sample reaction:


if target of push then iwaspushed;
##iwaspushed:
print "[$actor] noticed that [$init_obj] pushed it";

Created by wolis, last updated 06 Oct 2014

Code

get $target in $loc;
if $target > 0 then unhostit else fail;
##unhostit:
clear $target,all;
say 'push',"[$actor] pushes [$target]";
relook $loc;
rem look $loc;
rem msg $loc,$actor,0,0,'force',"force:look $loc";

runsub noisy/3;
##noisy:
msg 0,$actor,0,0,"act","You hear a gentle thud";
##fail:
var $click_cmd to 'push';
var $desc_intro to 'Click on the object you want to push:

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