/***************************************************************************\
	MODBus Master Serial Drivers for Rabbit 2000
		Copyright (c) 2002 Z-World, Inc.
		Copyright (c) 1999, CFControls, Inc.
\***************************************************************************/

/*** BeginHeader */
#ifndef __MMZ_RAB_LIB
#define __MMZ_RAB_LIB

#use	"MM_RAB.LIB"					//	MODBus Master Library
/*** EndHeader */

/***************************************************************************\
	MODBus Rabbit 2000 drivers
\***************************************************************************/

/*** BeginHeader mmAinit */
int mmAinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte = serAgetc();
	return cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;  
	mmAtx();  
	nDone = serAwrite(pcMess, wLen);
	mmArx();
	return nDone;
}

nodebug
int mmAinit(unsigned long qBaud)
{
 	return mmAopen(qBaud);
}

/*** BeginHeader mmBinit */
int mmBinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte = serBgetc();
	return cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;    
	mmBtx();  
	nDone = serBwrite(pcMess, wLen);
	mmBrx();
	return nDone;
}

nodebug
int mmBinit(unsigned long qBaud)
{
	return mmBopen(qBaud);  
}

/*** BeginHeader mmCinit */
int mmCinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte = serCgetc();
	return cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;      
	mmCtx();  
	nDone = serCwrite(pcMess, wLen);
	mmCrx();
	return nDone;
}

nodebug
int mmCinit(unsigned long qBaud)
{
	return mmCopen(qBaud);  
}

/*** BeginHeader mmDinit */
int mmDinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte =  serDgetc();
	return   cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;
	mmDtx();  
	nDone = serDwrite(pcMess, wLen);
	mmDrx();
	return nDone;
}

nodebug
int mmDinit(unsigned long qBaud)
{
	return mmDopen(qBaud);  
}

/*** BeginHeader */
#if ( _CPU_ID_ >= R3000 )
/*** EndHeader */


/*** BeginHeader mmEinit */
int mmEinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte =  serEgetc();
	return   cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;
	mmEtx();  
	nDone = serEwrite(pcMess, wLen);
	mmErx();
	return nDone;
}

nodebug
int mmEinit(unsigned long qBaud)
{
	return mmEopen(qBaud);  
}

/*** BeginHeader mmFinit */
int mmFinit(unsigned long);
/*** EndHeader */

nodebug
int mmRecv(void)
{
	auto int cByte;
	cByte =  serFgetc();
	return   cByte;
}

nodebug
int mmSend(unsigned char *pcMess, unsigned wLen)
{
	auto int nDone;
	mmFtx();  
	nDone = serFwrite(pcMess, wLen);
	mmFrx();
	return nDone;
}

nodebug
int mmFinit(unsigned long qBaud)
{
	return mmFopen(qBaud);  
}
/*** BeginHeader */
#endif
/*** EndHeader */


/***************************************************************************\
	MODBus Master ASCII
\***************************************************************************/

/*** BeginHeader mmaAinit */
int mmaAinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaAInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaAinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port A as Modbus ASCII Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaAinit(unsigned long qBaud)
{
	mmaInit();
	return mmAinit(qBaud);
}

/*** BeginHeader mmaBinit */
int mmaBinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaBInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaBinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port B as Modbus ASCII Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaBinit(unsigned long qBaud)
{
	mmaInit();
	return mmBinit(qBaud);
}

/*** BeginHeader mmaCinit */
int mmaCinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaCInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaCinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port C as Modbus ASCII Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaCinit(unsigned long qBaud)
{
	mmaInit();
	return mmCinit(qBaud);
}

/*** BeginHeader mmaDinit */
int mmaDinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaDInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaDinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port D as Modbus ASCII Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaDinit(unsigned long qBaud)
{
	mmaInit();
	return mmDinit(qBaud);
}

/*** BeginHeader */
#if ( _CPU_ID_ >= R3000 )
/*** EndHeader */

/*** BeginHeader mmaEinit */
int mmaEinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaEInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaEinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port E as Modbus ASCII Master.
					(Not supported for R2000 CPU products)          
PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaEinit(unsigned long qBaud)
{
	mmaInit();
	return mmEinit(qBaud);
}

/*** BeginHeader mmaFinit */
int mmaFinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmaFInit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmaFinit(unsigned long qBaud)

DESCRIPTION: Initialize serial port F as Modbus ASCII Master.
				 (Not supported for R2000 CPU products)
PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmaFinit(unsigned long qBaud)
{
	mmaInit();
	return mmFinit(qBaud);
}
/*** BeginHeader */
#endif		//	#if ( _CPU_ID_ >= R3000 )     
/*** EndHeader */

/***************************************************************************\
	MODBus Master RTU
\***************************************************************************/

/*** BeginHeader mmrAinit */
int mmrAinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmrAinit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmrAinit(unsigned long qBaud, unsigned wMode)

DESCRIPTION: Initialize serial port A as Modbus RTU Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmrAinit(unsigned long	qBaud)
{
	mmrInit(qBaud);
	return mmAinit(qBaud);
}

/*** BeginHeader mmrBinit */
int mmrBinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmrBinit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmrBinit(unsigned long qBaud, unsigned wMode)

DESCRIPTION: Initialize serial port B as Modbus RTU Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmrBinit(unsigned long	qBaud)
{
	mmrInit(qBaud);
	return mmBinit(qBaud);
}

/*** BeginHeader mmrCinit */
int mmrCinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmrCinit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmrCinit(unsigned long qBaud, unsigned wMode)

DESCRIPTION: Initialize serial port C as Modbus RTU Master.

PARAMETER1: baud rate (bits per second).

RETURN VALUE: Always 1.
END DESCRIPTION ******************************************************/
nodebug
int mmrCinit(unsigned long	qBaud)
{
	mmrInit(qBaud);
	return mmCinit(qBaud);
}

/*** BeginHeader mmrDinit */
int mmrDinit(unsigned long);
/*** EndHeader */

/* START FUNCTION DESCRIPTION *****************************************
mmrDinit                         <MMZ_RAB.LIB>

NOTE: MMZ_RAB.LIB functions are generally not reentrant.

SYNTAX: int mmrDinit(unsigned long qBaud, unsigned wMode)

DESCRIPTION: Initialize serial port D as Modbus RTU Master.