Rem 967
//搜索是否以点游戏图标（下面）
dim color(2)
dim s,x,y
color(0)="3fa1db":color(1)="ec007d":color(2)="ec007d"
VBSCall FindCenterColor(0,0,1024,570,color(s),x,y)
If x>0 and y>0
    Goto 10101
Else 
EndIf 
//搜索是否以选择分区（下面）
dim color(2)
dim s1,x,y
color(0)="fbfefe":color(1)="fbfefe":color(2)="fbfefe"
VBSCall FindCenterColor(699, 208,718, 444,color(s1),x,y)
If x>0 and y>0
    Goto 112452
Else 
EndIf 
//搜索是否进入登陆页面（下面）
dim color(2)
dim s6,x,y
color(0)="628":color(1)="31faff":color(2)="31faff"
VBSCall FindCenterColor(0,0,1024,570,color(s6),x,y)
If x>0 and y>0
    Goto 110012
Else 
EndIf 
//搜索是否进入选择区组界面（下面）
dim color(2)
dim s9,x,y
color(0)="3fa1db":color(1)="ec007d":color(2)="ec007d"
VBSCall FindCenterColor(0,0,1024,570,color(s9),x,y)
If x>0 and y>0
    Goto 1200
Else 
EndIf 
//搜索是否进入游戏（下面）
dim color(2)
dim s30,x,y
color(0)="13e2fe":color(1)="13e2fe":color(2)="13e2fe"
VBSCall FindCenterColor(357, 520,1023, 688,color(s30),x,y)
If x>0 and y>0
    Goto 11012
Else 
EndIf 
UserVar Var1=DropList{启动:1|把图标放到桌面第一横行的第二个位子上:2}=1 自动启动游戏
If Var1 = 1
    Gosub Test启动
ElseIf Var1 =2
    Gosub 1101
EndIf 
Rem 110
//搜索是否选择区组以出来（下面）
dim color(2)
dim s,x,y
color(0)="3fa1db":color(1)="ec007d":color(2)="ec007d"
VBSCall FindCenterColor(0,0,1024,570,color(s),x,y)
If x>0 and y>0
    Goto 10101
Else 
    Goto 110
    Delay 2000
EndIf 
Rem 10101
UserVar Var3=DropList{网通一区:1|网通二区:2|网通三区:3|网通四区:4|电信一区:5|电信二区:6|电信三区:7|电信四区:8|电信五区:9|电信六区:10}=1 选择分区
If Var3 = 1
    Gosub Test网通一区
ElseIf Var3 =2
    Gosub Test网通二区
ElseIf Var3 =3
    Gosub Test网通三区
ElseIf Var3 =4
    Gosub Test网通四区
ElseIf Var3 =5
    Gosub Test电信一区
ElseIf Var3 =6
    Gosub Test电信二区
ElseIf Var3 =7
    Gosub Test电信三区
ElseIf Var3 =8
    Gosub Test电信四区
ElseIf Var3 =9
    Gosub Test电信五区
ElseIf Var3 =10
    Gosub Test电信六区
EndIf 
//搜索如果699, 208,718, 444颜色=fbfefe则跳到“游戏开始”（下面）
Rem 12012
dim color(2)
dim s2,x,y
color(0)="fbfefe":color(1)="fbfefe":color(2)="fbfefe"
VBSCall FindCenterColor(699, 208,718, 444,color(s2),x,y)
If x>0 and y>0
    Goto 112452
Else 
    Delay 2000
    Goto 12012
EndIf 
Rem 112452