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
