Viewing paste rendertp
made on Wed, 06 Mar 2013 00:23:26 -0500
Sane-itized version, click to copy:
&render here=[null([fbcreate(A,79,21)][fbwrite(A,0,0,[showpicture(TANDPBG)])][iter(u(players),[setq(t,[if(lte(#@,4),sit,stand)])][setq(i,[u(get%qt,##)])][setq(s,[u(item,1,u(%qi))])][setq(t,[u(item,2,u(%qi))])][setq(b,[showpicture(%qi)])][setq(1,[u(item2,#@,u(bodypos))])][setq(x,[sub(u(item,1,%q1),%qs)])][setq(y,[sub(u(item,2,%q1),%qt)])][fbwrite(A,%qx,%qy,%qb,,0)][setq(1,[u(item2,#@,u(facepos))])][setq(x,[sub(%qs,4)])][setq(y,[sub(%qt,4)])][fbwrite(A,%qx,%qy,[showpicture(##/ face)],0)])])][fbdump(A)][null([fbdestroy(A)])]

Enter a target attribute, object reference and the mushcode.


[null(
 [fbcreate(A,79,21)]
 [fbwrite(A,0,0,[showpicture(TANDPBG)])]
 [iter(u(players),
  [setq(t,[if(lte(#@,4),sit,stand)])]
  [setq(i,[u(get%qt,##)])]
  [setq(s,[u(item,1,u(%qi))])]
  [setq(t,[u(item,2,u(%qi))])]
  [setq(b,[showpicture(%qi)])]
  [setq(1,[u(item2,#@,u(bodypos))])]
  [setq(x,[sub(u(item,1,%q1),%qs)])]
  [setq(y,[sub(u(item,2,%q1),%qt)])]
  [fbwrite(A,%qx,%qy,%qb,,0)]
  [setq(1,[u(item2,#@,u(facepos))])]
  [setq(x,[sub(%qs,4)])]
  [setq(y,[sub(%qt,4)])]
  [fbwrite(A,%qx,%qy,[showpicture(##/ face)],0)]
 )]
)]
[fbdump(A)]
[null([fbdestroy(A)])]

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