mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 18:58:05 +11:00
17 lines
314 B
Plaintext
17 lines
314 B
Plaintext
IFZ, ( end of buffer reached? )
|
|
( yes )
|
|
( +4 == ACIA( )
|
|
ACIA_MEM 4 + LDHL(nn),
|
|
( +2 == ACIAW> )
|
|
ACIA_MEM 2+ LD(nn)HL,
|
|
THEN,
|
|
THEN,
|
|
THEN,
|
|
DE POPqq,
|
|
HL POPqq,
|
|
AF POPqq,
|
|
EI,
|
|
RETI,
|
|
|
|
|