Viewing paste charmb2
made on Tue, 02 Jul 2013 00:26:50 -0400
Sane-itized version, click to copy:
& =teach@areceive #6014=@ifelse [u(is,u(powner),%1)]={@ifelse [u(inlist,%0,u(CHARMLIST))]={@ifelse[setq(t,0)][null([iter([u(points)],[ifelse(gt(strlen(u(ATTACHED_#@)),0),[setq(t,[add(%qt,1)])],[setq(e,#@)])],[c(124)],)])][lt(%qt,0)]={},{The bracelet is already full of charms.}},{@pemit %#={You cannot attach that to the charm bracelet.}}},{@pemit %#={You cannot mess with [name(u(powner))]'s charm bracelet.}}

Enter a target attribute, object reference and the mushcode.


teach
@areceive #6014=
 @ifelse [u(is,u(powner),%1)]={
   @ifelse [u(inlist,%0,u(CHARMLIST))]={
    @ifelse
    [setq(t,0)]
    [null(
     [iter([u(points)],
      [ifelse(gt(strlen(u(ATTACHED_#@)),0),
       [setq(t,[add(%qt,1)])],
       [setq(e,#@)]
      )],
      [c(124)],
     )]
    )]
    [lt(%qt,0)]={
     
    },
    {The bracelet is already full of charms.}
   },
   {
    @pemit %#={You cannot attach that to the charm bracelet.}
   }
  },
  {
   @pemit %#={You cannot mess with [name(u(powner))]'s charm bracelet.}
  }

save as: imprettify (attempt to format for readibility):
Found this useful? Try MUSHcode Repeater
written by orcs.biz