Documentation/snippets/keyboard-headword.ly

   1 % DO NOT EDIT this file manually; it is automatically
   2 % generated from Documentation/snippets/new
   3 % Make any changes in Documentation/snippets/new/
   4 % and then run scripts/auxiliar/makelsr.py
   5 %
   6 % This file is in the public domain.
   7 %% Note: this file works from version 2.13.36
   8 \version "2.14.0"
   9 \include "english.ly"
  10
  11 #(set-global-staff-size 15)
  12 \paper {
  13   line-width = 16\cm
  14   indent = 0\cm
  15 }
  16
  17 % NR 2.2 Keyboard instruments
  18
  19
  20 \header {
  21   lsrtags = "headwords"
  22   texidoc = ""
  23   doctitle = "headword"
  24 } % begin verbatim
  25
  26
  27 % M. Ravel, Sonatine (1905)
  28 % First movement
  29
  30 \layout {
  31   \context {
  32     \Score
  33     \remove "Bar_number_engraver"
  34   }
  35 }
  36
  37 fermataLong = \markup {
  38   \override #'(direction . 1)
  39   \override #'(baseline-skip . 2) {
  40     \dir-column {
  41       \musicglyph #"scripts.ufermata"
  42       \text \italic \center-align long
  43     }
  44   }
  45 }
  46
  47 \new PianoStaff <<
  48   \set PianoStaff.connectArpeggios = ##t
  49   \new Staff {
  50     \time 2/4
  51     \key fs \major
  52     <<
  53       \new Voice {
  54         \voiceOne
  55         fs''8 ( ^\markup {
  56           \override #'(baseline-skip . 2.4) \column {
  57             \line \bold { Un peu retenu }
  58             \line \italic { très expressif }
  59           }
  60         }
  61         es''16
  62         cs''16
  63         as'4 )
  64         |
  65         fs''8 (
  66         es''16
  67         cs''16
  68         as'4 )
  69         |
  70         fs''8 (
  71         es''16
  72         cs''16
  73         as'8
  74         cs''8 )
  75         |
  76       }
  77       \new Voice {
  78         \voiceTwo
  79         gs'8\rest \ppp
  80         fs'4 (
  81         es'8 )
  82         |
  83         gs'8\rest
  84         fs'4 (
  85         es'8 )
  86         |
  87         gs'8\rest
  88         fs'4 (
  89         es'8 )
  90         |
  91       }
  92     >>
  93     \clef bass
  94     <ds b! es'>4 ( ^ \markup \bold { Rall. }
  95     \override Script #'stencil = #(lambda (grob)
  96       (grob-interpret-markup grob fermataLong))
  97     <ds' as'>8 ) \fermata
  98     \noBeam
  99     \clef treble
 100     \slurUp
 101     \once \override Hairpin #'to-barline = ##f
 102     <as fs'>8 ( \pp \>
 103     |
 104     <gs b cs'>4. \! ) ^\markup \bold { a Tempo }
 105     \slurUp
 106     <as fs'>8 ^\( \>
 107     |
 108     <gs b cs'>4. \! \)
 109     <<
 110       \new Voice {
 111         \voiceOne
 112         <as fs'>8 (
 113         |
 114         cs'8 ^\markup \bold { Rallentando }
 115         b16
 116         cs'16
 117         d'8
 118         e'16
 119         fs'16
 120         |
 121         <as! cs' gs'>4. )
 122         s8
 123         |
 124         r8
 125         <cs'' as'' cs'''>4 \arpeggio
 126         e''16 ( ^\markup \bold { Lent }
 127         fs''16
 128         |
 129         \voiceTwo
 130         <as'! cs'' gs''>2 )
 131         |
 132       }
 133       \new Voice {
 134         \voiceTwo
 135         s8
 136         |
 137         <gs b>4 \<
 138         <fs bs>4 \>
 139         |
 140         s4. \!
 141         \slurUp
 142         \once \override Script #'direction = #UP
 143         <a bs e'>8 ( \accent
 144         |
 145         <as! cs' gs'>4. )
 146         \once \override Hairpin #'to-barline = ##f
 147         <a' bs'>8 \ppp \>
 148         |
 149         s8 \!
 150         \stemDown
 151         \once \override Script #'direction = #UP
 152         \ottava #1
 153         \voiceOne
 154         \once \override PianoStaff.Arpeggio #'padding = #0.8
 155         <cs''' as''' cs''''>4. \arpeggio \fermata
 156         \ottava #0
 157         \bar "|."
 158       }
 159     >>
 160   }
 161   \new Staff <<
 162     \set Staff.pedalSustainStyle = #'bracket
 163     \key fs \major
 164     \clef bass
 165     \new Voice {
 166       \voiceOne
 167       ds'4 \tenuto
 168       cs'4 \tenuto
 169       |
 170       ds'4 \tenuto
 171       cs'4 \tenuto
 172       |
 173       ds'4 \tenuto
 174       cs'4 \tenuto
 175       |
 176       s8
 177       \clef treble
 178       <b' cs''>8 [
 179       \clef bass
 180       <es b cs'>8 \fermata ]
 181       s8
 182       |
 183       fs8\rest
 184       \clef treble
 185       <b' cs''>4 \tenuto
 186       s8
 187       |
 188       fs8\rest
 189       \clef treble
 190       <b' cs''>4 \tenuto
 191       s8
 192       |
 193       s2
 194       |
 195       ds8\rest
 196       \clef treble
 197       <as' cs''>4
 198       \clef bass
 199       s8
 200       |
 201       s8
 202       \clef treble
 203       <as'>4 \arpeggio
 204       \clef bass
 205       s8
 206       |
 207       s8
 208       \clef treble
 209       <as''>4. \arpeggio \fermata
 210       |
 211     }
 212     \new Voice {
 213       \voiceTwo
 214       ds'8 [ (
 215       < ds bs >8
 216       cs'8
 217       < ds as >8 ] )
 218       |
 219       ds'8 [ (
 220       < ds bs >8
 221       cs'8
 222       < ds as >8 ] )
 223       |
 224       ds'8 [ (
 225       < ds bs >8
 226       cs'8
 227       < ds as >8 ] )
 228       |
 229       \once \override Script #'outside-staff-priority = #100
 230       \once \override TextScript #'outside-staff-priority = #500
 231       <cs, gs,>4. \fermata _\markup \italic { ped. }
 232       <fs, cs>8 (
 233       |
 234       <e, b,>4. ) \sustainOn
 235       \clef bass
 236       <fs, cs>8 \( \sustainOff
 237       |
 238       <e, b,>4. \) \sustainOn
 239       \clef bass
 240       <fs, cs>8 ( \sustainOff
 241       |
 242       <e, b,>4
 243       <d, a,>4
 244       |
 245       <fs,, cs,>4. ) \sustainOn
 246       <a, e>8 ( \sustainOff
 247       |
 248       <fs, cs>4. ) \sustainOn
 249       \slurUp
 250       <a e'>8 ( \sustainOff \sustainOn
 251       |
 252       <fs cs'>2 ) \sustainOff \sustainOn
 253       |
 254     }
 255   >>
 256 >>