COWbrowse

You are looking at a command called copy

copy {object}

Makes a copy of an existing object.

Unlike find: [more] or find: [less] it makes a seperate objects with the exact same name as the first.

eg:
create a cupcake. paint it as pink
copy the cupcake

read the command called more
read the command called less

scripting notes
Sends the trigger word 'copy'


if reacting to copy then someonecopied;

##someonecopied:
print "Hay you.. stop copying things";

Created by wolis, last updated 04 Jan 2012

Code

get $target in $loc;
if $target > 0 then chklock else fail;

##chklock:
if $pw like $target's pwd then copyit else itslocked;

##copyit:
copy $target;
say 'copy',"[$actor] copies [$target]";
msg $loc,$actor,0,0,'force',"force:look $loc";

##fail:
if $counter > 0 then end else listall;
##listall:
var $click_cmd to 'copy';
var $desc_intro to "Click on the object you want to $click_cmd:
";
msg $loc,$actor,$actor,0,'force',"force:look $loc,list";