標(biāo)題: 51單片機(jī)檢測(cè)雨水的控制電路 附仿真原理圖和C程序 [打印本頁(yè)]
作者: 1131254814    時(shí)間: 2017-7-22 08:37
標(biāo)題: 51單片機(jī)檢測(cè)雨水的控制電路 附仿真原理圖和C程序
仿真需要自己添加程序，文件包內(nèi)附帶有程序

51單片機(jī) 單獨(dú)雨水檢測(cè)功能
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機(jī)源程序如下:
  1. /*

  3. 編寫(xiě)人：  鄧耀榮
  4. 編寫(xiě)日期：2017年7月15日

  6. IO口連接情況

  8. 1        LED1             40
  9. 2        LED2                 39
  10. 3        LED3                         38
  11. 4        LED4                         37
  12. 5        LED5                         36
  13. 6        LED6                         35
  14. 7        LED7                         34
  15. 8   LED8                         33
  16. 9                                 32
  17. 10                                 31
  18. 11                                 30
  19. 12        BB                         29
  20. 13                                 28
  21. 14                                 27
  22. 15                                 26
  23. 16                                 25          繼電器控制
  24. 17                                 24          水滴板
  25. 18                                 23
  26. 19                                 22
  27. 20                           21
  28. 此程序?qū)崿F(xiàn)的功能為水滴檢測(cè)控制繼電器吸合，以斷開(kāi)主水泵的線路，當(dāng)沒(méi)有雨水，則延時(shí)打開(kāi)主水泵的線路。
  29. */
  30. #include <reg52.h>
  31. sbit SETA = P2^3;
  32. sbit OT = P2^4;
  33. static unsigned char k = 0;
  34. sbit A1 = P1^0;
  35. sbit B1 = P1^1;
  36. sbit C1 = P1^2;
  37. sbit D1 = P1^3;
  38. sbit E1 = P1^4;
  39. sbit F1 = P1^5;
  40. sbit G1 = P1^6;
  41. sbit H1 = P1^7;
  42. sbit BB = P3^2;


  45. void Delay(unsigned long t)
  46. {
  47. while(--t);
  48. }

  50. void zhuangtai(void)
  51. {
  52.         H1 = 0;Delay(1000);BB = 0;
  53.         G1 = 0;Delay(1000);BB = 1;
  54.         F1 = 0;Delay(1000);BB = 0;
  55.         E1 = 0;Delay(1000);BB = 1;
  56.         D1 = 0;Delay(1000);BB = 0;
  57.         C1 = 0;Delay(1000);BB = 1;
  58.         B1 = 0;Delay(1000);
  59.         A:A1 = 0;Delay(9500);
  60.         A1 = 1;Delay(9500); if(SETA == 0){goto A;}
  61. }
  62. void d110ms(void){
  63.    unsigned char i,j,k;
  64.    for(i=6;i>0;i--)
  65.      for(j=18;j>0;j--)
  66.        for(k=248;k>0;k--);
  67. }

  69. void main (void)
  70. {
  71.         static unsigned char k = 0;
  72.         A1=B1=C1=D1=E1=F1=G1=H1=1;
  73.         OT = 0;
  74.         while(1)
  75.         {
  76.                  if(SETA == 0)
  77.                  {
  78.                          Delay(1000);
  79.                         if(SETA == 0)
  80.                          {
  81.                                     OT = 1;                                  
  82.                                    zhuangtai();
  83.                                    k = 255;
  84.                                    while(!SETA);
  85.                                    A1 = 0;
  86.                          }

  88.                  }
  89.                  if(k>0)
  90.                  {
  91.                          d110ms();
  92.                         k--;
  93.                           if(k == 232){A1 = 1;}
  94.                           if(k == 203){B1 = 1;}
  95.                           if(k == 174){C1 = 1;}
  96.                           if(k == 145){D1 = 1;}
  97.                           if(k == 116){E1 = 1;}
  98.                           if(k == 87) {F1 = 1;}
  99.                           if(k == 58) {G1 = 1;}
  100.                           if(k == 29) {H1 = 1;}
  101. ……………………

  103. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
STC 15F104W 單獨(dú)雨水檢測(cè)功能.zip (93.63 KB, 下載次數(shù): 28)


作者: 1131254814    時(shí)間: 2017-7-22 08:39
修正一下， 文中用到的單片機(jī)是STC89c52RC, 光耦是PC521
作者: zhangsp123    時(shí)間: 2017-8-30 17:02
下不了
作者: 賺錢(qián)買(mǎi)八爪魚(yú)    時(shí)間: 2019-12-3 09:59
樓主 ，這個(gè)能夠檢測(cè)雨量嘛




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