有用建筑.doc

V-垂直角 HR-水平角 SD-斜距 HD-平距 VD-高差 N-北坐标（X） E-东坐标（Y) Z-高程 dHR-放样水平角差值 dHD-放样平距差值 dVD-放样高程差值 反算、竖曲线、超高加宽、边坡放样、断面计算及数据库等程序。适用于CASIO4850/4800，4800用户需要修改清单内结果显示的字段（例如：“X=”：X改为X“X=”?或“Z=”：G=H+G改为G“Z”=H+G）。二、程序功能及计算范围2.1程序功能根据不同需要，本程序共设置了6种计算模式Ling-ZCX：1-ZS，正算模式：适用于中、边桩计算，里程桩号及边距=平面坐标。2-FI，放样1模式：适用于路基、路面施工放样，里程桩号及边距=平面坐标、路面高程。3-FS，反算模式：适用于任意点里程、边距计算，任意点坐标=里程、边距。4-F2，放样2模式：适用于路基施工放样，任意点坐标=里程、边距、填挖高度，边坡超欠挖宽度，最近平台高度（1.5）。5-Z0，设计高程计算，即竖曲线计算，里程桩号=设计高程。6-DM，断面计算，里程桩号、边距=设计高程、加宽值、指定边桩的高程。2.2计算范围平曲线：直线-缓和曲线（或无）-圆曲线-缓和曲线（或无）-直线中任意桩号，允许两缓和曲线不等长等标准曲线，也可以计算曲线元、卵形曲线，回头曲线，复曲线，匝道等复杂类型曲线。竖曲线：整条路线。三、源程序扩展变量操作（22个）：Defm?22?，?O字母0数字3.1主程序（Ling-ZCX）?“1-ZS，2-F1，3-FS”:“4-F2，5-Z0，6-DM”:Lb1?0:{Z}:?Z“MS”≤2=Goto?1:?≠=?Z≤4=?Goto2:≠=?Goto?3⊿⊿Lb1?1?:{PDW}:PD“BZ”W“BJ”:?Prog“PQX”:“X=”:X◢“Y=”：Y?Pol（X-Z[14]，Y-Z[15]）：“L=”：I?J0=“FWJ=”：J≠=“FWJ=”：J+180Z2=?Goto?1:≠=Prog“SQX”:Prog“CGJK”:“Z”:?H=H+G◢Goto?1⊿←┚Lb1?2?:{XYW}:XYW“BJ”:?Prog“FS”:?“P=”:?P◢?“BZ=”:?D◢?Z4=Goto?2:≠={Q}:Q“ZP”:Prog“SQX”:Prog“CGJK”:Prog“BP”:Goto?2⊿Lb1?3?:{P}:P:?Prog“SQX”:?“Z0=”:?H◢Z6=Goto?3:≠={D}:S“CGZ”:T“JKZ”:Z[8]=Q“LH”:D“BZ”:Prog“CGJK”:?“JK=”:?J◢?“Z”:?G=H+G◢Goto?0⊿3.2平曲线(Ling-PQX)3.2.1平曲线正算子程序（PQX）Prog“PQX-DATA”:L=P-A+Z[3]:Z[1]=1:Z[17]=90÷πRE：LL-K=L=S-L:Z[1]=-1:E=K:F=F+Z[2]O:Z[3]=Z[4]L0=I=L:J=0:H=0:Goto1LE=I=∫(cos(Z[17]X2，0，L:J=∫(sin(Z[17]X2，0，L:H=?Z[17]L2:?Goto1LE=H=E(2L-E):I=RsinH+E/2-E^3/240R^2:J=R(1-cosH)?+?E2/24R⊿Lbl60;60;1:I=Z[1]I:J=Z[2]J:R=(I+Ji)(cosF+isinF)I=A+Bi-Z[1]Z[3](cosF+isinF):I=R+I:H=F+Z[2]Z[1]H：I=I+D(cos(H+W)+isin(H+W)：X=RePI:Y=ImPI3.2.2平曲线反算子程序(FS)Fixm：U=X:V=Y:D=0:J=F-W:P=A+(Y-C)cos?J-(X-B)sin?JLb1?1:Prog“PQX”:J=H-180:I=(V-Y)cos?J-(U-X)sin?J:Abs?I1E-4=Goto?2:≠=P=P+I:Goto?1⊿Lb2:?D=(V-Y)÷sinH3.3竖曲线（Ling-SQX）3.3.1竖曲线计算子程序(SQX)Prog“SQX-DATA”:?Prog“PQX-DATA”:?Z[10]=H：G=H?Abs(U-V)÷200:PN=I=U:M=N-G:MP=M=P≠=I=V:M=N+G:MP=M=P⊿⊿J=(P-M)2÷2H:U-V0=J=-J⊿H=Z[10]+(P-N)×I÷100+J5.3.2超高加宽计算子程序(JKCG)Fixm:Z[8]1=Z[8]=1E-8I=E:M=A-Z[3]:E1=I=Z[8]:M=M-I⊿G=K:N=A-Z[3]+L:K1=G=Z[8]:N=N+G⊿P≤0.5(N+M=U=(P-M)÷I:≠=U=(N-