Re: Pralls and alterations

[Jan Nieuwenhuizen]

Maurizio Tomasi <address@hidden> writes:

> I need to typeset a prall with a small alteration above it. I found this
> is suitable:
>
> ------------------------------------------------------------------------
> a4^\prall^#'(music "accidentals-1")
> ------------------------------------------------------------------------
>
> but the sharp above the note is too big. How can I select a smaller font
> for the sharp only?
>
> Another question about this: if one want to print an alteration both above
> and below a turn? I tried the following:
>
> ------------------------------------------------------------------------
> \score {
>         \context Staff \notes \relative g'' {
>                  \key es \major
>                  g8.^#'(music "accidentals-1")^\turn^#'(music
> "accidentals-0")
>                  a16 bes4 r2
>         }
> }
> ------------------------------------------------------------------------
>
> but the sharp comes above the turn, not below!

This is hairier than I hoped.  Probably, the solutions of Simon are
handier (you should have a look at input/test/markup.ly and
input/test/metronome.ly), but I'm including this example here because
I've put some time in it, I can't find why overriding the priority
property is broken, and don't understand why the script order has no
effect.

Greetings,
Jan.

\score{
    \context Staff \notes \relative g''{
        \key es \major
        
        %% Hmm, no effect?
        %\property Score.Script \override #'script-priority = #1000
        
        a4^\prall^#'((music (font-relative-size . -2)) "accidentals-1")
        a4^#'((music (font-relative-size . -2)) "accidentals-1")^\prall
        
    }
    \paper{
        \translator{
            \ScoreContext
            %% Hmm.
            %% no effect: text script always wins
            %{
              scriptDefinitions = #(begin
              (set-cdr! (assoc "prall" default-script-alist)
              '((feta . ("prall" . "prall")) #f 0 1 200))
              default-script-alist)
            %}
            %% prall always wins
            % {
            scriptDefinitions = #(begin
            (set-cdr! (assoc "prall" default-script-alist)
            '((feta . ("prall" . "prall")) #f 0 1 201))
            default-script-alist)
            % }
        }
    }
}

-- 
Jan Nieuwenhuizen <address@hidden> | GNU LilyPond - The music typesetter
http://www.xs4all.nl/~jantien       | http://www.lilypond.org