line-mode
dup
    is-alpha
m1
inits
    sum
    16
    =
m3
swap
        printable-ascii
        index
        space
        logical-or
    f4
z2