宏程序應(yīng)用實(shí)例

冷月梧桐

宏程序之?dāng)U展應(yīng)用

最近逛的論壇都在討論宏程序,，那我也發(fā)一個(gè)自己編寫(xiě)的宏,，功能簡(jiǎn)單,，應(yīng)用方便,。言歸正傳,，這個(gè)子程序O1920有三個(gè)功能,，在主程序里調(diào)用時(shí)用變量A1,A2,A3來(lái)指定這三個(gè)功能,。

G65P1920X20Y20A_W70Z-10D0Q-2R1.5F150

X,，Y是第一個(gè)點(diǎn)的坐標(biāo)

A1 是X方向上的U型槽，W是第二個(gè)點(diǎn)的X值

A2 是Y方向上的U型槽,，W是第二個(gè)點(diǎn)的Y值

A3是銑孔的程序

Z 是最終加工深度

D 是開(kāi)始加工的深度,，類似于G83里的R

Q 是每刀加工的深度，是個(gè)負(fù)值,，類似于G83的Q

R 是半徑差,，是圓弧變徑與刀具半徑只差，為正值

F 是進(jìn)給速度

詳情見(jiàn)下圖的兩個(gè)U型槽和一個(gè)圓,，刀具就以直徑是8的立銑刀,，需要加工的深度是10mm，每刀吃2mm(X方向的U型槽第一個(gè)點(diǎn)選用左邊的,，Y方向的U型槽第一個(gè)點(diǎn)選用上面的5.5-4=1.5,6.5-4=2.5,12-4=8)

G30G91Z0

G54G90G17G49G00X0.Y0.

S1500M03

G43H01Z10M08

G65P1920X20Y20A1W70Z-10D0Q-2R1.5F150(X-X-Y-R)

G65P1920X20Y90A2W50Z-10D0Q-2R2.5F150(X-Y-Y-R)

G65P1920X70Y50A3Z-10D0Q-2R8F150(X-Y-R)

G0Z50M09

G30G91Z0M0

M30

O1920

IF[#1EQ1]GOTO100(X-X-Y-R)

IF[#1EQ2]GOTO200(X-Y-Y-R)

IF[#1EQ3]GOTO300(X-Y-R)

M99

N100 (X-X-Y-R)

#100=#24(X)

#101=#25(Y)

#102=#23(W)

#103=#7(D)

#104=#17(Q)

#105=#26(Z)

#106=#18(R)

#107=#9(F)

#108=#100-#106

#109=#100+#106

G00X#100Y#101

N110

#103=#103+#104

G01Z#103F#107

G01Y#108

G01X#102

G03X#102Y#109R#106

G01X#100

G03X#100Y#108R#106

G01Y#101

/MO1

IF[#103EQ#105]GOTO120

GOTO110

N120

G01Z10F1500

M99

N200 (X-Y-Y-R)

#100=#24(X)

#101=#25(Y)

#102=#23(W)

#103=#7(D)

#104=#17(Q)

#105=#26(Z)

#106=#18(R)

#107=#9(F)

#108=#100-#106

#109=#100+#106

G00X#100Y#101

N210

#103=#103+#104

G01Z#103F#107

G01X#108

G01Y#102

G03X#109Y#102R#106

G01Y#101

G03X#108Y#101R#106

G01X#100

/MO1

IF[#103EQ#105]GOTO220

GOTO210

N220

G01Z10F1500

M99

N300 (X-Y-R)

#100=#24(X)

#101=#25(Y)

#103=#7(D)

#104=#17(Q)

#105=#26(Z)

#106=#18(R)

#107=#9(F)

#108=#100+#106

G00X#100Y#101

N310

#103=#103+#104

G01Z#103F#107

G01X#108

G03I-#106

G01X#100

/MO1

IF[#103EQ#105]GOTO320

GOTO310

N320

G01Z10F1500

M99

鹽拌番茄

對(duì)宏不是很了解,，主要應(yīng)用少,。
& f( p& K  }1 a5 S$ z! g8 R我發(fā)現(xiàn)加工中心對(duì)宏的應(yīng)用比數(shù)車要更多一些。

duanyz

一直想學(xué)習(xí)使用宏程序,，可是看到這樣的程序忽然感到很糾結(jié),，太復(fù)雜了，直接用個(gè)軟件來(lái)出刀路是不是更簡(jiǎn)單呢,？

冷月梧桐

那你干嘛還想學(xué)宏呢,？？為什么你鉆孔用G81而不是用G01呢,？,？軟件出來(lái)的修改方便嗎？,？宏的精髓是簡(jiǎn)化編程,，我會(huì)的不過(guò)是皮毛

冷月梧桐

duanyz 發(fā)表于 2013-9-19 16:55
一直想學(xué)習(xí)使用宏程序，可是看到這樣的程序忽然感到很糾結(jié),，太復(fù)雜了,，直接用個(gè)軟件來(lái)出刀路是不是更簡(jiǎn)單呢 ...

那你干嘛還想學(xué)宏呢？,？為什么你鉆孔用G81而不是用G01呢,？？軟件出來(lái)的修改方便嗎？,？宏的精髓是簡(jiǎn)化編程，我會(huì)的不過(guò)是皮毛

: [. F9 L0 W% `8 F3 v. \4 y

夜總是要來(lái)的

教學(xué)用的宏還不錯(cuò),！ 實(shí)際應(yīng)用到加工上還需要修改下,。。
5 W2 j# q2 V) j2 O; l8 h! k& e0 c- J3 S
% ]/ x3 w% R7 w4 X! B. Y8 o4 _不錯(cuò)的示范,！

夜總是要來(lái)的

O1000(銑鍵槽通用程序)

只需要改動(dòng)#101 （長(zhǎng)度中心距） #102（深度） #103（寬度）三個(gè)值就可以做任何的鍵槽
7 V* x; S: z9 |8 G% e) q
; _' T5 r; x% d6 L0 E6 x# tG17 G40 G49 G80 G90

. _4 V" V+ r; b( f3 |5 Q#120=[]       (G54 X)
#121=[]       (G54 Y)
4 E. \+ d0 _8 W* G#122=[]       (G54 Z)
- O4 P8 Q0 ?. f, f7 B2 u( P
#123=[]       (G55 X)
#124=[]       (G55 Y)
#125=[]       (G55 Z)
  N9 z" V, t7 z6 b$ ~
G90G10L2P1 X#100 Y#101 Z#102    (G54)
G90G10L2P2 X#103 Y#104 Z#105    (G55)

G54
M06 T01
1 d& p( V7 @4 S% ?4 f4 ]  l; }M8
: f7 o3 J! S4 }4 wM3 S1500
9 ~9 Y% M. @$ B- I* q3 S#101=80.4   (lenght!!)
#102=5      (depth!!)
" |$ Y! X$ ~, M. A  n#103=12.7   (breadth!!)

: m' S; |8 C6 \  @) t6 A7 z#104=30    (down speed)
#105=80    (roung speed)
#106=250   (finsih machining speed)
+ e% }4 X6 Z1 G0 b2 q
0 l, E& f  ~) W9 p1 D$ u- c) k#107=#101/2                                                   
#108=[#101/2-#103/2]    (star point)
#109=#103/2                        
# ^- x' S; j% d" f2 \* S#110=2-#102                                                  
8 N" }! A/ O3 t0 s7 t) V
G00 X-#107 Y0                                 
* M+ [3 P/ v  b+ [4 e5 M3 j6 MZ50.                                
  [( N' ^) h% M; D5 SG01 Z1. F1000
6 d8 K0 [  @! h" B7 i- l( Y! A& nZ-#102 F#104
X#107  F#105                           
$ C. l/ L! x4 v0 ~' y" n
* k* U% D5 p. r. DX#108 Y0                           
G41 G01 X#107 Y-#109 D01 F#106        
G03 Y#109 R#109                  
) w7 _! Q) p% ]% @, k2 Y, g6 ZG01 X-#107                        
& w- K+ r0 c- c* b; TG03 Y-#109 R#109                     
G01 X#107                           
1 Y2 ~$ j8 w( W8 q8 P9 [4 ]G40 G01 X#108 YO D0

" O$ X9 Z9 T6 h( z1 s9 R( PG00 Z200.
# [$ v  `/ e; f) `6 j
# h; m  ~  x& ~! }7 r9 [( dN20
2 \5 ?, s5 w' q% H) C: `% IM06 T02
0 k# j, f& X+ ^$ a' cG17 G40 G49 G80 G90
2 [6 |+ a$ l' R$ @2 lG55
* K! Y  H& J% y( ]! a( i  x2 z( n" iM8
M03 S2500
' o2 Y7 U6 x1 q1 F0 zG00 X#108 Y0
; U$ @: b- K* z; V& tZ50.
G01 Z#110 F1000
Z-#102 F#104
G41 G01 X#107 Y-#109 D02 F#106
! g% x0 P5 |0 ?4 nG03 Y#109 R#109
% ~1 a+ Q3 U8 F! b* DG01 X-#107
2 W2 a# X8 C8 g5 _2 ~# {2 pG03 Y-#109 R#109
0 h3 u7 C, t1 T5 r& R- u, f+ S/ o  bG01 X#107
2 Y4 C; T2 Z0 u+ H8 L, oG40 G01 X#108 YO D0
  k0 _  K, C0 a7 f$ jG00 Z200.
, |0 I* k. |( {9 }0 S+ r1 a; |% ZM09
; d- ]* O5 q" z# C& A% [7 h7 KM05
* ~2 Q* q& y$ |" G5 f8 cM30
+ B0 B3 M# r* c( e: {$ b
8 a' W+ W, [7 y" `: m
9 ?  q) o' S* j' T1 r$ Q


  E" p- j5 |2 S/ c* x" f4 C- ^

冷月梧桐

夜總是要來(lái)的 發(fā)表于 2013-9-21 15:49
教學(xué)用的宏還不錯(cuò),！ 實(shí)際應(yīng)用到加工上還需要修改下。,。

* Y; u; p( W8 j8 z% L不錯(cuò)的示范,！

宏程序是活的，而且每個(gè)人的習(xí)慣都不一樣,。我覺(jué)得就很好用,，有一個(gè)弄錯(cuò)了，我不會(huì)改帖子

冷月梧桐

夜總是要來(lái)的 發(fā)表于 2013-9-21 15:55
O1000(銑鍵槽通用程序)

6 A" ?% N1 M) }" k; ~* l! x& \; p只需要改動(dòng)#101 （長(zhǎng)度中心距） #102（深度） #103（寬度）三個(gè)值就可以做任何的 ...

) |2 c! [6 t+ y1 U2 A我笑而不語(yǔ)

夜總是要來(lái)的

冷月梧桐 發(fā)表于 2013-9-21 21:36
我笑而不語(yǔ)

/ m# ~& w! [, W* u: x! E好好笑  別停下,。,。。