- //下面这句是得到当前最前面的窗口句柄
- 用户定义变量 xue = 80 红少于%加血
- 用户定义变量 lzc = 80 蓝少于%加蓝
- 调用插件命令 Hwnd = Window.Foreground()
- //下面这句是移动窗口到(0, 0)位置
- 调用插件命令 Window.Move(Hwnd, 0, 0)
- 调用子程序 检查红蓝
- 延时1000毫秒
- 标记 没找到
- 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,0,1023,767,"yj.bmp",0.8,x,y)
- 如果表达式 (x>=0 and y>=0) 为真,则
- 鼠标移到 x , y
- 延时100毫秒
- 左键单击
- 否则
- 跳转到标记 没找到
- 条件结束
- 延时500毫秒
- ////////////////////////////////////////////////////////////////////////
- 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,0,1023,767,"yj.bmp",0.8,x,y)
- 如果表达式 (x>=0 and y>=0) 为真,则
- 鼠标移到 x , y+40*3+10
- 延时100毫秒
- 左键单击
- 延时500毫秒
- 左键单击
- 否则
- 条件结束
- 标记 =============进入打怪==================
- //是TU就按ESC 取消自动
- 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,0,1023,767,"yj.bmp",0.8,x,y)
- 如果表达式 (x>=0 and y>=0) 为真,则
- 按键<Esc>
- 延时100毫秒
- 按住<Alt>
- 延时10毫秒
- 按键<D>
- 延时10毫秒
- 弹起<Alt>
- 延时500毫秒
- 按住<Alt>
- 延时10毫秒
- 按键<D>
- 延时10毫秒
- 弹起<Alt>
- //////////防
- 否则
- 鼠标移到 768 , 102
- 延时500毫秒
- 左键单击
- 条件结束
- 标记 打怪延时
- 延时500毫秒
- 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,0,1023,767,"yj.bmp",0.8,x,y)
- 如果表达式 (x>=0 and y>=0) 为真,则
- 否则
- 鼠标移到 768 , 102
- 延时500毫秒
- 左键单击
- 条件结束
- 如果 (58,40) 的颜色等于 #4038f8 则
- 调用子程序 检查红蓝
- 否则
- 延时1000毫秒
- 跳转到标记 打怪延时
- 条件结束
- 如果 (58,53) 的颜色等于 #f86008 则
- 调用子程序 检查红蓝
- 否则
- 条件结束
- 延时1000毫秒
- 跳转到标记 没找到
- 脚本停止运行
- 子程序 检查红蓝
- ////////////////////////////////
- x1=58
- y1=39
- x2=118
- y2=39
- xuet=x2-x1
- //xuet=60
- i=xue/100*xuet
- u=i+58
- 标记 回家血
- 如果 (u,39) 的颜色不等于 #4038f8 则
- 跳转到标记 出去加红
- 否则
- 条件结束
- 标记 ====================以下为加蓝========================
- x11=58
- y22=51
- x111=118
- y222=52
- ///////////////////////以上为坐标////////////////
- lzco=x111-x11
- //lzco=血总长
- lanc=lzco/100*lzco
- //LANC=?
- lann=lanc+58
- //LANN=蓝处始坐标