qiux.h

高斯投影计算

public ref class qiux{

public:
	double X,B;
	bool ifke;
	qiux(double B,bool ke){
		if(ke){		
		X=111134.8611*B/Math::PI*180-(32005.7799*System::Math::Sin(B)+133.9238*System::Math ::Pow(System::Math ::Sin(B),3)+0.6973*System::Math ::Pow (System::Math ::Sin(B),5)+0.0039*System::Math ::Pow (System::Math ::Sin(B),7))*System::Math::Cos (B);
		}
		if(!ke){		
		X=111134.0047*B/Math::PI*180-(32009.8575*System::Math::Sin(B)+133.9602*System::Math ::Pow(System::Math ::Sin(B),3)+0.6976*System::Math ::Pow (System::Math ::Sin(B),5)+0.0039*System::Math ::Pow (System::Math ::Sin(B),7))*System::Math::Cos (B);
		}
	};
	double answer(){
		return this->X;
		}


};
public ref class jiaodu
{
public:

	double d,f,m,jd;
	jiaodu(double d1,double f1,double m1){
		 
		this->d=d1;
		this->jd=d+f/60+m/3600;
	};
	jiaodu(double jd1 ,bool hudu){
		if(hudu)
			jd1=jd1*180/Math::PI ;
		jd1-=Math::Floor(jd1/360)*360;
		if(jd1>0)
		{this->jd =jd1;
	   this->d =System::Math ::Floor (jd);
	   this->f =System::Math ::Floor((jd-d)*60);
	   this->m =((jd-d)*60-f)*60;
		}
		else
		{this->jd=jd1;
		this->d=System::Math::Floor(jd)+1;
		this->f=System::Math::Floor(-(jd-d)*60);
		this->m =(-(jd-d)*60-f)*60;
		}
	};
	jiaodu(System::Windows ::Forms ::TextBox  ^ d1,System::Windows ::Forms ::TextBox ^ f1,System::Windows ::Forms::TextBox ^ m1)
	{double dz,fz,mz;
	try{
		dz=System::Convert::ToDouble(d1->Text);
		fz=System::Convert::ToDouble(f1->Text);
		mz=System::Convert::ToDouble(m1->Text);
	}
	catch(...)
	{System::Windows::Forms ::MessageBox::Show ("对不起，请检查输入格式是否正确，请保证在英文输入法下输入数据","错误");

	}
	fz+=System::Math::Floor(mz/60);
	mz=mz-System::Math ::Floor(mz/60)*60;
	dz+=System::Math ::Floor(fz/60);
	fz=fz-System::Math ::Floor(fz/60)*60;
	this->m=mz;
	this->f=fz;
	this->d=dz;
	if(dz<0)
		this->jd=-(-dz+fz/60+mz/3600);
	else
		this->jd=dz+fz/60+mz/3600;


	};
	System::Void setjiaodu(System::Windows ::Forms ::TextBox  ^ d1,System::Windows ::Forms ::TextBox ^ f1,System::Windows ::Forms::TextBox ^ m1)
	{d1->Text::set(System::Convert ::ToString (this->d));
	f1->Text::set(System::Convert ::ToString (this->f));
	m1->Text::set(System::Convert ::ToString (this->m));

	}


	double gethudu(){
		return jd/180*System::Math ::PI;

	}

	double getjiaodu(){
		return jd;
	}

};