VocalEasel/mma/includes/stdpats34.mma

81 lines
2.1 KiB
Plaintext
Raw Permalink Normal View History

2006-11-10 08:07:56 +00:00
// Standard defines for 3/4 time.
// All volumes are 90. If you need different volumes use
// one of (or combination) of Volume and Accent. Or redefine
// the sequence.
if NE $_TIME 3
Print Warning: Including pattern defs for TIME 3, but TIME is $_TIME !
Endif
Begin Chord Define
C1 1 4 90 // Chord on 1
C2 C1 Shift 1 // on 2
C3 C1 Shift 2 // on 3
C12 C1; C2 // 1 and 2
C13 C1; C3 // 1 and 3
C23 C12 Shift 1 // 2 and 3
C123 C12; C3 // 1, 2 and 3
L1 1 2. 90 // Sustained 3 beat chord on 1
L2 1 2 90 // Sustained 2 beat chord on 2
End
Begin Drum Define
D1 1 0 90 // hit on 1
D2 D1 Shift 1 // hit on 2
D3 D1 Shift 1 // hit on 3
D12 D1; D2 // hits on 1 and 2
D13 D1; D3 // hits on 1 and 3
D23 D12 Shift 1 // hits on 2 and 3
D123 D1 * 3 // hits on 1, 2 and 3
D6 D1 * 6 // 8th note roll
D12 D1 * 6 // 16th note roll
// These give 2, 4 or 8 hits on beat 1; use shift to expand to beat 2 or 3.
2S 1 0 90; 1.5 0 90
4S 2S; 2S Shift .25
8S 4S; 4S Shift .125
End
Begin Bass Define
B1 1 4 1 90 // Root on beat 1
B1/5 1 4 5 90 // 5th on beat 1
// Root on 1, 3rd on 2, 5th on 3
B123 1 4 1 90 ; 2 4 3 90 ; 3 4 5 90
// For sustained string
Sus1 1 2. 1 90 * 3 // root dotted half note
Sus3 1 2. 3 90 * 3 // 3rd, dotted half
Sus5 1 2. 5 90 * 3 // 5th, dotted half
End
Begin Walk Define
W123 1 2. 90 * 3 // Walk quarters on 1, 2 and 3
End
Begin Arpeggio Define
A1 1 2+4 90 // 1 dotted half
A3 A1 * 3 // 3 quarters
A6 A1 * 6 // 6 eights
A12 A1 * 12 // 12 sixteenths
End
Begin Scale Define
S1 1 2+4 90 // 1 dotted half
S3 S1 * 3 // 3 quarters
S6 S1 * 6 // 6 eights
S12 S1 * 12 // 12 sixteenths
End