《卡西欧计算器5800P坐正反算.docx》由会员分享，可在线阅读，更多相关《卡西欧计算器5800P坐正反算.docx（2页珍藏版）》请在三一办公上搜索。
1、卡西欧计算器5800P坐正反算卡西欧计算器5800P坐标正反算 Lbl 3:1ZS,2FS?Q Q=1=Goto 1:Q=2=Goto 2 I0: J0: Lbl 1:CE:X?m:CE:Y?F:JL?L:FWJ?A Rec(L,A):m+IC:F+JD Cls X=:Locate 3,1,C:Y=:Locate 3,2,D Goto 3 Lbl 2:CE:X?G:CE:Y?H:(HOU)FY:X?N:(HOU)FY:Y?E Pol(N-G,E-H) If J0:Then J+360Y:Else JY:IfEnd Cls FY JL=:Locate 10,1,I:FY FWJ=:YDMS Go
2、to 3 进入程序运行如下: 1ZS,2FS? 输入1为正算,2为反算. 以输入1为例: CE:X? 测站点X(5796.717) CE:Y? 测站点Y(5212.569) JL? 仪器测得的距离(321.889) FWJ? 仪器测得的方位角(193-41-07) 得到:X=5483.966 Y=5136.414 再按EXE,输2为例: CE:X? 测站点X(5796.717) CE:Y? 测站点Y(5212.569) 坐标反算 ZBFS L1 AB：Fixm：CD L2 pol(C-A,D-B) L3 W0 W=W+360 L4 lntW +0.01lnt(60 Frac W )+0.006
3、 Frac(60 FracW) 说明： 1、本程序用于计算直角坐标值已知的两点间的边长和坐标方位角。 2、起算点和目标点的坐标分别为、。 3、起算点改变时应重新调用程序以改变A、B的值。 4、边长值和方位角值分别自动存放在“V”和“W”中。“W”的单位为：度“ ”。 隧洞断面图如上的程序如下： 直线断面放样程序 ZXFY2 L1： CE:X?A:CE:Y?B“CEZ:H”？E:(HOU)FY:X?C:(HOU)FY:Y?D: (HOU)FY:H?F POL(C-A,D-B): Cls If J0:Then J+360J J是方位角，是隧洞的轴线方向。 L2 L=ICos (J-G) L3 M=Isin(J-G) M是偏中 L4 V=F-E V是实际高程 L5 V=16.83 W= W是实际测量出来的顶拱位置 Goto5 说明： 1. 本程序用于计算直线段的如图断面样式的隧洞程系放样程系。 2. 坐标A,B,H,是测算出来的坐标数据。 3. 已知的坐标X,Y是从图纸上的起算点坐标。 4. J是方位角，是隧洞的轴线方向。 5. M是偏中，V是实际高程，W是实际测量出来的顶拱位置。
