5800计算器全线坐标计算放样正反算(定稿)主程序??坐标正反算程序名称:ZBZFSLB1??A↙Cls : Fix 4 : 30→Dim Z :0=ZS1=FSZ ↙If??Z=0:Then??Goto B:IfEnd↙(Z=0进入里程点坐标正算)If??Z=1:Then??ProgFSLCBZ : Goto A:IfEnd↙(Z=1进入反算里程边桩)Lb1 B??↙K=K :(计算里程) Pr
正算主程序(zs)lb1 0fix4:s:z:prog pm-sj: abs(s-o) → w:prog sub1: xs=:x◢ys=:y◢f-90→f(需要时可以让他显示不要时不必输入):progsqx-sj: progsqx:h=:h◢goto 0反算主程序(fs)lb1 0fix4: s:x:y:progpm-sj: x→ i: y→??j:prog sub2: s=:ow→s◢z=:z◢
公路路线座标正反算(积分公式)通用程序 公路路线座标正反算由于现在计算机普及,计算机功能日益强大,宜采用较简单的积分公式,便于计算机处理。单线元通用积分公式如下M = (10/Re-10/Rs)/Ls;x=∫{cos(Ta + L/Rs + 05*M *L*L),0,L};y=∫{sin(Ta +L/Rs + 05*M *L*L),0,L};a(i)= Ta +L/Rs + 05*M *L*L
卡西欧计算器5800P坐标正反算Lbl 3:1→ZS,2→FSQQ=1=Goto 1:Q=2=Goto 2Lbl 1:CE:XM:CE:YF:JLL:FWJA:Rec(L,A):M+I→C:F+J→DClsX=:Locate 3,1,C:Y=:Locate 3,2,D◢Goto 3Lbl 2:CE:XG:CE:YH:(HOU)FY:XN:(HOU)FY:YEPol(N-G,E-H
5800计算器公路全线坐标正反算计算程序FX5800全线贯通万能正反算程序(一体化超好用短小易懂)FX5800计算器的积分程序(正反算全线贯通新线路)终极版ZHUCHENGXU主程序1.ZS2.FS →Q←┘输入1正算输入2反算NEW=0OLD≠0Z←┘IfZ=0:ThenX0=A:Y0=B:C0=C:1R0=D:1RI=E:SP=F:EP=G:Ifend:Q=2=>Goto 2←┘Lb
5800计算器公路全线坐标正反算计算程序FX5800全线贯通万能正反算程序(一体化超好用短小易懂)FX5800计算器的积分程序(正反算全线贯通新线路)终极版ZHUCHENGXU主程序 →Q←┘输入1正算输入2反算NEW=0OLD≠0Z←┘IfZ=0:ThenX0=A:Y0=B:C0=C:1R0=D:1RI=E:SP=F:EP=G:Ifend:Q=2=>Goto 2←┘Lbl1 :KM=<0 S
“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≥上段曲
公路路线座标正反算(积分公式)通用程序 公路路线座标正反算由于现在计算机普及,计算机功能日益强大,宜采用较简单的积分公式,便于计算机处理。单线元通用积分公式如下M = (10/Re-10/Rs)/Ls;x=∫{cos(Ta + L/Rs + 05*M *L*L),0,L};y=∫{sin(Ta +L/Rs + 05*M *L*L),0,L};a(i)= Ta +L/Rs + 05*M *L*L
线路中边桩任意里程坐标正反算改编程序(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
曲線任意里程中边桩正反算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
违法有害信息,请在下方选择原因提交举报