*****************************************************
	**** Winter Challenge "Biathlon" - Custom Module ****
	****        all adaptions by Wanted Team	 ****
	*****************************************************

	incdir	"dh2:include/"
	include 'misc/eagleplayer2.01.i'

	SECTION Player,Code_C

WC_Start
	PLAYERHEADER PlayerTagArray

	dc.b	'$VER: Winter Challenge "Biathlon" - 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	"             Thunder Mountain",10
	dc.b	"                 Presents",10
	dc.b	10
	dc.b	"             WINTER CHALLENGE",10
	dc.b	10
	dc.b	"          Coding by Chris Robson",10
	dc.b	10
	dc.b	"    Graphics by Paul Drummond, Mo, Geff",10
	dc.b	10
	dc.b	"            Sound by Wal Beban",10
	dc.b	10
	dc.b	10
	dc.b	"           (c) 1988 by Tynesoft",0
	even

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

Get_ModuleInfo
	lea	InfoBuffer(PC),A0
	rts

InfoBuffer
	dc.l	MI_SpecialInfo,Text
	dc.l	MI_LoadSize,WC_End-WC_Start
	dc.l	0

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

InitPlayer
	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

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

InitSound
;	move.w	Timer(PC),D0
;	bne.b	Done
;	move.w	dtg_Timer(A5),D0
;	mulu.w	#5,D0
;	divu.w	#6,D0		; 60Hz
;	move.w	D0,Timer
;Done	move.w	D0,dtg_Timer(A5)
	bra.w	Init
;Timer
;	dc.w	0

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

EndSound
	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 "Winter Challenge" (c) 1988 by TyneSoft

;	MOVEA.L	#sample1.MSG,A4
;	LEA	$2AF80,A5
;	CLR.L	D6
;	MOVE.L	#sample1.MSG,lbL003CBC
;lbC002E66	CMPI.B	#$FF,(A4)
;	BEQ.L	lbC002E8A
;	MOVE.L	A4,D1
;	BSR.L	lbC0036A4
;	LSR.L	#1,D0
;	MOVE.W	D0,(A5)+
;	ADDA.L	#$60,A0
;	MOVE.L	A0,(A5)+
;	ADDA.L	#8,A4
;	BRA.L	lbC002E66

;lbC002E8A	LEA	lbL003C2C,A2
;	LEA	lbL003C54,A3
;lbC002E96	CMPI.L	#0,(A2)
;	BEQ.L	lbC002EB0
;	MOVEA.L	(A2)+,A1
;	MOVE.L	(A3)+,D0
;	MOVEA.L	4,A6
;	JSR	-$C6(A6)
;	BRA.L	lbC002E96

;lbC002EB0	RTS

;	dc.l	0
;	dc.l	0

Init
	MOVE.B	#1,D0
	CLR.B	lbB0036A2
	SUBQ.L	#1,D0
	ANDI.L	#$FF,D0
	LEA	lbL0039D8,A0
	MOVE.L	A0,lbL00366E
	LEA	lbL0039C8,A0
	MULU.W	#$10,D0
	ADDA.L	D0,A0
	MOVE.L	(A0)+,lbL003632
	MOVE.L	(A0)+,lbL003642
	MOVE.L	(A0)+,lbL003652
	MOVE.L	(A0)+,lbL003662
	MOVE.L	#lbW003672,D0
	MOVE.L	D0,lbL003636
	MOVE.L	D0,lbL003646
	MOVE.L	D0,lbL003656
	MOVE.L	D0,lbL003666
	MOVE.L	D0,lbL00362E
	MOVE.L	D0,lbL00363E
	MOVE.L	D0,lbL00364E
	MOVE.L	D0,lbL00365E
	MOVE.B	#8,D0
	SUBQ.L	#1,D0
	MOVE.B	D0,lbB00368C
	CLR.L	D0
	MOVE.B	D0,lbB0036A2
	MOVE.B	#15,lbB003686
	MOVE.B	#1,lbB00363B
	MOVE.B	#1,lbB00364B
	MOVE.B	#1,lbB00365B
	MOVE.B	#1,lbB00366B
	MOVE.B	#1,lbB00363D
	MOVE.B	#1,lbB00364D
	MOVE.B	#1,lbB00365D
	MOVE.B	#1,lbB00366D
lbC002F8E	RTS

;	dc.l	0
;	dc.l	0

;	ADDQ.B	#1,lbB0036A2
;	MOVE.W	#15,$DFF096
;	BSR.L	lbC001D94
;	BSR.L	lbC001D94
;	BSR.L	lbC0022A4
;	RTS

;	CLR.L	D0
;	MOVEA.L	$DFF0A8,A0
;	MOVE.L	D0,0(A0)
;	MOVE.L	D0,$10(A0)
;	MOVE.L	D0,$20(A0)
;	MOVE.L	D0,$30(A0)
;	MOVE.L	#15,$DFF096
;	RTS

	dc.b	'(c)C.Fayers and W.Beben 1987'

Play
	TST.B	lbB0036A2
	BNE.L	lbC002F8E
	LEA	lbB003690,A0
	ADDQ.B	#1,1(A0)
	ANDI.B	#$3F,1(A0)
	ADDQ.B	#1,3(A0)
	ANDI.B	#$3F,3(A0)
	ADDQ.B	#1,5(A0)
	ANDI.B	#$3F,5(A0)
	ADDQ.B	#1,7(A0)
	ANDI.B	#$3F,7(A0)
	ADDQ.B	#1,lbB00368C
	ANDI.B	#7,lbB00368C
	BNE.L	lbC003044
	CLR.B	lbB003698
lbC003044	BSR.L	lbC003074
	BSR.L	lbC003408
	CLR.L	D0
	BSR.L	lbC00335E
	MOVE.L	#1,D0
	BSR.L	lbC00335E
	MOVE.L	#2,D0
	BSR.L	lbC00335E
	MOVE.L	#3,D0
	BSR.L	lbC00335E
	BRA.L	lbC003530

lbC003074	CLR.B	D3
	SUBI.B	#1,lbB00363B
	BNE.L	lbC0030DA
	MOVE.B	lbB00363C,lbB00363B
	SUBQ.B	#1,lbB00363D
	BNE.L	lbC0030DA
	ANDI.B	#1,lbB0034DA
	BNE.L	lbC0030AC
	MOVE.B	lbB0034DA,lbB00349A
lbC0030AC	MOVE.B	lbB0036A3,lbB00363D
	LEA	lbL00362E,A3
	CLR.B	lbB003691
	BSR.L	lbC003220
	MOVE.B	D0,lbB003676
	MOVE.W	#1,$DFF096
	CLR.B	D3
	BSR.L	lbC003340
lbC0030DA	MOVE.B	#1,D3
	SUBI.B	#1,lbB00364B
	BNE.L	lbC003146
	MOVE.B	lbB00364C,lbB00364B
	SUBI.B	#1,lbB00364D
	BNE.L	lbC003146
	ANDI.B	#1,lbB0034DB
	BNE.L	lbC003116
	MOVE.B	lbB0034DB,lbB0034A2
lbC003116	MOVE.B	lbB0036A3,lbB00364D
	LEA	lbL00363E,A3
	CLR.B	lbB003693
	BSR.L	lbC003220
	MOVE.B	D0,lbB003677
	MOVE.W	#2,$DFF096
	MOVE.B	#1,D3
	BSR.L	lbC003340
lbC003146	MOVE.B	#2,D3
	SUBI.B	#1,lbB00365B
	BNE.L	lbC0031B2
	MOVE.B	lbB00365C,lbB00365B
	SUBI.B	#1,lbB00365D
	BNE.L	lbC0031B2
	ANDI.B	#1,lbB0034DC
	BNE.L	lbC003182
	MOVE.B	lbB0034DC,lbB0034AA
lbC003182	MOVE.B	lbB0036A3,lbB00365D
	LEA	lbL00364E,A3
	CLR.B	lbB003695
	BSR.L	lbC003220
	MOVE.B	D0,lbB003678
	MOVE.W	#4,$DFF096
	MOVE.B	#2,D3
	BSR.L	lbC003340
lbC0031B2	MOVE.B	#3,D3
	SUBI.B	#1,lbB00366B
	BNE.L	lbC00321E
	MOVE.B	lbB00366C,lbB00366B
	SUBI.B	#1,lbB00366D
	BNE.L	lbC00321E
	ANDI.B	#1,lbB0034DD
	BNE.L	lbC0031EE
	MOVE.B	lbB0034DD,lbB0034B2
lbC0031EE	MOVE.B	lbB0036A3,lbB00366D
	LEA	lbL00365E,A3
	CLR.B	lbB003697
	BSR.L	lbC003220
	MOVE.B	D0,lbB003679
	MOVE.W	#8,$DFF096
	MOVE.B	#3,D3
	BSR.L	lbC003340
lbC00321E	RTS

lbC003220	CLR.B	lbB003698
	MOVEA.L	8(A3),A1
lbC00322A	MOVE.B	(A1)+,D0
	CMP.B	#$FF,D0
	BEQ.L	lbC0032DE
	CMP.W	#$C8,D0
	BCS.L	lbC0032BE
	CMP.B	#$FC,D0
	BNE.L	lbC003258
	MOVE.B	(A1)+,D0
	MOVEM.L	A1/A3,-(SP)
	MOVE.B	D0,D2
	BSR.L	lbC003524
	MOVEM.L	(SP)+,A1/A3
	BRA.L	lbC00322A

lbC003258	CMP.B	#$FB,D0
	BNE.L	lbC00326E
	MOVE.B	(A1)+,13(A3)
	MOVE.B	13(A3),14(A3)
	BRA.L	lbC00322A

lbC00326E	CMP.B	#$FA,D0
	BNE.L	lbC003280
	MOVE.B	(A1)+,D0
	BSR.L	lbC0034DE
	BRA.L	lbC00322A

lbC003280	CMP.B	#$F7,D0
	BNE.L	lbC003298
	MOVE.B	(A1)+,D0
	MOVE.B	D0,lbB0036A3
	MOVE.B	D0,15(A3)
	BRA.L	lbC00322A

lbC003298	CMP.B	#$F5,D0
	BNE.L	lbC0032AA
	MOVE.B	(A1)+,D0
	BSR.L	lbC00338C
	BRA.L	lbC00322A

lbC0032AA	CMP.B	#$F6,D0
	BNE.L	lbC0032BE
	MOVE.B	(A1)+,D1
	MOVE.B	(A1)+,D0
	BSR.L	lbC0033BE
	BRA.L	lbC00322A

lbC0032BE	MOVE.L	A1,8(A3)
	ANDI.L	#$FF,D0
	ADD.B	12(A3),D0
	MOVE.B	D0,D2
	ADD.L	D0,D0
	LEA	lbW0035A0,A0
	ADDA.L	D0,A0
	MOVE.W	(A0),D6
	MOVE.B	D2,D0
	RTS

lbC0032DE	MOVEA.L	(A3),A0
lbC0032E0	MOVE.B	(A0)+,D0
	CMP.B	#$FF,D0
	BNE.L	lbC0032F2
	MOVEA.L	4(A3),A0
	BRA.L	lbC0032E0

lbC0032F2	CMP.B	#$FE,D0
	BNE.L	lbC003302
	MOVE.B	(A0)+,12(A3)
	BRA.L	lbC0032E0

lbC003302	CMP.B	#$F9,D0
	BNE.L	lbC003314
	MOVE.B	(A0)+,D0
	BSR.L	lbC0034DE
	BRA.L	lbC0032E0

lbC003314	CMP.B	#$F4,D0
	BNE.L	lbC003326
	MOVE.B	(A0)+,D0
	BSR.L	lbC00338C
	BRA.L	lbC0032E0

lbC003326	MOVE.L	A0,(A3)
	ANDI.L	#$FF,D0
	MULU.W	#4,D0
	MOVEA.L	lbL00366E,A0
	ADDA.L	D0,A0
	MOVEA.L	(A0),A1
	BRA.L	lbC00322A

lbC003340	TST.W	D6
	BEQ.L	lbC002F8E
	MOVE.B	D3,D0
	ADD.B	D0,D0
	LEA	lbL00367E,A0
	MOVE.W	D6,0(A0,D0.W)
	LEA	lbB003686,A0
	BCLR	D3,(A0)
	RTS

lbC00335E	LEA	lbB003690,A0
	MOVE.L	D0,D6
	ROL.L	#1,D0
	CLR.L	D1
	MOVE.B	0(A0,D0.W),D1
	ROL.L	#6,D1
	LEA	lbL003748,A1
	ADDA.L	D1,A1
	CLR.L	D1
	MOVE.B	1(A0,D0.W),D1
	LEA	lbL003688,A0
	MOVE.B	0(A1,D1.W),0(A0,D6.W)
	RTS

lbC00338C	CLR.L	D5
	MOVE.B	D0,D5
	ANDI.L	#7,D0
	LEA	lbB003690,A5
	LSR.B	#4,D5
	SUBQ.B	#1,D0
	BPL.L	lbC0033B6
	MOVE.B	D5,0(A5)
	MOVE.B	D5,2(A5)
	MOVE.B	D5,4(A5)
	MOVE.B	D5,6(A5)
	RTS

lbC0033B6	ADD.L	D0,D0
	MOVE.B	D5,0(A5,D0.W)
	RTS

lbC0033BE	MOVE.L	D0,D3
	ROR.B	#1,D0
	ANDI.B	#7,D0
	LEA	lbB0034DA,A0
	ADDA.L	D0,A0
	ANDI.B	#1,D3
	MOVE.B	D3,(A0)
	ROL.B	#3,D0
	LEA	lbB00349A,A0
	ADDA.L	D0,A0
	LEA	lbL0034BA,A4
	ADDA.L	D0,A4
	MOVE.L	A0,(A4)
	LEA	lbW003492,A2
lbC0033EE	LSR.B	#1,D1
	BCC.L	lbC0033F6
	MOVE.B	(A2),(A0)+
lbC0033F6	ADDA.L	#1,A2
	TST.B	D1
	BNE.L	lbC0033EE
	MOVE.B	#$FF,(A0)
	RTS

lbC003408	CLR.L	D4
	TST.B	lbB00349A
	BEQ.L	lbC003418
	BSR.L	lbC003450
lbC003418	MOVE.L	#8,D4
	TST.B	lbB0034A2
	BEQ.L	lbC00342C
	BSR.L	lbC003450
lbC00342C	MOVE.L	#$10,D4
	TST.B	lbB0034AA
	BEQ.L	lbC003440
	BSR.L	lbC003450
lbC003440	MOVE.L	#$18,D4
	TST.B	lbB0034B2
	BEQ.L	lbC002F8E
lbC003450	CLR.L	D0
	LEA	lbL0034BA,A0
	ADDA.L	D4,A0
	MOVEA.L	(A0),A2
	MOVE.B	(A2)+,D0
	CMP.B	#$FF,D0
	BNE.L	lbC00346C
	MOVEA.L	4(A0),A2
	CLR.L	D0
lbC00346C	MOVE.L	A2,(A0)
	LSR.B	#3,D4
	LEA	lbB003676,A0
	ADD.B	0(A0,D4.W),D0
	ROL.W	#1,D0
	LEA	lbW0035A0,A0
	LEA	lbL00367E,A2
	ROL.B	#1,D4
	MOVE.W	0(A0,D0.W),0(A2,D4.W)
	RTS

lbW003492	dc.w	$304
	dc.w	$507
	dc.w	$809
	dc.w	$A0C
lbB00349A	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB0034A2	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB0034AA	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB0034B2	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbL0034BA	dc.l	lbB00349A
	dc.l	lbB00349A
	dc.l	lbB0034A2
	dc.l	lbB0034A2
	dc.l	lbB0034AA
	dc.l	lbB0034AA
	dc.l	lbB0034B2
	dc.l	lbB0034B2
lbB0034DA	dc.b	0
lbB0034DB	dc.b	0
lbB0034DC	dc.b	0
lbB0034DD	dc.b	0

lbC0034DE	CLR.L	D5
	MOVE.B	D0,D5
	MOVE.W	D0,D6
	SUBQ.L	#1,D0
	ANDI.L	#3,D0
	MOVE.L	#1,D2
	LSL.B	D0,D2
	MOVE.W	D2,$DFF096
;	LEA	$2AF80,A5

	lea	SampInfoBuffer,A5

	LSR.L	#4,D5
	MULU.W	#6,D5
	ADDA.L	D5,A5
	MOVE.W	(A5)+,D1
	MOVEA.L	(A5),A5
	ROL.L	#4,D0
	LEA	$DFF0A0,A4
	ADDA.L	D0,A4
	MOVE.L	A5,(A4)
	LEA	$DFF0A4,A4
	ADDA.L	D0,A4
	MOVE.W	D1,(A4)
	RTS

lbC003524	MOVE.B	D2,D0
	ANDI.B	#3,D0
	MOVE.B	D0,D3
	MOVE.B	D2,D0
	RTS

lbC003530	LEA	lbL00367E,A0
	LEA	$DFF0A6,A2
	MOVE.W	(A0)+,(A2)
	MOVE.W	(A0)+,$10(A2)
	MOVE.W	(A0)+,$20(A2)
	MOVE.W	(A0)+,$30(A2)
	MOVE.B	1(A0),D1
	EORI.B	#$FF,D1
	ANDI.L	#15,D1
	ORI.L	#$8200,D1
;	MOVE.W	$DFF002,D0
;	ANDI.W	#$5F0,D0
;	OR.W	D0,D1
	MOVE.W	D1,$DFF096
;	EORI.W	#$FFFF,D1

	eor.w	#$820F,D1

	MOVE.W	D1,$DFF096
	MOVEA.L	#$DFF0A8,A2
	LEA	lbL003688,A0
	CLR.L	D0
	MOVE.B	(A0)+,D0
	MOVE.W	D0,(A2)
	MOVE.B	(A0)+,D0
	MOVE.W	D0,$10(A2)
	MOVE.B	(A0)+,D0
	MOVE.W	D0,$20(A2)
	MOVE.B	(A0),D0
	MOVE.W	D0,$30(A2)
	RTS

lbW0035A0	dc.w	$1AC0
	dc.w	$1940
	dc.w	$17D0
	dc.w	$1680
	dc.w	$1530
	dc.w	$1400
	dc.w	$12E0
	dc.w	$11D0
	dc.w	$10D0
	dc.w	$FE0
	dc.w	$F00
	dc.w	$E20
	dc.w	$D60
	dc.w	$CA0
	dc.w	$BE8
	dc.w	$B40
	dc.w	$A98
	dc.w	$A00
	dc.w	$970
	dc.w	$8E8
	dc.w	$868
	dc.w	$7F0
	dc.w	$780
	dc.w	$710
	dc.w	$6B0
	dc.w	$650
	dc.w	$5F4
	dc.w	$5A0
	dc.w	$54C
	dc.w	$500
	dc.w	$4B8
	dc.w	$474
	dc.w	$434
	dc.w	$3F8
	dc.w	$3C0
	dc.w	$388
	dc.w	$358
	dc.w	$328
	dc.w	$2FA
	dc.w	$2D0
	dc.w	$2A6
	dc.w	$280
	dc.w	$25C
	dc.w	$23A
	dc.w	$21A
	dc.w	$1FC
	dc.w	$1E0
	dc.w	$1C5
	dc.w	$1AC
	dc.w	$194
	dc.w	$17D
	dc.w	$168
	dc.w	$153
	dc.w	$140
	dc.w	$12E
	dc.w	$11D
	dc.w	$10D
	dc.w	$FE
	dc.w	$F0
	dc.w	$E2
	dc.w	$D6
	dc.w	$CA
	dc.w	$BE
	dc.w	$B4
	dc.w	$A9
	dc.w	$A0
	dc.w	$97
	dc.w	$8E
	dc.w	$86
	dc.w	$7F
	dc.w	0
lbL00362E	dc.l	0
lbL003632	dc.l	0
lbL003636	dc.l	0
	dc.b	0
lbB00363B	dc.b	1
lbB00363C	dc.b	1
lbB00363D	dc.b	1
lbL00363E	dc.l	0
lbL003642	dc.l	0
lbL003646	dc.l	0
	dc.b	0
lbB00364B	dc.b	1
lbB00364C	dc.b	1
lbB00364D	dc.b	1
lbL00364E	dc.l	0
lbL003652	dc.l	0
lbL003656	dc.l	0
	dc.b	0
lbB00365B	dc.b	1
lbB00365C	dc.b	1
lbB00365D	dc.b	1
lbL00365E	dc.l	0
lbL003662	dc.l	0
lbL003666	dc.l	0
	dc.b	0
lbB00366B	dc.b	1
lbB00366C	dc.b	1
lbB00366D	dc.b	1
lbL00366E	dc.l	0
lbW003672	dc.w	$FFFF
	dc.w	$FFFF
lbB003676	dc.b	0
lbB003677	dc.b	0
lbB003678	dc.b	0
lbB003679	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbL00367E	dc.l	0
	dc.l	0
lbB003686	dc.b	15
	dc.b	0
lbL003688	dc.l	$40404040
lbB00368C	dc.b	7
	dc.b	0
	dc.b	0
	dc.b	0
lbB003690	dc.b	0
lbB003691	dc.b	0
	dc.b	0
lbB003693	dc.b	0
	dc.b	0
lbB003695	dc.b	0
	dc.b	0
lbB003697	dc.b	0
lbB003698	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB0036A2	dc.b	1
lbB0036A3	dc.b	6

;lbC0036A4	MOVE.L	#$3ED,D2
;	MOVEA.L	lbL001C56,A6
;	JSR	-$1E(A6)
;	TST.W	D0
;	BEQ.L	lbC003736
;	MOVE.L	D0,lbL003738
;	MOVE.L	D0,D1
;	MOVE.L	#lbL00373C,D2
;	MOVE.L	#8,D3
;	MOVEA.L	lbL001C56,A6
;	JSR	-$2A(A6)
;	LEA	lbL00373C,A0
;	MOVE.L	4(A0),D0
;	MOVE.L	#2,D1
;	MOVEA.L	4,A6
;	JSR	-$C6(A6)
;	TST.W	D0
;	BEQ.L	lbC003736
;	MOVE.L	D0,lbL003744
;	MOVE.L	lbL003738,D1
;	MOVE.L	lbL003744,D2
;	LEA	lbL00373C,A0
;	MOVE.L	4(A0),D3
;	MOVEA.L	lbL001C56,A6
;	JSR	-$2A(A6)
;	MOVE.L	lbL003738,D1
;	MOVEA.L	lbL001C56,A6
;	JSR	-$24(A6)
;	MOVEA.L	lbL003744,A0
;	MOVE.L	$5C(A0),D0
;lbC003736	RTS

;lbL003738	dc.l	0
;lbL00373C	dc.l	0
;	dc.l	0
;lbL003744	dc.l	0
lbL003748	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
	dc.l	$40404040
	dc.l	$40404040
	dc.l	$40404040
	dc.l	$40404040
	dc.l	$3F3F3F3F
	dc.l	$3F3F3F3F
	dc.l	$3E3E3E3E
	dc.l	$3E3E3E3E
	dc.l	$3D3D3D3D
	dc.l	$3D3D3D3D
	dc.l	$3C3C3C3C
	dc.l	$3C3C3C3C
	dc.l	$3C3C3C3C
	dc.l	$3C3C3C3C
	dc.l	$3C3C3C3C
	dc.l	$3C3C3C3C
	dc.l	$3F3F3F3F
	dc.l	$3F3F3F3F
	dc.l	$3E3E3E3E
	dc.l	$3E3E3E3E
	dc.l	$3E3E3E3E
	dc.l	$3E3E3E3E
	dc.l	$3C3C3C3C
	dc.l	$3A3A3A3A
	dc.l	$36363636
	dc.l	$32323232
	dc.l	$30303030
	dc.l	$30303030
	dc.l	$30303030
	dc.l	$30303030
	dc.l	$2E2C2A28
	dc.l	$26242220
	dc.l	$40404036
	dc.l	$322A2218
	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	$3C383430
	dc.l	$2F2E2D2C
	dc.l	$2A292827
	dc.l	$26252423
	dc.l	$2221201F
	dc.l	$1E1D1C1B
	dc.l	$1A191817
	dc.l	$16151413
	dc.l	$1211100F
	dc.l	$E0D0C0B
	dc.l	$A090807
	dc.l	$6050403
	dc.l	$2020202
	dc.l	$2020202
	dc.l	$1010101
	dc.l	$1010101
	dc.l	$3B3A3938
	dc.l	$36343230
	dc.l	$2E2B2825
	dc.l	$221E1A16
	dc.l	$12100E0C
	dc.l	$A0A0A0A
	dc.l	$9090909
	dc.l	$9090909
	dc.l	$7070707
	dc.l	$7070707
	dc.l	$5050505
	dc.l	$5050505
	dc.l	$4040404
	dc.l	$4040404
	dc.l	$4040404
	dc.l	$4040404
	dc.l	$403C3834
	dc.l	$302C1E16
	dc.l	$120E0A06
	dc.l	$2010000
	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	$30282018
	dc.l	$10080000
	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	$3B3B3B3B
	dc.l	$3A3A3A3A
	dc.l	$38363432
	dc.l	$302E2C2A
	dc.l	$28262422
	dc.l	$201E1C1A
	dc.l	$18161412
	dc.l	$100E0C0A
	dc.l	$8060402
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$20202020
	dc.l	$1F1F1F1F
	dc.l	$1E1E1C1C
	dc.l	$1A1A1818
	dc.l	$16161414
	dc.l	$12121010
	dc.l	$E0E0C0C
	dc.l	$A0A0808
	dc.l	$6060404
	dc.l	$2020000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
lbL0039C8	dc.l	lbL003A10
	dc.l	lbB003A4D
	dc.l	lbL003A68
	dc.l	lbW003A7C
lbL0039D8	dc.l	lbL003A7E
	dc.l	lbL003A8E
	dc.l	lbB003AA5
	dc.l	lbL003AC2
	dc.l	lbB003B0D
	dc.l	lbL003B24
	dc.l	lbL003B3C
	dc.l	lbB003B59
	dc.l	lbL003B74
	dc.l	lbL003BAA
	dc.l	lbB003BD1
	dc.l	lbL003BFE
	dc.l	lbL003C0E
	dc.l	lbB003C25
lbL003A10	dc.l	$F901FE00
	dc.l	$1010101
	dc.l	$4FE0506
	dc.l	$FEFC06FE
	dc.l	$FE06FE01
	dc.l	$7FE0506
	dc.l	$FEFC06FE
	dc.l	$FE06FE01
	dc.l	$7FE0506
	dc.l	$FEFC06FE
	dc.l	$FE06FE01
	dc.l	$7FE0506
	dc.l	$FEFC06FE
	dc.l	$FE06FE01
	dc.l	$7FE000A
	dc.b	$FF
lbB003A4D	dc.b	$F9
	dc.l	$22FEF402
	dc.l	$202FE00
	dc.l	$205FEF4
	dc.l	$8F932F4
	dc.l	$1209FE00
	dc.l	$808FE0C
	dc.w	$BFF
lbL003A68	dc.l	$F933F403
	dc.l	$D03F403
	dc.l	$D0D0D0D
	dc.l	$F923F413
	dc.l	$9090CFF
lbW003A7C	dc.w	$FF
lbL003A7E	dc.l	$FA54F574
	dc.l	$FB023232
	dc.l	$FA64F534
	dc.l	$FB0438FF
lbL003A8E	dc.l	$FA01F541
	dc.l	$FB021515
	dc.l	$21151111
	dc.l	$1D110C0C
	dc.l	$180C1313
	dc.w	$1F13
	dc.b	$FF
lbB003AA5	dc.b	$FA
	dc.l	$32F512FB
	dc.l	$2393BFB
	dc.l	$439FB02
	dc.l	$3537FB04
	dc.l	$35FB0234
	dc.l	$35343032
	dc.l	$302F32FF
lbL003AC2	dc.l	$FA33FB02
	dc.l	$F5031EF5
	dc.l	$13303230
	dc.l	$FB0839FB
	dc.l	$2373937
	dc.l	$30FB0A32
	dc.l	$FB023032
	dc.l	$30FB0439
	dc.l	$3C3734FB
	dc.l	$A32FB02
	dc.l	$303230FB
	dc.l	$639FB02
	dc.l	$39373937
	dc.l	$30FB0A32
	dc.l	$FB023032
	dc.l	$30FB062D
	dc.l	$FB022D2B
	dc.l	$2E3033FB
	dc.w	$832
	dc.b	$FF
lbB003B0D	dc.b	$FA
	dc.l	$1F541FB
	dc.l	$2151521
	dc.l	$1511111D
	dc.l	$110F0F1B
	dc.l	$F13131F
	dc.w	$13FF
lbL003B24	dc.l	$FA33FB02
	dc.l	$393BFB04
	dc.l	$39FB0235
	dc.l	$37353033
	dc.l	$32302E2B
	dc.l	$2F3032FF
lbL003B3C	dc.l	$FA22FB01
	dc.l	$1824FB02
	dc.l	$180CFB01
	dc.l	$1824FB02
	dc.l	$18FB0118
	dc.l	$24FB020C
	dc.l	$FB011824
	dc.b	$FF
lbB003B59	dc.b	$FB
	dc.l	$11824FB
	dc.l	$2180CFB
	dc.l	$11824FB
	dc.l	$217FB01
	dc.l	$1723FB02
	dc.l	$BFB0117
	dc.w	$23FF
lbL003B74	dc.l	$FA32F512
	dc.l	$FB0A3CFB
	dc.l	$2413F3C
	dc.l	$3A3CFB06
	dc.l	$35FB0235
	dc.l	$FB01383A
	dc.l	$FB0435FB
	dc.l	$235FB01
	dc.l	$383AFB0A
	dc.l	$35F582FB
	dc.l	$235F512
	dc.l	$FB023335
	dc.l	$38353330
	dc.w	$35FF
lbL003BAA	dc.l	$FB023537
	dc.l	$FB0630FB
	dc.l	$432FB0A
	dc.l	$33FB0338
	dc.l	$37FB0635
	dc.l	$FB0232FB
	dc.l	$435FB06
	dc.l	$37FB0838
	dc.l	$FB023735
	dc.w	$3430
	dc.b	$FF
lbB003BD1	dc.b	$FA
	dc.l	$31F520FB
	dc.l	$21111FB
	dc.l	$4F68A02
	dc.l	$29FB0213
	dc.l	$13FB04F6
	dc.l	$8A022BFB
	dc.l	$21414FB
	dc.l	$4F68A02
	dc.l	$2CFB0215
	dc.l	$15FB04F6
	dc.l	$8A022DFF
lbL003BFE	dc.l	$FA32F562
	dc.l	$FB043032
	dc.l	$2F2B3032
	dc.l	$FB082DFF
lbL003C0E	dc.l	$F513FA33
	dc.l	$FB023C35
	dc.l	$393C3B37
	dc.l	$3B3E3C38
	dc.l	$3C3FFB04
	dc.w	$4034
	dc.b	$FF
lbB003C25	dc.b	$F5
	dc.l	$3FB2023
	dc.w	$FF00
;lbL003C2C	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
;lbL003C54	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
;	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
;lbL003CBC	dc.l	0
;	dc.l	0
;sample1.MSG	dc.b	'sample1',0
;	dc.b	'sample2',0
;	dc.b	'sample3',0
;	dc.b	'sample4',0
;	dc.b	'sample5',0
;	dc.b	'sample6',0
;	dc.b	'sample7',0
;	dc.b	$FF
;	dc.b	0
;	dc.b	0
;	dc.b	0
SampInfoBuffer
	dc.w	(Sample2-Sample1-104)/2
	dc.l	Sample1+104
	dc.w	(Sample3-Sample2-104)/2
	dc.l	Sample2+104
	dc.w	(Sample4-Sample3-104)/2
	dc.l	Sample3+104
	dc.w	(Sample5-Sample4-104)/2
	dc.l	Sample4+104
	dc.w	(Sample6-Sample5-104)/2
	dc.l	Sample5+104
	dc.w	(Sample7-Sample6-104)/2
	dc.l	Sample6+104
	dc.w	(Sample8-Sample7-104)/2
	dc.l	Sample7+104
Sample1
	incbin	ram:sample1
Sample2
	incbin	ram:sample2
Sample3
	incbin	ram:sample3
Sample4
	incbin	ram:sample4
Sample5
	incbin	ram:sample5
Sample6
	incbin	ram:sample6
Sample7
	incbin	ram:sample7
Sample8
WC_End