From 35e6c0556ee9ae6c88421db0c76bde8beda584e3 Mon Sep 17 00:00:00 2001 From: Graham Percival Date: Sun, 24 Jan 2010 14:38:01 +0000 Subject: [PATCH] Build: run makelsr.py, add new files to git. --- Documentation/snippets/ancient-headword.ly | 147 ++++++++ Documentation/snippets/chords-headword.ly | 113 ++++++ Documentation/snippets/editorial-headword.ly | 113 ++++++ Documentation/snippets/expressive-headword.ly | 275 +++++++++++++++ .../snippets/figured-bass-headword.ly | 129 +++++++ Documentation/snippets/fretted-headword.ly | 157 +++++++++ Documentation/snippets/keyboard-headword.ly | 253 ++++++++++++++ Documentation/snippets/pitches-headword.ly | 155 +++++++++ Documentation/snippets/repeats-headword.ly | 136 ++++++++ Documentation/snippets/rhythms-headword.ly | 221 ++++++++++++ Documentation/snippets/simple-lead-sheet.ly | 6 +- .../snippets/simultaneous-headword.ly | 325 ++++++++++++++++++ Documentation/snippets/staff-headword.ly | 131 +++++++ Documentation/snippets/text-headword.ly | 248 +++++++++++++ Documentation/snippets/unfretted-headword.ly | 235 +++++++++++++ Documentation/snippets/wind-headword.ly | 57 +++ 16 files changed, 2698 insertions(+), 3 deletions(-) create mode 100644 Documentation/snippets/ancient-headword.ly create mode 100644 Documentation/snippets/chords-headword.ly create mode 100644 Documentation/snippets/editorial-headword.ly create mode 100644 Documentation/snippets/expressive-headword.ly create mode 100644 Documentation/snippets/figured-bass-headword.ly create mode 100644 Documentation/snippets/fretted-headword.ly create mode 100644 Documentation/snippets/keyboard-headword.ly create mode 100644 Documentation/snippets/pitches-headword.ly create mode 100644 Documentation/snippets/repeats-headword.ly create mode 100644 Documentation/snippets/rhythms-headword.ly create mode 100644 Documentation/snippets/simultaneous-headword.ly create mode 100644 Documentation/snippets/staff-headword.ly create mode 100644 Documentation/snippets/text-headword.ly create mode 100644 Documentation/snippets/unfretted-headword.ly create mode 100644 Documentation/snippets/wind-headword.ly diff --git a/Documentation/snippets/ancient-headword.ly b/Documentation/snippets/ancient-headword.ly new file mode 100644 index 0000000000..a497db4e52 --- /dev/null +++ b/Documentation/snippets/ancient-headword.ly @@ -0,0 +1,147 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" + +#(set-global-staff-size 15) +\paper{ + ragged-right=##t + line-width=17\cm + indent=0\cm +} + + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} % begin verbatim + + +\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/chords-headword.ly b/Documentation/snippets/chords-headword.ly new file mode 100644 index 0000000000..05e298f4b3 --- /dev/null +++ b/Documentation/snippets/chords-headword.ly @@ -0,0 +1,113 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +#(set-global-staff-size 15) +\paper{ + ragged-right=##f + line-width=15\cm + indent=0\cm +} + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} % begin verbatim + + + +\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/editorial-headword.ly b/Documentation/snippets/editorial-headword.ly new file mode 100644 index 0000000000..ddd9c94d57 --- /dev/null +++ b/Documentation/snippets/editorial-headword.ly @@ -0,0 +1,113 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + +\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/expressive-headword.ly b/Documentation/snippets/expressive-headword.ly new file mode 100644 index 0000000000..628f0ed699 --- /dev/null +++ b/Documentation/snippets/expressive-headword.ly @@ -0,0 +1,275 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + +% 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/figured-bass-headword.ly b/Documentation/snippets/figured-bass-headword.ly new file mode 100644 index 0000000000..58a6e54b30 --- /dev/null +++ b/Documentation/snippets/figured-bass-headword.ly @@ -0,0 +1,129 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +#(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" +} % begin verbatim + + +% 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/fretted-headword.ly b/Documentation/snippets/fretted-headword.ly new file mode 100644 index 0000000000..85cce9a03f --- /dev/null +++ b/Documentation/snippets/fretted-headword.ly @@ -0,0 +1,157 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.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.13.10" + +#(set-global-staff-size 15) +\paper { + line-width = 17\cm + indent = 0\cm +} + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} % begin verbatim + + + +\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/keyboard-headword.ly b/Documentation/snippets/keyboard-headword.ly new file mode 100644 index 0000000000..7a8f147366 --- /dev/null +++ b/Documentation/snippets/keyboard-headword.ly @@ -0,0 +1,253 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + +% 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/pitches-headword.ly b/Documentation/snippets/pitches-headword.ly new file mode 100644 index 0000000000..5e7799b4df --- /dev/null +++ b/Documentation/snippets/pitches-headword.ly @@ -0,0 +1,155 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + + +% 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/repeats-headword.ly b/Documentation/snippets/repeats-headword.ly new file mode 100644 index 0000000000..08de81291c --- /dev/null +++ b/Documentation/snippets/repeats-headword.ly @@ -0,0 +1,136 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + + +\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/rhythms-headword.ly b/Documentation/snippets/rhythms-headword.ly new file mode 100644 index 0000000000..68afde0d93 --- /dev/null +++ b/Documentation/snippets/rhythms-headword.ly @@ -0,0 +1,221 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + + +% 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/simple-lead-sheet.ly b/Documentation/snippets/simple-lead-sheet.ly index db6808885a..009b254718 100644 --- a/Documentation/snippets/simple-lead-sheet.ly +++ b/Documentation/snippets/simple-lead-sheet.ly @@ -20,10 +20,10 @@ Ein Liedblatt besteht aus Akkordbezeichnungen, einer Melodie und dem Liedtext: " doctitlede = "Ein einfaches Liedblatt" -%% Translation of GIT committish: b7ec64504da87595509ae6e88ae546d6a0ce633d +%% Translation of GIT committish: 54687441dde2fe248e20989bd265a274583413a8 texidocfr = " -Pour obtenir la partition d'un chanson, il suffit d'assembler -des noms d'accords, une mélodie et des paroles : +Assembler des noms d'accords, une mélodie et des paroles permet +d'obtenir la partition d'un chanson : " doctitlefr = "Chanson simple" diff --git a/Documentation/snippets/simultaneous-headword.ly b/Documentation/snippets/simultaneous-headword.ly new file mode 100644 index 0000000000..624f6948b9 --- /dev/null +++ b/Documentation/snippets/simultaneous-headword.ly @@ -0,0 +1,325 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + +% 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/staff-headword.ly b/Documentation/snippets/staff-headword.ly new file mode 100644 index 0000000000..a0741ad0b1 --- /dev/null +++ b/Documentation/snippets/staff-headword.ly @@ -0,0 +1,131 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\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" +} % begin verbatim + + +\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/text-headword.ly b/Documentation/snippets/text-headword.ly new file mode 100644 index 0000000000..6ecbbfd67d --- /dev/null +++ b/Documentation/snippets/text-headword.ly @@ -0,0 +1,248 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +\include "english.ly" +#(set-global-staff-size 15) +\paper{ + line-width = 16\cm + indent = 0\cm +} + + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} % begin verbatim + + +\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/unfretted-headword.ly b/Documentation/snippets/unfretted-headword.ly new file mode 100644 index 0000000000..6eb98384e1 --- /dev/null +++ b/Documentation/snippets/unfretted-headword.ly @@ -0,0 +1,235 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.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" +} % begin verbatim + + + +\version "2.13.10" +#(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/wind-headword.ly b/Documentation/snippets/wind-headword.ly new file mode 100644 index 0000000000..1429374565 --- /dev/null +++ b/Documentation/snippets/wind-headword.ly @@ -0,0 +1,57 @@ +% Do not edit this file; it is automatically +% generated from Documentation/snippets/new +% This file is in the public domain. +%% Note: this file works from version 2.12.0 +\version "2.13.10" +#(set-global-staff-size 15) +\paper { + line-width = 16\cm + indent = 0\cm +} + +% NR 2.whatever Wind + +\header { + lsrtags = "headwords" + texidoc = "" + doctitle = "headword" +} % begin verbatim + + +% 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 + } + >> +} + -- 2.39.5