陳文平

(中交集團四公局四處)

0 前 言

CASIOfx-4500P計算器因其攜帶方便、編程簡單、易操作,在測繪領(lǐng)域尤其在野外測量放樣中應(yīng)用較為廣泛,在莆秀高速公路中 4850計算器得到了充分的利用。在西埔互通區(qū)匝道半徑小,線性復(fù)雜,計算數(shù)據(jù)量大,側(cè)設(shè)工作難度大。針對這種情況,需要編寫一個能滿足等緩和不等緩及各種復(fù)曲線連接的程序,根據(jù)現(xiàn)有的條件及設(shè)計圖紙所給的曲線要素,結(jié)合以前編程的經(jīng)驗編寫了以下程序,將對這種方便、快捷、適用的計算程序進行分析與介紹。

1 建立數(shù)學(xué)模型

曲線起點 X、Y坐標(biāo),曲線起點沿計算方向切線方位角(根據(jù)曲線起點坐標(biāo)和交點坐標(biāo)可反算),起點曲率半徑,終點曲率半徑,起點里程,終點里程,解算曲線任意點任意角度中邊樁坐標(biāo)。

圖1 數(shù)學(xué)模型

2 編寫程序

2.1 文件名:LXQX(子程序)

2.2 文件名:XY-SN(坐標(biāo)反算)(子程序)

2.3 文件名:HXY-JI(線路中線外移點坐標(biāo)計算)

2.4 文件名:A(主程序)(是以匝道名為名稱如A匝道)

LbI1:{H}:H“DKI”:H≤圓直點(緩直點)里程=＞A =圓直點(緩直點)X坐標(biāo):B=圓直點(緩直點)Y坐標(biāo):C=起點切線方位角‘:D=1÷起點半徑:Z=1÷終點半徑:F=起點＜直緩(或緩園)＞里程:G=終點里程:Prog“LXQX”: Goto1⊿。

3 編程思路

程序把數(shù)據(jù)庫作為主程序,在主程序中調(diào)用其它模塊。

4 運行說明

運行時直接運行主程序,如計算匝道A的,就運行A,其它匝道的數(shù)據(jù)庫類同。

5 運行實例

莆秀高速西埔互通A匝道計算實例,主程序如下:

A匝道為不等緩和曲線,圓曲線半徑為 65米,運行后顯示輸入:DKI?(待求點里程)如要計算AK0+120坐標(biāo)輸入: 120,下一步顯示T?(輸 0為計算中樁坐標(biāo),輸大 1的數(shù)字是求外依點)輸 0下一步會直接顯示 AK0+120中樁坐標(biāo),下一步顯示X0、Y0(要求輸入測站X、Y坐標(biāo)如輸入X= 5093.034,Y=3764.593,下一步顯示QA=201.950(放樣點到測站點的距離)QS=160'32'07”(放樣點到測站的方位角)。要計算外移點坐標(biāo)時在顯示 T?時輸 1下一步顯示QH?(外移點前后距離前正后負(fù),如輸3),下一步顯示ZY? (外移點左右距離左負(fù)右正,如輸-4)下一步顯示QA?(外移點角度,輸入見數(shù)學(xué)模型,如輸入 0算正交)下一步顯示X =4941.467,Y=3700.357(為外移點坐標(biāo))下一步顯示QA =202.968,QS=164'37'01”(外移點到測站點的方位角)下一步循環(huán)計算。在進行逆算時起點、終點曲率半徑、里程互換。

6 結(jié) 語

程序方便、快捷、準(zhǔn)確、適用性很強,通過以上方式的簡化后,使繁重的測量工作變得輕松,大大減輕了測量的工作量。