Egalware/DataBeam
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DataBeam :- correzioni e migliorie varie.

Browse Source
This commit is contained in:
Dario Sassi
2019-10-07 06:47:08 +00:00
parent 2981dcb50d
commit ed02b71319
12 changed files with 296 additions and 100 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Process.lua
+12 -2
View File
@@ -1,4 +1,4 @@
-- Process.lua by Egaltech s.r.l. 2019/07/02
-- Process.lua by Egaltech s.r.l. 2019/10/03
-- Gestione calcolo disposizione e lavorazioni per Travi
-- Si opera sulla macchina corrente
@@ -174,7 +174,7 @@ local function MyProcessBeams()
end
EgtOutLog( 'Lraw : ' .. EgtNumToString( dRawL, 1) .. ' Lovm : '.. EgtNumToString( dOvmHead, 1), 1)
-- Verifico sezione barra
-- Verifico sezione barra non troppo grande
if dRawW > BD.MAX_WIDTH + 10 * GEO.EPS_SMALL or dRawH > BD.MAX_HEIGHT + 10 * GEO.EPS_SMALL then
local sOut = 'Sezione (' .. EgtNumToString( dRawW, 2) .. ' x ' .. EgtNumToString( dRawH, 2) .. ') ' ..
'oltre i limiti della macchina (' .. EgtNumToString( BD.MAX_WIDTH, 2) .. ' x ' .. EgtNumToString( BD.MAX_HEIGHT, 2) .. ')'
@@ -184,6 +184,16 @@ local function MyProcessBeams()
return false
end
-- Verifico sezione barra non troppo piccola
if dRawW < BD.MIN_WIDTH - 10 * GEO.EPS_SMALL or dRawH < BD.MIN_HEIGHT - 10 * GEO.EPS_SMALL then
local sOut = 'Sezione (' .. EgtNumToString( dRawW, 2) .. ' x ' .. EgtNumToString( dRawH, 2) .. ') ' ..
'sotto i limiti della macchina (' .. EgtNumToString( BD.MIN_WIDTH, 2) .. ' x ' .. EgtNumToString( BD.MIN_HEIGHT, 2) .. ')'
EgtOutLog( sOut)
EgtOutBox( sOut, 'Lavora Travi', 'WARNING')
EgtDraw()
return false
end
-- Sistemo le travi nel grezzo
local bOk, sErr = BE.ProcessBeams( dRawW, dRawH, dRawL, dOvmHead, vBeam)
if not bOk then