STC15F104W单片机虚拟串口字符串比较源程序 -

//本示例在Keil开发环境下请选择Intel的8058芯片型号进行编译
//若无特别说明,工作频率一般为11.0592MHz
#include "reg51.h"
#include<string.h>
#define d 5 //数组位定义
//-----------------------------------------
//define baudrate const
//BAUD = 65536 - FOSC/3/BAUDRATE/M (1T:M=1; 12T:M=12)
//NOTE: (FOSC/3/BAUDRATE) must be greater then 98, (RECOMMEND GREATER THEN 110)
//#define BAUD 0xF400 // 1200bps @ 11.0592MHz
//#define BAUD 0xFA00 // 2400bps @ 11.0592MHz
//#define BAUD 0xFD00 // 4800bps @ 11.0592MHz
#define BAUD 0xFE80 // 9600bps @ 11.0592MHz
//#define BAUD 0xFF40 //19200bps @ 11.0592MHz
//#define BAUD 0xFFA0 //38400bps @ 11.0592MHz
//#define BAUD 0xEC00 // 1200bps @ 18.432MHz
//#define BAUD 0xF600 // 2400bps @ 18.432MHz
//#define BAUD 0xFB00 // 4800bps @ 18.432MHz
//#define BAUD 0xFD80 // 9600bps @ 18.432MHz
//#define BAUD 0xFEC0 //19200bps @ 18.432MHz
//#define BAUD 0xFF60 //38400bps @ 18.432MHz
//#define BAUD 0xE800 // 1200bps @ 22.1184MHz
//#define BAUD 0xF400 // 2400bps @ 22.1184MHz
//#define BAUD 0xFA00 // 4800bps @ 22.1184MHz
//#define BAUD 0xFD00 // 9600bps @ 22.1184MHz
//#define BAUD 0xFE80 //19200bps @ 22.1184MHz
//#define BAUD 0xFF40 //38400bps @ 22.1184MHz
//#define BAUD 0xFF80 //57600bps @ 22.1184MHz
sfr AUXR = 0x8E;
sbit RXB = P3^0; //define UART TX/RX port
sbit TXB = P3^1;
typedef bit BOOL;
typedef unsigned char BYTE;
typedef unsigned int WORD;
BYTE TBUF,RBUF;
BYTE TDAT,RDAT;
BYTE TCNT,RCNT;
BYTE TBIT,RBIT;
BOOL TING,RING;
BOOL TEND,REND;
void UART_INIT();
unsigned char r;
bit b;
BYTE t, r;
BYTE buf[16];
void RUSRT();
void TUSRT(unsigned char dat,f);
sbit R1=P3^3; //输出1
sbit R2=P3^4;//输出2
bit cmd; //接收完成标志
bit Tcmd;
static unsigned char rc; //接收计数
static unsigned char tc; //发送计数
static unsigned char a1[d]={0x61,0x62,0x63,0x64,0x65} ; //5位比数组多1位结束位
static unsigned char q;
unsigned char c; //数据位计数
unsigned char *p; //数据指针
unsigned int n;
void main()
{
unsigned char fc; //发送延时
TMOD = 0x00; //timer0 in 16-bit auto reload mode
AUXR = 0x80; //timer0 working at 1T mode
TL0 = BAUD;
TH0 = BAUD>>8; //initial timer0 and set reload value
TR0 = 1; //tiemr0 start running
ET0 = 1; //enable timer0 interrupt
PT0 = 1;
//improve timer0 interrupt priority
EA = 1; //open global interrupt switch
UART_INIT();
while (1)
{ //user's function
RUSRT(); //调用接收函数
if(cmd==1) //接收完成
{
if(c!=4) //数据位错误
{
//发送错误指示
c=0;
cmd=0;
}
else if(c==4) //数据位正确
{
if( 0== strcmp (a1,"R1ONen" )) //字符比较
{
R1=0;
fc = sizeof(a1); //计算数组位数
for (n=0;n<20000;n++);
TING =1;
TEND=1;
TUSRT(a1,fc); //调用发送函数
}
if( 0== strcmp (a1,"R1OFen" )) //字符比较
{
R1=1;
fc = sizeof(a1); //计算数组位数
for (n=0;n<20000;n++);
TING =1;
TEND=1;
TUSRT(a1,fc); //调用发送函数
}
if( 0== strcmp (a1,"R2ONen" )) //字符比较
{
R2=0;
fc = sizeof(a1); //计算数组位数
for (n=0;n<20000;n++);
TING =1;
TEND=1;
TUSRT(a1,fc); //调用发送函数
}
if( 0== strcmp (a1,"R2OFen" )) //字符比较
{
R2=1;
fc = sizeof(a1); //计算数组位数
for (n=0;n<20000;n++);
TING =1;
TEND=1;
TUSRT(a1,fc); //调用发送函数
}
}
}
}
}
void RUSRT() //接收函数
{
if (REND)
{
REND = 0;
if (RBUF!='n') //判断不是结束符
{
a1[rc]=RBUF; //接收传送数组位
rc++;
c++;
}
else if(RBUF=='n') //判断是结束符
{REND=0;
rc=0;
cmd=1;
}
}
}
void TUSRT(unsigned char dat,f) //发送函数
{
if (TEND)
{
TEND=0;
if(tc<=f) //发送数据位比较
{
TBUF =a1[tc]; //数组位数据发送到发送寄存器
tc++;
p++;
}
else if (tc>=f) //发送数据比较
{
cmd =0; //发送复位
c=0;
tc=0;
TEND=0; //复位
TING=0;
}
}
}
//-----------------------------------------
//Timer interrupt routine for UART
void tm0() interrupt 1 using 1
{
if (RING)
{
if (--RCNT == 0)
{
RCNT = 3; //reset send baudrate counter
if (--RBIT == 0)
{
RBUF = RDAT; //save the data to RBUF
RING = 0; //stop receive
REND = 1; //set receive completed flag
}
else
{
RDAT >>= 1;
if (RXB) RDAT |= 0x80; //shift RX data to RX buffer
}
}
}
else if (!RXB)
{
RING = 1; //set start receive flag
RCNT = 4; //initial receive baudrate counter
RBIT = 9; //initial receive bit number (8 data bits + 1 stop bit)
}
if (--TCNT == 0)
{
TCNT = 3; //reset send baudrate counter
if (TING) //judge whether sending
{
if (TBIT == 0)
{
TXB = 0; //send start bit
TDAT = TBUF; //load data from TBUF to TDAT
TBIT = 9; //initial send bit number (8 data bits + 1 stop bit)
}
else
{
TDAT >>= 1; //shift data to CY
if (--TBIT == 0)
{
TXB = 1;
TING = 0; //stop send
TEND = 1; //set send completed flag
}
else
{
TXB = CY; //write CY to TX port
}
}
}
}
}
//-----------------------------------------
//initial UART module variable
void UART_INIT()
{
TING = 0;
RING = 0;
TEND = 0;
REND = 0;
TCNT = 0;
RCNT = 0;
}

复制代码