X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcmd%2FJUMP%2Fjump_o.casl;fp=as%2Fcmd%2FJUMP%2Fjump_o.casl;h=7a2ae38e0bfe9a4b5e5939e39391089c64ea8f7b;hb=e53b9aa2cd0e67ff64c52fa1b83e16c048283dbd;hp=0000000000000000000000000000000000000000;hpb=f2b4a9880e544d2fcb54f5a6dda673f67767d93d;p=YACASL2.git

diff --git a/as/cmd/JUMP/jump_o.casl b/as/cmd/JUMP/jump_o.casl
new file mode 100644
index 0000000..7a2ae38
--- /dev/null
+++ b/as/cmd/JUMP/jump_o.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