Aaron Morse a écrit :
I want to be able to place something like:
\relative c'' {
g'4 g8 g8 g4. g8
}
Into a drum-staff, to show a rhythm above the staff. At first I
thought of changing the notehead of one of the cymbals to a regular
notehead, but I can't seem to figure out how to do that. g4 of course
won't display in a drum-voice/staff.
Thanks,
Aaron
Hi Aaron,
> I'm stuck with an issue here.
Do you have a scan/screenshot/picture of what you're looking for?
I can't really picture it... and so I won't be able to help much.
Cheers,
Kieren.
I attach a little template I use sometimes with an example inside.
(\version 2.10.33)
May be you can define one pitch from the list which is an extract of
drumpitch-init.ly
Here i've changed the guiro ( = gui )
You haven't to keep all the list. Only the pitch you choose.
Or you make a separate file and put an \include in your work.
Hope this helps
Phil.
\version "2.10.33"
% \include "/usr/share/lilypond/2.10.33/ly/drumpitch-init.ly"
% \include /home/.../0-mydrums-style.ly
% \include /home/.../0-mypercussions-style.ly
\header {
title = " "
}
#(define mydrums-style '(
(acousticbassdrum () #f -3)
(bassdrum () #f -3)
(sidestick cross #f 1)
(acousticsnare () #f 1)
(snare () #f 1)
(handclap triangle #f 1)
(electricsnare () #f 1)
(lowfloortom () #f -4)
(closedhihat cross "stopped" 3)
(hihat cross #f 3)
(highfloortom () #f -2)
(pedalhihat cross #f -5)
(lowtom () #f -1)
(openhihat cross "open" 3)
(halfopenhihat xcircle #f 3)
(lowmidtom () #f 0)
(himidtom () #f 2)
(crashcymbala xcircle #f 5)
(crashcymbal xcircle #f 5)
(hightom () #f 4)
(ridecymbala cross #f 5)
(ridecymbal cross #f 5)
(chinesecymbal mensural #f 5)
(ridebell () #f 5)
(tambourine () #f 6)
(splashcymbal diamond #f 5)
(cowbell triangle #f 5)
(crashcymbalb cross #f 5)
(vibraslap diamond #f 4)
(ridecymbalb cross #f 5)
))
#(define mypercussions-style '(
(tambourine () #f 6)
(lobongo () #f -1)
(openlobongo () "open" -1)
(mutelobongo () "stopped" -1)
(hibongo () #f 1)
(openhibongo () "open" 1)
(mutehibongo () "stopped" 1)
(loconga () #f -2)
(openloconga () "open" -1)
(muteloconga () "stopped" -1)
(hiconga () #f 2)
(openhiconga () "open" 2)
(mutehiconga () "stopped" 2)
(hitimbale () #f 1)
(lotimbale () #f -1)
(hiagogo () #f 1)
(loagogo () #f -1)
(cabasa cross #f 6)
(maracas cross #f 0)
(shortwhistle cross staccato -2)
(longwhistle cross tenuto -2)
(shortguiro cross staccato -4)
(longguiro cross tenuto -4)
(guiro cross #f 12)
(cowbell triangle #f 5)
(claves diamond #f 0)
(hiwoodblock () #f -3)
(lowoodblock () #f -4)
(mutecuica diamond "open" 1)
(opencuica diamond "stopped" 1)
(triangle cross #f 0)
(opentriangle cross "open" 0)
(mutetriangle cross "stopped" 0)
))
pulseone = \drummode {
\time 4/4
\tempo 4 = 120
bd 1
}
pulsetwo = \drummode {
\time 4/4
\tempo 4 = 120
boh 1
}
pulsethree = \drummode {
\time 4/4
\tempo 4 = 120
gui 1 % it's the "changed pitch"
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\score {
<<
\new DrumStaff \with {
drumStyleTable = #(alist->hash-table mydrums-style)
\override DrumStaff #'TimeSignature #'style = #'()
} <<
\set Staff.instrumentName = "Drums"
\override Score.MetronomeMark #'extra-offset = #'(-10 . 2.5)
\pulseone
>>
\new DrumStaff \with {
drumStyleTable = #(alist->hash-table mypercussions-style)
}
<<
\set Staff.instrumentName = \markup{ \column {"Bongos"
\line {"Congas"} } \hspace #1.0 }
\new DrumVoice { \pulsetwo }
\override DrumStaff.VerticalAxisGroup #'minimum-Y-extent = #'(-8 . 8 )
>>
\new DrumStaff \with {
drumStyleTable = #(alist->hash-table mypercussions-style)
}
<<
\set Staff.instrumentName = \markup{ \column {"Percussions"
\line {"diverses"} } \hspace #1.0 }
\new DrumVoice { \pulsethree }
\override DrumStaff.VerticalAxisGroup #'minimum-Y-extent = #'(-5 . 5 )
>>
>>
\layout {}
\midi {
\context {
\Score
tempoWholesPerMinute = #(ly:make-moment 120 4)
}
}
}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user