3dPrinting :

- nuova versione compatibile con Icarus.

LuaLibs/RunGcodeGenerate.lua

@@ -25,7 +25,7 @@ function RunGcodeGenerate.Exec()
    
    -- Recupero il pezzo (per ora primo e unico)
    local nPartIndex = 1
-   local nPartId = EgtGetFirstNameInGroup( GDB_ID.ROOT, PART .. nPartIndex)
+   local nPartId = EgtGetFirstNameInGroup( GDB_ID.ROOT, PART .. nPartIndex) or EgtGetFirstNameInGroup( GDB_ID.ROOT, PART)
    if not nPartId then
       EgtOutBox( 'Error missing part', 'GcodeGenerate')
       return 
@@ -109,13 +109,24 @@ function RunGcodeGenerate.Exec()
    -- Genero il programma CN
    local sInfo = 'EgtCAM5 ver.' .. EgtGetExeVersion() .. ' - ' .. sPath
    local bGenOk = EgtGenerate( '', sInfo)
+   if bGenOk then
+      EgtEstimate('')
+   end
 
    EgtResetCurrMachGroup()
 
-   if bGenOk then
-      EgtOutBox( 'Generation successful.', 'GcodeGeneration', 'INFO')
+   if PRINT and PRINT.PROGRAM == 1 then
+      if bGenOk then
+         PRINT.ERR = 0
+      else
+         PRINT.ERR = 999
+      end
    else
-      EgtOutBox( 'Generation failed.', 'GcodeGeneration', 'ERROR')
+      if bGenOk then
+         EgtOutBox( 'Generation successful.', 'GcodeGeneration', 'INFO')
+      else
+         EgtOutBox( 'Generation failed.', 'GcodeGeneration', 'ERROR')
+      end
    end
 end