当前位置:首页 >> 建筑/土木 >>

5800计算器正反算程序TYQXJS


5800 坐标正反程序
资料详细介绍: 本程序由 4800 程序改编而成,网上有 5800 积分通用公式,但由坐标 反算里程及边距时很慢,本程序大大提高了反算速度。 1. 主程序(TYQXJS) Lbl 4:"1.SZ => XY":"2.XY => SZ":?N:?S:Prog“SUB0”↙ 1÷P→C: (P-R)

÷(2HPR) →D:180÷∏→E:N=1 => Goto1: Goto2: ↙Lbl 1:? Z: Abs(S-O) →W:Prog "SUB1": "XS=":X◢ "YS=":Y◢F-90→F: “FS=”:F▲DMS◢Goto4↙ Lbl 2:?X: ?Y:X→I:Y→J: Prog“SUB2”:O+W→S:“S=”: S◢“Z=”:Z◢Goto4↙

2. 正算子程序(SUB1) 0.1739274226→A : 0.3260725774→B : 0.0694318442→K :

0.3300094782→L: 1-L→F: 1-K→M: U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW (C+FWD))+Acos(G+QEMW(C+MWD)))→X: V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+F WD))+Asin(G+QEMW(C+MWD))) →Y: G+QEW(C+WD)+90→F: X+Zcos(F)→X: Y+Zsin(F)→Y Return 2. 反算子程序(SUB2)

G-90→T: Abs((Y-V)cosT-(X-U)sinT) →W: 0(零)→Z: Lbl 0: Prog "SUB1": T+QEW(C+WD) →L: (J-Y)cos(L)-(I-X)sin(L)→Z:If Abs(Z) <10^(-3):Then Goto1:Else W+Z→ W:Goto 0:IfEnd: Lbl 1:0(零)→Z:Prog "SUB1": (J-Y)÷sin(F)→Z: 数据库子程序(SUB0) If S<***(线元终点里程):Then***→G(线元起点方位角):***→O (线元起点里程) :***→U 线元起点 X) ( :***→V 线元起点 Y) ( :***→P (线元起点曲率半径):***→R(线元终点曲率半径): ***→H(线 元起点至终点长度):0 或 1、-1→Q:Return:IfEnd↙ IfS<***(线元终点里程):Then***→G(线元起点方位角):***→O (线元起点里程) :***→U 线元起点 X) ( :***→V 线元起点 Y) ( :***→P (线元起点曲率半径):***→R(线元终点曲率半径): ***→H(线 元起点至终点长度):0 或 1、-1→Q:Return:IfEnd ?????????.. 为了便于解读,每增加一个线元增加一行语句。 三、使用说明 1、规定 (1) 以道路中线的前进方向(即里程增大的方向)区分左右;当线元 往左偏时,Q=-1;当线元往右偏时,Q=1;当线元为直线时,Q=0。 (2) 当所求点位于中线时,Z=0;当位于中线左侧时,Z 取负值;当 位于中线中线右侧时,Z 取正值。

(3) 当线元为直线时,其起点、止点的曲率半径为无穷大,以 10 的 45 次代替。 (4) 当线元为圆曲线时,无论其起点、止点与什么线元相接,其曲率 半径均等于圆弧的半径。 (5) 当线元为完整缓和曲线时,起点与直线相接时,曲率半径为无穷 大,以 10 的 45 次代替;与圆曲线相接时,曲率半径等于圆曲线的半 径。止点与直线相接时,曲率半径为无穷大,以 10 的 45 次代替;与 圆曲线相接时,曲率半径等于圆曲线的半径。 (6) 当线元为非完整缓和曲线时,起点与直线相接时,曲率半径等于 设计规定的值;与圆曲线相接时,曲率半径等于圆曲线的半径。止点 与直线相接时,曲率半径等于设计规定的值;与圆曲线相接时,曲率 半径等于圆曲线的半径。

2、输入与显示说明 输入部分: 1. SZ => XY 2. XY = > SZ N ? 选择计算方式,输入 1 表示进行由里程、边距计算坐标 ;输入 2 表示由坐标反算里程和边距。 S ?正算时所求点的里程,反算时为所求点的近似里程,反算时输入 的近似里程不能夸线元,若夸线元的话,需进行第二次反算,并以第 一次的结果做为近似里程,否则反算的里程及边距不对, Z ?正算

时所求点距中线的边距(左侧取负值,右侧取正值,在中线上取零) X ?反算时所求点的 X 坐标 Y ?反算时所求点的 Y 坐标 显示部分: XS=××× 正算时,计算得出的所求点的 X 坐标 YS=××× 正算时,计算得出的所求点的 Y 坐标 FS=××× 正算时,所求点对应的中线点的切线方位角 S=××× 反算时,计算得出的所求点的里程 Z=××× 反算时,计算得出的所求点的边距 反算子程序:(跟上面 SUB2 里面是一样的) G-90->T:Abs((Y-V)cos(T)-(X-U)sin(T))->W:0->Z:Lbl0:Prog “SUB1”:T+QEW(C+WD)->L:(J-Y)cos(L)-(I-X)sin(L)->Z:If Abs(Z)<10^(-3):Then Goto 1:Else W+Z->W:Goto 0:IfEnd: Lbl 1:0->Z:Prog “SUB1”:(J-Y)÷ sin(F)->Z:


相关文章:
5800计算器正反算程序TYQXJS
5800竖曲线能用的程序 2页 1财富值如要投诉违规内容,请到百度文库投诉中心;如要提出功能问题或意见建议,请点击此处进行反馈。 5800计算器正反算程序TYQXJS 隐藏>>...
卡西欧5800坐标正反算程序
卡西欧 5800 坐标正反算程序 1. 主程序(TYQXJS) Lb1 4:“1.SZ=>XY” :“...选择计算方式,输入 1 表示进行由里程、边距计算坐标;输入 2 表示由坐标反算...
5800线路正反算程序
Y 方位角 和第二个点的 X,Y 推算出第一个点至第 二点的边距 5800 正反算计算程序(加入了数据库)主程序(TYQXJS) Lbl 4:"1.SZ => XY":"2.XY => ...
5800 正反算程序
5800 正反算程序_建筑/土木_工程科技_专业资料。一、 主程序(TYQXjs) "1.SZ...正算子程序(SUB1) 0.1739274226→A: 0.3260725774→B:0.0694318442→K:...
5800计算器程序
曲線任意里程中邊樁坐標正反算 5800p TYQXJS(主程序名) LbI 0:4→Dimz:Cls ...id=380&author=yshf 曲线任意里程中边桩坐标正反算(CASIO fx-4800P 计算器)...
卡西欧5800坐标正反算万能程序
CASIO5800 计算器程序曲线任意里程中边桩坐标正反算(CASIO fx-4800P 计算器)程序 一、程序功能 本程序由一个主程序(TYQXJS)和两个子程——正算子程序(SUB1)、...
5800正反算计算程序(修改后)
588计算程序588计算程序隐藏>> . 主程序(TYQXJS) 主程序 5800 正反算计算程序 Lbl 4:"1.SZ => XY":"2.XY => SZ":?:?:Prog“SUB0”↙::?N:?::?...
计算器正反算程序
卡西欧5800计算器坐标正反... 6页 免费如要投诉违规内容,请到百度文库投诉中心;...一、程序功能 本程序由一个主程序(TYQXJS)和一个子程——包含正算程序(SUB)...
卡西欧5800线路坐标正反算程序
卡西欧5800线路坐标正反算程序_建筑/土木_工程科技_专业...主程序(TYQXJS) "1.KD => XY":"2.XY => KD...选择计算方式,输入 1 表示进行由里程、边距计算坐标...
更多相关标签:
5800计算器测量程序 | 卡西欧5800计算器程序 | 5800计算器坐标程序 | 5800p计算器测量程序 | 5800计算器程序 | 5800计算器万能程序 | 5800坐标正反算程序 | 5800p坐标正反算程序 |