卡西欧4500通用放样程序(共5页)

1、精选优质文档-倾情为你奉上卡西欧4500施工放样程序文件名：FYL1: Defm 8L2: “XYD“X1”:E “Y1”:F“X2”:G“Y2”:H“X3”:I“Y3”:RL“LS”JL3: V=D-F:W=E-G:Prog C:O=W:V=H-F:W=I-G:Prog C:U=WL4: M=O-W:M<0=>M=M+360M<180=>M=180-M:C=1:=>=-180：=-1L5：=L2/24R：Q=L/2-Lxy3/240R2：T=Q+（P+R）tan(M/2):Fix 5:TL6: Fxi 5:S=RM/180+L:S(R+P)/cos (M/2)-

2、R2T-SProg B文件设置说明： X?；Y？不用输入。 X1？；Y1？输入前一段曲线交点X，Y坐标。 X2？；Y2？输入交点X，Y坐标。 X3？；Y3？输入后一段曲线交点X，Y坐标。 R？输入交点半径。 LS？输入缓和曲线长 J？输入所求曲线段交点桩号。 T：显示切线长度。S:显示曲线长度。（P+R）显示外距。2T-S校正值。 Z？转角，输入90°。K？待求点里程桩号。 B？输入边桩到中桩的距离。文件名：GC 竖曲线高程计算L1: RTZHE“I1”F“I2”M“SXG”：Lb1 1:K:W:F-E<0=>P=-1: =>P=1K>Z=>Goto2L

3、2: I=H-E(Z-K):K>Z-T=>I=I+P(K-Z+T)2/2/RGoto3L3: Lb1 2:I=H+F(K-Z):K<Z+T=>I=I+P(Z+T-K)2/2RGoto3L4: Lb13:A=M-I+G-(-0.55-1.0)W:B=M-I+G-(17.4-1.00)W:C=M-I+G-(5.75-0.75)W:D=M-I+G-(11.75-0.75)W:I-GL5: Goto 1文件说明：R?输入竖曲线半径。T？输入竖曲线切线长度。Z？输入竖曲线交点桩号。H？输入竖曲线交点高程。I1？输入上段纵坡。I2？输入下段纵坡。（输入小数）SXG？可为零。K？输入

4、竖曲线内待求点里程桩号。G？为路面设计高程到所求结构层之间的高差值。W：为零。I-G：显示中桩高程。文件名：B L1： Lb1 0:Z:Fixm:KB:V=KJ+:W:L2： V<S-L=>V0=>M=V+Bcos Z:N=BsinZ:Goto2C=1=>W=180-ZV L=>Prog D: =>Prog FLb1 2:W=O:Prog G:Goto 0V=S-VL3: V0=>M=VBcos Z:N=-Bsin Z: =>C=1=>180-ZProg D:N=-NW =U:Prog G:Goto 0文件名：CL1： Pol(V,W):W

5、<0=>W=W+360文件名：DL1: A=RL:M=V-Vxy5/40A2:N=Vxy3/6A-Vxy7/336Axy3：A=90V2/A:Prog E文件名：EL1： A=A-W:M =M-CBcos A:N=CN-Bsin A文件名：F L1： A=90/R×(2V-L):M=Rsin A+Q:N=P+R(1-cos A):Prog E文件名：GL1： A=cos W:W=sin W:V=F+TA-MA+NW:W=G+TW-MW-NA:M=V:N=WL2: V=V-X:W=W-YL3: Prog C:Fix 5:WVV/1NormL4: Lb1 8L5: Prog

6、H文件名：HL1： Fix 5:Z1=X=Vcos WZ2=Y+Vsin W文件名：WL1： H=Z-(B-A)IY=H+(A-Q)2/2/R文件名：VL1: P=M+(A-Q)(N-M)/L) G=H-P×10+Z文件名：FL1： Pol(A-B,C-D) W>0=>W: =>W+360文件名：XL1: E=R-(R2-(L/2)2文件名：FL1: X+cos A×LY+sin A×L文件名： LXQX （卵型曲线）L1： Lb1 0:EG:A“XA”：B “ YB”:C “ CA”:D “1/RA”:E “ 1/RB”:F “ DKA”:G

7、“DKB”L2: Lb1 1:HOR:H “ DKI”:O “DL”:R “ DR”:H>G => Goto 3 L3: P=(E-D)/Abs(G-F):Q=Abs(H-F):I=PQX:T=D+IL4: J=C+(I+2D)Q×90/L5: M=C+(I/4+2D) ×Q×45/(2):N=C+(3I/4+2D)Q×135/(2)L6: K=C+(I/2+2D)Q×45/L7: X=A+Q/12×(cos C+4(cos M+cos N)+2cos K+cos J) L8: Y=B+Q/12×(sin C+4

8、(sin M+sin N)+2sin K+sin J) L9: U “XL”=X+O cos(J-90) L10: V “YL”=Y+O sin(J-90) L11: W “XR”=X+R cos(J+90) L12: Z “YR”=Y+R sin(J+90) L13: A=X:B=Y:C=J:D=T:F=H:Goto 1L14: Lb1 3:A=X:B=Y:D=E:F=G:C=J:Goto 0文件说明： XA？，YB？请输入起算点X，Y坐标。 CA？请输入起算点方位角。 1/RA？ 请输入上一段缓和曲线半径。输入格式：1/R。 1/RB？ 请输入第二缓和曲线半径。 DKA？ 请输入起算点里程

9、桩号。 DKB？ 请输入缓和曲线终点里程桩号。 DKI？ 待求点里程桩号。 DL？ 距中桩左偏距。 DR？ 距中桩右偏距注：用卵形曲线公式计算时，当转角为左转角时“1/RA”，“1/RB”中的半径均 均输入负值文件名：XOL1: Lb1 0:X:Y:I:J:A:R:U:N:D:O:Z:W:W=1=>Goto 1:=>Goto 2L2: Lb1 1:B=90(IJ)2/(RA):L3: C=(I-J)-(I-J)xy5/40R2A2)2+(I-J)xy3/6RA)2):L4: Q=U+BN/3:S=U+BN+ZT=U+BN+Z-180Goto 3:L5: Lb1 2:E=90(I-J)/R:C=2Rsin E:B=90A/R:Q=U+(B+E)N:S=U+(B+2E)N+ZT=U+(B+2E)N+Z-180Goto 3:L6: Lb1 3:F “XA”=X+Ccos QL7: G“YA”=Y+Csin QL8: H“XR”=F+Dcos SL9: H“YA”=G+Dsin SL10: H“XL”=F+Ocos TL11: H“XL”=G+Osin TL12: Goto 0文件说明：X？，Y？：请输入交点的X，Y坐标。A:请输入曲线长度，圆曲线为0（横坡不变时为0）。R：请输入曲线半径。U：线型判别（左偏为负-