diff options
Diffstat (limited to 'Documentation/snippets/new')
66 files changed, 0 insertions, 4996 deletions
diff --git a/Documentation/snippets/new/adding-fingerings-to-tablatures.ly b/Documentation/snippets/new/adding-fingerings-to-tablatures.ly deleted file mode 100644 index 830df4d795..0000000000 --- a/Documentation/snippets/new/adding-fingerings-to-tablatures.ly +++ /dev/null @@ -1,37 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -To add fingerings to tablatures, use a combination of @code{\\markup} -and @code{\\finger}. -" - doctitle = "Adding fingerings to tablatures" -} - -one = \markup { \finger 1 } -two = \markup { \finger 2 } -threeTwo = \markup { - \override #'(baseline-skip . 2) - \column { - \finger 3 - \finger 2 - } -} -threeFour = \markup { - \override #'(baseline-skip . 2) - \column { - \finger 3 - \finger 4 - } -} - -\score { - \new TabStaff { - \tabFullNotation - \stemUp - e8\4^\one b\2 <g\3 e'\1>^>[ b\2 e\4] - <a\3 fis'\1>^>^\threeTwo[ b\2 e\4] - } -} - diff --git a/Documentation/snippets/new/adjusting-lyrics-vertical-spacing.ly b/Documentation/snippets/new/adjusting-lyrics-vertical-spacing.ly deleted file mode 100644 index 7a707d5a29..0000000000 --- a/Documentation/snippets/new/adjusting-lyrics-vertical-spacing.ly +++ /dev/null @@ -1,33 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "text, vocal-music, spacing" - texidoc = " -This snippet shows how to bring the lyrics line closer to the staff. - -" - doctitle = "Adjusting lyrics vertical spacing" -} - -% Default layout: -<< - \new Staff \new Voice = melody \relative c' { - c4 d e f - g4 f e d - c1 - } - \new Lyrics \lyricsto melody { aa aa aa aa aa aa aa aa aa } - - % Reducing the minimum space below the staff and above the lyrics: - \new Staff { - \new Voice = melody \relative c' { - c4 d e f - g4 f e d - c1 - } - } - \new Lyrics \with { - \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing = #'((basic-distance . 1)) - } - \lyricsto melody { aa aa aa aa aa aa aa aa aa } ->> diff --git a/Documentation/snippets/new/alternative-breve-note.ly b/Documentation/snippets/new/alternative-breve-note.ly deleted file mode 100644 index 0534ef1b47..0000000000 --- a/Documentation/snippets/new/alternative-breve-note.ly +++ /dev/null @@ -1,13 +0,0 @@ -\version "2.14.0" -\header { - lsrtags = "rhythms,expressive-marks" - texidoc = "This code demonstrates how to use the alternative breve note -with two vertical lines on each side of the notehead instead of one line." - doctitle = "Alternative breve notehead with double vertical lines" -} - -\relative c'' { - \time 4/2 - \override Staff.NoteHead #'style = #'altdefault - c\breve | b\breve -} diff --git a/Documentation/snippets/new/ancient-headword.ly b/Documentation/snippets/new/ancient-headword.ly deleted file mode 100644 index aff4337468..0000000000 --- a/Documentation/snippets/new/ancient-headword.ly +++ /dev/null @@ -1,134 +0,0 @@ -\version "2.14.0" - -#(set-global-staff-size 15) -\paper { - ragged-right = ##t - line-width = 17\cm - indent = 0\cm -} - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -\include "gregorian.ly" - -\score { - << - \new VaticanaVoice = "cantus" { - \clef "vaticana-do3" - % Verse 1 — Salve, Regína - a\melisma \[ a \flexa g \pes a\melismaEnd \] d - \divisioMinima - \[ a\melisma \flexa g\melismaEnd \] - \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \] - \[ e\melisma \flexa d\melismaEnd \] - \divisioMaior - c d \[d\melisma \flexa c\melismaEnd \] d - \[ e\melisma \pes f\melismaEnd\] g - \[d\melisma \pes e \flexa c\melismaEnd \] d - \finalis - % Verse 2 — Vita, dulcédo - % a\melisma \[ a \flexa g \pes a\melismaEnd \] d - % \divisioMinima - % \[ a\melisma \flexa g\melismaEnd \] - % \[ f\melisma \flexa e f \pes g \flexa f\melismaEnd \] - % \[ e\melisma \flexa d\melismaEnd \] - % \divisioMaior - % c d \[e\melisma \pes f\melismaEnd \] g - % \[d\melisma \pes e \flexa c\melismaEnd \] d - % \finalis - % Verse 3 — Ad te clamámus - \[ d\melisma \pes f\melismaEnd\] a g - \[ g\melisma \flexa f \pes a\melismaEnd\] e - \divisioMaior - g f \[ e\melisma \flexa d \pes g\melismaEnd \] - \divisioMinima - c d \[ e\melisma \flexa d \pes g\melismaEnd \] - \[ f\melisma \flexa e\melismaEnd \] d - \finalis - % Verse 4 — Ad te suspirámus - \[ d\melisma \pes f\melismaEnd \] a c' g - \[ g\melisma \flexa f \pes g\melismaEnd \] a - \divisioMaior - d \[ f\melisma \pes \deminutum g\melismaEnd \] g d - \[ \virga f\melisma \inclinatum e \inclinatum d\melismaEnd \] - c \divisioMaior - d \[ d\melisma \flexa c \pes f\melismaEnd \] - \[ g\melisma \pes a\melismaEnd \] - g \[ f\melisma \flexa e\melismaEnd \] g - \[ f\melisma \flexa \deminutum e\melismaEnd \] - \[ d\melisma \flexa c \pes d\melismaEnd \] - \finalis - % Verse 5 — Eia ergo, Advocáta nostra - f\melisma \[ f \pes g\melismaEnd \] f - \[ g\melisma \pes \deminutum a\melismaEnd \] a - \divisioMinima - c' g \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] d g a - \divisioMaior - d' d' \[ c'\melisma \flexa b c' \pes d'\melismaEnd \] a - \divisioMinima - d' c' a \[ g\melisma \flexa f \pes a\melismaEnd \] g - \[ d\melisma \pes e\melismaEnd \] f - \[ \virga e\melisma \inclinatum d \inclinatum c\melismaEnd \] - \divisioMaior - \[ c\melisma \pes d\melismaEnd \] - f \[ g\melisma \flexa \deminutum f\melismaEnd \] - \[ d\melisma \flexa c \pes d\melismaEnd \] d - \finalis - % Verse 6 — Et Jesum - d a, \[ c\melisma \pes d\melismaEnd \] - \divisioMinima - d \[ d\melisma \pes e\melismaEnd \] \[ e\melisma \flexa d d\melismaEnd \] - c g f \[ e\melisma \flexa \deminutum d\melismaEnd \] g - \[ f\melisma \flexa e\melismaEnd \] - \[ d\melisma \flexa c \pes d\melismaEnd \] - \[ d\melisma \pes a \] \virga bes\melismaEnd a - \divisioMinima - \[ \virga a\melisma \inclinatum g \inclinatum f\melismaEnd \] g d f - \[ f\melisma \flexa e\melismaEnd \] \[ d\melisma \flexa c\melismaEnd \] - \divisioMinima - \[ e\melisma \pes f \flexa e\melismaEnd \] d d - \finalis - % Verse 7 ad finem — O clemens: O pia: O dulcis Virgo María - a\melisma \[a \flexa g a \quilisma b \pes c'\melismaEnd \] - \[ \virga b\melisma \inclinatum a \inclinatum g\melismaEnd \] a - \finalis - \[ g\melisma \pes a \quilisma b \pes c' \] \[ c' \flexa b\melismaEnd \] - \[ a\melisma \flexa g\melismaEnd \] \[ g\melisma \pes a\melismaEnd \] - \finalis - \[ a\melisma \flexa d \virga f \inclinatum e \inclinatum d \inclinatum c d \] - \divisioMinima - \[ d \pes e f \pes g\melismaEnd \] - \[ g\melisma \flexa \deminutum f\melismaEnd \] - \[ g\melisma \pes a\melismaEnd \] - d c d \[ d\melisma \pes g \flexa f f\melismaEnd \] - \[ e\melisma \flexa d\melismaEnd \] - \finalis - } - \new Lyrics \lyricsto "cantus" { - Sal- ve, Re- gí- na, ma- ter mi- se- ri- cór- di- ae: - % Vi- ta, dul- cé- do, et spes no- stra, sal- ve. - Ad te cla- má- mus, éx- su- les, fi- li- i He- vae. - Ad te su- spi- rá- mus, ge- mén- tes et flen- tes in hac la- cri- má- rum - val- le. - E- ia er- go, Ad- vo- cá- ta no- stra, il- los tu- os mi- se- ri- cór- des - ó- cu- los ad nos con- vér- te. - Et Je- sum, be- ne- díc- tum fruc- tum ven- tris tu- i, no- bis post hoc - ex- sí- li- um os- tén- de. - O cle- mens: - O pi- a: - O dul- cis Vir- go Ma- rí- a. - } - >> -} - -\layout { - \context { - \Staff - \consists "Custos_engraver" - } -} diff --git a/Documentation/snippets/new/automatic-beam-subdivisions.ly b/Documentation/snippets/new/automatic-beam-subdivisions.ly deleted file mode 100644 index 64bc6ee34c..0000000000 --- a/Documentation/snippets/new/automatic-beam-subdivisions.ly +++ /dev/null @@ -1,39 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - - texidoc = " -Beams can be subdivided automatically. By setting the property -@code{subdivideBeams}, beams are subdivided at beat positions (as -specified in @code{baseMoment}). - -" - doctitle = "Automatic beam subdivisions" -} - -\new Staff { - \relative c'' { - << - { - \voiceOne - \set subdivideBeams = ##t - b32[ a g f c' b a g - b32^"subdivide beams" a g f c' b a g] - } - \new Voice { - \voiceTwo - b32_"default"[ a g f c' b a g - b32 a g f c' b a g] - } - >> - \oneVoice - \set baseMoment = #(ly:make-moment 1 8) - \set beatStructure = #'(2 2 2 2) - b32^"baseMoment 1 8"[ a g f c' b a g] - \set baseMoment = #(ly:make-moment 1 16) - \set beatStructure = #'(4 4 4 4) - b32^"baseMoment 1 16"[ a g f c' b a g] - } -} - diff --git a/Documentation/snippets/new/beam-endings-in-score-context.ly b/Documentation/snippets/new/beam-endings-in-score-context.ly deleted file mode 100644 index b622ac1a1d..0000000000 --- a/Documentation/snippets/new/beam-endings-in-score-context.ly +++ /dev/null @@ -1,43 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -Beat structure rules specified in the @code{Score} context apply to all -staves, but can be modified at both @code{Staff} and @code{Voice} -levels: -" - doctitle = "Beam endings in Score context" -} - -\relative c'' { - \time 5/4 - % Set default beaming for all staves - \set Score.baseMoment = #(ly:make-moment 1 8) - \set Score.beatStructure = #'(3 4 3) - << - \new Staff { - c8 c c c c c c c c c - } - \new Staff { - % Modify beaming for just this staff - \set Staff.beatStructure = #'(6 4) - c8 c c c c c c c c c - } - \new Staff { - % Inherit beaming from Score context - << - { - \voiceOne - c8 c c c c c c c c c - } - % Modify beaming for this voice only - \new Voice { - \voiceTwo - \set Voice.beatStructure = #'(6 4) - a8 a a a a a a a a a - } - >> - } - >> -} diff --git a/Documentation/snippets/new/beam-grouping-in-7-8-time.ly b/Documentation/snippets/new/beam-grouping-in-7-8-time.ly deleted file mode 100644 index c33112b676..0000000000 --- a/Documentation/snippets/new/beam-grouping-in-7-8-time.ly +++ /dev/null @@ -1,20 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -There is no default beat structure specified for 7/8 time, -so if automatic beams are required the structure must be specified. For -example, to group all beams 2-3-2 in 7/8 time, specify the -beat structure to be (2 3 2): -" - doctitle = "Beam grouping in 7/8 time" -} - -\relative c'' { - \time 7/8 - % rhythm 2-3-2 - a8 a a a a a a - \set Score.beatStructure = #'(2 3 2) - a8 a a a a a a -} diff --git a/Documentation/snippets/new/changing-the-ambitus-gap.ly b/Documentation/snippets/new/changing-the-ambitus-gap.ly deleted file mode 100644 index 982a447aa0..0000000000 --- a/Documentation/snippets/new/changing-the-ambitus-gap.ly +++ /dev/null @@ -1,40 +0,0 @@ -\version "2.14.0" -\header { - lsrtags = "pitches" - texidoc = "It is possible to change the default gap setting for -ambitus." - - doctitle = "Changing the ambitus gap" -} - - -\layout { - \context { - \Voice - \consists "Ambitus_engraver" - } -} - -\new Staff { - \time 2/4 - % Default setting - c'4 g'' -} - -\new Staff { - \time 2/4 - \override AmbitusLine #'gap = #0 - c'4 g'' -} - -\new Staff { - \time 2/4 - \override AmbitusLine #'gap = #1 - c'4 g'' -} - -\new Staff { - \time 2/4 - \override AmbitusLine #'gap = #1.5 - c'4 g'' -} diff --git a/Documentation/snippets/new/changing-the-number-of-augmentation-dots-per-note.ly b/Documentation/snippets/new/changing-the-number-of-augmentation-dots-per-note.ly deleted file mode 100644 index 8d7a6c16f5..0000000000 --- a/Documentation/snippets/new/changing-the-number-of-augmentation-dots-per-note.ly +++ /dev/null @@ -1,17 +0,0 @@ -\version "2.14.0" -\header { - lsrtags = "rhythms,expressive-marks" - texidoc = "This code demonstrates how to change the number of -augmentation dots on a single note." - doctitle = "Changing the number of augmentation dots per note" -} - -\relative c' { - c4.. a16 r2 | - \override Dots #'dot-count = #4 - c4.. a16 r2 | - \override Dots #'dot-count = #0 - c4.. a16 r2 | - \revert Dots #'dot-count - c4.. a16 r2 | -} diff --git a/Documentation/snippets/new/changing-the-size-of-woodwind-diagrams.ly b/Documentation/snippets/new/changing-the-size-of-woodwind-diagrams.ly deleted file mode 100644 index 9cccb9177a..0000000000 --- a/Documentation/snippets/new/changing-the-size-of-woodwind-diagrams.ly +++ /dev/null @@ -1,31 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags="winds" - texidoc=" -The size and thickness of woodwind diagrams can be changed. -" - - doctitle = "Changing the size of woodwind diagrams" -} - -\relative c'' { - \textLengthOn - c1^\markup - \woodwind-diagram - #'piccolo - #'() - - c^\markup - \override #'(size . 1.5) { - \woodwind-diagram - #'piccolo - #'() - } - c^\markup - \override #'(thickness . 0.15) { - \woodwind-diagram - #'piccolo - #'() - } -} diff --git a/Documentation/snippets/new/changing-the-time-signature-without-affecting-the-beaming.ly b/Documentation/snippets/new/changing-the-time-signature-without-affecting-the-beaming.ly deleted file mode 100644 index d2bc6c98e8..0000000000 --- a/Documentation/snippets/new/changing-the-time-signature-without-affecting-the-beaming.ly +++ /dev/null @@ -1,19 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -The @code{\\time} command sets the properties -@code{timeSignatureFraction}, @code{beatLength}, @code{beatGrouping} -and @code{measureLength} in the @code{Timing} context, which is -normally aliased to @code{Score}. Changing the value of -@code{timeSignatureFraction} causes the new time signature symbol to be -printed without changing any of the other properties: - -" - doctitle = "Changing the time signature without affecting the beaming" -} - -\markup { - This snippet is deprecated as of 2.13.5 and will be removed in 2.14 -} diff --git a/Documentation/snippets/new/chord-glissando-in-tablature.ly b/Documentation/snippets/new/chord-glissando-in-tablature.ly deleted file mode 100644 index 0434389970..0000000000 --- a/Documentation/snippets/new/chord-glissando-in-tablature.ly +++ /dev/null @@ -1,27 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -Slides for chords can be indicated in both Staff and TabStaff. -String numbers are necessary for TabStaff because automatic -string calculations are different for chords and for single notes. -" - doctitle = "Chord glissando in tablature" -} - -myMusic = \relative c' { - <c\3 e\2 g\1>1 \glissando <f\3 a\2 c\1> -} - -\score { - << - \new Staff { - \clef "treble_8" - \myMusic - } - \new TabStaff { - \myMusic - } - >> -} diff --git a/Documentation/snippets/new/chordchanges-for-fretboards.ly b/Documentation/snippets/new/chordchanges-for-fretboards.ly deleted file mode 100644 index e8e8236d41..0000000000 --- a/Documentation/snippets/new/chordchanges-for-fretboards.ly +++ /dev/null @@ -1,23 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = "FretBoards can be set to display only when the chord changes -or at the beginning of a new line." - doctitle = "chordChanges for FretBoards" -} - -\include "predefined-guitar-fretboards.ly" - -myChords = \chordmode { - c1 c1 \break - \set chordChanges = ##t - c1 c1 \break - c1 c1 \break -} - -<< - \new ChordNames { \myChords } - \new FretBoards { \myChords } - \new Staff { \myChords } ->> diff --git a/Documentation/snippets/new/clip-systems.ly b/Documentation/snippets/new/clip-systems.ly deleted file mode 100644 index 3f412325dd..0000000000 --- a/Documentation/snippets/new/clip-systems.ly +++ /dev/null @@ -1,88 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "paper-and-layout" - - texidoc = " -This code shows how to clip (extract) snippets from a full score. - -This file needs to be run separately with @option{-dclip-systems}; the -snippets page may not adequately show the results. - -The result will be files named -@samp{base-from-start-to-end[-count].eps}. - - -If system starts and ends are included, they include extents of the -System grob, e.g., instrument names. - - -Grace notes at the end point of the region are not included. - - -Regions can span multiple systems. In this case, multiple EPS files -are generated. - -" - doctitle = "Clip systems" -} - -#(ly:set-option 'clip-systems) -#(define output-suffix "1") - -origScore = \score { - \relative c' { - \set Staff.instrumentName = #"bla" - c1 - d1 - \grace c16 e1 - \key d \major - f1 \break - \clef bass - g,1 - fis1 - } -} - -\book { - \score { - \origScore - \layout { - % Each clip-region is a (START . END) pair - % where both are rhythmic-locations. - - % (make-rhythmic-locations BAR-NUMBER NUM DEN) - % means NUM/DEN whole-notes into bar numbered BAR-NUMBER - - clip-regions = #(list - (cons - (make-rhythmic-location 2 0 1) - (make-rhythmic-location 4 0 1)) - - (cons - (make-rhythmic-location 0 0 1) - (make-rhythmic-location 4 0 1)) - - (cons - (make-rhythmic-location 0 0 1) - (make-rhythmic-location 6 0 1)) - ) - } - } -} - -#(ly:set-option 'clip-systems #f) -#(define output-suffix #f) - -\book { - \score { \origScore } - \markup { \bold \fontsize #6 clips } - \score { - \lyrics { - \markup { from-2.0.1-to-4.0.1-clip.eps } - \markup { - \epsfile #X #30.0 #(format #f "~a-1-from-2.0.1-to-4.0.1-clip.eps" - (ly:parser-output-name parser)) } - } - } -} diff --git a/Documentation/snippets/new/compound-time-signatures.ly b/Documentation/snippets/new/compound-time-signatures.ly deleted file mode 100644 index de0d73f6d5..0000000000 --- a/Documentation/snippets/new/compound-time-signatures.ly +++ /dev/null @@ -1,19 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -Odd 20th century time signatures (such as \"5/8\") can often be played -as compound time signatures (e.g. \"3/8 + 2/8\"), which combine two or -more inequal metrics. LilyPond can make such music quite easy to read -and play, by explicitly printing the compound time signatures and -adapting the automatic beaming behavior. (Graphic measure grouping -indications can also be added; see the appropriate snippet in this -database.) -" - doctitle = "Compound time signatures" -} - -\markup { - This snippet is deprecated as of 2.15.9 and will be removed in 2.16 -} diff --git a/Documentation/snippets/new/controlling-spanner-visibility-after-a-line-break.ly b/Documentation/snippets/new/controlling-spanner-visibility-after-a-line-break.ly deleted file mode 100644 index 8c9c8ce80a..0000000000 --- a/Documentation/snippets/new/controlling-spanner-visibility-after-a-line-break.ly +++ /dev/null @@ -1,37 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, tweaks-and-overrides" - texidoc = "The visibility of spanners which end on the first note -following a line break is controlled by the @code{after-line-breaking} -callback @code{ly:spanner::kill-zero-spanned-time}. - -For objects such as glissandos and hairpins, the default behaviour is -to hide the spanner after a break; disabling the callback will allow -the left-broken span to be shown. - -Conversely, spanners which are usually visible, such as text spans, -can be hidden by enabling the callback. -" - - doctitle = "Controlling spanner visibility after a line break" -} - -\paper { ragged-right = ##t } - -\relative c'' { - \override Hairpin #'to-barline = ##f - \override Glissando #'breakable = ##t - % show hairpin - \override Hairpin #'after-line-breaking = ##t - % hide text span - \override TextSpanner #'after-line-breaking = - #ly:spanner::kill-zero-spanned-time - e2\<\startTextSpan - % show glissando - \override Glissando #'after-line-breaking = ##t - f2\glissando - \break - f,1\!\stopTextSpan -} - diff --git a/Documentation/snippets/new/defining-an-engraver-in-scheme-ambitus-engraver.ly b/Documentation/snippets/new/defining-an-engraver-in-scheme--ambitus-engraver.ly index 8958cd9e12..8958cd9e12 100644 --- a/Documentation/snippets/new/defining-an-engraver-in-scheme-ambitus-engraver.ly +++ b/Documentation/snippets/new/defining-an-engraver-in-scheme--ambitus-engraver.ly diff --git a/Documentation/snippets/new/defining-predefined-fretboards-for-other-instruments.ly b/Documentation/snippets/new/defining-predefined-fretboards-for-other-instruments.ly deleted file mode 100644 index ecf20eb40b..0000000000 --- a/Documentation/snippets/new/defining-predefined-fretboards-for-other-instruments.ly +++ /dev/null @@ -1,110 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - - texidoc = " -Predefined fret diagrams can be added for new instruments in addition -to the standards used for guitar. This file shows how this is done by -defining a new string-tuning and a few predefined fretboards for the -Venezuelan cuatro. - -This file also shows how fingerings can be included in the chords used -as reference points for the chord lookup, and displayed in the fret -diagram and the @code{TabStaff}, but not the music. - - -These fretboards are not transposable because they contain string -information. This is planned to be corrected in the future. - -" - doctitle = "Defining predefined fretboards for other instruments" -} - -% add FretBoards for the Cuatro -% Note: This section could be put into a separate file -% predefined-cuatro-fretboards.ly -% and \included into each of your compositions - -cuatroTuning = #`(,(ly:make-pitch 0 6 0) - ,(ly:make-pitch 1 3 SHARP) - ,(ly:make-pitch 1 1 0) - ,(ly:make-pitch 0 5 0)) - -dSix = { <a\4 b\1 d\3 fis\2> } -dMajor = { <a\4 d\1 d\3 fis \2> } -aMajSeven = { <a\4 cis\1 e\3 g\2> } -dMajSeven = { <a\4 c\1 d\3 fis\2> } -gMajor = { <b\4 b\1 d\3 g\2> } - -\storePredefinedDiagram #default-fret-table \dSix - #cuatroTuning - #"o;o;o;o;" -\storePredefinedDiagram #default-fret-table \dMajor - #cuatroTuning - #"o;o;o;3-3;" -\storePredefinedDiagram #default-fret-table \aMajSeven - #cuatroTuning - #"o;2-2;1-1;2-3;" -\storePredefinedDiagram #default-fret-table \dMajSeven - #cuatroTuning - #"o;o;o;1-1;" -\storePredefinedDiagram #default-fret-table \gMajor - #cuatroTuning - #"2-2;o;1-1;o;" - -% end of potential include file /predefined-cuatro-fretboards.ly - - -#(set-global-staff-size 16) - -primerosNames = \chordmode { - d:6 d a:maj7 d:maj7 - g -} -primeros = { - \dSix \dMajor \aMajSeven \dMajSeven - \gMajor -} - -\score { - << - \new ChordNames { - \set chordChanges = ##t - \primerosNames - } - - \new Staff { - \new Voice \with { - \remove "New_fingering_engraver" - } - \relative c'' { - \primeros - } - } - - \new FretBoards { - \set stringTunings = #cuatroTuning -% \override FretBoard -% #'(fret-diagram-details string-count) = #'4 - \override FretBoard - #'(fret-diagram-details finger-code) = #'in-dot - \primeros - } - - \new TabStaff \relative c'' { - \set TabStaff.stringTunings = #cuatroTuning - \primeros - } - - >> - - \layout { - \context { - \Score - \override SpacingSpanner - #'base-shortest-duration = #(ly:make-moment 1 16) - } - } - \midi { } -} diff --git a/Documentation/snippets/new/displaying-complex-chords.ly b/Documentation/snippets/new/displaying-complex-chords.ly deleted file mode 100644 index f3efe63b7c..0000000000 --- a/Documentation/snippets/new/displaying-complex-chords.ly +++ /dev/null @@ -1,25 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "simultaneous-notes, chords" - texidoc = " -Here is a way to display a chord where the same note is played twice -with different accidentals. -" - doctitle = "Displaying complex chords" -} - -fixA = { - \once \override Stem #'length = #9 -} -fixB = { - \once \override NoteHead #'X-offset = #1.7 - \once \override Stem #'rotation = #'(45 0 0) - \once \override Stem #'extra-offset = #'(-0.2 . -0.2) - \once \override Flag #'style = #'no-flag - \once \override Accidental #'extra-offset = #'(4 . 0) -} - -\relative c' { - << { \fixA <b d!>8 } \\ { \voiceThree \fixB dis } >> s -} diff --git a/Documentation/snippets/new/displaying-grob-ancestry.ly b/Documentation/snippets/new/displaying-grob-ancestry.ly deleted file mode 100644 index 3cee26c5da..0000000000 --- a/Documentation/snippets/new/displaying-grob-ancestry.ly +++ /dev/null @@ -1,132 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "tweaks-and-overrides" - - texidoc = " -When working with grob callbacks, it can be helpful to understand a -grob's @qq{ancestry}. Most grobs have @qq{parents} which influence the -positioning of the grob. X- and Y-parents influence the horizontal and -vertical positions for the grob, respectively. Additionally, each -parent may have parents of its own. - - -Unfortunately, there are several aspects of a grob's ancestry that can -lead to confusion: - - -@itemize - -@item -The types of parents a grob has may depend on context. - -@item -For some grobs, the X- and Y-parents are the same. - -@item -A particular @qq{ancestor} may be related to a grob in multiple ways. - -@item -The concept of @qq{generations} is misleading. - -@end itemize - - -For example, the @code{System} grob can be both parent (on the Y-side) -and grandparent (twice on the X-side) to a @code{VerticalAlignment} -grob. - - -This macro prints (to the console) a textual representation of a grob's -ancestry. - - -When called this way - -@example -@{ - \\once \\override NoteHead #'before-line-breaking = #display-ancestry - c4 -@} -@end example - - -The following output is generated: - - -@example ------------------------------------- - -NoteHead X,Y: NoteColumn - X: PaperColumn - X,Y: System - Y: VerticalAxisGroup - X: NonMusicalPaperColumn - X,Y: System - Y: VerticalAlignment - X: NonMusicalPaperColumn - X,Y: System - Y: System -@end example - - -" - doctitle = "Displaying grob ancestry" -} - -#(define (grob-name grob) - (if (ly:grob? grob) - (assoc-ref (ly:grob-property grob 'meta) 'name) - #f)) - -#(define (get-ancestry grob) - (if (not (null? (ly:grob-parent grob X))) - (list (grob-name grob) - (get-ancestry (ly:grob-parent grob X)) - (get-ancestry (ly:grob-parent grob Y))) - (grob-name grob))) - -#(define (format-ancestry lst padding) - (string-append - (symbol->string (car lst)) - "\n" - (let ((X-ancestry - (if (list? (cadr lst)) - (format-ancestry (cadr lst) (+ padding 3)) - (symbol->string (cadr lst)))) - (Y-ancestry - (if (list? (caddr lst)) - (format-ancestry (caddr lst) (+ padding 3)) - (symbol->string (caddr lst))))) - (if (equal? X-ancestry Y-ancestry) - (string-append - (format #f "~&") - (make-string padding #\space) - "X,Y: " - (if (list? (cadr lst)) - (format-ancestry (cadr lst) (+ padding 5)) - (symbol->string (cadr lst)))) - (string-append - (format #f "~&") - (make-string padding #\space) - "X: " X-ancestry - "\n" - (make-string padding #\space) - "Y: " Y-ancestry - (format #f "~&")))) - (format #f "~&"))) - -#(define (display-ancestry grob) - (display - (string-append - (format #f "~3&~a~2%" (make-string 36 #\-)) - (format-ancestry (get-ancestry grob) 0) - (format #f "~2&")))) - -\relative c' { - \once \override NoteHead #'before-line-breaking = #display-ancestry - f4 - \once \override Accidental #'before-line-breaking = #display-ancestry - \once \override Arpeggio #'before-line-breaking = #display-ancestry - <f as c>4\arpeggio -} diff --git a/Documentation/snippets/new/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly b/Documentation/snippets/new/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly deleted file mode 100644 index cb3e2ffa39..0000000000 --- a/Documentation/snippets/new/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly +++ /dev/null @@ -1,23 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "pitches" - texidoc = " -In early 20th century works, starting with Schoenberg, Berg and Webern -(the @qq{Second} Viennese school), every pitch in the twelve-tone scale -has to be regarded as equal, without any hierarchy such as the -classical (tonal) degrees. Therefore, these composers print one -accidental for each note, even at natural pitches, to emphasize their -new approach to music theory and language. - -This snippet shows how to achieve such notation rules. - -" - doctitle = "Dodecaphonic-style accidentals for each note including naturals" -} - -\markup { - This snippet is deprecated as of version 2.12 and - will be removed from the documentation in 2.14. -} - diff --git a/Documentation/snippets/new/dynamics-custom-text-spanner-postfix.ly b/Documentation/snippets/new/dynamics-custom-text-spanner-postfix.ly deleted file mode 100644 index 57f22712fb..0000000000 --- a/Documentation/snippets/new/dynamics-custom-text-spanner-postfix.ly +++ /dev/null @@ -1,35 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, tweaks-and-overrides" - texidoc = "Postfix functions for custom crescendo text spanners. The spanners -should start on the first note of the measure. One has to use -\mycresc, -otherwise the spanner start will rather be assigned to the next note. -" - doctitle = "Dynamics custom text spanner postfix" -} - -% Two functions for (de)crescendo spanners where you can explicitly give the -% spanner text. -mycresc = -#(define-music-function (parser location mymarkup) (markup?) - (make-music 'CrescendoEvent - 'span-direction START - 'span-type 'text - 'span-text mymarkup)) -mydecresc = -#(define-music-function (parser location mymarkup) (markup?) - (make-music 'DecrescendoEvent - 'span-direction START - 'span-type 'text - 'span-text mymarkup)) - -\relative c' { - c4-\mycresc "custom cresc" c4 c4 c4 | - c4 c4 c4 c4 | - c4-\mydecresc "custom decresc" c4 c4 c4 | - c4 c4\! c4 c4 -} - - - diff --git a/Documentation/snippets/new/dynamics-text-spanner-postfix.ly b/Documentation/snippets/new/dynamics-text-spanner-postfix.ly deleted file mode 100644 index 5f1187ec18..0000000000 --- a/Documentation/snippets/new/dynamics-text-spanner-postfix.ly +++ /dev/null @@ -1,25 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, tweaks-and-overrides" - texidoc = "Custom text spanners can be defined and used with hairpin - and text crescendos. @code{\<} and @code{\>} produce hairpins by - default, @code{\cresc} etc. produce text spanners by default." - doctitle = "Dynamics text spanner postfix" -} - -% Some sample text dynamic spanners, to be used as postfix operators -crpoco = -#(make-music 'CrescendoEvent - 'span-direction START - 'span-type 'text - 'span-text "cresc. poco a poco") - -\relative c' { - c4\cresc d4 e4 f4 | - g4 a4\! b4\crpoco c4 | - c4 d4 e4 f4 | - g4 a4\! b4\< c4 | - g4\dim a4 b4\decresc c4\! -} - diff --git a/Documentation/snippets/new/editorial-headword.ly b/Documentation/snippets/new/editorial-headword.ly deleted file mode 100644 index 89f7c0b736..0000000000 --- a/Documentation/snippets/new/editorial-headword.ly +++ /dev/null @@ -1,99 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - ragged-right = ##t - line-width = 17\cm - indent = 0\cm -} - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% NR 1.7 Editorial annotations - -% Beethoven, Op. 31, No. 3 -% Piano sonata 18, Movt II, Scherzo -% Measures 9 - 14 - -\new PianoStaff << - - % RH Staff - \new Staff { - \clef treble - \key af \major - \time 2/4 - \set Staff.fingeringOrientations = #'(up) - \set Score.currentBarNumber = #9 - \partial 8 - <af''-4 c''>8 \staccato - | - \set doubleSlurs = ##t - <bf''-5 df''-2>4 ( - <af''-4 c''>8 \staccato ) - \noBeam - c''8-5 \staccato \pp - | - \set doubleSlurs = ##f - bf'8.. ( - af'32 - g'8 ) \staccato - f'8 \staccato - | - e'4-2 - r8 - \once \override Script #'script-priority = #-100 - \afterGrace - f'8 ( \trill ^ \markup { \finger "3-2" } - { e'16 [ f'16 ] } - | - g'8..-3 - f'32 - e'8-1 ) \staccato - d'8-2 \staccato - | - c'4 - r4 - } - - % LH Staff - \new Staff { - \key af \major - \clef treble - \override Fingering #'direction = #down - \set Staff.fingeringOrientations = #'(down) - \partial 8 - <af' af>8 \staccato - \set doubleSlurs = ##t - <g'-2 ef'-3>4 ( - <af' af>8 ) \staccato - \noBeam - \clef bass - c'8-1 \staccato - | - \set doubleSlurs = ##f - bf8.. ( - af32 - g8-1 ) \staccato - f8 \staccato - | - e4 - r8 - \afterGrace - f8 ( \trill _ \markup { \finger "2-1" } - { e16 [ f16 ] } - | - g8..-1 - f32 - e8 ) \staccato - d8 \staccato - | - c4 - r4 - } - ->> diff --git a/Documentation/snippets/new/engravers-one-by-one.ly b/Documentation/snippets/new/engravers-one-by-one.ly deleted file mode 100644 index 29ae7a8480..0000000000 --- a/Documentation/snippets/new/engravers-one-by-one.ly +++ /dev/null @@ -1,273 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "contexts-and-engravers" - - texidoc = " -The notation problem, creating a certain symbol, is handled by plugins. - Each plugin is called an Engraver. In this example, engravers are -switched on one by one, in the following order: - -- note heads, - - -- staff symbol, - - -- clef, - - -- stem, - - -- beams, slurs, accents, - - -- accidentals, bar lines, time signature and key signature. - - - -Engravers are grouped. For example, note heads, slurs, beams etc. form -a @code{Voice} context. Engravers for key signature, accidentals, bar -line, etc. form a @code{Staff} context. - -" - doctitle = "Engravers one-by-one" -} - - -%% sample music -topVoice = \relative c' { - \key d \major - es8([ g] a[ fis]) - b4 - b16[-. b-. b-. cis-.] - d4-> -} - -botVoice = \relative c' { - \key d \major - c8[( f] b[ a)] - es4 - es16[-. es-. es-. fis-.] - b4-> -} - -hoom = \relative c { - \key d \major - \clef bass - g8-. r - r4 - fis8-. - r8 - r4 - b'4-> -} - -pah = \relative c' { - r8 b-. - r4 - r8 g8-. - r16 g-. r8 - \clef treble - fis'4-> -} - -% -% setup for Request->Element conversion. Guru-only -% - -MyStaff = \context { - \type "Engraver_group" - \name Staff - - \description "Handles clefs, bar lines, keys, accidentals. It can contain -@code{Voice} contexts." - - \consists "Output_property_engraver" - - \consists "Font_size_engraver" - - \consists "Volta_engraver" - \consists "Separating_line_group_engraver" - \consists "Dot_column_engraver" - - \consists "Ottava_spanner_engraver" - \consists "Rest_collision_engraver" - \consists "Piano_pedal_engraver" - \consists "Piano_pedal_align_engraver" - \consists "Instrument_name_engraver" - \consists "Grob_pq_engraver" - \consists "Forbid_line_break_engraver" - \consists "Axis_group_engraver" - - \consists "Pitch_squash_engraver" - - localKeySignature = #'() - - % explicitly set instrumentName, so we don't get - % weird effects when doing instrument names for - % piano staves - - instrumentName = #'() - shortInstrumentName = #'() - - \accepts "Voice" -} - - -MyVoice = \context { - \type "Engraver_group" - \name Voice - - \description " - Corresponds to a voice on a staff. This context handles the - conversion of dynamic signs, stems, beams, super- and subscripts, - slurs, ties, and rests. - - You have to instantiate this explicitly if you want to have - multiple voices on the same staff." - - localKeySignature = #'() - \consists "Font_size_engraver" - - % must come before all - \consists "Output_property_engraver" - \consists "Arpeggio_engraver" - \consists "Multi_measure_rest_engraver" - \consists "Text_spanner_engraver" - \consists "Grob_pq_engraver" - \consists "Note_head_line_engraver" - \consists "Glissando_engraver" - \consists "Ligature_bracket_engraver" - \consists "Breathing_sign_engraver" - % \consists "Rest_engraver" - \consists "Grace_beam_engraver" - \consists "New_fingering_engraver" - \consists "Chord_tremolo_engraver" - \consists "Percent_repeat_engraver" - \consists "Slash_repeat_engraver" - - %{ - Must come before text_engraver, but after note_column engraver. - %} - \consists "Text_engraver" - \consists "Dynamic_engraver" - \consists "Fingering_engraver" - - \consists "Script_column_engraver" - \consists "Rhythmic_column_engraver" - \consists "Cluster_spanner_engraver" - \consists "Tie_engraver" - \consists "Tie_engraver" - \consists "Tuplet_engraver" - \consists "Note_heads_engraver" - \consists "Rest_engraver" -} - - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - - -MyStaff = \context { - \MyStaff - \consists "Staff_symbol_engraver" -} - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyStaff = \context { - \MyStaff - \consists "Clef_engraver" - \remove "Pitch_squash_engraver" -} - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyVoice = \context { - \MyVoice - \consists "Stem_engraver" -} - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyVoice = \context { - \MyVoice - \consists "Beam_engraver" -} - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyVoice = \context { - \MyVoice - \consists "Phrasing_slur_engraver" - \consists "Slur_engraver" - \consists "Script_engraver" -} - - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyStaff = \context { - \MyStaff - \consists "Bar_engraver" - \consists "Time_signature_engraver" -} - -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - -MyStaff = \context { - \MyStaff - \consists "Accidental_engraver" - \consists "Key_engraver" -} -\score { - \topVoice - \layout { - \context { \MyStaff } - \context { \MyVoice } - } -} - diff --git a/Documentation/snippets/new/expressive-headword.ly b/Documentation/snippets/new/expressive-headword.ly deleted file mode 100644 index 8c1f821ba3..0000000000 --- a/Documentation/snippets/new/expressive-headword.ly +++ /dev/null @@ -1,270 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 1.3 Expressive marks - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% L. v. Beethoven, Op. 49 no. 1 -% Piano sonata 19 - "Leichte Sonate" -% measures 1 - 12 - -%\layout { -% \context { -% \Score -% \override SpacingSpanner #'base-shortest-duration = -% #(ly:make-moment 1 20) -% } -%} - -\new PianoStaff << - - % RH Staff - \new Staff { - \clef treble - \key g \major - \time 6/8 - \partial 2 - \once \override TextScript #'staff-padding = #2 - d'8 \staccato - ^ \markup { \column { - RONDO - \italic Allegro } } - d'8 \staccato - g'8 \staccato - a'8 \staccato - - | - - b'8 [ ( - g'8 ] ) - e'8 \staccato - e' \staccato - a'8 \staccato - b'8 \staccato - - | - - c''8 [ ( - a'8 ] ) - e''8 \staccato - d''8 \staccato - c''8 \staccato - b'8 \staccato - - | - - a'8 \staccato - g'8 \staccato - a'8 \staccato - \acciaccatura { g'16 [ a'16 ] } - bf'8 - a'8 \staccato - g'8 \staccato - - | - - fs'8 [ ( - d'8 ] ) - d'8 \staccato - d'8 \staccato - g'8 \staccato - a'8 \staccato - - | - - b'8 [ ( - g'8 ] ) - e'8 \staccato - e'8 \staccato - a'8 \staccato - b'8 \staccato - - | - - c''8 [ ( - a'8 ] ) - e''8 \staccato - d''8 \staccato - c''8 \staccato - b'8 \staccato - - | - - a'8 \staccato - g'8 \staccato - a'8 \staccato - << - { - \voiceOne - d'8 - g'8 - fs'8 - \oneVoice - } - \new Voice { - \voiceTwo - d'4 - c'8 - \oneVoice - } - >> - - | - - <b g'>4 \tenuto - d'8 \staccato - g'8 \staccato - b'8 \staccato - d''8 \staccato - - | - - d''8 ( - <c'' a'>8 \staccato ) - <c'' a'>8 \staccato - d''8 ( - <b' g'>8 \staccato ) - <b' g'>8 \staccato - - | - - d''8 ( - <c'' a'>8 \staccato ) - <c'' a'>8 \staccato - d''8 ( - <b' g'>8 \staccato ) - <b' g'>8 \staccato - - | - - d''8 \staccato - <c'' a'>8 \staccato - <b' g'>8 \staccato - d'' \staccato - <c'' a'>8 \staccato - <b' g'>8 \staccato - - | - - <d'' c'' a'>4 \fermata - r8 r4 r8 - } - - % LH Staff - \new Staff { - \clef bass - \key g \major - \time 6/8 - \partial 2 - r8 - r8 - <d' b>8 \staccato - <c' a>8 \staccato - - | - - <b g>4 - r8 - r8 - <e' c'>8 \staccato - <d' b>8 \staccato - - | - - <c' a>4 - r8 - r8 - <a fs>8 \staccato - <b g>8 \staccato - - | - - <c' a>8 \staccato - <b d'>8 \staccato - <e' c'>8 \staccato - <e' cs'>4. ( - - | - - d'4 ) - r8 - r8 - <d' b!>8 \staccato - <c'! a>8 \staccato - - | - - <b g>4 - r8 - r8 - <e' c'>8 \staccato - <d' b>8 \staccato - - | - - <c' a>4 - r8 - r8 - <a fs>8 \staccato - <b g>8 \staccato - - | - - <c' a>8 \staccato - <d' b>8 \staccato - <e' c'>8 \staccato - <b d>4 - <a d>8 \staccato - - | - - <g g,>4 \tenuto - r8 - r4 - r8 - - | - - r8 - <d' fs>8 \staccato - <d' fs>8 \staccato - r8 - <d' g>8 \staccato - <d' g>8 \staccato - - | - - r8 - <d' fs>8 \staccato - <d' fs>8 \staccato - r8 - <d' g>8 \staccato - <d' g>8 \staccato - - | - - r8 - <d' fs>8 \staccato - <d' g>8 \staccato - r8 - <d' fs>8 \staccato - <d' g>8 \staccato - - | - - <d' fs>4 \fermata - r8 r4 r8 - } - ->> diff --git a/Documentation/snippets/new/faking-a-hammer-in-tablatures.ly b/Documentation/snippets/new/faking-a-hammer-in-tablatures.ly deleted file mode 100644 index 55f17456ce..0000000000 --- a/Documentation/snippets/new/faking-a-hammer-in-tablatures.ly +++ /dev/null @@ -1,19 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -A hammer in tablature can be faked with slurs. -" - doctitle = "Faking a hammer in tablatures" -} - -\score { - \new TabStaff { - \relative c'' { - \tabFullNotation - c4( d) d( d) - d2( c) - } - } -} diff --git a/Documentation/snippets/new/figured-bass-headword.ly b/Documentation/snippets/new/figured-bass-headword.ly deleted file mode 100644 index 2aae62d655..0000000000 --- a/Documentation/snippets/new/figured-bass-headword.ly +++ /dev/null @@ -1,112 +0,0 @@ -\version "2.14.0" -#(set-global-staff-size 15) -\paper { - ragged-right = ##f - line-width = 16\cm - indent = 1.5\cm -} - -% NR 2.7.3 Figured bass - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% Arcangelo Corelli, 12 Sonate da Camera, Op. 2 -% Sonata II, Allemanda -% measures 1 - 88 -% Coded by Neil Puttock; modified by Carl Sorensen - -extendOn = \bassFigureExtendersOn -extendOff = \bassFigureExtendersOff - -\score { - - \new StaffGroup << - - \new GrandStaff << - - \new Staff = "violinoI" { - \set Staff.instrumentName = \markup { - \line { Violino I. } - } - \time 4/4 - \mark \markup { \italic Adagio. } - \partial 8 - r16 a'16 | - a'8. [ d''16 d''8. e''16 ] cis''8 a'4 a''16 bes''16 | - cis''8 d''16 ( e'' ) e''8. d''16 d''4 r8 d''16 e''16 | - f''8 f''4 g''16 ( f''16 ) e''8 e''4 f''16 ( e''16 ) | - d''8. d''16 g''16 ( f''16 ) e''16 ( d''16 ) cis''8 - cis''4 cis''16 cis''16 | - d''8 d''8 c''8. c''16 c''8 ( b'4 ) b'16 b'16 | - c''8 c''8 bes'8. bes'16 bes'8 ( a'4 ) a''16 a''16 | - a''8 g''8 g''8. g''16 g''8 ( f''8 ) r8 f''8 | - } - - \new Staff = "violinoII" { - \set Staff.instrumentName = \markup { - \line { Violino II. } - } - \time 4/4 - \partial 8 - r16 f'16 | - f'8. g'16 g'4 a'4 r8 d''16 d''16 | - e''8 a'8 cis''8. d''16 d''4 r8 f''16 g''16 | - a''8 a''8 d''8. d''16 g'8 g'8 c''8. c''16 | - f'8. f''16 bes''16 ( a''16 ) g''16 ( f''16 ) e''8 e''4 e''16 e''16 | - a'8 fis''8 g''8 a''8 d''8 d''4 d''16 d''16 | - g'8 e''8 f''8 g''8 c''8 c''4 cis''16 cis''16 | - d''8 d''8 e''8. e''16 e''8 a'8 r8 d''8 | - } - - >> - - \new Staff = "violone" { - \set Staff.instrumentName = \markup { - \center-column { - Violone, - \line { e Cembalo. } - } - } - \time 4/4 - \clef bass - \partial 8 - r16 d16 | - d4 bes,4 a,4 f4 | - g8 f16 g16 a8 a,8 d4 d'4 ~ | - d'8 c'8 b4 c'8 c'16 bes16 a4 | - bes8 bes16 a16 g4 a8 a,4 a16 g16 | - fis8 d8 e8 fis8 g8 g,4 g16 f16 | - e8 c8 d8 e8 f8 f,4 a,8 | - b,4 cis4 d4 r8 d'8 | - } - - \new FiguredBass \figuremode { - \set figuredBassAlterationDirection = #RIGHT - \set figuredBassPlusDirection = #RIGHT - \override BassFigureAlignment #'stacking-dir = #DOWN - s8 | - s4 <6>4 <_+>4 <6>4 | - <6 4\+ 2>8 <6>8 <_+> s8 s2 | - <5>8 <6 4>8 <6 5>4 s4 <5>8 <6>8 | - s4 <6 5 _-> <_+>2 | - <6>8 <_+>8 <6>8 <6 5>8 <5 4>8 \extendOn <5 _!>8 \extendOff s4 | - <6>4 <6->8 <6 5->8 <5 4->8 \extendOn <5 3>4 \extendOff <5 _+>8 | - <7>8 <6>8 <5>4 <9 4>8 <8 3>8 s4 | - } - - >> - - \layout { - \context { - \Score - \override RehearsalMark #'break-align-symbols = #'(time-signature) - \override RehearsalMark #'self-alignment-X = #LEFT - \override TimeSignature #'break-align-anchor-alignment = #LEFT - } - } -} diff --git a/Documentation/snippets/new/flamenco-notation.ly b/Documentation/snippets/new/flamenco-notation.ly deleted file mode 100644 index 884e4b8a2d..0000000000 --- a/Documentation/snippets/new/flamenco-notation.ly +++ /dev/null @@ -1,250 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - - texidoc = " -For flamenco guitar, special notation is used: - - -@itemize - -@item -a golpe symbol to indicate a slap on the guitar body with the nail of -the ring finger - -@item -an arrow to indicate (the direction of) strokes - -@item -different letters for fingering (@qq{p}: thumb, @qq{i}: index finger, -@qq{m}: middle finger, @qq{a}: ring finger and @qq{x}: little finger) - -@item -3- and 4-finger rasgueados: stroke upwards with all fingers, ending -with an up- and down using the index finger - -@item -abanicos: strokes (in tuples) with thumb (down), little and index finger -(both up) (there is also an abanico 2 where middle and ring finger are -used instead of the little finger) - -@item -alza pua: fast playing with the thumb - -@end itemize - - -Most figures use arrows in combination with fingering; with abanicos -and rasgueados, noteheads are printed only for the first chord. - -This snippet contains some header-like code that can be copied as -@samp{flamenco.ly} and included in source files. - -" - doctitle = "Flamenco notation" -} - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%% Cut here ----- Start 'flamenco.ly' - -% Text indicators -abanico = \markup { \italic Abanico } -rasgueaso = \markup { \italic Ras. } -alzapua = \markup { \italic Alzapua } - -% Finger stroke symbols -strokeUp = \markup { \postscript #" - 0.1 setlinewidth - 0.5 0 moveto - 0.5 2 lineto - 0.2 1.4 lineto - 0.5 2 moveto - 0.8 1.4 lineto - stroke -"} - -strokeDown = \markup { \postscript #" - 0.1 setlinewidth - 0.5 2 moveto - 0.5 0 lineto - 0.2 0.6 lineto - 0.5 0 moveto - 0.8 0.6 lineto - stroke -"} - -% Golpe symbol -golpe = \markup { \postscript #" - 0.2 setlinewidth - 0 0 moveto - 1 0 lineto - 1 1 lineto - stroke - "\postscript #" - 0.1 setlinewidth - -0.6 -0.1 moveto - -0.6 1.0 lineto - 0.5 1.0 lineto - stroke -"} - -strokeUpGolpe = \markup { \column { \golpe \line { \strokeUp } } } -iUpGolpe = \markup { \column { \golpe \line { \small i } \line { \strokeUp } } } - -% Strokes for all fingers -pUp = \markup { \column { \small p \line { \strokeUp } } } -pDown = \markup { \column { \small p \line { \strokeDown } } } -iUp = \markup { \column { \small i \line { \strokeUp } } } -iDown = \markup { \column { \small i \line { \strokeDown } } } -mUp = \markup { \column { \small m \line { \strokeUp } } } -mDown = \markup { \column { \small m \line { \strokeDown } } } -aUp = \markup { \column { \small a \line { \strokeUp } } } -aDown = \markup { \column { \small a \line { \strokeDown } } } -xUp = \markup { \column { \small x \line { \strokeUp } } } -xDown = \markup { \column { \small x \line { \strokeDown } } } - - -% Just handy :) -tupletOff = { - \once \override TupletNumber #'stencil = ##f - \once \override TupletBracket #'stencil = ##f -} - -tupletsOff = { - \override TupletNumber #'stencil = ##f - \override TupletBracket #'bracket-visibility = #'if-no-beam -} - -tupletsOn = { - \override TupletBracket #'bracket-visibility = #'default - \revert TupletNumber #'stencil -} - -headsOff = { - \override TabNoteHead #'transparent = ##t - \override NoteHead #'transparent = ##t - \override NoteHead #'no-ledgers = ##t -} - -headsOn = { - \override TabNoteHead #'transparent = ##f - \override NoteHead #'transparent = ##f - \override NoteHead #'no-ledgers = ##f -} - -%%%%%%% Cut here ----- End 'flamenco.ly' -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -part = \relative c' { - <a, e' a cis e>8^\iUp - <a e' a cis e>8^\iDown - r4 - r2^\golpe - - <a e' a cis e>8^\iUp - <a e' a cis e>8^\iDown - <a e' a cis e>8^\iUpGolpe - <a e' a cis e>8^\iDown - r2 - - <a e' a cis e>16^\aUp - \headsOff - <a e' a cis e>^\mUp - <a e' a cis e>^\iUp - <a e' a cis e>^\iDown~ - \headsOn - <a e' a cis e>2 - r4 - - \tupletOff - \times 4/5 { - <a e' a cis e>16^\xUp - \headsOff - <a e' a cis e>^\aUp - <a e' a cis e>^\mUp - <a e' a cis e>^\iUp - <a e' a cis e>^\iDown~ - \headsOn - } - <a e' a cis e>2 - r4 - - \tupletsOff - \times 2/3 { - <a e' a cis e>8^\pDown - \headsOff - <a e' a cis e>^\xUp - <a e' a cis e>^\iUp - \headsOn - } - - \times 2/3 { - <a e' a cis e>8^\pDown - \headsOff - <a e' a cis e>^\xUp - <a e' a cis e>^\iUp - \headsOn - } - - \times 2/3 { - <a e' a cis e>8^\pDown - \headsOff - <a e' a cis e>^\xUp - <a e' a cis e>^\iUp - \headsOn - } - \times 2/3 { - <a e' a cis e>8^\pDown - \headsOff - <a e' a cis e>^\xUp - <a e' a cis e>^\iUp - \headsOn - } - - \tupletsOff - \override Beam #'positions = #'(2 . 2) - \times 2/3 { - a8^\markup{ \small p } - <e' a>^\strokeUpGolpe - <e a>^\strokeDown - } - \times 2/3 { - a,8^\markup{ \small p } - <e' a>^\strokeUpGolpe - <e a>^\strokeDown - } - \times 2/3 { - a,8^\markup{ \small p } - <e' a>^\strokeUpGolpe - <e a>^\strokeDown - } - \times 2/3 { - a,8^\markup{ \small p } - <e' a>^\strokeUpGolpe - <e a>^\strokeDown - } - \tupletsOn - - \once \override TextScript #'extra-offset = #'(0 . -1) - <g, b f'>1_\golpe^\mUp - \bar "|." -} - -\score { - \new StaffGroup << - \context Staff = "part" << - \clef G - \transpose c c' - { - \part - } - >> - \context TabStaff { - \part - } - >> - \layout { - ragged-right = ##t - } -} diff --git a/Documentation/snippets/new/fretboards-alternate-tables.ly b/Documentation/snippets/new/fretboards-alternate-tables.ly deleted file mode 100644 index 382a0f8a92..0000000000 --- a/Documentation/snippets/new/fretboards-alternate-tables.ly +++ /dev/null @@ -1,75 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - - texidoc = " -Alternate fretboard tables can be created. These would be used in -order to have alternate fretboards for a given chord. - -In order to use an alternate fretboard table, the table must first -be created. Fretboards are then added to the table. - -The created fretboard table can be blank, or it can be copied -from an existing table. - -The table to be used in displaying predefined fretboards is selected -by the property @code{\predefinedDiagramTable}. -" - - doctitle = "Alternate fretboard tables" -} - -\include "predefined-guitar-fretboards.ly" - -% Make a blank new fretboard table -#(define custom-fretboard-table-one (make-fretboard-table)) - -% Make a new fretboard table as a copy of default-fret-table -#(define custom-fretboard-table-two (make-fretboard-table default-fret-table)) - -% Add a chord to custom-fretboard-table-one -\storePredefinedDiagram #custom-fretboard-table-one - \chordmode{c} - #guitar-tuning - "3-(;3;5;5;5;3-);" - -% Add a chord to custom-fretboard-table-two -\storePredefinedDiagram #custom-fretboard-table-two - \chordmode{c} - #guitar-tuning - "x;3;5;5;5;o;" - -<< - \chords { - c1 | d1 | - c1 | d1 | - c1 | d1 | - } - \new FretBoards { - \chordmode { - \set predefinedDiagramTable = #default-fret-table - c1 | d1 | - \set predefinedDiagramTable = #custom-fretboard-table-one - c1 | d1 | - \set predefinedDiagramTable = #custom-fretboard-table-two - c1 | d1 | - } - } - \new Staff { - \clef "treble_8" - << - \chordmode { - c1 | d1 | - c1 | d1 | - c1 | d1 | - } - { - s1_\markup "Default table" | s1 | - s1_\markup \column {"New table" "from empty"} | s1 | - s1_\markup \column {"New table" "from default"} | s1 | - } - >> - } ->> - diff --git a/Documentation/snippets/new/fretted-string-harmonics-in-tablature.ly b/Documentation/snippets/new/fretted-string-harmonics-in-tablature.ly deleted file mode 100644 index ed942c9b31..0000000000 --- a/Documentation/snippets/new/fretted-string-harmonics-in-tablature.ly +++ /dev/null @@ -1,74 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -Fretted-string harmonics: -" - doctitle = "Fretted-string harmonics in tablature" -} - -pinchedHarmonics = { - \textSpannerDown - \override TextSpanner #'bound-details #'left #'text = - \markup {\halign #-0.5 \teeny "PH" } - \override TextSpanner #'style = - #'dashed-line - \override TextSpanner #'dash-period = #0.6 - \override TextSpanner #'bound-details #'right #'attach-dir = #1 - \override TextSpanner #'bound-details #'right #'text = - \markup { \draw-line #'(0 . 1) } - \override TextSpanner #'bound-details #'right #'padding = #-0.5 -} - -harmonics = { - %artificial harmonics (AH) - \textLengthOn - <\parenthesize b b'\harmonic>4_\markup{ \teeny "AH 16" } - <\parenthesize g g'\harmonic>4_\markup{ \teeny "AH 17" } - <\parenthesize d' d''\harmonic>2_\markup{ \teeny "AH 19" } - %pinched harmonics (PH) - \pinchedHarmonics - <a'\harmonic>2\startTextSpan - <d''\harmonic>4 - <e'\harmonic>4\stopTextSpan - %tapped harmonics (TH) - <\parenthesize g\4 g'\harmonic>4_\markup{ \teeny "TH 17" } - <\parenthesize a\4 a'\harmonic>4_\markup{ \teeny "TH 19" } - <\parenthesize c'\3 c''\harmonic>2_\markup{ \teeny "TH 17" } - %touch harmonics (TCH) - a4( <e''\harmonic>2. )_\markup{ \teeny "TCH" } -} - -frettedStrings = { - %artificial harmonics (AH) - \harmonicByFret #4 g4\3 - \harmonicByFret #5 d4\4 - \harmonicByFret #7 g2\3 - %pinched harmonics (PH) - \harmonicByFret #7 d2\4 - \harmonicByFret #5 d4\4 - \harmonicByFret #7 a4\5 - %tapped harmonics (TH) - \harmonicByFret #5 d4\4 - \harmonicByFret #7 d4\4 - \harmonicByFret #5 g2\3 - %touch harmonics (TCH) - a4 \harmonicByFret #9 g2.\3 -} - -\score { - << - \new Staff { - \new Voice { - \clef "treble_8" - \harmonics - } - } - \new TabStaff { - \new TabVoice { - \frettedStrings - } - } - >> -} diff --git a/Documentation/snippets/new/graphical-and-text-woodwind-diagrams.ly b/Documentation/snippets/new/graphical-and-text-woodwind-diagrams.ly deleted file mode 100644 index 6b77f0adea..0000000000 --- a/Documentation/snippets/new/graphical-and-text-woodwind-diagrams.ly +++ /dev/null @@ -1,30 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags="winds" - texidoc=" -In may cases, the keys other than the central column can be -displayed by key name as well as by graphical means. -" - - doctitle = "Graphical and text woodwind diagrams" -} - -\relative c'' { - \textLengthOn - c1^\markup - \woodwind-diagram - #'piccolo - #'((cc . (one three)) - (lh . (gis)) - (rh . (ees))) - - c^\markup - \override #'(graphical . #f) { - \woodwind-diagram - #'piccolo - #'((cc . (one three)) - (lh . (gis)) - (rh . (ees))) - } -} diff --git a/Documentation/snippets/new/grouping-beats.ly b/Documentation/snippets/new/grouping-beats.ly deleted file mode 100644 index 5f9f71fc95..0000000000 --- a/Documentation/snippets/new/grouping-beats.ly +++ /dev/null @@ -1,15 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -Beaming patterns may be altered with the @code{beatGrouping} property: - -" - doctitle = "Grouping beats" -} - -\markup { - This snippet is deprecated as of version 2.13.5 and will be removed - in version 2.14. -} diff --git a/Documentation/snippets/new/hiding-accidentals-on-tied-notes-at-the-start-of-a-new-system.ly b/Documentation/snippets/new/hiding-accidentals-on-tied-notes-at-the-start-of-a-new-system.ly deleted file mode 100644 index 8499cdf470..0000000000 --- a/Documentation/snippets/new/hiding-accidentals-on-tied-notes-at-the-start-of-a-new-system.ly +++ /dev/null @@ -1,15 +0,0 @@ -\version "2.14.0" -\header { - lsrtags = "pitches" - texidoc = "This shows how to hide accidentals on tied notes at the beginning of a -new system." - doctitle = "Hiding accidentals on tied notes at the beginning of a new system" -} - -\relative c'' { - \override Accidental #'hide-tied-accidental-after-break = ##t - cis1~ cis~ - \break - cis -} - diff --git a/Documentation/snippets/new/keyboard-headword.ly b/Documentation/snippets/new/keyboard-headword.ly deleted file mode 100644 index 95be4b7709..0000000000 --- a/Documentation/snippets/new/keyboard-headword.ly +++ /dev/null @@ -1,248 +0,0 @@ -\version "2.14.0" -\include "english.ly" - -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 2.2 Keyboard instruments - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% M. Ravel, Sonatine (1905) -% First movement - -\layout { - \context { - \Score - \remove "Bar_number_engraver" - } -} - -fermataLong = \markup { - \override #'(direction . 1) - \override #'(baseline-skip . 2) { - \dir-column { - \musicglyph #"scripts.ufermata" - \text \italic \center-align long - } - } -} - -\new PianoStaff << - \set PianoStaff.connectArpeggios = ##t - \new Staff { - \time 2/4 - \key fs \major - << - \new Voice { - \voiceOne - fs''8 ( ^\markup { - \override #'(baseline-skip . 2.4) \column { - \line \bold { Un peu retenu } - \line \italic { très expressif } - } - } - es''16 - cs''16 - as'4 ) - | - fs''8 ( - es''16 - cs''16 - as'4 ) - | - fs''8 ( - es''16 - cs''16 - as'8 - cs''8 ) - | - } - \new Voice { - \voiceTwo - gs'8\rest \ppp - fs'4 ( - es'8 ) - | - gs'8\rest - fs'4 ( - es'8 ) - | - gs'8\rest - fs'4 ( - es'8 ) - | - } - >> - \clef bass - <ds b! es'>4 ( ^ \markup \bold { Rall. } - \override Script #'stencil = #(lambda (grob) - (grob-interpret-markup grob fermataLong)) - <ds' as'>8 ) \fermata - \noBeam - \clef treble - \slurUp - \once \override Hairpin #'to-barline = ##f - <as fs'>8 ( \pp \> - | - <gs b cs'>4. \! ) ^\markup \bold { a Tempo } - \slurUp - <as fs'>8 ^\( \> - | - <gs b cs'>4. \! \) - << - \new Voice { - \voiceOne - <as fs'>8 ( - | - cs'8 ^\markup \bold { Rallentando } - b16 - cs'16 - d'8 - e'16 - fs'16 - | - <as! cs' gs'>4. ) - s8 - | - r8 - <cs'' as'' cs'''>4 \arpeggio - e''16 ( ^\markup \bold { Lent } - fs''16 - | - \voiceTwo - <as'! cs'' gs''>2 ) - | - } - \new Voice { - \voiceTwo - s8 - | - <gs b>4 \< - <fs bs>4 \> - | - s4. \! - \slurUp - \once \override Script #'direction = #UP - <a bs e'>8 ( \accent - | - <as! cs' gs'>4. ) - \once \override Hairpin #'to-barline = ##f - <a' bs'>8 \ppp \> - | - s8 \! - \stemDown - \once \override Script #'direction = #UP - \ottava #1 - \voiceOne - \once \override PianoStaff.Arpeggio #'padding = #0.8 - <cs''' as''' cs''''>4. \arpeggio \fermata - \ottava #0 - \bar "|." - } - >> - } - \new Staff << - \set Staff.pedalSustainStyle = #'bracket - \key fs \major - \clef bass - \new Voice { - \voiceOne - ds'4 \tenuto - cs'4 \tenuto - | - ds'4 \tenuto - cs'4 \tenuto - | - ds'4 \tenuto - cs'4 \tenuto - | - s8 - \clef treble - <b' cs''>8 [ - \clef bass - <es b cs'>8 \fermata ] - s8 - | - fs8\rest - \clef treble - <b' cs''>4 \tenuto - s8 - | - fs8\rest - \clef treble - <b' cs''>4 \tenuto - s8 - | - s2 - | - ds8\rest - \clef treble - <as' cs''>4 - \clef bass - s8 - | - s8 - \clef treble - <as'>4 \arpeggio - \clef bass - s8 - | - s8 - \clef treble - <as''>4. \arpeggio \fermata - | - } - \new Voice { - \voiceTwo - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) - | - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) - | - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) - | - \once \override Script #'outside-staff-priority = #100 - \once \override TextScript #'outside-staff-priority = #500 - <cs, gs,>4. \fermata _\markup \italic { ped. } - <fs, cs>8 ( - | - <e, b,>4. ) \sustainOn - \clef bass - <fs, cs>8 \( \sustainOff - | - <e, b,>4. \) \sustainOn - \clef bass - <fs, cs>8 ( \sustainOff - | - <e, b,>4 - <d, a,>4 - | - <fs,, cs,>4. ) \sustainOn - <a, e>8 ( \sustainOff - | - <fs, cs>4. ) \sustainOn - \slurUp - <a e'>8 ( \sustainOff \sustainOn - | - <fs cs'>2 ) \sustainOff \sustainOn - | - } - >> ->> diff --git a/Documentation/snippets/new/letter-tablature-formatting.ly b/Documentation/snippets/new/letter-tablature-formatting.ly deleted file mode 100644 index f97d656cb2..0000000000 --- a/Documentation/snippets/new/letter-tablature-formatting.ly +++ /dev/null @@ -1,30 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "staff-notation, fretted-strings" - - texidoc = " -Tablature can be formatted using letters instead of numbers. - -" - doctitle = "Letter tablature formatting" -} - -music = \relative c { - c4 d e f - g4 a b c - d4 e f g -} - -<< - \new Staff { - \clef "G_8" - \music - } - \new TabStaff \with { - tablatureFormat = #fret-letter-tablature-format - } - { - \music - } ->> diff --git a/Documentation/snippets/new/lyrics-old-spacing-settings.ly b/Documentation/snippets/new/lyrics-old-spacing-settings.ly deleted file mode 100644 index 5e51f6d0df..0000000000 --- a/Documentation/snippets/new/lyrics-old-spacing-settings.ly +++ /dev/null @@ -1,96 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "vocal-music" - - doctitle = "Obtaining 2.12 lyrics spacing in newer versions" - - texidoc = " -The vertical spacing engine changed for version 2.14. This can -cause lyrics to be spaced differently. It is possible to set -properties for @code{Lyric} and @code{Staff} contexts to get the -spacing engine to behave as it did in version 2.12. -" -} - -global = { - \key d \major - \time 3/4 -} - -sopMusic = \relative c' { - % VERSE ONE - fis4 fis fis | \break - fis4. e8 e4 -} - -altoMusic = \relative c' { - % VERSE ONE - d4 d d | - d4. b8 b4 | -} - -tenorMusic = \relative c' { - a4 a a | - b4. g8 g4 | -} - -bassMusic = \relative c { - d4 d d | - g,4. g8 g4 | -} - -words = \lyricmode { - Great is Thy faith- ful- ness, -} - -\score { - \new ChoirStaff << - \new Lyrics = sopranos - \new Staff = women << - \new Voice = "sopranos" { - \voiceOne - \global \sopMusic - } - \new Voice = "altos" { - \voiceTwo - \global \altoMusic - } - >> - \new Lyrics = "altos" - \new Lyrics = "tenors" - \new Staff = men << - \clef bass - \new Voice = "tenors" { - \voiceOne - \global \tenorMusic - } - \new Voice = "basses" { - \voiceTwo \global \bassMusic - } - >> - \new Lyrics = basses - \context Lyrics = sopranos \lyricsto sopranos \words - \context Lyrics = altos \lyricsto altos \words - \context Lyrics = tenors \lyricsto tenors \words - \context Lyrics = basses \lyricsto basses \words - >> - \layout { - \context { - \Lyrics - \override VerticalAxisGroup #'staff-affinity = ##f - \override VerticalAxisGroup #'staff-staff-spacing = - #'((basic-distance . 0) - (minimum-distance . 2) - (padding . 2)) - } - \context { - \Staff - \override VerticalAxisGroup #'staff-staff-spacing = - #'((basic-distance . 0) - (minimum-distance . 2) - (padding . 2)) - } - } -} - diff --git a/Documentation/snippets/new/makam-example.ly b/Documentation/snippets/new/makam-example.ly deleted file mode 100644 index 9191ffeb73..0000000000 --- a/Documentation/snippets/new/makam-example.ly +++ /dev/null @@ -1,22 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "pitches, world-music" - texidoc = " -Makam is a type of melody from Turkey using 1/9th-tone microtonal -alterations. Consult the initialization file @samp{ly/makam.ly} for -details of pitch names and alterations. - -" - doctitle = "Makam example" -} - -% Initialize makam settings -\include "makam.ly" - -\relative c' { - \set Staff.keySignature = #`((6 . ,(- KOMA)) (3 . ,BAKIYE)) - c4 cc db fk - gbm4 gfc gfb efk - fk4 db cc c -} diff --git a/Documentation/snippets/new/making-slurs-with-complex-dash-structure.ly b/Documentation/snippets/new/making-slurs-with-complex-dash-structure.ly deleted file mode 100644 index 28f15c8738..0000000000 --- a/Documentation/snippets/new/making-slurs-with-complex-dash-structure.ly +++ /dev/null @@ -1,36 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms, expressive-marks" - texidoc = " -Slurs can be made with complex dash patterns by defining -the @code{dash-definition} property. @code{dash-definition} -is a list of @code{dash-elements}. A @code{dash-element} is a -list of parameters defining the dash behavior for a segment of -the slur. - -The slur is defined in terms of the bezier parameter t -which ranges from 0 -at the left end of the slur to 1 at the right end of the slur. -@code{dash-element} is a list @code{(start-t stop-t dash-fraction -dash-period)}. The region of the slur from @code{start-t} to -@code{stop-t} will have a fraction @code{dash-fraction} -of each @code{dash-period} black. @code{dash-period} is -defined in terms of staff spaces. @code{dash-fraction} is -set to 1 for a solid slur. -" - doctitle = "Making slurs with complex dash structure" -} - -\relative c' { - \once \override - Slur #'dash-definition = #'((0 0.3 0.1 0.75) - (0.3 0.6 1 1) - (0.65 1.0 0.4 0.75)) - c4( d e f) - \once \override - Slur #'dash-definition = #'((0 0.25 1 1) - (0.3 0.7 0.4 0.75) - (0.75 1.0 1 1)) - c4( d e f) -} diff --git a/Documentation/snippets/new/modern-tab-text-clef.ly b/Documentation/snippets/new/modern-tab-text-clef.ly deleted file mode 100644 index 2af2335ca0..0000000000 --- a/Documentation/snippets/new/modern-tab-text-clef.ly +++ /dev/null @@ -1,16 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "staff-notation, fretted-strings" - - texidoc = " -Use a markup text to replace the (TAB) clef glyph with a modern font. - -" - doctitle = "Modern TAB text clef" -} - -\markup { - This snippet is deprecated as of version 2.13.4 and will be removed - in version 2.14. -} diff --git a/Documentation/snippets/new/non-default-tuplet-numbers.ly b/Documentation/snippets/new/non-default-tuplet-numbers.ly deleted file mode 100644 index 1ea456dab0..0000000000 --- a/Documentation/snippets/new/non-default-tuplet-numbers.ly +++ /dev/null @@ -1,41 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - - texidoc = " -LilyPond also provides formatting functions to print tuplet numbers different -than the actual fraction, as well as to append a note value to the tuplet -number or tuplet fraction. -" - doctitle = "Non-default tuplet numbers" -} - -\relative c'' { - \once \override TupletNumber #'text = - #(tuplet-number::non-default-tuplet-denominator-text 7) - \times 2/3 { c4. c4. c4. c4. } - \once \override TupletNumber #'text = - #(tuplet-number::non-default-tuplet-fraction-text 12 7) - \times 2/3 { c4. c4. c4. c4. } - \once \override TupletNumber #'text = - #(tuplet-number::append-note-wrapper - (tuplet-number::non-default-tuplet-fraction-text 12 7) "8") - \times 2/3 { c4. c4. c4. c4. } - - \once \override TupletNumber #'text = - #(tuplet-number::append-note-wrapper - tuplet-number::calc-denominator-text "4") - \times 2/3 { c8 c8 c8 c8 c8 c8 } - \once \override TupletNumber #'text = - #(tuplet-number::append-note-wrapper - tuplet-number::calc-fraction-text "4") - \times 2/3 { c8 c8 c8 c8 c8 c8 } - - \once \override TupletNumber #'text = - #(tuplet-number::fraction-with-notes "4." "8") - \times 2/3 { c4. c4. c4. c4. } - \once \override TupletNumber #'text = - #(tuplet-number::non-default-fraction-with-notes 12 "8" 4 "4") - \times 2/3 { c4. c4. c4. c4. } -} diff --git a/Documentation/snippets/new/non-traditional-key-signatures.ly b/Documentation/snippets/new/non-traditional-key-signatures.ly deleted file mode 100644 index 8a3c145a98..0000000000 --- a/Documentation/snippets/new/non-traditional-key-signatures.ly +++ /dev/null @@ -1,36 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "pitches, staff-notation" - texidoc = " -The commonly used @code{\\key} command sets the @code{keySignature} -property, in the @code{Staff} context. - -To create non-standard key signatures, set this property directly. The -format of this command is a list: - -@code{\\set Staff.keySignature = #`(((octave . step) . alter) ((octave -. step) . alter) ...)} where, for each element in the list, -@code{octave} specifies the octave (0@tie{}being the octave from -middle@tie{}C to the B above), @code{step} specifies the note within the -octave (0@tie{}means@tie{}C and 6@tie{}means@tie{}B), and @code{alter} is -@code{,SHARP ,FLAT ,DOUBLE-SHARP} etc. (Note the leading comma.) - -Alternatively, for each item in the list, using the more concise format -@code{(step . alter)} specifies that the same alteration should hold in all -octaves. - -Here is an example of a possible key signature for generating a whole-tone -scale: -" - doctitle = "Non-traditional key signatures" -} - -\relative c' { - \set Staff.keySignature = #`(((0 . 6) . ,FLAT) - ((0 . 5) . ,FLAT) - ((0 . 3) . ,SHARP)) - c4 d e fis - aes4 bes c2 -} - diff --git a/Documentation/snippets/new/open-string-harmonics-in-tablature.ly b/Documentation/snippets/new/open-string-harmonics-in-tablature.ly deleted file mode 100644 index 46a833c8ae..0000000000 --- a/Documentation/snippets/new/open-string-harmonics-in-tablature.ly +++ /dev/null @@ -1,64 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -Reference for open-string harmonics: -" - doctitle = "Reference for open-string harmonics" -} - -openStringHarmonics = { - %first harmonic - \harmonicByFret #12 e,2\6_\markup{"1st harm."} - \harmonicByRatio #1/2 e,\6 - %second harmonic - \harmonicByFret #7 e,\6_\markup{"2nd harm. - - - -"} - \harmonicByRatio #1/3 e,\6 - \harmonicByFret #19 e,\6 - \harmonicByRatio #2/3 e,\6 - %\harmonicByFret #19 < e,\6 a,\5 d\4 > - %\harmonicByRatio #2/3 < e,\6 a,\5 d\4 > - %third harmonic - \harmonicByFret #5 e,\6_\markup{"3rd harm. - - - -"} - \harmonicByRatio #1/4 e,\6 - \harmonicByFret #24 e,\6 - \harmonicByRatio #3/4 e,\6 - \break - %fourth harmonic - \harmonicByFret #4 e,\6_\markup{"4th harm. - - - - - - - - - - - - -"} - \harmonicByRatio #1/5 e,\6 - \harmonicByFret #9 e,\6 - \harmonicByRatio #2/5 e,\6 - \harmonicByFret #16 e,\6 - \harmonicByRatio #3/5 e,\6 - %fifth harmonic - \harmonicByFret #3 e,\6_\markup{"5th harm."} - \harmonicByRatio #1/6 e,\6 - \break - %sixth harmonic - \harmonicByFret #2.7 e,\6_\markup{"6th harm."} - \harmonicByRatio #1/7 e,\6 - %seventh harmonic - \harmonicByFret #2.3 e,\6_\markup{"7th harm."} - \harmonicByRatio #1/8 e,\6 - %eighth harmonic - \harmonicByFret #2 e,\6_\markup{"8th harm."} - \harmonicByRatio #1/9 e,\6 -} - -\score { - << - \new Staff { - \new Voice { - \clef "treble_8" - \openStringHarmonics - } - } - \new TabStaff { - \new TabVoice { - \openStringHarmonics - } - } - >> -} diff --git a/Documentation/snippets/new/piano-template-with-centered-dynamics.ly b/Documentation/snippets/new/piano-template-with-centered-dynamics.ly deleted file mode 100644 index 70403a76fc..0000000000 --- a/Documentation/snippets/new/piano-template-with-centered-dynamics.ly +++ /dev/null @@ -1,53 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, keyboards, template" - texidoc = " -Many piano scores have the dynamics centered between the two staves. -The @code{Dynamics} context, if placed between staves, will -automatically position dynamics correctly. - -" - doctitle = "Piano template with centered dynamics" -} - -global = { - \key c \major - \time 4/4 -} - -upper = \relative c'' { - \clef treble - a4 b c d -} - -lower = \relative c { - \clef bass - a2 c -} - -dynamics = { - s2\fff\> s4 s\!\pp -} - -pedal = { - s2\sustainOn s\sustainOff -} - -\score { - \new PianoStaff = "PianoStaff_pf" << - \new Staff = "Staff_pfUpper" << \global \upper >> - \new Dynamics = "Dynamics_pf" \dynamics - \new Staff = "Staff_pfLower" << \global \lower >> - \new Dynamics = "pedal" \pedal - >> - \layout { } -} - -\score { - \new PianoStaff = "PianoStaff_pf" << - \new Staff = "Staff_pfUpper" << \global \upper \dynamics \pedal >> - \new Staff = "Staff_pfLower" << \global \lower \dynamics \pedal >> - >> - \midi { } -} diff --git a/Documentation/snippets/new/pitches-headword.ly b/Documentation/snippets/new/pitches-headword.ly deleted file mode 100644 index 9bd3dd0171..0000000000 --- a/Documentation/snippets/new/pitches-headword.ly +++ /dev/null @@ -1,143 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - ragged-right = ##t - line-width = 17\cm - indent = 0\cm -} - -% NR 1.1 Pitches - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - - -% L. v. Beethoven -% Piano sonata 21 - Dem Grafen von Waldstein Gewidmet -% chorale at measures 34 - 40+ - -\new PianoStaff << - - % RH Staff - \new Staff << - - % RH Voice 1 - \new Voice { - \set Score.currentBarNumber = #34 - \voiceOne - gs''2 ( ^ \markup \italic { dolce e molto ligato } - fs''4 - e''4 - | - ds''2 - cs''2 ) - | - ds''2 ( - e''4 - fs''4 - | - <gs'' e''>2 - <fs'' ds''>2 ) - | - \oneVoice - \clef bass - <gs' e' b>2 ( - <fs' ds' a>4 - <e' cs' gs>4 - | - <ds' bs fs>2 - <cs' a e>2 ) - | - \voiceOne - b2 %( - cs'4 - ds'4 - | - \clef treble - <e' gs>4 %) - r4 r2 - } - - % RH Voice 2 - \new Voice { - \voiceTwo - \override Staff.DynamicLineSpanner #'staff-padding = #2.5 - <e'' b'>2 \p - <ds'' a'>4 - <cs'' gs'>4 - | - <bs' fs'>2 - e'2 - | - \once \override TextScript #'staff-padding = #2.5 - <b'! a'>2 _ \markup \italic { cresc. } - b'4 - <e'' cs''>4 - | - b'2. ( \sf \> - a'4 ) - \clef bass - | \break - s1 \p - | - s1 - | - <gs e>4 ( - <a fs>2. ) - | - s4 - r4 r2 - } - - >> - - % LH Staff - \new Staff { - \override Staff.SustainPedalLineSpanner #'staff-padding = #5 - <gs' e'>2 ( \sustainOn - <fs' ds' b>4 \sustainOff - <e' cs'>4 - | - <ds' bs gs>2 - <cs' a>2 ) \sustainOn - | - \clef bass - \slurDown - <ds' b! a fs>2 ( \sustainOff - <e' b gs>4 - <fs' cs' a>4 \sustainOn - | - \clef treble - \voiceOne - << - { - <gs' e'>2 - <fs' ds'>2 ) - } - \new Voice { - \voiceTwo - b1 \sustainOff - } - >> - \oneVoice - | - %\break - \clef bass - <gs e>2 ( - <fs ds b,>4 - <e cs>4 - | - <ds bs, gs,>2 - <cs a,>2 ) \sustainOn - | - <b,! b,,!>1 ( \sustainOff - | - <e e,>4 ) - r4 r2 - } - ->> diff --git a/Documentation/snippets/new/repeats-headword.ly b/Documentation/snippets/new/repeats-headword.ly deleted file mode 100644 index 0f80e73c43..0000000000 --- a/Documentation/snippets/new/repeats-headword.ly +++ /dev/null @@ -1,131 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 1.7 Repeats - -% Beethoven, Op. 57 -% Piano sonata 23 - Dem Grafen Franz von Brunswick Gewidmet -% Movt II, Andante con moto -% Measures 9 - 16 - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - - -\new PianoStaff << - - \new Staff = RH { - \clef bass - \key df \major - \time 2/4 - \set Score.currentBarNumber = #9 - \bar "|:" - <af ef c>4 ( - <af gf c>8.. - <af ef c>32 - | - <af f df>8. ) - <df' af f>16 ( - <c' af gf>8 - <df' af f>8 ) - | - <af ef c>4 ( - <af gf c>8.. - <af ef c>32 - | - <af f df>8. ) - \slurDown - <f' af f>16 ( - << - { - \voiceTwo - gf8 - f8 ) - } - \new Voice { - \voiceOne - <f' af>16 - ef'16 - <df' af>8 - } - >> - \oneVoice - | - <af ef c>4 ( - <af gf c>8.. - <af ef c>32 - \clef treble - | - <af' df' af>8. ) - <af' f' df'>16 ( - <af' ef' c'>16 - gf'16 - <f' df' af>8 ) - | - \slurUp - <ef' bf gf>4 - \change Staff = LH - \voiceOne - <af ef c>4 - | - <df' f df>4. - \change Staff = RH - \oneVoice - r8 - \clef bass - \bar ":|" - } - - \new Staff = LH { - \clef bass - \key df \major - \time 2/4 - <af, gf,>4 ( - <af, ef,>8.. - <af, gf,>32 - | - <af, f,>8. ) - <af, df,>16 ( - <af, ef,>8 - <af, df,>8 ) - | - <af, gf,>4 ( - <af, ef,>8.. - <af, gf,>32 - | - <af, f,>8. ) - <af, df,>16 ( - <af, c,>8 - <af, df,> ) - | - <af, gf,>4 ( - <af, ef,>8.. - <af, gf,>32 - | - <f f,>8. ) - <df df,>16 ( - <ef ef,>8 - <f f,>8 ) - | - \voiceTwo - gf,4 ( - af,4 ~ ) - | - af,16. [ ( - gf,32 - f,16. - ef,32 ] - df,8 ) - \oneVoice - r8 - } - ->> diff --git a/Documentation/snippets/new/reverting-default-beam-endings.ly b/Documentation/snippets/new/reverting-default-beam-endings.ly deleted file mode 100644 index d771c60161..0000000000 --- a/Documentation/snippets/new/reverting-default-beam-endings.ly +++ /dev/null @@ -1,21 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - texidoc = " -To typeset beams grouped @code{3-4-3-2} one need only change the -beat structure: -" - doctitle = "Reverting default beam endings" -} - -\relative c'' { - \time 12/8 - - % Default beaming - a8 a a a a a a a a a a a - - % Set new values for beam endings - \set Score.beatStructure = #'(3 4 3 2) - a8 a a a a a a a a a a a -} diff --git a/Documentation/snippets/new/rhythms-headword.ly b/Documentation/snippets/new/rhythms-headword.ly deleted file mode 100644 index 74a410df06..0000000000 --- a/Documentation/snippets/new/rhythms-headword.ly +++ /dev/null @@ -1,216 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 1.2 Rhythms - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - - -% Beethoven, Op. 81a -% Piano sonata 26 - Das Lebewohl -% Movt II - Abwesenheit -% Measures 31 - 34 - -\layout { - \context { - \Score - \override SpacingSpanner #'base-shortest-duration = - #(ly:make-moment 1 40) - %\override SpacingSpanner #'strict-grace-spacing = ##t - } -} - -\new PianoStaff << - - % RH Staff - \new Staff { - \clef treble - \key c \minor - \time 2/4 - \set Score.currentBarNumber = #31 - - <c''' c''>8 ( -\markup { - \override #'(baseline-skip . 2) \italic \column { - \line { a tempo } - cantabile - } - } - <g'' g'>8 ) - ~ - <g'' g'>8 ( - <a'' a'>16 - <f'' f'>16 ) - - | - - \afterGrace - <f'' f'>8 [ ( - { - e''16 [ - f''16 - e''16 - d''16 ] - } - <e''! e'>16 - <f'' f'>16 ] ) - \once \override TextScript #'padding = #3.8 - <g'' g'>16 ( \staccato -\markup { \italic cresc. } - <a'' a'>16 ) \staccato - <bf'' bf'>32 ( - <b'' b'>32 ) - <b'' b'>32 ( - <c''' c''>32 ) - - | - - \once \override DynamicLineSpanner #'padding = #2 - b''32 ( \p \> - c'''32 - d'''32 - c'''32 ) \! - g''8 ( - ~ - g''32 [ - a''64 - g''64 ) ] - - a''64 ( [ - g''64 ) - bf''64 ( - a''64 ) ] - - bf''64 ( [ - a''64 ) - c'''64 ( - b''64 ) ] - - c'''128 ( [ - b''128 - d'''128 - c'''128 - f'''64 - f''64 ) ] - - | - - \afterGrace - <f'' f'>8 [ ( - { - e''16 [ - f''16 - e''16 - d''16 ] - } - <e''! e'>16 - <f'' f'>16 ] ) - <g'' g'>16 ( \staccato -\markup { \italic cresc. } - <af''! af'!>16 ) \staccato - <bf'' bf'>32 ( - <b'' b'>32 ) - <b'' b'>32 ( - <c''' c''>32 ) - } - - % LH Staff - \new Staff { - \clef bass - \key c \minor - \time 2/4 - - <g e>32 - c'32 - <g e>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - - <a f>32 - c'32 - <a f>32 - c'32 - - | - - <bf g>32 - c'32 - <bf g>32 - c'32 - - <bf g>32 - c'32 - <bf g>32 - c'32 - - <bf g>32 - c'32 - <a f>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - - | - - <g e>32 - c'32 - <g e>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - - <a f>32 - c'32 - <a f>32 - c'32 - - | - - <bf! g>32 - c'32 - <bf g>32 - c'32 - - <bf g>32 - c'32 - <bf g>32 - c'32 - - <bf g>32 - c'32 - <af! f>32 - c'32 - - <g e>32 - c'32 - <g e>32 - c'32 - } - ->> diff --git a/Documentation/snippets/new/screech-boink.ly b/Documentation/snippets/new/screech-boink.ly deleted file mode 100644 index 699d7f740e..0000000000 --- a/Documentation/snippets/new/screech-boink.ly +++ /dev/null @@ -1,70 +0,0 @@ -\version "2.15.32" -\header { - lsrtags = "headwords" - texidoc = "Random complex notation" - doctitle = "Screech and Boink" -} - -\score { - \context PianoStaff << - \new Staff = "up" { - \time 4/8 - \key c \minor - << - { - \revert Stem #'direction - \change Staff = down - \set subdivideBeams = ##t - g16.[ - \change Staff = up - c'''32 - \change Staff = down - g32 - \change Staff = up - c'''32 - \change Staff = down - g16] - \change Staff = up - \stemUp - \set followVoice = ##t - c'''32([ b''16 a''16 gis''16 g''32)] - } - \\ - { s4 \times 2/3 { d'16[ f' g'] } as'32[ b''32 e'' d''] } - \\ - { s4 \autoBeamOff d''8.. f''32 } - \\ - { s4 es''4 } - >> - } - \new Staff = "down" { - \clef bass - \key c \minor - \set subdivideBeams = ##f - \override Stem #'french-beaming = ##t - \override Beam #'beam-thickness = #0.3 - \override Stem #'thickness = #4.0 - g'16[ b16 fis16 g16] - << - \makeClusters { - as16 <as b> <g b> <g cis> - } - \\ - { - \override Staff.Arpeggio #'arpeggio-direction = #DOWN - <cis, e, gis, b, cis>4\arpeggio - } - >> - } - >> - \midi { - \tempo 8 = 60 - } - \layout { - ragged-right = ##t - \context { - \Staff - \consists "Horizontal_bracket_engraver" - } - } -} diff --git a/Documentation/snippets/new/setting-the-double-repeat-default-for-volte.ly b/Documentation/snippets/new/setting-the-double-repeat-default-for-volte.ly deleted file mode 100644 index 8a751513ae..0000000000 --- a/Documentation/snippets/new/setting-the-double-repeat-default-for-volte.ly +++ /dev/null @@ -1,19 +0,0 @@ -\version "2.14.0" -\header { - lsrtags = "repeats" - texidoc = "There are three different styles of double repeats for -volte, that can be set using @code{doubleRepeatType}." - - doctitle = "Setting the double repeat default for volte" -} - - -\relative c'' { - \repeat volta 1 { c1 } - \set Score.doubleRepeatType = #":|:" - \repeat volta 1 { c1 } - \set Score.doubleRepeatType = #":|.|:" - \repeat volta 1 { c1 } - \set Score.doubleRepeatType = #":|.:" - \repeat volta 1 { c1 } -} diff --git a/Documentation/snippets/new/showing-the-same-articulation-above-and-below-a-note-or-chord.ly b/Documentation/snippets/new/showing-the-same-articulation-above-and-below-a-note-or-chord.ly deleted file mode 100644 index b1ae4e3864..0000000000 --- a/Documentation/snippets/new/showing-the-same-articulation-above-and-below-a-note-or-chord.ly +++ /dev/null @@ -1,36 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, tweaks-and-overrides" - - texidoc = " -By default, LilyPond does not allow the same articulation (e.g., an -accent, a fermata, a flageolet, etc.) to be displayed above and below a -note. For example, @code{c4_\\fermata^\\fermata} will only show a fermata -below, ignoring the fermata above. However, one can stick -scripts (just like fingerings) inside a chord, which means it is -possible to have as many articulations as desired. So, the solution is to -write the note as a chord and add the articulations inside the @code{<@dots{}>}. -" - doctitle = "Showing the same articulation above and below a note or chord" -} - -% The same as \flageolet, just a little smaller -smallFlageolet = -#(let ((m (make-articulation "flageolet"))) - (set! (ly:music-property m 'tweaks) - (acons 'font-size -2 - (ly:music-property m 'tweaks))) - m) - -\relative c' { - s4^"Wrong:" - c4_\fermata^\fermata % The second fermata is ignored! - <e d'>4^\smallFlageolet_\smallFlageolet - - s4^"Works if written inside a chord:" - <e_\smallFlageolet d'^\smallFlageolet>4 - <e_\flageolet d'^\flageolet>4 - <e_\smallFlageolet^\smallFlageolet>4 - <e_\fermata^\fermata>4 -} diff --git a/Documentation/snippets/new/simultaneous-headword.ly b/Documentation/snippets/new/simultaneous-headword.ly deleted file mode 100644 index e42121447e..0000000000 --- a/Documentation/snippets/new/simultaneous-headword.ly +++ /dev/null @@ -1,314 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - ragged-right = ##t - line-width = 17\cm - indent = 0\cm -} - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% NR 1.5 Simultaneous notes - -% L. v. Beethoven, Op. 111 -% Piano sonata 32 -% Movt II - Arietta - Adagio molto semplice e cantabile -% measures 108 - 118 - -\layout { - \context { - \Score - \override SpacingSpanner #'base-shortest-duration = - #(ly:make-moment 1 18) - \override NonMusicalPaperColumn #'line-break-system-details = - #'((alignment-distances . (12))) - } -} - -trillFlat = -\once \override TrillSpanner #'(bound-details left text) = \markup { - \concat { - \musicglyph #"scripts.trill" - \translate #'(-0.5 . 1.9) - \fontsize #-7 - \with-dimensions #'(0 . 0) #'(0 . 0) - \flat - } -} - -\new PianoStaff << - - % RH - \new Staff << - \clef treble - \key c \major - \time 9/16 - \set Score.currentBarNumber = #108 - - % RH voice 1 - \new Voice { - - \voiceOne - s4. - s8. - - | - - s4. - a''8 \p \> [ ( - g''16 ] ) - - | - - g''4. - af''8 [ ( - g''16 ] ) - - | - - g''8. [ - g''8. - g''8. \pp ] - - | - - g''8. [ - af''8. - af''8. ] - - | - - af''8. [ - af''8. - af''8. ] - - | - \break - - \trillFlat - af''4. \startTrillSpan - ~ - af''8. - ~ - - | - - af''4. - ~ - af''8. - ~ - - | - - \oneVoice - <af'' d''>8. [ - a''8. \p \< - bf''8. ] - ~ - - | - - bf''8. [ - b''8. - c'''8. ] - ~ - - \bar "||" - - \key ef \major - c'''8. [ - cs'''8. \f ] \stopTrillSpan - r8. - - } - - % RH voice 2 - \new Voice { - \voiceTwo - \override Voice.TrillSpanner #'direction = #DOWN - d''4. \f \startTrillSpan - ~ - d''8. - ~ - - | - - d''4. - ~ - d''8. - ~ - - | - - d''8. \stopTrillSpan - \trillFlat - d''4. \startTrillSpan - ~ - - | - - d''4. - ~ - d''8. - ~ - - | - - d''4. - ~ - d''8. - ~ - - | - - d''4. - ~ - d''8. \stopTrillSpan - ~ - - | - - \trillFlat - d''4. \startTrillSpan - ~ - d''8. - ~ - - | - - d''4. - ~ - d''8. - ~ - - | - - \once \override NoteColumn #'ignore-collision = ##t - \hideNotes - d''8. \stopTrillSpan - s4. - - | - - s8. - s8. - - } - - >> - - % LH staff - \new Staff { - \clef bass - \key c \major - \time 9/16 - - r8. - r8. - <c! c,!>8 [ ( - <g, g,,>16 ] ) - - | - - <g, g,,>4. - \clef treble - c''8 [ ( - b'16 ] ) - - | - - b'4. - c''8 [ ( - b'16 ] ) - - | - - b'8. [ - b'8. - b'8. ] - - | - - b'8. [ - bf'8. ] - \clef bass - <f f,>8 [ ( - <bf, bf,,>16 ] ) - - | - - <bf, bf,,>4. - \clef treble - f'8 [ ( - bf16 ] ) - - | - - << - - \new Voice { - \voiceOne - \override Voice.TrillSpanner #'direction = #UP - f'4. \startTrillSpan - ~ - f'8. - ~ - - | - - f'4. - ~ - f'8. - ~ - - | - - f'8. \stopTrillSpan - } - - \new Voice { - \voiceTwo - \override Voice.TrillSpanner #'direction = #DOWN - bf8. [ - bf8. - bf8. ] - - | - - bf8. [ - bf8. - bf8. ] - - | - - bf8. - } - - >> - - \oneVoice - r8. - r8. - - | - - r8. - r8. - r8. - \clef bass - - | - - \key ef \major - r8. - r8. - r8. - - } - ->> diff --git a/Documentation/snippets/new/slides-in-tablature.ly b/Documentation/snippets/new/slides-in-tablature.ly deleted file mode 100644 index 7a90e73be2..0000000000 --- a/Documentation/snippets/new/slides-in-tablature.ly +++ /dev/null @@ -1,38 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -Slides can be typeset in both @code{Staff} and @code{TabStaff} contexts: -" - doctitle = "Slides in tablature" -} - -slides = { - c'8\3(\glissando d'8\3) - c'8\3\glissando d'8\3 - \hideNotes - \grace { g16\3\glissando } - \unHideNotes - c'4\3 - \afterGrace d'4\3\glissando { - \stemDown \hideNotes - g16\3 } - \unHideNotes -} - -\score { - << - \new Staff { \clef "treble_8" \slides } - \new TabStaff { \slides } - >> - \layout { - \context { - \Score - \override Glissando #'minimum-length = #4 - \override Glissando #'springs-and-rods = - #ly:spanner::set-spacing-rods - \override Glissando #'thickness = #2 - } - } -} diff --git a/Documentation/snippets/new/snap-pizzicato-bartok-pizzicato.ly b/Documentation/snippets/new/snap-pizzicato-bartok-pizzicato.ly deleted file mode 100644 index f25ee35372..0000000000 --- a/Documentation/snippets/new/snap-pizzicato-bartok-pizzicato.ly +++ /dev/null @@ -1,20 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, unfretted-strings" - texidoc = " -A snap-pizzicato (also known as @qq{Bartok pizzicato}) is a @qq{strong -pizzicato where the string is plucked vertically by snapping and -rebounds off the fingerboard of the instrument} (Wikipedia). It is -denoted by a circle with a vertical line going from the center upwards -outside the circle. -" - doctitle = "Snap-pizzicato (@qq{Bartok pizzicato})" -} - -\relative c' { - c4\snappizzicato - <c' e g>4\snappizzicato - <c' e g>4^\snappizzicato - <c, e g>4_\snappizzicato -} diff --git a/Documentation/snippets/new/stem-and-beam-behavior-in-tablature.ly b/Documentation/snippets/new/stem-and-beam-behavior-in-tablature.ly deleted file mode 100644 index e0c249ef15..0000000000 --- a/Documentation/snippets/new/stem-and-beam-behavior-in-tablature.ly +++ /dev/null @@ -1,21 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "fretted-strings" - texidoc = " -The direction of stems is controlled the same way in tablature as in -traditional notation. Beams can be made horizontal, as shown in this -example. -" - doctitle = "Stem and beam behavior in tablature" -} - -\new TabStaff { - \relative c { - \tabFullNotation - g16 b d g b d g b - \stemDown - \override Beam #'concaveness = #10000 - g,,16 b d g b d g b - } -} diff --git a/Documentation/snippets/new/subdividing-beams.ly b/Documentation/snippets/new/subdividing-beams.ly deleted file mode 100644 index 968bca7559..0000000000 --- a/Documentation/snippets/new/subdividing-beams.ly +++ /dev/null @@ -1,40 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "rhythms" - - texidoc = " -The beams of consecutive 16th (or shorter) notes are, by default, not -subdivided. That is, the three (or more) beams stretch unbroken over -entire groups of notes. This behavior can be modified to subdivide -the beams into sub-groups by setting the property -@code{subdivideBeams}. When set, multiple beams will be subdivided at -intervals defined by the current value of @code{baseMoment} by reducing -the multiple beams to just one beam between the sub-groups. Note that -@code{baseMoment} defaults to one over the denominator of the current -time signature if not set explicitly. It must be set to a fraction -giving the duration of the beam sub-group using the -@code{ly:make-moment} function, as shown in this snippet. Also, when -@code{baseMoment} is changed, @code{beatStructure} should also be changed -to match the new @code{baseMoment}: - -" - doctitle = "Subdividing beams" -} - -\relative c'' { - c32[ c c c c c c c] - \set subdivideBeams = ##t - c32[ c c c c c c c] - - % Set beam sub-group length to an eighth note - \set baseMoment = #(ly:make-moment 1 8) - \set beatStructure = #'(2 2 2 2) - c32[ c c c c c c c] - - % Set beam sub-group length to a sixteenth note - \set baseMoment = #(ly:make-moment 1 16) - \set beatStructure = #'(4 4 4 4) - c32[ c c c c c c c] -} - diff --git a/Documentation/snippets/new/text-headword.ly b/Documentation/snippets/new/text-headword.ly deleted file mode 100644 index 9429ca4175..0000000000 --- a/Documentation/snippets/new/text-headword.ly +++ /dev/null @@ -1,234 +0,0 @@ -\version "2.14.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% NR 1.8 Text - -% L. v. Beethoven, Op. 110 -% Piano sonata 31 -% measures 1 - 7 - -\layout { - \context { - \Score - \override SpacingSpanner #'base-shortest-duration = - #(ly:make-moment 1 20) - } -} - -\new PianoStaff << - - % RH staff - \new Staff { - \clef treble - \key af \major - \time 3/4 - - \once \override TextScript #'staff-padding = #4 - <c'' af'>4. ( - _ \markup { \dynamic p \italic { con amabilità } } - <af' ef'>8 ) - <af' ef'>8. [ - <af' ef'>16 ] - - | - - <df'' g'>4 - <bf' g'>2 - _ \markup { \italic { ten. } } - - | - - << - - \new Voice { - \voiceOne - ef''4. ( - df''8 [ ) - ef'' ( - f'' ) ] - - | - - \once \override TextScript #'staff-padding = #4 - ef''8. ( - _ \markup { \italic { tranqu. } } - d''16 ) - df''8 \trill \fermata - _ \markup { \italic { ten. } } - } - - \new Voice { - \voiceTwo - af'4. - af'8 [ - af'8 - af'8 ] - - | - - g'4 - g'8 - } - - >> - - \oneVoice - \once \override TextScript #'staff-padding = #4 - df''32 - _ \markup { \italic dolce } - c''32 - df''32 - ef''32 - \acciaccatura { df''[ ef'' ] } - f''8 - ef''16 - df''16 - - | - \break - \overrideProperty "Score.NonMusicalPaperColumn" - #'line-break-system-details #'((alignment-distances . (12))) - - c''4. ( - ^ \markup \italic { cantabile, con intimissimo sentimento, - ma sempre molto dolce e semplice } - ef''4 - af''8 ) - - | - - af''4 ( - g''2 ) - - | - - bf''4. ( - g''4 - ef''8 ) - - | - } - - % LH - \new Staff { - \clef bass - \key af \major - \time 3/4 - - <ef af,>4. ( - <ef c>8 ) - <ef c>8. [ - <ef c>16 ] - - | - - <ef bf,>4 - <ef df>2 ^ \markup { \italic ten. } - - | - - << - - \new Voice { - \voiceOne - ef8 [ ( - af8 - c'8 - bf8 ) - c'8 ( \staccato - df'8 ] ) \staccato - - | - - bf4 - bf8 ^ \markup { \italic ten. } - } - - \new Voice { - \voiceTwo - c4. ( - f8 [ ) - ef8 ( \staccato - df8 ] ) \staccato - - | - - ef4 - ef8 \fermata - } - - >> - - \oneVoice - r8 - r4 - \clef treble - - | - - \override Staff.SustainPedalLineSpanner #'outside-staff-priority = #1000 - \override Staff.SustainPedalLineSpanner #'staff-padding = #7 - \once \override TextScript #'padding = #2 - af16 \sustainOn - ^ \markup \italic { non staccato } - _ \markup \italic { molto \concat { \dynamic { p } , } sempre tranquillo - ed egualmente, non rubato } - <ef' c'>16 - <ef' c'>16 - <ef' c'>16 - af16 - <ef' c'>16 - <ef' c'>16 - <ef' c'>16 - af16 \sustainOn - <ef' c'>16 - <ef' c'>16 - <ef' c'>16 - - | - - bf16 \sustainOn - <ef' df'>16 - <ef' df'>16 - <ef' df'>16 - bf16 \sustainOn - <ef' df'>16 - <ef' df'>16 - <ef' df'>16 - bf16 - <ef' df'>16 - <ef' df'>16 - <ef' df'>16 - - | - - \override Staff.SustainPedalLineSpanner #'staff-padding = #4 - df'16 \sustainOn - <bf' g' ef'>16 - <bf' g' ef'>16 - <bf' g' ef'>16 - df'16 - <bf' g' ef'>16 - <bf' g' ef'>16 - <bf' g' ef'>16 - df'16 \sustainOn - <bf' g' ef'>16 - <bf' g' ef'>16 - <bf' g' ef'>16 - - | - } - ->> diff --git a/Documentation/snippets/new/unfretted-headword.ly b/Documentation/snippets/new/unfretted-headword.ly deleted file mode 100644 index b4d2729c1d..0000000000 --- a/Documentation/snippets/new/unfretted-headword.ly +++ /dev/null @@ -1,230 +0,0 @@ -% #!lilypond lcp-extract.ly -*- coding: utf-8; -*- - -%%% -%%% les-cinq-pieds: -%%% extract for the lilypond documentaton project -%%% - -%% Title: Les cinq pieds -%% Composer: David Séverin -%% Date: Juillet 2007 -%% Instrument: Violon Solo -%% Dedication: A mon épouse Lívia De Souza Vidal -%% Additional: avec l'aide de Krzysztof Wagenaar - -%% Statement: - -%% Here by, I, the composer, agree that this extract of my composition -%% be in the public domain and can be part of, used and presented in -%% the LilyPond Documention Project. - -%% Statement Date: Octber the 9th, 2008 - - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - - -\version "2.14.0" -#(set-global-staff-size 15) - -%%% -%%% Abreviations -%%% - -db = \markup { \musicglyph #"scripts.downbow" } -dub = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" } } -dubetc = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" "..." } } - -ub = \markup { \musicglyph #"scripts.upbow" } -udb = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" } } -udbetc = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" "..." } } - -fermaTa = \markup \musicglyph #"scripts.ufermata" - -accel = \markup \tiny \italic \bold "accel..." -ritar = \markup \tiny \italic \bold "ritar..." - -ignore = \override NoteColumn #'ignore-collision = ##t - - -%% -%% Strings -%% - -svib = \markup \small "s. vib." -pvib = \markup \small "p. vib." -mvib = \markup \small "m. vib." -sulp = \markup \small "s.p." -norm = \markup \small "n." - -quatre = \markup \teeny "IV" - - -%% -%% Shifting Notes -%% - -shift = \once \override NoteColumn #'force-hshift = #0.9 -shifta = \once \override NoteColumn #'force-hshift = #1.2 -shiftb = \once \override NoteColumn #'force-hshift = #1.4 - - -%% -%% Hairpin -%% - -% aniente = "a niente" -aniente = \once \override Hairpin #'circled-tip = ##t - - -%% -%% Tuplets -%% - -tupletbp = \once \override Staff.TupletBracket #'padding = #2.25 - - -%% -%% Flag [Note Head - Stem] -%% - -noflag = \once \override Flag #'style = #'no-flag - -%%% -%%% Functions -%%% - -#(define-markup-command (colmark layout props args) - (markup-list?) - (let ((entries (cons (list '(baseline-skip . 2.3)) props) - )) - (interpret-markup layout entries - (make-column-markup - (map (lambda (arg) - (markup arg)) - (reverse args)))))) - - -%%% -%%% Instruments -%%% - -ViolinSolo = \relative c' { - - \voiceOne - - \set Score.markFormatter = #format-mark-box-numbers - \override Score.VoltaBracket #'font-name = #"sans" - \override Score.VoltaBracket #'extra-offset = #'(0 . 1) - \override SpacingSpanner #'uniform-stretching = ##t - - - %% Measure 1 - \time 25/8 - \mark \default - r2 ^\markup \colmark { \italic "fatigué" " " \bold "lentement"} r4 r r8 - << - { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \svib } \shifta e1 } \\ - { d2 \open \mf \< ~ \aniente d1 \! \> r4 r ^\markup \colmark { " " \fermaTa } \! } - >> - - - %% Measure 2 - \time 7/4 - \set Score.repeatCommands = #'((volta "1) n. 2) s.p.")) - << - { \shift d2 \glissando ^\markup \colmark { \quatre \udbetc } \shifta e1 } \\ - { d2 \open \mf \< ~ d1 \! \> ~ d4 ^\markup \colmark { " " \fermaTa } \! } - >> - \set Score.repeatCommands = #'((volta #f)) - - - %% Measure 3 - \time 15/4 - << - { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \pvib \norm } \shifta e1 \glissando d2 } \\ - { d2 \open \mf \< ~ d1 ~ d2 \ff ~ d1 \> ~ d2 ^\markup \colmark { " " " " \svib } ~ d4 \pp} - >> - \break - - %% Measure 4 - \time 4/4 - \stemUp - \tupletDown - \times 2/3 { d4 ^\markup \colmark { \quatre \db \accel } d d } - \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d } - - - - %% Measure 5 - \time 5/4 - \tupletbp \times 2/3 { d8 \mf \< ^\markup \colmark { \quatre \db \norm } d _\open d } - \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db \sulp } d _\open d } - \tupletbp \times 2/3 { d16 ^\markup \colmark { " " \db \norm } d _\open d d d _\open d } - d2 \ff ^\markup \colmark { " " \pvib } \> - - - %% Measure 6 - \time 5/8 - \once \override Beam #'grow-direction = #RIGHT % \featherDurations #(ly:make-moment 2 3) - { d16 \staccato - [ d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato] - } - \break - - - %% Measure 7 - \time 7/4 - \tupletbp \times 2/3 { d16 ^\markup \colmark { \quatre } d _\open d d d _\open d } - \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db } d _\open d } - \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db " " \sulp } d _\open d } - \times 2/3 { d4 ^\markup \colmark { \quatre \db \ritar \norm } d d } - \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d \ppp ~ } - - - %% Measure 8 - d4 ^\markup \colmark { " " " " \pvib \norm } - deh2 d dih \< - - - %% Measure 9 - << - { \shift d2 \glissando ^\markup \colmark { \quatre } \shifta e1 } \\ - { d2 \open ~ d1 ^\markup \colmark { " " " " \mvib } } - >> - \breathe r4 \! - -} - - -%%% -%%% Score -%%% - -\score { - - << - \relative << - \new Staff \ViolinSolo - >> - - \override Score.Rest #'transparent = ##t - \set Score.defaultBarType = "empty" - >> - - \layout { - indent = 0.0 - \context { - \Staff - \remove "Time_signature_engraver" - } - \context { - \Score - \remove "Bar_number_engraver" - } - } -} diff --git a/Documentation/snippets/new/using-ly-grob-object-to-access-grobs-with--tweak.ly b/Documentation/snippets/new/using-ly-grob-object-to-access-grobs-with--tweak.ly deleted file mode 100644 index eed7462b43..0000000000 --- a/Documentation/snippets/new/using-ly-grob-object-to-access-grobs-with--tweak.ly +++ /dev/null @@ -1,75 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "tweaks-and-overrides" - - texidoc = " -Some grobs can be accessed @qq{laterally} from within another grob's -callback. These are usually listed as @qq{layout objects} in the -@qq{Internal properties} section of a grob-interface. The function -@code{ly:grob-object} is used to access these grobs. - - -Demonstrated below are some ways of accessing grobs from within a -NoteHead callback, but the technique is not limited to NoteHeads. -However, the NoteHead callback is particularly important, since it is -the implicit callback used by the @code{\\tweak} command. - - -The example function defined below (\"display-grobs\") is probably not -that useful, but it demonstrates that the grobs are indeed being -accessed. - - -Example console output: - - -@example --------------------- -#-Grob Accidental - -#-Grob Arpeggio - -#-Grob Stem - -@end example - - -" - doctitle = "Using ly:grob-object to access grobs with \\tweak" -} - -#(define (notehead-get-accidental notehead) - ;; notehead is grob - (ly:grob-object notehead 'accidental-grob)) - -#(define (notehead-get-arpeggio notehead) - ;; notehead is grob - (let ((notecolumn (notehead-get-notecolumn notehead))) - (ly:grob-object notecolumn 'arpeggio))) - -#(define (notehead-get-notecolumn notehead) - ;; notehead is grob - (ly:grob-parent notehead X)) - -#(define (notehead-get-stem notehead) - ;; notehead is grob - (let ((notecolumn (notehead-get-notecolumn notehead))) - (ly:grob-object notecolumn 'stem))) - -#(define (display-grobs notehead) - ;; notehead is grob - (let ((accidental (notehead-get-accidental notehead)) - (arpeggio (notehead-get-arpeggio notehead)) - (stem (notehead-get-stem notehead))) - (format #t "~2&~a\n" (make-string 20 #\-)) - (for-each - (lambda (x) (format #t "~a\n" x)) - (list accidental arpeggio stem)))) - -\relative c' { - %% display grobs for each note head: - %\override NoteHead #'before-line-breaking = #display-grobs - <c - %% or just for one: - \tweak #'before-line-breaking #display-grobs - es - g>1\arpeggio -} diff --git a/Documentation/snippets/new/using-the-whiteout-property.ly b/Documentation/snippets/new/using-the-whiteout-property.ly deleted file mode 100644 index 9464915492..0000000000 --- a/Documentation/snippets/new/using-the-whiteout-property.ly +++ /dev/null @@ -1,30 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "expressive-marks, editorial-annotations" - texidoc = " -Any graphical object can be printed over a white background to -mask parts of objects that lie beneath. This can be useful to -improve the appearance of collisions in complex situations when -repositioning objects is impractical. It is necessary to explicitly -set the @code{layer} property to control which objects are masked -by the white background. - -In this example the collision of the tie with the time signature is -improved by masking out the part of the tie that crosses the time -signature by setting the @code{whiteout} property of @code{TimeSignature}. -To do this @code{TimeSignature} is moved to a layer above @code{Tie}, which -is left in the default layer of 1, and @code{StaffSymbol} is moved to a -layer above @code{TimeSignature} so it is not masked. -" - doctitle = "Using the whiteout property" -} - -{ - \override Score.StaffSymbol #'layer = #4 - \override Staff.TimeSignature #'layer = #3 - b'2 b'~ - \once \override Staff.TimeSignature #'whiteout = ##t - \time 3/4 - b' r4 -} diff --git a/Documentation/snippets/new/vocal-ensemble-template-with-automatic-piano-reduction.ly b/Documentation/snippets/new/vocal-ensemble-template-with-automatic-piano-reduction.ly deleted file mode 100644 index 7c99b53f18..0000000000 --- a/Documentation/snippets/new/vocal-ensemble-template-with-automatic-piano-reduction.ly +++ /dev/null @@ -1,101 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "vocal-music, keyboards, template" - - texidoc = " -This template adds an automatic piano reduction to the standard SATB -vocal score demonstrated in @qq{Vocal ensemble template}. This -demonstrates one of the strengths of LilyPond – you can use a music -definition more than once. If any changes are made to the vocal notes -(say, @code{tenorMusic}), then the changes will also apply to the piano -reduction. -" - doctitle = "Vocal ensemble template with automatic piano reduction" -} - -\paper { - top-system-spacing #'basic-distance = #10 - score-system-spacing #'basic-distance = #20 - system-system-spacing #'basic-distance = #20 - last-bottom-spacing #'basic-distance = #10 -} - -global = { - \key c \major - \time 4/4 -} - -sopMusic = \relative c'' { - c4 c c8[( b)] c4 -} -sopWords = \lyricmode { - hi hi hi hi -} - -altoMusic = \relative c' { - e4 f d e -} -altoWords =\lyricmode { - ha ha ha ha -} - -tenorMusic = \relative c' { - g4 a f g -} -tenorWords = \lyricmode { - hu hu hu hu -} - -bassMusic = \relative c { - c4 c g c -} -bassWords = \lyricmode { - ho ho ho ho -} - -\score { - << - \new ChoirStaff << - \new Lyrics = "sopranos" \with { - % This is needed for lyrics above a staff - \override VerticalAxisGroup #'staff-affinity = #DOWN - } - \new Staff = "women" << - \new Voice = "sopranos" { \voiceOne << \global \sopMusic >> } - \new Voice = "altos" { \voiceTwo << \global \altoMusic >> } - >> - \new Lyrics = "altos" - \new Lyrics = "tenors" \with { - % This is needed for lyrics above a staff - \override VerticalAxisGroup #'staff-affinity = #DOWN - } - - \new Staff = "men" << - \clef bass - \new Voice = "tenors" { \voiceOne << \global \tenorMusic >> } - \new Voice = "basses" { \voiceTwo << \global \bassMusic >> } - >> - \new Lyrics = "basses" - \context Lyrics = "sopranos" \lyricsto "sopranos" \sopWords - \context Lyrics = "altos" \lyricsto "altos" \altoWords - \context Lyrics = "tenors" \lyricsto "tenors" \tenorWords - \context Lyrics = "basses" \lyricsto "basses" \bassWords - >> - \new PianoStaff << - \new Staff << - \set Staff.printPartCombineTexts = ##f - \partcombine - << \global \sopMusic >> - << \global \altoMusic >> - >> - \new Staff << - \clef bass - \set Staff.printPartCombineTexts = ##f - \partcombine - << \global \tenorMusic >> - << \global \bassMusic >> - >> - >> - >> -} diff --git a/Documentation/snippets/new/vocal-ensemble-template-with-verse-and-refrain.ly b/Documentation/snippets/new/vocal-ensemble-template-with-verse-and-refrain.ly deleted file mode 100644 index 17a901c06e..0000000000 --- a/Documentation/snippets/new/vocal-ensemble-template-with-verse-and-refrain.ly +++ /dev/null @@ -1,99 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "vocal-music, contexts-and-engravers, template" - texidoc = " -This template creates a score which starts with a solo verse and -continues into a refrain for two voices. It also demonstrates the -use of spacer rests within the @code{\global} variable to define -meter changes (and other elements common to all parts) throughout -the entire score. -" - doctitle = "Vocal ensemble template with verse and refrain" -} - -global = { - \key g \major - - % verse - \time 3/4 - s2.*2 - \break - - % refrain - \time 2/4 - s2*2 - \bar "|." -} - -SoloNotes = \relative g' { - \clef "treble" - - % verse - g4 g g | - b4 b b | - - % refrain - R2*2 | -} - -SoloLyrics = \lyricmode { - One two three | - four five six | -} - -SopranoNotes = \relative c'' { - \clef "treble" - - % verse - R2.*2 | - - % refrain - c4 c | - g4 g | -} - -SopranoLyrics = \lyricmode { - la la | - la la | -} - -BassNotes = \relative c { - \clef "bass" - - % verse - R2.*2 | - - % refrain - c4 e | - d4 d | -} - -BassLyrics = \lyricmode { - dum dum | - dum dum | -} - -\score { - << - \new Voice = "SoloVoice" << \global \SoloNotes >> - \new Lyrics \lyricsto "SoloVoice" \SoloLyrics - - \new ChoirStaff << - \new Voice = "SopranoVoice" << \global \SopranoNotes >> - \new Lyrics \lyricsto "SopranoVoice" \SopranoLyrics - - \new Voice = "BassVoice" << \global \BassNotes >> - \new Lyrics \lyricsto "BassVoice" \BassLyrics - >> - >> - \layout { - ragged-right = ##t - \context { \Staff - % these lines prevent empty staves from being printed - \RemoveEmptyStaves - \override VerticalAxisGroup #'remove-first = ##t - } - } -} - diff --git a/Documentation/snippets/new/vocal-ensemble-template.ly b/Documentation/snippets/new/vocal-ensemble-template.ly deleted file mode 100644 index da5498872f..0000000000 --- a/Documentation/snippets/new/vocal-ensemble-template.ly +++ /dev/null @@ -1,94 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags = "vocal-music, template" - - texidoc = " -Here is a standard four-part SATB vocal score. With larger ensembles, -it is often useful to include a section which is included in all parts. -For example, the time signature and key signature are almost always the -same for all parts. Like in the @qq{Hymn} template, the four voices are -regrouped on only two staves. -" - doctitle = "Vocal ensemble template" -} - -\paper { - top-system-spacing #'basic-distance = #10 - score-system-spacing #'basic-distance = #20 - system-system-spacing #'basic-distance = #20 - last-bottom-spacing #'basic-distance = #10 -} - -global = { - \key c \major - \time 4/4 -} - -sopMusic = \relative c'' { - c4 c c8[( b)] c4 -} -sopWords = \lyricmode { - hi hi hi hi -} - -altoMusic = \relative c' { - e4 f d e -} -altoWords = \lyricmode { - ha ha ha ha -} - -tenorMusic = \relative c' { - g4 a f g -} -tenorWords = \lyricmode { - hu hu hu hu -} - -bassMusic = \relative c { - c4 c g c -} -bassWords = \lyricmode { - ho ho ho ho -} - -\score { - \new ChoirStaff << - \new Lyrics = "sopranos" \with { - % this is needed for lyrics above a staff - \override VerticalAxisGroup #'staff-affinity = #DOWN - } - \new Staff = "women" << - \new Voice = "sopranos" { - \voiceOne - << \global \sopMusic >> - } - \new Voice = "altos" { - \voiceTwo - << \global \altoMusic >> - } - >> - \new Lyrics = "altos" - \new Lyrics = "tenors" \with { - % this is needed for lyrics above a staff - \override VerticalAxisGroup #'staff-affinity = #DOWN - } - \new Staff = "men" << - \clef bass - \new Voice = "tenors" { - \voiceOne - << \global \tenorMusic >> - } - \new Voice = "basses" { - \voiceTwo << \global \bassMusic >> - } - >> - \new Lyrics = "basses" - \context Lyrics = "sopranos" \lyricsto "sopranos" \sopWords - \context Lyrics = "altos" \lyricsto "altos" \altoWords - \context Lyrics = "tenors" \lyricsto "tenors" \tenorWords - \context Lyrics = "basses" \lyricsto "basses" \bassWords - >> -} - diff --git a/Documentation/snippets/new/vocal-headword.ly b/Documentation/snippets/new/vocal-headword.ly deleted file mode 100644 index 0ad4130de5..0000000000 --- a/Documentation/snippets/new/vocal-headword.ly +++ /dev/null @@ -1,73 +0,0 @@ -\version "2.14.0" - -#(set-global-staff-size 15) -\paper { - ragged-right = ##t - line-width = 17\cm - indent = 0\cm -} - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -\layout { - \context { - \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% L. van Beethoven. Symphony No. 9 in D minor, op.125; Finale -% mm. 216 -- 236 -% Text: F. von Schiller - -\score { - \new Staff \relative c' { - \set Score.currentBarNumber = 216 - \bar "" % make first bar number be shown - \clef bass \key d \minor \time 3/4 - % \tempo "Presto" - % \compressFullBarRests R2.*8 - \tempo "Recitativo" - \autoBeamOff - r4^\markup { \small Baritono } r a - \appoggiatura a8 e'2. ~ - e4 d8[ cis d e] - e4 g, r8 g - bes2 a8 e - g4 f r - R2.*2 - gis2 gis4 - r4 d'4. b8 - b4 gis8([ a b cis] - e8[ d cis d)] b([ gis)] - e8 d d4 fis8([ e)] - d4 cis r - \key d \major - r4 r a' - d4.( e8[ fis e)] - e([ d)] d([ cis d a)] - g8([ fis)] fis([ e d c)] - c8([ b)] g'2~ - \once \override Script #'outside-staff-priority = #1 % put fermata closer to staff - g4.\fermata ^\markup { \small \italic "ad libitum" } e8[ cis!] d - d8 a a4 r \bar "||" - - % \time 4/4 \tempo "Allegro assai" - % R1 - % e''4^\f d r2 - % R1 - % e4( ^\f d2) a8([ g)] - } - \addlyrics { - O Freun -- _ _ de, nicht die -- _ se Tö -- ne! - Son -- dern laßt uns an -- _ ge -- neh -- me -- re an -- stim -- men, - und freu -- _ _ _ _ _ _ _ den -- vol -- le -- re! - % Freu -- de, Freu -- de,__ - } -} - diff --git a/Documentation/snippets/new/wind-headword.ly b/Documentation/snippets/new/wind-headword.ly deleted file mode 100644 index cadbc37601..0000000000 --- a/Documentation/snippets/new/wind-headword.ly +++ /dev/null @@ -1,52 +0,0 @@ -\version "2.14.0" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 2.whatever Wind - -\header { - lsrtags = "headwords" - texidoc = "" - doctitle = "headword" -} - -% Tchaikovsky -% Nutcracker Suite, VII Dance of the Merlitons -\score { - \new StaffGroup << - \new Staff \relative c'' { - \set Staff.instrumentName = "Flauto I,II" - \once \override Score.RehearsalMark #'self-alignment-X = #-1 - \once \override Score.RehearsalMark #'break-align-symbols = -#'(time-signature) - \once \override Score.TimeSignature -#'break-align-anchor-alignment = #LEFT - \once \override Score.RehearsalMark #'padding = #4 - \mark \markup \large \bold {Moderato assai} - \key d \major - \time 2/4 - \compressFullBarRests - R2*2 - <d a>16-.\p <cis g>-. <d a>-. <cis g>-. <d a>8-. <cis g>-. - <e a,>-.\< <d a>32( <fis d> <a fis> <d a> <fis d>4--)\mf - <g d>16-. <fis cis>-. <g d>-. <fis cis>-. - <e b>(\> <d a>) <a fis>-. <fis d>-.\! - <d bes>4--\sf \acciaccatura {<d' bes>8} <cis a>4--\mf - } - \new Staff \relative c' { - \set Staff.instrumentName = "Flauto III" - \key d \major - \time 2/4 - \compressFullBarRests - R2*2_\markup{Gr.Fl.} - fis16-.\p e-. fis-. e-. fis8-. e-. - g8-.\< fis32( a d fis a4--)\mf - b16-. a-. b-. a-. g(\> fis) d-. a-.\! - g4--\sf \acciaccatura fis'8 g4--\mf - } - >> -} - diff --git a/Documentation/snippets/new/woodwind-diagrams-listing.ly b/Documentation/snippets/new/woodwind-diagrams-listing.ly deleted file mode 100644 index b18121fbf1..0000000000 --- a/Documentation/snippets/new/woodwind-diagrams-listing.ly +++ /dev/null @@ -1,95 +0,0 @@ -\version "2.14.0" - -\header { - lsrtags="winds" - texidoc=" -The following music shows all of the woodwind diagrams currently -defined in LilyPond. -" - doctitle = "Woodwind diagrams listing" - -} - -\relative c' { - \textLengthOn - c1^ - \markup { - \center-column { - 'piccolo - " " - \woodwind-diagram - #'piccolo - #'() - } - } - - c1^ - \markup { - \center-column { - 'flute - " " - \woodwind-diagram - #'flute - #'() - } - } - c1^\markup { - \center-column { - 'oboe - " " - \woodwind-diagram - #'oboe - #'() - } - } - - c1^\markup { - \center-column { - 'clarinet - " " - \woodwind-diagram - #'clarinet - #'() - } - } - - c1^\markup { - \center-column { - 'bass-clarinet - " " - \woodwind-diagram - #'bass-clarinet - #'() - } - } - - c1^\markup { - \center-column { - 'saxophone - " " - \woodwind-diagram - #'saxophone - #'() - } - } - - c1^\markup { - \center-column { - 'bassoon - " " - \woodwind-diagram - #'bassoon - #'() - } - } - - c1^\markup { - \center-column { - 'contrabassoon - " " - \woodwind-diagram - #'contrabassoon - #'() - } - } -} |