DELAYMS MSCNT EQU $0CA :DELAY CPY #0 BEQ :EXIT NOP CPY #1 BNE :DELAYA JMP :LAST1 :DELAYA DEY :DELAY0 LDX #MSCNT :DELAY1 DEX BNE :DELAY1 NOP NOP DEY BNE :DELAY0 :LAST1 LDX #MSCNT-3 :DELAY2 DEX BNE :DELAY2 :EXIT RTS