直线段中边桩坐标计算程序PM10-9αααααα-Read.PDF

fx-5800P 程序 直线段中边桩坐标计算程序(PM10-9) (1) 计算原理 在图 10-11 中，已知路线直线段起点A 的 Z x y 桩号 及其平面坐标( ， ) ，端点的已知 A A A 数据可以是B 点的平面坐标( xB ，y B ) ，也可 以是AB 的方位角α 与平距D 。 AB AB 设直线上任意点j 的桩号为Z j ，则j 点的 中桩坐标为 xj x A +(Z j −Z A ) cosαAB ⎫ ⎬ (10-34) 图10-11 直线段中边桩坐标计算原理 y y (Z Z ) sin α + − j A j A AB ⎭ 左边桩坐标为 x x w α + cos( −90°)⎫ jL j L AB ⎬ (10-35) y y w α + sin( −90°) jL j L AB ⎭ 右边桩坐标为 x x w α + cos( +90°)⎫ jR j R AB ⎬ (10-36) y y w α + sin( +90°) jR j R AB ⎭ 式中，wL 为路线左半幅宽，wR 为路线右半幅宽。 (2) 程序PM10-9 ，占用内存746 字节。 LINE COORDINATE PM10-9 显示直线段坐标计算标题 Deg:Fix 3 基本设置 4 DimZ 定义额外变量用于暂存左、右边桩点坐标 A MILEAGE PEG(m)=?Z 输入以m 为单位的A 点桩号 XA(m)=?A 输入起点A 的x 坐标 YA(m)=?B 输入起点A 的y 坐标 XB(m), 0 To BEAR A B(Deg)=?C 输入已知点A 的x 坐标或输入≤0 的数值 If C0:Then YB(m)=?D C0 时为输入B 点y 坐标 Pol(C-A,D-B):Cls:I L 计算A→B 的方位角与平距 J0 J+360 J:J R DIST A B(m)=:L 显示A→B 的水平距离 BEAR A B(DMS)=:R 显示A→B 的方位角 Else BEAR A B(Deg)=?R C0 时为输入A→B 的方位角 DIST A B(m)=?L 输入A→B 的平距 0 D:IfEnd 1 K 计数变量计