2020-04-23 12:42:41 -04:00
|
|
|
IFNZ, ( buffer full? )
|
|
|
|
( no, continue )
|
2020-06-27 22:01:56 -04:00
|
|
|
DE ADDHLd, ( restore ACIAW> )
|
2020-04-23 12:42:41 -04:00
|
|
|
( buffer not full, let's write )
|
2020-06-27 22:01:56 -04:00
|
|
|
ACIA_IO INAi,
|
2020-04-23 12:42:41 -04:00
|
|
|
(HL) A LDrr,
|
|
|
|
( advance W> )
|
2020-06-27 22:01:56 -04:00
|
|
|
HL INCd,
|
2020-04-23 12:42:41 -04:00
|
|
|
( +2 == ACIAW> )
|
2020-06-27 22:01:56 -04:00
|
|
|
ACIA_MEM 2+ LD(n)HL,
|
2020-04-23 12:42:41 -04:00
|
|
|
( +6 == ACIA) )
|
2020-06-27 22:01:56 -04:00
|
|
|
DE ACIA_MEM 6 + LDdd(n),
|
|
|
|
DE SUBHLd,
|
2020-04-23 12:42:41 -04:00
|
|
|
|
|
|
|
|
|
|
|
( cont. )
|