Puppet Code

Allows posing of puppets and ooc comments to include characters such as ; (% still needs to be typed %% as usual.)

Where this appears	Replace with this
PUPPETNAME	Your puppet's name.
COMMAND	The command you want to use to control it. NOTE: Avoid ending the first one in o, or it will conflict with the ooc command.
#DBREF	The puppet's dbref. Just the number, preceded by the #. EG: Puppet(#1234p) would need #1234
Do not add spaces where there are none. For example, it is supposed to read PUPPETNAME[escape(%1)] without a space.

First, you must have an object that is set as a puppet, and not halted.

@set PUPPETNAME=puppet

@set PUPPETNAME=!halt

Then, you may set the following on yourself, to control it remotely:

&cmd_PUPPETNAME me=$.COMMAND ?*:@switch %0=\:,{@fo #DBREF=pose [escape(%1)]},\;,{@fo #DBREF=@emit PUPPETNAME[escape(%1)]},{@fo #DBREF=%0%1}

&CMD_PUPPETNAME_ooc me=$.COMMANDo *:@fo #DBREF=ooc [escape(%0)]

As an example, here's what Kinseth's commands look like:

&cmd_Kinseth me=$.k ?*:@switch %0=\:,{@fo #8530=pose [escape(%1)]},\;,{@fo #8530=@emit Kinseth[escape(%1)]},{@fo #8530=%0%1}

&cmd_Kinseth_ooc me=$.ko *:@fo #8530=ooc [escape(%0)]

I can then make Kinseth pose by typing: .k :poses or .k ;'s pose is here resulting in Kinseth poses or Kinseth's pose is here.

For ooc, if I type .ko :grins ;) it will result in <OOC> Kinseth grins ;).

X'hil