diff --git a/Common_ONE-PF.mlse b/Common_ONE-PF.mlse index a785a63..7b93c39 100644 --- a/Common_ONE-PF.mlse +++ b/Common_ONE-PF.mlse @@ -320,6 +320,8 @@ function OnSpecialLink() else EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2, EMC.L3, EMC.R1, EMC.R2, EMC.R3}, 30, 3, 2, 'UniqueRise=1;') end + -- altrimenti collegamento tra due lavorazioni (3) + else end -- se fresa su testa 2 @@ -422,19 +424,6 @@ function OnSpecialLink() end EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2, EMC.L3, EMC.R1, EMC.R2}, 30, 3, 2, 'LastRise=1;') - -- se fine lavorazione con deposito utensile - elseif EMC.LINKTYPE == 2 then - -- retrazione - EmtRemoveRise( EMC.PREVMCHID, EMC.PREVMAIN) - if abs( EMC.R1 - EMC.R1p) > 1 or abs( EMC.R2 - EMC.R2p) > 1 then - EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2p, EMC.L3, EMC.R1p, 0}, 30, 3, 2, EgtIf( bSplit, 'Split=1;', '')..'FirstRise=1;') - EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2p, EMC.L3, EMC.R1, 0}, 30, 3, 2) - EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2p, EMC.L3, EMC.R1, EMC.R2}, 30, 3, 2) - else - EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2p, EMC.L3, EMC.R1p, EMC.R2p}, 30, 3, 2, EgtIf( bSplit, 'Split=1;', '')) - end - EmtAddRise( EMC.PREVMCHID, EMC.PREVMAIN, { EMC.L1p, EMC.L2, EMC.L3, EMC.R1, EMC.R2}, 30, 3, 2, 'LastRise=1;') - -- altrimenti collegamento tra due lavorazioni (3) else -- recupero quota massima di collegamento