1. 展开附件 .\plugin *.dll
2. //get windows handle
3. dim c1,c2,c3,c4,c5,c6,c7,c8,zt
4. 调用插件命令 hwnd=Window.MousePoint()
5. //get windows curscr
6. 调用插件命令 s = Window.GetClientRect(hwnd)
7. XYArray = Split(s, "|")
8. dx = XYArray(0)
9. dy = XYarray(1)
10. 标记 开始
11. //是否断开连接
12. 调用插件命令 color=XingFan.GetColorHT(hwnd,True,345-dx,369-dy)
13. 调用插件命令 c1=XingFan.ColorExHT(hwnd,True,345-dx,369-dy,"E2B9E", 0.8)
14. 调用插件命令 c2=XingFan.ColorExHT(hwnd,True,352-dx,369-dy,"E2B9E", 0.8)
15. 调用插件命令 c3=XingFan.ColorExHT(hwnd,True,348-dx,368-dy,"E2B9E", 0.8)
16. 调用插件命令 c4=XingFan.ColorExHT(hwnd,True,344-dx,382-dy,"E2B9E", 0.8)
17. 调用插件命令 c5=XingFan.ColorExHT(hwnd,True,352-dx,382-dy,"E2B9E", 0.8)
18. 调用插件命令 c6=XingFan.ColorExHT(hwnd,True,359-dx,381-dy,"E2B9E", 0.8)
19. 调用插件命令 c7=XingFan.ColorExHT(hwnd,True,400-dx,419-dy,"90DDFF", 0.8)
20. 如果表达式 (c1=True and c2=True and c3=True and c4=True and c5=True and c6=True and c7=True) 为真,则
21.     //去除数据发送失败对话框
22.     调用插件命令 BGKM5.LClick(hwnd,400-dx,420-dy)
23.     延时100毫秒
24.     调用插件命令 BGKM5.LClick(hwnd,400-dx,420-dy)
25.     延时100毫秒
26.     调用子程序 重登陆
27. 条件结束
28. //是否登录画面
29. 调用插件命令 c1=XingFan.ColorExHT(hwnd,True,549-dx,117-dy,"CF8D33", 0.7)
30. 调用插件命令 c2=XingFan.ColorExHT(hwnd,True,573-dx,117-dy,"CE8C30", 0.7)
31. 调用插件命令 c3=XingFan.ColorExHT(hwnd,True,606-dx,117-dy,"CF8E32", 0.7)
32. 调用插件命令 c4=XingFan.ColorExHT(hwnd,True,634-dx,117-dy,"CF8D33", 0.7)
33. 调用插件命令 c5=XingFan.ColorExHT(hwnd,True,703-dx,116-dy,"CE8B31", 0.7)
34. 调用插件命令 c6=XingFan.ColorExHT(hwnd,True,410-dx,620-dy,"9CE4FC", 0.7)
35. 如果表达式 (c1=True and c2=True and c3=True and c4=True and c5=True and c6=Flase) 为真,则
36.     调用子程序 重登陆
37. 否则
38. 条件结束
39. //是否战斗状态
40. 调用插件命令 c1=XingFan.ColorExHT(hwnd,True,500-dx,608-dy,"66666C", 0.7)
41. 调用插件命令 c2=XingFan.ColorExHT(hwnd,True,529-dx,608-dy,"595A5F", 0.7)
42. 调用插件命令 c3=XingFan.ColorExHT(hwnd,True,529-dx,637-dy,"676869", 0.7)
43. 调用插件命令 c4=XingFan.ColorExHT(hwnd,True,500-dx,637-dy,"5D5E63", 0.7)
44. 如果表达式 (c1=Flase or c2=Flase or c3=Flase or c4=Flase) 为真,则
45.     调用子程序 战斗
46. 否则
47. 条件结束
48. //补红
49. 调用插件命令 c1=XingFan.ColorExHT(Hwnd,True,780-dx,121-dy,"5858DE", 0.9)
50. 如果表达式 (c1=False) 为真,则
51.     调用插件命令 BGKM5.MMove(hwnd,443-dx,625-dy)
52.     调用插件命令 BGKM5.RClick(hwnd,443-dx,625-dy)
53.     延时2200毫秒
54. 否则
55. 条件结束
56. //补兰
57. 调用插件命令 c1=XingFan.ColorExHT(hwnd,True,754-dx,131-dy,"F18359", 0.9)
58. 如果表达式 (c1=False) 为真,则
59.     调用插件命令 BGKM5.MMove(hwnd,480-dx,628-dy)
60.     调用插件命令 BGKM5.RClick(hwnd,480-dx,628-dy)
61.     延时2200毫秒
62. 否则
63. 条件结束
64. //补宠
65. 调用插件命令 c1=XingFan.ColorExHT(hwnd,True,613-dx,121-dy,"5858DD", 0.6)
66. 如果表达式 (c1=False) 为真,则
67.     调用插件命令 BGKM5.MMove(hwnd,655-dx,625-dy)
68.     调用插件命令 BGKM5.RClick(hwnd,655-dx,625-dy)
69.     延时2200毫秒
70. 否则
71. 条件结束
72. //循环点击
73. 调用插件命令 BGKM5.RClick(hwnd,380-dx,340-dy)
74. 延时110毫秒
75. 调用插件命令 BGKM5.LClick(hwnd,420-dx,430-dy)
76. 延时110毫秒
77. 调用插件命令 BGKM5.LClick(hwnd,260-dx,400-dy)
78. 延时110毫秒
79. 调用插件命令 BGKM5.LClick(hwnd,260-dx,260-dy)
80. 延时110毫秒
81. 调用插件命令 BGKM5.LClick(hwnd,380-dx,200-dy)
82. 延时110毫秒
83. 调用插件命令 BGKM5.LClick(hwnd,500-dx,260-dy)
84. 延时110毫秒
85. 调用插件命令 BGKM5.LClick(hwnd,500-dx,400-dy)
86. 延时110毫秒
87. 调用插件命令 BGKM5.LClick(hwnd,380-dx,450-dy)
88. 延时110毫秒
89. 调用插件命令 BGKM5.LClick(hwnd,380-dx,340-dy)
90. 延时110毫秒
91. //取消对话框
92. 调用插件命令 BGKM5.LClick(hwnd,450-dx,430,-dy)
93. 延时110毫秒
94. 跳转到标记 开始
95. 子程序 战斗
96.     延时2000毫秒
97.     //点击自动按钮
98.     调用插件命令 BGKM5.LClick(hwnd,740-dx,335-dy)
99.     延时1000毫秒
100.     调用插件命令 BGKM5.LClick(hwnd,740-dx,335-dy)