LZW compression: Difference between revisions

Content deleted Content added
M2000 (talk | contribs)
M2000 (talk | contribs)
Line 2,958:
c = d
IF i > LEN(i$) THEN EXIT
FOR d = 1 TO l-1 {
IF w$ = dict$(d) THEN EXIT
}NEXT d
IF d < l Then i += 1 : w$ += MID$(i$, i, 1)
} UNTIL d >= l