input/test/trills.ly

   1
   2 % Generated automatically by: lilypond-book.py
   3 % options are filename=/var/fred/cvs/savannah/lilypond/input/test/trills.ly printfilename
   4
   5 \paper  {
   6   linewidth = 433.619940\pt
   7
   8 }
   9 \version "1.7.18"
  10 \header {
  11   texidoc="Document trills, pralls and turns."
  12
  13   title="Marques des agr\\'ements et leur signification"
  14   composer="D'Anglebert"
  15   year="1689"
  16 }
  17
  18 invisible = \property Voice.NoteHead \override #'transparent = ##t
  19 visible = \property Voice.NoteHead \revert #'transparent
  20
  21 % Ugly hack to get reasonable position of the pincé and Cheute
  22 startHorizScript = {
  23   \property Voice.scriptHorizontal = ##t
  24   \property Voice.Script \override #'padding = #0.3
  25   \property Voice.Script \override #'extra-offset = #'(-.6 . 0)
  26   % Avoid collision with the dots of dotted notes
  27   \property Voice.Dots \override #'extra-X-extent = #'(-0.7 . 0)
  28 }
  29 endHorizScript = {
  30   \property Voice.scriptHorizontal \unset
  31   \property Voice.Dots \revert #'padding
  32   \property Voice.Script \revert #'padding
  33   \property Voice.Script \revert #'extra-offset
  34 }
  35
  36
  37 \score {
  38   <
  39     \property Score.TimeSignature = \turnOff
  40     \context GrandStaff <
  41       \context Staff=upper \notes\relative c'' {
  42         \time 1/4
  43         c4-\prall
  44         \time 3/8
  45         c4.^\lineprall
  46         c4.-\downprall
  47         c4.-\upprall
  48         \time 5/8
  49         c4-\turn c4.-\upprall
  50         d4-\turn b4.-\downprall
  51         \time 3/4
  52         b4 c^\turn d
  53         \time 1/4
  54         <\context Voice=upper{\voiceOne d4}
  55          \context Voice=lower{\voiceTwo
  56            \property Voice.Script \override #'extra-offset = #'(-0.8 . 2.0)
  57            b_\turn}>
  58         \startHorizScript
  59 %{ FIXME  \comma does not exist
  60
  61         c^\comma
  62         \time 3/8
  63         c4.^\comma
  64         b8 c4_\comma
  65         c8 b4_\comma
  66         b8 c4^\comma _\comma
  67 %}
  68         \endHorizScript
  69         \time  2/2 \slurDown
  70         <{c2}{s4 \invisible d1*1/4 ( \visible }>  e2-)
  71         <{a,2}{s4 \invisible b1*1/4 ( \visible }>  d2-)
  72         <{a2}{s4 \invisible b1*1/4 ( \visible }>  d2-)
  73         \time 3/4
  74         d2^\prallup e4
  75       }
  76       \context Lyrics=one \lyrics {
  77         "Tremblement"4
  78         "Tremblement"4.
  79         "Cadence"
  80         "autre"
  81         "Double"4 "cadence"4.
  82         "autre"4 _4.
  83         _4 "sans tremblement"2
  84         "sur une tierce"4
  85         "Pinc\\'e"4
  86         "autre"4.
  87         "Cheute ou Port de"
  88         "en descendant"
  89         "Cheute et pinc\\'e"
  90         "Coul\\'e Sur 2 notes"1
  91         "autre"
  92         "autre"
  93         "Double cadence"2.
  94       }
  95       \context Lyrics=two \lyrics {
  96         "simple"4
  97         "appuy\'e"4.
  98         \skip 1*3
  99         \skip 4 \skip 4.
 100         "voix et montant"
 101         \skip 2.
 102         "de suite"1
 103       }
 104       \context Staff=lower \notes\relative c'' {
 105         % autobeamer has som problems here
 106         d32-[  \repeat unfold 3 { c d } c-]
 107         d8 ~  d32-[\repeat unfold 3 { d32  } c-]
 108         d32 c b c \repeat unfold 4 { d32 c }
 109         b32 c d c \repeat unfold 4 { d32 c }
 110         c32-[-( b a16 b  c-)-]
 111         b32-[ \repeat unfold 5 { c d32 } c-]
 112       }
 113     >
 114   >
 115 }
 116 %% new-chords-done %%