第六行,计算第二直线段任意点坐标。
程序YJ:曲线偏角为右角时,进入该程序W=-W,转换偏角F为左角,执行程序ZB后,ZH坐标系统的坐标(V,W)转换成大地坐标(X,Y),I为曲线上任意点到ZH坐标系统中X轴的夹角, K+I是该点切线沿线路前进方向的方位角。
程序ZJ:曲线偏角为左角时。进入该程序,其它意义同上。
程序ZB:是坐标转换程序。计算线路坐标时不显示,以程序XSZB:显示计算结果。
程序XSZB: O=0时显示坐标,O≠0时显示桩号和坐标,为了做为QLC (已知坐标求里程)的子程序,故于ZB:(坐标转换)分为两个程序。否则可以取消。
程序BX:是求线路外任意点的坐标(V,W)其中E为夹角,有正负之分,顺时针为正,逆时针为负,线路法线为正、负90度。D为线路中线点到计算点间的距离, (X ,Y) 线路外第二任意点的坐标,如斜交桥、涵的坐标计算,(V,W)为涵口边墙或桥台坐标,(X ,Y)为八字墙端部坐标。输E=0计算边线的过程此后则不出现。,
程序1.2.3……:数据库程序,用数字1、2、3表示,根据曲线数量确定增减,其中Q:曲
线总长;F:偏角;R:半径;S:缓和曲线长,在单圆曲线中输0;Z:ZH点里程;(J,M)ZH点大
地坐标;K:ZH点至JD点的起始方位角。N﹥***=>X=***计算点桩号和断链长度,(下文详述) 程序中部分字符以标出,有些字符在不同位置意义不同,循环使用,不宜标出。只要把需输入和输出的字符搞对即可。
2.6单圆曲线的平曲线
是通过ZY点坐标计算圆心的坐标,通过圆心的坐标计算曲线上任意点坐标(X,Y),B:中线到边线的距离分正、负值。除S转向角为左角输+1转向角为右角输-1以外。数据库和PQX(单圆曲线及带缓和曲线的平曲线)基本相同,它可代替除数据库和路径引导程序外的所有子程序,未编第二直线段部分,因为本曲线第二直线段部分也就是下一个曲线的第一直线段部分。未考虑与其它程序的配合和对断链的处理。可根据所管工程线型情况选用该程序。
主程序:XLZB(线路坐标)
Lbl 0:{L}: L=L+O:N=(P“K”+L/1000)×1000:N≥***.*** =>prog 1: prog PQXY: Goto 0
子程序:PQXY (单圆曲线的平曲线)
L1 U=N-Z:N≤Z =>X=J+UcosK◢Y=M+UsinK◢X=X+Bcos(K+90)◢Y=Y+Bsin(K+90)◢Goto 1
L2 ≠=>V=J+Rcos(K+90S):W=M+Rsin(K+90S):E=180U/π/R
L3 I=K-90S:I<0 =>I=I+360⊿I=I+SE
L4 {B}:X=V+(R+B)cosI◢ Y=W+(R+B)sinI◢Goto 1
L5 Lbl 1
3:逐桩高程计算
3.1编制方法:纵断高程程序是按照竖曲线为单元,同坡部分归属在曲线两端,把整段路线分段装进数据库,根据桩号判断采用数据通过共用程序,进行任意点的高程计算,
3.2使用方法
3.2.1准备工作:室内把已知曲线条件,装进数据库,曲线划分界线、判断条件装进子程序LJYD (路径引导)。
3.2.2现场使用:根据计算机提示输入相关数据即可。提示与输入情况如下:提示K、L、O、 Y 同逐桩坐标计算程序,Z输出高程
3.3:逐桩高程计算程序
主程序 ZDGC (纵断高程)
Lbl 0:{L}:L=L+C“O”:N=(K+L/1000)×1000: prog LJYD: Goto 0
子程序:LJYD(路径引导)
![]()
L1 【V=0:X=0: Y=9】
L2 N≥***.*** =>prog A:⊿