线路上点坐标反算其里程桩号及中桩距.docVIP

一、ZUOBIAO—ZH（由线路上任意点坐标计算相应的桩号、中桩距[偏左或偏右的距离]） 主程序： AbsJ“Fixmc” 7Fixm：Goto1△ ABFHGRQ ：A“X-JD”：B“Y-JD”：G“A0”：G＜0Q 1△G＞0Q -1△F AbsG:Prog“S3”：G F：R“R”：O“Gra0 ZY-JD ”:F O： Prog“S3”：F F：H“L-ZY”：S R÷COS（G÷2）：M“X（YXIAN）” A+Scos（F+180°+Q×（90°-G÷2））◢N“Y（YIAN）” B+Ssin（F+180°+Q×（90°-G÷2））◢L 2πR÷360°×G：F F- Q×90°+180°：F＜0F F+360°△F＞360°F F-360°：≠F F△Lbl1: CD :C“X”：D“Y”：POL（M-C，N-D）：T J：T Ans+180°：P I：U T-F：-Q×U≦0Prog“T”：Goto1△-Q×U＞0Prog“U”：Goto1△ 主程序完 子程序： V Pol A—C，B—D ：T J：T Ans+180°：P I：U T-（F+90°Q）：E“LI” H+Rtan G÷2 -PcosU◢K“B” -Psin u ◢ W Pol A—C，B—D ：T J：T Ans+180°：P I：U T-（F-GQ-90°Q）：E“LI” H+L+（PcosU-Rtan G÷2 ） AbsU≤180°Prog“V”△AbsU＞180°U T+360°-F：U＞GProg“W”：≠Prog“X” △ U AbsU＞180°Prog“V”：AbsU≤GProg“X”⊿AbsU＞GProg“W”⊿ X E“LI” H-Q（2πR÷360°×U） 程 序 示 例 序号 屏 幕 显 示 操 作 备 注 1 Fixmc＝＞？ 0.0000【EXE】 重启动功能控制符，输入“7”或“-7”可启动重启动功能，首次启动 时，需输入密码： ，否则将出现随机错误。 2 X-JD? 0.0000 1130.226 【EXE】 输入平面线交点坐标[X坐标]。 3 Y-JD? 0.0000 1162.669 【EXE】 输入平面线交点坐标[Y坐标]。 4 A0? 0.0000 122.38297 【EXE】 输入平面线转向角122°38′29.7″，要求以十进制的形式输入，左拐 曲线取负值，右拐曲线取正值。 5 R？ 0.0000 100 【EXE】 输入平面线半径。 6 Grao ZY-JD ? 0.0000 80.00004″ 【EXE】 输入平面线中ZY点至交点 JD 方向的坐标方位角80°00′0.04″， 要求以十进制的形式输入。 7 L-ZY? 0.0000 185.364 【EXE】 输入平面线中ZY点桩里程。 8 X（YXIAN） 1000.0000 【EXE】 程序输出平面线圆心坐标[X坐标]。 9 Y（YXIAN） 1000.0000 【EXE】 程序输出平面线圆心坐标[Y坐标]。 10 X？ 0.0000 1022.816 【EXE】 程序要求输入计算点坐标[X坐标]。 11 Y? 0.000 915.012 【EXE】 程序要求输入计算点坐标[Y坐标]。 12 LI 105.6291 【EXE】 程序输出计算点桩里程。 13 B 62.7731 【EXE】 程序输出计算点中桩距（即计算点至中线的距离），正值表示右边桩， 负值表示左边桩，“0”表示中桩。 14 X？ 1022.816 1081.563 【EXE】 程序要求输入计算点坐标[X坐标]。 15 Y? 915.012 1057.858 【EXE】 程序要求输入计算点坐标[Y坐标]。 16 LI 264.5160 【EXE】 程序输出计算点桩里程。 17 B 0.000 【EXE】 程序输出计算点中桩距（即计算点至中线的距离），正值表示右边桩， 负值表示左边桩，“0”表示中桩。 18 X？ 1081.563 AC/ON 【EXE】 人为暂停程运行，并重新启动程序。 19 Fixmc＝＞？ -144.6494 -7 【EXE】 输入“-7”直接进入原有计算状态。 20 X？ 1081.5630 879.8700 【EXE】 同上 21 Y? 1057.8580 1176.906 【EXE】 同上 22 LI 442.1833 【EXE】 同上 23 B -109.5182 【EXE】 同上 24 X？ 879.8700 【AC/ON】 【AC/ON】 人为终断程序。本示例结束。程序示例可以教会您如何使用程序，也是 检验程序正确性的依据。