アセンブラファイルとテストの整理

[YACASL2.git] / as / CMD / literalstr.casl

diff --git a/as/CMD/literalstr.casl b/as/CMD/literalstr.casl
new file mode 100644 (file)
index 0000000..bd1bbcc
--- /dev/null
+++ b/as/CMD/literalstr.casl
@@ -0,0 +1,13 @@
+MAIN START
+       LAD     GR1,='abcdeABCDE'
+    LAD GR2,10
+LOOP CPA GR2,=0
+    JZE LEND
+    JMI LEND
+    LD GR3,0,GR1
+    ADDA GR1,=1
+    SUBA GR2,=1
+    JUMP LOOP
+LEND RET
+LEN DC 5
+    END