4500p计算器计算坐标和方位角及距离-适合两缓等长和不等长程序.doc

坐标计算和高程计算程序化 在 工 程 测 量 中 的 应 用 中铁十六局集团第五工程有限公司 （杨忠领） 2003.01.24 坐标计算和高程计算程序化在工程测量中的应用 中铁十六局集团第五工程有限公司 杨忠领 摘要： 作者针对坐标计算和高程计算复杂繁琐的特点，在工作实践的基础上，总结自编两套利用CASIO 4500P计算器、CASIO 4800P计算器计算坐标和高程的程序，并对运行程序所需输入的要素和含义进行了详细的介绍，目的在于普及和推广，使任何一位稍具测量知识的测量人员和技术人员都能够使用目前最普遍的CASIO 4500P计算器、CASIO 4800P计算器快速、准确的计算坐标和高程。 关键词：CASIO 4500P计算器、CASIO 4800P计算器、坐标、高程、程序、测量 坐标计算和高程计算的作用和用途： 铁路工程、公路工程、引水工程、新线或改线，只要和线路有关，坐标计算和高程计算便无处不在；从勘察设计到施工复测、从施工过程到竣工测量，时刻都要进行工程测量，尤其近年光电、全站仪的普及，坐标和高程计算已成为工程测量中必不可少的第一步，没有快速准确的计算结果，测量工作根本无法进行。测量工作不先行，线路中线位置、左右边线位置、结构物位置便不能确定，所有后续施工便无法开展。而测量放线定位的首要条件便是坐标计算和高程计算。 坐标计算和高程计算程序的特点： 后面所写出的两套坐标计算和高程计算的程序，是作者通过陕西310国道改建工程初步成型，陕西西南铁路不断充实完善，二郎山至康定公路318国道改造工程改进提高，经监理专业测量人员使用，在A、B、C三个标段悄然流行，历经5年时间。通过在实际工作中的运用，应该说适用范围广、程序简练、易学、易懂、简单适用、便于普及推广；是工程技术、测量人员在进行图纸复核计算、线路测量中的好帮手。只要理解待输入要素的含义、懂得计算器的操作就已经掌握了坐标计算和高程计算，就是这么简单。 求任意点坐标和从仪器至该点方位角、距离程序 1QX L1 K“L1”U“L2”RN“FWJ”P“PJ”F“XJ”I“YJ”Z“ZH” L2 L=24R:Y=AbsP L3 T“T1”=（R+U2/L-（R+K2/L）cosY）/sinY+K/2-K3/（10RL） L4 A“T2”=（R+K2/L-（R+U2/L）cosY）/sinY+U/2-U3/（10RL） L5 Y“HZ”=Z +лRY/180+（K+U）/2 L6 LbI 0:｛X｝ L7 X“CDL” L8 L=Abs（X-Z）+10-9 L9 X≤Z=〉D=X-T-Z: Q=N:Goto1:≠〉X≤Z+K=〉Goto2:≠〉X≤Y-U=〉Goto3:≠〉L=Abs（X-Y）+10-9: X≤Y =〉Goto4:≠〉D=A+L:Q=N+P:Goto2⊿⊿⊿⊿ L10 LbI 1 L11 C“X2”=F+DcosN◢ E“Y2”=I+DsinN◢:prog3f: Goto5 L12 LbI 2 L13 prog 5f L14 W=J L15 prog 2f: Goto5 L16 LbI 3 L17 J=90（2L-K）/（Rπ） L18 S=RsinJ+0.5K-K3/（240R2） L19 M=R（1-cosJ）+K2/(24R) L20 O=√(S2+M2) L21 J=tg-1（M/S） L22 W=30K/（Rπ）+60（L-K）/（Rπ） L23 prog2f: Goto5 L24 LbI 4 L25 K=U L26 prog 5f L27 V=O:D=√（T2+A2+2TAcosAbsP） L28 O=√（V2+D2-2VDcos（sin-1(TsinAbsP/D)-J）） L29 J=sin-1（AsinAbsP/D）- sin-1（Vsin（sin-1（TsinAbsP/D）-J）/O） L30 W=（AbsP-3tg-1（M/S））/3 L31 prog 2f : Goto5 L32 LbI 5:｛W｝ L33 W“HD”=0= {k}:Goto0:≠prog6F△ L34 Goto5 2f L1 P0=J=N+J:Q=N+3W:≠J=N-J:Q=N-3W△ L2 C“X2”=F-TcosN+ O cosJ◢E“Y2”=I-TsinN+ O sinJ◢ L3 prog 3f 3f L1 C“X2”E“Y2”G“X1”H“Y1” L2 M=E-H L2 S=C-G L3 prog