%% Generated by lilypond-book
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm]
\include "lilypond-book-preamble.ly"


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

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



\paper {
  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 Snippet Repository
%% (http://lsr.di.unimi.it).
%%
%% Make any changes in the LSR itself, or in
%% `Documentation/snippets/new/`, then run
%% `scripts/auxiliar/makelsr.pl`.
%%
%% This file is in the public domain.

\version "2.23.13"

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

%% Translation of GIT committish: a3fd5364fc4f247579da0ed2bfea887ab37285c6
  texidocfr = "
@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, comme vous pouvez le constater ici.
"

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

%% Translation of GIT committish: 8ffecf6be17c6ec2ff87cf31873121a8cce29b09
  texidoces = "
Se puede usar @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"

  lsrtags = "keyboards, tweaks-and-overrides"

  texidoc = "
@code{Staff.pedalSustainStrings} can be used 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 used 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
}



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