コマンドテストCASLファイルの追加

diff --git a/as/cmd/DC/dc_i0.casl b/as/cmd/DC/dc_i0.casl
index 3a949e7..cf8f20c 100644 (file)
--- a/as/cmd/DC/dc_i0.casl
+++ b/as/cmd/DC/dc_i0.casl
@@ -1,4 +1,4 @@
-;; DC命令で、-32768〜32768の範囲にない10進数値を指定
+;; DC 10進定数／16進定数
 MAIN    START
         RET
         DC      0

diff --git a/as/cmd/DC/dc_i1.casl b/as/cmd/DC/dc_i1.casl
index ebe8569..c9352bd 100644 (file)
--- a/as/cmd/DC/dc_i1.casl
+++ b/as/cmd/DC/dc_i1.casl
@@ -1,5 +1,5 @@
-;; DC命令で、-32768〜32768の範囲にない10進数値を指定
+;; DC 10進定数／16進定数
 MAIN    START
         RET
-        DC      1, 10, 32767, 32768, 65535, 65536, 65537,-1, -10, -32767, -32768, -32769, #0, #1, #01, #001, #0001, #10, #11,#F, #000F, #FFFF
+        DC      1,10,32767,32768,65535,65536,65537,-1,-10,-32767,-32768,-32769,#0,#1,#01,#001,#0001,#10,#11,#F,#000F,#FFFF
         END

diff --git a/as/cmd/DC/dc_i_of.casl b/as/cmd/DC/dc_i_of.casl
new file mode 100644 (file)
index 0000000..0b36f5a
--- /dev/null
+++ b/as/cmd/DC/dc_i_of.casl
@@ -0,0 +1,14 @@
+;; DC -32768〜32768の範囲にない10進数値
+MAIN    START
+        RET
+        DC      32767
+        DC      32768
+        DC      65535
+        DC      65536
+        DC      131073          ; 65536 * 2 + 1
+        DC      -32768
+        DC      -32769
+        DC      -65535
+        DC      -65536
+        DC      -131073         ; -65536 * 2 - 1
+        END

diff --git a/as/cmd/DS/ds.casl b/as/cmd/DS/ds.casl
new file mode 100644 (file)
index 0000000..39ea1e9
--- /dev/null
+++ b/as/cmd/DS/ds.casl
@@ -0,0 +1,14 @@
+;;; DS
+MAIN    START
+        LAD     GR1,A
+        LAD     GR1,B
+        LAD     GR1,C
+        LAD     GR1,D
+        LAD     GR1,E
+        RET
+A       DS      1
+B       DS      2
+C       DS      4
+D       DS      0
+E       DC      #FFFF
+        END

diff --git a/as/cmd/JMI/jmi_m.casl b/as/cmd/JMI/jmi_m.casl
new file mode 100644 (file)
index 0000000..0dc7216
--- /dev/null
+++ b/as/cmd/JMI/jmi_m.casl
@@ -0,0 +1,11 @@
+;;; JMI OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JMI     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JMI/jmi_ov.casl b/as/cmd/JMI/jmi_ov.casl
new file mode 100644 (file)
index 0000000..4541927
--- /dev/null
+++ b/as/cmd/JMI/jmi_ov.casl
@@ -0,0 +1,11 @@
+;;; JMI OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JMI     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JMI/jmi_p.casl b/as/cmd/JMI/jmi_p.casl
new file mode 100644 (file)
index 0000000..ecf7fef
--- /dev/null
+++ b/as/cmd/JMI/jmi_p.casl
@@ -0,0 +1,11 @@
+;;; JMI OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JMI     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JMI/jmi_z.casl b/as/cmd/JMI/jmi_z.casl
new file mode 100644 (file)
index 0000000..5f98af9
--- /dev/null
+++ b/as/cmd/JMI/jmi_z.casl
@@ -0,0 +1,11 @@
+;;; JMI OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JMI     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/JNZ/jnz_m.casl b/as/cmd/JNZ/jnz_m.casl
new file mode 100644 (file)
index 0000000..e88d234
--- /dev/null
+++ b/as/cmd/JNZ/jnz_m.casl
@@ -0,0 +1,11 @@
+;;; JNZ OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JNZ     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JNZ/jnz_ov.casl b/as/cmd/JNZ/jnz_ov.casl
new file mode 100644 (file)
index 0000000..559fb3f
--- /dev/null
+++ b/as/cmd/JNZ/jnz_ov.casl
@@ -0,0 +1,11 @@
+;;; JNZ OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JNZ     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JNZ/jnz_p.casl b/as/cmd/JNZ/jnz_p.casl
new file mode 100644 (file)
index 0000000..7a03678
--- /dev/null
+++ b/as/cmd/JNZ/jnz_p.casl
@@ -0,0 +1,11 @@
+;;; JNZ OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JNZ     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JNZ/jnz_z.casl b/as/cmd/JNZ/jnz_z.casl
new file mode 100644 (file)
index 0000000..89bd1a3
--- /dev/null
+++ b/as/cmd/JNZ/jnz_z.casl
@@ -0,0 +1,11 @@
+;;; JNZ OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JNZ     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/JOV/jov_m.casl b/as/cmd/JOV/jov_m.casl
new file mode 100644 (file)
index 0000000..14a39ab
--- /dev/null
+++ b/as/cmd/JOV/jov_m.casl
@@ -0,0 +1,11 @@
+;;; JOV OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JOV     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JOV/jov_ov.casl b/as/cmd/JOV/jov_ov.casl
new file mode 100644 (file)
index 0000000..b477f09
--- /dev/null
+++ b/as/cmd/JOV/jov_ov.casl
@@ -0,0 +1,11 @@
+;;; JOV OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JOV     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JOV/jov_p.casl b/as/cmd/JOV/jov_p.casl
new file mode 100644 (file)
index 0000000..7401ccf
--- /dev/null
+++ b/as/cmd/JOV/jov_p.casl
@@ -0,0 +1,11 @@
+;;; JOV OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JOV     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JOV/jov_z.casl b/as/cmd/JOV/jov_z.casl
new file mode 100644 (file)
index 0000000..fb72464
--- /dev/null
+++ b/as/cmd/JOV/jov_z.casl
@@ -0,0 +1,11 @@
+;;; JOV OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JOV     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/JPL/jpl_m.casl b/as/cmd/JPL/jpl_m.casl
new file mode 100644 (file)
index 0000000..9e0c157
--- /dev/null
+++ b/as/cmd/JPL/jpl_m.casl
@@ -0,0 +1,11 @@
+;;; JPL OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JPL     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JPL/jpl_ov.casl b/as/cmd/JPL/jpl_ov.casl
new file mode 100644 (file)
index 0000000..58729f6
--- /dev/null
+++ b/as/cmd/JPL/jpl_ov.casl
@@ -0,0 +1,11 @@
+;;; JPL OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JPL     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JPL/jpl_p.casl b/as/cmd/JPL/jpl_p.casl
new file mode 100644 (file)
index 0000000..09c8964
--- /dev/null
+++ b/as/cmd/JPL/jpl_p.casl
@@ -0,0 +1,11 @@
+;;; JPL OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JPL     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JPL/jpl_z.casl b/as/cmd/JPL/jpl_z.casl
new file mode 100644 (file)
index 0000000..5717e2a
--- /dev/null
+++ b/as/cmd/JPL/jpl_z.casl
@@ -0,0 +1,11 @@
+;;; JPL OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JPL     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/JUMP/jump_m.casl b/as/cmd/JUMP/jump_m.casl
new file mode 100644 (file)
index 0000000..e80f243
--- /dev/null
+++ b/as/cmd/JUMP/jump_m.casl
@@ -0,0 +1,11 @@
+;;; JUMP OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JUMP    TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JUMP/jump_ov.casl b/as/cmd/JUMP/jump_ov.casl
new file mode 100644 (file)
index 0000000..7a2ae38
--- /dev/null
+++ b/as/cmd/JUMP/jump_ov.casl
@@ -0,0 +1,11 @@
+;;; JUMP OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JUMP    TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JUMP/jump_p.casl b/as/cmd/JUMP/jump_p.casl
new file mode 100644 (file)
index 0000000..7d4be42
--- /dev/null
+++ b/as/cmd/JUMP/jump_p.casl
@@ -0,0 +1,11 @@
+;;; JUMP OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JUMP    TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JUMP/jump_z.casl b/as/cmd/JUMP/jump_z.casl
new file mode 100644 (file)
index 0000000..39e43c9
--- /dev/null
+++ b/as/cmd/JUMP/jump_z.casl
@@ -0,0 +1,11 @@
+;;; JUMP OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JUMP    TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/JZE/jze_m.casl b/as/cmd/JZE/jze_m.casl
new file mode 100644 (file)
index 0000000..904ff9e
--- /dev/null
+++ b/as/cmd/JZE/jze_m.casl
@@ -0,0 +1,11 @@
+;;; JZE OSZ:010
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JZE     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      -1
+        END

diff --git a/as/cmd/JZE/jze_ov.casl b/as/cmd/JZE/jze_ov.casl
new file mode 100644 (file)
index 0000000..38ab4ae
--- /dev/null
+++ b/as/cmd/JZE/jze_ov.casl
@@ -0,0 +1,11 @@
+;;; JZE OSZ:001
+MAIN    START
+        LD      GR1,A
+        SRL     GR1,1
+        JZE     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      #0003
+        END

diff --git a/as/cmd/JZE/jze_p.casl b/as/cmd/JZE/jze_p.casl
new file mode 100644 (file)
index 0000000..20f208b
--- /dev/null
+++ b/as/cmd/JZE/jze_p.casl
@@ -0,0 +1,11 @@
+;;; JZE OSZ:000
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JZE     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      1
+        END

diff --git a/as/cmd/JZE/jze_z.casl b/as/cmd/JZE/jze_z.casl
new file mode 100644 (file)
index 0000000..73ee48d
--- /dev/null
+++ b/as/cmd/JZE/jze_z.casl
@@ -0,0 +1,11 @@
+;;; JZE OSZ:001
+MAIN    START
+        LD      GR1,A
+        AND     GR1,GR1
+        JZE     TO
+        LAD     GR1,0
+        JUMP    FIN
+TO      LAD     GR1,#FFFF
+FIN     RET
+A       DC      0
+        END

diff --git a/as/cmd/LAD/lad0.casl b/as/cmd/LAD/lad0.casl
index 875e53d..3171666 100644 (file)
--- a/as/cmd/LAD/lad0.casl
+++ b/as/cmd/LAD/lad0.casl
@@ -1,3 +1,4 @@
+;;; LAD r,adr
 LAD     START
         LAD     GR1,5
         RET

diff --git a/as/cmd/LAD/lad0_l.casl b/as/cmd/LAD/lad0_l.casl
new file mode 100644 (file)
index 0000000..0a9c296
--- /dev/null
+++ b/as/cmd/LAD/lad0_l.casl
@@ -0,0 +1,5 @@
+;;; LAD r,adr
+MAIN    START
+        LAD     GR1,='A'
+        RET
+        END

diff --git a/as/cmd/LAD/lad1.casl b/as/cmd/LAD/lad1.casl
index 3700cbc..ff3e22d 100644 (file)
--- a/as/cmd/LAD/lad1.casl
+++ b/as/cmd/LAD/lad1.casl
@@ -1,5 +1,6 @@
-MAIN    START   BEGIN
-BEGIN   LD      GR1,A
+;;; LAD r,adr,x
+MAIN    START
+        LD      GR1,A
         LAD     GR1,1,GR1
         RET
 A       DC      3

diff --git a/as/cmd/LAD/lad1_ov.casl b/as/cmd/LAD/lad1_ov.casl
new file mode 100644 (file)
index 0000000..5d75b42
--- /dev/null
+++ b/as/cmd/LAD/lad1_ov.casl
@@ -0,0 +1,5 @@
+LAD1    START
+        LAD     GR1,10
+        LAD     GR1,65534,GR1
+        RET
+        END

diff --git a/as/cmd/LAD/lad1_s.casl b/as/cmd/LAD/lad1_s.casl
new file mode 100644 (file)
index 0000000..3c63c8d
--- /dev/null
+++ b/as/cmd/LAD/lad1_s.casl
@@ -0,0 +1,7 @@
+;;; LAD r,adr,x
+MAIN    START
+        LD      GR1,A
+        LAD     GR1,-1,GR1
+        RET
+A       DC      3
+        END

diff --git a/as/cmd/LD/ld0.casl b/as/cmd/LD/ld0.casl
index dd84f32..d0e02a6 100644 (file)
--- a/as/cmd/LD/ld0.casl
+++ b/as/cmd/LD/ld0.casl
@@ -1,5 +1,9 @@
 MAIN    START
-        LAD     GR1,3
-        LD      GR0,GR1
+        LD      GR0,A
+        LD      GR0,B
+        LD      GR0,C
         RET
+A       DC      7
+B       DC      -7
+C       DC      0
         END

diff --git a/as/cmd/LD/ld1.casl b/as/cmd/LD/ld1.casl
index 56b035f..37c03ef 100644 (file)
--- a/as/cmd/LD/ld1.casl
+++ b/as/cmd/LD/ld1.casl
@@ -1,5 +1,39 @@
 MAIN    START
-        LD      GR0,A
+        LAD     GR1,#FFFF
+        LD      GR2,GR1
+        LD      GR3,GR1
+        LD      GR4,GR1
+        LD      GR5,GR1
+        LD      GR6,GR1
+        LD      GR7,GR1
+        LD      GR0,GR1
+        LD      GR1,GR1
+        LAD     GR2,#FFFE
+        LD      GR2,GR2
+        LD      GR3,GR2
+        LD      GR4,GR2
+        LD      GR5,GR2
+        LD      GR6,GR2
+        LD      GR7,GR2
+        LD      GR0,GR2
+        LD      GR1,GR2
+        LAD     GR3,#FFFE
+        LD      GR3,GR3
+        LD      GR4,GR3
+        LD      GR5,GR3
+        LD      GR6,GR3
+        LD      GR7,GR3
+        LD      GR0,GR3
+        LD      GR1,GR3
+        LD      GR2,GR3
+        LAD     GR0,1
+        LD      GR1,GR0
+        LD      GR2,GR0
+        LD      GR3,GR0
+        LD      GR4,GR0
+        LD      GR5,GR0
+        LD      GR6,GR0
+        LD      GR7,GR0
+        LD      GR0,GR0
         RET
-A       DC      1,1,2,3,5,8
         END

diff --git a/as/cmd/LD/ld2.casl b/as/cmd/LD/ld2.casl
index 5e3fc3a..21d6790 100644 (file)
--- a/as/cmd/LD/ld2.casl
+++ b/as/cmd/LD/ld2.casl
@@ -1,6 +1,13 @@
-; LDコマンド
-MAIN   START   BEGIN
-BEGIN  LAD     GR0,3
-    LD GR1,GR0
-       RET
-       END
+MAIN    START
+        LAD     GR1,A
+        LD      GR0,0,GR1
+        LD      GR2,2,GR1
+        LD      GR3,3,GR1
+        LD      GR4,4,GR1
+        LD      GR5,5,GR1
+        LD      GR6,6,GR1
+        LD      GR7,7,GR1
+        LD      GR1,1,GR1
+        RET
+A       DC      2,3,5,7,11,13,17,19
+        END

diff --git a/as/err/dc_c1_err.casl b/as/err/dc_c1_err.casl
new file mode 100644 (file)
index 0000000..dd05608
--- /dev/null
+++ b/as/err/dc_c1_err.casl
@@ -0,0 +1,7 @@
+;; DC 文字定数
+MAIN    START
+        RET
+        DC      ' !"#$%&''()*+,-./0123456789:;<=>?@ABCDEFG'
+        DC      'GHIJKLMNOPQRSTUVWXYZ[\]^_abcdefghijklmnop'
+        DC      'pqrstuvwxyz{|}~'
+        END

diff --git a/doc/.gitignore b/doc/.gitignore
index 00d30e8..68f65a7 100644 (file)
--- a/doc/.gitignore
+++ b/doc/.gitignore
@@ -1 +1 @@
-yacasl2
+yacasl2/*.html

diff --git a/doc/yacasl2/style.css b/doc/yacasl2/style.css
new file mode 100644 (file)
index 0000000..9d84815
--- /dev/null
+++ b/doc/yacasl2/style.css
@@ -0,0 +1,34 @@
+body {
+    margin-left: 6em;
+    margin-right: 12em;
+}
+
+p {
+    line-height: 1.5em;
+}
+
+a:hover {
+    color: red;
+    text-decoration: underline;
+}
+
+.command {
+    font-family: monospace;
+}
+
+pre.verbatim {
+    width: 75%;
+    padding: 0.5em 1em 0.5em 1em;
+    color: white;
+    background: black;
+}
+
+a {
+    text-decoration: none;
+}
+
+blockquote.p {
+    margin-top:0;
+    padding-top:0;
+    line-height: 100%;
+}