數(shù)控車床車削宏程序

1、宏程序,宏指令編程概述 宏程序指令適合拋物線、橢圓、雙曲線等沒有插補(bǔ)指令的曲線編程；適合圖形一樣，只是尺寸不同的系列零件的編程；適合工藝路徑一樣，只是位置參數(shù)不同的系列零件的編程。較大地簡化編程；擴(kuò)展應(yīng)用范圍。,運(yùn)算符與表達(dá)式 1、算術(shù)運(yùn)算符 +、-、*、/ 2、條件運(yùn)算符 EQ（=）、NE（ ）、GT（>）、GE（=>）、LT（<）、LE（=<） AR[]判斷參數(shù)

2、合法性的宏（判斷是否定義，是增量還是絕對） 3、邏輯運(yùn)算符 AND（與）、OR（或）、NOT（非） 4、 函數(shù) SIN（正弦）、COS（余弦）、TAN（正切）、 ATAN（反正切-90°~90°）、ATAN2 （反正切-180°~180°） 、 ABS（絕對值）、INT（取整）、SIGN（取符號）、 SQ

3、RT（開方）、EXP（指數(shù)） 5 、表達(dá)式 用運(yùn)算符連接起來的常數(shù)或宏變量構(gòu)成表達(dá)式。,賦值語句 格式：宏變量=常數(shù)或表達(dá)式 #2 = 175/SQRT[2] * COS[55 * PI/180 ]； #3 = 124.0； 條件判別語句IF， ELSE，ENDIF 格式 (i)： I

4、F 條件表達(dá)式 … ELSE … ENDIF 格式(ii) ：IF 條件表達(dá)式 … ENDIF循環(huán)語句WHILE，ENDW 格式：WHILE 條件表達(dá)式 …

5、ENDW,,例1：用宏程序編制下圖所示拋物線Z=-X²/8，在區(qū)間 [0，16]內(nèi)的程序。%8002#10=0#11=0N10 G92 X0 Z5M03 S600G01 X0 Z0 F300WHILE #10 LE 16G90 G01 X[#10] Z[-[#11]] F500#10=#10+0.08#11=#10*#10/8ENDWG00 Z0 M05G00 X0,,,%3

6、401 N1 T0101N2 G37N3 #10=0；A坐標(biāo)初值N4 #11=0；B坐標(biāo)初值N5 M03 S600N6 WHILE #10 LE 8N7 G90 G01 X[#10] Z[-#11] F500N8 #10=#10+0.08N9 #11=#10*#10/2N10 ENDWN11 G00 Z0 M05N12 G00 X0N13 M30,例2、用宏程序編制下圖所示拋物線程序。,,,,,,,,8,

7、,,,32,,,,,A,B,,,拋物線B=-A2/2在A區(qū)間[0，8],%3401T0101G00 X21 Z3M03 S600 #10=7.5；A坐標(biāo)初值（粗加工）WHILE #10 GE 0#11=#10*#10/2 ；B坐標(biāo)G90G01X[2*#10+0.8] F500Z[-#11+0.05]U2Z3#10=#10-0.6ENDW #10=0 ；A坐標(biāo)初值（精加工）WHILE #10

8、LE 8#11=#10*#10/2 ；B坐標(biāo)G90G01X[2*#10]Z[-#11]F500,例3：用宏程序編制下圖所示零件加工程序。,#10=#10+0.08ENDWG01 X16 Z-32Z-40 G00 X21 Z3 M05M30,,,,8,,32,,,,A,B,,,拋物線B=-A2/2在A區(qū)間[0，8],例4：用宏程序編制如圖3.4.3所示零件加工程序。,%0342N1 T0101N2 G00 X20.5

9、Z3N3 #11=12 ；B坐標(biāo)初值N4 #10=SQRT[2*[#11]] ；A坐標(biāo)初值N5 M03 S600N6 WHILE #10 LE 8N7 G90G01X[2*#10]Z[-[#11-12]]F500N8 #10=#10+0.08N9 #11=#10*#10/2N10 ENDWN11 G01 X16 Z-20N12 Z-28N13 G00 X20.5 Z3 M05N14 M

10、30,,,,8,,32,,,,A,B,,,拋物線B=-A2/2在B區(qū)間[12，32],,12,,例5：用宏程序編制如圖3.4.3所示零件加工程序。,%0342N1 T0101 N2 M03 S600N3 G00 X35 Z3N4 G01 X18 F100N5 Z-4N6 #11=8 ；Z坐標(biāo)初值N7 #10=SQRT[2*[#11]] N8 G01 X[2*[#10+3]]N9 WHILE #11 LE 28

11、N10 #10=SQRT[2*[#11]] N11G90G01X[2*[#10+3]]Z[-[#11-4]]F500N12 #11=#11+0.04N13 ENDWN14 G01 X22 Z-24N15 Z-30,圖,3,.4.2,,宏程序編制例圖,,拋物線B=-A2/2在B區(qū)間[12，32],,,,,,20,,,,Ф 30,,30,,,8,,,,,,,,,,,,,,,,,,,,,,4,3,,,Ф18,Ф 22,,,5,N1

12、6 X30N17 Z-35 N18 G00 X35 Z3N19 M05N20 M30,例6 拋物線與橢圓的混合運(yùn)用。 %8002 (程序名)G92 X50 Z0 （起點(diǎn)坐標(biāo)）U32 V40 W55 A8 B5 C4 M98 P8001（定義#20=32、#21=40、#22=55、#0=8、#1=5、#2=4）G36 G90 X50 Z0（到起點(diǎn)位置）M30

13、 %8001 (子程序名)#10=0 #11=0 （拋物線起點(diǎn)X、 Z軸坐標(biāo)值） #12=0 #13=0 （橢圓起點(diǎn)在X、Z軸方向增量值） G64 G37 （小線段連續(xù)加工、半徑編程） WHILE #11 LE #20 （拋物線方程：Z=-X*X/C ） G01 X[2*#10] Z[-[#11]] F1

14、500#10=#10+0.08 （計(jì)算各段拋物線X軸坐標(biāo)）#11=#10*#10/#2 （計(jì)算各段拋物線Z軸坐標(biāo)）ENDWG01 X[2*[SQRT[#20*#2]]] Z[-#20] （到達(dá)拋物線終點(diǎn)）G01 Z[-#21] （到達(dá)直線終點(diǎn)）WHILe #13 LE #1 （橢圓方程：X*X/A*A+Z*Z/B*B=1）#16=#1*#1-#13*#13

15、 #15=SQRT[#16]#12=#15*[#0/#1] （計(jì)算橢圓X軸方向的增量）G01 X[2*[SQRT[#20*#2]+#0-#12]] Z[-#21-#13]#13=#13+0.08 （確定橢圓Z軸方向的增量）ENDWG01 X [2*[SQRT[#20*#2]+#0] ]Z[-#21-#1] （到達(dá)橢圓終點(diǎn)）G01 Z[-#22]

16、U12 G00 Z0 m99,,,%8002 (程序名)G92 X90 Z30 （起點(diǎn)坐標(biāo)）U10 V50 W80 A20 B40 C3 M98 P8001（定義#20=10、#21=50、#22=80、#0=20、#1=40、#2=3）G00 X90 Z30（到起點(diǎn)位置）

17、M30 %8001 (子程序名)G00 Z[-#22+#21+#20]X[#1+5]#10=#2WHILE #10 LE #21 G00 Z[-#22+#21+#20-#10]G01 X[#0]G00 X[#1+5]#10=#10+#2-1 ENDWG00 Z[-#22+#20]G01 X[#0]G00 X[