From 3ddd75cf3f155de5137546fad3bd14a28a2ba6ca Mon Sep 17 00:00:00 2001 From: Samuele Locatelli Date: Wed, 8 Sep 2021 15:25:04 +0200 Subject: [PATCH] Aggiunto comando forcxe reset contapezzi x Cosmap --- IOB-WIN-NEXT/IobSiemensCosmap.cs | 24 ++++++++++++++++++++---- 1 file changed, 20 insertions(+), 4 deletions(-) diff --git a/IOB-WIN-NEXT/IobSiemensCosmap.cs b/IOB-WIN-NEXT/IobSiemensCosmap.cs index dc0bb12c..9a237d8c 100644 --- a/IOB-WIN-NEXT/IobSiemensCosmap.cs +++ b/IOB-WIN-NEXT/IobSiemensCosmap.cs @@ -2,6 +2,7 @@ using System; using System.Collections.Generic; using System.Linq; +using System.Threading; namespace IOB_WIN_NEXT { @@ -20,7 +21,7 @@ namespace IOB_WIN_NEXT * * Si intende lettura/scrittura con DB6.DBxx * - * DB6 + * DB6 * CodOdl Array[000..049] of Char DBB0..49 * RicettaRich Array[050..099] of Char DBB50..99 * CodArt Array[100..150] of Char DBB100..149 @@ -80,12 +81,12 @@ namespace IOB_WIN_NEXT //fatto = S7ReadBB(ref MemInt, "DB6.DBW204", 2); //valW = S7.Net.Types.Word.FromByteArray(MemInt.ToArray()); //var testalW = S7.Net.Types.Word.FromByteArray(RawInput.Skip(204).Take(2).ToArray()); - currStatus = S7.Net.Types.Word.FromByteArray(RawInput.Skip(204).Take(2).ToArray()); + currStatus = S7.Net.Types.Word.FromByteArray(RawInput.Skip(204).Take(2).ToArray()); //fatto = S7ReadBB(ref MemInt, "DB6.DBW206", 2); //valW = S7.Net.Types.Word.FromByteArray(MemInt.ToArray()); //allarme = valW; - allarme = S7.Net.Types.Word.FromByteArray(RawInput.Skip(206).Take(2).ToArray()); + allarme = S7.Net.Types.Word.FromByteArray(RawInput.Skip(206).Take(2).ToArray()); int byteSignals = 0; // bit 0 (poweron) imposto a 1 SE connected... @@ -105,12 +106,15 @@ namespace IOB_WIN_NEXT case 1: byteSignals += (1 << 1); break; + case 2: byteSignals += (1 << 4); break; + case 3: byteSignals += (1 << 5); break; + default: break; } @@ -157,7 +161,6 @@ namespace IOB_WIN_NEXT { case taskType.nihil: case taskType.fixStopSetup: - case taskType.forceResetPzCount: case taskType.forceSetPzCount: case taskType.setProg: case taskType.sendWatchDogMes2Plc: @@ -196,6 +199,19 @@ namespace IOB_WIN_NEXT taskVal = item.Value; break; + case taskType.forceResetPzCount: + // processo scrittura BIT su DB6.DBDW216 + MemBlock = new byte[1]; + MemBlock[0] = (byte)1; + memAddrWrite = "DB6.DBDW216"; + // scrivo subito + taskOk = S7WriteBB(ref MemBlock, memAddrWrite); + // pausa 1 sec + Thread.Sleep(1000); + // preparo altra scrittura + MemBlock[0] = (byte)0; + break; + case taskType.startSetup: // processo scrittura BIT su DB6.DBDW216 MemBlock = new byte[1];