Viewing paste OROC1
made on Sun, 03 Nov 2013 21:05:00 -0500
Sane-itized version, click to copy:
&OROC #3629=[setq(a,1)][setq(x,[extract(u(encountering),%qa,1,%b)])][setq(b,[color(green,black,u(enemy.name,%qx))])][setq(p,[u(char.of,%0)])][setq(j,[u(char.name,%qp)])][setq(c,[u([name(%0)]_PICKED)])][if(comp(%qc,0),[setq(c,1)])][setq(n,[extract(u(hand.get),%qc,1,%b)])][setq(d,[u(%qp/DECK)])][setq(e,[match(%qd,%qn)])][set(%qp,DECK:[extract(%qd,1,[sub(%qe,1)],%b)]%b[extract(%qd,1,[add(%qe,1)],%b)]%b%qp)][set(i,[u(card.by.number,%qp)])][set(1,[extract(%qi,1,1,%b)])][set(2,[extract(%qi,2,1,%b)])][switch(%q1,C1,{[u(oroc.item,%0,%qv,%q2,%qj,%qa,%qb,#5337,%qx)]},C2,{[u(oroc.item,%0,%qv,%q2,%qj,%qa,%qb,#5449,%qx)]},M1,{[u(oroc.monster,%0,%q2,%qj,%qa,%qb,%qx)]},{ERROR})]

Enter a target attribute, object reference and the mushcode.


[setq(a,1)]
[setq(x,[extract(u(encountering),%qa,1,%b)])]
[setq(b,[color(green,black,u(enemy.name,%qx))])]
[setq(p,[u(char.of,%0)])]
[setq(j,[u(char.name,%qp)])]
[setq(c,[u([name(%0)]_PICKED)])]
[if(comp(%qc,0),[setq(c,1)])]
[setq(n,[extract(u(hand.get),%qc,1,%b)])]
[setq(d,[u(%qp/DECK)])]
[setq(e,[match(%qd,%qn)])]
[set(%qp,DECK:[extract(%qd,1,[sub(%qe,1)],%b)]%b[extract(%qd,1,[add(%qe,1)],%b)]%b%qp)]
[set(i,[u(card.by.number,%qp)])]
[set(1,[extract(%qi,1,1,%b)])]
[set(2,[extract(%qi,2,1,%b)])]
[switch(%q1,
 C1,{
  [u(oroc.item,%0,%qv,%q2,%qj,%qa,%qb,#5337,%qx)]
 },
 C2,{
  [u(oroc.item,%0,%qv,%q2,%qj,%qa,%qb,#5449,%qx)]
 },
 M1,{
  [u(oroc.monster,%0,%q2,%qj,%qa,%qb,%qx)]
 },
 {ERROR}
)]

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