卡西欧程序-casio线路计算

数目（个abcde要素点数目为0取--000 其取值为0使用横坡点)或Z[1]～Z[19]名起12…第i…第a1第a终交点X……交点Y……---……------……------……---……名起1…第i…第b1第b终…………---……0④设计扩展变量名…第i…第c1第c…………0。名2…第i…第d1第dX……Y……Z[31+6a+3b+2c+d+2e]～Z[36+6a+3b+2c+d+2e](根据情况可省)Z[31+6a+3b+2c+d+2e]=-11.5（1#点）Z[32+6a+3b+2c+d+2e]=-6.0（2#点）Z[33+6a+3b+2c+d+2e]=-0.75（3#点）Z[34+6a+3b+2c+d+2e]=0.75（4#点）Z[35+6a+3b+2c+d+2e]=6.0（5#点）Z[36+6a+3b+2c+d+2e]=11.5（6#点）当进量放样计算时，若遇到临时点，可把其存入导线点扩展变量中空缺的位置上，然后(1)放样选择:1.中线放样2(2)置镜点选择:1.置镜点为导线点2(5)后视点选择:1.后视点为导线点2当第(5)1(7)步,只有当第(52当第(1)1(10)步,只有当第(12当第(1)1(11)步,只有当第(12DH(高于设计为“-”,反之为

选择:1.中线坐标计算2当第(11(3)步,只有当第(1)2当第(11(4)步,只有当第(1)2

仪器选择：1.2.3.缺省情况（即同上一次）？2（12）步开始运行只有当第（1）1WB（CLFY(571{O}:O”FY:1.ZX{OE}:O”ZJ:1.DX2.XL”O=1Z[8]=Z[E+30+6a+3b+2c+d]:Z[9]=Z[E+30+6a+3b+2c+d+e]O1{D}:D”LZ”:Z=E:Prog”ZB”:Z[8]=X+Rec(D,U+π÷2):Z[9]=Y+J{OF}:O”HS:1.DX2.XL”O=1Z[10]=Z[F+30+6a+3b+2c+d]:Z[11]=Z[F+30+6a+3b+2c+d+e]O1B=Z[5]:{B}:B”LH”:Z[5]=B:Z=F:Prog”ZB”:Z[10]=X+Rec(Z[5],U+π÷2):Z[11]=Y+JLbl1 ProgI>2πI=I-2πI<0I=I+2πZ[3]>2πZ[3]=Z[3]-2πZ[3]”AT=”GotoXLZB(143{O}:O”1.ZXLbl Prog”ZB”:X=X+Rec(Q,U+πG÷180):Y=Y+JX”X=”Y”Y=”GotoGCJC(113LblProgC=C-C=IntgC”DH=”GotoXLGC(56Lbl0Prog”GC”GotoBZFY(330{Z}:Z”1.CJ2.QEZ=2Z[11]=0:Goto1Z=3Goto1Lbl1Z=2Goto2Goto3Lbl2LblProgG=D+Z[11]-Prog“FY”(当高程检查计算时，不用子程序“FYV=6a+25Prog“GC”:X=C-GotoZB(517492Z>23540K=K-0.03313 断链桩Lbl1K>Z[W+5a+4]W=W+1:Goto1W=21W=22V=W-1Goto2V=W-Prog”YS”LblS≤0X=Z[14]+ScosB:Y=Z[15]+SsinB:U=B:Goto6S≤LH=1:Goto3S≤Z[7]-MGoto4B=A-S≤Z[7]S=Z[7]-S:X=Z[V]-Rec(P,B):Y=Z[V+a+2]-J:H=-1:L=M:Goto3:L=Z[V+3a+3]X=Z[V]-Rec(P+S-Z[7],B):Y=Z[V+a+2]-U=B-π:Goto6Lbl3J=S-U=B-NHSS÷(2RL)+π(H-1)÷2:GotoLblU=(2S-I=NR(1-cosU)+NZ[18]:J=RsinU+Z[19]LblLbl6YS320C=tan(C÷2):C=tan-1CN=AbsC÷C:C=2AbsCP=(Z[16]-Z[18])÷2÷tanZ[7]=(Z[18]+Z[16]+2R)tanGC521496Z>23540K=K-0.03313 Lbl1K>Z[W]-PW=W+1:Goto1W=6a+27W=6a+28V=W-1Goto2R=(J-Z[V+b+1])÷(Z[V]-Z[V-Lbl2L≤-TH=J+RL:Goto3L≥TH=J+SL:Goto3Lbl3A=AbsQA≤1C=0:Goto6I=- 带Q>0I=1LblLbl5K≥Z[Y]Y=Y+1:Goto5Z[Y+c-1]=0O=2Z[Y+c]=0X=2M=(X-O)(1-3NN+2NNN)+O（ 过渡段按直线性计算时，此行换为M=(X-带宽A≤Z[2]C=(1-A)M÷100:Goto6土路肩设计最小带宽C=0.03(Z[2]-A)-M(Z[2]-带宽带宽M>3C=(1-A)M÷100Lbl6

土路肩设计最小坡度FQ783758Lbl1V>20+aV=20+a:Goto2Prog”YS”Z[6]=Z[V]+Rec(P,S):Z[3]=Z[V+2+a]+JZ[6]=XZ[3]=YK=Z[V+4+5a]+Z[7]:Q=0:Goto6 Q=Abs(Isin(K-cosK<0Q<2000Goto Goto1Lbl2Prog”ZH”Pol(-H,-cosK<0K=Z[V+4+5a]+W:Q=-H:Goto6cosK<0Goto3I=2Rsin(C÷2-L÷R÷4-M÷R÷4)cosK<0Goto4G=π÷2-cosK<0Goto5Prog”ZH”K=Z[V+4+5a]+Z[7]-Goto6Lbl3Prog”HQ”Goto6Lbl4Q=N(I-Goto6Lbl5ProgK=-ProgK=Z[V+4+5a]+Z[7]-O:Q=-Lbl6Z>23540Z=Z-(- Z=Intg(MZ+0.5)÷MQ=Intg(MQ+0.5)÷MZH52H=X-Q:W=Y-H=IcosG:W=IsinHQ380LblAbs(O-S)<1E-5Goto8Goto7Lbl8T=HP=WQ=0:Goto Pol(H-T,W-Q=sin(J+KOO÷2÷R÷U-π÷2)Q>0S=1LblFY418

土路肩Q=-0.75-Z[2]:Z[3]=-U>0Q=0.75+Z[2]:Z[3]=1土路肩ProgX=G-X≤0Goto7平台横坡引起的高差=平台宽×平台坡N=Int((X-N>9N=9Lbl2I>N+1Goto4Goto2Lbl4

路堑相邻两台阶坡脚间的高=护坡道宽+水沟开口宽度+Lbl护坡道横坡引起的高差=I>N-1Goto6

平台宽

路堑同一台阶的坡顶到坡脚之间的高Goto5Lbl6

路堑相邻两台阶坡脚间的高A=X-W=W-AbsW=W-Abs带宽=路堑同一台阶的坡顶到坡脚之间的高差-路堑同一台阶的坡顶到坡脚之间的高Goto8Lbl7X=-X=-路堤边坡坡路堤同一台阶的坡顶到坡脚之间的高X≤8A=AX+0.75+Z[2]-AbsU土路肩宽路堤第二阶边坡坡X>8A=14.75+Z[2]+1.75(X-8.04)-AbsU=路堤同一台阶的坡顶到坡脚之间的高差+路堤平台宽度×路堤平台坡Lbl=路堤边坡坡度×路堤台阶高度+土路肩宽度+路堤平台宽路堤同一台阶的坡顶到坡脚之间的高名福宁线A14福宁线A14-福宁线A福宁线交点数目47212变坡点数目416起超点数目5545台阶数目00导线点数目000变空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空空