keyinput.asm

基于80C51的一个例子程序,实现了流水灯操作

; 键盘管理

                PROC  KEY_INPUT, TEST,KEY_SUB

; OUTPUT:  C=1, 有键输入，A=键值
KEY_INPUT:
               CLR C
               MOV A,P1
               ANL A,#0FH
               CPL A
               JZ KEY_INPUT_RET
                  SETB C
KEY_INPUT_RET: RET

TEST:
         SETB C
         MOV A,#01H
         RET

; INPUT: A= 0-F
; OUTPUT: A= '0 - F' , ASCII
KEY_SUB:   INC A
           MOVC A,@A+PC
           RET
           DB '0123456789ABCDEF'
                END