DataWall :

- correzione lav. tasche con pulitura angoli interni
- modifiche per nuova interfaccia
- aggiunta script per nesting.
This commit is contained in:
Dario Sassi
2021-02-16 10:00:22 +00:00
parent d9a7855482
commit 5617f476bc
4 changed files with 290 additions and 4 deletions
+1 -1
View File
@@ -298,7 +298,7 @@ local function GetFacesData( nNewProc, bOpposite, bCalclForBlade, dToolDiam, dTo
-- recupero le dimensioni della faccia
local _, dLen, dWidth = WL.GetFaceHvRefDim( nNewProc, nFac)
-- recupero l'angolo con la faccia precedente
local bAdj, _, _, dAng = EgtSurfTmFacetsContact( nNewProc, nPrecFac, nFac, GDB_ID.ROOT)
local bAdj, ptLocP1, ptLocP2, dAng = EgtSurfTmFacetsContact( nNewProc, nPrecFac, nFac, GDB_ID.ROOT)
-- salvo i dati
vFace[i] = { Fac = nFac, Cen = ptCen, Norm = vtN, Len = dLen, Width = dWidth, AngPrev = EgtIf( bAdj, dAng, 0)}
if bAdj then
+7 -2
View File
@@ -28,7 +28,7 @@ local FreeContour = require( 'WProcessFreeContour')
-------------------------------------------------------------------------------------------------------------
-- *** Inserimento delle pareti nel pannello ***
-------------------------------------------------------------------------------------------------------------
function WallExec.ProcessWalls( dRawL, dRawW, dRawH, vWall, bMachGroupOk)
function WallExec.ProcessWalls( dRawL, dRawW, dRawH, vWall, bMachGroupOk, bPartOriBL)
-- Creazione nuovo gruppo di lavoro
if not bMachGroupOk then
@@ -84,7 +84,12 @@ function WallExec.ProcessWalls( dRawL, dRawW, dRawH, vWall, bMachGroupOk)
end
-- inserisco il pezzo nel grezzo
EgtDeselectPartObjs( Pz)
local ptPos = Point3d( dRawL - vWall[i].PosX - PartLen, vWall[i].PosZ, ( dRawH - PartHeight) / 2)
local ptPos
if bPartOriBL then
ptPos = Point3d( vWall[i].PosX, vWall[i].PosZ, ( dRawH - PartHeight) / 2)
else
ptPos = Point3d( dRawL - vWall[i].PosX - PartLen, vWall[i].PosZ, ( dRawH - PartHeight) / 2)
end
EgtAddPartToRawPart( Pz, ptPos, nRaw)
end
return true