原创 判断键盘输入的程序，简单键盘，学习日志

org 0000h
ajmp main
org 030h
main:mov p3,#0ffh;判断输入
acall del02
mov p3,#0f0h
mov a,p3
cjne a,#0f0h,f1
ajmp main
f1:mov p0,#0f9h;有输入P1显示数字1
acall del
mov p0,#0ffh
ajmp main;用ret会进入死循环
del: mov r5,#08h    ;延时 1s
del1: mov r6,#0f0h
del2: mov R7,#0f0h
del3: djnz r7,del3
djnz r6,del2
djnz r5,del1
ret
del02: mov r5,#08h    ;延时 4ms
del12: mov r6,#08h
del22: mov R7,#0f0h
del32: djnz r7,del32
djnz r6,del22
djnz r5,del12
ret
end