【導(dǎo)讀】過去的推拉門換成了現(xiàn)在的自動門。自動門充斥了我們生活中的方方。阻塵等功能，更重要的是，自動門為人們的出入提供了極大地方便，還有，在一些建筑上安裝自動門會給建筑以美感。本設(shè)計的特點是：結(jié)構(gòu)簡單、功能齊全。路，紅外檢測電路，門行程檢測，直流電機控制電路等幾部分組成。單片機控制直流電機，使門自動打開，當人進門后，門自動關(guān)閉。

　　

【正文】 0H， ROLE SPEED0 BIT ； 門行程行狀 1 SPEED1 BIT ； 門行程行狀 2 SPEED2 BIT ； 門行程行狀 3 SPEED3 BIT ； 門行程行狀 4 DOOROPEN BIT ； 門開驅(qū)動信號 DOORCLOSE BIT ； 門關(guān)驅(qū)動信號 SIGNAL BIT ； 紅外線傳感器信號 A0809E0C BIT ； A/D 轉(zhuǎn)換結(jié)束信號 HSPEED BIT ； 電機速度變換 DOORSTATE BIT 00H ； 門狀態(tài) ORG 0000H AJMP START ORG 0003H AJMP INT0 ORG 000BH AJMP T0 ORG 001BH AJMP T1 ORG 0050H START: CLR DOOROPEN ； 關(guān)電機驅(qū)動 CLR DOORCLOSE MOV TMOD, 11H ； 定時器工作方式 MOV TLO,OFOH ； 置定時器常數(shù) , MOV TH0,08DH MOV TL1,0E0H MOV TH1,0B1H MOV TCON,50H MOV IP,08H ； 優(yōu)先級設(shè)置 MOV IE,80H ； 開中斷 33 LOOP: MOV A,P2 ANL A,OFH JNZ WAIT ； 無按鍵等待 JB MODE,AUTO ； 運行方式判斷 CLR EXO SETB ETO SJMP LOOP AUTO: SETB ETO SJMP LOOP WAIT: SJMP $ ； 等待 開門子程序： DOOR_OPEN:JB DOORSTATE, LOOP3 ； 門已開退出 CLR HSPEED CLR DOORCLOSE SETR DOOROPEN ； 低速啟動 JNP SPEED1,$ SETB HSPEED ； 高速開門 JNB SPEED2,$ CLR HSPEED ； 低速運行 JNB SPEED3,$ CLR DOOROPEN ； 停 機 SETB DOORSTATE ； 保存門狀態(tài) LOOP3： RET 關(guān)門子程序 : DOOR_CLOSE:JNB DOORSTATE, LOOP4 ； 門已關(guān)退出 CLR HSPEED CLR DOOROPEN SETB DOORCLOSE ； 低速啟動 JB SPEED2,$ CLR HSPEED ； 高速關(guān)門 JB SPEED0,$ CLR DOORCLOSE ； 停機 CLR DOORSTATE LOOP4: RET T0 中斷服務(wù)程序 : T0： CLR ET0 ； 關(guān)中斷 JB KEYDOOROPEN LOOP1 ； 開門否 ACALL DOOR_OPEN ； 調(diào)開門子程序 SJMP LOOP2 LOOP1： JB KEYDOORCLOSE， LOOP2 ； 關(guān)門否 ACALL DOOR_OPEN ； 調(diào)關(guān)門子程序 LOOP2： MOV TL0， 0F0H ； 重裝定時常數(shù) MOV TH0， 08DH SETB ET0 ； 開中斷 34 RETI T1 中斷服務(wù)程序： ORG 000H AJMP MAIN ORG 0003H AJMP SERVE MAIN: ORL P1,0FFH SETB 1T0 ； 選擇邊沿觸發(fā)方式 SETB EX0 ； 允許 INTO 中斷 SETB A ； CPU 開中斷 AJMP $ ； 等待中斷 T1： CLR ET1 MOV R1， 03H MOV RO， 20H MOV DPTR， ADDR0809 ； 0809 地址 MOV R2， 00H LOOP5： MOV A， R2 ； 通道號 MOVX @DPTR,A ； 啟動 A/D轉(zhuǎn)換 JB A0809EOC,$ ； 轉(zhuǎn)換是否結(jié)束 MOVX A,@DPTR ； 讀轉(zhuǎn)換結(jié)果 MOV @R0,A ； 數(shù)據(jù)保存 INC R0 INC R2 ； 下一通道 DJNZ R1,LOOP5 ； 三個通道是否完成 MOV TL1,0E0H ； 重裝定時常數(shù) MOV TH1,0B1H SETB ET1 RETI 外部中斷服務(wù)子程序： ORG 0300H INT： MOV TLO， 11H MOV THO， OFCH CPL P1 RETI INT0： CLR EX0 LOOP8： JB DOORSTATE， LOOP6 ； 門已開返回 ACALL DOOR_OPEN ； 開門 LOOP7： ACALL DELAY10S ； 等待 10s JB RERROR， LOOP6 ； JNB SIGNAL， LOOP7 ； 有人等待 CLR HSPEED SETB DOORCLOSE ； 無人啟動電機，低速關(guān)門 JNB SIGNAL， LOOP8 ； 有人來打開門 35 JB SPEED2， $ SETB HSPEED ； 無人快速關(guān)門 JNB SIGNAL， LOOP8 ； 有人來打開門 JB SPEED1， $ CLR HSPEED ； 無人速度降低 JB SPEED0， $ LOOP6: CLR DOORCLOSE ； 停機 CLR DOORSTATE ； 門狀態(tài)保存 SETB EX1 RET