DataWall :

- modifiche per pareti a layer (aggiunta gestione quota parete in lavoro nel grezzo).
This commit is contained in:
DarioS
2021-07-12 12:29:54 +02:00
parent abe712151f
commit 0baa4968e5
3 changed files with 19 additions and 6 deletions
+8 -2
View File
@@ -1,4 +1,4 @@
-- BatchProcess.lua by Egaltech s.r.l. 2021/06/23
-- BatchProcess.lua by Egaltech s.r.l. 2021/07/08
-- Gestione calcolo batch disposizione e lavorazioni per Pareti
-- 2020/07/24 Nuvola di punti riferita allo Zero Tavola.
-- 2020/10/28 Corretto spostamento pezzi per rotazioni (0 o 180) e inversioni( 0, 90, 180, o 270).
@@ -269,6 +269,12 @@ if bToProcess then
for i = 1, #vWall do
local PosX = EgtGetInfo( vWall[i].Id, 'POSX', 'd')
vWall[i].PosX = PosX + min( dExtraL, 1200)
if WD.USE_POSY then
local PosY = EgtGetInfo( vWall[i].Id, 'POSY', 'd')
vWall[i].PosY = max( PosY, 0)
else
vWall[i].PosY = 0
end
local PosZ = EgtGetInfo( vWall[i].Id, 'POSZ', 'd')
vWall[i].PosZ = PosZ + dExtraW / 2
end
@@ -330,7 +336,7 @@ if bToProcess then
end
-- Ne verifico le dimensioni
local dRawH = vWall[1].Box:getDimZ()
local dRawH = vWall[1].Box:getDimZ() + vWall[1].PosY
local vWallErr = {}
for i = 2, #vWall do
local dDimH = vWall[i].Box:getDimZ()