casio fx-5800p任意线型中边桩坐标计算程序(附计算实例)

左向卵形曲线计算图示2: JD1 X=9858.265 Y=10034.988 R=75

5800任意线型中边桩坐标计算程序（卵形曲线示例）

RYSX ZB JS (主程序)

Lb1 1: “K”? K:Prog “S1 ”↙

(R -D)/Abs(Z - Q)→P: Abs(K - Q)→C: P C→E↙

F＋（E＋2D）×C×90÷π→J↙

F＋（E÷8＋2D）×C×45÷（4π）→M↙

F＋（3 E÷8＋2D）×C×135÷（4π）→N↙

F＋（5 E÷8＋2D）×C×225÷（4π）→U↙

F＋（7 E÷8＋2D）×C×315÷（4π）→V↙

F＋（E÷4＋2D）×C×45÷（2π）→H↙

F＋（E÷2＋2D）×C×45÷π→O↙

F＋（3 E÷ 4＋2D）×C×135÷（2π）→ G↙

“X=”:A＋C÷24×（cos（F）＋4×（cos（M）＋cos（N）＋cos（U）＋cos（V））＋2×（cos （H）＋cos（O）＋cos（G））＋cos（J））→X◢

“Y=”:B＋C÷24×（sin （F）＋4×（sin（M）＋sin（N）＋sin（U）＋sin（V））＋2×（sin （H）＋sin（O）＋sin （G））＋sin（J））→Y◢

Lb1 1:?W:? L:? I↙

“XL=”:X＋Lcos（J－W）◢

“YL=”:Y＋Lsin（J－W）◢

1