Viewing paste roads
made on Thu, 31 Oct 2013 10:16:14 -0400
Sane-itized version, click to copy:
&CMD.ADMIN.ROADS here=$admin roads:@pemit %#={[fbcreate(F)][iter([lnum(0,5)],[iter([lnum(0,8)],[fbwrite(F,[mul(itext(1),8)],[mul(itext(0),5)],[setq(t,[add(itext(1),mul(itext(2),8))])][showpicture(DNDROAD%qt)]%b%qt%b[itext(1)] [inum(1)] [itext(2)] [inum(2)])])])][fbsave(F,SCRATCH)]%r[showpicture(SCRATCH)][fbdestroy(F)]}

Enter a target attribute, object reference and the mushcode.


$admin roads:@pemit %#={
[fbcreate(F)]
[iter([lnum(0,5)],
  [iter([lnum(0,8)],
    [fbwrite(F,
     [mul(itext(1),8)],
     [mul(itext(0),5)],
     [setq(t,[add(itext(1),mul(itext(2),8))])]
     [showpicture(DNDROAD%qt)]%b%qt%b
     [itext(1)] [inum(1)] [itext(2)] [inum(2)]
    )]
  )]
)]
[fbsave(F,SCRATCH)]
%r[showpicture(SCRATCH)]
[fbdestroy(F)]
}

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