piecesac h6.cql

cql()

flipcolor {
    {result 1-0}
    line --> {
        wtm {movenumber < 21} { power A <= power a + 1 }
        ph6 pg7
    } --> [QRBN]h6 { not {pin through g7 to k} }
}