Do:Deg:ClrText
“F1 Fangyang”
“F2 Jiance”
“F3 suidao”
‘FN:6→V:3→I:Prog “GN”
‘XL:3→V:Prog “GN”
Prog “FN”:ClrText
“Cont”:1→W:Prog “SC”
LpWhile F=1
List 7[1]→I:List 8[I]→I:1→V List 10[I]→M:List 11[I]→N List 16[I]→S:List 17[I]→R List 9[I]→Q:-List 12[I]→J ‘QH:Q+J→Q:Prog “SC”:Prog “GN” K-Q→J:1E-20→B:List 13[I]→O AbsO→O:(1÷R-B)÷2÷O→C
ZX:If J<0:Then Prog “SC”
Return :IfEnd
7→W
‘HQ:If J<O:Then Prog “SC”
Return:IfEnd
‘HY:O→J:Prog “SC”:Prog “GN”
Q+O→Q:K-Q→J:List 14[I]→O
8→W
‘YQ:If J<O:Then Prog “SC” Return:IfEnd
‘YH:O→J:Prog “SC”:Prog “GN” Abs O→O: (1÷R-B)÷2÷O→C
‘HQ:If J<O:Then Prog “SC”
Return:IfEnd
‘HZ:O→J: Prog “SC”:Prog “GN”
K-Q-O→J
6→W
设置角度单位为度
F1放样
F2 检测
F3 隧道
接受F1~F3功能键
选择输入线路号
执行上述按键对应的F1~F3功能
是否继续F1是 F2 否
按键为F1时重新开始
|