卡西欧5800计算器工程应用程序.

卡西欧5800计算器工程应用程序.
卡西欧5800计算器工程应用程序.

卡西欧5800计算器测量专用程序

一、程序功能

主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。

新版本优化:1、优化程序语句、2、取消原线元法计算,化线元法为交点法。

3、高程计算修改,

4、附计算坐标及高程参数设计要素输入实例

二、源程序(绿色为程序名;蓝色为输入计算器内容)0.总主程序(1、坐标计算放样程序2、坐标反算程序;3、高程计算查阅程序;4、路基半幅标准宽度查阅程序;5、路基边坡及开挖口放样程序;6、路基标准距离放样;7、桥梁锥坡计算放样程序;8、极坐标计算程序;9、隧道超欠挖计算程序)运行后按1~9数子约半秒,则选择1至9的程序,返回时,在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。

程序名:0(数子0)

ClrMat:ClrVar:12→DimZ:Norm 2:Do:"(XY=1,ZD=2 ,GC=3,GD=4,BP=5,FM=6,ZP=7,JS=8,SD=9)===>QING AN 1-9":Getkey→Z[3]:While Z[3]=35:Prog"1XY”:WhileEnd:While Z[3]=36:Prog"2ZD":WhileEnd: While Z[3]=37:Prog"3GC":WhileEnd: While Z[3]=21:Prog"4GD":WhileEnd: While Z[3]=22:Prog"5BP":WhileEnd: While Z[3]=23:Prog"6FM":WhileEnd: While Z[3]=31:Prog"7ZP":WhileEnd: While Z[3]=32:Prog"8JS":WhileEnd: While Z[3]=33:Prog"9SD":WhileEnd:LpWhile Z[3]≠25:”XIE XIE SHI YONG”:

1.主程序:一般坐标计算及放样程序

程序名:1XY

Prog "DX":Prog"QX":90→A: "PJ1"?A:A→B: "PJ2"?B:A→Z [1]:B→Z[9]: Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break: Prog"K": ? D: 0→L: "L0"?L:L→Z[10]: Porg"A":Z[2]+Z[1] →A :A-Z[9]→E:I+Dcos(A)+Z[10]cos(E→X:J+Dsin(A)+Z[10]sin(E→Y:Prog"XY": Prog"JS":LpWhile Z≠-1

2.主程序:由大概桩号及坐标反算桩号及距离

程序名:2ZD

Prog"QX":Do: "KM"?Z:Z=-1=>Stop:Z=-2=>Break: Prog"

K": "XO"?X: "Y0"?Y: Porg"B": Prog"ZD":LpWhile Z≠-1

(反算带显示设计高程和横坡.在2ZD程序中修改这:Prog"QX":"KM"?Z:Do: Prog"K":"XO"?X:X=-1=>Stop:X=-2=>Break:"Y0"?Y: Porg"B":Prog"H": Prog"ZD": " H=": Locate 6,4,H:" I=":Locate 6,4,I◢LpWhile X≠-1 )

3.主程序:任意点高程计算及横坡

程序名:3GC

P rog"QX":0→B: "H-B"?B: B→Z[9]: Do: "KM"?Z:Z=-1=>Stop:

Z=-2=>Break:?D:Prog"H":Fix 3: " H=": Locate 6,4,H-Z [9]:" I=":Locate 6,4,I:LpWhile Z≠-1

4.主程序:任意桩号位置的标准路基宽度计算

程序名:4GD

Prog"QX": Do: "KM"?Z:Z=-1=>Stop:Z=-2=>Break:-1→D:Prog"C":L→P:1→D: Prog"C":Fix 3: " LGD=": Locate 6,4,P:" RGD=":Locate 6,4,L:LpWhile Z≠-1

5、主程序:路基开挖边线及填方坡脚线放样程序

程序名:5BP

Prog "DX":Prog"QX":0.5→B: "TH-GD"?B: B→Z[7]: Do:"K M"?Z:Z=-1=>Stop:Z=-2=>Break: Prog"K": “X0"?X:"Y0"?Y:Z[8]→M:"M0"?M:M→Z[8]: Porg"B":D→P :Prog"C":If D<0:Then 0. 75-L→D:Else L-0.75→D: IfEnd: Prog“H”:H-0.03-Z[8] →G: Prog “W1”:If G>0:Then Goto T: IfEnd:

-G→H:If H>E+F:Then L+M+N+U+C(H-E-F)+BF+AE→S:Goto 0:IfEnd:I

f H>E:Then L+M+N+ B(H-E)+AE→S:Goto 0:IfEnd:

If H

LbI T:If G>W:Then L+Z[7]+V+J(G-W)+IW→S:Else L+Z[7]+GI→S:IfE nd:LbI 0: Fix 2: P→D :Abs(D)-S→T: " LX=":Locate 6,4,T:Prog"ZD":" TW=": Locate 6,4,G◢LpWhile Z≠-1

6、主程序:定值放样路基桩计算填挖值

程序名:6FM

Prog "DX":Prog"QX": Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break: P rog"K": ?D: Porg"A":Z[2]+90→A :I+Dcos(A→X:J+Dsin(A→Y:P rog"XY":Prog"JS":Z[8]→M:”M0”?M:M→Z[8]:Prog “H”:” T W=”:Locate 6,4,H-Z[8]: LpWhile Z≠-1

7、主程序:桥梁锥坡计算放样

程序名:7ZP

Prog"DX":Prog"QX":"Z0"?Z:"LD:Z-,Y+"? D:Abs(D) →R: "LR"?R: D→Z[7]:R→Z[10]:Z→Z[9]:Prog”C”:L→Z[10]:Prog”K”: Do:Z[10]→Y:"L0:SZ+,DZ-"?Y: Y=-1=>Stop:Y=-2=>Break: √(Z[7]2(1-Y2/Z[10]2))→X:Z[9]+Y→Z: Prog”C”: If D>0:Then L+X→D:E

lse –L-X→D:IfEnd:Prog”A”: Z[2]+90→A :I+Dcos(A→X:J+Dsin(A →Y:Prog"XY":Prog"JS": LpWhile Y≠-1

8、主程序:由坐标计算方位角及距离

程序名:8JS

Prog "DX":Do:?X: X=-1=>Stop:X=-2=>Break:?Y:Prog”JS”: LpWhi le X≠-1

9、主程序:隧道超欠挖放样计算

程序名:9SD

Prog"DX":0.65→A:”CQHD”?A:A→Z[7]:Do:"KM"?Z:Z=-1=>Stop:Z =-2=>Break: Prog"K": “X0"?X:"Y0"?Y:Z[8]→M:"M0"?M:M→Z[8]: Porg"B":D→Z[9]:0→D:Prog”H”:Prog”SD1”:Z[9] →D:Z[8]→M:Z[7]→X:Rcos(P→C:H+A→A:H+B→B:C+A→E:If MGoto 1:√(S2-(B-A)2)S÷Abs(S→T:Abs(D-Q)-T→T:√(T2+(M-B)2) -V-X→L:Goto 0:IfEnd:LbI 1:√((D-Q)2+(M-A)2)-R-X→L:LbI 0:Fix 2:” LX=”: Locate 6,4,L:Prog”ZD”:“ H0=”: Locate 6,4,M-H◢LpWhile Z≠-1

10. 交点法正算子程序(A)

程序名:A

P÷Abs(P→W:O-T+ΠR×Abs(P)÷180+H÷2-N÷2→Q:H→C:0→M:

If Z≤O-T:Then Z-O→S:G→Z[2]:Goto 1: IfEnd:

If Z≤O-T+H:Then Z-O+T→S:Prog “HX”:G+WK→Z[2]:A-T→A:G→E: Goto 2:IfEnd:

If Z≤Q: Then 180(Z-O+T-0.5H)÷R÷Π→S : Prog”AB”:A+R(1-Cos (S→E:B+Rsin(S→A:E→B:R→M:G+WS→Z[2]:A-T→A:G→E:Goto 2: If End:

If Z≤Q+N:Then Q+N-Z→S:N→H:Prog “HX”:G+P→E:E-WK→Z[2]:F-A→A:C→H:Goto 2:IfEnd:

Z-Q-N+F→S:G+P→Z[2]: LbI 1:U+Scos(Z[2]→I:V+Ssin(Z[2]→J:Ret urn:LbI 2:U+Acos(E)-WBsin(E→I:V+Asin(E)+WBcos(E→J

11. 交点法反算子程序(B)

程序名:B

0→D:Do:Z+D→Z:Prog”A”:Pol(X-I,Y-J+×10-9:J-Z[2]→J:Isin(J→S: Icos(J→D:If M≠0:Then Pol(M-WS,D:JMΠ÷180→D:IfEnd: LpWhile Abs(D)>.001:Z+D→Z:S→D

12.缓和曲线段直角坐标计算子程序(AB)

程序名:AB

H2÷R÷24-H∧(4)÷2688÷R∧(3)+H∧(6)÷506880÷R∧(5)- H∧(8)÷154 828800÷R∧(7)→A:H÷2-H∧(3)÷240÷R2+ H∧(5)÷34560÷R∧(4)- H∧(7)÷8386560÷R∧(6)+ H∧(9)÷3158507520÷R∧(8)→B

13. 计算缓和曲线段坐标增量及偏角子程序(HX)

程序名:HX

S-S∧(5)÷40÷R2÷H2+S∧(9)÷3456÷R∧(4)÷H∧(4)-S∧(13)÷599040÷R∧(6)÷H∧(6)+S∧(17)÷175472640÷R∧(8)÷H∧(8)→A:S∧(3)÷6÷R÷H-S∧(7)÷336÷R∧(3)÷H∧(3)+S∧(11)÷42240÷R∧(5)÷H∧(5)-S∧(15)÷9676800÷R∧(7)÷H∧(7)+S∧(19)÷3530097000÷R∧(9)÷H∧(9)→B:9 0S2÷Π÷R÷H→K:If S=0:Then 0→M:Else RH÷S→M:IfEnd

14.高程计算子程序(H)

程序名:H

Prog “S1”:N-I→A:A÷Abs(A→W:R×Abs(A÷2→T:If Z

→H:Return:Else Prog “I”:H+I(Abs(D)-K→H:IfEnd

15.高程超高计算横坡子程序(I)

程序名:I

Prog “I1”:If S=0:Then M→I: Return:Else If W=1:Then ((N-M)×(Z-C)÷S+M→I:Return:Else (((3((Z-C)÷S)2-2((Z-C)÷S)∧(3))×(N-M))+M→I:IfEnd:

16.路基宽度子程序

程序名:C

1→S: Prog “G1”:Z-C→E:(B-A)E÷S+A→L

17:极坐放样计算程序(计算放样点至置仪点方位角及距离)

程序名:JS

Z[5]→K:Z[6]→L:Pol(X-K, Y-L:IF J<0:Then J+360→J:IFEnd:Int(J) +0.01Int(60Frac(J))+0.006Frac(60Frac(J→J: Fix 4:” FWJ=”: Lo cate 6,4,J:Fix 3:” S=”:Locate 6,4,I◢

18.导线点子程序(DX)

程序名:DX

Z[5]→K:Z[6]→L:“XZ”?K:”YZ”?L:K→Z[5]:L→Z[6]

19.线路选择子程序(线路选择输0时。则输曲线参数(QX)

程序名:QX

1→A:”QX:X1=1,X2=2”?A:A→Z[4]:If A=0:Then ”JDKM”?O:”JDX”? U:”JDY”?V:”FWJ”?G:”ZJ”?P:”LS1”?H:”LS2”?N:”T1”?T:”T2”?F:?R:IFEnd

20.线路中线元段判别子程序(K)

程序名:K

If Z[4]=0:Then Return: IfEnd:If Z[4]=1:Then Prog “X1”:Retur n:IfEnd:If Z[4]=2:Then Prog “X2”:Return:IfEnd

21.坐标参数矩阵调用程序(F)

程序名:F

Mat F[1,1]→O: Mat F[1,2]→U: Mat F[1,3]→V: Mat F[1,4]→G: M at F[1,5]→P: Mat F[1,6]→H: Mat F[1,7]→N: Mat F[1,8]→T:Mat F[1,9]→F: Mat F[1,10]→R

22.显示子程序

程序名:XY

Fix 3:"X=":Locate 6,4,X:"Y=":Locate 6,4,Y:程序名:ZD

Fix 3:"KM=":Locate 6,4,Z:"D=":Locate 6,4,D23.数据子程序(附后示例)

匝道线元转交点数据程序(T)

程序名:T

Norm 2:“QKM”?Z:“XQ”?U:“YQ”?V:“LS1”?M:“LS2”?O:“A1”?A:“A2”?B:“FWJ“?G:”ZJ“?P:?R:P÷Abs(P →Q:A2÷R→H:HM→H:H-M→S:B2÷R→N:N-O→C:O>N=>O→N:H=0=>×10-9→H:H→X:90S2÷(RHΠ→K:G-QK→G:N=0=>×10-9→N: 90C2÷(RNΠ

→D:P+QK+QD→P:Prog”AB”: (H2-N2)÷24÷R÷sin(Abs(P))-(H∧(4)-N ∧(4))÷2688÷R∧(3)÷sin(Abs(P))+(H∧(6)-N∧(6))÷506880÷R∧(5)

÷sin(Abs(P))-(H∧(8)-N∧(8))÷154828800÷R∧(7)÷sin(Abs(P→E: (R+A)tan(Abs(P)÷2)+B-E→T:N→H:Prog”AB”: (R+A)tan(Abs(P)÷2) +B+E→F: X→H: Z-S+T→O:Prog”HX”:U-(A-T)cos(G)+QBsin(G→U:V-(A-T)sin(G)-QBcos(G→V:Fix 3:”JDKM=”:Locate 6,4,O:”JDX=”:L ocate 6,4,U: ”JDY=”:Locate 6,4,V◢”FWJ=”:G?DMS◢”ZJ=”:P?DMS◢”LS1=”: Locate 6,4,H: ”LS2=”: Locate 6,4,N: ”T1=”: Locate 6,4,T: ”T2=”: Locate 6,4,F◢”R=”:R◢

说明:运行后“QKM”?输入起点桩号;“XQ”?“YQ”?输入起点X、Y坐标;“LS1”?“LS2”?输入前段缓和曲线长度,后段缓和曲线长度;“A1”?“A2”?输入前段缓和曲线参数,后段缓和曲线参数;“FWJ“?输入起点切线方位角;”ZJ“?输入转角(终点方位角减起点方位角之差,左转为负,右转为正);计算结果要素同QX子程序中要素字母。

①-1程序名:X1(线路1坐标计算要素程序)

If Z≤241.086:Then [[-336.478,2600441.639,514392.519, 280。20’28.78”, 203。08’28.32”,106.667,81.667,-270.668,-283. 056,60]]→Mat F:Prog”F”: IfEnd

①-2程序名:X2(线路2坐标计算要素程序)

If Z≤273.006:Then [[171.674,2600784.547,514635.863,58。49’17.2”, 68。09’26.91”,93.889,125,171.674,184.771,180]]→Mat F:Prog”F”: Return: IfEnd

If Z≤466.227:Then [[341.96,2600664.76,514799.865,123。43’25.9”, 15。58’49.5”,0,138.211,68.954,125.273,445]]→Mat F:Prog”F”: Return: IfEnd

说明:1、交点法:If Z≤计算交点段终点桩号:Then[[交点桩号,交点X坐标,交点Y坐标,起点至交点方位角,交点转角,交点前段缓和曲线长度,交点后段缓和曲线长度,交点前段切线长度,交点后段切线长度,圆半径]] →Mat F: Prog”F”: Return: IfEnd

(转角则为交点段终点方位角减起点方位角,分正负,左偏为负,右偏为正)如整条线无曲线,全为直线段,则交点为终点桩号,XY为终点坐标,方位角为起点方位角,转角和圆半径为1,其它全为0。

②-1程序名:S1(线路1高程竖曲线要素子程序)

If Z[4]=1:Then Goto 1: Else Prog “S2”: Return: IfEnd:

LbI 1:If Z≤241.09:Then 95.356→C:40.742→G:2000→R:-.03155

→I:.00812→N:IfEnd:

②-2程序名:S2(线路2高程竖曲线要素子程序)

If Z≤133.601:Then 106→C:45.12→G:1525→R:-.0064→I:.0298→N: Return:IfEnd:

If Z≤466.23:Then 298→C:50.841→G:1945→R:.0298→I:-.01968→N: Return:IfEnd:

程序字母说明:C-竖曲线交点桩号;G-交点桩号高程(未竖曲线调整的);R-竖曲线半径;I-竖曲线前纵坡; N-竖曲线后纵坡

③-1程序名:I1(线路1高程超高参数子程序)

0→K:1→W: If Z[4]=1:Then Goto 1:Else Prog “I2”:Return: IfEn d:LbI 1:If D<0:Then Goto L:Else Goto R:IfEnd:

LbI L:If Z≤159.419:Then 0→S:.06→M: Return:IfEnd:

If Z≤187.987:Then 28.568→S:159.419→C:.06→M:.02→N: Return: IfEnd:If Z≤241.086:Then 0→S:.02→M: Return:IfEnd:

LbI R:If Z≤159.419:Then 0→S:-.06→M: Return:IfEnd:

If Z≤187.987:Then 28.568→S:159.419→C:-.06→M:-.02→N: Retu rn:IfEnd:If Z≤241.086:Then 0→S:.-02→M: Return:IfEnd

③-2程序名:I2(线路2高程超高参数子程序)

If D<0:Then Goto L:Else Goto R:IfEnd:

LbI L:If Z≤77.872:Then 0→S:.02→M:Return:IfEnd:

If Z≤93.889:Then 16.017→S:77.872→C:.02→M:.05→N:Return:If End:If Z≤198.567:Then 0→S: .05→M:Return:IfEnd: If Z≤273.0 06:Then 74.439→S:198.567→C:.05→M:.02→N:Return:IfEnd:If Z

≤335:Then 0→S: .02→M:Return:IfEnd: IfZ≤346.235:Then 11.23 5→S:335→C:.02→M:.015→N:Return:IfEnd:

LbI R:If Z≤77.872:Then 0→S:-.02→M:Return:IfEnd:

If Z≤93.889:Then 16.017→S:77.872→C:-.02→M:-.05→N: Return: IfEnd:If Z≤198.567:Then 0→S: -.05→M: Return:IfEnd: If Z≤2 73.006:Then 74.439→S:198.567→C:-.05→M:-.02→N: Return:IfEn d:If Z≤335:Then 0→S: -.02→M: Return:IfEnd: IfZ≤346.235:Th en 11.235→S:335→C:-.02→M:-.015→N: Return:IfEnd:

子程序中字母表示说明:

K-中央分隔带半幅宽(中桩标高至中桩中线距离,无分隔带则为0);W-超高方式参数(W=1为一般直线方式超高,W=2为三次抛物线方式超高);S-超高渐变段距离(不是渐变段则输入0);C-超高渐变段起点桩号(不是渐变段,无需输入);M-超高段起点横坡,N-超高渐变段终点横坡(不是渐变段,无需输入)。

④-1程序名:G1(线路1路基标准半幅宽度参数子程序)

If Z[4]=1:Then Goto 1:Else Prog “G2”:Return: IfEnd

LbI 1:If D<0:Then Goto L:Else Goto R:IfEnd:

LbI L:If Z≤241.086:Then Z→C:3.5→A:Return:IfEnd:

LbI R: If Z≤40.857:Then 0→C:5→A:5.25→B:40.857→S:Return:I fEnd:If Z≤159.419:Then Z→C:5.25→A:Return:IfEnd: If Z≤187. 987:Then 159.419→C:5.25→A:5.5→B:28.568→S:Return:IfEnd:If

Z≤241.086:Then Z→C:5.5→A:Return:IfEnd

④-2程序名:G2(线路2路基标准半幅宽度参数子程序)

If D<0:Then Goto L:Else Goto R:IfEnd:

LbI L:If Z≤466.227:Then Z→C:3.5→A:Return:IfEnd:

LbI R: If Z≤321.611:Then Z→C:5→A:Return:IfEnd:If Z≤346.23 5:Then 321.611→C:5→A:5.75→B:24.624→S:Return:IfEnd:If Z≤4 66.227:Then Z→C:5.75→A:Return:IfEnd

子程序中字母表示说明:

C-宽度渐变段起点桩号(不是渐变段C=Z);A-宽度渐变段起点宽度; B-宽度渐变段终点宽度(不是渐变段,无需输入);S-宽度渐变段距离(不是渐变段,无需输入)。

⑤-1程序名:SD1(隧道参数子程序)

If Z[4]=1:Then 5.1→R:1.8→A:1.4→V:0.59→B:0→Q: 109。01’30”→P: Return:IfEnd:

If Z[4]=2:Then 8.75→R:-1.1→A:4.77→V:1.47→B:-.25→Q: 51。28’57.1”→P: Return:IfEnd:

子程序中字母表示说明:

R-隧道上拱半径;A-隧道上拱圆心至设计面高度;V-隧道中腰部半径;B-中腰圆心至设计面高度;Q-设计隧道中线与设计路基中线偏移值,左为负数,右为正数;P-上部拱跨隧道半幅角度;

⑥-1程序名:W1(线路1路基填挖边坡参数子程序)

If Z[4]=1:Then Goto 1: Else Prog “W2”: Return:IfEnd:

LbI 1: 10→E:10→F:2.6→M:2→N:2→U:1.5→I:1.75→J:8→W:2→V: If D<0:Then Goto L:Else Goto R:IfEnd:

LbI L:1→A:1.25→B:1.25→C:Return:

LbI R:If Z≤110:Then 1.25→A:1.25→B:1.5→C: Return:Else Goto L: IfEnd

⑥-2程序名:W2(线路2路基填挖边坡参数子程序)

10→E:10→F:2.6→M:2→N:2→U:1.5→I:1.75→J:8→W:2→V:If D<0: Then Goto L:Else Goto R:IfEnd:

LbI L:0.75→A:0.75→B:0.75→C:Return:

LbI R:If Z≤445:Then Goto L:Else If Z≤506.9:Then 0.25×(Z-44 5)÷21.2→Q:.75+Q→A:A→B:A→C:Return:IfEnd

子程序中字母表示说明:

A-挖方第一阶边坡边率;B-挖方第二阶边坡边率;C-挖方第三阶边坡边率;E-挖方第一阶高度;F-挖方第二阶高度;M-挖方路基碎落台及水沟宽度;N-挖方第二台阶平台宽度;S-挖方第三台阶平台宽度;I-填方第一阶边坡边率;J-填方第二阶边坡边率; W-填方第一阶高度;V-填方第二台阶平台宽度。(注:本程序只做出挖方三个台阶,填方二个台阶,如需增加,先需在程序5BP程序相应增加。再如一标段有坡率及坡高不一样时,可以照其它参数程序一样,用判别语句。)

三、使用说明

1、规定

(1) 坐标计算以交点方式计算,一般情况下一个交点计算一段线

是:直线+缓和曲线+圆曲线+缓和曲线+直线。在匝道中先根据实际线来

调整,可以单独计算一段不完整的缓和曲线+圆曲线。也可以单独计算

一段缓和曲线或一段圆曲线,需先运行T程序整理成交点数据。无缓和

曲线时,缓和长度输0。

(2) 程序中:×10-9为10的负9次方即0.000000001;Π为圆周率即3.1415926;√为根号;"X=":X前有空格二个,为了显示效果

(3) 为了区别字母O及数子0,特把字母0加粗。

2、输入与显示说明

输入提示部分:

"A:XY=1, ZD=2 ,GC=3, GD=4, BP=5, FM=6, ZP=7, JS=8,SD=9"? 按对应数子键约半秒:1、坐标计算放样程序2、坐标反算程序;3、高程计算查阅程序;4、路基半幅标准宽度查阅程序;5、路基边坡及开挖口放样程序;6、路基标准距离放样;7、桥梁锥坡计算放样程序;8、极坐标计算程序;9、隧道超欠挖计算程序

XZ?YZ?为置仪点坐标,第一次运行输一次,以下运行不需再输入,下次再运行此程序调上次输值,如需改,则输入,不需改,则按确认键。(后附有导线点坐标存储子程序,有兴趣的可加上)

“QX:X1=1,X2=2”?选择经路,坐标计算中输入0值,变为输入线元段曲线要素。输1为第一条线路。输2为第二条线路,本程序暂设计实例为2条线路。

KM?正算时所求点的里程(反算输入大概桩号)输入-1,返回输入选择计算类型,输入-2,返回选择线路。

D?正算时所求点距中线的边距(左侧取负值,右侧取正值,在中线上取零)

X0 ?反算时所求点的X坐标(放样程序中实测X坐标)

Y0 ?反算时所求点的Y坐标(放样程序中实测Y坐标)

显示部分:

L0? 涵洞放样程序中涵距中心桩号前后距离,前为正,后为负.(即涵洞半幅宽度)

M0? 放样程序中原地面标高输入

H-B?计算面至路面高差(默认路面为0)

PJ1? PJ2? PJ1为路线中线与边线的右夹角。第二夹角为边线至路前进方向夹角,默认值均为90度.

TH-GH?边坡放样中填方超放宽值,默认值为0.5m.

"LD:Z-,Y+"? 桥梁锥坡向左右方向边长,左为负数,右为正数。(即为锥坡高程减地面高程后乘以填方坡比)

"LR"? 锥坡向路线前进或向后退方向边长。"Z0"? 锥坡顶边桩号

"L0:SZ+,DZ-"?锥坡放样中,椭圆上分段放样距离,小桩号锥坡输正数,大桩号锥坡输负数。

“CQHD”? 隧道超欠挖程序中衬砌厚度, 默认值为0.65m.

QX子程序中和T程序结果中:““JDKM”?输入交点桩号;“JDX”?“JDY”?输入交点X、Y坐标;“FWJ“?输入起点至交点方位角”ZJ “?输入转角(终点方位角-起点方位角之差,左转为负,右转为正);“LS1”?“LS2”?输入交点前段缓和曲线长度,交点后段缓和曲线长度;“T1”?“T2”?输入交点前段切线长度,交点后段切线长度;”R”?圆半径

输出部分

X=*** 正算时,计算得出的所求点的X坐标

Y=*** 正算时,计算得出的所求点的Y坐标FWJ=*** 正算时,计算得出的所求点的至置仪点方位角

S=*** 正算时,计算得出的所求点的至置仪点距离

KM=*** 反算时,计算得出的所求点的里程

D=*** 反算时,计算得出的所求点的边距H=*** 所求点位置设计计算面顶标高

I=*** 所求点位置设计路面横坡(D输0时为,本段路基纵坡)LGD=*** 所求点位置设计路面顶左半幅标准宽度

LGD=*** 所求点位置设计路面顶右半幅标准宽度

LX=*** 边桩放样程序中实测点至设计边坡点距离,正向内移,负向外移。(隧道程序中为超欠挖值,正为超挖,负为欠挖) TW=*** 边桩放样程序中,实测放样边坡点至止桩号设计顶填挖高度值(负为挖方值,正为填方值)

H0=*** 隧道放样程序中测量点至设计面高度

四、结束语

1、本套程序实例线路给二条,如标段像匝道有多条线时,同理增加。

2、所有对程序有建议或问题的,加本人QQ后可以直接留言,由于工作原因,可能不能马上给予答复,敬请谅解!(加QQ为好友时请注明:计算器程序)

附后为坐标计算参数子程序X1、X2和高程计算子程序S1、S2数据来源(X1、S1为C线,X2、S2为I线)

交点数据均需先运行T程序,计算出交点数据

例如X1要素:先运行T程序,输入表中C线参数:QKM输0;XQ输2600509.148;YQ输514063.566;LS1输40.857;LS2输81.667;A1输80,A2输70;FWJ输299。43‘39“;ZP输183。45‘18.1“;R输60。计算后各要素结果记录在本上,再对应做X1子程序就可以了。

卡西欧5800P计算器程序

卡西欧5800P计算器TYQXJSI坐标正反算 (经过修改) 1.主程序(TYQXJSI) 10→DimZ:"1.SZ → XY":"2.XY → SZ":?N:"XO"? U:"YO"? V:"SO"? O:"FO"? G:"LS"? H:"RO"? P:"RN"? R:? Q: 1÷P→C:(P-R)÷(2HPR) →D:180÷π→E:If N=1: Then Goto 1: Else Goto 2: IfEnd Lbl 1:"DK? +?"? S:?Z: Abs(S-O)→W:If W>H or SH or S157297: Then Prog”OPRP2-0”: Else Prog”OPRP1-50” IfEnd: IfEnd Else If N=3: Then Prog”OPRP4”: IfEnd :IfEnd

2. 正算子程序(SUB1) 0.1739274226 →Z[3]:0.3260725774→B:0.0694318442→K: 0.3300094782→L:(1-L) →F:(1-K)→M: (U+W(Z[3]cos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW (C+FWD))+ Z[3]cos(G+QEMW(C+MWD)))) →X: V+W(Z[3]sin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW( C+FWD))+ Z[3]sin(G+QEMW(C+MWD))) →Y:G+QEW(C+WD)+90→F:(X+Zcos(F))→X:(Y+Zsin(F))→Y 注:Z[3]替代源程序A。 3. 反算子程序(SUB2) G-90 →Z[2]:Abs((Y-V)cos(Z[2])-(X-U)sin(Z[2])) →W:0→Z:Lbl 0:Prog "SUB1":Z[2]+QEW(C+WD)→L: (J-Y)cos(L)-(I-X)sin(L)→Z:If Abs(Z)<10^(-6):Then Goto1:Else W+Z→W:: IfEnd: Goto 0 Lbl 1:0→Z:Prog "SUB1":(J-Y)÷sin(F)→Z 注:Z[2]替代源程序T。 ] 4、隧道超欠挖计算(OPRP1) "PZ":Z-2.0→L◢

卡西欧计算器用法

卡西欧财务计算器用法 1、开机ON 2、关机SHIFT+AC=OFF 3、设置与记忆(存储)清除 SHIFT+9=CLR Clear?清除吗? SETUP :EXE 清除设置请按EXE Memory :EXE 清除记忆(存储)请按EXE All :EXE 清除所有请按EXE Reset All?重新设置所有吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按ESC Clear Setup?清除设置吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按ESC Clear Memory?清除记忆(存储)吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按ESC Complete!更改工作完成! Press[AC]Key 请按AC 键 4、Replay 是计算器指令状态移动方向键上下左右均可移动,按左箭头指令光标跑到最右边,按右箭头指令光标跑到最左边。 5、Solve 不能按EXE 键执行的,都是按这个键来求解。 6、EXE 四则运算的执行、输入的确认 7、ESC 取消返回上一个界面当计算器没反应时都是按这个键 8、DEL 删除刚刚输入的一个数字 9、AC 清除刚刚输入的一行数字 10、∧乘方例如5乘5次方,输入5∧5即可 11、开x 次方 开方shift+∧= () 23x = 12、开机出现的就是加减乘除四则运算的模式COMP ,中间用其他模式后,如果需要用该模式计算,请直接按COMP 键调用这个模式。 13、计算器的屏幕小,提供的功能多,因此,往往一个键提供两个功能,一个功能直接按,另一个功能要按SHIFT 后再按该键才行。如55的计算,直接输入5,再按∧,再输入5,然后按EXE 即运算出结果。又如324的计算,按SHIFT ,然后按∧, 调出,向左移动方向键使光标到达x 的前面,输入3,右移光标到达根号里面,输入24,再按EXE 即运算出结果。乘几次方的后面如果不再连续做加减乘除运算,后面的反括号可以不加,反之一定要加,否则,55×6,就变成了55×6。

卡西欧财务计算器计算模式实例

卡西欧财务计算器计算模式实例 一、CASIO FC100- 200V 入门 1、开机 ON 2、关机 SHIFT +AC =OFF 3、设置与记忆(存储)清除 SHIFT +9 =CLR Clear? 清除吗? SETUP :EXE 清除设置请按EXE Memory :EXE 清除记忆(存储)请按EXE All :EXE 清除所有请按EXE Reset All ? 重新设置所有吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按 ESC Clear Setup ? 清除设置吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按 ESC Clear Memory ? 清除记忆(存储)吗? [EXE]:Yes 选择“是的”,请按EXE [ESC]:Cancel 选择“取消”,请按 ESC Complete ! 更改工作完成! Press[AC] Key 请按AC 键 4、Replay 是计算器指令状态移动方向键 上下左右均可移动,按左箭头指令光标跑到最右边,按右箭头指令光标跑到最左边。 5、Solve 不能按EXE 键执行的,都是按这个键来求解。 6、EXE 四则运算的执行、输入的确认 7、ESC 取消 返回上一个界面 当计算器没反应时都是按这个键 8、DEL 删除刚刚输入的一个数字 9、AC 清除刚刚输入的一行数字 10、∧ 乘方 例如5乘5次方,输入5∧5即可 11、开x 次方 ()x 开方 shift+∧=()x ()() 293 x x = 12、开机出现的就是加减乘除四则运算的模式COMP ,中间用其他模式后,如果需要用该模式计算,请直接按COMP 键调用这个模式。 13、计算器的屏幕小,提供的功能多,因此,往往一个键提供两个功能,一个功能直接按,另一个功能要 按SHIFT 后再按该键才行。如55的计算,直接输入5,再按∧,再输入5,然后按EXE 即运算出结果。又如324的计算,按SHIFT ,然后按∧,调出()x ,向左移

卡西欧fx5800计算器缓和曲线编程

1fx-5800P计算器编程 缓和曲线程序 14→DimZ :“ZHK”:?K:?R :? A:?L:? T:? F:“Y+1,Z-1”:?P:“JDX”:?Q:“JDY”:?W:180÷(πR)→Z:0.5L-L^3÷(240R2)→Z[8]:“LZ”:ZL÷2→B:A÷Z+L→Z[13]◢ “ZHK=”:K◢ “HYK=”:K+L→Z[1]◢ “YHK=”:K+ Z[13] -L→Z[2]◢ “HZK=”:K+ Z[13]→Z[3]◢ “ZHX=”:Q+Tcos(F+180)→U◢ “ZHY=”:W+Tsin(F+180)→V◢ “HZX=”:Q+ Tcos(F+PA)→Z[6]◢ “HZY=”:W+ Tsin (F+PA)→Z[7]◢ Lb1 0:“CDZH”:?M If M≤K:Then Goto 6:Else If M≤Z[1] :Then Goto 1:Else If M≤Z[2] :Then Goto 2:Else If M≥Z[3] :Then Goto 7:Else If M≥Z[2] :Then Goto 5:If End:If End:If End:If End:If End Lb1 1:M-K→G:√((G-G^(5)÷(40L2R2)+G^(9)÷(3456R^(4)L^(4)))2+(G^(3)÷(6RL)-G^(7)÷(336R^(3)L^(3)) +G^(11)÷(42240R^(5)L^(5)))2)→D F+PZG2÷(6L)→C:F+PBG2÷L2→H:Goto 3 Lb1 2:M-Z[1]→G:R(1-cos(B+ZG))+L2÷(24R)→Z[9]:√(Z[9]2+(Rsin(B+ZG)+Z[8])2)→D F+Ptg-1(Z[9]÷(Rsin(B+ZG)+Z[8]))→C:F+P(B+ZG)→H Lb1 3 “X=”:U+Dcos(C)→X◢ “Y=”:V+Dsin(C)→Y◢ Lb1 B:“ZBJS1,FY-1”:?J If J>0:Then Goto 4:Else If J〈0:Then Goto A:If End:If End Lb1 4:“ZB”:?S “ZBX”:X+Scos(H-90)◢ “ZBY”:Y+Ssin(H-90)◢ “YB”:?N “YBX”:X+Ncos(H+90)◢

卡西欧5800计算器工程应用程序.

卡西欧5800计算器测量专用程序 一、程序功能 主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本优化:1、优化程序语句、2、取消原线元法计算,化线元法为交点法。 3、高程计算修改, 4、附计算坐标及高程参数设计要素输入实例 二、源程序(绿色为程序名;蓝色为输入计算器内容)0.总主程序(1、坐标计算放样程序2、坐标反算程序;3、高程计算查阅程序;4、路基半幅标准宽度查阅程序;5、路基边坡及开挖口放样程序;6、路基标准距离放样;7、桥梁锥坡计算放样程序;8、极坐标计算程序;9、隧道超欠挖计算程序)运行后按1~9数子约半秒,则选择1至9的程序,返回时,在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。 程序名:0(数子0) ClrMat:ClrVar:12→DimZ:Norm 2:Do:"(XY=1,ZD=2 ,GC=3,GD=4,BP=5,FM=6,ZP=7,JS=8,SD=9)===>QING AN 1-9":Getkey→Z[3]:While Z[3]=35:Prog"1XY”:WhileEnd:While Z[3]=36:Prog"2ZD":WhileEnd: While Z[3]=37:Prog"3GC":WhileEnd: While Z[3]=21:Prog"4GD":WhileEnd: While Z[3]=22:Prog"5BP":WhileEnd: While Z[3]=23:Prog"6FM":WhileEnd: While Z[3]=31:Prog"7ZP":WhileEnd: While Z[3]=32:Prog"8JS":WhileEnd: While Z[3]=33:Prog"9SD":WhileEnd:LpWhile Z[3]≠25:”XIE XIE SHI YONG”: 1.主程序:一般坐标计算及放样程序

卡西欧5800p计算器所有解释

卡西欧5800p计算器所有编程命令解释 1. Norm 1 指数显示 Norm 2 小数显示 2. ?→x只显示? 字符+?→x显示字符+? ?x 显示 x? “字符”?x 显示字符+? 有→则不显示该变量当前值 3.(判断表达式)语句1 : 语句2。。。如果判断表达式为真(或非零),则不跳过语句1. 如果判断表达式为假(或是零),则会跳过语句1. 4. If...then…else…ifend 如果语句为真,则执行then(不执行else),然后执行ifend. 如果语句为假,则执行else(不执行then),然后执行ifend. 5. Break 中断语句 中断For,Do,While循环,并从该循环的下个命令起继续运行 6. Dsz 使控制变量递减一,在变量的值为零时执行转移 7. Isz Isz<变量>:<语句1> <语句2>,变量应为A~Z 以 1 为增量逐次增加变量的值,当变量的值不等于0 时,执行语句1,否则执行语句2 8. Cls Dsz<变量>:<语句1> <语句2>。变量应为A~Z。以1 为减量逐次减小变量的值,当变量的值不等于0 时,执行语句1,否则执行语句2 9. Locate 定位显示语句 句法 1:Locate <列数>, <行数>,<数值> 句法2:Locate <列数>, <行数>,<表达式> 句法3:Locate <列数>, <行数>, "字符串" fx-5800P 的屏幕最多可以显示4 行、16 列字符,

因此定位语句中的列数值应为大于等于1、小于等于16 的整数,行数值应为大于等于1、小于等于4 的整数。 10. Lbi n ~ Goto n Goto n~Lbl n 无条件转移至 Lbi n 位置 11. Getkey 返回与上次按键相对应的代码,Getkey= 12. DO ~ LpWhile循环语句 Do <语句块> LpWhile<条件> 先执行语句块,然后测试条件,条件为真时重复执行语句块,否则执行<条件>后的语句。无,论条件是否为真,语句块至少被执行一次。 13. Pol 计算两坐标点之间距离,坐标为(4,4),与原点的距离就是POL(4,4)=4√2 14. Abs 求绝对值 15. Fix 取整数函数Fix(Rnd*11) ,取0 ~ 11的随机整数 16. Rnd 随机函数 17. 角度单位设置语句 Deg:设置角度单位为十进制度,按键输入Deg。执行该语句后,状态行显示。Rad:设置角度单位为弧度,按键输入Rad。执行该语句后,状态行显示。 Grd:设置角度单位为哥恩,按键输入Grd。执行该语句后,状态行显示。 18. Dim 定义变量 19. RCL 键面命令,Rcl+A 显示变量A的当前值 最全最热最专业的文档类资源,文库一网打尽

公路测量卡西欧5800万能程序

一、前言本程序是《CASIO fx-5800P计算与道路坐标放样计算》中道路坐标放样计算程序的升级改进版本。原道路坐标放样计算程序只基于道路的单个基本型曲线,有效计算范围仅包括平曲线部分和前后的两条直线段,使用时需要输入平曲线设计参数,无坐标反算桩号功能。改进后的程序名称为:道路中边桩坐标放样正反算程序(全线贯通),增加了可实现全线贯通的数据库功能和坐标反算桩号功能,主要是: 1.使用道路平面数据库子程序,可将一段或若干段道路的交点法格式平面参数(可容易从直线、曲线及转角表中获得)以数据库子程序形式输入计算器,程序在计算时省却了输入原始数据的麻烦; 2.坐标正算方面,输入桩号即可进行道路的中、边桩坐标计算,若输入了测站坐标,还可同时计算全站仪极坐标放样数据(拨角和平距); 3.坐标反算方面,输入平面坐标,即可计算对应的桩号和距中距离(含左右信息); 4.对于存在断链的道路,可分段分别编写数据库子程序,然后在主程序中添加一个路段选择的功能即可实现(可参照立交匝道程序中匝道的选择)。程序的特点: 1.可进行中桩坐标的正、反算,程序代码简洁,便于阅读和改写; 2.主程序通过调用数据库子程序,省却了使用时输入平面参数的繁琐; 3.使用数据库子程序,换项目只需改写数据库子程序,程序通用性强。二、道路示例项目基本资料基本资料同《CASIO fx-5800P计算与道路坐标放样计算》第6章HY高速公路第2合同段(合同段起止桩号: K4+800~K9+600)。这里摘取直线、曲线及转角表资料如下.

.

. 三、程序代码 .

. .

. .

CASIO fx—5800计算器 工程测量与公路测量程序

CASIO fx—5800计算器工程测量与公路测量程序 1、坐标正算 〝X0=〞?X:〝Y0=〞?Y:〝I=〞?I:〝J=〞?J X+ICos(J)→U:Y+ISin(J)→V 〝X=〞:U (待求点的X坐标) 〝Y=〞:V (待求点的Y坐标) 说明:X0 Y0:已知点坐标I:两点的距离J:方位角 2、坐标反算 Lbl 0 〝X1=〞?X:〝Y1=〞?Y:〝X2=〞?U:〝Y2=〞?V Pol(U-X,V-Y): J<0 J+360→J 〝I=〞:I 〝J=〞:J DMS GOTO 0 说明:X1Y1:第一点的坐标,X2Y2第二点的坐标,I:两点的距离,J:方位角3、圆曲线 〝X0=〞?X: 〝Y0=〞?Y:〝FWJ=〞?D:〝QDHAO=〞?G: 〝ZDHAO=〞?C: 〝R=〞?R Lbl 1 〝DQHAO=〞?L L

卡西欧5800p计算器所有编程命令解释

卡西欧5800p计算器所有编程命令解释 1. Norm 1 指数显示Norm 2 小数显示2. ?→x 只显示? 字符+?→x 显示字符+? ?x 显示x? “字符”?x 显示字符+? 有→则不显示该变量当前值 3.(判断表达式)语句1 : 语句2。。。如果判断表达式为真(或非零),则不跳过语句1. 如果判断表达式为假(或是零),则会跳过语句1. 4. If...then…else…ifend 如果语句为真,则执行then(不执行else),然后执行ifend. 如果语句为假,则执行else(不执行then),然后执行ifend. 5. Break 中断语句 中断For,Do,While循环,并从该循环的下个命令起继续运行 6. Dsz 使控制变量递减一,在变量的值为零时执行转移7. Isz

Isz<变量>:<语句1><语句2>,变量应为A~Z 以1 为增量逐次增加变量的值,当变量的值不等于0 时,执行语句1,否则执行语句2 8. Cls Dsz<变量>:<语句1><语句2>。变量应为A~Z。以1 为减量逐次减小变量的值,当变量的值不等于0 时,执行语句1,否则执行语句2 9. Locate 定位显示语句 句法1:Locate <列数>, <行数>,<数值> 句法2:Locate <列数>, <行数>,<表达式> 句法3:Locate <列数>, <行数>, "字符串" fx-5800P 的屏幕最多可以显示4 行、16 列字符,因此定位语句中的列数值应为大于等于1、小于等于16 的整数,行数值应为大于等于1、小于等于4 的整数。 10. Lbi n ~ Goto n Goto n~Lbl n 无条件转移至Lbi n 位置 11. Getkey 返回与上次按键相对应的代码,Getkey= 12. DO ~ LpWhile循环语句 Do <语句块> LpWhile<条件> 先执行语句块,然后测试条件,条件为真时重复执行语句块,否则执行<条件>后的语句。无,论条件是否为真,语句块至少被执行一次。13. Pol 计算两坐标点之间距离,坐标为(4,4),与原点的距离就是POL(4,4)=4√2 14. Abs 求绝对值15. Fix 取整数函数Fix(Rnd*11) ,取0 ~ 11的随机整数16. Rnd 随机函数

卡西欧计算器f精编cn使用介绍

卡西欧计算器f x精编 C N X使用介绍 Company number【1089WT-1898YT-1W8CB-9UUT-92108】

卡西欧计算器f x-991C N X科学函数计算器卡西欧fx-991CN X是卡西欧第三代新型函数计算器,具备计算、统计、表格、方程/函数、不等式、比例、复数、基数、矩阵、向量10种计算模式。其中函数计算又包括了三角函数、指数函数、对数函数、以基数e的自然对数、使用高斯方法执行的函数等功能。 1.三角函数 三角函数是数学中常见的一类关于角度的函数,常用于研究三角和圆等几何形状的性质。卡西欧fx-991CN X具备优秀的正弦函数sin、余弦函数cos和正切函数tan计算能力,可以快速计算复杂的三角函数。 例:当要计算sin 30o时,按下sin+30+)=,得出结果1 2 。但需要注意的是, “)”右括号并不能少,否则会影响计算结果。 2.指数函数 指数函数是以指数为自变量,底数为大于0且不等于1常量的函数,它是初等函数中的一种。需要注意的是,在使用卡西欧fx-991CN X计算指数函数前,需要注意设置计算器的输入/输出显示模式。 例:将e5×2转换成三位有效位数,则需要按SHIFT+菜单+3(显示格式)+2(科学Sci)+3,选择输入输出方式,然后按下SHIFT+In+(e’)+5?×2=,最后得出结果×102。 3.对数函数 对数函数是以幂为自变量,指数为因变量,底数为常量的函数,其主要形式为y=logax。在使用fx-991CN X计算器计算对数时,需要注意设定a值,否则计算器会使用基数的缺省设定值10。 例:计算log 2 16时,按下SHIFT+(-)+(log)+2+SHIFT+)+,+16+),然后=确认,得出结果4。 4.乘方、乘方根计算

最新卡西欧5800程序LG计算器

卡西欧5800程序L G 计算器

一、坐标正算ZBZS Lbl 0 “X0=”?X:“Y0=”?Y:“I=”?I:“J=”?J X+Icos(J)→U:Y+Isin(J)→V “X=”:U?“Y=”:V? Goto 0 二、坐标反算ZBFS Lbl 0 “X1=”?X:“Y1=”?Y:“X2=”?U:“Y2=”?V Pol(U-X,V-Y): J<0 => J+360→J “I=”:I?“J=”J?DMS? Goto 0 三、圆曲线计算YQXJS “X0=”?X:“Y0=”?Y:“FWJ=”?D:“QDHAO=”?G:“ZDHAO=”?C:“R=”?R Lbl 1 “DQHAO=”?L LC => Goto 2 “PY=”?K 180(L-G)÷(πR)→E 2Rsin(0.5E)→F Rec(Abs(F),D+0.5E) “X=”:X+I+Kcos(D+E+90)→A? “Y=”:Y+J+Ksin(D+E+90)→B? D+E→O:O<0 => 360+O→O “FWJ=”:O?DMS? Goto 1 Lbl 2:“END” 四、1.竖曲线SQX “QZHAO=”?J:“HB=”?B:“I1=”?C:“I2=”?D:“R=”?R“T=”?T: (D-C)÷100→W:W÷Abs(W)→A:“T”:0.5Abs(W)→S? J-T→X:J+T→Y Lbl 0 “DQ=”?L If LY:Then Goto 1:IfEnd:IfEnd

“GC=”:B+0.01C(L-J)+A(L-J+T)2÷(2R)→H? Goto 0 Lbl 1:“END” 2.标高计算BGJS(含横坡计算边桩) “QZHAO=”?J: “QDHAO=”?G: “ZDHAO=”?K: “HB=”?B: “SX=”?Q:“I1=”?C:“I2=”?D: “R=”?R“T=”?T: (D-C)÷100→W:W÷Abs(W)→A:“T”:0.5Abs(W)→S?“YIGAO=”?O J-T→X:J+T→Y Lbl 0 “DQ=”?L:“PY=”?U: “HP=”?V If LY:Then Goto 2:IfEnd:IfEnd “HL=”:B+0.01C(L-J)+A(L-J+T)2÷(2R)+0.01UV+Q→H? “H0=”:O-H→Z? Goto 0 Lbl 1 L Goto 3 “HL=”:B+0.01C(L-J)+0.01UV+Q→H? “H0=”:O-H→Z? Goto 0 Lbl 2 L>K => Goto 3 “HL=”:B+0.01D(L-J)+0.01UV+Q→H? “H0=”:O-H→Z? Goto 0 Lbl 3:“END” 说明:输入时可包括竖曲线前后各一段的平直段,HL为中桩或边桩标高,H0为前视读数 五、点到直线距离DDZXJL Lbl 0 “X0=”?A:“Y0=”?B:“X1=”?X:“Y1=”?Y:“X2=”?U:“Y2=”?V Pol(U-X,V-Y) “L=”(B-Y)cos(J)-(A-X)sin(J)→L? “S=”(B-Y)sin(J)+(A-X)cos(J)→S? Goto 0 六、横坡渐变HPJB “QDHAO=”?A:“QDHP=”?B:“ZDHAO=”?C:“ZDHP=”?D Lbl 0

casio计算器的用法fx-350es

在MathIO里面只能默认显示分数没法修改默认显示小数 只有一种办法是改成LineIO模式操作是Shift ==> Mode (Setup) ==> 2(LineIO) 此时你会发现屏幕右下角有一个“0” 而且上方的“Math”没有了不过此状态下输入的表达式也只能是线形的了 还原:万能还原方法:Shift ==> 9 ==> 1 (Setup) ==> “=”(Yes) 仅还原线形输入:Shift ==> Mode ==> 1 我一般做数学题用MathIO 做物理或化学题用LineIO 有关本说明书 以下显示出第二功能键的不同颜色的文字标记。 以下显示出本说明书中如何表示第二功能操作的范列。

以下显示出本说明书如何示范按键操作以便选定萤幕上选单项目的范例。 本说明书和另外的附录中的显示和说明(例如:按键图样),仅供说明使用,和它们实际所代表的项目可能会有些许的不同。 本说明书的内容可能会有所更动,不再另行通知。 在任何情况下,卡西欧计算机株式会社不因任何人在购买本产品及所属项目,所引起的特殊、附带的,或结果性的损害,而有连带责任或任何牵连。除此之外,卡西欧计算机株式会社对于因任何一方由于使用本产品及其所属项目而引起的任何求偿不负有任何赔偿责任。 使用另外的附录 使用说明书中的范例数字(如「[#021]」),参照到「附录」中相对应的范例号码。 依附录中的图样,指定角度的单位:

安全注意事项 使用计算器之前,请确定先阅读以下安全注意事项。保留本说明书在手边,以供稍后使用。 若忽略含有本符号的资讯,可能会造成个人的伤害或是零件的损害。 电池 1 移除计算器的电池以后,请放置于安全储存场所,避免被孩童找到,而意外吞食。 2 避免电池被小孩拿到。假如不幸意外吞食了,立刻去看内科医师。 3 请勿将电池充电、尝试拆开电池或让电池短路。请勿让电池直接受热或将电池焚毁。 4 不当使用电池可能会使电池漏电并损及附近物品,而且也可能会引起火灾及个人伤害。 (1)当电池装入计算器时,请确定电池的正极+和负极-方向都正确相连。 (2)若您有一段长时间不会使用到计算器请取出电池(fx-82es/fx-83es/fx-350es)。 (3)使用说明书内所指定的电池种类。 计算器的废物处理 千万不可将计算器焚毁。燃烧过程中计算器某些元件可能会突然激射,造成火灾或个人伤害。 使用注意事项 1 第一次使用计算器时,请确定按下on键。 2 即使计算器的操作一切正常,仍需至少每三年(lr44(gpa76))、二年(r03(um-4))或一年(lr 03(am4))更换一次电池。 过期的电池可能会泄漏,造成计算器损坏或功能不正常。千万不要将过期的电池放在计算器内。 3 随计算器所附的电池,在储存和运送过程中可能会损失轻微的电力。由于这个原因,它可能需要比一般正常电池寿命稍早些更换。 4 不充足的电力可能会使记意器内容损坏或永远消失。对于重要的数据应始终保有画面的记录。

CASIO 5800计算器测量计算程序

CASIO 5800计算器测量计算程序 上上月做这个东西的时候没仔细检查,有好几处输错了的地方,今天把它修改过来。 简要介绍: 1. 新版程序把线元法和交点法已经集成在一个模块中了,用户只需修改JD 程序和ZA程序中的数据部分即可,其余不需作任何的改动。 2. 因为每条路高程计算不尽相同,且比较复杂,现在可利用PC机EXCEL计算好打印成表格带到工地上使用,所以本版程序未对线路高程序进行专门的编程计算,而是利用统计计算模式中来输入桩号(第一列X)及左、右高程(第二、三列Y,Freq),这种输入数据的方式最为直观,易发现错误,也易修改,输入完毕后运行S程序对数据按桩号进行排序,在程序中通过调用GG程序来进行内插计算,SG=-1得左标高,SG=1得右标高(若SG输入0,则可进行一般的线性内插计算)。 3. 在JD程序和XY程序中,先将一个计算单元的数据置入矩阵F中(1行8列或1行9列),这样程序可读性极好。 4.相比原CASIO4850程序操作习惯,作了一点小小的改动,测站坐标存在Z[10],N中,X坐标原存在M中容易被误操作修改,而设计标高存在M中,这样易于修改,因为CASIO5800没有IN,OUT功能,很不方便。 4. 程序利用Z[2]变量值来判断是采用交点法还是线元法模型计算,Z[2]=0为线元法,否则为交点法。 一、PQX程序:计算中边桩坐标及近似的桩号反算,在运行模式直接调用。 ①Z[10]→S:”XO”?S:S→Z[10]:”YO”?N:Prog “AU” ②Lbl 2:?L:Prog “Z”:Prog “E”:1n→O:90→S ③Lbl 4:”JJ”?S:”YC”?O:SO=0 =>Goto 2…原来lbl 后没有标号4的。 ④O=-1 =>Goto 6 ⑤“X,Y”:R+OCos(Z+S)→X▲U+OSin(Z+S)→Y▲Prog “D”:Goto 4 ⑥Lbl 6:Z[7]→X:Z[8]→Y:”XF”?X:”YF”?Y:XY=0 =>Goto 4 ⑦X→Z[7]:Y→Z[8]:Pol(X-R,Y-U+1p):Z+S-J→J:”YC,DL,L”:ICos(J)→O▲ISin( J)→I▲L+I▲Goto 6 二、P程序:在程序中提供一个自由运算的模式。 ①Lbl 1:”TMP”?I:If I≠0:Then “RST”:I▲Goto 1:IfEnd 二、LYC程序:进行桩号反算及边坡放样,在运行模式直接调用。 ①Prog “AU” ②Lbl 1:Z[7]→X: Z[8]→Y: Z[6]→S: ”XF”?X :X→Z[7]:”YF”?Y:Y→Z[8]: ”ZF”?S: S→Z[6] ③Lbl 2:Prog “Z”:Y=U =>Y+1p→Y ④Pol(X-R,Y-U):J-Z→J:Isin(J)→O:Icos(J)→I ⑤If Abs(I)≤0.1:Then Prog “E”:”L,YC”:L+I→L▲O▲Goto 3:IfEnd ⑥If Z[9]≠0:Then Pol(Z[9]-SO,I):πJZ[9]÷180→I:IfEnd ⑦”DL”:I▲L+I→L:Goto 2 ⑧Lbl 3: Z[6]→S:If S=0:Then Goto 1:IfEnd ⑧M→Z ⑨Lbl 4:”SG”?Z:Z→M:If Abs(Z)=1: Then Prog “GG”:Y→Z:If X=1:Then

5800卡西欧计算器程序大全

FX5800计算器公路测量常用程序集 一、程序功能 本程序由6个主程序、5个次子程序及5个参数子程序组成。主要用于公路测量中坐标正反算,设计任意点高程及横坡计算,桥涵放样,路基开挖口及填方坡脚线放样。程序坐标计算适应于任何线型. 二、源程序 1.主程序1:一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离;②反算桩号及距中距离) 程序名:1ZD-XY Lb1 0:Norm 2 F=1:(正反算判别,F=1正算,F=2反算,也可以改F前加?,改F为变量) Z[1]=90(与路线右边夹角) Prog"THB":F=1=>Goto 1:F=2=>Goto 2 Lb1 1:Fix 3:"X=":Locate 6,4,X◢ "Y=":Locate 6,4,Y◢ Prog"3JS”:Goto 0: Lb1 2:Fix 3:"KM=":Locate 6,4,Z◢ "D=":Locate 6,4,D◢ Goto 0 2.主程序2:高程序横坡程序(设计任意点高程及横坡) 程序名:2GC LbI 0:Norm 2 “KM”?Z:?D: Prog”H”:Fix 3:”H=”:Locate 6,4,H◢ “I=”: Locate 6,4,I◢ Goto 0 3.主程序3:极坐放样计算程序(计算放样点至置仪点方位角及距离) 程序名:3JS X:Y: 1268.123→K(置仪点X坐标) 2243.545→L(置仪点Y坐标,都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦) Y-L→E:X-K→F:Pol(F,E):IF J<0:Then J+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示) Fix 3:”S=”:Locate 6,4,I◢ 4.主程序4:涵洞放样程序(由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离) 程序名:4JH-XY LbI 0:Norm 2 90→Z[1](涵洞中心桩与右边夹角,手工输入,也可以修改成前面加?后变为变量) 1→F:Prog”THB”:?L: Z[2]-Z[1] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3: "X=":Locate 6,4,X◢

卡西欧计算器编程指导

卡西欧计算器编程指导 在计算能力飞速发展的今天,各种计算工具应运而生代替了以往我们大量、繁琐的分析计算工作,简化了计算步骤节省了计算时间。在种类繁多的计算工具中适合测量工作的计算器也大有所在。比如有一款SHAPPC-E500计算器,它相当于是基于BASIC语言的微型电脑,功能也相当齐全能编写较复杂的程序、内存也相当大有32KB、64 KB、128 KB、256 KB、几种型号,同时具有输入输出通讯设备。但价格不菲,现在市场价格大约为2000元到3000元,个人经济承受能力有限。通过几年的实际测量工作我个人为认为真正适合测量人员较为专业的计算器应首推基于科学计算器具有简单程序语言的casio4x00计算器。它有很多优点:一、使用简单,最大的一个优点就是只要具有初中水平会运用数学公式对函数有一般的了解的人,能基本理解casio4x00的内装函数即可进行简单的编程。非常适合测量初学者和数学程序爱好者学习,也适合专业的测量人员的使用和能力提高。不像其它的专业一定要具有较高的专业技术水平才能进行电脑编程。二、成本低廉,价格在400元左右。三、携带方便,体积很小可随时放在口袋里随拿随用。casio系列较好的编程型号有casio4500(以下简称4500)、casio4800(以下简称4800),(好象近来还推出了一款casio4850)前者较内存小,只有1103个字节,能应付一些较为简单的公式计算和科学计算,但由于内存有限,对一些较复杂或子程序过多的程序就力不从心了,不能出色的完成测量任务。4800就比4500有较大的改进,4800内存达到的4500个字节,而且显示屏是4500的几倍大,能更准确的显示数据,内装函数字符一目了然。且具有简单的人机对话功能,出现了菜单子菜单。4800还在4500增加了啊佛加德罗

公路测量中CASIO 5800计算器计算程序

公路测量中CASIO 5800计算器计算程序 1.新版程序把线元法和交点法已经集成在一个模块中了,用户只需修改JD程序和ZA程序中的数据部分即可,其余不需作任何的改动。 2.因为每条路高程计算不尽相同,且比较复杂,现在可利用PC机EXCEL计算好打印成表格带到工地上使用,所以本版程序未对线路高程序进行专门的编程计算,而是利用统计计算模式中来输入桩号(第一列X)及左、右高程(第二、三列Y,Freq),这种输入数据的方式最为直观,易发现错误,也易修改,输入完毕后运行S程序对数据按桩号进行排序,在程序中通过调用GG程序来进行内插计算,SG=-1得左标高,SG=1得右标高(若SG输入0,则可进行一般的线性内插计算)。 3.在JD程序和XY程序中,先将一个计算单元的数据置入矩阵F中(1行8列或1行9列),这样程序可读性极好。4.相比原CASIO4850程序操作习惯,作了一点小小的改动,测站坐标存在Z[10],N中,X坐标原存在M中容易被误操作修改,而设计标高存在M中,这样易于修改,因为CASIO5800没有IN,OUT功能,很不方便。 4.程序利用Z[2]变量值来判断是采用交点法还是线元法模型计算,Z[2]=0为线元法,否则为交点法。 一、PQX程序:计算中边桩坐标及近似的桩号反算,在运行模式直接调用。 ⒈Z[10]→S:”XO”?S:S→Z[10]:”YO”?N:Prog “AU” ⒉Lbl 2:?L:Prog “Z”:Prog “E”:1n→O:90→S ⒊Lbl 4:”JJ”?S:”YC”?O:SO=0 =>Goto 2‘原来lbl 后没有标号4的。 ⒋O=-1 =>Goto 6 ⒌“X,Y”:R+OCos(Z+S)→X▲U+OSin(Z+S)→Y▲Prog “D”:Goto 4

卡西欧5800计算器正反算程序(绝对好用)

https://www.360docs.net/doc/0210279881.html,/celiang/article_view.asp?id=760&author=%u674E%u8273%u9633 公路路线座标正反算 作者:李艳阳 由于现在计算机普及,计算机功能日益强大,宜采用较简单的积分公式,便于计算机处理。单线元通用积分公式如下 M = (1.0/Re-1.0/Rs)/Ls; x=∫{cos(Ta + L/Rs + 0.5*M *L*L),0,L}; y=∫{sin(Ta +L/Rs + 0.5*M *L*L),0,L}; a(i)= Ta +L/Rs + 0.5*M *L*L Rs:缓和曲线起点半径 Re:缓和曲线止点半径 Rs,Re (NE坐标系下,右偏为正,左偏为负) Ta:缓和曲线起点的真北方位角 Ls:不完整缓和曲线长度。 此公式为缓和曲线在坐标系下任意位置的通用积分公式,能完全适应缓和曲线左偏、右偏、Rs >Re 、Rs NE”:“2.NE=>SZ”:?Q:?S:Prog“QXJS-SUB0”↙ Lbl 0:Q=1 => Goto1:Q=2 => Goto2:↙ Lbl 1:?Z:Prog“QXJS-SUB1”:“N=”:N◢:“E=”:E◢:“F=”:F◢: Goto4↙ Lbl 2: “N=”:?B: “E=”:?C:B→N: C→E:Prog“QXJS-SUB2”: “S=”:S◢: “Z=”:Z◢: Goto4↙ QXJS-SUB0 数据库子程序 Goto1↙同时保存多个曲线时的指针 Lbl 1 IF S<***(线元终点里程):Then***→A(线元起点方位角):***→O(线元起点里程):***→U (线元起点X):***→V(线元起点Y):***→P(线元起点曲率半径):***→R(线元终点曲率半径): ***→L(线元起点至终点长度): Return:IfEnd↙ IF S<***:Then***→A:***→O:***→U:***→V:***→P:***→R: ***→L: Return:IfEnd↙………………………..为了便于解读,每增加一个线元增加一行语句,每增加一条曲线增加一个Lbl,每增加一个工程增加一个文件。 QXJS-SUB1 正算子程序 0.5(1÷R-1÷P)÷L→D:S-O→X↙

卡西欧计算器fCN使用介绍

卡西欧计算器f x-991C N X科学函数计算器卡西欧fx-991CN X是卡西欧第三代新型函数计算器,具备计算、统计、表格、方程/函数、不等式、比例、复数、基数、矩阵、向量10种计算模式。其中函数计算又包括了三角函数、指数函数、对数函数、以基数e的自然对数、使用高斯方法执行的函数等功能。 1.三角函数 三角函数是数学中常见的一类关于角度的函数,常用于研究三角和圆等几何形状的性质。卡西欧fx-991CN X具备优秀的正弦函数sin、余弦函数cos和正切函数tan计算能力,可以快速计算复杂的三角函数。 例:当要计算sin 30o时,按下sin+30+)=,得出结果1 2 。但需要注意的是,“)” 右括号并不能少,否则会影响计算结果。 2.指数函数 指数函数是以指数为自变量,底数为大于0且不等于1常量的函数,它是初等函数中的一种。需要注意的是,在使用卡西欧fx-991CN X计算指数函数前,需要注意设置计算器的输入/输出显示模式。 例:将e5×2转换成三位有效位数,则需要按SHIFT+菜单+3(显示格式)+2(科学Sci)+3,选择输入输出方式,然后按下SHIFT+In+(e’)+5×2=,最后得出结果×102。 3.对数函数 对数函数是以幂为自变量,指数为因变量,底数为常量的函数,其主要形式为y=logax。在使用fx-991CN X计算器计算对数时,需要注意设定a值,否则计算器会使用基数的缺省设定值10。 例:计算log 2 16时,按下SHIFT+(-)+(log)+2+SHIFT+)+,+16+),然后=确认,得出结果4。 4.乘方、乘方根计算 求n个相同因数乘积的运算,叫做乘方;而乘方根则为乘方的逆运算,数a 的n(n为自然数)次方根指的是n方幂等于a的数。

相关文档
最新文档