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