Re: Quarter notes with bars like \breve

[Gregor Giesen]

Dear Abraham,

thanks, that is much better!

Best,
Gregor

Am Montag, den 29.02.2016, 06:36 -0700 schrieb tisimst:
> Gregor,
> 
> How about this:
> 
> %%%%%%%%%%%%%%%%%
> 
> \version "2.19.36"
> 
> #(define (qBarNote grob)
>   (grob-interpret-markup grob
>     #{
>       \markup {
>         \concat {
>           \hspace #-0.06
>           \path #0.12
>             #'((moveto 0 -0.6)
>                (lineto 0 0.6))
>           \musicglyph #"noteheads.s2"
>           \hspace #-0.02
>           \path #0.12
>             #'((moveto 0 -0.6)
>                (lineto 0 0.6))
>         }
>       }
>     #}))
> 
> qBarNotesOn = {
>   \omit Stem
>   \override NoteHead.stencil = #qBarNote
> }
> 
> qBarNotesOff = {
>   \undo \omit Stem
>   \revert NoteHead.stencil
> }
> 
> \relative c' {
>   <c e f a>2 \qBarNotesOn q4 \qBarNotesOff q |
> }
> 
> %%%%%%%%%%%%%%%%%
> 
> There's certainly more that could be done to make the functionality
> more robust (like checking for duration, style, etc.), but this
> should at least get you going.
> 
> HTH,
> Abraham
> 
> On Sun, Feb 28, 2016 at 3:12 PM, David Kastrup [via Lilypond]
> <[hidden email]> wrote:
> > Gregor Giesen <[hidden email]> writes: 
> > 
> > > Dear Simon, 
> > > 
> > > On 28.02.2016 20:12, Simon Albrecht wrote: 
> > >> On 28.02.2016 18:31, Gregor Giesen wrote: 
> > >> > how can I write a quarter note (without stem) embraced by two
> > bars 
> > >> > exactly like a note of the length \breve? 
> > >> 
> > >> It’s not easy, since the bars belong to the note head glyph used
> > by  
> > >> breve notes. Probably you need to combine three tools: 
> > >> – [\once] \hide Stem 
> > >> – Overriding the NoteHead stencil using a markup expression:  
> > >> <http://www.lilypond.org/doc/v2.18/Documentation/notation/modify
> > ing-s
> > >> tencils> 
> > >> – and the \path markup command  
> > >> <http://www.lilypond.org/doc/v2.18/Documentation/notation/graphi
> > c#ind
> > >> ex-_005cpath-1>  
> > >> for drawing the actual note head. I don’t have much experience
> > with  
> > >> this, others on the list might help. 
> > > thanks a lot! I tried the following, which unfortunately does not
> > scale 
> > > well. However, it is a quick fix: 
> > > 
> > > barPath = #'((moveto 0 -.6) 
> > >    (lineto 0 .6) 
> > >    (moveto 1.3 -.6) 
> > >    (lineto 1.3 .6) 
> > >    (closepath))
> > Working with curveto should likely scale better. 
> > 
> > _______________________________________________
> > lilypond-user mailing list
> > address@hidden
> > https://lists.gnu.org/mailman/listinfo/lilypond-user
> >

signature.asc
Description: This is a digitally signed message part