- /*--************************防病毒紫外线程序***************************--*/
- /*
- 程序开发者：邵
- 日期：2020年2月9日
- 功能：人体感应，检查到人体后开启进行30秒的紫外线消毒，然后停止后
- 同时也会记录人数，也可以手动切换功能，按一下按钮，紫外线消毒常亮，再按一次
- 恢复功能正常。
- */
- /*--*******************************************************************--*/
- #include "reg52.h"
- typedef unsigned int u16;
- typedef unsigned char u8;
- sbit Rtiganying = P3^7;//接人体感应传感器
- 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;//选择为定时器0模式，工作方式1，仅用TR0打开启动。
- TH0=0Xd8; //给定时器赋初值，定时10ms
- TL0=0Xf0;
- ET0=1;//打开定时器0中断允许
- EA=1;//打开总中断
- TR0=1;//打开定时器
- }
- void DigDisplay()
- {
- u8 i;
- for(i=0;i<8;i++)
- {
- switch(i) //位选，选择点亮的数码管，
- {
- 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];//发送段码
- j = 100;
- while(j--); //间隔一段时间扫描
- 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--);
全部资料51hei下载地址：
紫外线程序.zip
(24.7 KB, 下载次数: 28)
|
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
