@WSAR1-V1@ U   @DPS@ œ    2)b[º™:ÐãUsÄù_~ªÓ]ÏÃdCºPy­&
ËÕtYäí:Ðù-¦ŠKBõÃd_âÕM=šðY¡†*kòÑs[åÀM=šðY¡†*küÙrSÍ½pÙ!ªë|YòÞDõí:Ðù-¦ŠK\ùÒ`QâÑ}mºPy­&
ËÜyRóß}@ùÜumºPuÞôCuÓäYÞ½@NOTE@ v  com_sts

Set RTS,DTR and Get CTS,DSR of COM PORT 

*** Target : I-8417/8817/8437/8837 , I-7188EG , I-7188XG ***

For I-8417/8817/8437/8837:
************************************************
Valid ComPort No. is 4 ~ 20
************************************************
 
For I-7188XG & I-7188EG:
************************************************
Valid ComPort No. is 4
************************************************

call:

    PORT_   :  Integer      3:COM3 ,4:COM4, 5:COM5
    RTS_    :  boolean	    TRUE : set RTS active, FALSE : set RTS inactive
    DTR_    :  boolean	    TRUE : set DTR active, FALSE : set DTR inactive


return: 

    Q_      : boolean      ok.: TRUE , fail: FALSE 
    CTS_    : boolean      Get CTS status
    DSR_    : boolean      Get DSR status


notes:  
       1. Using Comopen() to open port

ICP DAS , Taiwan
Jun.15,2004
@PARAM@ 5   #A<PORT_
#B<RTS_
#B<DTR_
#B>Q_
#B>CTS_
#B>DSR_
@SRC@   /*
  function block
  name: com_sts
*/

#include <tasy0def.h>
#include <grfb0085.h>

typedef
   struct {

   } str_data;

uint16 FBINIT_com_sts (uint16 hinstance)
{
   return (sizeof (str_data));
}

void FBACT_com_sts (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_com_sts (uint16 hinstance, str_data *data,
      uint16 parno, void *value)
{
}

ABP fbldef_com_sts (char *name, IBP *initproc, RBP *readproc)
 {
   sys_strcpy (name, "COM_STS");
   *initproc = (IBP)FBINIT_com_sts;
   *readproc = (RBP)FBREAD_com_sts;
   return ((ABP)FBACT_com_sts);
}
@DEFS@   /*
  function block interface
  name: com_sts
*/

typedef long  T_BOO;
typedef long  T_ANA;
typedef float T_REAL;
typedef long  T_TMR;
typedef char  *T_MSG;

typedef struct {
   /* CALL   */ T_ANA  _port_;
   /* CALL   */ T_BOO  _rts_;
   /* CALL   */ T_BOO  _dtr_;
} str_arg;

#define PORT_            (arg->_port_)
#define RTS_             (arg->_rts_)
#define DTR_             (arg->_dtr_)

#define FBLPNO_Q_               0
#define FBLPNO_CTS_             1
#define FBLPNO_DSR_             2
@END@ 