projects
/
YACASL2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
PBMファイル出力機能を追加
[YACASL2.git]
/
test
/
system
/
casl2
/
lib_outb_w
/
outb_w0.casl
diff --git a/test/system/casl2/lib_outb_w/outb_w0.casl
b/test/system/casl2/lib_outb_w/outb_w0.casl
new file mode 100644
(file)
index 0000000..
ad8c17f
--- /dev/null
+++ b/
test/system/casl2/lib_outb_w/outb_w0.casl
@@ -0,0
+1,13
@@
+;;; casl2 outb_call.casl outb.casl
+MAIN START
+ LAD GR2,0
+LOOP LD GR1,VAL,GR2
+ CALL OUTB
+ LAD GR2,1,GR2
+ CPA GR2,CNT
+ JZE FIN
+ JUMP LOOP
+FIN RET
+VAL DC #0001,#8000
+CNT DC 2
+ END