→T”YC0”PP→Z3”HC0”QQ→Z4”M”TT→Z5O÷AbsO→I”BL”IPTCCQ÷AbsC→U▲”DB”IUIO→J▲A
s→IProg“P”Goto1四、I程序:通过手工方式输要素①Z20Goto2②
Z1→RZ2→U”JL”K”JX”G”JY”H”JA”V”JJ”W”R”A”LS”B”L1”R”L2”UR→Z1U→Z2ReTur
③Lbl2”L0”K”X0”G”Y0”H”A0”V””L1”F”L0Z1Y1”WW0ReTur
④”R0”A”R1”B五、D程序:根据测站点的坐标及放样点的坐标计算水平距离及方位角①YNY1
→Y②PolXZ10YNJ0J360→J③”AD”J→DMS▲I▲六、E程序:桩号出界判断①Z20Goto2②IfLZ2The
“L2”L▲IfE
d③IfLZ1The
“L1”L▲IfE
d④Goto3⑤Lbl2IfLKThe
“L0”LK▲IfE
d⑥IfLFThe
“L1”LF▲IfE
d⑦Lbl3七、GG程序:用统计数据中桩号,左右高程数据进行内插计算。①FreqOff
→CFreqO
IfLmi
XThe
“Lmi
X”1→IGoto8IfE
d②IfLmaxXThe
“LmaxX”C1→IGoto8IfE
d③For1→IToC1④IfL≤ListXI1The
BreakIfE
dNext⑤Lbl8LListX÷ListXI1ListX→JListYJListYI1ListY→XListFreqJListFreqI1ListFreq→Y八、S程序对统计数据列表中数据按桩号进行排序。①FreqOff
→CFreqO
“WAIT…
”Locate101C②IfC2The
Retur
IfE
d③For1→DToCD→I④ForD1→EToC⑤IfListXEListXThe
E→IIfE
dNext⑥IfI≠DThe
ListXD→FListX→ListXDF→ListXListYD→FListY→ListYDF→ListYListFreqD→FListFreq→ListFreqDF→ListFreqIfE
dNext⑦Locate12”mi
X”Locate62mi
X⑧Locate13”mi
X”Locate63maxX
f九、X程序计算缓和曲线坐标增量xxyy①AB→UU÷O→Z905O2÷U→RO01OR2→I61OR271R2→JRr→R十、JS程序内插计算的接口程序,在运行模式直接调用。①Prog“S”②Lbl1”L”LL0Retur
③Prog“GG””XY”X▲Y▲Goto1十一、GZW程序:构造物坐标放样计算,在运行模式直接调用。①Z10→S”XO”SS→Z10”YO”N:0→T②Lbl1”X0”R”Y0”U”A0”ZIFZ1The
“A0DD”J→Z▲I▲IfE
d③IfZ0The
R→XU→YProg“D”Goto1IfE
d在④后增加一句,解决了程序再次运行时,交角的初值被置为测站点的X坐标的BUG④OZ→S”J0”SZS→O”0XXYY→XY””1XY→XXYY”TIfT≠0The
Goto3IfE
d⑤Lbl2”XX”P”YY”QIfPQ0The
Goto1IfE
d⑥”XY”RPcosZQcosO→X▲UPsi
ZQsi
O→Y▲Prog“D”Goto2⑦Lbl3”XF”X”YF”YIfXY0The
Goto1IfE
d⑧”XXYY”XRsi
OYUcosO÷si
S→P▲YUcosZXRsi
Z÷si
S→Q▲⑨Goto3十二、Y程序:线元法计算匝道坐标①LK→CIfLFThe
FK→CIfE
d②Ifr