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