1. 用户定义变量 xb=DropList{开:1|不开:2}=0 宝宝自动修忠诚选择
2. 用户定义变量 zb=DropList{抓BB宝宝攻:1|不抓:2|抓BB宝宝防:3}=0 抓BB宝宝攻防选择
3. 用户定义变量 kh1=DropList{开:1|不开:2}=0 1号位开号选择
4. 用户定义变量 RS1=DropList{人法宝宝法:10|人攻宝宝攻:11|人法宝宝攻:12|人防宝宝法:13|人攻宝宝法:14}=0 人物宝宝1号位攻击选择
5. 调用插件命令 Hwnd=window.Foreground()
6. 调用插件命令 window.Move(Hwnd,0,0)
7. g=500
8. 标记 4
9. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
10. 如果表达式 (x0>0 and y0>0) 为真,则
11.     r=0
12.     调用子程序 通修宝宝忠诚
13.     调用子程序 位号加血
14.     调用子程序 找怪
15. 否则
16.     调用子程序 技能
17. 条件结束
18. 延时200毫秒
19. 跳转到标记 4
20. 子程序 通修宝宝忠诚
21.     如果表达式 (DateDiff("s",t1,now)>g and xb=1) 为真,则
22.         如果表达式 (kh1=1) 为真,则
23.             调用子程序 .修宝宝忠诚
24.             延时100毫秒
25.         条件结束
26.         t1=now
27.     条件结束
28. 子程序结束,回到调用处
29. 子程序 .修宝宝忠诚
30.     d=0
31.     标记 2000
32.     如果表达式 (d<=1) 为真,则
33.         延时100毫秒
34.         按住 <Alt>
35.         按键 <P>
36.         弹起 <Alt>
37.         鼠标移到 330 , 200
38.         延时1000毫秒
39.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
40.         如果表达式 (x4>0 and y4>0) 为真,则
41.             bx=x4:by=y4
42.             调用子程序 ManManYiDong
43.             循环 5 遍
44.                 左键单击
45.                 延时100毫秒
46.             循环结束
47.             延时100毫秒
48.         条件结束
49.         按住 <Alt>
50.         按键 <P>
51.         弹起 <Alt>
52.         延时200毫秒
53.         按住 <Alt>
54.         按键 <O>
55.         弹起 <Alt>
56.         延时500毫秒
57.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
58.         如果表达式 (x124>0 and y124>0) 为真,则
59.             bx=x124:by=y124
60.             调用子程序 ManManYiDong
61.             循环 20 遍
62.                 左键单击
63.                 延时100毫秒
64.             循环结束
65.             延时300毫秒
66.         条件结束
67.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
68.         如果表达式 (x134>0 and y134>0) 为真,则
69.             按住 <Alt>
70.             按键 <O>
71.             弹起 <Alt>
72.         否则
73.             按住 <Alt>
74.             按键 <O>
75.             弹起 <Alt>
76.             d=d+1
77.             跳转到标记 2000
78.         条件结束
79.     否则
80.     条件结束
81. 子程序结束,回到调用处
82. 子程序 位号加血
83.     如果表达式 (kh1=1) 为真,则
84.         调用子程序 加血
85.         延时100毫秒
86.     条件结束
87. 子程序结束,回到调用处
88. 子程序 加血
89.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
90.     如果表达式 (x4>0 and y4>0) 为真,则
91.         bx=x4-25
92.         by=y4
93.         调用子程序 ManManYiDong
94.         延时100毫秒
95.         右键单击
96.         延时1000毫秒
97.     条件结束
98.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝箱.bmp",0.9,x0,y0)
99.     如果表达式 (x3>0 and y3>0) 为真,则
100.         bx=x3-25