Essetre-FAST 2.5b1 :

- primo rilascio.
2023-03-03 10:07:19 +01:00
commit e954d6353f
28 changed files with 11522 additions and 0 deletions
@@ -0,0 +1,36 @@
+-- 2018/11/21  17:30:00
+-- Machining Exit for Essetre-FAST machine
+
+-- Intestazioni
+require( 'EgtBase')
+_ENV = EgtProtectGlobal()
+EgtEnableDebug( false)
+
+--------------------------------------------------------------------------------
+-- *** Uscita da Lavorazioni ***
+
+-- Nascondo il pezzo così marcato e le geometrie aggiunte, visualizzo il Box
+local function ProcessPart( PartId)
+   -- visualizzo il Box
+   EgtSetStatus( EgtGetFirstNameInGroup( PartId, 'Box') or GDB_ID.NULL, GDB_ST.ON)
+end
+
+-- Disabilito segnalazione modifica progetto
+local bEnMod = EgtGetEnableModified() 
+EgtDisableModified()
+
+-- Processo i pezzi nella radice (già chiusi tutti i gruppi di lavoro)
+local PartId = EgtGetFirstPart()
+while PartId do
+   ProcessPart( PartId)
+   PartId = EgtGetNextPart( PartId)
+end
+
+EgtZoom( SCE_ZM.ALL, false)
+
+-- Ripristino segnalazione modifica progetto
+if bEnMod then
+   EgtEnableModified()
+end
+
+MACH.ERR = 0