1. 展开附件 *.dll 到 .\plugin 文件夹
  2. 展开附件 *.bmp 到 f:\plugin\大漠梦想 文件夹
  3. 展开附件 *.txt 到 F:\plugin\大漠梦想 文件夹
  4. 展开附件 dm.dll 到 F:\plugin\大漠梦想 文件夹
  5. 注释:↑PutAttachment释放附件
  6. 注释: Call Plugin.DBSoft.RegDBSoft("0731A74F3AA9DC55C27CA168D151F792")
  7. 注释:↑大兵·注册
  8. 调用 RegDll.Reg("F:\plugin\大漠梦想\dm.dll")
  9. 令 dm = createobject("dm.dmsoft")
  10. dm.SetPath("F:\plugin\大漠梦想")
  11. 注释:↑大漠·注册
  12. dm.SetDict(0,"F:\plugin\大漠梦想\总字库.txt")
  13. 令 Hwnd = Window.Find("TianLongBaBu WndClass",0)
  14. 调用 Window.Active(Hwnd)
  15. 令 sRect = Window.GetClientRect(Hwnd)
  16. 定义变量 Array
  17. 令 Array = Split(sRect,"|")
  18. 令 Ux = CLng(Array(0))
  19. 令 Uy = CLng(Array(1))
  20. 令 Ux1 = CLng(Array(2))
  21. 令 Uy1 = CLng(Array(3))
  22. 注释: 去西湖
  23. 令 sTime3 = Sys.GetTime()
  24. 从左上到右下查找颜色 "00131B",把找到的坐标保存到 (X, Y),指定区域(左:0 上:0 右:1024 下:768)
  25. 注释:以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
  26. 如果 X > 0 并且 Y > 0 则
  27.     注释:在这里可以添加找到坐标后,需要做的处理。
  28.     (鼠标)移动到 (X, Y)
  29.     (鼠标)左键单击, 1次
  30.     延时 500 毫秒
  31.     从左上到右下查找颜色 "63F2FF",把找到的坐标保存到 (X, Y),指定区域(左:0 上:0 右:1024 下:768)
  32.     如果 X > 0 并且 Y > 0 则
  33.         (鼠标)移动到 (X, Y)
  34.         (鼠标)左键单击, 1次
  35.         延时 100 毫秒
  36.         (鼠标)移动到 (X + 30, Y)
  37.         (鼠标)左键单击, 1次
  38.         延时 100 毫秒
  39.         输入文本 "279"
  40.         延时 100 毫秒
  41.         (鼠标)移动到 (X + 60, Y)
  42.         (鼠标)左键单击, 1次
  43.         输入文本 "416"
  44.         (鼠标)移动到 (X + 120, Y)
  45.         (鼠标)左键单击, 1次
  46.         延时 4000 毫秒
  47.         (键盘)按 "Enter" 键, 1次
  48.         延时 5000 毫秒
  49.     条件结束
  50. 条件结束
  51. (鼠标)移动到 (490 + Ux, 329 + Uy)
  52. (鼠标)左键单击, 1次
  53. 延时 1500 毫秒
  54. 标记 加血
  55. 注释:80%时加血
  56. 令 sTime1 = Sys.GetTime()
  57. 如果点 (193 + Ux,34 + Uy) 的颜色等于 "393939" 则
  58.     延时 200 毫秒
  59.     (键盘)按 "F7" 键, 1次
  60.     延时 5000 毫秒
  61. 否则
  62. 条件结束
  63. 注释:90%时加蓝
  64. 如果点 (197 + Ux,43 + Uy) 的颜色等于 "373737" 则
  65.     延时 200 毫秒
  66.     (键盘)按 "F10" 键, 1次
  67.     延时 200 毫秒
  68. 否则
  69. 条件结束
  70. 标记 走步
  71. 向调试窗口输出:"1"
  72. 从左上到右下查找颜色 "FF1C51",把找到的坐标保存到 (X, Y),指定区域(左:0 上:0 右:1024 下:768)
  73. 如果 X > 0 并且 Y > 0 则
  74.     (鼠标)移动到 (200 + X, Y + 200)
  75.     延时 200 毫秒
  76.     (鼠标)左键单击, 1次
  77.     延时 1500 毫秒
  78. 条件结束
  79. 标记 寻怪打怪
  80. 调用 时间调用()
  81. 从左上到右下查找颜色 "00A8FB",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768)
  82. 如果 intX > 0 并且 intY > 0 则
  83.     向调试窗口输出:intX & "," & intY
  84.     (鼠标)移动到 (intX, intY)
  85.     (鼠标)左键双击, 1次
  86.     延时 2000 毫秒
  87.     (键盘)按 "F11" 键, 1次
  88.     延时 100 毫秒
  89.     标记 继续打怪
  90.     循环 2 次
  91.         (键盘)按 "F1" 键, 1次
  92.         延时 1000 毫秒
  93.         向调试窗口输出:"3"
  94.     循环结束
  95.     调用 判断是否死亡()
  96.     (键盘)按 "F9" 键, 1次
  97.     延时 1500 毫秒
  98.     调用 捡包()
  99.     延时 200 毫秒
  100.     调用 判断周围是否还有怪()