1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-05 19:30:56 +11:00
collapseos/blk/814
Virgil Dupras 8c452f5add pcat: begin implementing find
Not comparing strings yet. Without asm tooling support, it's a big
chunk to swallow at once. It's progressing well!
2020-06-14 21:52:58 -04:00

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,