DIY定時(shí)自動(dòng)打鈴器

1五湖四海1

DIY定時(shí)自動(dòng)打鈴器

  我廠為了搞好軍事化管理,，在每個(gè)廠房安裝了電鈴。按廠規(guī)定的休息時(shí)間打鈴提示。安裝這套裝置需要一個(gè)定時(shí)自動(dòng)控制電鈴開(kāi)啟的裝置。廠子安排我負(fù)責(zé)完成這套裝置,。我接下任務(wù)打算自行設(shè)計(jì)一套定時(shí)打鈴器，我的設(shè)計(jì)方案得到廠領(lǐng)導(dǎo)批準(zhǔn)后,，我給自己立下軍令狀一周之內(nèi)完成,。

  在2011年11月20日制作完成了定時(shí)自動(dòng)打鈴器，我利用單片機(jī)技術(shù)計(jì)時(shí)產(chǎn)生秒信號(hào)首先完成了數(shù)字電子鐘,，在此基礎(chǔ)上加入了繼電器并通過(guò)軟件實(shí)現(xiàn)了定時(shí)控制繼電器,。最后加入了鍵盤可以調(diào)整走時(shí)時(shí)間和設(shè)置多個(gè)定時(shí)時(shí)間。做到這里遇到一個(gè)問(wèn)題,，我是采用市電220v變壓整流給單片機(jī)板供電的,，如果突然停電就會(huì)丟失走時(shí)時(shí)鐘和設(shè)置數(shù)據(jù),，所以一定要保證供電連續(xù)性。我想了一個(gè)辦法如果停電時(shí)采用備用電池供電,，停電時(shí)它們切換供電在切換過(guò)程中加入了10000uf的大電容解決了在切換過(guò)程中斷電現(xiàn)象,。

  在整個(gè)制作過(guò)程中遇到了許多問(wèn)題，我需要面對(duì)問(wèn)題去解決遇到的難題,。我個(gè)人認(rèn)為這是一個(gè)鍛煉自己解決問(wèn)題的好機(jī)會(huì),。制作中有苦有樂(lè)，我將制作方法拿出來(lái)和大家一起分享,。

下面是我的小型實(shí)驗(yàn)室

制作過(guò)程：2011年11月15日,，我走進(jìn)我的小角落小型實(shí)驗(yàn)室,，找出了51單片機(jī)開(kāi)發(fā)板,，打開(kāi)電腦開(kāi)始寫(xiě)程序，忙了一天寫(xiě)好了單片機(jī)數(shù)字電子鐘,。這套裝置的核心就是電子鐘,，所以首先要制作出數(shù)字電子鐘。然后在數(shù)字鐘程序基礎(chǔ)上加入了幾條語(yǔ)句就可以按編寫(xiě)的時(shí)間控制繼電器閉合觸點(diǎn)了,，很簡(jiǎn)單吧,！通過(guò)計(jì)算機(jī)設(shè)定調(diào)整時(shí)間設(shè)置定時(shí)時(shí)間可不行，下一步要加入鍵盤,，通過(guò)鍵盤調(diào)整走時(shí)時(shí)間和設(shè)置定時(shí)時(shí)間,。圖上面的三個(gè)按鈕分別為設(shè)置鍵，小時(shí)調(diào)整鍵,，分鐘調(diào)整鍵,。第二天完成了鍵盤調(diào)整函數(shù)模塊程序編寫(xiě)，可以在一天中多了時(shí)間段控制電鈴響起,。一步一步的調(diào)試改進(jìn)完成了自動(dòng)打鈴器,，在喜悅中新問(wèn)題來(lái)了，打鈴器工作了一天后出現(xiàn)了走時(shí)誤差,，經(jīng)過(guò)9個(gè)小時(shí)就會(huì)出現(xiàn)60秒的誤差,。我開(kāi)始嘗試了各種方法解決誤差問(wèn)題，采用自動(dòng)調(diào)整法比較有效果,，實(shí)驗(yàn)測(cè)出產(chǎn)生1秒誤差所需用的時(shí)間,，然后通過(guò)程序每過(guò)一段時(shí)間就將秒變量自動(dòng)加1或是減1來(lái)清除誤差。在電源供電方面考慮實(shí)際情況需用改進(jìn),。單片機(jī)正常工作必須保證電能連續(xù)性,。如果一旦停電數(shù)據(jù)將會(huì)丟失，所以要加入備用電池當(dāng)停電時(shí)自動(dòng)切換到電池供電,。我將繼電器接到變壓器輸出端,，如果市電有電時(shí)繼電器得電工作,，停電時(shí)繼電器失電，通過(guò)繼電器常開(kāi)常閉觸點(diǎn)控制市電和電池切換,，在供應(yīng)電源輸出端加入10000uf大電容起到市電和電池切換瞬間斷電現(xiàn)象,。電源電路中加入了一只光耦輸出端送往單片機(jī)它起到判斷何種方式供電，如果電池供電單片機(jī)板上面的數(shù)碼管關(guān)閉以節(jié)省電能,。

  下面有電源部分電路原理圖,，單片機(jī)部分電路原理圖，實(shí)物圖和單片機(jī)c51程序,。

我在飛

其實(shí)對(duì)于定時(shí)打鈴的辦法很多。比如管理體系健全的企業(yè)一般各個(gè)車間和部門都會(huì)安裝廣播系統(tǒng)的,。利用這個(gè)系統(tǒng),，在辦公電腦上裝個(gè)定時(shí)播放音樂(lè)的軟件，定時(shí)播放鈴聲即可,。且電腦的時(shí)鐘是可以聯(lián)網(wǎng)校準(zhǔn)的,。更不怕斷電產(chǎn)生時(shí)鐘混亂�,；�本就是零投��,。

1五湖四海1

下面是自動(dòng)打鈴器c程序

#include<reg51.h>

#define shum P1  //數(shù)碼

#define saom P2 //數(shù)碼掃描

#define uchar unsigned char

#define uint unsigned int

char DATA_7SEG[10]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xf8,0x80,0x90,};

uchar hour=0,min=0,sec=0,tauto=0;                  //時(shí) 分 秒

uchar x=8,y=0,g=11,f=55,o=16,p=30;                             //x是定時(shí)1小時(shí)設(shè)定值 y是定時(shí)1分設(shè)定值

uchar deda=0;

uchar code xsjsbb[60];

bit d_05s=0;

uchar set=0;

/*-----------------------走時(shí)函數(shù)--------------------------*/

void init_timer()

{

  TMOD=0x01;

  TH0=(65536-5000)/256;

  TL0=(65536-5000)%256;

  IE=0x82;

  TR0=1;

}

/*-----------------------5ms定時(shí)中斷服務(wù)函數(shù)--------------------------*/

void T0_srv(void) interrupt 1

{

  TH0=(65536-5000)/256;

  TL0=(65536-5000)%256;

  deda++ ;

}

/*----------------------時(shí)，分,，秒單元及走時(shí)單元轉(zhuǎn)換-------------------------*/

void conv()

{

if(deda<=100)d_05s=0;

else d_05s=1;

if(deda>=200){sec++;deda=0;}

if(sec==60){min++;tauto++;sec=0;}

if(tauto==9){sec=sec+1;tauto=0;}                       //自動(dòng)調(diào)時(shí)沒(méi)過(guò)9分鐘(tauto=9）秒變量sec自增1

if(min==60){hour++;min=0;}

if(hour==24){hour=0;}

}

void display()                //數(shù)碼管模塊

{char e,scan;

if(deda<=100)P3_4=0; else P3_4=1;

if(hour==x)a=1; else a=0;                     //定時(shí)設(shè)定值x,，y g，f o,，p

if(min==y)b=1; else b=0;

if(sec==2)c=1; else c=0;

if(a&b&c) P0_3=0; else P0_3=1;

if(hour==g)la=1; else la=0;

if(min==f)lb=1; else lb=0;

if(sec==2)lc=1; else lc=0;

if(la&lb&lc) P0_3=0; else P0_3=1;

if(hour==o)ia=1; else ia=0;

if(min==p)ib=1; else ib=0;

if(sec==2)ic=1; else ic=0;

if(ia&ib&ic) P0_3=0; else P0_3=1;

disp[3]=hour/10;

disp[2]=hour%10;

disp[1]=min/10;

disp[0]=min%10;

P1=0xff;

scan=0xef;

for(e=0;e<4;e++)

{

shum=0xff;

saom=scan;

if(P3_6==0)

  {

    if(d_05s==1)

    {if(e==2)P1_7=0;else P1_7=1;}

  }

  else {if(e==2) P1_7=1;}

if(P3_6==0)  

            P1=DATA_7SEG[disp[e]];

else       P1=0xff;

delay(4);

scan>>=1;

}

}

/*-------------------調(diào)整走時(shí)時(shí)間函數(shù)部分------------------------*/

void set_time()

{uchar m;

if(P3_1==0)delay(1);

if(P3_1==0)hour++;

F1:if(P3_1==0)goto F1;

if(hour==24)hour=0;

for(m=0;m<30;m++)

  {

   display();

  if(d_05s==1)P2_7=0;

  else P2_7=1;

   delay(1);

  }

if(P3_0==0)delay(1);

if(P3_0==0)min++;

F2:if(P3_0==0)goto F2;

if(min==60)min=0;

for(m=0;m<30;m++)

  {

   display();

   if(d_05s==1)P2_7=0;

   else P2_7=1;

   delay(1);

  }

}

}

1五湖四海1

1五湖四海1 發(fā)表于 2011-11-20 18:48
下面是自動(dòng)打鈴器c程序
#include#define shum P1  //數(shù)碼#define saom P2 //數(shù)碼掃描#define uchar unsign ...

void set_t1()

{

uchar m;

if(P3_1==0)delay(1);

if(P3_1==0)x++;

F1:if(P3_1==0)goto F1;

if(x==24)x=0;

if(P3_0==0)delay(1);

if(P3_0==0)y++;

F2:if(P3_0==0)goto F2;

if(y==60)y=0;

for(m=0;m<30;m++)

  {

     char e,scan;

     tdisp[4]=1;

     tdisp[3]=x/10;

     tdisp[2]=x%10;

     tdisp[1]=y/10;

     tdisp[0]=y%10;

     P1=0xff;

     scan=0xef;

     for(e=0;e<5;e++)

     {

     shum=0xff;

     saom=scan;

   

     P1=DATA_7SEG[tdisp[e]];

     delay(4);

     scan>>=1;

     }

   delay(1);

  }

}

void set_t2()

{

uchar m;

if(P3_1==0)delay(1);

if(P3_1==0)g++;

F1:if(P3_1==0)goto F1;

if(g==24)g=0;

if(P3_0==0)delay(1);

if(P3_0==0)f++;

F2:if(P3_0==0)goto F2;

if(f==60)f=0;

for(m=0;m<30;m++)

  {

     char e,scan;

     tdisp[4]=2;

     tdisp[3]=g/10;

     tdisp[2]=g%10;

     tdisp[1]=f/10;

     tdisp[0]=f%10;

     P1=0xff;

     scan=0xef;

     for(e=0;e<5;e++)

     {

     shum=0xff;

     saom=scan;

   

     P1=DATA_7SEG[tdisp[e]];

     delay(4);

     scan>>=1;

     }

   delay(1);

  }

}

void set_t3()

{

uchar m;

if(P3_1==0)delay(1);

if(P3_1==0)o++;

F1:if(P3_1==0)goto F1;

if(o==24)o=0;

if(P3_0==0)delay(1);

if(P3_0==0)p++;

F2:if(P3_0==0)goto F2;

if(p==60)p=0;

for(m=0;m<30;m++)

  {

     char e,scan;

     tdisp[4]=3;

     tdisp[3]=o/10;

     tdisp[2]=o%10;

     tdisp[1]=p/10;

     tdisp[0]=p%10;

     P1=0xff;

     scan=0xef;

     for(e=0;e<5;e++)

     {

     shum=0xff;

     saom=scan;

   

     P1=DATA_7SEG[tdisp[e]];

     delay(4);

     scan>>=1;

     }

   delay(1);

  }

}

/*-------------------按鍵掃描及延時(shí)等函數(shù)部分-------------------------*/

/*--------走時(shí)時(shí)間程序函數(shù)--------*/

void time()

{

  conv();

  display();

}

/*--------掃描按鍵函數(shù)--------*/

void scan_key()

{

delay(1);

if(P3_2==0)set++;

if(set>=5)set=0;

if(set==1)flag=0x55;

F0:if(P3_2==0)goto F0;

}

/*--------延時(shí)函數(shù)-------------*/

void delay(uint k)

{

uint i,j;

for(i=0;j<k;i++)

  {

   for(j=0;j<121;j++);

  }

}

/*-----------------主函數(shù)-------------------------------------*/

void main()

{

init_timer();

while(1)

{if(P3_2==0)scan_key();

switch(set)

{

  case 0:time(); break;

  case 1:set_time();break;

  case 2:set_t1();break;

  case 3:set_t2();break;

  case 4:set_t3();break;

  default:break;

}

}

往事隨風(fēng)LEO

{:soso_e126:}  打鈴器還要自制�,。。,�,！浪費(fèi)時(shí)間,，直接買一個(gè)，都是現(xiàn)成的,，而且很便宜,！

華山一道

嚴(yán)重不懂為啥要自己做，廉價(jià)的現(xiàn)成東西不用,？

水無(wú)香

精神可嘉,，認(rèn)真鉆研，工作本身也是一種生活,，有時(shí)候不以金錢論罷

山寨版

樓主贊一個(gè),。。,。,。。,。,。,。,。。

1五湖四海1

華山一道 發(fā)表于 2011-11-20 20:02
嚴(yán)重不懂為啥要自己做,，廉價(jià)的現(xiàn)成東西不用,？

我喜歡電子制作，將擅長(zhǎng)的單片機(jī)技術(shù)應(yīng)用到單位多好了,，而且在制作過(guò)程中會(huì)遇到問(wèn)題從中會(huì)學(xué)到很多東西,。

904842999

有時(shí)間自己做也好啊，我可還不會(huì)做