DataWall :
- correzioni per togliere tabs con pulitura spigoli che richiedono la rimozione degli sfridi.
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
-- ProcessFreeContour.lua by Egaltech s.r.l. 2021/03/24
|
||||
-- ProcessFreeContour.lua by Egaltech s.r.l. 2021/04/13
|
||||
-- Gestione calcolo profilo libero per Pareti
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -441,6 +441,7 @@ local function GetTunnelDimension( nId, nPartId, nAddGrpId)
|
||||
EgtMove( nSurfInt, Point3d(0,0,-2*GEO.EPS_SMALL) - ORIG(), GDB_RT.GLOB)
|
||||
-- mi faccio dare il contorno della superfice e la ricreo in modo più corretto
|
||||
local nIdCont, nIdNum = EgtExtractSurfTmLoops( nSurfInt, nAddGrpId)
|
||||
if not nIdCont then return end
|
||||
-- elimino le entità allineate dello stesso tipo
|
||||
EgtMergeCurvesInCurveCompo( nIdCont, 2*GEO.EPS_SMALL)
|
||||
EgtErase(nSurfInt)
|
||||
@@ -981,9 +982,10 @@ local function AddMillCorner( nTypeConeCut, vFace, Proc, nRawId, b3Raw,
|
||||
nFacCnt = EgtSurfTmFacetCount( nNewProc)
|
||||
nFacInd = nFacCnt - 1
|
||||
else
|
||||
local sErr = 'Error : cannot create base surface'
|
||||
EgtOutLog( sErr)
|
||||
return false, sErr
|
||||
return true
|
||||
--local sErr = 'Error : cannot create base surface'
|
||||
--EgtOutLog( sErr)
|
||||
--return false, sErr
|
||||
end
|
||||
else
|
||||
bMakeLocSurf = true
|
||||
@@ -1133,6 +1135,8 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw, nConeCut, nAdd
|
||||
EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
|
||||
bNotThrou = true
|
||||
end
|
||||
-- tolgo i Tabs se devo rimuovere lo sfrido
|
||||
if nConeCut == 1 then EgtSetMachiningParam( MCH_MP.LEAVETAB, false) end
|
||||
-- aggiungo geometria
|
||||
EgtSetMachiningGeometry( {{ Proc.Id, vFace[i].Fac}})
|
||||
local dSal = 0
|
||||
@@ -1186,6 +1190,8 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw, nConeCut, nAdd
|
||||
EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
|
||||
bNotThrou = true
|
||||
end
|
||||
-- tolgo i Tabs se devo rimuovere lo sfrido
|
||||
if nConeCut == 1 then EgtSetMachiningParam( MCH_MP.LEAVETAB, false) end
|
||||
-- aggiungo geometria
|
||||
local vGeom = {{ Proc.Id, vFace[i].Fac}}
|
||||
local dSal = EgtIf( ( vFace[i].Type & 2) ~= 0, vFace[i].Whisk - vFace[i].Len, 0)
|
||||
|
||||
Reference in New Issue
Block a user