Шахматы

Бороздя интернет, я не раз искал исходник шахмат. Мне попадались исходники только на языке С++. На бейсиках что-то подобное было, но оно даже не заслуживало никакого внимания. Считаю что это первопроходец на бейсике.
Данная программа знает шахматные правила и способна даже играть сама с собой. Так же есть возможность выбора играть черными или белыми. Ходы производятся печатанием хода (например с2с4) как в старых программах IBM компьютеров. Кстати если кол-во введенных символов будет больше 4, то программа завершится. Вся графика выполнена в секции данных, то есть нет никаких подключаемых картинок. Что касается интелекта, то конечно от программы с таким кол-вом строк не стоит ждать сильного виртуального соперника.
Платформы: Windows, Linux
Автор: Roland Chastain

chess.png

'====================

'      ESCHECS

'====================
' Programme йcrit en
'     FreeBASIC
'====================
' par Roland Chastain
'====================

Dim As Integer col(63), lig(63), ccz(63)
Dim As String abc(63), l18(63), caz(63)

Const bla=1
Const noi=2

Dim As Integer ii, ij

For ii=0 To 63
    lig(ii)=fix(ii/8)
    col(ii)=ii-8*lig(ii)
    ij=col(ii)+lig(ii)
    If ij/2=fix(ij/2) Then
        ccz(ii)=bla
    Else
        ccz(ii)=noi
    End If
    abc(ii)=chr(col(ii)+97)
    l18(ii)=chr(56-lig(ii))
    caz(ii)=abc(ii)+l18(ii)
Next ii


Dim As Integer oc(63)

Const pb=01, pn=02, cb=03
Const cn=04, fb=05, fn=06
Const tb=07, tn=08, db=09
Const dn=10, rb=11, rn=12


Dim As Integer nat(12)
Dim As Integer cpc(12)

Const pio=1, cav=2, fou=3
Const tou=4, dam=5, roi=6

nat(pb)=pio : nat(pn)=pio
nat(cb)=cav : nat(cn)=cav
nat(fb)=fou : nat(fn)=fou
nat(tb)=tou : nat(tn)=tou
nat(db)=dam : nat(dn)=dam
nat(rb)=roi : nat(rn)=roi
cpc(pb)=bla : cpc(pn)=noi
cpc(cb)=bla : cpc(cn)=noi
cpc(fb)=bla : cpc(fn)=noi
cpc(tb)=bla : cpc(tn)=noi
cpc(db)=bla : cpc(dn)=noi
cpc(rb)=bla : cpc(rn)=noi

nat(0)=0
cpc(0)=0


Dim As Integer tra, sch, ncj
Dim As Integer rq(3), qr(3)


Dim As Integer ik, ji, jj, jk, ki, kj, kk, ll, lm, ln, ml
Dim As Integer nc1, nc2, nc3, nc4
Dim As Integer dis, pas, nps
Dim As Integer dcl, dlg, dif
Dim As Integer hcs, sch0
Dim As Integer ocb(63)
Dim As Integer oc0(63)
Dim As Integer rq0(03)
Dim As Integer fmt(3)

Dim As String ps1, ps2
Dim As String cz1, cz2, cz3, cz4, cz5, cz6
Dim As String c01, c02, c03, c04, c05, c06
Dim As String c09, c10, c11, c12, c13
Dim As String c050, c060

Dim As Integer n01, n02, n03, n04, n05, n06, n07, n08, n09
Dim As Integer n10, n11, n12, n13, n14, n15, n16, n17, n18
Dim As Integer n19, n20, n21, n22, n23, n24, n25, n26, n27
Dim As Integer n28, n29, n30, n31, n32, n98
Dim As Integer p00(63), p01(63), p02(63), p03(63), p04(63)
Dim As Integer p05(63), p06(63), p07(63), p08(63), p09(63)
Dim As Integer p10(63), p11(63), p12(63)


Const q1=255 : Const q2=255 : Const q3=255
Const r1=000 : Const r2=000 : Const r3=063
Const s1=159 : Const s2=000 : Const s3=000
Const t1=143 : Const t2=143 : Const t3=143
Dim As Integer nc5, nc6, nc7, nc8, nc9
Dim As Integer x1, x2, y1, y2
Dim As Integer fig, pix(1599)
Dim As Integer passant, roque
Const x0=40
Const y0=40
Dim As String av1, av2
Dim As String av3, av4
Dim As String av5, av6
av1="" : av2=""
av3="eschec au Roi"
av4="partie remise"' pat
av5="eschec et mat"
av6="partie remise"' rйpйtition
Dim As Integer jeu
jeu=0


Screenres 400,416,32
Color Rgb(r1,r2,r3),Rgb(q1,q2,q3)
Cls : Line (0,0)-(399, 415),,B
Windowtitle "ESCHECS"
View Print 50 To 50


nouvelle:
oc(00)=tn : oc(01)=cn : oc(02)=fn : oc(03)=dn
oc(04)=rn : oc(05)=fn : oc(06)=cn : oc(07)=tn
oc(08)=pn : oc(09)=pn : oc(10)=pn : oc(11)=pn
oc(12)=pn : oc(13)=pn : oc(14)=pn : oc(15)=pn
oc(16)=00 : oc(17)=00 : oc(18)=00 : oc(19)=00
oc(20)=00 : oc(21)=00 : oc(22)=00 : oc(23)=00
oc(24)=00 : oc(25)=00 : oc(26)=00 : oc(27)=00
oc(28)=00 : oc(29)=00 : oc(30)=00 : oc(31)=00
oc(32)=00 : oc(33)=00 : oc(34)=00 : oc(35)=00
oc(36)=00 : oc(37)=00 : oc(38)=00 : oc(39)=00
oc(40)=00 : oc(41)=00 : oc(42)=00 : oc(43)=00
oc(44)=00 : oc(45)=00 : oc(46)=00 : oc(47)=00
oc(48)=pb : oc(49)=pb : oc(50)=pb : oc(51)=pb
oc(52)=pb : oc(53)=pb : oc(54)=pb : oc(55)=pb
oc(56)=tb : oc(57)=cb : oc(58)=fb : oc(59)=db
oc(60)=rb : oc(61)=fb : oc(62)=cb : oc(63)=tb
For ii=0 To 3
    rq(ii)=1
Next ii
tra=0
ncj=0


Line (x0-1,y0-1)-(x0+320,y0+320),,B
Line (x0-3,y0-3)-(x0+322,y0+322),,B
Line (x0-4,y0-4)-(x0+323,y0+323),,B

For ii=0 To 63
    x1=40*col(ii)+x0
    y1=40*lig(ii)+y0
    If ccz(ii)=1 Then
        fig=2*oc(ii)
    Else fig=2*oc(ii)+1
    End If
    Select Case As Const fig
        Case 0
            Restore figure0
        Case 1
            Restore figure1
        Case 2
            Restore figure2
        Case 3
            Restore figure3
        Case 4
            Restore figure4
        Case 5
            Restore figure5
        Case 6
            Restore figure6
        Case 7
            Restore figure7
        Case 8
            Restore figure8
        Case 9
            Restore figure9
        Case 10
            Restore figure10
        Case 11
            Restore figure11
        Case 12
            Restore figure12
        Case 13
            Restore figure13
        Case 14
            Restore figure14
        Case 15
            Restore figure15
        Case 16
            Restore figure16
        Case 17
            Restore figure17
        Case 18
            Restore figure18
        Case 19
            Restore figure19
        Case 20
            Restore figure20
        Case 21
            Restore figure21
        Case 22
            Restore figure22
        Case 23
            Restore figure23
        Case 24
            Restore figure24
        Case 25
            Restore figure25
    End Select
    For ij=0 To 1599
        y2=fix(ij/40) : x2=ij-40*y2
        Read pix(ij)
        If pix(ij)=0 Then
            Preset(x1+x2,y1+y2)
        Else Pset(x1+x2,y1+y2)
        End If
    Next ij
Next ii
Goto suite
nouveau:
For ii=nc5 To nc6 Step nc6-nc5
    x1=40*col(ii)+x0
    y1=40*lig(ii)+y0
    If ccz(ii)=1 Then
        fig=2*oc(ii)
    Else fig=2*oc(ii)+1
    End If
    Select Case As Const fig
        Case 0
            Restore figure0
        Case 1
            Restore figure1
        Case 2
            Restore figure2
        Case 3
            Restore figure3
        Case 4
            Restore figure4
        Case 5
            Restore figure5
        Case 6
            Restore figure6
        Case 7
            Restore figure7
        Case 8
            Restore figure8
        Case 9
            Restore figure9
        Case 10
            Restore figure10
        Case 11
            Restore figure11
        Case 12
            Restore figure12
        Case 13
            Restore figure13
        Case 14
            Restore figure14
        Case 15
            Restore figure15
        Case 16
            Restore figure16
        Case 17
            Restore figure17
        Case 18
            Restore figure18
        Case 19
            Restore figure19
        Case 20
            Restore figure20
        Case 21
            Restore figure21
        Case 22
            Restore figure22
        Case 23
            Restore figure23
        Case 24
            Restore figure24
        Case 25
            Restore figure25
    End Select
    For ij=0 To 1599
        y2=fix(ij/40) : x2=ij-40*y2
        Read pix(ij)
        If pix(ij)=0 Then
            Preset(x1+x2,y1+y2)
        Else Pset(x1+x2,y1+y2)
        End If
    Next ij
Next ii
If passant=1 Then
    For ii=nc9 To nc9
        x1=40*col(ii)+x0
        y1=40*lig(ii)+y0
        If ccz(ii)=1 Then
            fig=2*oc(ii)
        Else fig=2*oc(ii)+1
        End If
        Select Case As Const fig
            Case 0
                Restore figure0
            Case 1
                Restore figure1
            Case 2
                Restore figure2
            Case 3
                Restore figure3
            Case 4
                Restore figure4
            Case 5
                Restore figure5
            Case 6
                Restore figure6
            Case 7
                Restore figure7
            Case 8
                Restore figure8
            Case 9
                Restore figure9
            Case 10
                Restore figure10
            Case 11
                Restore figure11
            Case 12
                Restore figure12
            Case 13
                Restore figure13
            Case 14
                Restore figure14
            Case 15
                Restore figure15
            Case 16
                Restore figure16
            Case 17
                Restore figure17
            Case 18
                Restore figure18
            Case 19
                Restore figure19
            Case 20
                Restore figure20
            Case 21
                Restore figure21
            Case 22
                Restore figure22
            Case 23
                Restore figure23
            Case 24
                Restore figure24
            Case 25
                Restore figure25
        End Select
        For ij=0 To 1599
            y2=fix(ij/40) : x2=ij-40*y2
            Read pix(ij)
            If pix(ij)=0 Then
                Preset(x1+x2,y1+y2)
            Else Pset(x1+x2,y1+y2)
            End If
        Next ij
    Next ii
End If
If roque=1 Then
    For ii=nc7 To nc8 Step nc8-nc7
        x1=40*col(ii)+x0
        y1=40*lig(ii)+y0
        If ccz(ii)=1 Then
            fig=2*oc(ii)
        Else fig=2*oc(ii)+1
        End If
        Select Case As Const fig
            Case 0
                Restore figure0
            Case 1
                Restore figure1
            Case 2
                Restore figure2
            Case 3
                Restore figure3
            Case 4
                Restore figure4
            Case 5
                Restore figure5
            Case 6
                Restore figure6
            Case 7
                Restore figure7
            Case 8
                Restore figure8
            Case 9
                Restore figure9
            Case 10
                Restore figure10
            Case 11
                Restore figure11
            Case 12
                Restore figure12
            Case 13
                Restore figure13
            Case 14
                Restore figure14
            Case 15
                Restore figure15
            Case 16
                Restore figure16
            Case 17
                Restore figure17
            Case 18
                Restore figure18
            Case 19
                Restore figure19
            Case 20
                Restore figure20
            Case 21
                Restore figure21
            Case 22
                Restore figure22
            Case 23
                Restore figure23
            Case 24
                Restore figure24
            Case 25
                Restore figure25
        End Select
        For ij=0 To 1599
            y2=fix(ij/40) : x2=ij-40*y2
            Read pix(ij)
            If pix(ij)=0 Then
                Preset(x1+x2,y1+y2)
            Else Pset(x1+x2,y1+y2)
            End If
        Next ij
    Next ii
End If
suite:


dif=1
If ncj=0 Then
    For ii=0 To 63
        p00(ii)=oc(ii)
    Next ii
End If
If ncj=1 Then
    For ii=0 To 63
        p01(ii)=oc(ii)
    Next ii
End If
If ncj=2 Then
    For ii=0 To 63
        p02(ii)=oc(ii)
    Next ii
End If
If ncj=3 Then
    For ii=0 To 63
        p03(ii)=oc(ii)
    Next ii
End If
If ncj=4 Then
    For ii=0 To 63
        p04(ii)=oc(ii)
    Next ii
End If
If ncj=5 Then
    For ii=0 To 63
        p05(ii)=oc(ii)
    Next ii
End If
If ncj=6 Then
    For ii=0 To 63
        p06(ii)=oc(ii)
    Next ii
End If
If ncj=7 Then
    For ii=0 To 63
        p07(ii)=oc(ii)
    Next ii
End If
If ncj=8 Then
    For ii=0 To 63
        p08(ii)=oc(ii)
    Next ii
End If
If ncj=9 Then
    For ii=0 To 63
        p09(ii)=oc(ii)
    Next ii
End If
If ncj=10 Then
    For ii=0 To 63
        p10(ii)=oc(ii)
    Next ii
End If
If ncj=11 Then
    For ii=0 To 63
        p11(ii)=oc(ii)
    Next ii
End If
If ncj=12 Then
    For ii=0 To 63
        p12(ii)=oc(ii)
    Next ii
    dif=0
    For ii=0 To 63
        If p12(ii)<>p08(ii) Or p08(ii)<>p04(ii) Or p04(ii)<>p00(ii)Then dif=1
    Next ii
End If
If ncj>12 Then
    For ii=0 To 63
        p00(ii)=p01(ii) : p01(ii)=p02(ii) : p02(ii)=p03(ii)
        p03(ii)=p04(ii) : p04(ii)=p05(ii) : p05(ii)=p06(ii)
        p06(ii)=p07(ii) : p07(ii)=p08(ii) : p08(ii)=p09(ii)
        p09(ii)=p10(ii) : p10(ii)=p11(ii) : p11(ii)=p12(ii)
        p12(ii)=oc(ii)
    Next ii
    dif=0
    For ii=0 To 63
        If p12(ii)<>p08(ii) Or p08(ii)<>p04(ii) Or p04(ii)<>p00(ii)Then dif=1
    Next ii
End If


ps1=""
ps2=""
Select Case As Const tra
    Case 0
        For ii=0 To 63
            If cpc(oc(ii))=bla Then ps1=ps1+caz(ii)
            If cpc(oc(ii))=noi Then ps2=ps2+caz(ii)
        Next ii
    Case 1
        For ii=0 To 63
            If cpc(oc(ii))=noi Then ps1=ps1+caz(ii)
            If cpc(oc(ii))=bla Then ps2=ps2+caz(ii)
        Next ii
End Select


c01=""
For ii=1 To Len(ps2)/2
    cz1=mid(ps2,1+2*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    Select Case As Const nat(oc(nc1))
        Case 1
            Select Case As Const tra
                Case 0
                    For nc2=0 To 63
                        If cpc(oc(nc2))=noi Then Continue For
                        If lig(nc2)<lig(nc1)+1 Then Continue For
                        If lig(nc2)>lig(nc1)+2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1+8)>0 Then Continue For
                            If lig(nc1)>1 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 1
                    For nc2=0 To 63
                        If cpc(oc(nc2))=bla Then Continue For
                        If lig(nc2)>lig(nc1)-1 Then Continue For
                        If lig(nc2)<lig(nc1)-2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1-8)>0 Then Continue For
                            If lig(nc1)<6 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
            End Select
        Case 2
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg=0 Then Continue For
                If dcl+dlg<>3 Then Continue For
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 3
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then Continue For
                If dcl>1 Then
                    dis=nc2-nc1
                    pas=7
                    If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                    If 2*dis<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 4
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg>0 Then Continue For
                If dcl+dlg>1 Then
                    dis=nc2-nc1
                    pas=8
                    If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 5
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then
                    If dcl*dlg>0 Then Continue For
                End If
                If dcl>1 Or dlg>1 Then
                    dis=nc2-nc1 : pas=9
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 6
    End Select
Next ii

sch=0
For ii=0 To 3
    qr(ii)=1
Next ii
For ii=1 To Len(c01)/4
    cz2=mid(c01,3+4*(ii-1),2)
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    Select Case As Const tra
        Case 0
            If oc(nc2)=rb Then sch=1
            If sch=1 Then
                qr(2)=0
                qr(3)=0
            End If
            If nc2>55 And nc2<60 Then qr(2)=0
            If nc2>60 Then qr(3)=0
        Case 1
            If oc(nc2)=rn Then sch=1
            If sch=1 Then
                qr(0)=0
                qr(1)=0
            End If
            If nc2>04 And nc2<08 Then qr(1)=0
            If nc2<04 Then qr(0)=0
    End Select
Next ii

c02=""
For ii=1 To Len(ps1)/2
    cz1=mid(ps1,1+2*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    Select Case As Const nat(oc(nc1))
        Case 1
            Select Case As Const tra
                Case 0
                    For nc2=0 To 63
                        If cpc(oc(nc2))=bla Then Continue For
                        If lig(nc2)>lig(nc1)-1 Then Continue For
                        If lig(nc2)<lig(nc1)-2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1-8)>0 Then Continue For
                            If lig(nc1)<6 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 1
                    For nc2=0 To 63
                        If cpc(oc(nc2))=noi Then Continue For
                        If lig(nc2)<lig(nc1)+1 Then Continue For
                        If lig(nc2)>lig(nc1)+2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1+8)>0 Then Continue For
                            If lig(nc1)>1 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
            End Select
        Case 2
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg=0 Then Continue For
                If dcl+dlg<>3 Then Continue For
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 3
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then Continue For
                If dcl>1 Then
                    dis=nc2-nc1
                    pas=7
                    If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                    If 2*dis<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 4
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg>0 Then Continue For
                If dcl+dlg>1 Then
                    dis=nc2-nc1
                    pas=8
                    If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 5
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then
                    If dcl*dlg>0 Then Continue For
                End If
                If dcl>1 Or dlg>1 Then
                    dis=nc2-nc1 : pas=9
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 6
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl>2 Or dlg>1 Then Continue For
                Select Case As Const tra
                    Case 0
                        If nc1=60 And nc2=58 Then
                            If oc(59)=0 And oc(57)=0 And oc(56)=7 Then
                                If rq(2)=1 And qr(2)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                        If nc1=60 And nc2=62 Then
                            If oc(61)=0 And oc(63)=7 Then
                                If rq(3)=1 And qr(3)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                    Case 1
                        If nc1=4 And nc2=2 Then
                            If oc(3)=0 And oc(1)=0 And oc(0)=8 Then
                                If rq(0)=1 And qr(0)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                        If nc1=4 And nc2=6 Then
                            If oc(5)=0 And oc(7)=8 Then
                                If rq(1)=1 And qr(1)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                End Select
                If dcl>1 Then Continue For
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
    End Select
Next ii


c05=""
For ii=1 To Len(c02)/4
    cz1=mid(c02,1+4*(ii-1),2)
    cz2=mid(c02,3+4*(ii-1),2)
    c03=cz1+cz2
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    For ij=0 To 63
        ocb(ij)=oc(ij)
    Next ij
    If nat(oc(nc1))=pio Then
        If Abs(lig(nc1)-lig(nc2))=2 Then
            Select Case As Const tra
                Case 0
                    If nc1=48 And oc(41)=2 Then ocb(41)=0
                    If nc1=55 And oc(46)=2 Then ocb(46)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1-7)=02 Then ocb(nc1-7)=0
                        If oc(nc1-9)=02 Then ocb(nc1-9)=0
                    End If
                Case 1
                    If nc1=08 And oc(17)=1 Then ocb(17)=0
                    If nc1=15 And oc(22)=1 Then ocb(22)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1+9)=01 Then ocb(nc1+9)=0
                        If oc(nc1+7)=01 Then ocb(nc1+7)=0
                    End If
            End Select
        End If
    End If
    ocb(nc2)=ocb(nc1)
    ocb(nc1)=0
    ps2=""
    Select Case As Const tra
        Case 0
            For ij=0 To 63
                If cpc(ocb(ij))=noi Then ps2=ps2+caz(ij)
            Next ij
        Case 1
            For ij=0 To 63
                If cpc(ocb(ij))=bla Then ps2=ps2+caz(ij)
            Next ij
    End Select
    c04=""
    For ij=1 To Len(ps2)/2
        cz1=mid(ps2,1+2*(ij-1),2)
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        Select Case As Const nat(ocb(nc1))
            Case 1
                Select Case As Const tra
                    Case 0
                        For nc2=0 To 63
                            If nat(ocb(nc2))<roi Then Continue For
                            If lig(nc2)<lig(nc1)+1 Then Continue For
                            If lig(nc2)>lig(nc1)+2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If ocb(nc2)=0 Then
                                If dcl>0 Then Continue For
                                If ocb(nc1+8)>0 Then Continue For
                                If lig(nc1)>1 And dlg>1 Then
                                    Continue For
                                End If
                            End If
                            If ocb(nc2)>0 Then
                                If dlg<>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c04=c04+cz1+cz2
                        Next nc2
                    Case 1
                        For nc2=0 To 63
                            If nat(ocb(nc2))<roi Then Continue For
                            If lig(nc2)>lig(nc1)-1 Then Continue For
                            If lig(nc2)<lig(nc1)-2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If ocb(nc2)=0 Then
                                If dcl>0 Then Continue For
                                If ocb(nc1-8)>0 Then Continue For
                                If lig(nc1)<6 And dlg>1 Then
                                    Continue For
                                End If
                            End If
                            If ocb(nc2)>0 Then
                                If dlg<>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c04=c04+cz1+cz2
                        Next nc2
                End Select
            Case 2
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg=0 Then Continue For
                    If dcl+dlg<>3 Then Continue For
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 3
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then Continue For
                    If dcl>1 Then
                        dis=nc2-nc1
                        pas=7
                        If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                        If 2*dis<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 4
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg>0 Then Continue For
                    If dcl+dlg>1 Then
                        dis=nc2-nc1
                        pas=8
                        If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 5
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then
                        If dcl*dlg>0 Then Continue For
                    End If
                    If dcl>1 Or dlg>1 Then
                        dis=nc2-nc1 : pas=9
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 6
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dlg>1 Then Continue For
                    If dcl>1 Then Continue For
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
        End Select
    Next ij
    hcs=0
    For ij=1 To Len(c04)/4
        cz2=mid(c04,3+4*(ij-1),2)
        nc2=asc(cz2,1)-8*asc(cz2,2)+351
        Select Case As Const tra
            Case 0
                If ocb(nc2)=rb Then hcs=1
            Case 1
                If ocb(nc2)=rn Then hcs=1
        End Select
    Next ij
    If hcs=0 Then c05=c05+c03
Next ii


c06=c05


Cls : Line (0,0)-(399, 415),,B
If sch=1 And Len(c06)>0 Then
    Color Rgb(s1,s2,s3)
    Draw String (40,392),av3
    Color Rgb(r1,r2,r3)
    Sleep 2000
End If
If Len(c06)=0 And sch=0 Then
    Color Rgb(s1,s2,s3)
    Draw String (40,392),av4
    Color Rgb(r1,r2,r3)
    Sleep
    jeu=0
    Goto nouvelle
End If
If Len(c06)=0 And sch=1 Then
    Color Rgb(s1,s2,s3)
    Draw String (40,392),av5
    Color Rgb(r1,r2,r3)
    Sleep
    jeu=0
    Goto nouvelle
End If
If dif=0 Then
    Color Rgb(s1,s2,s3)
    Draw String (40,392),av6
    Color Rgb(r1,r2,r3)
    Sleep
    jeu=0
    Goto nouvelle
End If


Redim As Integer sc1(1 To Len(c06)/4)
Redim As Integer qr1(1 To Len(c06)/4,03)
Redim As Integer rq2(1 To Len(c06)/4,03)
Redim As Integer oc1(1 To Len(c06)/4,63)

For ii=1 To Len(c06)/4
    cz1=mid(c06,1+4*(ii-1),2)
    cz2=mid(c06,3+4*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    dcl=abs(col(nc1)-col(nc2))
    dlg=abs(lig(nc1)-lig(nc2))
    For ij=0 To 63
        oc1(ii,ij)=oc(ij)
    Next ij
    For ij=0 To 3
        rq2(ii,ij)=rq(ij)
    Next ij
    If nat(oc(nc1))=pio And lig(nc2)=0 Then oc1(ii,nc1)=db
    If nat(oc(nc1))=pio And lig(nc2)=7 Then oc1(ii,nc1)=dn
    If nat(oc(nc1))=pio Then
        If dlg=2 Then
            Select Case As Const tra
                Case 0
                    If nc1=48 And oc(41)=2 Then oc1(ii,41)=0
                    If nc1=55 And oc(46)=2 Then oc1(ii,46)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1-7)=pn Then oc1(ii,nc1-7)=0
                        If oc(nc1-9)=pn Then oc1(ii,nc1-9)=0
                    End If
                Case 1
                    If nc1=08 And oc(17)=1 Then oc1(ii,17)=0
                    If nc1=15 And oc(22)=1 Then oc1(ii,22)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1+9)=pb Then oc1(ii,nc1+9)=0
                        If oc(nc1+7)=pb Then oc1(ii,nc1+7)=0
                    End If
            End Select
        End If
    End If
    If nat(oc(nc1))=roi Then
        If dcl=2 Then
            If nc2=02 Then
                oc1(ii,00)=0
                oc1(ii,03)=8
            End If
            If nc2=06 Then
                oc1(ii,07)=0
                oc1(ii,05)=8
            End If
            If nc2=58 Then
                oc1(ii,56)=0
                oc1(ii,59)=7
            End If
            If nc2=62 Then
                oc1(ii,63)=0
                oc1(ii,61)=7
            End If
        End If
    End If
    If nat(oc(nc1))=roi Then
        If oc(nc1)=rn Then
            rq2(ii,0)=0
            rq2(ii,1)=0
        End If
        If oc(nc1)=rb Then
            rq2(ii,2)=0
            rq2(ii,3)=0
        End If
    End If
    If nat(oc(nc1))=tou Then
        If caz(nc1)="a8" Then rq2(ii,0)=0
        If caz(nc1)="h8" Then rq2(ii,1)=0
        If caz(nc1)="a1" Then rq2(ii,2)=0
        If caz(nc1)="h1" Then rq2(ii,3)=0
    End If
    oc1(ii,nc2)=oc1(ii,nc1)
    oc1(ii,nc1)=0
    ps1=""
    Select Case As Const tra
        Case 0
            For ij=0 To 63
                If cpc(oc1(ii,ij))=bla Then ps1=ps1+caz(ij)
            Next ij
        Case 1
            For ij=0 To 63
                If cpc(oc1(ii,ij))=noi Then ps1=ps1+caz(ij)
            Next ij
    End Select
    c02=""
    For ij=1 To Len(ps1)/2
        cz1=mid(ps1,1+2*(ij-1),2)
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        Select Case As Const nat(oc1(ii,nc1))
            Case 1
                Select Case As Const tra
                    Case 0
                        For nc2=0 To 63
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                            If lig(nc2)>lig(nc1)-1 Then Continue For
                            If lig(nc2)<lig(nc1)-2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If oc1(ii,nc2)=0 Then
                                If dcl>0 Then Continue For
                                If oc1(ii,nc1-8)>0 Then Continue For
                                If lig(nc1)<6 And dlg>1 Then Continue For
                            End If
                            If oc1(ii,nc2)>0 Then
                                If dlg>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c02=c02+cz1+cz2
                        Next nc2
                    Case 1
                        For nc2=0 To 63
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                            If lig(nc2)<lig(nc1)+1 Then Continue For
                            If lig(nc2)>lig(nc1)+2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If oc1(ii,nc2)=0 Then
                                If dcl>0 Then Continue For
                                If oc1(ii,nc1+8)>0 Then Continue For
                                If lig(nc1)>1 And dlg>1 Then Continue For
                            End If
                            If oc1(ii,nc2)>0 Then
                                If dlg>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c02=c02+cz1+cz2
                        Next nc2
                End Select
            Case 2
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                    End Select
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg=00 Then Continue For
                    If dcl+dlg<>3 Then Continue For
                    cz2=caz(nc2)
                    c02=c02+cz1+cz2
                Next nc2
            Case 3
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then Continue For
                    If dcl>1 Then
                        dis=nc2-nc1
                        pas=7
                        If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                        If 2*dis<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c02=c02+cz1+cz2
                Next nc2
            Case 4
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg>0 Then Continue For
                    If dcl+dlg>1 Then
                        dis=nc2-nc1
                        pas=8
                        If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c02=c02+cz1+cz2
                Next nc2
            Case 5
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then
                        If dcl*dlg>0 Then Continue For
                    End If
                    If dcl>1 Or dlg>1 Then
                        dis=nc2-nc1 : pas=9
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c02=c02+cz1+cz2
                Next nc2
            Case 6
        End Select
    Next ij
    sc1(ii)=0
    For ij=0 To 3
        qr1(ii,ij)=1
    Next ij
    For ij=1 To Len(c02)/4
        cz2=mid(c02,3+4*(ij-1),2)
        nc2=asc(cz2,1)-8*asc(cz2,2)+351
        Select Case As Const tra
            Case 0
                If oc1(ii,nc2)=rn Then sc1(ii)=1
                If sc1(ii)=1 Then
                    qr1(ii,0)=0
                    qr1(ii,1)=0
                End If
                If nc2>04 And nc2<08 Then qr1(ii,1)=0
                If nc2<04 Then qr1(ii,0)=0
            Case 1
                If oc1(ii,nc2)=rb Then sc1(ii)=1
                If sc1(ii)=1 Then
                    qr1(ii,2)=0
                    qr1(ii,3)=0
                End If
                If nc2>55 And nc2<60 Then qr1(ii,2)=0
                If nc2>60 Then qr1(ii,3)=0
        End Select
    Next ij
Next ii

Redim As String c07(1 To Len(c06)/4)

For ii=1 To Len(c06)/4
    c09=""
    For ij=1 To Len(c07(ii))/4
        cz1=mid(c07(ii),1+4*(ij-1),2)
        cz2=mid(c07(ii),3+4*(ij-1),2)
        c03=cz1+cz2
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        nc2=asc(cz2,1)-8*asc(cz2,2)+351
        dcl=abs(col(nc1)-col(nc2))
        dlg=abs(lig(nc1)-lig(nc2))
        For ik=0 To 63
            ocb(ik)=oc1(ii,ik)
        Next ik
        If nat(oc1(ii,nc1))=pio Then
            If dlg=2 Then
                Select Case As Const tra
                    Case 0
                        If nc1=48 And oc1(ii,41)=2 Then ocb(41)=0
                        If nc1=55 And oc1(ii,46)=2 Then ocb(46)=0
                        If col(nc1)>0 And col(nc1)<7 Then
                            If oc1(ii,nc1-7)=02 Then ocb(nc1-7)=0
                            If oc1(ii,nc1-9)=02 Then ocb(nc1-9)=0
                        End If
                    Case 1
                        If nc1=08 And oc1(ii,17)=1 Then ocb(17)=0
                        If nc1=15 And oc1(ii,22)=1 Then ocb(22)=0
                        If col(nc1)>0 And col(nc1)<7 Then
                            If oc1(ii,nc1+9)=01 Then ocb(nc1+9)=0
                            If oc1(ii,nc1+7)=01 Then ocb(nc1+7)=0
                        End If
                End Select
            End If
        End If
        ocb(nc2)=ocb(nc1)
        ocb(nc1)=0
        ps1=""
        Select Case As Const tra
            Case 0
                For ik=0 To 63
                    If cpc(ocb(ik))=bla Then ps1=ps1+caz(ik)
                Next ik
            Case 1
                For ik=0 To 63
                    If cpc(ocb(ik))=noi Then ps1=ps1+caz(ik)
                Next ik
        End Select
        c02=""
        For ik=1 To Len(ps1)/2
            cz1=mid(ps1,1+2*(ik-1),2)
            nc1=asc(cz1,1)-8*asc(cz1,2)+351
            Select Case As Const nat(ocb(nc1))
                Case 1
                    Select Case As Const tra
                        Case 0
                            For nc2=0 To 63
                                If nat(ocb(nc2))<roi Then Continue For
                                If lig(nc2)>lig(nc1)-1 Then Continue For
                                If lig(nc2)<lig(nc1)-2 Then Continue For
                                dcl=abs(col(nc1)-col(nc2))
                                dlg=abs(lig(nc1)-lig(nc2))
                                If ocb(nc2)=0 Then
                                    If dcl>0 Then Continue For
                                    If ocb(nc1-8)>0 Then Continue For
                                    If lig(nc1)<6 And dlg>1 Then Continue For
                                End If
                                If ocb(nc2)>0 Then
                                    If dlg>1 Then Continue For
                                    If dcl<>1 Then Continue For
                                End If
                                cz2=caz(nc2)
                                c02=c02+cz1+cz2
                            Next nc2
                        Case 1
                            For nc2=0 To 63
                                If nat(ocb(nc2))<roi Then Continue For
                                If lig(nc2)<lig(nc1)+1 Then Continue For
                                If lig(nc2)>lig(nc1)+2 Then Continue For
                                dcl=abs(col(nc1)-col(nc2))
                                dlg=abs(lig(nc1)-lig(nc2))
                                If ocb(nc2)=0 Then
                                    If dcl>0 Then Continue For
                                    If ocb(nc1+8)>0 Then Continue For
                                    If lig(nc1)>1 And dlg>1 Then Continue For
                                End If
                                If ocb(nc2)>0 Then
                                    If dlg>1 Then Continue For
                                    If dcl<>1 Then Continue For
                                End If
                                cz2=caz(nc2)
                                c02=c02+cz1+cz2
                            Next nc2
                    End Select
                Case 2
                    For nc2=0 To 63
                        If nat(ocb(nc2))<roi Then
                            Continue For
                        End If
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl*dlg=0 Then Continue For
                        If dcl+dlg<>3 Then Continue For
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 3
                    For nc2=0 To 63
                        If nat(ocb(nc2))<roi Then
                            Continue For
                        End If
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl<>dlg Then Continue For
                        If dcl>1 Then
                            dis=nc2-nc1
                            pas=7
                            If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                            If 2*dis<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 4
                    For nc2=0 To 63
                        If nat(ocb(nc2))<roi Then
                            Continue For
                        End If
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl*dlg>0 Then Continue For
                        If dcl+dlg>1 Then
                            dis=nc2-nc1
                            pas=8
                            If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                            If dis*2<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 5
                    For nc2=0 To 63
                        If nat(ocb(nc2))<roi Then
                            Continue For
                        End If
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl<>dlg Then
                            If dcl*dlg>0 Then Continue For
                        End If
                        If dcl>1 Or dlg>1 Then
                            dis=nc2-nc1 : pas=9
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                            If dis*2<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 6
                    For nc2=0 To 63
                        If nat(ocb(nc2))<roi Then
                            Continue For
                        End If
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl>1 Or dlg>1 Then Continue For
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
            End Select
        Next ik
        hcs=0
        For ik=1 To Len(c02)/4
            cz2=mid(c02,3+4*(ik-1),2)
            nc2=asc(cz2,1)-8*asc(cz2,2)+351
            Select Case As Const tra
                Case 0
                    If ocb(nc2)=rn Then hcs=1
                Case 1
                    If ocb(nc2)=rb Then hcs=1
            End Select
        Next ik
        If hcs=0 Then c09=c09+c03
    Next ij
    c07(ii)=c09
Next ii


For ii=1 To Len(c06)/4
    cz1=mid(c06,1+4*(ii-1),2)
    cz2=mid(c06,3+4*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    dcl=abs(col(nc1)-col(nc2))
    dlg=abs(lig(nc1)-lig(nc2))
    For ij=0 To 63
        oc1(ii,ij)=oc(ij)
    Next ij
    If nat(oc(nc1))=pio And lig(nc2)=0 Then oc1(ii,nc1)=db
    If nat(oc(nc1))=pio And lig(nc2)=7 Then oc1(ii,nc1)=dn
    If nat(oc(nc1))=pio Then
        If dlg=2 Then
            Select Case As Const tra
                Case 0
                    If nc1=48 And oc(41)=2 Then oc1(ii,41)=0
                    If nc1=55 And oc(46)=2 Then oc1(ii,46)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1-7)=02 Then oc1(ii,nc1-7)=0
                        If oc(nc1-9)=02 Then oc1(ii,nc1-9)=0
                    End If
                Case 1
                    If nc1=08 And oc(17)=1 Then oc1(ii,17)=0
                    If nc1=15 And oc(22)=1 Then oc1(ii,22)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1+9)=01 Then oc1(ii,nc1+9)=0
                        If oc(nc1+7)=01 Then oc1(ii,nc1+7)=0
                    End If
            End Select
        End If
    End If
    If nat(oc(nc1))=roi Then
        If dcl=2 Then
            If nc2=2 Then
                oc1(ii,00)=0
                oc1(ii,03)=8
            End If
            If nc2=6 Then
                oc1(ii,07)=0
                oc1(ii,05)=8
            End If
            If nc2=58 Then
                oc1(ii,56)=0
                oc1(ii,59)=7
            End If
            If nc2=62 Then
                oc1(ii,63)=0
                oc1(ii,61)=7
            End If
        End If
    End If
    oc1(ii,nc2)=oc1(ii,nc1)
    oc1(ii,nc1)=0
    ps2=""
    Select Case As Const tra
        Case 0
            For ij=0 To 63
                If cpc(oc1(ii,ij))=noi Then ps2=ps2+caz(ij)
            Next ij
        Case 1
            For ij=0 To 63
                If cpc(oc1(ii,ij))=bla Then ps2=ps2+caz(ij)
            Next ij
    End Select
    c07(ii)=""
    For ij=1 To Len(ps2)/2
        cz1=mid(ps2,1+2*(ij-1),2)
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        Select Case As Const nat(oc1(ii,nc1))
            Case 1
                Select Case As Const tra
                    Case 0
                        For nc2=0 To 63
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                            If lig(nc2)<lig(nc1)+1 Then Continue For
                            If lig(nc2)>lig(nc1)+2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If oc1(ii,nc2)=0 Then
                                If dcl>0 Then Continue For
                                If oc1(ii,nc1+8)>0 Then Continue For
                                If lig(nc1)>1 And dlg>1 Then Continue For
                            End If
                            If oc1(ii,nc2)>0 Then
                                If dlg>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c07(ii)=c07(ii)+cz1+cz2
                        Next nc2
                    Case 1
                        For nc2=0 To 63
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                            If lig(nc2)>lig(nc1)-1 Then Continue For
                            If lig(nc2)<lig(nc1)-2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If oc1(ii,nc2)=0 Then
                                If dcl>0 Then Continue For
                                If oc1(ii,nc1-8)>0 Then Continue For
                                If lig(nc1)<6 And dlg>1 Then Continue For
                            End If
                            If oc1(ii,nc2)>0 Then
                                If dlg>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c07(ii)=c07(ii)+cz1+cz2
                        Next nc2
                End Select
            Case 2
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                    End Select
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg=0 Then Continue For
                    If dcl+dlg<>3 Then Continue For
                    cz2=caz(nc2)
                    c07(ii)=c07(ii)+cz1+cz2
                Next nc2
            Case 3
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then Continue For
                    If dcl>1 Then
                        dis=nc2-nc1
                        pas=7
                        If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                        If 2*dis<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c07(ii)=c07(ii)+cz1+cz2
                Next nc2
            Case 4
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg>0 Then Continue For
                    If dcl+dlg>1 Then
                        dis=nc2-nc1
                        pas=8
                        If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c07(ii)=c07(ii)+cz1+cz2
                Next nc2
            Case 5
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then
                        If dcl*dlg>0 Then Continue For
                    End If
                    If dcl>1 Or dlg>1 Then
                        dis=nc2-nc1 : pas=9
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If oc1(ii,nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c07(ii)=c07(ii)+cz1+cz2
                Next nc2
            Case 6
                For nc2=0 To 63
                    Select Case As Const tra
                        Case 0
                            If cpc(oc1(ii,nc2))=noi Then Continue For
                        Case 1
                            If cpc(oc1(ii,nc2))=bla Then Continue For
                    End Select
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl>2 Or dlg>1 Then Continue For
                    Select Case As Const tra
                        Case 0
                            If nc1=60 And nc2=58 Then
                                If oc1(ii,59)=0 And oc1(ii,57)=0 And oc1(ii,56)=7 Then
                                    If rq(2)=1 And qr1(ii,2)=1 Then
                                        cz2=caz(nc2)
                                        c07(ii)=c07(ii)+cz1+cz2
                                        Continue For
                                    End If
                                    Continue For
                                End If
                            End If
                            If nc1=60 And nc2=62 Then
                                If oc1(ii,61)=0 And oc1(ii,63)=7 Then
                                    If rq(3)=1 And qr1(ii,3)=1 Then
                                        cz2=caz(nc2)
                                        c07(ii)=c07(ii)+cz1+cz2
                                        Continue For
                                    End If
                                    Continue For
                                End If
                            End If
                        Case 1
                            If nc1=4 And nc2=2 Then
                                If oc1(ii,3)=0 And oc1(ii,1)=0 And oc1(ii,0)=8 Then
                                    If rq(0)=1 And qr1(ii,0)=1 Then
                                        cz2=caz(nc2)
                                        c07(ii)=c07(ii)+cz1+cz2
                                        Continue For
                                    End If
                                    Continue For
                                End If
                            End If
                            If nc1=4 And nc2=6 Then
                                If oc1(ii,5)=0 And oc1(ii,7)=8 Then
                                    If rq(1)=1 And qr1(ii,1)=1 Then
                                        cz2=caz(nc2)
                                        c07(ii)=c07(ii)+cz1+cz2
                                        Continue For
                                    End If
                                    Continue For
                                End If
                            End If
                    End Select
                    If dcl>1 Then Continue For
                    cz2=caz(nc2)
                    c07(ii)=c07(ii)+cz1+cz2
                Next nc2
        End Select
    Next ij
Next ii


Redim As String c08(1 To Len(c06)/4)
For ii=1 To Len(c06)/4
    c08(ii)=c07(ii)
Next ii


For ii=1 To Len(c06)/4
    If ii=1 Then ij=len(c08(ii))/4
    If Len(c08(ii))/4>ij Then ij=len(c08(ii))/4
Next ii : kk=ij

Redim As Integer sc2(1 To Len(c06)/4,1 To ij)
Redim As Integer qr2(1 To Len(c06)/4,1 To ij,3)
Redim As Integer oc2(1 To Len(c06)/4,1 To ij,63)

For ii=1 To Len(c06)/4
    For ij=1 To Len(c08(ii))/4
        cz1=mid(c08(ii),1+4*(ij-1),2)
        cz2=mid(c08(ii),3+4*(ij-1),2)
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        nc2=asc(cz2,1)-8*asc(cz2,2)+351
        dcl=abs(col(nc1)-col(nc2))
        dlg=abs(lig(nc1)-lig(nc2))
        For ik=0 To 63
            ocb(ik)=oc1(ii,ik)
        Next ik
        If nat(oc1(ii,nc1))=pio And lig(nc2)=0 Then ocb(nc1)=db
        If nat(oc1(ii,nc1))=pio And lig(nc2)=7 Then ocb(nc1)=dn
        If nat(oc1(ii,nc1))=pio Then
            If dlg=2 Then
                Select Case As Const tra
                    Case 0
                        If nc1=48 And oc1(ii,41)=2 Then ocb(41)=0
                        If nc1=55 And oc1(ii,46)=2 Then ocb(46)=0
                        If col(nc1)>0 And col(nc1)<7 Then
                            If oc1(ii,nc1-7)=02 Then ocb(nc1-7)=0
                            If oc1(ii,nc1-9)=02 Then ocb(nc1-9)=0
                        End If
                    Case 1
                        If nc1=08 And oc1(ii,17)=1 Then ocb(17)=0
                        If nc1=15 And oc1(ii,22)=1 Then ocb(22)=0
                        If col(nc1)>0 And col(nc1)<7 Then
                            If oc1(ii,nc1+9)=01 Then ocb(nc1+9)=0
                            If oc1(ii,nc1+7)=01 Then ocb(nc1+7)=0
                        End If
                End Select
            End If
        End If
        If nat(oc1(ii,nc1))=roi Then
            If dcl=2 Then
                If nc2=2 Then
                    ocb(0)=0
                    ocb(3)=8
                End If
                If nc2=6 Then
                    ocb(7)=0
                    ocb(5)=8
                End If
                If nc2=58 Then
                    ocb(56)=0
                    ocb(59)=7
                End If
                If nc2=62 Then
                    ocb(63)=0
                    ocb(61)=7
                End If
            End If
        End If
        ocb(nc2)=ocb(nc1)
        ocb(nc1)=0
        For ik=0 To 63
            oc2(ii,ij,ik)=ocb(ik)
        Next ik
        ps2=""
        Select Case As Const tra
            Case 0
                For ik=0 To 63
                    If cpc(ocb(ik))=noi Then ps2=ps2+caz(ik)
                Next ik
            Case 1
                For ik=0 To 63
                    If cpc(ocb(ik))=bla Then ps2=ps2+caz(ik)
                Next ik
        End Select
        c01=""
        For ik=1 To Len(ps2)/2
            cz1=mid(ps2,1+2*(ik-1),2)
            nc1=asc(cz1,1)-8*asc(cz1,2)+351
            Select Case As Const nat(ocb(nc1))
                Case 1
                    Select Case As Const tra
                        Case 0
                            For nc2=0 To 63
                                If cpc(ocb(nc2))=noi Then Continue For
                                If lig(nc2)<lig(nc1)+1 Then Continue For
                                If lig(nc2)>lig(nc1)+2 Then Continue For
                                dcl=abs(col(nc1)-col(nc2))
                                dlg=abs(lig(nc1)-lig(nc2))
                                If ocb(nc2)=0 Then
                                    If dcl>0 Then Continue For
                                    If ocb(nc1+8)>0 Then Continue For
                                    If lig(nc1)>1 And dlg>1 Then Continue For
                                End If
                                If ocb(nc2)>0 Then
                                    If dlg>1 Then Continue For
                                    If dcl<>1 Then Continue For
                                End If
                                cz2=caz(nc2)
                                c01=c01+cz1+cz2
                            Next nc2
                        Case 1
                            For nc2=0 To 63
                                If cpc(ocb(nc2))=bla Then Continue For
                                If lig(nc2)>lig(nc1)-1 Then Continue For
                                If lig(nc2)<lig(nc1)-2 Then Continue For
                                dcl=abs(col(nc1)-col(nc2))
                                dlg=abs(lig(nc1)-lig(nc2))
                                If ocb(nc2)=0 Then
                                    If dcl>0 Then Continue For
                                    If ocb(nc1-8)>0 Then Continue For
                                    If lig(nc1)<6 And dlg>1 Then Continue For
                                End If
                                If ocb(nc2)>0 Then
                                    If dlg>1 Then Continue For
                                    If dcl<>1 Then Continue For
                                End If
                                cz2=caz(nc2)
                                c01=c01+cz1+cz2
                            Next nc2
                    End Select
                Case 2
                    For nc2=0 To 63
                        Select Case As Const tra
                            Case 0
                                If cpc(ocb(nc2))=noi Then Continue For
                            Case 1
                                If cpc(ocb(nc2))=bla Then Continue For
                        End Select
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl*dlg=0 Then Continue For
                        If dcl+dlg<>3 Then Continue For
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 3
                    For nc2=0 To 63
                        Select Case As Const tra
                            Case 0
                                If cpc(ocb(nc2))=noi Then Continue For
                            Case 1
                                If cpc(ocb(nc2))=bla Then Continue For
                        End Select
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl<>dlg Then Continue For
                        If dcl>1 Then
                            dis=nc2-nc1
                            pas=7
                            If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                            If 2*dis<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 4
                    For nc2=0 To 63
                        Select Case As Const tra
                            Case 0
                                If cpc(ocb(nc2))=noi Then Continue For
                            Case 1
                                If cpc(ocb(nc2))=bla Then Continue For
                        End Select
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl*dlg>0 Then Continue For
                        If dcl+dlg>1 Then
                            dis=nc2-nc1
                            pas=8
                            If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                            If dis*2<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 5
                    For nc2=0 To 63
                        Select Case As Const tra
                            Case 0
                                If cpc(ocb(nc2))=noi Then Continue For
                            Case 1
                                If cpc(ocb(nc2))=bla Then Continue For
                        End Select
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dcl<>dlg Then
                            If dcl*dlg>0 Then Continue For
                        End If
                        If dcl>1 Or dlg>1 Then
                            dis=nc2-nc1 : pas=9
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                            If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                            If dis*2<dis Then pas=0-pas
                            nps=dis/pas
                            ji=1
                            Do
                                If ocb(nc1+ji*pas)>0 Then Continue For
                                ji=ji+1
                            Loop Until ji=nps
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 6
                    For nc2=0 To 63
                        Select Case As Const tra
                            Case 0
                                If cpc(ocb(nc2))=noi Then Continue For
                            Case 1
                                If cpc(ocb(nc2))=bla Then Continue For
                        End Select
                        If nc2=nc1 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If dlg>1 Then Continue For
                        If dcl>1 Then Continue For
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
            End Select
        Next ik
        sc2(ii,ij)=0
        For ik=0 To 3
            qr2(ii,ij,ik)=1
        Next ik
        For ik=1 To Len(c01)/4
            cz2=mid(c01,3+4*(ik-1),2)
            nc2=asc(cz2,1)-8*asc(cz2,2)+351
            Select Case As Const tra
                Case 0
                    If ocb(nc2)=rb Then sc2(ii,ij)=1
                    If sc2(ii,ij)=1 Then
                        qr2(ii,ij,2)=0
                        qr2(ii,ij,3)=0
                    End If
                    If nc2>55 And nc2<60 Then qr2(ii,ij,2)=0
                    If nc2>60 Then qr2(ii,ij,3)=0
                Case 1
                    If ocb(nc2)=rn Then sc2(ii,ij)=1
                    If sc2(ii,ij)=1 Then
                        qr2(ii,ij,0)=0
                        qr2(ii,ij,1)=0
                    End If
                    If nc2>04 And nc2<08 Then qr2(ii,ij,1)=0
                    If nc2<04 Then qr2(ii,ij,0)=0
            End Select
        Next ik
    Next ij
Next ii


For ii=0 To 63
    oc0(ii)=oc(ii)
Next ii
For ii=0 To 03
    rq0(ii)=rq(ii)
Next ii
sch0=sch
c050=c05
c060=c06


Redim As Integer sch2(1 To Len(c06)/4,1 To kk)
Redim As String c052(01 To Len(c06)/4,1 To kk)
Redim As String c062(01 To Len(c06)/4,1 To kk)
jj=len(c06)/4
ki=1
un:
For ii=0 To 3
    rq(ii)=rq2(ki,ii)
Next ii
jk=len(c08(ki))/4
kj=1
deux:
For ii=0 To 63
    oc(ii)=oc2(ki,kj,ii)
Next ii

ps1=""
ps2=""
Select Case As Const tra
    Case 0
        For ii=0 To 63
            If cpc(oc(ii))=bla Then ps1=ps1+caz(ii)
            If cpc(oc(ii))=noi Then ps2=ps2+caz(ii)
        Next ii
    Case 1
        For ii=0 To 63
            If cpc(oc(ii))=noi Then ps1=ps1+caz(ii)
            If cpc(oc(ii))=bla Then ps2=ps2+caz(ii)
        Next ii
End Select


c01=""
For ii=1 To Len(ps2)/2
    cz1=mid(ps2,1+2*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    Select Case As Const nat(oc(nc1))
        Case 1
            Select Case As Const tra
                Case 0
                    For nc2=0 To 63
                        If cpc(oc(nc2))=noi Then Continue For
                        If lig(nc2)<lig(nc1)+1 Then Continue For
                        If lig(nc2)>lig(nc1)+2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1+8)>0 Then Continue For
                            If lig(nc1)>1 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
                Case 1
                    For nc2=0 To 63
                        If cpc(oc(nc2))=bla Then Continue For
                        If lig(nc2)>lig(nc1)-1 Then Continue For
                        If lig(nc2)<lig(nc1)-2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1-8)>0 Then Continue For
                            If lig(nc1)<6 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c01=c01+cz1+cz2
                    Next nc2
            End Select
        Case 2
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg=0 Then Continue For
                If dcl+dlg<>3 Then Continue For
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 3
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then Continue For
                If dcl>1 Then
                    dis=nc2-nc1
                    pas=7
                    If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                    If 2*dis<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 4
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg>0 Then Continue For
                If dcl+dlg>1 Then
                    dis=nc2-nc1
                    pas=8
                    If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 5
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=noi Then Continue For
                    Case 1
                        If cpc(oc(nc2))=bla Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then
                    If dcl*dlg>0 Then Continue For
                End If
                If dcl>1 Or dlg>1 Then
                    dis=nc2-nc1 : pas=9
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c01=c01+cz1+cz2
            Next nc2
        Case 6
    End Select
Next ii


sch=0
For ii=0 To 3
    qr(ii)=1
Next ii
For ii=1 To Len(c01)/4
    cz2=mid(c01,3+4*(ii-1),2)
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    Select Case As Const tra
        Case 0
            If oc(nc2)=rb Then sch=1
            If sch=1 Then
                qr(2)=0
                qr(3)=0
            End If
            If nc2>55 And nc2<60 Then qr(2)=0
            If nc2>60 Then qr(3)=0
        Case 1
            If oc(nc2)=rn Then sch=1
            If sch=1 Then
                qr(0)=0
                qr(1)=0
            End If
            If nc2>04 And nc2<08 Then qr(1)=0
            If nc2<04 Then qr(0)=0
    End Select
Next ii


c02=""
For ii=1 To Len(ps1)/2
    cz1=mid(ps1,1+2*(ii-1),2)
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    Select Case As Const nat(oc(nc1))
        Case 1
            Select Case As Const tra
                Case 0
                    For nc2=0 To 63
                        If cpc(oc(nc2))=bla Then Continue For
                        If lig(nc2)>lig(nc1)-1 Then Continue For
                        If lig(nc2)<lig(nc1)-2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1-8)>0 Then Continue For
                            If lig(nc1)<6 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
                Case 1
                    For nc2=0 To 63
                        If cpc(oc(nc2))=noi Then Continue For
                        If lig(nc2)<lig(nc1)+1 Then Continue For
                        If lig(nc2)>lig(nc1)+2 Then Continue For
                        dcl=abs(col(nc1)-col(nc2))
                        dlg=abs(lig(nc1)-lig(nc2))
                        If oc(nc2)=0 Then
                            If dcl>0 Then Continue For
                            If oc(nc1+8)>0 Then Continue For
                            If lig(nc1)>1 And dlg>1 Then Continue For
                        End If
                        If oc(nc2)>0 Then
                            If dlg>1 Then Continue For
                            If dcl<>1 Then Continue For
                        End If
                        cz2=caz(nc2)
                        c02=c02+cz1+cz2
                    Next nc2
            End Select
        Case 2
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg=0 Then Continue For
                If dcl+dlg<>3 Then Continue For
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 3
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then Continue For
                If dcl>1 Then
                    dis=nc2-nc1
                    pas=7
                    If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                    If 2*dis<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 4
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl*dlg>0 Then Continue For
                If dcl+dlg>1 Then
                    dis=nc2-nc1
                    pas=8
                    If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 5
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl<>dlg Then
                    If dcl*dlg>0 Then Continue For
                End If
                If dcl>1 Or dlg>1 Then
                    dis=nc2-nc1 : pas=9
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                    If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                    If dis*2<dis Then pas=0-pas
                    nps=dis/pas
                    ij=1
                    Do
                        If oc(nc1+ij*pas)>0 Then Continue For
                        ij=ij+1
                    Loop Until ij=nps
                End If
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
        Case 6
            For nc2=0 To 63
                Select Case As Const tra
                    Case 0
                        If cpc(oc(nc2))=bla Then Continue For
                    Case 1
                        If cpc(oc(nc2))=noi Then Continue For
                End Select
                If nc2=nc1 Then Continue For
                dcl=abs(col(nc1)-col(nc2))
                dlg=abs(lig(nc1)-lig(nc2))
                If dcl>2 Or dlg>1 Then Continue For
                Select Case As Const tra
                    Case 0
                        If nc1=60 And nc2=58 Then
                            If oc(59)=0 And oc(57)=0 And oc(56)=7 Then
                                If rq(2)=1 And qr(2)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                        If nc1=60 And nc2=62 Then
                            If oc(61)=0 And oc(63)=7 Then
                                If rq(3)=1 And qr(3)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                    Case 1
                        If nc1=4 And nc2=2 Then
                            If oc(3)=0 And oc(1)=0 And oc(0)=8 Then
                                If rq(0)=1 And qr(0)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                        If nc1=4 And nc2=6 Then
                            If oc(5)=0 And oc(7)=8 Then
                                If rq(1)=1 And qr(1)=1 Then
                                    cz2=caz(nc2)
                                    c02=c02+cz1+cz2
                                    Continue For
                                End If
                                Continue For
                            End If
                        End If
                End Select
                If dcl>1 Then Continue For
                cz2=caz(nc2)
                c02=c02+cz1+cz2
            Next nc2
    End Select
Next ii


c05=""
For ii=1 To Len(c02)/4
    cz1=mid(c02,1+4*(ii-1),2)
    cz2=mid(c02,3+4*(ii-1),2)
    c03=cz1+cz2
    nc1=asc(cz1,1)-8*asc(cz1,2)+351
    nc2=asc(cz2,1)-8*asc(cz2,2)+351
    For ij=0 To 63
        ocb(ij)=oc(ij)
    Next ij
    If nat(oc(nc1))=pio Then
        If Abs(lig(nc1)-lig(nc2))=2 Then
            Select Case As Const tra
                Case 0
                    If nc1=48 And oc(41)=2 Then ocb(41)=0
                    If nc1=55 And oc(46)=2 Then ocb(46)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1-7)=02 Then ocb(nc1-7)=0
                        If oc(nc1-9)=02 Then ocb(nc1-9)=0
                    End If
                Case 1
                    If nc1=08 And oc(17)=1 Then ocb(17)=0
                    If nc1=15 And oc(22)=1 Then ocb(22)=0
                    If col(nc1)>0 And col(nc1)<7 Then
                        If oc(nc1+9)=01 Then ocb(nc1+9)=0
                        If oc(nc1+7)=01 Then ocb(nc1+7)=0
                    End If
            End Select
        End If
    End If
    ocb(nc2)=ocb(nc1)
    ocb(nc1)=0
    ps2=""
    Select Case As Const tra
        Case 0
            For ij=0 To 63
                If cpc(ocb(ij))=noi Then ps2=ps2+caz(ij)
            Next ij
        Case 1
            For ij=0 To 63
                If cpc(ocb(ij))=bla Then ps2=ps2+caz(ij)
            Next ij
    End Select
    c04=""
    For ij=1 To Len(ps2)/2
        cz1=mid(ps2,1+2*(ij-1),2)
        nc1=asc(cz1,1)-8*asc(cz1,2)+351
        Select Case As Const nat(ocb(nc1))
            Case 1
                Select Case As Const tra
                    Case 0
                        For nc2=0 To 63
                            If nat(ocb(nc2))<roi Then Continue For
                            If lig(nc2)<lig(nc1)+1 Then Continue For
                            If lig(nc2)>lig(nc1)+2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If ocb(nc2)=0 Then
                                If dcl>0 Then Continue For
                                If ocb(nc1+8)>0 Then Continue For
                                If lig(nc1)>1 And dlg>1 Then
                                    Continue For
                                End If
                            End If
                            If ocb(nc2)>0 Then
                                If dlg<>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c04=c04+cz1+cz2
                        Next nc2
                    Case 1
                        For nc2=0 To 63
                            If nat(ocb(nc2))<roi Then Continue For
                            If lig(nc2)>lig(nc1)-1 Then Continue For
                            If lig(nc2)<lig(nc1)-2 Then Continue For
                            dcl=abs(col(nc1)-col(nc2))
                            dlg=abs(lig(nc1)-lig(nc2))
                            If ocb(nc2)=0 Then
                                If dcl>0 Then Continue For
                                If ocb(nc1-8)>0 Then Continue For
                                If lig(nc1)<6 And dlg>1 Then
                                    Continue For
                                End If
                            End If
                            If ocb(nc2)>0 Then
                                If dlg<>1 Then Continue For
                                If dcl<>1 Then Continue For
                            End If
                            cz2=caz(nc2)
                            c04=c04+cz1+cz2
                        Next nc2
                End Select
            Case 2
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg=0 Then Continue For
                    If dcl+dlg<>3 Then Continue For
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 3
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then Continue For
                    If dcl>1 Then
                        dis=nc2-nc1
                        pas=7
                        If Abs(dis/7)<>Fix(Abs(dis/7)) Then pas=9
                        If 2*dis<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 4
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl*dlg>0 Then Continue For
                    If dcl+dlg>1 Then
                        dis=nc2-nc1
                        pas=8
                        If Abs(dis/8)<>Fix(Abs(dis/8)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 5
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dcl<>dlg Then
                        If dcl*dlg>0 Then Continue For
                    End If
                    If dcl>1 Or dlg>1 Then
                        dis=nc2-nc1 : pas=9
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=8
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=7
                        If Abs(dis/pas)<>Fix(Abs(dis/pas)) Then pas=1
                        If dis*2<dis Then pas=0-pas
                        nps=dis/pas
                        ik=1
                        Do
                            If ocb(nc1+ik*pas)>0 Then Continue For
                            ik=ik+1
                        Loop Until ik=nps
                    End If
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
            Case 6
                For nc2=0 To 63
                    If nat(ocb(nc2))<roi Then
                        Continue For
                    End If
                    If nc2=nc1 Then Continue For
                    dcl=abs(col(nc1)-col(nc2))
                    dlg=abs(lig(nc1)-lig(nc2))
                    If dlg>1 Then Continue For
                    If dcl>1 Then Continue For
                    cz2=caz(nc2)
                    c04=c04+cz1+cz2
                Next nc2
        End Select
    Next ij
    hcs=0
    For ij=1 To Len(c04)/4
        cz2=mid(c04,3+4*(ij-1),2)
        nc2=asc(cz2,1)-8*asc(cz2,2)+351
        Select Case As Const tra
            Case 0
                If ocb(nc2)=rb Then hcs=1
            Case 1
                If ocb(nc2)=rn Then hcs=1
        End Select
    Next ij
    If hcs=0 Then c05=c05+c03
Next ii


c06=c05


sch2(ki,kj)=sch
c052(ki,kj)=c05
c062(ki,kj)=c06
kj=kj+1
If kj<jk+1 Then Goto deux
ki=ki+1
If ki<jj+1 Then Goto un


Redim As Integer n99(1 To jj)
For ii=1 To jj
    c10=mid(c060,1+4*(ii-1),4)
    cz1=mid(c10,1,2)
    cz2=mid(c10,3,2)
    nc1 = Asc(cz1,1)-8*asc(cz1,2)+351
    nc2 = Asc(cz2,1)-8*asc(cz2,2)+351
    dcl=abs(col(nc1)-col(nc2))
    dlg=abs(lig(nc1)-lig(nc2))
    n01=0 : n02=0 : n03=0 : n04=0 : n05=0 : n06=0 : n07=0 : n08=0
    n09=0 : n10=0 : n11=0 : n12=0 : n13=0 : n14=0 : n15=0 : n16=0
    n17=0 : n18=0 : n19=0 : n20=0 : n21=0 : n22=0 : n23=0 : n24=0
    n25=0 : n26=0 : n27=0 : n28=0 : n29=0 : n30=0 : n31=0 : n32=0

    If sc1(ii)=1 Then n01=1

    If n01=1 And Len(c08(ii))/4=0 Then n02=99

    For ij=1 To Len(c08(ii))/4
        If Len(c062(ii,ij))/4=0 Then
            If sc2(ii,ij)=1 Then
                n03=-99
            End If
        End If
    Next ij

    For ij=1 To Len(c08(ii))/4
        cz4=mid(c08(ii),3+4*(ij-1),2)
        nc4=asc(cz4,1)-8*asc(cz4,2)+351
        If nc4=nc2 Then
            n04=-nat(oc1(ii,nc2))
        End If
    Next ij

    For ij=1 To Len(c08(ii))/4
        cz4=mid(c08(ii),3+4*(ij-1),2)
        nc4=asc(cz4,1)-8*asc(cz4,2)+351
        If oc1(ii,nc4)>0 Then
            n05=n05-nat(oc1(ii,nc4))
        End If
    Next ij

    If oc0(nc2)=0 Then
        For ij=1 To Len(c08(ii))/4
            cz3=mid(c08(ii),1+4*(ij-1),2)
            cz4=mid(c08(ii),3+4*(ij-1),2)
            nc3=asc(cz3,1)-8*asc(cz3,2)+351
            nc4=asc(cz4,1)-8*asc(cz4,2)+351
            If nc4=nc2 Then
                For ik=1 To Len(c062(ii,ij))/4
                    cz5=mid(c062(ii,ij),1+4*(ik-1),2)
                    cz6=mid(c062(ii,ij),3+4*(ik-1),2)
                    nc5=asc(cz5,1)-8*asc(cz5,2)+351
                    nc6=asc(cz6,1)-8*asc(cz6,2)+351
                    If nc6=nc4 Then
                        ll=nat(oc0(nc1))
                        lm=nat(oc1(ii,nc3))
                        ln=nat(oc2(ii,ij,nc5))
                        If lm>=ll+ln Then
                            n04=0
                        End If
                    End If
                Next ik
            End If
        Next ij
    End If

    If oc0(nc2)>0 Then
        For ij=1 To Len(c08(ii))/4
            cz3=mid(c08(ii),1+4*(ij-1),2)
            cz4=mid(c08(ii),3+4*(ij-1),2)
            nc3=asc(cz3,1)-8*asc(cz3,2)+351
            nc4=asc(cz4,1)-8*asc(cz4,2)+351
            If nc4=nc2 Then
                For ik=1 To Len(c062(ii,ij))/4
                    cz5=mid(c062(ii,ij),1+4*(ik-1),2)
                    cz6=mid(c062(ii,ij),3+4*(ik-1),2)
                    nc5=asc(cz5,1)-8*asc(cz5,2)+351
                    nc6=asc(cz6,1)-8*asc(cz6,2)+351
                    If nc6=nc4 Then
                        ll=nat(oc0(nc2))
                        lm=nat(oc1(ii,nc2))
                        ln=nat(oc2(ii,ij,nc2))
                        ml=nat(oc2(ii,ij,nc5))
                        If ll+ln>=lm+ml Then
                            n04=0
                        End If
                    End If
                Next ik
            End If
        Next ij
    End If

    If oc0(nc2)>0 Then
        If n04=0 Then n06=9
        If nat(oc0(nc2))>=nat(oc1(ii,nc2)) Then
            n06=9
        End If
    End If

    If nat(oc1(ii,nc2))=pio Then n07=3
    If nat(oc1(ii,nc2))=cav Then n07=2
    If nat(oc1(ii,nc2))=fou Then n07=2
    If nat(oc1(ii,nc2))=tou Then n07=0
    If nat(oc1(ii,nc2))=dam Then n07=1
    If nat(oc1(ii,nc2))=roi Then n07=0

    If nat(oc1(ii,nc2))=pio Then
        If col(nc2)=3 Or col(nc2)=4 Then n08=0
        If col(nc2)=2 Or col(nc2)=5 Then n08=-1
        If col(nc2)=1 Or col(nc2)=6 Then n08=-1
        If col(nc2)=0 Or col(nc2)=7 Then n08=-2
    End If

    If nat(oc1(ii,nc2))=cav Then
        If col(nc2)=0 Then n09=-1
        If col(nc2)=7 Then n09=-1
        If tra=0 And lig(nc2)=6 Then n10=-1
        If tra=1 And lig(nc2)=1 Then n10=-1
        If tra=0 And lig(nc1)=7 Then n11=1
        If tra=1 And lig(nc1)=0 Then n11=1
    End If

    If nat(oc1(ii,nc2))=fou Then
        If tra=0 And lig(nc1)=7 Then n12=1
        If tra=1 And lig(nc1)=0 Then n12=1
    End If

    If nat(oc1(ii,nc2))=tou Then
    End If

    If nat(oc1(ii,nc2))=dam Then
    End If

    If nat(oc1(ii,nc2))=roi Then
        If dcl=2 Then n14=3
    End If

    For ij=0 To 63
        If oc1(ii,ij)=0 Then Continue For
        If tra=0 And cpc(oc1(ii,ij))=noi Then Continue For
        If tra=1 And cpc(oc1(ii,ij))=bla Then Continue For
        Select Case As Const nat(oc1(ii,ij))
            Case pio
                Select Case As Const tra
                    Case 0
                        If oc1(ii,ij+7)=pb Or oc1(ii,ij+9)=pb Then n15=n15+1
                        If oc1(ii,ij+7)=rb Or oc1(ii,ij+9)=rb Then n16=n16+1
                    Case 1
                        If oc1(ii,ij-9)=pn Or oc1(ii,ij-7)=pn Then n15=n15+1
                        If oc1(ii,ij-9)=rn Or oc1(ii,ij-7)=rn Then n16=n16+1
                End Select
            Case cav
            Case fou
                Select Case As Const tra
                    Case 0
                    Case 1
                End Select
            Case tou
            Case dam
            Case roi
        End Select
    Next ij

    For ij=1 To Len(c08(ii))/4
        cz3=mid(c08(ii),1+4*(ij-1),2)
        nc3=asc(cz3,1)-8*asc(cz3,2)+351
        If nat(oc1(ii,nc3))=roi Then n32=n32-1
    Next ij

    n99(ii)=n01+n02+n03+n04+n05+n06+n07+n08+n09+n10+n11+n12+n13
    n99(ii)=n99(ii)+n14+n15+n16+n17+n18+n19+n20+n21+n22+n23+n24
    n99(ii)=n99(ii)+n25+n26+n27+n28+n29+n30+n31+n32
Next ii


n98=0
For ii=1 To jj
    If ii=1 Then n98=n99(ii)
    If n99(ii)>n98 Then
        n98=n99(ii)
    End If
Next ii
c11=""
For ii=1 To jj
    c10=mid(c060,1+4*(ii-1),4)
    If n99(ii)=n98 Then
        c11=c11+c10
    End If
Next ii
c12=""
If Len(c11)/4=1 Then c12=c11
If Len(c11)/4>1 Then
    c12=left(c11,4)
End If


demande:
Select Case As Const jeu
    Case 0
        Select Case As Const tra
            Case 0
                Do
                Loop Until inkey=""
                Color Rgb(t1,t2,t3) : Draw String (328,392),c12
                Color Rgb(r1,r2,r3) : Draw String (320,392),":"
                Windowtitle "ESCHECS"+space(3)+av1
                Locate 50,42 : Input "",c13
                Line (0,0)-(399, 415),,B
                Windowtitle "ESCHECS"
                If Len(c13)<>4 Then
                    End
                End If
                If c13="blan" Then
                    jeu=0
                    Goto nouvelle
                End If
                If c13="noir" Then
                    jeu=1
                    Goto nouvelle
                End If
                If c13="auto" Then
                    jeu=2
                    Goto demande
                End If
                If Asc(c13,1)>=97 And Asc(c13,1)<=104 Then fmt(0)=1 Else fmt(0)=0
                If Asc(c13,2)>=49 And Asc(c13,2)<=56  Then fmt(1)=1 Else fmt(1)=0
                If Asc(c13,3)>=97 And Asc(c13,3)<=104 Then fmt(2)=1 Else fmt(2)=0
                If Asc(c13,4)>=49 And Asc(c13,4)<=56  Then fmt(3)=1 Else fmt(3)=0
                If fmt(0)+fmt(1)+fmt(2)+fmt(3)<4 Then Goto demande
            Case 1
                c13=c12
        End Select
    Case 1
        Select Case As Const tra
            Case 0
                c13=c12
            Case 1
                Do
                Loop Until inkey=""
                Color Rgb(t1,t2,t3) : Draw String (328,392),c12
                Color Rgb(r1,r2,r3) : Draw String (320,392),":"
                Windowtitle "ESCHECS"+space(3)+av2
                Locate 50,42 : Input "",c13
                Line (0,0)-(399, 415),,B
                Windowtitle "ESCHECS"
                If Len(c13)<>4 Then
                    End
                End If
                If c13="blan" Then
                    jeu=0
                    Goto nouvelle
                End If
                If c13="noir" Then
                    jeu=1
                    Goto nouvelle
                End If
                If c13="auto" Then
                    jeu=2
                    Goto demande
                End If
                If Asc(c13,1)>=97 And Asc(c13,1)<=104 Then fmt(0)=1 Else fmt(0)=0
                If Asc(c13,2)>=49 And Asc(c13,2)<=56  Then fmt(1)=1 Else fmt(1)=0
                If Asc(c13,3)>=97 And Asc(c13,3)<=104 Then fmt(2)=1 Else fmt(2)=0
                If Asc(c13,4)>=49 And Asc(c13,4)<=56  Then fmt(3)=1 Else fmt(3)=0
                If fmt(0)+fmt(1)+fmt(2)+fmt(3)<4 Then Goto demande
        End Select
    Case 2
        Select Case As Const tra
            Case 0
                c13=c12
            Case 1
                c13=c12
        End Select
    Case 3
        Select Case As Const tra
            Case 0
                Do
                Loop Until inkey=""
                Color Rgb(t1,t2,t3) : Draw String (328,392),c12
                Color Rgb(r1,r2,r3) : Draw String (320,392),":"
                Windowtitle "ESCHECS"+space(3)+av1
                Locate 50,42 : Input "",c13
                Line (0,0)-(399, 415),,B
                Windowtitle "ESCHECS"
                If Len(c13)<>4 Then
                    End
                End If
                If c13="blan" Then
                    jeu=0
                    Goto nouvelle
                End If
                If c13="noir" Then
                    jeu=1
                    Goto nouvelle
                End If
                If c13="auto" Then
                    jeu=2
                    Goto demande
                End If
                If Asc(c13,1)>=97 And Asc(c13,1)<=104 Then fmt(0)=1 Else fmt(0)=0
                If Asc(c13,2)>=49 And Asc(c13,2)<=56  Then fmt(1)=1 Else fmt(1)=0
                If Asc(c13,3)>=97 And Asc(c13,3)<=104 Then fmt(2)=1 Else fmt(2)=0
                If Asc(c13,4)>=49 And Asc(c13,4)<=56  Then fmt(3)=1 Else fmt(3)=0
                If fmt(0)+fmt(1)+fmt(2)+fmt(3)<4 Then Goto demande
            Case 1
                Do
                Loop Until inkey=""
                Color Rgb(t1,t2,t3) : Draw String (328,392),c12
                Color Rgb(r1,r2,r3) : Draw String (320,392),":"
                Windowtitle "ESCHECS"+space(3)+av2
                Locate 50,42 : Input "",c13
                Line (0,0)-(399, 415),,B
                Windowtitle "ESCHECS"
                If Len(c13)<>4 Then
                    End
                End If
                If c13="blan" Then
                    jeu=0
                    Goto nouvelle
                End If
                If c13="noir" Then
                    jeu=1
                    Goto nouvelle
                End If
                If c13="auto" Then
                    jeu=2
                    Goto demande
                End If
                If Asc(c13,1)>=97 And Asc(c13,1)<=104 Then fmt(0)=1 Else fmt(0)=0
                If Asc(c13,2)>=49 And Asc(c13,2)<=56  Then fmt(1)=1 Else fmt(1)=0
                If Asc(c13,3)>=97 And Asc(c13,3)<=104 Then fmt(2)=1 Else fmt(2)=0
                If Asc(c13,4)>=49 And Asc(c13,4)<=56  Then fmt(3)=1 Else fmt(3)=0
                If fmt(0)+fmt(1)+fmt(2)+fmt(3)<4 Then Goto demande
        End Select
End Select
ii=0
For ij=1 To Len(c060)/4
    If c13=mid(c060,1+4*(ij-1),4) Then ii=1
Next ij
If ii=0 Then Goto demande


cz1=mid(c13,1,2) : nc1 = Asc(cz1,1)-8*asc(cz1,2)+351 : nc5=nc1
cz2=mid(c13,3,2) : nc2 = Asc(cz2,1)-8*asc(cz2,2)+351 : nc6=nc2
dcl=abs(col(nc1)-col(nc2))
dlg=abs(lig(nc1)-lig(nc2))
For ii=0 To 63
    oc(ii)=oc0(ii)
Next ii
For ii=0 To 03
    rq(ii)=rq0(ii)
Next ii
If nat(oc(nc1))=pio And lig(nc2)=0 Then oc(nc1)=db
If nat(oc(nc1))=pio And lig(nc2)=7 Then oc(nc1)=dn
If nat(oc(nc1))=pio Then
    If dlg=2 Then
        Select Case As Const tra
            Case 0
                If nc1=48 And oc(41)=2 Then
                    passant=1
                    oc(41)=0
                    nc9=41
                End If
                If nc1=55 And oc(46)=2 Then
                    passant=1
                    oc(46)=0
                    nc9=46
                End If
                If col(nc1)>0 And col(nc1)<7 Then
                    If oc(nc1-7)=02 Then
                        oc(nc1-7)=0
                        nc9=nc1-7
                        passant=1
                    End If
                    If oc(nc1-9)=02 Then
                        oc(nc1-9)=0
                        nc9=nc1-9
                        passant=1
                    End If
                End If
            Case 1
                If nc1=08 And oc(17)=1 Then
                    passant=1
                    oc(17)=0
                    nc9=17
                End If
                If nc1=15 And oc(22)=1 Then
                    passant=1
                    oc(22)=0
                    nc9=22
                End If
                If col(nc1)>0 And col(nc1)<7 Then
                    If oc(nc1+9)=01 Then
                        oc(nc1+9)=0
                        nc9=nc1+9
                        passant=1
                    End If
                    If oc(nc1+7)=01 Then
                        oc(nc1+7)=0
                        nc9=nc1+7
                        passant=1
                    End If
                End If
        End Select
    End If
End If
If nat(oc(nc1))=roi Then
    If dcl=2 Then
        If nc2=2 Then
            oc(00)=0
            oc(03)=8
            roque=1
            nc7=00
            nc8=03
        End If
        If nc2=6 Then
            oc(07)=0
            oc(05)=8
            roque=1
            nc7=07
            nc8=05
        End If
        If nc2=58 Then
            oc(56)=0
            oc(59)=7
            roque=1
            nc7=56
            nc8=59
        End If
        If nc2=62 Then
            oc(63)=0
            oc(61)=7
            roque=1
            nc7=63
            nc8=61
        End If
    End If
End If
If nat(oc(nc1))=tou Then
    If caz(nc1)="a8" And rq(0)=1 Then rq(0)=0
    If caz(nc1)="h8" And rq(1)=1 Then rq(1)=0
    If caz(nc1)="a1" And rq(2)=1 Then rq(2)=0
    If caz(nc1)="h1" And rq(3)=1 Then rq(3)=0
End If
oc(nc2)=oc(nc1)
oc(nc1)=0
ncj=ncj+1
tra=tra+1
If tra=2 Then tra=0
Goto nouveau


figure0:' case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure1:' case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure2:' pion blanc sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure3:' pion blanc sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0

figure4:' pion noir sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure5:' pion noir sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
figure6:' cavalier blanc sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,0,0,0,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,1,1,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,0,0,0,0,0,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,0,1,1,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure7:' cavalier blanc sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,1,0,0,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,0,1,1,1,0,0,0,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,0,0,0,0,0,1,1,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,0,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,0
Data 0,1,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1
Data 0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0
Data 0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0
Data 1,0,0,0,1,1,0,1,1,0,0,0,0,0,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1
Data 0,0,1,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0
Data 0,1,0,0,1,1,1,0,1,1,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 1,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1
Data 0,0,1,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure8:' cavalier noir sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,1,1,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,1,1,0,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,0,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure9:' cavalier noir sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,1,0,0,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,0,0,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1,0
Data 0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1
Data 0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0
Data 0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,1,0,0
Data 1,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1
Data 0,0,1,0,1,1,0,1,1,1,1,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1,0
Data 0,1,0,0,1,1,1,1,1,0,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 1,0,0,0,0,1,1,1,1,0,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1
Data 0,0,1,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure10:' fou blanc sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure11:' fou blanc sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1
Data 0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0
Data 0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,0,0
Data 1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1
Data 0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure12:' fou noir sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,1,1,1,1,1,1,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure13:' fou noir sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,0,1,1,1,1,1,1,1,1,0,1,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,0,0,1,1,1,1,1,1,1,1,0,0,1,0,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0
Data 0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1
Data 0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0
Data 0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0
Data 1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0
Data 0,0,0,1,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,1
Data 0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure14:' tour blanche sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure15:' tour blanche sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure16:' tour noire sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure17:' tour noire sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure18:' dame blanche sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,0,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0
Data 0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,1,1,0,1,1,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0,1,1,0,1,1,0,0
Data 0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0
Data 0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0
Data 0,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,0,1,1,0,0,1,1,1,0,0,0,1,1,1,0,0,1,1,0,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,0,1,1,1,1,0,0,1,1,1,0,1,0,1,1,1,0,0,1,1,1,1,0,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure19:' dame blanche sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,0,1,1,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,0,0,0,0,1,0,1,1,0,1,1,0,1,0,1,1,1,1,1,0,1,0,1,1,0,1,1,0,1,0,0,0,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,1
Data 0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0
Data 0,1,0,1,1,0,1,1,0,1,0,0,1,1,0,0,0,1,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0,1,1,0,1,1,0,0
Data 1,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,1,0,0,1,1,1,0,0,1,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,1,0,0,1,1,1,0,0,1,0,0,1,1,1,0,0,1
Data 0,0,1,0,0,1,1,1,0,0,1,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,1,0,0,1,1,1,0,0,1,0
Data 0,1,0,0,0,0,1,1,0,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,0,1,1,0,0,1,0,0
Data 1,0,0,0,1,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,1
Data 0,0,1,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,0,0,0,1,0
Data 0,1,0,0,0,0,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,0,1,1,1,1,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,1,1,1,0,1,1,0,0,1,1,1,0,0,0,1,1,1,0,0,1,1,0,1,1,1,1,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,0,1,1,1,1,0,0,1,1,1,0,1,0,1,1,1,0,0,1,1,1,1,0,1,1,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,1,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure20:' dame noire sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0
Data 0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,1,1,1,1,1,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,1,1,1,1,1,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,0,0,1,1,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure21:' dame noire sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,0,0,0,0,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,0,1,0,0,0,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,1
Data 0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0
Data 0,1,0,1,1,1,1,1,0,1,0,0,1,1,0,0,0,1,0,1,1,1,0,0,0,0,0,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 1,0,0,1,1,1,1,1,0,0,0,0,1,1,0,0,1,0,0,1,1,1,0,0,1,0,0,1,1,0,0,0,0,1,1,1,1,1,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,1,0,0,1,1,1,0,0,1,0,0,1,1,1,0,0,1
Data 0,0,1,0,0,1,1,0,0,0,1,0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,1,1,0,1,0,0,0,1,1,0,0,1,0
Data 0,1,0,0,0,0,1,1,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,1,1,0,0,1,0,0
Data 1,0,0,0,1,0,1,1,0,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,0,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,0,1
Data 0,0,1,0,0,0,1,1,1,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,0,1,1,1,1,0,0,0,1,1,1,0,0,0,1,0
Data 0,1,0,0,0,0,1,1,1,1,0,0,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,0,0,1,1,1,1,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,0,0,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,0,0,1,1,1,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure22:' roi blanc sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1,1,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure23:' roi blanc sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,0,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1,1,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0
Data 1,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1
Data 0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0
Data 0,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,0
Data 1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1
Data 0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0
Data 0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0
Data 1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0

figure24:' roi noir sur case blanche
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,1,0,1,1,0,1,1,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,1,1,1,1,0,0,0,1,1,0,1,1,0,1,1,0,0,0,1,1,1,1,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,0,0,1,1,0,0,1,1,0,0,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,0,0,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,0,0
Data 0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0
Data 0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0
Data 0,0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

figure25:' roi noir sur case noire
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,0,0,1,1,1,1,1,1,0,0,1,1,0,1,1,0,1,1,0,0,1,1,1,1,1,1,0,0,0,0,0,0,1,0
Data 0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0
Data 1,0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,1,1,0,1,1,0,1,1,1,1,0,0,0,0,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,0,0,1,1,0,0,1,1,1,1,0,0,0,1,1,0,1,1,0,1,1,0,0,0,1,1,1,1,0,0,1,1,0,0,0,0,1
Data 0,0,1,0,1,1,0,0,1,1,1,1,1,1,1,0,0,1,1,0,0,1,1,0,0,1,1,1,1,1,1,1,0,0,1,1,0,0,1,0
Data 0,1,0,0,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,0,0,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,0,1,0,0
Data 1,0,0,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0
Data 0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1
Data 0,0,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,0,1,0
Data 0,1,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,1,0,0
Data 1,0,0,0,0,1,1,1,0,0,1,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,0,0,1,1,1,0,1,0,0,0
Data 0,0,0,1,0,0,1,1,1,0,0,1,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,0,0,1,1,1,0,0,0,0,0,1
Data 0,0,1,0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,1,1,1,0,0,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,1,1,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,0,0,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,0,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,0,0,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,1,1,1,0,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,1,1,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,0,1,0,0,0
Data 0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1
Data 0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0
Data 0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0
Data 1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0