DIY定時自動打鈴器

1五湖四海1

DIY定時自動打鈴器

  我廠為了搞好軍事化管理，在每個廠房安裝了電鈴。按廠規定的休息時間打鈴提示。安裝這套裝置需要一個定時自動控制電鈴開啟的裝置。廠子安排我負責完成這套裝置。我接下任務打算自行設計一套定時打鈴器，我的設計方案得到廠領導批準后，我給自己立下軍令狀一周之內完成。

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

  在整個制作過程中遇到了許多問題，我需要面對問題去解決遇到的難題。我個人認為這是一個鍛煉自己解決問題的好機會。制作中有苦有樂，我將制作方法拿出來和大家一起分享。

下面是我的小型實驗室

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

  下面有電源部分電路原理圖，單片機部分電路原理圖，實物圖和單片機c51程序。

我在飛

其實對于定時打鈴的辦法很多。比如管理體系健全的企業一般各個車間和部門都會安裝廣播系統的。利用這個系統，在辦公電腦上裝個定時播放音樂的軟件，定時播放鈴聲即可。且電腦的時鐘是可以聯網校準的。更不怕斷電產生時鐘混亂。基本就是零投入。

1五湖四海1

下面是自動打鈴器c程序

#include<reg51.h>

#define shum P1  //數碼

#define saom P2 //數碼掃描

#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;                  //時 分 秒

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

uchar deda=0;

uchar code xsjsbb[60];

bit d_05s=0;

uchar set=0;

/*-----------------------走時函數--------------------------*/

void init_timer()

{

  TMOD=0x01;

  TH0=(65536-5000)/256;

  TL0=(65536-5000)%256;

  IE=0x82;

  TR0=1;

}

/*-----------------------5ms定時中斷服務函數--------------------------*/

void T0_srv(void) interrupt 1

{

  TH0=(65536-5000)/256;

  TL0=(65536-5000)%256;

  deda++ ;

}

/*----------------------時，分，秒單元及走時單元轉換-------------------------*/

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;}                       //自動調時沒過9分鐘(tauto=9）秒變量sec自增1

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

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

}

void display()                //數碼管模塊

{char e,scan;

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

if(hour==x)a=1; else a=0;                     //定時設定值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;

}

}

/*-------------------調整走時時間函數部分------------------------*/

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 發表于 2011-11-20 18:48
下面是自動打鈴器c程序
#include#define shum P1  //數碼#define saom P2 //數碼掃描#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);

  }

}

/*-------------------按鍵掃描及延時等函數部分-------------------------*/

/*--------走時時間程序函數--------*/

void time()

{

  conv();

  display();

}

/*--------掃描按鍵函數--------*/

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;

}

/*--------延時函數-------------*/

void delay(uint k)

{

uint i,j;

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

  {

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

  }

}

/*-----------------主函數-------------------------------------*/

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;

}

}

往事隨風LEO

{:soso_e126:}  打鈴器還要自制啊！！！浪費時間，直接買一個，都是現成的，而且很便宜！

華山一道

嚴重不懂為啥要自己做，廉價的現成東西不用？

水無香

精神可嘉，認真鉆研，工作本身也是一種生活，有時候不以金錢論罷

山寨版

樓主贊一個。。。。。。。。。。

1五湖四海1

華山一道 發表于 2011-11-20 20:02
嚴重不懂為啥要自己做，廉價的現成東西不用？

我喜歡電子制作，將擅長的單片機技術應用到單位多好了，而且在制作過程中會遇到問題從中會學到很多東西。

904842999

有時間自己做也好啊，我可還不會做