hwnd=Plugin.Window.MousePoint()
//获得窗口左上角的位置和窗口的大小
rect=Plugin.Window.GetClientRect(hwnd)
If InStrRev(rect,"550|400")=0 Then
    MessageBox "请将鼠标放在游戏窗口内在启动游戏"
    EndScript 
End If 
//获得窗口左上角的坐标，并将坐标作为参考坐标
dw=Split(rect,"|"):dwx=dw(0):dwy=dw(1)
//设置宝石颜色和开始（下一关）的颜色
ys=array("1A85CD","AD2D2D","C0C064","3333CC","2EC7C7","7C20B9","FFFFFF")
//设置一个变量用来控制点开始的次数
ks=0
//无限循环找色
While true
    i=0
    //6种颜色+开始（下一关）按钮的颜色等于7种颜色，循环寻找下这7个色
    For 7
        //以中点向四周找色找到定义的颜色
        Call FindCenterColor(dwx+21,dwy+87,dwx+529,dwy+384,ys(i),x,y)
        If x>0 and y>0 Then
            //判断找到的这个色是否是白色（开始（下一关））的颜色
            If ys(i)="FFFFFF" Then
                // 判断这个颜色是否大于等于10
                If ks>=10 Then
                    //等于10的话也就是第十关结束了，可以结束游戏了
                    MessageBox "游戏全通关"
                    EndScript 
                End If 
                //不等于10还没到第10关，也就是将到下一关。我们将变量加大1
                ks=ks+1
            End If 
            //点击刚才找到的颜色
            MoveTo x,y
            LeftClick 1
        End If 
        //减缓CPU的计算降低CPU用量，根据自己电脑CPU设置。
        Delay 1
        i=i+1
    Next 
Wend