Run-length encoding: Difference between revisions
m
→{{header|EasyLang}}
Line 2,205:
<syntaxhighlight lang="easylang">
proc
out$ = ""
for c$ in strchars in$
Line 2,220:
out$ &= cnt & c0$
.
proc
out$ = ""
for h$ in strsplit in$ " "
Line 2,229:
.
.
print
call
print
call dec s$ s$
print s$
#
input_data
WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW
</syntaxhighlight>
|