1. 用户定义变量 fbl=0 "分辨率"
  2. 用户定义变量 zdjh=0 "自动加红"
  3. 用户定义变量 zdjl=0 "自动加蓝"
  4. 用户定义变量 sgdd=2000 "打怪后等待时间,1秒=1000毫秒"
  5. 用户定义变量 djpl=200 "点击频率,1秒=1000毫秒"
  6. 用户定义变量 sjsy=0 "随机使用"
  7. 如果 fbl = 0 则
  8.     调用 zddg()
  9. 否则如果 fbl = 1 则
  10.     调用 zddgck()
  11. 条件结束
  12. (语句无法识别,可能有错误): Sub zddg() //--------------------------------------------------------------1280*768,执行下面的脚本
  13. 标记 dz
  14. 延时 sgdd 毫秒
  15. 标记 tz
  16. 延时 15 毫秒
  17. 从左上到右下查找图片 "Attachment:\lj.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1270 下:550),相似度 0.9
  18. 如果 intX > 0 并且 intY > 0 则
  19.     (鼠标)移动到 (intX + 30, intY + 80)
  20.     延时 djpl 毫秒
  21.     (鼠标)左键单击, 1次
  22.     跳转到标记 dz
  23. 否则如果 sjsy = 1 则
  24.     (键盘)按 3 键, 1次
  25.     延时 500 毫秒
  26.     跳转到标记 tz
  27. 条件结束
  28. 跳转到标记 tz
  29. 子程序结束
  30. (语句无法识别,可能有错误): Sub zddgck() //----------------------------------------------------------------窗口模式时,执行一下脚本
  31. 令 Hwnd = Window.Find(0,"【魔域】")
  32. 令 sRect = Window.GetClientRect(Hwnd)
  33. 定义变量 myck
  34. 令 myck = Split(sRect,"|")
  35. 令 Cx = CLng(myck(0))
  36. (语句无法识别,可能有错误): Cy = Clng(myck(1)) //-----窗口坐标赋值完成-----
  37. 标记 dz1
  38. 延时 sgdd 毫秒
  39. 标记 tz1
  40. 延时 15 毫秒
  41. 从左上到右下查找图片 "Attachment:\lj.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 + Cx 上:0 + Cy 右:1011 + Cx 下:550 + Cy),相似度 0.9
  42. 如果 intX > 0 并且 intY > 0 则
  43.     (鼠标)移动到 (intX + 30, intY + 80)
  44.     延时 djpl 毫秒
  45.     (鼠标)左键单击, 1次
  46.     跳转到标记 dz1
  47. 否则如果 sjsy = 1 则
  48.     (键盘)按 3 键, 1次
  49.     延时 500 毫秒
  50.     跳转到标记 tz1
  51. 条件结束
  52. 跳转到标记 tz1
  53. 子程序结束