標(biāo)題:
單片機(jī)紫外線消毒控制程序 人體紅外感應(yīng)
[打印本頁(yè)]
作者:
Yin89c52
時(shí)間:
2020-3-4 14:30
標(biāo)題:
單片機(jī)紫外線消毒控制程序 人體紅外感應(yīng)
/*--************************防病毒紫外線程序***************************--*/
/*
程序開(kāi)發(fā)者:邵
日期:2020年2月9日
功能:人體感應(yīng),檢查到人體后開(kāi)啟進(jìn)行30秒的紫外線消毒,然后停止后
同時(shí)也會(huì)記錄人數(shù),也可以手動(dòng)切換功能,按一下按鈕,紫外線消毒常亮,再按一次
恢復(fù)功能正常。
*/
/*--*******************************************************************--*/
#include "reg52.h"
typedef unsigned int u16;
typedef unsigned char u8;
sbit Rtiganying = P3^7;//接人體感應(yīng)傳感器
sbit ZWxian = P3^0;//紫外線消毒
unsigned int Chesi_Key = 0,j,Y,a=50,b=10;
sbit LSA = P2^2;
sbit LSB = P2^3;
sbit LSC = P2^4;
sbit k1 = P3^3;
u8 code smgduan[17]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};//顯示0~F的值
u8 ssec,sec,min;
u8 DisplayData[8];
void Timer0Init()
{
TMOD|=0X01;//選擇為定時(shí)器0模式,工作方式1,僅用TR0打開(kāi)啟動(dòng)。
TH0=0Xd8; //給定時(shí)器賦初值,定時(shí)10ms
TL0=0Xf0;
ET0=1;//打開(kāi)定時(shí)器0中斷允許
EA=1;//打開(kāi)總中斷
TR0=1;//打開(kāi)定時(shí)器
}
void DigDisplay()
{
u8 i;
for(i=0;i<8;i++)
{
switch(i) //位選,選擇點(diǎn)亮的數(shù)碼管,
{
case(0):
LSA=0;LSB=0;LSC=0; break;//顯示第0位
case(1):
LSA=1;LSB=0;LSC=0; break;//顯示第1位
case(2):
LSA=0;LSB=1;LSC=0; break;//顯示第2位
case(3):
LSA=1;LSB=1;LSC=0; break;//顯示第3位
case(4):
LSA=0;LSB=0;LSC=1; break;//顯示第4位
case(5):
LSA=1;LSB=0;LSC=1; break;//顯示第5位
case(6):
LSA=0;LSB=1;LSC=1; break;//顯示第6位
case(7):
LSA=1;LSB=1;LSC=1; break;//顯示第7位
}
P0=DisplayData[i];//發(fā)送段碼
j = 100;
while(j--); //間隔一段時(shí)間掃描
P0=0x00;//消隱
}
}
void datapros()
{
DisplayData[0]=smgduan[ssec%10];
DisplayData[1]=smgduan[ssec/10];
DisplayData[2]=0x40;
DisplayData[3]=smgduan[sec%10];
DisplayData[4]=smgduan[sec/10];
DisplayData[5]=0x40;
DisplayData[6]=smgduan[min%10];
DisplayData[7]=smgduan[min/10];
}
void Kay()
{
if(k1==0)
{
j = 1500;
while(j--);
復(fù)制代碼
全部資料51hei下載地址:
紫外線程序.zip
(24.7 KB, 下載次數(shù): 28)
2020-3-4 14:30 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
作者:
admin
時(shí)間:
2020-3-4 14:50
本帖需要重新編輯補(bǔ)全電路原理圖,源碼,詳細(xì)說(shuō)明與圖片即可獲得100+黑幣(帖子下方有編輯按鈕)
作者:
haierzaifei11
時(shí)間:
2020-3-5 16:42
希望補(bǔ)全電路原理圖,源碼,詳細(xì)說(shuō)明與圖片
作者:
shijinbede
時(shí)間:
2020-3-16 09:17
有原理圖嗎
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1