首页 →文档下载

以下为《测量程序整理第N版》的无排版文字预览，完整内容请下载

1、正算主程序：0---ZBZS

26→DimZ:Fix 3

Lbl 0

"N=1→ZS:N=11→FS"

180÷π→K:"N="?N

"CZX="?A:"CZY="?B:A→Z[17]:B→Z[18] 测站坐标

If N=1:Then Goto 1:IfEnd

If N=11:Then Goto B:Else "===End===":Stop:IfEnd

Lbl1

"ZH="?S:"E="?E:"JL="?Z 输入：桩号、夹角及偏距数据

Prog "ZXDATA" 调用：主线数据库

Abs(S-O)→W:1÷P→C:(P-R)÷(2HPR)→D

Prog "SUB1" 调用：正算计算公式

"ZX=":X%? 计算显示：X

"ZY=":Y%? 计算显示：Y

"TJ=":Z[5]▲DMS%? 计算显示：方位角

Prog "GCDATA" 调用：主线高程数据库

Prog "SUB3" 调用：高程计算公式

“H=":H%? 计算显示：高程

Pol(X-Z[14],Y-Z[15]):Cls

If J＜0:Then J+360→J:IfEnd

J→Z[7]:I→Z[6]

"PJ=":Z[6]%? 计算显示：放样距离

"ANG=":Z[7] ▲DMS%? 计算显示：放样方位角

Z[8]→M:Cls:Goto 1

Lbl B

?X:?Y:90→E:X→I:Y→J

Prog "SUB2":"Kxxx+xxx=":O+W→S%?/p>

"D=":Z%?/p>

Goto 0

2、子程序-坐标正算(公式)：SUB1

0.***26→Z[1]

0.***74→Z[2]

0.***42→Z[3]

0.***82→Z[4]

1-Z[4]→F:1-Z[3]→M

U+W(Z[1]cos(G+QKZ[3]W(C+Z[3]WD))+Z[2]cos(G+QKZ[4]W(C+Z[4]WD))+Z[2]cos(G+QKFW(C+FWD))+Z[1]cos(G+QKMW(C+MWD))) →X

V+W(Z[1]sin(G+QKZ[3]W(C+Z[3]WD))+Z[2]sin(G+QKZ[4]W(C+Z[4]WD))+Z[2]sin(G+QKFW(C+FWD))+Z[1]sin(G+QKMW(C+MWD))) →Y

G+QKW(C+WD)→Z[5]

Z[5]+E→F

X+Zcos(F)→X

Y+Zsin(F)→Y

3、子程序-坐标反算(公式)：SUB2

G-90→T:Abs((Y-V)cos(T)-(X-U)sin(T))→W:0→Z

Lbl 0

Prog "SUB1"

T+QKW(C+WD)→L

(J-Y)cos(L)-(I-X)sin(L)→Z

If Abs(Z)＜1e^(-4):Then Goto 1:Else W+Z→W:Goto 0

Lbl 1

0→Z

Prog "SUB1"

(J-Y)÷sin(F)→Z

4、子程序-高程计算公式：SUB3

J-I→W:Abs(W)÷2→T:B-T→P:B+T→Q

If W＞0:Then 1→F:IfEnd

If W＜0:Then -1→F:IfEnd

B-S→U

If S≤P:Then G-IU→H:IfEnd

If S＞P And S≤B:Then G-IU+F(S-P)^2÷(2R)→H:IfEnd

If S＞B And S＜Q:Then G-JU+F(Q-S)^2÷(2R)→H:IfEnd

If S≥Q:Then 内容过长，仅展示头部和尾部部分文字预览，全文请查看图片预览。 0]:IfEnd

…… ……

本程序中：

S：要计算高程的里程桩号 B：变坡点桩号

G：变坡点高程 R：变坡点半径

I：变坡点前坡坡度 J：变坡点后坡坡度

Z[9]：道路左幅坡度 Z[10]：道路右幅坡度

7、子程序：FSDATA(确定反算范围数据库)

If X≤0.732664Y+***.947 And X≥0.732664Y+***.872

:Then 56000→S:IfEnd

…… ……

8、子程序：ZXZJS(中间式)

Abs(S-O)→W:1÷P→C:(P-R)÷(2HPR)→D

9、路基精平(ZZZZZ，N=1)

[文章尾部最后300字内容到此结束,中间部分内容请查看底下的图片预览]请点击下方选择您需要的文档下载。

1. Compression strength of stainless steel cross-sect
2. 《大学英语》期末考试三下-复习卷
3. 工程经济学复习(供参考）
4. 英语词汇内容
5. 寒假社会实践报告
6. 第7章量子化学计算方法与程序
7. 【精校版】高考全国Ⅰ卷英语试题（word版含答案）
8. 英语作文建议信
9. 第三单元阅读作业
10. ”圆的面积“教学设计
11. lesson17教学设计
12. TeachingPlan
13. pmp-examination-content-outline-july-2020
14. The clinicopathological signifcance
15. A Study on Supporting the Deployment and Evaluatio
16. Feb. 12英语作业
17. hadoop全分布安装部署

以上为《测量程序整理第N版》的无排版文字预览，完整内容请下载

测量程序整理第N版由用户“lingjuelu”分享发布，转载请注明出处 回顶部 | 首页 | 电脑版 | 举报反馈 更新时间2021-05-22 15:22:19