           mov     R0,#0ffh
           clr     A
clearit:   mov     @R0,A
           djnz    R0,clearit