//////////////////////////////////////////////////////////////
// LAND.BGM
// Original : http://www.nicovideo.jp/watch/sm24607117
// Compose 1989/??/??
// Start 2014/11/18 00:35
// End   2014/11/18 05:16
//////////////////////////////////////////////////////////////
// 下の方に、MSXで動くMuSICA用、MSX-BASIC用のソースがあります
// BlueMSX等でどうぞ
//////////////////////////////////////////////////////////////

Tempo 130
Int LOOP=3
Key(0)

曲名={"Baby's 南青山ゲームプロジェクト フィールド用BGM Fight And Fight!!"}
作者={"なの"}

Function LoopPlay(Str Mml) {
	Str _MML
	For (Int i = 1; i <= LOOP; i++) {
		_MML=_MML + #STR(Mml)
	}
	_MML
}

Int CYMINIT=0
Function Cymbal() {
	Int CC
	IF(CYMINIT=0) {
		CC=CrashCymbal1
		CYMINIT=1
	} ELSE {
		CC=CrashCymbal2
		CYMINIT=0
	}
	Result=CC
}

#melody1={
	l4
	拍子 4,4
	gcdd6a12
	g2c4c12d12e12
	f4.e8d4.<b-8>
	c2.r4
	gcdd6a12
	g2r4g12g12a12
	b-1.^4
	r4

	l4
	>c<fgg6>d12
	拍子 3,4
	c2 c12c12d12
	拍子 4,4
	e-<a-b-b-6>f12
	拍子 3,4
	e-2 e-12e-12f12
	拍子 4,4
	f#<b>c#c#6g#12
	q100f#1^1
	拍子 6,4
	q98g1^4r4
	拍子 4,4
}

#melody2={
	l4
	拍子 4,4
	gcdd6a12
	g2c4c12d12e12
	f4.e8d4.<b-8>
	c2.r4
	gcdd6a12
	g2r4g12g12a12
	b-1.^4
	r4

	l4
	拍子 6,4
	acff12g12a12
	g6<b12>e6r12
	f<a>d d12e12f12
	e4.r8
	拍子 4,4
	f<a>d d12e12f12
	e4.<g8 b b12>c#12d#12

	l12
	[e4^ee]
	e2.^8r8
	[d4^dd]
	d2.^8r8
	[c4^cc]
	c2.^8r8
	<
	[b4^bb]
	b2.^8r8
}

#melody31={
	l12
	b4e4a4ab>c#<
	b4.e8f#4f#8g#8
	a4.a16g#16 f#4.e16d16
	e2.r4

	b4e4a4ab>c#<
	b2 r4bb>c#
	d1.r2
	拍子 5,4
	c#4<e4a4ab>c#<b8.r16
	a4d#4f#4f#g#a g#8.r16
	拍子 6,4
	f#4<a#4>c#4c#d#e d#4b8.r16
	拍子 4,4
}

#melody32={
	l12
	g#4<b4>c#4c#ea
	g#4.<b8>d4d8e8
	f#4.f#16e16 d4. d16c#16<
	b2.r4>

	g#4<b4>c#4c#ea
	g#2 r4g#g#a
	b2a2g#2r2

	a4c#4 c#4c#ea g#8.r16
	f#4<b4>d#4d#ef# e8.r16
	c#4<r4 a#4 a#b>c# <b4>d#8.r16
}

#melody41={
	l12
	b2e2>
	c#2.c#<ba
	b6g#e4 >e4ed#c#<
	b2r2>
	g#2c#2
	d#2.d#6a#
	g#6e#6c#6 d#4d#6...(続く)...