- 令 x = GetSysInfo.GetScreenResolutionX()
- 令 y = GetSysInfo.GetScreenResolutionY()
- 函数 m_c(img)
- 注释:确定1,确定2,宝箱,全部拾取,再次挑战,片头,查看攻略
- 注释:Call m_c("确定1")
- 从左上到右下查找图片 "Attachment:\" & img & ".bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:x 下:y),相似度 0.8
- 如果 intX > 0 并且 intY > 0 则
- 令 m_c = true
- (鼠标)移动到 (intX + 5, intY + 5)
- (鼠标)左键单击, 1次
- (鼠标)移动到 (0, 0)
- 锁定鼠标位置
- 否则
- 令 m_c = false
- 条件结束
- 函数结束
- 函数 查看攻略()
- 从左上到右下查找图片 "Attachment:\查看攻略.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:x 下:y),相似度 0.8
- 如果 intX > 0 并且 intY > 0 则
- 令 查看攻略 = true
- (键盘)按下 "Right" 键
- 否则
- 令 查看攻略 = false
- (键盘)弹起 "Right" 键
- 条件结束
- 函数结束
- 定义变量 dq_num,dq_fb
- 令 dq_fb = 0
- 用户定义变量 Var1=0 "请输入要进入副本的次数"
- 如果 not IsNumeric(Var1) 则
- 令 Var1 = 0
- 条件结束
- 用户定义变量 dr_num=DropList{"3人":"3"|"2人":"2"|"1人":"1"}=3 "请选择副本中敌人数量"
- 用户定义变量 dz_pb=DropList{"打坐":"1"|"跑步":"0"}=1 "完成副本次数后进行"
- 循环 Var1 次
- 令 dq_fb = dq_fb + 1
- 注释:战斗部分
- 标记 战斗部分
- 注释:dr_num = 3
- 令 dq_num = 0
- 循环 dr_num 次
- 令 dq_num = dq_num + 1
- 循环当 查看攻略() = true 时
- 注释:Call 查看攻略()
- 循环结束
- 调用 Msg.Tips("当前副本第" & dq_fb & "次,第" & dq_num & "次战斗")
- 循环当 m_c("确定1") = false 时
- 注释:Call m_c("确定1")
- 循环结束
- 延时 1000 毫秒
- 循环结束
- 注释:结算部分
- 标记 结算部分
- 循环当 m_c("确定2_2") = false 时
- 注释:Call m_c("确定2") = false
- 循环结束
- 延时 1000 毫秒
- 循环当 m_c("宝箱") = false 时
- 注释:Call m_c("宝箱") = false
- 循环结束
- 循环当 m_c("全部拾取") = false 时
- 注释:Call m_c("全部拾取") = false
- 循环结束
- 注释:循环部分
- 标记 循环部分
- 如果 Var1 = dq_fb 则
- 循环当 m_c("退出") = false 时
- 注释:Call m_c("退出") = false
- 循环结束
- 延时 2000 毫秒
- 否则
- 循环当 m_c("再次挑战") = false 时
- 注释:Call m_c("再次挑战") = false
- 循环结束
- 循环当 m_c("片头") = true 时
- 注释:Call m_c("片头") = true
- 循环结束
- 条件结束
- 循环结束
- 注释:结束部分
- 标记 结束部分
- 如果 dz_pb = 1 则
- 循环当 m_c("练功") = false 时
- 注释:Call m_c("练功") = false
- 循环结束
- 否则
- 循环当 dz_pb = 0 时
- (键盘)按下 "left" 键
- 延时 3000 毫秒
- (键盘)弹起 "left" 键
- 延时 60000 毫秒
- (键盘)按下 "Down" 键
- 延时 1000 毫秒
- (键盘)弹起 "Down" 键
- 延时 60000 毫秒
- (键盘)按下 "Right" 键
- 延时 3000 毫秒
- (键盘)弹起 "Right" 键
- 延时 60000 毫秒
- (键盘)按下 "Up" 键