input/test/incipit.ly

   1 %{
   2  Test of how to make an ``incipit'' to indicate scordatora
   3  tuning of a violin part, using the clefStyle property.
   4  The two first bars of Biber's Rosary sonata III.
   5
   6    /Mats B
   7 %}
   8
   9 \version "1.3.117";
  10
  11 violinincipit =  \notes\relative c''{
  12   \clef "french";
  13   \time 2/2;
  14   \property Staff.TimeSignature \override #'style = #'old
  15   a4. b8 c4 fis |
  16 %  <b1 fis' b d>
  17   \property Staff.TimeSignature \override #'style = #'C
  18 }
  19
  20 bcincipit =  \notes\relative c{
  21   \clef bass;
  22   \property Staff.TimeSignature \override #'style = #'old
  23   b2. cis4 |
  24   \property Staff.TimeSignature \override #'style = #'C
  25 }
  26
  27 violin =  \notes\relative c''{
  28 % Key signatures with different alterations in different octaves
  29 % are broken since 1.3.58!
  30 %  \specialkey \keysignature f' fis'' g' gis'';
  31   \key d \major;
  32   \time 2/2;
  33   \clef treble;
  34
  35   a4. b8 c4 fis |
  36   gis~ gis8 fis16^\trill ()e b8 c \context Staff<{\voiceOne a d}{\voiceTwo es,4}>|
  37 }
  38
  39 BC  = \notes\relative c{
  40   \key d \major;
  41   \time 2/2;
  42   \clef "bass";
  43
  44  \key;
  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     \context Staff = BC{\notes{
  59       \property Staff.Clef \override #'transparent = ##t
  60       \bcincipit \bar ".|";
  61       \property Staff.Clef \revert #'transparent
  62       \endincipit
  63       \BC
  64     }}
  65   >
  66 }
  67