@create Worn Doll=10
@lock Worn Doll=*Zoe
&C.CHANGE Worn Doll=$+change:@trigger/now me/personality_[get(me/active)]
&ACTIVE Worn Doll=Zoe
&PERSONALITY_REBEKAH Worn Doll=@pemit #3025=[ansi(hg,MPD:)] Zoe is becoming the dominate personality.;&active me=Zoe;@alias #3025=Temp;@wait .1=@name #3025=Zoe;@wait .3=@alias #3025=Rebekah;@wait .5=@pemit #3025=[ansi(hg,MPD:)] Zoe has become the dominate personality.;@wait .5=@oemit #3025=[ansi(hg,MPD:)] Zoe has become Rebekah's dominate personality.
&PERSONALITY_ZOE Worn Doll=@pemit #3025=[ansi(hg,MPD:)] Rebekah is becoming the dominate personality.;&active me=Rebekah;@alias #3025=Temp;@wait .1=@name #3025=Rebekah;@wait .3=@alias #3025=Zoe;@wait .5=@pemit #3025=[ansi(hg,MPD:)] Rebekah has become the dominate personality.;@wait .5=@oemit #3025=[ansi(hg,MPD:)] Rebekah has become Zoe's dominate personality.
@Desc Worn Doll=%r%tThe small doll is created completely from fabric. It stands around two feet tall and has dark black twine for hair that goes down to its shoulders. It has two black beads for eyes and a sewn on mouth shaped in a smile. It is decorated to be wearing a black dress with black and white striped socks coming underneath it. On it's feet are two little black Mary Jane shoes.%r
&C.FINGER Worn Doll=$+finger me:@fo #3025=+finger #3025
&C.SHEET Worn Doll=$+sheet:@fo #3025=sheet
&C.NICKNAME-ADD Worn Doll=$+nick/add *=*:&nickname_%0 #3032=[capstr(%1)];@pemit %#=[ansi(hg,Malkie:)] You have given [name(*%0)] the nickname of [capstr(%1)].;@pemit [num(*%0)]=[ansi(hg,Malkie:)] [name(#3025)] has given you the nickname of [capstr(%1)]. Aww.. like a new pet. ^.^
&C.NICKNAME-VIEW Worn Doll=$+nick/view *:@pemit %#=[ansi(hg,Malkie:)] The nickname you gave [name(*%0)] is [get(#3032/nickname_%0)].
&C.COMMANDS Worn Doll=$+commands:@pemit %#=%r[ansi(hc,[repeat(=,78)])]%r[center([ansi(hw,[name(#3025)] Commands)],78)]%r[ansi(hc,[repeat(-,78)])]%r%r[space(2)]These are the commands that have been coded for [name(#3025)]. Each has their own help files which you can access with +command <name>.%r%r[space(2)]change[space(10)]commands[space(10)]nickname%r%r[ansi(hc,[repeat(=,78)])]
&C.COMMANDS2 Worn Doll=$+command *:@pemit %#=[ansi(hc,[repeat(=,78)])]%r[center([ansi(hw,[capstr(%0)] Help)],78)]%r[ansi(hc,[repeat(-,78)])]%r%r[u(#3033/help_%0)]%r%r[ansi(hc,[repeat(=,78)])]
@set Worn Doll=WIZARD
@set Worn Doll=ROYALTY
@set Worn Doll=COMMANDS
@create Collar=10
@Desc Collar=%r%tA red velvet collar that is an inch and a half wide that fits snugly around [name(#3025)]'s neck. She also has matching bands on both of her wrists.%r
&NICKNAME_SARAH Collar=Evil Doctor
@set Collar=OPAQUE
@create Help Database=10
&HELP_CHANGE Help Database=[space(2)]SYNTAX: +change%r%r[space(2)]This command will change the dominate personality for [name(#3025)]. It automatically changes the name and the alias for the character, switching them both out.
&HELP_COMMANDS Help Database=[space(2)]SYNTAX: +commands%r[space(10)]+command <name>%r%r[space(2)]The first command lists the commands that has been coded for [name(#3025)] by her player. These commands are placed on #3026 and the help files for them are%r[space(2)]on #3033.%r%r[space(2)]The second command will show the detailed help file for the command and a%r[space(2)]list of the commands that can be used for it as well as a description of%r[space(2)]what the commands do.
&HELP_NICKNAME Help Database=[space(2)]SYNTAX: +nick/add <name>=<nick>%r[space(10)]+nick/view <name>%r%r[space(2)]The first command will add a nickname for the person specified. This is usually done when [name(#3025)] meets a new person for the first time and picks one based on their occupation, personality or whatever else strikes her fancy.%r%r[space(2)]The second command will bring up the nickname that was given for the person specified. If no name was given, the nickname will be empty as one has not been given to that person yet.
