A=2 "按下向左走“A”键的时间"
UserVar D=2 "按下向右走“D”键的时间"

MessageBox "即将运行《龙之刃》自动遇敌脚本，请用鼠标点击一下需要运行脚本的画面，然后按“确定”开始运行脚本。——BonBonCat"
//获得鼠标指定的窗口句柄
Hwnd = Plugin.Window.MousePoint()

//得到窗口客户区域大小
sRect = Plugin.Window.GetClientRect(Hwnd)
MyArray = Split(sRect, "|")   
L = Clng(MyArray(0)): T = Clng(MyArray(1))   
R = Clng(MyArray(2)): B = Clng(MyArray(3))   

Rem walk
//通过右上角色块获取非战斗状态信息
//按下A键向左
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 970, 74)
Delay 10
If GetColor = "02409E" then
    Delay 100
    Call Plugin.Bkgnd.KeyDown(Hwnd, 65)
    Delay A*1000
    Call Plugin.Bkgnd.KeyUp(Hwnd, 65)
    Delay 500
Else 
    Delay 1000
    Goto walk
End If 
//按下D键向右
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 970, 74)
Delay 10
If GetColor = "02409E" then
    Delay 100
    Call Plugin.Bkgnd.KeyDown(Hwnd, 68)
    Delay D*1000
    Call Plugin.Bkgnd.KeyUp(Hwnd, 68)
    Delay 500
Else 
    Delay 1000
    Goto walk
End If


Goto walk