From: j8takagi Date: Sat, 23 Jan 2021 00:12:15 +0000 (+0900) Subject: サンプルのsum_10.caslをシンプルに X-Git-Tag: v0.5p16~3 X-Git-Url: https://j8takagi.net/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e98877aa88940518a0b9b823d4e9efd4e6db8523;p=YACASL2.git サンプルのsum_10.caslをシンプルに --- diff --git a/as/sample/sum_10.casl b/as/sample/sum_10.casl index cc88df1..a7b9211 100644 --- a/as/sample/sum_10.casl +++ b/as/sample/sum_10.casl @@ -1,8 +1,6 @@ ;;; sum_10.casl ;;; 1から10までの整数をすべて加算した値をメモリーに格納する MAIN START - PUSH 0,GR1 - PUSH 0,GR2 XOR GR2,GR2 ; GR2を初期化 LD GR1,FST ; GR1に初項をメモリーから転送 LOOP ADDL GR2,GR1 ; ループ先頭。GR2 <- GR2 + GR1 @@ -11,8 +9,6 @@ LOOP ADDL GR2,GR1 ; ループ先頭。GR2 <- GR2 + GR1 JPL FIN ; ↓ JUMP LOOP ; ループ終端 FIN ST GR2,RST ; GR2の結果をメモリーに転送 - POP GR2 - POP GR1 RET FST DC 1 ; 初項 LST DC 10 ; 末é