⑴ 有关资料
    基本公式  略  
   ⑵ZH—2程序设计
AC  MODE  5  1  Z  H  ALPHA — 2  EXE  1
Defm  10  EXE  M ∶ B″XM″∶C″YM″∶ A″JD″∶D″XJD″∶F″YJD″∶N″ZH″∶
O*″HY″∶H″YH″∶P″H Z″∶E∶G″T 1″∶R∶L″L S″∶T″X0″∶U″Y0″∶
Fixm∶Pol((D-B ),(F-C∶Z［6］= J∶ Rec((N - M ),Z［6］∶Z［2］= B+I ∶
Z［3］= C + J ∶ LbI 0 ∶｛ K ｝∶
K ≤ N=> S= Z［6］∶Z［10］=K- M∶ Rec (Z［1 0］, Z［6］ ∶
X= B+ I ▲ Y = C + J ▲  Prog ″XY4″∶ Goto 0 ∶ △
K ≤ O* => Z ［5］= K- N∶Prog ″XY2″∶ Prog ″XY1″∶
X= Z［9］▲ Y= Z［4］▲  Prog ″XY4″∶Goto  0 ∶ △
K≤ H => Z［5］= O*- N∶ Prog ″X Y 2 ″∶ Prog ″X Y 1 ″∶Z［5］= K- O*∶
Z［1］=90Z［5］÷ πR∶ S = S+Z［1］+2Q∶ Z［10］=2 R sin(90Z［5］÷π R)∶
Rec (Z［10］,S ∶X=Z［9］+ I ▲  Y=Z［4］+ J ▲  Prog ″XY4″∶ 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 ″X Y 2 ″∶ S= 180 + Z［1］- Q  ∶Rec (Z［10］, S∶
X=Z［7］+ I ▲ Y=Z［8］+ J ▲  Prog ″XY4″∶Goto  0 ∶ EXE
  注：有*号者为英文字母。请注意英文字母O与零0的区别，以后均不再注明。
  ⑶ 子程序
  ⒈ XY1程序
AC  MODE  5  1  X Y  ALPHA  1  EXE  1
Rec(Z［10］, S ∶Z［9］=Z［2］+I ∶ Z［4］= Z［3］+ J ∶
  ⒉ XY2程序
AC  MODE  5  1  X Y  ALPHA  2  EXE  1
Q = 30 Z［5］∧2÷ π R L∶ S = Q+Z［6］∶
Z［10］= (Z［5］- Z［5］∧5 ÷40 R∧2 L∧2)÷cos Q ∶
  ⒊ XY4程序
AC  MODE  5  1  X Y  ALPHA  4  EXE  1
S=X-T ∶ Q=Y-U ∶ Pol (S , Q )∶
S″SP″=I ▲  J＜0=>Q″QP″= 360 + J ▲ ≠> Q″QP″= J  ▲
  ⑷计算
  例、内宜高速公路一段曲线JD69 (K54+010.87 m) 坐标为 231725.000 m,478790.000 m，ay=26°31′24″，R=800m，LS1=LS2=150m，T1=T2=263.801m，LS1=LS2=150m，E=23.122M，ZH桩号K53+747.07M，HY桩号K53+897.07M，YH桩号K54+117.41M，HZ桩号K54+267.41M，直线点M桩号,K53+500.000M，坐标为232234.440,478751.757 m。以导线点DA26 (231521.464,478694.965 m) 为测站，用偏角法对各中桩进行放样并计算其坐标。
用ZH—2程序计算：AC  FILE  FUNCTION  1  ZH  ALPHA — 2  EXE   EXE   输入数据顺序：
M? 500                   EXE  输入直线起点M的桩号尾数(M)，
XM? 232234.440     EXE 输入直线起点M的坐标(M)，
YM? 478751.757     EXE
JD? 1010.87              EXE 输入JD转点的桩号尾数(M)，
XJD? 231725                EXE 输入JD转点的坐标(M)，
YJD? 478790      EXE
ZH? 747.07      EXE 输入直缓点ZH的桩号尾数(M)，
HY? 897.07      EXE 输入缓圆点HY的桩号尾数(M)，
YH? 1117.41      EXE 输入圆缓点YH的桩号尾数(M)，
HZ? 1267.41      EXE 输入缓直点HZ的桩号尾数(M)，
E?       26°31′24″           EXE  输入转角(度),即代表ay或az，前者右转，输入正值，后者左转输入负值。
R? 800      EXE 输入半径(M)。路线左转为负值；右转为正值。
LS? 150      EXE 输入缓和曲线长度(M)，
T1? 263.801      EXE 输入切线长(M)
X0? 231521.464     EXE 输入测站点DA26的坐标，
Y0?       478759.482     EXE
K? 608      EXE 输入放样点桩号的尾数(M)
X= 232126.743     EXE 显示放样点的坐标(M)
Y= 478759.842     EXE
SP= 608.746      EXE 显示平距(M)www.tmgc8.com
QP= 6°07′04.35″     EXE 显示方位角(度),
K? 800      EXE 重复计算，输入第二放样点桩号的尾数(M)，
X= 231935.267     EXE 
Y= 478774.009     EXE
QP= 10°48′51.38″     EXE
SP= 421.285              EXE 
……            从略。
  ⑸说明
  ⒈有关计算应注意的问题请参見XY-1程序使用说明。
  ⒉本程序专门用于缓和曲线中桩采用极坐标放样法，测站设置在任何位置而设计的。请与XY-1程序应用范围相区别。

上一篇：电厂建筑物火灾的应急照明设计