实验8带键盘的彩灯控制.docVIP

实验八 带键盘的彩灯控制系统 目的与要求： 引入中断服务程序，读入键盘数值，并用定时器定时控制彩灯变化状态。 方法与原理分析： 主程序流程图： 中断服务程序： 延时子程序： KEY_SCAN子程序（读键盘）： 译码子程序： 程序清单： WEI DATA 38H DISCNT DATA 39H ORG 0000H LJMP MAIN ORG 001BH LJMP T1_SER ORG 0100H MAIN: MOV 30H, #0 MOV 31H, #0 MOV 32H, #0 MOV 33H, #0 MOV 34H, #0 MOV 35H, #0 MOV 36H, #0 MOV 37H, #0 MOV TMOD, #10H SETB EA SETB ET1 MOV TH1, #0D8H MOV TL1, #0F0H SETB TR1 KEY_LOP: LCALL KEY_SCAN LJMP KEY_LOP KEY_SCAN: MOV P1, MOV A, P1 JNB ACC.2, KEY_12 JNB ACC.3, KEY_16 MOV P1, MOV A, P1 JNB ACC.2, KEY_11 JNB ACC.3, KEY_15 MOV P1, MOV A, P1 JNB ACC.2, KEY_10 JNB ACC.3, KEY_14 MOV P1, MOV A, P1 JNB ACC.2, KEY_9 JNB ACC.3, KEY_13 LJMP KEY_OUT KEY_9: MOV 30H, #9 LJMP KEY_OUT KEY_10: MOV 30H, #0 MOV 31H, #1 LJMP KEY_OUT KEY_11: MOV 30H, #1 MOV 31H, #1 LJMP KEY_OUT KEY_12: MOV 30H, #2 MOV 31H, #1 LJMP KEY_OUT KEY_13: MOV 30H, #3 MOV 31H, #1 LJMP KEY_OUT KEY_14: MOV 30H, #4 MOV 31H, #1 LJMP KEY_OUT KEY_15: MOV 30H, #5 MOV 31H, #1 LJMP KEY_OUT KEY_16: MOV 30H, #6 MOV 31H, #1 LJMP KEY_OUT KEY_OUT: RET SJMP $ T1_SER: MOV TH1, #0D8H MOV TL1, #0F0H LCALL DIS8 RETI DIS8: MOV WEI, #01H MOV DPTR, #DISTAB MOV DISCNT, #8 MOV R0, #30H DISL : MOV A, @R0 MOVC A, @A+DPTR MOV P0, A MOV A, WEI MOV P3, A RL A MOV WEI, A LCALL DELAY MOV P0, #00H INC R0 DJNZ DISCNT, DISL RET DELAY: MOV R7, #0FFH DL1: MOV R6, #02H DL2: DJNZ R6, DL2 DJNZ R7, DL1 RET DISTAB: DB 3FH,06H,5BH,4FH,66H;0-4 DB 6DH,7DH,07H,7FH,6FH;5-9 DB 0BFH,86H,0DBH,0CFH,0E6H;0.-4. DB 0EDH,0FDH,87H,0FFH,0EFH;5.-9. DB 00H;20号 DB 40H;21号 DB 61H;12号 END 清零 定时器T1方式1 初始化 结束 开始 开始 重装值 开始 中断返回 读入键盘值子程序 译码显示子程序 译码 显示 延时程序 8个LED都显示 ? 结束 开始 扫描键盘值 读入键盘值 结束 开始 R7= #0FFH