t3=int((t2-t1)*1000) Set file=fso.OpenTextFile(filename,ForAppending) file.WriteLine("电脑性能测试--"&t3) file.Close Gosub 开三国策 For jushu p=p+1 sj1=Time Plugin File.Writefile(filehandle,sj1) Plugin File.Writefile(filehandle,"第") Plugin File.Writefile(filehandle,p) Plugin File.Writefile(filehandle,"局战局开始") Plugin File.Writefile(filehandle,"---") Rem 出征 IfColor 117,734,844139,0 //找交谈人物兰色 MoveTo 926,716 Delay yanshi LeftClick 1 Else MoveTo 823,711 //到貂婵小考确定 Delay yanshi LeftClick 1 Goto 出征 EndIf Rem 历史任务 MoveTo 338,362 Delay yanshi LeftClick 1 Rem 开新战场 IfColor 241,171,B5FB52,0 //开新战场对话框绿点色 MoveTo 445,517 Delay yanshi LeftClick 1 Else MoveTo 338,362 Delay yanshi LeftClick 1 Delay yanshi Goto 开新战场 EndIf Rem 开大漠雄鹰 MoveTo 175,133 Delay yanshi LeftClick 1 Rem 开大漠确定 IfColor 284,321,5a2c39,0 //开大漠确定人物帽兰色 MoveTo 537,467 Delay yanshi*2 LeftClick 1 Else MoveTo 175,133 Delay yanshi LeftClick 1 Goto 开大漠确定 EndIf Delay yanshi*10 Rem 按出战 MoveTo 172,136 Delay yanshi LeftClick 1 Rem 按不装备 IfColor 372,341,8006B,0 //不装备对话框红点色 MoveTo 550,416 Delay yanshi LeftClick 1 Else MoveTo 892,551 Delay yanshi LeftClick 1 Delay yanshi Goto 按不装备 EndIf Rem 出战后确定 Delay yanshi*80 MoveTo 919,695 Delay yanshi LeftClick 1 Rem 春季点出兵 IfColor 919,663,102439,0 //出兵休息色 MoveTo 845,661 Delay yanshi LeftClick 1 Else MoveTo 919,695 //出战后确定 Delay yanshi LeftClick 1 Delay yanshi Goto 春季点出兵 EndIf Rem 出曹仁铁枪确定 IfColor 194,136,B5FF52,0 //出兵界面绿色点 MoveTo 320,282