数控车工宏程序.docVIP

下载本文档

9
0
约5.98千字
约 13页
2019-07-20 发布于浙江
举报
版权申诉

数控车工宏程序.doc

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

T0101; G0 X55 Z5; （循环起点） #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=1; （车削起始点，与到椭圆中心的距离有关） N10 #3=#3-0.2; （- 0.2 车削步进距, Z方向上每步进给0.2 #4= SQRT [64-64*#3*#3/225]; （椭圆公式 64为#1*#1，225为#2*#2） G01 X [52-2*#4] Z#3 F0.2; ( 52为椭圆中心到Z轴距离 IF [#3 GE-14.8] GOTO 10; （如果#3大于等于-14.8，就回到N10行继续加工） G0 X55; M30; T0101; G0 X55 Z5; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=1； N10 #3=#3-0.2; #4= SQRT [64-64*#3*#3/225]; （64为#1*#1，225为#2*#2） G01 X[30+2*#4] Z#3 F0.3; ( 30 IF [#3 GE -14.8] GOTO 10; G0 X58; M30; T0101; G0 X55 Z5; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=15 N10 #3=#3-0.3; #4= SQRT [64-64*#3*#3/225]; （64为#1*#1，225为#2*#2） G01 X[50+2*#4] Z[#3-15] F0.2; ( 50为椭圆中心到Z轴距离2*25) IF [#3 GE 0.3] GOTO 10; G0 X68; M30; T0101; G0 X55 Z18; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=15 N10 #3=#3-0.3; #4= SQRT [64-#3*#3*64/225]; （64为#1*#1，225为#2*#2） G01 X[50-2* #4] Z[#3-15] F0.2; ( 50为椭圆中心到Z轴距离2*25) IF [#3 GE 0] GOTO 10; G0 X55; M30; T0101; G0 X45 Z18; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=15; N10 #3=#3-0.3; #4= SQRT [64-#3*#3*64/225]; （64为#1*#1，225为#2*#2） G01 X[40-2*#4] Z[#3-21] F0.2; ( 40为椭圆中心到Z轴距离，21为椭圆中心到X轴距离15+6) IF [#3 GE-14.7] GOTO 10; G0 X45; M30; T0101; G0 X50 Z18; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） #3=15 N10 #3=#3-0.3; #4= SQRT [64-#3*#3*64/225]; （64为#1*#1，225为#2*#2） G01 X[30+2*#4] Z[#3-21] F0.2; ( 30为椭圆中心到Z轴距离) IF [#3 GE-14.7] GOTO 10; G0 X50; M30; T0101 M03 S800 G0 X60 Z5; #1=8; （椭圆短半轴长度） #2=15; （椭圆长半轴长度） N5 #3=1 （车削起始点，与到椭圆中心的距离有关） N10 #3=#3-0.2; （- 0.2 车削步进距） #4= SQRT [225-225* #3*#3/64]; （64为 #1*#1，225为 #2*#2 ） G01 X [60-2*#4] Z#3 F0.2; ( 30 为椭圆中心到Z轴距离 IF [#3 GE -7.8] GOTO 10; （如果#4大于等于-8，就回到N10行继续加工） N15 G0 X62 M30; 。。。。。。 #1=15.3 N10#1=#1-0.3 #2=0.2*#1*#1 G1X[2*#2]Z[#1]F0.3 IF[#1GE-9.7]GOTO10 G0U25 。。。。。。 1．以Z为变量。。。。。。 #1=0 N10#1=#1-0.3 #2=SQRT[#1/-0.2] G1X[2*#2+20]Z[#1]F0.3 IF[#1GE-44.7]GOTO10 G0U5 Z5 。。。。。。 2．以X为变量。。。。。。 #1=0 N10#1=#1+0.3 #2=-0.2*#1*#1 G1X[2*#1+20]Z[#2]F0.3 IF[#1LE14.7]GOTO10 G0U5 Z5