请问有谁知道fx5800计算器中,只要输入直线中两个坐标和高程,通过正算反算可以算出任意里程的坐标和高程在输入过程中不需要输入方位角,只要输入坐标和高程,根据正算反算就可以算出中桩
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/15 05:51:49
请问有谁知道fx5800计算器中,只要输入直线中两个坐标和高程,通过正算反算可以算出任意里程的坐标和高程在输入过程中不需要输入方位角,只要输入坐标和高程,根据正算反算就可以算出中桩
请问有谁知道fx5800计算器中,只要输入直线中两个坐标和高程,通过正算反算可以算出任意里程的坐标和高程
在输入过程中不需要输入方位角,只要输入坐标和高程,根据正算反算就可以算出中桩和边桩
请问有谁知道fx5800计算器中,只要输入直线中两个坐标和高程,通过正算反算可以算出任意里程的坐标和高程在输入过程中不需要输入方位角,只要输入坐标和高程,根据正算反算就可以算出中桩
本程序由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+FWD))+Asin(G+QEMW(C+MWD))) →Y:
G+QEW(C+WD)+90→F: X+Zcos(F)→X: Y+Zsin(F)→Y
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:Abs(Z)Goto1: W=W+Z:Goto 0Δ←┘
Lbl 1:Z=0:Prog "SUB1": (J-Y)÷sin(F)→Z
SUB0 数据库子程序
Goto1↙ 同时保存多个曲线时的指针
Lbl 1:IF S SZ
N ? 选择计算方式,输入1表示进行由里程、边距计算坐标 ;输入2表示由坐标反算里程和边距.
S ? 正算时所求点的里程,反算时为所求点的近似里程,反算时输入的近似里程不能夸线元,若夸线元的话,需进行第二次反算,并以第一次的结果做为近似里程,否则反算的里程及边距不对, Z ?正算时所求点距中线的边距(左侧取负,值右侧取正值,在中线上取零)
X ?反算时所求点的X坐标
Y ?反算时所求点的Y坐标
显示部分:
XS=××× 正算时,计算得出的所求点的X坐标
YS=××× 正算时,计算得出的所求点的Y坐标
FS=××× 正算时,所求点对应的中线点的切线方位角
S=××× 反算时,计算得出的所求点的里程
Z=××× 反算时,计算得出的所求点的边距