lines
m:
        even
    m2
    2
    catenate #(list+elem)
    2
    left-cons
    pairwise
        3
        base #(list to num)
    m2
    30612510
    digits
    select
}
transpose
m:
    4
    catenate #(list+elem)
    4
    left-cons
    pairwise
        5
        base #(list to num)
        ( "\x12\xa3\xb7\xa8\xa9\xa2\x13\xa7\xb8\xa9\xb2\xa3g\xf8\xf9\xa2\xb3\xf7h\xf9\xa2\xa3\xf7\xf8\xf9\xe4\xe4\xe4\xe4\xe9D\xe4\xe4\xe4\xe9\xe4D" )
        get
        16
        base #(num to list)
    m6
    flatten
    ( "| +-" "- XO" )
    show-line
    cartesian-product
    select
}
transpose