Documentation/snippets/string-number-extender-lines.ly

   1 % DO NOT EDIT this file manually; it is automatically
   2 % generated from Documentation/snippets/new
   3 % Make any changes in Documentation/snippets/new/
   4 % and then run scripts/auxiliar/makelsr.py
   5 %
   6 % This file is in the public domain.
   7 %% Note: this file works from version 2.15.20
   8 \version "2.15.20"
   9
  10 \header {
  11 %% Translation of GIT committish: 28097cf54698db364afeb75658e4c8e0e0ccd716
  12   texidocfr = "
  13 Voici comment ajouter une ligne de prolongation à une indication de
  14 numéro de corde, afin de stipuler que les notes qui suivent doivent être
  15 jouées sur la corde en question.
  16
  17 "
  18   doctitlefr = "Ligne de prolongation pour numéro de corde"
  19
  20   lsrtags = "editorial-annotations, text, fretted-strings, tweaks-and-overrides"
  21
  22   texidoc = "
  23 Make an extender line for string number indications, showing that a
  24 series of notes is supposed to be played all on the same string.
  25
  26 "
  27   doctitle = "String number extender lines"
  28 } % begin verbatim
  29
  30
  31 stringNumberSpanner =
  32 #(define-music-function (parser location StringNumber) (string?)
  33   #{
  34     \override TextSpanner #'style = #'solid
  35     \override TextSpanner #'font-size = #-5
  36     \override TextSpanner #'(bound-details left stencil-align-dir-y) = #CENTER
  37     \override TextSpanner #'(bound-details left text) = \markup { \circle \number #StringNumber }
  38   #})
  39
  40
  41 \relative c {
  42   \clef "treble_8"
  43   \stringNumberSpanner "5"
  44   \textSpannerDown
  45   a8\startTextSpan
  46   b c d e f\stopTextSpan
  47   \stringNumberSpanner "4"
  48   g\startTextSpan a
  49   bes4 a g2\stopTextSpan
  50 }
  51