- 导入程序文件 window.dll
- 开始VBScript块
- win=Window.Foreground()
- client=Window.GetClientRect(win)
- s=split(client,"|")
- qx=s(0)
- qy=s(1)
- zx=s(2)
- zy=s(3)
- 结束VBScript块
- dim ho,la,bh,bl,a,b,c,d,xa,ya,xb,yb,xc,yc,xd,yd,xe,ye,gj,m,n
- 用户定义变量 gj=DropList{是|否}=否 人物是否使用技能攻击
- 用户定义变量 ho=50 血量<hong%时,自动吃红。
- 用户定义变量 la=50 蓝量<lan%时,自动吃蓝。
- 用户定义变量 bh=50 BB血量<hong%时,自动吃红。
- 用户定义变量 bl=50 BB蓝量<lan%时,自动吃蓝。
- a=qx+120+((206-120)*ho)/100
- b=qx+120+((206-120)*la)/100
- c=qx+97+((182-97)*bh)/100
- d=qx+97+((182-97)*bl)/100
- 标记 开始
- 标记 看红
- 标记 看蓝
- 调用插件命令 Window.Active(win)
- 延时32毫秒
- //循环小延时,防止出现CPU使用率过高,脚本卡
- 调用外部VBScript子程序 在屏幕区域里模糊查找颜色(120+qx,65+qy,206+qx,73+qy,"0c03ed",2,0.8,xa,ya)
- 延时32毫秒
- 调用外部VBScript子程序 在屏幕区域里模糊查找颜色(120+qx,65+qy,206+qx,73+qy,"0c03ed",2,0.8,xa,ya)
- 延时32毫秒
- 调用外部VBScript子程序 在屏幕区域里模糊查找颜色(120+qx,65+qy,206+qx,73+qy,"0c03ed",2,0.8,xa,ya)
- 延时32毫秒
- 调用外部VBScript子程序 在屏幕区域里模糊查找颜色(120+qx,65+qy,206+qx,73+qy,"0c03ed",2,0.8,xa,ya)
- 延时32毫秒
- 标记 人物加血
- 如果表达式 (xa<=a) 为真,则
- 如果 (759,10) 的颜色等于 #a27c00 则
- //如果有小地图
- 鼠标移到 60+qx , 37+qy
- 延时500毫秒
- 按键<F1>
- 延时500毫秒
- 左键单击
- 延时2000毫秒
- 条件结束
- 延时32毫秒
- 如果 (628+qx,305+qy) 的颜色大约等于 #205086 则
- //战斗图标
- 鼠标移到 60+qx , 37+qy
- 延时500毫秒
- 按键<F1>
- 延时500毫秒
- 左键单击
- 延时500毫秒
- 标记 攻
- 延时500毫秒
- 按住<Alt>
- 按键<A>
- 弹起<Alt>
- 条件结束
- 延时32毫秒
- 条件结束
- 标记 人物加血结束
- 延时32毫秒
- 标记 人物加蓝
- 如果表达式 (xb<=b) 为真,则
- 如果 (759+qx,10+qy) 的颜色等于 #a27c00 则
- //如果有小地图
- 鼠标移到 60+qx , 37+qy
- 延时500毫秒
- 按键<F2>
- 延时500毫秒
- 左键单击
- 延时2000毫秒
- 条件结束
- 延时32毫秒
- 如果 (628+qx,305+qy) 的颜色大约等于 #205086 则
- //战斗图标
- 鼠标移到 60+qx , 37+qy
- 延时500毫秒
- 按键<F2>
- 延时500毫秒
- 左键单击
- 延时1000毫秒
- 标记 攻
- 延时500毫秒
- 按住<Alt>
- 按键<A>
- 弹起<Alt>
- 条件结束
- 延时32毫秒
- 条件结束
- 标记 人物加蓝结束
- 延时32毫秒
- 标记 bb加血
- 如果表达式 (xc<=c) 为真,则
- 如果 (145+qx,125+qy) 的颜色等于 #90909 则
- //BB技能栏
- 如果 (759+qx,10+qy) 的颜色等于 #a27c00 则
- //如果有小地图