Documentation/snippets/new/text-headword.ly

   1 \version "2.12.0"
   2 \include "english.ly"
   3 #(set-global-staff-size 15)
   4 \paper{
   5   line-width = 16\cm
   6   indent = 0\cm
   7 }
   8
   9
  10 \header {
  11   lsrtags = "headwords"
  12   texidoc = ""
  13   doctitle = "headword"
  14 }
  15
  16 \layout {
  17   \context { \Score
  18     \override PaperColumn #'keep-inside-line = ##t
  19     \override NonMusicalPaperColumn #'keep-inside-line = ##t
  20   }
  21 }
  22
  23 % NR 1.8 Text
  24
  25 % L. v. Beethoven, Op. 110
  26 % Piano sonata 31
  27 % measures 1 - 7
  28
  29 \layout {
  30    \context {
  31       \Score
  32       \override SpacingSpanner #'base-shortest-duration =
  33          #(ly:make-moment 1 20)
  34       %\override NonMusicalPaperColumn #'line-break-system-details =
  35       %#'((alignment-offsets . (0 -12)))
  36    }
  37 }
  38
  39 \new PianoStaff <<
  40
  41    % RH staff
  42    \new Staff {
  43       \clef treble
  44       \key af \major
  45       \time 3/4
  46
  47       \once \override TextScript #'staff-padding = #4
  48       <c'' af'>4. (
  49       _ \markup { \dynamic p \italic { con amabilità } }
  50       <af' ef'>8 )
  51       <af' ef'>8. [
  52       <af' ef'>16 ]
  53
  54       |
  55
  56       <df'' g'>4
  57       <bf' g'>2
  58       _ \markup { \italic { ten. } }
  59
  60       |
  61
  62       <<
  63
  64          \new Voice {
  65             \voiceOne
  66             ef''4. (
  67             df''8 [ )
  68             ef'' (
  69             f'' ) ]
  70
  71             |
  72
  73             \once \override TextScript #'staff-padding = #4
  74             ef''8. (
  75             _ \markup { \italic { tranqu. } }
  76             d''16 )
  77             df''8 \trill \fermata
  78             _ \markup { \italic { ten. } }
  79          }
  80
  81          \new Voice {
  82             \voiceTwo
  83             af'4.
  84             af'8 [
  85             af'8
  86             af'8 ]
  87
  88             |
  89
  90             g'4
  91             g'8
  92          }
  93
  94       >>
  95
  96       \oneVoice
  97       \once \override TextScript #'staff-padding = #4
  98       df''32
  99       _ \markup { \italic dolce }
 100       c''32
 101       df''32
 102       ef''32
 103       \acciaccatura { df''[ ef'' ] }
 104       f''8
 105       ef''16
 106       df''16
 107
 108       |
 109       \break
 110       \overrideProperty "Score.NonMusicalPaperColumn"
 111       #'line-break-system-details #'((alignment-offsets . (0 -12)))
 112
 113       c''4. (
 114       ^ \markup \italic { cantabile, con intimissimo sentimento,
 115          ma sempre molto dolce e semplice }
 116       ef''4
 117       af''8 )
 118
 119       |
 120
 121       af''4 (
 122       g''2 )
 123
 124       |
 125
 126       bf''4. (
 127       g''4
 128       ef''8 )
 129
 130       |
 131    }
 132
 133    % LH
 134    \new Staff {
 135       \clef bass
 136       \key af \major
 137       \time 3/4
 138
 139       <ef af,>4. (
 140       <ef c>8 )
 141       <ef c>8. [
 142       <ef c>16 ]
 143
 144       |
 145
 146       <ef bf,>4
 147       <ef df>2 ^ \markup { \italic ten. }
 148
 149       |
 150
 151       <<
 152
 153          \new Voice {
 154             \voiceOne
 155             ef8 [ (
 156             af8
 157             c'8
 158             bf8 )
 159             c'8 ( \staccato
 160             df'8 ]  ) \staccato
 161
 162             |
 163
 164             bf4
 165             bf8 ^ \markup { \italic ten. }
 166          }
 167
 168          \new Voice {
 169             \voiceTwo
 170             c4. (
 171             f8 [ )
 172             ef8 ( \staccato
 173             df8 ] ) \staccato
 174
 175             |
 176
 177             ef4
 178             ef8 \fermata
 179          }
 180
 181       >>
 182
 183       \oneVoice
 184       r8
 185       r4
 186       \clef treble
 187
 188       |
 189
 190       \override Staff.SustainPedalLineSpanner #'outside-staff-priority = #1000
 191       \override Staff.SustainPedalLineSpanner #'staff-padding = #7
 192       \once \override TextScript #'padding = #2
 193       af16 \sustainOn
 194       ^ \markup \italic { non staccato }
 195       _ \markup \italic { molto \concat {\dynamic {p},} sempre tranquillo
 196          ed egualmente, non rubato }
 197       <ef' c'>16
 198       <ef' c'>16
 199       <ef' c'>16
 200       af16
 201       <ef' c'>16
 202       <ef' c'>16
 203       <ef' c'>16
 204       af16 \sustainOn
 205       <ef' c'>16
 206       <ef' c'>16
 207       <ef' c'>16
 208
 209       |
 210
 211       bf16 \sustainOn
 212       <ef' df'>16
 213       <ef' df'>16
 214       <ef' df'>16
 215       bf16 \sustainOn
 216       <ef' df'>16
 217       <ef' df'>16
 218       <ef' df'>16
 219       bf16
 220       <ef' df'>16
 221       <ef' df'>16
 222       <ef' df'>16
 223
 224       |
 225
 226       \override Staff.SustainPedalLineSpanner #'staff-padding = #4
 227       df'16 \sustainOn
 228       <bf' g' ef'>16
 229       <bf' g' ef'>16
 230       <bf' g' ef'>16
 231       df'16
 232       <bf' g' ef'>16
 233       <bf' g' ef'>16
 234       <bf' g' ef'>16
 235       df'16 \sustainOn
 236       <bf' g' ef'>16
 237       <bf' g' ef'>16
 238       <bf' g' ef'>16
 239
 240       |
 241    }
 242
 243 >>