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

174 lines
2.8 KiB
Plaintext

// softrock
Begin Doc
Seems to work nicely for relatively fast
(ie. not "slow dance"), older rock tunes.
I use the SoftRock1 for "Blame It On The Bossa Nova".
End
Author Bob van der Poel
SeqClear
Time 4
Timesig 4 4
Include stdpats
////// Additional Patterns
Begin Drum Define
D12+34 D134 ; 2.5 0 90
End
Begin Chord Define
C1+34 C134; C2 Shift 2.5
End
/////////////////////////////////////////////////
////// SoftRock
SeqSize 4
Begin Drum-Snare
Sequence D12+34
Tone SnareDrum1 SnareDrum2
SeqRnd On
Volume p
Rvolume 10
End
Begin Drum-HH
Sequence D8
Tone ClosedHiHat
Volume mf
Rvolume 10
Rtime 10
End
Begin Drum-Tri
Sequence D12 / / z
Tone OpenTriangle
Rskip 50
Volume pp
Rvolume 10
RTime 20
End
Begin Chord
Sequence C1+34 C13 C1+34 C134
Voicing Mode=Optimal
SeqRnd On
Voice Piano3
Volume mf
Octave 5
Articulate 90
End
Begin Bass
Voice FretlessBass
Sequence B13 z B13 z
Octave 3
Volume mp
Articulate 80
End
Begin Walk
Voice $_Bass_Voice
Octave $_Bass_Octave
Sequence z W13 z {1 4 90 ; 2.5 8 70 ; 3 8 90 ; 3.5 8 70 ; 4 8 70 }
Volume mp
Articulate 80
End
DefGroove SoftRock Basic Soft-rock for 60's tunes.
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 TremoloStrings
Articulate 100
Unify On
Volume pp
Octave 5
End
DefGroove SoftRockSus Strings with the rock.
//// SoftRock1 Add in a latiny sounding arp
Groove SoftRock // Start with the basic
Begin Arpeggio
Voice Flute
Sequence A8 A8 A4 {A1 * 6}
SeqRnd On
RSkip 25
Rvolume 15
Rtime 6
Range 3
Accent 1 10 3 10
Articulate 80
Volume p
Octave 6
End
DefGroove SoftRock1 Adds a latin-pop touch by using flute arpeggios.
Chord-Sus Groove SoftRockSus
DefGroove SoftRock1Sus Latin-pop with sustained strings.
////////////////////////////////////
/// Intro
Groove SoftRock
Alltracks SeqRnd Off
Drum-Snare Sequence D12+34 / / D1234
Drum-HH Sequence D8 / / D13
Begin Drum-Tri
Sequence D12 / / z
Tone OpenTriangle
Rskip 0
End
Chord Sequence C1+34 C13 C1+34 C13
Bass Sequence B13 B11 B13 {1 2 5 100; 3 2 1 120}
Walk Sequence -
DefGroove SoftRockIntro Basic introduction.
Begin Chord-Sus
Groove SoftRockSus
SeqRnd Off
Sequence { 1 1 90 0 50 * 4 } / / {1 2 90 0 50 }
Volume mp p pp ppp
Octave 5
End
DefGroove SoftRockSusIntro Basic introduction with added strings.
////////////////////////////////////
/// SoftRockEnd Change to straight 4s
Groove SoftRock
Chord Sequence C1234
Drum-Snare Sequence D1234
Walk Sequence -
Bass Sequence B11
DefGroove SoftRockEnd Simple 4 beats to the bar ending.