【proteus练一练3.6】单片机与 PC通信

单片机

/*  名称：单片机与 PC 通信
  说明：单片机可接收 PC 发
送的数字字符，按下单片机的
K1 键后，单片机可向 PC 发送
字符串。在 proteus 环境下完成
本实验时，需要安装 Virtual
Serial Port Driver和串口调试助
手。本例缓冲 100 个数字字符，
缓冲满后新数字从前面开始存放（环形缓冲）。
*/
#include
#define uchar unsigned char
#define uint unsigned int
uchar Receive_Buffer[101]; //接收缓冲
uchar Buf_Index=0; //缓冲空间索引
//数码管编码
uchar code DSY_CODE[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x00};
//延时
void DelayMS(uint ms)
{
uchar i;
while(ms--) for(i=0;i<120;i++);
}
//主程序
void main()
{
uchar i;
P0=0x00;
Receive_Buffer[0]=-1;
SCON=0x50;  //串口模式1，允许接收
TMOD=0x20;  //T1 工作模式 2
TH1=0xfd;  //波特率9600
TL1=0xfd;
PCON=0x00;  //波特率不倍增
EA=1;EX0=1;IT0=1;
ES=1;IP=0x01;
TR1=1;
while(1)
{
  for(i=0;i<100;i++)
  { //收到-1 为一次显示结束
if(Receive_Buffer==-1) break;
P0=DSY_CODE[Receive_Buffer];
DelayMS(200);
  }
  DelayMS(200);
}
}
//串口接收中断函数
void Serial_INT() interrupt 4
{
uchar c;
if(RI==0) return;
ES=0; //关闭串口中断
RI=0; //清接收中断标志
c=SBUF;
if(c>='0'&&c<='9')
{ //缓存新接收的每个字符，并在其后放-1 为结束标志
  Receive_Buffer[Buf_Index]=c-'0';
  Receive_Buffer[Buf_Index+1]=-1;
  Buf_Index=(Buf_Index+1)%100;
}
ES=1;
}
void EX_INT0() interrupt 0 //外部中断0
{
uchar *s="这是由 8051 发送的字符串！rn";
uchar i=0;
while(s!='')
{
  SBUF=s;
  while(ti==0);
  TI=0;
  i++;
}
}
proteus仿真图：

游客
，如果您要查看本帖隐藏内容请回复

许敏 · 2012-3-6 10:37:23

陆飞 · 2012-3-6 13:03:15

wwwbookdgcom · 2012-3-6 14:06:59

2012-3-6 15:04:01

正在做这个实验

imxhym · 2012-3-6 15:18:05

感谢分享。。。。

2012-3-6 16:54:21

请问怎么用主机串口和PROTEUS联机通信啊

panguosheng · 2012-3-7 10:26:27

很不错，这几天正看这方面的呢

周 · 2012-3-7 13:19:25

学习中...........................

cheshi · 2012-3-7 15:06:54

学习了

lenman071 · 2012-3-9 07:32:02

很好

陈伟 · 2012-3-13 22:43:35

tyffgygy

2012-3-13 23:13:26

看看

yuzhewuyou · 2012-3-14 16:42:46

电脑是WIN7的，这个软件竟没装上去。。。好郁闷

h1654155175.4883 · 2012-3-15 18:07:07

学习

no_01 · 2012-3-15 19:41:04

study!

何雷 · 2012-3-16 08:48:23

看看

pottercheng · 2012-3-16 12:16:49

好东西学习了

六六六 · 2012-3-21 08:52:54

asd2010 · 2012-3-21 20:44:02

支持楼主！

搜索历史

【proteus练一练3.6】单片机与 PC通信

相关推荐

59 条评论

RE: 【proteus练一练3.6】单片机与 PC通信

评论

精选推荐

站长推荐 /6