卡西歐系列計算器通用程式集

2022-10-17 08:57:09 字數 3574 閱讀 3555

第一篇座標正反算通用程式(終極篇)

1. 座標正算主程式(命名為zbzs)

第1行:lbl 0:」k=」?k:」bian=」? z:」α=」?b

第2行:prog 「a」

第3行:」x=」:n+zcos(f+b)◢

第4行:」y=」:e+zsin(f+b)◢

第5行:」f=」:f◢

第6行:goto 0

k——計算點的里程

bian——計算點到中樁的距離(左負右正)

α——取前右夾角為正

更改紅色字型部分可呼叫其他線路資料庫,本程式呼叫a匝道資料

顯示x座標

顯示y座標

顯示中線切線方位角,可省掉

2. 座標反算樁號和偏距主程式(命名為zbfs)

第1行:」x1=」? c:」y1=」?d: 」k1=」?k

第2行:lbl 0:prog 「a」

第3行:pol(c-n,d-e)

第4行:list ans[1]→i

第5行:list ans[2]→j

第6行:icos(f-j)→s:k+s→k

第7行:abs(s)>0.0001=>goto 0

第8行:」k1=」:k◢

第9行:」bian=」:isin(j-f)→z◢

x1——取樣點的x座標

y1——取樣點的y座標

k1——輸入時為計算起始點(**路內即可),輸出時為反算點的樁號

z——偏距(左負右正)

更改紅色字型部分可呼叫其他線路資料庫,本程式呼叫a匝道資料

取出距離,在9860中,pol和rec函式結果儲存在list ans列表中

取出方位角

反算樁號

反算偏距,為方便其他程式的呼叫,賦值到變數z

注:第4行和第5行為5800版本計算器以上特有的語句,在5800中不能增加此語句,其餘程式語句均可與5800共用。

3. 計算座標子程式(命名為xyf)

為了簡潔,本程式由資料庫直接呼叫,上述中的正反算主程式不直接呼叫此程式

第1行:k-a→s:(q-p)÷l→i

第2行:n+∫(cos(f+x(2p+xi)×90÷π),0,s)→n

第3行:e+∫(sin(f+x(2p+xi)×90÷π),0,s)→e

第4行:f+s(2p+si)×90÷π→f

反向計算時需改為abs(k-a)→s

計算中樁的x座標

計算中樁的y座標

計算中線切線方位角

4. 資料庫(命名為a)

第1行:k≤175.191=>stop

第2行:175.191→a:

428513.730→n:557954.

037→e:92°26′40″→f:0→p:

1/240→q:70.417→l:

k≤a+l =>goto 1(第一緩和曲線,圓半徑為240)

第3行:245.607→a:

428507.298→n:558024.

092→e: 100°50′59.4″→f:

1/240→p:1/240→q:

72.915→l: k≤a+l =>goto 1(第圓曲線,半徑為240)

第4行:318.522→a:

428482.988→n:558092.

538→e: 118°15′25.2″→f:

1/240→p: 0→q: 55.

104→l: k≤a+l =>goto 1(第二緩和曲線,圓半徑為240)

第5行:373.627→a:

428453.283→n:558138.

912→e:124°50′4.5″→f:

0→p:-1/180→q:67.

222→l:

k≤a+l=>goto 1:stop(第一緩和曲線,圓半徑為180)

第6行:lbl 1:prog 「xyf」

a——曲線段起點的里程

n——曲線段起點的x座標

e——曲線段起點的y座標

f——曲線段起點的座標方位角

p——曲線段起點的曲率(左負右正)

q——曲線段終點的曲率(左負右正)

l——曲線段長度(盡量使用長度,為計算斷鏈方便)

說明:(1)在9860中,程式中所有公式和部分函式結果均儲存在list ans列表陣列中,要想多次呼叫最好隨公式取出結果,並賦給變數。

(2)正算主程式可以計算一般邊樁的座標,如要計算類似涵洞端牆的座標需增加第二偏距和轉角兩個變數。

(3)程式規定,左偏曲線曲率(半徑倒數)輸入負值,右偏曲線曲率輸入正值,直線上點曲率輸入0,例如直線段,線元起點和終點均輸入0,第一緩和曲線分別輸入0和圓半徑的倒數,圓曲線均輸入半徑倒數,第二緩和曲線分別輸入圓半徑倒數和0,卵形曲線分別輸入對應圓半徑的倒數

(4)若是從大里程向小里程的反方向計算,則曲率取正方向時的負值,方位角減去(或加上)180度。

(5)有多個匝道的專案,可隨時更改正反算主程式中的紅色字型部分來呼叫其它線路的資料

(6)反算樁號偏差為1mm

(7)資料庫還可以採用簡約模式,即省掉前面已經賦值的變數,使資料庫**達到最短(曲線元法中)

(8)可以計算任意線型的任意點座標

第1行:175.191→a:

428513.730→n:557954.

037→e:92°26′40″→f:0→p:

1/240→q:70.417→l:

k≤a+l =>goto 1(第一緩和曲線,圓半徑為240)

第2行:245.607→a:

428507.298→n:558024.

092→e: 100°50′59.4″→f:

q→p: 72.915→l:

k≤a+l =>goto 1(第圓曲線,半徑為240)

第3行:318.522→a:

428482.988→n:558092.

538→e: 118°15′25.2″→f:

0→q: 55.104→l:

k≤a+l =>goto 1(第二緩和曲線,圓半徑為240)

第4行:373.627→a:

428453.283→n:558138.

912→e:124°50′4.5″→f:

0→p:-1/180→q:67.

222→l

第5行:lbl 1:prog 「xyf」

5. 座標計算通用程式(命名為zb)

本程式與上述中的幾個程式無關,是在計算座標時採用輸入曲線元引數模式下的程式,為臨時使用方便。

第1行:」k0=「? a:

」x0=「? n:」y0=「?

e:」f0=「?f:

」1÷r1=「?p:」1÷r2=「?

q」:「l0=「?l

第2行:lbl 0:」k=」?k:」bian=」? z:」α=」?b

第3行:abs(k-a)→s:(q-p)÷l→i

第4行:n+∫(cos(f+x(2p+xi)×90÷π),0,s)→x

第5行:e+∫(sin(f+x(2p+xi)×90÷π),0,s)→y

第6行:」f=」:f+s(2p+si)×90÷π◢(可省掉)

第7行:」x=」:x+zcos(z+b)◢

第8行:」y=」:y+zsin(z+b)◢

第9行:goto 0流程圖

卡西歐5800p計算器所有程式設計命令解釋

1.norm 1 指數顯示 norm 2 小數顯示 2.x 只顯示 字元 x 顯示字元 x 顯示 x?字元 x 顯示字元 有 則不顯示該變數當前值 3.判斷表示式 語句1 語句2。如果判斷表示式為真 或非零 則不跳過語句1.如果判斷表示式為假 或是零 則會跳過語句1.4.if.then else i...

用計算器計算

班級姓名第組第號 一 學習目標 1 了解計算器各鍵的用途與用法,2 會用計算器進行有理數加 減 乘 除 乘方運算以及混合運算。3 在使用計算器中感受到操作簡便,計算準確,速度快捷,從而產生對數學學習的濃厚興趣。二 學法指導 通過動手操作 合作與交流,並借助計算器的說明書,自主 計算器的使用方法,會用...

用計算器計算

學習目標 1 我會用計算器進行加減乘除等基本的四則運算。重點 2 我能運用計算器解決生活中的實際問題。難點 課前熱身 1 開始使用電子計算器時,先按一下鍵,這個鍵的功能是停止使用時,再按一下鍵,這個鍵的功能是 新知 一 認識計算器上的ce鍵 2 根據下面的步驟,用計算器算一算。386 179 我是按...