標題:
藍牙控制8路單片機程序+APP
[打印本頁]
作者:
夢想天空
時間:
2018-9-2 10:46
標題:
藍牙控制8路單片機程序+APP
壓縮包里面有app
捕獲.PNG
(11.08 KB, 下載次數(shù): 45)
下載附件
2018-9-2 10:45 上傳
單片機源程序如下:
#include <reg52.h>
#include <intrins.h>
unsigned char tmp;
unsigned int c=0;
sbit led1=P2^0;
sbit led2=P2^1;
sbit led3=P2^2;
sbit led4=P2^3;
sbit led5=P2^4;
sbit led6=P2^5;
sbit led7=P2^6;
sbit led8=P2^7;
void init();
void send(unsigned char a);
void ctrl();
void main()
{
init();
while(1)
{
if(RI==1)
{
RI = 0;
tmp = SBUF;
ctrl();
}
}
}
void init()
{
TMOD=0x20;
PCON=0x80;
TH1=0xfa;
TL1=0xfa;
TR1=1;
SM0=0;
SM1=1;
REN=1;
EA=1;
ES=1;
led1=1;
led2=1;
led3=1;
}
void send(unsigned char a)
{
TI=0;
SBUF=a;
while(TI==0);
TI=0;
}
void ctrl()
{
switch(tmp)
{
case '1':led1=1;break;
case '0':
led1=0;
send(tmp);
break;
case '2':
led2=0;
send(tmp);
break;
case '3':
led2=1;
send(tmp);
break;
case '4':
led3=0;
send(tmp);
break;
case '5':
led3=1;
send(tmp);
break;
case '6':
led4=0;
send(tmp);
break;
case '7':
led4=1;
send(tmp);
break;
case '8':
led1=0;
led2=0;
led3=0;
led4=0;
led5=0;
led6=0;
led7=0;
led8=0;
send(tmp);
break;
case '9':
led1=1;
led2=1;
led3=1;
led4=1;
led5=1;
led6=1;
led7=1;
led8=1; ;
send(tmp);
break;
case 'B':
led6=0;
send(tmp);
break;
case 'E':
led6=1;
send(tmp);
break;
case 'C':
led7=0;
send(tmp);
break;
case 'F':
led7=1;
send(tmp);
break;
case 'D':
led8=0;
send(tmp);
break;
case 'G':
led8=1;
send(tmp);
break;
default:
send(tmp);
}
}
復(fù)制代碼
所有資料51hei提供下載:
藍牙 APP.rar
(2.33 MB, 下載次數(shù): 65)
2018-9-2 10:45 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
作者:
2468416253
時間:
2018-9-10 08:08
謝謝。。。。。。。!
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1