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