Jim,
Here are two simple macros to help with programming lots of holes. They are simple to follow, and can be modified to perform more functions. For instance, you can easily add another tool to "Holedr.mcl" to provide a spot/drill/ream or spot/drill/tap functionality.
 
 
First use this macro to group your arcs. The "Min" and "Max" prompts represent the range of arcs you want to group. If you want only one size, use the same value:
 
/ Group arcs in desired range of sizes
// Production Milling v9.2
// CREATED: 2/11/97
// CREATED BY: Chris Kocourek
//STRING:#MIN
//STRING:#MAX
//PROMPT[TX="What is the minimum radius you want to group?", VN="#MIN", DV=0]
//PROMPT[TX="What is the maximum radius you want to group?", VN="#MAX", DV=0]
ARC_GRP[AR=0, FA=1, NR="#MIN", XR="#MAX"]
#MIN=1000000
#MAX=1000000
 
 
 
After your arcs are grouped, run this macro. The prompts are as follows.
"SPOT" = Tool number of your spot drill
"SPOT DEPTH" = The absolute depth of your spot drill
"TOOL" = Tool number of your drill
"THICK" = Thickness of your plate. This variable will add .100" to the full diameter depth of the drill to provide .100" breakthrough. If it is a blind hole, subtract .100" from the absolute depth to use as the "thickness".
 
 
 
 
/ Production_Milling 9.2 Windows Macro File
// ..\shared\sysmcl\Holedr.MCL
// CREATED: 11/25/97
//  CREATED BY: Chris Kocourek
// 
VAR_REMOVE_ALL[]
#LAST=TOTEL()
ELMT_SEQ[BA=1, EL="#LAST", ME=0]
SEQ_MOVE[SC=0]
#INGRP=GRP(0)
#COUNT=1
WHILE(#COUNT<=#INGRP)
     #ELMT=GRP(#COUNT)
     WITH_STEP[ST=#SPOT, WP="XY_PLANE", OF=2, LV=0, CL=1.0, PT=0]
     PROPERTY[LV=0, WP="XY_PLANE", PT=0, CL=2, OF=2, TD=#SPOT_DEPTH]
     HOLE[XE=CEX(#ELMT), YE=CEY(#ELMT), LV=0, SE=2, PK=1]
     WITH_STEP[ST=#TOOL, WP="XY_PLANE", OF=2, LV=0, CL=2, PT=0]
     PROPERTY[LV=0, WP="XY_PLANE", PT=0, CL=2, OF=2, TD=(-0.1-(TAN(90-(tl(tipangl)/2))*(TLDIA(#TOOL)/2))-#THICK)]
     HOLE[XE=CEX(#ELMT), YE=CEY(#ELMT), LV=0, SE=2, PK=1]
     #COUNT=#COUNT+1
ENDW
NEW_GRP[]
 
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, July 30, 2002 6:30 AM
To: [EMAIL PROTECTED]
Subject: [mfg-smartcam] group selecting 1135 holes

All,
 
    I have a 9" plate with 1135 holes to center drill then drill. Is there any fast way or macro to select all the hole and add the tools to them. I have tried to group and select holes and the center point is placed on the start point of the arc, not the center of the hole.
 
Any help would be greatly appreciated
 
Jim

Reply via email to