CASIOfx-5800p程序编写操作步骤.pdf

《CASIOfx-5800p程序编写操作步骤.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、CASIOfx-5800P程序编写操作步骤�本步骤是在您已经熟习该计算器的功能以后�例如�编写闭合导线三维坐标测量近似平差程序要用到的公式��一�平面坐标闭合差计算公式’’Fx=X—X计算X坐标的闭合差:X为已知高级控制点观测值�X为高级控制点已知值’’Fy=y—y计算Y坐标的闭合差�y为已知高级控制点观测值�y为高级控制点已知值22FD=√FX+FY计算导线全长闭合差K容=计算导线全长相对闭合差�ΣD为导线全长边长之和ΣD=S1+S2+……+SiVXi=−i计算各点平面坐标X的改正数�i为起始点至计算点的边长之和Vyi=−∙i计

2、算各点平面坐标Y的改正数。’Xi=Xi�VXi计算改正后的各点坐标X。’Yi=Yi�Vyi计算改正后的各点坐标Y。�二�高程闭合差计算公式’’FH=H−H计算高程的闭合差�H为已知高级控制点观测值�H为高级控制点已知值VHi=−i计算各点的高程改正数。’Hi=Hi+H计算改正后的高程二、�这里使用了额外变量Z[n]�“X(A)=”?⟶Z[25]输入已知高级控制点观测坐标x“X(B)=”?⟶Z[26]输入高级控制点已知坐标x“Y(A)=”?⟶Z[27]输入已知高级控制点观测坐标y“Y(B)=”?⟶Z[28]输入高级控制点已知坐标y2

3、2“F(D)=”:√Z[21]�Z[22]⟶Z[30]计算导线全长闭合差“F(Y)=”:Z[27]—Z[28]⟶Z[22]计算x闭合差“F(X)=”:Z[25]—Z[26]⟶Z[21]计算y闭合差这里只改写了一部分�其余的写法一样�请根据以上所列出的公式自己编写。三、�若无常量可不写�但变量是一定有的�1/6’’’本例中的常量有�X、X、y、y、H、H、ΣD’’本例中的变量有�Xi、Yi、ΣD四、�不需要重复计算的话�可以不列�本例中只需要计算一次的有�FX、FY、FD、K、FH、ΣD’本例中需要重复计算的有�VXi、Vyi、VH

4、i、Xi、Yi、Hi�因此本程序需要使用重复计算命令While、WhileEnd�五、�例如�Σ�D�边长之和�赋值给Z[20].X�A�已知点观测坐标值x赋值给Z[25]X�B�已知点坐标值X赋值给Z[26]Y�A�已知点观测坐标值Y赋值给Z[27]Y�B�已知点坐标值Y赋值给Z[28]F�X�X坐标闭合差赋值给Z[21]F�Y�Y坐标闭合差赋值给Z[22]V�XI�导线上某点X坐标改正值赋值给Z[23]V�YI�导线上某点Y坐标改正值赋值给Z[24]Σ�DI�导线起始点至计算点的边长之和赋值给SX(G)导线上某点的观测值X赋值

5、给UY(G)导线上某点的观测值Y赋值给VXI导线上某点改正后的坐标值XYI导线上某点改正后的坐标值YF�D�导线高程闭合差赋值给Z[30]赋值给D赋值给S2/6例如�BHDXPC程序名�闭合导线平差“BHDXPC”显示程序名Deg:Fix4设置小数位数和角度Prog”BCZH”调用子程序计算边长之和“X(A)=”?⟶Z[25]输入已知点观测坐标x“X(B)=”?⟶Z[26]输入已知点坐标X不“Y(A)=”?⟶Z[27]输入已知点观测坐标Y需“Y(B)=”?⟶Z[28]输入已知点坐标Y重“H(1)=”?⟶Z[35]输入已知点高程观测

6、值H复“H(0)=”?⟶Z[36]输入已知点高程值H计“F(X)=”:Z[25]—Z[26]⟶Z[21]计算x坐标闭合差算“F(Y)=”:Z[27]—Z[28]⟶Z[22]计算Y坐标闭合差部22“F(D)=”:√Z[21]�Z[22]⟶Z[30]计算并显示导线全长闭合差分“K=”:Int(Z[20]÷Z[30])计算并显示导线全长相对闭合差(取到整数)�分子为1�此得数为分母。“F(H)=”:Z[35]—Z[36]⟶F计算并显示导线全长高程闭合差LbI1“X(G)=”?⟶U输入新设导线点观测值X“Y(G)=”?⟶V输入新设导线点观

7、测值Y“H(G)=”?⟶Z[38]输入新设导线点高程观测值H“Σ�DI�=”?S输入导线起始点至计算点的边长之和WhileS>0重复计算起始命令并设置条件−(Z[21]÷Z[20])⟶D计算FX÷ΣD重−(Z[22]÷Z[20])⟶Q计算FY÷ΣD复−(F÷Z[20])⟶Z[39]计算FH÷ΣD计Fix3设置以下计算显示三位小数算“V(XI)=”:SD⟶Z[23]计算x坐标改正数部“V(YI)=”:SQ⟶Z[24]计算y坐标改正数分“V(HI)=”:Z[39]×S⟶Z计算H坐标改正数“X(I)=”:U+Z[23]计算导线上某点改正

8、后的坐标X“Y(I)=”:V+Z[24]计算导线上某点改正后的坐标Y“H(I)=”:Z[38]+Z计算导线上某点改正后的高程HGoto1WhileEnd重复计算结束命令本程序计算结果�单位�m�。3/6BCZH计算边长之和子程序“S(1)=”?A: