mirror of
https://github.com/hsoft/collapseos.git
synced 2024-12-27 08:48:06 +11:00
9 lines
285 B
Plaintext
9 lines
285 B
Plaintext
BEGIN, ( loop )
|
|
( DE is a wordref, first step, do our len correspond? )
|
|
HL PUSH, ( --> lvl 3 )
|
|
DE PUSH, ( --> lvl 4 )
|
|
DE DECd,
|
|
LDA(DE),
|
|
0x7f ANDi, ( remove IMMEDIATE flag )
|
|
C CPr, ( cont. )
|