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