欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136
標題:
用STC15W408S制作自動感應夜燈
[打印本頁]
作者:
xdfzj
時間:
2017-5-28 06:46
標題:
用STC15W408S制作自動感應夜燈
STCW408S單片機價格低,功能強大,適應電壓寬,特別適合充電鋰電池供電設備
以下是我開發測試成功的自動感應夜燈源程序,效果很好。
主程序:“main.c”
#include "reg51.H"
#include "ADC.H"
#define MAIN_Fosc 12000000L
void delay_ms(unsigned int ms);
unsigned char n1;
//sbit HP37 = P3^7;
sbit LED = P3^6;
void main()
{
//ADC
unsigned int i;
unsigned char channel;
channel=0;
P3M0=1;
P3M1=0;
P1ASF=0xFF;
ADC_RES=0;
ADC_CONTR=ADC_POWER|ADC_SPEEDLL | ADC_START | channel;
for(i=0;i<10000;i++);
IE=0xA0;
//LED
IT0=0; //低電平觸發 IT0=1; 下降沿觸發
EX0=1;
EA=1;
LED=0;
while(1)
{
//ADC
ADC(0); //查詢法//讀2次
if(flag==1)
{
flag=0;
}
ADC(0);
if(flag==1)
{
flag=0;
}
v0=ADCtmp;
ADC(2); //讀2次
if(flag==1)
{
flag=0;
}
ADC(2);
if(flag==1)
{
flag=0;
}
v2=ADCtmp;
//LED
LED=0;
if (v0 < 512)
{
if (v2<320 || v2>680)
{
LED = 1;
for(n1=0;n1<60;n1++)
{
delay_ms(1200); //調用延時程序
ADC(2); //檢查有無人體運動
if(flag==1)
{
flag=0;
}
ADC(2);
if(flag==1)
{
flag=0;
}
v2=ADCtmp;
if (v2<320 || v2>680) n1=0; //如果有人體運動,計數重新開始
}
LED = 0;
delay_ms(800);
}
LED = 0;
delay_ms(800);
}
}
}
void delay_ms(unsigned int ms)
{
unsigned int i;
do{
i = MAIN_Fosc / 14000;
while(--i) ; //14T per loop
}while(--ms);
}
頭文件"ADC.H"
#include "ctype.h"
#include "intrins.h"
#define ADC_POWER 0x80
#define ADC_FLAG 0x10
#define ADC_START 0x08
#define ADC_SPEEDLL 0x00
#define ADC_SPEEDL 0x20
#define ADC_SPEEDH 0x40
#define ADC_SPEEDHH 0x60
sfr AUXR =0x8E;
sfr ADC_CONTR =0xBC;
sfr ADC_RES =0xBD;
sfr ADC_RESL =0xBE;
sfr P1ASF =0x9D;
sfr P3M1=0xB1;
sfr P3M0=0xB2;
bit flag=1;
unsigned int v0,v2,ADCtmp=0;
void ADC(unsigned char ch); //查詢法
void ADC(unsigned char ch)
{
ADC_CONTR=ADC_POWER|ADC_SPEEDLL | ADC_START | ch;
_nop_(); //至少等待4個空操作指令后才開始讀ADC標志位
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
while (!(ADC_CONTR & ADC_FLAG));
ADC_CONTR &= ~ADC_FLAG;
ADCtmp=(ADC_RES*4+ADC_RESL);
flag=1;
}
作者:
xdfzj
時間:
2017-5-28 08:53
G:\手機資料\20170528、IMG_20170325_080244
作者:
admin
時間:
2017-5-28 16:37
好東東啊,樓主 圖片可上傳附件啊,是遇到了什么問題嗎?
作者:
半路
時間:
2017-5-28 17:33
樓主把附件上傳上來讓大家學習一下吧,另外把做的實物圖片也給大家曬曬吧
作者:
cy35
時間:
2017-5-28 20:25
zhichi !!!!!!!!!!!!!!!!
作者:
zxq9781
時間:
2017-5-28 22:39
用什么做傳感器的?
作者:
菁華如風
時間:
2017-11-16 21:53
我想學著用下STC15W408S,大神能不能給點學習資料或者告訴這個我怎么燒錄程序?
歡迎光臨 (http://m.raoushi.com/bbs/)
Powered by Discuz! X3.1