找回密码
 注册
关于网站域名变更的通知
查看: 728|回复: 1
打印 上一主题 下一主题

甲机通过串口控制乙机 LED

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2019-3-1 10:06 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
甲机通过串口控制乙机 LED
3 ]! l0 v8 L! S+ d  p% h) w- f. t) T8 z

% O) F& C# c( ^/ ^( B3 B- h0 v3 C

/* 名称:甲机发送控制命令字符

说明:甲单片机负责向外发送控

制命令字符“A”、“B”、“C”,或者

停止发送,乙机根据所接收到的字符

完成 LED1 闪烁、LED2 闪烁、双闪

烁、或停止闪烁。

*/

#include<reg51.h>

#define uchar unsigned char

#define uint unsigned int

sbit LED1=P0^0;   

sbit LED2=P0^3;

sbit K1=P1^0;

//延时

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;

}

2 L# p' A4 h! ]$ B: Y

//主程序

void main()

{

uchar Operation_No=0;

SCON=0x40; 串口模式 1

TMOD=0x20; //T1 工作模式 2

PCON=0x00; 波特率不倍增

TH1=0xfd;

TL1=0xfd;

TI=0;

TR1=1;

while(1)

{

if(K1==0) //按下 K1 时选择操作代码 0123

{

while(K1==0);

Operation_No=(Operation_No+1)%4;

}

switch(Operation_No) //根据操作代码发送 A/B/C 或停止发送

{

case 0: LED1=LED2=1;

break;

case 1utc_to_SerialPort('A');

LED1=~LED1;LED2=1;

break;

case 2utc_to_SerialPort('B');

LED2=~LED2;LED1=1;

break;

case 3utc_to_SerialPort('C');

LED1=~LED1;LED2=LED1;

break;

}

DelayMS(100);

  }

}

/* 名称:乙机程序接收甲机发送字符并完成相应动作

说明:乙机接收到甲机发送的信号后,根据相应信号控制 LED 完成不同闪烁动作。

*/

#include<reg51.h>

#define uchar unsigned char

#define uint unsigned int

sbit LED1=P0^0;   

sbit LED2=P0^3;

//延时

void DelayMS(uint ms)

{

uchar i;

while(ms--) for(i=0;i<120;i++);

}

//主程序

void main()

{

SCON=0x50; 串口模式 1,允许接收

TMOD=0x20; //T1 工作模式 2

PCON=0x00; 波特率不倍增

, H1 t" y! Z4 I/ Y+ Z

3 f* B  h7 d3 g+ x3 `

TH1=0xfd;//波特率 9600

TL1=0xfd;

RI=0;

TR1=1;

LED1=LED2=1;

while(1)

{

  Z9 _4 Y- L! ?  w

if(RI) //如收到则 LED 闪烁

{

RI=0;

switch(SBUF) //根据所收到的不同命令字符完成不同动作

{

case 'A': LED1=~LED1;LED2=1;break; //LED1 闪烁

case 'B': LED2=~LED2;LED1=1;break; //LED2 闪烁

4 Z; C) f& E7 a! N0 F, O

                                         case 'C': LED1=~LED1;LED2=LED1; //双闪烁

}

         }

else LED1=LED2=1;    //关闭 LED

DelayMS(100);

    }

}


" Q% y' y$ j; _


$ }2 n  l. H. \% N
, j+ w- u, m5 Z+ C1 R# R: k

1 \7 M& I* i3 y% I$ N( F% y1 _. q

该用户从未签到

2#
发表于 2019-3-1 17:06 | 只看该作者
学习一下,谢谢楼主分享
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-8-21 03:20 , Processed in 0.125000 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

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