Masterwood-TF600KST 2.7h1 :

- modifiche per evitare collisioni in simulazione con gruppo a forare.
This commit is contained in:
Dario Sassi
2025-08-22 17:41:20 +02:00
parent d60c926b73
commit 9c1256940d
4 changed files with 36 additions and 36 deletions
+16 -16
View File
@@ -1,10 +1,10 @@
-- Descrizione macchina Masterwood TF600KST 2025/06/09 -- Descrizione macchina Masterwood TF600KST 2025/08/22
-- by EgalWare s.r.l. -- by EgalWare s.r.l.
require( 'EmtGenerator') require( 'EmtGenerator')
EgtEnableDebug( false) EgtEnableDebug( false)
PP_VER = '2.7g1' PP_VER = '2.7h1'
MIN_MACH_VER = '2.7d2' MIN_MACH_VER = '2.7d2'
-- DATI MACCHINA -- -- DATI MACCHINA --
@@ -38,19 +38,19 @@ H12PosY = 0
H12PosZ = 0 H12PosZ = 0
H12Pos = H11Pos + Vector3d( H12PosX, H12PosY, H12PosZ) H12Pos = H11Pos + Vector3d( H12PosX, H12PosY, H12PosZ)
-- teste gruppo a forare sopra -- teste gruppo a forare sopra
MDRILLTOP = { { Pos = H12Pos + Vector3d( 0, 0, 0), Ex=1, St=60}, -- uscita 1 MDRILLTOP = { { Pos = H12Pos + Vector3d( 0, 0, 0), Ex=1, St=90}, -- uscita 1
{ Pos = H12Pos + Vector3d( 32, 0, 0), Ex=2, St=60}, -- uscita 2 { Pos = H12Pos + Vector3d( 32, 0, 0), Ex=2, St=90}, -- uscita 2
{ Pos = H12Pos + Vector3d( 64, 0, 0), Ex=3, St=60}, -- uscita 3 { Pos = H12Pos + Vector3d( 64, 0, 0), Ex=3, St=90}, -- uscita 3
{ Pos = H12Pos + Vector3d( 96, 0, 0), Ex=4, St=60}, -- uscita 4 { Pos = H12Pos + Vector3d( 96, 0, 0), Ex=4, St=90}, -- uscita 4
{ Pos = H12Pos + Vector3d( 128, 0, 0), Ex=5, St=60}, -- uscita 5 { Pos = H12Pos + Vector3d( 128, 0, 0), Ex=5, St=90}, -- uscita 5
{ Pos = H12Pos + Vector3d( 160, 0, 0), Ex=6, St=60}, -- uscita 6 { Pos = H12Pos + Vector3d( 160, 0, 0), Ex=6, St=90}, -- uscita 6
{ Pos = H12Pos + Vector3d( 192, -32, 0), Ex=7, St=60}, -- uscita 7 { Pos = H12Pos + Vector3d( 192, -32, 0), Ex=7, St=90}, -- uscita 7
{ Pos = H12Pos + Vector3d( 192, -64, 0), Ex=8, St=60}, -- uscita 8 { Pos = H12Pos + Vector3d( 192, -64, 0), Ex=8, St=90}, -- uscita 8
{ Pos = H12Pos + Vector3d( 192, -96, 0), Ex=9, St=60}, -- uscita 9 { Pos = H12Pos + Vector3d( 192, -96, 0), Ex=9, St=90}, -- uscita 9
{ Pos = H12Pos + Vector3d( 192, -160, 0), Ex=10, St=60}, -- uscita 10 { Pos = H12Pos + Vector3d( 192, -160, 0), Ex=10, St=90}, -- uscita 10
{ Pos = H12Pos + Vector3d( 192, -192, 0), Ex=11, St=60}, -- uscita 11 { Pos = H12Pos + Vector3d( 192, -192, 0), Ex=11, St=90}, -- uscita 11
{ Pos = H12Pos + Vector3d( 192, -224, 0), Ex=12, St=60}, -- uscita 12 { Pos = H12Pos + Vector3d( 192, -224, 0), Ex=12, St=90}, -- uscita 12
{ Pos = H12Pos + Vector3d( 192, -256, 0), Ex=13, St=60}, -- uscita 13 { Pos = H12Pos + Vector3d( 192, -256, 0), Ex=13, St=90}, -- uscita 13
{ Pos = H12Pos + Vector3d( 48, -80, 0), Ex=14, Tw=18, St=60}, -- uscita 14 { Pos = H12Pos + Vector3d( 48, -80, 0), Ex=14, Tw=18, St=60}, -- uscita 14
{ Pos = H12Pos + Vector3d( 80, -80, 0), Ex=15, Tw=19, St=60}, -- uscita 15 { Pos = H12Pos + Vector3d( 80, -80, 0), Ex=15, Tw=19, St=60}, -- uscita 15
{ Pos = H12Pos + Vector3d( 22, 96, 0), Ex=16, Tw=20, St=60}, -- uscita 16 { Pos = H12Pos + Vector3d( 22, 96, 0), Ex=16, Tw=20, St=60}, -- uscita 16
@@ -349,7 +349,7 @@ end
function OnSetHead() function OnSetHead()
-- disabilito uscite del gruppo a forare da sopra (gestito con multiselezione) -- disabilito uscite del gruppo a forare da sopra (gestito con multiselezione)
EMC.HEADID = EgtGetHeadId( 'H12') EMC.HEADID = EgtGetHeadId( 'H12')
EMC.DRACEX = nil EMC.DRACEX = EgtIf( EMC.HEAD == 'H12', { EMC.EXIT}, nil)
OnActivateDrillingUnit() OnActivateDrillingUnit()
-- gestisco uscite del gruppo a forare da sotto (gestito con selezione singola) -- gestisco uscite del gruppo a forare da sotto (gestito con selezione singola)
EMC.HEADID = EgtGetHeadId( 'H22') EMC.HEADID = EgtGetHeadId( 'H22')
+18 -18
View File
@@ -1,4 +1,4 @@
-- Processore macchina Masterwood-TF600KST 2025/04/16 -- Processore macchina Masterwood-TF600KST 2025/08/22
-- by EgalWare s.r.l. -- by EgalWare s.r.l.
-- --
-- Intestazioni -- Intestazioni
@@ -40,20 +40,19 @@ function OnSimulStart()
-- Preparo lista oggetti da verificare per collisioni -- Preparo lista oggetti da verificare per collisioni
EMT.COLLOBJ = {} EMT.COLLOBJ = {}
AddToCollisionCheck( 'C', 'COLLISION', EMT.COLLOBJ) --AddToCollisionCheck( 'C', 'COLLISION', EMT.COLLOBJ)
AddToCollisionCheck( 'A', 'COLLISION', EMT.COLLOBJ)
DumpCollisionCheck( EMT.COLLOBJ, 'Collision Objects :', 4) DumpCollisionCheck( EMT.COLLOBJ, 'Collision Objects :', 4)
-- Preparo lista solidi macchina con cui possono collidere gli oggetti sopra riportati (in aggiunta a VMill) -- Preparo lista solidi macchina con cui possono collidere gli oggetti sopra riportati (in aggiunta a VMill)
EMT.MCODET = {} EMT.MCODET = {}
local McdData = { { Grp = 'PL1', Sub = 'COLLISION', Name = 'STM'}, --local McdData = { { Grp = 'PL1', Sub = 'COLLISION', Name = 'STM'},
{ Grp = 'PL2', Sub = 'COLLISION', Name = 'STM'}, -- { Grp = 'PL2', Sub = 'COLLISION', Name = 'STM'},
{ Grp = 'PL3', Sub = 'COLLISION', Name = 'STM'}, -- { Grp = 'PL3', Sub = 'COLLISION', Name = 'STM'},
{ Grp = 'PL4', Sub = 'COLLISION', Name = 'STM'}, -- { Grp = 'PL4', Sub = 'COLLISION', Name = 'STM'},
{ Grp = 'PL5', Sub = 'COLLISION', Name = 'STM'}, -- { Grp = 'PL5', Sub = 'COLLISION', Name = 'STM'},
{ Grp = 'PL6', Sub = 'COLLISION', Name = 'STM'}} -- { Grp = 'PL6', Sub = 'COLLISION', Name = 'STM'}}
EgtOutLog( 'MCODET Objects :', 4) EgtOutLog( 'MCODET Objects :', 4)
local nMcdNullCnt = 0 local nMcdNullCnt = 0
for i = 1, #McdData do for i = 1, #(McdData or {}) do
local nGrpId local nGrpId
if McdData[i].Grp == 'Base' then if McdData[i].Grp == 'Base' then
nGrpId = EgtGetBaseId( 'Base') nGrpId = EgtGetBaseId( 'Base')
@@ -74,7 +73,7 @@ function OnSimulStart()
end end
-- Preparo lista collisioni vuota -- Preparo lista collisioni vuota
EMT.COLLIDE = {} EMT.COLLIDE = {}
end end
--------------------------------------------------------------------- ---------------------------------------------------------------------
@@ -277,20 +276,21 @@ end
--------------------------------------------------------------------- ---------------------------------------------------------------------
function OnSimulToolDeselect() function OnSimulToolDeselect()
-- se utensile non cambia e non è sega a catena, esco -- se utensile non cambia, esco
if EMT.NEXTTOOL == EMT.PREVTOOL then return end if EMT.NEXTTOOL == EMT.PREVTOOL then return end
-- deposito utensile -- deposito utensile
EgtOutText( 'Tool change in progress...') EgtOutText( 'Tool change in progress...')
if EMT.HEAD == 'H11' then if EMT.HEAD == 'H11' and EMT.NEXTHEAD ~= EMT.HEAD then
SimulMoveAxis( 'Z11', 650, MCH_SIM_STEP.RAPID) SimulMoveAxis( 'Z11', 650, MCH_SIM_STEP.RAPID)
SimulMoveAxes( 'Y', 2000, MCH_SIM_STEP.RAPID, 'A', 0, MCH_SIM_STEP.RAPROT, 'C', 0, MCH_SIM_STEP.RAPROT) elseif EMT.HEAD == 'H12' and EMT.NEXTHEAD ~= EMT.HEAD then
elseif EMT.NEXTHEAD == 'H11' then SimulMoveAxis( 'Z12', 400, MCH_SIM_STEP.RAPID)
SimulMoveAxis( 'Z21', 400, MCH_SIM_STEP.RAPID) elseif EMT.HEAD == 'H21' and EMT.NEXTHEAD ~= EMT.HEAD then
SimulMoveAxis( 'Y', 2000, MCH_SIM_STEP.RAPID) SimulMoveAxis( 'Z21', -650, MCH_SIM_STEP.RAPID)
elseif EMT.HEAD == 'H22' and EMT.NEXTHEAD ~= EMT.HEAD then
SimulMoveAxis( 'Z22', -400, MCH_SIM_STEP.RAPID)
end end
end end
--------------------------------------------------------------------- ---------------------------------------------------------------------
Binary file not shown.
+2 -2
View File
@@ -1,4 +1,4 @@
-- Processore generico Masterwood woodWOP 2025/04/15 -- Processore generico Masterwood woodWOP 2025/08/22
-- by EgalWare s.r.l. -- by EgalWare s.r.l.
-- --
-- Intestazioni -- Intestazioni
@@ -7,7 +7,7 @@ EgtEnableDebug( false)
-- Variabili di modulo -- Variabili di modulo
local MLE_INFO = 'Egalware-CAM5-MwW-V2.7d1' local MLE_INFO = 'Egalware-CAM5-MwW-V'..PP_VER
--------------------------------------------------------------------- ---------------------------------------------------------------------
function OnStart() function OnStart()