proteus 版本8.9
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）
單片機源程序如下:
- ORG 0000H
- MOV P2,#00H ;關閉顯示
- MAIN:MOV DPTR,#TABLE ;指向段碼表首地址
- MOV R0,#0
- MOV R1,#01H ;點亮第一個數碼管（共陽極）位碼
- NEXT:MOV DPTR,#TABLE
- MOV P2,#0
- MOV A,R0
- MOVC A,@A+DPTR
- MOV P0,A ;送段碼
- MOV A,R1
- MOV P2,A ;送位碼
- ACALL DELAY ;調用延時1ms
- MOV P2,#0 ;關閉一個數碼管
- INC R0 ;段碼地址+1
- MOV A,R1 ;保存段碼
- RL A ;左移點亮下一個數碼管
- MOV R1,A ;保存位碼
- ACALL DELAY ;延時1ms
- CJNE A,#80H,NEXT;顯示前七個數碼管
- MOV P2,#80H ;顯示第8位
- MOV A,#7
- MOVC A,@A+DPTR ;查段碼表得第8個數碼管段碼
- MOV P0,A ;送第8位段碼
- ACALL DELAY ;延時1ms
- SJMP MAIN ;循環
- DELAY:
- MOV R6,#2
- L2:MOV R7,#7DH
- NOP
- NOP
- L1:DJNZ R7,L1
- DJNZ R6,L2
- RET
- TABLE:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
- END
所有資料51hei提供下載:
鍵盤掃描.zip
(129.6 KB, 下載次數: 19)
2021-4-28 20:09 上傳
點擊文件名下載附件
|
