mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-05 19:30:56 +11:00
8c452f5add
Not comparing strings yet. Without asm tooling support, it's a big chunk to swallow at once. It's progressing well!
6 lines
130 B
Plaintext
6 lines
130 B
Plaintext
L1 BSET PC 3 - ORG @ 0x34 + ! ( execute -- BX -> wordref )
|
|
AH AH XORrr,
|
|
AL [BX] MOVr[],
|
|
BX INCx, ( PFA )
|
|
AX JMPr,
|