1 #(ly:set-option 'old-relative)
9 tagline = "LilyPond example file by Amelie Zapf, Berlin 07/07/2003"
10 texidoc = "Jazz tune for combo (horns, piano, drums, bass, guitar)."
16 %%%%%%%%%%%% Some macros %%%%%%%%%%%%%%%%%%%
19 \property Voice.NoteHead \override #'style = #'slash
20 \property Voice.Stem \override #'length = #0 }
22 \property Voice.NoteHead \revert #'style
23 \property Voice.Stem \revert #'length }
24 cr = \property Voice.NoteHead \override #'style = #'cross
25 ncr = \property Voice.NoteHead \revert #'style
27 %% insert chord name style stuff here.
31 %%%%%%%%%%%% Keys'n'thangs %%%%%%%%%%%%%%%%%
37 Key = \notes \key c \major
39 % ############ Horns ############
40 % ------ Trumpet ------
41 trpt = \notes \transpose c d \relative c'' {
46 trpharmony = \chords \transpose c' d { \jzchords }
49 \property Staff.instrument = #"Trumpet"
56 % ------ Alto Saxophone ------
57 alto = \notes \transpose c a \relative c' {
62 altoharmony = \chords \transpose c' a { \jzchords }
65 \property Staff.instrument = #"Alto Sax"
72 % ------ Baritone Saxophone ------
73 bari = \notes \transpose c a' \relative c {
75 c1 c \sl d4^"Solo" d d d \nsl
78 bariharmony = \chords \transpose c' a { \jzchords s1 s d2:maj e:m7 }
81 \property Staff.instrument = #"Bari Sax"
87 % ------ Trombone ------
88 tbone = \notes \relative c {
93 tboneharmony = \chords { \jzchords }
96 \property Staff.instrument = #"Trombone"
102 % ############ Rhythm Section #############
103 % ------ Guitar ------
104 gtr = \notes \relative c'' {
106 c1 \sl b4 b b b \nsl c1
109 gtrharmony = \chords { \jzchords
115 \property Staff.instrument = #"Guitar"
122 %% ------ Piano ------
123 rhUpper = \notes \relative c'' {
129 rhLower = \notes \relative c' {
135 lhUpper = \notes \relative c' {
141 lhLower = \notes \relative c {
150 \property Staff.midiInstrument = "acoustic grand"
152 \context Voice = one \rhUpper
153 \context Voice = two \rhLower
160 \property Staff.midiInstrument = "acoustic grand"
162 \context Voice = one \lhUpper
163 \context Voice = two \lhLower
168 \context PianoStaff <
169 \property PianoStaff.instrument = #"Piano"
170 \context Staff = upper \PianoRH
171 \context Staff = lower \PianoLH
175 % ------ Bass Guitar ------
176 bass = \notes \relative c {
183 \property Staff.instrument = #"Bass"
190 % ------ Drums ------
191 \include "drumpitch-init.ly"
193 hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn>
194 hh4 <hh4 sn> hh4 <hh4 sn>
197 bd4 s bd s bd s bd s bd s bd s
200 drums = \context Staff = drums {
202 \property Staff.instrument = #"Drums"
205 \context Voice = first { \voiceOne \up }
206 \context Voice = second { \voiceTwo \down }
210 %%%%%%%%% It All Goes Together Here %%%%%%%%%%%%%%%%%%%%%%
214 \context StaffGroup = horns <
215 \context Staff = trumpet \trumpet
217 \context Staff = altosax \altosax
219 \context ChordNames = barichords \bariharmony
221 \context Staff = barisax \barisax
223 \context Staff = trombone \trombone
226 \context StaffGroup = rhythm <
227 \context ChordNames = chords \gtrharmony
228 \context Staff = guitar \guitar
229 \context PianoStaff = piano \piano
231 \context Staff = bass \bass
233 \apply #(drums->paper 'drums) \drums
236 \midi { \tempo 4 = 75 }
239 \translator { \RemoveEmptyStaffContext }
242 \consists Instrument_name_engraver
246 BarNumber \override #'padding = #3
247 RehearsalMark \override #'padding = #2