CASLファイルのフォルダを変更

[YACASL2.git] / as / FUNC / count1_call.casl

diff --git a/as/FUNC/count1_call.casl b/as/FUNC/count1_call.casl
deleted file mode 100644 (file)
index b9cd347..0000000
--- a/as/FUNC/count1_call.casl
+++ /dev/null
@@ -1,15 +0,0 @@
-;; count1.casl（「アセンブラ言語の仕様」プログラム例）を呼び出し、出力結果を表示
-;; 使い方: casl2 count1_call.casl count1.casl outa.casl
-MAIN    START
-        LAD     GR2,0
-LOOP    CPA     GR2,MAX         ; ループ開始。GR2がMAXの値になったらループ脱出
-        JZE     FIN             ; ↓
-        LD      GR1,GR2         ; GR1にVALの値をロード
-        CALL    COUNT1          ; COUNT1を呼び出す。出力はGR0に格納
-        LD      GR1,GR0         ; GR1にGR0の値をコピー
-        CALL    OUTA            ; OUTAを呼び出す
-        LAD     GR2,1,GR2       ; GR2 <= GR2 + 1
-        JUMP    LOOP            ; ループ終端
-FIN     RET
-MAX     DC      256
-        END