10 lines
279 B
Turing
10 lines
279 B
Turing
|
$$ MODE TUSCRIPT,{}
|
||
|
|
input="WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW",output=""
|
||
|
|
string=strings(input," ? ")
|
||
|
|
letter=ACCUMULATE(string,freq)
|
||
|
|
freq=SPLIT(freq),letter=SPLIT(letter)
|
||
|
|
output=JOIN(freq,"",letter)
|
||
|
|
output=JOIN(output,"")
|
||
|
|
PRINT input
|
||
|
|
PRINT output
|