1. 注释：测试
2. 注释：用户参数设置
3. 用户定义变量 buildNums = 5 "待升级建筑数量，上限50"
4. 用户定义变量 yanchi = 1000 "网络延迟，下限200毫秒"
5. 注释：检查用户参数是否合法
6. 如果 buildNums > 50 或者 buildNums < 1 则
7.     弹出窗口 "待升级建筑数量不合法，应为1-50之间整数"
8.     脚本停止运行
9. 条件结束
10. 如果 yanchi < 200 则
11.     弹出窗口 "延迟量设置不合法，下限为200毫秒"
12.     脚本停止运行
13. 条件结束
14. 注释：MsgBox buildNums
15. 注释：获取窗口句柄，类名，标题
16. 注释：Dim windowHandle,windowClass,windowTitle
17. 注释：windowHandle = Plugin.Window.MousePoint()
18. 注释：windowClass = Plugin.Window.GetClass(windowHandle)
19. 注释：windowTitle = Plugin.Window.GetText(windowHandle)
20. 注释：定义全局变量
21. (语句无法识别，可能有错误): Dim xys() //待升级建筑物坐标
22. 标记 start
23. 调用 getXys()
24. 循环当 true 时
25.     调用 buildingLv()
26.     延时 30 * 1000 毫秒
27. 循环结束
28. 注释：抓取待升级建筑物坐标
29. 子程序 getXys()
30.     MsgBox("鼠标选择建筑物后，点击键盘'J'键")
31.     重定义变量 xys(buildNums - 1,1)
32.     循环 i 从 0 到 buildNums - 1
33.         令 key = （键盘）等待按任意键
34.         如果 key = 74 则
35.             把当前鼠标所在的位置保存到 (xys(i,0), xys(i,1))
36.             MsgBox("抓取升级建筑" & i + 1 & "坐标为：" & xys(i,0) & "." & xys(i,1))
37.         条件结束
38.     循环结束
39.     MsgBox("待升级建筑物坐标抓取完毕")
40. 子程序结束
41. 注释：升级建筑物
42. 子程序 buildingLv()
43.     循环 i 从 0 到 buildNums - 1
44.         （鼠标）移动到 (xys(i,0), xys(i,1))
45.         延时 yanchi 毫秒
46.         （鼠标）左键单击, 1次
47.         延时 yanchi 毫秒
48.         （鼠标）左键单击, 1次
49.         从左上到右下查找图片 "Attachment:\levelup.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1440 下：900），相似度 0.9
50.         如果 intX > 0 并且 intY > 0 则
51.             （鼠标）移动到 (intX + 10, intY + 5)
52.             （鼠标）左键单击, 1次
53.         条件结束
54.         延时 yanchi 毫秒
55.     循环结束
56. 子程序结束