1. 用户定义变量 pick=0 捡包设置
2. 用户定义变量 bai=0 百花职业为1其他为0
3. Dim tr,tb
4. 调用插件命令 Hwnd = Window.MousePoint()
5. 调用插件命令 Rect = Window.GetWindowRect(Hwnd)
6. MyArray = Split(Rect, "|")
7. W1 = Clng(MyArray(0)): H1 = Clng(MyArray(1))
8. W2 = Clng(MyArray(2)): H2 = Clng(MyArray(3))
9. W=W2-W1
10. H=H2-H1
11. 调用插件命令 XY = Bkgnd.FindColor(Hwnd, 0, 0, W/3, H/3, "9F3F06")
12. MyArray = Split(XY, "|")
13. X1 = Clng(MyArray(0))-5 : Y1 = Clng(MyArray(1))+3
14. X2 = X1 : Y2 = Y1-12
15. X6 = X1-54: Y6 = Y1+85
16. //初始化数据
17. //开始,主程序循环}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
18. 延时100毫秒
19. 调用插件命令 Bkgnd.KeyPress(hwnd,192)
20. //虚拟键盘`~~~192对应键值;锁定怪物,普通攻击
21. 延时100毫秒
22. 调用插件命令 Bkgnd.KeyPress(hwnd,192)
23. 按住 <1>
24. 延时110毫秒
25. 弹起 <1>
26. 延时110毫秒
27. 按住 <2>
28. 延时110毫秒
29. 弹起 <2>
30. 延时110毫秒
31. 按住 <3>
32. 延时110毫秒
33. 弹起 <3>
34. 延时110毫秒
35. 按住 <4>
36. 延时110毫秒
37. 弹起 <4>
38. 延时110毫秒
39. 按住 <5>
40. 延时110毫秒
41. 弹起 <5>
42. 延时110毫秒
43. 按住 <Space>
44. 延时110毫秒
45. 弹起 <Space>
46. 如果 (325,197) 的颜色等于 #1d1d49 则
47.     按键 <6>
48. 否则
49. 条件结束
50. 如果 (273,210) 的颜色等于 #1d1d49 则
51.     按键 <7>
52. 否则
53. 条件结束
54. 跳转到标记 star
55. //主程序结束;}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}