1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-05 17:30:55 +11:00
collapseos/blk/293
2020-04-22 21:19:12 -04:00

17 lines
543 B
Plaintext

JRNZ, L2 FWR ( loopend )
( match, let's compare the string then )
DE DECss, ( Skip prev field. One less because we )
DE DECss, ( pre-decrement )
B C LDrr, ( loop C times )
BEGIN, ( loop )
( pre-decrement for easier Z matching )
DE DECss,
HL DECss,
LDA(DE),
(HL) CPr,
JRNZ, L3 FWR ( loopend )
DJNZ, AGAIN, ( loop )
L2 FSET L3 FSET ( loopend )
( cont. )