|
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[]
|
- [mfg-smartcam] group selecting 1135 holes jmjohns
- Res: [mfg-smartcam] group selecting 1135 holes Angelucci
- Re: [mfg-smartcam] group selecting 1135 holes John Gent
- RE: [mfg-smartcam] group selecting 1135 holes FLauzus
- Chris . Kocourek
