ECEF坐标系转经纬度 wgs84 - 方法提炼

本文提供坐标系转换算法，根据某前端算法修改完善为C#语言支持。

最近在项目中遇到空间坐标转换问题，现提供相关算法C#支持。

源代码

相关代码如下：

using System;namespace ConsoleApp1
{/// <summary>/// ECEF坐标系转换经纬度 wgs84/// 方法提炼/// </summary>internal class Program{private static void Main(string[] args){double[] ret = XYZ2LLA(new double[]{3333,4444,1500});Console.WriteLine(string.Format("LON-:{0}\r\nLAT-:{1}\r\nALT-:{2}\r\n", ret[0], ret[1], ret[2]));Console.Read();}private static double EARTH_1 = 6378.137;private static double Temp_1 = EARTH_1 * (1.0 - (1.0 / 298.257223563));private static double Eccsq = 1 - Math.Pow(Temp_1, 2) / Math.Pow(EARTH_1, 2);private static double Dtr = Math.PI / 180.0;/// <summary>/// ECEF坐标系转经纬度 wgs84/// 输入-千米、千米、千米/// 输出-经、纬、千米/// </summary>/// <param name="xvec"></param>/// <returns></returns>private static double[] XYZ2LLA(double[] xvec){double flatgc, flatn, dlat, rp, x, y, z, p, tangd, rn, clat, slat, flat, flon, altkm;x = xvec[0];y = xvec[1];z = xvec[2];rp = Math.Sqrt(Math.Pow(x, 2) + Math.Pow(y, 2) + Math.Pow(z, 2));flatgc = Math.Asin(z / rp) / Dtr;flon = ((Math.Abs(x) + Math.Abs(y)) < 1.0e-10) ? 0.0 : Math.Atan2(y, x) / Dtr;flon = (flon < 0.0) ? flon + 360.0 : flon;p = Math.Sqrt(Math.Pow(x, 2) + Math.Pow(y, 2));if (p < 1.0e-10){flat = ((z < 0.0)) ? -90.0 : 90.0;altkm = rp - Radcur(flat)[0];}else{altkm = rp - Radcur(flatgc)[0];flat = Gc2gd(flatgc, altkm);rn = Radcur(flat)[1];for (double kount = 0; kount < 5; kount++){slat = Math.Sin(Dtr * flat);tangd = (z + rn * Eccsq * slat) / p;flatn = Math.Atan(tangd) / Dtr;dlat = flatn - flat;flat = flatn;clat = Math.Cos(Dtr * flat);rn = Radcur(flat)[1];altkm = (p / clat) - rn;if (Math.Abs(dlat) < 1.0e-12){break;}}}return new double[] { flat, flon, altkm };}private static double Gc2gd(double flatgci, double altkmi){double[] rrnrm = Radcur(flatgci);double ratio = 1 - Math.Pow(Math.Sqrt(Eccsq), 2) * rrnrm[1] / (rrnrm[1] + altkmi);double tlat = Math.Tan(Dtr * flatgci) / ratio;rrnrm = Radcur((1 / Dtr) * Math.Atan(tlat));ratio = 1 - Math.Pow(Math.Sqrt(Eccsq), 2) * rrnrm[1] / (rrnrm[1] + altkmi);tlat = Math.Tan(Dtr * flatgci) / ratio;return (1 / Dtr) * Math.Atan(tlat);}private static double[] Radcur(double lati){double slat, dsq, rn, rho, z;slat = Math.Sin(Dtr * lati);dsq = 1.0 - Eccsq * Math.Pow(slat, 2);rn = EARTH_1 / Math.Sqrt(dsq);rho = rn * Math.Cos(Dtr * lati);z = (1.0 - Eccsq) * rn * slat;return (new double[] { Math.Sqrt(Math.Pow(rho, 2) + Math.Pow(z, 2)), rn, rn * (1.0 - Eccsq) / dsq });}}
}

2019年11月25日
Dawn

ECEF坐标系转经纬度 wgs84 - 方法提炼相关推荐

2000坐标系转经纬度工具_【Leaflet开发】L.CRS + 搞定Leaflet多坐标系拓展
一.CRS源码解析 CRS的定义就几个函数: 没错.你看出来了,其实这玩意就是提供了wgs84坐标系与目标坐标系之间转换的一种算法.因为leaflet内部都是用经纬度坐标系表达的坐标,所以leafle ...
4字节经纬度_北京54坐标系转经纬度坐标系教程
如何将下载的影像变换为北京54坐标? 注意:投影转换成54坐标系需要下载无偏移卫星图像进行转换,有偏移的转换将导致转换后的卫星图像扭曲,坐标错误,无法配准. 第一步:选择无偏移地图源,下载你所需要的卫 ...
西安80坐标系转经纬度坐标系教程
如何将下载的影像变换为西安80坐标? 利用ARCGIS进行自定义坐标系和投影转换 ARCGIS种通过三参数和其参数进行精确投影转换注意:投影转换成80坐标系需要下载无偏移卫星图像进行转换,有偏移的转 ...
火星坐标、百度坐标、WGS-84坐标相互转换及墨卡托投影坐标转经纬度JavaScript版...
转自:https://www.cnblogs.com/fwc1994/p/5884115.html 火星坐标.百度坐标.WGS-84坐标相互转换及墨卡托投影坐标转经纬度JavaScript版火星坐标 ...
【转】火星坐标、百度坐标、WGS-84坐标相互转换及墨卡托投影坐标转经纬度JavaScript版...
原文地址:https://www.cnblogs.com/fwc1994/p/5884115.html 火星坐标火星坐标是国家测绘局为了国家安全在原始坐标的基础上进行偏移得到的坐标,基本国内的电子地 ...
PHP墨卡托坐标转经纬度,墨卡托坐标与经纬度相互转换的方法
最近用到了墨卡托坐标转换经纬度的需求,原理什么的不想多说,需要的可以查看这里: 麦卡托投影法 Web Mercator 经纬度转Wev墨卡托版本1 dvec3 CMathEngine::lonLat ...
平面投影坐标转经纬度坐标
平面投影坐标转经纬度坐标本人在进行开发时,使用geotools的GeoTiffReader类读取卫星影像的顶点坐标,得到的是平面坐标,单位是米,打开arcGIS,加载影像,右下角会有坐标,在视图-& ...
python实现2000投影坐标转经纬度
引言常用的WGS84投影坐标转经纬度可用通用的pyproj库来转换,而2000坐标测试用这个库是没法转换的而WGS84和其它坐标系(gcj02.bd09)之间的转换可以通过ChangeCoord ...
地图坐标系相互转换（WGS-84、GCJ-02、BD-09）
一.地图坐标系解释在进行地图开发过程中,我们一般能接触到以下三种类型的地图坐标系: WGS-84原始坐标系,一般用国际GPS纪录仪记录下来的经纬度,通过GPS定位拿到的原始经纬度,Google和高德 ...

ECEF坐标系转经纬度 wgs84 - 方法提炼

ECEF坐标系转经纬度 wgs84 - 方法提炼

源代码

ECEF坐标系转经纬度 wgs84 - 方法提炼相关推荐

最新文章

热门文章