Yes, V2 =2.0 No, Bebop not supported.

Alan

Thanks much Alan for the clarification...Rick

If possible ? Please post video of your drone project in flight and landing. Thank You! Rob

Yes, I would love to see that too !

Unfortunately, I've tried the code and it seems that my drone is moving away from the target in the opposite direction. I fixed that by changing the direction of movements right() and left() and it seems to follow the target. But, it doesn't land on the target.

Any suggestions?

Is there anyway to set the altitude of the drone ?

Thanks guys.

The AR Drone won't fly lower than about 1 meter (as detected by the ping sensor on the underside, so if you have a platform 1 meter up, it will jump to 2 meters altitude when it goes over it). When you give the land command, it immediately drops to 0 altitude. I think what you are trying to do may not be possible with the AR Drone. You may need to use a more sophisticated drone or scratch build with a more sophisticated controller.

For its price, the Parrot Drone was pretty advanced when it came out, but it was an expensive toy, not a high end drone, and it has been surpassed by DJI and 3DR and other companies, and Parrot was never very good at supporting hobbyists who wanted to use the API's. Even their own apps got very little support. They made a lot of promises about new features and dropped all of them when they released the BeBop drone (which is still pretty basic when compared to some of the leaders in the market).

Alan

In the loop, use the variables created by the AR drone Movement Panel to detect the altitude. Keep dropping until it reaches the lowest altitude and then send the LAND() command.

it'll happen - just won't be perfect.

Soemthing like this... although i have no idea what the value for lowest altitude will be. You'll need to check that and adjust it yourself.

# use the ar drone's bottom camera
ControlCommand("AR Drone", CameraSelectVertical)

# track any glyph
ControlCommand("Camera", CameraGlyphTrackingEnable)

:loop

if ($CameraIsTracking)

  if ($CameraVerticalQuadrant = "Top")

    Forward()
    Sleep(1000)
    stop()

  ELSEif ($CameraVerticalQuadrant = "Bottom")

    Reverse()
    Sleep(1000)
    stop()

  endif

  if ($CameraHorizontalQuadrant = "Right")

    Left()
    Sleep(1000)
    stop()

  ELSEif ($CameraHorizontalQuadrant = "Left")

    Right()
    Sleep(1000)
    stop()

  endif

  if ($CameraHorizontalQuadrant = "Middle" and $CameraVerticalQuadrant = "Middle)

    down()
    Sleep(1000)
    stop()

  endif

  if ($DroneAlt < 1)

    # instruct the drone to land
    land()
    
    # exit the script
    halt() 
    
  endif

endif

goto(loop)