基于單片機的紅外門進控制系統設計與制作:我們所做的創新實驗項目“基于單片機的紅外門控系統”已基本完成，現將其工作原理簡要說明。該系統主要分為兩大部分：一是紅外傳感器部分。二是單片機計數顯示控制部分。基本電路圖如下:其中紅外傳感器部分我們采用紅外對管實現，紅外對管平行放置，平常處于接收狀態，經比較器輸出低電平，當有人經過時，紅外線被擋住，接收管接收不到紅外線，經比較器輸出高電平。這樣，當有人經過時便會產生一個電平的跳變。單片機控制部分主要是通過外部兩個中斷判斷是否有人經過，如果有人經過，由于電平跳變的產生，進入中斷服務程序，這里我們采用了兩對紅外傳感器接到兩個外部中斷口，中斷0作為入口，實現加1操作，中斷1作為出口，實現減1操作。另外，我們通過P0口控制室內燈的亮暗，當寄存器計數值為0時，熄燈，不為0時，燈亮。顯示部分，采用兩位數碼管動態顯示，如有必要，可以很方便的擴展為四位計數。精益求精！在實驗過程中，我們走了非常多的彎路,做出來的東西根本不是自己想要的,我們本想做成室內只有一個門的進出計數，原理已清楚，即在門的兩邊放置兩對紅外對管，進出時，擋住兩對對管的順序不同，因此，可判斷是進入還是出去，從而實現加減計數，編程時，可分別在兩個中斷服務程序的入口置標志位，根據標志位判斷進出，詳細內容在程序部分。理論如此，但在實際過程中，還是發現實現不了上述功能，我們初步判定認為是程序掌握得不夠好,相信隨著自己對單片機了解的深入,應該會做出更好的 (因為我們是臨時學的單片機),程序的具體內容如下：
$MOD52 ORG 0000H LJMP MAIN ORG 0003H LJMP 0100H ORG 0013H LJMP 0150H ORG 0050HMAIN: CLR A MOV 30H , A ;初始化緩存區 MOV 31H , A MOV 32H , A MOV 33H , A MOV R6 , A MOV R7 , A SETB EA SETB EX0 SETB EX1 SETB IT0 SETB IT1 SETB PX1NEXT1: ACALL HEXTOBCDD ;調用數制轉換子程序 ACALL DISPLAY ;調用顯示子程序 LJMP NEXT1
ORG 0100H ;中斷0服務程序 LCALL DELY mov 70h,#2 djnz 70h,next JBC F0,NEXT SETB F0 CLR P0.0 LCALL DELY0 SETB P0.0 MOV A , R7 ADD A , #1 MOV R7, A MOV A , R6 ADDC A , #0 MOV R6 , A CJNE R6 , #07H , NEXT CLR A MOV R6 , A MOV R7 , ANEXT: RETI ORG 0150H ;中斷1服務程序 LCALL DELY mov 70h,#2 djnz 70h,next2 JBC F0,NEXT2 SETB F0 CLR P0.0 LCALL DELY0 SETB P0.0 CLR C MOV A , R7 SUBB A , #1 MOV R7, A MOV A , R6 SUBB A , #0 MOV R6 , A CJNE R6 , #07H , NEXT2 CLR A MOV R6 , A MOV R7 , ANEXT2: RETI
ORG 0200HHEXTOBCDD:MOV A , R6 ;由十六進制轉化為十進制 PUSH ACC MOV A , R7 PUSH ACC MOV A , R2 PUSH ACC CLR A MOV R3 , A MOV R4 , A MOV R5 , A MOV R2 , #10HHB3: MOV A , R7 ;將十六進制中最高位移入進位位中 RLC A MOV R7 , A MOV A , R6 RLC A MOV R6 , A MOV A , R5 ;每位數加上本身相當于將這個數乘以2 ADDC A , R5 DA A MOV R5 , A MOV A , R4 ADDC A , R4 DA A ;十進制調整 MOV R4 , A MOV A , R3 ADDC A , R3 DJNZ R2 , HB3 POP ACC MOV R2 , A POP ACC MOV R7 , A POP ACC MOV R6 , A RET ORG 0250HDISPLAY:
MOV R0 , #30H MOV A , R5 ANL A , #0FH MOV @R0 , A MOV A , R5 SWAP A ANL A , #0FH INC R0 MOV @R0 , A MOV A , R4 ANL A , #0FH INC R0 MOV @R0 , A MOV A , R4 SWAP A ANL A , #0FH INC R0 MOV @R0 , A MOV R0 , #30H MOV R2 , #11111110BAGAIN: MOV A , R2 MOV P2 , A MOV A , @R0 MOV DPTR , #TAB MOVC A , @A+DPTR MOV P1 , A ACALL delay INC R0 MOV A , R2 RL A MOV R2 , A JB ACC.4 , AGAIN
RETTAB: DB 03FH , 06H , 5BH , 4FH , 66H , 6DH , 7DH , 07H , 7FH , 6FH ;七段碼表DELY: MOV R1,#80D1: MOV R2,#100 DJNZ R2,$ DJNZ R1,D1 RET delay: MOV TMOD , #01H ;延時子程序 MOV TL0 , #0FEH MOV TH0 , #0FEH SETB TR0WAIT: JNB TF0 , WAIT CLR TF0 CLR TR0 RETDELY0: MOV R1, #200D3: MOV R2,#250 DJNZ R2,$ DJNZ R1,D3 RET END 該系統實際應用廣泛。可用在生產線上產品數量統計、公交車智能計數問候（需添加語音芯片）、超市內人數統計等公共場合。另外，添加串口通信部分便可實現與PC數據交換的功能。 由于，實驗簡化了，剩下不少零件和資金，所以我們又做了兩項其他的實驗。
標簽：
單片機
紅外
控制系統設計
原理圖
上傳時間：
2013-12-22
上傳用戶：tangsiyun
51匯編程序實例：舉一例說明：流水燈加數碼管
LOOP: ; 標號CLR P2.6 ;選中p2.6 數碼管左邊的8字使能SETB P2.7 ;p2.7不使能。 右邊的數碼管消隱MOV P0,#28H ;把28h送p0口；數碼管顯示 0LCALL delay ;延時MOV P0,#0FFH ;0ffh 送p0口，數碼管清除CLR P1.0 ;點亮p1.0發光管MOV P0,#7EH ;把7eh送p0口；數碼管顯示 1LCALL delayMOV P0,#0FFHCLR P1.1 ;點亮p1.0發光管CLR P1.0 ;點亮p1.0發光管MOV P0,#0A2H ;數碼管顯示 2LCALL delayMOV P0,#0FFHCLR P1.2CLR P1.1CLR P1.0MOV P0,#62H ;數碼管顯示 3LCALL delayMOV P0,#0FFHCLR P1.3CLR P1.2CLR P1.1CLR P1.0MOV P0,#74H ;數碼管顯示 4LCALL delayMOV P0,#0FFHCLR P1.4CLR P1.3CLR P1.2CLR P1.1CLR P1.0MOV P0,#61H ;數碼管顯示 5;LCALL delayMOV P0,#0FFHCLR P1.5CLR P1.4CLR P1.3CLR P1.2CLR P1.1CLR P1.0MOV P0,#21H ; 數碼管顯示 6LCALL delayMOV P0,#0FFHCLR P1.6CLR P1.5CLR P1.4CLR P1.3CLR P1.2CLR P1.1CLR P1.0MOV P0,#7AH ; 數碼管顯示 7LCALL delayMOV P0,#0FFHCLR P1.7CLR P1.6CLR P1.5CLR P1.4CLR P1.3CLR P1.2CLR P1.1CLR P1.0MOV P0,#20H ; 數碼管顯示 8LCALL delayMOV P0,#0FFHLCALL delayMOV P0,#0FFHMOV P1,#0FFH;程序到此結果為左邊的數碼管顯示0，1，2，3，4，5，6，7，8;p1.0------------p1.7指示燈依次點亮SETB P2.6 ; 左邊的8消隱CLR P2.7 ;選中p2.7 數碼管右邊的8字使能 ，；MOV P0,#28HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.0MOV P0,#7EHLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.1MOV P0,#0A2HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.2MOV P0,#62HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.3MOV P0,#74HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.4MOV P0,#61HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.5MOV P0,#21HLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.6MOV P0,#7AHLCALL delayMOV P0,#0FFHMOV P1,#0FFHCLR P1.7MOV P0,#20HLCALL delayMOV P0,#0FFHMOV P1,#0FFHMOV P0,#0FFHMOV P1,#0FFH;這一段和上一段基本相同， 不同的是右邊的數碼管依次顯示012345678，左邊的不亮；;同時p1口的燈流動顯示：AJMP LOOP; 注意： 程序運行到此跳轉到開始標號，重復執行：delay: ;延時子程序；參考前面的教程：CLR P3.3 ;注意小喇叭在3.3口， 這里可以使小喇叭發出嗒，嗒聲MOV R7,#255NOPNOPD1:MOV R6,#255setb p3.3D2: DJNZ R6,D2clr p3.3DJNZ R7,D1SETB P3.3RETENDLOOP: ； 標號CLR P2.6 ；選中p2.6 數碼管左邊的8字使能SETB P2.7 ；p2.7不使能。 右邊的數碼管消隱MOV P0,#28H ；把28h送p0口；數碼管顯示 0 ;28為1010000LCALL delay ； 延時程序MOV P0,#0FFH ；0ffh 送p0口，數碼管清除；P0口為11111111CLR P1.0 ；點亮p1.0發光管； P1。0為電平，P0口為11111110MOV P0,#7EH ；把7eh送p0口；數碼管顯示 1； P1。0為低電平，P0口為11111110LCALL delay ； 延時程序MOV P0,#0FFHMOV P0,#0FFH ；0ffh 送p0口，數碼管清除；P0口為11111111 清一次顯示這條是清顯示的
標簽：
匯編
程序實例
上傳時間：
2013-10-31
上傳用戶：gundamwzc
