標題: 51單片機超聲波測距,1602顯示,已全部寫成函數(shù),直接調用 [打印本頁]

作者: hb-l    時間: 2018-7-13 15:13
標題: 51單片機超聲波測距,1602顯示,已全部寫成函數(shù),直接調用


單片機源程序如下:
  1. #include"hc_sr04.h"
  2. #include"1602.h"

  3. uchar array[4];
  4. uchar overflow=0;//溢出標志
  5. uchar code table[]="distance:";
  6. unsigned char code ASCII[15] =    {'0','1','2','3','4','5','6','7','8','9','.','-','M'};   //1602顯示

  7. void hc_sr04datadispose()                //數(shù)據(jù)計算
  8. {
  9.         uint dat;
  10.         unsigned long S=0;
  11.         dat=TH0*256+TL0;
  12. //因為第八位滿一次即TL0=256便往高八位進移位,所以在算時間的時候TH0得*-256
  13.         TH0=0;
  14.         TL0=0;
  15. /*1.7=高電平時間(us)*聲速(340M/S))/2=高電平時間(us)*0.034/2=高電平時間(us)*0.017=1.7cm/us*/
  16.         S=(dat*1.7)/100; //測試距離=(高電平時間(us)*聲速(340M/S))/2;在后面乘以10是為了化成cm,65.536ms=65536μs最大探測距離是65536×0.017
  17.         if((S>400)||overflow==1)  //溢出標志
  18.         {
  19.       overflow=0;
  20.           DisplayOneChar(0, 1, ASCII[11]);
  21.           DisplayOneChar(1, 1, ASCII[10]);        //顯示點
  22.           DisplayOneChar(2, 1, ASCII[11]);
  23.           DisplayOneChar(3, 1, ASCII[11]);
  24.           DisplayOneChar(4, 1, ASCII[12]);        //顯示M  
  25.         }
  26.         else
  27.         {
  28.                 array[0]=(S/100);                                //數(shù)據(jù)處理
  29.                 array[1]=(S%100/10);
  30.                 array[2]=(S%10);
  31.           DisplayOneChar(0, 1, ASCII[array[0]]);
  32.           DisplayOneChar(1, 1, ASCII[10]);        //顯示點
  33.           DisplayOneChar(2, 1, ASCII[array[1]]);
  34.           DisplayOneChar(3, 1, ASCII[array[2]]);
  35.           DisplayOneChar(4, 1, ASCII[12]);        //顯示M

  36.         }
  37. }

  38. void delayms(uint xms)                   //延時
  39. {
  40.     uint b;
  41.     for(b=xms;b>0;b--);
  42. }

  43. void main()
  44. {
  45.         uchar aa=0;
  46.         LCDinitialize();          //初始化
  47.         LCDwritecommand(0x80); //發(fā)顯示位置
  48.                 while(table[aa]!='\0')           //顯示文字
  49.         {
  50.         LCDwritedata(table[aa]); //發(fā)數(shù)據(jù)
  51.         aa++;
  52.         }

  53.         hc_sr04read(); //hc——sr04數(shù)據(jù)處理
  54. }
復制代碼

所有資料51hei提供下載:
實驗25:超聲波測距 - 1602顯示.zip (38.45 KB, 下載次數(shù): 45)



作者: 單片機老司機    時間: 2019-12-8 13:16
這個程序可以直接燒錄嗎?
作者: 1072686085    時間: 2019-12-8 15:54
原理圖有嗎




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