匝道互通测量计算程序.docxVIP

计算桩号、方位角 F1 SZH FWJ LI P:U:R:S:A:B L2 Lbl 0 L3 {CD} L4 L=Pol(A—C，B —D) ‘ L5 Q=W+180, L6 S=1=QU— 1=Q=Q+36O △△ L7 S=—1=〉Q〉U+1 = Q=Q—360 △△ L8 Z=P+nSR(Q-U)/180 ‘ L9 K=S(R—L) a LI0 Goto 0 算方位角和两点之间距离输入A、B、C、Do 算任意点对应于线路的桩号和该点至中桩的距离，负为左、正为 右。 该程序仅适用于圆曲线。 P为曲线起点桩号，U为圆心至P的方位角，R为半径，曲线右 偏时S=1 ,曲线左偏时S=—1 , A、B为圆心坐标，C、D为 该段任意点坐标。 算主线坐标 F2 ZXZB LI LblO L2 {ZBV}:ZBV:Fixm L3 84400= ZW86606.572= N=14016.054:E=74192.550: H=8396017:F=179° 547 12.3〃 :S=l:R=5500:Goto 1 △△ L4 Z^86606.572= Z^89680.676= N=3982.865:E=68993.985: H=86606.572:F=27° 237 25.2〃 :S=-l:R=5800:Goto 1 △△ L5 89680.676= ZW91465.51= N=15267.61 :E=68407.029: H=89680.676:F=177° 01，21.2〃 :S=l:R=5500:Goto 1 △△ L6 Z^91465.51= ZW94154.398= N=4288.409:E=65338.292: H=91465.51:F=15° 36’ 57.3〃 :S=-l:R=5900:Goto 1 △△ L7 Lbl 1:Q=F+18OS(Z—H)/( n R) L8 X=N+RcosQ+Bcos(Q+90S+V) ‘ L9 Y=E+RsinQ+Bsin(Q+90S+V) ‘ L10 Goto 0a Z 所求桩号 F 圆心至起点方位角 B— —中桩至边桩距离(左输负、右输正、中桩输0) S 曲线右偏为正，左偏为负. R 半径 V——与线路前进方向的角度 N、E——圆心坐标 H——圆曲线起点桩号 X、Y——所求点坐标 算缓和曲线坐标 SHQ LI H:N:E:D、LS〃：R:F:S:K L2 Lbl 1 L3 {ZB} L4 C=RD:L=Abs(H—Z) L5 X=L - L5/40/C2+ L9/3456/C4 L6 Y= L3/6/C-L7/336/C3+ Lu/42240/C5 L7 I=Pol(X,Y) L8 P=F+KW L9 O=90L2/( n C):O=F+KO LIO S=-l= O 180 = 0=0-180:^0=04-180 △△ L11 X=N+IcosP+Bcos(O+90) a L12 Y=E+IsinP+Bsin(O+90) ‘ L13 Goto 1 △ N、E— -ZH（或HZ）坐标 F— —ZH（或HZ）点至交点切线方位角 R 圆曲线半径 Z 所求桩号 LS 缓和曲线长度 B— —中桩至边桩距离（左输负、右输正、中桩输0） S 缓和曲线左偏时为右偏时为+1. K 缓和曲线左偏时为?1,右偏时为+1 H——缓直点（或直缓点）桩号 X、Y 所求点坐标 算圆曲线坐标 SYQ L1 H:N:E:F:R:S L2 LblO L3 {ZBV} L4 Q=F+180S(Z —H)/ nR L5 X=N+RcosQ+Bcos(Q+90S+V) j L6 Y=E+RsinQ+Bsin(Q+90S+V) / L7 Goto 0 △ H— —圆曲线起点桩号 N、E——圆心坐标 F 圆心至起点方位角 R 半径 S 曲线左偏时为右偏时为+1. z—所求桩号 B 中桩至边桩距离（左输负、右输正、中桩输0） V——所求桩号与路线交角（正交为90） X、Y 所求点坐标 算直线坐标 SZX LI H:N:E:F L2 Lbl 0 L3 {ZBV} L4 X=N+(Z — H)cosF+Bcos(F+V) ‘ L5 Y=E+(Z—H)sinF+Bsin(F+V) / L6 Goto 0 N、E 直线段起点坐标 H 直线段起点桩号 F 直线段前进方向方位角 Z 所求桩号 B——中桩至边桩距离(左输负、右输正、中桩输0) V——所求桩号与路线交角(正交为90) X、Y 所求点坐标 算直线桩号 SZXZH L1 A： B： S： T L2 LblO L3 {IJ} L4 L=Pol(S-I,T-J) ‘ L5 Q=W+180 j L6 QB=〉Q=Q+360 L7 Z=A+Lcos(Q —B) a L8 K=Ls