DataBeam :
- taglio a cubetti speciale per testa da sotto - taglio con lama sul fianco per macchina con testa da sotto.
This commit is contained in:
@@ -1,6 +1,7 @@
|
||||
-- ProcessLongCut.lua by Egaltech s.r.l. 2021/02/04
|
||||
-- ProcessLongCut.lua by Egaltech s.r.l. 2021/05/18
|
||||
-- Gestione calcolo taglio longitudinale per Travi
|
||||
-- 2021/02/03 Corretto FaceUse con fresa orizzontale su taglio orizzontale.
|
||||
-- 2021/05/18 Possibile taglio con lama anche di fianco su macchina con testa da sotto.
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
local ProcessLongCut = {}
|
||||
@@ -183,7 +184,6 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId, bCustUseBlade)
|
||||
----------------------------------------------------------------------------------------------------------------------------------------
|
||||
-- 2020/09/15 Fabio Squaratti: se sono attivi entrambe i Q05 (lavorare con lama) e Q07 (lavorare con fresa di fianco anche da sopra)
|
||||
-- allora vince il Q7, cioè si utilizza la fresa di fianco ( per i tagli da sopra)
|
||||
|
||||
-- 2020/09/17 Fabio Squaratti: se lavorazione con fresa di fianco e se ci sono delle facce laterali, l'utensile deve arrivare
|
||||
-- fino al punto più vicino della faccia laterale (prima l'arretramento era sempre del rggio utensile).
|
||||
-- Questo viene fatto se Q07=1 o fresa da sotto
|
||||
@@ -194,7 +194,7 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId, bCustUseBlade)
|
||||
if nUseMillOnSide > 0 then bUseBlade = false end
|
||||
|
||||
-- Se non limitato e da sopra e richiesto con doppio taglio di lama e superiore al limite minimo
|
||||
if not bLimXmin and not bLimXmax and nSide == 1 and bUseBlade and b3Solid:getDimX() > dLimMinPiece - 1 then
|
||||
if not bLimXmin and not bLimXmax and ( nSide == 1 or ( nSide ~= -1 and BD.DOWN_HEAD)) and bUseBlade and b3Solid:getDimX() > dLimMinPiece - 1 then
|
||||
-- recupero la lavorazione
|
||||
local sCutting = ML.FindCutting( 'HeadSide')
|
||||
if not sCutting then
|
||||
@@ -245,14 +245,15 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId, bCustUseBlade)
|
||||
local nFaceUse = EgtIf( abs( vtN:getY()) > 0.01, MCH_MILL_FU.ORTHO_TOP, EgtIf( bFront, MCH_MILL_FU.ORTHO_BACK, MCH_MILL_FU.ORTHO_FRONT))
|
||||
local nFaceUse2 = EgtIf( abs( vtN:getY()) > 0.01, MCH_MILL_FU.ORTHO_DOWN, EgtIf( bFront, MCH_MILL_FU.ORTHO_FRONT, MCH_MILL_FU.ORTHO_BACK))
|
||||
-- si percorrono i lati alto e basso della faccia
|
||||
local dDimStrip = EgtIf( nSide == 1, BD.DIM_STRIP_SMALL, BD.DIM_STRIP)
|
||||
local nM = 0
|
||||
for i = 1, nC do
|
||||
-- Posizione braccio portatesta
|
||||
local nSCC = EgtIf( ( BD.C_SIMM or i == 1 or i == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
|
||||
-- ciclo sulle passate
|
||||
local dOffset = ( dWidth + BD.DIM_STRIP_SMALL) / 2 ;
|
||||
local dOffset = ( dWidth + dDimStrip) / 2 ;
|
||||
local dLioTang = 0
|
||||
local dLioPerp = ( dWidth - BD.DIM_STRIP_SMALL) / 2 + BD.CUT_SIC ;
|
||||
local dLioPerp = ( dWidth - dDimStrip) / 2 + BD.CUT_SIC ;
|
||||
for k = 1, 2 do
|
||||
-- inserisco le parti di lavorazione
|
||||
nM = nM + 1
|
||||
|
||||
Reference in New Issue
Block a user