1、1程序源清单清单中子程序“4”和子程序“7”中的数值为示例高速公路全段的曲线元素(直曲表及逐桩坐标表由“海地 2000公路优化设计系统”生成，逐桩坐标表用于检验程序输入的正确性，详见后附录一)ZBJS L1 Defm 35:Z26=0:Z27=1:Prog “1“ZBFS L1 Defm 34:Fixm:XY:Z33=X“Xp“:Z34=Y“Yp“:Z26=2:Z27=1:Prog “1“1 L1 N=Z16: V=Z17:Z26=2=Goto JNV:Z15=0:Z11=0:Z16=N“X0“:Z17=V“Y0“:P“Xc“=0=K=Z16:L=Z17:KL: D“S1“E“S2“K“XH1
2、“L“YH1“X“XH2“Y“YH2“:Z16=K:Z17=L:T=Pol(X-K,Y-L:M=cos-1(T2+E2-D2)2ET:Fixm:U=J+180-M:P=X+EcosU:Q=Y+EsinUQ“Yc“:Pol(N-P,V-Q:Fixm:Z18=J:Lb1 J：X=0:X: X“QXH“:1L2 Lb1 Z:Z20=Ans:Z19=X:X0=X=-1=Lb1K:X=P:Y=Q:S=Z18+90:Z15=5:Prog“2“:Goto M:Prog“E“:Goto D1L3 ABCRHWM:W“Fm“C“JD“A“XJ“B“YJ“:Z10=R:R:Z8=R“R2“:R= Z10:Z1=H
3、“LS1“:H:Z2=H“LS2“:RZ8=M“LF“H=Z1:Z=0:X=0:Y=0:1L4 Lb1 0:GF:Z=Z+F“a0“:X=X+GcosZ:Y=Y+GsinZ:G0=Goto 0Prog“D“:Lb1 D:Z20=Goto W1L5 Lb1 9:Z26=2:=S=10-6:Goto ID:D“Lp“=-1=Prog “3“:Goto 91L6 Lb1 L:Z19=0=Goto 8L7 Lb1 W:X=Z19:Prog “7“:=Ans=Z27=-=Z26=2:Z27=1Goto ZX=0=Goto Z1L8 Lb1 8:Z27=-=“Lp=“:D“Dp=“:K1L9 S=D-C+
4、T:Lb1 I:SL=X=T+ Z23+Rec(S-L+Z14+Z3,N:Y=J:Z:SX=S:Y=0:R= Z10:H=Z1:Prog“C“:H=0=Prog “6“:SH=Prog “5“:SS=S-H:Prog “6“:SZ4=MAbs(Z8-Z10:Z10H=Z2:R=Z8:=Z22:S=L-S-H-:I=Z10:Prog “A“:U=Z-U+180:Prog “B“:X=X+Rec(Pol(F,GNZ,(U-J)NZ:Y=Y+J:Z-:H=Z1:R=Z10:=Z21:S=S-H-:I= Z8:Prog “A“:X=X+Rec(Pol(F,GNZ,(U+J)NZ:Y=Y+J:R=Z8:
5、H=Z2:Prog “C“:SS=L-S-H:Prog “6“:Prog “B“:Z-U:S=L-S:Prog “5“:Prog “B“:Z-I1L10 S=W+90+Ans:X=A-TcosW+Rec(Pol(X,YNZ,J+W:Y=J+B-TsinW: Z27=-=Goto XZ26=2=Prog “DX“Z 27=-5=Z27=-:Goto LZ271=Goto IK2:K“Dp“=999=Prog “2“:Goto C1L11 Lb1 X: “Xp=“:X=X+KcosS“Yp=“:Y=Y+KsinSL12 Z27= -=Goto MLb1 C: Pol(X-P,Y-Q:I=Ans:J
6、J=J+360“Fmp=“:JL13 J=J-Z18:J360=J=J-360JJ=J+360“Bp=“:J“Sp=“:IL14 Lb1 M:X=0:Y=1:X:X“DHDC(SJGCJS) Y OR N N“:X=1= Prog “H“J=0:JXI:J“Hg“=0=Goto A:Z11=Z11+1Z 111=Goto E:Z12=“BM“:Z13= “Hh“:Lb1 E:“Hc=“:J=Z12-Z13+J1L15 Z15=5=Goto K=0: :“Hf“:=0=Goto AAbs(J- )Goto A(J-)X“N1“I“N2“(X-I:X0=Ans:I(J-K-AnsK=K+Ans:G
7、oto 8:Lb1 A:“OK“Z 15=5=Goto KGoto 92 L1 S=S-901L2 Z6=G（可取消）1L3 Z7=F（可取消）1L4 Lb1 01L5 GF:F“a0“1L6 F=0=Goto 1S=S+F:1L7 X=X+Gcos S1L8 Y=Y+Gsin S1L9 Z15=5=Goto 1 F0=Goto 0Lb1 1:“Xp=“:X1L10 “Yp=“:Y1L11 G=Z6（可取消）1L12 F=Z7（可取消）3 L1 “T1=“:TL2 “T2=“:Z14 不得 L3 “L=“:L 1L4 Z4=C-T:Z5=Ans+H:Z6=C-T+L2:Z9=C-T+L:Z7=
8、Ans-Z2:H=0= “ZY=“:Z4L6 “QZ=“:Z6L7 “YZ=“:Z9L8 “ZH=“:Z4L9 “HY=“:Z53L10 M0=“YHF=“:Z5=Z5+Z21 “HYF=“:Z5=Ans+M “QZ=“:Z6L11 “YH=“:Z7L12 “HZ=“:Z94 L1 X=1=W=100:C=321.21:A=-55.778:B=316.33:R=150: Z8=398.096:H=60:Z2=55:Z=638:M=62.83:X=139.36cos 3840:Y=139.36sin 3840:Goto 8L2 X=2=W=1638:C=903.12:A=-591.062:B=5
9、38.934:R=150: Z8=302.894:H=60:Z2=85.261:M=0:Z=-638: X=139.36cos -2428:Y=139.36sin -2428:Goto 8L3 X=3=W=100:C=2532.293:A=-956.177:B=2108.185:R=2500: Z8=R:H=0:Z2=H:Z=-165808:Goto 9L4 X=4=W=830152:C=3526.833:A=-834.847:B=3100.797:R=1500: Z8=R:H=280:Z2=H:Z=174756:Goto 9L5 X=5=W=1004948:C=6022.449:A=-304
10、.586:B=5556.269:R=1400.00:Z8=R:H=180: Z2=57.143:Z=-573154:Goto 9 L6 X=6=W=431754:C=7181.154:A=-65.2595: B=6441.394: R=1522.095:Z8=R:H=0:Z2=225:Z=-354135:Goto 9L7 X=7=W=73619:C=9648.825:A=2112.749:B=6772.263:R=1400: Z8=R:H=180:Z2=57.143:Z=573153:X=461.216cos -275543:Y=461.216sin -293610:Goto 8L2 X7Lb
11、1 7:“ERROR“ Goto 7XGoto 7L3 Lb1 9:X=0:Y=0:Lb1 85 L1 X=S-S540R2H2L2 Y=S36RH-S7336R3H3L3 I=US2H6 L1 U=U(2S+H:Y=R+V-Rec(R,Abs U:X=J+E: U47 L1 X=0=Goto 0L2 XX=1=DX=0:DC-T+L=X=X+1:X=X-1:Prog “E“:X=Z19-1:D:X=Z19+1:Prog “E“:X=Z19+1:DC-T=:X=Z19:Prog “E“:X=Z19 X=7=DX=X-1:D10842.97=X=0 Lb1 07（备用） L1 X=1=DX=0D
12、840.42=X=X+1:L2 X=2=DX=X-1:D2159.36=X=X+1:L3 X=3=DX=X-1:D3151.65=X=X+1:L4 X=4=DX=X-1:D5164.39=X=X+1:L5 X=5=DX=X-1:D6688.73=X=X+1:L6 X=6=DX=X-1:D9060.82=X=X+1: L7 X=7=DX=X-1:D10842.97=X=0A L1 V=IZ4:Y=I(V+M:Z9=(S2+2SV)(M+V:X=V+S:F=Rec(Pol(S+(V5-X5)40Y2+(X9-V9)3456Y4,(X3-V3)6Y+(V7-X7)336Y3+(X11-V11)422
13、40Y5,J-90V2Y:G=J:Prog “C“:S=:Prog“6“:=90N(2S+H)R+Z9Z10)(ZB L1 J=Z14+Z3-X:X=T+Z23-Ysin N+Jcos N:Y=Jsin N+Ycos NC L1 U=90NRZ :Z5=S:S=H:H=0=V=0:E=0:Prog “5“:V=Y-R+Rec(R,90HR:E=X-JS=Z5D L1 N=Abs Z:Z1Z2=Z1=0=Z1=10-6Z2=0=Z2=10-6Z10Z8= Z1=0=Z1=10-6RZ8=G=Pol(X, Abs Y:F=N-J:N=JZ23=XYtan Z:Z3=Ysin Z:Prog“C“:L
14、=RN180+H2+Z22:H=Z2:Z6=V:Z7=E:Prog“C“:X=V:Y=E:V=Z6:E=Z7:T=E+(X-V)sin N-Z23+(R+V)tan .5N:Z14=Y+(V-X)sin N-Z3+(R+X)tan .5N:RZ8=T=E+(R+V)tan .5N:Z14=G-T+E:R=Z8:Prog “C“:Z14=Z14+E:Z21=Z10N180-Z12-M2:Z22=RF180-H2-M2:L=(Z10N+RF)180+Z12+H2:N=Abs Z:Z21=0:Z22=0:M=0R=Z10:H=Z1E L1 Prog “4“:Z1=H:Z10=R:Prog “D“5H
15、 L1 X=1:Lb1 0:Prog “S“:Prog“71“:=Ans=Goto 0L2 S=D-I+J:S2J=S=0:SS=0:SJ=S=2J-S 不得 L3 S=S22Y:DI=G=F“HZp=“:=+(D-I)G+S1L4 K0=Prog “H1“DX L1 Z31=S-90:Prog “F“: I=Icos(J-Z31: L2 Z27=-4=Prog “XH“:Goto 2L3 Z27=-8=Prog “XF“:Goto 2L4 Z27=1=IProg “ZS“:Z10Z8=Prog “SF“:S=Z1:S10-6=S=L-Z2-10-6:Z27=2:Goto 0Z272=Z10Z
16、8=Prog “SF“:Goto 0L5 Z27=2=IS=10-6:Prog “XH“:S=L-Z2-10-6L6 Z27=3=IProg “XY“:S=L-10-6:Z2=0=Prog “ZS“L7 Z27=4=IProg “XH“:Prog “ZS“L8 Lb1 0:Z27=Z27+1:Z27-2=Goto 1L9 Lb1 2:K=Z29:Z27=-5:Z26=0:Lb1 1ZS L1 Prog “F“:J=J-Z31:Z27=1=D=C-T:D=C-T+LD=D+IcosJ:Z29=IsinJ:Z27=-3 XY L1 ZJ=Z31-90:J=Z31+90 X=X+Rec(R,J:Y=
17、Y+J:Prog “F“:Z0=J=J+90-W:J=W-J+90Z10Z8=Z274=J=N-JJJ=J+360J360=J=J-360S=(RJ90)-H)2:Z10Z8=Z274=D=C-T+L-H-S:Goto 8D=C-T+H+S:Lb1 8:Z29=N(R-I)Z:Z27=-3 XH L1 Z27=2=Z27=-5:Goto 0Prog “F“:Z27=-4=J=J-Z31:J= Z31-180-JP=J:Z24=Rec(I,J:Z25=J:S=Z24:Z32=S:Y=RH:S=S+S540Y2:Prog “XS“:Lb1 1:Prog “5“:Z28=S:Y=YNZ:Z5=I:P
18、ol(X,Y:Q=J:i=Z5:PQ=Z30=I+90:Z30=I-90X=X+Rec(100,Z30:Y=Y+J:Pol(X-Z24,Y-Z25:Z29=100-I:P Z29=-Z29PQ=J-Z30:=Z30-JS=Abs:Prog “G“:Ans=Goto 61Z27=-3:Lb1 0F L1 Pol(Z33-X,Z34-YG L1 S2=Y=4:S1=Y=1.5:S0.3=Y=0.5:S0.1=Y=0.15:S0.05=Y=0.05:SGoto 2Y=0.005L2 Y=-YZ28 =Z28+Y:S=Z28:Goto 1:L3 Lb1 2:Z27=-4=D=C-T+Z28:Goto
19、1L4 Z27=4=Z10Z28=M-Z28 M0=Z27=4=D=C-T+Z1+Z21+Z28:Goto 1L5 D=C-T-Z28+L:Lb1 1XF L1 Z10Z8=S=Z1+Z21+10-6:Z27=-9:Goto 0Prog “F“: Z10Z8=J=J-Z31:J=J-Z31-180:JJ=J+360P=J: Z24=IcosJ:Z25=IsinJ:Z10V=Z10Z4:Y= Z10(V+M:V=Z8Z4:Y=Z8(V+M) X=Icos(AbsJ+90V2Y)+V-V540Y2:Z32=X:S=X+(X540Y2:Prog “XS“:S=S-V:Lb1 1: Z5=S: Z10
20、Z8=I=Z8:=Z21:I=Z10:=Z22Prog “A“:S= Z5:Z28=S:I=-U:Y=NGZ:Z10Y=-Y:I=-NIZ Z5=I:Pol(F,Y:Q=J:I=Z5:PZ30=I-90:Z30=I+90F=F+Rec(100,Z30:Z10Y=Y+NJZ:Y=Y+JPol(F-Z24,Y-Z25:Z10J=NJZZ29=N(100-I)Z:PQ= Z29=-Z29Z10=J-Z30: =J-Z30:Z29=AbsZ29:PZ29=-Z29P=-S=Abs:Prog “G“:Ans=Goto 1Z27=-3:Lb1 0XS L1 Lb1 0:X=S-S5(40Y2:Abs(X-
21、Z32)0.005=Goto 1:S=S+0.01:Goto 0Lb1 1SF L1 Z27=1=S=Z1:S10-6=S=Z21:Z27=2:Goto 0L2 Z27=2=IS=10-6:Prog “XH“:S=Z1+Z21-10-6L3 Z27=3=IProg “XY“:S=L-Z2-10-6:M0=S=S-Z22L4 Z27=4=IM=0=Prog “XY“:Prog “XF“M=0=S=L: Z2=0=Prog “ZS“S=L-Z2L5 Z27=5=IM=0=Prog “XH“:Prog “XY“M=0=Prog “ZS“:S=L-710-6:Z2=0=Prog “ZS“L6 Z27=
22、6=IProg “XH“:Prog “ZS“Lb1 0H L1 X=1:Lb1 0:Prog “S“:Prog “71“:=Ans=Goto 0S=D-I+J:S2J=S=0:SS=0:SJ=S=2J-SS=S22Y:DI=G=F“HZp=“:=+(D-I)G+SK0= Prog “H1“ S L1 Z6=G:Z7=F L2 X=1=I=409.642:G=0.028:F=-0.011:Y=8600:=917.47L3 X=2=I=1011.981:G=-0.011:F=0.023:Y=6500:=910.844L4 X=3=I=2602.517:G=0.023:F=-0.005:Y=3500
23、:=947.426L5 X=4=I=3546.244:G=-0.005:F=0.022:Y=6600:=942.707L6 X=5=I=5390.18:G=0.022:F=0.01:Y=9800:=983.274L7 J=(YAbs(G-F)2:F-GY=-Y71 L1 Lb1 0:DI+J=Goto 1:X=5=Goto 1X=X+1:Prog“S“:Goto 0Lb1 141 L1 I=0.02:J=0.03:G=2.25:F=8.5:X=Z19 L2 X=1=Y=0.08:Z29=0.04:Z24=1:Z35=0.8:Goto 1L3 X=2=Y=0.08L4 X=3=Y=0.00L5
24、X=4=Y=0.06:Z24=0.5:Goto 1L6 X=5=Y=0.04L7 X=6=Y=0.06L8 Z24=0:Z35=0:Lb1 1:Z5=YH1 L1 Prog “41“:Z5=0=Goto BS=D-C+T:Z12=NKZAbsK:Z19 =6=SY=(0.04+0.06)57.143:S=H-S: L2 Z19=5=SL-H=S=L-S:Y=(0.04+0.06)57.143:S=H-S:L3 Z10Z8=M0=Prog “F2“=Ans=Goto 2SL=Z25=0: Z12=1:Goto 1SZ25=0:Z12=1:Goto 1L4 SL-H=S=L-SX=2HI(I+Z5
25、):SH=S=HL5 Z120=Z25=Z24SH:SX=Goto 1Y=(I-Z5)(H-X: Z12=-8Z12:S=S-X:Z25=0:“Y1“:Y=(Z5+I)H L3 Lb1 2:“YY“:Y“X1“:X=SY-IJ=X:I=X:Lb1 1:AbsKF+Z25= “Y0“:Y=IAbsK“Y01“:Y=(F+Z25)I+(AbsK-F-Z25)J Z120=Y=-Y“Y=“:Y“Hp=“:X=+Y Lb1 B:G=Z6:F=Z7 F2 L1 SL=Goto 0SZ1+Z21=S “YY“:Y=( Z5- Z29)MS=S-Z1-Z21:I=Z5:Z12=-Z12:Z25=(Z35-Z
26、24)SM+F+Z24:Goto 0:S=L-S:Z5=Z29:Z24=Z35Z12Z25=0Lb1 0 二三年十一月二十七日使 用 说 明一 、本程序使用前的几点准备1、请详细阅读后面几节使用说明。2、认真阅读 CASIO fx-4800P 计算器说明书内关于程序输入的相关章节。3、按相关要求将此程序原样输入 CASIO fx-4800P 计算器。4、程序输入完成后，计算附录一所例数据检校程序输入的正确性。5、按相关说明及实际放样情况对程序（子程序“4”和“7”）进行必要的修改。6、使用本程序放样时，仪器精度一定要符合要求，建议使用全站仪配合此程序放样。7、后面几节说明中相关示例均以全站仪放
27、样时为例。9二 、本程序运行中出现的各符号说明Name 程序运行识别码。X0 后视点 X 坐标。Y0 后视点 Y 坐标。Xc 置仪点( 架仪器点，后称 测站)的 X 坐标。Yc 置仪点( 架仪器点，后称 测站)的 Y 坐标。QXH 曲线储存库中各曲线编号；也作为是否进入采点程序(地形测量程序) 的判别条件。Fm 曲线 ZY(ZH)桩到曲线交点(JD)的方位角，虚交曲线为 ZY(ZH) 桩到第一辅助交点的方位角。 后称曲线方位角。JD 曲线交点桩号，虚交曲线为第一辅助交点桩号。XJ 曲线交点(JD)的 X 坐标。YJ 曲线交点(JD)的 Y 坐标。R 第一主曲线半径。R2 第二主曲线半径。（常规
28、曲线时 R2=R）LS1 第一缓和曲线长度。LS2 第二缓和曲线长度。（常规曲线时 LS1=LS2）LF 中间缓和曲线长。（卵形曲线计算时输入，没有则输入 0；只有在 RR2 时才会提示输入）a0 曲线偏角，左偏输入负值，右偏输入正值。(采点程序中为后视测站测点的夹角，顺时针夹角输入正值，逆时针夹角输入负值。斜交边点放样程序中为测点- 中桩与中线前进方向的夹角。 )G 虚交曲线中各辅助交点间线距；单交曲线为 0。( 采点程序中为测站测点的实测距离；斜交边点放样程序中为中桩测点的斜距)Lp 测点里程；也作为是否进入计算输出曲线各要素状态的判别条件。Dp 测点到对应中桩的横断方向距离；也作为是否进
29、入斜交边点放样程序的判别条件。Hg 测站测点的高差读数；也作为是否进入测点高程计算程序的判别条件。BM 后视水平点高程。Hh 测点后视水平点的高差读数。Hf 边坡放样程序中专用的测点设计高程 (输入方法详见后计算示例及说明图 )；也作为是否进入边坡放样程序的判别条件。N1 测点位置实际地形参数。(输入方法详见后计算示例及说明图)N2 填(挖)方边坡设计坡度。(输入方法详见后计算示例及说明图)Ans 棱镜杆需要移动的距离。K 程序自动调整计算后输出的中桩到边桩距离。(Hf、N1 、N2、 Ans、K 在边坡放样程序中使用)T1 曲线的切线长，虚交或非对称曲线为第一切线长。T2 曲线的切线长，虚交
30、或非对称曲线为第二切线长。L 曲线总长。ZY 曲线直圆点桩号。ZH 曲线直缓点桩号。HY 曲线缓圆点桩号。QZ 曲线曲中点桩号。YH 曲线圆缓点桩号。HZ 曲线缓直点桩号。YZ 曲线圆直点桩号。Xp 测点 X 坐标。10Yp 测点 Y 坐标。Fmp 测站测点方位角。Bp 后视测站测点顺时针夹角。Sp 测站测点直线距离。Hc 测点高程。S1 第一后视点测站直线距离。S2 第二后视点测站直线距离。XH1 第一后视点 X 坐标。 (视线左侧后视点)YH1 第一后视点 Y 坐标。 (视线左侧后视点)XH2 第二后视点 X 坐标。 (视线右侧后视点)YH2 第二后视点 Y 坐标。 (视线右侧后视点)（S
31、1、S2、XH1、XH2、 YH1、YH2 用于后方交汇法计算测站坐标）三 、程序的使用范围1、公路工程建设施工中的各类曲线、直线中边桩放样。2、公路工程建设施工中的各类曲线、直线段上构造物( 挡墙、涵洞)放样。3、公路工程建设土石方施工中的填挖方边坡开挖(起填)线放样。4、桥梁工程施工放样。5、地形控制测量。6、对称形、非对称形、卵形、复形、C 形、凸形、多点拼虚交形曲线的放样计算。四 、程序的使用详细说明（一）、使用程序进行放样综述1、放样前需具备的条件A：测站坐标(Xc、Yc) 已知(如不知测站坐标，则必须已知两个后视点坐标)。B：后视坐标(X0、Y0)已知。C：曲线各元素已知。D：后视
32、水平点高程 BM 已知。2、使用程序计算前的现场准备工作(1)、已知测站坐标时A：架仪器于测站。B：仪器对后视，调整水平角读数为 0。C：仪器对后视水平点，测出测站与水平点之间的相对高差 Hh。(2)、末知测站坐标，已知两个后视点坐标时A：架仪器于测站。B：分别对第一后视点及第二后视点实测出 S1、S2 值。C：仪器对第一后视，调整水平角读数为 0。D：仪器对后视水平点，测出测站与水平点之间的相对高差 Hh。3、使用程序计算相关放样数据。4、顺时针转动仪器 Bp 度，沿此视线方向测出 Sp 距离便为测点的准确位置。5、读出测点测站的相对高差读数 Hg，按相关提示输入 Hg、Hh、BM。( 如果
33、不计算测点高程，输入Hg=0。)6、程序计算输出测点高程 Hc。7、程序提示输入 Hf，按实际情况决定是否进入 “边坡放样程序”，并按相关约定输入。11 （二）、挡墙放样11据已知条件，按边桩（坡）放样模式输入相关数据计算便可（具体详见“挡土墙放样的增值使用”及 CXB-14-1、CXB-14-2）。（三）、斜交边点(桥涵)放样根椐已知条件，作相关输入，到程序提示输入 Dp 值时，输入 Dp=999，程序会提示输入 a0 值和 G 值，a0 按左负右正输入，以输入 G=0 结束斜交角的输入。其详细输入情况见第 十节“程序应用示例”中 CXB-11。（四）、填(挖)方边坡放样程序提示输入 Hf
34、时，输入测点位置的边坡设计高程，便进入填( 挖) 方边坡放样程序，程序的详细输入方法见第十节“程序应用示例”中 CXB-12、13 及边坡放样示意图。（五）、已知双后视点坐标，但末知测站坐标时使用程序（后方交会）程序提示输入 Xc 时， 输入 Xc=0，然后按提示输入 S1、S2、XH1、XH2、YH1、YH2 值，程序便会自动计算测站坐标。 （重点注意：本程序中 后方交会法 用已知三边长解三角形方法计算，精度不高，建议在高精度放样时不要使用）（六）、计算并输出曲线主点桩号等要素程序提示输入 Lp 时， 输入 Lp=-1，程序便会自动计算并输出以下曲线要素：T1、T2、L、 ZH(ZY)、HY
35、、QZ、YH、HZ(YZ)。（七）、调用储存库中的曲线元素进行计算本程序可将所建段公路的各曲线元素编上号码存入子程序“4” 中，在使用程序中， 程序提示输入“QXH”时，输入 QXH=“编号”，程序会自动调用储存库中的相关元素进行计算，无需手控输入以下曲线元素： Fm、JD、XJ、YJ、R、R2、Ls1、Ls2、a0、G。例：有一合同段，起点 K2+500，终点 K3+900，其间有两个平曲线，第一个曲线 ZH=K2+600， HZ=K3+100， 第二曲线 ZH=K3+500，HZ=K3+850。现按后面第七条“程序的必要修改 ”说明，将第一个曲线的Fm、JD、XJ、YJ、R、R2、LS1、
36、LS2、a0、G 编号为“1”，将第二个曲线的 Fm、JD、XJ、YJ、R、R2、LS1、L S2、a0、G 编号“2”，存入曲线元素储存库中。以后，对 K2+500K3+500 间的任何桩位进行放样计算时，只要在程序使用中输入QXH=1，便可不用手控输入第一曲线的 Fm、JD、XJ、YJ、R、R2、LS1、LS2、a0、 G 值；对 K3+100K3+900 间的任何桩位放样计算时，只要在程序使用中输入 QXH=2，便可不用手控输入第二曲线的Fm、JD、XJ、YJ、R、R2、LS1、LS2、a0、G。（八）、采点程序(地形测量程序 )的使用当提示输入 QXH 时， 输入 QXH=-1，程序进
37、入地形测量计算状态，按提示输入后视测站测点的夹角 a0(按顺时针正，逆时针负输入)和测站测点的距离 G，程序会计算并输出测点的坐标 Xp、Yp；然后，按程序提示输入前视高差读数 Hg、后视高差读数 Hh 和后视水平点高程 BM，程序会计算并输出测点高程 Hc。五 、程序中各判断条件的输入约定 1、Xc( 测站 X 坐标)：输入 Xc=0，进入后方交汇法计算测站坐标状态，依次输入 S1、S2、XH1、YH1、XH2、YH2 ，程序自动计算测站坐标(Xc 、Yc) 。输入如 Xc 为不等于 0 的任何数值，程序将此数值视为测站 X 坐标。2、QXH(曲线编号)：输入 QXH=0， 进入手工输入 F
38、m、JD 、XJ、YJ 、R 、Ls、a 0、G 等曲线元素状态。输入 QXH=-1，进入采点程序 (地形测量程序)计算状态。输入 QXH 为不等于 0 和-1 的任何数值，程序视该数值为曲线库中的曲线编号。3、Lp(测点里程)：输入 Lp=-1，程序将计算并输出 T、L、ZH 等曲线要素。12输入 Lp 为大于 0 的数值，程序视此数值为测点里程。4、Dp(中桩到边桩横断距离)：输入 Dp=0，程序计算中桩放样数据。输入 Dp 为大于 0 的数值，程序视此值为中桩到右侧横断方向测点的距离。输入 Dp 为小于 0 的数值，程序视此值为中桩到左侧横断方向测点的距离。输入 Dp=999，程序进入斜
39、交边点放样状态。5、Hg(前视高差读数，即测站测点的高差读数)：输入 Hg=0，拒绝进入高程计算状态，程序不计算测点高程 Hc。输入 Hg 为不等于 0 的数值，程序视此值为前视高差读数，用于计算测点高程。6、Hf(测点位置的边坡设计高程)：输入 Hf=0，拒绝进入边坡放样程序。输入 Hf 为不等于 0 的值， 程序进入边坡放样程序计算状态，视此值为测点位置边坡设计高程。六 、程序的必要修改(一)、子程序“4”的相关输入及修改：a、单交点曲线的存入(修改) 模式X=n(n 为曲线编号，系大于零的数值，可自设，调用时输入 QXH=n 便可，曲线元素调用详见计算示例)=W=方位角：C= 交点桩号：
40、 A=交点 X 坐标：B=交点 Y 坐标：R=曲线半径：Z8=R：H=第一缓和曲线长：Z2=第二缓和曲线长： Z=曲线偏角(左偏为负，右偏为正)：Goto 9 X=n1=W=：C=：A=：B=：R=：Z8=R：H=：Z2=H：Z=：Goto 9(Ls1=Ls2)X=n2=W=：C=：A=：B=：R=：Z8=R：H=：Z2=：Z=：Goto 9(Ls1Ls2) Xnmax=Lb1 7:“ERROR“ Goto 7 XGoto 7 Lb1 9：X=0：Y=0：Lb1 8b、虚交曲线的存入( 修改)模式X=n=W=方位角：C= 第一辅助交点桩号：A= 第一辅助点 X 坐标：B=第一辅助交点 Y 坐标
41、：R=曲线半径：Z8=R：H= 第一缓和曲线长：Z2=第二缓和曲线长：Z= 曲线总偏角(Z=a 01+a02+a03+a04，左偏为负，右偏为正)：X=G 1cos a01+G2cos (a01+a02)+G3 cos (a01+a02+a03)：Y=G1sin a01+G2 sin(a01+a02) +G3sin(a01+a02+a03)：Coto 8X=n2=W=：C=：A=：B=：R=：Z8=R： H=：Z2=H：Z=：X=：Y=：Goto 8(Ls1=Ls2、虚交曲线)X=n3=W=：C=：A=：B=：R=：Z8=R： H=：Z2=：Z=：X=：Y=：Goto 8(Ls1Ls2、虚交曲
42、线) Xnmax=Lb1 7:“ERROR“ Goto 7 XGoto 7Lb1 9：X=0：Y=0：Lb1 8c、卵形、复形曲线的存入(修改)模式：卵形、复形曲线元素可按以下模式存入或修改相关资料：X=n=W=方位角：C= 第一交点桩号：A= 第一交点 X 坐标：B=第一交点 Y 坐标：R=第一主曲线半径：Z8=第二主曲线半径： H=第一缓和曲线长：Z2=第二缓和曲线长：M=中间缓和曲线长（在复曲线或卵形曲线时输入）：Z=曲线总偏角Z=a 01+a02 ；左偏为负，右偏为正： X=Gcos a01：Y=Gsin a 01（式中 G 为第一交点到第二交点间距;a 01 为第一交点偏角，左偏为负
43、，右偏为正）:Coto 8 X=n1=W=：C=：A=：B=：R=：Z8=R：H=：Z2=H：Z=：Goto 9(常规曲线：R=R2、Ls 1=Ls2、单交)X=n2=W=：C=：A=：B=：R=：Z8=R：H=：Z2=：Z=：Goto 9(非对称曲线：R=R2、Ls 1Ls 2、单交)X=n3=W=：C=：A=：B=：R=：Z8=R：H=：Z2=H：Z=：X=：Y=：Goto 8(R=R2、Ls 1=Ls2、虚交)13X=n4=W=：C=：A=：B=：R=：Z8=R：H=：Z2=：Z=：X=：Y=：Goto 8(R=R2、Ls 1Ls 2、虚交)X=n5=W=：C=：A=：B=：R=：Z8=
44、：H=：Z2=：M=：Z=：X=：Y=：Goto 8(R R2、 Ls1 Ls2、 卵 形 曲 线 )X=n6=W=：C=：A=：B=：R=：Z8=：H=：Z2=：M=0：Z=：X=：Y=：Goto 8(RR2、Ls1Ls2、复 形 曲 线 )X=n7=W=：Z=：Goto 9(单交曲线) Xnmax=Lb1 7:“ERROR“ Goto 7 XGoto 7Lb1 9：X=0：Y=0：Lb1 8（二）、子程序“7”的相关输入及修改：本程序在运行过程中，输入每一个测点桩号后，程序会自动识别该桩号所属曲线范围与输入的“QXH”是否相符合，如果不相符合会自动调整“QXH”的数值至相符后，调用子程序 “4”中的对应曲线元素
