Viewing paste noob421
made on Tue, 25 Jun 2013 20:18:53 -0400
Sane-itized version, click to copy:
&noob421 #4965=[color(white,black,Decide)] your homeland by typing '[color(orange,black,choose [c(60)]homeland[c(62)])]':%r%r[null([setq(x,0)][setq(y,0)][fbcreate(fb,79,15)][fbwrite(fb,0,0,[color(38,38,[repeat([repeat(%b,79)]%r,40)])])][iter(u(countries),[if(eq(#@,2),[fbwrite(fb,%qx,0,[color(30,30,[repeat([repeat(%b,16)]%r,15)])])])][if(eq(#@,3),[fbwrite(fb,%qx,0,[color(197,197,[repeat([repeat(%b,16)]%r,15)])])])][if(eq(#@,4),[fbwrite(fb,%qx,0,[color(214,214,[repeat([repeat(%b,16)]%r,15)])])])][if(eq(#@,5),[fbwrite(fb,%qx,0,[color(232,232,[repeat([repeat(%b,16)]%r,15)])])])][fbwrite(fb,[sub(%qx,1)],0,[color(0,0,[repeat({%b%r},40)])])][fbwrite(fb,%qx,%qy,[color(orange,black,[center(##,16,%b)])]%r[showpicture(DNDL#@)],,255)][setq(x,add(%qx,16))][if(gt(%qx,65),[setq(x,0)][setq(y,add(%qy,16))])] %qx:%qy,%b,%b)])][fbdump(fb,0,0,79,15)][null([fbdestroy(fb)])]

Enter a target attribute, object reference and the mushcode.


[color(white,black,Decide)] your homeland by typing '[color(orange,black,choose [c(60)]homeland[c(62)])]':%r%r
[null(
 [setq(x,0)][setq(y,0)]
 [fbcreate(fb,79,15)]
 [fbwrite(fb,0,0,[color(38,38,[repeat([repeat(%b,79)]%r,40)])])]
 [iter(u(countries),
 [if(eq(#@,2),[fbwrite(fb,%qx,0,[color(30,30,[repeat([repeat(%b,16)]%r,15)])])])]
 [if(eq(#@,3),[fbwrite(fb,%qx,0,[color(197,197,[repeat([repeat(%b,16)]%r,15)])])])]
 [if(eq(#@,4),[fbwrite(fb,%qx,0,[color(214,214,[repeat([repeat(%b,16)]%r,15)])])])]
 [if(eq(#@,5),[fbwrite(fb,%qx,0,[color(232,232,[repeat([repeat(%b,16)]%r,15)])])])]
 [fbwrite(fb,[sub(%qx,1)],0,[color(0,0,[repeat({%b%r},40)])])]
 [fbwrite(fb,%qx,%qy,[color(orange,black,[center(##,16,%b)])]%r[showpicture(DNDL#@)],,255)]
 [setq(x,add(%qx,16))][if(gt(%qx,65),[setq(x,0)][setq(y,add(%qy,16))])] %qx:%qy,%b,%b)])]
[fbdump(fb,0,0,79,15)]
[null([fbdestroy(fb)])]

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