m:
    dup
    is-alpha
    f:
        32
        %
        64
        +
        @0
        ( "\x8b\xe1t\x93b\xde\xa2W\xa9x\xac\x19m\xbc\xbc@\xecI\xc2\xa1\xea\xd5\xa7\xc2\xe7\xcd\x92!\xd2\x80\xbe\x90\x9av,\xed\xe4\xfa\xda#\xa6d5.E\xc6\xf5WQx\x86-\xca\xa4'\xcf\xb1EOQ\x90W\xf2\xe4i\xeb\x90\x85\xb0\x96\x97\x17-d}\xd0\xf6\x014\x87o\x81" )
        256
        base #(list to num)
        26
        base #(num to list)
        lines
        get
        "-"
        lowercase-alphabet
        catenate #(list+list)
        select
    }
    space