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

甲机通过串口控制乙机 LED

[复制链接]

该用户从未签到

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

EDA365欢迎您登录!

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

x
甲机通过串口控制乙机 LED
4 g  c; C$ X( y# Q5 n1 L( w" E% m& p) c+ j/ J' @8 ?5 q

- \" p) t" f0 u0 K6 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;

}

$ d/ g5 [3 M, e# Y! r

//主程序

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

; [4 C" w9 ^% U* s6 [1 F, Z( A


# E1 @; `( K! ]6 Y

TH1=0xfd;//波特率 9600

TL1=0xfd;

RI=0;

TR1=1;

LED1=LED2=1;

while(1)

{

* j  o) R  w& K- G1 R/ o

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

{

RI=0;

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

{

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

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


6 G/ f9 ~2 T5 c7 Z5 l4 n, Y

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

}

         }

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

DelayMS(100);

    }

}

/ ?, ^0 M, K- y+ p


  S8 E+ v, Z2 ~5 }: {: b) p0 C

& h, d, l! l6 J! d5 |  z! ~- T: [: l# w) R* [

( u% c- `9 Y9 O( I

该用户从未签到

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

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-6-20 16:30 , Processed in 0.093750 second(s), 26 queries , Gzip On.

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

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

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