【功能说明】 

自动打怪 自动加血 自动加兰 自动捡取 

【使用说明】 

1、红放F1键，兰放F2键。 

2、1键放普通功击，2、3键放功击技能。 

3、窗口化游戏进入，本脚本会自动将游戏窗口设为最大化。 

4、请先进入游戏跑到打怪点再运行本脚本。 

5、屏幕分辩率支持两种版本，请先按说明设好，然后在设定窗口选定相应的设置。 

A、1024*768  32位真彩色； 

B、1280*768  32位真彩色。 

6、加红和加兰以百分比形式设定，在设定窗口可以选择。 

运行环境：分辨率：1440×900 色深：32位 操作系统：Windows XP 按键精灵版本：7.00.3730

@cnfull 

UserVar jhp=80 当生命少于%时，使用红药   UserVar jmp=30 当真气少于%时，使用兰药   Delay 300   Rem 开始   Gosub 屏幕检测   Delay 300   EndScript    Sub 屏幕检测       Plugin cx=Sys.GetScRX()       Plugin cy=Sys.GetScRY()       Delay 300       Plugin s=Sys.GetScDep()       Delay 300       If cx=1280 and cy=1024 and s=32           Delay 100           Gosub 窗口检测           Delay 300           Gosub 主程序1       Else            If cx=1024 and cy=768 and s=32               Gosub 窗口检测               Gosub 主程序2           EndIf            VBSCall MessageBox ("检测2：屏幕分辩率或者颜色设置不对，请按标准设置后，重新运行脚本！")       EndScript    EndIf    Return    Sub 窗口检测       Delay 300       Plugin hwnd=Window.Find(0,"Gongfu Client")       Delay 300       If hwnd<>0           Delay 300           Plugin Window.Active(hwnd)           Delay 300           Plugin Window.Max(hwnd)           Delay 300       Else            Delay 300           MessageBox "程序未启动，请先启动程序！重新运行脚本！"       EndScript    EndIf    Return    Sub 主程序1       Gosub 判断血兰1       For 6           KeyPress 192,1           Delay 100       EndFor        KeyPress 9,1       Delay 100       Gosub 打怪1   Return    Sub 打怪1       Rem 技能1       KeyPress 49,1       Delay 100       KeyPress 50,1       Delay 100       KeyPress 51,1       Delay 1000       Gosub 判断血兰1       IfColor 553,82,3938FF,2           Delay 300           Goto 技能1       EndIf        Gosub 主程序1   Return    Sub 判断血兰1       Lx=16       Rx=175       hpy=93       mpy=111       Hcolor="584D3F"       Mcolor="605548"       VBSCall Hpx=int(jhp/100*(RX-lx)+lx)       VBSCall mpx=int(jmp/100*(Rx-lx)+LX)       IfColor Hpx,hpy,Hcolor,2           KeyPress 112,1           Delay 50       EndIf        IfColor mpx,mpy,Mcolor,2           KeyPress 113,1           Delay 50       EndIf    Return    Sub 主程序2       Gosub 判断血兰2       For 6           KeyPress 192,1           Delay 100       EndFor        KeyPress 9,1       Delay 100       Gosub 打怪2   Return    Sub 打怪2       Rem 技能2       KeyPress 49,1       Delay 100       KeyPress 50,1       Delay 100       KeyPress 51,1       Delay 1000       Gosub 判断血兰2       IfColor 441,67,0201EA,0           Delay 300           Goto 技能2       EndIf        Gosub 主程序2   Return    Sub 判断血兰2       Lx=14       Rx=139       hpy=74       mpy=86       Hcolor="574C3E"       Mcolor="524539"       VBSCall hpx=int(jhp/100*(Rx-Lx)+Lx)       VBSCall mpx=int(jmp/100*(Rx-Lx)+Lx)       IfColor Hpx,hpy,Hcolor,2           KeyPress 112,1           Delay 50       EndIf        IfColor mpx,mpy,Mcolor,2           KeyPress 113,1           Delay 50       EndIf    Return