//点游戏区域,电信一,11;电信二,12;电信三,13 //点游戏区域,网通一,21;网通二,22;网通三,23 xx =2 dnn=1 While xx >0 IfColor 673,637,94ff31,2 Goto 选游戏区域 Else Delay 1000 dnn=dnn+1 If (dnn mod 10) = 0 LeftClick 1 EndIf Plugin handle = Window.Find(0,"error!") If handle = 0 Delay 100 Else Plugin Window.Close(handle) EndIf Gosub 重新进入 EndIf EndWhile Rem 选游戏区域 yxQuYu=cint(yxQuYu) If yxQuYu = 11 MoveTo 440,580 ElseIf yxQuYu = 12 MoveTo 440,520 ElseIf yxQuYu = 13 MoveTo 440,460 ElseIf yxQuYu = 21 MoveTo 600,580 ElseIf yxQuYu = 22 MoveTo 600,520 ElseIf yxQuYu = 23 MoveTo 600,460 EndIf Delay 200 LeftClick 1 Delay 200 //选服务器,顶点 400,433,行高16 //从上而下,是几就添几fuwuqi Rem 开始选服务器 Delay 1000 MoveTo 400,433+fuwuqi*16 Delay 200 LeftClick 1 Delay 200 //确认 MoveTo 442,659 Delay 200 LeftClick 1 Delay 2000 KeyPress 106,1 Delay 200 KeyPress 106,1 Delay 200 For jiabei KeyPress 107,1 Delay 200 EndFor time2 = obj.GetTickCount() str="[进入游戏]--成功!!耗时:" & CStr(int((time2-time1)/1000)) & " 秒 " Gosub 记运行日志 Return 进入游戏 Sub 路人之怒 currtime=date currtime= currtime&" " &time str=cstr(num)&"路人=["&currtime&"]开始!!" Gosub 要出兵罗 // 到出兵模块 Delay chbtime //行政命令一 hangzhu(1)=1:dx=445:dy=450:bingz=3:jiangshu=1 Gosub 出兵模块 //行政命令二 hangzhu(1)=3:dx=519:dy=490:bingz=3:jiangshu=1 Gosub 出兵模块 //行政命令三 hangzhu(1)=3:dx=515:dy=450:bingz=3:jiangshu=1 Gosub 出兵模块 //一月 //兵一 xingx=710:xingy=456:jiaox=489:jiaoy=556 Gosub 行军模块 //兵二 xingx=706:xingy=456:jiaox=425:jiaoy=520 Gosub 行军模块 //兵三 xingx=765:xingy=453:jiaox=533:jiaoy=510 Gosub 行军模块 //二月 //兵一 xingx=840:xingy=516:jiaox=689:jiaoy=529 Gosub 行军模块 //兵二 xingx=765:xingy=519:jiaox=648:jiaoy=472:gongjw=33 Gosub 行军攻击 //兵三 xingx=763:xingy=548:jiaox=749:jiaoy=559:gongjw=43