reset:
        mov     a,#1
        nop
test:
        jb      acc.5,reset
        rl      a
        jmp     test