52單片機(jī)實(shí)用的IO模擬串行口C語言源程序

用途：短距離、波特率要求不高、環(huán)境干擾不大的場合

特點(diǎn)：

程序簡練、實(shí)用、移植方便

占用定時(shí)器T2

只消耗約600字節(jié)的ROM

有詳細(xì)的注釋

參數(shù)：

晶振：22.1184MHz

波特率：1200

起始位：1

數(shù)據(jù)位：8

校驗(yàn)位：無

停止位：1

?

#include

//將T2定時(shí)器的自動(dòng)重裝寄存器定義成16位SFR，以方便訪問

sfr16 RCAP2 = 0xCA;

//修改如下定義將方便程序移植

sbit RXD_pin = P3^0; //定義接收引腳

sbit TXD_pin = P3^1; //定義發(fā)送引腳

#define MAIN_CLK 22118400L //定義主頻

#define BAUD_RATE 1200L //定義波特率（數(shù)值不能太高，因?yàn)橐oT2中斷服務(wù)程序留足執(zhí)行時(shí)間）

#define HITS 8 //定義采樣率（應(yīng)當(dāng)是偶數(shù);減少采樣率能提高波特率，但為保證可靠工作，最小不能少于6次）

#define RXD_BUF_LEN 32 //定義接收緩沖區(qū)大小

volatile unsigned char RXD_buf［RXD_BUF_LEN］; //定義接收緩沖區(qū)（循環(huán)隊(duì)列）

volatile unsigned char RXD_p1; //指向緩沖區(qū)，由中斷程序自動(dòng)修改

volatile unsigned char RXD_p2; //指向緩沖區(qū)，由主程序修改

#define TXD_BUF_LEN 32 //定義發(fā)送緩沖區(qū)大小

volatile unsigned char TXD_buf［TXD_BUF_LEN］; //定義發(fā)送緩沖區(qū)（循環(huán)隊(duì)列）

volatile unsigned char TXD_p1; //指向TXD_buf，由主程序修改

volatile unsigned char TXD_p2; //指向TXD_buf，由中斷程序修改

//定時(shí)器T2初始化

extern void T2_init（）

{

EA = 0;

T2CON = 0x00;

PT2 = 1; //將T2中斷設(shè)置成高級(jí)優(yōu)先級(jí)

RCAP2 = 65536L - （ MAIN_CLK / 12 ） / （ BAUD_RATE * HITS ）; //此公式值得你琢磨一下

TH2 = RCAP2H;

TL2 = RCAP2L;

ET2 = 1;

TR2 = 1;

EA = 1;

}

//接收初始化

extern void RXD_init（）

{

unsigned char i;

RXD_pin = 1;

RXD_p1 = 0;

RXD_p2 = 0;

for （ i=0; i {

RXD_buf［i］ = 0x00;

}

}

//發(fā)送初始化

extern void TXD_init（）

{

unsigned char i;

TXD_pin = 1;

TXD_p1 = 0;

TXD_p2 = 0;

for （ i=0; i《 TXD_BUF_LEN; i++ ）

{

TXD_buf［i］ = 0x00;

}

}

//發(fā)送單個(gè)字符

extern void TXD_Send_Char（const unsigned char c）

{

unsigned char p; //臨時(shí)變量

p = TXD_p1 + 1;

if （ p 》= TXD_BUF_LEN ） p = 0;

while （ p == TXD_p2 ）; //判斷發(fā)送緩沖隊(duì)列是否已滿，如果是，則暫時(shí)不能發(fā)送

TXD_buf［TXD_p1］ = c; //先將c寫入隊(duì)列

TXD_p1 = p; //再修改TXD_p1

//在T2中斷服務(wù)程序里會(huì)自動(dòng)完成發(fā)送

}

//發(fā)送字符串（不包括末尾的‘’）

extern void TXD_Send_String（const unsigned char s［］）

{

unsigned char c;

unsigned int i = 0;

for （;;）

{

c = s［i++］;

if （ c == ‘’ ） break;

TXD_Send_Char（c）;

}

}

//定義接收緩沖字符

volatile unsigned char bdata RXD_ch;

sbit RXD_ch_MSB = RXD_ch^7;

//定義發(fā)送緩沖字符

volatile unsigned char bdata TXD_ch;

sbit TXD_ch_LSB = TXD_ch^0;

//T2中斷服務(wù)程序

//每中斷HITS次處理1位

static void T2INTSVC（） interrupt 5 using 3

{

//定義接收所需要的變量

static bit RXD_doing = 0; //正在接收的標(biāo)志

static unsigned char RXD_t = HITS/2; //接收時(shí)計(jì)數(shù)T2的中斷次數(shù)

static unsigned char RXD_cnt; //接收時(shí)bit位的計(jì)數(shù)器

//定義發(fā)送所需要的變量

static bit TXD_doing = 0; //正在發(fā)送的標(biāo)志

static unsigned char TXD_t; //發(fā)送時(shí)計(jì)數(shù)T2的中斷次數(shù)

static unsigned char TXD_cnt; //發(fā)送時(shí)bit位的計(jì)數(shù)器

//先清除TF2

TF2 = 0;

//接收數(shù)據(jù)

if （ RXD_doing ） //正處于接收狀態(tài)

{

if （ --RXD_t == 0 ） //經(jīng)過了HITS個(gè)采樣脈沖

{

if （ RXD_cnt == 0 ） //8個(gè)數(shù)據(jù)位接收完畢

{

if （ RXD_pin ） //檢測到停止位

{

RXD_t = RXD_p1 + 1; //在這里，RXD_t作為臨時(shí)變量

if （ RXD_t 》= RXD_BUF_LEN ） RXD_t = 0;

if （ RXD_t ！= RXD_p2 ） //如果接收緩沖隊(duì)列未滿

{

RXD_buf［RXD_p1］ = RXD_ch;

RXD_p1 = RXD_t;

}

else

{

//如果接收緩沖隊(duì)列已滿，只好丟棄新收到數(shù)據(jù)

}

}

else //檢測停止位時(shí)出錯(cuò)

{

//舍棄新收到的數(shù)據(jù)

}

RXD_doing = 0; //接收全部完畢，清除正在接收的標(biāo)志

RXD_t = HITS/2; //恢復(fù)RXD_t的初始值

}

else //接收數(shù)據(jù)位

{

RXD_ch 》》= 1;

RXD_ch_MSB = RXD_pin;

//上面2條語句若用{CY=RXD_pin; CY=（RXD_ch&0x01）; RXD_ch=ACC;}代替，效率更高

RXD_cnt--;

RXD_t = HITS;

}

}

}

else //檢測起始位

{

if （ RXD_pin ）

{

RXD_t = HITS/2;

}

else

{

RXD_t--;

if （ RXD_t == 0 ） //連續(xù)HITS/2次采樣RXD_pin都是0，就可以確認(rèn)起始位

{

//啟動(dòng)接收

RXD_t = HITS;

RXD_cnt = 8;

RXD_doing = 1;

}

}

}

//發(fā)送數(shù)據(jù)

if （ TXD_doing ） //正處于發(fā)送狀態(tài)

{

TXD_t--;

if （ TXD_t == 0 ）

{

if （ TXD_cnt == 0 ） //發(fā)送全部完畢

{

TXD_doing = 0; //清除正在發(fā)送的標(biāo)志

}

else

{

if （ TXD_cnt == 1 ） //8個(gè)數(shù)據(jù)位發(fā)送完畢

{

TXD_pin = 1; //發(fā)送停止位

}

else //發(fā)送數(shù)據(jù)位

{

TXD_pin = TXD_ch_LSB;

TXD_ch 》》= 1;

//上面2條語句若用{CY=（TXD_ch&0x01）; TXD_pin=CY; TXD_ch=ACC;}代替，效率更高

}

TXD_cnt--;

TXD_t = HITS;

}

}

}

else

{

if （ TXD_p2 ！= TXD_p1 ） //如果發(fā)送緩沖隊(duì)列不空

{

//從發(fā)送緩沖隊(duì)列中取出要發(fā)送的數(shù)據(jù)

TXD_ch = TXD_buf［TXD_p2++］;

if （ TXD_p2 》= TXD_BUF_LEN ） TXD_p2 = 0;

//啟動(dòng)發(fā)送

TXD_doing = 1;

TXD_cnt = 9;

TXD_t = HITS;

//先發(fā)送起始位

TXD_pin = 0;

}

else

{

//發(fā)送緩沖隊(duì)列是空的，不發(fā)送任何數(shù)據(jù)

}

}

}

//系統(tǒng)初始化

void SystemInit（）

{

TXD_init（）;

RXD_init（）;

T2_init（）;

}

//主程序

void main（）

{

unsigned char c;

SystemInit（）;

//

TXD_Send_String（“Hello！rn”）;

TXD_Send_String（“The author is 21IC suda.rn”）;

//以下是簡單的測試：從接收引腳接收數(shù)據(jù)，再通過發(fā)送引腳轉(zhuǎn)發(fā)出去

for （;;）

{

if （ RXD_p2 ！= RXD_p1 ）

{

c = RXD_buf［RXD_p2++］;

if （ RXD_p2 》= RXD_BUF_LEN ） RXD_p2 = 0;

TXD_Send_Char（c）;

}

}

}
來源；21ic