1. dim number,x,y
2. //当前窗口左上角坐标坐标x1,y1
3. 调用插件命令 WinTop=Window.Foreground()
4. 调用插件命令 RectTop=Window.GetClientRect(WinTop)
5. TempArray=Split(RectTop,"|")
6. x1=CInt(TempArray(0)):y1=CInt(TempArray(1))
7. //x坐标百位数所在位置
8. //121是x坐标百位数相对于窗口坐标的位置
9. x=x1+121:y=y1+10
10. 调用子程序 找数字
11. a=number
12. //x坐标十位数所在位置
13. x=x1+128:y=y1+10
14. 调用子程序 找数字
15. b=number
16. //x坐标个位数所在位置
17. x=x1+135:y=y1+10
18. 调用子程序 找数字
19. c=number
20. 调用子程序 坐标
21. //x坐标值
22. mx=n
23. x=x1+155:y=y1+10
24. 调用子程序 找数字
25. a=number
26. x=x1+162:y=y1+10
27. 调用子程序 找数字
28. b=number
29. x=x1+169:y=y1+10
30. 调用子程序 找数字
31. c=number
32. 调用子程序 坐标
33. //y坐标值
34. my=n
35. 调用外部VBScript子程序 MessageBox (mx&"/"&my)
36. 脚本停止运行
37. //a是百位数，b是十位数，c是个位数
38. 子程序 坐标
39.     //b不存在，坐标只有一位数
40.     如果表达式 (b=-1) 为真,则
41.         n=a
42.     否则
43.         //b存在，c不存在，坐标有二位数
44.         如果表达式 (c=-1) 为真,则
45.             n=a*10+b
46.         否则
47.             //坐标有三位数
48.             n=a*100+b*10+c
49.         条件结束
50.     条件结束
51. 子程序结束,回到调用处
52. //基本思路:将 0123456789 不断进行分组，直至该组中只有一个数字。
53. 子程序 找数字
54.     //2345
55.     如果 (x+2,y+6) 的颜色等于 #f8fcf8 则
56.         //23
57.         如果 (x+6,y+1) 的颜色等于 #f8fcf8 则
58.             //2
59.             如果 (x+6,y+8) 的颜色等于 #f8fcf8 则
60.                 number=2
61.             否则
62.                 number=3
63.             条件结束
64.             //45
65.         否则
66.             //5
67.             如果 (x+1,y) 的颜色等于 #f8fcf8 则
68.                 number=5
69.             否则
70.                 number=4
71.             条件结束
72.         条件结束
73.         //016789
74.     否则
75.         //89
76.         如果 (x,y+1) 的颜色等于 #f8fcf8 则
77.             //9
78.             如果 (x,y+3) 的颜色等于 #f8fcf8 则
79.                 number=9
80.             否则
81.                 number=8
82.             条件结束
83.             //0167
84.         否则
85.             //67
86.             如果 (x+6,y) 的颜色等于 #f8fcf8 则
87.                 //7
88.                 如果 (x+1,y) 的颜色等于 #f8fcf8 则
89.                     number=7
90.                 否则
91.                     number=6
92.                 条件结束
93.                 //01
94.             否则
95.                 //0
96.                 如果 (x+2,y) 的颜色等于 #f8fcf8 则
97.                     number=0
98.                 否则
99.                     如果 (x+3,y) 的颜色等于 #f8fcf8 则
100.                         number=1