Documentation/snippets/new/rhythms-headword.ly

   1 \version "2.14.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 % NR 1.2 Rhythms
  10
  11 \header {
  12   lsrtags = "headwords"
  13   texidoc = ""
  14   doctitle = "headword"
  15 }
  16
  17
  18 % Beethoven, Op. 81a
  19 % Piano sonata 26 - Das Lebewohl
  20 % Movt II - Abwesenheit
  21 % Measures 31 - 34
  22
  23 \layout {
  24   \context {
  25     \Score
  26     \override SpacingSpanner #'base-shortest-duration =
  27       #(ly:make-moment 1 40)
  28       %\override SpacingSpanner #'strict-grace-spacing = ##t
  29   }
  30 }
  31
  32 \new PianoStaff <<
  33
  34    % RH Staff
  35    \new Staff {
  36       \clef treble
  37       \key c \minor
  38       \time 2/4
  39       \set Score.currentBarNumber = #31
  40
  41       <c''' c''>8 ( -\markup {
  42         \override #'(baseline-skip . 2) \italic \column {
  43           \line { a tempo }
  44           cantabile
  45         }
  46       }
  47       <g'' g'>8 )
  48       ~
  49       <g'' g'>8 (
  50       <a'' a'>16
  51       <f'' f'>16 )
  52
  53       |
  54
  55       \afterGrace
  56          <f'' f'>8 [ (
  57          {
  58             e''16 [
  59             f''16
  60             e''16
  61             d''16 ]
  62          }
  63       <e''! e'>16
  64       <f'' f'>16 ] )
  65       \once \override TextScript #'padding = #3.8
  66       <g'' g'>16 ( \staccato -\markup { \italic cresc. }
  67       <a'' a'>16 ) \staccato
  68       <bf'' bf'>32  (
  69       <b'' b'>32 )
  70       <b'' b'>32 (
  71       <c''' c''>32 )
  72
  73       |
  74
  75       \once \override DynamicLineSpanner #'padding = #2
  76       b''32 ( \p \>
  77       c'''32
  78       d'''32
  79       c'''32 ) \!
  80       g''8 (
  81       ~
  82       g''32 [
  83       a''64
  84       g''64 ) ]
  85
  86       a''64 ( [
  87       g''64 )
  88       bf''64 (
  89       a''64 ) ]
  90
  91       bf''64 ( [
  92       a''64 )
  93       c'''64 (
  94       b''64 ) ]
  95
  96       c'''128 ( [
  97       b''128
  98       d'''128
  99       c'''128
 100       f'''64
 101       f''64 ) ]
 102
 103       |
 104
 105       \afterGrace
 106          <f'' f'>8 [ (
 107          {
 108             e''16 [
 109             f''16
 110             e''16
 111             d''16 ]
 112          }
 113       <e''! e'>16
 114       <f'' f'>16 ] )
 115       <g'' g'>16 ( \staccato -\markup { \italic cresc. }
 116       <af''! af'!>16 ) \staccato
 117       <bf'' bf'>32  (
 118       <b'' b'>32 )
 119       <b'' b'>32 (
 120       <c''' c''>32 )
 121    }
 122
 123    % LH Staff
 124    \new Staff {
 125       \clef bass
 126       \key c \minor
 127       \time 2/4
 128
 129       <g e>32
 130       c'32
 131       <g e>32
 132       c'32
 133
 134       <g e>32
 135       c'32
 136       <g e>32
 137       c'32
 138
 139       <g e>32
 140       c'32
 141       <g e>32
 142       c'32
 143
 144       <a f>32
 145       c'32
 146       <a f>32
 147       c'32
 148
 149       |
 150
 151       <bf g>32
 152       c'32
 153       <bf g>32
 154       c'32
 155
 156       <bf g>32
 157       c'32
 158       <bf g>32
 159       c'32
 160
 161       <bf g>32
 162       c'32
 163       <a f>32
 164       c'32
 165
 166       <g e>32
 167       c'32
 168       <g e>32
 169       c'32
 170
 171       |
 172
 173       <g e>32
 174       c'32
 175       <g e>32
 176       c'32
 177
 178       <g e>32
 179       c'32
 180       <g e>32
 181       c'32
 182
 183       <g e>32
 184       c'32
 185       <g e>32
 186       c'32
 187
 188       <a f>32
 189       c'32
 190       <a f>32
 191       c'32
 192
 193       |
 194
 195       <bf! g>32
 196       c'32
 197       <bf g>32
 198       c'32
 199
 200       <bf g>32
 201       c'32
 202       <bf g>32
 203       c'32
 204
 205       <bf g>32
 206       c'32
 207       <af! f>32
 208       c'32
 209
 210       <g e>32
 211       c'32
 212       <g e>32
 213       c'32
 214    }
 215
 216 >>