mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-05 20:30:56 +11:00
a19376df6c
We can get rid of acia.z80, but not of acia.fs yet, we still need it.
8 lines
157 B
Plaintext
8 lines
157 B
Plaintext
: EMIT
|
|
( As long at CTL bit 1 is low, we are transmitting. wait )
|
|
BEGIN ACIA_CTL PC@ 0x02 AND UNTIL
|
|
( The way is clear, go! )
|
|
ACIA_IO PC!
|
|
;
|
|
|