/*************************************************************************
/*	[A] part
/*************************************************************************

#ifdef	_CP15_A
#	include	"comp15.h"
#	include	"cp15_ini.mml"
CTRL(1)		= $TEMPO()
#define	_A_1ST
#define	_A_2ND
#define	_A_3RD
#endif

/*************************************************************************
/*------------------------------------------------------------------------
#ifdef	_A_1ST
System(11)	= $_PR_A()
#endif
#ifdef	_A_2ND
System(11)	= $_PR_A()
#	$V	v'+6
#else
#	$V
#endif
#$A		l8!16$slide(g64,u,4,&,sqr,-520,0)&g16&g&gd{g&ga}4/3 !12$slide(b-64,u,8,&,sqr,-400,0)&b-8
#$B		>!13$slide(c64,u,8,&,sqr,-340,0)&c&c4&c<b-!13a4
MelodyA(21)	= $MelodyA() $V() $A()	$B()
MelodyB(21)	= $MelodyB() $V() $A()	$B()
MelodyC(21)	= $MelodyC() $V() $A()	$B()

#ifdef	_A_2ND
BGuitarB(11)= $BGuitarB2$()	v'-9 d2g2	a2>c2<
#endif

CodeA(21)	= $CodeA()  g1		 f1
CodeA(22)	= $CodeA()  d1		 c1
CodeA(23)	= $CodeA() <b-1>	<a1>

PianoA(21)	= $PianoA() l8 g 8.g 16rr{rg }/2rg 4	 f8.f16rr{rf}/2rf4
PianoA(22)	= $PianoA() l8 d 8.d 16rr{rd }/2rd 4	 c8.c16rr{rc}/2rc4
PianoA(23)	= $PianoA() l8<b-8.b-16rr{rb-}/2rb-4>	<a8.a16rr{ra}/2ra4>
PianoB(21)	= $PianoB() l8>r4 {gab-}4/3 r2			 r4 {fga}4/3 r2

#$A			l16 !13gb-g>!15d<gb-ag{!13g!14b-g}8/3>!18g<!14gg!15b-ag
#$B			l16 !13faf>!16c<faea{faf}8/3>!18f<ffafa
BassA(21)	= $BassA() $A()	$B()
BassB(21)	= $BassB() $A()	$B()

Rym(21)		= *(A001)	*(A002)

.meas
.meas

/*------------------------------------------------------------------------
#$A		!14g!12a&af!13ed&d&d	{c&m10c&m20c&c&c&c&c&c}1/8 m0
#$B		r1		r2r4$slide(r64,x,8,,x^2,127,64) x127
MelodyA(21)	= $A()
MelodyB(21)	= $A()
MelodyC(21)	= $A()
MelodyA(11)	= $B()
MelodyB(11)	= $B()
MelodyC(11)	= $B()
#ifdef	_A_2ND
BGuitarB(11)= d2b-2	a2>f2<
#endif

CodeA(21)	=  g1		 f1
CodeA(22)	=  d1		 c1
CodeA(23)	= <b-1>		<a1>

PianoA(21)	=  g 8.g 16rr{rg }/2rg 4	 f8.f16rr{rf}/2rf4
PianoA(22)	=  d 8.d 16rr{rd }/2rd 4	 c8.c16rr{rc}/2rc4
PianoA(23)	= <b-8.b-16rr{rb-}/2rb-4>	<a8.a16rr{ra}/2ra4>
PianoB(21)	= l8 r4 {gab-}4/3 r2		 r4 {fga}4/3 r2

#$A			l16 gb-g>!15d<gb-ag{gb-g}8/3>!18g<ggb-ag
#$B			l16 faf>!15c<faea{faf}8/3>!19f<ffafa
BassA(21)	= $A()	$B()
BassB(21)	= $A()	$B()

Rym(21)		= *(A002)	*(A003)

.meas
.meas

/*------------------------------------------------------------------------

#$A		l8 !14$slide(g64,u,4,&,sqr,-480,0)&g16&g&gd{g&ga}4/3 !12$slide(b-64,u,8,&,sqr,-300,0)&b-8
#$B		  >!13$slide(c64,u,8,&,sqr,-320,0)&c&c4!12f4.e
MelodyA(21)	= $A()	$B()
MelodyB(21)	= $A()	$B()
MelodyC(21)	= $A()	$B()
#ifdef	_A_2ND
BGuitarB(11)= l8 g4.d>d2<	a2f2
#endif

CodeA(21)	=  g1		 f1
CodeA(22)	=  d1		 c1
CodeA(23)	= <b-1>		<a1>

PianoA(21)	= l8  g 8.g 16rr{rg }/2rg 4		 f8.f16rr{rf}/2rf4
PianoA(22)	= l8  d 8.d 16rr{rd }/2rd 4		 c8.c16rr{rc}/2rc4
PianoA(23)	= l8 <b-8.b-16rr{rb-}/2rb-4>	<a8.a16rr{ra}/2ra4>
PianoB(21)	= l8 r4 {gab-}4/3 r2			r4 {fga}4/3 r2

#$A			l16 gb-g>!14d<gb-ag{gb-g}8/3>!18g<ggb-ag
#$B			l16 faf>!15c<faea{faf}8/3>!18f<ffafa
BassA(21)	= $A()	$B()
BassB(21)	= $A()	$B()

Rym(21)		= *(A001)	*(A002)

.meas
.meas

/*------------------------------------------------------------------------
#$A		d{!12ed&}/2{d&m10d&}4/2m20d2m0
#$B		$slide(c64,u,8,&,sqr,-320,0)&m10c8&m20c4&m32c2	m0
#$C		r1		{x127rx125rx123rx121rx118}8/4r8r4r4$slide(r64,x,8,,x^2,118,32) x127
MelodyA(21)	= $A()	$B()
MelodyB(21)	= $A()	$B()
MelodyC(21)	= $A()	$B()
MelodyA(11)	= $C()
MelodyB(11)	= $C()
MelodyC(11)	= $C()
#ifdef	_A_2ND
BGuitarB(11)= b-2>g2<	a2>f2<
#endif

CodeA(21)	=  g1 	 f1
CodeA(22)	=  d1 	 c1
CodeA(23)	= <b-1>	<a1>

PianoA(21)	=  g 8.g 16rr{rg }/2rg 4	 f8.f16rr{rf}/2rf4
PianoA(22)	=  d 8.d 16rr{rd }/2rd 4	 c8.c16rr{rc}/2rc4
PianoA(23)	= <b-8.b-16rr{rb-}/2rb-4>	<a8.a16rr{ra}/2ra4>
PianoB(21)	= r4 {gab-}4/3 r2			r4 {fga}4/3 r2

#$A			l16 gb-g>!15d<gb-ag{gb-g}8/3>!17g<ggb-ag
#$B			faf>!15c<faea{faf}8/3>!19f<ffafa
BassA(21)	= $A()	$B()
BassB(21)	= $A()	$B()

Rym(21)		= *(A002)	*(A004)

.meas
#ifdef	_A_2ND
#	include	"synth1.ini"
#endif
.meas
/*------------------------------------------------------------------------
#undef	_A_1ST
#undef	_A_2ND
/*------------------------------------------------------------------------
#ifdef	_CP15_A
. end
#endif