mov P2,#00H
zac:
    mov P0,#00H
    CALL del5u
    setb P0.0
    CALL del5u
    setb P0.1
    CALL del5u
    setb P0.2
    CALL del5u
    setb P0.3
    CALL del5u
    setb P0.4
    CALL del5u
    setb P0.5
    CALL del5u
    setb P0.6
    CALL del5u
    setb P0.7
    CALL del200u
    jmp zac
    

include delay.inc

END