diff --git a/Common_ONE-PF.NUM.mlpe b/Common_ONE-PF.NUM.mlpe index 92ed4b8..4c1e50d 100644 --- a/Common_ONE-PF.NUM.mlpe +++ b/Common_ONE-PF.NUM.mlpe @@ -862,6 +862,33 @@ function OnRapid() if EMT.MDCHAR[i].MovType ~= 1 then bOnlyCharY = false end end EMT.MDCHAR = {} + + local bParkV = false + + -- verifica se serve aprire i carrelli + local bCondBase = EMT.MCHFIRST or EMT.MOVE == 0 + local bCondPosition = EMT.V1POS < EMT.V1NEXTPOS - 1 or + EMT.V2POS > EMT.V2NEXTPOS + 1 or + RollerParkingNeeded( EMT.HEAD, EMT.R1, EMT.R2, EMT.R1, EMT.R2) + + if bCondBase and bCondPosition then + bParkV = true + end + + local bNlhParkV = ( EMT.MOVE == 0 and ( EMT.FLAG2 == 1 or EMT.FLAG2 == 2)) + if bNlhParkV then + bParkV = ( EMT.FLAG == 2 and bParkV) or ( not EMT.MCHSPLIT or bSplit) + end + + if bParkV or bNlhParkV then + local bMchSplit = ( bNlhParkV and EMT.MCHSPLIT and bSplit) + local bAgg = EgtExistsInfo( EMT.PATHID, 'CNT') + if EMT.SPLIT_Y1DELTA and not EMT.MCHSPLIT then EMT.Y1DELTA = EMT.SPLIT_Y1DELTA end + local dPosT = EMT.TPOS or EMT.L1op + EmitParkRoller( dPosT, bMchSplit, bAgg) + end + if EMT.SPLIT_Y1DELTA then EMT.Y1DELTA = EMT.SPLIT_Y1DELTA end + EmitMoveStartChars( EgtIf( bOnlyCharY, 1, 3)) EmtOutput( '( *** '..EMT.MCHNAME..'/'..EMT.TOOL..' *** )') diff --git a/Essetre-PF.mlde b/Essetre-PF.mlde index 002abf2..b0b1635 100644 --- a/Essetre-PF.mlde +++ b/Essetre-PF.mlde @@ -32,7 +32,7 @@ require( 'EmtGenerator') EgtEnableDebug( false) -PP_VER = '3.1f1_RC9' +PP_VER = '3.1f1_RC10' PP_NVER = '3.1.6.1' MIN_MACH_VER = '2.7a1' MACH_NAME = EgtGetCurrMachineName()