Egalware/essetre-90480023_xs-mw
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Corretta scrittura origini

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files
Essetre-WALL.NUM.mlpe
+15 -12
View File
@@ -56,17 +56,17 @@ function OnProgramStart()
end
EmtOutput( '('.. MLE_INFO..')')
-- Parametri macchina
local sOut = 'L151='..EgtNumToString( DeltaTabY + DimTabY - Nail11DeltaY, 2)..'\n'..
'L152='..EgtNumToString( -DeltaTabX + Nail11DeltaX, 2)..'\n'..
local sOut = 'L151='..EgtNumToString( Nail11DeltaY - DeltaTabY, 2)..'\n'..
'L152='..EgtNumToString( DeltaTabX - Nail11DeltaX, 2)..'\n'..
'L153='..EgtNumToString( DeltaTabZ - Nail11DeltaZ, 2)..'\n'..
'L154='..EgtNumToString( DeltaTabY + DimTabY - Nail12DeltaY, 2)..'\n'..
'L155='..EgtNumToString( -DeltaTabX + Nail12DeltaX, 2)..'\n'..
'L154='..EgtNumToString( Nail12DeltaY - DeltaTabY, 2)..'\n'..
'L155='..EgtNumToString( DeltaTabX - Nail12DeltaX, 2)..'\n'..
'L156='..EgtNumToString( DeltaTabZ - Nail12DeltaZ, 2)..'\n'..
'L157='..EgtNumToString( DeltaTabY + DimTabY - Nail13DeltaY, 2)..'\n'..
'L158='..EgtNumToString( -DeltaTabX + Nail13DeltaX, 2)..'\n'..
'L157='..EgtNumToString( Nail13DeltaY - DeltaTabY, 2)..'\n'..
'L158='..EgtNumToString( DeltaTabX - Nail13DeltaX, 2)..'\n'..
'L159='..EgtNumToString( DeltaTabZ - Nail13DeltaZ, 2)..'\n'..
'L160='..EgtNumToString( DeltaTabY + DimTabY - Nail14DeltaY, 2)..'\n'..
'L161='..EgtNumToString( -DeltaTabX + Nail14DeltaX, 2)..'\n'..
'L160='..EgtNumToString( Nail14DeltaY - DeltaTabY, 2)..'\n'..
'L161='..EgtNumToString( DeltaTabX - Nail14DeltaX, 2)..'\n'..
'L162='..EgtNumToString( DeltaTabZ - Nail14DeltaZ, 2)..'\n'..
'L163='..EgtNumToString( Orig2DeltaY, 2)..'\n'..
'L164='..EgtNumToString( -Orig2DeltaX, 2)..'\n'..
@@ -77,10 +77,13 @@ function OnProgramStart()
'L169='..EgtNumToString( Orig4DeltaY, 2)..'\n'..
'L170='..EgtNumToString( -Orig4DeltaX, 2)..'\n'..
'L171='..EgtNumToString( Orig4DeltaZ, 2)..'\n'..
'G114'..' EA'..EgtNumToString( DeltaTabY + DimTabY - SawDeltaY, 2)..' EB'..EgtNumToString( -DeltaTabX + SawDeltaX, 2)..
' EC'..EgtNumToString( DeltaTabZ - SawDeltaZ, 2)..' ED'..EgtNumToString( 0, 2)..' EE'..EgtNumToString( SawOffs, 2)..
' EF'..EgtNumToString( DeltaTabY + DimTabY, 2)..' EG'..EgtNumToString( -DeltaTabX, 2)..
' EH'..EgtNumToString( DeltaTabZ, 2)..' EI'..EgtNumToString( MillOffs, 2)
'G114'..' EA'..EgtNumToString( -DeltaTabY, 2)..' EB'..EgtNumToString( DeltaTabX, 2)..
' EC'..EgtNumToString( DeltaTabZ, 2)..' ED'..EgtNumToString( MillOffs, 2)..
' EE'..EgtNumToString( Nail11DeltaY - DeltaTabY, 2, 2)..' EF'..EgtNumToString( DeltaTabX - Nail11DeltaX, 2)..' EG'..EgtNumToString( DeltaTabZ - Nail11DeltaZ, 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)
-- Indice lavorazione
EMT.CNT = 0