實驗十五發(fā)光二極管陣列的單片機顯示控制實現(綜合實驗)

1、實驗十五發(fā)光二極管陣列的單片機顯示控制實現(綜合實驗一、實驗目的2.掌握PROTEUS ISIS軟件仿真單片機原理的方法3.設計整個單片機實驗電路及軟件,實現發(fā)光二極管陣列的單片機顯示控制二、實驗內容利用8×8點陣LED循環(huán)顯示09的數字三、實驗原理數字09點陣顯示代碼的形成,如圖15.1所示(假設顯示數字“0”1 2 3 4 5 6 7 8 00 3E 41 41 41 3E 00 00圖15.1數字“0”的段碼因此,形成的行代碼為00H,3EH,41H,41H,41H,3E,00H,00H;只要把這些代碼分別送到相應的行線上面,即可實現“0”的數字顯示。送顯示代碼過程如下:送第一

2、行線代碼到P0端口,同時置第一列線為“1”,其他行線為“0”,延時約4ms;送第二列線代碼到P0端口,同時置第二行線為“1”,其他行線為“0”,延時約4ms;依次類推,直到送完最后一列代碼,又從頭開始送。四、實驗步驟打開Proteus ISIS編輯環(huán)境,按表15.1所列元件清單添加元件。元件清單所屬類所屬子類AT89C51 Microprocessor ICs 8051 FamilyCAP Capacitors GenericCAP.ELEC Capacitors GenericCRYSTAL Miscellaneous .RES Resistors Generic74LS245 TTL 74

3、LS Series TransceiversMA TRIX.8×8 Optoelectronics Don Matrix Displays元件全部添加完后,在Proteus ISIS編輯環(huán)境中按圖15.2所示連接硬件原理圖。具體操作步驟見附錄A。 圖15.2 電路原理圖程序流程: 源程序:TCOUNT EQU 30HR_CNT EQU 31HNUMB EQU 32HORG 00HLJMP STARTORG 0BHLJMP INT_T0START: MOV TCOUNT,#00HMOV R_CNT,#00HMOV NUMB,#00HMOV TMOD,#01HMOV TH0,#(6553

4、6.4000/256 ;定時4msMOV TL0,#(65536.4000MOD 256SETB TR0MOV IE,#82HSJMP $MOV TL0,#(65536.4000MOD 256MOV DPTR,#TAB ;取列碼MOV A,R_CNTMOVC A,A+DPTRMOV P3,AMOV DPTR,#NUB ;取行碼MOV A,NUMBMOV B,#8MUL ABADD A,R_CNTMOVC A,A+DPTRCPL AMOV P0,A ;輸出行碼INC R_CNTMOV A,R_CNTCJNE A,#8,NEXTMOV R_CNT,#00HNEXT: INC TCOUNTMOV A

5、,TCOUNTCJNE A,#250,NEX ;每個字顯示1sMOV TCOUNT,#00HINC NUMBMOV A,NUMBCJNE A,#10,NEX ;09循環(huán)顯示MOV NUMB,#00HNEX: RETITAB: DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FHNUB: DB 00H,3EH,41H,41H,41H,3EH,00H,00HDB 00H,00H,00H,00H,21H,7FH,01H,00HDB 00H,00H,27H,45H,45H,45H,39H,00HDB 00H,00H,22H,49H,49H,49H,36H,00HDB 0

6、0H,00H,0CH,14H,24H,7FH,04H,00HDB 00H,00H,72H,51H,51H,51H,4EH,00HDB 00H,00H,3EH,49H,49H,49H,26H,00HDB 00H,00H,40H,40H,40H,4FH,70H,00HDB 00H,00H,36H,49H,49H,49H,36H,00HDB 00H,00H,32H,49H,49H,49H,3EH,00HEND1. 打開Keil Vision,新建Keil項目,選擇A T89C51單片機作為CPU,新建匯編源文件,編寫程序,并將其導入到“Source Group 1”中,在“Options for Target”對話窗口中,選中“Output”選項卡中的“Create HEX File”選項,。編譯匯編源程序,改正程序中的錯誤。具體操作步驟見附錄B。2. 在Proteus ISIS中,選中A T89C51并單擊鼠標左鍵,打開“Edit Component”對話窗口,設置單片機晶振頻率為12MHz,在此窗口中的“Program File”欄中,選擇步驟(