.MACRO Delay

        ldi Counter1, Value1

    L1:

        ldi Counter2, Value2

    L2:

        ldi Counter3, Value3

    L3:

        dec Counter3
        brne L3

        dec Counter2
        brne L2

        dec Counter1
        brne L1

.ENDMACRO



.def Counter1 = R20
.def Counter2 = R21
.def Counter3 = R22

.def Number = R18

.EQU Value1 = 54
.EQU Value2 = 254
.EQU Value3 = 242
.EQU Maximum = 127

rjmp start

Start:

    ser Number

    out ddrb, Number

    Loop:

        inc Number

        cpi Number, Maximum

        breq END

        OUT PortB, Number

        Delay

END: