fix gestione allarmi...

2017-06-09 15:21:38 +02:00
parent e908e3b09a
commit 1ea4dee39d
3 changed files with 5445 additions and 5432 deletions
@@ -949,11 +949,11 @@ Namespace CNC
            ' RIFERIMENTO: 
            ' txt Giuseppe

-            ReDim itemRead(3)
+            ReDim itemRead(2)
            itemRead(0) = New Item("DB241.DBD0:[16]")   'Posizione attuale
            itemRead(1) = New Item("DB254.DBW140:[20]") 'Speed effettiva
            itemRead(2) = New Item("DB254.DBB180:[20]") 'Carico effettivo
-            itemRead(3) = New Item("DB241.DBD0:[16]")   'Posizione Target !!!FARE!!! è altra variabile?!? AA_IM
+            'itemRead(3) = New Item("DB241.DBD0:[16]")   'Posizione Target !!!FARE!!! è altra variabile?!? AA_IM

            Do
                Try
@@ -972,7 +972,7 @@ Namespace CNC
            For i As Integer = 0 To 15
                'datiAssi(i).PosAct = itemRead(0).Value(i)
                datiAssi(i).PosAct = UIntegerToSingle(itemRead(0).Value(i))
-                datiAssi(i).PosTgt = UIntegerToSingle(itemRead(3).Value(i))
+                'datiAssi(i).PosTgt = UIntegerToSingle(itemRead(3).Value(i))
            Next i
            For i As Integer = 0 To 19
                datiAssi(i).Speed = UIntegerToSingle(itemRead(1).Value(i))