Documentation/snippets/fingering-symbols-for-wind-instruments.ly

   1 %% Do not edit this file; it is automatically
   2 %% generated from LSR http://lsr.dsi.unimi.it
   3 %% This file is in the public domain.
   4 \version "2.13.31"
   5
   6 \header {
   7 %% Translation of GIT committish: 496c48f1f2e4d345ae3637b2c38ec748a55cda1d
   8   texidoces = "
   9 Se pueden conseguir símbolos especiales combinando glifos existentes,
  10 lo que es de utilidad para la notación de instrumentos de viento.
  11
  12 "
  13   doctitlees = "Símbolos de digitación para instrumentos de viento"
  14
  15
  16 %% Translation of GIT committish: 496c48f1f2e4d345ae3637b2c38ec748a55cda1d
  17   texidocfr = "
  18 Des sumboles spécifiques peuvent être obtenus en combinant les glyphes
  19 disponibles, ce qui est tout à fait indiqué en matière d'instrument à vent.
  20
  21 "
  22   doctitlefr = "Symboles de doigtés pour instruments à vent"
  23
  24
  25   lsrtags = "winds"
  26
  27   texidoc = "
  28 Special symbols can be achieved by combining existing glyphs, which is
  29 useful for wind instruments.
  30
  31 "
  32   doctitle = "Fingering symbols for wind instruments"
  33 } % begin verbatim
  34
  35 centermarkup = {
  36   \once \override TextScript #'self-alignment-X = #CENTER
  37   \once \override TextScript #'X-offset =#(ly:make-simple-closure
  38     `(,+
  39       ,(ly:make-simple-closure (list
  40         ly:self-alignment-interface::centered-on-x-parent))
  41       ,(ly:make-simple-closure (list
  42         ly:self-alignment-interface::x-aligned-on-self))))
  43 }
  44 \score
  45 {\relative c'
  46   {
  47     g\open
  48     \once \override TextScript #'staff-padding = #-1.0 \centermarkup
  49     g^\markup{\combine \musicglyph #"scripts.open" \musicglyph
  50     #"scripts.tenuto"}
  51     \centermarkup g^\markup{\combine \musicglyph #"scripts.open"
  52     \musicglyph #"scripts.stopped"}
  53     g\stopped
  54   }
  55 }
  56