%% 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/changing-the-text-for-sustain-markings.ly"
\sourcefileline 0
%% DO NOT EDIT this file manually; it was automatically
%% generated from the LilyPond Wiki
%% (https://wiki.lilypond.community).
%%
%% Make any changes in the Wiki itself, or in
%% `Documentation/snippets/new/`, then run
%% `scripts/auxiliar/makelsr.pl`.
%%
%% This file is in the public domain.

\version "2.24.0"

\header {
%% Translation of GIT committish: a8a85e19654e46d725563e6deba44083ef137a2c
  texidocja = "
ペダル ダウンやペダル アップに使われるテキストは、@c
@code{Staff.pedalSustainStrings} で変更できます。@c
このスニペットに表示されているものがグリフの全てであり、@c
これ以外の文字は使用することができません。
"
  doctitleja = "サステイン ペダル記号のテキストを変更する"

%% Translation of GIT committish: de1e42ce512f3690387cdd065109bddff1b7bd6d
  texidocfr = "
La propriété de contexte @code{Staff.pedalSustainStrings} permet de
définir le texte affiché pour les instructions de pédale Les seuls
caractères autorisés sont les glyphes particuliers de pédale ici
présentés.
"

  doctitlefr = "Modification du texte des indications de pédale"

%% Translation of GIT committish: cd3e2b0177d366d0a25b4c7628b26455e52175cd
  texidoces = "
Se puede usar la propiedad de contexto
@code{Staff.pedalSustainStrings} para fijar el texto de las
indicaciones de pisar pedal y levantar pedal.  Observe que las
únicas cadenas válidas son las que están en la lista de glifos de
pedal: los valores que aparecen en este fragmento de código son
una relación exhaustiva.

"
  doctitlees = "Modificar el texto de las indicaciones de pedal"

%% Translation of GIT committish: 8ffecf6be17c6ec2ff87cf31873121a8cce29b09
  texidocca = "
Es pot usar @code{Staff.pedalSustainStrings} per fixar el text de les
indicacions de pisar pedal i aixecar pedal.  Observeu que les úniques
cadenes vàlides són les que estan a la llista de glifs de pedal: els
valors que apareixen en aquest fragment de codi són una relació
exhaustiva.

"
  doctitleca = "Modificar el text de las indicacions de pedal"

  categories = "Keyboards, Tweaks and overrides"

  texidoc = "
With the @code{pedalSustainStrings} context property it is possible to
set the text used for pedal down and up. Note that the only valid
strings are those found in the list of pedal glyphs -- the values shown
in this snippet constitute an exhaustive list.
"

  doctitle = "Changing the text for sustain markings"
} % begin verbatim


sustainNotes = { c4\sustainOn d e\sustainOff\sustainOn f\sustainOff }

\relative c' {
  \sustainNotes
  \set Staff.pedalSustainStrings = #'("P" "P-" "-")
  \sustainNotes
  \set Staff.pedalSustainStrings = #'("d" "de" "e")
  \sustainNotes
  \set Staff.pedalSustainStrings = #'("M" "M-" "-")
  \sustainNotes
  \set Staff.pedalSustainStrings = #'("Ped" "*Ped" "*")
  \sustainNotes
}

\layout {
  ragged-right = ##f
}



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