5800测量程序

5800测量程序

1、正算:Z

 

2、反算:F

 

3、路任意里程点坐标:XL-ZB

 

4、路任意坐标点里程:XL-LC

(任意里程)

(坐标点里程) ◢(坐标点到中线距离)

11、极坐标法主程序:JZBF

9=DimZ

ABS(K-F)→ Z[1]

(E-D)/ABS(G-F)* Z[1]→Z[2]

C+( Z[2]+2D)* Z[1]*90/π→W

W<0=>W+360→W

C+( Z[2]/8+2D)* Z[1]*45/(4π) →Z[3]

C+(3 Z[2]/8+2D)* Z[1] *135/(4π) →Z[4]

C+(5 Z[2]/8+2D)* Z[1] *225/(4π) →Z[5]

C+(7 Z[2]/8+2D)* Z[1] *315/(4π) →Z[6]

C+( Z[2]/4+2D)* Z[1] *45/(2π) →Z[7]

C+( Z[2]/2+2D)* Z[1] *45/π→Z[8]

C+(3 Z[2]/4+2D)* Z[1]*135/(2π) →Z[9]

A+ Z[1]/24*(COS(C)+4(COS(Z[3])+COS(Z[4])+COS(Z[5])+COS(Z[6]))+2(COS(Z[7])+COS(Z[8])+COS(Z[9]))+COS(W)) →L 

B+ Z[1]/24*(SIN(C)+4(SIN(Z[3])+SIN(Z[4])+SIN(Z[5])+SIN(Z[6]))+2(SIN(Z[7])+SIN(Z[8])+SIN(Z[9]))+SIN(W)) →O

 

12、直曲线资料:J-1

IF K<****.***: THEN *→A:*→B:*→C:*→D:*→E: *→ F: *→G  :Goto 0 :

———-

LBI 0

注:K—–测点里程        DKI

A—–起点X          XA

B—–起点Y          YA

C—–起点坐标方位角  CA

D—–起点曲率        1/RA 左偏为负;右偏为正

E——终点曲率        1/RB 左偏为负;右偏为正

F——起点里程        DKA

G——终点里程        DKB

分享到 :