%% Generated by lilypond-book
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm,paper-height=845.047\pt,paper-width=597.508\pt,papersize='(cons (* 597.508 pt) (* 845.047 pt))]
\include "lilypond-book-preamble.ly"


% ****************************************************************
% Start cut-&-pastable-section
% ****************************************************************

#(ly:set-option 'eps-box-padding 3.000000)



\paper {
  #(set-paper-size '(cons (* 597.508 pt) (* 845.047 pt)))
  indent = 0\mm
  line-width = 160\mm
  % offset the left padding, also add 1mm as lilypond creates cropped
  % images with a little space on the right
  line-width = #(- line-width (* mm  3.000000) (* mm 1))
}

\layout {
  
}




% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "snippets/ancient-fonts.ly"
\sourcefileline 0
%% DO NOT EDIT this file manually; it was automatically
%% generated from `Documentation/snippets/new/`.
%%
%% Make any changes in `Documentation/snippets/new/`,
%% then run `scripts/auxiliar/makelsr.pl --new`.
%%
%% This file is in the public domain.
%%
%% Note: this file needs at least LilyPond version 2.24.0.

\version "2.24.0"

\header {
%% Translation of GIT committish: a8a85e19654e46d725563e6deba44083ef137a2c
  texidocja = "
以下に表示するのは、LilyPond の古代の記譜法に含まれる記号です。
"
  doctitleja = "古代の記譜法のフォント"

%% Translation of GIT committish: 606ac3c3b22c41d84aa5fa938d42da5125ac572a
  texidocfr ="
Voici de nombreux symboles contenus dans la fonte Emmentaler et que
LilyPond utilise en matière de musique ancienne.
"

  doctitlefr = "Gravure de musique ancienne"

%% Translation of GIT committish: 6744168afc10012e17916282ef5e4353cf1f4e3b
  texidoces = "
Este fragmento de código presenta muchos de los símbolos incluidos
en la fuente Emmentaler que LilyPond usa para tipografiar la
música antigua.
"
  doctitlees = "Tipografía de música antigua"

%% Translation of GIT committish: 3bd039bb1bb0ed2820458f957debbaa75511ca4e
  texidocca = "
Aquí es mostren molts dels símbols del Lilypond per a la musica
antiga.

"
  doctitleeca = "Tipus de lletra de música antiga"

  categories = "Ancient notation, Symbols and glyphs"

  texidoc = "
This snippets shows many of the symbols contained in the Emmentaler
font that are used by LilyPond for typesetting ancient notation.
"

  doctitle = "Ancient fonts"
} % begin verbatim


m = { c1 e f ges cis' \bar "||" }

\score {
  \new VaticanaVoice {
    \clef "vaticana-fa2"
    \key es \major
    \textMark \markup \rounded-box "Vaticana clefs, custos and note heads"

    \override NoteHead.style = #'vaticana.punctum
    <>^"vaticana.punctum" \m

    \override NoteHead.style = #'vaticana.inclinatum
    <>^"vaticana.inclinatum" \m

    \override NoteHead.style = #'vaticana.quilisma
    <>^"vaticana.quilisma" \m

    \clef "vaticana-fa1"
    \override NoteHead.style = #'vaticana.plica
    <>^"vaticana.plica" \m

    \override NoteHead.style = #'vaticana.reverse.plica
    <>^"vaticana.reverse.plica" \m

    \override NoteHead.style = #'vaticana.punctum.cavum
    <>^"vaticana.punctum.cavum" \m

    \override NoteHead.style = #'vaticana.lpes
    <>^"vaticana.punctum.lpes" \m

    \override NoteHead.style = #'vaticana.upes
    <>^"vaticana.punctum.upes" \m

    \override NoteHead.style = #'vaticana.vupes
    <>^"vaticana.punctum.vupes" \m

    \override NoteHead.style = #'vaticana.linea.punctum
    <>^"vaticana.punctum.linea" \m

    \override NoteHead.style = #'vaticana.epiphonus
    <>^"vaticana.punctum.epiphonus" \m

    \override NoteHead.style = #'vaticana.cephalicus
    <>^"vaticana.punctum.cephalicus" \m

    \break

    \textMark \markup \rounded-box "Medicaea clefs, custos and note heads"
    \set VaticanaStaff.alterationGlyphs =
      #alteration-medicaea-glyph-name-alist
    \override VaticanaStaff.Custos.style = #'medicaea

    \clef "medicaea-fa2"
    \override NoteHead.style = #'medicaea.punctum
    <>^"medicaea.punctum" \m

    \clef "medicaea-do2"
    \override NoteHead.style = #'medicaea.inclinatum
    <>^"medicaea.inclinatum" \m

    \override NoteHead.style = #'medicaea.virga
    <>^"medicaea.virga" \m

    \clef "medicaea-fa1"
    \override NoteHead.style = #'medicaea.rvirga
    <>^"medicaea.rvirga" \m

    \break

    \textMark \markup \rounded-box "Hufnagel clefs, custos and note heads"
    \set Staff.alterationGlyphs =
      #alteration-hufnagel-glyph-name-alist
    \override VaticanaStaff.Custos.style = #'hufnagel
    \clef "hufnagel-fa2"

    \break

    \override NoteHead.style = #'hufnagel.punctum
    <>^"hufnagel.punctum" \m

    \clef "hufnagel-do2"
    \override NoteHead.style = #'hufnagel.lpes
    <>^"hufnagel.lpes" \m

    \clef "hufnagel-do-fa"
    \override NoteHead.style = #'hufnagel.virga
    <>^"hufnagel.virga" \m
  }

  \layout {
    \context {
      \Score
      \override TextScript.font-size = #-2
      \override TextMark.break-align-symbols = #'(left-edge clef staff-bar)
      \override TextMark.padding = 4
      \omit BarNumber
    }
    \context {
      \VaticanaStaff
      alterationGlyphs =
        #alteration-vaticana-glyph-name-alist
    }
  }
}



% ****************************************************************
% end ly snippet
% ****************************************************************
