UserVar A=DropList{6星:1|8星:2|12星:3|19星:4|25星:5} 副BB
If A=1
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\6.bmp",0.8,X,Y)
EndIf
If A=2
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\8.bmp",0.9,X,Y)
EndIf
If A=3
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\12.bmp",0.8,X,Y)
EndIf
If A=4
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\19.bmp",0.9,X,Y)
EndIf
If A=5
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\25.bmp",0.9,X,Y)
EndIf
If x>0 and y>0
MoveTo X,Y
Delay 50
RightClick 1
EndIf
MoveTo 524,585
Delay 50
LeftDown 1
LeftUp 1
UserVar D=DropList{普通MS:1|赠MS:2} MS
If D=1
MoveTo 440,650
EndIf
If D=2
MoveTo 530,650
EndIf
Delay 100
LeftDown 1
LeftUp 1
Delay 100
UserVar Q=DropList{1页:1|2页:2} 球所在页面
If Q=1
VBSCall FindPic(0,0,1024,768,"C:\Documents and Settings\FeiYi\桌面\全自动\tu\TQ.bmp",0.7,X,Y)
EndIf
If x>0 and y>0
MoveTo X,Y
Delay 50
RightClick 1
EndIf
MoveTo 524,585
Delay 100
LeftDown 1
LeftUp 1
If D=1
MoveTo 440,650
EndIf
If D=2
MoveTo 530,650
EndIf
Delay 100
LeftDown 1
LeftUp 1
Delay 200
这个为什么找了 变量找了A就不找Q 或者找了Q就不找A 帮忙改下