3dPrinting :

- aggiunta info tempo di attesa.
This commit is contained in:
SaraP
2022-07-13 12:15:57 +02:00
parent c40fa8ff10
commit 5c2a0d1caa
2 changed files with 4 additions and 0 deletions
+1
View File
@@ -140,6 +140,7 @@ RESULT_READ_PROG = 'ResultReadProg'
KEY_PART_ON_TABLE = 'PartOnTable'
KEY_RESULT = 'Result'
KEY_WAITING_TIME = 'WaitingTime'
KEY_PALETTE = 'Palette'
KEY_LAYER_VIEW = 'LayerView'
KEY_SHELL_VIEW = 'ShellView'
+3
View File
@@ -79,6 +79,8 @@ function RunMachiningParamCalc.Exec()
while nLayerId do
local sLayerName = EgtGetName( nLayerId)
local nLayerIndex = tonumber( sLayerName:sub( #SLICE_LAYER + 1))
-- rimuovo eventuale info precedente del tempo di attesa
EgtRemoveInfo( nLayerId, KEY_WAITING_TIME)
-- calcolo lunghezza totale del layer
local dTotLayerLength = 0
local nCrvId = EgtGetFirstGroupInGroup( nLayerId)
@@ -132,6 +134,7 @@ function RunMachiningParamCalc.Exec()
local sStatus = ''
if dEsteemedTime < dMinTime then
EgtSetInfo( nLayerId, KEY_RESULT, RESULT.KO_MINUS)
EgtSetInfo( nLayerId, KEY_WAITING_TIME, dMinTime - dEsteemedTime)
sStatus = 'KO(-)'
elseif dEsteemedTime > dMinTime and dEsteemedTime < dMaxTime then
EgtSetInfo( nLayerId, KEY_RESULT, RESULT.OK)