projects
/
YACASL2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
クロック周波数の定義を追加
[YACASL2.git]
/
as
/
outi_call.casl
diff --git
a/as/outi_call.casl
b/as/outi_call.casl
index
bcfaf67
..
e96a938
100644
(file)
--- a/
as/outi_call.casl
+++ b/
as/outi_call.casl
@@
-1,6
+1,14
@@
; need outi.casl
; need outi.casl
-MAIN START
- LAD GR1,#8000
- CALL OUTI
-FIN RET
- END
+MAIN START
+ LAD GR2,0
+ LD GR3,CNT
+LOOP LD GR1,VAL,GR2
+ CALL OUTI
+ LAD GR2,1,GR2
+ CPA GR2,GR3
+ JZE FIN
+ JUMP LOOP
+FIN RET
+ END
+VAL DC #0000,#0001,#0002,#0010,#0100,#1000,#7FFF,#FFFF,#FFFE,#FFF0,#FF00,#F000,#8001,#8000
+CNT DC 14