1. 用户定义变量 chbtime=20 出兵通用延时（毫秒）
2. 用户定义变量 jiabei=8 加速系数（决定客户端速度）
3. 用户定义变量 fwqHangXu=1 更新服务器的行序（从上而下是几填几）
4. 用户定义变量 yxQuYu=11 游戏服务区（电信，11，12，13，网通，21，22，23）
5. 用户定义变量 fuwuqi=9 游戏服务器（从上而下，是几就填几）
6. 用户定义变量 logflag=3 记日志级别（5,10,15,...）
7. 用户定义变量 reentry=10 重新进入延时(秒)
8. 用户定义变量 onetime=90 每局限时(秒)
9. 用户定义变量 hzhhjsh=241 换帐户局数
10. dim Obj,Fso,pID,hwnd,retv,xx,filenm,fwnd,num,numMax,NumMin,currtime,npcfile
11. Dim time0 ,time1, time2,myfile,x,y,x1,y1,x2,y2,currx,curry,nnn,nnnnn,xiangshidu
12. dim mima(100),zhangHn(100)
13. dim flag,jy,dnn,ttlCount,count80,filepath,handle,chongxjr,errfilename,zhanghao
14. //出兵,dx,dy,出兵地坐标,出兵数,nn
15. dim dx,dy,hang,bingz,jiangshu,wujineng
16. //攻击开始,要先定义行军标点xingx,xingy
17. //脚下黄点坐标jiaox,jiaoy,攻击点坐标与行军点坐标关联
18. //攻击位，顺时针 33－43，53，44
19. //一般为，xingx＋-32，xingy+-16
20. //行军时,每格坐标距也是 （32，16）
21. dim xingx,xingy,jiaox,jiaoy,gongjw, gongjx,gongjy,bingxu
22. //读验证码用
23. dim iMa,nMa,mMa,jMa,ma,strMa,ret,Matmp
24. dim colorstr(42),hangzhu(4)
25. dim ma,nn
26. dim color,errCount
27. dingx=613
28. dingy=274
29. //下指通用延时
30. dltime=200
31. jiangx=270
32. jiangy=234
33. hangju1=17
34. Set obj=CreateObject("QFunction.Library")
35. //set Obj = createobject("WScript.Shell")
36. set Fso = createobject("Scripting.Filesystemobject")
37. set TiShiObj = createobject("WScript.Shell")
38. //齿轮加速系数，1加了，0未加
39. //**************************************************************************
40. filepath=TiShiObj.CurrentDirectory&"\"
41. currpath=filepath
42. 如果表达式 (fso.FileExists(filepath&"运行日志.txt") = 0) 为真,则
43.     set myfile=fso.createtextfile(filepath&"运行日志.txt")
44. 否则
45.     set myfile=fso.opentextfile(filepath&"运行日志.txt",8)
46. 条件结束
47. myFile.Close
48. filenm=filepath&"\配置文件.Ini"
49. 调用插件命令 NumMax=File.ReadINi("NumMax","NumMax",filenM)
50. 调用插件命令 NumMin=File.ReadINi("NumMax","NumMin",filenM)
51. 调用插件命令 num=File.ReadINi("NumMax","num",filenM)
52. //Plugin renqijindu=File.ReadINi("NumMax","renqijindu",filenM)
53. num=cint(num)
54. nummax=cint(nummax)
55. nummin=cint(nummin)
56. 如果表达式 (num < numMin) 为真,则
57.     num=numMin
58. 条件结束
59. hangzhu(0)=0:hangzhu(2)=0:hangzhu(2)=0:hangzhu(3)=0:chongxjr=0:errcount=0
60. ////////////////////////////////////////////////////
61. //进入主程序 /////
62. ////////////////////////////////////////////////////
63. 如果表达式 (1) 为真,则循环执行
64.     调用插件命令 file.WriteINI("NumMax","num",num,filenM)
65.     number=1:ttlCount=1:chongxjr=0:count80=1
66.     zhanghao="zhanghao"&Num
67.     time0 = obj.GetTickCount()
68.     调用插件命令 zhanghn(num)=File.ReadINI(zhanghao,"zhanghao",filenM)
69.     调用插件命令 mima(num)=File.ReadINI(zhanghao,"mima",filenM)
70.     标记 重新进入口
71.     //LockMouse
72.     time1 = obj.GetTickCount()
73.     调用子程序 进入游戏
74.     调用子程序 对应单福提示
75.     如果表达式 (chongxjr =0) 为真,则
76.         调用子程序 卖宝
77.     否则
78.         鼠标移到 x-380 , y+50
79.         延时dltime毫秒
80.         左键单击
81.         延时2000毫秒
82.     条件结束
83.     time1 = obj.GetTickCount()
84.     npcfile="bmp\npc5.bmp"
85.     npc="路人"
86.     x1=10:y1=10:x2=1020:y2=760
87.     调用子程序 NPC对话
88.     如果表达式 (1) 为真,则循环执行
89.         // LockMouse
90.         调用子程序 路人之怒
91.         xx=2
92.         如果表达式 (xx>0) 为真,则循环执行
93.             如果 (590,368) 的颜色等于 #ffffff 则
94.                 跳转到标记 NPC继续任务
95.             否则
96.                 左键单击
97.                 延时200毫秒
98.             条件结束
99.             调用子程序 重新进入
100.         循环结束