* ????? / Samples / rellocated!

>extern"dh0:music/unkn.kiwisong",music

music	= $20000

init	= music
ssng	= music+4
fx	= music+8	; d0 
play	= music+$c

S:	
*	move.w	#$4000,$dff09a
	jsr	init
	moveq	#$3,d0	; ssng/fx (1-$20) 0=init
	jsr	fx
*	moveq	#$3,d0	; ssng/fx (1-$20) 0=init
*	jsr	fx


EVER:	MOVE.L	$DFF004,D0
	AND.L	#$1FF00,D0
	CMP.L	#$08000,D0
	BNE.S	EVER
	jsr	play
	BTST	#6,$BFE001
	BNE.S	EVER

	moveq	#0,d0
	jSR	init
	RTS
.