- //点游戏区域,电信一,11;电信二,12;电信三,13
- //点游戏区域,网通一,21;网通二,22;网通三,23
- xx =2
- dnn=1
- 如果表达式 (xx >0) 为真,则循环执行
- 如果 (673,637) 的颜色大约等于 #94ff31 则
- 跳转到标记 选游戏区域
- 否则
- 延时1000毫秒
- dnn=dnn+1
- 如果表达式 ((dnn mod 10) = 0) 为真,则
- 左键单击
- 条件结束
- 调用插件命令 handle = Window.Find(0,"error!")
- 如果表达式 (handle = 0) 为真,则
- 延时100毫秒
- 否则
- 调用插件命令 Window.Close(handle)
- 条件结束
- 调用子程序 重新进入
- 条件结束
- 循环结束
- 标记 选游戏区域
- yxQuYu=cint(yxQuYu)
- 如果表达式 (yxQuYu = 11) 为真,则
- 鼠标移到 440 , 580
- 否则如果(yxQuYu = 12)为真,则
- 鼠标移到 440 , 520
- 否则如果(yxQuYu = 13)为真,则
- 鼠标移到 440 , 460
- 否则如果(yxQuYu = 21)为真,则
- 鼠标移到 600 , 580
- 否则如果(yxQuYu = 22)为真,则
- 鼠标移到 600 , 520
- 否则如果(yxQuYu = 23)为真,则
- 鼠标移到 600 , 460
- 条件结束
- 延时200毫秒
- 左键单击
- 延时200毫秒
- //选服务器,顶点 400,433,行高16
- //从上而下,是几就添几fuwuqi
- 标记 开始选服务器
- 延时1000毫秒
- 鼠标移到 400 , 433+fuwuqi*16
- 延时200毫秒
- 左键单击
- 延时200毫秒
- //确认
- 鼠标移到 442 , 659
- 延时200毫秒
- 左键单击
- 延时2000毫秒
- 按键<Num *>
- 延时200毫秒
- 按键<Num *>
- 延时200毫秒
- 循环 jiabei 遍
- 按键<Num +>
- 延时200毫秒
- 循环结束
- time2 = obj.GetTickCount()
- str="[进入游戏]--成功!!耗时:" & CStr(int((time2-time1)/1000)) & " 秒 "
- 调用子程序 记运行日志
- 子程序结束,回到调用处
- 子程序 路人之怒
- currtime=date
- currtime= currtime&" " &time
- str=cstr(num)&"路人=["&currtime&"]开始!!"
- 调用子程序 要出兵罗
- // 到出兵模块
- 延时chbtime毫秒
- //行政命令一
- hangzhu(1)=1:dx=445:dy=450:bingz=3:jiangshu=1
- 调用子程序 出兵模块
- //行政命令二
- hangzhu(1)=3:dx=519:dy=490:bingz=3:jiangshu=1
- 调用子程序 出兵模块
- //行政命令三
- hangzhu(1)=3:dx=515:dy=450:bingz=3:jiangshu=1
- 调用子程序 出兵模块
- //一月
- //兵一
- xingx=710:xingy=456:jiaox=489:jiaoy=556
- 调用子程序 行军模块
- //兵二
- xingx=706:xingy=456:jiaox=425:jiaoy=520
- 调用子程序 行军模块
- //兵三
- xingx=765:xingy=453:jiaox=533:jiaoy=510
- 调用子程序 行军模块
- //二月
- //兵一
- xingx=840:xingy=516:jiaox=689:jiaoy=529
- 调用子程序 行军模块
- //兵二
- xingx=765:xingy=519:jiaox=648:jiaoy=472:gongjw=33
- 调用子程序 行军攻击
- //兵三
- xingx=763:xingy=548:jiaox=749:jiaoy=559:gongjw=43