资源简介
编程进行高斯投影正反算
采用四种不同的椭球参数,取中央子午线经度0 L =111°
有界面
代码片段和文件信息
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Gauss
{
public partial class Form1 : Form
{
public int n;
public double L0 a b c ee ee2 x y L;
public double RadB RadL RadL0;
public double ax ay az bx by bz;
public Form1()
{
InitializeComponent();
}
//构建度分秒和弧度相互转换函数
//1.度分秒转换为弧度
private double DMStoArc(double x double y double z)
{
double A0;
A0 = (x + y / 60 + z / 3600) * Math.PI / 180;
return A0;
}
//2.弧度转换为角度DMS—>°′″
double D(double B0) //°
{
double x0;
x0 = (int)(B0 * 180 / Math.PI);
return x0;
}
double M(double C0) //′
{
double _y y0;
_y = (int)(C0 * 180 / Math.PI);
y0 = ((int)((C0 * 180 / Math.PI - _y) * 60));
return y0;
}
double S(double D0) //″
{
double _z1 _z2 z0;
_z1 = (int)(D0 * 180 / Math.PI);
_z2 = (int)((D0 * 180 / Math.PI - _z1) * 60);
z0 = ((double)(((D0 * 180 / Math.PI - _z1) * 60 - _z2) * 60));
return z0;
}
//选择按钮
//选择坐标系
private void radioButton3_CheckedChanged(object sender EventArgs e)
{
//1954年北京坐标系
a = 6378245.0;
b = 6356863.0187730473;
c = 6399698.9017827110;
ee = 0.006693421622966;
ee2 = 0.006738525414683;
}
private void radioButton4_CheckedChanged(object sender EventArgs e)
{
//1980国家大地坐标系
a = 6378140.0;
b = 6356755.2881575287;
c = 6399596.6519880105;
ee = 0.006694384999588;
ee2 = 0.006739501819473;
}
private void radioButton5_CheckedChanged(object sender EventArgs e)
{
//WGS-84
a = 6378137.0;
b = 6356752.3142;
c = 6399593.6258;
ee = 0.00669437999013;
ee2 = 0.00673949674227;
}
private void radioButton6_CheckedChanged(object sender EventArgs e)
{
//CGCS2000
a = 6378137;
b = 6356752.3141;
c = 6399593.6259;
ee = 0.00669438002290;
ee2 = 0.00673949677548;
}
//计算按钮
//1.清除数据
private void button3_Click(object sender EventArgs e)
{
textBox1.Text = null;
textBox2.Text = null;
textBox3.Text = null;
textBox4.Text = null;
textBox5.Text = null;
textBox6.Text =
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 187 2017-05-25 13:09 Gauss\Gauss\App.config
文件 36352 2017-05-25 20:50 Gauss\Gauss\bin\Debug\Gauss.exe
文件 187 2017-05-25 13:09 Gauss\Gauss\bin\Debug\Gauss.exe.config
文件 36352 2017-05-25 20:50 Gauss\Gauss\bin\Debug\Gauss.pdb
文件 24224 2018-07-03 08:48 Gauss\Gauss\bin\Debug\Gauss.vshost.exe
文件 187 2017-05-25 13:09 Gauss\Gauss\bin\Debug\Gauss.vshost.exe.config
文件 490 2016-07-16 19:44 Gauss\Gauss\bin\Debug\Gauss.vshost.exe.manifest
文件 10897 2017-05-25 20:50 Gauss\Gauss\Form1.cs
文件 38581 2017-05-25 18:34 Gauss\Gauss\Form1.Designer.cs
文件 21709 2017-05-25 18:34 Gauss\Gauss\Form1.resx
文件 3790 2017-05-25 13:21 Gauss\Gauss\Gauss.csproj
文件 1453 2017-05-25 16:41 Gauss\Gauss\obj\Debug\DesignTimeResolveAssemblyReferences.cache
文件 7079 2018-07-02 23:42 Gauss\Gauss\obj\Debug\DesignTimeResolveAssemblyReferencesInput.cache
文件 976 2018-07-03 08:48 Gauss\Gauss\obj\Debug\Gauss.csproj.FileListAbsolute.txt
文件 977 2017-05-25 18:34 Gauss\Gauss\obj\Debug\Gauss.csproj.GenerateResource.Cache
文件 2211 2017-05-25 13:21 Gauss\Gauss\obj\Debug\Gauss.csprojResolveAssemblyReference.cache
文件 36352 2017-05-25 20:50 Gauss\Gauss\obj\Debug\Gauss.exe
文件 10728 2017-05-25 18:34 Gauss\Gauss\obj\Debug\Gauss.Form1.resources
文件 36352 2017-05-25 20:50 Gauss\Gauss\obj\Debug\Gauss.pdb
文件 180 2017-05-25 13:21 Gauss\Gauss\obj\Debug\Gauss.Properties.Resources.resources
文件 0 2017-05-25 13:09 Gauss\Gauss\obj\Debug\TemporaryGeneratedFile_036C0B5B-1481-4323-8D20-8F5ADCB23D92.cs
文件 0 2017-05-25 13:09 Gauss\Gauss\obj\Debug\TemporaryGeneratedFile_5937a670-0e60-4077-877b-f7221da3dda1.cs
文件 0 2017-05-25 13:09 Gauss\Gauss\obj\Debug\TemporaryGeneratedFile_E7A71F73-0F8D-4B9B-B56E-8E70B10BC5D3.cs
文件 517 2017-05-25 13:09 Gauss\Gauss\Program.cs
文件 1334 2017-05-25 13:09 Gauss\Gauss\Properties\AssemblyInfo.cs
文件 2862 2017-05-25 13:09 Gauss\Gauss\Properties\Resources.Designer.cs
文件 5612 2017-05-25 13:09 Gauss\Gauss\Properties\Resources.resx
文件 1092 2017-05-25 13:09 Gauss\Gauss\Properties\Settings.Designer.cs
文件 249 2017-05-25 13:09 Gauss\Gauss\Properties\Settings.settings
文件 984 2017-05-25 13:10 Gauss\Gauss.sln
............此处省略12个文件信息
评论
共有 条评论