Macro help need

hrh46 — Mon, 20 Nov 2023 17:51:09 GMT

I need comparing start points of toolpath segments (centrr drill holes) to delete duplicate segments. Is there anyone who know how can I get start point parameters(x,y,z)?

Re: Macro help need

ondrej.mikulec — Mon, 20 Nov 2023 22:29:09 GMT

Hi,

try this macro.

ENTITY $ent = $entity('Toolpath','') IF $ent.Strategy == "drill" { OBJECT LIST $startPoints = {} INT $segmentsCount = $toolpath_component_count($ent, 'segments') WHILE $segmentsCount > 0 { $segmentsCount = $segmentsCount - 1 REAL $sgmPointCount = $segment_point_count( $ent, $segmentsCount) IF $sgmPointCount > 1 { OBJECT $pntStart = segment_get_point( $ent, $segmentsCount, 0) BOOL $matchStart = 0 FOREACH $obj IN $startPoints { IF $round($obj.Position.X,3) == $round($pntStart.Position.X,3) AND $round($obj.Position.Y,3) == $round($pntStart.Position.Y,3) AND $round($obj.Position.Z,3) == $round($pntStart.Position.Z,3) { $matchStart = 1 BREAK } } IF $matchStart { EDIT TPSELECT ; TPLIST UPDATE\r $segmentsCount NEW DELETE TOOLPATH ; SELECTED } ELSE { INT $i = $add_last($startPoints, $pntStart) } } } }

Re: Macro help need

hrh46 — Tue, 21 Nov 2023 16:52:33 GMT

Very Good! Just What I expected. many thanks .

topic Re: Macro help need in PowerMill Forum

Macro help need

Re: Macro help need

Re: Macro help need