EndIf 
    i=i+1
EndFor 
VBS i=1
For 350
    If TTx4(i)>0 and TTy4(i)>0
        MoveTo TTx4(i),TTy4(i)
        Delay 10
        LeftClick 1
    EndIf 
    i=i+1
EndFor 
VBS i=1
For 350
    If TTx5(i)>0 and TTy5(i)>0
        MoveTo TTx5(i),TTy5(i)
        Delay 10
        LeftClick 1
    EndIf 
    i=i+1
EndFor 
VBS i=1
For 350
    If TTx6(i)>0 and TTy6(i)>0
        MoveTo TTx6(i),TTy6(i)
        Delay 10
        LeftClick 1
    EndIf 
    i=i+1
EndFor 
EndScript 
//子程序，用于把原始坐标沿点（462.5，260）向左或向右旋转0-60度
Sub 旋转
    dim XX1(350),YY1(350)
    rnd(-1)
    randomize
    VBS a=(2*rnd-1)*3.1415926/3
    For 350
        VBS XX1(i)=(XX(i)-462.5)*cos(a)-(YY(i)-260)*sin(a)+462.5
        VBS YY1(i)=(XX(i)-462.5)*sin(a)+(YY(i)-260)*cos(a)+260
        VBS XX(i)=0:YY(i)=0
        i=i+1
    EndFor 
    VBS i=1
Return 旋转
//子程序，用于把旋转后的坐标点沿点（462.5，260）扩大（缩小）到1-1.5倍
Sub 缩小
    dim f,s,XX2(350),YY2(350)
    rnd(-1)
    randomize
    VBS f=0.5*rnd+1:s=0.5*rnd+1
    For 350
        VBS XX2(i)=462.5+f*(XX1(i)-462.5)
        VBS YY2(i)=260+s*(YY1(i)-260)
        VBS XX1(i)=0:YY1(i)=0
        i=i+1
    EndFor 
    VBS i=1
Return 缩小
//子程序，用于把缩放后的坐标判断条件后传送至相关的值，用于平移
Sub 提取
    If j=1
        dim Tx1(350),Ty1(350)
        For 350
            VBS Tx1(j)=XX2(j):Ty1(j)=YY2(j)
            VBS XX2(j)=0:YY2(j)=0
            j=j+1
        EndFor 
    ElseIf k=1
        dim Tx2(350),Ty2(350)
        For 350
            VBS Tx2(k)=XX2(k):Ty2(k)=YY2(k)
            VBS XX2(k)=0:YY2(k)=0
            k=k+1
        EndFor 
    ElseIf l=1
        dim Tx3(350),Ty3(350)
        For 350
            VBS Tx3(l)=XX2(l):Ty3(l)=YY2(l)
            VBS XX2(l)=0:YY2(l)=0
            l=l+1
        EndFor 
    ElseIf q=1
        dim Tx4(350),Ty4(350)
        For 350
            VBS Tx4(q)=XX2(q):Ty4(q)=YY2(q)
            VBS XX2(q)=0:YY2(q)=0
            q=q+1
        EndFor 
    ElseIf n=1
        dim Tx5(350),Ty5(350)
        For 350
            VBS Tx5(n)=XX2(n):Ty5(n)=YY2(n)
            VBS XX2(n)=0:YY2(n)=0
            n=n+1
        EndFor 
    ElseIf o=1
        dim Tx6(350),Ty6(350)
        For 350
            VBS Tx6(o)=XX2(o):Ty6(o)=YY2(o)