欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 單片機超聲波風扇源程序 根據距離大小來調節風速 [打印本頁]
作者: 悲喜卒讀    時間: 2019-8-23 15:42
標題: 單片機超聲波風扇源程序 根據距離大小來調節風速
我上傳的是超聲波發風扇的源代碼和一些說明，
可根據是否有人來判斷是否可以打開風扇，并根據距離大小來調節風速。

單片機源程序如下:
  1. //該產品可以根據人和風扇的距離自動啟動，當人距離風扇的距離小于50CM時，風扇啟動，當大于50CM時，風扇關閉
  2. #include <reg52.h>
  3. #include <intrins.h>
  4. #include <stdio.h>
  5. #define uint unsigned int
  6. #define uchar unsigned char

  8. sbit IN1=P1^3;
  9. sbit IN2=P1^4;
  10. sbit ENA=P1^5;
  11. sbit TRIG=P1^2;
  12. sbit ECHO=P1^1;

  14. int time;
  15. float s;
  16. bit flag;
  17. void fasong();
  18. void jisuan();
  19. void delay(int x);
  20. void main()
  21. {
  22.         TMOD=0X21;
  23.         SCON=0X50;
  24.         TH1=0XFD;
  25.         TL1=0XFD;
  26.         TH0=0;
  27.         TL0=0;
  28.         TR0=1;
  29.         TR1=1;
  30.         ET0=1;
  31.         TI=1;
  32.         EA=1;
  33.         while(1)
  34.         {
  35.                 fasong();
  36.                 while(!ECHO);
  37.                 TR0=1;
  38.                 while(ECHO);
  39.                 TR0=0;
  40.                 jisuan();
  41.                 delay(100);
  42.                 IN1=0;
  43.                 IN2=1;
  44.                 if(s<50)
  45.                 ENA=1;
  46.                 else
  47.                 ENA=0;        
  48.         }
  49. }
  50. void fasong()
  51. {
  52.         uint i;
  53.         TRIG=1;
  54.         for(i=0;i<20;i++)
  55.         _nop_();
  56.         TRIG=0;
  57. }
  58. void jisuan()
  59. {
  60.         time=TH0*256+TL0;
  61.         TH0=0;
  62.         TL0=0;
  63.         time*=12/11.0592;
  64.         s=time*0.017;
  65.         if(flag==1)
  66.         {
  67.                 flag=0;
  68.                 printf("-----\n");
  69.         }
  70.         printf("S=%f\n",s);
  71. }
  72. void TIME_0 () interrupt 1
  73. {
  74.         flag=1;
  75. }
  76. void delay(int x)
  77. {
  78.         int i,j;
  79.         for(i=x;i>0;i--)
  80.                 for(j=110;j>0;j--);
  81. }
復制代碼

以上代碼的Keil工程下載,你也可以自己建立工程然后把上面的代碼復制過去就不用下載了:
超聲波風扇.zip (26.36 KB, 下載次數: 43)


作者: HONGJI    時間: 2021-8-13 21:21
仿真不動。
作者: 58642379    時間: 2022-3-14 17:27
IN1 IN2 是什么




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