4800计算器超欠挖计算

曲线（含直线）任意里程中边桩坐标正反算

（CASIO fx-4800p&fx-4850）

J-SQX(竖曲线数据输入)

“J-SQX”：{NHUVMQP}：Z[9]=N“SJD”：Z[10]=H“JDZ”：Z[11]=U“I1”：Z[12]=V“I2”：Z[13]=M“R”：Z[14]=Q“QD”：Z[15]=P“ZD”：“TO J-JSMS”

J-PQX(平曲线数据输入,自动切换到J-JSMS)

A“JD”B“JDX”C“JDY”F“FJ”O“ZJ：Z-，Y+”RE“LS1”K“LS2”：E＜1=＞E=1E-9⊿K＜1=＞K=1E-9⊿Z[1]=EE÷(24R)-E^4÷(2688RRR)：Z[2]=E÷2-EEE÷(240RR)：X=(EE-KK)÷(24R)÷sinAbsO：Z[3]“T1”=(R+Z[1])tan(AbsO÷2)+Z[2]-X▲

Z[4]“T2”=(R+KK÷(24R)-K^4÷(2688RRR))tan(AbsO÷2)+K÷2-KKK÷(240RR)+X▲

L=AbsOπR÷180+(E+K)÷2▲

J=tan-1((R+Z[1])÷(Z[3]-Z[2]))：X“E”=(R+Z[1])÷sinJ-R▲

X=A-Z[3]：Y=X+E：E＜1=＞X“ZY”▲

≠=＞X“ZH”▲

Y“HY”▲

⊿Y“QZ”=X+(L-K-E)÷2+E▲

Y=X+L-K：X=X+L：K＜1=＞X“YZ”▲

≠=＞Y“YH”▲

X“HZ”▲

⊿Prog“J-JSMS”

J-JSMS(放样模式主程序)

“1-ZS,2-FS,4-DMFY” Lb1 0：{Z}：Z“MS”≤1=＞Goto 1：≠=＞Z“MS”≤4

=＞Goto 2⊿⊿

Lb1 1：{PDW}：PD“BZ”W“BJ”：Prog“JP”：X“X=”▲

Y“Y=”▲

Goto 0⊿

Lb1 2：{XYW}：XYW“BJ”： Prog“JF”：P“P=”▲

D“BZ=”▲

Z=3=＞Prog“JS”：Prog“DMFY”⊿(运行竖曲线高程计算程序)

Z=4=＞Z[26] “H”=12.417+(P-75360)*5.2/1000: Prog“DMFY”⊿（运行单面坡比高程计算,语句中12.417为起点桩号DK75+360的高程,可以根据实际情况进行调整；5.2/1000为单面上坡率,上坡输正值，下坡输负值）

Goto 0

JS(竖曲线计算主程序)

P＜Z[14] =＞Prog“J-SQX”⊿P＞Z[15] =＞ Prog“J-SQX”⊿

N=Z[9]：U=Z[11]：V=Z[12]：H=Z[13]：G=H Abs(U-V)÷200：P＜N=＞I=U：M=N-G：M＞P=＞M=P⊿≠=＞I=V：M=N+G：M＜P=＞M=P⊿⊿J=(P-M)2÷(2H)：U-V＞0=＞J=-J⊿H=Z[10]+(P-N)×I÷100+J

Z[26] “H”=H

JP(平曲线正算子程序)

Fixm

Lb1 1：J=F：X=B-Z[3]cosF：Y=C-Z[3]sinF：G=E

P≤A-Z[3] =＞I=A-Z[3]-P：M=-I：N=0：H=F+W：Goto5

≠=＞P≤A-Z[3]+E=＞I=P-A+Z[3]：H=90II÷(REπ)：O＜0=＞H=-H⊿H=H+W+F： Goto 3

≠=＞P≤A-Z[3]+L-K=＞I=P-A+Z[3]-E： Goto 4：≠=＞Goto 2⊿⊿

Lb1 2：X=B+Z[4]cos（F+O）：Y=C+Z[4]sin（F+O）：J=F+O+180：G=K

P≤A-Z[3]+L=＞I= A-Z[3]+L-P：H=90II÷(REπ)：O＞0=＞H=-H⊿H=H+J+W+180： Goto 3

≠=＞I=P-A+Z[3]-L：M=-I：N=0：H=J+W+180： Goto 5

Lb1 3：M=I-I^5÷(40RRGG)：N=III÷(6GR)-I^7÷(336RRRGGG)： Goto 5

Lb1 4：H=(E+2I)×90÷(πR)：M=RsinH+Z[2]：N=R(1-cosH)+Z[1]：O＜0=＞H=-H⊿H=J+W+H： Goto 5

Lb1 5：P≤A-Z[3]+L-K=＞O＜0=＞N=-N⊿≠＞O＞0=＞N=-N⊿⊿Goto 6

Lb1 6：X=X+Mcos J-Nsin J+Dcos H：Y=Y+Msin J+N cosJ+Dsin H

JF(平曲线反算子程序)

Fixm

U=X：V=Y：D=0：J=F-W：P=A+(Y-C)cos J-(X-B)sin J

Lb1 1：Prog“JP”：J=H-180：I=(V-Y)cos J-(U-X)sin J：Abs I＜1E-4=＞Goto 2：≠=＞P=P+I： Goto 1⊿

Lb1 2：D=(V-Y)÷sin H

DMFY隧道开挖断面(超欠挖情况)计算程序

{HIJMNG}：Z[20]= H“C”：Z[21]=I“A”：Z[22]= J“H1”：Z[23]= G“GC”：Z[24]= M“R1”：Z[25]= N“R2”D≤2.3=＞D“ZD”=Abs(D-2.3)▲≠=＞D＞2.3=＞D“YD”= D-2.3▲⊿⊿(C为圆心O1与O2的高差值,A为圆心O1与O2的宽度差值,H1为圆心O1至设计高程的高度,GC为实测高程,R1为上部第1个半径,R2为下部第2个半径)(显示值ZD为至隧道中心线左边的宽度,YD为至隧道中心线右边的宽度,2.3为设计线路距隧道中心线的宽度,可以实际情况进行改变调整)

Z[26]“H”▲(显示所求桩号点设计高程值)

Z[27]“O1” =Z[26]+ Z[22](第1个圆心高程)

Z[28]“O2”=Z[26]+ Z[22]+ Z[20] (第2个圆心高程)

Z[29]= Z[24]×Sin 60▲(此数据为上半弧60度范围的宽度值，可根据实际情况调整；数值可不显示) D>Z[29] =＞Goto 1⊿

Z[30]=√（（Z[24]）2-D2）

Z[31]= √（Abs(（Z[24]）2-(Z[23]-Z[27])2)）

Z[32] “HGD”=Z[27]+ Z[30]- Z[23] ▲

Z[33] “SKD”=Z[31]-D ▲

Prog“J-JSMS”

Lb1 1

Z[23]

Z[31]= √(（Z[25]）2-(Z[23]-Z[28])2)

Z[33] “SKD”=Z[21]+ Z[31]-D ▲

Prog“J-JSMS”

Lb1 2

Z[31]=Z[25]-（Z[27]-Z[23]）*0.35/(0.78+Z[20]+Z[22])(0.35为下边墙往边墙底内缩的距离，0.78为设计高程至边墙底部的高度)

Z[33] “SKD”= Z[31]-D ▲

Prog“J-JSMS”