CASIO4500圆曲线坐标计算公式

CASIO4500圆曲线坐标计算公式

CASIO4500圆曲线坐标计算公式

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——边距，左“+”；右“-”