input/test/incipit.ly

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