找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2637|回复: 1
打印 上一主题 下一主题
收起左侧

一个单片机通过串口控制另一个单片机的led灯 Proteus仿真源程序

[复制链接]
跳转到指定楼层
楼主
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)


单片机源程序如下:
  1. /***************   writer:shopping.w   ******************/
  2. #include <reg52.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char
  5. sbit LED1 = P0^0;
  6. sbit LED2 = P0^3;
  7. sbit K1 = P1^0;

  8. void Delay(uint x)
  9. {
  10.         uchar i;
  11.         while(x--)
  12.         {
  13.                  for(i=0;i<120;i++);
  14.         }
  15. }

  16. void putc_to_SerialPort(uchar c)
  17. {
  18.         SBUF = c;
  19.         while(TI == 0);
  20.         TI = 0;
  21. }

  22. void main()
  23. {
  24.         uchar Operation_NO = 0;
  25.         SCON = 0x40;
  26.         TMOD = 0x20;
  27.         PCON = 0x00;
  28.         TH1 = 0xfd;
  29.         TL1 = 0xfd;
  30.         TI = 0;
  31.         TR1 = 1;
  32.         while(1)
  33.         {
  34.                  if(K1 == 0)
  35.                 {
  36.                          while(K1==0);
  37.                         Operation_NO=(Operation_NO+1)%4;
  38.                 }
  39.                 switch(Operation_NO)
  40.                 {
  41.                          case 0:
  42.                                         LED1=LED2=1; break;
  43.                         case 1:
  44.                                         putc_to_SerialPort('A');
  45.                                         LED1=~LED1;LED2=1;break;
  46.                         case 2:
  47.                                         putc_to_SerialPort('B');
  48.                                         LED2=~LED2;LED1=1;break;
  49.                         case 3:
  50.                                         putc_to_SerialPort('C');
  51.                                         LED1=~LED1;LED2=LED1;break;
  52.                 }
  53.                 Delay(10);
  54.         }
  55. }
复制代码

所有资料51hei提供下载:
甲机通过串口控制乙机LED闪烁.rar (53.81 KB, 下载次数: 36)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶1 踩
回复

使用道具 举报

沙发
ID:516115 发表于 2020-6-4 10:14 | 只看该作者
学习了  不错啊
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表