序集1、由乙個已知點座標和乙個已知方位角計算支導線座標（程式名：zbjs）
程式清單：
x：y：t：lb1 0：fixm：：t=t+a-180：t〈0 =〉t=t+360⊿ t〉360 =〉t=t-360⊿t◢
x=x+scos t◢
y=y+ssin t◢
goto0
程式執行說明：
執行「zbjs」，每執行一步按exe鍵一次，顯示x？時輸入已知點x座標，顯示y？時輸入已知點y座標，顯示t？
時輸入已知點由後視到前視的已知座標方位角，執行一次本程式只需輸入一次已知資料。顯示a？時輸入第乙個左轉角值，顯示s？
時輸入測站到前視的水平距離。接下來計算器顯示的t是測站到前視的座標方位角，按 + 可將顯示的十進位制角度換算為度分秒。如此繼續可計算出所有支導線未知座標。
2、由兩個已知點座標計算支導線座標（程式名：zbjs2）
程式清單：
m「x0」：n「y0」：d「xh」：e「yh」
pol(m-d，n-e)：fixm：t=j：x=m：y=n：t〈0=〉t=t+360⊿t「th-j=」 ◢
i「s=」◢
lb1 0:: t=t+a-180：t〈0 =〉t=t+360⊿ t〉360 =〉t =t-360⊿t◢
x=x+scos t◢
y=y+ssin t◢
goto0
程式執行說明：
執行後，顯示x0，y0時輸入已知置鏡點座標，顯示xh，yh時輸入已知後視點座標，其它同zbjs的輸入與顯示。
3、由乙個已知點座標和乙個已知方位角進行放射型導線座標計算（程式名fsxzbjs）
程式清單：
c「x0」：d「y0」：e「t0」：fixm：lb1 1:
t=e+a-180：t〈0=〉t=t+360⊿ t〉360 =〉t=t-360⊿t◢
x=c+scos t◢
y=d+ssin t◢
goto1
程式執行說明：
變數輸入參照zbjs程式。
4、由兩個已知點座標進行放射型導線座標計算（程式名fsxzbjs2）
m「x0」：n「y0」：d「xh」：e「yh」
pol(m-d，n-e)：fixm：f=j：x=m：y=n：f〈0=〉f=f+360⊿f「th-j=」 ◢
i「s=」 ◢
lb1 1:
t=f+a-180：t〈0=〉t=t+360⊿ t〉360 =〉t=t-360⊿t◢
x=x+scos t◢
y=y+ssin t◢
goto 1
5、座標計算優化程式（可進行連續式（lx）、放射式（fs）已知一點（1-d）或者兩點（2-d）進行座標計算）：
v「1=>lx，≠>fs」：w「1 =>1-d≠>2-d」：w=1=> goto 1:≠> goto2
lb1 1：f「x0=」：g「y0=」：h「t h-0=」：goto 3
lb1 2:f「x0=」：g「y0=」：
m「xh=」：n「yh=」:pol(f-m，g-n)：
fixm: j〈0=〉j=j+360⊿h=j：h「th-0=」◢
i「s-h=」◢
goto 3
lb1 3: x=f：y=g：t=h ： v=1=> goto 4:≠> goto 5
lb1 4: : a:s:t=t+a-180：t〈0 =〉t=t+360⊿ t〉360 =〉t =t-360⊿t◢
x=x+scos t◢
y=y+ssin t◢
goto 4
lb1 5：:a:s
t=h+a-180：t〈0=〉t=t+360⊿ t〉360 =〉t=t-360⊿t◢
x=f+scos t◢
y=g+ssin t◢
goto5
6、已知置鏡點座標和置鏡點到後視點座標方位角求放樣角度和放樣距離的放樣程式（程式名fy1）
程式清單：
f「x0」：g「y0」：h「t0-h」：fixm：lb1 1:
pol(x-f，y-g)
j〈0 =〉j=j+360⊿a=j-h
a〈0 =〉a=a+360⊿a「a=」 ◢
i「s=」 ◢
goto1
程式執行說明：
變數輸入參照座標計算，a=為放樣順時針角度，s=為放樣距離。
7、已知置鏡點和後視點座標進行放樣（fy2）
程式清單：
f「x0」：g「y0」：m「xh」：n「yh」
pol(m-f，n-g)：fixm：h=j
h〈0=〉h=h+360⊿h「t-h=」◢
i「s-h=」 ◢
lb1 1:: pol(x-f，y-g)
j〈0 =〉j=j+360⊿
a=j-h
a〈0 =〉a=a+360⊿a「a=」◢
i「s=」 ◢
goto1
8、放樣優化程式（可分已知一點或者兩點座標進行放樣角度距離的計算）
程式名「fy」
程式清單：
i「i=1 =>1-d≠>2-d」
i=1=> goto 1:≠> goto2
lb1 1：f「x0」：g「y0」：h「t0-h」：goto 3
lb1 2：f「x0」：g「y0」：m「xh」：n「yh」:pol(m-f，n-g)：fixm:j〈0=〉j=j+360⊿h=j:h「t-h=」◢
i「s-h=」◢
goto 3
lb1 3：
pol(x-f，y-g) ：fixm
j〈0 =〉j=j+360⊿a=j-h
a〈0 =〉a=a+360⊿a「a=」 ◢
i「s=」 ◢
goto3
程式執行說明：
變數輸入參照座標計算，a=為放樣順時針角度，s=為放樣距離。
9、已知兩點座標，反算兩點之間的座標方位角和距離（程式名zbfs）
程式清單：
a「x1=」：b「y1=」：c「x2=」：d「y2=」：p ol（c-a，d-b）：fixm：j〈0 =〉j=j+360⊿j「t（1-2）=」 ◢
i「s（1-2）=」
10、分別已知兩條直線上一點的座標和座標方位角，求這兩條直線的交點座標（程式名jdzb）
程式清單：
x=（tan a「t1」×b「x1」-c「y1」-tan d「t2」 ×e「x2」+f「y2」） v÷（tan a- tan d）◢
y= tan a（x-b）+c
11、直線線路座標計算（zxxy）
程式清單：
v「x0=」：w「y0=」：t「t0=」：u「k0=」：lb1 0：fixm：：x=v+（k-u）cos t+d×cos(t+90)◢
y=w+（k-u）sin t+d×sin(t+90)◢
goto0
程式執行說明：
已知某一直線線路上一點的座標為x0，y0，該點里程為k0以及該直線沿前進方向的座標方位角t0，按照提示輸入以上資料，如果輸入某一里程k和法線外移距離d（向右移為正值，向左移為負值）即可計算出該里程點的法線外移樁座標x、y，當d=0時計算結果為中樁座標。
12、「緩+圓+緩」型曲線座標計算
主程式（qxjs）
程式清單：
prog 「bqxys」：q「k—zh」：f「zhx=」：g「zhy=」：n「tzh—jd」：i「（y1，z-1）」
lbl 1:fixm::k「licheng=」：d「waiyi=（z-，y+）」：goto2
lbl 2:k goto3:≠> goto4
lbl 3:「k—over」: goto1
lbl 4:k>q+l => goto3:≠> goto5
lbl 5:k≤q+b => goto6:≠> goto7
lbl 6:s=k-q：w=b：
prog 「hqxy」：o=n+i×90s2÷(л rb)：o<0 => o=o+360⊿o>360 => o=o-360⊿o「fangwei=」 ◢
x=ucosn-vsinn+f+d×cos(o+90) ◢
y=vcosn+usinn+g+d×sin(o+90) ◢
goto1
lbl 7：k≤q+l-c => goto8:≠> goto9
lbl 8:s=k-q：o=n+i×90(2s-b)÷(л r)：o<0 => o=o+360⊿o>360 => o=o-360⊿o「fangwei=」 ◢
prog 「yqxy」：x=ucosn-vsinn+f+d×cos(o+90) ◢
y=vcosn+usinn+g+d×sin(o+90) ◢
goto1
lbl 9: s= q+l-k：w=c：
prog 「hqxy」：e=n+ia+180：o=e-i×90s2÷(л rc)+180：
o<0 => o=o+360⊿o>360 => o=o-360⊿o「fangwei=」◢
v=-v
x=(u-h)cose-vsine+f+t cosn+d×cos(o+90) ◢
y=vcose+(u-h)sine+g+t sinn+d×sin(o+90) ◢
goto1
子程式「bqxys」
a:r:b「l01」:c「l02」
m「m1」=b÷2-b3÷（240 r2）◢
j「m2」=c÷2-c3÷（240 r2）◢
p「p1」= b2÷（24 r）- b4÷（2688 r3）◢
z「p2」= c2÷（24 r）- c4÷（2688 r3）◢
t「t1」=m+（r+p）tan(a÷2)+(z-p) ÷sina◢
h「t2」=j+（r+z）tan(a÷2)+( p-z) ÷sina◢
l= b÷2+c÷2+a rл÷180◢
e= ◢
子程式「hqxy」
u=s-s5÷(40r2 w2)+ s9÷(3456 r4 w4)-s13÷(599040r6 w6):v=i×(s3÷(6rw)- s7÷(336 r3 w3) +s11÷(42240 r5 w5))
子程式「yqxy」
u=rsin(180(s-b÷2)÷л÷r)+m:v=i×(r×(1-cos(180(s-b÷2)÷л÷r))+p)
程式說明：本程式可以計算等長和不等長「緩+圓+緩」型曲線或者單圓曲線的中線座標、外移樁座標以及中線的切線方位角。
先將主、子程式存入計算器，然後執行主程式「qxjs」，輸入a（曲線偏角），曲線半徑r，第一緩和曲線長l01，第二緩和曲線長l02，（等長緩和曲線時l01= l02），然後顯示曲線逐要素，接著輸入zh座標（zhx，zhy），zh到jd座標方位角tzh—jd，當曲線為左偏時（y1，z-1）輸-1，右偏輸1，輸入計算里程k，外移距離d，計算中樁時d輸0，計算左邊樁時d輸負數，算右邊樁時d輸正數，當所輸里程不在本曲線計算範圍內時，螢幕顯示k—over，繼續輸入有效里程可繼續計算。
對於單圓曲線，緩和曲線長輸入0。
本程式緩和曲線x計算取了4項，y計算取了3項，一般的曲線計算精度都可達到mm級。
13、採用積分進行任意曲線線路座標計算程式（直線、圓曲線、卵型曲線）
程式名「xljs」
程式名「xljs」(v1.1，2023年12月7日星期三公升級於秦嶺公司)
g「xj=」：h「yj=」：r「xh=」：s「yh=」：a「xa=」：b「ya=」：c「ta=」：e「1÷ra ,z-，y+」：p「ka=」
lbl 1：：f「1÷rb, z-，y+」：q「kb=」
lbl 2：：v「k=」：o=v：o goto3：≠> goto4
lbl 3：「k-small」：goto2
lbl 4：o>q => goto5：≠> goto7
lbl 5：：i「i=1=>esc≠>next」：i=1=> goto2：≠> goto 6
lbl 6：「jisuan：a-txy」：v=q：z=0：d=0：goto8
lbl 7: ：z「jia-jiao=」：d「waiyi=（z-，y+）」
lbl 8：t=c+90÷л×（2e+（f-e）（v-p）÷（q-p））（v-p）：t〈0=〉t=t+360⊿ t〉360 =〉t=t-360⊿
rad：w=a+∫（cos（c°+0.5×(2e+(f-e)(x-p)÷(q-p))(x-p)）,p,v,4）+ d×cos(t°+z°)
y=b+∫（sin（c°+0.5×(2e+(f-e)(x-p)÷(q-p))(x-p)）,p,v,4）+ d×sin(t°+z°)：deg：goto9
lbl 9：o≤q => gotob：≠> gotoa
lbl a：a=w：b=y：c=t：e=f：p=q： goto1
lbl b： w「x=」◢
y「y=」◢
t「t=」◢
pol(r-g，s-h)：fixm：m=j：pol(w-g，y-h) ：j=j-m
j<0 =>j=j+360⊿j>360 =>j=j-360⊿j「a=」◢
i「s=」◢
goto 2
程式積分式中「°」的編輯輸入為：「function」鍵+5（drg）+4（°）。
程式功能
由於程式根據線路曲線座標計算通用數學模型編制，所以，對於任意線型的一段線路曲線（直線、圓曲線可看作是通用計算模型的特例），只要輸入曲線資訊和測站資訊，都可以迅速地計算出該曲線上任意里程點處的切線方位、中樁或與該里程切線成任意夾角的外移樁座標、極座標法放樣的角度和距離。
程式執行
執行程式「xljs」，按提示輸入置鏡點座標（xj，yj），後視點座標（xh，yh），曲線起點a的座標（xa，ya）、沿線路前進方向的切線方位角ta、里程ka、曲率（直接在計算器上以1÷ra的形式輸入，r表示半徑，左偏曲線輸負值右偏曲線輸正值），繼續輸入終點b的曲率（1÷rb輸入同a點）、里程kb。當螢幕顯示「k=？」時，輸入該段曲線要計算放樣資料的里程值，按提示輸入夾角「jia-jiao」（夾角的範圍為0-180度）和外移量「waiyi」，「jia-jiao」值為該里程自線路前進方向的切線方位角順時針至該里程中樁與右邊樁連線間的角度，當為法線方向時jia-jiao為90度，「waiyi」值中樁左側輸負值右側輸正值，計算中樁時「waiyi」值輸0即可，按「exe鍵」螢幕即可依次顯示計算中樁或外移樁的座標、中樁切線方位角、放樣角度a，放樣距離s。
程式的輸入輸出都按通俗易懂的提示或測量習慣顯示，為確保計算結果無誤，編制程式時專門設定了錯誤里程輸入提示，當輸入的計算里程k小於該曲線起點里程時，程式將提示里程太小「k-small」，繼續輸入正確的里程，當第一條曲線計算完畢需計算緊接的第二條曲線時，只需要給k輸入乙個大於第一曲線終點里程的里程值，這時螢幕顯示「i=1=>esc≠>next」，如果不小心誤輸入乙個大於終點里程的k時（esc表示取消），可輸入1「取消」操作，繼續計算當前曲線，如果確認要計算下一曲線（next表示要計算下一曲線），輸入乙個不等於1的數值，接下來螢幕將顯示「jisuan：a-txy」，程式將自動計算第二曲線的起點資訊，接著自動提示輸入第二曲線終點的曲率和里程，當顯示「k=？」時，即可進行第二曲線放樣資料的計算。
依次類推，直至計算完所有需計算的曲線中、邊樁座標和放樣資料。
遷站時，直接按「ac」鍵終止程式的執行，到新的測站後重新執行「xljs」，輸入新的測站點、後視點座標並保持原曲線引數不變即可。
當遇到線路曲線的曲率發生突變（如直線直接接圓曲線或者兩個不同半徑的圓曲線直接相接）的特殊情況時，可以將突變點兩側的曲線分開單獨進行計算，也可以在突變點處增加輸入一段微小長度的迴旋線把突變點兩側的曲線連線起來，增加一段長度為0.0001公尺長度的迴旋曲線，不會影響計算結果的精度。比如某直線直接連線半徑為r的圓曲線，計算完直線段需要接著計算圓曲線時，先輸入微小長度的迴旋線（1/rb=1/r，kb=直線終點里程+0.
0001），然後再輸入圓曲線的終點曲率和里程即可繼續計算。兩個不同半徑（半徑分別為r1，r2）的圓曲線直接相接時，先輸入微小長度的迴旋線（1/rb=1/r2，kb=第一圓曲線終點里程+0.0001），然後輸入第二圓曲線終點的曲率和里程即可。
有時會遇到逆向測設曲線情況，即從大里程方向向小里程方向測設曲線，採用本程式進行計算時，只需將曲線倒過來進行輸入即可，這時，輸入和計算的量都應反號（只有「jia-jiao」值符號保持不變），曲線偏角反號輸入（左偏變為右偏，右偏變為左偏），曲線里程輸入時按負值對待，計算右邊樁時外移量為負，左邊樁時外移量為正（與正向剛好相反）。
14、四等水準測量記錄計算程式（紅黑面常數為4687、4787）
lbl 0:「h4687=>i=1」: fixm: ：i=1=> goto1: ≠> goto2
lbl 1:u=4687:w=4787: goto3: lbl 2:u=4787:w=4687: goto3: lbl 3:
g「h1」=a「hou1」-b「qian1」◢
e「v2」=b-c「qian2」+w◢
f「v1」=a-d「hou2」+u◢
p「h2」=d-c◢
h=（g+p+w-u）÷2
程式按後-前-前-後的觀測順序編制，當後尺為4687時i賦值1，否則賦不等於1的值。
15、高斯抵償高程投影面邊長改正計算fx-4850程式
e「yi-chang：hm=」：f「di-chang：hm=」
lbl 1:：h「ping-jun：hp=」:
y「ping-jun：ym =」:s「guan-ce:
s=」:v=-s×(h+e-f)÷(6371000+h+e)×1000:w=s×y2÷(2×63712)×1000:
d=s+( v+w)÷1000
「v1=」:v◢
「v2=」:w◢
「d=」:d◢
goto 1
說明：該程式可計算高斯投影或抵償高程面高斯投影的邊長投影，hm為異常高程值，當設計資料中沒有提供或者未知時取hm=0，即認為高程異常可忽略，hm為抵償高程，當沒有設抵償高程麵時取hm=0，即為一般的高斯投影。s為觀測水平距離，hp為導線邊兩端高程概略平均值（m），ym為導線邊兩端點y座標平均值減去500公里後的平均值（km），d為改正到高斯投影面後的邊長（m）。
hm=0，hm取隧道平均高程面高程，ym=0時，為計算隧道平均高程面的投影改正。
Casio卡西歐手錶功能介紹
個城市的世界時間，可同時顯示3個時間區的時間，精確到1 100秒的秒錶，倒計時，鬧鈴，全自動日曆，12 24小時時制等多樣強勁功能。卡西歐手錶調整注意事項 卡西歐手錶的日曆 星期 月相之調整切勿在卡西歐手錶時間21 00pm 3 00am 之間操作，此期間日曆功能正在進行運作，同時也是齒輪齒合度較低...
casio9750圖形機教學案
案例01 分段函式 出處 新課標華東師大天津版數學教材必修1第31頁，例4 繪製函式的圖象，並求當x為9，16，20時y的值.目標 利用圖形計算器繪製分段函式圖象，體會分段函式圖象的特點.流程 設計 說明 本案例03 步可根據問題需要預先將螢幕設定為所需大小 利用本例也可以繪製新課標華東師大天津版數...
CASIO4800公路高程計算程式
casio4800公路高程計算程式 計算任一點中邊樁高程，輸入樁號即 可 示例 b 作者 陳he ming浙江共司令 有了它，上工地時，告別圖紙，資料 高程 b zdgc 程式名 v change 0 only one 1 auto next one 回車 v 1 l 1000k m 20 v 1 ...