找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 5464|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

匯編語言超聲波測(cè)距程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:75263 發(fā)表于 2015-4-19 23:06 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
       我現(xiàn)在在做超聲波測(cè)距,用的是非門 + CX20106A方案。發(fā)射部分用非門驅(qū)動(dòng),如下




超聲波接收采用CX20106A,如下:



CX20106A是拆機(jī)件。

用萬用板搭好電路之后,在網(wǎng)上找到了一些參考匯編程序,我修改后可以通過串口發(fā)到PC顯示超聲波往返的時(shí)間:
;///////////////////////////////////////////////////////
;               USE  BY :超聲波測(cè)距器                  
;               IC      :STC89C52                     
;               OSCCAL  :XT   (12M)                                 
;///////////////////////////////////////////////////////
;
       T2CON    EQU     0C8H
       T2MOD    EQU     0C9H
       RCAP2L   EQU     0CAH
       RCAP2H   EQU     0CBH
       TH2      EQU     0CDH
       TL2      EQU     0CCH      
       VOUT     EQU     P3.7                    ;超聲波輸出端口

;********************************************
;*             中斷入口程序                 *
;********************************************
;
      ORG 0000H        ;復(fù)位
      LJMP  START           
      ORG 0003H        ;外部中斷0
      LJMP  PINT0     
      ORG 000BH        ;T0溢出中斷
      RETI     
      ORG 0013H        ;外部中斷1
      RETI                  
      ORG 001BH        ;T1溢出中斷   
      LJMP  INTT1                  
      ORG 0023H        ;串口中斷
      RETI                  
      ORG 002BH        ;T2EN端負(fù)跳變(52系列)
      RETI     
;
;********************************************
;*               主 程 序                   *
;********************************************
;
           START:  MOV     SP,#4FH                  
                   MOV     SCON,#50H     ;串口方式1工作,8位數(shù)據(jù)位,1位停止位,無奇偶校驗(yàn),允許接收
                   MOV     T2MOD,#00H    ;DCEN = 0,向上計(jì)數(shù)
                   MOV     RCAP2H,#0FEH  ;定時(shí)器T2置重裝數(shù),波特率:1200. (12MHz)
                   MOV     RCAP2L,#0C8H
                   MOV     TH2,#0FEH     ;定時(shí)器T2置初值
                   MOV     TL2,#0C8H  
                   MOV     T2CON,#34H    ;T2工作方式:波特率發(fā)生器,同時(shí)啟動(dòng)Time2定時(shí)器
                   CLR     TI  
                   CLR     30H           
                  
                   MOV     TMOD,#11H     ;T1、T0為16位定時(shí)器
                   MOV     TH0,#00H      ;65毫秒初值
                   MOV     TL0,#00H
                   MOV     TH1,#00H     
                   MOV     TL1,#00H
                   MOV     P0,#0FFH
                   MOV     P1,#0FFH
                   MOV     P2,#0FFH
                   MOV     P3,#0FFH
                   MOV     R4,#04H       ;超聲波脈沖個(gè)數(shù)控制(為賦值的一半,即2個(gè)超聲波)
                   SETB    PX0
                   CLR     IE0           ;外部中斷0中斷請(qǐng)求標(biāo)志位。當(dāng)主機(jī)響應(yīng)中斷轉(zhuǎn)向該中斷服務(wù)程序執(zhí)行時(shí),由內(nèi)部硬件自動(dòng)將IE0位清0
                   SETB    IT0           ;當(dāng)IT0 = 1時(shí),則外部中斷0(INT0 )端口由“1 ”→“0 ”下降沿跳變,激活中斷請(qǐng)求標(biāo)志位IE0,向主機(jī)請(qǐng)求中斷處理
                   SETB    ET1           ;允許T1中斷
                   SETB    EA
                   SETB    TR1           ;開啟測(cè)距定時(shí)器
;main主循環(huán)開始                  
            start1:
                    JNB    30H,$         ;收到反射信號(hào)時(shí)標(biāo)志位為1
                    
                    CLR    EA            ;不讓T1中斷                 
                    MOV    R2,#64H       ;測(cè)量間隔控制(約5*100=500MS). 64H = 100
              LOOP: LCALL  DL1MS
                    LCALL  DL1MS
                    LCALL  DL1MS
                    LCALL  DL1MS
                    LCALL  DL1MS                    
                    DJNZ   R2,LOOP  
                                      
                    CLR    30H           ;清除反射信號(hào)標(biāo)志位
                    CLR    ET0           ;關(guān)閉T0中斷
                    MOV    TH0,00H
                    MOV    TL0,00H
                    SETB   TR1           ;重新開啟測(cè)距定時(shí)器
                    SETB   EA                  
                    SJMP   start1
;main主循環(huán)結(jié)束

;****************************************************
;*                    中斷程序                      *
;****************************************************

;T1中斷,發(fā)超聲波用     ;T1中斷,65毫秒中斷一次
INTT1:          CLR     EA
                CLR     TR0
                CLR     EX0
                MOV     TH0,#00H
                MOV     TL0,#00H
                MOV     TH1,#00H
                MOV     TL1,#00H
                SETB    ET0             ;外部中斷0中斷請(qǐng)求標(biāo)志位。當(dāng)主機(jī)響應(yīng)中斷轉(zhuǎn)向該中斷服務(wù)程序執(zhí)行時(shí),由內(nèi)部硬件自動(dòng)將IE0位清0
                SETB    EA
                SETB    TR0             ;啟動(dòng)計(jì)數(shù)器T0,用以計(jì)算超聲波傳播時(shí)間
intt11:
                CPL     VOUT            ;發(fā)射40KHZ超聲波. 晶振:12MHz,1us
                nop
                nop
                nop
                nop
                nop
                nop
                nop
                nop
                nop                             
                DJNZ    R4,intt11       ;2us
                                        ;超聲波發(fā)送完畢
                CLR     IE0
                MOV     R4,#04H
                LCALL   DL1MS           ;延時(shí)2ms,避開發(fā)射的直達(dá)聲波信號(hào),消除余震
                LCALL   DL1MS        
                SETB    EX0             ;開啟接收回波中斷
               
RETIOUT:        RETI

;外中斷0,收到回波時(shí)進(jìn)入
PINT0:          nop
                jb      P3.2,pint0_exit
                CLR     TR0             ;關(guān)閉T0                 
                CLR     EA            
                CLR     EX0                  
               
                MOV     SBUF,TH0
                JNB     TI,$
                CLR     TI
               
                MOV     SBUF,TL0
                JNB     TI,$
                CLR     TI               
              
                MOV     TH0,#00H
                MOV     TL0,#00H
                JNB     p3.2,$
                SETB    30H             ;接收成功標(biāo)志
pint0_exit:
                RETI
;

;****************************************************
;*                    延時(shí)程序                      *
;****************************************************
;
DL1MS:
               push    06H
               push    07H

               MOV    R6,#14H    ;14H = 20
        DL1:   MOV    R7,#19H    ;19H = 25
        DL2:   DJNZ   R7,DL2     ;2us * 25 = 50
               DJNZ   R6,DL1     ;50us * 20 = 1000us
               pop    07H
               pop    06H
               RET
;

;
DL100US:
               push    06H

               MOV    R6,#32H    ;32H = 50
        DL3:   DJNZ   R7,DL3     ;2us * 50 = 100us
               pop    07H
               pop    06H
               RET
;

   END





分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩

相關(guān)帖子

回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表