PLIMM(P1E, 4); JMP(12); LB0(4);
PLIMM(P1E, 4); JMP(12); LB0(4); PLIMM(P1E, 5); JMP(12); LB0(5);
lbstk1(0, 2, 2); PLIMM(P1E, lbstk2(0, 0)); JMP(12); LB0(lbstk2(0, 0));
lbstk1(2); PLIMM(P1E, lbstk2()); JMP(12); LB0(lbstk2()); lbstk1(2); PLIMM(P1E, lbstk2()); JMP(12); LB0(lbstk2());
#define LOOPSTART(n) lbstk1(n); LB0(lbstk2()) #define CONTINUE lbstk2()
#define sum R00 #define i R01 #define const1 R30 #define const10001 R31 LIMM(const1, 1); LIMM(const10001, 10001); LIMM(i, 0); CP(sum, i); LOOPSTART(2); /* CONTINUEを使う回数+1を書く */ ADD2(sum, i); ADD2(i, const1); CMPJNE(i, const10001, CONTINUE);
#define GLOBALLABELS(n) lbstk0(n) #define LOCALLABELS(n) lbstk3(n) #define LOCAL(i) lbstk4(i)