From: Graham Percival Date: Sun, 24 Jan 2010 14:32:52 +0000 (+0000) Subject: Build: move headwords into LSR staging area. X-Git-Tag: release/2.13.12-1~57 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=96542edfa8dd5d5e9ccaac765677e747ce3c51e3;p=lilypond.git Build: move headwords into LSR staging area. --- diff --git a/Documentation/included/ancient-headword.ly b/Documentation/included/ancient-headword.ly deleted file mode 100644 index 3b1136e989..0000000000 --- a/Documentation/included/ancient-headword.ly +++ /dev/null @@ -1,135 +0,0 @@ -\version "2.12.0" - -#(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -\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/included/chords-headword.ly b/Documentation/included/chords-headword.ly deleted file mode 100644 index f8a661fd71..0000000000 --- a/Documentation/included/chords-headword.ly +++ /dev/null @@ -1,101 +0,0 @@ -\version "2.12.0" -#(set-global-staff-size 15) -\paper{ - ragged-right=##f - line-width=15\cm - indent=0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -theChords = \chordmode { - \time 2/2 - f1 | c2 f2 | f1 | c2 f2| %\break - f2 bes2 | f1 | c2:7 f | c1 | \break -} - -verseOne = \lyricmode{ - \set stanza = "1. " - Fair is the sun - shine, - Fair - er the moon - light - And all the stars __ _ in heav'n a -- bove; -} - -verseTwo = \lyricmode{ - \set stanza = "2. " - Fair are the mead - ows, - Fair - er the wood - land, - Robed in the flow -- ers of bloom -- ing spring; -} - -Soprano = { - \time 2/2 - \key f \major - \stemUp - f'2 f'4 f' | g'4 e' f'2 | a'4. a'8 a'4 a' | bes'4 g' a'2 | -c''2 f''4 d'' | c''2 bes'4 a' | bes'2 a' | g'1 | -} - -Alto = { - \key f \major - c'2 c'4 c' | d'4 c' c'2 | f'4. f'8 f'4 fis' | g'4 e' f'2 | - f'2 f'4 f' | f'2 g'4 f' | e'2 f' | e'1 | -} - -Tenor = { - \key f \major - \stemDown - a2 a4 a | bes4 g a2 | c'4. c'8 d'4 d' | d'4 c' c'2 | - a2 d'4 bes | a2 c'4 c' | c'2 c' | c'1 | -} - -Bass = { - \key f \major - f2 f4 f | bes,4 c f2 | f4. e8 d4 c | bes,4 c f2 | - f2 bes,4 d | f2 e4 f | g2 f | c1 | -} - - -\score { - << - \new ChordNames { \theChords } - \context Staff = upper { - \context Voice = sop { - << - \Soprano - \Alto - >> - } - } - \context Lyrics="LyrOne" \lyricsto "sop" {\verseOne} - \context Lyrics="LyrTwo" \lyricsto "sop" {\verseTwo} - \context Staff = lower { - \new Voice { - \clef bass - #(set-accidental-style 'modern-cautionary) - << - \Tenor - \Bass - >> - } - } - >> - -\layout { - %between-system-space = 1\mm - indent = 0 - \context { - \Score - \remove "Bar_number_engraver" - } - \context { \Staff - \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1) - } - } -} -\paper { } diff --git a/Documentation/included/editorial-headword.ly b/Documentation/included/editorial-headword.ly deleted file mode 100644 index b834181f48..0000000000 --- a/Documentation/included/editorial-headword.ly +++ /dev/null @@ -1,101 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% NR 1.7 Editorial annotations - -% Beethoven, Op. 31, No. 3 -% Piano sonata 18, Movt II, Scherzo -% Measures 9 - 14 - -\layout { } - -\new PianoStaff << - - % RH Staff - \new Staff { - \clef treble - \key af \major - \time 2/4 - \set Staff.fingeringOrientations = #'(up up) - \set Score.currentBarNumber = #9 - \partial 8 - 8 \staccato - | - \set doubleSlurs = ##t - 4 ( - 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 down) - \partial 8 - 8 \staccato - \set doubleSlurs = ##t - 4 ( - 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/included/expressive-headword.ly b/Documentation/included/expressive-headword.ly deleted file mode 100644 index ed62f91ee1..0000000000 --- a/Documentation/included/expressive-headword.ly +++ /dev/null @@ -1,263 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 1.3 Expressive marks - -% 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 - } - >> - - | - - 4 \tenuto - d'8 \staccato - g'8 \staccato - b'8 \staccato - d''8 \staccato - - | - - d''8 ( - 8 \staccato ) - 8 \staccato - d''8 ( - 8 \staccato ) - 8 \staccato - - | - - d''8 ( - 8 \staccato ) - 8 \staccato - d''8 ( - 8 \staccato ) - 8 \staccato - - | - - d''8 \staccato - 8 \staccato - 8 \staccato - d'' \staccato - 8 \staccato - 8 \staccato - - | - - 4 \fermata - r8 r4 r8 - } - - % LH Staff - \new Staff { - \clef bass - \key g \major - \time 6/8 - \partial 2 - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 4 - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 4 - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 8 \staccato - 8 \staccato - 8 \staccato - 4. ( - - | - - d'4 ) - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 4 - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 4 - r8 - r8 - 8 \staccato - 8 \staccato - - | - - 8 \staccato - 8 \staccato - 8 \staccato - 4 - 8 \staccato - - | - - 4 \tenuto - r8 - r4 - r8 - - | - - r8 - 8 \staccato - 8 \staccato - r8 - 8 \staccato - 8 \staccato - - | - - r8 - 8 \staccato - 8 \staccato - r8 - 8 \staccato - 8 \staccato - - | - - r8 - 8 \staccato - 8 \staccato - r8 - 8 \staccato - 8 \staccato - - | - - 4 \fermata - r8 r4 r8 - } - ->> diff --git a/Documentation/included/figured-bass-headword.ly b/Documentation/included/figured-bass-headword.ly deleted file mode 100644 index 8f666920c0..0000000000 --- a/Documentation/included/figured-bass-headword.ly +++ /dev/null @@ -1,117 +0,0 @@ -\version "2.12.0" -#(set-global-staff-size 15) -\paper{ - ragged-right=##f - line-width=16\cm - indent=1.5\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% NR 2.7.3 Figured bass - -% 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 { - \hcenter-in #11 - \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 { - \hcenter-in #11 - \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 { - \hcenter-in #13 { - \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 VerticalAxisGroup #'minimum-Y-extent = #'() - \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/included/fretted-headword.ly b/Documentation/included/fretted-headword.ly deleted file mode 100644 index f2d13ee0af..0000000000 --- a/Documentation/included/fretted-headword.ly +++ /dev/null @@ -1,145 +0,0 @@ -% INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings % -% Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17" % -% on melodies from Bellini's "Norma" % -%*****************************************************************% - -\version "2.12.0" - -#(set-global-staff-size 15) -\paper { - line-width = 17\cm - indent = 0\cm -} - -\layout { - \context { - \Score - \remove "Bar_number_engraver" - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -%%%% shortcuts -% fingering orientations -sfol = \set fingeringOrientations = #'(left) -sfor = \set fingeringOrientations = #'(right) -sfod = \set fingeringOrientations = #'(down) -sfou = \set fingeringOrientations = #'(up) - -% string number orientations -ssnol = \set stringNumberOrientations = #'(left) %(down right up) -ssnou = \set stringNumberOrientations = #'(up) -ssnod = \set stringNumberOrientations = #'(down) -ssnor = \set stringNumberOrientations = #'(right) - -% define fingering offset -FO = #(define-music-function (parser location offsetX offsetY) (number? number?) -#{ - \once \override Voice.Fingering #'extra-offset = #(cons $offsetX $offsetY) -#}) - -% markups -rit = \markup \center-align { \bold { \italic { " rit." } } } -dim = \markup \center-align { \italic { " dim." } } -andantino = \markup \left-align { \italic { \bold { \fontsize #2.5 { "Andantino" } } } } -benmarcato = \markup { \italic { \bold { "il canto ben marcato" } } } -pdolce = #(make-dynamic-script (markup #:line (#:dynamic "p" #:normal-text #:italic "dol."))) - -%%% THE MUSIC %%% - -melody = \relative c { - \clef "treble_8" - \key d \major - \time 4/4 - \voiceOne - \sfol - e,32 a' c e - e, a c e - e,, a' c e - e, a c e - f4\rest 4-> | % m. 1 - - e,,,32 gis' b e - e, gis b e - e,, gis' b e - e, gis b e - f4\rest \FO #'0.4 #'0.5 4 | % m. 2 - - d4\rest -> d4\rest^\rit 4-> | % m. 3 - 1 | % m. 4 - - \bar "||" - \key a \minor - R1 % m. 5 - - e'4^\benmarcato e8. d16-4 - d4-4 \times 2/3 { \sfou \FO #'-0.3 #'0.6 4 b8 } | % end of m. 6 - - \FO #'-0.3 #'0.3 - 4 \times 2/3 { c4 b8 } a4 e'8. e16 | % m. 7 - - \FO #'-0.3 #'0.3 - 4 \times 2/3 { \sfol \FO #'0.3 #'0.0 4 e8 } e4 % beg of m. 8 - \times 2/3 { \sfou 4 c8 } | % end of m. 8 - - b4 \times 2/3 { d4-4 c8 } \sfou \FO #'-1.7 #'-1.5 4 e | % end of m. 9 - - e4 e8. d16-4 d4 \times 2/3 { c4 b8 } | % m. 10 - - \times 2/3 { a4 a8 b4 c8 } % beg of m. 11 - \sfou \FO #'-0.3 #'0.3 - 4^\< \times 2/3 { e4 8\! } | % end of m. 11 -} - -bass = \relative c { - \key d \major - \time 4/4 - \voiceTwo - - e,8\fp[ e'] e,[ e'] e, \sfol c, | % m. 1 - - e,,8\fp[ e'] e,[ e'] e, \sfod \FO #'0.2 #'-0.2 % beg m. 2 - \sfol \FO #'0.3 #'0.0 b | % end m. 2 - - e,,8 e' gis e e, e' gis_\dim e | % m. 3 - - e,1 | % m. 4 - - %% new section starts here in A minor - \overrideBeamSettings #'Score #'(4 . 4) #'end - #'((* . (1 1 1 1)) - ((1 . 12) . (3 3 3 3))) - \once \override TextScript #'staff-padding = #1.7 - \times 2/3 { a8\p^\andantino e' a c a e a, e' a c a e } | % m. 5 - - \times 2/3 { a,8\pdolce e' a c a e } % beg m. 6 - \times 2/3 { e,8 \sfou c gis e } | % end m. 6 - - \times 2/3 { a,8 a c e, b' a, e' a c a e } | % m. 7 - - \times 2/3 { f,8 f' a \sfol \FO #'0.3 #'-0.5 a f fis, d' a' d a d, } | % m. 8 - - \times 2/3 { 8 d' g d' g, d % beg m. 9 - \sfod \FO #'0.0 #'-2.0 \sfou b gis e } | % end m. 9 - - \times 2/3 { a,8 e' a c a e e, e' gis c gis e } | % m. 10 - - \times 2/3 { a,8 e' a b a e f, f' a d a f } | % m. 11 -} - -\score { - \new Staff = "guitar" << - \context Voice = "upper" { \melody } - \context Voice = "lower" { \bass } - >> - \layout { - \context { - \Score - \override Fingering #'staff-padding = #'() - \override TupletNumber #'stencil = ##f - \override TupletBracket #'bracket-visibility = ##f - } - } - \midi { } -} diff --git a/Documentation/included/keyboard-headword.ly b/Documentation/included/keyboard-headword.ly deleted file mode 100644 index 8793965d37..0000000000 --- a/Documentation/included/keyboard-headword.ly +++ /dev/null @@ -1,241 +0,0 @@ -\version "2.12.0" -\include "english.ly" - -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 2.2 Keyboard instruments - -% 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 - 4 ( ^ \markup \bold { Rall. } - \override Script #'stencil = #(lambda (grob) - ly:script::print (grob-interpret-markup grob fermataLong)) - 8 ) \fermata - \noBeam - \clef treble - \slurUp - \once \override Hairpin #'to-barline = ##f - 8 ( \pp \> - | - 4. \! ) ^\markup \bold { a Tempo } - \slurUp - 8 ^\( \> - | - 4. \! \) - << - \new Voice { - \voiceOne - 8 ( - | - cs'8 ^\markup \bold { Rallentando } - b16 - cs'16 - d'8 - e'16 - fs'16 - | - 4. ) - s8 - | - r8 - 4 \arpeggio - e''16 ( ^\markup \bold { Lent } - fs''16 - | - \voiceTwo - 2 ) - | - } - \new Voice { - \voiceTwo - s8 - | - 4 \< - 4 \> - | - s4. \! - \slurUp - \once \override Script #'direction = #UP - 8 ( \accent - | - 4. ) - \once \override Hairpin #'to-barline = ##f - 8 \ppp \> - | - s8 \! - \stemDown - \once \override Script #'direction = #UP - \ottava #1 - \voiceOne - \once \override PianoStaff.Arpeggio #'padding = #0.8 - 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 - 8 [ - \clef bass - 8 \fermata ] - s8 - | - fs8\rest - \clef treble - 4 \tenuto - s8 - | - fs8\rest - \clef treble - 4 \tenuto - s8 - | - s2 - | - ds8\rest - \clef treble - 4 - \clef bass - s8 - | - s8 - \clef treble - 4 \arpeggio - \clef bass - s8 - | - s8 - \clef treble - 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 - 4. \fermata _\markup \italic { ped. } - 8 ( - | - 4. ) \sustainOn - \clef bass - 8 \( \sustainOff - | - 4. \) \sustainOn - \clef bass - 8 ( \sustainOff - | - 4 - 4 - | - 4. ) \sustainOn - 8 ( \sustainOff - | - 4. ) \sustainOn - \slurUp - 8 ( \sustainOff \sustainOn - | - 2 ) \sustainOff \sustainOn - | - } - >> ->> diff --git a/Documentation/included/pitches-headword.ly b/Documentation/included/pitches-headword.ly deleted file mode 100644 index d69c44a97f..0000000000 --- a/Documentation/included/pitches-headword.ly +++ /dev/null @@ -1,143 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% NR 1.1 Pitches - -% 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 - | - 2 - 2 ) - | - \oneVoice - \clef bass - 2 ( - 4 - 4 - | - 2 - 2 ) - | - \voiceOne - b2 %( - cs'4 - ds'4 - | - \clef treble - 4 %) - r4 r2 - } - - % RH Voice 2 - \new Voice { - \voiceTwo - \override Staff.DynamicLineSpanner #'staff-padding = #2.5 - 2 \p - 4 - 4 - | - 2 - e'2 - | - \once \override TextScript #'staff-padding = #2.5 - 2 _ \markup \italic { cresc. } - b'4 - 4 - | - b'2. ( \sf \> - a'4 ) - \clef bass - | \break - s1 \p - | - s1 - | - 4 ( - 2. ) - | - s4 - r4 r2 - } - - >> - - % LH Staff - \new Staff { - \override Staff.SustainPedalLineSpanner #'staff-padding = #5 - 2 ( \sustainOn - 4 \sustainOff - 4 - | - 2 - 2 ) \sustainOn - | - \clef bass - \slurDown - 2 ( \sustainOff - 4 - 4 \sustainOn - | - \clef treble - \voiceOne - << - { - 2 - 2 ) - } - \new Voice { - \voiceTwo - b1 \sustainOff - } - >> - \oneVoice - | - %\break - \clef bass - 2 ( - 4 - 4 - | - 2 - 2 ) \sustainOn - | - 1 ( \sustainOff - | - 4 ) - r4 r2 - } - ->> diff --git a/Documentation/included/repeats-headword.ly b/Documentation/included/repeats-headword.ly deleted file mode 100644 index faba778a12..0000000000 --- a/Documentation/included/repeats-headword.ly +++ /dev/null @@ -1,124 +0,0 @@ -\version "2.12.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 - -\new PianoStaff << - - \new Staff = RH { - \clef bass - \key df \major - \time 2/4 - \set Score.currentBarNumber = #9 - \bar "|:" - 4 ( - 8.. - 32 - | - 8. ) - 16 ( - 8 - 8 ) - | - 4 ( - 8.. - 32 - | - 8. ) - \slurDown - 16 ( - << - { - \voiceTwo - gf8 - f8 ) - } - \new Voice { - \voiceOne - 16 - ef'16 - 8 - } - >> - \oneVoice - | - 4 ( - 8.. - 32 - \clef treble - | - 8. ) - 16 ( - 16 - gf'16 - 8 ) - | - \slurUp - 4 - \change Staff = LH - \voiceOne - 4 - | - 4. - \change Staff = RH - \oneVoice - r8 - \clef bass - \bar ":|" - } - - \new Staff = LH { - \clef bass - \key df \major - \time 2/4 - 4 ( - 8.. - 32 - | - 8. ) - 16 ( - 8 - 8 ) - | - 4 ( - 8.. - 32 - | - 8. ) - 16 ( - 8 - ) - | - 4 ( - 8.. - 32 - | - 8. ) - 16 ( - 8 - 8 ) - | - \voiceTwo - gf,4 ( - af,4 ~ ) - | - af,16. [ ( - gf,32 - f,16. - ef,32 ] - df,8 ) - \oneVoice - r8 - } - ->> diff --git a/Documentation/included/rhythms-headword.ly b/Documentation/included/rhythms-headword.ly deleted file mode 100644 index a48f05ca9e..0000000000 --- a/Documentation/included/rhythms-headword.ly +++ /dev/null @@ -1,209 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 1.2 Rhythms - -% 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 - - 8 ( -\markup { - \override #'(baseline-skip . 2) \italic \column { - \line { a tempo } - cantabile - } - } - 8 ) - ~ - 8 ( - 16 - 16 ) - - | - - \afterGrace - 8 [ ( - { - e''16 [ - f''16 - e''16 - d''16 ] - } - 16 - 16 ] ) - \once \override TextScript #'padding = #3.8 - 16 ( \staccato -\markup { \italic cresc. } - 16 ) \staccato - 32 ( - 32 ) - 32 ( - 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 - 8 [ ( - { - e''16 [ - f''16 - e''16 - d''16 ] - } - 16 - 16 ] ) - 16 ( \staccato -\markup { \italic cresc. } - 16 ) \staccato - 32 ( - 32 ) - 32 ( - 32 ) - } - - % LH Staff - \new Staff { - \clef bass - \key c \minor - \time 2/4 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - | - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - | - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - | - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - - 32 - c'32 - 32 - c'32 - } - ->> diff --git a/Documentation/included/simultaneous-headword.ly b/Documentation/included/simultaneous-headword.ly deleted file mode 100644 index a6b5ff8e47..0000000000 --- a/Documentation/included/simultaneous-headword.ly +++ /dev/null @@ -1,313 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% 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-offsets . (0 -12))) - } -} - -trillflat = - \once \override TrillSpanner #'(bound-details left text) = - #(markup #:translate-scaled '(-0.05 . -1) - #:concat (#:musicglyph "scripts.trill" - #:translate '(-0.5 . 1.9) #:fontsize -7 #: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 - 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 - \once \override NoteHead #'transparent = ##t - \once \override Dots #'transparent = ##t - \once \override Stem #'transparent = ##t - d''8. \stopTrillSpan - s4. - - | - - s8. - s8. - - } - - >> - - % LH staff - \new Staff { - \clef bass - \key c \major - \time 9/16 - - r8. - r8. - 8 [ ( - 16 ] ) - - | - - 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 - 8 [ ( - 16 ] ) - - | - - 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/included/staff-headword.ly b/Documentation/included/staff-headword.ly deleted file mode 100644 index f7fa2e4145..0000000000 --- a/Documentation/included/staff-headword.ly +++ /dev/null @@ -1,119 +0,0 @@ -\version "2.12.0" -\include "catalan.ly" -#(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm -} - -\header { - mutopiatitle = "Napolitan Dance (Swan Lake)" - mutopiacomposer = "TchaikovskyPI" - mutopiainstrument = "Piano, Trumpet, Percussion" - source = "New arrangement" - style = "Classical" - copyright = "Public Domain" - maintainer = "Laurence Sardain" - lastupdated = "2006/Dec/21" -% title = "Le Lac des Cygnes" -% subtitle = "Danse Napolitaine" -% composer = "Piotr Ilitch Tchaïkovski" -% arranger = "arr. Laurence Sardain" -% footer = "Mutopia-2006/12/22-896" -} - -trompette = \relative do'' { - \clef treble - \key mib \major - \time 2/4 - R2^\markup { \italic Comodo } | - r8 \once \override TextScript #'padding = #2.0 - sib16-.^\markup {\dynamic p \italic grazioso} do-. mib( re)-. do-. sib-. | - re8-. r8 re4->( | - re8) do16-. re-. mib( re) do-. re-. | - do8-. r8 sib4-> | -} - -tambourin = \relative do' { - \time 2/4 - r8 do16 do do8 do | - r8 do16 do do8 do | - r8 do r do | - r8 do16 do do8 do | - r8 do r do | -} - -tambourinMidi = \drummode { - \time 2/4 - r8 tamb16 tamb tamb8 tamb | - r8 tamb16 tamb tamb8 tamb | - r8 tamb r tamb | - r8 tamb16 tamb tamb8 tamb | - r8 tamb r tamb | -} - -upper = \relative do' { - \clef treble - \key mib \major - \time 2/4 - r8\p 16-. -. 8-. -. | - r8 16-. -. 8-. -. | - r8 16-. -. 8-. -. | - r8 16-. -. 8-. -. | - r8 16-. -. 8-. -. | -} - -lower = \relative do { - \clef bass - \key mib \major - \time 2/4 - mib4-. r4 | - sib-. r | - fa'-. r | - sib, r | - mib4-. r4 | -} - - -\score { - << - \context Staff = "trumpet" << - \set Staff.instrumentName = \markup { "Trumpet" \concat{ B \teeny \raise #0.4 \flat } } - \transpose sib do' - \trompette - >> - \context RhythmicStaff = "tambourin" << - \set Staff.instrumentName = "Tambourine" - \tambourin - >> - \context PianoStaff = "prima" << - \set PianoStaff.instrumentName = "Piano " - \context Staff = "uppera" \upper - \context Staff = "lowera" \lower - >> - >> - \layout { } -} -\score { - << - \context Staff = "trumpet" { - \set Staff.midiInstrument = "trumpet" - \trompette - } - \context DrumStaff = "tambourin" { - \tambourinMidi - } - \context Staff = "piano" << - \upper - \lower - >> - >> - \midi { - \context { - \Score - tempoWholesPerMinute = #(ly:make-moment 72 4) - } - } -} - diff --git a/Documentation/included/text-headword.ly b/Documentation/included/text-headword.ly deleted file mode 100644 index 40af604f84..0000000000 --- a/Documentation/included/text-headword.ly +++ /dev/null @@ -1,236 +0,0 @@ -\version "2.12.0" -\include "english.ly" -#(set-global-staff-size 15) -\paper{ - line-width = 16\cm - indent = 0\cm -} - -\layout { - \context { \Score - \override PaperColumn #'keep-inside-line = ##t - \override NonMusicalPaperColumn #'keep-inside-line = ##t - } -} - -% 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) - %\override NonMusicalPaperColumn #'line-break-system-details = - %#'((alignment-offsets . (0 -12))) - } -} - -\new PianoStaff << - - % RH staff - \new Staff { - \clef treble - \key af \major - \time 3/4 - - \once \override TextScript #'staff-padding = #4 - 4. ( - _ \markup { \dynamic p \italic { con amabilità } } - 8 ) - 8. [ - 16 ] - - | - - 4 - 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-offsets . (0 -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 - - 4. ( - 8 ) - 8. [ - 16 ] - - | - - 4 - 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 } - 16 - 16 - 16 - af16 - 16 - 16 - 16 - af16 \sustainOn - 16 - 16 - 16 - - | - - bf16 \sustainOn - 16 - 16 - 16 - bf16 \sustainOn - 16 - 16 - 16 - bf16 - 16 - 16 - 16 - - | - - \override Staff.SustainPedalLineSpanner #'staff-padding = #4 - df'16 \sustainOn - 16 - 16 - 16 - df'16 - 16 - 16 - 16 - df'16 \sustainOn - 16 - 16 - 16 - - | - } - ->> diff --git a/Documentation/included/unfretted-headword.ly b/Documentation/included/unfretted-headword.ly deleted file mode 100644 index e859e1357b..0000000000 --- a/Documentation/included/unfretted-headword.ly +++ /dev/null @@ -1,223 +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 - - -\version "2.12.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 Stem #'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/included/wind-headword.ly b/Documentation/included/wind-headword.ly deleted file mode 100644 index 6d8fa0a27b..0000000000 --- a/Documentation/included/wind-headword.ly +++ /dev/null @@ -1,46 +0,0 @@ -\version "2.12.0" -#(set-global-staff-size 15) -\paper { - line-width = 16\cm - indent = 0\cm -} - -% NR 2.whatever Wind - -% 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 - 16-.\p -. -. -. 8-. -. - -.\< 32( 4--)\mf - 16-. -. -. -. - (\> ) -. -.\! - 4--\sf \acciaccatura {8} 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/ancient-headword.ly b/Documentation/snippets/new/ancient-headword.ly new file mode 100644 index 0000000000..6fb70574b4 --- /dev/null +++ b/Documentation/snippets/new/ancient-headword.ly @@ -0,0 +1,142 @@ +\version "2.12.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 + } +} + +\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/chords-headword.ly b/Documentation/snippets/new/chords-headword.ly new file mode 100644 index 0000000000..9fcc5ce5b6 --- /dev/null +++ b/Documentation/snippets/new/chords-headword.ly @@ -0,0 +1,108 @@ +\version "2.12.0" +#(set-global-staff-size 15) +\paper{ + ragged-right=##f + line-width=15\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 + } +} + +theChords = \chordmode { + \time 2/2 + f1 | c2 f2 | f1 | c2 f2| %\break + f2 bes2 | f1 | c2:7 f | c1 | \break +} + +verseOne = \lyricmode{ + \set stanza = "1. " + Fair is the sun - shine, + Fair - er the moon - light + And all the stars __ _ in heav'n a -- bove; +} + +verseTwo = \lyricmode{ + \set stanza = "2. " + Fair are the mead - ows, + Fair - er the wood - land, + Robed in the flow -- ers of bloom -- ing spring; +} + +Soprano = { + \time 2/2 + \key f \major + \stemUp + f'2 f'4 f' | g'4 e' f'2 | a'4. a'8 a'4 a' | bes'4 g' a'2 | +c''2 f''4 d'' | c''2 bes'4 a' | bes'2 a' | g'1 | +} + +Alto = { + \key f \major + c'2 c'4 c' | d'4 c' c'2 | f'4. f'8 f'4 fis' | g'4 e' f'2 | + f'2 f'4 f' | f'2 g'4 f' | e'2 f' | e'1 | +} + +Tenor = { + \key f \major + \stemDown + a2 a4 a | bes4 g a2 | c'4. c'8 d'4 d' | d'4 c' c'2 | + a2 d'4 bes | a2 c'4 c' | c'2 c' | c'1 | +} + +Bass = { + \key f \major + f2 f4 f | bes,4 c f2 | f4. e8 d4 c | bes,4 c f2 | + f2 bes,4 d | f2 e4 f | g2 f | c1 | +} + + +\score { + << + \new ChordNames { \theChords } + \context Staff = upper { + \context Voice = sop { + << + \Soprano + \Alto + >> + } + } + \context Lyrics="LyrOne" \lyricsto "sop" {\verseOne} + \context Lyrics="LyrTwo" \lyricsto "sop" {\verseTwo} + \context Staff = lower { + \new Voice { + \clef bass + #(set-accidental-style 'modern-cautionary) + << + \Tenor + \Bass + >> + } + } + >> + +\layout { + %between-system-space = 1\mm + indent = 0 + \context { + \Score + \remove "Bar_number_engraver" + } + \context { \Staff + \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1) + } + } +} +\paper { } diff --git a/Documentation/snippets/new/editorial-headword.ly b/Documentation/snippets/new/editorial-headword.ly new file mode 100644 index 0000000000..e884268ef7 --- /dev/null +++ b/Documentation/snippets/new/editorial-headword.ly @@ -0,0 +1,108 @@ +\version "2.12.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" +} + +\layout { + \context { \Score + \override PaperColumn #'keep-inside-line = ##t + \override NonMusicalPaperColumn #'keep-inside-line = ##t + } +} + +% NR 1.7 Editorial annotations + +% Beethoven, Op. 31, No. 3 +% Piano sonata 18, Movt II, Scherzo +% Measures 9 - 14 + +\layout { } + +\new PianoStaff << + + % RH Staff + \new Staff { + \clef treble + \key af \major + \time 2/4 + \set Staff.fingeringOrientations = #'(up up) + \set Score.currentBarNumber = #9 + \partial 8 + 8 \staccato + | + \set doubleSlurs = ##t + 4 ( + 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 down) + \partial 8 + 8 \staccato + \set doubleSlurs = ##t + 4 ( + 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/expressive-headword.ly b/Documentation/snippets/new/expressive-headword.ly new file mode 100644 index 0000000000..f186e93d0b --- /dev/null +++ b/Documentation/snippets/new/expressive-headword.ly @@ -0,0 +1,270 @@ +\version "2.12.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 + } + >> + + | + + 4 \tenuto + d'8 \staccato + g'8 \staccato + b'8 \staccato + d''8 \staccato + + | + + d''8 ( + 8 \staccato ) + 8 \staccato + d''8 ( + 8 \staccato ) + 8 \staccato + + | + + d''8 ( + 8 \staccato ) + 8 \staccato + d''8 ( + 8 \staccato ) + 8 \staccato + + | + + d''8 \staccato + 8 \staccato + 8 \staccato + d'' \staccato + 8 \staccato + 8 \staccato + + | + + 4 \fermata + r8 r4 r8 + } + + % LH Staff + \new Staff { + \clef bass + \key g \major + \time 6/8 + \partial 2 + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 4 + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 4 + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 8 \staccato + 8 \staccato + 8 \staccato + 4. ( + + | + + d'4 ) + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 4 + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 4 + r8 + r8 + 8 \staccato + 8 \staccato + + | + + 8 \staccato + 8 \staccato + 8 \staccato + 4 + 8 \staccato + + | + + 4 \tenuto + r8 + r4 + r8 + + | + + r8 + 8 \staccato + 8 \staccato + r8 + 8 \staccato + 8 \staccato + + | + + r8 + 8 \staccato + 8 \staccato + r8 + 8 \staccato + 8 \staccato + + | + + r8 + 8 \staccato + 8 \staccato + r8 + 8 \staccato + 8 \staccato + + | + + 4 \fermata + r8 r4 r8 + } + +>> diff --git a/Documentation/snippets/new/figured-bass-headword.ly b/Documentation/snippets/new/figured-bass-headword.ly new file mode 100644 index 0000000000..db86c2cac1 --- /dev/null +++ b/Documentation/snippets/new/figured-bass-headword.ly @@ -0,0 +1,124 @@ +\version "2.12.0" +#(set-global-staff-size 15) +\paper{ + ragged-right=##f + line-width=16\cm + indent=1.5\cm +} + +\layout { + \context { \Score + \override PaperColumn #'keep-inside-line = ##t + \override NonMusicalPaperColumn #'keep-inside-line = ##t + } +} + +% 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 { + \hcenter-in #11 + \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 { + \hcenter-in #11 + \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 { + \hcenter-in #13 { + \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 VerticalAxisGroup #'minimum-Y-extent = #'() + \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/fretted-headword.ly b/Documentation/snippets/new/fretted-headword.ly new file mode 100644 index 0000000000..0bede7ca79 --- /dev/null +++ b/Documentation/snippets/new/fretted-headword.ly @@ -0,0 +1,152 @@ +% INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings % +% Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17" % +% on melodies from Bellini's "Norma" % +%*****************************************************************% + +\version "2.12.0" + +#(set-global-staff-size 15) +\paper { + line-width = 17\cm + indent = 0\cm +} + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} + + +\layout { + \context { + \Score + \remove "Bar_number_engraver" + \override PaperColumn #'keep-inside-line = ##t + \override NonMusicalPaperColumn #'keep-inside-line = ##t + } +} + +%%%% shortcuts +% fingering orientations +sfol = \set fingeringOrientations = #'(left) +sfor = \set fingeringOrientations = #'(right) +sfod = \set fingeringOrientations = #'(down) +sfou = \set fingeringOrientations = #'(up) + +% string number orientations +ssnol = \set stringNumberOrientations = #'(left) %(down right up) +ssnou = \set stringNumberOrientations = #'(up) +ssnod = \set stringNumberOrientations = #'(down) +ssnor = \set stringNumberOrientations = #'(right) + +% define fingering offset +FO = #(define-music-function (parser location offsetX offsetY) (number? number?) +#{ + \once \override Voice.Fingering #'extra-offset = #(cons $offsetX $offsetY) +#}) + +% markups +rit = \markup \center-align { \bold { \italic { " rit." } } } +dim = \markup \center-align { \italic { " dim." } } +andantino = \markup \left-align { \italic { \bold { \fontsize #2.5 { "Andantino" } } } } +benmarcato = \markup { \italic { \bold { "il canto ben marcato" } } } +pdolce = #(make-dynamic-script (markup #:line (#:dynamic "p" #:normal-text #:italic "dol."))) + +%%% THE MUSIC %%% + +melody = \relative c { + \clef "treble_8" + \key d \major + \time 4/4 + \voiceOne + \sfol + e,32 a' c e + e, a c e + e,, a' c e + e, a c e + f4\rest 4-> | % m. 1 + + e,,,32 gis' b e + e, gis b e + e,, gis' b e + e, gis b e + f4\rest \FO #'0.4 #'0.5 4 | % m. 2 + + d4\rest -> d4\rest^\rit 4-> | % m. 3 + 1 | % m. 4 + + \bar "||" + \key a \minor + R1 % m. 5 + + e'4^\benmarcato e8. d16-4 + d4-4 \times 2/3 { \sfou \FO #'-0.3 #'0.6 4 b8 } | % end of m. 6 + + \FO #'-0.3 #'0.3 + 4 \times 2/3 { c4 b8 } a4 e'8. e16 | % m. 7 + + \FO #'-0.3 #'0.3 + 4 \times 2/3 { \sfol \FO #'0.3 #'0.0 4 e8 } e4 % beg of m. 8 + \times 2/3 { \sfou 4 c8 } | % end of m. 8 + + b4 \times 2/3 { d4-4 c8 } \sfou \FO #'-1.7 #'-1.5 4 e | % end of m. 9 + + e4 e8. d16-4 d4 \times 2/3 { c4 b8 } | % m. 10 + + \times 2/3 { a4 a8 b4 c8 } % beg of m. 11 + \sfou \FO #'-0.3 #'0.3 + 4^\< \times 2/3 { e4 8\! } | % end of m. 11 +} + +bass = \relative c { + \key d \major + \time 4/4 + \voiceTwo + + e,8\fp[ e'] e,[ e'] e, \sfol c, | % m. 1 + + e,,8\fp[ e'] e,[ e'] e, \sfod \FO #'0.2 #'-0.2 % beg m. 2 + \sfol \FO #'0.3 #'0.0 b | % end m. 2 + + e,,8 e' gis e e, e' gis_\dim e | % m. 3 + + e,1 | % m. 4 + + %% new section starts here in A minor + \overrideBeamSettings #'Score #'(4 . 4) #'end + #'((* . (1 1 1 1)) + ((1 . 12) . (3 3 3 3))) + \once \override TextScript #'staff-padding = #1.7 + \times 2/3 { a8\p^\andantino e' a c a e a, e' a c a e } | % m. 5 + + \times 2/3 { a,8\pdolce e' a c a e } % beg m. 6 + \times 2/3 { e,8 \sfou c gis e } | % end m. 6 + + \times 2/3 { a,8 a c e, b' a, e' a c a e } | % m. 7 + + \times 2/3 { f,8 f' a \sfol \FO #'0.3 #'-0.5 a f fis, d' a' d a d, } | % m. 8 + + \times 2/3 { 8 d' g d' g, d % beg m. 9 + \sfod \FO #'0.0 #'-2.0 \sfou b gis e } | % end m. 9 + + \times 2/3 { a,8 e' a c a e e, e' gis c gis e } | % m. 10 + + \times 2/3 { a,8 e' a b a e f, f' a d a f } | % m. 11 +} + +\score { + \new Staff = "guitar" << + \context Voice = "upper" { \melody } + \context Voice = "lower" { \bass } + >> + \layout { + \context { + \Score + \override Fingering #'staff-padding = #'() + \override TupletNumber #'stencil = ##f + \override TupletBracket #'bracket-visibility = ##f + } + } + \midi { } +} diff --git a/Documentation/snippets/new/keyboard-headword.ly b/Documentation/snippets/new/keyboard-headword.ly new file mode 100644 index 0000000000..57d59a74c4 --- /dev/null +++ b/Documentation/snippets/new/keyboard-headword.ly @@ -0,0 +1,248 @@ +\version "2.12.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 + 4 ( ^ \markup \bold { Rall. } + \override Script #'stencil = #(lambda (grob) + ly:script::print (grob-interpret-markup grob fermataLong)) + 8 ) \fermata + \noBeam + \clef treble + \slurUp + \once \override Hairpin #'to-barline = ##f + 8 ( \pp \> + | + 4. \! ) ^\markup \bold { a Tempo } + \slurUp + 8 ^\( \> + | + 4. \! \) + << + \new Voice { + \voiceOne + 8 ( + | + cs'8 ^\markup \bold { Rallentando } + b16 + cs'16 + d'8 + e'16 + fs'16 + | + 4. ) + s8 + | + r8 + 4 \arpeggio + e''16 ( ^\markup \bold { Lent } + fs''16 + | + \voiceTwo + 2 ) + | + } + \new Voice { + \voiceTwo + s8 + | + 4 \< + 4 \> + | + s4. \! + \slurUp + \once \override Script #'direction = #UP + 8 ( \accent + | + 4. ) + \once \override Hairpin #'to-barline = ##f + 8 \ppp \> + | + s8 \! + \stemDown + \once \override Script #'direction = #UP + \ottava #1 + \voiceOne + \once \override PianoStaff.Arpeggio #'padding = #0.8 + 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 + 8 [ + \clef bass + 8 \fermata ] + s8 + | + fs8\rest + \clef treble + 4 \tenuto + s8 + | + fs8\rest + \clef treble + 4 \tenuto + s8 + | + s2 + | + ds8\rest + \clef treble + 4 + \clef bass + s8 + | + s8 + \clef treble + 4 \arpeggio + \clef bass + s8 + | + s8 + \clef treble + 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 + 4. \fermata _\markup \italic { ped. } + 8 ( + | + 4. ) \sustainOn + \clef bass + 8 \( \sustainOff + | + 4. \) \sustainOn + \clef bass + 8 ( \sustainOff + | + 4 + 4 + | + 4. ) \sustainOn + 8 ( \sustainOff + | + 4. ) \sustainOn + \slurUp + 8 ( \sustainOff \sustainOn + | + 2 ) \sustainOff \sustainOn + | + } + >> +>> diff --git a/Documentation/snippets/new/pitches-headword.ly b/Documentation/snippets/new/pitches-headword.ly new file mode 100644 index 0000000000..0af775ec6e --- /dev/null +++ b/Documentation/snippets/new/pitches-headword.ly @@ -0,0 +1,150 @@ +\version "2.12.0" +\include "english.ly" +#(set-global-staff-size 15) +\paper{ + ragged-right=##t + line-width=17\cm + indent=0\cm +} + +\layout { + \context { \Score + \override PaperColumn #'keep-inside-line = ##t + \override NonMusicalPaperColumn #'keep-inside-line = ##t + } +} + +% 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 + | + 2 + 2 ) + | + \oneVoice + \clef bass + 2 ( + 4 + 4 + | + 2 + 2 ) + | + \voiceOne + b2 %( + cs'4 + ds'4 + | + \clef treble + 4 %) + r4 r2 + } + + % RH Voice 2 + \new Voice { + \voiceTwo + \override Staff.DynamicLineSpanner #'staff-padding = #2.5 + 2 \p + 4 + 4 + | + 2 + e'2 + | + \once \override TextScript #'staff-padding = #2.5 + 2 _ \markup \italic { cresc. } + b'4 + 4 + | + b'2. ( \sf \> + a'4 ) + \clef bass + | \break + s1 \p + | + s1 + | + 4 ( + 2. ) + | + s4 + r4 r2 + } + + >> + + % LH Staff + \new Staff { + \override Staff.SustainPedalLineSpanner #'staff-padding = #5 + 2 ( \sustainOn + 4 \sustainOff + 4 + | + 2 + 2 ) \sustainOn + | + \clef bass + \slurDown + 2 ( \sustainOff + 4 + 4 \sustainOn + | + \clef treble + \voiceOne + << + { + 2 + 2 ) + } + \new Voice { + \voiceTwo + b1 \sustainOff + } + >> + \oneVoice + | + %\break + \clef bass + 2 ( + 4 + 4 + | + 2 + 2 ) \sustainOn + | + 1 ( \sustainOff + | + 4 ) + r4 r2 + } + +>> diff --git a/Documentation/snippets/new/repeats-headword.ly b/Documentation/snippets/new/repeats-headword.ly new file mode 100644 index 0000000000..75a99b825c --- /dev/null +++ b/Documentation/snippets/new/repeats-headword.ly @@ -0,0 +1,131 @@ +\version "2.12.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 "|:" + 4 ( + 8.. + 32 + | + 8. ) + 16 ( + 8 + 8 ) + | + 4 ( + 8.. + 32 + | + 8. ) + \slurDown + 16 ( + << + { + \voiceTwo + gf8 + f8 ) + } + \new Voice { + \voiceOne + 16 + ef'16 + 8 + } + >> + \oneVoice + | + 4 ( + 8.. + 32 + \clef treble + | + 8. ) + 16 ( + 16 + gf'16 + 8 ) + | + \slurUp + 4 + \change Staff = LH + \voiceOne + 4 + | + 4. + \change Staff = RH + \oneVoice + r8 + \clef bass + \bar ":|" + } + + \new Staff = LH { + \clef bass + \key df \major + \time 2/4 + 4 ( + 8.. + 32 + | + 8. ) + 16 ( + 8 + 8 ) + | + 4 ( + 8.. + 32 + | + 8. ) + 16 ( + 8 + ) + | + 4 ( + 8.. + 32 + | + 8. ) + 16 ( + 8 + 8 ) + | + \voiceTwo + gf,4 ( + af,4 ~ ) + | + af,16. [ ( + gf,32 + f,16. + ef,32 ] + df,8 ) + \oneVoice + r8 + } + +>> diff --git a/Documentation/snippets/new/rhythms-headword.ly b/Documentation/snippets/new/rhythms-headword.ly new file mode 100644 index 0000000000..9a80e6e687 --- /dev/null +++ b/Documentation/snippets/new/rhythms-headword.ly @@ -0,0 +1,216 @@ +\version "2.12.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 + + 8 ( -\markup { + \override #'(baseline-skip . 2) \italic \column { + \line { a tempo } + cantabile + } + } + 8 ) + ~ + 8 ( + 16 + 16 ) + + | + + \afterGrace + 8 [ ( + { + e''16 [ + f''16 + e''16 + d''16 ] + } + 16 + 16 ] ) + \once \override TextScript #'padding = #3.8 + 16 ( \staccato -\markup { \italic cresc. } + 16 ) \staccato + 32 ( + 32 ) + 32 ( + 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 + 8 [ ( + { + e''16 [ + f''16 + e''16 + d''16 ] + } + 16 + 16 ] ) + 16 ( \staccato -\markup { \italic cresc. } + 16 ) \staccato + 32 ( + 32 ) + 32 ( + 32 ) + } + + % LH Staff + \new Staff { + \clef bass + \key c \minor + \time 2/4 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + | + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + | + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + | + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + + 32 + c'32 + 32 + c'32 + } + +>> diff --git a/Documentation/snippets/new/simultaneous-headword.ly b/Documentation/snippets/new/simultaneous-headword.ly new file mode 100644 index 0000000000..71574f738f --- /dev/null +++ b/Documentation/snippets/new/simultaneous-headword.ly @@ -0,0 +1,320 @@ +\version "2.12.0" +\include "english.ly" +#(set-global-staff-size 15) +\paper{ + ragged-right=##t + line-width=17\cm + indent=0\cm +} + +\layout { + \context { \Score + \override PaperColumn #'keep-inside-line = ##t + \override NonMusicalPaperColumn #'keep-inside-line = ##t + } +} + + +\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-offsets . (0 -12))) + } +} + +trillflat = + \once \override TrillSpanner #'(bound-details left text) = + #(markup #:translate-scaled '(-0.05 . -1) + #:concat (#:musicglyph "scripts.trill" + #:translate '(-0.5 . 1.9) #:fontsize -7 #: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 + 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 + \once \override NoteHead #'transparent = ##t + \once \override Dots #'transparent = ##t + \once \override Stem #'transparent = ##t + d''8. \stopTrillSpan + s4. + + | + + s8. + s8. + + } + + >> + + % LH staff + \new Staff { + \clef bass + \key c \major + \time 9/16 + + r8. + r8. + 8 [ ( + 16 ] ) + + | + + 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 + 8 [ ( + 16 ] ) + + | + + 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/staff-headword.ly b/Documentation/snippets/new/staff-headword.ly new file mode 100644 index 0000000000..7eb5514bcc --- /dev/null +++ b/Documentation/snippets/new/staff-headword.ly @@ -0,0 +1,126 @@ +\version "2.12.0" +\include "catalan.ly" +#(set-global-staff-size 15) +\paper{ + ragged-right=##t + line-width=17\cm + indent=0\cm +} + + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} + +\header { + mutopiatitle = "Napolitan Dance (Swan Lake)" + mutopiacomposer = "TchaikovskyPI" + mutopiainstrument = "Piano, Trumpet, Percussion" + source = "New arrangement" + style = "Classical" + copyright = "Public Domain" + maintainer = "Laurence Sardain" + lastupdated = "2006/Dec/21" +% title = "Le Lac des Cygnes" +% subtitle = "Danse Napolitaine" +% composer = "Piotr Ilitch Tchaïkovski" +% arranger = "arr. Laurence Sardain" +% footer = "Mutopia-2006/12/22-896" +} + +trompette = \relative do'' { + \clef treble + \key mib \major + \time 2/4 + R2^\markup { \italic Comodo } | + r8 \once \override TextScript #'padding = #2.0 + sib16-.^\markup {\dynamic p \italic grazioso} do-. mib( re)-. do-. sib-. | + re8-. r8 re4->( | + re8) do16-. re-. mib( re) do-. re-. | + do8-. r8 sib4-> | +} + +tambourin = \relative do' { + \time 2/4 + r8 do16 do do8 do | + r8 do16 do do8 do | + r8 do r do | + r8 do16 do do8 do | + r8 do r do | +} + +tambourinMidi = \drummode { + \time 2/4 + r8 tamb16 tamb tamb8 tamb | + r8 tamb16 tamb tamb8 tamb | + r8 tamb r tamb | + r8 tamb16 tamb tamb8 tamb | + r8 tamb r tamb | +} + +upper = \relative do' { + \clef treble + \key mib \major + \time 2/4 + r8\p 16-. -. 8-. -. | + r8 16-. -. 8-. -. | + r8 16-. -. 8-. -. | + r8 16-. -. 8-. -. | + r8 16-. -. 8-. -. | +} + +lower = \relative do { + \clef bass + \key mib \major + \time 2/4 + mib4-. r4 | + sib-. r | + fa'-. r | + sib, r | + mib4-. r4 | +} + + +\score { + << + \context Staff = "trumpet" << + \set Staff.instrumentName = \markup { "Trumpet" \concat{ B \teeny \raise #0.4 \flat } } + \transpose sib do' + \trompette + >> + \context RhythmicStaff = "tambourin" << + \set Staff.instrumentName = "Tambourine" + \tambourin + >> + \context PianoStaff = "prima" << + \set PianoStaff.instrumentName = "Piano " + \context Staff = "uppera" \upper + \context Staff = "lowera" \lower + >> + >> + \layout { } +} +\score { + << + \context Staff = "trumpet" { + \set Staff.midiInstrument = "trumpet" + \trompette + } + \context DrumStaff = "tambourin" { + \tambourinMidi + } + \context Staff = "piano" << + \upper + \lower + >> + >> + \midi { + \context { + \Score + tempoWholesPerMinute = #(ly:make-moment 72 4) + } + } +} + diff --git a/Documentation/snippets/new/text-headword.ly b/Documentation/snippets/new/text-headword.ly new file mode 100644 index 0000000000..8a0237f0fd --- /dev/null +++ b/Documentation/snippets/new/text-headword.ly @@ -0,0 +1,243 @@ +\version "2.12.0" +\include "english.ly" +#(set-global-staff-size 15) +\paper{ + line-width = 16\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 + } +} + +% 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) + %\override NonMusicalPaperColumn #'line-break-system-details = + %#'((alignment-offsets . (0 -12))) + } +} + +\new PianoStaff << + + % RH staff + \new Staff { + \clef treble + \key af \major + \time 3/4 + + \once \override TextScript #'staff-padding = #4 + 4. ( + _ \markup { \dynamic p \italic { con amabilità } } + 8 ) + 8. [ + 16 ] + + | + + 4 + 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-offsets . (0 -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 + + 4. ( + 8 ) + 8. [ + 16 ] + + | + + 4 + 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 } + 16 + 16 + 16 + af16 + 16 + 16 + 16 + af16 \sustainOn + 16 + 16 + 16 + + | + + bf16 \sustainOn + 16 + 16 + 16 + bf16 \sustainOn + 16 + 16 + 16 + bf16 + 16 + 16 + 16 + + | + + \override Staff.SustainPedalLineSpanner #'staff-padding = #4 + df'16 \sustainOn + 16 + 16 + 16 + df'16 + 16 + 16 + 16 + df'16 \sustainOn + 16 + 16 + 16 + + | + } + +>> diff --git a/Documentation/snippets/new/unfretted-headword.ly b/Documentation/snippets/new/unfretted-headword.ly new file mode 100644 index 0000000000..a01259b23d --- /dev/null +++ b/Documentation/snippets/new/unfretted-headword.ly @@ -0,0 +1,230 @@ +% #!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.12.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 Stem #'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/wind-headword.ly b/Documentation/snippets/new/wind-headword.ly new file mode 100644 index 0000000000..d40a9febe3 --- /dev/null +++ b/Documentation/snippets/new/wind-headword.ly @@ -0,0 +1,52 @@ +\version "2.12.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 + 16-.\p -. -. -. 8-. -. + -.\< 32( 4--)\mf + 16-. -. -. -. + (\> ) -. -.\! + 4--\sf \acciaccatura {8} 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 + } + >> +} +