diff --git a/Essetre-FAST.mlde b/Essetre-FAST.mlde index 9184bf5..7d37efa 100644 --- a/Essetre-FAST.mlde +++ b/Essetre-FAST.mlde @@ -30,11 +30,12 @@ -- 2023/11/04 DS ver 2.5k1 Eliminata testa H4. Aggiunta visualizzazione rinvio su TC.Aggiunta gestione MIN_MACH_VER per simulazione e generazione. -- 2023/12/13 AV ver.2.5l1 Piccola correzione per errore digitazione variabile in calcolo riposizionamento carrelli (SpecAdjustCarrB3) -- Corretto segno di una variabile in calcolo posizionamento carrelli +-- 2023/12/15 AV ver.2.5l2 Migliorato calcolo stima tempi di lavorazione require( 'EmtGenerator') EgtEnableDebug( false) -PP_VER = '2.5l1' +PP_VER = '2.5l2' MIN_MACH_VER = '2.5k1' -- Parametri macchina diff --git a/Essetre-FAST.mlpe b/Essetre-FAST.mlpe index 55a37aa..3c50a6c 100644 --- a/Essetre-FAST.mlpe +++ b/Essetre-FAST.mlpe @@ -1233,6 +1233,7 @@ end function OnEstimPathStart() EMT.AUXTYPE = nil EMT.MCHMOVEFIRST = true + EMT.CHARMOVE = nil end --------------------------------------------------------------------- @@ -1260,7 +1261,11 @@ function OnEstimPathStartAux() end -- altrimenti, spostamento carrelli else - if EMT.AUXTOT > 2 and EMT.AUXIND == EMT.AUXTOT then + local Cmd = EgtSplitString( EMT.AUX) + if ( Cmd[1] == '1' and Cmd[2] ~= 'Z') or Cmd[1] == '2' or Cmd[1] == '3' then + EMT.CHARMOVE = true + end + if EMT.AUXIND == EMT.AUXTOT and EMT.CHARMOVE then local dTime = ( EMT.AUXTOT - 2) * CHAR_ONE_MOVE_T EMT.TOTEXTTIME = EMT.TOTEXTTIME + dTime EmtTleAddMachining( 'Charriots move', EmtSecToHMS( dTime), ' - ', ' - ')