贵广铁路第八项目部隧道开挖放样程序(修改)FY??????????????主程序特别注明:本程序只适用于圆弧部分的放样不适用于下部直段边墙放样程序原理参考程序编制思路本程序经验证了一个断面的8个点超欠挖局存在为与正反算程序共用子程序做了局部修改10→DimZ:Fix 3:Deg: LICHENG= S: KWBJ=R= →Z[2]: Lbl 4: XZB= →B: YZB= →C:B→N: C→E
1. 主程序(TYQXJS)Lbl 4:1SZ => XY 2XY => SZN:S:ProgSUB0↙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(隧道超
5800坐标正反算以及隧道开挖线放样程序1-JIN YU(主程序)Lbl 4:1→ZS2→FS3→CQWNN=1=>Goto 1:N=2=>Goto 2:N=3=>Goto 3Lbl 1: K=S:P=Z:Prog SJ?-PM: Abs(S-O) → W:Prog SUB1-ZS: X=:Locate44X:Y=:Locate44Y:F-90→F:S→ K:ProgSJ?-GC:H=:Lo
123456789101112131415Created with an evaluation copy of Aspose.Words. To discover the full versions of our APIs please visit: :products.asposewords
线路坐标计算里程I=0:J=0:Lb1 0:{xyz}:LMXYZ:Pol(91628184-X,737237612-Y):J=J+180:N=7564628+∏+7060X(J-308-47-479)/180:E=7060-I+607Goto 1:Lbi 1:Pol(13000466-X,677503949-Y):J=J+180:Rec(I,J-38-47-479):N≤7564628=>N
隧道程序卡西欧计算器5800隧道正反算隧道超欠挖计算程序在隧道中的应用速度有点慢概述:本图采用蓝星版本程序隧道断面程序由三个子程序构成隧道正算具有三维坐标功能 隧道反算 隧道超欠挖检测程序其余均为子程序本程序还有许多需要改进的地方欢迎大家提供宝贵的意见有兴趣的可以把三个程序汇总本程序为三维坐标全能程序正在调试阶段期待和大家一起提高一起进步隧道超欠挖计算程序1.正算主程序1-SDZSL
正算主程序(ZS)FIX4:S:Z:Prog “PM-SJ”: Abs(S-O) → W:Prog?SUB1: XS=:X◢YS=:Y◢F-90→F(需要时可以让他显示):Prog“SQX-SJ”: Prog“SQX”:“H=”:H◢反算主程序(FS)FIX4: S:X:?Y:Prog“PM-SJ”: X→ I: Y→J:Prog?SUB2: S=:O+W→S◢Z=:Z◢Prog“SQX
曲线任意里程中边桩坐标正反算高程计算开挖半径计算程序1.正反算主程序(ZFS)Norm:Defm 3:L1.ZX2.YX:Z[1]=L: T 1.LDF=>XY2.XY=>KD:Z[2]=T:Z[2]=1=>Goto1△Z[2]=2=>Goto2⊿Lbl 1:{KIF}:KK=:IDP=:FANG=: Z[1]=1=>ProgZXP △Z[1]=2=>ProgYXP ⊿PorgSIM1:FI
[]fx?5800正反算边坡放样隧道超欠挖(正算主程序(ZS)FIX4:S:Z:Prog PM-SJ: Abs(S-O) → W:Prog?SUB1: XS=:X◢YS=:Y◢F-90→F(需要时可以让他显示):ProgSQX-SJ: ProgSQX:H=:H◢反算主程序(FS)FIX4: S:X:Y:ProgPM-SJ: X→ I: Y→ ?J:Prog?SUB2: S=:OW→S◢Z
5800正反算、隧道超欠挖程序doc正算主程序(ZS)Lb1 0FIX4:S:Z:Prog “PM-SJ”: Abs(S-O) → W:Prog SUB1: XS=:X◢YS=:Y◢F-90→F(需要时可以让他显示,不要时不必输入):Prog“SQX-SJ”: Prog“SQX”:“H=”:H◢Goto 0反算主程序(FS)Lb1 0FIX4: S:X:?Y:Prog“PM-S
违法有害信息,请在下方选择原因提交举报