第9章fx-4800程序.docVIP

第9章 在路线设计中的应用fx-4800P程序 §9.1 单交点平曲线计算 §9.1.1 外距控制单交点平曲线设计 程序名：WJYQX Lbl 0 A “JA”:E”EH”:L“LS” N=1÷cos(0.5A):M=E÷(N-1):O=NL2÷(24N-24):Q=M2-4O Q0Goto 0: R=0.5(M+Q) §9.1.2 切线长控制单交点平曲线设计 程序名：QXYQX A “JA”:T“TH”:L“LS”:J“JINDU” N=tan(A÷2):M=L2N÷24:O=-L^3÷240:Q=0.5 L-T:S=-Q÷M Lbl 1 U=NS^3+QS2+MS+O:V=3NS2+2QS+M:R=S-U÷V Abs(R-S)JS=R:Goto 1: R”R=“ §9.1.3 设置不对称缓和曲线单交点平曲线计算 程序名：NCJSTAKE K”JA”:R:”R”:J”JDZH”: N”LS1”:M”LS2” Q=N?2-N^3?240R2 S=M?2-M^3?240R2 P=N2?24R-N^4?2384R^3 U=M2?24R-M^4?2384R^3 B=28.6479N?R V=28.6479M?R T=(R+U)tan(K?)9 +Q+(P-U)鱰anK置 W=(R+U)tan(K?)a +S+(P-U)鱯inK不 Y=0.0174533 R (K –B-V) L=Y+N+M A”ZH”=J-T C”HY”=A+N D”QZ”=C+0.5Y F”YH”=D+0.5Y G”HZ”=F+M §9.1.4 单交点双圆曲线计算 程序名：SJDYSTAKE K”JA1”:M”JA2”:R:”R1”:S:”R2”:J”JDZH” D=Rtan(0.5K):E=Stan(0.5M) T”T1”=D+(D+E)sinM鱯in(K+M)n W”T2”=E+(D+E)sinK鱯in(K+M)n U=3.1416RK?80:V=3.1416RM?80 L=U+VX A”ZY”=J-T B”GQ”=A+U C”YZ”=B+V ?9.2 多交点平曲线设计 §9.2.1不与基线相切双交点单圆曲线计算 程序名：XJDYQX Lbl 0 R: K”AB”:C”A1”:D”A2”: J”JDA” E”ZHUANJ”=C+D A=KsinC÷sinE:B= KsinD÷sinE T=Rtan(0.5E) Q”T1”=T-B S”T2”=T-A L=0.0174533RE U”ZY”=J-Q V”QZ”=U+0.5L Y”YZ”=U+L §9.2.2 与基线相切双交点单圆曲线计算 程序名：JQ2JYQX Lbl 0 K”AB”: C”A1”: D”A2”: J”JDA” E”ZHUANJ”=C+D R=K?ltan(0.5C)+tan(0.5D)):T=Rtan(0.5E) Q”T1”=Rtan(0.5C) S”T2”=Rtan(0.5D) L=0.0174533RE U”ZY”=J-Q V”QZ”=U+0.5L Y”YZ”=U+L ?.2.53 基线转向相反双交点单圆曲线计算 程序名：JXFYQX Lbl 0 R: K”AB”: C”A1”: D”A2”: J”JDA” E”ZHUANJ”= D-C A=KsinC÷sinE:B= KsinD÷sinE T=Rtan(0.5E) Q”T1”=T-B S”T2”=T+A L=0.0174533RE U”ZY”=J-Q V”QZ”=U+0.5L Y”YZ”=U+L §9.2.4 三点虚交单圆曲线计算 程序名：TRIJDYQX Lbl 0 R: K”AB”: N”BC”:C”A1”: D”A2”: F”A3”: J”JDA” E”ZHUANJ”=C+D+F A=NsinF?sin(D+F):B= NsinD?sin(D+F):G=(K+A)sin(D+F)?sinE H=(K+A)sinC?sinE:T=Rtan(0.5E) Q”T1”=T-G S”T2”=T-H-B L=0.0174533RE U”ZY”=J-Q V”QZ”=U+0.5L Y”YZ”=U+L ?.2.55多点虚交单圆曲线计算 程序名：MJDYQX Lbl 0 R: K”LAB”:C”AAB”:D”AAC”:E”ABW”: J”JDA” G=Abs (C-D):H= Abs (E-C):E”ZHUANJ”=G+H A=KsinG÷sinE:B= KsinH÷sinE:T=Rtan(0.5E) Q”T1”=T-B S”T2”=T-A L=0.0174533RE U”ZY”=J-Q V”QZ”=U+0.5L Y”YZ”=U+L §9.2.6 S形曲线连接计算 程序名：SQX Lbl 0 B”R1”:K”R2”:CI1”:D”l2”:W”LS1