- 调用 释放技能(intXJn3,intYJn3,time3,300,500)
- 注释:BUFF_斥法金刚
- 调用 释放技能(intXJn4,intYJn4,time4,300,500)
- 注释:攻击_嗜血飞斧
- 调用 释放技能(intXJn5,intYJn5,time5,5,500)
- 注释:攻击_霸王翔吼
- 如果 siwangdian <> 3 则
- 调用 释放技能(intXJn6,intYJn6,time6,5,500)
- 条件结束
- 注释:攻击_威临天下
- 调用 释放技能(intXJn7,intYJn7,time7,5,500)
- 注释:攻击_血战八方
- 如果 siwangdian <> 3 则
- 调用 释放技能(intXJn8,intYJn8,time8,5,500)
- 条件结束
- 子程序结束
- 注释:谋士篇
- 子程序 谋士初始化技能坐标
- 调用 查找技能所在坐标("Jn1",wjjnKey1)
- 向调试窗口输出:"气血俱动_技能所在坐标:" & intXJn1 & "," & intYJn1
- 调用 查找技能所在坐标("Jn2",wjjnKey2)
- 向调试窗口输出:"烈焰护体_技能所在坐标:" & intXJn2 & "," & intYJn2
- 子程序结束
- 子程序 谋士出招
- 注释:BUFF_气血俱动
- 调用 释放技能(intXJn1,intYJn1,time1,10,500)
- 注释:BUFF_烈焰护体
- 调用 释放技能(intXJn2,intYJn2,time2,300,500)
- 子程序结束
- 注释:方士篇
- 子程序 方士初始化技能坐标
- 调用 查找技能所在坐标("Jn1",wjjnKey1)
- 向调试窗口输出:"寒冰护体_技能所在坐标:" & intXJn1 & "," & intYJn1
- 调用 查找技能所在坐标("Jn2",wjjnKey2)
- 向调试窗口输出:"邪心共鸣_技能所在坐标:" & intXJn2 & "," & intYJn2
- 调用 查找技能所在坐标("Jn3",wjjnKey3)
- 向调试窗口输出:"嗜血无痕_技能所在坐标:" & intXJn3 & "," & intYJn3
- 调用 查找技能所在坐标("Jn4",wjjnKey4)
- 向调试窗口输出:"镇心理气_技能所在坐标:" & intXJn4 & "," & intYJn4
- 子程序结束
- 子程序 方士出招
- 注释:BUFF_寒冰护体
- 调用 释放技能(intXJn1,intYJn1,time1,60,500)
- 注释:攻击_邪心共鸣
- 如果 siwangdian <> 5 则
- 调用 释放技能(intXJn2,intYJn2,time2,20,500)
- 条件结束
- 注释:攻击_嗜血无痕
- 调用 释放技能(intXJn3,intYJn3,time3,20,500)
- 子程序结束
- 子程序 方士自动治疗
- 标记 X1(子程序 方士自动治疗)
- 令 GetColor = Bkgnd.GetPixelColor(hwnd,195,44)
- 延时 300 毫秒
- 如果 GetColor <> "190073" 则
- 如果 intYJn2 > 0 并且 intXJn2 > 0 则
- 调用 Bkgnd.LeftDoubleClick(hwnd,intXJn4,intYJn4)
- 否则
- 调用 Bkgnd.LeftDoubleClick(hwnd,256,570)
- 条件结束
- 延时 3000 毫秒
- 调用 异常判断()
- 跳转到标记 X1(子程序 方士自动治疗)
- 条件结束
- 子程序结束
- 注释:整理
- 子程序 打开宝箱
- 注释:打开宝箱
- 令 XY = Bkgnd.FindColor(Hwnd,255,175,472,425,"0000FF")
- 令 ZB = InStr(XY,"|")
- 令 X = Clng(Left(XY,ZB - 1))
- 令 Y = Clng(Right(XY,Len(XY) - ZB))
- 调用 Bkgnd.LeftClick(Hwnd,x,y)
- 延时 1000 毫秒
- 调用 Bkgnd.LeftClick(Hwnd,x,y)
- 延时 1000 毫秒
- 调用 Bkgnd.LeftClick(Hwnd,x + 45,y + 20)
- 延时 1000 毫秒
- 子程序结束
- 子程序 整理
- 注释:开包整理
- 调用 Bkgnd.KeyPress(hwnd,123)
- 延时 500 毫秒
- 注释:打开包裹
- 调用 Bkgnd.KeyPress(hwnd,66)
- 延时 1000 毫秒
- 调用 Bkgnd.LeftClick(hwnd,417,480)
- 延时 1000 毫秒
- 注释:打开宝箱
- 调用 打开宝箱()
- 注释:点击分解
- 调用 Bkgnd.LeftClick(hwnd,461,479)
- 延时 500 毫秒
- 注释:第四行第一格
- 调用 分解(271,297)
- 注释:第四行第二个
- 调用 分解(306,295)
- 注释:第四行第三个
- 调用 分解(344,303)
- 注释:第四行第四个