加工程序 O1001； G80 G17 G21; G91 G30 Z0; T02; M06; G00 G90 G54 X0 Y0; G43 H2 Z5．0 M03 S3000; #1=-48; #2=-64; #3=20; #4=2; #5=4; WHILE［#1 GE #2 ］ DO1; #6= ［#3-#5］*COS［#1］; #7= ［#3-#5］*SIN［#1］-#5; G01 X#6 F600; G01 Z#7; G02 I-#6; #1=#1-#4; END1; G00 Z50．0 ; G91 G30 Z0 M05; M30;
加工说明 球头立铣刀铣SR20mm凹半球面 取消指令 返回换刀点 寻找02号刀具 换02号刀具 刀具定位到原点 刀具长度补偿，主轴正转 起始角度 终止角度 半圆球半径 角度增量 球头立铣刀半径 当#1≥0执行循环1 X的坐标值 Z坐标值 刀具X轴切削 刀具Z轴切削 刀具圆周切削 角度递减 循环结束 刀具Z轴定位 返回换刀点 程序结束
图4-28 凸椭圆面零件 加工程序 O2001； G80 G17 G21; G91 G30 Z0; T02; M06; G00 G90 G54 X0 Y0; G43 H5 Z5．0 M03 S3000; #1=90; #2=0; #3=20; #4=10; #5=3; #6=2; 加工说明 取消指令 返回换刀点 寻找02号?6mm球头立铣刀 换02号?6mm球头立铣刀 刀具定位到原点 刀具长度补偿，主轴正转 起始角度 终止角度 轴向椭圆球长轴半径 轴向椭圆球短轴半径 球头立铣刀半径 角度增量 WHILE［ #1 GE #2 ］ DO 1; #11=［#3+#5］*COS［#1］; #12=［#4+#5］* COS ［#1］; #13=#12-#3-#5; G01 X#11 F600; G01 Z#13 F400; #8＝0; WHILE［ #8 LE 360 ］ DO 2; #21＝［#11+#5］* COS［#8］; #22＝［#12+#5］* SIN［#8］-#3-#5; G01 X#21 Y#22 F600; #8=#8+1; END2; #1=#1-#6; END1; G00 Z50．0; G91 G30 Z0 M05; M30; 凹椭圆面加工程序 加工程序 O2001; G80 G17 G21; G91 G30 Z0; T02; M06; G00 G90 G54 X0 Y0; G43 H5 Z5．0 M3 S3000; #1=0; #2=-90; 当#1≥0执行循环1 X坐标值 Z坐标值 刀具X轴切削 刀具Z轴切削 刀具椭圆球切削 角度递减 循环结束 刀具Z轴定位 返回换刀点 程序结束 加工说明 取消指令 返回换刀点 准备2号?6mm球头立铣刀 换2号?6mm球头立铣刀 刀具定位到原点 刀具长度补偿，主轴正转 起始角度 终止角度 #3=20; #4=10; #5=3; #6=2； WHILE［#1 GE #2］ DO 1; #11=［#3-#5］*COS［#1］; #12=［#4-#5］* COS ［#1］; G01 X#11 F600; G01 Z#12; #8＝0； WHILE［#8 LE 360］ DO 2; #21＝［#11-#5］* COS［#8］; #22＝［#12-#5］* SIN［#8］; G01 X#21 Y#22 F600; #8=#8+1； END2； #1=#1-#6; END1; G00 Z50．0; G91 G30 Z0 M05; M30; 轴向椭圆球长轴半径 轴向椭圆球短轴半径 球头立铣刀半径 当#1≥0执行循环1 X坐标值 Z坐标值 刀具X轴切削 刀具Z轴切削 刀具椭圆球面切削 角度递减 循环结束 刀具Z轴定位 返回换刀点 程序结束
零件加工程序
加工程序 O1300； #1＝25； #2＝8； #3＝7； #4＝4； #5=20； #6＝#1+#3； #7＝#1-#2+#3； #8＝SQRT［#6*#6-#7*#7］； #9＝ACOS［#7/#6］； #10＝0； #20＝1； S1150 M03； G4 G90 G00 Y0 X0 Z［#2+30］； X-#5 Y-#8； G01 Z0 F300； WHILE［#10LE#9］ DO 1； #11＝-#8+［#3-#4］*SIN［#10］； 加工说明 圆柱面半径R 圆柱面最高处调出ZO平面的距离 圆柱面两侧与ZO平面过渡圆角半径 (球头立铣刀)刀具半径r X坐标设为自变量，赋初始值为X方向长度的1/2 图4?36中AM长度 图4?36中AC长度 图4?36中MC长度(即D/M点到原点的距离) 图4?36中MAC=AMD,为角度#10终止值 球头立铣刀在圆弧面上的角度设为自变量，赋初始值为0 球头立铣刀在R#3圆弧面角度递增量(1为经验值) 程序开始，定位于G54原点上方安全高度 G00移动到起始点上方(左下角) 以G01下降至ZO面(即底平面) 如果角度#10<#9,循环1继续 球头立铣刀在Y-一侧R#3圆弧上当前位置的刀心Y坐标值 球头立铣刀在Y-一侧R#3圆弧上当前位置的刀心Z坐标值 球头立铣刀在Y-一侧R#3圆弧上移到当前位置 朝X+方向走到右侧 令X+方向换向 角度#10递增#20 令角度#10＝#9,即图中角度AMC #12＝［#3-#4］*［1-COS［#10］］； Y#11 Z#12 F1000； X#5； #5＝-#5； #10＝#10+#20； END1； #10=#9；
数控铣床编程例题
