Porg”BP-FY-2”:IfEnd: //进入计算子程序2
边坡计算子程序3 BP-FY-3 If G＜0:Then Return:IfEnd:
IfN＜A: //如果测点高程小于该层边坡底线高程
Then“++++，SHANG-TIAO”：A-N◢ //显示坡度错误，不在本坡段，上几米再次测量或计算低层边坡
Porg\返回程序重新找点
If N＞(A+G): //如果测点高程大于该段边坡定部高程
Then”----，XIATIAO”: N-A-G◢//显示高程错误，不在本坡段，应在上面坡段，应忘上调整
Porg: BP-FY”: IfEnd: //返回主程序
边坡计算子程序2 BP-FY-2 “GC=”？N： //输入测点高程
Porg”BP-FY-3”: //判断测点是否低于该坡段最低高程 Abs(N-A)*K+B-D→E : //计算出正确偏差
If Abs（E）≤0.05：Then //如果测点误差5厘米以内表示成功 ”CHENG-GONG,WUCHA=”:E◢ //成功后，显示测点误差 Prog”BP-FY”:IfEnd: //返回主程序测下个断面 IfJ＞0:ThenE→Z: //右侧录入误差
Else -E →Z: Z→Z[10] //左侧录入误差 IfEnd:
Porg”GL-BZ-ZS”: //计算下一点坐标
“X=”：G◢“Y”：M◢ //显示下一点坐标,进行放样 G→X：M→Y： //录入XY坐标,进行下次计算 “GC=”N: //输入测点高程
Abs(N-A)*K+B-(D+E)→C: //计算出正确偏差
If Abs(C)≤0.05：Then //如果测点误差5厘米以内表示成功 ”CHENG-GONG,WUCHA=”:C◢ //成功后，显示测点误差 Prog”BP-FY”:IfEnd: //返回主程序测下个断面 CE/(E-C) →F: //由上次两点误差推算第三点 IfJ＞0:ThenF→Z: //右侧录入误差
Else -F→Z: IfEnd: // 左侧录入误差 Porg”GL-BZ-ZS”: //进行下一点坐标计算
“X=”：G◢“Y=”：M◢ //显示下一点坐标,进行放样 G→T：M→S： //录入XY坐标,进行下次计算 “NONO” : //本循环未计算出正确点
Porg”BP-FY”: //，使用计算出的坐标，进入下个循环,程序自动把此坐标带入下个循环
数据库部分 1平曲线数据库
平面线路选择程序PM-XL-XZ
U=1＝＞Prog”HUO-DA-XIAN”: //进入假定线路活大线。 U=2＝＞Prog”X2”: //进入路线2 U=3＝＞prog”X3”: //进入路线3 （P-R）/（2HPR）→D：
L-O→O： //正算程序需要补充部分 OD→D: 1/P→C：
（数据库）活大线HUO-DA-XIAN
线路起点里程→A：线路终点里程→B：
If L≤第一线元止点里程：Then 起点X坐标→X：起点Y坐标→Y：
起点半径（左-，右+）→P：止点半径（左-，右+）→R：本线元长度→H： 线元起点桩号→O：起点方位角→Q：Return:IfEnd: If L≤第二线元止点里程：。。。 。。。Return: 。。。 。。。
二号线路X2
三号线路X3
2，高程数据库部分
说明：输入部分：L为计算里程，C为起点里程，，I为纵向前坡坡度，A为纵向后坡坡度，E为半径， K为起点高程， 高程线路选择程序GC-XL-XZ
U=1＝＞Prog”GC1”: //进入线路高程1 U=2＝＞Prog”GC2”: //进入线路高程2 U=3＝＞Prog”GC3”: /进入线路高程3
一号线路高程GC1 If L≤该段止点里程：Then（前坡 例0。01）→I：（后坡 例-0。034）→A：（竖曲线半径）→E：（（起点高程）→K：（起点桩号）→C：止点桩号→D：Return:Ifend； ? ?
二号线路高程GC2
三号线路高程GC3
3超高数据库
IfU=1:ThenPorg”CG1”:IfEnd: //进入线路1 IfU=2;ThenPorg”CG2”:IfEnd: //进入线路2 IfU=3:ThenProg”CG3”:IfEnd: //进入线路3 超高线路选者程序CG-XL-XZ
N为曲线左右偏区别符号（左-1，右+1），F为起点横坡，T为止点横坡，S为线性渐变和高次渐变的判断要素，取0为线性，取1为高次。V为一般段超高缓和段与全超高和卵型插入缓和段判断要素。直线一般超高缓和段输入1，全超高和S超高缓和段输入2，显示部分：重要约定，在全超高平曲线和卵型曲线插入缓和段中，前横坡F和后横坡T都输入右侧横坡。
超高数据库1 CG1
-0.02→F：-0.02→T: ／／录入直线部分一般超高，数据根据设计调整 0→S:1→V: ／／录入直线部分计算性质，数据根据设计调整 １→Ｎ： ／／１→Ｎ：数据不调整，输入以上几段后，直线超高不变段可不再输入数据．
If Ｌ≥该段起点里程 Ａnd L≤该段止点里程：Then(超高缓和段输入1，单圆曲线全超高和S超高缓和段输入2) →V：（平曲线左右偏区别符号,超高缓和段才输入 左-1，右+1）→N：（超高方式选择，0为线性，取1为高次）→S：（起点横坡 例-0。02，根据设计值更改）→F：（止点横坡例＋０．０３，根据设计值更改）→T：起点桩号→C：止点桩号→D：Return:Ifend； ．．． ．．．
超高数据库2 CG2
超高数据库3 CG3
4,加宽数据库
加宽线路选择程序 JK-XL-XZ
IfU=1:ThenPorg”JK1”:IfEnd: //进入线路1 IfU=2;ThenPorg”JK2”:IfEnd: //进入线路2 IfU=3:ThenProg”JK3”:IfEnd: //进入线路3 :??.
加宽数据库 JK1
A为加宽前里程，B为加宽止点里程，C最大加宽点加宽宽度，D加宽趋势(从前往后输入1从后往前输入2 ,全加宽输入3) Z全加宽宽度(注明,不加宽部分不需要录入数据库,加宽缓和段不输入Z,全加宽不输入C) 1号线路JK1
0→Z: //录入不加宽部分加宽值为0,此句必须输
IfV=(公路左侧-1,公路右侧+1): Then L≤此段起点Ａnd L≥此段终点：Then 加宽前里程
→A:加宽段止点里程→B:最大加宽点加宽宽度→C:加宽趋势(由小到大1,由大到小2)→D:IfEnd: //此段为加宽缓和段的格式
IfV=(公路左侧-1,公路右侧+1): Then L≤此段起点 Ａnd L≥此段终点：Then 加宽前里程→A:加宽段止点里程→B:最大加宽点加宽宽度→C:加宽趋势3→D:加宽宽度→ZIfEnd: //此段为全加宽段的格式
2号线路JK2
3号线路JK3
。。。 。。。
5,边坡数据库
边坡线路选择程序 BP-XL-XZ
IfU=1ThenPorg\进入线路1 IfU=2ThenPorg\进入线路2 IfU=3ThenProg\进入线路3 .........
路肩宽度B 路肩坡度C 边沟宽度D、平台宽度E 平台坡度F 马道宽H 马道坡度 V （马道坡度向边坡侧仰为-，向公路侧仰为正）1级边坡高度G1级别边坡坡度K 2级边坡高度M 2级边坡坡度N 3级边坡高度I 3级边坡坡度P 4级边坡高度R 4级边坡坡度 S
边坡数据库1 BP1
If J≥（或≤区分路基左右）0：Then If L(里程)＜终点桩号 And ＞起点桩号：Then \～N\录入本线元边坡级数,在使用时候可以看到本段边坡级数,而选择计算边坡层 路肩宽度→B：路肩坡度→C：边沟宽度→D：平台宽度→E：平台坡度→F:马道宽度→H： 马道坡度→V：1级边坡高度→G：1级别边坡坡度→K ： 2级边坡高度→M： 2级边坡坡度→N ： 3级边坡高度I： 3级边坡坡度P： 4级边坡高度R： 4级边坡坡度：Return:IfEnd:IfEnd: //约定：所有边坡度正负符号向中线内侧倾斜为+，向外侧倾斜为-。有几层边坡就录入多少边坡数据，只有一层边坡时可不录入马道高宽数据
边坡数据库2 BP2
边坡数据库3 BP3
使用说明:
进入常数子程序更改设计常数 根据数据库说明编写数据库 一，坐标正算方法
普通计算
1，进入主程序ZHU-CHENG-XU
2，选择使用程序，根据大家录入的代码，本程序，选择1 3，选择坐标1，正算，2，反算，3边坡放样，选择1 4，1为普通计算或者2设计计算 选者1，选者1 5，线路选择 1～N，根据计算路线编号进行选者 6，输入计算里程
7，输入计算边距，左-，右正
8，显示计算点方位角，显示计算点中桩XY，显示中桩高程，显示边桩XY，显示边桩高程
设计计算
1，进入主程序ZHU-CHENG-XU
2，选择使用程序，根据大家录入的代码，本程序，选择1 3，选择坐标1，正算，2，反算，3边坡放样，选择1 4，1为普通计算或者2设计计算 选者1，选者2 5，线路选择 1～N，根据计算路线编号进行选者 6，输入计算里程
7，输入计算左边桩或者右边桩 左侧输入-1，右侧输入+1
8，显示计算点方位角，显示计算点中桩XY，显示中桩高程，显示边桩XY，显示边桩高程
二，坐标反算方法
1，进入主程序ZHU-CHENG-XU
2，选择使用程序，根据大家录入的代码，本程序，选择1 3，选择坐标1，正算，2，反算，3边坡放样，选择2 4，线路选择 1～N，根据计算路线编号进行选者
5，输入试算点里程L 可输入任意里程，数据库有数据就好，离真实坐标越近越快 6，输入测点X，Y
7，显示测点里程和边距
三，边坡开口放样与坡脚放样 1，进入主程序ZHU-CHENG-XU
2，选择使用程序，根据大家录入的代码，本程序，选择1 3，选择坐标1，正算，2，反算，3边坡放样，选择3 4，输入试算点里程
5，输入山坡上第一测点X，Y，Z
6，显示本边坡级数，选者计算坡级，如测点高程不在本坡级，程序会提示上多少米或者下多少米重新找点测量。
6，如测点平距误差小于设定值5cm，显示成功语句并自动转换到下个断面从第4步开始，如误差过大自动计算修改值，显示下一点坐标， 7，输入第二测点高程
8，如测点平距误差小于设定值5cm，显示成功语句并自动转换到下个断面从第4步开始，如误差过大自动计算修改值，显示下一点坐标，