CasioFX5800测量程序集

CasioFX-5800P测量程序集（博牙高速公路13标隧道）

1：Z S （坐标正算）

LBI 0 :〝XO〞?A :〝YO〞?B : ?D : ?F : 0→I : 0→J : Rec(D , F) :〝X=〞: A+I→X▲〝Y=〞: B+J→Y▲Goto 0

说明：A：基点X坐标。B：基点Y坐标。D：两点间距。F：从基点至目标点的方位角。

2 : F S (坐标反算，求两点间距及方位角)

LBI 1 : ?A : ?B : ?X : ?Y : 0→I : 0→J : PoL(X－A,Y－B) :〝D=〞: I→D▲

If J<0 : Then J+360→J :Ifend ：〝F=〞: J→F▲Goto 1

说明：A ，B ：起点的坐标。X ，Y ：目标点的坐标。

3：D – S (施工坐标，大地坐标之间互相转换)

〝XO〞?A : 〝YO〞?B : ?F : LBI 0 :〝N=1 . DD => SG , N=2 . SG => DD〞: ?N : ?X : ?Y : If N=1 : Then

〝XS=〞: (X－A) Cos(F)+(Y－B) Sin(F)+7000▲

〝YS=〞: (Y－B) Cos(F) －(X－A) Sin(F)+4.875▲

ELse If N=2 : Then〝XD=〞: A+(X－7000) Cos(F) －(Y－4.875) Sin(F) ▲〝YD=〞: B+(X－7000) Sin(F)+(Y－4.875) Cos(F) ▲

Ifend : Ifend : Goto 0

说明：A,B ：起点的坐标。 F :要旋转的方位角。

X,Y : 目标点的坐标。N=1 :大地转施工。N=2 :施工转大地。

4 : DMCX－MD ( 隧道断面程序)

LBI 0 : ?X : ?Y : ?H : Prog〝GC〞: If H≥G+1.533 :

Then Goto 1 : ELse If H≥G+0.13 And H < G+1.533 :

Then Goto 2 : ELse If H≥G－0.64 And H < G+0.13 :

Then Goto 3 : ELse If H < G－0.64 : Then Goto 4 : Ifend : Ifend :

Ifend : Ifend

LBI 1 :〝YUAN 1〞: POL(H－G－1.533 , Y) －6.3▲Goto 0

LBI 2 :〝YUAN 2〞: POL(H－G－1.533 , Y+2.5) －8.82▲G－H▲Goto 0

LBI 3 :〝YUAN 3〞: POL(H－G－0.302 , Y-4.594) －1.62▲Goto 0

LBI 4 :〝YANG GONG〞: POL(H－G－13.527 , Y) －15.62▲Goto 0

说明：X , Y , H : 为掌子面上任意点坐标。

5：B P （洞口边坡开挖计算公式）

LBI 0 : ?X : ?Y : ?H : Prog〝GC〞: If X<8470 : Then Goto 1 : ELse Goto 2 : Ifend LBI 1 : 〝PO－DI－CHA=〞:H－G－1.533▲

〝I=〞: （H－G－1.533）÷（Y－6.5）→I▲

〝PIng－JU=〞: Y－（（H－G－1.533）÷2+6.5）▲

〝GAO－CHA=〞: H－G－1.533－（Y－6.5）×2▲Goto 0

LBI 2 :〝I=〞: （H－G）÷（Y－8.475）→I▲

〝PIng－JU=〞: Y－（（H－G）×1.5+8.475）▲

〝GAO－CHA=〞: H－G－0.6667（Y－8.475）▲Goto 0

6 : DMCX （断面程序，改进后）

LBI 0 : CLS : ?X : ?Y : ?H : Prog〝GC〞: If H≥G+1.533 :

Then Goto 1 : ELse If H≥G+0.13 And H

Then Goto 2 : ELse If H≥G－0.64 And H

Then Goto 3 : ELse If H

Ifend : Ifend :

LBI 1 : POL（H－G－1.533 , Y）→R : CLS

〝YUAN1=KW〞：Loate 10 , 1, R－6.4

〝GONG JIA=〞：Loate 10 , 2 , R－6.19

〝G1=〞：Loate 10 , 3 , G+1.533－H▲Goto 0

LBI 2 : POL（H－G－1.533 , Y+2.5）→R : CLS

〝YUAN2=〞：Loate 8 , 1 , R－8.69

〝G1=〞：Loate 8 , 2 , G+1.533－H

〝G2=〞：Loate 8 , 3 , G－0.624－H▲Goto 0

LBI 3 〝YUAN3=〞: POL（H－G－0.302 , Y－4.594）－1.65▲

〝G2=〞: G－0.624－H▲Goto 0

LBI 4 〝YANG GONG=〞: POL（H－G－13.527 , Y）－15.65▲Goto 0

7：GC(高程子程序，注意子程序不能独立运行)

（LBI 0 : ?X :）If X≥7000 And X<7780 : Then 772.93→A : 7130.692→B :

0.009→C : －0.007→D : 80000→R : Goto 1 : ELse If X≥7780 And X<8733.5

: Then768.39→E : 7780→L : －0.007→D : Goto 2 : ELse If X ≥8733.5 And

X<9266.5 : Then 759.85→A : 9000→B : －0.007→C : －0.0275→D : 26000→R : Goto 1 : ELse If X≥9266.5 And X<9826.805 : Then 744.82→A : 9546.652

→B : －0.0275→C : －0.005→D :24902.41→R :Goto 1 : ELse If X≥9826.805 And X<10101 : Then 743.419→E : 9826.805→L : －0.005→D ：Goto 2 : Ifend : Ifend : Ifend : Ifend : Ifend

LBI1 : C－D→F : Abs (RF÷2)→T : R Abs(F)÷F→R : X－B+T→M :〝G=〞: A－(B－X)C－M2÷（2R）→G▲Return

LBI 2 :〝G=〞: E +（X－L）D→G▲Return

说明: A ：竖曲线变坡点高程。B ：变坡点里程桩号。C ：前坡度。

D ：后坡度。R ：竖曲线半径，此程序为子程序不能独立运行，若想要独立运行，只需加上括号内内容，将后面两个Return改为Goto 0 即可。

8：HHQX-TY（缓和曲线通用程序）

〝N=1 .SZ => XY, N=2 . XY => SZ〞: ?N :〝XO〞?U :〝YO〞?V :〝SO〞?O : 〝FO〞?G :〝LS〞?H :〝RO〞?P :〝RN〞?R : ?Q : 1÷P→C :（P－R）÷（2HPR）→D : 180÷π→E : If N=1 : Then Goto 1 : ELse Goto 2 : Ifend▲

LBI 1 : ?S : ? Z : Abs（S－O）→W : Prog〝SUB1〞:〝XS=〞: X▲〝YS=〞: Y▲〝FS=〞: F－90▲Goto 1

LBI2 : ?X : ?Y : X→I : Y→J : Prog〝SUB2〞:〝S=〞: O+W→S▲〝Z=〞: Z▲Goto 2

说明：N=1 ：正算求坐标。N=2 ：反算求里程桩号和偏距。XO,YO ：起点坐标。SO :起点里程桩号。FO ：起点方位角。LS ：线元长度。RO ：起点曲率半径，当半径为无穷大时用1×10表示，左偏时Q=-1，右偏时Q=1，直线段Q=0 。S ：为待求点的里程桩号。Z ：为待求点距中心线的偏距，左侧为正，右侧为负。

9：SUB1（缓和曲线正算子程序，不能独立运行）

0.1739274226→A : 0.3260725774→B : 0.0694318442→K : 0.3300094782→L : 1－L→F : 1－K→M : U+W（A Cos（G+QEKW（C+KWD））+B Cos（G+QELW （C+LWD））+ B Cos（G+QEFW（C+FWD））+A Cos（G+QEMW（C+MWD）））→X :V+W（A Sin（G+QEKW（C+KWD））+B Sin（G+QELW（C+LWD））+ B Sin（G+QEFW（C+FWD））+A Sin（G+QEMW（C+MWD）））→Y : G+QEW（C+WD）+90→F : X+Z cos（F）→X : Y+Z Sin（F）→Y

10 : SUN 2（缓和曲线反算子程序，不能独立运行）

G－90→T : Abs（（Y－V）Cos（T）－（X－U）Sin（T））→W : 0→Z : LBI 0 : Prog 〝SUB 1〞: T+QEW（C+WD）→L :（J－Y）Cos（L）－（I－X）Sin（L）→Z : If Abs（Z）< 1×10－6 : Then Goto 1 : ELse W+Z→W : Goto 0 : Ifen

LBI 1 : 0→Z : Prog〝SUB 1〞:（J－Y）÷Sin（F）→Z

11 : HHQX－BGD （缓和曲线本工地，内含曲线要素数据库）

LBI 0 :〝N=1 .SZ =>XY, N=2 . XY => SZ 〞: ?N : ?S : Prog〝QXSJK〞: 1÷P→C :（P－R）÷（2HPR）→D : 180÷π→E

If N=1 : Then Goto 1 : ELse Goto 2 : Ifend : LBI 1 : ?Z : Abs（S－O）→W : Prog〝SUB 1〞:〝XS=〞: X▲

〝YS=〞: Y▲〝FS=〞: F－90▲Goto 0

LBI 2 :〝X〞?I :〝Y〞?J : Prog〝SUB 2〞:〝S=〞: O+W→S

〝Z=〞: Z▲Goto 0

12 : QXSJK （缓和曲线数据库子程序，不能独立运行）

If S≥7000 And S<8552.052 : Then 39351.594→U : 72418.7097→V : 7000→O : 257.8746719→G : 2000→H : 1×1045→P : 1×1045→R : 0→Q : ELse If S≥8552.052 And S<8752.052 : Then 39025.584→U : 70901.283→V : 8552.052→O

: 257.8746719→G : 200→H : 1×1045→P : 1800→R : 1→Q : ELse If S≥8752.052 And S<9900.413 : Then 38987.2071→U : 70705.0275→V : 8752.052→O : 261.0577708→G : 1148.361→H : 1800→P : 1800→R : 1→Q : ELse If S≥9900.413 : Then 39170.3263→U : 69590.9925→V : 9900.413→O : 297.6112367→G : 200→H : 1800→P : 1×1045→R : 1→Q : Ifend : Ifend : Ifend : Ifend : Return

注意：0 : 表示零。O ：表示大写字母O。子程序结束后一定要加上Return 每个工地图纸不同，数据库里的数据也相应改变。

SUN 1, SUN 2 同前面的通用程序。

13：YQX—ZB （圆曲线自编程序，只适合圆曲线）

〝XO〞?A :〝YO〞?B :〝SO〞?O :〝FO〞?G : ?R : ?Q

LBI 0 :〝N= 1 . SZ=>XY, N= 2 . XY=>SZ〞: ? N : I=0 :J=0 : Rec（R , G+90Q）: A+I →C : B+J→D : G+90Q+180→E : If E<0 : Then E+360→E : ELse If E >360 : Then E－360→E : Ifend : Ifend

If N=1 : Then Goto 1 : ELse Goto 2 : Ifend

LBI 1 : ?S : ?Z : 180 Abs（S－O）÷（πR）→P : 0→I : 0→J : Rec（R－Z , E+P）: 〝XS=〞: C+I→X▲

〝YS=〞: D+J→Y▲〝FS=〞: G+P→F▲Goto 0

LBI 2 : ?X : ?Y : 0→I : 0→J : Pol（X－C , Y－D）: If J<0 : Then J+360→J : ELse If J>360 : Then J－360→J : Ifend : Ifend

〝S=〞: （J－E）πR÷180+O→S▲

〝Z=〞: R－I→Z▲Goto 0

说明：XO,YO : 起点坐标。SO ：起点里程桩号。FO ：起点方位角。

R ：圆曲线半径，左偏时Q = －1，右偏时Q = 1，

N = 1 ：正算，已知S,Z（偏距，左负，右正）求坐标（X,Y）

N = 2 ：反算，已知（X,Y）求出（S,Z）

14：ZBZH （高斯任意带平面坐标转换，换带计算）

〝X1+Y1i=（JIU）〞?A : 〝X2+Y2i=（JIU）〞?B :

〝X1+Y1i=（XIN）〞?C : 〝X2+Y2i=（XIN）〞?D :

（C－D）÷（A－B）→F : C－FA→E

LBI 0 :〝X+Yi=（JIU）〞?X : E+FX→Y :

〝X=〞: Rep（Y）▲〝Y=〞: Imp（Y）▲Goto 0

说明：先以复数形式（X+Yi）输入2个参照点，例如：先输入121?坐标系统里D243，D244两点复数形式坐标，接着输入121?45?坐标系统D243，D244复数形式坐标，然后输入待求点D245的121?坐标，最后直接输出D245的121?45?的坐标。

15 : Y P （洞口仰坡开挖计算程序）

LBI 0 : ?X : ?H :〝I=〞:（H－771.653）÷（8440－X）▲

〝GAO－CHA=〞: H－771.653－2（8440－X）▲

〝PIng－JU=〞: 8440－X－（H－771.653）÷2▲Goto 0

说明：暗挖起点为8440，该点洞顶高程771.653，设计坡度为1：0.5 。

16：HFJH（距离后方交会程序）

LBI 1 : 〝XA〞?A :〝YA〞?B :〝XB〞?C :〝YB〞?D :〝D1〞?E :〝D2〞?F : ?Q : 0→J : POL（C－A , D－B）→G : J+Q Cos－1（（GG+EE－FF）÷（2GE））→H :〝XP=〞: A+E Cos（H）→X▲

〝YP=〞: B+E Sin（H）→Y▲Goto 1

说明：第一个照准点坐标（XA , YA），平距为D1 ，第二个照准点坐标（XB , YB），平距为D2 , 第一点，第二点及测站点如果是顺时针方向排列Q = 1，逆

时针Q =－1 。（XP , YP）为待求点的坐标。

17：M-J（任意多边形面积计算程序）

0→S :〝X1〞?A :〝Y1〞?B :〝X2〞?C :〝Y2〞?D :

LBI 1 : ?X : ?Y : 0→I : 0→J : POL（C－A , D－B）: I→G : J→H : POL（X －A , Y－B）: X→C : Y→D : I→K : J→N : 0.5GK Sin（Abs（N－H））→M :〝S=〞: S+M→S▲

〝MU=〞: O.0015 S→U▲

Goto 1

说明：（X1 , Y1）,（X2 , Y2）为起点坐标，依次按顺序输入形成封闭图形，即可求出任意多边形面积。

工程测量竖曲线程序及公式

竖曲线程序要素已知要素 ? 1. 变坡点里程桩号 2. 变坡点高程3. 竖曲线半径4. 变坡点前坡度（上坡为正，下坡为负） 5. 变坡点后坡度（上坡为正，下坡为负）6.待求点里程计算公式 ●凹凸型：当前坡度-后坡度为正，则为凸型，反之为凹型 ●转坡角（曲折角）：前坡度–后坡度 ●竖曲线长：半径* 转坡角 ●切线长：竖曲线长/ 2 ●外矢距：切线长的平方/ 2倍半径 ●待求点到变坡点距离：待求点桩号–变坡点桩号（取绝对值） ●曲线起终点桩号：起点：变坡点的桩号–切线长终点：变坡点的桩号+ 切线长 ●任意点切线标高：变坡点的标高±测点与变坡点里程距离*该里程对应坡度 ●任意点设计标高： 1. 凸型：该桩号在切线上的设计标高–修正值 2. 凹型：该桩号在切线上的设计标高+ 修正值程序条件 ◆条件：如果待求点≦变坡点，则待求点–起点=间距，反之待求点>变坡点，则终点–待求点=间距 ●曲线点间距：待求点–起点或终点–待求点 If K ≦Z:Then K - A→X:Else K > Z ＝＞B - K→X : IfEnd ●竖曲线上点的高程修正值：曲线点间距的平方/ 2倍半径 ◆条件：凸型竖曲线（J>0）如果待求点≦变坡点，则任意点设计标高=变坡点高程-（变坡点-待求点）* 前坡度(取绝对值)-修正值，反之待求点>变坡点，则变坡点任意点设计标高=变坡点高程-（待求点-变坡点）* 后坡度(取绝对值)-修正值 If K≦Z:Then H-Abs(U*I)-Y→G：Else K>Z＝＞H-Abs(U*L)-Y→G:IfEnd ◆条件：凹型竖曲线(J<0) 如果待求点≦变坡点，则任意点设计标高=变坡点高程+（待求点-变坡点）* 前坡度(取绝对值)+修正值，反之待求点>变坡点，则变坡点任意点设计标高=变坡点高程+（变坡点-待求点）* 后坡度(取绝对值)+修正值 If K≦Z:Then H+Abs(U*I)+Y→G：Else K>Z＝＞H+Abs(U*L)+Y→G:IfEnd

【测量程序】FX5800计算器测量程序集

【测量程序】FX5800计算器测量程序集 FX5800计算器测量程序集2.0 版一、程序功能主要功能：计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本特点：1、优化原所有主程序，所有参变量（如导线点置仪点坐标、正反算选择、偏角、线路选择等），全部在程序头次显示一次，以后运行不需输入。运行中也可以返回再次选择线路、可以直接以矩阵形式调出线路参数。2、坐标计算考虑了线元法与交点法相结合，即是一条线路也可以一段用线元法，一段用交点法。参数置放矩阵中，输入和可读性极好。3、新增隧道断面欠超挖值放样计算4、高程程序中考虑了初次输入线路选择、计算面与设计面高差，输出中加入显示本桩号路基标准宽度。二、源程序 1.主程序1：一般放样正反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离)程序名:1ZD-XY Lb1 Q: Norm 2:14→DimZ：1→F：Prog＂DX＂:Lb1 X：Prog＂QX＂：90→B：＂PJ＂？B：B→Z[1]：Lb1 0: Norm 2 ：“KM”?Z：If Z=-1:Then Goto X:Else If Z=-2: Then 2→F :Goto 0: Else If Z=-3: Then Goto 9:IfEnd: Prog＂KM＂：If

F=1:Then ?D:Else “X0”?X:“Y0”?Y: IfEnd: Prog＂THB＂:If F=1: Then Goto 1: Else Goto 2：Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂6JS”:Goto 0:Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢＂Ｄ＝＂：Locate 6,4,Ｄ◢Ｇoto 0：Lbl 9:Mat F◢Ｇoto Q２．主程序２：高程、横坡、宽度程序(计算设计任意点高程、横坡及路基设计标准宽度)程序名：2GC14→DimZ：LbI 0:Norm 2: Prog＂QX＂：0→B:”H-B:”?B:B→Z[9]:LbI H: Norm 2: “KM”?Z:Z=-1=> Goto 0:?D:Prog”H”:Fix 3:”H=”:Locate 6,4,H◢“I=”: Locate 6,4,I◢Prog＂GD＂：“SJLG=”: Locate 6,4,L◢Goto H3．主程序3：涵洞放样程序（输入置仪点坐标。选择线路、输入路线右夹角、前进方向偏角、由涵中心桩号计算出各涵角坐标、计算放样点至置仪点方位角及距离)程序名：3JH-XY14→DimZ：Prog＂DX＂:LbI X:Norm 2: Prog＂QX＂：90→B：＂PJ1＂？B：B→C: ＂PJ2＂？C: B→Z[1]：C→Z[8]：LbI 0:Norm 2:1→F: “KM”?Z：If Z=-1:Then Goto X: ?D:Prog”THB”:0→L:“L0”?L:Z[2]+Z[1]-Z[8] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂6JS”:Goto 0:4．主程序4:路基开挖边线及填方坡脚线放样程序（输入填方放宽值、大概桩号及测量坐标、地面标高计算出偏移距离、桩号、距中距离、填挖高度）程序名：4FBX17→DimZ：LbI B:Norm 2: Prog＂QX＂：

CASIO fx-4800P 编程计算器测量程序集

第一部分：CASIO fx-4800P 编程计算器测量程序集一．SHI JU CE TU （视距测图） 1．用途：该程序用于“经纬仪视距法碎部测量”时，计算测站点至碎部点间的平距及碎部点的高程。 2．程序清单： C “H0”：I ：A “UP ”：B “DOWN ”：V “MIDDLE ”：L ：E=90-L ↙ D=100Abs （A-B ）（cosE ）2◢ H=（C+I ）+DtanE-V 3．程序说明： H0——测站点高程；I ——测站仪器高；UP ——塔尺上丝读数；DOWN ——塔尺下丝读数；MIDDLE ——塔尺中丝读数；L ——经纬仪竖盘读数盘左读数；D ——测站点至碎部点间平距；H ——碎部点的高程。 5．该程序若在fx-3950中的程序清单为：？→M ：？→A ：？→B ：？→C ：？→D ：100（A-B ）（cos(90-D)）2→X ◢ M+Xtan(90-D)-C →Y 说明：M ——将测站高程H0+仪器高I ；A ——上丝读数；B ——下丝读数；C ——中丝读数；D ——竖盘盘左读数L 。X ——测站点至碎部点的平距；Y ——碎部点的高程。二．FAN SUAN （反算） 1．用途：该程序是“坐标反算公式”程序，用于根据两点1、2的平面坐标（X1，Y1）、（X2，Y2），计算两点间的距离D12及坐标方位角A12。 2．程序清单： G “X1”：B “Y1”：C “X2”：H “Y2”：E=C-G ：F=H-B ↙ Pol （E ，F ）：I “D12”◢ ?+=?<3600J J J J “A12” 3．程序说明： X1，Y1——点1的平面坐标；X2，Y2——点2的平面坐标； D12——点1至点2 间平距；A12——点1至点2坐标方位角。由于编程时用到了极坐标函数POL （），故在程序运行中，会出现I=？XXX （数字）及J=？XXX （数字）这是函数POL 计算出的两个量，不能改变，直接回车默认即可。三．ZHENG SUAN （正算） 1．用途：该程序是“坐标正算公式”程序，用于根据点1的平面坐标（X1，Y1），及点1至点2的平距D12、坐标方位角A12，来计算点2的平面坐标（X2，Y2）。 2．程序清单： B “X1”： C “Y1”： D “D12”：A “A12” ↙

5biaoFX5800计算器测量程序集24版

FX5800计算器测量程序集2.4 版一、程序功能主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本优化：1、优化程序语句、2、以复数形式输入变量及做数据库，取消原矩阵数据库;3、修改隧道超欠挖程序为通用形，不受圆心个数限制、4、新增测量资料表计算

二、源程序（绿色为程序名；蓝色为输入计算器内容）紫色为新版改动处0.汇总程序（1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、 F、XY、X1)；2、坐标反算程序（2ZD、A、B、AB、HX、QX、F、ZD、X1)； 3、高程计算查阅程序（3GC、H、I、QX、S1、I1）； 4、路基半幅标准宽度查阅程序（4GD、C、QX、G1）； 5、路基边坡及开挖口放样程序（5BP、 A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）； 6、路基标准距离放样（6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)； 7、桥梁锥坡计算放样程序（7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1)； 8、极坐标计算程序（8JS、JS、DS）； 9、隧道超欠挖计算程序（A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。程序名：0（数子0） ClrMat:ClrVar:12→DimZ：Norm 2:Do:＂(XY=1，ZD=2 ，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9)===>QING AN 1-9＂：Getkey→Z[3]:While Z[3]=35:Prog＂1XY＂:WhileEnd:While Z[3]=36:Prog＂2ZD＂：WhileEnd: While Z[3]=37:Prog＂3GC＂：WhileEnd: While Z[3]=21:Prog＂4GD＂：WhileEnd: While Z[3]=22:Prog＂5BP＂：WhileEnd: While Z[3]=23:Prog＂6FM＂：WhileEnd: While Z[3]=31:Prog＂7ZP＂：WhileEnd: While Z[3]=32:Prog＂8JS＂：WhileEnd: While Z[3]=33:Prog＂9SD＂：WhileEnd:LpWhile Z[3]≠25:”XIE XIE SHI YONG”:

编程计算器测量程序

编程计算器测量程序集编写: 王劲松第一部分：CASIO fx-4800P 编程计算器测量程序集一．SHI JU CE TU （视距测图） 1．用途：该程序用于“经纬仪视距法碎部测量”时，计算测站点至碎部点间的平距及碎部点的高程。 2．程序清单： C“H0”：I：A“UP”：B“DOWN”：V“MIDDLE”：L：E=90-L ↙ D=100Abs（A-B）（cosE）2◢H=（C+I）+DtanE-V 3．程序说明： H0——测站点高程；I——测站仪器高；UP——塔尺上丝读数；DOWN——塔尺下丝读数；MIDDLE——塔尺中丝读数；L——经纬仪竖盘读数盘左读数；D——测站点至碎部点间平距；H——碎部点的高程。 5．该程序若在fx-3950中的程序清单为：？→M：？→A：？→B：？→C：？→D：100（A-B）（cos(90-D)）2→X◢M+Xtan(90-D)-C →Y 说明：M——将测站高程H0+仪器高I；A——上丝读数；B——下丝读数；C——中丝读数；D——竖盘盘左读数L。X——测站点至碎部点的平距；Y——碎部点的高程。二．FAN SUAN （反算） 1．用途：该程序是“坐标反算公式”程序，用于根据两点1、2的平面坐标（X1，Y1）、（X2，Y2），计算两点间的距离D12及坐标方位角A12。 2．程序清单： G“X1”：B“Y1”：C“X2”：H“Y2”：E=C-G：F=H-B ↙ Pol（E，F）：I“D12”◢J“A12” 3．程序说明： X1，Y1——点1的平面坐标；X2，Y2——点2的平面坐标；D12——点1至点2间平距；A12——点1至点2坐标方位角。由于编程时用到了极坐标函数POL（），故在程序运行中，会出现I=？XXX（数字）及J=？XXX（数字）这是函数POL计算出的两个量，不能改变，直接回车默认即可。三．ZHENG SUAN （正算） 1．用途：该程序是“坐标正算公式”程序，用于根据点1的平面坐标（X1，Y1），及点1至点2的平距D12、坐标方位角A12，来计算点2的平面坐标（X2，Y2）。 2．程序清单： B“X1”：C“Y1”：D“D12”：A“A12”↙ X“X2”=B+DcosA ◢Y“Y2”=C+DsinA 2．程序说明： X1，Y1——点1的平面坐标；X2，Y2——点2的平面坐标； D12——点1至点2间平距；A12——点1至点2坐标方位角；X2，Y2——点2的平面坐标。另外在输入A12时，可直接输入“度分秒”。四．YUAN ZHU （圆主） 1．用途：该程序是“单圆曲线主点测设元素及里程计算”程序。

测量各类计算程序

程序名称：SQX “竖曲线计算主程序” IA“⊿I1”B“⊿I2”C“BP”F“HP”RT D=C－T：E=C+T Lbl 0：{K} KD= >X=C－K：N=A：Goto 1⊿ K≥E= >X=C－K：N=B：Goto 1⊿ K≤C= >X=K－D：Y=C-K：N=A：Goto 2：≠>X=E－K：Y=C－K：N=B：Goto 2⊿Lbl 1：H“HS”=F-XN◢ Goto 0 Lbl 2：H“HS”=F－YN－I X2÷2÷R◢ Goto 0 注： I——竖曲线为凹型时输入-1，为凸型时输入1； ⊿I1、⊿I2——输入格式为0.### BP——为变坡点里程 HP——为变坡点高程 R——半径 T——切线 K——输入待计算桩号 HS——计算输出结果 Re:各种常用程序集.doc 极座标放样 LBI 1:{EF}:A”XO”:B”YO”:C”X1”:D”Y1”:E”XA”:F”YA’ G”X1A”=E-A:H”Y1A”=F-B:I’X12’=C-A:J”Y12”=D-B K”A1A”=tan-1(H÷G):L”A12”= tan-1(J÷I) M”JN”=√(G2+H2) ▲ T”JD”=180-Abs(L-K) ▲ POL(A-E,B-F) ▲ J<0=>J=360+J△Z=J▲ GOTO 1 注: O为仪点,A为放点偏角法 LBI 0:R:A:Q”QD” {G} I=Abs(G-Q) A[1]=90×I÷(πR) ▲ C[1]=2RsinA[1] ▲ GOTO 0 直线座标 Q”QD”:E”XA”:F’YA’:A”QHJ”:O”L=-90,R=+90”:G”FXD”:B”KD”

公路工程测量常用程序大全集

FX5800计算器公路测量常用程序集一、程序功能本程序组由2个主程序、5个次子程序及3个参数子程序。主要用于公路测量中坐标正反算，设计任意点高程及横坡计算。程序坐标计算适应于任何线型. 二、源程序二、源程序 1.主程序1：一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离) 程序名:1ZD-XY Lb1 0:Norm 2 F=1：(正反算判别，F=1正算，F=2反算) Z[1]=90（与路线右边夹角） Prog＂THB＂：F=1=>Goto 1:F=2=>Goto 2 Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢ ＂Ｙ＝＂：Locate 6,4,Ｙ◢ Ｐrog＂3JS”:Goto 0: Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢ ＂Ｄ＝＂：Locate 6,4,Ｄ◢ Ｇoto 0 ２．主程序２：高程序横坡程序(设计任意点高程及横坡)

程序名：2GC LbI 0:Norm 2 “KM”?Z:?D: Prog”H”:Fix 3:” H=”:Locate 6,4,H◢ “ I=”: Locate 6,4,I◢ Goto 0 3.主程序3：极坐放样计算程序(计算放样点至置仪点方位角及距离) 程序名：3JS X：Y： 1268．123→K(置仪点X坐标) 2243．545→L（置仪点Y坐标，都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦） Y-L→E：X-K→F：Pol(F,E):IF J<0:Then J+360→J:Int(J)+0. 01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示) F ix 3:” S=”:Locate 6,4,I◢ 4．主程序4：涵洞放样程序（由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离)

监视和测量程序

监视和测量控控制程序 1 目的和适用范围 1.1 对产品实现必须的过程进行监视和测量，以确保满足顾客的要求，对产品特性进行监视和测量，以验证产品要求得到满足。 1.2 本程序适用于本公司所生产产品的原材料、半成品、成品的监视和测量。 2 术语无 3 职责 3.1 质检部负责原材料、中间半成品、成品的检验和试验工作。 3.2 生产部负责配合中间半成品的监视和测量工作。 4 工作流程 4.1 进货产品的监视与测量 4.1.1 对购进的原材料，采购员要校对物料品名、规格型号、数量，包装、质量报告或质量证明书等内容，开具报检单报质检员检验验收，合格则入库，不合格品按不合格品控制程序处理。 4.1.2 质检员应保存好原材料检测记录和供方的质量报告或质量证明书等相关资料。4.2 过程产品的监视和测量 4.2.1每道工序完工后生产人员应执行自检，合格后才能报专职质检员检验，专检合格的产品才能转入下道工序。 4.2.2 自检或专检不合格的产品应严格按不合格品控制程序处理。 4.2.3公司规定：自检要作好相关记录，专检必须作好相应的检验验收记录，以证明产品的符合性。 4.3 成品的监视和测量 4.3.1根据换热器及水箱的相关标准的要求，公司应对所规定的项目进行检测，同时应按图纸及相关技术协议、合同的要求对其尺寸、外观进行检查，只有经检验合格的产品才能包装出厂，质检员应保存所有检验合格的证据。 4.3.2经检验不合格时应严格按不合格品控制程序处理，并保持相关记录。 4.3.3不合格品放行，经顾客评审批准，否则在所有规定活动均已圆满完成之前，不得放行和交付使用，因顾客批准而放行的特例，应考虑这类产品符合法律法规要求，而且还要满足顾客需要。 4.3.4最终的不合格品放行应得到高管层批准，销售技术部负责跟踪服务，并保持产品

我的5800p测量程序及公式

FILE 非常好用的卡西欧5800p程序一、坐标反算(XY--FD) Deg：Fix 3↓(换行) Lbl 0↓ 〝X0=〞?A:〝Y0=〞?B:〝XN=〞?C:〝YN=〞?D↓(换行) Pol（（C-A）,(D-B)）J＜0＝＞J+360→J↓(换行) 〝JL=〞：I◢〝FWJ=〞：J：?DMS Goto 0 二、坐标正算(DF--XY) Deg：Fix 3↓(换行) 〝X0=〞?A；〝Y0=〞?B：〝L=〞?L：〝C=〞?C↓(换行) A+Lcos(C)→X↓ B+Lsin(C)→Y↓ 〝X=〞：X◢〝Y=〞：Y◢ 三、直线段中桩、边桩坐标计算（该程序从起点往终点计算）(ZX) 1、Deg：Fix 3↓(换行) 设置小数保留位数 2、Lbl 1↓程序标签 3、〝X0〞?X：〝Y0=〞?Y：〝K0=〞?E：〝FWJ=〞?J↓赋值起点坐标、桩号、走向方位角 4、?K：?L：?A↓输入所求的桩号、边距、相对于主线的方位角（如果只计算中桩坐标，边距及方位角皆为0）5、X+(K-E)cos(J)+Lcos(J+A)→C↓计算坐标X 6〝XP=〞：C◢显示坐标X 7、Y+(K-E)sin(J)+Lsin(J+A)→D↓计算坐标Y

8、〝YP=〞：D◢显示坐标Y 9、Goto 1↓转向程序标签循环执行计算四、圆曲线坐标计算程序（该程序从起点往终点计算）(YQX) 1、Deg：Fix 3↓(换行) 2、Lbl 0： 3、〝K0=〞?K：?X：?Y：?A：?R： 4、〝L=-1，R=+1〞：?G： 5、〝ZS=0，FS≠0〞：?S： 6、S≠0 =＞Goto 1↓ 7、〝Ki〞?Z↓ 8、90(Z-K)÷(∏R)→B↓ 9、2RsinB→D↓ 10、〝Xi=〞：X+Dcos（A+GB）→P◢ 11、〝Yi=〞：Y+Dsin（A+GB）→Q◢ 12、A+180G(Z-K)÷(∏R)→0↓ 13、〝ZBJ〞？E↓ 14、〝XiL=〞:P+Ecos(0-90) ◢ 15、〝YiL=〞:Q+Esin(0-90) ◢ 16. 〝YBJ〞？F↓ 17、“XiR=”:P+Fcos(O+90)◢ 18、“YiR=”:Q+Fsin(O+90)◢ 19、Goto 0↓ 20.、Lbl 1： 21、“XC”?U: “YC”?V↓ 22、X+Rcos(A+90G)→M↓ 23、Y+Rsin(A+90G)→N↓ 24、Pol(U-M,V-N)→H↓ 25、J＜0 =＞J+360→J↓ 26.、“PJ=”:R-H→L◢ 27、“XCCZ=”:M+Rcos(J)→T◢ 28.、“YCCZ=”:N+Rsin(J)→W◢ 29 、Pol(T-X,W-Y) →Z↓

2014-2015(1)测量程序设计基础A

１淮海大学 2014 - 2015 学年第一学期测量程序设计基础试卷（A 闭卷） 1.运行以下命令后，变量C 的值是________。 >>A=size([5 5 6;6 6 6;7 7 8]); >>B=size([1 2;3 4;5 6]); >>C=A ’*B A. ???? ??6699 B. ???? ??6969 C. ???? ??9669 D. ???? ??6996 2.matlab 的程序运行过程中，如果想让程序运行暂停一下，可以使用函数______。 A. break B. tic/toc C.time D. pause 3. 下列哪个变量的定义是不合法的 A. abcd-3 B. xyz_3 C. abcdef D. x3yz 4.下列哪条指令是求矩阵的行列式的值 A. inv B. diag C. det D. eig 5.在循环结构中跳出循环，执行循环后面代码的命令为 A. return B. break C. continue D. keyboard 6.清空Matlab 工作空间内所有变量的指令是 A. clc B. cls C. clear D. clf 7.用round 函数四舍五入对数组[2.48 6.39 3.93 8.52]取整，结果为 A. [2 6 3 8] B. [2 6 4 8] C. [2 6 4 9] D. [3 7 4 9] 8.已知a=2:2:8, b=2:5，下面的运算表达式中，出错的为 (A) a'*b (B) a .*b (C) a*b (D) a-b 9.下面的程序执行后array 的值为_________ for k=1:10 if k>6 break; else array(k) = k; end end A. array = [1, 2, 3, 4, 5, 6] B. array = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10] C. array =6 D. array =10. 10.i=2; a=2i; b=2*i; c=2*sqrt(-1); 程序执行后；a, b, c 的值分别是__________________ A.a=4, b=4, c=2.0000i B.a=4, b=2.0000i, c=2.0000i C.a=2.0000i, b=4, c=2.0000i D. a=2.0000i, b=2.0000i, c=2.0000i

fx5800计算器公路测量常用程序集2.3 版_secret

FX5800计算器公路测量常用程序集2.3 版一、程序功能主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本优化：1、优化程序语句、2、取消原线元法计算，化线元法为交点法。3、高程计算修改,4、附计算坐标及高程参数设计要素输入实例二、源程序（绿色为程序名；蓝色为输入计算器内容）红色为网友调试后修改笔误。0.总主程序（1、坐标计算放样程序2、坐标反算程序；3、高程计算查阅程序；4、路基半幅标准宽度查阅程序；5、路基边坡及开挖口放样程序；6、路基标准距离放样；7、桥梁锥坡计算放样程序；8、极坐标计算程序；9、隧道超欠挖计算程序）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。程序名：0（数子0）ClrMat:ClrVar:12→DimZ：Norm 2:Do:＂(XY=1，ZD=2 ，GC=3，GD=4， BP=5，FM=6，ZP=7，JS=8， SD=9)===>QING AN 1-9＂：Getkey→Z[3]:While Z[3]=35:Prog＂1XY":WhileEnd:While Z[3]=36:Prog＂2ZD＂：WhileEnd: While Z[3]=37:Prog＂3GC＂：WhileEnd: While Z[3]=21:Prog＂4GD＂：WhileEnd: While Z[3]=22:Prog＂5BP＂：WhileEnd: While

IATF16949-监视与测量资源管理程序

IATF 16949:2016质量体系文件文件编号：XX-QP-011监视与测量资源管理程序版本：A/1

1.0目的对监视和测量设备进行控制，确保其与要求的测量能力相一致，保证监视和测量结果的有效性。负责公司所有测量仪器的校准、检定工作. 2.0范围适用于本公司监视与测量设备的控制。 3.0职责 3.1 品质部 3.1.1制定年度校准计划，并按校准计划完成校准检定工作（包括内校、外校）； 3.1.2 完成内校记录、报告，所有仪器校准证书的保管、归档； 3.1.3 编制计量器具采购计划，检查、监督各部门计量器具的使用、维护、保养情况，发现问题及时解决； 3.1.4负责全公司计量器具的统计，建立计量器具台账，做到分类明确、账物相符； 3.1.5计量合格证的张贴、维护； 3.1.6保管计量器具的档案，实时保证各项原始记录的完整； 3.1.7对测量仪器仪表合格与不合格判定； 3.1.8领导安排的其他工作 3.2 采购部 3.2.1负责各类量具的采购； 3.3 使用部门 3.3.1 负责监视和测量设备在使用过程中的日常维护、保养工作; 3.3.2 使用监视和测量设备中故障的提出; 3.3.3 负责提报本部门需外校或内校申请给品质部。 3.4 乌龟图

3.5 流程图参见附录1 4.0作业内容 4.1 监视与测量设备的需求 4.1.1 由监视与测量设备使用部门填写《请购单》提出监视与测量设备需求，采购根椐提出的监视与测量设备需求进行报价对比，提交总经理审批。采购来的监视与测量设备经品质部验收合格后，新来的量具需厂商出具“合格证”或“检验报告”。品质部检验后得出《验收单》，对验收不合格的监视与测量设备由采购进行更换或退货。 4.1.2 经验收合格的监视与测量设备,由使用部门领取，品质部进行登记并建立《计量器具管理台帐》，根据需求对监视与测量设备进行内外校的判定。新监视与测量设备需具备有效合格证或检验报告，按校正周期下次校正，如果设备厂家提供校准报告，首次可不校正。 4.2 定期校验 4.2.1 校验类别分为：免校、内校、外校三种。外交频次一般为1次/年，内校频次一般为1次/半年。 4.2.2 极简单的量具，如：直尺、卷尺、角度尺等，可以免校准； 4.2.3 品质部应统计公司内所有监视与测量设备，编制校准计划； 4.2.4 内校

FX5800计算器测量程序集2分解

FX5800计算器测量程序集2.0 版一、程序功能主要功能：计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C 型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本特点：1、优化原所有主程序，所有参变量（如导线点置仪点坐标、正反算选择、偏角、线路选择等），全部在程序头次显示一次，以后运行不需输入。运行中也可以返回再次选择线路、可以直接以矩阵形式调出线路参数。 2、坐标计算考虑了线元法与交点法相结合，即是一条线路也可以一段用线元法，一段用交点法。参数置放矩阵中，输入和可读性极好。 3、新增隧道断面欠超挖值放样计算 4、高程程序中考虑了初次输入线路选择、计算面与设计面高差，输出中加入显示本桩号路基标准宽度。二、源程序 1.主程序1：一般放样正反算程序(①正算坐标、放样点至置仪点方位角及距离； ②反算桩号及距中距离) 程序名:1ZD-XY Lb1 Q: Norm 2:14→DimZ：1→F：Prog＂DX＂: Lb1 X：Prog＂QX＂：90→B：＂PJ＂？B：B→Z[1]： Lb1 0: Norm 2 ：“KM”?Z：If Z=-1:Then Goto X:Else If Z=-2: Then 2→F :Goto 0: Else If Z=-3: Then Goto 9:IfEnd: Prog＂KM＂：If F=1:Then ?D:Else “X0”?X:“Y0”?Y: IfEnd: Prog＂THB＂:If F=1: Then Goto 1: Else Goto 2： Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢ ＂Ｙ＝＂：Locate 6,4,Ｙ◢ Ｐrog＂6JS”:Goto 0: Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢ ＂Ｄ＝＂：Locate 6,4,Ｄ◢ Ｇoto 0： Lbl 9:Mat F◢

卡西欧5800计算器公路测量常用程序集_secret

2.1 版一、程序功能主要功能：采用线元法与交点法相结合计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本特点：1、建主程序合并原所有计算类型，在主程序中可选择操作类型。隧道欠超挖增加变量衬砌厚度，因有设计衬砌厚度根据石岩来定的。增加锥坡放样计算。二、源程序 1.总主程序（1、坐标计算放样程序2、坐标反算程序；3、高程计算查阅程序；4、路基半幅标准宽度查阅程序；5、路基边坡及开挖口放样程序；6、路基标准距离放样；7、桥梁锥坡计算放样程序； 8、极坐标计算程序；9、隧道超欠挖计算程序）运行后输入1~9数子则选择1至9的程序，返回时，在桩号输入-1,返回选择选择计算类型。输入-2,返回选择线路。坐标计算中输入-3,则显示本段曲线要素。程序名：0ZCX LbI Q: 15→DimZ：Norm 2:1→A：＂A:XY=1， ZD=2 ，GC=3， GD=4，BP=5， FM=6， ZP=7， JS=8， SD=9＂?A:

A=1=>Goto 1:A=2=>Goto 2:A=3=>Goto 3:A=4=>Goto 4: A=5=>Goto 5:A=6=>Goto 6:A=7=>Goto 7:A=8=>Goto 8: A=9=>Goto 9 LbI 1:Prog ＂DX＂:LbI A:Prog＂QX＂:90→B: ＂PJ1＂?B:B→C: ＂PJ2＂?C:B→Z[1]:C→Z[8]:LbI B:1→F: ＂KM＂?Z:Z= -1=>Goto 0:Z=-2=>Goto A:Z=-3=>Goto X:Prog＂KM＂:?D:Porg＂THB＂:O→L: ＂L0＂?L:Z[2]+Z[1]-Z[8] →E:X+L cos(E) →X:Y+Lsin(E) →Y:Prog＂XY＂:Prog＂JS＂:Goto B LbI 2:2→F:90→Z[1]:Prog＂QX＂:LbI C: ＂KM＂?Z: Z=-1=>Goto 0:Z=-2=>Goto 2:Z=-3=>Goto X:Prog＂KM＂: ＂XO＂? X: ＂Y0＂?Y:Prog＂THB＂:Porg＂ZD＂:Goto C: LbI 3:Prog＂QX＂:0→B: ＂H-B＂?B:B→Z[9]:LbI D: ＂KM＂?Z: Z=-1=>Goto 0:Z=-2=>Goto 3:?D:Porg＂H＂:Fix 3: ＂ H=＂:Lc oate 6,4,H-Z[9] ◢ ＂ I=＂:Locate 6,4,I◢ Goto D LbI 4:Prog＂QX＂:LbI E: ＂KM＂?Z:Z=-1=>Goto 0:Z=-2=>Goto 4:?D:Prog＂GD＂:Fix 3: ＂ SJGD=＂:Locate7,4,L◢ Goto E LbI 5:Prog＂QX＂:0.5→B:＂TH-GD＂?B:B→Z[15]:LbI F:2→F:90→Z[1]:＂KM＂?Z:Z=-1 =>Goto 0:Z=-2 =>Goto 5:Prog＂KM＂: ＂X0＂?X: ＂Y0＂?Y:0→M:”M0”?M: M→Z[4]:Prog＂3FBZ＂ Fix 2:Z[3] →D:Abs（D）-S→O: ＂ L0=＂:Locate 6,4,O◢Prog＂ZD＂: Z[5]→T:＂ TW=＂:Lcoate 6,4,T◢ Goto F:

FX5800计算器测量程序集24 版使用说明

FX5800计算器测量程序集2.4 版使用说明一、程序功能主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本优化：1、优化程序语句、2、以复数形式输入变量及数据库，取消原矩阵数据库;3、修改隧道超欠挖程序为通用形，不受圆心个数限制、4、新增测量资料表计算二、源程序（绿色为程序名；蓝色为输入计算器内容）紫色为新版改动处（可以根据自己标段情况用相关主程序及子程序，再在0程序中汇总）0.汇总程序（1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1)；2、坐标反算程序（2ZD、A、B、AB、HX、QX、F、ZD、X1)；3、高程计算查阅程序（3GC、H、I、QX、S1、I1）；4、路基半幅标准宽度查阅程序（4GD、C、QX、G1）；5、路基边坡及开挖口放样程序（5BP、A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）；6、路基标准距离放样（6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)；7、桥梁锥坡计算放样程序（7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1)；8、极坐标计算程序（8JS、JS、DS）；9、隧道超欠挖计算程序（A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1）运行后按1~9数子约半秒，选择程序，返回时，在桩号输入-1,返回选择计算类型，输入-2,返回选择线路。计算内程序排例：0、01（测量资料专用）、02、0XYH 、1DAO XIAN、1SC （水准测量用）、1XY、2XY-S（由坐标计算面积）、2ZD、3GC、4GD、5BP、6FM、7ZP、8JS、9SD、A、AB、B、B6（测量表格检表6）、B7（检表7）、B8（检表8）、B9（检表9）、C、DX、DX0、F、G1、H、HX、I、I1、JS、M

监视与测量控制程序

1 目的规范监视和测量工作，正确监测生产过程中产品以及相关的零部件性能，监测过程运行中的环境状况和职业健康安全状况，及时发现并纠正偏离过程设置要求，消除产品质量、过程环境和职业健康安全风险。 2 适用范围适用于公司质量、环境和职业健康安全管理体系范围内产品检测和产品制造过程相关活动监测。 3 职责 3.1 各分公司成品检验员负责产品首检、完工检验；质量负责人批准成品检验报告，安排处理不合格报告。 3.2 检测中心负责特殊要求和产品性能检测，制定产品形式试验计划，安排试验，确认检测和试验结果。3.3各分公司生产部门负责提供特殊检测要求零件、型式试验用产品和其它需检测样件。 3.4 各分公司原材料采购部门安排提供采购产品待检测、试验用样件。 3.5 工程部门负责提交新产品型式试验产品，对新产品型式试验发现的问题进行处理。 3.6工艺技术部门负责对鉴定后产品型式试验发现的问题处理。 4 产品检验程序 4.1 产品检验流程图

4.2 产品检验要求 4.2.1 成品应该在生产完工或组装线结束时，由成品检验员全检产品的质量，合格后在《成品送检单》上签名后，由车间组长报送成品检验员检验。 4.2.2 抽样 1）工程销售样前所生产的成品，100%全检；第一批大货所生产的成品，最少检验50%； 2）在正式生产3个月内（或能充分证明有足够的能力控制前）所生产的成品，最少按正常抽样数加倍抽取； 3）正常生产抽样数按照《抽样计划》规定的AQL值选定；客户有特殊抽样要求的产品按客户要求。 4.2.3成品检验员在接到成品送检单后1个工作日内完成检验。如有型式测试，检验周期加上特殊检测周期。 4.2.4 成品检验员根据检验标准、抽样标准、包装物配置清单、产品封样、机种配备表、图文标记进行检验并对不合格品作好标识。过程检验员根据作业指导书要求，及其他技术文件进行检验，对不合格做好标识。 4.2.5 成品检验员填写《成品检验报告》，合格的在《成品送检单》上签写“同意入库”。将检验记录发到送检部门。不合格品处置按《不合格输出控制程序》执行。只有检验合格或让步接收的成品才可入库。

施工测量的程序及准备

施工测量的程序及准备（一）测量准备工作与建设单位办理控制点移交手续，现场交接引测点位，编制“施工测量控制点记录表”。根据设计意图、工程总体布局、工程特点与施工部署等，确定控制轴线并进行内业计算。配备测量人员：测量人员2人，配合人员4人。仪器配置：测量仪器必须通过计量局检验并有合格证，依据现场情况配置以下测量仪器：二、工程测量放线（一）、平面测量控制网的建立及校核本工程平面呈矩形。拟定建筑施工平面定位控制网采用方格网，用直角坐标法。测量遵循的原则是先总体后局部，先对工程进行整体控制，再进行各区段控制点的加密和放样工作。 1建立首级测量控制网根据甲方提供的测量建筑红线点，结合本工程的特点，确定本建

筑物的首级测量控制网。首级控制网以主轴线作为主要控制轴线，在建筑物周边坚固位置作好标记，作为校核依据。控制点的设置考虑在场内不易破坏和通视条件较好的位置。为保证测量时视线的畅通无阻，在平行各主轴1.5m的位置建立控制线。为了方便地上工程的施工测量，轴线控制点布置在基坑外的平面上，并保护好各控制点不被破坏，做好明显标记，定期检查。每次放线时，将激光经纬仪架设在控制点上，后视另一相应的控制点，这样依次投出全部主控制线，然后依据主控轴线，用50m钢尺，按照施工图纸，分出各条轴线位置及墙柱梁位置，每跨轴线误差控制在1mm以内。施工时由下到上进行层层放线。 2建立二级测量控制网在实际施工过程中，将根据各施工阶段的具体情况建立二级测量控制网，拟建立的二级测量控制网主要有基础施工阶段测量控制网及主体结构施工阶段测量控制网。（1）、基础工程施工测量基坑开挖完成后，利用激光经纬仪和水准仪将设在基坑四周的主控轴线和标高控制点引测转移至坑内，以控制基坑人工修整的平面尺寸和深度。将基础工程的轴线、尺寸全部引测到基坑垫层上，以控制基础结构施工。基础施工完毕后，利用精密水准仪、经纬仪和光电测距仪将基坑周边主控轴线、标高控制点投放到基础表面上，并设立建筑物高程控

卡西欧4800P计算器测量程序集共10页

福建林业职业技术学院工程系土木工程室高国兴

CASIO fx-4500PA计算中桩、边桩坐标程序直线、圆曲线中桩及左、右边桩计算程序fx-4800p =”：C“Xθ=”：D“Yθ=”：E“Wθ=”：N=Ans：R“R=”：L“Lμ o =”： K“D=”：M“Jμ o Q=9θL÷（πR）：S=2RsinQ ： O =C＋Scos（N-Q）◢ P=D+Ssin（N-Q）◢ W=E-2Q◢ X=O+Kcos（N-2Q-M）◢ Y=P+Ksin（N-2Q-M）◢ 注： Xθ=起算点坐标 Yθ=起算点坐标 Wθ=起算点方位角 R=曲线半径，线路前进方向，左+，右－直线R为无穷大 =置镜点到待求点距离 Lμ o D左、右边距离 =前进方向左（+90），右（－90） Jμ o O=中桩坐标 P=中桩坐标 W=待求点方位角

X=左、右边桩坐标 Y=左、右边桩坐标缓和曲线中桩及左、右边桩计算程序Fx-4800p C“Xθ=”：D“Yθ=”：E“Wθ=”：N=Ans：R“R=”：F“Lθ=”：=”：K“D=”：M“Jμo=”← L“Lμ o U=L－L^5÷（40R2F2）：V=L^3÷（6RF）－L^7÷（336R^3F^3）：Q=tan－1（V÷U）：S=√（U2+V2）← B=9θL2÷（πRF）：O=C+Scos（N－Q）◢ P=D+Ssin（N－Q）◢ W=E－B◢ X=O+Kcos（N－B－M）◢ Y=P+Ksin（N－B－M）◢ 注： Xθ=起算点坐标 Yθ=起算点坐标 Wθ=起算点方位角 R=曲线半径，线路前进方向，左+，右－ Lθ=缓和曲线长 =置镜点到待求点距离 Lμ o D左、右待求距离 =前进方向左（+90），右（－90） Jμ o O=中桩坐标