diff --git a/BatchProcess.lua b/BatchProcess.lua index c94a6d6..5c68a1a 100644 --- a/BatchProcess.lua +++ b/BatchProcess.lua @@ -1,4 +1,4 @@ --- BatchProcess.lua by Egaltech s.r.l. 2021/06/16 +-- BatchProcess.lua by Egaltech s.r.l. 2021/08/04 -- Gestione calcolo batch disposizione e lavorazioni per Travi -- 2019/07/11 Aggiunta gestione stato rotazione di feature per TS3. -- 2019/07/16 Aggiunta gestione modalità oltre 10 per impostazione macchina e uscita. @@ -21,6 +21,7 @@ -- 2021/02/22 Aggiunto anche controllo su file macchina mlde per aggiornare calcoli. -- 2021/02/25 Aggiunta gestione tipo scarico (standard, lav. incomplete, a caduta). -- 2021/06/16 Se disponibile si aggiunge la versione dell'eseguibile alle info del programma CN. +-- 2021/08/04 Direzione vista simulazione da BD.SIMUL_VIEW_DIR se esiste. -- Intestazioni require( 'EgtBase') @@ -536,7 +537,9 @@ EgtOutLog( sTime) -- Imposto la vista ISO 3d, se richiesto if BEAM.FLAG == 1 or BEAM.FLAG == 2 then - EgtSetView( EgtIf( BD.RIGHT_LOAD, SCE_VD.ISO_NE, SCE_VD.ISO_SW), false) + local vView = { SCE_VD.ISO_NW, SCE_VD.ISO_SW, SCE_VD.ISO_NE, SCE_VD.ISO_SE} + local nV = min( max( BD.SIMUL_VIEW_DIR or 2, 1), 4) + EgtSetView( vView[nV], false) end -- Completamento senza errori e avvisi diff --git a/BatchProcessNew.lua b/BatchProcessNew.lua index 9daff6a..b1ad9bd 100644 --- a/BatchProcessNew.lua +++ b/BatchProcessNew.lua @@ -1,4 +1,4 @@ --- BatchProcess.lua by Egaltech s.r.l. 2021/06/16 +-- BatchProcess.lua by Egaltech s.r.l. 2021/08/04 -- Gestione calcolo batch disposizione e lavorazioni per Travi -- 2021/01/07 Per nuova interfaccia Egt. -- 2021/01/15 CREATE_BAR ora FLAG = 6 (prima 5). @@ -6,6 +6,7 @@ -- 2021/02/14 Modifica per macchine senza BD.MAX_WIDTH2 e BD.MAX_HEIGHT2. -- 2021/02/25 Aggiunta gestione tipo scarico (standard, lav. incomplete, a caduta). -- 2021/06/16 Se disponibile si aggiunge la versione dell'eseguibile alle info del programma CN. +-- 2021/08/04 Direzione vista simulazione da BD.SIMUL_VIEW_DIR se esiste. -- Intestazioni require( 'EgtBase') @@ -628,7 +629,9 @@ EgtOutLog( sTime) -- Imposto la vista ISO 3d, se richiesto if BEAM.FLAG == 1 or BEAM.FLAG == 2 then - EgtSetView( EgtIf( BD.RIGHT_LOAD, SCE_VD.ISO_NE, SCE_VD.ISO_SW), false) + local vView = { SCE_VD.ISO_NW, SCE_VD.ISO_SW, SCE_VD.ISO_NE, SCE_VD.ISO_SE} + local nV = min( max( BD.SIMUL_VIEW_DIR or 2, 1), 4) + EgtSetView( vView[nV], false) end -- Completamento senza errori e avvisi