COWbrowse

You are looking at a command called fix

fix {object} with {object}

Fix and object with another object.

eg: fix the bicycle with the spanner

Some objects will respond to being fixed (or being the fixing object)

Created by wolis, last updated 17 Mar 2008

Code

get $target,$rel,$second in $loc,$loc;
if $target > 0 then trysecond else fail1;
##trysecond:
if $second > 0 then continue else fail2;
##continue:
say 'fix',"[$actor] fixes[$target] with [$second]";
rem look $loc;
rem msg $loc,$actor,0,0,'force',"force:look $loc";

##fail1:
var $click_cmd to 'fix';
var $click_mid to 'on zzzzz';
var $desc_intro to 'Click on the object you want to fix something with:

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

##fail2:
var $click_cmd to "fix $target with ";
var $desc_intro to 'Click on the object you want to fix with it:

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