[Speedbengel]

Hello Okuma CNC-Miller,

if you've problems with programs or macros - then let me know.
Maybe I could help you....

[LeonH]

Hi,

The first one i made worked fine using r-comp both in, round and out, but i can max use a 10mm cutter to make a 20mm hole.
and that sux when i allready have a 12 and 16 in the chain.

There for Im making a new macro and where i need to read out the value of cutter no. 5

but something is wrong !! :???:

I dont know if my cutter value read is correct ?
Also its like Y dont go 100 when G41 (maby because of zero movement!!)
It also looks like the 360 hole moves in Y !!

anyone ????

***
(CALL MACRO)
G113 HR=100 HQ=20 HZ=-4 F1220 D5
***
OICIR (G113)
()
(PRE-POS. IN CENTER OF HOLE)
()
(MACRO DESC.)
(CIRCLE IN)
(360 HOLE IN CUTTER COMP. WITH OR WITHOUT INT.POL.HELICAL)
(CLEAN UP OR NOT)
(CIRCLE OUT)
()
(HR=HOLE RADIUS)
(HQ=NO. OF REPEATS)
(MUST BE 1 OR BIGGER)
(HZ=INCREMENTEL Z FOR HELICAL)
(MUST BE 0 OR LESS)
()
VC1=VDCOD (ACTIVE CUTTER OFFSET NO - D-NUMBER)
VC2=VTOFD[VC1] (VALUE OF D OF ACTIVE CUTTER OFFSET NO.)
VC3=HR-VC2 (HOLE RADIUS - D-VALUE)
()
G40 G91 G3 X0 Y=VC3 J=VC3/2 (CIRCLE IN)
G91 G1 G41 X0 Y0 (ACTIVATE CUTTER COMP.)
COPY Q=HQ (REPEAT)
G91 G3 X0 Y0 J=-HR Z=HZ (360 HOLE INT.POL.HELICAL)
COPYE (REPEAT END)
IF [HZ EQ 0] N10 (IF NOT HELICAL DONT CLEAN UP)
G91 G3 X0 Y0 J=-HR (BOTTOM CELAN UP)
N10 G40 (KILL CUTTER COMP.)
G91 G3 X0 Y=-VC3 J=-VC3/2 (CIRCLE OUT)
G90 (ABSOLUTE)
RTS (RETURN TO MAIN PROGRAM)
%

***

SAMPLE WITH VALUES

VC1=5 (ACTIVE CUTTER OFFSET NO - D-NUMBER)
VC2=20 (VALUE OF D OF ACTIVE CUTTER OFFSET NO.)
VC3=100-20 (HOLE RADIUS - D-VALUE)
()
G40 G91 G3 X0 Y80 J40 (CIRCLE IN)
G91 G1 G41 X0 Y0 (ACTIVATE CUTTER COMP.)
COPY Q20 (REPEAT)
G91 G3 X0 Y0 J-100 Z-4 (360 HOLE INT.POL.HELICAL)
COPYE (REPEAT END)
IF [HZ EQ 0] N10 (IF NOT HELICAL DONT CLEAN UP)
G91 G3 X0 Y0 J-100 (BOTTOM CELAN UP)
N10 G40 (KILL CUTTER COMP.)
G91 G3 X0 Y-80 J-40 (CIRCLE OUT)
G90 (ABSOLUTE)
RTS (RETURN TO MAIN PROGRAM)
%