Run-length encoding: Difference between revisions
m
→{{header|FutureBasic}}
Line 2,838:
Short i, rl // index, run-length
s = @"" //
for i = 0 to len( string ) - 1 // Decode input string char by char
ch = mid( string, i, 1 ) // Read character at index
|