.global delay

.equ    delaycount,    180

delay:      PUSH    ra
            PUSH    r16
            PUSH    r17


            mov     r16, r4
            addi    r17, r17, delaycount
            bgeu    r16, r0, loop
            br      return


loop:
            bgeu    r17, r0, inner
            subi    r16, r16, 1
            bgeu    r16, r0, loop
            br      return

inner:      subi    r17, r17, 1
            br      loop

return:     POP     r17
            POP     r16
            POP     ra
            ret