X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fmisc%2Fsum_10.casl;fp=as%2Fmisc%2Fsum_10.casl;h=0000000000000000000000000000000000000000;hp=d691a105a267f13e5896327cdb32efda47c5acba;hb=05965ee87822b44616998d347d8f91fbf550eb2e;hpb=e53b9aa2cd0e67ff64c52fa1b83e16c048283dbd diff --git a/as/misc/sum_10.casl b/as/misc/sum_10.casl deleted file mode 100644 index d691a10..0000000 --- a/as/misc/sum_10.casl +++ /dev/null @@ -1,17 +0,0 @@ -;;; sum_10.casl -;;; 出力 GR0: 1から10までの整数をすべて加算した値 -MAIN START - PUSH 0,GR1 - LAD GR0,0 ; GR0を初期化 - LD GR1,FST ; GR1に初項を転送 -LOOP ADDL GR0,GR1 ; ループ先頭 - ADDL GR1,STEP ; GR1 <- GR1 + 公差 - CPL GR1,LST ; GR1が末項より大きい場合は終了 - JPL FIN ; ↓ - JUMP LOOP ; ループ終端 -FIN POP GR1 - RET -FST DC 1 ; 初項 -LST DC 10 ; 末項 -STEP DC 1 ; 公差 - END