*****************************************************
	****           Extase - Custom Module	 	 ****
	****        all adaptions by Wanted Team	 ****
	*****************************************************

	incdir	"dh2:include/"
	include 'misc/eagleplayer2.01.i'
	include 'hardware/intbits.i'
	include 'exec/exec_lib.i'

	SECTION Player,Code_C

EXT_Start
	PLAYERHEADER PlayerTagArray

	dc.b	"$VER: Extase - Custom Module,",10
	dc.b	'adapted by Don Adan/Wanted Team',0
	even

PlayerTagArray
	dc.l	DTP_CustomPlayer,1
	dc.l	DTP_PlayerName,PlayerName
	dc.l	DTP_Interrupt,Interrupt
	dc.l	DTP_InitPlayer,InitPlayer
	dc.l	DTP_EndPlayer,EndPlayer
	dc.l	DTP_InitSound,InitSound
	dc.l	DTP_EndSound,EndSound
	dc.l	EP_Get_ModuleInfo,Get_ModuleInfo
	dc.l	TAG_DONE
PlayerName
	dc.b	"CustomPlay",0
Text
	dc.b	10
	dc.b	"                      CRYO",10
	dc.b	"                    PRESENTS",10
	dc.b	"                     EXTASE",10
	dc.b	10
	dc.b	"                   A GAME BY",10
	dc.b	"                 REMI HERBULOT",10
	dc.b	"                 PROGRAMMATION",10
	dc.b	"               PATRICK DUBIANCHET",10
	dc.b	"                   GRAPHICS",10
	dc.b	"                  MICHEL RHO",10
	dc.b	"                  HEAD DESIGN",10
	dc.b	"                PHILIPPE ULRICH",10
	dc.b	"                     MUSIC",10
	dc.b	"          PHILIPPE EIDEL & ARNAUD DEVOS",10
	dc.b	"             AND THE BULGARIAN VOICES",10
	dc.b	"          BY COURTESY OF VIRGIN MUSIQUE",10
	dc.b	"         INTERACTIVE MUSIC: STEPHANE PICQ",10
	dc.b	"          PRESS RELATION: NELLY DESCLAUX",10
	dc.b	"         PRODUCT MANAGER: PHILIPPE ULRICH",10
	dc.b	"            PRODUCTION VIRGIN LOISIRS",10
	dc.b	"                SPECIAL THANKS TO:",10
	dc.b	"             JEAN-CHRISTOPHE LAUTERS",10
	dc.b	"               PHILIPPE COHEN-SOLAL",10
	dc.b	10
	dc.b	"             (C) VIRIGN LOISIRS 1990",0
	even

EagleBase
	dc.l	0

***************************************************************************
***************************** EP_Get_ModuleInfo ***************************
***************************************************************************

Get_ModuleInfo
	lea	InfoBuffer(PC),A0
	rts

InfoBuffer
	dc.l	MI_SpecialInfo,Text
	dc.l	MI_LoadSize,EXT_End-EXT_Start
	dc.l	0

***************************************************************************
***************************** DTP_InitPlayer ******************************
***************************************************************************

InitPlayer
	move.l	A5,EagleBase

	lea	Samples,A0
	bsr.w	InstallSamples

	move.l	dtg_AudioAlloc(A5),A0
	jmp	(A0)

***************************************************************************
***************************** DTP_EndPlayer *******************************
***************************************************************************

EndPlayer
	move.l	dtg_AudioFree(A5),A0
	jmp	(A0)

***************************************************************************
***************************** DTP_Intterrupt ******************************
***************************************************************************

Interrupt
	movem.l	D1-A6,-(SP)

	bsr.w	Play

	movem.l	(SP)+,D1-A6
	moveq	#0,D0
	rts

SongEnd
	movem.l	A1/A5,-(A7)
	move.l	EagleBase(PC),A5
	move.l	dtg_SongEnd(A5),A1
	jsr	(A1)
	movem.l	(A7)+,A1/A5
	rts

SetAudioVector
	movem.l	D0/A1/A6,-(A7)
	movea.l	4.W,A6
	lea	StructInt(PC),A1
	moveq	#INTB_AUD0,D0
	jsr	_LVOSetIntVector(A6)		; SetIntVector
	move.l	D0,Channel0
	lea	StructInt(PC),A1
	moveq	#INTB_AUD1,D0
	jsr	_LVOSetIntVector(A6)
	move.l	D0,Channel1
	lea	StructInt(PC),A1
	moveq	#INTB_AUD2,D0
	jsr	_LVOSetIntVector(A6)
	move.l	D0,Channel2
	lea	StructInt(PC),A1
	moveq	#INTB_AUD3,D0
	jsr	_LVOSetIntVector(A6)
	move.l	D0,Channel3
	movem.l	(A7)+,D0/A1/A6
	rts

ClearAudioVector
	movea.l	4.W,A6
	movea.l	Channel0(PC),A1
	moveq	#INTB_AUD0,D0
	jsr	_LVOSetIntVector(A6)
	movea.l	Channel1(PC),A1
	moveq	#INTB_AUD1,D0
	jsr	_LVOSetIntVector(A6)
	movea.l	Channel2(PC),A1
	moveq	#INTB_AUD2,D0
	jsr	_LVOSetIntVector(A6)
	movea.l	Channel3(PC),A1
	moveq	#INTB_AUD3,D0
	jmp	_LVOSetIntVector(A6)

Channel0
	dc.l	0
Channel1
	dc.l	0
Channel2
	dc.l	0
Channel3
	dc.l	0
StructInt
	dc.l	0
	dc.l	0
	dc.w	$205
	dc.l	IntName
	dc.l	0
	dc.l	lbC0064A0
IntName
	dc.b	'Extase Audio Interrupt',0
	even

***************************************************************************
***************************** DTP_InitSound *******************************
***************************************************************************

InitSound
	bsr.w	SetAudioVector
	bra.w	Init

***************************************************************************
***************************** DTP_EndSound ********************************
***************************************************************************

EndSound
	bsr.w	ClearAudioVector
	lea	$DFF000,A0
	move.w	#15,$96(A0)
	moveq	#0,D0
	move.w	D0,$A8(A0)
	move.w	D0,$B8(A0)
	move.w	D0,$C8(A0)
	move.w	D0,$D8(A0)
	rts

***************************************************************************
***************************************************************************
***************************************************************************

; Music from "Extase" (c) 1990 by Cryo/Virgin

InstallSamples
	MOVE.L	A0,lbL0066C8
	MOVEA.L	A0,A6
	MOVEQ	#$16,D7
	MOVE.W	D7,D6
	ADDQ.W	#1,D6
	ADD.W	lbW0063E0(PC),D6
	ADDQ.W	#1,D6
	ASL.W	#2,D6
	EXT.L	D6
	ADD.L	A0,D6
	SUB.L	(A0),D6
lbC0063A0	ADD.L	D6,(A0)+
	DBRA	D7,lbC0063A0
	MOVEA.L	-4(A0),A3
	MOVE.W	#$1C83,D7
lbC0063AE	CLR.B	(A3)+
	DBRA	D7,lbC0063AE
	MOVE.L	A3,(A0)+
	LEA	lbW0063E0(PC),A1
	MOVE.W	(A1)+,D7
	SUBQ.W	#1,D7
lbC0063BE	MOVEQ	#0,D0
	MOVE.B	(A1)+,D0
	ASL.W	#2,D0
	MOVEM.L	0(A6,D0.W),D0/A2
	SUB.L	A2,D0
	NEG.L	D0
	LSR.L	#1,D0
	SUBQ.W	#1,D0
lbC0063D2	MOVE.W	-(A2),(A3)+
	DBRA	D0,lbC0063D2
	MOVE.L	A3,(A0)+
	DBRA	D7,lbC0063BE
	RTS

lbW0063E0	dc.w	1
	dc.w	$1400

Init
	BSR.L	lbC006474
	LEA	lbL0066D0,A0
	MOVEQ	#0,D0
	LEA	lbW006712(PC),A1
	BSR.S	lbC00644E
	LEA	lbW0068FC(PC),A1
	BSR.S	lbC00644E
	LEA	lbW006A4A(PC),A1
	BSR.S	lbC00644E
	LEA	lbB006AAD(PC),A1
	BSR.S	lbC00644E
	MOVEQ	#3,D2
	MOVE.W	#$8780,$9A(A2)
lbC006410	BSR.L	lbC006558
	DBRA	D2,lbC006410
	LEA	$DFF000,A2
	MOVE.W	#$800F,$96(A2)
;	LEA	lbC0064A0(PC),A0
;lbC006428	MOVE.L	A0,$64
;	MOVE.L	A0,$68
;	MOVE.L	A0,$6C
;	MOVE.L	A0,$70
;	MOVE.L	A0,$74
;	MOVE.L	A0,$78
	RTS

lbC00644E	MOVE.L	A1,(A0)+
	MOVE.L	A1,(A0)+
	MOVE.L	D0,(A0)+
	MOVE.L	D0,(A0)+
	RTS

;	MOVE.W	#$4000,$DFF09A
;	BSR.L	lbC006474
;	LEA	lbC00365C(PC),A0
;	BSR.S	lbC006428
;	MOVE.W	#$C000,$DFF09A
;	RTS

lbC006474	MOVEQ	#0,D0
	MOVE.L	D0,lbW0066CC
	LEA	$DFF000,A2
	MOVE.W	D0,$A8(A2)
	MOVE.W	D0,$B8(A2)
	MOVE.W	D0,$C8(A2)
	MOVE.W	D0,$D8(A2)
	MOVE.W	#15,$96(A2)
	MOVE.W	#$380,$9A(A2)
	RTS

lbC0064A0	MOVEM.L	D0-D2/A0-A2,-(SP)

	move.b	$DFF006,d0
.line	cmp.b	$DFF006,d0
	beq.s	.line
.wait	cmp.b	#$16,$DFF007
	bcs.b	.wait

	MOVE.W	$DFF01C,D0
	AND.W	$DFF01E,D0
;	ANDI.W	#$3FFF,D0

	and.w	#$780,D0

	MOVE.W	D0,$DFF09C
;	MOVE.W	D0,D1
	LSR.W	#7,D0
	OR.B	D0,lbW0066CC
;	BTST	#5,D1
;	BEQ.L	lbC0064D2
;	ADDQ.W	#1,lbW003AE2
;lbC0064D2	BTST	#3,D1
;	BEQ.L	lbC0064F0
;	MOVE.B	$BFED01,D2
;	ANDI.W	#8,D2
;	BNE.L	lbC0064F0
;	MOVE.W	D1,-(SP)
;	BSR.L	lbC003702
;	MOVE.W	(SP)+,D1
;lbC0064F0	ANDI.W	#$2000,D1
;	BEQ.L	lbC00650A
;	MOVE.B	$BFDD00,D0
;	ANDI.W	#1,D0
;	BNE.L	lbC00650A
;	BSR.L	lbC006510
lbC00650A	MOVEM.L	(SP)+,D0-D2/A0-A2
;	RTE

	rts


Play
lbC006510	MOVEQ	#3,D2
lbC006512	BCLR	D2,lbW0066CC
	BEQ.S	lbC006524
	BTST	D2,lbB0066CE
	BNE.S	lbC006524
	BSR.S	lbC006558
lbC006524	DBRA	D2,lbC006512
	RTS

lbC00652A	MOVE.W	#$8000,D0
	BSET	D2,D0
	MOVE.W	D0,$DFF096
	MOVEQ	#0,D0
	MOVE.B	13(A0),D0
	MOVE.W	D0,8(A2)
	BSET	D2,lbW0066CC
	MOVE.W	#$8000,D0
	ADDQ.W	#7,D2
	BSET	D2,D0
	SUBQ.W	#7,D2
	MOVE.W	D0,$DFF09A
	RTS

lbC006558	MOVE.W	D2,D1
	ASL.W	#4,D1
	LEA	lbL0066D0,A0
	ADDA.W	D1,A0
	LEA	$DFF0A0,A2
	ADDA.W	D1,A2
	BCLR	D2,lbB0066CF
	BNE.S	lbC00652A
	MOVEA.L	(A0),A1
lbC006576	MOVE.B	(A1)+,D0
	MOVE.L	A1,(A0)
	EXT.W	D0
	BMI.S	lbC006596
	ASL.W	#2,D0
	MOVEA.L	lbL0066C8(PC),A1
	MOVEM.L	0(A1,D0.W),D0/D1
	SUB.L	D0,D1
	LSR.L	#1,D1
	MOVE.L	D0,(A2)
	MOVE.W	D1,4(A2)
	RTS

lbC006596	ANDI.W	#$7F,D0
	CMP.W	#$10,D0
	BCS.L	lbC006688
	BEQ.L	lbC00664C
	CMP.W	#$12,D0
	BCS.S	lbC006618
	BEQ.L	lbC006636
	CMP.W	#$14,D0
	BCS.S	lbC0065F0
	BEQ.S	lbC0065E4
	CMP.W	#$16,D0
	BCS.L	lbC006644
	BEQ.S	lbC00662A
	CMP.W	#$18,D0
	BCS.L	lbC00666A
	CMP.W	#$7F,D0
	BNE.S	lbC0065D6
	MOVEA.L	4(A0),A1

	bsr.w	SongEnd

	BRA.S	lbC006576

lbC0065D6	SUBI.W	#$20,D0
	MOVE.L	A1,8(A0)
	MOVE.B	D0,12(A0)
	BRA.S	lbC006576

lbC0065E4	SUBQ.B	#1,12(A0)
	BLS.S	lbC006576
	MOVEA.L	8(A0),A1
	BRA.S	lbC006576

lbC0065F0	MOVE.W	D2,-(SP)
	MOVE.B	(A1)+,D2
	ASL.W	#4,D2
	EXT.L	D2
	MOVE.B	(A1)+,D0
	MOVE.L	A1,(A0)
	ASL.W	#2,D0
	MOVEA.L	lbL0066C8(PC),A1
	MOVEM.L	0(A1,D0.W),D0/D1
	SUB.L	D2,D0
	SUB.L	D0,D1
	LSR.L	#1,D1
	MOVE.L	D0,(A2)
	MOVE.W	D1,4(A2)
	MOVE.W	(SP)+,D2
	RTS

lbC006618	MOVE.B	(A1)+,D0
	ASL.W	#8,D0
	MOVE.B	(A1)+,D0
	MOVE.W	D0,14(A0)
	MOVE.W	D0,6(A2)
	BRA.L	lbC006576

lbC00662A	MOVE.B	(A1)+,D0
	MOVE.B	D0,lbW006710
	BRA.L	lbC006576

lbC006636	MOVE.B	(A1)+,D0
lbC006638	MOVE.B	D0,13(A0)
	MOVE.W	D0,8(A2)
	BRA.L	lbC006576

lbC006644	MOVE.B	(A1)+,D0
	ADD.B	13(A0),D0
	BRA.S	lbC006638

lbC00664C	MOVEQ	#$58,D0
	MOVEA.L	lbL0066C8(PC),A1
	MOVE.L	0(A1,D0.W),(A2)
	MOVE.W	#10,4(A2)
	MOVEQ	#0,D0
	ADDQ.W	#7,D2
	BSET	D2,D0
	SUBQ.W	#7,D2
	MOVE.W	D0,$DFF09A
lbC00666A	MOVEQ	#0,D0
	BSET	D2,D0
	OR.B	D0,lbB0066CE
	RTS

lbC006676	MOVEQ	#0,D0
	BSET	D2,D0
	MOVE.W	D0,$DFF096
	BSET	D2,lbB0066CE
	RTS

lbC006688	MOVE.W	D2,-(SP)
	MOVEQ	#3,D2
lbC00668C	BTST	D2,D0
	BEQ.S	lbC0066BE
	MOVE.W	D0,-(SP)
lbC006692	BTST	D2,lbB0066CE
	BNE.L	lbC0066A2
	BSR.L	lbC006558
	BRA.S	lbC006692

lbC0066A2	BSR.S	lbC006676
	BSR.L	lbC006558
	BSR.S	lbC006676
	BSET	D2,lbW0066CC
	BSET	D2,lbB0066CF
	BCLR	D2,lbB0066CE
	MOVE.W	(SP)+,D0
lbC0066BE	DBRA	D2,lbC00668C
	MOVE.W	(SP)+,D2
	BRA.L	lbC006558

lbL0066C8	dc.l	0
lbW0066CC	dc.w	0
lbB0066CE	dc.b	0
lbB0066CF	dc.b	0
lbL0066D0	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
lbW006710	dc.w	$100
lbW006712	dc.w	$9200
	dc.w	$9100
	dc.w	$F096
	dc.w	$10C
	dc.w	$920E
	dc.w	$D95
	dc.w	$A0C
	dc.w	$950A
	dc.w	$D95
	dc.w	$A0C
	dc.w	$950A
	dc.w	$D95
	dc.w	$A0D
	dc.w	$820D
	dc.w	$C0D
	dc.w	$C0C
	dc.w	$D84
	dc.w	$D0C
	dc.w	$880C
	dc.w	$C0D
	dc.w	$C0D
	dc.w	$D0C
	dc.w	$C0E
	dc.w	$86A9
	dc.w	$E95
	dc.w	$FB94
	dc.w	$9793
	dc.w	$120A
	dc.w	$A0A
	dc.w	$1416
	dc.w	$9200
	dc.w	$292
	dc.w	$4096
	dc.w	$303
	dc.w	$300
	dc.w	$102
	dc.w	$300
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$800
	dc.w	$102
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$800
	dc.w	$8201
	dc.w	$203
	dc.w	1
	dc.w	$403
	dc.w	1
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	$A692
	dc.w	$2E00
	dc.w	$102
	dc.w	$300
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$894
	dc.w	1
	dc.w	3
	dc.w	1
	dc.w	$403
	dc.w	1
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	1
	dc.w	3
	dc.w	$501
	dc.w	$403
	dc.w	1
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	1
	dc.w	3
	dc.w	1
	dc.w	$403
	dc.w	1
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	$8800
	dc.w	$100
	dc.w	$305
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$800
	dc.w	$9240
	dc.w	$102
	dc.w	$305
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$606
	dc.w	$701
	dc.w	$101
	dc.w	$302
	dc.w	$100
	dc.w	$301
	dc.w	0
	dc.w	$200
	dc.w	$103
	dc.w	$301
	dc.w	$606
	dc.w	$301
	dc.w	$204
	dc.w	$305
	dc.w	3
	dc.w	$300
	dc.w	$606
	dc.w	$701
	dc.w	$8896
	dc.w	$201
	dc.w	$103
	dc.w	$101
	dc.w	$403
	dc.w	$501
	dc.w	$403
	dc.w	6
	dc.w	$607
	dc.w	1
	dc.w	$307
	dc.w	1
	dc.w	$403
	dc.w	$501
	dc.w	$303
	dc.w	6
	dc.w	$607
	dc.w	1
	dc.w	$307
	dc.w	1
	dc.w	$707
	dc.w	$501
	dc.w	$303
	dc.w	6
	dc.w	$607
	dc.w	$304
	dc.w	$203
	dc.w	$306
	dc.w	$303
	dc.w	$405
	dc.w	$303
	dc.w	$303
	dc.w	$303
	dc.w	$202
	dc.w	$304
	dc.w	1
	dc.w	$304
	dc.w	$501
	dc.w	$403
	dc.w	6
	dc.w	$607
	dc.w	$202
	dc.w	$304
	dc.w	1
	dc.w	$304
	dc.w	$501
	dc.w	$403
	dc.w	6
	dc.w	$607
	dc.w	$502
	dc.w	$105
	dc.w	5
	dc.w	$105
	dc.w	$501
	dc.w	$403
	dc.w	$206
	dc.w	$607
	dc.w	$303
	dc.w	$305
	dc.w	$406
	dc.w	$605
	dc.w	$405
	dc.w	$504
	dc.w	$606
	dc.w	$606
	dc.w	$502
	dc.w	$105
	dc.w	5
	dc.w	$105
	dc.w	2
	dc.w	$403
	dc.w	6
	dc.w	$607
	dc.w	$492
	dc.w	$2805
	dc.w	$405
	dc.w	$402
	dc.w	$405
	dc.w	$292
	dc.w	$2601
	dc.w	$403
	dc.w	6
	dc.w	$607
	dc.w	$392
	dc.w	$1E03
	dc.w	$403
	dc.w	$403
	dc.w	$603
	dc.w	$492
	dc.w	$1C05
	dc.w	$504
	dc.w	$606
	dc.w	$606
	dc.w	$392
	dc.w	$1404
	dc.w	$303
	dc.w	$206
	dc.w	$303
	dc.w	$492
	dc.w	$1205
	dc.w	$504
	dc.w	$606
	dc.w	$607
	dc.w	$392
	dc.w	$A04
	dc.w	$203
	dc.w	$302
	dc.w	$303
	dc.w	$492
	dc.w	$805
	dc.w	$504
	dc.w	$9204
	dc.w	6
	dc.w	$9202
	dc.w	$607
	dc.w	$168E
	dc.w	$9200
	dc.w	$CFF
lbW0068FC	dc.w	$9200
	dc.w	$9100
	dc.w	$F016
	dc.w	$900C
	dc.w	$9210
	dc.w	$D95
	dc.w	$100C
	dc.w	$9510
	dc.w	$C95
	dc.w	$100D
	dc.w	$C0D
	dc.w	$D0C
	dc.w	$C0C
	dc.w	$D0C
	dc.w	$97A9
	dc.w	$F95
	dc.w	$FB94
	dc.w	$9093
	dc.w	$A14
	dc.w	$1692
	dc.w	$3290
	dc.w	1
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	$92
	dc.w	$3801
	dc.w	$403
	dc.w	$501
	dc.w	$303
	dc.w	$292
	dc.w	$4001
	dc.w	$102
	dc.w	$101
	dc.w	$103
	dc.w	$201
	dc.w	$503
	dc.w	$606
	dc.w	$606
	dc.w	$8C
	dc.w	$9601
	dc.w	$201
	dc.w	$202
	dc.w	$102
	dc.w	$200
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$800
	dc.w	$201
	dc.w	$202
	dc.w	$102
	dc.w	$200
	dc.w	$204
	dc.w	$306
	dc.w	$606
	dc.w	$600
	dc.w	$201
	dc.w	$202
	dc.w	$102
	dc.w	$200
	dc.w	$204
	dc.w	$305
	dc.w	$607
	dc.w	$800
	dc.w	$201
	dc.w	$202
	dc.w	$102
	dc.w	$200
	dc.w	$204
	dc.w	$300
	dc.w	$103
	dc.w	$300
	dc.w	$8896
	dc.w	$201
	dc.w	$303
	dc.w	$301
	dc.w	$304
	dc.w	1
	dc.w	$403
	dc.w	1
	dc.w	$303
	dc.w	$303
	dc.w	$103
	dc.w	$306
	dc.w	$103
	dc.w	3
	dc.w	$103
	dc.w	1
	dc.w	$301
	dc.w	$303
	dc.w	$103
	dc.w	$303
	dc.w	$301
	dc.w	3
	dc.w	$103
	dc.w	1
	dc.w	$303
	dc.w	1
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	1
	dc.w	$403
	dc.w	$506
	dc.w	$706
	dc.w	$A600
	dc.w	$102
	dc.w	$300
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$600
	dc.w	$922E
	dc.w	$102
	dc.w	$305
	dc.w	$104
	dc.w	$300
	dc.w	$104
	dc.w	$305
	dc.w	$607
	dc.w	$694
	dc.w	$92
	dc.w	$2801
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	$92
	dc.w	$2601
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	$92
	dc.w	$1E01
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	$92
	dc.w	$1C01
	dc.w	$403
	dc.w	$606
	dc.w	$606
	dc.w	$92
	dc.w	$1401
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	$92
	dc.w	$1201
	dc.w	$403
	dc.w	$506
	dc.w	$708
	dc.w	$92
	dc.w	$A01
	dc.w	$203
	dc.w	$501
	dc.w	$403
	dc.w	$92
	dc.w	$801
	dc.w	$403
	dc.w	$9204
	dc.w	$506
	dc.w	$9202
	dc.w	$708
	dc.w	$90FF
lbW006A4A	dc.w	$9200
	dc.w	$9100
	dc.w	$D516
	dc.w	$900C
	dc.w	$9210
	dc.w	$D95
	dc.w	$100C
	dc.w	$9510
	dc.w	$C95
	dc.w	$100D
	dc.w	$C0D
	dc.w	$C0C
	dc.w	$95F0
	dc.w	$D0C
	dc.w	$95F0
	dc.w	$D97
	dc.w	$F91
	dc.w	$F0
	dc.w	$921E
	dc.w	$F0F
	dc.w	$880B
	dc.w	$9240
	dc.w	$909
	dc.w	$988
	dc.w	$909
	dc.w	$1011
	dc.w	$1212
	dc.w	$8812
	dc.w	$1212
	dc.w	$1215
	dc.w	$1515
	dc.w	$8813
	dc.w	$A81
	dc.w	$A0A
	dc.w	$8214
	dc.w	$1692
	dc.w	$1490
	dc.w	$D92
	dc.w	$190E
	dc.w	$921E
	dc.w	$D92
	dc.w	$24C8
	dc.w	$C0D
	dc.w	$C0E
	dc.w	$94AC
	dc.w	$C95
	dc.w	$FD0D
	dc.w	$C0E
	dc.w	$9490
	dc.b	$FF
lbB006AAD	dc.b	$92
	dc.w	$91
	dc.w	$FE
	dc.w	$1690
	dc.w	$C92
	dc.w	$100D
	dc.w	$9510
	dc.w	$C95
	dc.w	$100C
	dc.w	$9510
	dc.w	$D95
	dc.w	$F60C
	dc.w	$95F6
	dc.w	$D97
	dc.w	$9220
	dc.w	$9101
	dc.w	$A800
	dc.w	$9602
	dc.w	$90
	dc.w	0
	dc.w	$9000
	dc.w	$90
	dc.w	0
	dc.w	$1692
	dc.w	$1491
	dc.w	$F0
	dc.w	$900C
	dc.w	$9219
	dc.w	$E92
	dc.w	$1E0D
	dc.w	$9223
	dc.w	$A50D
	dc.w	$C0D
	dc.w	$E94
	dc.w	$D0C
	dc.w	$970F
	dc.w	$F92
	dc.w	$2D0F
	dc.w	$B09
	dc.w	$909
	dc.w	$909
	dc.w	$1515
	dc.w	$1512
	dc.w	$1212
	dc.w	$1212
	dc.w	$1215
	dc.w	$1112
	dc.w	$1212
	dc.w	$1515
	dc.w	$1511
	dc.w	$1511
	dc.w	$1012
	dc.w	$1212
	dc.w	$1212
	dc.w	$1215
	dc.w	$9603
	dc.w	$9017
	dc.w	$1417
	dc.w	$1414
	dc.w	$1616
	dc.w	$1616
	dc.w	$1617
	dc.w	$1417
	dc.w	$1414
	dc.w	$9092
	dc.w	$1E0F
	dc.w	$F0F
	dc.w	$B92
	dc.w	$2D09
	dc.w	$909
	dc.w	$909
	dc.w	$915
	dc.w	$150B
	dc.w	$909
	dc.w	$910
	dc.w	$110C
	dc.w	$C0C
	dc.w	$C0C
	dc.w	$F92
	dc.w	$2311
	dc.w	$922D
	dc.w	$1212
	dc.w	$1110
	dc.w	$1511
	dc.w	$1111
	dc.w	$1011
	dc.w	$1212
	dc.w	$1212
	dc.w	$1116
	dc.w	$9603
	dc.w	$A217
	dc.w	$1417
	dc.w	$1414
	dc.w	$1616
	dc.w	$1616
	dc.w	$1694
	dc.w	$C92
	dc.w	$140D
	dc.w	$9219
	dc.w	$C92
	dc.w	$1EA2
	dc.w	$C0C
	dc.w	$D0C
	dc.w	$D94
	dc.w	$923C
	dc.w	$A416
	dc.w	$95F4
	dc.w	$1714
	dc.w	$1417
	dc.w	$1416
	dc.w	$1616
	dc.w	$1694
	dc.w	$1692
	dc.w	$417
	dc.w	$1414
	dc.w	$1714
	dc.w	$1690
	dc.w	$FF00

Samples
	incbin	ram:samples
	ds.b	11654					; extra buffer
EXT_End