Sub MapFragment1_Click (Point As LatLng)
If missionManager.IsInitialized And missionManager.Connected Then
If Msgbox2("Start hotspot mission?", "", "Yes", "Cancel", "No", Null) = DialogResponse.POSITIVE Then
Dim hsm As DJIHotSpotMission
hsm.Initialize(Point.Latitude, Point.Longitude, 30, 5) 'Altitude = 30m, Radius = 5m
missionManager.PrepareMission(hsm)
End If
End If
End Sub