.include "MPlayDef.s"



	.equ	s_get_CRYSTAL_Red_grp, voicegroup001

	.equ	s_get_CRYSTAL_Red_pri, 100

	.equ	s_get_CRYSTAL_Red_rev, 0

	.equ	s_get_CRYSTAL_Red_mvl, 70

	.equ	s_get_CRYSTAL_Red_key, 0

	.equ	s_get_CRYSTAL_Red_tbs, 1

	.equ	s_get_CRYSTAL_Red_exg, 0

	.equ	s_get_CRYSTAL_Red_cmp, 1



	.section .rodata

	.global	s_get_CRYSTAL_Red

	.align	2



@**************** Track 1 (Midi-Chn.1) ****************@



s_get_CRYSTAL_Red_1:

	.byte	KEYSH , s_get_CRYSTAL_Red_key+0

@ 000   ----------------------------------------

	.byte	TEMPO , 150*s_get_CRYSTAL_Red_tbs/2

	.byte		VOICE , 13

	.byte		VOL   , 127*s_get_CRYSTAL_Red_mvl/mxv

	.byte		PAN   , c_v+0

	.byte		N01   , Cn4 , v100

	.byte	W02

	.byte		        Cn5 

	.byte	W01

	.byte		        Cn4 , v032

	.byte	W02

	.byte		        Cn5 

	.byte	W01

	.byte		        Fn4 , v100

	.byte	W02

	.byte		        Fn5 

	.byte	W01

	.byte		        Fn4 , v032

	.byte	W02

	.byte		        Fn5 

	.byte	W01

	.byte		        An4 , v100

	.byte	W02

	.byte		        An5 

	.byte	W01

	.byte		        An4 , v032

	.byte	W02

	.byte		        An5 

	.byte	W01

	.byte		        Gn4 , v100

	.byte	W02

	.byte		        Gn5 

	.byte	W01

	.byte		        Gn4 , v032

	.byte	W02

	.byte		        Gn5 

	.byte	W01

	.byte		N02   , Cn4 , v080

	.byte	W02

	.byte		        Cn5 

	.byte	W02

	.byte		        Cn4 , v032

	.byte	W02

	.byte		        Cn5 

	.byte	W02

	.byte		        Fn4 , v040

	.byte	W02

	.byte		        Fn5 

	.byte	W02

	.byte		        Fn4 , v020

	.byte	W02

	.byte		        Fn5 

	.byte	W02

	.byte		PAN   , c_v+30

	.byte		N02   , Cn5 , v040

	.byte	W02

	.byte		        Cn6 

	.byte	W02

	.byte		        Cn5 , v020

	.byte	W02

	.byte		        Cn6 

	.byte	W04

	.byte		PAN   , c_v-40

	.byte	W01

	.byte		N02   , Cn5 , v012

	.byte	W02

	.byte		        Cn6 

	.byte	W01

	.byte		PAN   , c_v+1

	.byte	W01

	.byte		N02   , Cn5 

	.byte	W02

	.byte		        Cn6 

	.byte	W02

	.byte	FINE



@******************************************************@

	.align	2



s_get_CRYSTAL_Red:

	.byte	1	@ NumTrks

	.byte	0	@ NumBlks

	.byte	s_get_CRYSTAL_Red_pri	@ Priority

	.byte	s_get_CRYSTAL_Red_rev	@ Reverb.



	.word	s_get_CRYSTAL_Red_grp



	.word	s_get_CRYSTAL_Red_1



	.end