DataWall :

- correzioni a script di Nesting per EgtBW.
This commit is contained in:
DarioS
2021-05-24 20:17:41 +02:00
parent 03b521aee3
commit d4a17e13fd
+4 -4
View File
@@ -1,4 +1,4 @@
-- NestProcess.lua by Egaltech s.r.l. 2021/05/16
-- NestProcess.lua by Egaltech s.r.l. 2021/05/21
-- Gestione nesting automatico pareti
-- Intestazioni
@@ -127,7 +127,7 @@ local SheetOutlineId = EgtRectangle2P(SheetLayerId, Point3d(0,0,0), Point3d(NEST
EgtSetName(SheetOutlineId, OUTLINE)
-- creo foglio per nesting
EgtAutoNestAddSheet( SheetPartId, SheetOutlineId, NEST.KERF, 0, 50) -- EgtAutoNestAddSheet( SheetId, OutlineId, dKerf, nPriority, nCount)
EgtAutoNestAddSheet( SheetPartId, SheetOutlineId, NEST.KERF, 0, NEST.QTY) -- EgtAutoNestAddSheet( SheetId, OutlineId, dKerf, nPriority, nCount)
-- ciclo su pezzi per aggiungerli al nesting
for nPartId, nCount in pairs( PART) do
@@ -233,7 +233,7 @@ EgtAutoNestSetStartCorner( NST_CORNER.BR)
local nMaxTime = 5
-- imposto tempo di nesting e lo avvio
EgtAutoNestCompute(true, nMaxTime)
EgtAutoNestCompute(true, NEST.TIME)
-- Variabili di calcolo
local nNestedParts, nParts, nSheets, nNestings, dTotFillRatio
@@ -248,7 +248,7 @@ while bOk do
end
if nStat == 3 then break end
nTime = nTime + 1
if EgtProcessEvents( nTime / nMaxTime * 100, 995) == 1 then
if EgtProcessEvents( nTime / NEST.TIME * 100, 995) == 1 then
bOk = EgtAutoNestCancelComputation()
break
end