(0)或者标题("魔神无双-东胜神洲-五行山(V10024)"),返回找到的句柄Hwnd
Hwnd = Plugin.Window.Find(0, "魔神无双-东胜神洲-五行山(V10024)")
//得到窗口句柄的客户区大小
Rect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray=Split(Rect,"|")
Ux=CLng(MyArray(0))
Uy=CLng(MyArray(1))
//常用写法！最终得出游戏窗口的起始坐标Ux，Uy
Rem 寻怪
KeyPress "Space", 2
Delay 200
Call 吃药()
KeyPress "Tab", 1
Delay 100
IfColor 443+Ux,19+Uy,"80AEB0",0 Then
    Rem 打怪
    Call 吃药()
KeyPress "1", 1
    Delay 1000
    IfColor 479+Ux,39+Uy,"B79",0 Then
        KeyPress "2", 1
        Delay 200
        KeyPress "3", 1
        Delay 200
        KeyPress "4", 1
                Delay 200
        KeyPress "5", 1
                Delay 200
        KeyPress "6", 1
                        Delay 200
    Goto 打怪
Else
    Goto 寻怪
End If
Else
Goto 寻怪
End If
Sub 吃药()
    FindPic 175+Ux,708+Uy,200+Ux,712+Uy,"Attachment:\血空.bmp",0.4,hyX,hyY
//以下是条件判断；如果返回的坐标大于0，那么就说明找到了。
If hyX > 0 And hyY > 0 Then
    //在这里可以添加找到坐标后，需要做的处理。
            KeyPress "F1", 1
                Delay 5000
        End If
        FindPic 813+Ux,730+Uy,839+Ux,736+Uy,"Attachment:\蓝空.bmp",0.4,lyX,lyY
If lyX > 0 And lyY > 0 Then
        KeyPress "F2", 1
                            Delay 5000
End If
End Sub