bug-lilypond
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: whole page rotated


From: Karol Majewski
Subject: Re: whole page rotated
Date: Sat, 03 May 2014 22:36:48 +0200

Harm, and what if I don't want to rotate my note head along with stem-dir? How 
to modify your code then? Some note heads look beeter when they are not being 
rotated.

> 
> If you only want noteheads of doThin-type, try:
> 
> \version "2.18.0"
> 
> #(define nhg
>   (lambda (grob)
>     (let* ((stil (ly:note-head::print grob))
>            (dur-log (ly:grob-property grob 'duration-log))
>            (nh-id-nr (if (>= dur-log 2) 2 1))
>            (stem (ly:grob-object grob 'stem))
>            (stem-dir (ly:grob-property stem 'direction))
>            (new-note-head-stil
>             (grob-interpret-markup grob
>               (markup #:musicglyph (format #f "noteheads.u~adoThin"
> nh-id-nr)))))
> 
>     (ly:stencil-scale new-note-head-stil 1 stem-dir))))
> 
> \layout {
>   \context {
>     \Voice
>     \override NoteHead.stencil = #nhg
>   }
> }
> 
> \relative c '' {
>   c1 c2 \repeat unfold 4 c8
>   \repeat unfold 64 c4
> }
> 
> 
> HTH,
>   Harm






reply via email to

[Prev in Thread] Current Thread [Next in Thread]