upy=174                //155
    rightx=99+(GS-1)*30  //162
    downy=185             //235 
    Similar=1
    lx=leftx 
Dim  n,m,p,i,j

n=0
m=1
p=1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number0,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1
            a(n)=fx
            b(n)=0 
        EndIf  
    wend  
    leftx=lx
    m=m-1 
    While n<>m 
        m=n
        FindPic leftx,upy,rightx,downy,number1,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=1 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number2,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=2 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
       FindPic leftx,upy,rightx,downy,number3,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=3 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number4,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=4 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number5,Similar,fx,fy
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=5 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number6,Similar,fx,fy 
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1 
            a(n)=fx 
            b(n)=6 
        EndIf  
    wend  
    leftx=lx 
    m=m-1 
    While n<>m 
        m=n 
        FindPic leftx,upy,rightx,downy,number7,Similar,fx,fy 
        If fx>=0 and fy>=0 
            n=n+1 
            leftx=fx+1