h6.asm

(1)完成键盘

Speaker equ P1.0


Loop:
       clr   Speaker
       call  Delay
       setb  Speaker
       call  Delay
       ljmp  Loop

Delay:
       mov   r0, #50
       djnz  r0, $
       ret

       end