【proteus练一练3.5】单片机向主机发送字符串

单片机

`/*  名称：单片机向主机发送字符串
  说明：单片机按一定的时间间隔向主机
发送字符串，发送内容在虚拟终端显示。
*/
#include
#define uchar unsigned char
#define uint unsigned int
//延时
void DelayMS(uint ms)

{
uchar i;
while(ms--) for(i=0;i<120;i++);
}
//向串口发送字符
void Putc_to_SerialPort(uchar c)
{
SBUF=c;
while(ti==0);
TI=0;
}
//向串口发送字符串
void Puts_to_SerialPort(uchar *s)
{
while(*s!='')
{
  Putc_to_SerialPort(*s);
  s++;
  DelayMS(5);
}
}
//主程序
void main()
{
uchar c=0;
SCON=0x40;  //串口模式1
TMOD=0x20;  //T1 工作模式 2
TH1=0xfd;  //波特率9600
TL1=0xfd;
PCON=0x00;  //波特率不倍增
TI=0;
TR1=1;
DelayMS(200);
//向主机发送数据
  Puts_to_SerialPort("Receiving From 8051...
");
Puts_to_SerialPort("-------------------------------
");
DelayMS(50);
while(1)
{
  Putc_to_SerialPort(c+'A');
  DelayMS(100);
  Putc_to_SerialPort(' ');
  DelayMS(100);
  if(c==25) //每输出一遍后加横线
  { Puts_to_SerialPort("
-------------------------------
");
DelayMS(100);
  }
  c=(c+1)%26;
  if(c%10==0)  //每输出10个字符后换行
  {
Puts_to_SerialPort("
");
DelayMS(100);

  }
}
}

proteus 仿真图：

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

`

ahtsls · 2014-8-15 13:06:34

楼主辛苦了，谢谢分享。

穹鸟无痕 · 2014-8-15 16:54:01

此贴必火。此贴必火。此贴必火。此贴必火。此贴必火。此贴必火。

Juanson · 2014-8-16 10:52:44

这个不错！！！

NNNice · 2014-8-16 21:12:01

感谢楼主分享了！！

子非鱼p · 2014-8-16 21:52:57

看看那学习下

2014-8-16 23:51:16

{:1:}{:1:}{:1:}

lzx20072835 · 2014-8-23 17:59:07

看看看看看看看，，，，

零基础 · 2014-12-3 00:55:09

有用，，，，，，，，，，，，，，，，，，，，，

覃辽 · 2014-12-9 19:32:18

学习，学习，学习，学习，学习

tubie · 2014-12-13 18:43:52

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk

小玉莲2 · 2014-12-22 11:18:25

看看，

{:12:}{:12:}{:12:}

小川 · 2015-12-24 13:25:31

{:1:}

武亦文 · 2017-5-23 15:20:13

武亦文 · 2017-5-23 15:20:13

东道国 · 2017-5-23 15:53:35

学习

DaNsphy丶 · 2017-6-3 10:43:20

十大

fontex · 2017-6-8 17:08:40

不错，谢谢！

李永林 · 2017-6-9 20:11:43

学习学习！谢谢楼主的分享····

幽冥火烛 · 2017-6-11 16:40:25

看看学习看看学习看看学习看看学习

h1654155170.1465 · 2017-6-24 19:10:09

找了很久，看看

搜索历史

【proteus练一练3.5】单片机向主机发送字符串

相关推荐

64 条评论

评论

精选推荐

站长推荐 /6