FindPic 0,0,807,621,"C:\XYW\纸张.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then//第3纸张 Else //第3纸张 If DateDiff("s",T第3纸张,now)>11 Then T第3纸张=now goto 采集1 End if Delay yc+ 200 goto 第3纸张 End If//第3纸张 Else ///////////第3次点篮子 If DateDiff("s",t篮子3,now)>11 Then t篮子3=now goto 查找次数 end if Delay yc+ 200 Goto 篮子3 End if///////////第3次点篮子 Else //核对坐标13,85 333333333333333333333333333 Call 写坐标(13,85) Delay yc+ 3200 Goto 篮子3 End if //核对坐标13,85 333333333333333333333 Rem cishu4 t篮子4=now Rem 篮子4 Call 识别地图 If x=24 and y=90 then//核对坐标24,90 44444444444444444444444 FindPic 0,0,807,621,"C:\XYW\篮子.bmp",0.8,intX,intY If intX > 0 And intY > 0 Then///////////第4次点篮子 call 修正偏移(intX ,intY) T第4纸张=NOW Rem 第4纸张 FindPic 0,0,807,621,"C:\XYW\纸张.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then//第4纸张 Else //第4纸张 If DateDiff("s",T第4纸张,now)>11 Then T第4纸张=now goto 采集1 End if Delay yc+ 200 goto 第4纸张 End If//第4纸张 Else ///////////第4次点篮子 If DateDiff("s",t篮子4,now)>11 Then t篮子4=now goto 查找次数 end if Delay yc+ 200 Goto 篮子4 End if///////////第4次点篮子 Else //核对坐标24,90 44444444444444444444444 Call 写坐标(24,90) Delay yc+ 3200 Goto 篮子4 End if //核对坐标24,90 44444444444444444444444444444 Rem cishu5 t篮子5=now Rem 篮子5 Call 识别地图 If x=23 and y=82 then//核对坐标23,82 555555555555555555555 FindPic 0,0,807,621,"C:\XYW\篮子.bmp",0.8,intX,intY If intX > 0 And intY > 0 Then///////////第5次点篮子 call 修正偏移(intX ,intY) T第5纸张=NOW Rem 第5纸张 FindPic 0,0,807,621,"C:\XYW\纸张.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then//第5纸张 Else //第5纸张 If DateDiff("s",T第5纸张,now)>11 Then T第5纸张=now goto 采集1 End if Delay yc+ 200 goto 第5纸张 End If//第5纸张 Else ///////////第5次点篮子 If DateDiff("s",t篮子5,now)>11 Then t篮子5=now goto 查找次数 end if Delay yc+ 200 Goto 篮子5 End if///////////第5次点篮子 Else //核对坐标23,82 5555 55555555555555555555555555555555555 Call 写坐标(23,82) Delay yc+ 3200 Goto 篮子5 End if //核对坐标23,82 555555555555555555555555555555 Call 交任务 Exit sub Else //在次 查找篮子 If DateDiff("s",t采集2,now)>11 Then t采集2=now