圆曲线（YQX）： 说明：
L=K-Z← K：所求点桩号
C=L×90÷R÷π← Z：起点桩号
J=1=〉 D=F-C：W=D-C▲ J=1为左转，≠1右转
≠〉D=F+C：W=D+C▲ F：起点方位角
△S=2*RsinC← W：所求点方位角
P“ZX”=X+S*cosD▲ R：圆曲线半径
Q“ZY”=Y+S*sinD▲ X：起点X坐标
Prog“BZ” Y：起点Y坐标
ZX：所求点中桩X坐标
BZ：边桩程序（稍后附）上 ZY：所求点中桩Y坐标
缓和曲线（HHQX）： 说明：
D=K-Z← K：所求点桩号
F=D-D5÷（40×R＾2×L＾2）← Z：起点桩号
E=D3÷（6×R×L）-D＾7÷（336÷R＾3×L＾3）← R：半径
J=1=〉 W=T-90×D＾2÷（R×L×π）▲ L：缓和曲线长度
△← J=1左转，=2右转
J=2≠〉W=T+90×D＾2÷（R×L×π）▲ T：起点方位角
△← W：所求点方位角
X=cosT×F+N“XQ”← XQ：起点X坐标
Y=sinT×F+M“YQ”← YQ：起点Y坐标
J=1=〉C=T-90：≠〉C=T+90△ ZX：所求点中桩X坐标
Lbl2← ZY：所求点中桩Y坐标
P“ZX”=cosC×E+X▲
Q“ZY”=sinC×E+Y▲
Prog“BZ”
边桩（BZ）： 说明
I=1=〉V=W-（180-G）← I=1左边边桩，I=2右边边桩
Goto1← W：中桩方位角
I=2=〉V=W+G← G：边桩与中桩的角度
Lbl1← B：边桩到中桩的距离
A“BX”=P+BcosV▲ P：中桩X坐标
U“BY”=Q+BsinV▲ Q：中桩Y坐标
BZ：边桩X坐标
BY：边桩Y坐标
以上程序纯熟个人编辑，忘大家多多指正（联系方式：john1203@163.com)
QQ:258972627 327337952
| 
发表于 2005-8-8 17:42
| 