
Begin Comment

   File: foxtrot
   
   Note: Just about any old-fashioned dance piece can be set to a foxtrot.
   
   Defines:  Foxtrot      4 bar foxtrot
             FoxtrotSus   Adds sustained strings   
             FoxTrotEnd   2 bar ending
             Foxtrot1     4 bar foxtrot
             FoxTrot1End  1 bar ending

   Author: Bob van der Poel

End


Time 4

/////////////////////////////////////////////////////////
/// Foxtrot1

		
Begin Drum Define
	D1      1 0 90 @
	D4      4 0 90 @
	D13     D1 * 2
	D1234   D1 * 4
	D8      D1 * 8
	D24     2 0 90; 4 0 90 @	
	D12+34+ D13; 2.5 0 90; 4.5 0 90 @
	D23+4+  1 0 90 ; 3.5 0 90 ; 4.5 0 90 @    
	D14+    1 0 90 ; 4.5 0 90 @
		
End

Begin Chord Define
	P2+	2 8 90 ; 2.5 8 90 @
	P+	1.5 8 100 @
	P2	3.5 8 88 ; 4 4 90 @
	P+2	2.5 8 100 @
	P13	1 2 100; 3 2 100 @
	P1234	P13 * 2
	
	T1	2 4 80 ; 4.5 16 100 @
	T2	4.5 16 120 @

	// These are used as sustained strings on root / 5th
	
	Open2   1 2 90 0 90 0 ; 3 2 80 0 80 0 @



End

Begin Bass Define
	B13	1 4 0 90 ; 3 4 0 79 @
	B1	2.5 8 2 70 @
	B2	2.5 8 2 70; 4.5 8 2 70 @
	B1+3	1 4 0 100 ; 2.5 16 0 90;  3 4+8 2 90 @

	
	
End

Begin Arpeggio Define
	A1	1 8 100 ; 1.5 8 80 ; 2 8 80 @
	A2	3 8 80; 4 8 70 @
End

////////////////////////////////////////////
/////// Foxtrot

SeqClear
SeqSize 4

Begin Bass
	Sequence		B13
	Voice AcousticBass
End

Begin Bass1
	Sequence		B1	B2
	Voice AcousticBass
	Octave 3
End

Begin Chord
	Sequence		P1234
	Octave 5
	Articulate 70
	Strum 2
	Invert 0 1
	Voice NylonGuitar
End

Begin Chord1
	Sequence		P2+	P+	P2+	P2+
	Voice Piano1
	Octave 5
End
 
Begin Drum
	Sequence		D12+34+
	Tone OpenHiHat
	Volume mp
End

Begin Drum1
	 Sequence	D24
	 Tone PedalHiHat
End

Begin Drum2
	Sequence	D4
	Tone SideKick
End
Begin Drum3
	Sequence	D1
	Tone SideKick
End

Begin Arpeggio
	Sequence	A2	A2	A1	z
	Invert 1 0 -1 0
	SeqRnd
	Voice Piano2
	Octave 5
End

DefGroove Foxtrot

//////////////////////
/// FoxTrotEnd

/// 2 bar ending

Groove Foxtrot

Drum2 Sequence -
Begin Drum3
	Sequence D1234 D13
	Tone KickDrum1
	Volume f
End
Arpeggio Sequence -

Begin Chord1
	Sequence	P1234	P13
	Voice Piano1
	Octave 5
End

Bass Sequence	B13

DefGroove FoxTrotEnd

/////////////////////////////////////////////
// foxtrotSus
// Foxtrot with some sustained strings

Groove Foxtrot

Begin Chord2
	Sequence  Open2
	Volume mp
	Voice TremoloStrings
	Octave 4
	Articulate 99
End

Chord1 Volume mp		// quietten down piano
Arpeggio Sequence -            // kill piano arp.

Defgroove FoxtrotSus	


/////////////////////////////////////////////////
/////// Foxtrot1

SeqClear
SeqSize 4

Begin Drum
	Sequence	D12+34+	D14+
	Tone KickDrum1
End

Begin Drum1
	 Sequence	D4
	 Tone SideKick
End

Begin Drum2
	 Sequence	D24
	 Tone PedalHiHat
End

Begin Drum3
	Sequence	D1 z z z
	Tone CrashCymbal1
End

Begin Drum4
	Sequence		D12+34+
	Tone RideCymbal1 RideCymbal2
End

Begin Chord
	Sequence		P1234
	Invert 0 1 0 1
	Voice Piano1
	Articulate 90
	Octave 5
	Volume mp
	RVolume 3
End

Begin Chord1
	Sequence		P+	z	P+2	z
	SeqRnd
	Voice Piano2
	Octave 4
	RVolume 10
End

Begin Chord2
	Sequence		T1 	T2
	Voice MutedTrumpet
	Octave 5
	Articulate 50
	RVolume 3
End

Begin Bass
	Sequence		B1+3
	Voice FretlessBass
	Invert 0 1
	Octave 3
	RVolume 5
End

RTime 4

DefGroove	Foxtrot1

////////////////////////////////////////////
/// Foxtrot1End

Begin Drum3
	Sequence	D1
	Tone CrashCymbal1
End
Bass	Sequence	B13
Chord1	Sequence	-
Chord2	Sequence	P1234

DefGroove FoxTrot1End



