コマンドテストCASLファイルの追加
[YACASL2.git] / as / cmd / JZE / jze_p.casl
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
@@ -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