相关文档

• 5800竖曲线计算程序.doc

  5800竖曲线计算程序（主程序）Lbi1: H H: ProgSJK: C-D →F:Abs(RF2)→T:R((AbsF )F)→R :IF H≤B-T: Then 0→K : Else If??H≥BT:??Then??0→K : D →C : Else?? H-BT→K:??IfEnd????: IfEnd??↙A-(B-H)C-K∧22R →G:G=G▲Goto1子程序：SJKif ?H≦

• 5800竖曲线高程计算程序.doc

  竖曲线高程计算主程序(5800)Lbl A：K：Prog：竖曲线元素库子程序：A-T→E：AT→F ←If K=A：Then Goto 5：IfEnd ←If K≤E：Then Goto 3：IfEnd ←If K≥F：Then Goto 4：IfEnd ←If K＜A：Then Goto 1：IfEnd ←If K＞A：Then Goto 2：IfEnd ←Lbl 1：K-E→X：X2÷(

• 5800竖曲线高程计算程序1.doc

  #

• 卡西欧5800竖曲线全线高程计算程序.doc

  竖曲线全线高程计算程序Lb1?? 1↙ K=k◢???? (计算点里程输入) If?? k<?? AND?? K≥ :Then?? -→A : 0→B : →S : →G : 600000→R : Goto?? 2 : IfEnd↙ If?? k<?? AND?? K≥ :Then?? -→A : -→B : →S :→G : 100000→R : Goto?? 2 : IfEnd↙ If?? k

• 精曲的竖曲线4800计算程序可以计算直线与竖曲线通杀.doc

  超级精典的竖曲线4800计算程序，可以计算直线与竖曲线的设计标高 通杀Lbl 3:T:i”i1”:D”i2”:R:H:(Z=Z+F):V：L=Z-Q:L0?L=L*-1:◣ZQ?M=I: ??M=D:◣?{Z}?L≤T?K=H+M*L+((T-L)^2/R)*V◢???K=H+M*L◢◣?Goto 3?T:竖曲线切线 D：I：左侧坡度 D:右侧坡度 R:竖曲线半径Z：任意点桩号 Q：竖曲线交点

• 5800竖曲线程序李俊(1).doc

  CASIO5800计算器公路竖曲线全线高程计算程序??????????????????????????：李俊Lb1?? 1↙If??S188716??AND??S≥0 :Then??0005→A : 006429→B : 165→K : 181525→G : 800→R : Goto??2 : IfEnd↙If??S572748??AND?S≥188716 :Then??00642

• 5800竖曲线高程超高程序.doc

  5800竖曲线高程超高程序 2010510 主程序：(高程序横坡程序设计任意点高程及横坡)程序名：GCJS-000LbI 0:Norm 2↙ KMZ:D: ↙Prog GCJSZCX1:Fix 3: H=:Locate 64H◢↙ I=: Locate 64I◢↙Goto 0↙子程序：程序名：GCJSZCX1Prog GCJSSUK1:R:T:C:G:I:C-T→

• 5800卵形曲线计算程序.doc

  卵形曲线计算ABFLRQHSTC=RQLAbs（R-Q）K=ABS(S-T)M=CRU=（MKK22）C180PI()N=K-K3(M23MK4K220)2C2K3(M45M3K33M2K214MK316K4144)24C4O= K5MK24K328)12C3K6(M535M4K75M3K285M2K318MK416K5176)240C5D=SQRT(N2O2)E=FHTAN-1(ON)X=ADC

• fx-5800曲线坐标计算程序.doc

  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

• 竖曲线标高计算程序.doc

  竖曲线标高计算程序（加了数据库）主程序名：SQXBGLbi1：｛H｝：H：ProgSJK：F=C-D：T=Abs(RF÷2：R=RAbsF÷F：H≤B-T=＞K=0：≠=＞H≥BT=＞K=0：C=D：≠=＞K=H-BT⊿⊿G=A-（B-H）C-K2÷2R▲Goto1子程序：SJKH≤第二竖曲线起点桩号（）=＞A=第一竖曲线交点高程（）：B=第一竖曲线交点桩号（4980）：C=第一竖曲线前坡度（.0