1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-17 07:08:05 +11:00
collapseos/blk/584

15 lines
393 B
Plaintext
Raw Normal View History

IFNZ, ( buffer full? )
( no, continue )
DE ADDHLd, ( restore ACIAW> )
( buffer not full, let's write )
ACIA_IO INAi,
(HL) A LDrr,
( advance W> )
HL INCd,
ACIAW> LD(n)HL,
DE ACIA) LDdd(n),
DE SUBHLd,
( cont. )