tache0 cmp.b #$39,$fffffc02.w bne tache0 bra fin tache1 move #$500,$ff8240 bsr wait bra tache1 tache2 move #$050,$ff8240 bsr wait bra tache2 tache3 move #$005,$ff8240 bsr wait bra tache3 tache4 clr $ff8240 bsr wait bra tache4 wait move #100,d0 l1 nop dbra d0,l1 rts