1. 主程序(TYQXJS)
Lbl 4："1SZ => XY，2XY => SZ"？N：？S：Prog“SUB0”↙
1÷P→C: (P-R)÷(2HPR) →D:180÷∏→E:N=1 => Goto1：Goto2：↙
Lbl 1:”DZ”? Z：Abs(S-O) →W：Prog "SUB1"："XS"：X◢
"YS"：Y◢Prog “SQX”（竖曲线的程序名字）
F-90→F：“FS=”：F▲DMS◢Prog “CQW”（隧道超欠挖的程序名字）
Goto4↙
Lbl 2：”X”？X：“Y”？Y：X→I：Y→J：Prog“SUB2”：O+W→S：“S”：S◢“Z”：Z◢
Prog“CQW”
Goto4↙
2. 正算子程序(SUB1)
0.1739274226→A：0.3260725774→B：0.0694318442→K：0.3300094782→L：
1-L→F：1-K→M
G+QEKW(C+KWD)→Z[1]
G+QELW(C+LWD)→Z[2]
G+QEFW(C+FWD)→Z[3]
G+QEMW(C+MWD)→Z[4]
A×cos(Z[1])→X
X+Bcos(Z[2])→X
X+Bcos(Z[3])→X
X+Acos(Z[4])→X
U+WX→X
Asin(Z[1])→Y
Y+Bsin(Z[2])→Y
Y+Bsin(Z[3])→Y
Y+Asin(Z[4])→Y
V+WY→Y
G+QEW(C+WD)+90→F
X+Zcos(F)→X
Y+Zsin(F)→Y
2. 反算子程序(SUB2)
G-90→T：(Y-V)cos(T)-(X-U)sin(T) →W：Abs(W) →W:0→Z
Lbl 0：Prog "SUB1"
T+QEW(C+WD) →L：(J-Y)cos（L）-(I-X)sin（L）→Z：IF Abs（Z）<0.000001：Then0→Z:Prog "SUB1"
(J-Y)÷sin（F）→Z
Else W+Z→W
Goto0:IfEnd
SUB0 数据库子程序
Goto1↙
Lbl 1：IF S<***（线元终点里程）:Then***→G（线元起点方位角）:***→O（线元起点里程）:***→U（线元起点X）:***→V（线元起点Y）:***→P（线元起点曲率半径）:***→R（线元终点曲率半径）: ***→H（线元起点至终点长度）：0或1、-1→Q：Return:IfEnd↙
Lbl 1：IF S<***（线元终点里程）:Then***→G（线元起点方位角）:***→O（线元起点里程）:***→U（线元起点X）:***→V（线元起点Y）:***→P（线元起点曲率半径）:***→R（线元终点曲率半径）: ***→H（线元起点至终点长度）：0或1、-1→Q：Return:IfEnd
……………..
为了便于解读，每增加一个线元增加一行语句，每增加一条曲线增加一个Lbl，每增加一个工程增加一个文件。只要给数据库里的变量输完即可使用。
CQW(程序名)隧道超欠挖
“SCH”?A:”R”?G:”HSJ”?H:”DZ”?Z
√((A-H-设计标高到圆心的高度)2+（Z±隧道中线到测设线的距离）2) →D
G-D→Z[4]
“CW-,QW+”:Z[4] ◢
程序运行到“SCH”?A:”R”?G在“SCH”下输入实际测的高度，“R”下输入上导的开挖半径
后面的不用，超挖为-，欠挖+
以上不加CQW(程序名)也可以使用，把主程序的Prog “CQW”（隧道超欠挖）删掉，要算竖曲线给最后的竖曲线程序输入计算器即可，嵌套已经在以上程序中了，需要注意的是以上子母不要改变，改变后可能和后面的竖曲线程序出现子母冲突，发生计算错误。不用竖曲线把Prog “SQX”（竖曲线）删掉
三、使用说明
1、规定
(1) 以道路中线的前进方向（即里程增大的方向）区分左右；当线元往左偏时，
Q=-1；当线元往右偏时，Q=1；当线元为直线时，Q=0。
(2) 当所求点位于中线时，Z=0；当位于中线左铡时，Z取负值；当位于中线中线右侧时，Z取正值。
(3) 当线元为直线时，其起点、止点的曲率半径为无穷大，以10的45次代替。
(4) 当线元为圆曲线时，无论其起点、止点与什么线元相接，其曲率半径均等于圆
弧的半径。
(5) 当线元为完整缓和曲线时，起点与直线相接时，曲率半径为无穷大，以10的4 5
次代替；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直线相接时，曲率半
径为无穷大，以10的45次代替；与圆曲线相接时，曲率半径等于圆曲线的半径。
(6) 当线元为非完整缓和曲线时，起点与直线相接时，曲率半径等于设计规定的
值；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直线相接时，曲率半径等
于设计规定的值；与圆曲线相接时，曲率半径等于圆曲线的半径。
2、输入与显示说明
输入部分：
1. SZ => XY
2. XY = > SZ
N ? 选择计算方式，输入1表示进行由里程、边距计算坐标；输入2表示由坐标
反算里程和边距。
S ？正算时所求点的里程，反算时为所求点的近似里程，反算时输入的近似里程不能夸线元，若夸线元的话，需进行第二次反算，并以第一次的结果做为近似里程，否则反算的里程及边距不对，Z ？正算时所求点距中线的边距(左侧取负，值右侧取正值，在中线上取零)
X ？反算时所求点的X坐标
Y ？反算时所求点的Y坐标
显示部分：
XS=×××正算时，计算得出的所求点的X坐标
YS=×××正算时，计算得出的所求点的Y坐标
FS=×××正算时，所求点对应的中线点的切线方位角
S=×××反算时，计算得出的所求点的里程
Z=×××反算时，计算得出的所求点的边距
→÷≤≥＝
SQX（程序名）
If S＜边坡终点And S≥边坡起点：Then大里程坡度→A：小里程坡度→B：边坡点里程→O：边坡点高度→G：半径→R：Prog“Z-SQX”:IfEnd
有多个竖曲线，依照上面的依次变更，每多一个，就增加一个。每次只需要修改以上的数据或增加一个判断，子程序不用变动。
Z-SQX（子程序名）
O-S→L:A-B→W:Abs(R*W÷2) →T:O-T→M:O+T→P
If S≤M:ThenG-L*B→H:Goto5:Else If S≤O:Then Goto3:Else If S≤P:Then Goto4:If End: IfEnd: IfEnd
Lbi3
If W＞0：Then G+(M-S)2÷2÷R-L*B→H:Goto5: Else If W＜0: Then G-(M-S)2÷2÷R-L*B→H:Goto5: IfEnd: IfEnd
Lbi4
If W＞0：Then G+( S-P)2÷2÷R-L*A→H:Goto5: Else If W＜0: Then G-( S-P)2÷2÷R-L*A→H:Goto5: IfEnd: IfEnd
H→H:”H”:H◢（为所求的高度）
隧道的施工放样程序及C A D计算超欠挖量 隧道测量的程序及运用： 在测量隧道中由于时代的变化、科学的进步，我们运用的计算工具也在不断的变化。在如今我们测量工作中一般运用的是CASIO4500、4800、4850等型号的科学计算器还是一种有编程功能的计算器。 在隧洞测量时测量人员要根据现场的要求来进行编程，边角程序如： 边角后方交会 BJHFJH L1 ABCD：Lbl5：{KSP} L2 pol(C-A,D-B) L3 Q=90(1-K)+K SIN-1(S SIN P/V) L4 T=W+180-P-Q L6 Rec (S,T) : X=A+V◢ Y=B+W◢ L7 Goto5 说明： 1、测边的已知点作为P1（A,B），未测边的已知点作为P2（C,D）。 测边对角为锐角时K=1，测边对角为钝角时 2、 K=-1。 3、角度P是以测边方向为起始方向，顺时针观测另一个已知点方向的右角。 注：理想图形要求实测的S边相对于已知边P1P2越短越好，角P越接近180°越好。 坐标反算 ZBFS L1 AB：Fixm：{CD} L2 pol(C-A,D-B)◢ L3 W＜0W=W+360 L4 lntW +(60 Frac W )+ Frac(60 FracW) ◢ 说明： 1、本程序用于计算直角坐标值已知的两点间的边长和坐标方位角。 2、起算点和目标点的坐标分别为（A，B）、（C，D）。 3、起算点改变时应重新调用程序以改变A、B的值。 4、边长值和方位角值分别自动存放在“V”和“W”中。“W”的单位为：度“°”。 隧洞断面图如上的程序如下： 直线断面放样程序（2） ZXFY2 L1 Lbl0：{ABH}：ABH:POL(A-X,B-Y): L2 L=ICos (J-G)◢ L3 M=Isin(J-G) ◢ L4 V=H-N◢
阅览室馆友我的图书馆 kaixin100 | | 分享
U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos( G+QEFW (C+FWD))+Acos(G+QEMW(C+MWD)))→X： V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+ QEFW(C+FWD))+Asin(G+QEMW(C+MWD))) →Y： G+QEW(C+WD)+90→F：X+Zcos（F）→X：Y+Zsin（F）→Y 反算子程序SUB2 G-90→T (Y-V)cosT-(X-U)sin(T) →W Abs(W)→W:0→Z Lbl6：Prog "SUB1" T+QEW(C+WD) →L：(J-Y)cos（L）-(I-X)sin（L）→Z IF Abs（Z）<1E-6：Then0→Z:Prog "SUB1":(J-Y)÷sin（F）→Z:Else W+Z→W：Goto6:IfEnd 数据库子程序SUB0 Goto 1(线元可输入多条，分离式可在前多加一位，匝道一样。例：左幅为K129+500,右幅输线元参数里程为1129+500，其他不变，前面 1为任意数字，计算机便于区分) Lbl 1：IF S<线元终点里程：Then@@@→O(线元起点里程) ：@@@ →U(线元起点X坐标)：@@@→V(线元起点Y坐标)：@@@→G(线元起点计算方位角)：@@@→P(线元起点半径)：@@@→R(线元止点半径)：@@@→H(线元长度)：@@@→Q(线元左、右偏标志，左偏-1，右偏1，直线为0)：Return：IfEnd IF S<线元终点里程：Then@@@→O(线元起点里程) ：@@@ →U(线元起点X坐标)：@@@→V(线元起点Y坐标)：@@@→G线元(起点计算方位角)：@@@→P(线元起点半径)：@@@→R(线元止点半径)：@@@→H(线元长度)：@@@→Q(线元左、右偏标志，左偏-1，右偏1，直线为0)：Return：IfEnd 。。。。。。。。。。。。。。。。。。。。。。。。。。。 一程序功能 本程序由一个主程序(ZBJS)和3个子程——正算子程序(SUB1)、反 算子程序( SUB2) 、数据库子程序（SUB0）构成，可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线 元要素（起点坐标、起点里程、起点切线方位角、线元长度、起点曲 率半径、止点曲 率半径）及里程边距或坐标，对该曲线段范围内任意里程中边桩坐标 进行正反算。另 外也可以将本程序中核心算法部分的两个子程序移植到其它相关的 程序中，用于对曲 线任意里程中边桩坐标进行正反算。本程序也可以在CASIO fx-4500P计算器及CASIO fx-4850P计算器上运行。 二、使用说明
5800公路测量程序使 用说明
5800公路测量程序使用说明 一、程序使用流程 本程序数据和主程序是分开的，编程时将不同的工程数据存放到不同的数据文件里，如A 匝道，文件名为A，将匝道A所有的曲线线元参数输入A文件里。运行时只要运行文件名A 的程序就可以了，具体运行流程见下图： 二、数据文件的编写 （一）交点法数据文件编辑
交点法编写数据文件必须是对称型的，即直线段→缓和曲线段→圆曲线段→缓和曲线段→直线段，（如果任意一端没有直线段，则把直线段长度看做是0），另外圆曲线两侧缓和曲线的旋转常数必须相等，并且和直线段连接处的半径必须是无穷大。 交点法数据文件编写一般是根据设计图纸提供的平面曲线参数一览表提供的参数来编写，每个弯道包括：弯道起点方位角（C），交点X坐标（D），交点Y坐标（E），缓和曲线长度（F，当没有设缓和曲线时，F=0），交点转交（G，向左转弯，G为负值，向右转弯，G取正值），交点桩号（H），弯道圆曲线半径（R）。 下图是一段市政道路设计参数数据。 根据上图提供的数据，可以编辑成如下的数据文件： 文件名:CHLNR
3→DimZ “X0”?A:”Y0”?B:“Ln”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Else “Xp”?X:”Yp”?Y:X→Z[1]：Y→Z[2]：IfEnd:Lbl 1:If L>0 :Then 98°39°35.12°→C：4474. 384→D：2415.861→E：140→F：31°17°23°→G：410.007→H:600→R:IfEnd: If L>1060 Then 1 29°56°58.19°→C:4206.421→D：3093.946→E：70→F：-33°50°48°→G：1285.437→H:600→R:If End:Prog”XLJS”:If Z[3]≠0.0001:Then Goto 0:Else (Z[1]－X)cos(Ｏ)＋(Z[2]－Y)sin(Ｏ)→N:L＋N →L:－(Z[1]－X)sin(O)+(Z[2]－Y)cos（O）→K：If Abs（N）≥0.001：Then Goto 1：Else “L=“: L◢ “K=”:K◢ IfEnd:Goto 0: IfEnd 在面程式中，有两个条件转移语句即If L>0：Then 98°39°35.12°→C:4774.384→D: 2415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEnd If L>1060：Then 129°56°58.19°→C:4206.421→D: 3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:IfEnd …… 如果还有其他弯道，可以继续完后加。在这些存放设计参数的语句前后的程序表达式是固定的。 说明： 编辑曲线参数时，每个曲线参数放在一个If L>***.***（两个弯道中间直线段上的任意桩 号） :Then ***°**°**.**°→C（弯道起点方位角）：****.***→D（交点X坐标）：****.****→E（交点Y坐标）：***.***→F（缓和曲线长度：**°**°**°→G（转角，向左转为负值，向右转为正值）：***.***→H（交点里程桩号）:***→R（圆曲线半径）:IfEnd 条件式语句里，如果有多个弯道，一直按上述形式编下去， 变量说明： 1、 L>***.***
隧道超欠挖管理办法 一、目的 为了有效控制施工中隧道开挖超挖量大，成型的不利局面，提高隧道开挖成型质量，降低施工成本，明确责任，落实到人。 二、编制依据 根据《铁路隧道工程施工质量验收标准》、《铁路隧道施工规范》及现场实际情况，经研究决定，特制定有关隧道超欠挖管理办法。 三、成立隧道超欠挖管理领导小组。成员由队长、技术负责人、财务等 相关人员组成。 组长： 组员： 四、控制内容 1、隧道开挖钻孔、装药、成型效果。 2、开挖测量中线、标高、周边轮廓线偏差。 3、仰拱开挖尺寸。 五、控制标准 1、根据岩石的类别、硬软情况，确定周边眼的间距。极硬岩控制在 0.55～0.70m，硬岩控制在0.40～0.65m，软岩控制在0.33～0.50m， 眼距允许偏差为5cm，眼底不应超开挖断面轮廓线10cm，装药量根据 开挖爆破效果进行调整。由指导施钻人（或测量组）画出周边眼的间 距，用红铅油画出炮眼位置。施钻人员按测量组划线位置施钻。 2、钻眼，周边眼严格控制外插角，一般开挖进尺在3米以内，外插角 斜率控制在0.5以内，即两茬炮之间接茬处的错台不得大于10～15cm； 进尺大于3米时，外插角斜率应控制在0.5～0.3以内，即两茬炮之 间接茬处的错台不得大于15～9cm；外插角的方向应与该点轮廓线的 法线方向一致，钻眼时要求眼药打直、打平、打到同一个垂直面。 3、隧道不应欠挖，特别注意拱顶、拱墙、墙脚以上1m内断面严禁欠挖。 4、仰拱开挖不应欠挖，平均线型超挖控制在5cm以内。 5、掌子面测量划线中线允许偏差5mm，标高允许偏差1cm，轮廓线允许 偏差3cm。 六、超欠挖奖罚办法 1、隧道开挖每循环进行考核。由测量组做开挖断面，与技术交底开挖 断面进行比较，计算出线性超挖量，并用红铅油标出超挖部位，上报 工地主管领导。根据开挖断面检查表对开挖班进行奖罚，奖金由开挖 班人员分配，罚款由超挖部位施钻人员承担，若罚款分不下去由开挖 班负责人承担。 2、仰拱每组进行考核，领工员现场指挥开挖，由技术人员验收时，做 开挖断面，并与交底开挖断面进行比较，计算出超挖量，据此对领工 员、挖掘机司机进行奖罚，奖罚金额由挖掘机司机、领工员各一半， 若罚款无法执行，由现场领工员承担。 3、测量组每循环中线、标高、轮廓线由质检人员复核，检查是否超出 允许偏差范围，据此对测量人员进行奖罚，奖金由测量组按比例分配， 罚款按责任比重承担，罚款分不下去，由测量组负责人承担。
武吉高速C1标坪山隧道 隧道超欠挖测量程序 右线： 主程序：SDCQW Fix m： Lb1 0：｛X,Y,Z｝：Pol((X-3103433.079),(Y-484177.6871))： A=J：A＜ ⊿ A＜239°57′53.45“ZXD” ＜246°19′32.92“HHQXD”“YQXD” ⊿⊿ ：Prog “SQX” Q=Q-4.875×0.02+1.606：｛B｝：B“WY” ⊿⊿⊿⊿ Pol((X-C),(Y-D))：J＜ ⊿ J＜⊿ C=C+4.875cosJ：D=D+4.875sinJ：Q＞)：J＜ ⊿C=C-2.5cosJ：D=D-2.5sinJ：R=R+2.5⊿ L=√((X-C)2+(Y-D)2+(Z-Q)2)：E“PC”=L-R◢ Goto 0 说明： 1、E：“PC”表示偏差值，正值表示超挖，负值表示欠挖。超欠挖均针于开 挖轮廓线。 2、C：表示圆心点的X坐标；D：表示圆心点的Y坐标。 3、Q：表示圆心点的Z坐标。 4、B：“WY”表示围岩级别。5级，B=5；4级，B=4；以此类推。 子程序：ZXD Pol((X-3102417.42),(Y-482421.004))：J＜⊿ F=(183°21′21″-30°12′47″)-J：L=Icos(AbsF)：K=174032.177+L◢ C=3102417.42+Lcos153°08′34″：D=482421.004+Lsin153°08′34″ 说明： 1、C：表示对应设计线上点的X坐标； 2、D：表示对应设计线上点的X坐标。 子程序：YQXD O=270°10′21.95″-A:L=2025×O/180×π: K=172964.357+L◢C=3103433.079+2025cosA:D=484177.6871+2025sinA 子程序：HHQXD O=A-239°57′53.45″：S=O÷6°21′39.47″×225： K=174032.177-S ◢C=S-S∧5÷(40×20252×2252):D=S∧3÷(6×2025×225): A=tan-1(D/C):L=√((D2+C2):C=3102417.42+Lcos(333°08′34″+A): D=482421.004+Lsin(333°08′34″+A)
5800缓和曲线程序清单 Deg:Fix4:9→DimZ “XJD=”?C:”YJD=”?D:”FWJ=”F:”ZXJ=”?K:?R:”LH= =”?W:”ZHLC=”?M “P=”:L2/(24R)-L∧(4)/(2688R∧(3)) →P◢ “Q=”:L/2-L∧(3)/(240R2) →Q◢ “E=”:(R+P)/(cos(Abs(K))/2) →E◢ “T=”:(R+P)tan((Abs(K))/2)+Q→T◢ “S=”:(л/180)*R*(Abs(K))+L→S◢ If F≥180:Then F-180→Z[1]:Else 180+F→Z[1]:IfEnd C+T*cos(Z[1]) →Z[3] D+T*sin(Z[1]) →Z[4] Lbl 1 “CDLC=”?Z “LJK=”?V Z-M→U If K≥0:Then V→Z[2]:Else (-V)→Z[2]:IfEnd If Z[2]≤0:Then Z[5]→Z[2]:Else If U<0:Then Z[5]→Z[2]:Else If U≤L:Then Z[2]+(U/L)*W→Z[5]:Else If U U 卡西欧5800 程序 (完整版) 说明：本程序适用于公路、桥梁、隧道测量。本程序简单、方便、快捷、拓展功能宽，使用时只需按曲线要素表输入一次就可以计算整条线路（包括高程、超高段横坡），能正、反算，在已知坐标下可以反算出该点桩号及相对宽度，拓展功能有，放边、仰坡、隧道断面测量、开挖轮廓线等。 主程序:MAIN ＂ZH（θ） F（１）＂M↓ (0为正算、1为反算) If M=θ:Then ＂ZHUANG HAO＂A：＂KUAN DU＂W:Else＂Ｘ＝＂H：＂Ｙ＝＂W:＂Ｚ＝＂Ｑ：IfEnd↓ (第一个交点参数) (交点桩号)…→P:(切线长度)…→T:(曲线总长)…→S:(圆半径)…→R=:(缓和曲线长)…→L:(第一方位角)…→U:(第二方位角)…→V:(交点X坐标)…→N:(交点Y坐标)…→E:(第一直线长、无为0)…→D:(第一坡度)…→Z〔8〕:(第二坡度)…→ Z〔9〕: (缓和曲线超高段长度)…→Z〔10〕:(曲线偏向,右偏为+1,左偏为-1)…→K ↓ If M=θ:Then If A ………… (最后一个交点参数) If M=θ:Then If A>P-T+S+D:Then Goto 1 :IfEnd:IfEnd↓Prog＂ZFXZ＂↓ If K=θ:Then goto 2 :IfEnd↓ Lb1 1：＂NO TASK＂↓ Lb1 2：If M=1:Then If A=1:Then ＂ZHUANG HAO＂:Z◢＂SJ KUAN DU＂:B◢ IfEnd:IfEnd↓ ＂-------END-------＂ KUAN DU （拓展功能程序，用于反算） 1→Ｍ:Prog＂MAIN＂↓ Z→A:W→E:θ→W↓ Prog＂GAO CHENG＂↓ E→W↓ Q-F→P↓ If P≤……(从小至大):Then ……→D:Goto 1:IfEnd↓……(同上) Lb1 1↓ ＂……＂:D◢ (同上) ◢ ＂----------END---------＂ YUAN 3.GL-LUNKUO 超欠挖主程序（最快版……里程精度要求高） Lbl 0 ?P:P→L:Prog“GLZUOBIAO-1”↙ ?X:?Y:?C↙ Pol ((X-S),(Y-T)):If V>180:Then V→V:Goto 1:Else V+180→V:Goto 1↙ Lbl 1↙ “L=”:I×cos(J-V)+L→L◢ Prog“GLZUOBIAO-1”↙ Pol ((X-S),(Y-T)):If V>180:Then V→V:Goto 2: Else V+180→V:Goto 2↙ Lbl 2↙ “FAJU=”:I×s in(J-V)→T◢ “LICHENG=”:I×cos(J-V)+L→L◢ Goto 3↙ Lbl 3↙ If L<1156000:Then Abs(7.725-T)→T: Goto V:Else Abs(7.725-(-T))→T: Goto V:IfEnd↙ Lbl V↙ If L≤156300: Then Prog“GC1”: Goto A: Else Goto Z: IfEnd↙ Lbl Z↙ If L≤160000: Then Prog“GC3”: Goto A: Else Pros“GC2”:Goto A: IfEnd↙Lbl A↙ If C≥H+1.55: Then Goto B: Else Goto C: IfEnd↙ Lbl B↙ If tan- 1((C-H+0.43)÷T)-45≤0: Then Goto D: Else Goto E: IfEnd↙ Lbl D↙ “GBR=”:√((C-H-1.55)2+(T-1.98)2→R◢ ( √为开方符号) Goto 0↙ Lbl E↙ “GZR=”:√((C-H+0.43)2+T2 )→R◢ Goto 0↙ Lbl C↙ If tan- 1(Abs(H+1.155-C) ÷(T-1.98))≤-19.80138≤0: Then Goto F: Else Goto G: IfEnd↙ Lbl F↙ “BQR=” : √((H+1.55-C) 2+(T-1.98)2 ) →R◢ Goto 0↙ Lbl G↙ If tan- 1(T÷(H+23-C))-15.13444≤0: Then Goto H: Else Goto I: IfEnd↙ Lbl H↙ “YGR=”: √(T2 +(H+23-C) 2→R◢ Goto 0↙ Lbl I↙ T-6.2139→M◢ “R=”:√(M2 +(H-C+0.0255) 2)→R◢ Goto 0↙ 一、QXFY 辛甫森公式放样程序 1. “X0”? U：“Y0”?V 2. “XA”? A：“Y A”? B：“CA”? C：“1÷RA”?D：“1÷RB”?E： “KA”?F：“KB”? G 3. Lb1 1：“KI”?H：“JJ”?L：“Y+Z－”?R 4. If H>G Or H 公路隧道超挖原因分析及预防、控制措施 1. 公路隧道超挖原因分析 公路隧道超欠挖是指已设计的隧道开挖轮廓线为基准线，实际开挖获得的断面在基准线以外的部分称为超挖，在基准线以内的部分则称为欠挖。超欠挖通常是由于岩体结构面和开挖临空面的不同组合产生，在隧道开挖过程中，爆破开挖将引起关键块体优势面的抗剪强度小于其滑力时，关键块体就会塌滑或塌落，形成超欠挖。 通过对我们正在施工的望安高速公路隧道超欠挖情况调查对超欠挖产生的原因进行分析，得出超欠挖的引起主要受岩体地质条件及开挖施工两大因素影响。 1.1岩体工程地质条件影响 在爆破开挖过程中，节理特征是影响超欠挖的一个主要因素，这其中包括节理的方位、间距、节理的填充物、岩体的强度以及地应力条件等。 1.1.1节理的产状：与隧洞开挖边界相关的节理的产状是在爆破开挖过程中影响的主要因素之一。当节理或断层的走向与隧洞的轴线接近垂直时，其对超欠挖的影响较小，而当节理的走向近乎平行于隧洞的轴线时，对超欠挖的影响较大。当节理走向与隧洞的开挖建议线接近平行进，开挖时岩体将沿节理破裂，而不会沿着原设计的边界线破裂，两组节理的组合将会增大超挖现象的机会，在三组或更多组节理的组合下，这种现象将会增加的更强。 当岩层近水平方向上成层发育，而节理垂直发育时，大方量的超欠挖将会在隧洞开挖过程中出现。水平方向的节理将使隧洞顶部变得比较平，倾斜的地层或节理可以改变隧洞的开挖边界的形状，使得隧洞不能形成对称的形状，这样可能造成大方量的超欠挖现象的出现。 1.1.2节理间距：节理的间距与岩体超欠挖密切相关，对节理比较密集的岩体进行开挖要通过爆破的方式，同时不出现超欠挖现象是十分困难的，而大块的岩块则比较容易产生大 fx 5800 隧道超欠挖计算程序 隧道超欠挖计算程序 正算主程序(ZS)： Lb1 0：?S：?Z：Prog“PM-SJ”：Abs(S-O)→ W：Prog "SUB1"："XS="：X◢"YS="：Y◢F-90→F:S→ K:Prog“SQX”：“H=”：H◢Goto0 反算主程序(FS) Lb1 0: ?S：?X：？Y：Prog“PM-SJ”：X→ I：Y→ J：Prog "SUB2"："S="：O+W→S◢"Z="：Z◢ S→ K:Prog“SQX”：“H=”：H◢Goto0 隧道3心圆放样主程序（CQW） Lb1 1：Fix3:7.315→R：6.19→P:“H 1”?F:?Z:F-H→F:Abs(5.72-Z)→Z If F≥6.319:Then √(Z2+(F-0.715)2 )-R→W:IfEnd: If F≥1.577 AND F＜6.319 Then √((Z-0.723)2+(F-1.577) 2)-P→W:IfEnd: If≤1.577: Then Z-(P+0.723)→W:IfEnd: “W=”: W◢ Goto1 R----第一个圆圆心 P----第二个圆圆心 F----实测高程 H----路面纵断设计高程 Z----由反算主程序反算得到边距（不需修改） 程序中右线输入Abs(5.72-Z)→Z，左线输入Abs(5.72+Z)→Z CQW----计算结果（+超，-欠） 隧道二衬断面检测主程序（CQJC） Lb1 1：Fix3:6.625→R：5.5→P: “H1”?F:?Z:F-H→F:Abs(5.72-Z)→Z If F≥5.79:Then √(Z2+(F-0.715) 2)-R→W:IfEnd: If F＜5.79 Then √(Z-0.723)2+(F-1.577)2)-P→W:IfEnd: “W=”: W◢ Goto1 R----第一个圆圆心 P----第二个圆圆心 F----实测高程 H----路面纵断设计高程 Z----由反算主程序反算得到边距（不需修改） 程序中右线输入Abs(5.72-Z)→Z，左线输入Abs(5.72+Z)→Z 1fx－5800P计算器编程 缓和曲线程序 14→DimZ ：“ZHK”：?K：?R ：? A：?L：? T：? F：“Y＋1，Z－1”：?P：“JDX”：?Q：“JDY”：?W：180÷（πR）→Z：0.5L－L^3÷(240R2)→Z[8]：“LZ”：ZL÷2→B：A÷Z＋L→Z[13]◢ “ZHK=”：K◢ “HYK=”：K+L→Z[1]◢ “YHK=”：K+ Z[13] －L→Z[2]◢ “HZK=”：K+ Z[13]→Z[3]◢ “ZHX=”：Q+Tcos(F+180)→U◢ “ZHY=”：W+Tsin(F+180)→V◢ “HZX=”：Q+ Tcos(F+PA)→Z[6]◢ “HZY=”：W+ Tsin (F+PA)→Z[7]◢ Lb1 0：“CDZH”：?M If M≤K：Then Goto 6：Else If M≤Z[1] ：Then Goto 1：Else If M≤Z[2] ：Then Goto 2：Else If M≥Z[3] ：Then Goto 7：Else If M≥Z[2] ：Then Goto 5：If End：If End：If End：If End：If End Lb1 1：M－K→G：√（（G－G^(5)÷(40L2R2)＋G^(9)÷(3456R^(4)L^(4)))2＋(G^(3)÷(6RL)－G^(7)÷(336R^(3)L^(3)) ＋G^(11)÷(42240R^(5)L^(5)))2）→D F＋PZG2÷(6L)→C：F＋PBG2÷L2→H：Goto 3 Lb1 2：M－Z[1]→G：R（1－cos（B＋ZG））＋L2÷（24R）→Z[9]：√（Z[9]2＋（Rsin（B＋ZG）＋Z[8]）2）→D F＋Ptg-1(Z[9]÷(Rsin(B＋ZG)＋Z[8]))→C：F＋P(B＋ZG)→H Lb1 3 “X=”:U＋Dcos(C)→X◢ “Y=”:V＋Dsin(C)→Y◢ Lb1 B：“ZBJS1，FY－1”：?J If J>0：Then Goto 4：Else If J〈0：Then Goto A：If End：If End Lb1 4：“ZB”：?S “ZBX”:X＋Scos（H－90）◢ “ZBY”:Y＋Ssin（H－90）◢ “YB”：?N “YBX”:X＋Ncos（H＋90）◢ 隧道超欠挖控制办法 开挖是隧道施工中的关建工序。超挖过多、不仅因出渣量和衬砌量增多而提高工程造价，而且由于局部超挖会产生应力集中。影响围岩稳定性。欠挖则直接影响衬砌厚度、处理起来费时、费力、所以隧道开挖必须控制好超欠挖，以利于下道工序的正常进行。 超欠挖的概念及允许值 隧道超欠挖是以设计的隧道开挖轮廓线为基准线，实际开挖获得的断面在基准线以外的部分为超挖，在基准线以内的部分则称为欠挖。如下图： 在《铁路隧道施工规范》（TB10204-2002）中对超欠挖有如下规定：隧道不应欠挖，当围岩完整、石质坚硬时，允许岩石个别突出部分（每1㎡不大于0.1㎡）侵入衬砌。对整体式衬砌，侵入值应小于衬砌厚度的1/3，并小于10㎝；对喷锚衬砌不应大于5㎝，拱脚和墙脚以上1m内范围内严禁欠挖。不同围岩地质条件下的允许超挖值规定见下表： 允许超挖值（单位：㎝） 注：本表适用于炮眼深度不大于3.0m的隧道。炮眼深度大于3.0m时，可根据实际情况另行规定 根据本隧道开挖现状，现就超欠挖控制特定办法如下： 一.开挖断面尺寸的确定； 隧道开挖断面应以隧道净空为基准。加上二衬厚度，初期支护厚度。考虑预留变形量，测量贯通误差和施工误差等因素适当放大。预留变形量可根据围岩级别、隧道宽度，埋置深度、施工方法和支护情况等条件，采用类比法确定，也可参考隧道收敛量测记录予以确定。如无以上资料可参考表1-1确定: 表1-1预留变形量（cm） 注:1. 开挖断面尺寸=隧道净空+二衬厚度+初期支护厚度+预留变形量。 二.开挖轮廓线放样: 在开挖过程中、轮廓线的放样非常重要。轮廓线就是“师傅”。我们现场放样一般采用“五寸台”法。现就“五寸台”法放样步骤及应注意的几点问题阐述如下： 放样步骤： 1.中线确定： 中线确定一般采用偏角法。 架镜—后视—拔角—测距—定中线 a角的取值根据后视点、架镜点及中线点所处位置不同而计算方法各不相同。（请参照铁路隧道施工技术手册上册） 2. 拱顶及底板确定： 用水准仪测三个平点（一个点必须在中线上），根据平点高程，拱顶高程及底扳高程算出其距离。量距定出拱顶及底扳。由于工作面凹凸不平、量距时应尽量做到钢尺垂直，如果不能则应根据钢尺的倾斜程度考虑其增量。 3. 轮廓线确定： 从拱顶沿中线每50cm定一个点。沿点向左右两边量其距离定出其轮廓点。量距时一定要注意尺子要水平。把所有的轮廓点连起来就定出了轮廓线。 应注意的问题： 1. 由于隧道内施工车辆很多、为了防止对导线点及中线点的破坏，不但要将控制点按规定要求埋置，还应设有明显标志及保护措施。应定期对控制点进行复核测量。 2.所有放样过程都要施行“双检”制。 3.量距时钢尺一定要垂直或水平，做到准确无误。 三、提高钻孔技术水平 1）钻孔技术对隧道超欠挖的影响主要是周边炮孔的外插角θ、开口位置e 和钻孔深度L。它们与超欠挖高度有如下的关系：h=e+Ltan(θ/2)。该式表明随外插角θ和钻孔深度L的增大，h也随之增大。θ和L主要取决于司钻人员的操作水平和所采用钻机的某些性能，为确保控制θ和L，一定要努力提高司钻人员的操作水平和责任心。 5800全线任意坐标计算程序 1. 正算主程序(ZHCX) （不运行） 8→DimZ 1÷P→Z[4 ]：(P-R)÷(2HPR)→D: 180÷π→E “Z=”?Z:”YJJ=”?A:Abs(S-O)→W 0.26→Z[1 ]: 0.74→B: 0.02→K: 0.82→Z[3 ]: 1-Z[3 ]→F:1-K→Z[2 ] U+W(Z[1 ]cos(G+QEKW(Z[4 ]+KWD))+Bcos(G+Z[3 ]QEW(Z[4 ]+ Z[3 ]WD))+Bcos(G+QEFW (Z[4 ]+FWD))+ Z[1 ]cos(G+ Z[2 ]QEW(Z[4 ]+ Z[2 ]WD)))→X: V+W(Z[1 ] sin (G+QEKW(Z[4 ]+KWD))+B sin(G+ Z[3 ]QEW(Z[4 ]+ Z[3 ]WD))+B sin(G+QEFW (Z[4 ]+FWD))+ Z[1 ] sin(G+ Z[2 ]QEW(Z[4 ]+ Z[2 ]WD)))→Y： G+QEW(Z[4 ]+WD)→F：X+Zcos(F+A)→X：Y+Zsin(F+A)→Y:If F≧360:Then F-360→F:IfEnd ”X=”:X→X◢ ”Y=”:Y→Y◢ If F﹤0:Then F+360→F:IfEnd ”QX FWJ=”:F▼DMS◢ “C=1=>XX: C=2=>XZ”: ”C=”?C: ”QHJU=”?L: If C=1：Then Goto 1:Else Goto 2: IfEnd 可以计算斜交斜做或斜交正做的桥涵坐标 Lbi 1 X+L cos(F)→X：Y+Lsin(F)→Y: Goto 3 Lbi 2 X+L cos(F+A-90)→X：Y+Lsin(F+A-90)→Y: Goto 3 Lbi 3 “QH-X=”: X →X◢ “QH-Y=”: Y →Y◢ Prog “FY” 2 . 参数子程序（直接运行） M(主线) 一条线路一个名称 “S=”?S If S≦线元终点：Then 线元起点X值→U: 线元起点Y值→V:线元起点切线方位角→G:线元起点桩号→O:线元长度→H：线元起点半径→P：线元终点半径→R：（左偏-1，或右偏 1）→Q:Goto 1:IfEnd … … If S≦线元终点：Then 线元起点X值→U: 线元起点Y值→V:线元起点切线方位角→G:线元起点桩号→O:线元长度→H：线元起点半径→P：线元终点半径→R：（左偏-1，或右偏 1）→Q:Goto 1:IfEnd Lbi 1 Prog “ZBJS” 3. 放样程序（FY）（不运行） “X0=”?M:“Y0=”？N Pol((X-M, Y-N) 隧道的施工放样程序及CAD计算超欠挖量 隧道测量的程序及运用： 在测量隧道中由于时代的变化、科学的进步，我们运用的计算工具也在不断的变化。在如今我们测量工作中一般运用的是CASIO4500、4800、4850等型号的科学计算器还是一种有编程功能的计算器。 在隧洞测量时测量人员要根据现场的要求来进行编程，边角程序如： 边角后方交会 BJHFJH 说明： 1、测边的已知点作为P1（A,B），未测边的已知点作为P2（C,D）。 测边对角为锐角时K=1，测边对角为钝角时 2、K=-1。 3、角度P是以测边方向为起始方向，顺时针观测另一个已知点方向的右角。 注：理想图形要求实测的S边相对于已知边P1P2越短越好，角P越接近180°越好。 坐标反算 ZBFS W=W+360 说明： 1、本程序用于计算直角坐标值已知的两点间的边长和坐标方位角。 2、起算点和目标点的坐标分别为（A，B）、（C，D）。 3、起算点改变时应重新调用程序以改变A、B的值。 4、边长值和方位角值分别自动存放在“V”和“W”中。“W”的单位为：度“°”。 隧洞断面图如上的程序如下： 直线断面放样程序（2） ZXFY2 W= 说明： 1. 本程序用于计算直线段的如图断面样式的隧洞程系放样程系。 2. 坐标A,B,H,是测算出来的坐标数据。 3. 已知的坐标X,Y是从图纸上的起算点坐标。 4. J是方位角，是隧洞的轴线方向。 5. M是偏中，V是实际高程，W是实际测量出来的顶拱位置。后方交会3HFJHCX J=J+0.01 J=J+0.01 J=J+0.01 1、本程序用于利用3个合适的已知点进行方向后方交会法计算测站坐标。 2、观测、计算时将3个已知点按顺时针方向对应排列，已知点的直角坐标分别为（A，B）、（C，D）和（E，F）。对应3个已知点的方向值分别为O、P、Q。 3、L3至L9行的作用是当两相邻方向间的夹角出现直角或平角时将导致不能计算时进行自动处理。 4、为提高解算精度和防止错误，宜尽可能使测站点与3个已知点组成较理想的图形，如采取测站点靠近3个已知点组成的三角形的中心区域、避免出现“危险园”图形和增加已知点组成多组后交图形比较计算等措施。 5、当已知点发生变化应重新调用程序。 边角后方交会 （Filename）9BJHFJH (以下程序是专业人士编写，本店铺不对程序负责，仅供您参考使用。) fx5800p隧道测量超欠挖计算程序 曲线：QXLK “ZF”？U:“RP”?O:“ZY”? K:D“X 0”?D:E“YO”?E :?V:?H:?B:?R:?M:?N:“OZ-ZXX”?A:“R1”?P:“R2”？Q←┘ Lb1 8←┘ ?X:?Y←┘ Pol((X-D)，(Y-E) )) ←┘ “S ”:= -V(I-O)=→S ◢(字母O) “L ”:=K+πOsin-1 (sin(90+V(J-U )))÷180→L◢ RAbs(N-M)÷2→T←┘ B-L→C←┘ 1→F←┘ IF M＞N:Then-1→F:THEND←┘ IF L＜B-T:Then Goto 1:ELSE IF L＜B:THEN Goto 2:ELSE IF L＜B+T:THENGoto3: ELSE IF L＞B+T:THEN Goto4:IFEND: :IFEND: :IFEND: :IFEND←┘ Lb1 1←┘ “G ”:=H-CM→G◢ Goto5←┘ Lb1 2←┘ “G =”:H-C M +F(T-Abs（C)2÷（2R）→G◢Goto5←┘ Lb1 3←┘ “G= ”:=H-C N +F(T-Abs（C)2÷（2R）→G◢Goto5←┘ Lb1 4←┘ “G=”:H-CN→G◢ Lb1 5←┘ ?Z←┘ IF Z＞G+5.92:THEN Goto6:ELSE Goto7:IFEND←┘Lb1 6←┘ “W=”:√(S2+(Z-G-3.1) 2)-P→W◢ Goto8←┘ Lb1 7←┘ “W=”:√((A+Abs（S)2+(Z-G-1.7) 2)-Q→W◢Goto8←┘ 说明： Z F？方位角 RP？半径 ZY？圆曲线起点桩号 X0？圆心X坐标 Y0？圆心Y坐标 CASIO fx-4800P、fx-5800P型计算器用于线路施工 曲线中线点坐标的计算程序 中铁十局三建公司工程技术部 摘要：本文介绍了CASIO fx-4800P 、fx-5800P型计算器程序编制用于铁路、公路曲线线路内任意中线点的坐标计算程序及使用方法。本计算程序具有操作简便、计算快捷、应用广泛等特点、极大地减轻了测量工作者的内业工作量，对于测量工作者有较大的参考和指导作用。关键词：曲线线路施工测量计算程序 1．概述 过去，线路中线施工放样基本依靠经纬仪和钢尺了来进行角度及距离测量。对于曲线线路一般的测量方法是：经纬仪置于某一中线点上，采用偏角法拨角再用钢尺量距来定出中线点。随着电子技术进步和经济发展，测量仪器和测量方法的不断改进，目前，全站仪已广泛地应用于工程施工测量中，极大的提高了测量工作效率。但是，在进行铁路、公路工程的曲线线路施工测设时，需要在线路所在区域建立统一坐标系或独立坐标系，利用坐标变换的方法，将整个曲线的三个部分（第一缓和曲线、中间圆曲线、第二缓和曲线）统一到同一坐标系中。根据坐标系的建立，计算出整个曲线内任意点的坐标，再采用全站仪利用极坐标方法进行施工放样。前提是首先利用计算器计算出各中线点坐标，然后才能进行放样。而普通型计算器不仅计算速度慢，且要求计算者必须正确地记忆很多计算公式，计算繁琐而且容易出错，满足不了现场测设工作的要求。为了能够快速准确地为全站仪提供测设 数据，发挥全站仪快速测设的特点，提高测量工作效率，应采用可编程的计算器，编制计算程序。本文主要介绍应用CASIO fx-4800P型计算器的计算程序，供公司测量同行们参照使用。 2．计算程序 QXZBJS（文件名：曲线坐标计算fx-4800P） Defm2:R：L：A：N“ZH：X=”：E“ZH：Y=”：F：“FWJ=”：K“ZH：LC=”： P=L2/(24R)-L4/(2688R3):M=L/2-L3/(240R2):T“T”=（R+P）tng(A/2)+M ◢G=RAπ/180：“S”S=G+L◢ LbiA：｛C，V｝：C“CSDLC=”：V“HXPJ=”：D=C-K：D≤L＝＞I=D-D5/（40R2L2）：U=D3/(6RL)-D7/（336R3L3):J=√（I2+U2）：Goto1：≠＞D≤G＝＞O=90（2D-L）/( Rπ)：I=RsinO+M：U=R（1-cosO）+P：J=√（I2+U2）：Goto2：≠＞D=S-（C-K）： = D-D5/（40R2L2）：Z[2]=D3/6RL-D7/（336R3L3）：I=T+（T-Z[1]）cosA-Z[2]sinA：U=（T-Z[1]）sinA+Z[2]cosA：J=√（I2+U2）：Goto3：Lbi1:{Q}:Q“Z=1；Y=2”：Q=1＝＞Q=F-30D2/ （RLπ）：H=F-90D2/ （RLπ）：≠＞Q=F+30D2/ （RLπ）：H=F+90D2/（ RLπ）⊿ Goto4：Lbi2:{Q}:Q“Z=1；Y=2”：Q=1＝＞Q=F-tng-1(U/I)：H=F-O：≠＞Q= F+tng-1(U/I)：H=F+O⊿Goto4：Lbi3:{Q}:Q“Z=1；Y=2”：Q=1＝＞Q=F-tng-1(U/I):H=F-(A-90(S-(C-K))2/ （RLπ）): ≠＞Q= F+tng-1(U/I):H=F+(A-90(S-(C-K))2/ （RLπ）):⊿ Goto4： Lbi4:B=90+H:H＜0＝＞H“QXFWJ”=B+360◢≠＞H≥360＝＞H“QXFWJ”=H-360 ◢≠＞H“QXFWJ”=H◢⊿Goto5： Lbi5: X“CSD:X”=JcosQ+N+VcosB◢ Y“CSD:Y”=JsinQ+E+VsinB◢卡西欧5800基本测量程序(完整版)
5800 隧道超欠挖程序(超级快速正确版)
CASIO fx-5800P实用工程测量程序
隧道超挖原因分析及预防措施
fx 5800 隧道超欠挖计算程序
卡西欧fx-5800计算器缓和曲线编程
隧道超欠挖控制办法
5800简单全线坐标计算程序
隧道的施工放样程序及CAD计算超欠挖量
FX5800P计算器 隧道测量超欠挖计算程序
CASIO fx-5800p测量程序
相关主题
文本预览