4800计算器放样程序

《4800计算器放样程序》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、4800计算器放样程序-1L“L1”：E“L2”：B=180/π/R：Z［1］=L2/24/R：Z［2］=L/2–L3/240/R2：Z［3］=E2/24/R：Z［2］=E/2–E3/240/R2：O=tg—（（（R+Z［3］）/（R+Z［1］）-cosZ）/sinZ）：T=（R+Z［1］）tgO+Z［2］◢Z［6］“T2”=（R+Z［3］）tg（Z-O）+Z［4］◢A“ZH”=C“JD”-T◢Z［5］=A+Z/B+L/2-E/2：Lb10：W“1，-1”：｛K｝：｛H｝：K≤A=＞goto1⊿K≤A+L=＞goto2⊿K≤Z［5］=＞go

2、to3⊿K≤Z［5］+E=＞goto4⊿goto5：Lb11：“ZH”：G=A-K：J［1］=F+180：U=F：goto6：Lb12：S=K-A:G=√（（S-S5/40/R2/L2）2+（S3/6/R/L-S7/336/R3/L3）2）：J［1］=F+WBS2/6/L：U=F+WBS2/2/L：goto6：Lb13：S=K-A-L：X=Rsin（BL/2+BS）+Z［2］：Y=R-Rcos（BL/2+BS）+Z［1］：G=√（X2+Y2）：J［1］=F+Wtg—（Y/X）：U=F+W（BL/2+BS）：goto6：Lb14：S=Z［5］

3、+E-K：Y=Z［6］sinZ-（S-S5/40/R2/E2）sinZ+（S3/6/R/E-S7/336/R3/E3）cosZ：X=T+Z［6］cosZ-（S-S5/40/R2/E2）cosZ-（S3/6/R/E-S7/336/R3/E3）sinZ：G=√（X2+Y2）：J［1］=F+Wtg—（Y/X）：U=F+W（Z-BS/2/E）：goto6：Lb15：“HZ”：G=K-Z［5］-E：J［1］=F+WZ：U=J［1］：｛V｝：X=M+（Z［6］+G）cosJ［1］+Hcos（U+90V）◢Y=N+（Z［6］+G）sinJ［1］+Hsin

4、（U+90V）◢goto7：Lb16：｛V｝：X=M+Tcos（F-180）+GsinJ［1］+Hcos（U+90V）◢Y=N+Tsin（F-180）+GsinJ［1］+Hsin（U+90V）◢Lb17：prog“ZBFY”：goto0ZBFYI=0：J=0：X“XA”：Y“YA”P“XB”：Q“YB”：pol（X-P，Y-Q）：J＜0=＞J+360⊿I“SS”=I◢J“AA”=J◢L1，L2—缓和曲线R—半径Z—偏角JD—交点桩号W—左-1，右1K—所计算中桩桩号F—直缓点与交点方向的方位角M—交点X坐标N—交点Y坐标H—中桩至边桩的距离

5、V—左边桩-1，右边桩1X，Y—所计算中桩（或边桩）的坐标XB，YB—置仪点坐标SS—距离AA—方位角√—根号注：直线段上的坐标、方位角、距离，要用下一个曲线的交点坐标、交点桩号和曲线要素来计算。4800计算器放样程序-1F1—ZB1、{O}：O″Z/Y[-1/1]″2、P″PJ″：R″R″：L″LS″：D″ZH″：C″FWJ″：A″ZHX″：B″ZHY″：U″Z.X″：M″Z.Y″：I″F.X″：Z″F.Y″3、T=（R+L2/24/R）tan(P/2)+L/2-L3/240/R24、LbIX：{N}：N″K″5、N=0＝＞GotoZ：≠

6、＞GotoE⊿6、LbIE:K=PRπ/180-L7、{G}：G″LK″：S=N-D8、S<0＝＞GotoG：≠＞GotoH⊿9、LbIG：X=S：Y=-G10、GotoY11、LbIH：S>2L+K＝＞GotoA：≠＞GotoB⊿12、LbIA：S=S-2L-K13、X=T+(T+S）COSP+OGSinP：Y=OSinP（T+S）-GCOSP14、GotoY15、LbIB：S≤L＝＞Goto3：≠＞Goto2⊿16、LbI3：Q=90S2/R/L/π：X=S-S5/40/R2/L2+OGSinQ：Y=O（S3/6/R/L-S7/336/

7、R3/L3）-GCOSQ：GotoY17、LbI2：S≤L+K＝＞Goto5：≠＞Goto6⊿18、LbI5：Q=180(L/2/R+(S-L)/R)/π：X=RSinQ+L/2-L3/240/R2+OGSinQ：Y=O（R(1-COSQ)+L2/24/R）-GCOSQ：GotoY19、LbI6：S=2L+K+D-N20、E=S3/6/R/L-S7/336/R3/L3：F=S-S5/40/R2/L221、P=90S2/R/L/π：X=T（1+COSP）-FCOSP-ECOSP+OGSinQ：Y=O（SinP-FSinP+ESinP）-GCO

8、SQ22、LbIB：ProgXZ23、{J}：J″YZB[Y]″24、J=Y＝＞GotoR⊿25、LbIJ：ProgF26、GotoX27、LbIR：X：″X″◢Y：″Y″◢28