correzione ulteriore

2022-07-04 15:47:02 +02:00
parent 0054646e78
commit 007453337a
2 changed files with 6 additions and 2 deletions
@@ -413,7 +413,11 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
   local dToolAddLength = dLen - dMaxElev
   if dDepth - dToolAddLength > dMaxDepth + 10 * GEO.EPS_SMALL then
      sMyWarn = 'Warning in drill : depth (' .. EgtNumToString( dDepth - dToolAddLength, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth, 1) .. ')'
-      dDepth = dLen
+      if dMaxDepth == 0 then
+         dDepth = 0
+      else
+         dDepth = dLen
+      end
      EgtOutLog( sMyWarn)
   end
   EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)