LZW compression: Difference between revisions
m
→{{header|M2000 Interpreter}}
Line 3,020:
l += 1 : w$ = Right$(w$, 1)
o$ += Chr$(c Mod 256) + Chr$(c div 256)
} Until i >
= o$
}
|