SEG programSegment
; Wait for some delay
statusDelay SUBROUTINE
ldy delay ; load outroDelay and decrement
dey
sty delay
cpy #0
beq .end
rts
.end:
lda delayStatus
sta status