B類宏程序應用舉例
如下圖所示的圓環點陣孔群中各孔的加工，我們曾經用A類宏程序解決過這類問題，這里再試用B類宏程序方法來解決問題。圓環點陣孔群的加工圖 宏程序中將用到下列變量：
＃1――第一個孔的起始角度A，在主程序中用對應的文字變量A賦值；
＃3――孔加工固定循環中R平面值C，在主程序中用對應的文字變量C賦值；
＃9――孔加工的進給量值F，在主程序中用對應的文字變量F賦值；
＃11――要加工孔的孔數H，在主程序中用對應的文字變量H賦值；
＃18――加工孔所處的圓環半徑值R，在主程序中用對應的文字變量R賦值；
＃26――孔深坐標值Z，在主程序中用對應的文字變量Z賦值；
＃30――基準點，即圓環形中心的X坐標值XO；
＃31――基準點，即圓環形中心的Y坐標值YO；
＃32――當前加工孔的序號i；
＃33――當前加工第i孔的角度；
＃100――已加工孔的數量；
＃101――當前加工孔的X坐標值，初值設置為圓環形中心的X坐標值XO；
＃102――當前加工孔的Y坐標值，初值設置為圓環形中心的Y坐標值YO。 用戶宏程序編寫如下：
O8000
N8010 ＃30=＃101 //基準點保存
N8020＃31=＃102 //基準點保存
N8030＃32=1 //計數值置1
N8040WHILE[＃32LEABS[＃11]]DO1 //進入孔加工循環體
N8050＃33=＃1 360×[＃32－1]/＃11 //計算第i孔的角度
N8060 ＃101＝＃30＋＃18×COS[＃33] //計算第i孔的X坐標值
N8070 ＃102＝＃31＋＃18×SIN[＃33] //計算第i孔的Y坐標值
N8080 G90G81G98X＃101Y＃102Z＃26R＃3F＃9 //鉆削第i孔
N8090 ＃32＝＃32＋1 //計數器對孔序號i計數累加
N8100 ＃100＝＃100＋1 //計算已加工孔數
N8110END1 //孔加工循環體結束
N8120#101=#30 //返回X坐標初值XO
N8130#102=#31 //返回Y坐標初值YO
M99 //宏程序結束 在主程序中調用上述宏程序的調用格式為：
G65P8000A～C～F～H～R～Z～
上述程序段中各文字變量后的值均應按零件圖樣中給定值來賦值。
＃1――第一個孔的起始角度A，在主程序中用對應的文字變量A賦值；
＃3――孔加工固定循環中R平面值C，在主程序中用對應的文字變量C賦值；
＃9――孔加工的進給量值F，在主程序中用對應的文字變量F賦值；
＃11――要加工孔的孔數H，在主程序中用對應的文字變量H賦值；
＃18――加工孔所處的圓環半徑值R，在主程序中用對應的文字變量R賦值；
＃26――孔深坐標值Z，在主程序中用對應的文字變量Z賦值；
＃30――基準點，即圓環形中心的X坐標值XO；
＃31――基準點，即圓環形中心的Y坐標值YO；
＃32――當前加工孔的序號i；
＃33――當前加工第i孔的角度；
＃100――已加工孔的數量；
＃101――當前加工孔的X坐標值，初值設置為圓環形中心的X坐標值XO；
＃102――當前加工孔的Y坐標值，初值設置為圓環形中心的Y坐標值YO。 用戶宏程序編寫如下：
O8000
N8010 ＃30=＃101 //基準點保存
N8020＃31=＃102 //基準點保存
N8030＃32=1 //計數值置1
N8040WHILE[＃32LEABS[＃11]]DO1 //進入孔加工循環體
N8050＃33=＃1 360×[＃32－1]/＃11 //計算第i孔的角度
N8060 ＃101＝＃30＋＃18×COS[＃33] //計算第i孔的X坐標值
N8070 ＃102＝＃31＋＃18×SIN[＃33] //計算第i孔的Y坐標值
N8080 G90G81G98X＃101Y＃102Z＃26R＃3F＃9 //鉆削第i孔
N8090 ＃32＝＃32＋1 //計數器對孔序號i計數累加
N8100 ＃100＝＃100＋1 //計算已加工孔數
N8110END1 //孔加工循環體結束
N8120#101=#30 //返回X坐標初值XO
N8130#102=#31 //返回Y坐標初值YO
M99 //宏程序結束 在主程序中調用上述宏程序的調用格式為：
G65P8000A～C～F～H～R～Z～
上述程序段中各文字變量后的值均應按零件圖樣中給定值來賦值。
站內搜索
聯系我們
地址: 浙江省.寧波市鄞州區寧姜公路（九曲小區二期旁)
郵編: 315040
聯系人: 盛立峰
電話: 0574-87139378
傳真: 0574-87139378
手機: 13867861670
郵箱: 85400329@qq.com
Copyright ?2004-2026 寧波市鄞州首南恒宇激光雕刻廠 All Rights Reserved.
地址: 浙江省.寧波市鄞州區寧姜公路（九曲小區二期旁) 郵編: 315040 聯系人: 盛立峰
電話: 0574-87139378 傳真: 0574-87139378 手機: 13867861670
