input/test/incipit.ly

   1 \version "1.7.18"
   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 violinincipit =  \notes\relative c''{
   8   \clef "french"
   9   \time 2/2
  10   \property Staff.TimeSignature \override #'style = #'old
  11   a4. b8 c4 fis |
  12 %  <<b fis' b d>>1
  13   \property Staff.TimeSignature \override #'style = #'C
  14 }
  15
  16 bcincipit =  \notes\relative c{
  17   \clef bass
  18   \property Staff.TimeSignature \override #'style = #'old
  19   b2. cis4 |
  20   \property Staff.TimeSignature \override #'style = #'C
  21 }
  22
  23 violin =  \notes\relative c''{
  24 % Key signatures with different alterations in different octaves
  25 % are broken since 1.3.58!
  26 %  \specialkey \keysignature f' fis'' g' gis''
  27   \key d \major
  28   \time 2/2
  29   \clef treble
  30
  31   a4. b8 c4 fis |
  32   gis~ gis8 fis16^\trill (e-) b8 c \context Staff<{\voiceOne a d}{\voiceTwo es,4}>|
  33 }
  34
  35 BC  = \notes\relative c{
  36   \key d \major
  37   \time 2/2
  38   \clef "bass"
  39
  40  \key \default
  41   b2. cis4 |
  42   d e fis g |
  43 }
  44
  45 \score{
  46   <
  47     \context Staff = violin {\notes{
  48       \property Staff.Clef \override #'transparent = ##t
  49       \violinincipit \bar ".|"
  50       \property Staff.Clef \revert #'transparent
  51       \endincipit
  52       \violin
  53     }}
  54     \context Staff = BC{\notes{
  55       \property Staff.Clef \override #'transparent = ##t
  56       \bcincipit \bar ".|"
  57       \property Staff.Clef \revert #'transparent
  58       \endincipit
  59       \BC
  60     }}
  61   >
  62         \paper { raggedright = ##t }
  63 }
  64
  65