主线匝道施工放样程序4850P-B

《主线匝道施工放样程序4850P-B》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、GISGFYCX-B放样程序(fx-4850P)Me1Defm45Lbl7{X}：X〃KI二〃:Z[25]=X{X}:X〃K2=〃:X:Z[26]=XCisZ[26]=2=>Goto0Z{X}:X〃XA=〃:Z[27]=X:X=0=>

2、GotoY

3、/{Y}：Y〃YA二〃:Z[28]=YCis{X}：X〃XB=〃:{Y}：Y〃YB=〃:Z[23]=X：Z[24]=YPol(Z[23]-Z[27].Z[24]-Z[28]):J<0=>J+36O->JZ1"F二":JDMSkZ[40]二J〃D二〃：Ik(计算后视点方

4、位角距离)CisLbl0LblY{M}:M〃M=〃M=10=>Goto8Z1M=1=>PM=2=>PM=3=>PM=4=>PM=5=>PAA〃:GotoAZ1BB":GotoA/CC〃:GotoAZ1DD〃:GotoA/LA〃:GotoA/〃g〃g〃g〃M=11=>PM=12=>PM=13=>PM=14=>PAAA〃:GotoAZ1BBB〃:GotoA/CCC〃:GotoAZ1DDD":GotoA/〃g〃g〃gLblYCisLbl8{K}:K〃CD=〃K=0=>Goto7/KW161240.227=>PKW16

5、3826.133=>PKW166083.699=>PKW167003.247=>PKW168133・984=>PK<168746.094=>PKW169293.139=>PJD21〃:GotoAzJD22":GotoAZ1JD23〃:GotoAZ1JD24〃:GotoAZ1JD25〃:GotoAZIJD26〃:GotoAZ1JD27〃:GotoAZ1g〃gg〃gg〃gKW170166.KW171127.KW175428.KW178669.KW179805.502=>Pr165=>Pr300=>Pr069=>Pr

6、707=>Prog〃JD28"og〃JD29"og〃JD30〃og〃JD31〃og〃JD32〃KW181350.250=>PJD33〃KW184137・466=>PJD34〃KW186078.570=>PJD35〃KW188716.259=>PffJD36"GotoAZ1GotoAZ1GotoAZ1GotoAZ1GotoAZIGotoAZ1GotoAZ1GotoAZ1GotoAZ1LblAZ[l]“Pl”二S'/24/R-S72688/R3（后切线常数）Z[2]“P2”=W2/24/R-W4/2688/R3（前

7、切线常数）Z[3]“QI”二S/2-S'/24零/R2+S5/3456零/R4（后切线常数）Z[4]“Q2”=W/2-W3/24零/R2+W73456零/R1（前切线常数）Z[5>tan_1（（（R+Z[2]）/（R+Z[1]）-cosA）/sinA）（反算角度）31.5920Z[6]“Tl”二（R+Z[l]）tanZ[5]+Z[3]（后切线长）Z[7]“T2”二（R+Z⑵）tan（A-Z⑸）+Z[4]（前切线长）Z[8]“B零1”二18零S/2/R/n（Z[10]过度常数）Z⑼“B零2”二180W/2/R/J

8、T（Z[10]过度常数）Z[10]二A-Z[8]-Z[9]（计算园曲线长过度常数）Z[ll]“LY”二JiRZ[10]/180（园曲线长）Z[12]二“Lh”二S+W+Z[ll]（曲线全长）Z[13>(直缓点)469.93Z[14>“HY”二Z[13]+S(缓园点)Z[15]二“YH”二Z[14]+Z[ll](园缓点)Z[16]二“HZ”二Z[13]+Z[12](缓直点)判别中桩里程位于曲线何处KWZ[13]二〉GoToUKWZ[14]二〉GoTo2/KWZ[15]二〉GoTo3jKWZ[16]二〉GoTo4/

9、K>Z[16]二〉GoTo9/LbI1:L二Z[13]-K:V=QU=Q+180Z[42]=LGoTo5LbI2:L=K-Z[13]:Z[42]V根号((L3/(6RS)-L7/(336R3S3)+L11/(42240R5S5))2+(L-L5/(40R2S2)+L9/(3456R4S4))2):U二Q+3零L2B/nRSV二Q+9零L2B/jiRS:Goto5LbI3vhq+ba—9

10、hvpro:fd、、z〔26〕H2HVGOtoTCisLbl6-(N二N、、szl、Z〔21VN-z〔21v0HVGOtoV/lLHK—S4〕心〔17VRsin(90(s+2L)(=R))+Z〔3TZ〔18VR(1—COS(90(S+2L)JIR))+Z〔1〕042〕—J(Z〔S2+Z〔18〕2)ehq+btan丄(z〔邑、z〔17〕)VUQ+9^lB(s+2L)、nRGobo