Viewing paste CR3
made on Sat, 02 Nov 2013 17:52:48 -0400
Sane-itized version, click to copy:
&CARD.RENDER #3629=[setq(p,[u(CARD.PICTURE,[u(CARD.BY.NUMBER,%0)])])][setq(s,[strlen(showpicture(%qp,1))])][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)] [lit(strlen(showpicture(%qp,1)))]=[strlen(showpicture(%qp,1))]

Enter a target attribute, object reference and the mushcode.


[setq(p,[u(CARD.PICTURE,[u(CARD.BY.NUMBER,%0)])])]
[setq(s,[strlen(showpicture(%qp,1))])]
[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)] [lit(strlen(showpicture(%qp,1)))]=[strlen(showpicture(%qp,1))]

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