|
ORG 0000H
MAIN: MOV R3,#F7H ; 扫描初始值
MOV R1,#00H ; 取码指标
SCAN1: MOV A,R3 ; 开始扫描
MOV P1,A ; 将扫描值输出到 P1
MOV A,P1 ; 读入 P1 判断是否有按下
MOV R4,A ; 存到 R4, 判断是否放开
SETB C ; C=1
MOV R5,#04H ; 扫描 P14~P17
L1: RLC A ; 将按键值左移一位元
JNC KEYIN ; 若 C=0, 有按, 执行 KEYIN
INC R1 ; 将指标值加 1, 继续扫描下一行
DJNZ R5,L1
nbsp: ; 扫描四行
MOV A,R3 ; 载入扫描值
SETB C ; C=1
RRC A ; 扫描下一列(P13~P10)
MOV R3,A ; 存回扫描值
JC SCAN1 ; C=1, 尚未完成扫描
RET ; 结束键盘扫描, 回到 Main Program
KEYIN: MOV R7,#10 ; 消除弹跳
D2: MOV R6,#248
DJNZ R6,$
DJNZ R7,D2
D3: MOV A,P1 ; 读入 P1
XRL A,R4
JZ D3
MOV A,R1
MOV DPTR,#TABLE
MOVC A,@A+DPTR
MOV P0,A
TABLE: DB 0c0h,0f9h,0a4h,0b0h,099h ;0-4
DB 092h,082h,0f8h,080h,090h ;5-9
DB 088h,083h,0a7h,0a1h,086h ;A-E
DB 08eh ;F
end
这个编译的时候总出现TABLE 那儿重复定义的错误 不知道哪儿的问题... | 
