CASIO fx-5800P线路中边桩坐标计算程序文件名:XL---ZBJSZJX=C:ZJY=W:HSX=V:HSY= R EXE ` Pol((V-C)(R-W)):J L=I?IfJ<0:ThenJ360->J: Else J->J:IfEnd EXE JJD﹦:J?DMS?Lbl 0: XA=A:YA=D:FWJ=O:1÷RA=E:1÷RB=U:DKA=F:DKB=G:EX
线路坐标计算 5800JZBFY(极坐标放样) 45→Dimz :Deg:fix3: YQZX C: YQZY D: HSZX A: HSZY B:Pol(A-CB-D): r=:I▲ J→E:J<0=> J360→E↙HSD°°°=:E▲DMS▲ Lbl 1: ProgZYXY:Pol(X-CY-D): r=:I▲ J→F:J<0=> J360→F↙FYD°°°=:F▲DMS
“XLZBJSCX” ◢LB1??0 ↙CLS : FIX 4 : 30→DIM Z ↙“XHS=G(后视点X):YHS=L(后视点Y):XZJ=M(置镜点X):YZJ=N(置镜点Y):Pol(G-M,L-N):DH=:I(后视距)◢J0=J+360→J:FH=:J→DMS◢(后视方位角)LB1??1 ↙“K=”K ◢(计算里程)IF??K本段曲线终点里程??AND??K≥上段曲
#
曲線任意里程中边桩正反算5800p TYQXJS(主程序名)LbI 0:4→Dimz:Cls→XY→SZ→N:ClsXOU: YOV: SOO:FOG: LSH: ROP:RNR:Q1÷P→C:(P-R)÷(2HPR) →D:180÷π→EN=2=>Goto 2LbI 1:Cls:S:Z:Abs(S-O)→WProgSUB1:ClsXS=:X◢YS=:Y◢FS=:F-90 ?DMS◢Goto 1L
#
fx-5800计算程序1单圆曲线(DYQX) Z:R:K0=C:W:X0=D:Y0=E:LbI0:KX=A↙ Abs(A-C)→B↙ 90°B(∏R) →J↙ WZJ→U↙ 2Rsin(J) →P↙ X=:DPcos(U) →X◢Y=:EPsin(U) →Y◢ Q=:W2ZJ→Q◢ S(L)=S↙X1=:XScos(Q-90°)◢Y1=:YSsin(Q-90°)◢ S(R
12、5800“直+缓+圆+缓+直”型坐标计算主程序(QXJS)Prog “1”:“KZH” Q :”ZHX=” F :“ZHY=” G :“TZHJD” N :“(Y1,Z-1)”I←Lbl 1: “LICHENG=”K :“WAIYI=(Z-,Y+)”D:Goto2←Lbl 2: if KQ: then Goto3:else Goto4:ifend←if(判断) then(执行)Lbl 3
坐标中线测量与计算采用全站仪测量线路中线其基本的原理就是:利用假定坐标系或大地坐标系测量各交点的坐标并计算中线上的任意一点的坐标利用坐标放样的原理把各中桩在地面上确定(打桩)以备后续测量第一节 控制点测设由于线路通常较长为确保测量各交点坐标的准确性通常在线路的全长每隔一定的距离设置一个坐标控制点该控制点的坐标是测量该段线路交点的坐标基准点因此坐标中线测量的第一步就是进行控制点的测量图5-1
坐标中线测量与计算采用全站仪测量线路中线其基本的原理就是:利用假定坐标系或大地坐标系测量各交点的坐标并计算中线上的任意一点的坐标利用坐标放样的原理把各中桩在地面上确定(打桩)以备后续测量第一节 控制点测设由于线路通常较长为确保测量各交点坐标的准确性通常在线路的全长每隔一定的距离设置一个坐标控制点该控制点的坐标是测量该段线路交点的坐标基准点因此坐标中线测量的第一步就是进行控制点的测量图5-1
违法有害信息,请在下方选择原因提交举报