1. 用户定义变量 HWz=0 "主窗体"
2. 用户定义变量 HWnum=0 "次窗体个数"
3. 用户定义变量 this=1 "电脑定义"
4. 用户定义变量 keynum=0 "开始交易量"
5. 用户定义变量 HW1 "窗体1"
6. 用户定义变量 HW2 "窗体2"
7. 用户定义变量 HW3 "窗体3"
8. 用户定义变量 HW4 "窗体4"
9. 用户定义变量 HW5 "窗体5"
10. 用户定义变量 HW6 "窗体6"
11. 用户定义变量 HW7 "窗体6"
12. 用户定义变量 HW8 "窗体6"
13. 定义变量 hwarr(8)
14. 令 hwarr(0) = HW1
15. 令 hwarr(1) = HW2
16. 令 hwarr(2) = HW3
17. 令 hwarr(3) = HW4
18. 令 hwarr(4) = HW5
19. 令 hwarr(5) = HW6
20. 令 hwarr(6) = HW7
21. 令 hwarr(7) = HW8
22. SimPlugOCR.SetDict(("E:\工具\按键精灵8\plugin\传奇国度数字.txt"))
23. SimPlugOCR.SetFontColor(("E9E4C5"))
24. SimPlugOCR.SetBGColor(("1B1613"))
25. 注释：
26. 标记 kaishi
27. 调用 Window.Hide(HWz)
28. Window.Hide((hwarr(0)))
29. Window.Hide((hwarr(1)))
30. Window.Hide((hwarr(2)))
31. Window.Hide((hwarr(3)))
32. Window.Hide((hwarr(4)))
33. Window.Hide((hwarr(5)))
34. Window.Hide((hwarr(6)))
35. Window.Hide((hwarr(7)))
36. 注释：Call Plugin.Window.Show(HWz)
37. 注释：Plugin.Window.Show (hwarr(0))
38. 注释：Plugin.Window.Show (hwarr(1))
39. 注释：Plugin.Window.Show (hwarr(2))
40. 注释：Plugin.Window.Show (hwarr(3))
41. 注释：Plugin.Window.Show (hwarr(4))
42. 注释：Plugin.Window.Show (hwarr(5))
43. 注释：Plugin.Window.Show (hwarr(6))
44. 注释：Plugin.Window.Show (hwarr(7))
45. 注释：
46. 调用 bianli()
47. 调用 Window.Hide(HWz)
48. Window.Hide((hwarr(0)))
49. Window.Hide((hwarr(1)))
50. Window.Hide((hwarr(2)))
51. Window.Hide((hwarr(3)))
52. Window.Hide((hwarr(4)))
53. Window.Hide((hwarr(5)))
54. Window.Hide((hwarr(6)))
55. Window.Hide((hwarr(7)))
56. 令 ti = 5
57. 循环 5 次
58.     调用 Msg.Tips(ti)
59.     延时 60000 毫秒
60.     令 ti = ti - 1
61. 循环结束
62. 跳转到标记 kaishi
63. 注释：获得信息
64. 注释：Call read()
65. 注释：
66. 注释：
67. 注释：If status = 0 Then
68. 注释： //空闲，进行检查
69. 注释： //检查，如果是本电脑
70. 注释： If computer = this Then
71. 注释： //遍历窗体
72. 注释：
73. 注释： End If
74. 注释：
75. 注释：End If
76. 注释：
77. 注释：
78. 注释：If status = 1 Then
79. 注释： //进行交易
80. 注释：
81. 注释：End If
82. 注释：////////////************大方法*********
83. 注释：遍历
84. 子程序 bianli()
85.     令 i = 0
86.     循环 HWnum 次
87.         令 hw = hwarr(i)
88.         调用 Window.Show(hw)
89.         调用 Getnum()
90.         令 numbc = numb - 3
91.         如果 numbc > keynum 则
92.             调用 Shuaxin()
93.             调用 jy()
94.         否则
95.             调用 Window.Hide(hw)
96.             延时 5000 毫秒
97.         条件结束
98.         令 i = i + 1
99.     循环结束
100. 子程序结束