End If Delay 21000 FindPic 0,0,1280,800,"Attachment:\bvb.bmp",0.9,bvbX,bvbY If bvbX > 0 And bvbY > 0 Then MoveTo bvbX+20,bvbY+50 Delay 800 LeftDown 1 Delay 80 LeftClick 1 Delay 80 LeftUp 1 Delay 300 End If Delay 800 FindPic 0,0,1280,800,"Attachment:\dyu.bmp",0.9,dyuX,dyuY If dyuX > 0 And dyuY > 0 Then MoveTo dyuX+2,dyuY+2 LeftDown 1 Delay 80 LeftUp 1 Delay 300 MoveTo dyuX+50,dyuY+50 End If Delay 800 FindPic 0,0,1280,800,"Attachment:\jru.bmp",0.9,jruX,jruY If jruX > 0 And jruY > 0 Then MoveTo jruX+2,jruY+2 LeftDown 1 Delay 80 LeftUp 1 Delay 300 End If //进入钓鱼岛 Delay 1500 Call cw() Delay 300 FindPic 0,0,1280,800,"Attachment:\包裹.bmp",0.9,bgX,bgY If bgX > 0 And bgY > 0 Then MoveTo bgX+5,bgY+5 Delay 80 LeftDown 1 Delay 80 LeftUp 1 Delay 300 End If //开始钓鱼 Delay 1200 FindPic 0,0,1280,800,"Attachment:\1.bmp",0.9,intX,intY FindPic 0,0,1280,800,"Attachment:\sd.bmp",0.9,inth,intj If intX > 0 And intY > 0 Then Do While intX > 0 And intY > 0 FindPic 0,0,1280,800,"Attachment:\wu.bmp",0.9,wuX,wuY FindPic 0,0,1280,800,"Attachment:\cv.bmp",0.9,cvn,cvm MoveTo 300,160 If wuX > 0 And wuY > 0 Then Delay 800 FindPic 0,0,1280,800,"Attachment:\cv.bmp",0.9,cvn,cvm If wuX > 0 And wuY > 0 Then Call fsss() Delay 400 End If MoveTo intX,intY Delay 100 LeftDown 1 Delay 100 MoveTo wuX+6,wuY+6 Delay 50 LeftClick 1 Delay 50 LeftUp 1 Delay 250 MoveTo 300,160 KeyDown "5", 1 Delay 85 KeyPress "5", 1 Delay 85 KeyUp "5", 1 Delay 85 else If cvn > 0 And cvm > 0 Then MoveTo cvn+5,cvm+5 Delay 85 LeftDown 1 Delay 80 LeftClick 1 Delay 120 LeftUp 1 MoveTo 300,160 Delay 500 KeyDown "5", 1 Delay 85 KeyPress "5", 1 Delay 85 KeyUp "5", 1 Delay 85 else Delay 85 KeyDown "5", 1 Delay 85 KeyPress "5", 1