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.53"
   4
   5 \header {
   6   lsrtags = "editorial-annotations"
   7
   8   texidoces = "
   9 Se pueden trazar líneas verticales normales entre pentagramas para
  10 mostrar la relación entre notas; sin embargo, en caso de música
  11 monofónica, podemos hacer invisible el segundo pentagrama, y que
  12 las líneas sean más cortas, como en este fragmento de código.
  13
  14 "
  15   doctitlees = "Líneas de rejilla: destacar ritmos y la relación temporal entre notas"
  16
  17   texidoc = "
  18 Regular vertical lines can be drawn between staves to show notes
  19 synchronization; however, in case of monophonic music, you may want to
  20 make the second stave invisible, and make the lines shorter like in
  21 this snippet.
  22
  23 "
  24   doctitle = "Grid lines: emphasizing rhythms and notes synchronization"
  25 } % begin verbatim
  26 %% sets of grid
  27 \layout {
  28  \context {
  29    \Staff
  30    \consists "Grid_point_engraver"
  31    gridInterval = #(ly:make-moment 1 8)
  32 %% lines length
  33    \override GridPoint #'Y-extent = #'(6 . 0)
  34  }
  35  \context {
  36    \StaffGroup
  37    \remove "System_start_delimiter_engraver"
  38  }
  39 }
  40
  41 \layout {
  42  ragged-right = ##t
  43 }
  44 \new Score
  45 \with {
  46  \consists "Grid_line_span_engraver"
  47 %% centers grid lines  horizontally below noteheads
  48  \override NoteColumn #'X-offset = #-0.5
  49 }
  50
  51 \new ChoirStaff <<
  52  \new Staff
  53  {
  54    \time 12/8
  55    \stemUp
  56    \relative {
  57    c'4. d8 e8 f g4 f8 e8.[ d16 c8] }
  58  }
  59  \new Staff
  60  {
  61 %% making sure the lines will be placed outside the Staff
  62    \override Score.GridLine #'extra-offset = #'( 0.0 . -4.0 )
  63
  64 %% hides staff and notes so that only the grid lines are visible
  65    \override NoteHead #'transparent = ##t
  66    \override NoteHead #'no-ledgers = ##t
  67    \override Stem #'transparent = ##t
  68    \override Beam #'transparent = ##t
  69    \override Staff.BarLine #'transparent = ##t
  70    \override Staff.StaffSymbol #'line-count = #0
  71    \override Staff.TimeSignature #'transparent = ##t
  72    \override Staff.Clef #'transparent = ##t
  73
  74 % you have to put 'dummy' notes here to force regular grid spacing...
  75  \once  \override Score.GridLine #'thickness = #4.0
  76  c8   c8   c8
  77  \once  \override Score.GridLine #'thickness = #3.0
  78  c8   c8   c8
  79  \once  \override Score.GridLine #'thickness = #4.0
  80  c8   c8   c8
  81  \once  \override Score.GridLine #'thickness = #3.0
  82  c8   c8   c8
  83  }
  84 >>