diff --git a/Essetre-PF.NUM.mlpe b/Essetre-PF.NUM.mlpe index 44b56ee..0aab862 100644 --- a/Essetre-PF.NUM.mlpe +++ b/Essetre-PF.NUM.mlpe @@ -2535,7 +2535,7 @@ function EmitTestProgramStart() EmtOutput( 'M151 E30013=1') EmtOutput( 'M145') EmtOutput( 'M171') - if SmallVise then + if Clamp5 then EmtOutput( 'M153') EmtOutput( 'M155') end @@ -2543,7 +2543,7 @@ function EmitTestProgramStart() EmitMoveDataChars( { Y1=1400, Y2=-1400, V1=MaxV1, V2=MinV2, IniStatY1=2, IniStatY2=2, IniStatV1=3, IniStatV2=3}) EmitMoveStartChars( 3) EmitMoveWaitChars( 3) - if SmallVise then + if Clamp5 then EmtOutput( 'E75005=-1') EmtOutput( 'E75005=12') EmtOutput( 'G1G52WE75002 F5000') diff --git a/Essetre-PF.mlse b/Essetre-PF.mlse index 0f7affd..f30d5e0 100644 --- a/Essetre-PF.mlse +++ b/Essetre-PF.mlse @@ -1,4 +1,4 @@ --- Special Operations macchina Essetre-PF by EgalTech s.r.l. 2023/06/09 +-- Special Operations macchina Essetre-PF by EgalTech s.r.l. 2023/06/13 -- Intestazioni require( 'EmtGenerator') @@ -839,6 +839,11 @@ function SpecApplyPath( bPreSplit, bSplitting, bPreCut, bCutting, bUnload, bPreR dDistBack = min( dDistBack, dDistB) end + -- Eventuale aggiuntivo al carico su distanza Back (finchè non c'è un riposizionamento carrelli) + if EMC.CNT == 1 or not EMC.TPOS then + dDistBack = dDistBack - AggLoad + end + -- Verifico lunghezza pezzo if not SPLIT and not VerifyPartLength() then return diff --git a/Essetre-PFrl.mlde b/Essetre-PFrl.mlde index 6281d77..a3c847c 100644 --- a/Essetre-PFrl.mlde +++ b/Essetre-PFrl.mlde @@ -1,4 +1,4 @@ --- Descrizione macchina Essetre-PF by EgalTech s.r.l. 2023/06/08 +-- Descrizione macchina Essetre-PF by EgalTech s.r.l. 2023/06/13 -- 2021/10/01 ver 2.3j1 Prima versione. -- 2021/10/26 ver 2.3j2 Versione provvisoria per pezzo alto. -- 2021/10/26 ver 2.3j3 Aggiunto arresto preciso negli angoli (G9) in fresature con utensili di piccolo diametro. @@ -41,12 +41,13 @@ -- 2023/04/21 ver 2.5d4 Migliorato riposizionamento testa trave dopo scambio carrelli (ExtraParkV a 100). -- 2023/06/08 ver 2.5f1 Riportate correzioni da PF (riposizionamento carrelli su split con pezzi a caduta, in genera CN controllo conservazione piano impostato). -- In genera CN corretta risalita in Z come in simulazione (ticket #1294). +-- 2023/06/13 ver 2.5f2 Corretta distanza Back per aggiuntivo al carico prima di scambi carrelli. -- Intestazioni require( 'EmtGenerator') EgtEnableDebug( false) -PP_VER = '2.5f1' +PP_VER = '2.5f2' -- Parametri macchina NumericalControl = 'NUM_FLEX' -- NUM o (TPA) o NUM_FLEX