DataWall :

- modifica per scelta origine
- correzione lavorazioni contorno libero inclinate e su macchine travi.
This commit is contained in:
DarioS
2021-09-20 08:50:49 +02:00
parent be08ec92e1
commit a9a16135e4
2 changed files with 20 additions and 9 deletions
+6 -6
View File
@@ -1,4 +1,4 @@
-- WallExec.lua by Egaltech s.r.l. 2021/08/27
-- WallExec.lua by Egaltech s.r.l. 2021/09/20
-- Libreria esecuzione lavorazioni per Pareti
-- Tabella per definizione modulo
@@ -68,17 +68,17 @@ function WallExec.ProcessWalls( dRawL, dRawW, dRawH, vWall, bMachGroupOk, bPartO
-- Calcolo posizione estremo di riferimento della tavola rispetto a sua origine in BL
local OrigOnTab
local nCorner
local nOrigCorner = WD.ORIG_CORNER
local sOrigCorner = WD.ORIG_CORNER
if WD.GetOrigCorner then
nOrigCorner = WD.GetOrigCorner( EgtGetInfo( EgtGetFirstNameInGroup( GDB_ID.ROOT, 'BtlInfo') or GDB_ID.NULL, 'REFPOS', 'i'))
sOrigCorner = WD.GetOrigCorner( EgtGetInfo( EgtGetFirstNameInGroup( GDB_ID.ROOT, 'BtlInfo') or GDB_ID.NULL, 'REFPOS', 'i') or 1)
end
if nOrigCorner == 'TL' then
if sOrigCorner == 'TL' then
nCorner = MCH_CR.TL
OrigOnTab = Point3d( 0, b3Tab:getDimY(), 0)
elseif nOrigCorner == 'BL' then
elseif sOrigCorner == 'BL' then
nCorner = MCH_CR.BL
OrigOnTab = Point3d(0, 0, 0)
elseif nOrigCorner == 'TR' then
elseif sOrigCorner == 'TR' then
nCorner = MCH_CR.TR
OrigOnTab = Point3d( b3Tab:getDimX(), b3Tab:getDimY(), 0)
else -- 'BR'