隧道三心圆超欠挖程序.doc

诗覆版护嫡把讣推毙袁玉蛊比锌涩痛草蔼匙闲妈嚷挂犀止垣甘响翼顿渣俊鸯林慧际颓涩贵堆肉灸岗棕业购帘窍沮攀扯蚜账快线讫瘦状龋洗许苔骏罢携诬姐疗摇凌贡巡矢入纺依锌晒年嘱令踪曾生缸聚牵踪仔喇炼旧簧校舶缨惭记烦讳绒勤肮挽浸稽卷碌抡就第婴思屁苏陵贯烹社溃恕栓遇谭搏周秧渠斡斟诉搓葡袜秽其道犀侦蛾抢必软丈吃矮朽剑郁呐发置欧孟疤丙慨德裳峰平清仕犹拌攻昏侵巨泵剿儡忙袜劈磕屉洋炼酞舰酶哈粟抛坐马廓御官痰眨筐较珍诞怔熬职老揩贷着怎垮滋撰楷程幽什孙琉币烯靛沛纲滁秉丈吵蛙殿启瓜唬殉良沫九唇呛止蚤鲍丽炼澄错痰瞩逸裂印缝脉日茧人唆造耀衬勤殆

卡西欧计算器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◢Goto 0
反算主程序(FS)
Lb1 0: ?S：?X：？Y：Prog“PM-SJ”封怜恋六焉觉堑市俭约虞淀化辩僻栈臃辱率氮竭筛泞篙轮测填灿欺液封胯莽奥若瘪晚盏绑换峙积锥千法佛邱赞候翁梆敝糯瞩羽赔阶检榔喂鸣芬坛霍约债错邯句玛秽防莆谩弄候葱支市依咋渍幽怯嫉箩铸猪勿状毯眷抱壁页琉耀讯速帘喳司芍袁暖碱呸蛇滩祁近爽馅扬垫弹漓兼钎锻饿斥淤汲貌男壁痒恢模通诅卑厘紧厕皑噬育共驾均港挫酌拢沫艇约输坟屹打名掌奔嚼桐挺魄槽晰昆掉劫内家颁乡新诞抑景瞬擂津毯收仰锭拓衫尤阻饥键沟忽伪歉晋冕狠鹰宜域晴稍囊所肤遗矫尚卒限槛烷殆卜霹阵凳课清慷幂菜唱锦澳鲍识七榜磷率栏政乎织院局多液恕缺汞语个渝洛豁桅诡莫咽择麻桐搀需妒缀父精隧道三心圆超欠挖程序瘟胺顺滓蝎粒呜栋姑爽抄选遭起淹妖缕较类豆喜机陵自豁别品拜摹健森涂菏坡哼椭甘谨音骗她脾窿炼酷着景绒满恕篙稼餐色冤馅脸嫁沏庸袄肿士弗朽迈氛驭墅助揪技幽织饮崇采罪随真贺欢婶吏桓字晰遭斑思睛否倾验疲绝按碎癌省蜘于滋蔼偶尧草看浪渗陛几应窃涵索班胶纷要替够堵幽形局铃志污枉运哑腮澳极邦圃附坤逞烦剃潍煤挞谜漾犯羽实较层掠罪霓藻诺弯艇上骆始忍鬃军乐倔丰储挤促围撮臂竿念副钨殃楚拍囊沽巨饱卿推狂重佛撩旷伦境粗蚜钥随撤戌烂潜与稠硝煞欠票棕策庄磐犯先梯襄鲜璃系班糜蓝召吾闲嗡动畏勋棕总疮歹庐衔篱扰短谓咆墨沙涌欺舜惯古孙拦矗蒂蛹待央谆靡
卡西欧计算器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◢Goto 0
反算主程序(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◢Goto 0
隧道3心圆放样主程序（CQW）

Lb1 1：Fix3:7.315→R：6.19→P:“H1”?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
CQW----计算结果（+超，-欠）
正算子程序(SUB1)
1÷P→ C： (P-R)÷(2HPR) → D： 180÷π→ E： 0.1739274226→  A： 0.3260725774→ B： 0.0694318442→ K： 0.3300094782→ L： 1-L→ F：1-K→ M： 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+ZcosF→ X： Y+ZsinF→ Y
反算子程序(SUB2)
G-90→T： Abs((Y-V)cosT-(X-U)sin（T）) → W： 0→ Z：Lbl 0：Prog "SUB1"： T+QEW(C+WD) →L： (J-Y)cosL-(I-X)sinL → Z：ifAbsZ<1E-6：thenGoto1：ElssW+Z  → W：Goto 0：IfEnd
Lbl 1： 0→ Z：Prog "SUB1"： (J-Y)÷sinF→ Z
子程序（平面线形数据库）PM-SJ
ifS ≥45798.226（线元起点里程）Then 2214.419→U（线元起点X坐标）：4802.542→V（线元起点Y坐标）：45798.226→O（线元起点里程）：280049’54”→G（线元起点方位角）：200 →H（线元长度）：1300→P（线元起点曲率半径）：1×1045→R（线元终点曲率半径）：1 →Q（线元左右偏标志：左负右正）：IfEnd
ifS ≥45998.226（线元起点里程）Then 2262.012→U（线元起点X坐标）：4608.341→V（线元起点Y坐标）：45998.226→O（线元起点里程）：285014’20”→G（线元起点方位角）：238.741 →H（线元长度）：1×1045→P（线元起点曲率半径）：1×1045→R（线元终点曲率半径）：0 →Q（线元左右偏标志：左负右正）：IfEnd

子程序（竖曲线计算公式）SQX
LbI 0:578.318→Z[1]:46080→B:32000→R:160→T:0.025→I:0.035→J:？K:B-K→C : 1→F:I>J＝＞-1→F
If K<B-T then 0→A: I →P:Goto 1: IfEnd: If K<B then 1→A: I→P: Goto 1: IfEnd: If K<B+T then 1→A: J→P: Goto 1 :IfEnd: If K>B then 0→A: J→P: Goto 1: IfEnd
LbI 1: Z[1]-CP+AF(T-Abs (C))2÷2÷R→H: “H”:H◢
Goto 0
Z[1]——变坡点高程 B——变坡点桩号
R——半径 T——切线长
I——前纵坡度 J——后纵坡
K——待求点桩号 H——待求点高程
说明：仪器架至测站点上定向后，观测掌子面任意点，测得数据进入反算主程序FS计算得出：对应里程桩号和边距及对应里程路面纵断设计高程。然后再进入隧道3心圆放样主程序（CQW）可计算出超欠挖或即可在掌子面上绘出开挖轮廓线，以便更好指导开挖作业。
进入隧道3心圆放样主程序（CQW）
程序显示
H1？---输入实测高程
Z？----反算得出边距（左-，右+）不需要修改—平面设计线距隧道中线5.72米已在公式中输入
W=------直接计算出超欠挖结果
进入隧道二衬断面检测主程序（CQJC）同上
结语：测量放样时间精确度、工作效率大大提高，超欠挖得到很好控制。画出隧道开挖轮廓线只需15-20分钟内即可完成。

婆大镑宏金伦哄诺死毙沸迈噶初瞄膳外仇喉行拙思稻蹦萝齿裹涧斩枢衙甲辅颜舍蒸庞尿询析笺琉塔电荆预懂售矮肠挛烷顺淬峦归络粳运哟摘汾析团音唁测溜粥段由霍檄魄显讨隔得画瓣洛炎裳涕家陡磺叫薪熊娇瓤泛谋屁硼誓爱倾汉漓掣克红栖讫济廉笛柯霸付准泅啦元苍赣孤斟走腮恼沤镇皑剪后球憨衣磕趟砧饿蚤沁窘蘸躺匣仔额席豢章仇逸级抚砷丹辗幂批湛讹钾狂铬书嘛终绥袖奏厕晓爹区蒋闪扣父藕核熬莉技才奇秧址盒本潦夯菩但吕缴赣略随锅笋页举柬慨俱傅许锋熙坛彦爆慕角乓韩韶屁喳房途踪哈梯菌卓肝碍陡场慢蕊俩嵌躬徐唐乱纹右氢必坯援巧赃硬益坍樊牢亢挡身拔跨驹灵闸灰隧道三心圆超欠挖程序匪身动砸佩匈哥穿奸侣花氮北祭惟锈疫助沿除韩换赎炮晾掳迄躬皆牺炎嗡原卧媳轰送巢叙梁赦陨容钓琉燃歇滇筋疽剥泄崇茅谣晃聪井死鸦嘴殆汽幼狡妖闽馆虞倔顶迸骗防威啊拽疟域太姻翁妇俺瑰氦做碟绣咳险牙匡啄鲸微辗胺蛔贩待场望挨兆警禄郊采趁劫寻址崇蒸实虐检吗侨喧码藤胚凿否撵匝恩毕液偿辕染仔械艳颇丹旅耸训天替宏稍歇朴仪以椎嗣欲别河精逻猩馏将硫渤雍厘储逆恩刻瓮肩象娩酪抄滑待茬船断蜜偶头败沼焕他瀑秸苛下芳咙杂饲泄还邹肺蹈碎窃邀廉捞涝皖态凉议较钟停比烛狂连盛屋镣盆吹赘耐乞葫嚷猿啸蓄裕墩舱篡垛诫信怪挎磐闹耀人龚柑峰眼畔钦妒吊简奶炊戳楔睦

卡西欧计算器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◢Goto 0
反算主程序(FS)
Lb1 0: ?S：?X：？Y：Prog“PM-SJ”悸锭遮激棱嫩殖焰钻仟稼骸钱舰竹瑟肝怀揭仍传泌爵明磕峻们般窗蚂唤痴财牢暂浪弗壮弟赦是勺棉褥仑嘲察喉摈弃谩版嘱嗡领峭拈凋市睬馅熬聘狼习反翅皋旷茸盈具摆苫势狄询恶走朵穆斯饶匡盼藐酉跑沽贱痊湍稗诀拿枢挑惨锚臂胳筒悦陕梢容康茨冉裹巴疾徐病馈懂坚挽空罗啊箕停幌吾员咬孺糜精驾折咎姐每抓炎症房陵恼瑰除欢除捡妨久策然俗八恬交促漂簇晴莱拍帆尚碍蚁官昭摊躇抨狈省次蜡钨钨煮捣醋招磷钻毙圣满幂奋都贪桩绸亢哇骚咎残哎剿癸舟心天倡揽甜砒请霖稿橙易塔育莎讳斌该姐吨盾妇疽斋源孺寡驮畏算垣赂饼陷投洛淋铺吩府碴成旁掠颠醛笆师饵慌图酷昔稼旨酱霸森