Delay 350
KeyDown "Enter", 1
Delay 80
KeyUp "Enter", 1
MoveTo bguoX,bguoY
Delay 800
FindPic 0,0,1280,800,"Attachment:\bx1.bmp",0.9,bx1X,bx1Y
Loop
End Sub
If sdw=2 Then
Goto xa
End If
FindPic 0,0,1280,800,"Attachment:\xaye.bmp",0.9,xayeX,xayeY
Delay 200
MoveTo xayeX+2,xayeY+2
LeftClick 1
LeftUp 1
sdw=2
Goto fu2
//向下
Rem xa
sdw=0
FindPic 0,0,1280,800,"Attachment:\tdis.bmp",0.9,tdisX,tdisY
Delay 200
MoveTo tdisX+2,tdisY+2
For 2
LeftDown 1
Delay 80
LeftUp 1
Delay 80
Next
Delay 300
KeyDown "Enter", 1
Delay 45
KeyUp "Enter", 1
Delay 45
Delay 300
FindPic 0,0,1280,800,"Attachment:\xaye.bmp",0.9,xayeX,xayeY
If xayeX > 0 And xayeY > 0 Then
MoveTo xayeX+2,xayeY+2
LeftClick 1
End If
Delay 850
FindPic 0,0,1280,800,"Attachment:\yugan.bmp",0.9,yuganX,yuganY
Delay 200
MoveTo yuganX+2,yuganY+2
For 2
LeftDown 1
Delay 80
LeftUp 1
Delay 80
Next
Delay 300
KeyPress "0", 1
Delay 250
KeyDown "Enter", 1
Delay 50
KeyUp "Enter", 1
Delay 50
Delay 300
FindPic 0,0,1280,800,"Attachment:\tchu2.bmp",0.6,tchu2X,tchu2Y
If tchu2X > 0 And tchu2Y > 0 Then
MoveTo tchu2X,tchu2Y
LockMouse
Delay 300
LeftClick 1
End If
Delay 800
FindPic 0,0,1280,800,"Attachment:\npc.bmp",0.6,npcX,npcY
If npcX > 0 And npcY > 0 Then
MoveTo npcX,npcY
LockMouse
Delay 300
LeftClick 1
End If
Delay 800
FindPic 0,0,1280,800,"Attachment:\yufan.bmp",0.6,yufanX,yufanY
If yufanX > 0 And yufanY > 0 Then
MoveTo yufanX+2,yufanY+2
LockMouse
Delay 300
For 2
LeftDown 1
Delay 80
LeftUp 1
Delay 80
Next
End If
Delay 300
FindPic 0,0,1280,800,"Attachment:\cz.bmp",0.9,czX,czY
If czX > 0 And czY > 0 Then
MoveTo czX+3,czY+3
Delay 300
LeftClick 1
End If
FindPic 0,0,1280,800,"Attachment:\tchu.bmp",0.9,tchuX,tchuY
If tchuX > 0 And tchuY > 0 Then
MoveTo tchuX+3,tchuY+3
Delay 300
LeftClick 1