圆曲线点坐标计算公式

如题所述

第1个回答  2013-04-16
CASIO4500坐标计算程序
HUANHEQUXIAN
K"JD"D"LS":B=D2/24R:M=D/2-DB/10R
T=M+tan.5A(R+B)▲L=∏RA/180+D▲E=(R+B)/cos.5A-R▲Z"ZH"=K-T▲H"HY"=Z+D▲Q"QZ"= Z+L/2▲J"YH"=Z+L-D▲O"HZ"J+D▲prog 1▲ N"N=1=>V":P:prog 3:L=W:Fixm
Lb1 2:{S}:S"KX":S>J=>Goto4△S>H=>Goto3△U=S-Z:E=U-UXY5/40R2D2:F=UXY3/6RD:Goto5
Lb1 3:U=90(2S-2H+D)/ ∏R:E=RsinU+M:F=R-RcosU+B:Goto5
Lb1 4:F=O-S:D≠0=>I=30F2/∏RD△V=F-FXY3/90R2:N=1=>U=360-A:F=180-A+I: ≠=>U=A:F-180+A-I△E=T+TcosU+VcosF:F=TsinU+VsinF:Goto1
Lb1 5:N=1=>F=-F△Lb1 1:X=E:Y=F:P=1=>prog2: prog4△: prog3:W=W-L:W<0=>W=W+360△V: "S"▲W: "R"▲Goto2 X=C+EcosL-FsinL▲Y=G+EsinL+FcosL▲ C"X0"G"Y0":Pol(X-C,Y-G):W<0=>W=W+360△W D≠0=>Q=>90U2/∏RD△Fixm:I=A-3I:N=1=>Q=-Q:U=-U:I=-I△
S<H=>F=L+Q≠=>S>J=>F=L+I: ≠=>F=L+U△△V=1: {E}:E"<B":F"R"=F+E:Lb1 6: {I}:I"SL":X+IcosF▲Y+IsinF▲V<2=>V=V+1:Goto6△
ZHI XIAN
E"X0"F"Y0"A"R0"K"CZ":Lb1 1: {S}=S"KX":D=S-K:X=E+DcosA▲Y=F+DsinA▲V=1:Lb1 2: {BI}:H=A+B-180:I"SL":X+IcosH▲Y+IsinH▲V<2=>V=V+1:Goto2△Goto1
计算要素:
JD——交点里程 LS——缓和曲线长
R ——圆曲线半径 A ——线路转角
T ——切线长 L ——圆弧总长度
E ——外矢距 N ——曲线方向,左偏取“1”,右偏取“0”
P ——取“1” X0.Y0——ZH点坐标
X.Y——交点坐标 KX——待求点里程
B ——与中线夹角 SL——边距,左“+”;右“-”

圆曲线各要素计算公式

T=Rtan(A÷2)◢ L=π÷180(RA) ◢

E0=R÷Cos(A÷2) -R◢ Q=2T-L◢

说明:T 切线长;R 圆曲线半径;L曲线长度;

E0 外矢距; Q 切曲差; A 曲线转向角; 谢谢采纳~~
第2个回答  2013-07-05
都是网上找的 妈的B 你倒是分一下那些子程序啊