Delay 100
KeyPress "Tab", 1
Call ditu
Delay 100
i = 0
While i=0
FindPic 0,0,650,500,"Attachment:\lu6.bmp",0.8,lu6X,lu6Y
If lu6X > 0 And lu6Y > 0 Then
i = 1
End If
Wend
Call 移动(lu6X, lu6Y)
Delay 100
Delay 100
LeftClick 1
Delay 100
MoveTo 50, 150
Delay 100
KeyPress "Tab", 1
Delay 5000
Call 找妖
Delay 100
KeyPress "Tab", 1
Call ditu
Delay 100
i = 0
While i=0
FindPic 0,0,650,500,"Attachment:\lu5.bmp",0.8,lu5X,lu5Y
If lu5X > 0 And lu5Y > 0 Then
i = 1
End If
Wend
Call 移动(lu5X, lu5Y)
Delay 100
Delay 100
LeftClick 1
Delay 100
MoveTo 50, 150
Delay 100
KeyPress "Tab", 1
Delay 5000
Call 找妖
Delay 100
KeyPress "Tab", 1
Call ditu
Delay 100
i = 0
While i=0
FindPic 0,0,650,500,"Attachment:\lu4.bmp",0.8,lu4X,lu4Y
If lu4X > 0 And lu4Y > 0 Then
i = 1
End If
Wend
Call 移动(lu4X, lu4Y)
Delay 100
Delay 100
LeftClick 1
Delay 100
MoveTo 50, 150
Delay 100
KeyPress "Tab", 1
Delay 5000
Call 找妖
Delay 100
KeyPress "Tab", 1
Call ditu
Delay 100
i = 0
While i=0
FindPic 0,0,650,500,"Attachment:\lu3.bmp",0.8,lu3X,lu3Y
If lu3X > 0 And lu3Y > 0 Then
i = 1
End If
Wend
Call 移动(lu3X, lu3Y)
Delay 100
Delay 100
LeftClick 1
Delay 100
MoveTo 50, 150
Delay 100
KeyPress "Tab", 1
Delay 5000
Call 找妖
Delay 100
KeyPress "Tab", 1
Call ditu
Delay 100
i = 0
While i=0
FindPic 0,0,650,500,"Attachment:\lu2.bmp",0.8,lu2X,lu2Y
If lu2X > 0 And lu2Y > 0 Then
i = 1
End If
Wend
Call 移动(lu2X, lu2Y)
Delay 100
Delay 100
LeftClick 1
Delay 100