h9a.asm

(1)完成键盘

LD     equ   P1.0

       clr   LD
       setb  LD

       mov   SCON, #00010000b
Wait:  jnb   RI, Wait
       mov   a, SBUF
       clr   ri
       ljmp  $
       end