/*
  function block
  name: Peeklwod
*/

#include <tasy0def.h>
#include <grfb0016.h>

typedef
   struct {

   } str_data;

uint16 FBINIT_peeklwod (uint16 hinstance)
{
   return (sizeof (str_data));
}

void FBACT_peeklwod (uint16 hinstance, str_data *data, str_arg *arg)
{
}

#define BOO_VALUE   ((T_BOO *)value)
#define ANA_VALUE   ((T_ANA *)value)
#define REAL_VALUE  ((T_REAL *)value)
#define TMR_VALUE   ((T_TMR *)value)
#define MSG_VALUE   ((T_MSG *)value)

void FBREAD_peeklwod (uint16 hinstance, str_data *data,
      uint16 parno, void *value)
{
}

ABP fbldef_peeklwod (char *name, IBP *initproc, RBP *readproc)
 {
   sys_strcpy (name, "PEEKLWOD");
   *initproc = (IBP)FBINIT_peeklwod;
   *readproc = (RBP)FBREAD_peeklwod;
   return ((ABP)FBACT_peeklwod);
}
