Rich you answered you own question. That is the best method I know of and yes it cost money, but any good tool that does what you want seems to cost money.

setting/configration/toolpaths Memory Buffering what is the % of physical memory set to. Windows 7 Right click on my computer/properties/advanced system setting then the advanced tab. Window XP Right click on my computer/properties/advanced system tab. Then performance settings button/advanced tab/Virtual Memory then hit the change button. Then in the Virtual Memory make sure it is set to System managed size. then you should be using the what the computer needs when it needs it. On the Visual Effect tabs you can tell it best performance and it will help speed up the computer a little as well. HTH

Make sure the only thing you need is the only thing selected for the toolpath. Also make sure you are not using to low of a database setting for toolpaths. I have mine set at 98% and not had a problem. Check the virtual memory of the computer and make sure it is set to automatic and not a managed size. HTH

Use Dummy Clearance planes and dummy tool calls and it should go away. Yes a PIA but welcome to the world of Mill Turns. Also if you are doing any milling for turning do not use lathe stock for it will not be seen by the lathe operations and give you some big fits especially if you want to stock transfer.

You can also use the misc with all or only to select only certain size with entity as well. HTH

Well it seems one of the Mastercam installs sets the Nethasp to local and will give you a hasp not found even though the Haspx will see it Mastercam does not see it. So I recommend you do check that the net hasp has not been changed to Network and Nethasp. HTH

Your welcome and glad you got something out of it. Doug thanks for chipping in it is greatly appreciated when you guys correct those of that are human.

quote: I was using a post created by update post from version9 in X. I would run as far away from that mess as possible if it were me.

Not seeing it either and I have 2 different boxes running Win7 64 bit.

You running Win7. I see this on all my computers from WinXP to Win7. Ramsaver most times will allow you to see the new levels with the names. HTH

Trimming always does. What I do is make a toolpath then trim it. I then back plot the trimmed toolpath and the save that to a level. I then go back in the toolpath and make comp to off. Then I have a trimmed toolpath with the ability to lead in and out. It would be great if trimmed respected lead in/outs but is never has and probably never will. Most times I just Make up my won depths of cuts and then trim them correctly to parts then just grabs them. Problem with the back plot method is the line segments it creates verse the arcs. So by making your own chains you reduce the size of the file greatly. HTH

Here you go: code: # --------------------------------------------------------------------- # Macro Variables as I need them for Probing using Drill Cycles # --------------------------------------------------------------------- sequal "=" #Equal Sign spound "#" #Pound Sign sminus "-" #Minus Sign sadd "+" #Addition Sign sdivide "/" #Division Sign smultiply "*" #Multiply Sign seq EQ #Equal Call sne NE #Not Equal To Call sgt GT #Greater Than to Call slt LT #Less Than Call sge GE #Is Great than or Equal to Call sle LE #Is Less than or Equal to Call sin SIN #Sine Math scos COS #Cosine Math stan TAN #Tangent Math satan ATAN #ArcTangent Math scos ACOS #ArcCosine Math sqrt SQRT #Sqaure Root Math sabs ABS #Absoulte Value sbin BIN #Bin sbcd BCD #Bcd sround ROUND #Round to the Nearest Whole Number sfix FIX #Use for Cutting away any Decimal Numbers sfup FUP #Counting Decimal Digits as one's sln LN #Natural Logarithm sexp EXP #Exponent sbracketopen "[" #Open Bracket sbracketclose "]" #Close Bracket sif IF #If Call sgoto GOTO #Goto Call swhile WHILE #While Call sdo DO #Do Call sor OR #Or Call sand AND #And Call smod MOD #Surplus Math sdprint DPRNT #Data Output in from Probing Cycles sfeature FEATURE #Comments for Probing of Features sm100 100 #Macro Varaible 100 for Spindle Tranfer Operation sm150 150 #Macro Variable 150 for Math Functions in C Axis Aling Macro sm151 151 #Macro Variable 151 for Math Functions in C Axis Aling Macro sm152 152 #Macro Variable 152 Math Functions in C Axis Aling Macro sm5021 5021 #Machine Postion X Axis Variable sm5022 5022 #Machine Postion Y Axis Variable sm5023 5023 #Machine Postion Z Axis Variable sm5024 5024 #Machine Postion B Axis Variable sm5025 5025 #Machine Postion C Axis Varaible for Main Spindle sm5221 5221 #Workoffset Machine Postion X Axis Variable sm5222 5222 #Workoffset Machine Postion Y Axis Variable sm5223 5223 #Workoffset Machine Postion Z Axis Variable sm5224 5224 #Workoffset Machine Postion B Axis Variable sm5225 5225 #Workoffset Machine Postion C Axis Varaible for Main Spindle # -------------------------------------------------------------------------- # Probing String Varaibles Put here to keep post cleaner # -------------------------------------------------------------------------- strg659730 "G65P9730" #Printing Macro Call strg659732 "G65P9732" #Offset Update Macro strg659810 "G65P9810" #Probe Protect Cycle strg659811 "G65P9811" #XYZ Single Surface Measure strg659812 "G65P9812" #Web / Pocket Measure strg659814 "G65P9814" #Bore / Boss strg659815 "G65P9815" #Internal Corner strg659816 "G65P9816" #External Corner strg659817 "G65P9817" #4th Axis X measure - Horiziontal strg659818 "G65P9818" #4th Axis Y Measure - Horiziontal strg659819 "G65P9819" #Bore / Boss on PCD strg659820 "G65P9820" #Stock Allowance Measure strg659821 "G65P9821" #Angle Single Surface Measure strg659822 "G65P9822" #Angle Web / Pocket Measure strg659823 "G65P9823" #3-Point Bore / Boss Measure strg659834 "G65P9834" #Feature to Feature Measure # -------------------------------------------------------------------------- # Probe Format Statements # -------------------------------------------------------------------------- fmt Z 2 prorefht #Z Rapid Position for Rapid fmt Z 2 prnrefht #Z clearence for Protect Cycle fmt Z 2 zbossdep #Z Position for Probing fmt D 2 diadwell #P9614 Bore/Boss Measurement Dia call out fmt C 2 pcddia #P9819 Bolt Circle Diameter for Measurement fmt K 2 zpcddep #P9819 Z Depth if doing Bores for a Bolt Circle Measurement fmt R 2 radclear #Radius Clearance Postive for Od and Negative for Id fmt S 4 offupdate #Used to Fixture Offsets fmt Y 2 cyspan #Used for Across Distance fmt H 2 feattol #Tolerance of Feature being Measured fmt T 4 toolupdate #Used for Updating Tool Offsets fmt M 2 trueposzone #True Position Tolerenance Zone fmt B 2 cangtoler #C axis Tolerance for C-Axis Align Cycle fmt B 2 corn_angtoler#Angle Tolerance for Internal Corner if not 90 deg corner fmt Q 2 covertrav #C Axis Overtravel for Probe Amount fmt 2 drl_prm1$ #Tolerance Vaule for Repeat Loop in Post fmt X 2 drl_prm2$ #Size to Measure for P9812 Cycle X axis fmt Y 2 drl_prm3$ #Size to Measure for P9812 Cycel Y axis fmt W 4 drl_prm10$ #Print Variable for Increment or Reset fmt 4 drl_prm6$ #GOTO statement Number to use fmt X 2 xsinsurf #Single Surface for X fmt Y 2 ysinsurf #Single Surface for Y fmt Z 2 zsinsurf #Single Surface for Z fmt Z 2 zcorn #Corner Probing for Z fmt X 2 xcorn #Corner Probing for X fmt Y 2 ycorn #Corner Probing for Y fmt I 2 icorn #Corner Probing for I fmt J 2 jcorn #Corner Probing for J fmt 2 xdcorn #Move amount for Corner Cycles fmt 2 ydcorn #Move amount for Corner Cycles fmt A 2 apcdang #Angle for 1st Hole on PCd P9819 Measure Cycle fmt H 2 pcdholtol #Tolerance for Holes in Bolt Hole Circle # -------------------------------------------------------------------------- # Probe Varabiles Defined to Use with Drill Cycles # -------------------------------------------------------------------------- prorefht = refht$ #Z Rapid Position for Rapid prnrefht = tosz$ #Z Clearence for Protect Cycle diadwell = dwell$ #P9814 Bore/Boss Measurement Dia call out radclear = retr$ #P9814 Bore/Boss R Postive or Negative for clearance on Boss use Postive on Bore Use Negtive feattol = shftdrl$ #P9811 Single Surface Measure Toleracne of Surface you are Measuring zbossdep = depth$ #P9814 Bore/Boss Section Default to Boss use 1 to Make it A Bore Measure Cycle zpcddep = depth$ #P9819 Bolt Circle Measurement Depth for Id Measurement zsinsurf = depth$ #P9811 Z Axis Single Surface Use zcorn = depth$ #P9815 Z Axis Corner Probing cyspan = dwell$ #Used for Across Distance jcorn = dwell$ #Used for Internal Corner icorn = retr$ #Used for Internal Corner offupdate = peckclr$ #Used to Update Workoffsets if no Vaule is Used Nothing is Posted Out trueposzone = peck2$ #Used for True Position Callout if no Vaule is Used Nothing is Posted Out toolupdate = peck1$ #Used for Tooloffset Update to a Known Feature if No Value is Used Nothing is Posted Out cangtoler = peck1$ #Used for C Axis Tolance in 4th Axis Measurements corn_angtoler = peck1$ #Used for Internal Corner Angle Tolance covertrav = peck2$ #Used for C Axis Overtravel Adjustment and setting in Cycle pcddia = peck1$ #Used for Bolt Hole Circle on PCD P9819 Cycle apcdang = drl_prm1$ #Used for Angle of 1st Hole on PCD P9819 Cycle xdcorn = drl_prm2$ #Used for Distance of Safe Position in X for Corner Cycles ydcorn = drl_prm3$ #Used for Distance of Safe Position in Y for Corner Cycles pdrlcst$ #Custom drill cycles 8 - 19 (user option) #Use this postblock to customize drilling cycles 8 - 19 if drillcyc$ = 8, #XYZ Single Surface Measure [ pdrlcommonb if drl_prm2$ <> 0 & drl_prm3$ = 0, #X Axis Single Surface Probing [ xsinsurf = (xout + drl_prm2$) pbld, n$, *strg659810, *xsinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659811, *xout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659810, *xsinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm9$ = 1, [ spaces$ = 0 "#135=#120(STORE 1ST Z PLANE HIT)", e$ ] if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[X*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143][24]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] if drl_prm3$ <> 0 & drl_prm2$ = 0, #Y Axis Single Surface Probing [ ysinsurf = (yout + drl_prm3$) pbld, n$, *strg659810, *ysinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659811, *yout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659810, *ysinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[Y*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]",e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]*]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] if drl_prm2$ = 0 & drl_prm3$ = 0, #Z Axis Single Surface Probing [ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659811, *zsinsurf, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$, if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[Z*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]*]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] pcom_movea ] if drillcyc$ = 9, #Web/Pocket Measure [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, prnrefht, e$ pbld, n$, *strg659812,[if drl_prm2$ > 0, *drl_prm2$],[if drl_prm3$, *drl_prm3$],[if dwell$ = zero, *zbossdep],[if dwell$ = 1,[if radclear, *radclear]], [if feattol, *feattol],[if offupdate, *offupdate],[if trueposzone, *trueposzone],[if toolupdate, *toolupdate],[if drl_prm10$, *drl_prm10$],e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS",*zbossdep,"]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] pcom_movea ] if drillcyc$ = 10, #Bore/Boss [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659814, *diadwell, [if shftdrl$ = zero, *zbossdep], [if radclear, *radclear], [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ #sdprint, "[","Z*POSITION*IS",*zbossdep,"]", e$ sdprint, "[","*DIA*#138[24]*ERROR*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] pbld, n$, *sg00, *zabs, e$ pcom_movea ] if drillcyc$ = 11, #Internal Corner Measure [ pdrlcommonb if icorn <> 0 & jcorn = 0, #Internal Corner Probing Using I [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659815, *xout, *yout, [if shftdrl$, *icorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[iNTERNAL*CORNER*PROBING*USING*I]", e$ sdprint, "[ANGLE*OF*X*SURFACE*IS*#139[24]*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] if icorn = 0 & jcorn <> 0, #Internal Corner Probing Using J [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659815, *xout, *yout, [if retr$, *jcorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[iNTERNAL*CORNER*PROBING*USING*J]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[ANGLE*OF*Y*SURFACE*IIS*#142[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] if icorn <> 0 & jcorn <> 0, #Internal Corner Probing Using I and J [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659815, *xout, *yout, [if dwell$, *icorn], [if retr$, *jcorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[iNTERNAL*CORNER*PROBING*USING*I*AND*J]", e$ sdprint, "[ANGLE*OF*X*SURFACE*=*#139]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[ANGLE*OF*Y*SURFACE*IS*#142[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] if icorn = 0 & jcorn = 0, #Internal Corner Probing 90 deg Corner [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *sg00, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659815, *xout, *yout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 "POPEN", e$ sdprint, "[", sopcomment, "]", e$ sdprint, "[iNTERNAL*CORNER*90*DEG*CORNER*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ "PCLOS", e$ spaces$ = 1 ] ] pcom_movea ] if drillcyc$ = 12, #External Corner Probing Routine [ pdrlcommonb if icorn <> 0 & jcorn = 0, #Internal Corner Probing Using I [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659816, *xout, *yout, [if shftdrl$, *icorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[EXTERNAL*CORNER*PROBING*USING*I]", e$ sdprint, "[ANGLE*OF*X*SURFACE*IS*#139[24]*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] if icorn = 0 & jcorn <> 0, #Internal Corner Probing Using J [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659816, *xout, *yout, [if retr$, *jcorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[EXTERNAL*CORNER*PROBING*USING*J]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[ANGLE*OF*Y*SURFACE*IS*#142[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] if icorn <> 0 & jcorn <> 0, #Internal Corner Probing Using I and J [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659816, *xout, *yout, [if dwell$, *icorn], [if retr$, *jcorn], [if corn_angtoler > 0, *corn_angtoler], [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[EXTERNAL*CORNER*PROBING*USING*I*AND*J]", e$ sdprint, "[ANGLE*OF*X*SURFACE*IS*#139[24]*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[ANGLE*OF*Y*SURFACE*IS*#142[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] if icorn = 0 & jcorn = 0, #Internal Corner Probing 90 deg Corner [ if drl_prm1$ = 1, [ xcorn = xout + xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 2, [ xcorn = xout - xdcorn ycorn = yout + ydcorn ] if drl_prm1$ = 3, [ xcorn = xout - xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 4, [ xcorn = xout + xdcorn ycorn = yout - ydcorn ] if drl_prm1$ = 0, result = mprint(scornerror), exitpost$ if drl_prm1$ > 4, result = mprint(scornerror), exitpost$ pbld, n$, *strg659810, *xcorn, *ycorn, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zcorn, e$ pbld, n$, *strg659816, *xout, *yout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[EXTERNAL*CORNER*90*DEG*CORNER*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*",*zcorn,"]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] pcom_movea ] if drillcyc$ = 13, #4th Axis X Measure [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ pcom_movea ] if drillcyc$ = 14, #4th Axis Y Measure [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, prnrefht, e$ pbld, n$, *strg659811, pfyout, pfzout, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ pcom_movea ] if drillcyc$ = 15, #Bore/Boss on PCD [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659819, *pcddia, *diadwell, [if shftdrl$ = zero, *zbossdep], [if shftdrl$ = one, *zpcddep], [if radclear, *radclear], [if trueposzone > 0, *trueposzone], [ if apcdang, *apcdang], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ #sdprint, "[","Z*POSITION*IS",*zbossdep,"]", e$ sdprint, "[","*DIA*#138[24]*ERROR*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] pcom_movea ] if drillcyc$ = 16, #Bore/Boss [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659814, *diedwell, pxout, pyout, pzout, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ pcom_movea ] if drillcyc$ = 17, #C Axis Measure [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, prnrefht, e$ pbld, n$, *strg659618, cyspan, pfxout, pfzout, [if offupdate > 0,*offupdate], [if cangtoler > 0, *cangtoler], [if drl_prm2$ > 0, *drl_prm2$], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ *sg00 ,*sg91, sg28, "Z0", e$ *sg00, *sg90, [if workofs$ > 53, *g_wcs], [if workofs$ < 49 , "G54.1", *p_wcs],"C20.",e$ spaces$ = 0 sif,sbracketopen,spound,sm152,sgt,drl_prm1$,sbracketclose,sgoto,"1000", e$ spaces$ = 1 pcom_movea ] if drillcyc$ = 18, #Bore/Boss on PCD [ pdrlcommonb pbld, n$, *strg659810, prnrefht, e$ pbld, n$, *strg659819, diedwell, pfyout, pfzout, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 19, [ pdrlcommonb pbld, n$, *strg659810, prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] pdrlcst_2$ #Custom drill cycles 8 - 19 (user option) #Use this postblock to customize drilling cycles 8 - 19 if drillcyc$ = 8, [ pdrlcommonb if drl_prm2$ <> 0 & drl_prm3$ = 0, #X Axis Single Surface Probing [ xsinsurf = (xout + drl_prm2$) pbld, n$, *strg659810, *xsinsurf, *yout, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659811, *xout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659810, *xsinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm9$ = 1, [ spaces$ = 0 "#135=#12X(STORE 1ST Z PLANE HIT)", e$ ] if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[X*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]*]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] if drl_prm3$ <> 0 & drl_prm2$ = 0, #Y Axis Single Surface Probing [ ysinsurf = (yout + drl_prm3$) pbld, n$, *strg659810, *ysinsurf, *xout, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659811, *yout, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *zsinsurf, e$ pbld, n$, *strg659810, *ysinsurf, e$ pbld, n$, *strg659810, *prorefht, e$ if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[Y*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]*]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] if drl_prm2$ = 0 & drl_prm3$ = 0, #Z Axis Single Surface Probing [ pbld, n$, *strg659810, *xout, *yout, e$ pbld, n$, *strg659810, *prorefht, e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659811, *zsinsurf, [if offupdate > 0,*offupdate], [if feattol, *feattol], [if trueposzone > 0, *trueposzone], [if toolupdate > 0, *toolupdate], [if drl_prm10$ > 0, *drl_prm10$], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$, if drl_prm10$, [ spaces$ = 0 sdprint, "[", sopcomment, "]", e$ sdprint, "[Z*AXIS*SINGLE*SURFACE*PROBING*]", e$ sdprint, "[","*X*#135[24]*ERROR*#140[24]*]", e$ sdprint, "[","*Y*#136[24]*ERROR*#141[24]*]", e$ sdprint, "[","Z*POSITION*IS*#137[24]*Z*ERROR*IS*#142[24]*]", e$ sdprint, "[","SIZE*OF*FEATURE*IS*#138[24]*ERROR*IS*#143[24]*]", e$ sdprint, "[","*TRUE*POSITION*ERROR*#145[24]*]", e$ sdprint, "[","-------------------------------------------","]", e$ spaces$ = 1 ] ] pcom_movea ] if drillcyc$ = 9, [ pdrlcommonb result = mprint(sperror), exitpost$ pcom_movea ] if drillcyc$ = 10, [ pdrlcommonb result = mprint(sperror), exitpost$ pcom_movea ] if drillcyc$ = 11, [ pdrlcommonb result = mprint(sperror), exitpost$ pcom_movea ] if drillcyc$ = 12, [ pdrlcommonb pcom_movea ] if drillcyc$ = 13, [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 14, [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, *strg659811, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 15, #Web/Pocket Measure [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, *strg659812, diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 16, #Bore/Boss [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ #pbld, n$, *strg659814, diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 17, [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 18, [ pdrlcommonb pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pcom_movea ] if drillcyc$ = 19, [ pdrlcommonb pbld, n$, *strg659810, *prorefht, e$ pbld, n$, `strg659810, `prnrefht, e$ pbld, n$, "G65P9818", diedwell, pfyout, pfzout, [if trueposzone > 0, *trueposzone], e$ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659810, *prorefht, e$ pcom_movea ] HTH

Chris that was what I was thinking. On your form you could add lines to the cells to make it clearer to see. Also you can create a view area so the rows below will not show. It will make it cleaning looking though I really like that fill out form very professional looking.

quote: It seems that whenever Paul chimes in I learn something new. Me too why I wish the guys from CNC would chime in more.

quote: X MR2 I would go back to V9 before I would that Version. That had to be one of the biggest problem filled releases there was on the X versions IMHO.

Another cool way to do it.

I still think somewhere you are going to have to store there values from the zabs and xabs and then call them up. Drilling cycles do weird things with X, Y, and Z when you start changing the way they are called. I tried this and it worked perfectly so not sure why, but here is what I got when I changed my post to like this. code: # -------------------------------------------------------------------------- # Probe Shared Index deg Format Statements # -------------------------------------------------------------------------- fmt H 2 feattoler #Tolerance of Feature being Measured fmt M 2 trueposzone #True Position Tolerenance Zone fmt B 2 cangtoler #C axis Tolerance for C-Axis Align Cycle fmt Q 2 covertrav #C Axis Overtravel for Probe Amount fmt 2 drl_prm1$ #Tolerance Vaule for Repeat Loop in Post fmt W 4 drl_prm2$ #Print Variable for Increment or Reset fmt 4 drl_prm6$ #GOTO statement Number to use fmt A 2 nueraaxis #A axis output for Probing Cycle #<---- Added 6-23-10 fmt B 2 nuerbaxis #B axis output for probing Cycle #<---- Added 6-23-10 # -------------------------------------------------------------------------- # Probe Shared Index deg Varabiles # -------------------------------------------------------------------------- offupdate = peckclr$ trueposzone = peck2$ cangtoler = peck1$ covertrav = peck2$ feattoler = peck1$ nueraaxis = zabs #<---- Added 6-23-10 nuerbaxis = yabs #<---- Added 6-23-10 pdrlcst$ #Custom drill cycles 8 - 19 (user option) #Use this postblock to customize drilling cycles 8 - 19 if drillcyc$ = 8, #XYZ Single Surface Measure B0/B90/B180 [ pdrlcommonb if babs = 180, [ pbld, n$, *strg659610, prorefht, e$ pbld, n$, *strg659611, *nuerbaxis, *nueraaxis, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if feattoler > 0, *feattoler], e$ pbld, n$, *strg659610, *prorefht, e$ ] if babs = 90, [ pbld, n$, *strg659610, prorefht, e$ pbld, n$, *strg659611, *nuerbaxis, *nueraaxis, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if feattoler > 0, *feattoler], e$ pbld, n$, *strg659610, *prorefht, e$ ] if babs = 0, [ pbld, n$, *strg659810, prnrefht, e$ pbld, n$, *strg659811, *nuerbaxis, *nueraaxis, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if feattoler > 0, *feattoler], e$ pbld, n$, *strg659810, *prnrefht, e$ ] pcom_movea ] Here is the posted code: code: (TIME - 11:47 AM) (PROGRAM REV - N/C) (POST LICENSE - V&M PRECISION) (T31 | 1/16 DRILL | EIA SUFFIX - .00 | MAZATROL SUFFIX - .00) (TOOL DIAMETER PROGRAMMED - .0625 | TOOL RADIUS PROGRAMMED - 0.) (--------------------------------------------------------------------------) G20 G49 G69 G80 G40 G17 G90 G94 M205 N1 (T31 | 1/16 DRILL | EIA SUFFIX - .00 | MAZATROL SUFFIX - .00) (CUST 9.....) (TOOL DIAMETER PROGRAMMED - .0625 | TOOL RADIUS PROGRAMMED - 0.) (WCS NAME - TOP) (CPLANE NAME - CORRECT BACK) (TOOLPATH GROUP - E1066100) G20 G10.9 X0 G91 G30 P3 X0. G30 P3 Z0. T31.00 T31 M6 G91 G30 P3 X0. Z0. G90 M200 M212 G94 G0 G54.1 P1 C0. M108 G0 B90. M107 G97 S6000 M03 G68 X0. Y0. Z0. I0. J1. K0. R90. G0 H31 X4.07 Z2. Y-1.05 G65P9610 X1.1 G65P9611 B-1.05 A-1.6973 M.015 H.1 G65P9610 X1.1 G69 G91 G30 P3 X0. G30 P3 Z0. M05 G90 M01 G30 P3 Y0. M30 Like i said I am a hack, but it gets the job done in a simple way I can understand. This example if for our Integrex you will have to change for your machine. HTH

I like Paul's way better. I forget it doesn't like when you do it that way. That is why should always leave the post work to the professional people. Hacks like myself will always get you in trouble.

This is really easy. Above the probing cycle make the pfxout and pfyout equal to a variable you define. That variable will then be the one you define in the define section of what I set-up for your probing to be portable to other posts down the road. Here is where I would add this: code: # # -------------------------------------------------------------------------- # Probe Shared Index deg Format Statements # -------------------------------------------------------------------------- fmt H 2 feattoler #Tolerance of Feature being Measured fmt M 2 trueposzone #True Position Tolerenance Zone fmt B 2 cangtoler #C axis Tolerance for C-Axis Align Cycle fmt Q 2 covertrav #C Axis Overtravel for Probe Amount fmt 2 drl_prm1$ #Tolerance Vaule for Repeat Loop in Post fmt W 4 drl_prm2$ #Print Variable for Increment or Reset fmt 4 drl_prm6$ #GOTO statement Number to use fmt A 2 nueraaxis #A axis output for Probing Cycle #<---- Added 6-23-10 fmt B 2 nuerbaxis #B axis output for probing Cycle #<---- Added 6-23-10 Then just do this above the probing cycle you are using: code: if drillcyc$ = 10, #Bore/Boss B0/B90/B180 [ pdrlcommonb pfxout = nueraaxis #<---- Added 6-23-10 pfyout = nuerbaxis #<---- Added 6-23-10 if babs = 180, [ pbld, n$, *strg659810, *prnrefht, e$ pbld, n$, *strg659814, diedwell, nuerbaxis, nuerbaxis, [if offupdate > 0,*offupdate], [if trueposzone > 0, *trueposzone], [if feattoler > 0, *feattoler], e$ pbld, n$, *strg659810, *prnrefht, e$ ] pcom_movea ] That should do what you are after. HTH

Thanks Robert. I am lucky I have a job and can pay my bills expect for the house. I think of those who lost their jobs and are going through the same thing. I am blessed to do what I do and have what I do have. Thanks and hope all is going well for you as well.

What I have is 2 icons for each screen. Then depending on which screen I want Mastercam to open up on it will open on that screen. I forgot why I had done that.

Okay 3 basic questions here. Encase some of you are not away of this. Geometry groups are created when you merge anything into Mastercam. I may merge 30 to 70 items on some of my files. I have not used Geometry Groups since going to X. At my other jobs I do not even talk about or teach them to people. Problem some people have with Machine groups being erased or changed is somehow related to this problem. So please take the time and answers these 3 questions and I will submit the results to CNC software in the hopes that after 4 years something can finally be done about it. Thanks in advance for any comments you have and doing the poll. I will put everything together that is collected after 2 weeks and send it off in an email and a letter to CNC software.

quote: Ya, Joe. I don't even know if it was fixed for X4 or not, cause I just delete them also as SOP. I haven't had the problem since I started deleting the groups. Yeah if it such a problem they why not give us a switch to just not allow that to happen. I have not used groups in X yet. I am not even sure why a legacy method and concept is even in the software any more. With Levels and mask and other things Groups if it creates this problem should either be done away with or users given a switch to turn that ability off to keep this from happening. Think anyone will listen and take care of probably not, but here is hoping it gets addressed, because if we were keeping tabs I would say CNC owes it users several thousands of dollars with just that bug.

Because it does not work the way it is suppose to and we are stuck figuring out ways to make it work. Sorry but things Mastercam does good it does good, but things it does terribly it does them well also.

We had a roller type one on the bigger machines at a place I worked at years ago. It had a roll of the felt that passed under the coolant drop out. The whole roll was then thrown out after it was done. You could set a speed at which ti ran to keep waste down. If you had over night runs then you could run 1 foot an 15 minute or up to 1 foot an hour. Now no problem with chips getting into the chip bin. HTH