Tempo 160

Int SNAREINIT=0
Int CYMINIT=0
Int SYMINIT=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 Vibrate(delay1, depth1, delay2, depth2, delay3, depth3, delay4, depth4, delay5, depth5) {
	Int	NowTime;
	NowTime = Time;
	IF(delay1=0) {
		Modulation(depth1)
	} ELSE {
		Modulation.onNoteWave(0, 0, delay1 /2, 0, depth1, delay1/2)
		IF(delay2<>0) {
			Time=NowTime+delay1
			Modulation.onNoteWave(depth1, depth2, delay2)
			IF(delay3<>0) {
				Time=NowTime+delay1+delay2
				Modulation.onNoteWave(depth2, depth3, delay3)
				IF(delay4<>0) {
					Time=NowTime+delay1+delay2+delay3
					Modulation.onNoteWave(depth3, depth4, delay4)
					IF(delay5<>0) {
						Time=NowTime+delay1+delay2+delay3+delay4
						Modulation.onNoteWave(depth4, depth5, delay5)
					}
				}
			}
		}
	}
	Time=NowTime
}

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


TR(1)
	@(Violin)
	>
	q99
	l12
	v127d#v120dc#
	v127dv120c#c
	<
	Vibrate(!4,127)
	v127b1^1

TR(2)
	@(Violin)
	v120q99
	l4
	'fa'
	'd#g#'
	Vibrate(!4,127)

	'c1^1f#1^1'


TR(9)
	@(Violin)
	v125q99
	l4
	'fa'
	'd#g#'
	Vibrate(!4,127)

	'c1^1f#1^1'

TR(8)
	@(Contrabass)
	v125q99
	o3
	l4
	e-
	Vibrate(!2,20)
	d-1^1


TR(10)
	$b{n(Kick1),}
	$s{n(Snare()),}
	$h{n(ClosedHiHat),}
	$o{n(OpenHiHat),}
	$c{n(Cymbal()),}
	$C{n(Symbal()),}
	$t{n(HighTom1),}
	$m{n(MidTom1),}
	$l{n(MidTom2),}
	$f{n(LowTom1),}
	$r{n(RideCymbal1),}
	l4

	Rythm{
		['bsoc']
	}

		Rythm {
			o9o10o11o12o13o14o15o16o17o18o19o20o21o22o21o20o19o18o17o16o15o14o13o12o11o10o...(続く)...