放样反算程序fx4800

《放样反算程序fx4800》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、放样反算程序fx4800（广西力王集团公路科――黄民权编制）(13978486123)PMFY(平面放样)L1P“X ”:Q“Y ”:Prog“A1”L2Z“WJ”:LbI :{KB}L3Prog“A”L4X=Z[1]+Bcos(Z+Z[7]):Y=Z[2]+Bsin(Z+Z[7]):I=X-P：J=Y-Q：Prog“B”L5Fix3:Z[10]“W”=JyZ[15]“V”=IyXyYyL6Norm：Goto 输入说明：X ,Y :测站坐标JD2:第二交点桩号显示说明:W:放样点方位角X1、Y1:第一交点坐标V:放样点至测站水平距离X2、Y2:第二交点坐标X,Y:放样点

2、设计纵横坐标值X3、Y3:第三交点坐标LS:缓和曲线长WJ:交角（正交为90°）K:放样点桩号B:放样点距中值(左－右+)PMFS(平面反算)L1Prog“A1”L2K=W-T:LbI ：{XY}L3X:Y:LbI1:Prog“A”L4I=X-Z[1]：J=Y-Z[2]：Prog“B”：S=Icos（J-Z[7]）L5K=K+SL6S＜ . 1ÞGoto4:≠ÞGoto1xL7LbI4:S＞- . 1ÞGoto5:≠ÞGoto1xL8LbI5:B=Isin(J-Z[7])L9Fix3:KyByL10Norm：Goto 输入说明：显示说明:JD2：第二交点桩号T：切线长S

3、曲线长X、Y：实测测点坐标K：反算出的桩号X1、Y1：第一交点坐标B：反算出的距中值(左－右+)X2、Y2：第二交点坐标X3、Y3：第三交点坐标LS：缓和曲线长　　　　　　　　[本程序适用于两头缓和曲线等长的路线]A1L1Defm2 :W“JD2”:D“X1”：E“Y1”：F“X2”：G“Y2”：H“X3”：V“Y3”：R：L“LS”L2I=D-F：J=E-G：Prog“B”：O=J：I=H-F：J=V-G：Prog“B”：U=JL3M=O-U：M＜ ÞM=M+36 xM＜18 ÞM=18 -M：C=1:≠ÞM=M-18 ：C=-1xL4Z[11]“P”=L2/（24R

4、）：Z[12]“Q”=L/2-L3/（24 R2）：T“T”=Z[12]+（Z[11]+R）tan（M/2）yZ[3]“S”=RMπ/18 +LyL5Z[4]=O-18 ：Z[5]=UAL2I=K-W+T：I＜Z[3]-LÞI≤ ÞM=I：N= ：Z[7]=Z[4]：Goto2xI≤LÞZ[6]=Z[4]：Z[9]=C:Prog“C”：≠ÞZ[6]=Z[4]：Z[9]=C:Prog“E”xLbI2：J=O：Prog“F”：Goto3xI=Z[3]-IL3I> ÞZ[9]=-C:Z[6]=Z[5]：Prog“C”：N=-NxI≤ ÞM=I:N= :Z[7]=Z[5]xJ=

5、U：Prog“F”：Goto3L4LbI3BL1Pol（I，J）：J< ÞJ=J+36 xCL1A=RL:M=I-I5/(4 A2):N=I3/(6A)-I7/(336A3):A=9 I2/(πA):Prog“Ｄ”DL1Z[7]=Z[6]+Z[9]A:Z[7]＜ ÞZ[7]=Z[7]+36 xA=A:M=M:N=CNEL1A=9 /（πR）×(2×Abs(I)-L):M=RsinA+Z[12]:N=Z[11]+R(1-cosA):Prog“Ｄ”FL1A=cosJ:J=sinJ:Z[1]=F+TA-MA+NJ:Z[2]=G+TJ-MJ-NACASIO4800工程竖曲线计算

6、程序：　　　　.1A“I1”：B“I2”：C“BD”：E“BH”：R　　　2W=A-B：T=RAbs（W/100）/2　　　3W≥0=>K=-1：≠=>K=1⊿　　4F=C-T：G=C+T　　　5D≤F=>H=（D-C）A/100+E：≠=>　　　6D≤C=>H=（D-C）A/100+E+K（D-F）∧2/2/R：≠=>　　　7D≤G=>H=（D-C）B/100+E+K（D-G）∧2/2/R：≠=>　　　8D≥G=>H=（D-C）B/100+E⊿　　9H◢　　I1，I2　　输入坡度　　BD？　　　输入变坡点桩号　　BH？　　　输入变坡点高程　　R？　　　输入竖曲线半径　

7、　D？　　　输入任意桩号　　H　　　　计算点高程