input/test/incipit.ly

   1 \version "2.1.7"
   2 \header { texidoc = "@cindex Incipit
   3 This shows how to make an ``incipit'' to indicate scordatora
   4 tuning of a violin part, using the clefStyle property.
   5 The two first bars of Biber's Rosary sonata III. " }
   6
   7
   8
   9
  10 violinincipit =  \notes\relative c''{
  11   \clef "french"
  12   \time 2/2
  13   \property Staff.TimeSignature \override #'style = #'old
  14   a4. b8 c4 fis |
  15 %  <b fis' b d>1
  16   \property Staff.TimeSignature \override #'style = #'C
  17 }
  18
  19 bcincipit =  \notes\relative c{
  20   \clef bass
  21   \property Staff.TimeSignature \override #'style = #'old
  22   b2. cis4 |
  23   \property Staff.TimeSignature \override #'style = #'C
  24 }
  25
  26 violin =  \notes\relative c''{
  27 % Key signatures with different alterations in different octaves
  28 % are broken since 1.3.58!
  29 %  \specialkey \keysignature f' fis'' g' gis''
  30   \key d \major
  31   \time 2/2
  32   \clef treble
  33
  34   a4. b8 c4 fis |
  35   gis~ gis8 fis16^\trill (e) b8 c
  36   <<{ a d}\\ { es,4}>>|
  37 }
  38
  39 BC  = \notes\relative c{
  40   \key d \major
  41   \time 2/2
  42   \clef "bass"
  43
  44  \key \default
  45   b2. cis4 |
  46   d e fis g |
  47 }
  48
  49 \score{
  50   <<
  51     \context Staff = violin {\notes{
  52       \property Staff.Clef \override #'transparent = ##t
  53       \violinincipit \bar ".|"
  54       \property Staff.Clef \revert #'transparent
  55       \endincipit
  56       \violin
  57     }}
  58     \new Staff {\notes{
  59       \property Staff.Clef \override #'transparent = ##t
  60       \bcincipit \bar ".|"
  61       \property Staff.Clef \revert #'transparent
  62       \endincipit
  63       \BC
  64     }}
  65   >>
  66         \paper { raggedright = ##t }
  67 }
  68
  69