测量内业工作总结1.docx

测量内业工作总结1

第一篇：测量内业工作总结1曲线坐标5800计算器编辑程序内容（缓和曲线2007版）程序名：QXZB-（曲线坐标--）？P：？Z：”ZH(X)”？G：”ZH(Y)”？H：？R：”LS1”？T：”ZH-JD”？K：”ZH”？N：”Ly”？L：”HZ(X)”？E：”HZ(Y)”？F：”LS2”？V：”HZ-JD”？Q：”Z+1,Y-1”？：BLblA？M：？SIfM＜N:ThenM＝＞GotoA:IfendIfM＞（N+T+L+V）:ThenM＝＞GotoA:IfendIfM＞（N+T+L）:ThenM＝＞GotoD:IfendIfM＞（N+T）:ThenM＝＞GotoC:IfendLblB(第一缓和曲线)Abs（M-N）→WW－W5÷（40R2T2）+W9÷（3456R4T4）→C-------------------------------支距X坐标W3÷（6RT）－W7÷（336R3T3）+W11÷（42240R5T5）→D-------------支距Y坐标90W2÷（πRT）→O缓和曲线角G＋CcosK＋BDsinK+Scos（K－BO－90）→X▲H＋CsinK－BDcosK＋Ssin（K－BO－90）→Y▲Pol（（X-P），（Y-Z））：Cls--------------------方位角和距离程序IfJ＜0：ThenJ+360→J：ElseJ→J：Ifend：I▲J◆DMS▲GotoALblC(圆曲线)T－T3÷（40R2）+T5÷（3456R4）→C---------------------------ZH点到HY点支距X坐标T2÷（6R）－T4÷（336R3）+T6÷（42240R5）→D-----------ZH点到HY点支距Y坐标K-90BT÷（πR）→U----------------------HY点到JD点方位角Abs(M-(N+T))×180÷（πR）→O-------------待求点圆心角G＋CcosK＋BDsinK+2Rsin(0.5O)Cos(U-0.5BO)+SCos(U-BO-90)→X▲H＋CsinK－BDcosK+2Rsin(0.5O)Sin(U-0.5BO)+SSin(U-BO-90)→Y▲Pol（（X-P），（Y-Z））：Cls------------------方位角和距离程序IfJ＜0：ThenJ+360→J：ElseJ→J：Ifend：I▲J◆DMS▲GotoALblD(第二缓和曲线)Abs（M-(N+T+L+V)）→WW－W5÷（40R2V2）+W9÷（3456R4V4）→C支距X坐标W3÷（6RV）－W7÷（336R3V3）+W11÷（42240R5V5）→D------------支距Y坐标90W2÷（πRV）→O---缓和曲线角E＋CcosQ-BDsinQ＋Scos（Q+BO+90）→X▲F＋CsinQ+BDcosQ＋Ssin（Q+BO+90）→Y▲Pol（（X-P），（Y-Z））：Cls---------------------方位角和距离程序IfJ＜0：ThenJ+360→J：ElseJ→J：Ifend：I▲J◆DMS▲GotoAP、Z—架站点X、Y坐标N—ZH点里程桩号G、H—ZH点X、Y坐标M—待测点里程桩号K—ZH至JD方位角S—待测点左右桩距离（左+，右-）T—第一缓和曲线长R—缓和曲线半径L—圆曲线长V—第二缓和曲线长Q—HZ至JD方位角E、F—HZ点X、Y坐标B—左转弯为+1，右转弯为-1曲线坐标4800计算器编辑程序内容程序名：QXZB---（曲线坐标）P：Z：G：H：R：T：K：N：L：E：F：V：Q:BLblA{MS}M＜N＝＞GotoA△M＞（N+T+L+V）＝＞GotoA△M＞（N+T+L）＝＞GotoD△M＞（N+T）＝＞GotoC△LblB(第一缓和曲线)W=Abs（M-N）C=W－W5÷（40R2T2）+W9÷（3456R4T4）-----------------------支距X坐标D=W3÷（6RT）－W7÷（336R3T3）+W11÷（42240R5T5）-------支距Y坐标O=90W2÷（πRT）----------------------------缓和曲线角X=G＋CcosK＋BDsinK+Scos（K－BO－90）▲Y=H＋CsinK－BDcosK＋Ssin（K－BO－90）▲Pol（（X－P），（Y－Z））：I▲J＜0=＞J=J+360△J▲---------------计算方位角和距离程序GotoALblC(圆曲线)C=T－T3÷40R2+T5÷3456R4-----ZH点到HY点支距X坐标D=T2÷6R－T4÷336R3+T6÷42240R5ZH点到HY点支距Y坐标U=K-90BT÷πR-