发一个很好用的IO模拟UART口的程序

mon51

1：波特率可以到9600.
2：数据接，发很可靠。
3：接收采用中断方式，实时性较高。
********************************************************************************/
#define  UART_SEND_Pin GPIO4        //GPIO4=TXD
//********************************************************************************
void BPS_Delay(void){

        TMR2IF=0;
        TMR2ON=1;
        while(!TMR2IF);
        TMR2ON=0;
        PR2=TtK;
}
//*********************************************************************************
//发送一串数据
//*********************************************************************************
void SendOut(unsigned char *p,unsigned char Long){
        unsigned char i,Dat;          
        while(Long--){
                i=8;                                                  //1200 8.n 1        P d8 S
                UART_SEND_Pin=0;                        //开始位
                PR2=TtK;
                BPS_Delay();
                Dat=*p++;
                while(i--){
                        UART_SEND_Pin=(bit)(Dat & 0x01);
                        Dat>>=1;       
                        BPS_Delay();
                }
                UART_SEND_Pin=1;
                BPS_Delay();       
        }
}

#define Uart_IN_IO  GPIO3   //GPIO3=接收！
void Uart_Rece (void ){
        unsigned char i,j;
        unsigned char Buf[8];         //接收缓存！
        unsigned char bt;
        //***********************************************************
        //产生中断，开始接收！查询！
        while(!Uart_IN_IO);
        //************************************************************
        for(j=0;j<sizeof(Buf);j++){
                //***********************************************************
                //产生中断，开始接收！查询！
                i=TtK/2;
                i +=TtK;
                //***********************************************************
                PR2=i;
                BPS_Delay();
                //************************************************************
                bt=8;i=0;
                while(bt--){
                        i>>=1;
                        if(Uart_IN_IO) i |=0x80;
                        //*************************************************************
                        //延时等待下一个位
                        BPS_Delay();
                }
                //************************************************************
                //等待结束位 （1）
                BPS_Delay();
                Buf[j]=i;       
                //数据处理  。。。。



        }
//**********************************************************************************
void Exit_int_config(void){
        INTCON         |=B0000_1000;                //GPIE=1
        IOC         =B0000_1000;                //RXD 脚启动电平中断
}

//***********************************************************************************
//中断入口总程序
void interrupt ISR(void){                //中断服务总程序.
        if(GPIE && GPIF){
                GPIF=0;                                        //清除标志
                //****************************************
                Uart_Rece ();
        }
        //-------------------------------------------------------------
       

}

//------------------------------------------------------------
#define F_osc        (4000000)                        //工作频率 4MHz
//------------------------------------------------------------
#define BPS                        (9600)                         //9600
#define TUS                        (20)                        //微调时间 15~35  2013-5-2测试Ok 9600
//*************************************************************
//t1 自动重装波特率计算公式 CCLK/(256－TH1)32
//*************************************************************
#define TtK                        (F_osc/4/BPS-TUS)        //化简后的结果！(15开始没有乱码到160很好）

从多个文件中COPY出来，顺续有点乱。

kinsno

我靠，太狠了！真用在产品上，还是有点怕怕啊！

xjtyOnly51

mark, thanks

gaolf_2012

同时收发不行吧

xiaofeng87

这个系统资源占用太大把。

Lauchael

Marking and thank you !

mon51

gaolf_2012 发表于 2014-1-28 12:08
同时收发不行吧

不能同时发，收。

2006lc

谢谢分享，
有机会研究一下

mon51

再发一个采用中断接收单字节的程序，效果很好。接收大量的数据，也不会乱码。
#define Uart_IN_IO  GPIO3                   //GPIO3=接收！
#define MAX_RS232_CNT                20                //通讯的字节数
//**************************************************************
unsigned char Get_Uart_Rece_Dat (void ){
        unsigned char i,bt;

        BPS_Delay();
        //************************************************************
        bt=8;
        i=0;
        while(bt--){
                i>>=1;
                if(Uart_IN_IO) i |=0x80;
                //*************************************************************
                //延时等待下一个位
                BPS_Delay();
        }
        //************************************************************
        //等待结束位 （1）
        //BPS_Delay();
        return i;
}
//-----------------------------------------------------------------------
static char getBuf[MAX_RS232_CNT],cnt=0;         //接收缓存！
static bit fFlag=0;
//********************************************************************
void Uart_Rece (void ){
        //***********************************************************
        //产生中断，开始接收！查询！
        PR2=TtK/2+TtK;
        getBuf[cnt]=Get_Uart_Rece_Dat();
        if(++cnt >=sizeof(getBuf)){
                fFlag=1;       
                cnt=0;
        }
}
//********************************************************************
void SendBack(void){
//        unsigned char i;
        if(fFlag){
                fFlag=0;
                //**************************************
                //数据校验！
               
                SendOut(getBuf,MAX_RS232_CNT);//数据回发，检验是否正确！
        }
}

mon51

#define BPS_Delay()        {TMR2IF=0;TMR2ON=1;while(!TMR2IF);TMR2ON=0;        PR2=TtK;}

mon51

//------------------------------------------------------------
#define F_osc        (4000000)                        //工作频率 4MHz
//------------------------------------------------------------
#define BPS                        (9600)                         //9600
//************************************************************
//TUS=27  9600
//UDS=    4800
#define TUS                        (20)                        //27模拟仿真很好！！微调时间 15~35  2013-5-2测试Ok 9600
//*************************************************************
//t1 自动重装波特率计算公式 CCLK/(256－TH1)32
//*************************************************************
#define TtK                        (F_osc/4/BPS-TUS)        //化简后的结果！(15开始没有乱码到160很好）将PCLK转换成MHZ

mon51

//*********************************************************************************
//发送一串数据
//*********************************************************************************
void SendOut(unsigned char *p,unsigned char Long){
        unsigned char i,Dat;          
        while(Long--){
                i=8;                                                  //9600 8.n 1        P d8 S
                UART_SEND_Pin=0;                        //开始位
                PR2=TtK;
                BPS_Delay();
                Dat=*p++;
                while(i--){
                        UART_SEND_Pin=(bit)(Dat & 0x01);
                        Dat>>=1;       
                        BPS_Delay();
                }
                UART_SEND_Pin=1;
                BPS_Delay();
        }
}

mon51

//**********************************************************************************
void Exit_int_config(void){
        INTCON         |=B0000_1000;                //GPIE=1
        IOC         =B0000_1000;                //RXD 脚启动电平中断
}

//***********************************************************************************
//中断入口总程序
void interrupt ISR(void){                //中断服务总程序.
        if(GPIE && GPIF){
                //****************************************
                Uart_Rece ();
                GPIO=GPIO;
                GPIF=0;                                        //清除标志
        }
        //-------------------------------------------------------------
       

}

Zigbee2012

学习学习 IO模拟UART口的程序

ilikemcu

我不明白很多人为啥总是怕呢？才9600速率而已，做好中断优先级和处理，没啥大问题。

sunliezhi

为啥不用状态机呢？ delay除了用在某些时序要求比较严格的器件操作上或者while(1)之前，其它地方最好不用。

huangxiaowei

   顶一下

戒魔

我晕。。。。做实验还可以

bygreencn

这真的累死老汉了

zhaotyue

实用性怎么样。

youstupy

顶一下。

张小盒

有没有评估资源占用情况！

pandong

确实不错

ericw2012

不错，记号一下

lihuaping0357

这个不错哦！！

anta09

lihuaping0357 发表于 2014-9-27 09:21
这个不错哦！！

这个系统资源占用太大了吧

xhcyfc

在每个t/2的地方只检测一次？建议多次采样确认位电平

zhouq3132

有空试试，谢谢

widesoft2

   低端情况用用时，很好。

hzy789

不错不错。

eleqian

新版本的stc-isp软件带的示例里面就有软件模拟串口代码，用定时器中断做的没有delay，在STC15F104E上用过还行。

lovecxm

感谢楼主共享思想，但是代码中看到了delay，商业用途慎用

一夕nandy

产品上不会这么用吧

dengxm2009

接收数据时，程序会阻塞吧，不是我想要的。

steaven2000

WHILE(...)
DELAY(...)

玩玩可以，做产品，然并卵！

yoursnemo

cool！！！！！！！！！！！！！！！！！！！！！！

usm4glx

这个不好说啊