diff --git a/Constants/ConstMachIni.vb b/Constants/ConstMachIni.vb
index 6370f09..2c04c08 100644
--- a/Constants/ConstMachIni.vb
+++ b/Constants/ConstMachIni.vb
@@ -186,6 +186,7 @@
    Public Const K_CAMERA_DIRECT_CMD As String = "CameraDirectCmd"
    Public Const K_CAMERA_STATE_VAR As String = "CameraStateVar"
    Public Const K_ENABELE_GOHOME_FOR_PHOTO As String = "EnableGoHomeForPhoto"
+   Public Const K_PENDIG_TIME_FOR_PHOTO As String = "PendigTimeForPhoto"
 
    Public Const S_TOOLS As String = "Tools"
    Public Const K_DRILLBIT As String = "Drillbit"
diff --git a/RawPhoto/Camera.vb b/RawPhoto/Camera.vb
index fa61e01..8794e9c 100644
--- a/RawPhoto/Camera.vb
+++ b/RawPhoto/Camera.vb
@@ -390,6 +390,8 @@ Public Class Camera
       ' Leggo nome variabile posizione home raggiunta
       Dim CameraStateNameVar As String = String.Empty
       GetPrivateProfileString(S_PHOTO, K_CAMERA_STATE_VAR, "", CameraStateNameVar, m_MainWindow.GetMachIniFile())
+      Dim nSteps As Integer = 20
+      nSteps = GetPrivateProfileInt(S_PHOTO, K_PENDIG_TIME_FOR_PHOTO, nSteps, m_MainWindow.GetMachIniFile())
       If String.IsNullOrEmpty(CameraStateNameVar) Then
          'Return False
       Else
@@ -403,7 +405,7 @@ Public Class Camera
       System.Threading.Thread.Sleep(300)
       ' Definisco flag posizionamento completato
       Dim bPositionOk As Boolean = False
-      For I As Integer = 0 To 40
+      For I As Integer = 0 To nSteps
          ' Devo rileggere la variabile ad ogni ciclo
          m_MainWindow.m_CNCommunication.m_CN.ReadEls_Add_Parameter(CameraStateNameVar, 3)
          System.Threading.Thread.Sleep(100)