1. 注释:查找窗口类名(0)或者标题("魔神无双-东胜神洲-五行山(V10024)"),返回找到的句柄Hwnd
  2. 令 Hwnd = Window.Find(0,"魔神无双-东胜神洲-五行山(V10024)")
  3. 注释:得到窗口句柄的客户区大小
  4. 令 Rect = Window.GetClientRect(Hwnd)
  5. 定义变量 MyArray
  6. 令 MyArray = Split(Rect,"|")
  7. 令 Ux = CLng(MyArray(0))
  8. 令 Uy = CLng(MyArray(1))
  9. 注释:常用写法!最终得出游戏窗口的起始坐标Ux,Uy
  10. 标记 寻怪
  11. (键盘)按 "Space" 键, 2次
  12. 延时 200 毫秒
  13. 调用 吃药()
  14. (键盘)按 "Tab" 键, 1次
  15. 延时 100 毫秒
  16. 如果点 (443 + Ux,19 + Uy) 的颜色等于 "80AEB0" 则
  17.     标记 打怪
  18.     调用 吃药()
  19.     (键盘)按 "1" 键, 1次
  20.     延时 1000 毫秒
  21.     如果点 (479 + Ux,39 + Uy) 的颜色等于 "B79" 则
  22.         (键盘)按 "2" 键, 1次
  23.         延时 200 毫秒
  24.         (键盘)按 "3" 键, 1次
  25.         延时 200 毫秒
  26.         (键盘)按 "4" 键, 1次
  27.         延时 200 毫秒
  28.         (键盘)按 "5" 键, 1次
  29.         延时 200 毫秒
  30.         (键盘)按 "6" 键, 1次
  31.         延时 200 毫秒
  32.         跳转到标记 打怪
  33.     否则
  34.         跳转到标记 寻怪
  35.     条件结束
  36. 否则
  37.     跳转到标记 寻怪
  38. 条件结束
  39. 子程序 吃药()
  40.     从左上到右下查找图片 "Attachment:\血空.bmp",把找到的坐标保存到 (hyX, hyY),指定区域(左:175 + Ux 上:708 + Uy 右:200 + Ux 下:712 + Uy),相似度 0.4
  41.     注释:以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
  42.     如果 hyX > 0 并且 hyY > 0 则
  43.         注释:在这里可以添加找到坐标后,需要做的处理。
  44.         (键盘)按 "F1" 键, 1次
  45.         延时 5000 毫秒
  46.     条件结束
  47.     从左上到右下查找图片 "Attachment:\蓝空.bmp",把找到的坐标保存到 (lyX, lyY),指定区域(左:813 + Ux 上:730 + Uy 右:839 + Ux 下:736 + Uy),相似度 0.4
  48.     如果 lyX > 0 并且 lyY > 0 则
  49.         (键盘)按 "F2" 键, 1次
  50.         延时 5000 毫秒
  51.     条件结束
  52. 子程序结束