Fx-5800计算任意里程坐标程序(交点计算法)主程序: XY Lb1 0 K=K:If K=1:Then Prog Y1: Else Prog Y2:IfEnd: Goto 1: Lb1 1 : (RH2÷24÷R-H4÷2688÷R3)tan(J÷2)H÷2- H3÷(240R2)→T: P-T((÷R)πR÷180°2H) ÷2→Z Lb1 2 :W>P-T>Goto 3 :??A-
U:XO起点的X坐标V:YO起点的Y坐标O:SO起点的里程桩号G:FO起点的方位角H:LS计算段线元的长度P:RO线元起点的曲率半径R:RN线元终点曲率半径Q 线元图形信息(直线段Q=0左偏Q=-1右偏Q=1)以道路中线前进方向(即大里程方向)区分左右DY=ZB:LC:输入1为正算既输入里程桩号和偏距算坐标输入2为反算既输入坐标算里程桩号和偏距S:LCS:待求点的里程桩号Z:PJZ:待求点的里程偏
曲線任意里程中边桩正反算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
卡西欧5800坐标正反算程序主程序(TYQXJS)Lb1 4:=>XY:=>SZ:N:S:ProgSUB0 ↙1÷P→C:(P-R)÷(2HPR)→D:180÷π→E:N=1=>Goto 1:Goto 2: ↙Lb1 1:Z:Abs(S-O) →W: ProgSUB1:XS=:X◢YS=:Y◢F-90→F:FS=F▲DMS◢ Goto 4↙Lb1 2:X:Y:X→I:Y→J:ProgSUB2:OW
线路中边桩任意里程坐标正反算改编程序(CASIO fx-5800P)1. 正算子程序(SUB1) ?????????????????????????????????????????????????????? A=:B=:K=:L=:F=1-L:M=1-K:X=UW(Acos(G(1PKWD))Bcos(G(1PLWD))Bcos(G(1PFWD))Acos(G(1PMWD))):Y=VW(Asin
Casiofx-5800P交点法坐标计算程序XCU测站X坐标YCV测站Y坐标K(JD)K交点桩号X(JD)X交点X坐标Y(JD)Y交点Y坐标LS1B第一缓和曲线长度LS2C第二缓和曲线长度R圆曲线半径FWJM起始边切线方位角α(Z-Y)O本交点处线路转角(左转为负右转为正度分秒输入)K××××待求桩号Z待求桩号距中距离(左负值右正值中为0)RJ斜交右角(线路切线前进方向与边桩右侧夹角)→?主
卡西欧5800程序坐标正反算修改 ZX-WN (其他的程序不用改所有程序输完后退出进行扩展变量:5→Dimz按EXE出现Done就OK了) WN(子程序 不运行) ZS=1FS=2 N: 1÷P →C:(P-R)÷(2HPR)→D:180÷π→E: If N=1: Then Goto 1: Else Goto 2: IfEnd← ┚ LbI 1:1 →I:0 →Z : Abs(K- O ) →
#
#
#
违法有害信息,请在下方选择原因提交举报