]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/grid-lines--emphasizing-rhythms-and-notes-synchronization.ly
Merge branch 'lilypond/translation' of ssh://trettig@git.sv.gnu.org/srv/git/lilypond...
[lilypond.git] / input / lsr / grid-lines--emphasizing-rhythms-and-notes-synchronization.ly
1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
3 \version "2.11.49"
4
5 \header {
6   lsrtags = "editorial-annotations"
7
8   texidoc = "
9 Regular vertical lines can be drawn between staves to show notes
10 synchronization; however, in case of monophonic music, you may want to
11 make the second stave invisible, and make the lines shorter like in
12 this snippet.
13
14 "
15   doctitle = "Grid lines: emphasizing rhythms and notes synchronization"
16 } % begin verbatim
17 %% sets of grid
18 \layout {
19  \context {
20    \Staff
21    \consists "Grid_point_engraver"
22    gridInterval = #(ly:make-moment 1 8)
23 %% lines length
24    \override GridPoint #'Y-extent = #'(6 . 0)
25  }
26  \context {
27    \StaffGroup
28    \remove "System_start_delimiter_engraver"
29  }
30 }
31
32 \layout {
33  ragged-right = ##t
34 }
35 \new Score
36 \with {
37  \consists "Grid_line_span_engraver"
38 %% centers grid lines  horizontally below noteheads
39  \override NoteColumn #'X-offset = #-0.5
40 }
41
42 \new ChoirStaff <<
43  \new Staff
44  {
45    \time 12/8
46    \stemUp
47    \relative {
48    c'4. d8 e8 f g4 f8 e8.[ d16 c8] }
49  }
50  \new Staff
51  {
52 %% making sure the lines will be placed outside the Staff
53    \override Score.GridLine #'extra-offset = #'( 0.0 . -4.0 )
54
55 %% hides staff and notes so that only the grid lines are visible
56    \override NoteHead #'transparent = ##t
57    \override NoteHead #'no-ledgers = ##t
58    \override Stem #'transparent = ##t
59    \override Beam #'transparent = ##t
60    \override Staff.BarLine #'transparent = ##t
61    \override Staff.StaffSymbol #'line-count = #0
62    \override Staff.TimeSignature #'transparent = ##t
63    \override Staff.Clef #'transparent = ##t
64
65 % you have to put 'dummy' notes here to force regular grid spacing...
66  \once  \override Score.GridLine #'thickness = #4.0
67  c8   c8   c8
68  \once  \override Score.GridLine #'thickness = #3.0
69  c8   c8   c8
70  \once  \override Score.GridLine #'thickness = #4.0
71  c8   c8   c8
72  \once  \override Score.GridLine #'thickness = #3.0
73  c8   c8   c8
74  }
75 >>