From 85753e6cf0be49acf3a1d2ff32cd3979e4580434 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.sassi@egalware.com>
Date: Wed, 8 Nov 2023 18:24:53 +0100
Subject: [PATCH] Essetre-FAST : - aggiornamenti per rinvio angolare.

---
 Beam/MachData.ini | 4 ++--
 Essetre-FAST.mlde | 9 +++++----
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/Beam/MachData.ini b/Beam/MachData.ini
index dae59d4..25620da 100644
--- a/Beam/MachData.ini
+++ b/Beam/MachData.ini
@@ -28,8 +28,8 @@ Name=Offsets
 23=d,OFFSETCLAMA,0,OFFSETCLAMA
 24=d,OFFSETBLAMA,0,OFFSETBLAMA
 25=d,RIBCAR,0,RIBCAR
-26=d,SECSUP,1,SECSUP
-27=d,BLOCKHAUS,0,Blockhaus Configuration
+26=d,SECSUP,3,SECSUP
+27=d,BLOCKHAUS,1,Blockhaus Configuration
 28=l,NOULOAD,0,Max Unload Length (0=no limits)
 29=l,OFFSETX_RINV_1,150,OFFSETX_RINV_1
 30=l,OFFSETZ_RINV_1,347,OFFSETZ_RINV_1
diff --git a/Essetre-FAST.mlde b/Essetre-FAST.mlde
index cc06af3..f578cec 100644
--- a/Essetre-FAST.mlde
+++ b/Essetre-FAST.mlde
@@ -283,10 +283,11 @@ if SecondSupport >= 3 then
          OthColl = { 'H2', 'B/SOLID', 'C/SOLID'},
          Geo = 'H5_HEAD/GEO',
          Aux = {'H5_HEAD/SOLID', 'H5_HEAD/COLLISION'}}
-   EgtSetInfo( H5Id, 'AGB_TYPE', '2')
-   EgtSetInfo( H5Id, 'AGB_DMAX', '250')
-   EgtSetInfo( H5Id, 'AGB_ENCH', '44')
-   EgtSetInfo( H5Id, 'AGB_ENCV', '380')
+   EgtSetInfo( H5Id, 'AGB_TYPE', 2)
+   EgtSetInfo( H5Id, 'AGB_DMAX', 240)
+   EgtSetInfo( H5Id, 'AGB_ENCH', 44)
+   EgtSetInfo( H5Id, 'AGB_ENCV', 380)
+   EgtSetInfo( H5Id, 'AGB_MDIR', -Y_AX())
    EgtSetInfo( H5Id, 'ZMAXONROT', '1,15')
 end
 -- Morse