碎步点测量计算程序.docVIP

碎步点测量--坐标计算程序 一 .主程序：（SBD CL ZB JS 碎步点测量坐标计算） 4800计算器程序： Lbl 0：{ABCH}:A〝X1〞:B〝Y1〞: C〝X2〞:H〝Y2〞 Lbl 1：{EF}:E〝J〞:F 〝D13〞 Lbl 2：Fixm: Pol(C-A,H-B: I〝D12=〞◢ J0=J=J+360⊿J〝F12=〞◢ Lbl 3：G〝F13〞=J +E◢ Fixm: Rec(F,G:X〝X3〞=A+I◢Y〝Y3〞=B+J◢ Lbl 4: {N}:N=1 = Goto 1: ≠Goto 0 4850计算器程序： Lbl 0：{ABCH}:A〝X1〞:B〝Y1〞: C〝X2〞:H〝Y2〞 Lbl 1：{EF}:E〝J〞:F 〝D13〞 Lbl 2：Fixm: Pol(C-A,H-B: 〝D12=〞:I◢ J0=J=J+360⊿〝F12=〞: J →DMS◢ Lbl 3：〝F13=〞:G=J +E →DMS◢ Fixm: Rec(F,G: 〝X3=〞: X=A+I◢〝Y3=〞: Y=B+J◢ Lbl 4: {N}:N=1 = Goto 1: ≠Goto 0 二 .屏幕提示： X1? 输入测站点的X1坐标； Y1? 输入测站点的Y1坐标； X2? 输入后视点的X2坐标； Y2? 输入后视点的Y2坐标； J？ 输入测站点至后视点为边至待求点的夹角；(顺时针旋转夹角输入正值；逆时针旋转夹角输入负值） D13? 输入测站点至待求点的距离； D12= 显示测站点至后视点的平距D； F12= 显示测站点至后视点的方位角F12（按SHIFT键然后在按°′″键即可显示度分秒）； F13= 显示测站点至待求点的方位角F13（按SHIFT键然后在按°′″键即可显示度分秒）； X3= 输入测站点的X3坐标； Y3= 输入测站点的Y3坐标； N? 输入条件常数(输入〝1〞，测站点和后视点不变，待求点变化，重新输入新待求点夹角和距离；输入除〝1〞以外的任意数即可返回，重新输入测站点坐标和后视点坐标等计算要素)。 注意：程序中的“0“就是数字零，“⊿”表示条件结束码符号。“Pol(”，“ Rec(”，“ Lbl”，“ Fixm”，“ Goto “，“=“,“≠“作为整体输入，千万不可分开输入! 三.程序算例: 1.已知数据: 点号 X坐标 Y坐标 距离 左夹角 右夹角 测站点 456．123 789．012 逆时针旋转（左）夹角输入负值 顺时针旋转（右）夹角输入正值 后视点 345．235 567．789 待求点1 100 128°42′58″ 待求点2 200 78°12′24″ 2.算例计算结果及操作步骤演示： 表2-1 程序算例计算结果汇总表 点号 已知边距离 已知边方位角 待求点边方位角 待求点 X坐标 待求点 Y坐标 待求点1 247.459 243°22′39.68″ 114°39′41.68″ 414．397 879．891 待求点2 247.459 243°22′39.68″ 321°35′03.68″ 612．828 664．740 表2-2 程序计算步骤、按键操作、屏幕显示及注释 步骤 按键 屏幕显示 注释 1 AC/ON ---- 打开电源光标闪动 2 MOOE/5/2 ---- 先按MOOE在按5在按2,显示计算机储存的计算程序文件名称列表 3 ▲或▼ SBD CL ZB JS 移动光标寻找计算程序文件,找到“SBD CLZB JS” 4 EXE X1? 启动“碎步点测量--坐标计算程序”计算程序;询问“测站点X坐标” 5 456.123 EXE Y1? 输入“测站点X坐标”;询问“测站点Y坐标” 6 789.012 EXE X2? 输入“测站点Y坐标”;询问“后视点X坐标” 7 345.235 EXE Y1? 输入“后视点X坐标”;询问“后视点Y坐标” 8 567.789 EXE J? 输入“后视点Y坐标”;询问“夹角J” 9 -128°42′58″EXE D13? 输入“夹角J”(左角输入负值);询问“测站点至待求点的距离” 10 100 EXE D12= 247.459 输入“测站点至待求点的距离”;显示“测站点至后视点的距离” 11 EXE F12=243°22′39.68″ 显示“测站点至后视点的方位角” （按SHIFT键然后在按°′″键即可显示度分秒） 12 EXE F13=114°39′41.68″ 显示“测站点至待求点的方位角” （按SHIFT键然后在按°′″键即可显示度分秒） 13 EXE X3=414.397 显示“待求点X坐标” 14 EXE Y3=879.