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

甲机通过串口控制乙机 LED

[复制链接]

该用户从未签到

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

EDA365欢迎您登录!

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

x
甲机通过串口控制乙机 LED7 G' M6 u( \7 r* `% G- P

) R( x2 P( @; \, W* R
0 K9 ^8 {5 t- r) D

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

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

制命令字符“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;

}

6 S$ t" a8 E1 ]% G- B1 o8 G& p

//主程序

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; 波特率不倍增


5 N2 r: v) w, ]


* |  F$ v! X3 t1 z3 j, A

TH1=0xfd;//波特率 9600

TL1=0xfd;

RI=0;

TR1=1;

LED1=LED2=1;

while(1)

{

. m4 j: N. u8 ]) 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 p3 r$ N2 Q; s: S

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

}

         }

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

DelayMS(100);

    }

}

7 }0 ^8 G7 u/ `. r! n+ \  i( z8 H


2 v3 o- d1 v2 x9 R

4 |. ]5 f; V) v5 v, F" T' f3 h2 a2 z& x) F' a7 C
5 \. M! r' {+ W. O; g, e

该用户从未签到

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

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-8-5 01:47 , Processed in 0.140625 second(s), 26 queries , Gzip On.

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

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

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