Documentation/snippets/figured-bass-headword.ly

   1 % Do not edit this file; it is automatically
   2 % generated from Documentation/snippets/new
   3 % This file is in the public domain.
   4 %% Note: this file works from version 2.12.0
   5 \version "2.13.10"
   6 #(set-global-staff-size 15)
   7 \paper{
   8   ragged-right=##f
   9   line-width=16\cm
  10   indent=1.5\cm
  11 }
  12
  13 \layout {
  14   \context { \Score
  15     \override PaperColumn #'keep-inside-line = ##t
  16     \override NonMusicalPaperColumn #'keep-inside-line = ##t
  17   }
  18 }
  19
  20 % NR 2.7.3 Figured bass
  21
  22
  23 \header {
  24   lsrtags = "headwords"
  25   texidoc = ""
  26   doctitle = "headword"
  27 } % begin verbatim
  28
  29
  30 % Arcangelo Corelli, 12 Sonate da Camera, Op. 2
  31 % Sonata II, Allemanda
  32 % measures 1 - 88
  33 % Coded by Neil Puttock; modified by Carl Sorensen
  34
  35 extendOn = \bassFigureExtendersOn
  36 extendOff = \bassFigureExtendersOff
  37
  38 \score {
  39
  40   \new StaffGroup <<
  41
  42     \new GrandStaff <<
  43
  44       \new Staff = "violinoI" {
  45         \set Staff.instrumentName = \markup {
  46           \hcenter-in #11
  47           \line { Violino I. }
  48         }
  49         \time 4/4
  50         \mark \markup { \italic Adagio. }
  51         \partial 8
  52         r16 a'16 |
  53         a'8. [ d''16 d''8.  e''16 ] cis''8 a'4 a''16 bes''16 |
  54         cis''8 d''16 ( e'' ) e''8.  d''16 d''4 r8 d''16 e''16 |
  55         f''8 f''4 g''16 ( f''16 ) e''8 e''4 f''16 ( e''16 ) |
  56         d''8.  d''16 g''16 ( f''16 ) e''16 ( d''16 ) cis''8
  57             cis''4 cis''16 cis''16 |
  58         d''8 d''8 c''8.  c''16 c''8 ( b'4 ) b'16 b'16 |
  59         c''8 c''8 bes'8.  bes'16 bes'8 ( a'4 ) a''16 a''16 |
  60         a''8 g''8 g''8.  g''16 g''8 ( f''8 ) r8 f''8 |
  61       }
  62
  63       \new Staff = "violinoII" {
  64         \set Staff.instrumentName = \markup {
  65           \hcenter-in #11
  66           \line { Violino II. }
  67         }
  68         \time 4/4
  69         \partial 8
  70         r16 f'16 |
  71         f'8.  g'16 g'4 a'4 r8 d''16 d''16 |
  72         e''8 a'8 cis''8.  d''16 d''4 r8 f''16 g''16 |
  73         a''8 a''8 d''8.  d''16 g'8 g'8 c''8.  c''16 |
  74         f'8.  f''16 bes''16 ( a''16 ) g''16 ( f''16 ) e''8 e''4 e''16 e''16 |
  75         a'8 fis''8 g''8 a''8 d''8 d''4 d''16 d''16 |
  76         g'8 e''8 f''8 g''8 c''8 c''4 cis''16 cis''16 |
  77         d''8 d''8 e''8.  e''16 e''8 a'8 r8 d''8 |
  78       }
  79
  80     >>
  81
  82     \new Staff = "violone" {
  83       \set Staff.instrumentName = \markup {
  84         \hcenter-in #13 {
  85           \center-column {
  86             Violone,
  87             \line { e Cembalo. }
  88           }
  89         }
  90       }
  91       \time 4/4
  92       \clef bass
  93       \partial 8
  94       r16 d16 |
  95       d4 bes,4 a,4 f4 |
  96       g8 f16 g16 a8 a,8 d4 d'4 ~ |
  97       d'8 c'8 b4 c'8 c'16 bes16 a4 |
  98       bes8 bes16 a16 g4 a8 a,4 a16 g16 |
  99       fis8 d8 e8 fis8 g8 g,4 g16 f16 |
 100       e8 c8 d8 e8 f8 f,4 a,8 |
 101       b,4 cis4 d4 r8 d'8 |
 102     }
 103
 104     \new FiguredBass \figuremode {
 105       \set figuredBassAlterationDirection = #RIGHT
 106       \set figuredBassPlusDirection = #RIGHT
 107       \override VerticalAxisGroup #'minimum-Y-extent = #'()
 108       \override BassFigureAlignment #'stacking-dir = #DOWN
 109       s8 |
 110       s4 <6>4 <_+>4 <6>4 |
 111       <6 4\+ 2>8 <6>8 <_+> s8 s2 |
 112       <5>8 <6 4>8 <6 5>4 s4 <5>8 <6>8 |
 113       s4 <6 5 _-> <_+>2 |
 114       <6>8 <_+>8 <6>8 <6 5>8 <5 4>8 \extendOn <5 _!>8 \extendOff s4 |
 115       <6>4 <6->8 <6 5->8 <5 4->8 \extendOn <5 3>4 \extendOff <5 _+>8 |
 116       <7>8 <6>8 <5>4 <9 4>8 <8 3>8 s4 |
 117     }
 118
 119   >>
 120
 121   \layout {
 122     \context {
 123       \Score
 124       \override RehearsalMark #'break-align-symbols = #'(time-signature)
 125       \override RehearsalMark #'self-alignment-X = #LEFT
 126       \override TimeSignature #'break-align-anchor-alignment = #LEFT
 127     }
 128   }
 129 }