1. 展开附件 *.dll 到 .\plugin 文件夹
  2. 令 Hwnd = Window.Find(0,"地下城与勇士")
  3. 调用 Window.Move(Hwnd,0,0)
  4. 标记 主程序
  5. 调用 判断pl()
  6. 标记 判断
  7. 调用 进图()
  8. 延时 4000 毫秒
  9. 调用 选择打左右()
  10. 调用 捡物()
  11. 调用 回城()
  12. 循环 2 次
  13.     调用 进图1()
  14.     延时 4000 毫秒
  15.     调用 选择打左右()
  16.     调用 捡物()
  17.     调用 回城()
  18. 循环结束
  19. 调用 卖店()
  20. 调用 判断pl()
  21. 调用 结束()
  22. 标记 停止
  23. 子程序 判断pl()
  24.     如果点 (317,554) 的颜色等于 "070709" 则
  25.         调用 结束()
  26.     否则
  27.         跳转到标记 判断(子程序 判断pl)
  28.     条件结束
  29. 子程序结束
  30. 子程序 选择打左右()
  31.     (键盘)按下 "A" 键
  32.     延时 200 毫秒
  33.     (键盘)弹起 "A" 键
  34.     如果点 (3,25) 的颜色等于 "1884EF" 则
  35.         调用 打怪右()
  36.     否则
  37.         调用 打怪左()
  38.     条件结束
  39. 子程序结束
  40. 子程序 进图()
  41.     (鼠标)移动到 (10, 450)
  42.     延时 500 毫秒
  43.     (鼠标)右键单击, 1次
  44.     延时 2000 毫秒
  45.     (鼠标)移动到 (10, 450)
  46.     延时 500 毫秒
  47.     (鼠标)右键单击, 1次
  48.     延时 2000 毫秒
  49.     (鼠标)移动到 (236, 101)
  50.     延时 3000 毫秒
  51.     (鼠标)左键双击, 1次
  52.     延时 3000 毫秒
  53. 子程序结束
  54. 子程序 卖店()
  55.     (鼠标)移动到 (780, 400)
  56.     (鼠标)右键单击, 1次
  57.     延时 3000 毫秒
  58.     (鼠标)右键单击, 1次
  59.     延时 3000 毫秒
  60.     (鼠标)移动到 (236, 130)
  61.     (鼠标)左键单击, 1次
  62.     延时 600 毫秒
  63.     (鼠标)移动到 (280, 173)
  64.     (鼠标)左键单击, 1次
  65.     延时 1000 毫秒
  66.     (鼠标)移动到 (302, 455)
  67.     延时 500 毫秒
  68.     (鼠标)左键单击, 1次
  69.     延时 500 毫秒
  70.     (鼠标)移动到 (487, 324)
  71.     延时 500 毫秒
  72.     (鼠标)左键单击, 1次
  73.     延时 500 毫秒
  74.     (鼠标)左键单击, 1次
  75.     延时 500 毫秒
  76.     (鼠标)左键单击, 1次
  77.     延时 500 毫秒
  78.     (键盘)按 "Esc" 键, 1次
  79.     延时 500 毫秒
  80.     (鼠标)移动到 (160, 403)
  81.     (鼠标)右键单击, 1次
  82.     延时 500 毫秒
  83.     (鼠标)移动到 (7, 403)
  84.     (鼠标)右键单击, 1次
  85.     延时 1000 毫秒
  86.     注释:KeyPress "F", 1
  87.     注释:MoveTo 486, 321
  88.     注释:IfColor 486, 321, "110C06", 0 Then
  89.     注释:KeyPress "Esc", 1
  90.     注释:Else
  91.     注释:Call 卖店()
  92.     注释:End If
  93. 子程序结束
  94. 子程序 回城()
  95.     延时 1000 毫秒
  96.     (键盘)按 "Esc" 键, 1次
  97.     延时 1000 毫秒
  98.     (鼠标)移动到 (513, 429)
  99.     延时 1000 毫秒
  100.     (鼠标)左键单击, 1次