曲线(含直线)任意里程中边桩坐标正反算[2]

《曲线(含直线)任意里程中边桩坐标正反算[2]》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、曲线（含直线）任意里程中边桩坐标正反算（CASIOfx-4800p&fx-4850）J-SQX(竖曲线数据输入)“J-SQX”:{NHUVMQP}:Z[10]=H“JDZ”:Z[11]=U“I1”:Z[12]=V“I2”:Z[13]=M“R”:Z[14]=Q“QD”:Z[15]=P“ZD”:“TOJ-JSMS”J-PQX(平曲线数据输入,自动切换到J-JSMS)A“JD”B“JDX”C“JDY”F“FJ”O“ZJ：Z-，Y+”RE“LS1”K“LS2”：E＜1=＞E=1E-9⊿K＜1=＞K=1E-9⊿Z[1]=EE÷(24R)-E^4÷(2688RRR):Z[2]=E÷2-E

2、EE÷(240RR):X=(EE-KK)÷(24R)÷sinAbsO:Z[3]“T1”=(R+Z[1])tan(AbsO÷2)+Z[2]-X▲Z[4]“T2”=(R+KK÷(24R)-K^4÷(2688RRR)tan(AbsO÷2)+K÷2-KKK÷(240RR)+X▲L=AbsOπR÷180+(E+K)÷2▲J=tan-1((R+Z[1])÷(Z[3]-Z[2])):X“E”=(R+Z[1])÷sinJ-R▲X=A-Z[3]:Y=X+E:E＜1=＞X“ZY”▲≠=＞X“ZH”▲Y“HY”▲⊿Y“QZ”=X+(L-K-E)÷2+E▲Y=X+L-K:X=X+L:K＜1=＞X“Y

3、Z”▲≠=＞Y“YH”▲X“HZ”▲⊿Prog“J-JSMS”J-JSMS(放样模式主程序)“1-ZS,2-F1,3-FS”:“4-F2,5-Z0,6-DM”:Lb10:{Z}:Z“MS”≤2=＞Goto1:≠=＞Z≤4=＞Goto2:≠=＞Goto3⊿⊿Lb11:{PDW}:PD“BZ”W“BJ”:Prog“JP”:X“X=”▲Y“Y=”▲Z＜2=＞Goto1:≠=＞Prog“JS”:Prog“JC”:H“Z”=H+G▲Goto1⊿Lb12:{XYW}:XYW“BJ”:Prog“JF”:P“P=”▲D“BZ=”▲Z＜4=＞Goto2:≠=＞{Q}:Q“ZP”:Prog“JS

4、”:Prog“JC”:Prog“JB”:Goto2⊿Lb13:{P}:P:Prog“JS”:H“Z0=”▲Z＜6=＞Goto3:≠=＞{D}:S“CGZ”:T“JKZ”:Z[8]=Q“LH”:D“BZ”:Prog“JC”:J“JK=”▲G“Z”=H+G▲Goto0⊿JS(竖曲线计算主程序)P＜Z[14]=＞Prog“J-SQX”⊿P＞Z[15]=＞Prog“SJ-SQX”⊿N=Z[9]:U=Z[11]:V=Z[12]:H=Z[13]:G=HAbs(U-V)÷200:P＜N=＞I=U:M=N-G:M＞P=＞M=P⊿≠=＞I=V:M=N+G:M＜P=＞M=P⊿⊿J=(P-M)2÷

5、(2H):U-V＞0=＞J=-J⊿H=Z[10]+(P-N)×I÷100+JJP(平曲线正算子程序)FixmLb11:J=F:X=B-Z[3]cosF:Y=C-Z[3]sinF:G=EP≤A-Z[3]=＞I=A-Z[3]-P:M=-I:N=0:H=F+W:Goto5≠=＞P≤A-Z[3]+E=＞I=P-A+Z[3]:H=90II÷(REπ):O＜0=＞H=-H⊿H=H+W+F:Goto3≠=＞P≤A-Z[3]+L-K=＞I=P-A+Z[3]-E:Goto4:≠=＞Goto2⊿⊿Lb12：X=B+Z[4]cos（F+O）：Y=C+Z[4]sin（F+O）：J=F+O+180：G

6、=KPage7of7P≤A-Z[3]+L=＞I=A-Z[3]+L-P:H=90II÷(RKπ):O＞0=＞H=-H⊿H=H+J+W+180:Goto3≠=＞I=P-A+Z[3]-L:M=-I：N=0：H=J+W+180：Goto5Lb13：M=I-I^5÷(40RRGG):N=III÷(6GR)-I^7÷(336RRRGGG):Goto5Lb14:H=(E+2I)×90÷(πR):M=Rsin(H+Z[2]:N=R(1-cosH)+Z[1]:O＜0=＞H=-H⊿H=J+W+H:Goto5Lb15:P≤A-Z[3]+L-K=＞O＜0=＞N=-N⊿≠=＞O＞0=＞N=-N⊿⊿Go

7、to6Lb16:X=X+McosJ-NsinJ+DcosH:Y=Y+MsinJ+NcosJ+DsinHJF(平曲线反算子程序)FixmU=X:V=Y:D=0:J=F-W:P=A+(Y-C)cosJ-(X-B)sinJLb11:Prog“JP”:J=H-180:I=(V-Y)cosJ-(U-X)sinJ:AbsI＜1E-4=＞Goto2:≠=＞P=P+I:Goto1⊿Lb12:D=(V-Y)÷sinHJC(超高加宽计算子程序)Fixm:Z[8]＜1=＞Z[8]=1E-8⊿I=E:M=A-Z[3]:E＜1=