手機藍牙控制的單片機心形燈制作

ID:128771 · 發表于 2016-7-5 02:59

視頻地址：http://v.qq.com/page/f/9/9/f0306rbk299.html

藍牙是淘寶買的 HC-05，原理挺簡單的，就是51單片機的串口通信，還有靈活使用hex和ASCII碼

單片機程序：

#include
#define uint unsigned int
#define uchar unsigned char
void delay1ms(uint n);
uint table1_0[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
uint table1_1[]={0x41,0x22,0x14,0x08,0x14,0x22,0x41};
uint table0_0[]={0x01,0x02,0x04,0x08};
uint table0_1[]={0x05,0x0a,0x05,0x0a};
uint n=500;
uchar temp=0x00;
void main()
{
unsigned char i=0,j=0;
P1=0xff;
P0=0xff;
P2=0xff;
SCON=0x50;
TMOD=0x20;
PCON = 0x80;
TH1=0xfa;
TL1=0xfa;
ES=1;
EA=1;
TR1=1;
RI=0;
/*********************開燈**************************/
/*
while(1)
{
P0=0x0f;
P1=0x00;
}
*/
/*********************關燈**************************/
/*
while(1)
{
P0=0x00;
P1=0xff;
}
*/
/***************全閃************************/
/*
while(1)
{
P0=0x0f;
P1=0x00;
delay1ms(100);
P0=0x00;
P1=0xff;
delay1ms(100);
}
*/
/*********************正流水燈*****************************/
/*
while(1)
{
for(i=0;i<4;i++)
{
P0=table0_0[i];
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(100);
}
}
}
*/
/*********************倒流水燈*****************************/
/*
while(1)
{
for(i=4;i>0;i--)
{
P0=table0_0[i-1];
for(j=7;j>0;j--)
{
P1=~table1_0[j-1];
delay1ms(100);
}
}
}
*/
/*********************向中看齊*****************************/
/*
while(1)
{
P0=0x0f;
for(j=0;j<7;j++)
{
P1=~table1_1[j];
delay1ms(100);
}
}
*/
/***********************雙燈跑馬********************/
/*
while(1)
{
for(i=0;i<4;i++)
{
P0=table0_1[i];
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(100);
}
}
}
*/
/***********************四燈跑馬********************/
/*
while(1)
{
P0=0x0f;
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(100);
}
}
*/
/**********************響應程序***********************/
while(1)
{
while(temp=='a')
{
P2=0xff;
P0=0x0f;
P1=0x00;
}
while(temp=='b')
{
P2=0xff;
P0=0x0f;
P1=0x00;
delay1ms(n);
P0=0x00;
P1=0xff;
delay1ms(n);
}
while(temp=='c')
{
P2=0xff;
P0=0x00;
P1=0xff;
}
while(temp=='d')
{
P2=0xff;
for(i=0;i<4;i++)
{
P0=table0_0[i];
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(n);
}
}
}
while(temp=='e')
{
P2=0xff;
P0=0x0f;
for(j=0;j<7;j++)
{
P1=~table1_1[j];
delay1ms(n);
}
}
while(temp=='f')
{
P2=0xff;
for(i=4;i>0;i--)
{
P0=table0_0[i-1];
for(j=7;j>0;j--)
{
P1=~table1_0[j-1];
delay1ms(n);
}
}
}
while(temp=='g')
{
P2=0xff;
for(i=0;i<4;i++)
{
P0=table0_1[i];
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(n);
}
}
}
while(temp=='i')
{
P2=0xff;
P0=0x0f;
for(j=0;j<7;j++)
{
P1=~table1_0[j];
delay1ms(n);
}
}
}
}
void serial_int() interrupt 4
{
uchar num;
num=temp;
temp=SBUF;
RI=0;
SBUF=temp;
while(!TI);
TI=0;
if(temp=='k')
{
n=n*2;
// SBUF=n;
// while(!TI);
// TI=0;
if(n>500000)
n=500000;
temp=num;
}
else if(temp=='j')
{
n=n/2;
if(n==0)
n=1;
// SBUF=n;
// while(!TI);
// TI=0;
temp=num;
}
else if(temp=='a'||temp=='b'||temp=='c'||temp=='d'||temp=='e'||temp=='f'||temp=='g'||temp=='i')
{
}
else
{
P1=0xff;
P2=~temp;
}
}
void delay1ms(uint n) //誤差 0us
{
unsigned int a,b,c;
for(c=n;c>0;c--)
for(b=14;b>0;b--)
for(a=2;a>0;a--);
}

復制代碼

ID:166036 · 發表于 2017-2-22 20:33

寫的太好了

ID:138267 · 發表于 2017-2-23 18:39

樓主，有想法，贊一個

ID:160485 · 發表于 2017-2-26 11:13

哇！太好高級了，真的很不錯，我也想做一個，只是我現在才接觸單片機，有很多東西都還不懂呢。恩恩，等我完全掌握單片機后一定做一個。

ID:184177 · 發表于 2017-3-28 16:40

學習了，很有創意樓主

ID:58312 · 發表于 2017-3-28 22:50

手機軟件是什么呢，樓主

ID:218694 · 發表于 2017-7-27 12:45

不錯，學習啦~

ID:240356 · 發表于 2017-10-17 20:09

那個手機上面的程序按鍵是怎么編寫的呢

ID:74784 · 發表于 2017-10-17 23:41

xiehuanle 發表于 2017-10-17 20:09
那個手機上面的程序按鍵是怎么編寫的呢

核心技術不會從天上掉下來的~~~~~~~~~

ID:237942 · 發表于 2017-10-18 09:07

手機軟件是有相應的APP么

ID:240522 · 發表于 2017-10-20 20:33

操作方式真好，要是能把手機端程序也分享一下就好了。

ID:187478 · 發表于 2017-10-20 22:17

可否原理圖分享下，還有手機藍牙通訊APP

ID:249041 · 發表于 2017-12-19 20:23

謝謝分享，拿走學習了

ID:249041 · 發表于 2017-12-19 20:25

很給力

ID:249041 · 發表于 2017-12-19 20:28

操作方式真好，要是能把手機端程序也分享一下就好了。

ID:264401 · 發表于 2017-12-21 21:30

可以可以，贊一個

ID:390260 · 發表于 2018-10-7 17:13

絕世好貼真的

ID:432270 · 發表于 2019-4-30 22:07

樓主，現在你還在嗎？有問題想請教

ID:540911 · 發表于 2019-5-19 15:10

請問有具體的電路圖嗎

ID:502774 · 發表于 2019-5-19 20:18

藍牙控制。應該WiFi也行

ID:71883 · 發表于 2019-8-1 11:10

操作方式真好，要是能把手機端程序也分享一下就好了。

ID:399179 · 發表于 2019-8-1 20:38

為樓主點贊！

ID:708025 · 發表于 2020-3-13 23:02

想知道藍牙通信模塊的實現，樓主可以講一下嗎？

ID:709228 · 發表于 2020-3-16 10:02

都需要什么元件呢

ID:820972 · 發表于 2021-4-27 00:47

可以給個電路嗎

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

手機藍牙控制的單片機心形燈制作

評分

相關帖子