mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-06 02:20:58 +11:00
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!
|
|
;
|
|
|