歡迎來到http://www.tljciu.live !
當前位置:六六工程資料網建筑課堂工程資料工程測量CASIO4800公路高程計算程序

CASIO4800公路高程計算程序

08-22 13:58:18  瀏覽次數:401次  欄目:工程測量
標簽:工程測量規范,工程測量技術, CASIO4800公路高程計算程序,http://www.tljciu.live
CASIO4800公路高程計算程序(計算任一點中邊樁高程,輸入樁號即可) 作者:陳 he ming 
有了它,上工地時,告別圖紙,資料(高程)

ZDGC(程序名)
1 V “Change 0-Only One:1-Auto Next One”(回車)
2 V=1=> L=1000K+M-20: ≠>V﹥1=>Prog “ZDGC” ⊿ ⊿(如V取1,則將自動計算每隔20M)
3 Lbl 0
4 V=1 =>L=L+20:Goto 1⊿(要得到10M一個樁的高程,把20改成10就可.或則在運行時取v=0即可,就是每次要輸入樁號)
5 {K,M}
6 L=1000K+M

7 Lbl 1
8 Prog “G”
9  Prog “SQX”
10  Prog “G1”
11  Prog “PQX-H”
12 Goto 0
(1-12為步號,在輸入4800時,不要輸,步號間用回車.下同)
主程序2
SQX(程序名)
1 N=A-T
2 W=A+T
3 U=Abs (A-L)
4 L≤N=>Z=H-JU:Goto 1 ⊿
5 L≤A=>Z=H-JU+(L-N)2(平方)/(2R):Goto 1 ⊿
6 L≤W=>Z=H+IU+(W-L)2(平方)/(2R):Goto 1 ⊿
7 L>W=>Z=H+IU ⊿
8 Lbl 1
主程序3
PQX-H(程序名)
1 L≤S=>E=0.02:G=E:Goto 1 ⊿(其中E=.02為默認橫披值)
2 L≤(S+B)=>E=0.02-(L-S)/B×(0.02+C):G= -E:Abs (E) ≤0.02=>G=0.02: ⊿Goto 1:⊿
3 L≤(S+Q-B)=>E= -C:G= -E:Goto 1 ⊿
4 L≤(S+Q)=>E=0.02-(S+Q-L)/B×(0.02+C):G= -E:Abs (E) ≤0.02=>G=0.02: ⊿Goto 1:⊿
5 L>(S+Q)=>E=0.02:G=E⊿
6 Lbl 1
7 {D}(輸入邊樁距中樁距離)
8 D=99=>Prog “ZDGC” ⊿
9 F=1=>O=Z-(D-1)E:P=Z-(D-1)G: ≠>F=-1=>O=Z-(D-1)G:P=Z-(D-1)E⊿⊿((D-1)中,把1改成0.5則中央分隔帶為1M.默認中央分隔帶為2M)
10 Prog “XS1”
子程序1(豎曲線引導程序)
G(程序名)
1 L ≤123456=>Prog“J1”:Goto 1: ⊿ (123456為第一豎曲線終點樁號)
2 L≤123457=>Prog“J2”:Goto 1: ⊿ (123457為第二豎曲線終點樁號)
3 ***************
4 L≤123458=>Prog “J3” ⊿ (123458為公路終點樁號)
5 F>123458=>“INPUT L≤123458”:Prog“ZDGC”:⊿ (123458為公路終點樁號)
6 Lbl 1



子程序2 (平曲線引導程序)
G1(程序名)
1 L ≤755.53=>Prog“4”:Goto 1: ⊿ (755.53為第一平曲線超高終點樁號)
2 L≤123457=>Prog“5”:Goto 1: ⊿ (123457為第二平曲線超高終點樁號)
3 ***************
4 L≤123458=>Prog “6” ⊿ (123458為公路終點樁號)
5 Lbl 1(其中的"1","2"...與"4","5"...分別代表豎曲線與平曲線要素程序
,如一條線路上有8個豎曲線,則在豎曲線引導程序中一直到Prog “8”為止.)



子程序3 (豎曲線要素)
1(程序名)
1 R= -18000 (豎曲線半徑,凸取負,凹取正)
2 T=81 (豎曲線切線長)
3 A=330 (豎曲線中心樁號)
4 H=8.98 (變坡點高程)
5 J=0.006 (變坡點前縱坡)
6 I= -0.003 (變坡點后縱坡)
子程序4 (平曲線要素)
4(程序名)
1 B=148 (超高緩和曲線長度)
2 Q=532.29 (超高曲線全長度)
3 C=0.04 (超高值)
4 F=1 或-1(曲線右,左參數)
5 S=223.24 (超高緩和起點樁號)

XS1(程序名)
1 Z“H1”=Z◢(顯示縱斷設計值)
2 V=0=>Goto 0⊿
3 L◢(當自動計算時顯示樁號)
4 Lbl0
5 D=0=>Goto 1 ⊿
6 O “H1L”=O◢(顯示左邊樁值)
7 P “H1R”=P◢(顯示右邊樁值)
8 Lbl 1
,CASIO4800公路高程計算程序
22选五的开奖公告