Fx-5800 计算器程序 QXJS-000 主程序 Fix 3:Deg:Lbl 4:1.SZ=>XY:2.XY=>SZ: 12= →Q: LICHENG= →S:ProgQXJSSUB0 ↙ Lbl 0:IfQ=1:Then Goto1:IfEnd:IfQ=2:ThenGoto2:IfEnd ↙ Lbl 1:OUT JL= → Z: OUT JD=G:ProgQXJSSUB1:
CASIO fx—5800计算器 工程测量与公路测量程序1坐标正算X0=″X:Y0=″Y:I=″I:J=″J XICos(J)→U:YISin(J)→V X=″:U (待求点的X坐标)Y=″:V (待求点的Y坐标)说明:X0 Y0:已知点坐标I:两点的距离J:方位角2坐标反算Lbl 0 X1=″X:Y1=″Y:X2=″U:Y2=″V Pol(U-XV-Y): J<0 J360→J I=″:I
第 3 页 共 NUMS 3 页 5800计算程序Fx-5800计算器程序QXJS-000??????????????主程序Fix 3:Deg:Lbl 4:“=XY”:“=SZ”:“1,2=” →Q:”LICHENG=” →S:Prog“QXJSSUB0”↙Lbl 0:IfQ=1:Then Goto1:IfEnd:IfQ=2:ThenGoto2:IfEnd↙Lbl 1:”OUT J
5800计算器程序放线主程序文件名:FX?LbI? ?0: L=1R=2 →B:IF B<2 :THEN Prog JD1:Goto 1:ELSE Prog JD2 :Goto 1LbI? ?1: K= →K: A= →A:90→C: Prog DA: Goto 1文件名:DA?IF K≤D :THEN Prog ZALR:ELSE IF K≤DS :THEN Prog HALR:ELSE I
路基高填高挖单级多级坡度边线放样控制程序1. 取点放样控制主程序(命名为TWFS)第1行:X1= C:Y1=D: H1=G: K1=K第2行:Lbl??0:Prog A第3行:Pol(C-ND-E):Icos(F-J)→S:KS→K第4行:Abs(S)>=>Goto 0第5行:K1=:K◢第7行:BIAN=:Isin(J-F)→Z◢第6行:HS= H: HP= Q:G-H→H(输入反算点K的设
5800计算器程序一程序功能??? 主要功能:采用交点法方式计算多条线路坐标正反算可算任意复杂线型及立交匝道包括C型S型卵型回头曲线等极坐标放样全线路基边坡开挖口及坡脚放样计算路基任意点设计高程横坡设计半幅宽度.隧道欠超挖放样计算新版本优化:1优化程序语句2取消原线元法计算化线元法为交点法3高程计算修改4附计算坐标及高程参数设计要素输入实例二源程序(绿色为程序名蓝色为输入计算器内容)红色为网友调试
#
#
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≦
#
违法有害信息,请在下方选择原因提交举报