Run-length encoding: Difference between revisions
m
→{{header|EasyLang}}
Line 2,205:
<syntaxhighlight lang="easylang">
for c$ in strchars in$
if c$ = c0$
Line 2,219 ⟶ 2,218:
.
out$ &= cnt & c0$
return out$
.
for h$ in strsplit in$ " "
c$ = substr h$ len h$ 1
Line 2,228 ⟶ 2,227:
.
.
return out$
.
s$ = input
print s$
print s$
print s$
#
|