Viewing paste MR
made on Fri, 01 Nov 2013 16:24:25 -0400
Sane-itized version, click to copy:
&MAP.RENDER #3629= [setq(p,%0)][setq(q,%1)][setq(u,%2)][setq(v,%3)][setq(3,[div(%qu,2)])][setq(4,[div(%qv,2)])][setq(7,[mul(%qu,6)])][setq(8,[mul(%qv,4)])][setq(9,[sub(%qp,%q3)])][setq(0,[sub(%qq,%q4)])][setq(5,0)][null([if([fbexists(MAPVIEW)],[fbdestroy(MAPVIEW)])][fbcreate(MAPVIEW,%q7,%q8)][fbwrite(MAPVIEW,0,0,[color(255,255,[repeat([repeat(0,%q7)]%r,%q8)])])])][iter([lnum(%q9,[add(%q9,%qu)])],[setq(6,0)][iter([lnum(%q0,[add(%q0,%qv)])],[setq(t,[u(map.tile,[itext(1)],[itext(0)],0)])][setq(j,[showpicture([u(TOWN.TILE,[itext(1)],[itext(0)])])])][setq(k,[showpicture([u(ROAD.TILE,[itext(1)],[itext(0)])])])][setq(z,[baseconv(%qt,16,10)])][setq(w,DNDT%qz)][null([fbwrite(MAPVIEW,%q5,%q6,[showpicture(%qw)])][fbwrite(MAPVIEW,%q5,%q6,%qk,,255)][fbwrite(MAPVIEW,%q5,%q6,%qj,,255)])][setq(6,[add(%q6,4)])],%b,)][setq(5,[add(%q5,6)])],%b,)]

Enter a target attribute, object reference and the mushcode.


 [setq(p,%0)]
 [setq(q,%1)]
 [setq(u,%2)]
 [setq(v,%3)]
 [setq(3,[div(%qu,2)])]
 [setq(4,[div(%qv,2)])]
 [setq(7,[mul(%qu,6)])]
 [setq(8,[mul(%qv,4)])]
 [setq(9,[sub(%qp,%q3)])]
 [setq(0,[sub(%qq,%q4)])]
 [setq(5,0)]
 [null(
  [if([fbexists(MAPVIEW)],[fbdestroy(MAPVIEW)])]
  [fbcreate(MAPVIEW,%q7,%q8)]
  [fbwrite(MAPVIEW,0,0,[color(255,255,[repeat([repeat(0,%q7)]%r,%q8)])])]
 )]
 [iter([lnum(%q9,[add(%q9,%qu)])],
  [setq(6,0)]
  [iter([lnum(%q0,[add(%q0,%qv)])],
   [setq(t,[u(map.tile,[itext(1)],[itext(0)],0)])]
   [setq(j,[showpicture([u(TOWN.TILE,[itext(1)],[itext(0)])])])]
   [setq(k,[showpicture([u(ROAD.TILE,[itext(1)],[itext(0)])])])]
   [setq(z,[baseconv(%qt,16,10)])]
   [setq(w,DNDT%qz)]
   [null([fbwrite(MAPVIEW,%q5,%q6,
    [showpicture(%qw)])]
    [fbwrite(MAPVIEW,%q5,%q6,%qk,,255)]
    [fbwrite(MAPVIEW,%q5,%q6,%qj,,255)]
   )]
   [setq(6,[add(%q6,4)])],%b,)]
   [setq(5,[add(%q5,6)])],%b,)]

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