51单片机IO口模拟串口通讯1-延时法

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146

/**********************************************

方法1：延时法

硬件：11.0592MHz晶振,STC89C52,RXD P1.0 TXD P1.1

波特率：9600

描述：所谓延时法是指根据模拟出的波特率，每1位持续的时间的长短是通过循环空指令来延时的。

测试1：上电发送1个0x01的字符

测试2：上电后等待接收，接收到PC发送的0x01字符后，将此字符+1后再发送

结果：

测试1：正确！接收到1个0x01的字符

测试2-1：正确！分别一个一个发送0x01,0x02,0x03,0x04,0x05，均正常接收

测试2-2: 错误！一起发送0x01,0x02,0x03,0x04,0x05,丢包，只能接收0x02,0x04,0x06

时间：2012.07.25 于单位

**********************************************/

#include "reg52.h"

#define uchar unsigned char

sbit P1_0 = 0x90;

sbit P1_1 = 0x91;

sbit P1_2 = 0x92;

#define RXD P1_0

#define TXD P1_1

#define WRDYN 44 //写延时

#define RDDYN 43 //读延时

void Delay2cp(unsigned char i);

//往串口写一个字节

void WByte(uchar input) {

    uchar i = 8;

    TXD = (bit) 0; //发送启始位

    Delay2cp(39);

//发送8位数据位

    while (i--) {

        TXD = (bit)(input & 0x01); //先传低位

        Delay2cp(36);

        input = input >> 1;

    }

//发送校验位(无)

    TXD = (bit) 1; //发送结束位

    Delay2cp(46);

}

//从串口读一个字节

uchar RByte(void) {

    uchar Output = 0;

    uchar i = 8;

    uchar temp = RDDYN;

//发送8位数据位

    Delay2cp(RDDYN * 1.5); //此处注意，等过起始位

    while (i--) {

        Output >>= 1;

        if (RXD) Output |= 0x80; //先收低位

        Delay2cp(35); //(96-26)/2，循环共占用26个指令周

    }

    while (--temp) //在指定的时间内搜寻结束位。

    {

        Delay2cp(1);

        if (RXD)break; //收到结束位便退

    }

    return Output;

}

//延时程序*

void Delay2cp(unsigned char i) {

    while (--i); //刚好两个指令周期。

}

void main() {
    uchar ccc;

//测试1

//WByte(0x01);

//while(1){;}

//测试2

    while (1) {

        if (RXD == 0) {

            ccc = RByte();

            WByte(ccc + 1);

        }

    }

}