// ↓どっちかを1にしてなの;;ぐすぐす;;
Int SENTO=0
Int SHORI=0

IF(SENTO=1) {
	Tempo 240
	Int CYMINIT=0
	Int LOOP=4

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

	Function Snare() {
		Int CC
		IF(TIMIDITY=0) {
			CC=Snare1
		} ELSE {
			IF(SNAREINIT=0) {
				CC=Snare1
				SNAREINIT=1
			} ELSE {
					CC=Snare2
				SNAREINIT=0
			}
		}
		Result=CC
	}

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

	Function Symbal() {
		Int CC
		IF(CYMINIT=0) {
			CC=62
			CYMINIT=1
		} ELSE {
			CC=61
			CYMINIT=0
		}
		Result=CC
	}

	Function RandV(Int MIN, Int MAX) {
		Str MML="v"
		MML=MML+Random(MIN,MAX)
		MML
	}

	#melody1={
		l4
		[
			g4.a4.b-
			>d2.c#8d8
			c#1.r2<
		]
		[
			>d4.e4.f
			a2.g#8a8
			g#1.r2<
		]
		[4 r1]
	}
	Int VV
	#melody2={
		[
			r1r1
			l8
			VV=80
			r2l10
			Sub{[5 VV=VV+2 RandV(VV-10,VV) 'c#eg']}r2
			Sub{[5 VV=VV+2 RandV(VV-10,VV) 'ega#']}r2
			Sub{[5 VV=VV+2 RandV(VV-10,VV) 'ga#>c#<']}r2
		]
		[
			r1r1
			VV=85
			r2l10
			Sub{[5 VV=VV+2 RandV(VV-10,VV) 'g#b>d<']}r2
			Sub{[5 VV=VV+2 RandV(VV-10,VV) 'b>df<']}r2
			Sub{[5 VV=VV+2 RandV(VV-10,VV) '>dfg#<']}r2
		]
		l8
		[4 'f#a>cf<'] r 'f#4.a4.>c4.f4.<'
		[4 'fa-b>e<'] r 'f4.a-4.b4.>e4.<'
		[4 'egb->e-<'] r 'e4.g4.b-.>e-4.<'
		[4 'e-f#a>d<'] r 'e-4.f#4.a.>d4.<'

	}

	TR(1)
		#tr1={
			@(Oboe)
			q95v127
			[#melody1]
		}
		LoopPlay(#tr1)

	TR(2)
		r-48
		#tr2={
			@(Violin)
			q75v90
			[#melody2]
		}
		LoopPlay(#tr2)

	TR(8)
		r-14
		#tr8={
			@(Strings1)
			[
				o4q99v80
				l1
				[
					'g^b-^>d^<'
					'g^b-^>c#^e^<'
				]
				>
				[
					'd^f^a^'
					'd^f^g#^b^'
				]

				<
				l1
				'f#a>cf<'
				'fa-b>e<'
				'egb->e-<'
				'e-f#a>d<'
			]
		}
		LoopPlay(#tr8)

	TR(9)
		LoopPlay(
			音色(...(続く)...