input/test/trills.ly

   1 \version "2.1.26"
   2
   3 \header {
   4   texidoc="@cindex Trills
   5 Trills, pralls and turns may also be written out in full. Here the
   6 D'Anglebert system (1689) is shown."
   7
   8 }
   9
  10 %{
  11
  12 taken from :
  13
  14 title="Marques des agr\\'ements et leur signification"
  15   composer="D'Anglebert"
  16   year="1689"
  17
  18 %}
  19
  20 invisible = \override NoteHead  #'transparent = ##t
  21 visible = \revert NoteHead #'transparent
  22
  23
  24
  25 \score {
  26   <<
  27     \context GrandStaff <<
  28       \new Staff \notes\relative c'' {
  29         \time 1/4
  30         c4\prall
  31         \time 3/8
  32         c4.^\lineprall
  33         c4.\downprall
  34         c4.\upprall
  35         \time 5/8
  36         c4\turn c4.\upprall
  37         d4\turn b4.\downprall
  38         \time 3/4
  39         b4 c^\turn d
  40         \time 1/4
  41         <<{ d4}\\
  42         {
  43            \override Script  #'extra-offset = #'(-0.8 . 2.0)
  44            b_\turn}>>
  45 %{ FIXME  \comma does not exist
  46         \startHorizScript
  47
  48         c^\comma
  49         \time 3/8
  50         c4.^\comma
  51         b8 c4_\comma
  52         c8 b4_\comma
  53         b8 c4^\comma _\comma
  54         \endHorizScript
  55 %}
  56         \time  2/2 \slurDown
  57         <<{c2}{s4 \invisible d1*1/4 ( \visible }>>  e2)
  58         <<{a,2}{s4 \invisible b1*1/4 ( \visible }>>  d2)
  59         <<{a2}{s4 \invisible b1*1/4 ( \visible }>>  d2)
  60         \time 3/4
  61         d2^\prallup e4
  62       }
  63       \new Lyrics \lyrics {
  64         "Tremblement"4
  65         "Tremblement"4.
  66         "Cadence"
  67         "autre"
  68         "Double"4 "cadence"4.
  69 %{      "autre"4 _4.
  70         _4 "sans tremblement"2
  71         "sur une tierce"4
  72         "Pinc\\'e"4
  73         "autre"4.
  74         "Cheute ou Port de"
  75         "en descendant"
  76         "Cheute et pinc\\'e"
  77         "Coul\\'e Sur 2 notes"1
  78         "autre"
  79         "autre"
  80         "Double cadence"2.
  81 %}
  82
  83     }
  84       \new Lyrics \lyrics {
  85         "simple"4
  86         "appuy\\'e"4.
  87 %{      \skip 1*3
  88         \skip 4 \skip 4.
  89         "voix et montant"
  90         \skip 2.
  91         "de suite"1
  92 %}
  93       }
  94       \new Staff \notes\relative c'' {
  95         % autobeamer has som problems here
  96         d32[  \repeat unfold 3 { c d } c]
  97         d8 ~  d32[\repeat unfold 3 { c32 d  } c]
  98         d32 c b c \repeat unfold 4 { d32 c }
  99         b32 c d c \repeat unfold 4 { d32 c }
 100         c32[( b a16 b  c)]
 101         b32[ \repeat unfold 5 { c d32 } c]
 102       }
 103     >>
 104   >>
 105         \paper{ }
 106 }
 107