COWbrowse

You are looking at a command called sit

site on|in|etc.. {object}

Causes you to site on or in or beside etc.. the the object eg:

sit on the sofa

Scripting info

This sends out the trigger word 'moves' as you are simply moving from one position to another.

if target of moves then saton

#saton:
print [$target] fees sat upon by [$init_obj]

Created by wolis, last updated 04 Jan 2012

Code

get $text,$target in $loc;
if $target > 0 then sitthere else checknoword;

##checknoword:
get $target in $loc;
if $target > 0 then sitthere else fail;

##sitthere:
clear $actor,all;
set $actor's host to $target;
set $actor's hosthow to "sitting $text";
say 'moves',"[$actor] sits $text [$target]";
relook $loc;

##fail:
print "[$actor] could not sit at this moment";