VocalEasel/mma/lib/stdlib/rhumba.mma
Matthias Neeracher d599bfbe4e Added MMA
2006-11-10 08:07:56 +00:00

368 lines
6.9 KiB
Plaintext

// rhumba
Begin Doc
I created this for the Cole Porter tune "I've Got You
Under My Skin.". Traditional Latin rhythms generally have
a full percussion with lots of off-beats, but don't overdo it.
End
Author Bob van der Poel
SeqClear
Time 4
Timesig 4 4
Include stdpats
/////////////////////////////////////////
/////// Instrument patterns
Begin Drum Define
D3+ D3 Shift .5
D1+3+ D13 Shift .5
D2+4+ D24 Shift .5
D12+4 D14 ; D2 Shift .5
D13+ D1 ; D3+
D3+4 D3+ ; D4
D1+2+3+ D1+3+; D3+
End
Begin Walk Define
W12+4 1 4 100 ; 2.5 4 100 ; 4 4 90
W12+4+ W12+4 ; 4.5 8 77
End
Begin Bass Define
B12+4 1 4 1 90 ; 2.5 4 5 70 ; 4 4 1 90
End
Begin Chord Define
C30 1 81 70 ; 1+81 82 70 ; 2+81 82 70
End
/////////////////////////////////
///////// Rhumba
//////// Lots of drum stuff going on, but on
//////// my synth it doesn't sound too busy.
SeqSize 4
Begin Drum-Claves
Sequence D12+4 D13+ D1+3+ D1+2+3+
Tone Claves
SeqRnd On
Rvolume 10
Rtime 2
Volume ff
End
Begin Drum-Maraca
Sequence D8 / / D1234
Tone Maracas
SeqRnd On
Rvolume 5
Rtime 2
End
Begin Drum-LoConga
Sequence D4 D3+4
Tone LowConga
Rvolume 5
Rtime 2
Volume ff
End
Begin Drum-HH
Sequence D3 D3+ / z
Tone OpenHighConga OpenHiHat / /
SeqRnd On
Rvolume 5
Rtime 2
End
Begin Drum-MuteConga
Sequence D2 { D1 Shift .5 }
Tone MuteHighConga
Rvolume 5
Rtime 2
End
Begin Drum-Bongo
Sequence D3 D2+4+
Tone LowBongo HighBongo
Rvolume 5
Rtime 2
End
Begin Drum-Chh
Sequence D8
Tone ClosedHiHat
Volume mp
Rvolume 5
Rtime 2
End
/////// Main chording is the piano ... this is for all the variations.
Begin Chord
Sequence C134 C123 { C1; C34 Shift .5 } { C2; C34 Shift .5 }
Accent 1 20 3 10
Voicing Mode=Optimal
SeqRnd On
Rvolume 10
Voice Piano2
Articulate 93
Octave 5
Volume mp
End
//////// The walk and bass alternate bars. Gives a nice feeling.
Begin Bass
Voice FretLessBass
Sequence B12+4 z B12+4 z
Articulate 60
Accent 1 20
Rvolume 15
Rtime 4
Octave 3
Volume mp
End
Begin Walk
Voice $_Bass_Voice
Octave $_Bass_Octave
Rvolume $_Bass_Rvolume
Rtime $_Bass_Rtime
Accent $_Bass_Accent
Articulate 55
Volume $_Bass_Volume
Sequence z W12+4 z W12+4+
End
DefGroove Rhumba Nice, smooth easy listening.
//////// Add sustained strings
/// The chord pattern just plays the root and 5th. The 2 defs
/// vary the volume of the root/5th.
Begin Chord-sus
Sequence { 1 1 90 0 50 0 * 4 } { 1 1 50 0 90 0 * 4 }
SeqRnd On
Voicing Mode=Optimal
Rvolume 10
Voice Strings
Articulate 110
Unify On
Volume p
Octave 5
End
DefGroove RhumbaSus Sustained strings make it smoother.
////////////////////////////
// RhumbaTriple
// Change the piano in rhumba to 2 sets of triplets
///////////////////////////
Groove Rhumba
SeqSize 1
Begin Chord
Sequence { 1 1 70 * 6 } // Piano set to 1/4 triplets
Accent 1 40 3 40 // Accent beats 1/3
End
Walk Sequence - // Change walking bass
Bass Sequence B11 // to a 1/3
DefGroove RhumbaTriple Rhumba with quarter note triplet chords. \
Good for emphasizing a single bar in a piece. \
Not great for more than one bar in a row.
Chord-sus Groove RhumbaSus
DefGroove RhumbaTripleSus Triplets and sustained strings.
//// 1/4 triple on beats 1/2, regular stuff on beats 3/4
Groove RhumbaTriple
Begin Chord
Sequence { C30; C34; C3 Shift .5 }
Accent 1 10 3 20
End
DefGroove RhumbaTriple12 Variation of RhumbaTriple with triplets on \
beats 1/2 and quarters on 3/4.
Chord-sus Groove RhumbaSus
DefGroove RhumbaTriple12Sus Triplet on 1/2 and strings.
Begin Chord
Sequence { C12; C1 Shift .5; C30 Shift 2 }
Accent 1 20 3 10
End
DefGroove RhumbaTriple34 Variation of RhumbaTriple with triplets on \
beats 3/4 and quarters on 1/2.
Chord-sus Groove RhumbaSus
DefGroove RhumbaTriple34Sus Triplet on 3/4 and strings.
////////////////////////////
// Rhumba1
Groove Rhumba
Begin Arpeggio
Sequence A4 A8 A4 A8
Invert 0 0 1 1
SeqRnd On
Voice PizzicatoString
Articulate 100
Octave 5
Volume mp
Rvolume 10
Rskip 30
End
DefGroove Rhumba1 Adds pizzicato arpeggios.
Chord-sus Groove RhumbaSus
DefGroove Rhumba1Sus Apreggios and sustained strings.
//////////////////////////////
// Rhumba2
Groove Rhumba
Begin Chord-Mallet
Voice Marimba
Sequence {C1234; C1234 Shift .2; C1234 Shift .4; C1234 Shift .6; C1234 Shift .8} \
{C24; C24 Shift .2; C24 Shift .4 ; C24 Shift .6; C24 Shift .8}
Articulate 60
Voicing Mode=Optimal
Octave 5
DupRoot -1
Accent 1 40
Volume p
End
DefGroove Rhumba2 Add articulated Marimbas.
Chord-sus Groove RhumbaSus
DefGroove Rhumba2Sus Marimbas and sustained strings.
//////////////////////////////////////
//////// Rhumba3
Groove Rhumba
Begin Chord-Guitar
Voice JazzGuitar
Sequence C1234 C134 C24 C13
SeqRnd On
Voicing Mode=Optimal
Articulate 99
Octave 6
Accent 1 20 3 20
Volume pp
End
DefGroove Rhumba3 Add jazz guitar chords.
Chord-sus Groove RhumbaSus
DefGroove Rhumba3Sus Guitar chords and sustained strings.
///////////////////////////
// Intro
Groove Rhumba
AllTracks SeqRnd Off
Drum-Claves Sequence D12+4 D13+ D1+3+ D1234
Drum-Maraca Sequence D8 / / D13
Drum-LoConga Sequence D4 D3+4 D2 D1
Drum-HH Sequence D3 D3+ / z
Drum-MuteConga Sequence D2 { D1 Shift .5 } D2 z
Drum-Bongo Sequence D3 D2+4+ D3 D3
Drum-Chh Sequence D8 / / D1234
Chord Sequence C134 / / {1 1 8 0}
Bass Sequence B12+4 / / {1 2 1 90}
Walk Sequence -
DefGroove RhumbaIntro 4 bar intro to go with standard Rhumba.
///////////////////////////
// Endings
// Just add a string run to the basic rhumba
Groove Rhumba
Chord-sus Sequence -
Begin Scale
Sequence Scale8 Scale4 Scale2 Scale
Voice SlowStrings
Articulate 100
Volume mf
Octave 6
Direction Up
Range 5
End
DefGroove RhumbaEnd Ending with string scales. The scales use \
8th, quarter, half and finally a whole note. \
Setting the seq to different values for each \
bar of the ending will create proper effects.
/// Easy 2 bar ending
Groove Rhumba
Seqsize 2
Alltracks SeqRnd Off
Drum-Claves Sequence D8 D12
Drum-Maraca Sequence D1
Drum-LoConga Sequence D1234 D12
Drum-HH Sequence D3+ D1
Drum-MuteConga Sequence D2
Drum-Bongo Sequence D3 D2
Drum-Chh Sequence D8 D12
Chord Sequence C134 C12
Bass Sequence B12+4 B1
Walk Sequence -
DefGroove RhumbaEnd1 Simpler, 2 bar, ending.