CASIO fx-4800程序大全

CASIO fx-4800程序大全
CASIO fx-4800程序大全

公路全站仪中线放样程序

注意:因程序的0(零)和O易混淆,所以字母O用较大的全角符号,零仍用标准字。程序输入时应连续输入,无空格。而且输入时文件名需和给出的一样,否则会出现调用文件

错误。

变量说明:<程序运算符定义>

文件:F1 文件名:1

L1 L2 L3 Defm 8

XYCDIJEFRLK:Fixm:Z[2]=0:Prog B

Z[5]=0.5L-L X y 3/240R2:Z[3]=Z[5]+(R+L2/24R)Abs tan T┛2:Z=K-Ans:S=R Abs Tπ/180+L:S◢H=Z+Ans:G=RL:Prog 2

文件:F2 文件名:2

L1 L2 L3 L4 L5 L6 L7 L8 L9 L10 L11 L12 Lbl 0:Fixm:{K}

Lbl 6:{B}:Norm:K(-1) X y Z[2]>(H-L)(-1)X y Z[2]=>Goto 4⊿Frac Z[2]┛

2=0=>Z[6]=Z:≠>Z[6]=H⊿A=90T/Abs T

B<0=>N=0:≠>N=1⊿B=Abs B

0=Abs(K-Z[6]:K(-1) X y Z[2]>Z[6](-1) X y Z[2]=>Goto 2⊿Q=Z[3]+

0:Z[4]=B

B≠0=>Prog C⊿Prog D:P=0

Prog E:Goto 0

Lbl 2:0≥L=>Goto 3⊿

Q=Z[3]-0+0X y 5/40G2:Z[4]=0X y 3/6G-0X y 7/336G X y 3:Prog D:P=B B≠0=>Prog F⊿Prog E:Goto 0

Lbl 3:Q=Z[3]-Z[5]:Z[4]=R+L2/24R:Prog D

Z[8]=U+A(2(0-L)/πR-1+L/πR):B≠0=>Prog G:≠>P=R⊿Prog E:Goto 0 Lbl 4:M=C:0=D:C=E:D=F:E=M:F=0:Z[2]=Z[2]+1:Prog B:Goto 6

文件:F3 文件名:0

L1 Pol(M,0):W<0=>W=W+360 文件:F4 文件名:B

L1 L2 M=E-I:0=F-J:Prog 0:T=W:M=I-C:0=J-D:Prog 0:U=W:T=T-W T<-180=>T=T+360⊿T>180=>T=T-360

文件:F5 文件名:C

L1 A=-90(-1) X y (N+Z[2])

文件:F6 文件名:D

L1 Z[7]=I-QcosU+Z[4]cos(U+A):Z[1]=J-QsinU+Z[4]sin(U+A) 文件:F7 文件名:E

L1 L2 M=Z[7]+PcosZ[8]-X:0=Z[1]+PsinZ[8]-Y:Prog 0 W◢Fix 3:V◢Norm

文件:F8 文件名:F

L1 Z[8]=U+A+A02/πG+90+A(-1) X y (N+Z[2])

文件:F9 文件名:G

L1 P=R+AB(-1) X y (N+Z[2])/90

任意点经纬仪放样程序

文件:F1 文件名:YYDFY

Y=999:I"RESET[Y┛N]"≠Y=>Goto 6⊿←

Defm 1:B"JD"A"PJ(DEG)":C=90H"Lh"÷πR:P=H2÷24R:Q=H┛2-H^

3÷240R2:T=Q+(R+P)tan A┛2:L=2H+πR(A-2C)÷180:D=B-T:F=D+H:K=D+L┛

2:S=D+L:N=S-H:"YH=":Pause 0:Z[1]"E"=(R+P)cos A┛2-R◢←

Lbl 6:Fixm:{Z}:H=S-N:D=F-H:B=D+T:Z"<<888=>(INSTAL)KM+m(r,σ;X,Y)"=888

=>{CVWJUE}:C"(ZPJ)=1;(YPJ)≠1"V"Xπ"W"Yπ(Z-,Y+)"J"Xh"U"Yh(Z-,Y+)"E"(D °M°S°)":Goto 6⊿←

Z≤D=>X=Z-D:Y=0:P=0:Goto 9⊿Z≥S=>X=T+cos A(Z-S+T):Y=sin

A(Z-S+T):P=0:Goto 9⊿Z>F=>ZGoto 8⊿⊿Z≤F=>0=Z-D:≠>0=S-Z

⊿←

H≠0=>X=0-0^5÷40R2H2:Y=0^3÷6RH-0^7÷336R^3H^3:P=3tan-1Y┛X:Z≥N=>G=Y÷tan A:I=Y÷sin A:0=X-G:X=T(1+cos A)-0cos A-I:Y=sin A(T-0)⊿Goto 9⊿←

Lbl 8:P=180(K-Z)÷πR:X=R√(2-2cos Abs P):I=√(X2+Z[1]2-2XZ[1]cos(90+Abs P÷2):0=sin-1(Xsin(90+Abs P÷2)÷I:G=A÷2+0:X=T-Isin G:Y=Icos G ←

Z≤K=>Goto 9⊿0≥A÷2=>G=0-A÷2:X=T+Isin G:Y=Icos G:Goto 9⊿

X=T-Isin(A÷2-0):Y=Icos(A÷2-0)

Lbl 9:C=1=>Y=-Y⊿B=X:H=Y ←

Lbl 3:X"Xp"Y"Yp":X=V=>G=0:Y>W=>G=90⊿YG=270⊿Goto 1⊿

G=Abs tan-1(Y-W)┛(X-V) ←

XY≤W=>G=180+G:≠>G=180-G⊿≠>YG=360-G⊿⊿←

Lbl 1:J=V=>U>W=>I=270:≠>I=90⊿Goto 2⊿I=Abs tan-1(U-W)┛(J-V) ←

J>V=>U>W=>I=360-I⊿⊿JU>W=>I=180+I:≠>I=180-I⊿⊿←

Lbl 2:0√((X-V)2+(Y-W)2):"DIST(r)=":Pause 0:G=G+I+E:G≥720=>G=G-720⊿

G≥360=>G=G-360⊿G"DEG(σ)="◢

Lbl 5:D=F+N-S:{MLGXY}:M"K=>(<<);A=>(X,Y);h=>(r,σ);B=>(FBZ)"=A =>Goto 4⊿M=h=>Goto 3⊿M=B=>L"JU ZHONG(m)(Z-);(Y+)":Goto 6⊿← C=1≠>L=-L⊿Z≥N=>X=B-Lsin(A-P):C=1=>L=-L⊿Y=H+Lcos(A-P):Goto 3⊿

Z≤F=>X=B-Lsin P:C=1=>L=-L⊿Y=H+Lcos P:Goto 3⊿X=B-Lsin(A÷2-P):C=1=>L=-L⊿Y=H+Lcos(A÷2-P):Goto 3⊿←

Lbl 4:D=L"DEG(σ)A;{G}"-I-E:D<0=>D=360-D⊿

Fixm:{Q}:X=V+Q"DIST(r)A;{Q}"cosD:"X=":Pause 0:Y=W+Qsin D⊿←

Goto 5

竖曲线标高计算程序

变量说明:<程序运算符定义>

文件1 程序名:SQX

ABCD:Lbl 0:{ERF}:REF:G=(D-B)÷(C-A):H=(F-D)÷(E-C):L=R×Abs(G-H)÷2 ← Lbl 1:{K}:K≤0=>Goto 2⊿K≤C+L=>L=-Abs L:Prog

"SHU":M=D+(K-C)H+J:≠>M=D+(K-C)H:"AFTER QX"⊿L=Abs L:K≤C=>Prog "SHU":M=B+(K-A)G+J⊿K≤C-L=>M=B+(K-A)G⊿M=1000M:Prog "SSWR":I=M÷1000◢

K=K+20:Goto 1:Lbl 2:A=C:B=D:C=E:D=F:Goto 0

文件2 程序名:SHU

J=(K-C+L)2÷(2R):G-H>0=>J=-J⊿

文件3 程序名:SSWR

M-Int M<0.5=>M=Int M:≠>M=Int M+1⊿

压实度程序

程序说明:

你做压实度资料做不过来时,可以用一下下面这个程序。其中几个固定值为标准砂锥砂重为744g,砂密度固定为1.43g/m3,灌砂筒和砂共重9000g,以上数据可在程序中更改。

变量说明:<程序运算符定义>

Defm 1:Lbl 9:Lbl 7:Y=Int(800+500Ran#Ran#):Y>1100=>Goto 7⊿

Y=Y÷10:{ABC}:ABC ←

Lbl 6:D=2:V=0 ←

Lbl 0:M=100Ran#Ran#:M>80=>Goto 0⊿

M=M÷1000:P=C÷100×A+M+0.003:P÷A>C÷100+0.035=>Goto 0⊿P÷A≥1

=>Goto 0⊿Lbl 1:S=Int(30Ran#):S≥10=>Goto 1⊿Int(S÷2)≠S÷2=>0

=B+S÷10:≠>0=B-S÷10⊿Z[1]=30:Lbl E:Dsz Z[1]:Goto 2:Goto 1:Lbl

2:M=Int(50Ran#Ran#):M≥1=>M<10=>Goto A:≠>Goto 2⊿≠>Goto 2⊿Lbl

A:M=M÷10:X=Int(100Ran#):Int(X÷2)≠X÷2=>N=0+M:≠>N=0-M⊿

Abs(N-B)>1.0=>Goto E⊿Abs(20-N-B)>1.0=>Goto E⊿Abs(20-2N)>0.7

=>Goto E⊿M=(1+0÷100)×P×100:Prog"YSD1":H=M÷100:Lbl

4:M=Int(1000Ran#):M>150=>Goto 4⊿

F=2550+M:M=F×H:Prog"YSD1":G=M:M=9000-1.43F-744:Prog"YSD1":E=M◢

R=9000-E-744◢

F◢

G◢

H◢

W=0:Lbl 5:{K}:K:Lbl 3:U=Int(1000Ran#Ran#):U>50=>U>300=>Goto 3:≠>Goto L⊿≠>Goto 3⊿Lbl L:Int(U÷10)≠U÷10=>L=Y+U÷10:≠>L=Y-U÷10⊿

M=N×L÷10:Prog"YSD1":Z=M÷10:J=K+L:I=L+Z+K:I-V≠I=>Abs(I-V)>40

=>Goto 3⊿⊿V=I:I◢

J◢

Z◢

L◢

M=Z÷L×1000:Prog "YSD1":T"N"=M÷10◢

W=W+T:N=20-N:DSZ D:Goto 5:M=10W÷2:Prog "YSD1":0=M÷10◢

M=H÷(1+0÷100)×100:Prog "YSD1":P=M÷100◢

M=H÷(1+0÷100)÷A×1000:Prog "YSD1":Q=M÷10◢

{D}:D"<0 TO RESET":D<0=>Goto 9⊿Goto 6

文件2 程序名:YSD1

M-Int M<0.5=>M=Int M:≠>M=Int M+1⊿

含水量程序

变量说明:<程序运算符定义>

Lbl 9:Y=Int(500+100Ran#Ran#):Y>650=>Goto 9⊿Y=Y÷10:{0GH}:0GH ← Lbl 6:D=2 ←

Lbl E:M=Int(50Ran#Ran#):M≥1=>M<10=>Goto A:≠>Goto E⊿≠>Goto E⊿Lbl A:Prog"HSL1":M=M÷10:X=Int(100Ran#):Int(X÷2)≠X÷2=>N=0+M:≠>N=0-M ⊿Abs(N-0)>0.7=>Goto E⊿Abs(20-N-0)>0.7=>Goto E⊿Abs(20-2N)>0.9=>Goto E⊿←

I=0:J=0:Z=0:L=0:T=0:W=30:Lbl 4:V=0:Q=0:D=2:K=G:Lbl

5:A=I:B=J:C=Z:E=L:F=T:Lbl 3:U=Int(1000Ran#Ran#):U>30=>U>100=>Goto 3:≠>Goto L⊿≠>Goto 3⊿Lbl L:Int(U÷2)≠U÷2=>L=Y+U÷10:≠>L=Y-U÷10⊿

M=NL÷10:Prog"HSL1":Z=M÷10:J=K+L:I=L+Z+K: I-V≠I=>Abs(I-V)>30=>Goto 3⊿⊿V=I:M=1000Z÷L:Prog"HSL1":T=M÷10:N=20-N:Q=Q+T:K=H:Dsz D:Goto 5:M=Q÷0.2:Prog"HSL1":Q=M÷10:Q≠0Goto 4⊿A"m2"◢

B"m3"◢

C"m2-m3"◢

E"m3-m1"◢

F"W1"◢

I"m2"◢

J"m3"◢

Z"m2-m3"◢

L"m3-m1"◢

T"W2"◢

Q"(W1+W2)÷2"◢

Goto 9

文件2 程序名:HSL1

M-Int M<0.5=>M=Int M:≠>M=Int M+1⊿

FX4800P常用测量程序集

1、由一个已知点坐标和一个已知方位角计算支导线坐标(程序名:ZBJS)

程序清单:

X:Y:T:Lb1 0:Fixm:{AS}:T=T+A-180:T〈0 =〉T=T+360⊿ T〉360 =〉T=T-360⊿T◢X=X+Scos T◢

Y=Y+Ssin T◢

Goto 0

程序运行说明:

运行“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:{AS}: T=T+A-180:T〈0 =〉T=T+360⊿ T〉360 =〉T =T-360⊿T◢

X=X+Scos T◢

Y=Y+Ssin T◢

Goto 0

程序运行说明:

运行后,显示X0,Y0时输入已知置镜点坐标,显示XH,YH时输入已知后视点坐标,其它同ZBJS的输入与显示。

3、由一个已知点坐标和一个已知方位角进行放射型导线坐标计算(程序名FSXZBJS)

程序清单:

C“X0”:D“Y0”:E“T0”:Fixm:Lb1 1:{SA}?

T=E+A-180:T〈0=〉T=T+360⊿ T〉360 =〉T=T-360⊿T◢

X=C+Scos T◢

Y=D+Ssin T◢

Goto 1

程序运行说明:

变量输入参照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:{SA}?

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: {AS}: 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:{AS}: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◢

Goto 5

6、已知置镜点坐标和置镜点到后视点坐标方位角求放样角度和放样距离的放样程序(程序名FY1)

程序清单:

F“X0”:G“Y0”:H“T0-H”:Fixm:Lb1 1:{XY}?

Pol(X-F,Y-G) ?

J〈0 =〉J=J+360⊿A=J-H?

A〈0 =〉A=A+360⊿A“A=” ◢

I“S=” ◢

Goto 1

程序运行说明:

变量输入参照坐标计算,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:{XY}: Pol(X-F,Y-G) ?

J〈0 =〉J=J+360⊿?

A=J-H?

A〈0 =〉A=A+360⊿A“A=”◢

I“S=” ◢

Goto 1

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:{XY}?

Pol(X-F,Y-G) :Fixm ?

J〈0 =〉J=J+360⊿A=J-H?

A〈0 =〉A=A+360⊿A“A=” ◢

I“S=” ◢

Goto 3

程序运行说明:

变量输入参照坐标计算,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:{KD}:X=V+(K-U)cos T+D×cos(T+90)◢

Y=W+(K-U)sin T+D×sin(T+90)◢

Goto 0

程序运行说明:

已知某一直线线路上一点的坐标为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:{KD}: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,2005年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:{FQ}:F“1÷RB, Z-,Y+”:Q“KB=” ?

Lbl 2:{V}:V“K=”:O=V:O

Goto3:≠> Goto4?

Lbl 3:“K-SMALL”:Goto2?

Lbl 4:O>Q => Goto5:≠> Goto7?

Lbl 5:{I}:I“I=1=>ESC≠>NEXT”:I=1=> Goto2:≠> Goto 6?

Lbl 6:“JISUAN:A-TXY”:V=Q:Z=0:D=0:Goto8?

Lbl 7: {DZ}: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: {IABCD}: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:{HYS}: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×6 3712)×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时,为计算隧道平均高程面的投影改正。

模拟简单计算器实训

苏州市职业大学 课程设计说明书 名称___模拟简单计算器_______________ 2011 年12月26 日至2011年12月31 日共1 周 院系__ 计算机工程系 班级10嵌入式 姓名 系主任____李金祥 教研室主任刘文芝 指导教师徐丽华、刘文芝

目录 一.课程设计的目的与要求 (2) 1.课程设计的目的 (2) 2.课程设计的要求 (2) 二.题目说明 (2) 2.1开发背景 (3) 2.2 开发工具介绍 (4) 2.3 小组成员分工 (4) 三.硬件方案 (5) 3.1硬件设计 (5) 3.2电路原理图 (7) 四.软件设计 (8) 4.1 模块划分 (8) 4.2 模块结构图 (9) 4.3 液晶显示模块 (9) 4. 4 定时器模块 (6) 五.运行结果分析与系统改进 (10) 六.遇到的问题和解决方法 (11) 七.课程设计总结 (11) 八.参考文献 (11)

一.课程设计的目的与要求 1.课程设计的目的 《单片机原理与应用》是一门专业技术基础课,是一门实践性很强的课,单片机课程设计要求将所学的理论知识通过实践加强理解和认识,提高学生们对单片机的认识,同时提高同学们的设计能力和实践动手能力。 同时《单片机原理与应用》也是一门应用性很强的专业课,其理论与实践技能是从事嵌入式专业技术工作的人员所不可少的。本次课程设计选择AW60实验板进行模拟应用设计与开发,要求学生掌握使用 C 语言进行单片机程序设计和调试的方法,提高综合运用所学的理论知识独立分析和解决问题的能力。同时也为了提高学生的学习能力,锻炼同学之间的合作能力。 2.课程设计的要求 在本课程设计过程中要求学生:重视课程设计环节,用严谨、科学和踏实的工作态度对待课程设计的每一项任务;按照课程设计的题目要求,独立地完成各项任务,不允许相互抄袭;按时到机房上机,并接受教师的检查。 认真编写课程设计报告。 课程设计可以由2~4名同学合作完成一个课题。全体成员应共同完成选题,确定设计思想,进行功能模块划分,然后由组长为各成员分配任务。 整个设计期间,组长负责协调工作。各小组成员明确自己的任务后,应独立完成设计、编码和调试。 课题设计完成后,小组成员要理解同组其他成员设计的源程序,熟练操作本组设计,各自完成课程设计说明书。 1、对系统进行功能需求分析; 2、设计合理的模块结构和系统框架; 3、编程简练,程序功能齐全,能正确运行; 4、说明书、流程图要清楚; 5、课题完成后必须按要求提交课程设计报告;

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

卡西欧财务计算器计算模式实例 一、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 ,向左移

最新卡西欧计算器fx-4800P

卡西欧计算器f x- 4800P

福建林业职业技术学院工程系土木工程室 高国兴

CASIO fx-4500PA计算中桩、边桩坐标程序 直线、圆曲线中桩及左、右边桩计算程序fx-4800p C“Xθ=”:D“Yθ=”:E“Wθ=”:N=Ans:R“R=”:L“Lμo=”:K“D=”:M“Jμ =”: o Q=9θL÷(πR):S=2RsinQ : O =C+Scos(N-Q)◢ P=D+Ssin(N-Q)◢ W=E-2Q◢ X=O+Kcos(N-2Q-M)◢ Y=P+Ksin(N-2Q-M)◢ 注: Xθ=起算点坐标 Yθ=起算点坐标 Wθ=起算点方位角 R=曲线半径,线路前进方向,左+,右- 直线R为无穷大 Lμo=置镜点到待求点距离 D左、右边距离 Jμo=前进方向左(+90),右(-90) O=中桩坐标

P=中桩坐标 W=待求点方位角 X=左、右边桩坐标 Y=左、右边桩坐标 缓和曲线中桩及左、右边桩计算程序Fx-4800p C“Xθ=”:D“Yθ=”:E“Wθ=”:N=Ans:R“R=”:F“Lθ=”:L“Lμo=”:K “D=”:M“Jμo=”← U=L-L^5÷(40R2F2):V=L^3÷(6RF)-L^7÷(336R^3F^3):Q=tan-1(V÷U):S=√(U2+V2)← B=9θL2÷(πRF):O=C+Scos(N-Q)◢ P=D+Ssin(N-Q)◢ W=E-B◢ X=O+Kcos(N-B-M)◢ Y=P+Ksin(N-B-M)◢ 注: Xθ=起算点坐标 Yθ=起算点坐标

Wθ=起算点方位角 R=曲线半径,线路前进方向,左+,右- Lθ=缓和曲线长 Lμo=置镜点到待求点距离 D左、右待求距离 Jμo=前进方向左(+90),右(-90) O=中桩坐标 P=中桩坐标 W=待求点方位角 X=左、右边桩坐标 Y=左、右边桩坐标 放样程序fx-4800p RL I“XZ”:W:“YZ”:G“XH”:H“YH”← B=H-W ← C=G-I ← Prog“P”:U=A← K=√(B2+C2)← C=X“X-”-I← B=Y“Y-”-W←

FX5800道路路线测量程序

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

java编写的简单的计算器程序

j a v a编写的简单的计 算器程序 -CAL-FENGHAI-(2020YEAR-YICAI)_JINGBIAN

计算器 项目内容:编写一个Applet,模仿windows附件所带计算器的功能,可以帮助用户完成计算功能,具体如下图所示。 项目要求:使用图形的方式借助窗口、菜单、按钮等标准界面元素和鼠标操作,来帮助用户方便地向计算机系统发出命令,启动操作,并将系统运行的结果同样以图形的方式显示给用户,这样更加直观和生动; 1.Applet容器中组件的添加与设置,包括面板以及菜单的使用; 2.容器中组件的布局管理; 3.Java核心包中数组、数学计算类的使用; 4.异常的处理; 5.事件处理模型中的三类对象的使用: 1.Event-事件,用户对界面操作在java语言上的描述,以类的形式出现,例如键盘操作对应的事件类是KeyEvent。 2.Event Source-事件源,事件发生的场所,通常就是各个组件,例如按钮Button。 3.Event handler-事件处理者,接收事件对象并对其进行处理的对象。 6.程序中事件处理的流程:

1.计算流程的细化

参考代码: import .*; import .*; import .*; import import import public class Calculator implements ActionListener { #############"); dd(panel); panel1 = new JPanel(); panel2 = new JPanel(); (new BorderLayout()); 键入计算的第一个数字。\n"); ("2. 单击“+”执行加、“-”执行减、“*”执行乘或“/”执行除。\n"); ("3. 键入计算的下一个数字。\n"); ("4. 输入所有剩余的运算符和数字。\n"); ("5. 单击“=”。\n"); aboutCal = new JMenuItem(" 关于计算器(A)"); (this);

卡西欧计算器用法

第1讲货币时间价值原理与卡西欧财务计算器用法 CASIOFC100-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 次方 开方shift+∧= () 23x = 12、开机出现的就是加减乘除四则运算的模式COMP ,中间用其他模式后,如果需要用该模式计算,请直接按COMP 键调用这个模式。 13、计算器的屏幕小,提供的功能多,因此,往往一个键提供两个功能,一个功能直接按,另一个功能要按SHIFT 后再按该键才行。如55的计算,直接输入5,再按∧,再输入5,然后按EXE 即运算出结果。又如324的计算,按SHIFT ,然后按∧, 调出,向左移动方向键使光标到达x 的前面,输入3,右移光标到达根号里面,输入24,再按

简单计算器程序设计

简单计算器程序设计 2010-01-20 16:44 1、编写一个程序实现十进制加减乘除运算 2、在命令提示后输入算式,运算符号不超过四个 3、回车后进行计算并以十进制显示结果 ;能做带括号的运算,输入错误能报警 data segment msg1 db 'Please Input an Expression:',0AH,0DH,'$' msg2 db 'the result is:$' db '(' num db 200 dup (0) temp1 db 200 dup(0),13 temp dw 0 data ends stack segment db 200 dup (?) stack ends code segment assume cs:code,ds:data,ss:stack start: mov ax,data mov ds,ax lea dx,msg1 mov ah,9 int 21h call input again2: lea si,num again1: inc si cmp byte ptr[si],13 je outt cmp byte ptr[si],')' jne again1 call chasc1 call count push ax jmp again2 outt:pop bx mov ah,2

mov dl,10 int 21h mov dl,13 int 21h lea dx,msg2 mov ah,9 int 21h call chaou mov ah,8 int 21h mov ah,4ch int 21h ;************************************** input proc ;输入子程序能纠错 push ax push bx push cx push dx push si push di xor si,si xor bh,bh mov bl,0ffh xor cx,cx top: mov ah,8 int 21h cmp al,8 jne next1 cmp si,0 jne ne1 mov bl,0ffh jmp next6 ne1: mov ah,2 mov dl,8 int 21h mov dl,0 int 21h mov dl,8 int 21h dec si

简单计算器可视化程序编程

简单计算器

一、基本功能描述二进制、八进制、十进制及十六进制数的加、减、乘、除、乘方、取模等简单计算 科学计算函数,包括(反)正弦、(反)余弦、(反)正切、(反)余切、开方、指数等函数运行 以角度、弧度两种方式实现上述部分函数 具备历史计算的记忆功能 对不正确的表达式能指出其错误原因 二、流程图

图1 输入数据子函数流程图 图2 三、 设计步骤 打开Microsoft Visual C++ ,在文件中点击新建,在弹出框内选择MFC AppWizard[exe]工程,输入工程名Calculter 及其所在位置,点击确定,如图3所示。 N 输入数据子函数

图3 新建MFC AppWizard[exe]工程 将弹出MFC AppWizard-step 1对话框,选择基本对话框,点击完成,如图4所示。 图4 基本对话框 这样,MFC AppWizard就建立了一个基于对话窗口的程序框架,如图5所示。 图5 新建的对话框 四、界面设计 1、创建控件 在图5所示的Resoure View选项卡中打开Dialog资源组,双击IDD_CALCULATOR_DIALOG,在右边的窗口中显示出待编辑的对话框。开始摆放控件,包括编辑框和按钮的创建。按钮的创建以“1”为例进行介绍,其他按钮的创建可参照此进行操作。 1)在图5中Controls的“编辑框”按钮上单击鼠标左键,在对话框编辑窗口上合适的位置按下鼠标左键并拖动鼠标画出一个大小合适的编辑框。在编辑框上单击鼠标右键,在弹出的快捷莱单中选择属性选项,此时弹出Edit属性对话框,如图6所示,在该对话框中输入ID属性。 图6 Edit属性对话框 2)在图3中Controls的“Button”按钮上单击鼠标左键,在对话框上的合适的位置上按下鼠标左键并拖动鼠标画出一个大小合适的下压式按钮。在按钮上单击鼠标右键,在弹出的快捷菜单中选择

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

卡西欧4500、4800计算器计算程序

卡西欧4500/4800计算器程序 任意里程桩号计算程序 1.主程序(TYQXjs) "1.SZ => XY":"2.XY => SZ":N:U"X0":V"Y0":O"S0":G"F0":H"LS":P"R0":R"RN":Q:C =1÷P:D=(P-R)÷(2HPR):E=180÷π:N=1=>Goto 1:≠>Goto 2Δ←┘ Lbl 1:{SZ}:SZ:W=Abs(S-O):Prog "SUB1":X"XS"=X◢ Y"YS"=Y◢ F”FS”=F-90◢ Goto 1←┘ Lbl 2:{XY}:XY:I=X:J=Y:Prog "SUB2":S"S"=O+W◢ Z"Z"=Z◢ Goto 2 2. 正算子程序(SUB1) A=0.1739274226:B=0.3260725774:K=0.0694318442:L=0.3300094782:F=1-L:M=1-K:X=U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QE M W(C+M WD))):Y=V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD)) +Asin(G+QE M W(C+M WD))) :F=G+QEW(C+WD)+90:X=X+ZcosF:Y=Y+ZsinF 3. 反算子程序(SUB2) T=G-90:W=Abs((Y-V)cosT-(X-U)sinT):Z=0:Lbl 0:Prog "SUB1":L=T+QEW(C+WD):Z=(J-Y)cosL-(I-X)sinL:AbsZ<1E-6=>Goto1:≠>W=W+Z:Goto 0Δ←┘ Lbl 1:Z=0:Prog "SUB1":Z=(J-Y)÷sinF 二、使用说明 1、规定 (1) 以道路中线的前进方向(即里程增大的方向)区分左右; 当线元往左偏时, Q=-1;当线元往右偏时,Q=1;当线元为直线时,Q=0。 (2) 当所求点位于中线时,Z=0;当位于中线左铡时,Z取负值; 当位于中线中线右侧时,Z取正值。 (3) 当线元为直线时,其起点、止点的曲率半径为无穷大,以 10的45次代替。 (4) 当线元为圆曲线时,无论其起点、止点与什么线元相接,其曲率 半径均等于圆弧的半径。 (5) 当线元为完整缓和曲线时,起点与直线相接时,曲率半 径为无穷大,以10的45次代替;与圆曲线相接时,曲率半

Fx5800计算器公路测量程序设计

FX5800计算器测量程序集版 一、程序功能 主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本优化:1、优化程序语句、2、以复数形式输入变量及做数据库,取消原矩阵数据库;3、修改隧道超欠挖程序为通用形,不受圆心个数限制、4、新增测量资料表计算

二、源程序(绿色为程序名;蓝色为输入计算器内容)紫色为新版改动处(可以根据自己标段情况用相关主程序及子程序,再在0程序中汇总)0.汇总程序(1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1);2、坐标反算程序(2ZD、A、B、AB、HX、QX、F、ZD、X1);3、高程计算查阅程序(3GC、H、I、QX、S1、I1);4、路基半幅标准宽度查阅程序(4GD、C、QX、G1);5、路基边坡及开挖口放样程序(5BP、 A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1); 6、路基标准距离放样(6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1); 7、桥梁锥坡计算放样程序(7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1); 8、极坐标计算程序(8JS、JS、DS); 9、隧道超欠挖计算程序(A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1)运行后按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":

简单的计算器模拟程序的设计和实现

简单的计算器模拟程序的设计和实现1.问题描述 对任意给定的正确四则运算表达式,程序计算其结果值并输出。程序无需查错功能,假定所输入的都是正确的四则运算表达式,并且表达式中运算分量均为无正负号整数,运算符为 +、-、*、/,表达式以字符 "=" 结束。程序应有操作提示、输入和输出,界面追求友好,最好是菜单式的界面。 2.设计说明 2.1简要的分析 根据要求,要先输入包含有+,-,*,/的运算符的表达式,然后经过计算得到正确的答案。从键盘中输入的是ASCII码,因此要将其转换为十进制的数据然后才能进行计算。如果输入混合表达式,要将中缀式先变化成后缀式,然后再进行计算。 2.2概要分析 2.2.1 定义的数据段 用于定义一些中间变量,并将显示在试验界面上,以及提示信息。data segment stri db 50 dup(0) exp db 30 dup(0) track db 30 dup(0) instr db 100 dup(0) msg0 db 'please input your formular:',0dh,0ah,'$' msg1 db 0dh,0ah,'wrong input','$' msg2 db 0dh,0ah,') and ( does not match','$' msg3 db 0dh,0ah,'div zero error','$' msg4 db 0dh,0ah,'sorry,minus data appears','$' msg5 db 0dh,0ah,'any key to continue,esc to exit','$' data ends

卡西欧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的当前值 最全最热最专业的文档类资源,文库一网打尽

数据结构课程设计 模拟计算器程序

数据结构课程设计 题目名称:模拟计算器程序 计算机科学与技术学院 课程设计任务书 一、设计任务 设计一个模拟计算器的程序 二、设计要求 1、要求对包含加、减、乘、除、括号运算符及SQR和ABS函数的任意整型表达式进 行求解

2、程序基本功能要求实现完整,并有简单的验证。 3、设计报告要求格式规范,符合学校课程设计报告要求。 4、报告中流程图要求描述规范,算法设计清楚正确。 三、设计期限 2018年3月5日到2018年3月30日 前言 利用本学期所学的《数据结构》课程,运用相关知识,查阅相关资料,编写C语言程序,设计一个简单计算器,要求编写的简单计算器能够模拟windows系统的计算器,用户能够用键盘输入相关数据,要求对包含加、减、乘、除、括号运算符及SQR和ABS函数的任意整型表达式进行求解,并且在程序运行过程中能够正常的退出程序。

这个程序实际上就是对一个表达式进行计算。而一个算术表达式中包含各种运算符,每个运算符的等级可能会不同,这就成了本程序需要解决的一个主要的问题之一了。另外计算器中需要有各种数学函数,比如:abs sqrt sin cos tan等,如何对这些函数进行处理,也是本程序能成功的一个关键。还有一个问题就是如何处理操作符和操作数之间的关系也是一个要点。例如:1+2*(3-2/1),经过怎么样的变换和处理能得出结果5。数据的输入这里应该要用字符,然后通过字符和整形之间的关系进行转换即可,这样处理的话,就方便很多了。 在计算器程序运行中,输入数据时如果遇到输入错误的情况,能够能过键盘上的退格键进行删除,并且重新输入正确的数据。在数据输入完成后,如果需要放弃本次计算操作,可以利用程序中设置好的按键进行清零,并为下一次运算作准备。 本课程设计主要解决的是传统计算器中,不能对表达式进行运算的问题,通过制作该计算器模拟程序,可以做到快速的求解表达式的值,并且能够判定用户输入的表达式是否合法。该模拟计算器的核心部分就在用户输入的中缀表达式的转化,程序中用到了“栈”的后进先出的基本性质。 目录 第1章需求分析‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 5 1.1系统设计流程图‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 5 1.2 主要功能表‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 6

卡西欧计算器编程指导

卡西欧计算器编程指导 在计算能力飞速发展的今天,各种计算工具应运而生代替了以往我们大量、繁琐的分析计算工作,简化了计算步骤节省了计算时间。在种类繁多的计算工具中适合测量工作的计算器也大有所在。比如有一款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程序线路计算70版匝道版汇总

C A S I O程序线路计算 70版匝道版

一、扩展变量设置说明 1.统计各种要素点的数目 各要素点数目表 设置扩展变量总数目为: 2(a1+a2+a3+a4+a5)+3(b1+b2+b3+b4+b5)+2(c1+c2+c3+c4+c5)+74个 2.设置各扩展变量数据 ①固定变量及自由变量Z[1]~Z[39] 固定变量及自由变量设置表

②导线点扩展变量Z[40]~Z[69] 各导线点坐标值于扩展变量中的位置表

③平曲线要素扩展变量Z[70]~Z[84+2a1+2a2+2a3+2a4+2a5] 各匝道平曲线要素于扩展变量中的位置表 ④竖曲线要素扩展变量Z[85+2(a1+a2+a3+a4+a5)]~ Z[74+2(a1+a2+a3+a4+a5)+3(b1+b2+b3+b4+b5)] 各匝道竖曲线要素于扩展变量中的位置表

⑤超高设计扩展变量Z[75+2(a1+a2+a3+a4+a5)+3(b1+b2+b3+b4+b5)]~ Z[2(a1+a2+a3+a4+a5)+3(b1+b2+b3+b4+b5)+2(c1+c2+c3+c4+c5)+74] 各段超高设计数值于扩展变量中的位置表 说明:存入设计横坡数值时,当路基左右幅的横坡为互补时,只要把左幅的设计横坡存入扩展变量即可(从路中间向两侧,上坡为“+”,下坡为“-”),当左右幅的设计横坡为相同时,则在对应扩展变量中存入横坡为0。 3.扩展变量设置说明 当线路改变或数据更改时,应首先根据各要素点的数目设置扩展变量总数目(若要素点数目也发生变化),再按上述各扩展变量位置表中的约定重新设置扩展变量中的数据。 存入平曲线的曲率时,左转为“-”,右转为“+”,曲率为半径的倒数,即1/R;

c 面向对象程序设计MFC简单计算器实验报告

计算机与信息工程学院 《程序设计基础》课程设计报告 题目名称:60.编写一个能实现简单功能的计算器学生姓名:刘沛东 学生学号:54 专业班级:电子信息工程(1)班 指导教师:高攀

1 课程设计的题目 编写一个能实现简单功能的计算器 2 题目要求 1. 有一个计算器图形。 2. 能实现加、减、乘、除及乘方的运算。 3. 当输入题目时,屏幕上要在指定位置上显示出相应的题目内容,且相应的数字键要改变颜色 例如:输入数字1 时,在计算器图形上的1键变为红色。 4. 屏幕、图形颜色、形状自定 3 总体设计 总体框架 图1 系统框架

系统功能说明 在VC++中绘制计算器界面,各控件的设置 对0~9控件设定相应的ID和其他属性: 图2 “1”控件设置 对“+、-、*、\”控件设定相应的ID和其他属性: 图2 “+”控件设置 对其它控件设定相应的ID和其他属性: 图3 其它控件设置

主要使用到Layout菜单中的Align功能对各个按钮进行对其,使界面更加整洁。拖出的控件有上面的一个Edit控件用于显示数字,Button控件用于处理鼠标的消息。 4 程序详细设计 系统主调模块 图5 程序流程图

各模块详细设计 建立的变量,控件的命名,对应的消息处理函数对应表 double poz; 按钮的处理函数 void CCalcDlg::OnPt() { point_flag=TRUE; && buffer[i+1]==0)之前那位 }

m_Dis=strtod(buffer,NULL);整个大的程序的实现分8个功能,每个功能都通过一个相应的函数来实现.在调试时分别进行调试,使得调试更方便些.在编写各个函数只是按着题目要求的去完成,后来经指导老师指导后,发现了很多自己欠缺的地方,又一次将程序整体进行调试.最后把程序完善了许多。 本次MFC计算器的制作,学习到了MFC基本的编程方法。对OOP编程的理解进一步加深。但是程序仍然存在一定的问题,比如除数不能为0的Exception handle,符号键多次点击结果混乱。通过这次课程设计,以后Windows 应用程序势必会轻车熟路。 参考书目: [1]谭浩强,《C++程序设计》,北京,清华大学出版社,2006年。[2]孙鑫《深入浅出MFC》,视频教程。 [3]《Visual_C++MFC入门教程》,电子版。

简单计算器程序操作步骤

简单计算器程序操作步骤 一、建立”D\ajsq”文件夹 二、用VC6编写“简单计算器程序” 1、启动VC6,创建“简单计算器程序”工程。选择D:\asjq,工程名:jsq,选择基于对话框,下一步,完成。(介绍:类卡、文件卡、资源卡,代码提示工具卡两个,安装visual assist X) 2、设计主界面对话框:IDD_JSQ_DIALOG,删除自生成的控件,添加三个Edit Box文本编辑框控件、一个Button按钮控件。 (1)对EDIT查看属性、增加、关联变量: 右击EDIT1,选属性,查看ID号为:IDC_EDIT1。 增加、关联变量,右击EDIT1,建立类向导,选成员变量,选中IDC_EDIT1,单击增加变量,名称:m_a,value:float,单击OK。 右击EDIT2,选属性,查看ID号为:IDC_EDIT2。 增加、关联变量,右击EDIT2,建立类向导,选成员变量,选中IDC_EDIT2,单击增加变量,名称:m_b,value:float,单击OK。 右击EDIT3,选属性,查看ID号为:IDC_EDIT3。 增加、关联变量,右击EDIT3,建立类向导,选成员变量,选中IDC_EDIT3,单击增加变量,名称:m_c,value:float,单击OK。 (2)对BUTTON1修改属性和增加消息映射响应函数: 右击BUTTON1,选属性,查看ID号为:IDC_BUTTON1,修改标题为:add; 增加消息映射响应函数,右击,建立类向导,选中Message Maps,选中IDC_BUTTON1,选中BN_CLICKED,单击Add Function,名称:OnButton1,单击OK。 单击edit code,编写代码:BUTTON1的OnButton1的代码.txt。 UpdateData(true); //从控件得到值赋给变量,给m_a=5;m_b=8;m_c=0; m_c=m_a+m_b; // m_c=13; UpdateData(false); //从变量值给控件显示,文本框分别显示:5,8,13; 三、操作使用所编写的“简单计算器程序” F7, Ctrl+F5 1

卡西欧4850计算器程序

卡西欧fx-4850P 万能放线程序 主程序:ZBJS ↙ ◢“◢ : H◢↙ 注:

↙ ↙ ↙

↙ 注: 此程序可把全线路要素输入数据库,能执行直线、 高程放线正反算。 卵形曲线。

卡西欧fx-4850P 直线、各种曲线任意放中线(匝道) 1:主程序:TYQXJS “1,KS=>XY”:“2,XY=>KS”:N:U“X0”:V“Y0”:o“K0”:G“FWJ”:H“LS”:P“R1”:R“R2”:Q“Y+1;0;Z-1”:C=P-1:D=(P-R)÷(2HPR):E=180÷π:N=1=>Goto 1:≠>Goto 2↙ ◢“Goto 1↙ 2:正算子程序:S U B1 A=0.1739274226:B=0.3260725774:Z=0.0694318442:L=0.33 00094782:F=1-L:M=1-Z:X=U+W(Acos(G+QEZW(C+ZWD))+Bcos (G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C+M WD))):Y=V+W(Asin(G+QEZW(C+ZWD))+Bsin(G+QELW(C+LWD)) +Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C+MWD))):F=G+QEW(C +WD)+90:X=X+Scos F :Y=Y+SsinF↙ 3坐标反算子程序 SUB2 T=G-90:W=Abs((Y-V)cosT-(X-U)sinT) :S=0:Lbl 0: Prog “SUB1”:L=T+QEW(C+WD):S=(J-Y)cos L-(I-X)sin L : Abs S<10-6=>Goto 1: ≠>W=W+S:Goto 0↙Lbl 1:S=0:Prog“SUB1”:S=(J-Y)÷sin F↙

卡西欧计算器坐标的正反算

可以算任意斜交涵洞轴线的坐标,增加T为斜交角度,规定T为涵轴右侧方向与“线路前进方向切线”之间的夹角,当涵轴与线路正交时,T=90,其他操作与原程序一样; 1. 正算子程序(SUB1) [color=Red]A=0.26:B=0.74:K=0.02:L=0.82:F=1-L: M=1-K:X=U+W(Acos(G+57.2958QKW(1/P+KWD))+Bcos(G+57.2958QLW(1/P+LW D))+Bcos(G+57.2958QFW (1/P+FWD))+Acos(G+57.2958QMW(1/P+MWD))):Y=V+W(Asin(G+57.2958QKW(1/ P+KWD))+Bsin(G+ 57.2958QLW(1/P+LWD))+Bsin(G+57.2958QFW(1/P+FWD))+Asin(G+57.2958QMW (1/P+MWD))):F=G+57.2958QW(1/P+ WD)+90:X=X+Zcos(F-90+T):Y=Y+Zsin(F-90+T) 2. 反算子程序(SUB2) W=Abs((Y-V)cos(G-90)-(X-U)sin(G-90)):Z=0:Lbl 0:Prog "SUB1":L=(G-90)+5 7.2958QW(1/P+ WD):Z=(J-Y)cosL-(I-X)sinL:AbsZ<1E-6=>Goto1:≠>W=W+Z:Goto 0Δ←┘ Lbl 1:Z=0:Prog "SUB1":Z=(J-Y)÷sinF 二.增设数据库程序(SJK主程序) Lb1 4:"1.SZ => XY":"2.XY => SZ":{NS}:S∠下一线元起点里程=>O =本线元起点里程:U=本线元起点X:V=本线元起点Y:G=本线元起算方位角:H =本线元长度:P=起点曲率半径:R=终点曲率半径:Q=0或1、-1:Prog“TYQXJS”:Goto0Δ←┘(第一线元数据要素) S∠下一线元起点里程=>O=本线元起点里程:U=本线元起点X:V=本线元起点Y:G=本线元起算方位角:H=本线元长度:P=起点曲率半径:R=终点曲率半径:Q=0或1、-1:Goto0Δ←┘(第二线元数据要素)

相关文档
最新文档