Begin Comment

   File: swing

   Note: Some pretty good swing stuff. Works well for standards like ``C'est Si Bon''.
         The ``Triple'' and ``Plus'' versions are built on their basics, so it
         it sounds fine to toggle between, for example, Swing, SwingPlus and
         SwingTriple.
         
   Defines: Swing         2 bar basic 
            SwingPlus     Adds in clarinet arpeggios
            SwingTriple   Modified swing1 with 1/4 triplets
            SwingEnd      2 Bar ending 
            Swing1        4 bar, more sync'd
            Swing1Plus    Adds in clarinet arpeggios
            Swing1Triple  Modified Swing1 with 1/4 triplets
            Swing1End     2 Bar ending
            Swing2        4 bar, better with slower tempo
            Swing2Plus    Adds in clarinet arpeggios
            Swing2Triple  Modified Swing2 with 1/4 triplets
            Swing2End     4 bar ending with alto sax run
            
    Author: Bob van der Poel
End


Time 4		// All patterns 4/4

/////////////////////////////////////////////////
////// Define Patterns

Begin Drum Define
	D1       1 0 90 @
	D2       2 0 90 @
	D4       4 0 90 @
	D8       D1 * 8 
	D13      D1 * 2
	D24      2 0 90 ; 4 0 90 @
	D1234    D1 * 4
	Roll8    D1 * 8
	Roll16   D1 * 16

	Triple6  D1 * 6
	
	Swing8   1 2+16 90; 3.66 4+32 80 @
	Swing8   Swing8 * 4
End

Begin Chord Define
	LongShort  1 2 90 ; 3.66 16 85 @
	LongSS1    1 4 90 ; 1.66 8 80 ; 2 8 85 @
	LongSS2    1 4 90 ; 2 4 80 ; 3.66 8 85 ; 4 8 80 @
	Short1     1 4+8 85 @
	Short2     Short1 * 2
	Short4     Short1 * 4
	Long1      1 1 90 @
	Long2      Long1 * 2
	Long4      Long1 * 4

	Triple6    Long1 * 6
	
End

Begin Bass Define
	B13	1 2 0 90 ; 3 2 2 80 @
	B11	1 2 0 90; 3 2 0 80 @
	Sync1   1 4  0 90; 2.66 16 0 80; 3 4 0 90; 4.66 16 0 80 @
	Sync2   1 4  0 90; 2.66 16 0 80; 3 4 2 90; 4 4 0 80 @
End

Begin Walk Define
	W1234 	1 4 90 ; 2 4 82 ; 3 4 90 ; 4 4 80 @
End

Begin Arpeggio Define
	Swing8   1 2+16 90; 3.66 4+32 80 @
	Swing8   Swing8 * 4

	A1    1 1 90 @
	A4    A1 * 4
	A8    A1 * 8
End

Begin Scale Define
	Swing8   1 2+16 90; 3.66 4+32 80 @
	Swing8   Swing8 * 4
	Swing16  Swing8 * 2
	
	S1       1 1 90 @
	S2       S1 * 2
	s8       S1 * 8
	S16      S1 * 16
End
		
////////////////////////////
// Basic Swing Patterns
////////////////////////////

/////////////////////
////// Swing

SeqClear
seqsize 2

// The hats use a swing pattern. 

Begin Drum
	Sequence	Swing8
	Tone PedalHiHat
	Rskip 30
	Rvolume 10
	Rtime 1
	Volume mp
End

Begin Drum1
	Sequence	Swing8
	Tone OpenHiHat
	Rskip 30
	Rvolume 10
	Rtime 1
	Volume mp
End

// Kicks are one 1,2,3 and 4
	
Begin Drum2
	Sequence	D1234
	Tone KickDrum2
	Rskip 40
	Rvolume 10
	Rtime 3
	Volume mf
End

Begin Drum3
	Sequence	D1234
	Tone SideKick
	Rskip 40
	Rvolume 10
	Rtime 3
	Volume mf
End

// Low-Congas on 1 and 3; hi on 2,4

Begin Drum4
	Sequence	D13
	Tone LowConga
	Rskip 10
	Rvolume 10
	Rtime 5
	Volume ff
End

Begin Drum5
	Sequence	D24
	Tone OpenHighConga
	Rskip 10
	Rvolume 10
	Rtime 5
	Volume ff
End
	

Begin Chord	
	Sequence	LongShort  Short1
	Octave 5
	Voice Organ3
	Volume mp
	Articulate 60
	Rvolume 3
End

Begin Chord1
	Sequence Long2 Long4
	Voice JazzGuitar
	Invert 0 1 
	Strum 5
	Octave 5
	SeqRnd
	Volume mf
	Rvolume 5
End

Begin Bass
	Sequence   	Sync1 Sync2
	Articulate 80
	Octave 3
	Volume mp
	Voice  AcousticBass
	Rvolume 10
End

Rtime 2

DefGroove Swing

/////////////////////
/// Swing1

Groove Swing	// Use basic 2-bar swing voicing

// Leave the drums mostly the same.

// Change the PedalHihat to a Ride

Drum Tone RideCymbal1

// Change the organ to a piano, same rhythm

Begin Chord 
	Voice Piano2
	Octave 4
	Articulate 80
End

// Replace bass with straight 1/3

Bass 	Sequence   B13  

      
DefGroove Swing1

/////////////////////
////// Swing2

Groove Swing	// Start off with swing
SeqSize 4	// change seqsize from 2 to 4

// Leave drums

// Change the chording

Begin Chord
	Sequence   LongSS1  LongSS2  LongSS2  LongSS2
	Voice 	   Organ3
	Invert     0        2        1        0
	Articulate 90
	SeqRnd
	Volume p
	Octave	5
End

Begin Chord1
	Sequence   LongSS2  Short2   Short4   LongSS2
	Invert     0        1        0        1
	SeqRnd
	Articulate 80
	Octave 5
	Voice  AltoSax
End

// Change the bass line

Begin Walk
	Sequence   W1234   /         /        z
	Articulate 60
	Octave 3
	Voice AcousticBass
	RVolume 10
End

Begin Bass
	Sequence   z        z        z        B11
	Articulate 60
	Octave 3
	Voice AcousticBass
	RVolume 10
End

DefGroove Swing2

//////////////////////////////////////////////////////////////////////
// For emphasizing the triplet bars so common in this kind of music.
//////////////////////////////////////////////////////////////////////

///////////////////////////////
// SwingTriple
// For all of these we set only beats on 1/3 or triplet/triplet.
// Just make sure no beats on 2 or 4.

Groove Swing

Begin Drum
	Sequence Triple6
	RSkip 10
	Tone SnareDrum1
	Rtime 1
End

Drum1 Sequence Triple6
Drum2 Sequence D13
Drum3 Sequence D13
Drum5 Sequence -
Walk Sequence -
Bass Sequence B13

Begin Chord
 	Sequence	Triple6  Long2
 	SeqNoRnd
End
Begin Chord1
 	Sequence	Long2    Triple6
 	SeqNoRnd
End

DefGroove SwingTriple

///////////////////////////////
// Swing1Triple

Groove Swing1

Begin Drum
	Sequence Triple6
	Tone SnareDrum1
	Rtime 5
	RSkip 10
End

Drum1 Sequence Triple6
Drum2 Sequence D13
Drum3 Sequence D13
Drum5 Sequence -
Walk Sequence -
Bass Sequence B13

Begin Chord
 	Sequence	Triple6  Long2
 	SeqNoRnd
End
Begin Chord1
 	Sequence	Long2    Triple6
 	SeqNoRnd
End


DefGroove Swing1Triple

///////////////////////////////
// Swing2Triple

Groove Swing2

Begin Drum
	Sequence Triple6
	Tone SnareDrum1
	Rtime 5
	RSkip 10
End

Drum1 Sequence Triple6
Drum2 Sequence D13
Drum3 Sequence D13
Drum5 Sequence -
Walk Sequence -
Bass Sequence B13

Begin Chord
 	Sequence	Triple6  Long2
 	SeqNoRnd
End
Begin Chord1
 	Sequence	Long2    Triple6
 	SeqNoRnd
End



DefGroove Swing2Triple

///////////////////////
//  Endings 
///////////////////////

///////////////////////////////////
/// SwingEnd

Groove Swing	// Use basic swing voicing

Chord Sequence	Short2  Short4 	
Chord1 Sequence Long4   Short4
Bass Sequence	z       B13 
Walk Sequence	W1234   z

Begin Drum
	Sequence   Roll8   D24
	Tone SnareDrum1
End

Drum2 Sequence  -
Drum3 Sequence  -

DefGroove SwingEnd

///////////////////////////////////
// Basic Swing beats with Arpeggio clarinet

// Create a groove with the clarinet to add to the others
// Note how we set the seqsize to 4. For 2 bar seqs this
// will be truncated to the first 2.

SeqClear
SeqSize 4
Begin Arpeggio
	Sequence    Swing8  /     /      z
	Invert      0       1     2      0
	Voice Clarinet
	SeqRnd
	Volume mp
	Articulate 70       
	Rskip       10      50    40     0
	Rvolume 10
	Octave      6   
End
DefGroove Clarinet

Groove Swing
	Arpeggio Groove Clarinet
	DefGroove SwingPlus

Groove Swing1
	Arpeggio Groove Clarinet
	DefGroove Swing1Plus

Groove Swing2
	Arpeggio Groove Clarinet
	
	DefGroove Swing2Plus


///////////////////////////////////
/// Swing1End

Groove Swing1	// Use basic swing voicing

Chord	Sequence	Short2	Short4 	
Chord1	Sequence 	Long4
Bass	Sequence	B11
Walk	Sequence	-

Begin Drum
	Sequence	Roll8 D24
	Tone SnareDrum1
End

Drum2	Sequence	-
Drum3	Sequence	-

DefGroove Swing1End

///////////////////////////////////
/// Swing2End  (this is a 4 bar pattern)

// We use the same inst for the Chords, but change the pattern
// We continue with the Chord1 for 2 bars, then kill it (alto)
// We make the alto play the impossible scale for the 3 bar,
// and a hold note for the last.

Groove Swing2	

Begin Chord
	Sequence	LongSS2 LongSS2 LongSS2 Long4
	SeqNoRnd
End
Begin Chord1
	Sequence	Short4	Short4	z       z
	SeqNoRnd
End

Begin Scale 
	SeqCLear
	Sequence      z  z  S16 S2
	Direction Up
	Articulate 99
	octave 5
	ScaleType Chromatic
	Voice  AltoSax
End

// Change the bass to be more repetitive

Bass	Sequence	z	z	B11	B11
Walk	Sequence	W1234	/	/	z

// And some finality to the the drums

Begin Drum
	Sequence	D4
	Tone LowConga
	Volume f
End

Begin Drum1
	Sequence	D2
	Tone OpenHighConga
	Volume f
End

Drum2	Sequence 	-
Drum3	Sequence	-
Drum4	Sequence	-

Begin Drum5
	Sequence	D8  /	/	z
	Tone PedalHiHat
	Volume mp
	Rvolume 5
	RSkip 60
End

Begin Drum6
	Sequence	D24
	Tone SideKick
	Volume mp
End

Begin Drum7
	Sequence	D13
	Tone SnareDrum1
End


DefGroove Swing2End




