[prev in list] [next in list] [prev in thread] [next in thread]
List: lilypond-user
Subject: Re: Adding notes above drumstaff
From: Philippe Hezaine <philippe.hezaine () free ! fr>
Date: 2008-04-28 18:44:14
Message-ID: 48161AFE.2060103 () free ! fr
[Download RAW message or body]
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.
["00-Template-patterns-batterie.ly" (text/plain)]
\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)
}
}
}
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic