- LD GR1,GR3 ; GR1にGR3をコピー
- LD GR1,NCHAR,GR1 ; GR1を文字に変換
- ST GR1,0,GR4 ; (GR4) <- GR1
- LAD GR4,1,GR4 ; GR4 <- GR4 + 1
- LD GR1,GR0 ; GR0をGR1にコピー
- JUMP STI ; ループ終端
-STLST POP GR2
- LD GR1,NCHAR,GR1 ; GR1を文字に変換
- ST GR1,0,GR4 ; (GR4) <- GR1
+ ADDL GR3,='0' ; GR3を文字に変換
+ ST GR3,0,GR4 ; GR4のアドレスに、GR3を格納