超聲波測距

ID:3721 · 發表于 2016-6-13 14:22

超聲波測距儀使用8051
超聲波模塊連接到單片機通過P3.0和P3.1引腳。端口0用于發送的8位顯示數據的顯示和端口引腳P1.0，P1.1，P1.2用于發送相應的顯示單元D1，D2，D3的顯示驅動信號。按鈕開關S1，電容器C3和電阻R9構成解彈跳的復位電路。電容器C1，C2和晶體X1相關聯的時鐘電路。
計劃。
      ORG 00H / /原產地
      MOV DPTR，＃LUT / /移動到DPTR的地址LUT
      MOV P1，＃00000000B / /設置為輸出端口P1
      MOV P0，＃00000000B / /設置為輸出端口P0
      CLR P3.0 / /設置P3.0作為輸出發送觸發
      SETB P3.1 / /設置P3.1為輸入，接收回波
      MOV TMOD，＃00100000B / /設置定時器1的模式2自動重載定時器
MAIN：  MOV TL1，＃207D / /加載的初始值開始計數
         MOV TH1，＃207D / /加載的重載值
         MOV A，＃00000000B / /清除累加器
         SETB P3.0 / /開始觸發脈沖
         ACALL DELAY1 / / 10US觸發脈沖寬度

      JNB P3.1，MAIN/ /循環，直到回聲收到
      CLR P3.0 / /結束觸發脈沖
BACK：  SETB TR1 / /啟動定時器
HERE1： JNB TF1，HERE1的/ /循環，直到定時器溢出（即48計數）
            CLR TR1 / /停止計時器
                  CLR TF1 / /清除定時器標志1
                  INC A / /增量滿Timer1溢出
         JB P3.1，BACK / /跳躍回來，如果的回聲仍是提供
         MOV R4，A / /保存價值的一個R4
         ACALL DLOOP / /調用顯示循環
         SJMP MAIN / /跳轉到主回路

DELAY1：MOV R6，＃2D / / 1us的延遲
LABEL1：DJNZ R6，LABEL1
            RET
DLOOP：MOV R5，＃100D / 100D /負載R5與
BACK1：MOV A，R4 / /在R4的值加載到A
            MOV B，＃100D / /加載B和100D
            DIV AB / /第一個數字隔離
            SETB P1.0 / /激活LED顯示單元D1
            ACALL DISPLAY / /調用顯示子程序
            MOV P0，A / /移動數字驅動模式為第1位，P0
            ACALL DELAY / /延時1ms
            ACALL DELAY
            MOV A，B / /移動到A第一師的其余部分
            MOV B，＃10D / /加載B的10D
            DIV AB / /第二位隔離
            CLR P1.0 / /關閉LED顯示單元D1
            SETB P1.1 / /激活LED顯示單元D2
            ACALL DISPLAY
            MOV P0，A / /移動數字驅動模式為第2位P0
            ACALL DELAY
            ACALL DELAY
            MOV A，B / /移動乙級聯賽余下的一個
            CLR P1.1 / /關閉LED顯示單元D2
            SETB P1.2 / /激活LED顯示單元D3
            ACALL DISPLAY
            MOV P0，A / /移動數字驅動模式，第三個數字P0
            ACALL DELAY
            ACALL DELAY
            CLR P1.2 / /關閉LED顯示單元D3
            DJNZ R5，重復顯示BACK1 / /循環100次
   RETDELAY：MOV R7，＃250D / / 1毫秒的延遲
LABEL2：DJNZ R7，LABEL2的
            RET
顯示： MOVC A，@ A + DPTR / /獲取數字內容的驅動模式在A
            CPL A / /數字驅動模式的補充（見注1）
            RET
LUT： DB 3FH / /查找表（LUT）從這里開始
         DB 06H    DB 5BH    DB 4FH    DB 66H    DB 6DH    DB 7DH    DB 07H    DB 7FH    DB 6FH
      END
#include"reg51.h"
#include"string.h"
#include"intrins.h"
#define uint unsigned int
#define uchar unsigned char
sbit wg=P3^7;
sbit ws=P3^6;
sbit chufa=P1^0;
uint juli,juli1,juli2;
char xx[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
uint T;
void delay(uint z)
{
uint x,y;
for(x=10;x>0;x--)
for(y=z;y>0;y--);
}
void disp(uchar dat)
{
  char i;

for(i=0;i<100;i++)
   {
   P2=~xx[dat/10];
   ws=1;
   wg=0;
   delay(10);
   ws=0;

   P2=~xx[dat%10];
   ws=0;
   wg=1;
   delay(10);
   wg=0;
}
}
void main()
{
   char us;
   P1=0;
   ACC=0;
TMOD=0x19;
EA=1;
TR0=1;
EX0=1;
IT0=1;
while(1)
{
if(TF0==1)
ACC++;
else
{
chufa=1;
us=16;
while(us--);
juli=17*T/1000;  //juli=cm
disp(juli);
}
}
}
void int0() interrupt 0
{
   TR0=0;
   chufa=0;
T=ACC *65536+(TH0*256+TL0);
   TH0=0;
   TL0=0;
   ACC=0;
   chufa=1;
   TR0=1;
}