X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fmisc%2Fsum_10_2.casl;fp=as%2Fmisc%2Fsum_10_2.casl;h=0000000000000000000000000000000000000000;hp=640513862a843917cd1cbb405bb1e7f6b6eec5d1;hb=9fa44bbf51f40b1d5846696dc13a4950508e448c;hpb=eab172e17b436c4d80d220d42eff9d02360622ba

diff --git a/as/misc/sum_10_2.casl b/as/misc/sum_10_2.casl
deleted file mode 100644
index 6405138..0000000
--- a/as/misc/sum_10_2.casl
+++ /dev/null
@@ -1,26 +0,0 @@
-;;; sum_10.casl
-;;; 出力 GR0: 1から10までの整数をすべて加算した値
-;;; 依存プログラム: mull1.casl divl1.casl
-MAIN    START
-        PUSH    0,GR1
-        PUSH    0,GR2
-        LD      GR1,FST         ; GR1 <- (初項 + 末項)
-        ADDL    GR1,LST         ; ↓
-        PUSH    0,GR1           ; GR1を退避
-        LD      GR1,LST         ; GR1 <- (末項 - 初項)
-        SUBL    GR1,FST         ; ↓
-        LD      GR2,GR1         ; ↓
-        LD      GR2,STEP        ; GR2 <- STEP
-        CALL    DIVL            ; GR0 <- GR1 / GR2
-        LD      GR2,GR0         ; GR2 <- GR0
-        LAD     GR2,1,GR2       ; GR2 <- GR2 + 1
-        SRL     GR2,1           ; GR2 <- GR2 / 2
-        POP     GR1             ; GR1を復元
-        CALL    MULL            ; GR0 <- GR1 * GR2
-        POP     GR2
-        POP     GR1
-        RET
-FST     DC      1               ; 初項
-LST     DC      10              ; 末項
-STEP    DC      1               ; 公差
-        END