宏程序实用例集.doc

1 / 37
，分粗加工（椭圆柱）和精加工（椭圆半球体）；
，***为平底立铣刀；
，加工路线，以自下而上0－90间等角度分层。每层以圆弧切入切出，根据当前层的长短层时***中心在Y方向上的半轴长度
N10 G00X[#9+#4]Y#4; XY轴移到切入起点坐标
N20 Z[#7-#4]; Z轴移到层的加工平面
N30 G03X#9Y0R#4F300; 圆弧切入
#5=0; 圆周初始角赋值
WHILE[#5LE360]DO2; 当＃5小于360度，循环2继续，完成一周的铣削
#15=#9*COS[#5]; 根据椭圆方程序计算X坐标值
#16=-#10*SIN[#5]; 计算Y坐标值
3 / 37
N40 G01X#15Y#16F2000; 直线拟合插补段
#5=#5+#17; 圆周角度递增量赋值
END2; 椭圆每层圆周加工循环结束
N50 G03X[#9+#4]Y-#4R#4; 圆弧切出
N60 G00Z[#7-#4+1.]; Z轴提刀
N70 Y#4; Y轴从切出点移到切入起点
#6=#6+#18; 分层角度递增量赋值
END1; 循环1结束
N80 G00Z[#3+30.]; 提刀至安全高度
M05; 主轴停
M30; 程序结束
第二种方法：
1206；高20，原点在-，自上而下
#1=0
#2=20;短半轴
#3=30;长半轴
#4=1
#5=90
WHILE [#5GE #1] DO1
#6=#3*COS[#5]+4
#7=#2*SIN[#5]
G01X#6
Z#7
#8=360
#9=0
WHILE[#9LE#8]DO2
#10=#6* COS[#9]
#11=#6*SIN[#9]*2/3
G01X#10Y#11
#9=#9+1
END1
#5=#5-#4
END2
M30
正多边形外轮廓宏程序
编制正多边形外轮廓加工宏程序，能实现边数为n边（n=3,4,5,6,8,9,10,12等，n能被360整除即可）的外轮廓自上而下环绕分层加工，同时通过控制多边形中心与其中一顶点的连线与水平方向的夹角，加工出不同摆放位置的正多边形（如图5-24所示，为编程方便，我们将编程起始点，即多边形的一个顶点A放在X水平轴上，要加工出所要求的摆放位置，需用G68指令进行坐标系旋转，旋转角度为OA与OA’的夹角）。
5 / 37
图5-24
现以五边形为例，如图5-25所示，工件坐标系设在多边形中心的上平面，以***中心点编程（不用半径补偿功能），编程起始点为X轴上的A点，以顺铣方式（顺时针方向），根据标准正多边形的各边长总是相等，边长之间的夹角也相同的规律，用极坐标编程方式，循环完成每一边的加工。多边形宏程序的加工路线和变量设计如下：
图5-25
1）初始变量的设置：
#1=__; 正多边形的边数
#2=__; 正多边形外接圆的直径
#3=__; 轮廓加工的高度尺寸值
#4=__; ***半径（平底立铣刀）
#5=__; Z向加工起始点坐标，设为自变量，赋初始值Z0（工件上平面）
#15=__; 分层加工的层间距
#23=__; 正多边形旋转角度（正三角形为90，正四边形为45）
2）宏程序中变量及表达式
要应用极坐编程，需计算极半径和极角，如图5-25所示。
（1）#10，夹角β。
在多边形中心与某边中点做一连线OC，OC与OD之间的夹角β设为变量#10，赋值表达式为：#10=180/#1;（180除以边数）
（2）我们以***中心点编程，要计算出极半径OA，需确定△AOB 中OB的边长，计算OB边长首先要确定OC边长：
①在△OCD中，已知∠β（#10），边长OD（外接圆半径，#2/2），根据三角函数定义，余弦COS等于邻边比斜边，即COS
5 / 37
β＝OC/OD，那么：
OC＝OD*COSβ＝#2/2* COS[#10]
②#11，OB边长。
在△AOB中，OB＝OC＋BC（***半径r为#4），设OB边长为变量#11，赋值表达式为：#11=#2/2*COS[#10]+#4;
③#12，极半径OA边长。
那么在△AOB中，已知OB和∠β，余弦COS等于邻边比斜边的定义，即COSβ＝OB/OA，那么：OA＝OB/COSβ，设OA变量#12，赋值表达式为：
#12=#11/COS[#10];
（3）转移循环设计
①以极角变化次数循环加工边数
#17=1;