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

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

	SECTION Player,Code_C

WO_Start
	PLAYERHEADER PlayerTagArray

	dc.b	'$VER: Winter Olympiad "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	"              WINTER OLYMPIAD",10
	dc.b	10
	dc.b	"          Coding by Chris Robson",10
	dc.b	10
	dc.b	"    Graphics by Paul Drummond, Mo, Jeff",10
	dc.b	10
	dc.b	"            Sound by Wal Beban",10
	dc.b	10
	dc.b	10
	dc.b	"           (c) 1987 by TyneSoft",0
	even

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

Get_ModuleInfo
	lea	InfoBuffer(PC),A0
	rts

InfoBuffer
	dc.l	MI_SpecialInfo,Text
	dc.l	MI_LoadSize,WO_End-WO_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
	bsr.w	InitSamples
	bra.w	Init

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

EndSound
	lea	$DFF000,A0
	move.w	#15,$96(A0)
	clr.w	$A8(A0)
	clr.w	$B8(A0)
	clr.w	$C8(A0)
	clr.w	$D8(A0)
	rts

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

; Music from game Winter Olympiad (c) 1987 by TyneSoft

Play
	MOVEM.L	D0-D7/A0-A6,-(SP)
	SUBQ.L	#1,lbL001624
	MOVE.L	#4,lbL001624
	TST.B	lbB001E3E
	BNE.L	lbC00161E
	CLR.L	D0
	CLR.L	D1
	CLR.L	D2
	CLR.L	D3
	CLR.L	D4
	CLR.L	D5
	CLR.L	D6
	CLR.L	D7
	MOVEM.L	D0-D6,-(SP)
	MOVEM.L	(SP)+,A0-A6
	BSR.L	lbC001790
lbC00161E	MOVEM.L	(SP)+,D0-D7/A0-A6
	RTS

lbL001624	dc.l	$1E

Init
lbC001628	MOVE.B	#1,D0
	CLR.B	lbB001E3E
	SUBQ.L	#1,D0
	ANDI.L	#$FF,D0
	MOVEA.L	#lbL001DCC,A0
	MULU.W	#4,D0
	ADDA.L	D0,A0
	MOVE.L	(A0)+,lbL001DDC
	MOVE.L	(A0)+,lbL001DA0
	MOVE.L	(A0)+,lbL001DB0
	MOVE.L	(A0)+,lbL001DC0
	MOVE.L	#lbW001E10,D0
	MOVE.L	D0,lbL001DA4
	MOVE.L	D0,lbL001DB4
	MOVE.L	D0,lbL001DC4
	MOVE.L	D0,lbL001D9C
	MOVE.L	D0,lbL001DAC
	MOVE.L	D0,lbL001DBC
	MOVE.B	#8,D0
	SUBQ.B	#1,D0
	MOVE.B	D0,lbB001E2D
	CLR.L	D0
	MOVE.B	#$3F,lbB001E26
	MOVE.B	#1,lbB001DA9
	MOVE.B	#1,lbB001DB9
	MOVE.B	#1,lbB001DC9
lbC0016B6	RTS

lbC0016B8	ADDQ.B	#1,lbB001E3E
	MOVE.B	#8,D4
	CLR.W	D1
	BSR.L	lbC001C34
	MOVE.B	#9,D4
	CLR.W	D1
	BSR.L	lbC001C34
	MOVE.B	#10,D4
	CLR.W	D1
	BSR.L	lbC001C34
	LEA	$DFF000,A6
	MOVE.W	#$8007,$96(A6)
	RTS

lbW0016EA	dc.w	$69F
	dc.w	$640
	dc.w	$5E6
	dc.w	$591
	dc.w	$541
	dc.w	$4F6
	dc.w	$4AE
	dc.w	$46B
	dc.w	$42C
	dc.w	$3F0
	dc.w	$3B7
	dc.w	$382
	dc.w	$34F
	dc.w	$320
	dc.w	$2F3
	dc.w	$2C8
	dc.w	$2A1
	dc.w	$27B
	dc.w	$257
	dc.w	$236
	dc.w	$216
	dc.w	$1F8
	dc.w	$1DC
	dc.w	$1C1
	dc.w	$1A8
	dc.w	$190
	dc.w	$179
	dc.w	$164
	dc.w	$150
	dc.w	$13D
	dc.w	$12C
	dc.w	$11B
	dc.w	$10B
	dc.w	$FC
	dc.w	$EE
	dc.w	$E0
	dc.w	$D4
	dc.w	$C8
	dc.w	$BD
	dc.w	$B2
	dc.w	$A8
	dc.w	$9F
	dc.w	$96
	dc.w	$8D
	dc.w	$85
	dc.w	$7E
	dc.w	$77
	dc.w	$70
	dc.w	$6A
	dc.w	$64
	dc.w	$5E
	dc.w	$59
	dc.w	$54
	dc.w	0
	dc.w	$1388
	dc.w	$13EC
	dc.w	$1450
	dc.w	$14B4
	dc.w	$1518
	dc.w	$157C
	dc.w	$15E0
	dc.w	$1644
	dc.w	$170C
	dc.w	$1770
	dc.w	$17D4
	dc.w	$1838
	dc.w	$189C
	dc.w	$1900
	dc.w	$1964
	dc.w	$19C8
	dc.w	$2863
	dc.w	$2943
	dc.w	$2E46
	dc.w	$6179
	dc.w	$6572
	dc.w	$7320
	dc.w	$2620
	dc.w	$572E
	dc.w	$4265
	dc.w	$6265
	dc.w	$6E20
	dc.w	$3139
	dc.w	$3837

lbC001790
;	ORI.W	#$700,SR
	ADDI.B	#1,lbB001E2D
	ANDI.B	#15,lbB001E2D
	BSR.L	lbC0017CC
	CLR.L	D0
	BSR.L	lbC001D4E
	MOVEQ	#1,D0
	BSR.L	lbC001D4E
	MOVEQ	#2,D0
	BSR.L	lbC001D4E
	BSR.L	lbC001C10
	MOVE.B	#0,D1
	MOVE.B	#6,D2
	JMP	lbC001D02

lbC0017CC	SUBI.B	#1,lbB001DA9
	BNE.L	lbC0017FE
	MOVE.B	lbB001DAA,lbB001DA9
	MOVEA.L	#lbL001D9C,A3
	MOVE.B	#8,D0
	BSR.L	lbC0018B8
	MOVE.B	D0,lbB001E14
	MOVE.B	#1,D3
	BSR.L	lbC0019A0
lbC0017FE	SUBI.B	#1,lbB001DB9
	BNE.L	lbC001830
	MOVE.B	lbB001DBA,lbB001DB9
	MOVEA.L	#lbL001DAC,A3
	MOVE.B	#$10,D0
	BSR.L	lbC0018B8
	MOVE.B	D0,lbB001E15
	MOVE.B	#2,D3
	BSR.L	lbC0019A0
lbC001830	SUBI.B	#1,lbB001DC9
	BNE.L	lbC001862
	MOVE.B	lbB001DCA,lbB001DC9
	MOVEA.L	#lbL001DBC,A3
	MOVE.B	#$20,D0
	BSR.L	lbC0018B8
	MOVE.B	D0,lbB001E16
	MOVE.B	#3,D3
	BSR.L	lbC0019A0
lbC001862	BSR.L	lbC001B6A
	MOVEA.L	#lbB001E1F,A0
	MOVE.B	(A0)+,D1
	MULU.W	#$100,D1
	OR.B	(A0)+,D1
	BSR.L	lbC001896
	ADDQ.L	#2,A0
	BSR.L	lbC001896
	SUBQ.L	#2,A0
	MOVE.B	(A0)+,D1
	MULU.W	#$100,D1
	OR.B	(A0)+,D1
	BSR.L	lbC001896
	CLR.L	D1
	MOVE.B	#11,D2
	BRA.L	lbC001D02

lbC001896	MOVE.B	(A0),D5
	MULU.W	#$100,D5
	OR.B	1(A0),D5
	CMP.W	D5,D1
	BNE.L	lbC0016B6
	ADDQ.L	#1,D1
	MOVE.B	D1,1(A0)
	MOVE.W	D1,D5
	DIVU.W	#$100,D5
	MOVE.B	D5,(A0)
	SUBQ.L	#1,D1
	RTS

lbC0018B8	OR.B	D0,lbB001E26
	CLR.B	lbB001E34
	MOVEA.L	8(A3),A1
lbC0018C8	MOVE.B	(A1)+,D0
	CMP.B	#$FF,D0
	BEQ.L	lbC00194C
	CMP.B	#$FD,D0
	BNE.L	lbC0018E0
	MOVE.B	(A1)+,D0
	BRA.L	lbC001924

lbC0018E0	CMP.B	#$FC,D0
	BNE.L	lbC0018FC
	MOVE.B	(A1)+,D0
	MOVE.L	A1,-(SP)
	MOVE.L	A3,-(SP)
	MOVE.B	D0,D2
	BSR.L	lbC001AAE
	MOVEA.L	(SP)+,A3
	MOVEA.L	(SP)+,A1
	BRA.L	lbC0018C8

lbC0018FC	CMP.B	#$FB,D0
	BNE.L	lbC001912
	MOVE.B	(A1)+,13(A3)
	MOVE.B	13(A3),14(A3)
	BRA.L	lbC0018C8

lbC001912	CMP.B	#$F9,D0
	BNE.L	lbC001924
	MOVE.B	(A1)+,D0
	BSR.L	lbC001A1A
	BRA.L	lbC0018C8

lbC001924	MOVE.L	A1,8(A3)
	ANDI.L	#$FF,D0
	MOVE.B	D0,D2
	ADD.B	12(A3),D0
	ADD.L	D0,D0
	MOVEA.L	#lbW0016EA,A0
	ADDA.L	D0,A0
	MOVE.B	(A0),D6
	MULU.W	#$100,D6
	OR.B	1(A0),D6
	MOVE.B	D2,D0
	RTS

lbC00194C	MOVEA.L	(A3),A0
lbC00194E	MOVE.B	(A0)+,D0
	CMP.B	#$FF,D0
	BNE.L	lbC001960
	MOVEA.L	4(A3),A0
	BRA.L	lbC00194E

lbC001960	CMP.B	#$FE,D0
	BNE.L	lbC001970
	MOVE.B	(A0)+,12(A3)
	BRA.L	lbC00194E

lbC001970	CMP.B	#$FA,D0
	BNE.L	lbC001982
	MOVE.B	(A0)+,D0
	BSR.L	lbC001A1A
	BRA.L	lbC00194E

lbC001982	MOVE.L	A0,(A3)
	SUBI.B	#1,D0
	ANDI.L	#$FF,D0
	MULU.W	#4,D0
	MOVEA.L	lbL001DDC,A0
	ADDA.L	D0,A0
	MOVEA.L	(A0),A1
	BRA.L	lbC0018C8

lbC0019A0	CMP.B	#$36,D2
	BCC.L	lbC001A48
	TST.W	D6
	BEQ.L	lbC0016B6
	MOVE.B	D3,D0
	SUBQ.L	#1,D0
	ADD.B	D0,D0
	MOVEA.L	#lbB001E1F,A0
	ADDA.L	D0,A0
	MOVE.B	D6,1(A0)
	MOVE.W	D6,D5
	DIVU.W	#$100,D5
	MOVE.B	D5,(A0)
	MOVEA.L	#lbB001E31,A0
	CLR.L	D1
	MOVE.B	D3,D1
	SUBQ.B	#1,D1
	ADDA.L	D1,A0
	MOVE.B	(A0),D0
	SUBA.L	#3,A0
	MOVE.B	D0,(A0)
	MOVEA.L	#lbW001E1C,A0
	ADDA.L	D1,A0
	MOVE.B	(A0),D0
	MOVEA.L	#lbB001E27,A0
	ADDA.L	D1,A0
	MOVE.B	D0,(A0)
	MOVEA.L	#lbB001E26,A0
	SUBQ.B	#1,D3
	BNE.L	lbC001A04
	BCLR	#0,(A0)
lbC001A04	SUBQ.B	#1,D3
	BNE.L	lbC001A0E
	BCLR	#1,(A0)
lbC001A0E	SUBQ.B	#1,D3
	BNE.L	lbC0016B6
	BCLR	#2,(A0)
	RTS

lbC001A1A	MOVE.B	D0,D5
	ANDI.L	#3,D0
	MOVEA.L	#lbB001E31,A5
	ROR.B	#4,D5
	ANDI.B	#15,D5
	SUBQ.B	#1,D0
	BPL.L	lbC001A42
	MOVE.B	D5,0(A5)
	MOVE.B	D5,1(A5)
	MOVE.B	D5,2(A5)
	RTS

lbC001A42	MOVE.B	D5,0(A5,D0.W)
	RTS

lbC001A48	MOVE.W	D6,D5
	LSR.W	#8,D5
	MOVE.B	D6,lbB001E25
	MOVE.B	D5,D0
	ANDI.B	#$F0,D0
	BEQ.L	lbC001A92
	LSR.B	#4,D0
lbC001A5E	MOVEA.L	#lbW001E2E,A0
	CLR.L	D1
	MOVE.B	D3,D1
	SUBQ.W	#1,D1
	ADDA.L	D1,A0
	MOVE.B	D0,(A0)
	MOVEA.L	#lbB001E26,A0
	SUBQ.B	#1,D3
	BNE.L	lbC001A80
	BCLR	#3,(A0)
	RTS

lbC001A80	SUBQ.B	#1,D3
	BNE.L	lbC001A8C
	BCLR	#4,(A0)
	RTS

lbC001A8C	BCLR	#5,(A0)
	RTS

lbC001A92	MOVE.B	D5,D0
	ANDI.B	#15,D0
	MOVEA.L	#lbB001E27,A0
	CLR.L	D1
	MOVE.B	D3,D1
	SUBQ.L	#1,A0
	ADDA.L	D1,A0
	MOVE.B	D0,(A0)
	CLR.L	D0
	BRA.L	lbC001A5E

lbC001AAE	MOVE.B	D2,D0
	ANDI.B	#3,D0
	MOVE.B	D0,D3
	MOVE.B	D2,D0
	BTST	#2,D2
	BNE.L	lbC001ACA
	BTST	#3,D2
	BNE.L	lbC001B0A
	RTS

lbC001ACA	BTST	#3,D2
	BNE.L	lbC001B2E
	LSR.B	#4,D0
	MOVE.B	D0,D2
	CLR.L	D0
	TST.B	D3
	BEQ.L	lbC001AF8
	MOVEA.L	#lbW001E1C,A0
	CLR.L	D1
	MOVE.B	D3,D1
	ADDA.L	D1,A0
	SUBA.L	#1,A0
	MOVE.B	D2,(A0)
	CLR.L	D2
	BRA.L	lbC001B46

lbC001AF8	MOVEA.L	#lbW001E1C,A0
	MOVE.B	D2,(A0)+
	MOVE.B	D2,(A0)+
	MOVE.B	D2,(A0)
	CLR.L	D2
	BRA.L	lbC001B5C

lbC001B0A	MOVE.B	D3,lbB001E3B
	MOVE.B	#$E0,D0
	AND.B	D2,D0
	ROL.B	#3,D0
	MOVE.B	D2,D5
	MOVE.B	D0,D2
	BTST	#4,D5
	BEQ.L	lbC001B26
	NEG.B	D0
lbC001B26	MOVE.B	D0,lbB001E34
	RTS

lbC001B2E	ANDI.B	#$E0,D0
	BTST	#4,D2
	BNE.L	lbC0016B6
	ROL.B	#3,D0
	MOVE.B	D0,D2
	CLR.L	D0
	TST.B	D3
	BEQ.L	lbC001B5C
lbC001B46	CLR.L	D1
	MOVE.B	D3,D1
	MOVEA.L	#lbB001E31,A0
	ADDA.L	D1,A0
	SUBA.L	#1,A0
	MOVE.B	D2,(A0)
	RTS

lbC001B5C	MOVEA.L	#lbB001E31,A0
	MOVE.B	D2,(A0)+
	MOVE.B	D2,(A0)+
	MOVE.B	D2,(A0)
	RTS

lbC001B6A	MOVEA.L	#lbB001E34,A0
	TST.B	(A0)
	BEQ.L	lbC0016B6
	ANDI.L	#$FF,D1
	CLR.L	D3
	MOVE.B	(A0),D2
	MOVE.B	lbB001E3B,D0
	MOVEA.L	#lbB001E1F,A3
	MOVEA.L	#lbB001E14,A0
	TST.B	D0
	BEQ.L	lbC001BA4
	SUBQ.L	#1,D0
	ADDA.L	D0,A0
	ADD.B	D0,D0
	ADDA.L	D0,A3
	BRA.L	lbC001BC4

lbC001BA4	BSR.L	lbC001BC4
	ADDA.L	#2,A3
	MOVEA.L	#lbB001E15,A0
	BSR.L	lbC001BC4
	ADDA.L	#2,A3
	MOVEA.L	lbB001E16,A0
lbC001BC4	MOVE.B	(A0),D0
	ADD.B	D2,D0
	ADD.B	D0,D0
	MOVEA.L	#lbW0016EA,A0
	ADDA.L	D0,A0
	MOVE.B	(A0),D1
	MULU.W	#$100,D1
	OR.B	1(A0),D1
	MOVE.B	(A3),D4
	MULU.W	#$100,D4
	OR.B	1(A3),D4
	EXG	D4,D1
	SUB.W	D1,D4
	ADD.W	D4,D4
	MOVE.B	D4,D0
	LSR.W	#8,D4
	LSL.W	#8,D0
	OR.W	D0,D4
	CLR.L	D0
	MOVE.W	#3,D5
lbC001BFA	LSR.W	#1,D4
	ROXR.B	#1,D0
	DBRA	D5,lbC001BFA
	MOVE.B	D4,$17(A3)
	LSR.W	#8,D4
	OR.B	D4,D0
	MOVE.B	D0,$16(A3)
	RTS

lbC001C10	MOVEA.L	#lbB001E1F,A0
	MOVEA.L	#lbB001E35,A1
	MOVE.W	#2,D2
lbC001C20	MOVE.B	(A0),D4
	MOVE.B	1(A0),D5
	ADD.B	(A1)+,D4
	ADD.B	(A1)+,D5
	MOVE.B	D4,(A0)+
	MOVE.B	D5,(A0)+
	DBRA	D2,lbC001C20
	RTS

lbC001C34	ANDI.W	#$FF,D4
	ANDI.W	#$FF,D1
	CMP.W	#13,D4
	BCC.L	lbC001C7E
	MOVEM.L	D0/D4/A0/A6,-(SP)
	CMP.W	#11,D4
	BCC.L	lbC001C76
	MOVE.W	D4,D0
	CMP.W	#8,D4
	BCS.L	lbC001C62
	BSR.L	lbC001C9A
	BRA.L	lbC001C76

lbC001C62	CMP.W	#7,D4
	BEQ.L	lbC001C80
	CMP.W	#6,D4
	BCC.L	lbC001C76
	BSR.L	lbC001CCA
lbC001C76	MOVEM.L	(SP)+,D0/D4/A0/A6
	ADDI.B	#1,D4
lbC001C7E	RTS

lbC001C80	LEA	$DFF000,A6
	ANDI.W	#7,D1
	MOVE.W	D1,$96(A6)
	EORI.W	#$8007,D1
	MOVE.W	D1,$96(A6)
	BRA.L	lbC001C76

lbC001C9A	SUBQ.W	#8,D0
	LSL.W	#4,D0
	ANDI.W	#$30,D0
	LEA	$DFF000,A6
	LEA	0(A6,D0.W),A6
	TST.W	D0
	BNE.L	lbC001CBC
	SUBI.W	#6,D1
	BPL.L	lbC001CBC
	CLR.W	D1
lbC001CBC	MOVE.W	D1,D0
	ANDI.W	#15,D0
	LSL.W	#2,D0
	MOVE.W	D0,$A8(A6)
	RTS

lbC001CCA	LEA	lbL001CFC,A0
	BCHG	#0,D0
	MOVE.B	D1,0(A0,D0.W)
	LSL.W	#3,D0
	ANDI.W	#$30,D0
	LEA	$DFF000,A6
	LEA	0(A6,D0.W),A6
	ANDI.W	#6,D4
	MOVE.W	0(A0,D4.W),D0
	ANDI.W	#$FFF,D0
	LSL.W	#1,D0
	MOVE.W	D0,$A6(A6)
	RTS

lbL001CFC	dc.l	0
	dc.w	0

lbC001D02	MOVEA.L	#lbB001E1F,A0
	ANDI.L	#$FF,D1
	ADDA.L	D1,A0
	MOVE.B	D1,D4
	SUBQ.B	#1,D2
	ANDI.L	#$FF,D2
	CMP.B	#6,D4
	BCS.L	lbC001D2E
lbC001D22	MOVE.B	(A0)+,D1
	BSR.L	lbC001C34
lbC001D28	DBRA	D2,lbC001D22
	RTS

lbC001D2E	MOVE.B	1(A0),D1
	BSR.L	lbC001C34
	MOVE.B	(A0),D1
	BSR.L	lbC001C34
	ADDQ.L	#2,A0
	SUBQ.W	#1,D2
	CMP.B	#6,D4
	BCC.L	lbC001D28
	DBRA	D2,lbC001D2E
	RTS

lbC001D4E	MOVEA.L	#lbB001E27,A0
	MOVE.B	D0,D3
	CLR.L	D1
	MOVE.B	D0,D1
	ADDA.L	D1,A0
	MOVEA.L	A0,A1
	ADDA.L	#7,A0
	MOVE.B	(A0),D0
	BEQ.L	lbC0016B6
	MOVEA.L	#lbB001E3F,A0
	SUBQ.B	#1,D0
	LSL.B	#3,D0
	MOVE.B	D0,D1
	ADDA.L	D1,A0
	MOVE.B	lbB001E2D,D1
	ADDA.L	D1,A0
	MOVE.B	(A0),D0
	EXG	A0,A1
	MOVE.B	(A0),D2
	CMP.B	D2,D0
	BEQ.L	lbC0016B6
	MOVE.B	D0,(A0)
	MOVE.B	D3,D1
	ADDI.B	#8,D1
	MOVE.B	#1,D2
	BRA.L	lbC001D02

lbL001D9C	dc.l	lbW001E10
lbL001DA0	dc.l	lbB001ECF
lbL001DA4	dc.l	0
	dc.b	0
lbB001DA9	dc.b	1
lbB001DAA	dc.b	8
	dc.b	0
lbL001DAC	dc.l	lbW001E10
lbL001DB0	dc.l	lbW001F16
lbL001DB4	dc.l	0
	dc.b	0
lbB001DB9	dc.b	1
lbB001DBA	dc.b	8
	dc.b	0
lbL001DBC	dc.l	lbW001E10
lbL001DC0	dc.l	lbB001F33
lbL001DC4	dc.l	0
	dc.b	0
lbB001DC9	dc.b	1
lbB001DCA	dc.b	8
	dc.b	0
lbL001DCC	dc.l	lbL001DE0
	dc.l	lbB001ECF
	dc.l	lbW001F16
	dc.l	lbB001F33
lbL001DDC	dc.l	0
lbL001DE0	dc.l	lbW001F44
	dc.l	lbB001F5F
	dc.l	lbW001F78
	dc.l	lbB001FBD
	dc.l	lbW001FD4
	dc.l	lbW001FEA
	dc.l	lbB002007
	dc.l	lbW002024
	dc.l	lbB00204F
	dc.l	lbW002076
	dc.l	lbB0020EF
	dc.l	lbB0020FB
lbW001E10	dc.w	$FFFF
	dc.w	$FFFF
lbB001E14	dc.b	0
lbB001E15	dc.b	0
lbB001E16	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbW001E1C	dc.w	0
	dc.b	0
lbB001E1F	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB001E25	dc.b	0
lbB001E26	dc.b	$3F
lbB001E27	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB001E2D	dc.b	7
lbW001E2E	dc.w	$102
	dc.b	3
lbB001E31	dc.b	1
	dc.b	2
	dc.b	3
lbB001E34	dc.b	0
lbB001E35	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
lbB001E3B	dc.b	0
	dc.b	0
	dc.b	0
lbB001E3E	dc.b	0
lbB001E3F	dc.b	15
	dc.w	$E0D
	dc.w	$E0F
	dc.w	$E0D
	dc.w	$E0F
	dc.w	$E0D
	dc.w	$E0F
	dc.w	$E0D
	dc.w	$E0A
	dc.w	$B0C
	dc.w	$D0A
	dc.w	$B0C
	dc.w	$D0A
	dc.w	$B0C
	dc.w	$D0A
	dc.w	$B0C
	dc.w	$D0F
	dc.w	$E0D
	dc.w	$C0B
	dc.w	$C0D
	dc.w	$E0F
	dc.w	$E0D
	dc.w	$C0B
	dc.w	$C0D
	dc.w	$E0E
	dc.w	$D0D
	dc.w	$E0E
	dc.w	$D0D
	dc.w	$E0E
	dc.w	$D0D
	dc.w	$E0E
	dc.w	$D0D
	dc.w	$E0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0E
	dc.w	$B0F
	dc.w	$F0F
	dc.w	$F0E
	dc.w	$E0E
	dc.w	$E0D
	dc.w	$D0D
	dc.w	$D0C
	dc.w	$C0C
	dc.w	$C0E
	dc.w	$D0C
	dc.w	$D0E
	dc.w	$D0C
	dc.w	$D0E
	dc.w	$D0C
	dc.w	$D0E
	dc.w	$D0C
	dc.w	$D0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0D
	dc.w	$E0A
	dc.w	$B0C
	dc.w	$D0E
	dc.w	$F0E
	dc.w	$D0C
	dc.w	$D0E
	dc.w	$F0E
	dc.w	$D0C
	dc.b	11
lbB001ECF	dc.b	$FE
	dc.w	1
	dc.w	$101
	dc.w	$1FA
	dc.w	$2004
	dc.w	$FE05
	dc.w	$6FE
	dc.w	$806
	dc.w	$FE0A
	dc.w	$6FA
	dc.w	$40FE
	dc.w	$D07
	dc.w	$FE05
	dc.w	$6FE
	dc.w	$806
	dc.w	$FE0A
	dc.w	$6FA
	dc.w	$70FE
	dc.w	$D07
	dc.w	$FA40
	dc.w	$FE05
	dc.w	$6FE
	dc.w	$806
	dc.w	$FE0A
	dc.w	$6FE
	dc.w	$D07
	dc.w	$FA70
	dc.w	$FE05
	dc.w	$6FE
	dc.w	$806
	dc.w	$FE0A
	dc.w	$6FE
	dc.w	$D07
	dc.w	$FA10
	dc.w	$FE00
	dc.w	$AFF
lbW001F16	dc.w	$FA20
	dc.w	$FE00
	dc.w	$202
	dc.w	$2FE
	dc.w	$CFA
	dc.w	$5002
	dc.w	$5FE
	dc.w	$FA
	dc.w	$6008
	dc.w	$908
	dc.w	$FE0C
	dc.w	$FA80
	dc.w	$8FA
	dc.w	$400B
	dc.b	$FF
lbB001F33	dc.b	$FA
	dc.w	$4002
	dc.w	$308
	dc.w	$9FA
	dc.w	$1009
	dc.w	$FA50
	dc.w	$9FA
	dc.w	$100C
	dc.w	$FF00
lbW001F44	dc.w	$FCE4
	dc.w	$F930
	dc.w	$FB0C
	dc.w	$1515
	dc.w	$FD3C
	dc.w	$1511
	dc.w	$11FD
	dc.w	$3611
	dc.w	$C0C
	dc.w	$FD36
	dc.w	$C13
	dc.w	$13FD
	dc.w	$3613
	dc.b	$FF
lbB001F5F	dc.b	$FB
	dc.w	$C21
	dc.w	$23FB
	dc.w	$1821
	dc.w	$FB0C
	dc.w	$1D1F
	dc.w	$FB18
	dc.w	$1DFB
	dc.w	$C1C
	dc.w	$1D1C
	dc.w	$181A
	dc.w	$1817
	dc.w	$1AFF
lbW001F78	dc.w	$FB0C
	dc.w	$3518
	dc.w	$1A18
	dc.w	$FB30
	dc.w	$21FB
	dc.w	$C1F
	dc.w	$211F
	dc.w	$18FB
	dc.w	$3C1A
	dc.w	$FB0C
	dc.w	$181A
	dc.w	$18FB
	dc.w	$1821
	dc.w	$241F
	dc.w	$1CFB
	dc.w	$3C1A
	dc.w	$FB0C
	dc.w	$181A
	dc.w	$18FB
	dc.w	$2421
	dc.w	$FB0C
	dc.w	$211F
	dc.w	$211F
	dc.w	$18FB
	dc.w	$3C1A
	dc.w	$FB0C
	dc.w	$181A
	dc.w	$18FB
	dc.w	$2415
	dc.w	$FB0C
	dc.w	$1513
	dc.w	$1618
	dc.w	$1BFB
	dc.w	$301A
	dc.b	$FF
lbB001FBD	dc.b	$FB
	dc.w	$C09
	dc.w	$9FD
	dc.w	$3609
	dc.w	$505
	dc.w	$FD36
	dc.w	$503
	dc.w	$3FD
	dc.w	$3603
	dc.w	$707
	dc.w	$FD36
	dc.w	$7FF
lbW001FD4	dc.w	$FB0C
	dc.w	$2123
	dc.w	$FB18
	dc.w	$21FB
	dc.w	$C1D
	dc.w	$1F1D
	dc.w	$181B
	dc.w	$1A18
	dc.w	$1613
	dc.w	$1718
	dc.w	$1AFF
lbW001FEA	dc.w	$FB06
	dc.w	$C18
	dc.w	$FB0C
	dc.w	$CFD
	dc.w	$37FB
	dc.w	$60C
	dc.w	$18FB
	dc.w	$C0C
	dc.w	$FB06
	dc.w	$C18
	dc.w	$FB0C
	dc.w	$FD37
	dc.w	$FB06
	dc.w	$C18
	dc.b	$FF
lbB002007	dc.b	$FB
	dc.w	$60C
	dc.w	$18FB
	dc.w	$C0C
	dc.w	$FD37
	dc.w	$FB06
	dc.w	$C18
	dc.w	$FB0C
	dc.w	$BFB
	dc.w	$60B
	dc.w	$17FB
	dc.w	$CFD
	dc.w	$37FB
	dc.w	$60B
	dc.w	$17FF
lbW002024	dc.w	$FB3C
	dc.w	$24FB
	dc.w	$C29
	dc.w	$2724
	dc.w	$2224
	dc.w	$FB24
	dc.w	$1DFB
	dc.w	$C1D
	dc.w	$FB06
	dc.w	$2022
	dc.w	$FB18
	dc.w	$1DFB
	dc.w	$C1D
	dc.w	$FB06
	dc.w	$2022
	dc.w	$FB48
	dc.w	$1DFB
	dc.w	$C1B
	dc.w	$1D20
	dc.w	$1D1B
	dc.w	$181D
	dc.b	$FF
lbB00204F	dc.b	$FB
	dc.w	$C1D
	dc.w	$1FFB
	dc.w	$2418
	dc.w	$FB18
	dc.w	$1AFB
	dc.w	$3C1B
	dc.w	$FB12
	dc.w	$201F
	dc.w	$FB24
	dc.w	$1DFB
	dc.w	$C1A
	dc.w	$FB18
	dc.w	$1DFB
	dc.w	$241F
	dc.w	$FB30
	dc.w	$20FB
	dc.w	$C1F
	dc.w	$1D1C
	dc.w	$18FF
lbW002076	dc.w	$FB0C
	dc.w	$1111
	dc.w	$FB01
	dc.w	$1D21
	dc.w	$2429
	dc.w	$1D21
	dc.w	$2429
	dc.w	$1D21
	dc.w	$2429
	dc.w	$1D21
	dc.w	$2429
	dc.w	$1D21
	dc.w	$2429
	dc.w	$1D21
	dc.w	$2429
	dc.w	$FB0C
	dc.w	$1313
	dc.w	$FB01
	dc.w	$1F23
	dc.w	$262B
	dc.w	$1F23
	dc.w	$262B
	dc.w	$1F23
	dc.w	$262B
	dc.w	$1F23
	dc.w	$262B
	dc.w	$1F23
	dc.w	$262B
	dc.w	$1F23
	dc.w	$262B
	dc.w	$FB0C
	dc.w	$1414
	dc.w	$FB01
	dc.w	$2024
	dc.w	$272C
	dc.w	$2024
	dc.w	$272C
	dc.w	$2024
	dc.w	$272C
	dc.w	$2024
	dc.w	$272C
	dc.w	$2024
	dc.w	$272C
	dc.w	$2024
	dc.w	$272C
	dc.w	$FB0C
	dc.w	$1515
	dc.w	$FB01
	dc.w	$2125
	dc.w	$282D
	dc.w	$2125
	dc.w	$282D
	dc.w	$2125
	dc.w	$282D
	dc.w	$2125
	dc.w	$282D
	dc.w	$2125
	dc.w	$282D
	dc.w	$2125
	dc.w	$282D
	dc.b	$FF
lbB0020EF	dc.b	$FB
	dc.w	$1818
	dc.w	$1A17
	dc.w	$1318
	dc.w	$1AFB
	dc.w	$3015
	dc.b	$FF
lbB0020FB	dc.b	$FB
	dc.w	$C30
	dc.w	$292D
	dc.w	$302F
	dc.w	$2B2F
	dc.w	$3230
	dc.w	$2C30
	dc.w	$33FB
	dc.w	$1834
	dc.w	$28FF

InitSamples

;lbC00277A	MOVE.W	#$40,D0

	move.w	#$33,D0				; fix

	LEA	Buffer,A0
	LEA	lbW0027DC,A1
lbC00278A	MOVE.W	(A1)+,(A0)+
	DBRA	D0,lbC00278A
	MOVE.W	#2,D7
	LEA	$DFF000,A6
lbC00279A	MOVE.L	#Buffer,$A0(A6)
	MOVE.W	#4,$A4(A6)
	CLR.W	$A8(A6)
	ADDA.L	#$10,A6
	DBRA	D7,lbC00279A
	MOVE.L	#Buffer+8,$A0(A6)
	MOVE.W	#$30,$A4(A6)
	CLR.W	$A8(A6)
	LEA	$DFF000,A6
	MOVE.W	#$FF,$9E(A6)
	MOVE.W	#$8009,$96(A6)
	RTS

lbW0027DC	dc.w	$5A
	dc.w	$7F5A
	dc.w	$A6
	dc.w	$81A6
	dc.w	$5E27
	dc.w	$6AB5
	dc.w	$D426
	dc.w	$B919
	dc.w	$1B91
	dc.w	$BBBA
	dc.w	$C778
	dc.w	$41B9
	dc.w	$26AC
	dc.w	$7834
	dc.w	$285D
	dc.w	$341B
	dc.w	$AD5C
	dc.w	$8340
	dc.w	$D785
	dc.w	$F1A1
	dc.w	$AF1A
	dc.w	$F0F0
	dc.w	$E342
	dc.w	$7AF2
	dc.w	$850E
	dc.w	$4287
	dc.w	$936D
	dc.w	$87AF
	dc.w	$E5F
	dc.w	$286B
	dc.w	$E5E4
	dc.w	$36CA
	dc.w	$1A1C
	dc.w	$A1CB
	dc.w	$CBD8
	dc.w	$7941
	dc.w	$C936
	dc.w	$BD79
	dc.w	$3428
	dc.w	$5E34
	dc.w	$1CBD
	dc.w	$6C93
	dc.w	$50D6
	dc.w	$D785
	dc.w	$F1A1
	dc.w	$AF1A
	dc.w	$F0F0
	dc.w	$E342
	dc.w	$7AF2
	dc.w	$850E
	dc.w	$4287
	dc.w	$936D

Buffer
	ds.b	104
WO_End