AlpVir Well-Known Member Licensed User Longtime User Nov 6, 2014 #1 This function should be used to calculate the angle of elevation of a point above the horizon. Perhaps it is not very accurate, however does not take into account atmospheric refraction and the height above sea level of the observer. Code: Copy Sub GetElevation(Alt1 As Double, Alt2 As Int, Distance As Float) As Float Dim Lambda As Float Lambda = ATanD ((Alt1-Alt2)/Distance) Return Lambda End Sub Is there any library function OSMDroid that allows you to get a more accurate result ? Thank you for your attention. Last edited: Nov 16, 2014
This function should be used to calculate the angle of elevation of a point above the horizon. Perhaps it is not very accurate, however does not take into account atmospheric refraction and the height above sea level of the observer. Code: Copy Sub GetElevation(Alt1 As Double, Alt2 As Int, Distance As Float) As Float Dim Lambda As Float Lambda = ATanD ((Alt1-Alt2)/Distance) Return Lambda End Sub Is there any library function OSMDroid that allows you to get a more accurate result ? Thank you for your attention.