Rem 提前结束 Rem 结束 j=j+1 EndFor Delay yanshi*200 Gosub jieshu1 EndFor Rem over EndScript Return Sub 开三国策 t0=timer t1=timer i=0 KeyPress 106,1 Rem 开三国策1 IfColor 358,290,96ff3f,0 If j<>0 t2=timer t3=t2-t1 Set file=fso.OpenTextFile(filename,ForAppending) file.WriteLine("循环"&i&"次开三国策--"&t3) file.Close EndIf Delay 1000 Rem kaisi SayString zhanhao MoveTo 487 378 LeftClick 1 SayString mima MoveTo 452 469 LeftClick 1 t1=timer i=0 Delay yanshi*50 Rem bs IfColor 555,278,1a29c6,0 If j<>0 t2=timer t3=t2-t1 Set file=fso.OpenTextFile(filename,ForAppending) file.WriteLine("循环"&i&"次bs--"&t3) file.Close EndIf Gosub 变速 Else sjbb1=timer sjbb2=sjbb-sjbb1 i=i+1 Goto bs EndIf Delay yanshi*40 t1=timer i=0 Rem 进入游戏 IfColor 129 102 a0ff46 0 If j<>0 t2=timer t3=t2-t1 Set file=fso.OpenTextFile(filename,ForAppending) file.WriteLine("循环"&i&"次进入游戏--"&t3) file.Close EndIf If gxfwq=1 x=423 y=431 ElseIf gxfwq=2 x=423 y=444 ElseIf gxfwq=3 x=429 y=458 ElseIf gxfwq=4 x=431 y=470 Else x=429 y=485 EndIf MoveTo x,y LeftClick 0 MoveTo 470 510 LeftClick 1 Delay yanshi Else MoveTo 791 179 LeftClick 1 Delay yanshi*3 MoveTo 791 150 LeftClick 1 i=i+1 Goto 进入游戏 EndIf Delay yanshi*120 t1=timer i=0 Rem 选择服务器 IfColor 358 364 8CFF31 0 t2=timer t3=t2-t1