fx-4800p缓和曲线中桩坐标及放样计算程序第一次优化.doc

《fx-4800p缓和曲线中桩坐标及放样计算程序第一次优化.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、⑵ZH—1程序设计AC  MODE  5  1  Z  H  ALPHA—1  EXE  1Defm  10∶MB″XM″C″YM″A″JD″D″XJD″F″YJD″N″ZH″O*″HY″H″YH″P″HZ″EG″T1″RL″LS″∶Fixm∶Pol((D-B),(F-C))∶Z［6］=J∶Rec((N-M),Z［6］∶Z［2］=B+I∶Z［3］=C+J∶Lbl0∶｛K｝∶  K≤N→S=Z［6］∶Z［10］=K-M∶Prog″XY3″∶Rec(Z［10］,Z［6］∶X=B+I  ▲Y=C+J▲Goto  0∶△  K≤O*→Z［5］=K-N∶Prog″XY2″∶Prog″XY1″

2、∶Prog″XY3″∶X=Z［9］▲Y=Z［4］▲Goto  0∶△  K≤H→Z［5］=O*-N∶Prog″XY2″∶Prog″XY1″∶Z［5］=K-O*∶Z［1］=90Z［5］÷π÷R∶S=S+Z［1］+2Q∶Z［10］=2Rsin(90Z［5］÷ΠR)∶Prog″XY3″∶Rec(Z［10］,S∶X=Z［9］+I▲Y=Z［4］+J  ▲Goto  0∶△  K≤P→Z［1］=Z［6］+E∶Rec(G,Z［1］∶Z［7］=D+I∶Z［8］=F+J∶Z［5］=P-K∶Prog″XY2″∶S=180+Z［1］-Q∶Prog″XY3″∶Rec  (Z［10］,S∶X=Z［7］+I▲

3、Y=Z［8］+J▲  Goto  0  EXE  注：有*号者为英文字母。请注意英文字母O与零0的区别，以后均不再注明。  ⑶子程序  ⒈XY1程序AC  MODE  5  1  XY  ALPHA  1  EXE  1Rec(Z［10］,S∶Z［9］=Z［2］+I∶Z［4］=Z［3］+J∶  ⒉XY2程序AC  MODE  5  1  XY  ALPHA  2  EXE  1Q=30Z［5］∧2÷πRL∶S=Q+Z［6］∶Z［10］=(Z［5］-Z［5］∧5÷40R∧2L∧2)÷cosQ∶⒊XY3程序AC  MODE  5  1  XY  ALPHA  3  EXE  1U″SP

4、″=Z［10］      ▲S≥0→S″QP″=S      ▲≠→S″QP″=360+S  ▲  ⑷计算  例内宜高速公路一段曲线JD72(K55+917.27)坐标为.000,.000，az=13°21′19″，R=1200m，LS1=LS2=135m，T1=208.062m，L=414.717m，E=8.834M，ZH桩号K55+709.21M，HY桩号K55+844.210M，YH桩号K55+988.92M，HZ桩号K56+123.92M，直线点K55+485.430M，坐标为.867，.076。用偏角法进行曲线放样。用ZH—1程序计算：AC  FILE  FUNCTION

5、  1  ZH  ALPHA—1  EXE  EXE  输入数据顺序：M? 485.43     EXE  输入直线起点M的桩号尾数(M)，XM? .867    EXE  输入直线起点M的坐标(M)，YM? .076    EXEJD? 917.270     EXE  输入JD转点的桩号尾数(M)，XJD?         EXE  输入JD转点的坐标(M)，YJD?      EXEZH?      709.21        EXE  输入直缓点ZH的桩号尾数(M)，HY? 844.21     EXE   输入缓圆点HY的桩号尾数(M)，YH? 988.92       

6、 EXE  输入圆缓点YH的桩号尾数(M)，HZ? 1123.92     EXE  输入缓直点HZ的桩号尾数(M)，E?      -13°21′19″  EXE  输入转角(度),即代表ay或az，前者右转，输入正值，后者左转输入负值。R?        -1200        EXE    输入半径(M)。路线左转为负值；右转为正值。LS? 135          EXE  输入缓和曲线长度(M)，T1? 208.062     EXE   输入切线长(M)K? 600          EXE   输入放样点桩号的尾数(M)SP= 114.57     EXE   显示

7、平距(M)QP=  214°44′19.19″EXE   显示方位角(度),X= .718    EXE   显示放样点的坐标(M)Y= .790    EXEXM?        ……     EXE   输入下一放样点桩号的尾数(M)，重复计算，从略。                 计算结果見下表     测站 放样桩号  方位角    距离(M)        坐      标(M)          (M)   °′″                X Y