内容发布更新时间 : 2024/12/27 18:41:00星期一 下面是文章的全部内容请认真阅读。

任意里程中边桩坐标正反算程序(4800)

任意里程中边桩坐标正反算（CASIO fx-4800P计算器）程序 一、源程序(SZ-XY-SZ)

\：\：NU\：Q=0=>R=1E-45：≠> R△J=0：M=AbsQ：K=1-M：N=1=>Goto 1：≠>Goto 2△←┙ Lbl 1：{SZ}：SZ：L=S-O：B=90QL÷π÷R：F=G+B：E=F+B+90：C=LK+2MRsinQB：X\◢ Y\◢ Goto 1←┙

Lbl 2：W=G+90Q：E=U+Rec(R,W)：F=V+J←┙

Lbl 3：{XY}：XY：D=Pol(X-E,Y-F):T=J：J<0=>T=J+360△B=T-W-180M：P=Abs B：S\◢

Z\◢ Goto 3←┙ 二、使用说明

1.由里程、中边桩计算坐标

启动程序后按以下提示输入数据：

N ？1 （N=1，由里程中边桩计算坐标；N≠1，由坐标反算里程及中边桩) X0 ？142.353 (直线或圆曲线起点的X坐标）

Y0 ？368.166 (直线或圆曲线起点的Y坐标） S0 ？155.252 (直线或圆曲线起点的里程）

F0 ？60°54′03″(直线或圆曲线起点的切线方位角）

Q ？-1 (当线元为直线时Q=0；当线元为圆曲线且左偏时Q=-1；当线元为圆曲线且 右偏时Q=1)

R ？ 100 (圆曲线的半径) S ？ 194.016 (中线里程)

Z ？ -5.251 (中线左侧5.251m的边桩；在中线上Z=0，在左侧<0，在右侧Z>0) 显示计算结果

XS=172.7467767 YS=395.2316807

2.由坐标反算里程、中边桩

启动程序后按以下提示输入数据：

N ？2 （N=1，由里程中边桩计算坐标；N≠1，由坐标反算里程及中边桩) X0 ？142.353 (直线或圆曲线起点的X坐标） Y0 ？368.166 (直线或圆曲线起点的Y坐标）

S0 ？155.252 (直线或圆曲线起点的里程）

F0 ？60°54′03″(直线或圆曲线起点的切线方位角）

Q ？-1 (当线元为直线时Q=0；当线元为圆曲线且左偏时Q=-1；当线元为圆曲线且 右偏时Q=1)

R ？ 100 (圆曲线的半径)

X ？ 172.7467767 (待求里程及中边桩的点的X坐标) Y ？ 395.2316807 (待求里程及中边桩的点的Y坐标) 显示计算结果 S=194.016

Z=-5.251

三、注意事项

1.本程序主要是针对市政道路工程中的直线和圆曲线而编制的，未考虑缓和曲线等 曲线的计算；

2.程序中“R=1E-45”的意思为10的-45次方，输入程序时切莫输错。