内容发布更新时间 : 2024/5/18 7:16:07星期一 下面是文章的全部内容请认真阅读。

锥坡放样计算程序之修正版

根据林新红《桥台锥坡基础曲线方程的推导及应用》设计的卡西欧5800桥台锥坡基础曲线放样程序，应用此程序进行锥坡放样将大大提高工作效率和保障工程精度。

在实际应用中无论是正交桥台或斜交桥台，锥坡的短轴（程序中：L）始终与路线方向平行且值大小不变；锥坡的长轴（程序中：K）只有在桥台斜交时随着构造物（桥台）纵横轴设计交角（程序中：G\）的变化而变化。

前 桥 台

后 桥 台 锥坡基础曲线放样示意图

上面完整布置图中，①,②号桥台锥坡尖点方位角就是尖点对应中桩的切线方位角。③,

④号桥台锥坡尖点方位角任然是尖点对应中桩的切线方位角，但在计算时要±180(程序中为:H=H±180),而此时P=P-N:Z=1=>P=P≠>Z=2=>P= - P△,为了方便程序计算，规定①,②号桥台锥坡为前锥坡；③,④号桥台锥坡为后锥坡,下列程序中现已都考虑了这些元素，只要计算时分清前后左右就OK了。

- 1 -

程序名： ZPFYJS

Lbl 0 : \\：?Z: \If R=2:Then H-180→H:IfEnd:

(A-B)C÷cos(90-G)→K◢???显示锥坡长半轴长度值(如果去掉黑三角，K值不显示) (A-B)D →L◢????????显示锥坡短半轴长度值(如果去掉黑三角，L值不显示) 0→T: 0→N：(注意，这里是数字0，而不是字母O) Lbl 1：T+1→T：\：T◢??显示坐标值的组数 If N≥G:Then G→N:IfEnd: G-N→P：

KLsin(G)÷√((Ksin(N))2+(Lsin(P))2)→M◢????显示随着加密递增变化而变化的极轴长度值(可去掉黑三角,M值不显示)

If R=1:Then Goto 2:IfEnd: If R=2:Then Goto 3:IfEnd:???判断是前桥台锥坡还是后桥台锥坡

Lbl 2: If Z=1:Then -P→P:Goto 4:IfEnd:If Z=2:Then P→P:Goto 4:IfEnd（回车EXE）???判断是前桥台锥坡的左侧锥坡还是右侧锥坡

Lbl 3: If Z=1 Then -P→P:Goto 4:IfEnd:If Z=2:Then P→P:Goto 4:IfEnd（回车EXE）?????判断是后桥台锥坡的左侧锥坡还是右侧锥坡

Lbl 4:E+Mcos(H+P)→X: \：X◢??显示随着加密递增变化而变化的极轴末端的X坐标

F+Msin(H+P)→Y: \：Y◢??显示随着加密递增变化而变化的极轴末端的Y坐标 Pol（X-U，Y-V）→J：If J<0 Then J+360→J: IfEnd:“FWJ=”:J?DMS◢??显示随着加密递增变化而变化的放样极坐标方位角

“S=”：I◢??????显示随着加密递增变化而变化的放样极坐标距离

If N=G: Then Goto 0: IfEnd（回车EXE）?程序自动跳回主程序表示锥坡基础曲线计算放样完毕 N+S→N：Goto 1

说明：程序中各注释文的涵义 \、\测站点横纵坐标 \锥坡尖点的标高 \锥坡基础顶面标高

\路基横坡度（椎体长半轴方向），如果为1：1.5则输入为1.5

\锥坡迎水面坡度（路线方向，短半轴方向），如果为1：1则输入为1 \、\锥坡尖点的横、纵坐标 \桥台横纵轴之间的夹角

\锥坡尖点沿路线前进方向的方位角

\输1计算前桥台锥坡，输2计算后桥台锥坡 \输1计算左侧桥台锥坡，输2计算右侧桥台锥坡 \--把需要加密点而设置的平分角度值，如要求曲线精度更高，可将角度划分更细加密即可，一般可以设置取S值为：5度、4度或者3度。如G=60，S=5，可以60÷5=12，计算完毕有12+1=13组坐标，放样13次。 注意：N=0时放样的锥坡基础曲线的起点(第一组坐标)，N=G时放样的锥坡基础曲线的终点(返回前

的最后一组坐标)，程序在执行返回要求重新输入变量时表示该曲线已计算放样完毕。

- 2 -

附注:本文经修改试验后可以正常运行,请放心使用.另外,在输入完毕后请试验下是否跟原设计符合,可在CAD上面进行试验,如果符合没有问题表示此程序可以正常运行.至于各代码的含义用户可以设置成自己喜欢并且能够理解的代码.如\锥坡尖点的标高中的HS可以设置成ZPDH

意思是锥坡顶面高程,而锥坡基础的则可以设置成ZPJH意思是锥坡坡脚的地面实测高程等等.

修正时间:2015-3-30 修正人:李志欢

结语:本人并非编程高手,对于编程也只是略知一二.程序如有不足或须优化之处,请多多指教.欢迎测量界同盟共同探讨.--更快!更高!更准!

- 3 -