EndIf If wq=1 IfColor 485,733,ff,0 IfColor 635,725,ff,0 Else KeyPress 51,1 wq=3 Goto 结束选择武器 EndIf Else KeyPress 50,1 wq=2 Goto 结束选择武器 EndIf KeyPress 49,1 EndIf Rem 结束选择武器 Return 选择武器 Sub 按Tab看人数 KeyPress 9,1 VBS tabT1=timer Rem 按Tab Delay 100 IfColor 274,452,ffffff,0 Else VBS tabT2=timer If tabT2-tabT1>=2.5 VBS tabT1=timer KeyPress 9,1 EndIf Goto 按Tab EndIf Delay 300 l=0 num1=0 num0=0 For 4 IfColor 287,380+(l*23),ffffff,0 IfColor 289,379+(l*23),202020,0 num1=num1+1 EndIf EndIf IfColor 285,381+(l*23),ffffff,0 IfColor 285,377+(l*23),ffffff,0 num0=num0+1 EndIf EndIf l=l+1 EndFor If (num0+num1)=0 KeyPress 9,1 Goto 按Tab EndIf KeyPress 9,1 Return 按Tab看人数 Sub 259才杀 Rem 259start If HH259=1 HH259=2 KeyUp 87,1 KeyUp 32,1 EndIf IfColor 555,67,51208f,2 Else // If krs=2 Goto 看时间 EndIf If krs=1 VBSCall FindColorEx(919,188,960,255,"0000ff",2,1,swX,swY) If swX>=0 and swY>=0 tab=1 swY2=swY Else If (num0+num1)=4 and num1<=2 krs=2 Else Goto 259end EndIf EndIf Else tab=1 EndIf krs=1 If tab=1 Gosub 按Tab看人数 If (num0+num1)=4 and num1<=2 krs=2 Else Goto 259end EndIf EndIf // Rem 看时间 IfColor 763,52,ffffff,1 chaoshi=0 Delay 200 VBSCall FindPic(738,0,875,68,"准备标记.bmp",1,intX,intY) If intX>=0 and intY>=0 Goto 等待中