按键精灵脚本源码 《龙之刃》自动遇敌左右按键

【功能说明】 

《龙之刃》通过按键控制人物行动，自动遇敌。 

【使用说明】 

使用该脚本，请勿收起右上角的商城栏。 

鼠标对准浏览器中间，按下快捷键。 

脚本附件：

运行环境：分辨率：1024×768 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：8.11.7459

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  
//通过右上角色块获取非战斗状态信息  
  
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 970, 74)  
  
If GetColor = "02409E" then  
    Delay 100  
    Call Plugin.Bkgnd.KeyDown(Hwnd, 65)  
    Delay 2000  
    Call Plugin.Bkgnd.KeyUp(Hwnd, 65)  
    Delay 500  
Else   
    Delay 1000  
    Goto walk  
End If   
  
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 970, 74)  
  
If GetColor = "02409E" then  
    Delay 100  
    Call Plugin.Bkgnd.KeyDown(Hwnd, 68)  
    Delay 2000  
    Call Plugin.Bkgnd.KeyUp(Hwnd, 68)  
    Delay 500  
Else   
    Delay 1000  
    Goto walk  
End If  
  
  
Goto walk