3dPrinting :

- modificato il modo di definire il punto di partenza
- aggiunto frame del pezzo.
This commit is contained in:
SaraP
2022-05-13 17:21:41 +02:00
parent ae103a814a
commit 67bb98fc29
3 changed files with 37 additions and 18 deletions
+25 -2
View File
@@ -52,6 +52,13 @@ function RunPartPositioning.Exec()
local nMchGrpId = EgtGetMachGroupId( '3dPrint')
EgtRemoveMachGroup( nMchGrpId or GDB_ID.NULL)
-- rimuovo eventuale frame
local nFrameId = EgtGetFirstNameInGroup( nPartId, FRAME_PART)
if nFrameId then EgtErase( nFrameId) end
-- rimuovo eventuale start point
local nPtStartId = EgtGetFirstNameInGroup( nPartId, KEY_START_POINT)
if nPtStartId then EgtErase( nPtStartId) end
-- Recupero dati tavola (creando gruppo di lavoro temporaneo)
local nQqqId = EgtAddMachGroup( 'qqq')
EgtSetTable( 'Tab')
@@ -87,8 +94,24 @@ function RunPartPositioning.Exec()
end
-- Posiziono il pezzo
EgtMove( nPartId, Point3d( dPosX, dPosY, 0) - b3Part:getMin())
EgtMove( nPartId, Point3d( dPosX, dPosY, 0) - b3Part:getMin())
-- Aggiorno il suo box
b3Part = EgtGetBBoxGlob( nPartId, GDB_BB.EXACT)
-- creo il frame del pezzo
local frPart = Frame3d( b3Part:getCenter() - 0.5 * b3Part:getDimZ() * Z_AX(), Z_AX())
nFrameId = EgtFrame( nPartId, frPart, GDB_RT.GLOB)
if nFrameId then EgtSetName( nFrameId, FRAME_PART) end
-- creo lo start point
local ptStart = b3Part:getCenter() - 0.6 * b3Part:getDimY() * Y_AX() - 0.5 * b3Part:getDimZ() * Z_AX()
nPtStartId = EgtPoint( nPartId, ptStart, GDB_RT.GLOB)
if nPtStartId then
EgtSetName( nPtStartId, KEY_START_POINT)
EgtSetColor( nPtStartId, EgtStdColor( "RED"))
end
EgtAddMachGroup( '3dPrint')
EgtSetTable( 'Tab')