标题:
单片机Proteus仿真甲机通过串口控制乙机LED闪烁 源程序
[打印本页]
作者:
NorthDaniel
时间:
2020-6-6 14:33
标题:
单片机Proteus仿真甲机通过串口控制乙机LED闪烁 源程序
亲测可用
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
甲机通过串口控制乙机LED闪烁.png
(77.11 KB, 下载次数: 79)
下载附件
2020-6-6 14:31 上传
单片机源程序如下:
/*************** writer:shopping.w ******************/
#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char
sbit LED1 = P0^0;
sbit LED2 = P0^3;
sbit K1 = P1^0;
void Delay(uint x)
{
uchar i;
while(x--)
{
for(i=0;i<120;i++);
}
}
void putc_to_SerialPort(uchar c)
{
SBUF = c;
while(TI == 0);
TI = 0;
}
void main()
{
uchar Operation_NO = 0;
SCON = 0x40;
TMOD = 0x20;
PCON = 0x00;
TH1 = 0xfd;
TL1 = 0xfd;
TI = 0;
TR1 = 1;
while(1)
{
if(K1 == 0)
{
while(K1==0);
Operation_NO=(Operation_NO+1)%4;
}
switch(Operation_NO)
{
case 0:
LED1=LED2=1; break;
case 1:
putc_to_SerialPort('A');
LED1=~LED1;LED2=1;break;
case 2:
putc_to_SerialPort('B');
LED2=~LED2;LED1=1;break;
case 3:
putc_to_SerialPort('C');
LED1=~LED1;LED2=LED1;break;
}
Delay(10);
}
}
复制代码
所有资料51hei提供下载:
45 甲机通过串口控制乙机LED闪烁.zip
(44.1 KB, 下载次数: 28)
2020-6-6 14:32 上传
点击文件名下载附件
下载积分: 黑币 -5
作者:
regret.
时间:
2021-6-18 09:44
这是两个程序吗
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1