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 {
			o9o10o11o12o13o14o15o16o17o18o19o20o21o22o21o20o19o18o17o16o15o14o13o12o11o10o9o87o6o5
		}
	r2.
	Expression.onTime(127,127,!2.,127,0,!4)
		Rythm {
			m24t24m24 'b1.s1.o1.c1.C1.'
		}
End

##############################################################################
# TiMidiTy Config (v2.0)

dir ../patches/guspat/izumo/inst
dir ../patches/guspat/izumo
dir ../patches/guspat
dir ../patches/sf2_all
dir ../patches/sf2_all/atomic
dir ../patches/sf2_all/fluid3
dir ../patches/sf2_all/realgs
dir ../patches/sf2_all/ultimate
dir ../patches/sf2_all/scc
dir ../patches/sf2_all/GMRBasico
dir ../patches/sf2_all/ForClassicalMusic
dir ../patches/sf2_all/bank48
dir ../patches/sf2_part/drumkit
dir ../patches/sf2_part/piano
dir ../patches/sf2_part/guitar
dir ../patches/sf2_part/harpsichord
dir ../patches/sf2_part/ORCHESTRAL
dir ../patches/sf2_part/Clarinet
dir ../patches/sf2_part/chipfont
dir ../patches/sf2_part/drum
dir ../patches/sf2_drum/drum/pettinhouse
dir "../patches/sf2_collection/3.5G HQ Orchestral"
dir "../patches/sf2_collection/3.5G HQ Orchestral/Strings part 1"

dir ../patches/sf2_part/famicom
dir ../patches/sf2_all/musix
dir ../patches/sf2_all/Musyng
dir ../patches/sf2_all/Evanessence2

dir ../patches/sf2_all/Giant
dir ../patches/sf2_all/Titanic
dir "../patches/sf2_drum/drum/MPC Drum Library"
dir "../patches/sf2_part/Sonatina Symphonic Orchestra"
dir "../patches/nanako"
dir "../patches/wood"
dir "../patches/sf2_part/Anthonys Philharmonic"
dir "../patches/sf2_all/Timbres Of Heaven"

##############################################################################
soundfont "Titanic_200_GMGS_1.2.sf2"
bank 0
	68 %font "Woodwinds - Oboe Solo.sf2" 0 0 amp=230 pan=20

	40 %font "Strings part 1/aaviolin.sf2" 0 1 amp=200 pan=-20
	48 %font "Strings - Celli Sustain.sf2" 0 0 amp=110 pan=40
	56 %font "Papelmedia_Trumpet.sf2" 0 0 amp=100 pan=-30
	46 %font "Timbres Of Heaven GM_GS_XG_SFX V 2.0.2.sf2" 0 46 amp=180 pan=-60

# clarinet
	71 %font "Timbres Of Heaven GM_GS_XG_SFX V 2.0.2.sf2" 0 71 amp=100 pan=-20 keep=loop rate=255:10:20:210:210:210 offset=255:200:150

# piccolo
	72 %font "Timbres Of Heaven GM_GS_XG_SFX V 2.0.2.sf2" 0 72 amp=100 pan=30 keep=loop rate=255:10:20:210:210:210 offset=255:200:150

	32 %font "Timbres Of Heaven GM_GS_XG_SFX V 2.0.2.sf2" 0 32 amp=90 rate=:::240:240:240

##############################################################################

# Standard drums

drumset 0

	# stick
#	31 %font "Roland SC-55.sf2" 128 0 31 amp=130
	31 %font "Musyng Kite.sf2" 128 8 31 amp=260 pan=90

	# bd
	36 %font "0_Yamaha9000.sf2" 128 0 34 amp=375 tune=-3
#	36 %font "0_Judd-Madden-Drum-S.sf2" 128 0 56 amp=200

	# sd
	38 %font "0_Yamaha9000.sf2" 128 0 32 amp=150 pan=30
	40 %font "0_Yamaha9000.sf2" 128 0 31 amp=150 pan=40

	# hihat
	# close
	42 %font "0_Yamaha9000.sf2" 128 0 50 amp=65
	# pedal
	44 %font "0_Yamaha9000.sf2" 128 0 45 amp=130
	# open
	46 %font "0_Yamaha9000.sf2" 128 0 51 amp=105
	87 %font "0_Yamaha9000.sf2" 128 0 47 amp=115
	88 %font "0_Yamaha9000.sf2" 128 0 48 amp=115
	89 %font "0_Yamaha9000.sf2" 128 0 49 amp=115
	90 %font "0_Yamaha9000.sf2" 128 0 50 amp=115

	# tom
	50 %font "Musyng original.sf2" 128 16 50 amp=175 tune=2
	48 %font "Musyng original.sf2" 128 16 48 amp=135 tune=2
	47 %font "Musyng original.sf2" 128 16 47 amp=130 tune=3
	45 %font "Musyng original.sf2" 128 16 45 amp=130 tune=3
	43 %font "Musyng original.sf2" 128 16 43 amp=130 tune=3
	41 %font "Musyng original.sf2" 128 16 41 amp=130 tune=3

#extension altassign 42 44 46 87 88 89 90

	# cymbal
	49 %font "0_Yamaha9000.sf2" 128 0 60 amp=105 pan=10 tune=0
	57 %font "0_Yamaha9000.sf2" 128 0 60 amp=105 pan=-100 tune=0
	61 %font "0_Yamaha9000.sf2" 128 0 61 amp=105 pan=10 tune=0
	62 %font "0_Yamaha9000.sf2" 128 0 62 amp=105 pan=-100 tune=0

	49 %font Titanic_200_GMGS_1.2.sf2 128 0 57 amp=200 pan=10 tune=0
	57 %font Titanic_200_GMGS_1.2.sf2 128 0 57 amp=200 pan=+100 tune=+0.5

	# Splash
	55 %font "atomic.sf2" 128 0 55 amp=140 pan=-30 tune=0
	52 %font "atomic.sf2" 128 0 55 amp=140 pan=+70 tune=+0.5

	# Ride
	51 %font "0_Yamaha9000.sf2" 128 0 53 amp=200
	53 %font "0_Yamaha9000.sf2" 128 0 52 amp=200

	49 %font "0_Yamaha9000.sf2" 128 0 37 amp=250 pan=30 pan=+10 tune=1.5
	57 %font "0_Yamaha9000.sf2" 128 0 37 amp=250 pan=30 pan=+100 tune=1

	# Crap
	39 %font "0_MPC Claps01.sf2" 128 0 66 amp=180 tune=+0.5


	# belltree
	84 %font "Percussion - All Percussion.sf2" 128 0 48 keep=loop amp=350
