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

DataBeam :

Browse Source 
- prime modifiche per macchine con forcella asse C simmetrica (uso flag BD.C_SIMM).
This commit is contained in:
Dario Sassi
2020-04-20 07:15:13 +00:00
parent d81e309e66
commit 38ea43e187
2 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
LuaLibs/ProcessLongCut.lua
+6 -6
View File
@@ -1,4 +1,4 @@
-- ProcessLongCut.lua by Egaltech s.r.l. 2020/01/28
-- ProcessLongCut.lua by Egaltech s.r.l. 2020/04/18
-- Gestione calcolo taglio longitudinale per Travi
-- Tabella per definizione modulo
@@ -214,7 +214,7 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId)
local nM = 0
for i = 1, nC do
-- Posizione braccio portatesta
local nSCC = EgtIf( ( i == 1 or i == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
local nSCC = EgtIf( ( BD.C_SIMM or i == 1 or i == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
-- ciclo sulle passate
local dOffset = ( dWidth + BD.DIM_STRIP_SMALL) / 2 ;
local dLioTang = 0
@@ -354,9 +354,9 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId)
-- Posizione braccio portatesta
local nSCC
if bFront then
nSCC = EgtIf( ( i == 1 or i == nC - 1), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
nSCC = EgtIf( ( BD.C_SIMM or i == 1 or i == nC - 1), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
else
nSCC = EgtIf( ( i == 1 or i == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
nSCC = EgtIf( ( BD.C_SIMM or i == 1 or i == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
end
-- ciclo sulle passate
local nO = 1
@@ -517,9 +517,9 @@ function ProcessLongCut.Make( Proc, nPhase, nRawId, nPartId)
-- Posizione braccio portatesta
local nSCC
if bFront then
nSCC = EgtIf( ( j == 1 or j == nC - 1), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
nSCC = EgtIf( ( BD.C_SIMM or j == 1 or j == nC - 1), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
else
nSCC = EgtIf( ( j == 1 or j == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
nSCC = EgtIf( ( BD.C_SIMM or j == 1 or j == nC - 1), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
end
-- inserisco le parti di lavorazione
nM = nM + 1