卡西欧计算器5800P坐标正反算
Lbl 3:\ Q=1=>Goto 1:Q=2=>Goto 2 I→0: J→0:
Lbl 1:\CE:X\:\
Rec(L,A):m+I→C:F+J→D Cls
\ Goto 3
Lbl 2:\Pol(N-G,E-H)
If J<0:Then J+360→Y:Else J→Y:IfEnd Cls
\ Goto 3
进入程序运行如下:
1→ZS,2→FS? 输入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 W<0 W=W+360
L4 lntW +0.01lnt(60 Frac W )+0.006 Frac(60 FracW) ◢ 说明:
1、本程序用于计算直角坐标值已知的两点间的边长和坐标方位角。 2、起算点和目标点的坐标分别为(A,B)、(C,D)。 3、起算点改变时应重新调用程序以改变A、B的值。
4、边长值和方位角值分别自动存放在“V”和“W”中。“W”的单位为:度“ °”。
隧洞断面图如上的程序如下:
直线断面放样程序(2) ZXFY2
L1: \“CEZ:H”?E:\\POL(C-A,D-B): Cls
If J<0:Then J+360→J J是方位角,是隧洞的轴线方向。
L2 L=ICos (J-G)◢
L3 M=Isin(J-G) ◢ M是偏中
L4 V=F-E◢ V是实际高程
L5 V=16.83 W= ((V-16.83)2+M2)◢ W是实际测量出来的顶拱位置 Goto5
说明:
1. 本程序用于计算直线段的如图断面样式的隧洞程系放样程系。 2. 坐标A,B,H,是测算出来的坐标数据。
3. 已知的坐标X,Y是从图纸上的起算点坐标。 4. J是方位角,是隧洞的轴线方向。
5. M是偏中,V是实际高程,W是实际测量出来的顶拱位置。
相关推荐: