3dPrinting :

- correzioni per aggiustamento posizione solido con 45 gradi
- piccola modifica posizionamento pezzo su tavola macchina.
This commit is contained in:
DarioS
2022-08-29 09:35:11 +02:00
parent ddc72269fc
commit 56b05c0eeb
3 changed files with 16 additions and 17 deletions
+2 -2
View File
@@ -1,4 +1,4 @@
-- CalcToolPath.lua by Egaltech s.r.l. 2022/04/19
-- CalcToolPath.lua by Egaltech s.r.l. 2022/08/29
-- Calcolo percorsi di lavoro per Stampa 3d
-- Tabella per definizione modulo
@@ -704,7 +704,7 @@ function CalcToolPath.Exec( nPartId)
-- se necessario sposto anche il solido di partenza
if dCorrZ > 10 * GEO.EPS_SMALL then
local vtMove = Vector3d( 0, 0, dCorrZ) + LayerParams.dLayHeight / 2 * LayerParams.vtSlicing
local SolidLayId = EgtGetFirstNameInGroup( s_nPartId, ORIGINAL_SOLID)
local SolidLayId = EgtGetFirstNameInGroup( s_nPartId, PRINT_SOLID)
if SolidLayId then
EgtSetInfo( s_nPartId, KEY_MOVED_PART, vtMove)
local EntId = EgtGetFirstInGroup( SolidLayId)
+13 -14
View File
@@ -1,4 +1,4 @@
-- RunPartPositioning.lua by Egaltech s.r.l. 2022/06/28
-- RunPartPositioning.lua by Egaltech s.r.l. 2022/08/29
-- Gestione calcolo disposizione e lavorazioni per stampa 3d
-- 2022/03/21 Creazione file
@@ -109,19 +109,18 @@ function RunPartPositioning.Exec()
-- Creo disegno tavola
local nTabPart = EgtGetFirstNameInGroup( GDB_ID.ROOT, TABLE)
if not nTabPart then
-- Disegno tavola
nTabPart = EgtGroup( GDB_ID.ROOT)
EgtSetMode( nTabPart, GDB_MD.LOCKED)
EgtSetLevel( nTabPart, GDB_LV.SYSTEM)
EgtSetName( nTabPart, TABLE)
local nTabLayer = EgtGroup( nTabPart)
EgtSetName( nTabLayer, TABLE)
local nTabOutlineId = EgtRectangle2P( nTabLayer, Point3d( 0, 0, 0), Point3d( dTabX, dTabY, 0))
local nTabSurfId = EgtSurfFlatRegion( nTabLayer, nTabOutlineId)
EgtSetColor( nTabSurfId, 'GRAY')
EgtSetAlpha( nTabSurfId, 70)
end
EgtErase( nTabPart)
-- Disegno tavola
nTabPart = EgtGroup( GDB_ID.ROOT)
EgtSetMode( nTabPart, GDB_MD.LOCKED)
EgtSetLevel( nTabPart, GDB_LV.SYSTEM)
EgtSetName( nTabPart, TABLE)
local nTabLayer = EgtGroup( nTabPart)
EgtSetName( nTabLayer, TABLE)
local nTabOutlineId = EgtRectangle2P( nTabLayer, Point3d( 0, 0, 0), Point3d( dTabX, dTabY, 0))
local nTabSurfId = EgtSurfFlatRegion( nTabLayer, nTabOutlineId)
EgtSetColor( nTabSurfId, 'GRAY')
EgtSetAlpha( nTabSurfId, 70)
-- Aggiungo il box del solido
local nBoxId = EgtSurfTmBBox( nAuxId, b3Solid, false, GDB_RT.GLOB)
+1 -1
View File
@@ -138,7 +138,7 @@ local function RestoreSolidPosition( nPartId)
if vtMove then
vtMove = -vtMove
EgtRemoveInfo( nPartId, KEY_MOVED_PART)
local SolidLayId = EgtGetFirstNameInGroup( nPartId, ORIGINAL_SOLID)
local SolidLayId = EgtGetFirstNameInGroup( nPartId, PRINT_SOLID)
if SolidLayId then
local EntId = EgtGetFirstInGroup( SolidLayId)
while EntId do