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

314 lines
4.8 KiB
Plaintext

// bolero
Begin Doc
A try at a Bolero. Written for "Tonight".
End
Author Bob van der Poel
SeqClear
Time 4
Timesig 4 4
Include stdpats
/////////////////////////////////////////
/////// Instrument patterns
Begin Chord Define
TR3 1 3 90; 1.33 3 90; 1.66 3 90
CT1 C13; TR3 Shift 1 ; TR3 Shift 3
CT2 C134; TR3 Shift 1
CT3 C13; TR3
End
Drum Define Dtriple 1 0 90; 1.333 0 90; 1.666 0 90
/////////////////////////////////
SeqSize 4
Begin Drum-Kick
Sequence {D1; D2 Shift .5}
Tone KickDrum1
Rvolume 10
Rtime 2
Volume p
End
Begin Drum-Hbongo
Sequence {D3 Shift .5}
Tone HighBongo
Rvolume 5
Volume mp
Rtime 2
End
Begin Drum-Lbongo
Sequence {D4; D4 Shift .5}
Tone LowBongo
Rvolume 5
Rtime 2
Volume mp
End
Begin Drum-Maraca
Sequence {D1234; D1234 Shift .5; D1 Shift .5}
Tone Maracas
Rskip 10
Volume mp
Rvolume 5
Rtime 2
End
Begin Drum-Claves
Sequence {D2; D3 Shift .5}
Tone Claves
Volume mp
Rvolume 5
Rtime 2
End
Begin Chord
Voice SteelGuitar
Articulate 60
Volume mp
Voicing Mode=Optimal
Sequence C8
Octave 5
Rskip 20
Strum 3
Rvolume 20
Rtime 10
End
Begin Bass
Voice FingeredBass
Octave 3
Articulate 80
Accent 1 20
Volume mf
Rtime 10
Rvolume 20
Sequence {1 4. 1 90; 2.5 8 3 90; 4 4 1 90}
End
Begin Bass-Guitar
Voice NylonGuitar
Volume f
Octave 4
Sequence {1 2. 1 90 } {4.5 8 1 90 }
Articulate 90
End
DefGroove Bolero Latin-style Bolero rhythm.
Begin Arpeggio
Voice Flute
Volume mp
Octave 5
Range 2
Sequence A8
Articulate 60
Rskip 20
Rtime 10
Rvolume 20
End
DefGroove BoleroFill Add arpeggiating flute.
Groove Bolero
Begin Chord-Sus
Voice Strings
Voicing Mode=Optimal
Octave 6
Volume pp
Articulate 100
Unify On
Sequence L2
End
DefGroove BoleroSus Bolero with sustained strings.
Arpeggio Groove BoleroFill
DefGroove BoleroSusFill Sustained Bolero with flute fill.
///////// Intro
Groove Bolero
Drum-Kick Sequence {D1; D2 Shift .5} / / D1
Drum-Hbongo Sequence {D3 Shift .5} / / D1
Drum-Lbongo Sequence {D4; D4 Shift .5} / / D1
Drum-Maraca Sequence {D1234; D1234 Shift .5; D1 Shift .5} / / D1
Drum-Claves Sequence {D2; D3 Shift .5} / / D1
Chord Sequence C134 / C1234 L1
Bass Sequence {1 4. 1 90; 2.5 8 3 90; 4 4 1 90} / / {1 1 1 90}
Bass-Guitar Sequence {1 2. 1 90 } {4.5 8 1 90 } / {1 1 3 90}
DefGroove BoleroIntro 4 bar intro.
///////// Ending
Groove Bolero
Begin Scale
Sequence Scale8 Scale4 Scale2 Scale
Voice Strings
Range 3
Articulate 99
Volume ff
Octave 4
Direction Both
End
DefGroove BoleroEnd Ending with string scales. Uses 8ths \
on 1st bar 4th on 2nd, halves 3rd and a \
whole note on 4th.
///////////////////////////////////////////////
///////////////// More Spanish sounding
SeqClear
SeqSize 4
Begin Drum-Snare
Sequence D13
Tone SnareDrum2
Rvolume 10
Rtime 2
Volume p
End
Begin Drum-Hbongo
Sequence D13
Tone HighBongo
Rvolume 5
Volume mp
Rtime 2
End
Begin Drum-Lbongo
Sequence {Dtriple shift 1; Dtriple Shift 3} {Dtriple Shift 1; D4}
Tone LowBongo
Rvolume 5
Rtime 2
Volume mp
End
Begin Drum-Claves
Sequence {Dtriple shift 1; D14}
Tone Claves
Volume mp
Rvolume 5
Rtime 2
End
Begin Chord
Voice NylonGuitar
Articulate 80
Volume mp
Voicing Mode=Optimal
Sequence CT1 CT2
Octave 5
Strum 3
Rvolume 20
Rtime 10
End
Begin Bass
Voice FingeredBass
Octave 3
Articulate 80
Accent 1 20
Volume mf
Rtime 10
Rvolume 20
Sequence {1 4 1 90; 2.5 8 1 90; 3 8 5 90; 4 4 1 90} B11
End
DefGroove Bolero1 Spanish-style Bolero rhythm.
Begin Arpeggio
Voice $_Chord_Voice
Sequence A2 A4
SeqRnd On
RSkip 10
Octave 5
Range 1
Harmony Open
Articulate 100
Unify On
Volume ff
End
DefGroove Bolero1Fill Add guitar arpeggios to Bolero1.
Groove Bolero1
Begin Chord-Sus
Voice Strings
Sequence { 1 1 90 0 80 0 * 2} // Root and fifth notes only.
Voicing Mode=Optimal
Volume mp
Octave 5
Articulate 100
Unify On
End
DefGroove Bolero1Sus Spanish Bolero with sustained strings.
Arpeggio Groove Bolero1Fill
DefGroove Bolero1SusFill Sustained Bolero1 with guitar fill.
//////////////////
//// Intro
Groove Bolero1
Drum-Snare Sequence D13 / / D1
Drum-Hbongo Sequence D13 / / D1
Drum-Lbongo Sequence {Dtriple shift 1; Dtriple Shift 3} \
{Dtriple Shift 1; D4} / D1
Drum-Claves Sequence {Dtriple shift 1; D14} / / D1
Chord Sequence CT1 CT2 CT1 L1
Bass Sequence {1 4 1 90; 2.5 8 1 90; 3 8 5 90; 4 4 1 90} B11 B13 {1 1 1 90}
DefGroove Bolero1Intro 4 bar intro.
///////////////////////
///// Ending
Groove Bolero1
SeqSize 1
Drum-Lbongo Sequence {Dtriple ; Dtriple shift 1 ; D3}
Drum-Claves Sequence {Dtriple ; Dtriple shift 1 ; D3}
Chord Sequence CT3
Bass Sequence B11
DefGroove Bolero1End Single bar ending for Bolero1.