QL（坐标反算）.doc

CASIO FX4800P 工程测量实用程序 QL（坐标反算） Lbi 0C“X0”D“Y0”{XY}X“X2”Y“Y2”X-COGoto 1≠Goto 2 Lbi 1W“Q”0◢ Goto 0 Lbi 2Prog“FWJ” Fix 4 W“Q”IntW0.01Int60FracW0.006Frac60FracW ◢ Norm T“L” X-C2Y-D2◢ Goto 0 说明（已知两点坐标，反算方位角及两点间的距离） 先按FILE键，光标选择QL，按运行。 输入X0 测站点（或起算点）X轴坐标，按 Y0 测站点（或起算点）Y轴坐标，按 X2 后视点（或方向点）X轴坐标，按 Y2 后视点（或方向点）Y轴坐标，按 显示 Q 方位角（如125.0325即表示125。03’25”）,按 L 两点间距离 再按进行循环运算，重复输入X2、Y2 否则按AC键退出。 XY坐标正算 Lbi 0C“X0”D“Y0”{WM}W“Q”M“L”XCMcosW◢ YDMsinW◢ Goto 0 说明（已知一点坐标、方位角、距离，求另一点坐标） 先按FILE键，光标选择XY，按运行。 输入X0 测站点（或起算点）X轴坐标，按 Y0 测站点（或起算点）Y轴坐标，按 Q 已知方位角，按 L 两点间距离，按 显示X 所求点X轴坐标，按 Y 所求点Y轴坐标，按 再按进行循环运算，重复输入Q 、L 否则按AC键退出。 ZX（直线坐标计算） Lbi 0G“QD”A“QDX” B“QDY”Q“Q”{L,K}Prog“ZZ”Goto 0 说明（计算直线段任意里程桩号坐标） 先按FILE键，光标选择XY，按运行。 输入QD 直线段起点里程，按 QDX 起点X轴坐标，按 QDY 起点Y轴坐标，按 Q 已知方位角，按 L 所求点里程，按 K 所求点距中线的宽度（左负右正），按 显示X 所求点X轴坐标，按 Y 所求点Y轴坐标， 再按进行循环运算，重复输入L 、K 否则按AC键退出。 GC（高程） Lbi 0Z“HSG”E“HSD”S“YG”ZE◢ Lbi 1{H}H“QSG”G“GC”S-H◢ Goto 1 说明（标高测设时计算实测高程或读数） 先按FILE键，光标选择GC，按运行。 输入HSD 后视点高程，按 HSD 后视点读数，按 显示YG 仪高，按 输入QSG 前视读数（或高程），按 显示GC 前视高程（或读数） 再按进行循环运算，重复输入L 、K 否则按AC键退出。 MZ（面积计算） Lbi 0C“X1”D“Y1”M“X2”N“Y2” S0.5CN-MD Lbi 1{X,Y}X0Goto 2 SS0.5MY-XNMXNY Goto 1 Lbi 2SAbsS0.5MD-CN ◢ ★ 按逆时针顺序输入坐标点 JLJH（距离交会） C“X1”D“Y1”M“H1”X“X2” Y“Y2”N“H2” U“L1”I“DH1” V“L2”J“DH2”Prog“FWJ” L X-C2Y-D2 PWcos-1U2 L2-V22ULOW180-cos-1V2 L2-U22VL E“X0”CX2UcosPVcosO2◢ F“Y0”DY2UsinPVsinO2◢ H“H0”M-IN-J2◢ CE DF 说明（用于设置任意测站） 先按FILE键，光标选择JLJH，按运行。 输入X1 已知点1的X轴坐标，按 Y1 已知点1的Y轴坐标，按 H1 已知点1的高程，按 X2 已知点2的X轴坐标，按 Y2 已知点2的Y轴坐标，按 H2 已知点2的高程，按 L1 已知点1的实测平距，按 L2 已知点2的实测平距，按 DH1 已知点1的实测高差（V镜高-仪高），按 DH2 已知点2的实测高差（V镜高-仪高），按 显示X0 测站点X轴坐标，按 Y0 测站点Y轴坐标， H0 测站点高程 再按进行循环运算，重复输入L 、K, 否则按AC键退出。 ★注意已知点1必须位于左侧 YQX（圆曲线坐标计算） Lbi 0G“ZY”A“ZYX”B“ZYY”R“R”Q“Q”{L,K}Prog“YY”Goto 0 说明（计算圆曲线段任意里程桩号坐标） 先按FILE键，光标选择YQX，按运行。 输入ZY 直圆点里程，按 ZYX 直圆点X轴坐标，按 ZYY 直圆点Y轴坐标，按 R 圆曲线半径（左转为负，右转为正），按 Q 直圆点里程方向的切线方位角，按 L 所求点里程，按 K 所求点距中线的宽度（左负右正），按 显示X 所求点X轴坐标，按 Y 所求点Y轴坐标， 再按进行循环运算，重复输入L 、K 否则按AC键退出。 HHQX（缓和曲线坐标计算） Lbi 0G“GQ”A“GQX”B“GQY”Q“Q”R“A”{L,K}Prog“HH”Goto 0 说明（计算缓和曲线段任意里程桩号坐标） 先按FILE键，光标选择HHQX，按运行。 输入GQ 起点里程，按 GQX 起点X轴坐标，按 GQY 起点Y轴坐标，按 A 缓和曲线曲率（左转为负，右转为正），按 Q 起点里程方向的切线方位角，按 L 所求点里程，按 K 所求点距中线的宽度（左负右正），按 显示X 所求点X轴坐标，按 Y 所求点Y轴坐标， 再按进行循环运算，重复输入L 、K 否则按AC键退出。 SQX竖曲线标高计算 Lbi 0U“DD”W“HDD”R“R”T“TG“I1”S“I2”{L,N}Prog“SS1” Goto 0 说明（竖曲线任意里程桩号标高） 先按FILE键，光标选择SQX，按运行。 输入DD 竖曲线顶点里程，按 HDD 竖曲线顶点高程，按 R 竖曲线半径（上拱为正，下弯为负），按 T 竖曲线切线长，按 I1 前段坡度（带符号），按 I1 后段坡度（带符号），按 L 所求点里程，按 N 所求点距设计中线标高高差（上正下负），按 显示H 所求点标高 再按进行循环运算，重复输入L 、K 否则按AC键退出。 SGLZB水岗路坐标 Lbi 0{L,K} Lbi 1LG0Axxxxx.xxxByyyyy.yyyQq。qq’qq.qq”Porg“ZZ”Goto 0≠Goto 2 Lbi 2LG588.832Axxxxx.xxxByyyyy.yyyQq。qq’qq.qq”Porg“ZZ”Goto 0≠Goto 3 Lbi 3LG942.036Axxxxx.xxxByyyyy.yyyQq。qq’qq.q” R135.246Porg“HH”Goto 0≠Goto 4 Lbi 4LG1002.036Axxxxx.xxxByyyyy.yyyQq。qq’qq.q” R1200Porg“YY”Goto 0≠Goto 5 Lbi 4G1153.502Axxxxx.xxxByyyyy.yyyQq。qq’qq.q” Porg“YY”Goto 0 说明（单项工程坐标计算程序示例） 先按FILE键，光标选择SGLZB，按运行。 输入L 所求点里程，按 K 所求点距中线的宽度（左负右正），按 显示X 所求点X轴坐标，按 Y 所求点Y轴坐标， 再按进行循环运算，重复输入L 、K，否则按AC键退出。 ★ 编制本程序时，输入的要素为 直线段 L为计算里程段，G为计算起点里程，A、B为G点所对应的坐标，Q为方位角； 圆曲线 L为计算里程段，G为曲线起点里程，A、B为G点所对应的坐标，Q为起点里程方向的切线方位角，R为半径（左转为负，右转为正）; 缓和曲线L为计算里程段，G为曲线起点里程，A、B为G点所对应的坐标，Q为起点里程方向的切线方位角，R为曲率（左转为负，右转为正）。 SGLBG水岗路标高 Lbi 0{L,N} Lbi 1LU140WxxxR-rrrrTtttGg.ggSsPorg“SS1”Goto 0≠Goto 2 Lbi 2L U260WxxxRrrrrTtttGg.ggSsPorg“SS1”Goto 0≠Goto 3 Lbi 3L U580WxxxR-rrrrTtttGg.ggSsPorg“SS1”Goto 0≠Goto 4 Lbi 4 L U980WxxxR-rrrrTtttGg.ggSsPorg“SS1”Goto 0≠Goto 5 Lbi 4U1153.502 WxxxR-rrrrTtttGg.ggSsPorg“SS1”Goto 0 说明（单项工程坐标计算程序示例） 先按FILE键，光标选择SGLBG，按运行。 输入L 所求点里程，按 N 所求点距设计中线标高高差（上正下负），按 显示H 所求标高 再按进行循环运算，重复输入L 、K，否则按AC键退出。 ★ 编制本程序时，输入的要素为 L为两竖曲线之间直线段的任意里程，U为竖曲线顶点里程，W为竖曲线顶点高程，R为竖曲线半径（上拱为正，下弯为负），T为切线长，G为前段坡度（带符号）， S为后段坡度（带符号）。 计算子程序 一、 ZZ（直线坐标计算子程序） OQ90EAL-GcosQ fBL-GsinQProg“ZBHS” 二、 YY（圆曲线线坐标计算子程序） P180L-GRπ OQP90UAbsRsinAbsP VR-RcosAbsP Prog“SZB” Prog“ZBHS” 三、 HH（缓和曲线线坐标计算子程序） P90L-G2 Rπ2 RP-P L-G0OQP90≠OQP90 UAbsL-G-AbsL-GΛ540RΛ4 V AbsL-GΛ36R2- AbsL-GΛ7336RΛ6RV-V Prog“SZB” Prog“ZBHS” 四、 SZB小坐标系 EAUcosQ-VsinQFB UsinQVcosQ 五、 ZBHS坐标换算 XEKcosO◢ YFKsinO◢ 六、 FWJ方位角 Wtan-1Y-D X-CX-CWW180 ≠Y-D0WW ≠WW360 七、 SS1竖曲线子程序一 L≤U Prog“SS2”≠Prog“SS3” 八、 SS2竖曲线子程序二 ZTL-U22RU-LTZ0≠ZZ VW-G100U-L-ZHVN◢ 九、 SS3竖曲线子程序三 ZTLU22RL-UTZ0≠ZZ VWS100L-U-ZHVN◢ - 11 - / 11