Corretta scrittura origini

This commit is contained in:
andrea.villa
2026-04-07 15:06:41 +02:00
parent bd7c69ac0a
commit 5b072281f4
2 changed files with 20 additions and 17 deletions
+5 -5
View File
@@ -8,7 +8,7 @@ require( 'EmtGenerator')
EgtEnableDebug( false) EgtEnableDebug( false)
if not EmtModifyHeadAuxDirection then error( 'A newer version of the program is required (minimum 2.3j5)') end if not EmtModifyHeadAuxDirection then error( 'A newer version of the program is required (minimum 2.3j5)') end
PP_VER = '3.1d1_DEV7' PP_VER = '3.1d1_DEV8'
PP_NVER = '2.7.4.1' PP_NVER = '2.7.4.1'
-- Parametri macchina -- Parametri macchina
@@ -53,13 +53,13 @@ Nail14DeltaX = 0 -- Distanza da Mandrino a Graffettatrice H24 (non esiste
Nail14DeltaY = 0 Nail14DeltaY = 0
Nail14DeltaZ = 0 Nail14DeltaZ = 0
Orig2DeltaX = 0 -- Origine angolo tavola 2 Orig2DeltaX = 0 -- Origine angolo tavola 2
Orig2DeltaY = -3500 Orig2DeltaY = 0
Orig2DeltaZ = 0 Orig2DeltaZ = 0
Orig3DeltaX = 33383 -- Origine angolo tavola 2 Orig3DeltaX = 0 -- Origine angolo tavola 2
Orig3DeltaY = 0 Orig3DeltaY = 0
Orig3DeltaZ = 0 Orig3DeltaZ = 0
Orig4DeltaX = 33383 -- Origine angolo tavola 2 Orig4DeltaX = 0 -- Origine angolo tavola 2
Orig4DeltaY = -3500 Orig4DeltaY = 0
Orig4DeltaZ = 0 Orig4DeltaZ = 0
Orig5DeltaX = 27000 -- Origine angolo tavola 2 Orig5DeltaX = 27000 -- Origine angolo tavola 2
Orig5DeltaY = 0 Orig5DeltaY = 0
+15 -12
View File
@@ -56,17 +56,17 @@ function OnProgramStart()
end end
EmtOutput( '('.. MLE_INFO..')') EmtOutput( '('.. MLE_INFO..')')
-- Parametri macchina -- Parametri macchina
local sOut = 'L151='..EgtNumToString( DeltaTabY + DimTabY - Nail11DeltaY, 2)..'\n'.. local sOut = 'L151='..EgtNumToString( Nail11DeltaY - DeltaTabY, 2)..'\n'..
'L152='..EgtNumToString( -DeltaTabX + Nail11DeltaX, 2)..'\n'.. 'L152='..EgtNumToString( DeltaTabX - Nail11DeltaX, 2)..'\n'..
'L153='..EgtNumToString( DeltaTabZ - Nail11DeltaZ, 2)..'\n'.. 'L153='..EgtNumToString( DeltaTabZ - Nail11DeltaZ, 2)..'\n'..
'L154='..EgtNumToString( DeltaTabY + DimTabY - Nail12DeltaY, 2)..'\n'.. 'L154='..EgtNumToString( Nail12DeltaY - DeltaTabY, 2)..'\n'..
'L155='..EgtNumToString( -DeltaTabX + Nail12DeltaX, 2)..'\n'.. 'L155='..EgtNumToString( DeltaTabX - Nail12DeltaX, 2)..'\n'..
'L156='..EgtNumToString( DeltaTabZ - Nail12DeltaZ, 2)..'\n'.. 'L156='..EgtNumToString( DeltaTabZ - Nail12DeltaZ, 2)..'\n'..
'L157='..EgtNumToString( DeltaTabY + DimTabY - Nail13DeltaY, 2)..'\n'.. 'L157='..EgtNumToString( Nail13DeltaY - DeltaTabY, 2)..'\n'..
'L158='..EgtNumToString( -DeltaTabX + Nail13DeltaX, 2)..'\n'.. 'L158='..EgtNumToString( DeltaTabX - Nail13DeltaX, 2)..'\n'..
'L159='..EgtNumToString( DeltaTabZ - Nail13DeltaZ, 2)..'\n'.. 'L159='..EgtNumToString( DeltaTabZ - Nail13DeltaZ, 2)..'\n'..
'L160='..EgtNumToString( DeltaTabY + DimTabY - Nail14DeltaY, 2)..'\n'.. 'L160='..EgtNumToString( Nail14DeltaY - DeltaTabY, 2)..'\n'..
'L161='..EgtNumToString( -DeltaTabX + Nail14DeltaX, 2)..'\n'.. 'L161='..EgtNumToString( DeltaTabX - Nail14DeltaX, 2)..'\n'..
'L162='..EgtNumToString( DeltaTabZ - Nail14DeltaZ, 2)..'\n'.. 'L162='..EgtNumToString( DeltaTabZ - Nail14DeltaZ, 2)..'\n'..
'L163='..EgtNumToString( Orig2DeltaY, 2)..'\n'.. 'L163='..EgtNumToString( Orig2DeltaY, 2)..'\n'..
'L164='..EgtNumToString( -Orig2DeltaX, 2)..'\n'.. 'L164='..EgtNumToString( -Orig2DeltaX, 2)..'\n'..
@@ -77,10 +77,13 @@ function OnProgramStart()
'L169='..EgtNumToString( Orig4DeltaY, 2)..'\n'.. 'L169='..EgtNumToString( Orig4DeltaY, 2)..'\n'..
'L170='..EgtNumToString( -Orig4DeltaX, 2)..'\n'.. 'L170='..EgtNumToString( -Orig4DeltaX, 2)..'\n'..
'L171='..EgtNumToString( Orig4DeltaZ, 2)..'\n'.. 'L171='..EgtNumToString( Orig4DeltaZ, 2)..'\n'..
'G114'..' EA'..EgtNumToString( DeltaTabY + DimTabY - SawDeltaY, 2)..' EB'..EgtNumToString( -DeltaTabX + SawDeltaX, 2).. 'G114'..' EA'..EgtNumToString( -DeltaTabY, 2)..' EB'..EgtNumToString( DeltaTabX, 2)..
' EC'..EgtNumToString( DeltaTabZ - SawDeltaZ, 2)..' ED'..EgtNumToString( 0, 2)..' EE'..EgtNumToString( SawOffs, 2).. ' EC'..EgtNumToString( DeltaTabZ, 2)..' ED'..EgtNumToString( MillOffs, 2)..
' EF'..EgtNumToString( DeltaTabY + DimTabY, 2)..' EG'..EgtNumToString( -DeltaTabX, 2).. ' EE'..EgtNumToString( Nail11DeltaY - DeltaTabY, 2, 2)..' EF'..EgtNumToString( DeltaTabX - Nail11DeltaX, 2)..' EG'..EgtNumToString( DeltaTabZ - Nail11DeltaZ, 2)..
' EH'..EgtNumToString( DeltaTabZ, 2)..' EI'..EgtNumToString( MillOffs, 2) ' EH'..EgtNumToString( Nail12DeltaY - DeltaTabY, 2, 2)..' EI'..EgtNumToString( DeltaTabX - Nail12DeltaX, 2)..' EL'..EgtNumToString( DeltaTabZ - Nail12DeltaZ, 2)..
' EM'..EgtNumToString( Nail13DeltaY - DeltaTabY, 2, 2)..' EN'..EgtNumToString( DeltaTabX - Nail13DeltaX, 2)..' EO'..EgtNumToString( DeltaTabZ - Nail13DeltaZ, 2)..
' EP'..EgtNumToString( Nail14DeltaY - DeltaTabY, 2, 2)..' EQ'..EgtNumToString( DeltaTabX - Nail14DeltaX, 2)..' ER'..EgtNumToString( DeltaTabZ - Nail14DeltaZ, 2)
EmtOutput( sOut) EmtOutput( sOut)
-- Indice lavorazione -- Indice lavorazione
EMT.CNT = 0 EMT.CNT = 0