dovrei spianare dei cubi di diverse dimensioni e vorrei usare la programmazzione parametrica.
qualcuno ha degli esempi?
Codice: Seleziona tutto
%
(Macro spianatura piastra origine X Y in alto a sinistra della piastra ,ORIGINE Z PIANO ATTREZZATURA APPOGGIO )
(richiamo macro G65 P1000 X Y Z D F parametri che devono essere inviati alla macro con significato vedi sotto )
O1000
#100=#24(DIMENSIONI IN X DELLA PIASTRA 1 parametro)
#101=#25(DIMENSIONI IN Y DELLA PIASTRA 2 parametro )
#102=#26(DIMENSIONI IN Z DELLA PIASTRA 3 parametro )
#103=#9(AVANZAMENTO F 4 parametro )
#104=#7 (DIAMETRO FRESA D 5 parametro )
(-------------------------------------------------------------------)
#105=[#101/#104](NUMERO PASSATE IN Y)
(ARROTONDAMENTO NUMERO PASSATE A NUMERO INTERO)
#106=0
WHILE[#106LT#105] DO1
#106=[#106+1]
END1
#105=#106
GOTO 10
N5 #105 =[#105+1]
N10 #107=FIX[[#101/#105]](MILLIMITRI DI LAVORO FRESATURA Y/NUMERO PASSATE)
(ARROTONDAMENTO A MENO DEL 90 % DIAMETRO FRESA)
IF[ #107GT[[#104/100]*90]] GOTO 5
#116=[[#104/2]-#107](POSIZIONE Y)
G0 X [-[#104/2]-5] Y#116 Z[#102+5]
G1 Z#102 F#103
#106=0
#110=[-[#104/2]-5] (FRESA A SINISTRA)
#115=[#100+[#104/2]+5](FRESA A DESTRA)
#118=#115(POSIZIONE FRESATURA)
WHILE[#106LT#105]DO1
G1 Y#116 F#103
G1 X#118 F#103
#116=[#116-#107]
#106=#106+1 (CONTATORE)
IF[#118EQ#115] GOTO 20
IF[#118EQ#110]GOTO 25
N20 #118=#110 (INVERTO)
GOTO 30
N25 #118=#115 (INVERTO)
N30
END1
M99
%
Codice: Seleziona tutto
(PROGRAMMA -semplice spianatura)
(CON FRESA A SCELTA---)
(lunghezza;larghezza;profondita)
(==30/ottobre/2015==ore 14=)
G90 G54
t10 m6
s6000 m3 F1000
(===INPUTS===========)
#1=20 (DIAMETRO-FRESA)
#2=200 (X LUNGHEZZA)
#3=200 (Y LARGHEZZA)
#113=3 (***PASSATE IN ZETA***)
#119=2.5 (ZETA-PROFONDITA-FINALE)
#123= 2 ( ZETA-sicura Z)
#124= 0 ( Z ZERO)
( ========================= )
#114=[#119/#113] (PASSATE-ZETA)
#150=fup[[#3/#1]/2+1] (PASSATE Y )
#115=[0-#114] (ZETA in meno)
( ********************************** )
G0 Z20
G0 X0 Y0
G0 Z30
G1 Z#123
G1 Z#124 (****RIGA AGGIUNTA*** "inizio Z Zero" ***)
M98 P100 L#113
G0 Z50
M30
(**************************************)
O100
g91z10
g90
G0 X0 Y0
G91z[0-10]
g90
G91 Z#115
g90
M98 P120 L#150
M99
O120
G1 x[0-#2]
g91y[0-[#1-.5]]
g90
g1x0
g91y[0-[#1-.5]]
g90
M99