VBS dim hong,lan,hongT,lanT
//F3红,F4蓝
//在游戏中利用按键抓点抓色工具找到x1,x2,y,color所对应的值并替换。
UserVar hong=70 血量
UserVar lanT=256 补蓝延时时间(毫秒)
Rem 开始
//循环开始标记
Delay 32
//循环小延时,防止出现CPU使用率过高,脚本卡
Rem 补红
IfColor hong/100*(x2-x1)+x1,y,color,2
//x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
//y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
KeyPress 114,1
//按下补血快捷键
Delay hongT
//补血延时
EndIf
Rem 补蓝
IfColor lan/100*(x2-x1)+x1,y,color,2
//x2=蓝条在屏幕最右端坐标,x1=蓝条在屏幕最左端坐标,
//y=x1,x2在蓝条中的同一纵坐标,color=蓝条的空蓝颜色值。
KeyPress 115,1
//按下补蓝快捷键
Delay lanT
//补蓝延时
EndIf
Goto 开始
//跳转到循环开始
原来1039.109点上如果红血的话是 XXXXXX颜色,如果血没有了,则这个点上就边成了另外一个颜色。横坐标1039.109 竖坐标390.31 上的颜色是不是为血的颜色 XXXXXX。在游戏上截个血的 颜色。VBSCall FindColor(1039,109,390,31,"XXXXXX",hdx,hdy)
判断是红还是黑。If hdx>0 and hdy>0
Delay 80
如果是红色,就没事。
Else
Delay 80
如果不是了,就按下加血的键。自己加动作。
EndIf
先用查找颜色FINDCOLOR定位血条的开始和终止坐标,以百分比计算当血条不足时,使用快捷方式吃药或鼠标点击都可以!