Viewing paste CR32
made on Sun, 03 Nov 2013 00:25:53 -0400
Sane-itized version, click to copy:
&CARD.RENDER #3629=[setq(p,[u(CARD.PICTURE,[u(CARD.BY.NUMBER,%0)])])][setq(s,[picturesize(%qp)])][setq(w,[extract(%qs,1,1,%b)])][setq(2,[div(%qw,2)])][setq(m,[sub(8,%q2)])][null([if(fbexists(CARD),fbdestroy(CARD))][fbcreate(CARD,17,17)][fbwrite(CARD,0,0,SHOWPICTURE(DDCARD))][fbclip(CARD,1,1,15,15)][fbwrite(CARD,%qm,0,[SHOWPICTURE(%qp)])][fbclip(CARD,0,0,17,17)])]%rqs=%qs qm=%qm qw=%qw q2=%q2 qp=%qp picturesize(qp)=[picturesize(%qp)]

Enter a target attribute, object reference and the mushcode.


[setq(p,[u(CARD.PICTURE,[u(CARD.BY.NUMBER,%0)])])]
[setq(s,[picturesize(%qp)])]
[setq(w,[extract(%qs,1,1,%b)])]
[setq(2,[div(%qw,2)])]
[setq(m,[sub(8,%q2)])]
[null(
 [if(fbexists(CARD),fbdestroy(CARD))]
 [fbcreate(CARD,17,17)]
 [fbwrite(CARD,0,0,SHOWPICTURE(DDCARD))]
 [fbclip(CARD,1,1,15,15)]
 [fbwrite(CARD,%qm,0,[SHOWPICTURE(%qp)])]
 [fbclip(CARD,0,0,17,17)]
)]%rqs=%qs qm=%qm qw=%qw q2=%q2 qp=%qp picturesize(qp)=[picturesize(%qp)]

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