坐标正算程式: A“J-X” B“J-Y” C“S-X” D“S-Y” E“JDK” F“JDX” G“JDY” H“LS” I“ALF” J“ZJ” R T=(R+H2÷24R-H3÷2688R3)Tan(AbsJ÷2)+H÷2-H3÷240R2 L=R(πAbsJ÷180-H÷R) Lbo0:{KQ}:O=E-T:Z=K-O:M=I:X=F-TCosM:Y=G+TSinM:P=M-Q:S=P+180: K>E-T →Goto1:←Goto5 Lbo1:J<0→N=1:←N=2△Z[2]=(-1)N(K-O)2÷H÷R÷6×180÷π:M=I+Z[2]:P=M+2Z[2]-Q:S=P +180:Z=K-O-(K-O)5÷90÷R2H2:K>E-T+H→Gto2:←Gto5 Lbo2:O=E-T+H:Z[3]=I+(-1)NH÷2÷R×180÷π:Z[4]=(-1)N(K-O)÷R×180÷π:M=I+(-1)NH÷R÷6×180/π:Z=H-H3÷90R2:X=X+XCosM:Y=Y+SinM:M=Z[3]+Z[4]÷2:Z=2RSin((-1)NZ[4]÷2):P=Z[3]+Z[4]-Q:S=P+180:K>E-T+H+L→Goto3:←GotoO5 Lbo3:O=E-T+2H+L:M=I+J:Z=K-O:X=F+TCosM:Y=G+TSinM:P=M-Q:S=P+180:K<O→Goto4:←Goto5 Lbo4:J<0→N=2:←N=2△Z[1]=(-1)N(K-O)2÷H÷R÷6×180÷π:Z=K-O-(K-O)5÷90÷R2H2:M=M+Z[1]:P=M+2Z[1]-Q:S=P+180:Goto5 Lbo5:X“XZ”=X+ZCosM▲Y“YZ”=Y+ZSinM▲V=X:W=Y:Prog“A”:{U}:V“XL”=X+U“LL”CosP▲W“YL”=Y+USinP▲Prog“A”:{U}:V“XR”=X+U“LR”CosS▲W“YR”=Y+USinS▲Prog“A” “A” Z“LINE”=√((V-C)2+(W-D)2)▲N“DMS”=ARG((V-C)+W-D)i)-ARG((A-C)+(B-D)i)▲N“DMS+360”=N+360▲{UV}Z“Q×QLINE”=Z-U“SLINE”×COS(90-V“QQ”)▲ 符号说明: J-X?:前视点(定向点)X坐标; J-Y?:前视点(定向点)Y坐标; S-X?:置仪点X坐标; S-Y?:置仪点Y坐标; JDX?:曲线交点桩X坐标; JDY?:曲线交点Y坐标; R?:圆曲线半径M; LS?:缓和曲线长M; ALF?:该交点与前一交点直线段的方位角(以度计); ZJ?:该曲线转角(左转为正、右转为负); K?:欲求点桩号; Q?:左边桩与路线前进方向的夹角; XZ:欲求点X坐标; YZ:欲求点Y坐标; DMS:欲求点与定向点的夹角; DMS+360:夹角+360度; (当DMS为正时采用DMS、当DMS为负时采用DMS+360值) LINE:欲求点至置仪点平距; SLINE?:测距仪测得梭镜到置仪点斜距; QQ?:坚直角; QQ*LINE:梭镜顺视线方向移动距离(正为延长、负为缩短) LL?:左幅路宽; LR:右幅路宽; XL:左边桩X值; YL:左边桩Y值; XR:右边桩X值; YR:右边桩Y坐标;
|