单片机大作业设计报告(4)

MOV P2,#11110000B ;行线置低电平，列线置输入态 MOV A,P2 CPL A

ANL A,#11110000B

JZ GRET ;全0，无键按下，返回 MOV P2,#11110000B ; 行线置低电平，列线置输入态 MOV A,P2 ;读列线状态 CPL A ;数据取反，按键按下的列线“1”有效 ANL A,#11110000B ; 屏蔽行线，取列线状态 MOV R1,A MOV P2,#00001111B MOV A,P2 CPL A ANL A,#00001111B MOV R2,A

KEY1: MOV P2,#11110000B MOV A,P2 CPL A ANL A,#11110000B JNZ KEY1 MOV A,R1 MOV R1,#03H MOV R3,#03H CLR C KEY2: RLC A JC KEY3 DEC R1 DJNZ R3,KEY2 KEY3: MOV A,R2 MOV R2,#00H MOV R3,#03H CLR C KEY4: RRC A JC KEY5

INC R2 DJNZ R3,KEY4 KEY5: MOV A,R2 CLR C MOV B,A RLC A ADD A,B ADD A,R1 MOV DPTR,#LED_SEG MOVC A,@A+DPTR MOV P0,A CLR P3.7 SETB P3.7

GRET: MOV R5,#0FFH POP ACC LJMP CONT

;延时子程序 DELAY: MOV R5,#100 DEL1: MOV R6,#200 DEL0: NOP NOP NOP DJNZ R6,DEL0 DJNZ R5,DEL1 RET

ORG 0300H

Pint0: PUSH ACC ;保护现场 PUSH PSW SETB RS0 ;把工作寄存器切换到1区，避免中断处理影响主程序中R0~R7的内容 MOV R1,#05H ;设置循环次数 CONT1: CLR A ;产生显示控制码

MOV P1,A ;输出控制LED全熄灭 ACALL DELAY ;延时 MOV R2,#01H ;循环初值 MOV R3,#01H ;显示控制码暂存寄存器初值，逐个点亮起始位 CONT2: MOV A,R3 ;取显示控制码 MOV P1,A ;输出控制LED ACALL DELAY ;延时 MOV A,R2 ;取循环码 RL A ;循环码移位 MOV R2,A ;循环码暂存 ORL A,R3 ;产生下次显示控制码 MOV R3,A ;暂存显示控制码 MOV A,R2

XRL A,#01 ;8个LED显示完，异或结果为0 JNZ CONT2 ;8个LED未显示完，继续

DJNZ R1,CONT1 ;这种显示模式5次显示完否？ POP PSW ;回复现场，RS0恢复到原来的状态 POP ACC

RETI ;中断返回 ;INT1中断源的中断处理程序 ORG 0400H Pint1: PUSH ACC PUSH PSW SETB RS0 MOV R1,#10 CONT3: CLR A MOV P1,A ACALL DELAY MOV A,#0FFH MOV P1,A ACALL DELAY DJNZ R1,CONT3 POP PSW POP ACC RETI

;延时20MS DL20MS: MOV R5,#20 DEL2: MOV R6,#200 DEL3: NOP NOP NOP DJNZ R6,DEL3 DJNZ R5,DEL2 RET ;字形码表

LED_SEG: DB 06H,5BH,4FH,66H,6DH,7DH,07H DB 7FH,6FH END