TclCommands for Excellon

[Brian]

Hi,

I am trying to make a script for every board, my drills/mills are from 0.5mm to 6mm going up by 0.5mm

the below works fine, but its messy with lots of errors if a board doesn't have every size hole.

‌

clear
new 
set DRILL_HOLE 0.5
set DRILL_HOLE_MAX 4.0
set DRILL_HOLE_STP 0.5
open_excellon C:/Temp/TestBoard_v2/TestBoard_v2.txt -outname Top_Drills
while {$DRILL_HOLE <= $DRILL_HOLE_MAX} {
    drillcncjob Top_Drills -drilled_dias ${DRILL_HOLE} -drillz -2.0 -travelz 5.0 -feedrate 15.0 -spindlespeed 255 -endz 20.0 -pp grbl_11 -diatol 5.0 -outname Top_Drills_${DRILL_HOLE}
    write_gcode Top_Drills_${DRILL_HOLE} "C:/Temp/TestBoard_v2/Drill Hole - ${DRILL_HOLE}mm - TestBoard_v2.nc"
    set DRILL_HOLE [expr {$DRILL_HOLE + $DRILL_HOLE_STP}]
}

can anyone suggest a better way?

‌

[Marius Stanciu]

Hi,

I’ve added a -muted parameter for the TclCommands: cncjob, drillcncjob and write_gcode. Setting it as -muted 1 will disable the error reporting to the Tcl Shell.

[Brian]

Perfect Thanks

‌

[Brian]

using the code in my first post, works as expected just with a lot of errors in the TCL Shell window and only generates a cnc job for the hole sizes that exists

using the same code with -muted 1 on the end of the end of drillcncjob it generates

• Top_Drills_0.5
• Top_Drills_1.0
• Top_Drills_1.5
• Top_Drills_2.0
• …

generates a cnc job for ALL hole sizes, if the size exists or not.

‌

[Marius Stanciu]

• fixed issue #313 where TclCommand drillcncjob is spitting errors in Tcl Shell which should be ignored

→ <<cset fe97364ba53f>>