line-mode
words
w( "0x" "" "" )
over
extract-array
nip
    64
    base #(list to num)
t2
>
    reverse
f1
zip
unwords