( "%\xbc`w\xc6=\xcf\xdfJ\xaaU\xb6\xaa\xa7\xe3\xed\xcd<\x1bH" "\x96C`\xf4ST>\xa5\x86\x8d\x1e\x01\xbb\xf2j\xab" )
    256
    base #(list to num)
t2
21
10
    base #(num to list)
    swap
t2
lines
    lowercase-alphabet
    select
    "("
    catenate #(list+list)
m4
right-uncons
12
41
ljust
show-line
left-cons
select
nip