文档介绍：卡西欧 5800 计算器如何编程摘要: ... 需要极坐标放样程序 QH1 -5 地具体输入方法最佳答案: 公路平/ 竖曲线放样、坐标反算桩号 - 25PHF 程序 fx-5800p F1 - 25PHF ( K+ , XY ≠ 0?) 输入其她进入反算。输入 0 时进入测站点、后视点坐标(X0,Y0,H0) 、(X1,Y1) 输入及两点距离(D0) 、方位角(T0) 输出。 H0=0 时,不计算竖曲线。 L1 Z[1→ Q:Lbl 8:“ -25PHF= ”? Q:Q →Z[1] :IF Q<3 Or Q>25:Then Goto 8:IfEnd:0 → V:0 → N:“K,X≠0”? V:V ≠ 0=>Goto 0:“ X0 ”? C:“ Y0 ”? D:“ H0 ”? H:“ X1 ”? E:E - C→ I:“ Y1 ”? F:F -D→ J:Prog “1”:“ T0O= ”:J▲ DMS ◢“ D0= ”:I◢放样点桩号(Kp+) 斜交角(ApO) 距离(Sp) 输入 143 L2 Lbl 0:Z [1→ Q:If V=0:Then 90→ Z:“ Kp+ ”? K:“ ApO ”? Z:“ Sp”? B:Goto 4:IfEnd:If N≠- 2:Then “ Xp ”? C:“ Yp ”? D:1T → P:1 → G:IfEnd:Lbl 7:C -Z[ 4+G → I:D -Z[ Q+4+G → J:Prog “1”:If N= - 2:Then I→ P:J → Z:G → B:Goto 4:IfEnd:If P- I>0:Then I→ P:J → Z:G → B:IfEnd:If G<Q-2:Then G+1 → G:Goto 7:IfEnd:Lbl 4:1 → G:Z [3]→ W:Lbl 5:Z [1→Q L3 Q-2 → N:Z [3→ A:Z [ 4+G → X:Z [ Q+4+G → Y:Z [ 2Q+3+G → R:R=0 =>1 μ→ R:Z [ 3Q+1+G → L:Z [ 3+G ]-X→ I:Z [ Q+3+G ]-Y→ J:Prog “1”:J→ O:Z [ 5+G ]-X→ I:Z [ Q+5+G ] -Y→ J:Prog “1”:J→ U:Prog “P” L4 IfV≠ 0:Then If G<B:Then G+1 → G:W+I - 2T+S → W:Goto 5:IfEnd:Prog “F”:Goto 0:IfEnd:N=0=> Goto 0:N= - 1=>Goto 5:H=0=>Goto 0:1 → G:Lbl 6:Z [1→Q L3 Q-2 → N:Z [ 4Q+1 → A:Z [ 4Q+G → W:Z [ 5Q+G → U:Z [ 6Q-1+G → R:Z [ 5Q-1+G ]-U→ I:Z [ 4Q-1+G ]- W→ J:Prog “1”:J→ O:Z [ 5Q+1+G ]- U→ I:Z [ 4Q+1+G ]- W→ J:Prog “1”:Prog “H”:N= - 1=>Goto 6:Goto 0 F2 - 25PHF (参数输入完成时,可取消此子程序) I? 输入 0 时进入转点号 N?(N -P 为平曲线、N-H 为竖曲线, 均输入 1