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