DataWall :
- correzioni a script di Nesting per EgtBW.
This commit is contained in:
+4
-4
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user