diff --git a/Common-PF1250.TPA.mlpe b/Common-PF1250.TPA.mlpe index aff4917..1fe585b 100644 --- a/Common-PF1250.TPA.mlpe +++ b/Common-PF1250.TPA.mlpe @@ -826,6 +826,9 @@ function OnRapid() EmitMoveDataHead( 2, { X=ParkX2, S=Speed}) end end + if ( not EMT.L2pp or ( EMT.L2pp and EMT.L2pp > ParkMchY2)) and ( ParkB2 ~= EMT.R2 or ParkC2 ~= EMT.R1) then + EmitMoveDataHead( 2, { X=ParkMchY2, Z=ParkZ2, B=ParkB2, C=ParkC2, S=Speed}) + end EmitMoveStartHead( 2) EmitMoveWaitHead( 2) EmitMoveWaitChars( EgtIf( bOnlyCharY, 1, 3)) @@ -1099,23 +1102,30 @@ function OnRapid() EMT.TCPOSREAL = 'T' .. AdjustTcPos( false, EMT.TCPOS, EMT.R3) -- se utensile cambiato (controllo il reale perchè per aggregato dipende come è stato caricato) if EMT.PREVTCPOSREAL_H2 ~= EMT.TCPOSREAL then - -- se bisogna scrivere tutti gli assi - if WriteAllCoordsOnFirstM101 then - if EMT.HEAD == 'H22' then - EmitMoveDataHead( 2, { X=ParkSawX2, Z=-dSafeZ2, B=0, C=CurrC2, S=Speed}) - else - EmitMoveDataHead( 2, { X=SafeX2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) + if EMT.ZMAX then + -- se bisogna scrivere tutti gli assi + if WriteAllCoordsOnFirstM101 then + if EMT.HEAD == 'H22' then + EmitMoveDataHead( 2, { X=ParkSawX2, Z=-dSafeZ2, B=0, C=CurrC2, S=Speed}) + else + EmitMoveDataHead( 2, { X=SafeX2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) + end + end + -- scrivo solo se gli assi rotanti sono cambiati + EmitMoveDataHead( 2, { Z=-dSafeZ2, S=Speed}) + if EMT.HEAD ~= 'H22' and EMT.L2pp > ParkMchY2 and ( CurrB2 ~= EMT.R2 or CurrC2 ~= EMT.R1) then + EmitMoveDataHead( 2, { X=ParkMchY2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) + end + else + -- scrivo solo se gli assi rotanti sono cambiati + if EMT.ZMAX and EMT.L2pp > ParkMchY2 and ( CurrB2 ~= EMT.R2 or CurrC2 ~= EMT.R1) then + EmitMoveDataHead( 2, { X=ParkMchY2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) end - end - -- scrivo solo se gli assi rotanti sono cambiati - EmitMoveDataHead( 2, { Z=-dSafeZ2, S=Speed}) - if EMT.HEAD ~= 'H22' and EMT.L2pp > ParkMchY2 and ( CurrB2 ~= EMT.R2 or CurrC2 ~= EMT.R1) then - EmitMoveDataHead( 2, { X=ParkMchY2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) end -- se stesso utensile vado già alla X di lavoro else -- scrivo solo se gli assi rotanti sono cambiati - if EMT.L2pp > ParkMchY2 and ( CurrB2 ~= EMT.R2 or CurrC2 ~= EMT.R1) then + if EMT.ZMAX and EMT.L2pp > ParkMchY2 and ( CurrB2 ~= EMT.R2 or CurrC2 ~= EMT.R1) then EmitMoveDataHead( 2, { X=ParkMchY2, Z=-dSafeZ2, B=CurrB2, C=CurrC2, S=Speed}) end end diff --git a/Common-PF1250.mlpe b/Common-PF1250.mlpe index e8126b8..4cd895c 100644 --- a/Common-PF1250.mlpe +++ b/Common-PF1250.mlpe @@ -980,13 +980,13 @@ function OnSimulMoveStart() end else -- Porto la X alla giusta quota - if X2Pos > ParkMchY2 and ( B2Pos ~= EMT.R2 or C2Pos ~= EMT.R1) then + if EMT.ZMAX and X2Pos > ParkMchY2 and ( B2Pos ~= EMT.R2 or C2Pos ~= EMT.R1) then SimulMoveAxis( 'X2', ParkMchY2, MCH_SIM_STEP.RAPID) end end else -- Porto la X alla giusta quota - if X2Pos > ParkMchY2 and ( B2Pos ~= EMT.R2 or C2Pos ~= EMT.R1) then + if EMT.ZMAX and X2Pos > ParkMchY2 and ( B2Pos ~= EMT.R2 or C2Pos ~= EMT.R1) then SimulMoveAxis( 'X2', ParkMchY2, MCH_SIM_STEP.RAPID) end end diff --git a/UpdateLog.txt b/UpdateLog.txt index 2893b45..13e5eaa 100644 --- a/UpdateLog.txt +++ b/UpdateLog.txt @@ -1,8 +1,9 @@ ==== Common_PF1250 Update Log ==== -Versione 2.6-- (--/--/2024) +Versione 2.6e5 (23/05/2024) - (GEN) Controllo extra-corsa per testa 2 in caso di lavorazioni in doppio in Y - (GEN) Corretta lettura e salvataggio coordinala asse L2 con coordinate rispetto origine. Prima erano locali e sbagliava alcuni calcoli +- (SIM-GEN) Se lavorazione con testa 2 e stesso utensile, piccola correzione che manda a parcheggio se cambiano assi rotanti solo se si trova a ZMAX Versione 2.6e4 (15/05/2024) - (SIM-GEN) Miglioramento gestione lama su aggregato da sotto diff --git a/Version.lua b/Version.lua index 5c803ea..4d1ec15 100644 --- a/Version.lua +++ b/Version.lua @@ -3,7 +3,7 @@ local InfoCommon_STD_PP = { NAME = 'Common_PF1250', -- nome script PP standard - VERSION = '2.6e5t', -- versione script + VERSION = '2.6e5', -- versione script MIN_MACH_VER_PP_COMMON = '2.5k1' -- versione minima kernel }