2 Commits

Author SHA1 Message Date
Dario Sassi ec18dcbedc Masterwood-TF600KST 2.7f2 :
- in forature multiple vengono ora esclusi dalla generazione i fori non lavorati.
2025-06-09 11:55:43 +02:00
luca.mazzoleni c672f65ca4 - update ini per copia part program da interfaccia 2025-06-04 10:57:05 +02:00
3 changed files with 21 additions and 14 deletions
+3 -3
View File
@@ -1,9 +1,9 @@
; Commento per evitare BOM con UTF-8
[General]
Material=Wood
[PartProgram]
Extension=.mpr
Supervisor=0
SaveCncPath=C:\Tf600ISO
SaveExt=mpr
[Tools]
Drillbit=1
+10 -10
View File
@@ -1,10 +1,10 @@
-- Descrizione macchina Masterwood TF600KST 2025/04/16
-- Descrizione macchina Masterwood TF600KST 2025/06/09
-- by EgalWare s.r.l.
require( 'EmtGenerator')
EgtEnableDebug( false)
PP_VER = '2.7d4'
PP_VER = '2.7f2'
MIN_MACH_VER = '2.7d2'
-- DATI MACCHINA --
@@ -51,14 +51,14 @@ MDRILLTOP = { { Pos = H12Pos + Vector3d( 0, 0, 0), Ex=1, St=60}, --
{ Pos = H12Pos + Vector3d( 192, -192, 0), Ex=11, St=60}, -- uscita 11
{ Pos = H12Pos + Vector3d( 192, -224, 0), Ex=12, St=60}, -- uscita 12
{ Pos = H12Pos + Vector3d( 192, -256, 0), Ex=13, St=60}, -- uscita 13
{ Pos = H12Pos + Vector3d( 48, -80, 0), Ex=14, St=60}, -- uscita 14
{ Pos = H12Pos + Vector3d( 80, -80, 0), Ex=15, St=60}, -- uscita 15
{ Pos = H12Pos + Vector3d( 22, 96, 0), Ex=16, St=60}, -- uscita 16
{ Pos = H12Pos + Vector3d( 22, 64, 0), Ex=17, St=60}, -- uscita 17
{ Pos = H12Pos + Vector3d( 48, -186, 0), Ex=18, St=60}, -- uscita 18
{ Pos = H12Pos + Vector3d( 60, -186, 0), Ex=19, St=60}, -- uscita 19
{ Pos = H12Pos + Vector3d( 128, 96, 0), Ex=20, St=60}, -- uscita 20
{ Pos = H12Pos + Vector3d( 128, 64, 0), Ex=21, St=60}, -- uscita 21
{ 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( 22, 96, 0), Ex=16, Tw=20, St=60}, -- uscita 16
{ Pos = H12Pos + Vector3d( 22, 64, 0), Ex=17, Tw=21, St=60}, -- uscita 17
{ Pos = H12Pos + Vector3d( 48, -186, 0), Ex=18, Tw=14, St=60}, -- uscita 18
{ Pos = H12Pos + Vector3d( 60, -186, 0), Ex=19, Tw=15, St=60}, -- uscita 19
{ Pos = H12Pos + Vector3d( 128, 96, 0), Ex=20, Tw=16, St=60}, -- uscita 20
{ Pos = H12Pos + Vector3d( 128, 64, 0), Ex=21, Tw=17, St=60} -- uscita 21
}
-- testa 5 assi sotto
H21Pos = Vector3d( 0, 0, 0)
+8 -1
View File
@@ -165,8 +165,9 @@ end
function OnMachiningEnd()
-- Se foratura
if EMT.MCHTYPE == MCH_MY.DRILLING then
-- recupero la geometria dei fori
-- recupero l'elenco dei fori da fare e di quelli saltati
local vGeom = EgtGetMachiningGeometry() or {}
local vSkipped = EgtGetMachiningSkippedGeometry() or {}
-- calcolo il riferimento pezzo
local ptS = Point3d( EMT.PP)
local vtE = Vector3d( EMT.EXTR)
@@ -174,6 +175,12 @@ function OnMachiningEnd()
-- per ogni foro emetto la relativa lavorazione
for i = 1, #vGeom do
local nEntId = vGeom[i][1]
for j = 1, #vSkipped do
if nEntId == vSkipped[j][1] then
nEntId = nil
break
end
end
if nEntId and EgtGetType( nEntId) == GDB_TY.CRV_ARC then
local ptCen = EgtCP( nEntId, GDB_ID.ROOT)
ptCen:toLoc( refPart)