Begin Comment
	
   File: 8beat

   Note: Most older rock tunes accept these. Try it with songs like
          ``There's a Kind Of Hush''.
                     
   Defines:	8beat		good for oldish rock stuff
                8Beat1		adds 13 bass to 8beat
                8BeatSus        adds sustained string to 8Beat 
                8Beat1Sus       adds sustained string to 8Beat1
                8BeatEnd	2 bar ending

   Author: Bob van der Poel 
   	
End

Time 4

///////////////////////////
// Define patterns

Begin Drum Define
	D1     1 0 90 @
	D13    D1 * 2
	D1234  D1 * 4
	D8     D1 * 8
	D24    2 0 90; 4 0 90 @	
	D1234+ D1234 ; 3.5 0 90; 4.5 0 90 @
	
End

Begin Chord Define
	C1	1 4 90; 2.5 8 80; 3 4 90; 4 4 90 @
	C2	1 4 90; 4 4 90 @
	C3	2 4 90; 3.5 8 80; 4 4 90 @
	C4	1 4 90; 3 4 80; 4 4 90 @

	C13	1 2 90 ; 3 2 90 @
	C1234	C13 * 2

	
	// Guitar chords only play root/5th -- don't invert!

	G1	1 4 90 0 90 0 ;
		2.5 8 90 0 90 0;
		3 4 90 0 90 0;
		4 4 90 0 90 0 @
	G2	1 1 90 0 90 0 @
	G2	G2 * 4
End

Begin Bass Define
	B1	1 4 0 90 @
	B13	1 4 0 90;  2.5 8 0 80; 3 8 0 90; 4 8 2 90 @

	// These are used as sustained strings on root, 3rd, 5th
	
	L5   1 2 2 90; 3 2 2 70 @
	L3   1 2 1 90; 3 2 1 70 @
	L1   1 2 0 90; 3 2 0 70 @

End

Begin Walk Define
	W1	1 8 90;  1.5 8 90; 2.5 8  80; 3 8  90; 4 8 90 @
End

/////////////////
// 8beat

SeqClear
SeqSize 4

// Straight ahead drum stuff

Begin Drum
	Sequence    D8	
	Tone OpenHiHat
	RVolume 20
End

Begin Drum1
	Sequence    D1234
	Tone ClosedHiHat
	Rtime 2
	RVolume 20
End

Begin Drum2
	Sequence    D24  D1234
	Tone    SnareDrum1 
	Rtime 2
	RVolume 20
End

Begin Drum3
	Sequence    D1234+
	Tone KickDrum1
	Volume mp
	Rtime 3
	RVolume 10
End

// Bass. Root on beat 1.

Begin Bass
	Sequence	B1	
	Voice	FingeredBass
	Octave 4
	RVolume 5
	Articulate 90
End

// Randomized chords on 1, 2, 2.5, 3, 3.5, 4

Begin Chord
	Sequence	C1	C2	C3	C4
	SeqRnd
	Articulate 90
	Voice Honky-TonkPiano
	Octave 5
End

// Open harmony guitar chords

Begin Chord1
	Sequence	G1	G1	G1	G2
	Articulate 90
	Voice CleanGuitar
	Octave 4
End

DefGroove 8Beat

///////////////////////////////////////
// 8Beat1
// Adds a better bass line to 8beat.

Groove 8Beat

Begin Bass
	Sequence	B13	/	/	z
	Voice	FingeredBass
	Octave 4
	RVolume 5
	Articulate 70
End

Begin Walk
	Sequence	z	/	/	W1
	Voice	FingeredBass
	Octave 4
	RVolume 5
	Articulate 60
End

DefGroove 8Beat1


////////////////////////////////////////////////////////////
// Enhance the 8beat rhythms by adding a sustained string
////////////////////////////////////////////////////////////

SeqClear
SeqSize 4

Begin Bass2
	Sequence  L5 / L3 L1
	Volume p
	Voice SlowStrings
	Octave 4
	Articulate 99
End
	
DefGroove SlowStrings

Groove 8Beat
	Bass2 Groove SlowStrings
	DefGroove 8BeatSus

Groove 8Beat1
	Bass2 Groove SlowStrings
	DefGroove 8Beat1Sus
	
	
///////////////////////////////////////
// 8BeatEnd	2 bar ending


Groove 8Beat

Begin Drum
	Sequence	D1234
	Tone  OpenHiHat
End

Begin Drum1
	Sequence	D1234   D1
	Tone ClosedHiHat
End

Begin Drum2
	Sequence	D1234
	Tone SnareDrum2
End

Begin Drum3
	Sequence	D1234+  D13
	Tone KickDrum1
End

Chord	Sequence	C1234	C13
Chord1	Sequence	C1234	C13

Bass	Sequence	B1

DefGroove 8BeatEnd


