/*----------------------------------------------------------------------------------------------	
																	
	負け犬だから遠くで叫んだる！	…　	すいません、若干長いです。						
																	
													2013/04/06　木村		
----------------------------------------------------------------------------------------------*/	

/*初期設定*/

v.Max(100)
KeyFlag=( 0,-1, 0, 0, 0, 0, 0)	//b-をbで表す
//Bass		Snare			closedHiHat		openHiHat		crashcymbal		ridecymbal		Stick
$b={n36,}		$s={n38,}		$c={n42,}		$o={n46,}		$C={n49,}		$R={n51,}		$S={n31,}

/*曲データ*/

Str fg01={l8			a>dfa^gfd<	b>dfb^fd^<	b>egb^gec<	a>cfa^g^^<		}
Str fg02={l8			>a>dfa^gfd<	b>dfb^fd^<	b>egb^gec<	a>cfa^g^^<<		}
Str fg03={l8			>a>dfa^gfd<	b>dfb^d^^<	b>egb^gec	d^^^e^^^<<		}
Str cd01={l1			'dfa'		'gbd'		'cegb'	l2'fac''ceg'	}//	Dm Gm C F C
Str bs01={l8			d^^^^^d^	d^^^^^d^	c^^^^^c^	c^^^^^c^		}
Str dm01={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrr	Crrrrrrr		}}
		Sub{l8Rhythm{v100	rrrrrrrr	rrorrrcr	rrrrrccr	rrcccccr		}}
			Rhythm{v100	rrrrrrrr	rrrrrrrr	brrrrrrr	brrsbsbr		}}
Str gt01={t.N(0,1,3,6,10,15)										}

Str eg61={l8			f^^g^^a^	g^^^^^^r	b^^b^^a^	a^^^^r^^	}Str eg11=eg61+{l-1rrrr>}+eg61+{<}
Str eg62={l8			f^^g^^a^	g^^g^f^^	eeee^ef^	f^^^^rrr	}Str eg12=eg62+{l-1rrrr>}+eg62+{<}
Str eg63={l8			f^^g^^a^	b^^^b^^^	>c^^c^^<b^	b^^^a^^^	}Str eg13=eg63+{l-1rrrr>}+eg63+{<}
Str eg64={l8			f^^g^^a^	g^^g^f^^	ee^e^ef^	f^^^^rrr	}Str eg14=eg64+{l-1rrrr>}+eg64+{<}
Str dg13={l8			e^^^^^^^	^^^^^^^^	f^^^^^^^	^^^^^^^^	}
Str dg14={l8			e^^f^^g^	^^^^^^^^	f^^^^^^^	^^^^^^^^	}
Str dg17={l8			f^^^^^^^	^^^^^^^^	g^^^^^^^	^^^^e^^^	}
Str dg18={l8			f^^^^^^^	^^^^^^^^	r^^^^^^^	^^^^^^^^	}
Str fg12={l8			>>r1		rrrrrgfe	^^^^^^gf	^^^^^^^^<<	}
Str fg13={l8			>>r1		rrrrrgfe	^^^^^fga	^^^fga^^<<	}
Str fg14={l8			>>rrrrragf	^^^^^gfe	^^^^^^gf	^^^^^^^^<<	}
Str fg17={l8			>>r1		rrrrrefg	^^^^^rrr	^^^rrr^^<<	}
Str fg18={l8			>r1		r^^^rrr^	r^^^^^^^	rrrrrrrr<	}
Str cd12={l1			'dfa'		'gbd'		'cegb'	'fac'		}//	Dm Gm C F
Str bs11={l8			d^d^dd^d	d^d^dd^d	c^c^cc^c	c^c^cc^c	}
Str dm11={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrr	Crrrrrrr	}}
		Sub{l8Rhythm{v100	rrorrccr	rrorrccr	rrorrccr	rrcccccr	}}
			Rhythm{v100	brrbsrbr	brrbsbbr	brrbsrbr	brrbsbbr	}}
Str dm12={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrC	rrrrrrrr	}}
		Sub{l8Rhythm{v100	rrorrccr	rrorrccr	rrorrccr	orcccccr	}}
			Rhythm{v100	brrbsrbr	brrbsbbr	brrbsrbr	bbrbsbbb	}}
Str dm14={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrr	Crrrrrrr	}}
		Sub{l8Rhythm{v100	rrorrccr	rrorrccr	rrorrocr	rrcccccr	}}
			Rhythm{v100	brrbsrbr	brrbsbbr	bbrbsrbb	bsbbsbbb	}}
Str dm15={	l8	Rhythm{v100	cccccccc	cccccccc	cccccccc	cccccccc	}}
Str dm16={	l8	Rhythm{v100	cccccccc	cccccccc	Cccccccc	ccccoscc	}}
Str dm17={	Sub{l8Rhythm{v100	Crrrrrrr	rrrrrrrr	rrrrrrrr	rrrrrrrr	}}
		Sub{l8Rhythm{v100	cccccccc	cccccccc	cccccccc	cccccccc	}}
			Rhythm{v100	brrrrrrr	brrrrrrr	brrrrrrr	brrrsrbb	}}
Str dm18={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrr	Crrrrrrr	}}
		Sub{l8Rhythm{v100	cccccccc	ccorrccr	ccorrocr	rrcccccr	}}
			Rhythm{v100	brrbsrbr	brrbsrbr	bbrbsrbb	bsbbsbbb	}}
Str dm19={	Sub{l8Rhythm{v100	rrrrrrrr	rrrrrrrr	rrrrrrrr	Crrrrrrr	}}
		Sub{l8Rhythm{v100	rrorrccr	rrorrccr	rrorrccr	rrrrrrrr	}}
			Rhythm{v100	brrbsrbr	brrbsbbr	brrbsrbr	brrrrrrr	}}
Str gt11={	l4.'dfa>dfa<'l4'dfa>dfa<'l4.'dfa>dfa<'					
		l4.'dgb>dgb<'l2'dgb>dgb<'r8							
		l8'ceg>ceg<'l8'>gec<gec'l2'ceg>ceg<'l4'ceg>ceg<'			
		l2'>afc<afc''ceg>ceg<'								}
Str gt12={	l4.'dfa>dfa<'l4'dfa>dfa<'l4.'>afd<afd'					
		l4.'dgb>dgb<'l4'dgb>dgb<'l4.'>bgd<bgd'					
		l8'ceg>ceg<'l8'>gec<gec'l4'ceg>ceg<'l4'ceg>ceg<'l8'ceg>ceg<'	
		l1'cfa>cfa<'r8									}
Str gt13={	l4.'dfa>dfa<'l4'dfa>dfa<'l4.'dfa>dfa<'					
		l4.'dgb>dgb<'l2'dgb>dgb<'r8							
		l8'ceg>ceg<'l8'>gec<gec'l2'ceg>ceg<'l4'ceg>ceg<'			
		l2'cfa>cfa<''ceg>ceg<'								}
Str gt15={l1'dfa>dfa<'	'dgb>dgb<'	'ceg>ceg<'	l2'cfa>cfa<''ceg>ceg<'		}
Str gt16={l1'dfa>dfa<'	'dgb>dgb<'	'ceg>ceg<'	'cfa>cfa<'				}

Str mn21={l8			d^dd^cc^	^^^rrrrr	<b^bb^>cc^	^^^rrrrr	}
Str mn22={l8			e^de^fe^	^^^rrrrr	f^ff^ff^	^^^rrrrr	}
Str mn23={l8			d^ef^fe^	^^^rrrrr	c^cc^<bb^	^^^^a^^^>	}
Str mn24={l8			f^ef^ag^	^^^rrrrr	a^aa^af^	^^^rrrrr	}
Str dg23={l8			e^^^^^^^	^^^^^^^^	^^^^^^^^	^^^^^^^^	}
Str fg23={l8			>>r1		rrrrrefg	^^^^^ega	^^^fga^^<<	}

Str gt30={l1			['ceg>ceg<']	}
Str cd30={l1			['cegb']		}//	C
Str bs30={l8			[e^e^e^c^]		}
Str dm30={	Sub{l8Rhythm{v100	[Crrrrrrr]		}}
		Sub{l8Rhythm{v100	[rrcccccc]		}}
			Rhythm{v100	[brrrsrbr]		}}

Str mn31={l8			f^^^^da^	^^^^e^cd		^^^^^^rr	rrrra^^^	}
Str mn32={l8			a^^a^a^^	g^gg^^ff		^^^^^^^^	rrrrrrrr	}
Str mn34={l8			b^^b^b^^	a^aa^^gf		^^^^^^^^	rrrrrrrr	}
Str eg81={l8			dd^^^^e^	^^^^f^^^		a^^^^^g^	^^^^fe^^	}Str eg31=eg81+{l-1rrrr>}+eg81+{<}	
Str eg82={l8			f^^^^^^^	g^^^^^ff		^^^^^^^^	r^^^^^^^	}Str eg32=eg82+{l-1rrrr>}+eg82+{<}	
Str eg83={l8			d^^d^^e^	^^^^f^^^		a^^^^^g^	^^^^fe^^	}Str eg33=eg83+{l-1rrrr>}+eg83+{<}	
Str eg84={l8			f^^^f^^^	g^^g^^ff		^^^^^^^^	r^^^^^^^	}Str eg34=eg84+{l-1rrrr>}+eg84+{<}	
Str eg85={l8			a>cd^fe^^	^^^^^dcd		^^^^^c<b>c	^<bab^ag^	}Str eg35=eg85+{l-1rrrr>}+eg85+{<}	
Str eg86={l8			b^^^a^^^	a^gg^^ff		^^^^^^^^	rrrrrrrr	}Str eg36=eg86+{l-1rrrr>}+eg86+{<}	
Str eg87={l8			b^^^>c^^^	c^de^^g		f1.		<rrrrr	}Str eg37=eg87+{l-1rrrr>}+eg87+{<}	
Str eg88={l8			b^^^>c^^^	c^de^^g												
					V.T(100,100,!1,100,70,!2)	'f1.a1.'	<rrrrr	}Str eg38=eg88+{l-1rrrr>}+eg88+{<}	
Str dg31={l8			r^^^^^^^	^^^^^^^^		f^^^^^^^	^^^^b^^^	}
Str dg32={l8			a^^^^^^^	^^^^^^^^		a^^^^^^^	^^^^^^^^	}
Str dg38={l8			r^^^^^^^	^^^^^^^^		d^^^^^^^^	^^^^^^^^1	}
Str fg31={l8		>>	d^^dfa^^	c^^cea^^		c^^cfa^^	c^^cegbg<<	}
Str fg32={l8		>>	d^^dfa^^	c^^ceg^^		d^^dfa^^	c^^cegbg<<	}
Str fg33={l8		>>	d^^dfa^^	c^^ce^^^		d^^dfa^^	d^^dfa^^<<	}
Str fg39={l8		>>	d^^dfa^^	c^^ce^^^		d^^dfa^^	d^^^^^^^<<	}
Str cd31={l1			'dfa'		'ace'			'fac'		'cegb'	}//	Dm Am F C
Str cd32={l1			'bdf'		'cegb'		'dfa'		'cegb'	}//	Bb C Dm C
Str cd33={l1			'bdf'		l2.'cegb'l4'dfa'	l1'dfa'	'dfa'		}//	Bb C Dm Dm
Str bs31={l8			d^d^dd^d	<a^a^aa^a>		c^c^cc^c	e^e^ee^c	}
Str bs32={l8			d^d^dd^d	c^c^cc^c		d^d^dd^d	e^e^ee^c	}
Str bs33={l8			d^d^dd^d	c^c^cc^d		d^d^dd^d	d^d^dddd	}
Str bs39={l8			d^d^dd^d	c^c^cc^d		d^d^dd^d	d^^^^^^^	}
Str gt31={l1			'dfa>dfa<'	'cea>cea<'		'cfa>cfa<'	'ceg>ceg<'	}
Str gt32={l1			'dfb>dfb<'	'ceg>ceg<'		'dfa>dfa<'	'ceg>ceg<'	}
Str gt33={l1			'dfb>dfb<'	l2.'ceg>ceg<'l8'dfa>dfa<'l1'>afd<afd'r8	}

Str mn41={l8			d^ef^fe^	^^^rrrrr	c^cc^<bb^	^^^^r^^^>	}
Str mn42={l8			f^ff^ee^	^^^rrrrr	f^^f^ff^	^^^rrrrr	}
Str mn44={l8			f^ef^ag^	^^^rrrrr					}
Str mn45={l8			a^aa^aa^	^^^rrrrr					}
Str dg43={l8			f^^^^^^^	^^^^^^^^	g^^^^^^^	^^^^e^^^	}
Str dg44={l8			f^^^^^^^	^^^^^^^^	r^^^^^^^	^^^^^^^^	}
Str fg43={l8		>>	r^^^cefa	^^ba^gfe	^^cdefga	^^ba^e^^<<	}
Str eg90={l8			r^^^^^^^	rrrrrrrr	e^^^^^^^	f^^^^^^r	}Str eg40=eg90+{l-1rrrr>}+eg90+{<}
Str eg91={l8			f^ef^gab	^^ag^f^^	e^de^f^a	^^g^f^^r	}Str eg41=eg91+{l-1rrrr>}+eg91+{<}
Str eg92={l8			dd^d^dab	^^^b>cd^r	f^ef^g^a	^^^r^a^^<	}Str eg42=eg92+{l-1rrrr>}+eg92+{<}
Str eg93={l8		>	a^^^^^^^	gfed^^^r	e^de^f^f	^^^^e^^r<	}Str eg43=eg93+{l-1rrrr>}+eg93+{<}
Str eg94={l8		>	a^^^^b^>c	^^^^d^^r	e^^e^f^f	^^^^^^r^<<	}Str eg44=eg94+{l-1rrrr>}+eg94+{<}
Str bs41={l8			d^d^d^d^	d^d^d^d^	c^c^c^c^	c^c^c^cc	}

Str i01={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(127)	o5p64q095v100	@054	}
Str i02={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(100)	o3p62q100v080t30	@031	}
Str i03={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(100)	o4p65q100v100	@031	}
Str i04={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(100)	o5p66q100v080	@032	}
Str i05={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(100)	o5p63q100v080	@032	}
Str i06={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(000)P(64)V(100)	o3p64q200v100	@026	}
Str i07={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(000)P(64)V(100)	o4p64q100v080	@026	}
Str i08={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(000)P(64)V(100)	o4p64q100v080	@049	}
Str i09={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(000)P(64)V(100)	o3p64q100v100	@035	}
Str i0a={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(000)P(64)V(100)	@PowerSet			}
Str i11={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(127)	o5p68q080v090	@054	}
Str i12={Cresc=0,127,127;t0	CHO(040)REV(040)EP(127)M(127)P(64)V(127)	o5p60q080v090t10	@054	}

//	演奏

Time(   1:1:3)	TimeSignature=4,4;
Time(   1:1:3)	Tempo=155;
Time( 119:1:3)	Tempo=145;
Time( 120:1:3)	Tempo=155;
Time( 165:3:3)	Tempo=130;
Time( 166:3:3)	Tempo=110;
//---------------------------------------------------------------------------------------	
Time(   1:1:3)	Play(	,i01	,i02	,i03	,i04	,i05	,i06	,i07	,i08	,i09	,i0a	)	
Time(   1:1:3)	Play(	,	,	,	,	,	,fg01	,gt01	,cd01	,bs01	,dm01	)	
Time(   5:1:3)	Play(	,	,	,	,	,	,	,gt11	,cd01	,bs11	,dm11	)	
Time(   9:1:3)	Play(	,	,	,	,	,	,fg12	,gt12	,cd12	,bs11	,dm12	)	
Time(  13:1:3)	Play(	,	,	,	,dg13	,dg13	,fg13	,gt13	,cd01	,bs11	,dm11	)	
Time(  17:1:3)	Play(	,	,	,	,dg14	,dg14	,fg14	,gt12	,cd12	,bs11	,dm12	)	
Time(  21:1:3)	Play(	,	,eg11	,eg11	,	,	,	,gt15	,cd01	,bs11	,dm11	)	
Time(  25:1:3)	Play(	,	,eg12	,eg12	,	,	,	,gt16	,cd12	,bs11	,dm11	)	
Time(  29:1:3)	Play(	,	,eg13	,eg13	,dg17	,dg17	,fg17	,gt15	,cd01	,bs11	,dm11	)	
Time(  33:1:3)	Play(	,	,eg14	,eg14	,dg18	,dg18	,	,gt16	,cd12	,bs11	,dm14	)	
Time(  37:1:3)	Play(	,mn21	,	,	,	,	,	,gt15	,cd01	,bs01	,dm11	)	
Time(  41:1:3)	Play(	,mn22	,	,	,	,	,	,gt16	,cd12	,bs01	,dm11	)	
Time(  45:1:3)	Play(	,mn23	,	,	,dg23	,dg23	,fg23	,gt15	,cd01	,bs01	,dm11	)	
Time(  49:1:3)	Play(	,mn24	,	,	,	,	,	,gt16	,cd12	,bs01	,dm11	)	
Time(  53:1:3)	Play(	,	,	,	,	,	,	,gt30	,cd30	,bs30	,dm30	)//2	
Time(  55:1:3)	Play(	,i11	,i12	,	,	,	,	,	,	,	,	)	
Time(  55:1:3)	Play(	,mn31	,mn31	,eg31	,dg31	,dg31	,fg31	,gt31	,cd31	,bs31	,dm11	)	
Time(  59:1:3)	Play(	,mn32	,mn32	,eg32	,dg32	,dg32	,fg32	,gt32	,cd32	,bs32	,dm11	)	
Time(  63:1:3)	Play(	,mn31	,mn31	,eg33	,dg31	,dg31	,fg31	,gt31	,cd31	,bs31	,dm11	)	
Time(  67:1:3)	Play(	,mn34	,mn34	,eg34	,dg32	,dg32	,fg32	,gt32	,cd32	,bs32	,dm11	)	
Time(  71:1:3)	Play(	,	,	,	,	,	,fg33	,gt33	,cd33	,bs33	,dm11	)	
Time(  75:1:3)	Play(	,i01	,i02	,	,	,	,	,	,	,	,	)	
Time(  75:1:3)	Play(	,	,eg35	,eg35	,	,	,	,gt31	,cd31	,bs31	,dm11	)	
Time(  79:1:3)	Play(	,	,eg36	,eg36	,	,	,	,gt32	,cd32	,bs32	,dm11	)	
Time(  83:1:3)	Play(	,	,eg37	,eg37	,	,	,	,gt33	,cd33	,bs33	,dm11	)	
Time(  87:1:3)	Play(	,	,	,	,	,	,fg02	,gt15	,cd01	,bs11	,dm11	)	
Time(  91:1:3)	Play(	,	,	,	,	,	,fg03	,gt15	,cd01	,bs11	,dm11	)	
Time(  95:1:3)	Play(	,mn41	,	,	,	,	,	,gt15	,cd01	,bs11	,dm11	)	
Time(  99:1:3)	Play(	,mn42	,	,	,	,	,	,gt15	,cd01	,bs11	,dm11	)	
Time( 103:1:3)	Play(	,mn41	,	,	,dg43	,dg43	,fg43	,gt15	,cd01	,bs11	,dm11	)	
Time( 107:1:3)	Play(	,mn44	,	,eg40	,dg44	,dg44	,	,gt15	,cd01	,bs11	,dm11	)	
Time( 109:1:3)	Play(	,i11	,i12	,	,	,	,	,	,	,	,	)	
Time( 109:1:3)	Play(	,mn45	,mn45	,	,	,	,	,	,	,	,	)	
Time( 111:1:3)	Play(	,i01	,i02	,	,	,	,	,	,	,	,	)	
Time( 111:1:3)	Play(	,	,eg41	,eg41	,	,	,	,gt15	,cd01	,bs41	,dm15	)	
Time( 115:1:3)	Play(	,	,eg42	,eg42	,	,	,	,gt15	,cd01	,bs41	,dm16	)	
Time( 119:1:3)	Play(	,	,eg43	,eg43	,	,	,	,	,cd01	,bs41	,dm17	)	
Time( 123:1:3)	Play(	,	,eg44	,eg44	,	,	,	,	,cd01	,bs41	,dm18	)	
Time( 127:1:3)	Play(	,i11	,i12	,	,	,	,	,	,	,	,	)	
Time( 127:1:3)	Play(	,mn31	,mn31	,eg31	,dg31	,dg31	,fg31	,gt31	,cd31	,bs31	,dm11	)	
Time( 131:1:3)	Play(	,mn32	,mn32	,eg32	,dg32	,dg32	,fg32	,gt32	,cd32	,bs32	,dm11	)	
Time( 135:1:3)	Play(	,mn31	,mn31	,eg33	,dg31	,dg31	,fg31	,gt31	,cd31	,bs31	,dm11	)	
Time( 139:1:3)	Play(	,mn34	,mn34	,eg34	,dg32	,dg32	,fg32	,gt32	,cd32	,bs32	,dm11	)	
Time( 143:1:3)	Play(	,	,	,	,	,	,fg33	,gt33	,cd33	,bs33	,dm11	)	
Time( 147:1:3)	Play(	,i01	,i02	,	,	,	,	,	,	,	,	)	
Time( 147:1:3)	Play(	,	,eg36	,eg36	,	,	,	,gt32	,cd32	,bs32	,dm11	)	
Time( 151:1:3)	Play(	,	,eg37	,eg37	,	,	,	,gt33	,cd33	,bs33	,dm11	)	
Time( 155:1:3)	Play(	,	,eg36	,eg36	,	,	,	,gt32	,cd32	,bs32	,dm11	)	
Time( 159:1:3)	Play(	,	,eg38	,eg38	,	,	,	,gt33	,cd33	,bs33	,dm11	)	
Time( 163:1:3)	Play(	,	,	,	,dg38	,dg38	,fg39	,gt33	,cd33	,bs39	,dm19	)	
/*
*/
/*------------------------------------------------------------------------------	
------------------------------------------------------------------------------*/	

//	すいません、シャレです。