UC知道按键精灵转按键游侠
来源：百度知道 编辑：UC知道 时间：2024/06/10 18:24:04
UserVar pddy=0
UserVar t1=0
UserVar ZDMB=0
UserVar QJAX=0
UserVar wq=2
UserVar t=3
UserVar c=0,c2=0
UserVar YS=5
UserVar IsFZ=1
UserVar Wait=1
UserVar Fight=0
UserVar mbx,mby,tc,chaoshi
UserVar repair
tc=0
Gosub 环境判断
Rem 等待中
Wait=1
Fight=0
Gosub 准备游戏
Fight=1
Wait=0
Gosub 环境判断
HH259=0
repair=0
chaoshi=0
ZDMB=0
krs=0
fx=2
Rem 尚未开始战斗
KeyPressS 83,2
Delay 100
KeyDownS 83,1
Delay 2000
Rem 战斗开始
Fight=1
Wait=0
Gosub 肉肉攻击
EndScript
Sub 环境判断
TracePrint fight
Rem 环境判断start
Delay 50
VBSCall FindPic(738,0,875,68,"准备标记.bmp",1,intX,intY)
If intX>=0 and intY>=0
If Fight=0
Goto 返回调用处
EndIf
KeyUpS 87,1
KeyUpS 32,1
RightUpS 1
Goto 等待中
Else
End
UserVar t1=0
UserVar ZDMB=0
UserVar QJAX=0
UserVar wq=2
UserVar t=3
UserVar c=0,c2=0
UserVar YS=5
UserVar IsFZ=1
UserVar Wait=1
UserVar Fight=0
UserVar mbx,mby,tc,chaoshi
UserVar repair
tc=0
Gosub 环境判断
Rem 等待中
Wait=1
Fight=0
Gosub 准备游戏
Fight=1
Wait=0
Gosub 环境判断
HH259=0
repair=0
chaoshi=0
ZDMB=0
krs=0
fx=2
Rem 尚未开始战斗
KeyPressS 83,2
Delay 100
KeyDownS 83,1
Delay 2000
Rem 战斗开始
Fight=1
Wait=0
Gosub 肉肉攻击
EndScript
Sub 环境判断
TracePrint fight
Rem 环境判断start
Delay 50
VBSCall FindPic(738,0,875,68,"准备标记.bmp",1,intX,intY)
If intX>=0 and intY>=0
If Fight=0
Goto 返回调用处
EndIf
KeyUpS 87,1
KeyUpS 32,1
RightUpS 1
Goto 等待中
Else
End
//首先把运行的窗口在前台打开，然后把下面那一句的"窗口标题"
//改成运行的窗口的标题加双引号
Plugin hwnd=Window.Find(0,"窗口标题")
Plugin Window.Active(hwnd)
//需要先得到可以发送按键消息的窗口
Plugin hwnd = Window.GetKeyFocusWnd()
//等待两秒钟
Delay 2000
rem 循环
//按右方向键
Plugin Window.SendKeyPress(hwnd,39)
Delay 500
goto 循环
//----------------------------------------
//不知道5.50的有没有后台按键这个插件，如果不行的话就上迅雷
//找个5.7以上的吧，我的版本就是5.7的
楼上的 你这答案怎么到处贴 好像在好几个按键精灵的问题上看到一模一样的了 做人要厚道