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)