標題: 51單片機聲光報警 [打印本頁]

作者: kissoullee    時間: 2018-1-11 19:47
標題: 51單片機聲光報警
單片機源程序如下:
  1. #include <reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. sbit key = P1^0;
  5. sbit led = P1^1;
  6. sbit beep = P1^7;

  7. void delay(uint z) {
  8.         uchar y;
  9.         while(z--) {
  10.                 for( y=20; y>0; y-- );
  11.         }
  12. }

  13. void LAMP() {
  14.         led = ~led;
  15.         delay(200);
  16.         led = ~led;
  17.         delay(200);
  18. }

  19. void SOUND() {
  20.         uchar i;
  21.         for( i=200; i>0; i-- ){
  22.                 beep = ~beep;
  23.                 delay(500);
  24.         }
  25.         for( i=200; i>0; i-- ){
  26.                 beep = ~beep;
  27.                 delay(500);
  28.                 delay(500);
  29.         }
  30. }

  31. void main() {
  32.         P1 = 0xFF;
  33.         while(1){
  34.                 if( key == 0 ){
  35.                         LAMP();
  36.                         SOUND();
  37.                 }
  38.         }
  39. }

復(fù)制代碼






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1