Hola Boris

He corrido el programa  PawnUdpRx modificado que adjuntaste con este codigo en el PLC

Pero el programa solo se queda en el primer dato y no muestra el valor te adjunto una imagen del programa

PlcMain()
{
   // Crear un array para almacenar los bytes a enviar.
   new Data[1]

   // Almacenar caracteres ASCII a enviar...
 
   Data[0] = 1000

   // Ciclo principal del programa.
   while(1)
   {
      // Enviar paquete UDP a dirección 192.168.1.15, puerto 4980.
      UdpSend(192,168,0,137, 4980, 1, Data, true)

      // Pausar programa por 1 segundo y conmutar led debug.
      DelayS(2)
      LedToggle()
   }
}

Agradeciendo tu acostumbrado apoyo quedo en espera de tus comentarios

Saludos

OK

Y estos datos no los puedo obtener en el programa PawnUdpRx.?

Es necesario crear una aplicacion C#?

Saludos

Estimado Boris

ya lo he corrido
Funciona perfectamente

Hola Boris

He leído la nota de aplicación STX-AN001  pero no me queda claro como usar la aplicación PLC UDP Receiver

Lo que quiero es enviar el valor de algunas variables cuando sea introducida una nueva clave en mi programa

cada que leo un nuevo valor en esta parte

// Leer registro 42020 para selección de articulo desde SH-300
     
      MbRtuServGetRegister(42020, Select)

necesito enviar el valor que tienen 3 variables en ese momento, la fecha y hora, a la aplicación antes mencionada

Saludos

José Camacho

Estimado Boris

Estoy tratando de imprimir las Rpm que me proporciona una señal cuadrada de 12V conectada al contador 1 en la entrada DIN7

En el panel HMI SH-300, el modelo del PLC que tengo es un 8091-D1  y la funcion nativa que estoy utilizando es la siguiente
   
      // Cargar  registro Rpm
     
      MbRtuServLoadRegister(42001,Count1GetEventRPM())

Mi problema es que en el LCD del panel me muestra una medicion mucho mas grande de lo que en realidad es

Realice la prueba en el Virtual HMI y funciona correctamente

A que se debe que las mediciones en el SH-300 sean mas elevadas??

Como lo puedo corregir

Te dejo el codigo que estoy usando para ver en que me puedes ayudar


PlcMain()
{

   // Inicializar rutinas Virtual-HMI.
   VirtualHmiInit()

new Select
  // new x
   //new y

   // Activar contador, cuenta por flanco ascendente.

   Count1Enable(COUNT_EDGE_RISING)
 
//
   // Inicializar Servidor ModBus RTU.
   //
   // Velocidad 9600 bps, formato 8E1 y direccion ModBus RTU 1.
   //
   // Interfaz: RS-232 (consulte hoja de datos de dispositivo)
   //
   // A partir de este momento, el servidor esta activo.
   //
   
   if(MbRtuServInit(1, 9600, SERIAL_8E1, MB_RTU_INTERFACE_RS232) < 0)
   {    
   // Error, pausar programa en este punto.
   while(true)
   {
   DelayMS(2000)
   LedToggle()
   }
   }

   //
   // Loop Principal.
   //
   Count1Reset()
   for(;;)
   {
   
             
   // Cargar  regustro Rpm
     
   MbRtuServLoadRegister(42001,Count1GetEventRPM())
   
   // Leer Holding Register en direccion 42020.
     
   MbRtuServGetRegister(42020, Select)
   
      switch (Select)
     
      {
          case 1:
          { 
             if (Count1GetEventRPM()<180)
              {
                 DoutSetOn(DOUT1)
          }
          if (Count1GetEventRPM()>200)
          {
             
          DoutSetOn(DOUT2) 
          }
          else
          {
           
          DoutSetOn(DOUT3)
             }
          }
      case 2:
          {  if (Count1GetEventRPM()<200)
              {
                 DoutSetOn(DOUT1)
          }
           if (Count1GetEventRPM()>200)
          {
             
          DoutSetOn(DOUT2)
          }
          else
          {
          DoutSetOn(DOUT3)
             }
             }
          case 3:
          {  if (Count1GetEventRPM()<220)
              {
                 DoutSetOn(DOUT1)
          }
           if (Count1GetEventRPM()>200)
          {
             
          DoutSetOn(DOUT2) 
          }
          else
          {
          DoutSetOn(DOUT3)
             }
             }
          case 4:
          {  if (Count1GetEventRPM()<240)
              {
                 DoutSetOn(DOUT1)
          }
           if (Count1GetEventRPM()>200)
          {
             
          DoutSetOn(DOUT2) 
          }
          else
          {
          DoutSetOn(DOUT3)
             }
             }
default:
            {
            DoutSetOn(DOUT1)
               }
      }
// Pausar ejecucion
DelayMS(250)
   
   }

   // Retorno.
   return 0
}
Saludos