- (语句无法识别,可能有错误): DimEnv Hwnd //定义环境变量(多线程需要)
- (语句无法识别,可能有错误): Global Hwnd1 //定义全局变量(多线程需要)
- 弹出窗口 "点击窗口运行脚本"
- (鼠标)等待按鼠标键
- (语句无法识别,可能有错误): Hwnd = Plugin.Window.MousePoint() //得到鼠标指向的窗口句柄
- 令 Hwnd1 = Hwnd
- (语句无法识别,可能有错误): BeginThread 决战30 //启动线程 决战30
- (语句无法识别,可能有错误): Delay 100 //延时100毫秒
- 令 ii = 0
- 循环当 ii = 0 时
- 注释:不要退出脚本
- 循环结束
- 脚本停止运行
- 子程序 决战30()
- (语句无法识别,可能有错误): Hwnd2 = Hwnd1 //首先获取环境变量 窗口句柄 (用于后台执行)
- 注释:MessageBox "运行窗口句柄:" & Hwnd2
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 667, 30) //点击 日常标
- 延时 2000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 383, 124) //点击 决战签
- 延时 2000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 372, 294) //点击 30级决战
- 延时 2000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 473, 211) //点击 挂机停止
- 循环 150 次
- 延时 1000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 510, 470) //点击 进入战场
- 延时 2000 毫秒
- 令 xxyy = BkgndColor.FindColorEx(Hwnd2,496,215,500,218,"FFFFFF",0,0.9)
- (语句无法识别,可能有错误): dim okok //分割字符串
- 令 okok = Split(xxyy,"|")
- (语句无法识别,可能有错误): xx = Clng(okok(0)): yy = Clng(okok(1)) //将字符串转换成数值
- 如果 xx > 495 则
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 500,214) //点击 ok
- 注释:Msgbox "后台窗口颜色X坐标="& xx & " Y坐标=" & yy
- 跳出循环
- 条件结束
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 352,467) //点击 开始战斗
- 延时 3000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.LeftClick(Hwnd2, 518,247) //点击 战斗胜利确定
- 循环结束
- 弹出窗口 "今日决战任务完成"
- 子程序结束