天龙八部按键精灵问题!知道的请指教
我用按键精灵自动打怪,其他功能一切正常唯独这打怪的按键不会按Sub杀怪Rem怪物IfColor247,33,0011FF,2KeyPress113,1Gosub吃药Got...
我用按键精灵自动打怪,其他功能一切正常唯独这打怪的按键不会按
Sub 杀怪
Rem 怪物
IfColor 247,33,0011FF,2
KeyPress 113,1
Gosub 吃药
Goto 怪物
EndIf
Delay 1500
怪可以找到,但是他怎么不打啊?
这是内容:
------------------------------------------------------------------
Rem 找怪
KeyDown 17,1
//按下ctrl
KeyPress 9,1
//击键tab
KeyUp 17,1
//弹起ctrl
//ctrl+tab选怪比鼠标扫描选怪效率高很多
Gosub 杀怪
Goto 找怪
Sub 杀怪
Rem 怪物
IfColor 247,33,0011FF,2
KeyPress 112,1
//F2狂砍
Gosub 吃药
Goto 怪物
EndIf
Delay 1500
//防止有时怪未躺下时提前捡包
Gosub 捡物
Return 杀怪
Sub 吃药
VBS dim hong,lan,hongT,lanT
//F8红,F9蓝,F10宠物红
//在游戏中利用按键抓点抓色工具找到x1,x2,y,color所对应的值并替换。
UserVar hong=30 血量<hong%时,自动吃红。
UserVar lan=30 蓝量<lan%时,自动吃蓝。
UserVar hongT=256 补血延时时间(毫秒)
UserVar lanT=256 补蓝延时时间(毫秒)
Rem 补红
IfColor hong/100*(187-64)+64 31 222222 2
//x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
//y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
KeyPress 119 1
//按下补血快捷键F8
Delay hongT
//补血延时
EndIf
Rem 补兰
IfColor lan/100*(187-64)+64 38 111111 2
KeyPress 120 1
//按下补蓝快捷键F9
Delay lanT
//补蓝延时
EndIf
Rem 补宠
IfColor hong/100*(186-91)+91 70 222222 2
KeyPress 121 1
//按下补血快捷键F10
Delay hongT
//补血延时
EndIf
Return 吃药
Sub 捡物
VBS n = 5
// 定义变量n,用于后面的循环
VBS x = 380
// 定义捡包区域左上角的X坐标
VBS t = 954439560
// 定义鼠标移动到怪物身上后变成包裹形鼠标的值,请使用抓点抓色功能得到
While n >= 0
// 如果n大于等于0,则执行循环
VBS y = 200
// 定义找怪区域左上角的Y坐标
MoveTo x,y
// 鼠标移动到坐标x,y
// 条件结束
VBS z =9
While z >= 0
VBS y = y +30
// y坐标增加30
VBS z = z - 1
MoveTo x,y
Delay 10
VBSCall k=GetCursorShape(0)
If k = t
RightClick 1
Delay 50
Goto 找怪
EndIf
EndWhile
VBS x = x + 50
// x坐标增加50
VBS n = n - 1
EndWhile
Return 捡物
希望知道的告诉我,小弟谢谢了!!!!
这是图片 展开
Sub 杀怪
Rem 怪物
IfColor 247,33,0011FF,2
KeyPress 113,1
Gosub 吃药
Goto 怪物
EndIf
Delay 1500
怪可以找到,但是他怎么不打啊?
这是内容:
------------------------------------------------------------------
Rem 找怪
KeyDown 17,1
//按下ctrl
KeyPress 9,1
//击键tab
KeyUp 17,1
//弹起ctrl
//ctrl+tab选怪比鼠标扫描选怪效率高很多
Gosub 杀怪
Goto 找怪
Sub 杀怪
Rem 怪物
IfColor 247,33,0011FF,2
KeyPress 112,1
//F2狂砍
Gosub 吃药
Goto 怪物
EndIf
Delay 1500
//防止有时怪未躺下时提前捡包
Gosub 捡物
Return 杀怪
Sub 吃药
VBS dim hong,lan,hongT,lanT
//F8红,F9蓝,F10宠物红
//在游戏中利用按键抓点抓色工具找到x1,x2,y,color所对应的值并替换。
UserVar hong=30 血量<hong%时,自动吃红。
UserVar lan=30 蓝量<lan%时,自动吃蓝。
UserVar hongT=256 补血延时时间(毫秒)
UserVar lanT=256 补蓝延时时间(毫秒)
Rem 补红
IfColor hong/100*(187-64)+64 31 222222 2
//x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
//y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
KeyPress 119 1
//按下补血快捷键F8
Delay hongT
//补血延时
EndIf
Rem 补兰
IfColor lan/100*(187-64)+64 38 111111 2
KeyPress 120 1
//按下补蓝快捷键F9
Delay lanT
//补蓝延时
EndIf
Rem 补宠
IfColor hong/100*(186-91)+91 70 222222 2
KeyPress 121 1
//按下补血快捷键F10
Delay hongT
//补血延时
EndIf
Return 吃药
Sub 捡物
VBS n = 5
// 定义变量n,用于后面的循环
VBS x = 380
// 定义捡包区域左上角的X坐标
VBS t = 954439560
// 定义鼠标移动到怪物身上后变成包裹形鼠标的值,请使用抓点抓色功能得到
While n >= 0
// 如果n大于等于0,则执行循环
VBS y = 200
// 定义找怪区域左上角的Y坐标
MoveTo x,y
// 鼠标移动到坐标x,y
// 条件结束
VBS z =9
While z >= 0
VBS y = y +30
// y坐标增加30
VBS z = z - 1
MoveTo x,y
Delay 10
VBSCall k=GetCursorShape(0)
If k = t
RightClick 1
Delay 50
Goto 找怪
EndIf
EndWhile
VBS x = x + 50
// x坐标增加50
VBS n = n - 1
EndWhile
Return 捡物
希望知道的告诉我,小弟谢谢了!!!!
这是图片 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询