diff --git a/LuaLibs/BeamExec.lua b/LuaLibs/BeamExec.lua
index 4bb12fc..d0e21d5 100644
--- a/LuaLibs/BeamExec.lua
+++ b/LuaLibs/BeamExec.lua
@@ -128,6 +128,7 @@ function BeamExec.GetToolsFromDB()
          Tool.Feeds.dEndFeed = EgtTdbGetCurrToolParam( MCH_TP.ENDFEED)
          Tool.Feeds.dTipFeed = EgtTdbGetCurrToolParam( MCH_TP.TIPFEED)
          Tool.sHead = EgtTdbGetCurrToolParam( MCH_TP.HEAD)
+         Tool.nExit = EgtTdbGetCurrToolParam( MCH_TP.EXIT)
          Tool.SetupInfo = {}
          Tool.SetupInfo = BeamData.GetSetupInfo( Tool.sHead)
          if not Tool.SetupInfo.GetMinNzDownUp then
diff --git a/LuaLibs/PreSimulationLib.lua b/LuaLibs/PreSimulationLib.lua
index dd0c206..e32154b 100644
--- a/LuaLibs/PreSimulationLib.lua
+++ b/LuaLibs/PreSimulationLib.lua
@@ -85,10 +85,9 @@ local function CheckOutOfStrokePoint( ptOnFace, vtHead, vtNFace, vtNEdge, nSCC,
 
    local ptOnToolTipCenter = ptOnFace + vtNEdge * Tool.dDiameter / 2 + vtNFace * EgtIf( bIsDownUp, Tool.dThickness, 0)
 
-   -- TODO come gestire EXIT?????
    -- impostazione utensile
-   EgtSetCalcTool( Tool.sName, Tool.sHead, 1)
-   EgtLoadTool( Tool.sHead, 1, Tool.sName)
+   EgtSetCalcTool( Tool.sName, Tool.sHead, Tool.nExit)
+   EgtLoadTool( Tool.sHead, Tool.nExit, Tool.sName)
 
    -- settaggio SCC per discriminare soluzioni multiple
    EgtSetCalcSolCh( nSCC)