-
Notifications
You must be signed in to change notification settings - Fork 0
/
bonham.bal
63 lines (55 loc) · 1022 Bytes
/
bonham.bal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
/* A simplified Bonham half time shuffle */
/* Percussion channel. */
:channel 10
/* Kick drum. */
:assign k 36
/* Acoustic snare drum. */
:assign s 38
/* Hi-Hat closed. */
:assign x 42
/* Hi-Hat open. */
:assign o 46
/* Hi-Hat foot. */
:assign X 44
/* Crash cymbal. */
:assign c 49
/* Low tom. */
:assign q 45
/* Floor tom 2. */
:assign g 41
:tempo 132
:time 4 4
:velocity 100
/*
Start the first bar with a crash cymbal and let it ring.
*/
:bar bonham1
[[c*-o] [x>-x] [x^-x] [x>-x]]8/3
- [-s)-]8/3 s^ [-s)-]8/3
[k-k]>8/3 [--k]8/3 - [--k]8/3
- X -2
:end
:bar bonham2
[[x^-o] [x>-x] [x^-x] [x>-x]]8/3
- [-s)-]8/3 s^ [-s)-]8/3
[k-k]>8/3 [--k]8/3 - [--k]8/3
- X -2
:end
:bar fill
[[x^-s] [sss] [ssq] [qgg]]8/3
[[k-k]> [--k]]8/3 -2
- X X X
:end
/*
Count in.
*/
xxxo
/* Play 8 :bars of the Bonham groove. */
:play bonham1
:play bonham2
:play bonham2
:play fill
:play bonham1
:play bonham2
:play bonham2
:play fill