;;; sum_10.casl
-;;; 出力 GR0: 1から10までの整数をすべて加算した値
+;;; 1から10までの整数をすべて加算した値をメモリーに格納する
MAIN START
PUSH 0,GR1
- LAD GR0,0 ; GR0を初期化
- LD GR1,FST ; GR1に初項を転送
-LOOP ADDL GR0,GR1 ; ループ先頭
+ PUSH 0,GR2
+ XOR GR2,GR2 ; GR2を初期化
+ LD GR1,FST ; GR1に初項をメモリーから転送
+LOOP ADDL GR2,GR1 ; ループ先頭。GR2 <- GR2 + GR1
ADDL GR1,STEP ; GR1 <- GR1 + 公差
CPL GR1,LST ; GR1が末項より大きい場合は終了
JPL FIN ; ↓
JUMP LOOP ; ループ終端
-FIN POP GR1
+FIN ST GR2,RST ; GR2の結果をメモリーに転送
+ POP GR2
+ POP GR1
RET
FST DC 1 ; 初項
LST DC 10 ; 末項
STEP DC 1 ; 公差
+RST DS 1 ; 結果
END
Assemble ../../../../as/sample/sum_10.casl (0)
../../../../as/sample/sum_10.casl: 1:;;; sum_10.casl
-../../../../as/sample/sum_10.casl: 2:;;; 出力 GR0: 1から10までの整数をすべて加算した値
+../../../../as/sample/sum_10.casl: 2:;;; 1から10までの整数をすべて加算した値をメモリーに格納する
../../../../as/sample/sum_10.casl: 3:MAIN START
../../../../as/sample/sum_10.casl: 4: PUSH 0,GR1
-../../../../as/sample/sum_10.casl: 5: LAD GR0,0 ; GR0を初期化
-../../../../as/sample/sum_10.casl: 6: LD GR1,FST ; GR1に初項を転送
-../../../../as/sample/sum_10.casl: 7:LOOP ADDL GR0,GR1 ; ループ先頭
-../../../../as/sample/sum_10.casl: 8: ADDL GR1,STEP ; GR1 <- GR1 + 公差
-../../../../as/sample/sum_10.casl: 9: CPL GR1,LST ; GR1が末項より大きい場合は終了
-../../../../as/sample/sum_10.casl: 10: JPL FIN ; ↓
-../../../../as/sample/sum_10.casl: 11: JUMP LOOP ; ループ終端
-../../../../as/sample/sum_10.casl: 12:FIN POP GR1
-../../../../as/sample/sum_10.casl: 13: RET
-../../../../as/sample/sum_10.casl: 14:FST DC 1 ; 初項
-../../../../as/sample/sum_10.casl: 15:LST DC 10 ; 末項
-../../../../as/sample/sum_10.casl: 16:STEP DC 1 ; 公差
-../../../../as/sample/sum_10.casl: 17: END
+../../../../as/sample/sum_10.casl: 5: PUSH 0,GR2
+../../../../as/sample/sum_10.casl: 6: XOR GR2,GR2 ; GR2を初期化
+../../../../as/sample/sum_10.casl: 7: LD GR1,FST ; GR1に初項をメモリーから転送
+../../../../as/sample/sum_10.casl: 8:LOOP ADDL GR2,GR1 ; ループ先頭。GR2 <- GR2 + GR1
+../../../../as/sample/sum_10.casl: 9: ADDL GR1,STEP ; GR1 <- GR1 + 公差
+../../../../as/sample/sum_10.casl: 10: CPL GR1,LST ; GR1が末項より大きい場合は終了
+../../../../as/sample/sum_10.casl: 11: JPL FIN ; ↓
+../../../../as/sample/sum_10.casl: 12: JUMP LOOP ; ループ終端
+../../../../as/sample/sum_10.casl: 13:FIN ST GR2,RST ; GR2の結果をメモリーに転送
+../../../../as/sample/sum_10.casl: 14: POP GR2
+../../../../as/sample/sum_10.casl: 15: POP GR1
+../../../../as/sample/sum_10.casl: 16: RET
+../../../../as/sample/sum_10.casl: 17:FST DC 1 ; 初項
+../../../../as/sample/sum_10.casl: 18:LST DC 10 ; 末項
+../../../../as/sample/sum_10.casl: 19:STEP DC 1 ; 公差
+../../../../as/sample/sum_10.casl: 20:RST DS 1 ; 結果
+../../../../as/sample/sum_10.casl: 21: END
Label::::
MAIN ---> #0000
-MAIN.LOOP ---> #0006
-MAIN.FIN ---> #000F
-MAIN.FST ---> #0011
-MAIN.LST ---> #0012
-MAIN.STEP ---> #0013
+MAIN.LOOP ---> #0007
+MAIN.FIN ---> #0010
+MAIN.FST ---> #0015
+MAIN.LST ---> #0016
+MAIN.STEP ---> #0017
+MAIN.RST ---> #0018