input/lsr/grid-lines--changing-their-appearance.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.13.1"
   4
   5 \header {
   6   lsrtags = "editorial-annotations"
   7
   8   texidoces = "
   9 Se puede cambiar el aspecto de las líneas de rejilla
  10 sobreescribiendo algunas de sus propiedades.
  11
  12 "
  13   doctitlees = "Líneas de rejilla: modificar su aspecto"
  14
  15 %% Translation of GIT committish :0364058d18eb91836302a567c18289209d6e9706
  16   texidocde = "
  17 Die Erscheinung der Gitternetzlinien kann durch einige Eigenschaften
  18 geändert werden.
  19
  20 "
  21   doctitlede = "Gitternetzlinien: Aussehen verändern"
  22
  23   texidoc = "
  24 The appearance of grid lines can be changed by overriding some of their
  25 properties.
  26
  27 "
  28   doctitle = "Grid lines: changing their appearance"
  29 } % begin verbatim
  30
  31 \score {
  32   \new ChoirStaff <<
  33     \new Staff {
  34       \relative c'' {
  35         \stemUp
  36         c'4. d8 e8 f g4
  37       }
  38     }
  39     \new Staff {
  40       \relative c {
  41         % this moves them up one staff space from the default position
  42         \override Score.GridLine #'extra-offset = #'(0.0 . 1.0)
  43         \stemDown
  44         \clef bass
  45         \once \override Score.GridLine #'thickness = #5.0
  46         c4
  47         \once \override Score.GridLine #'thickness = #1.0
  48         g'4
  49         \once \override Score.GridLine #'thickness = #3.0
  50         f4
  51         \once \override Score.GridLine #'thickness = #5.0
  52         e4
  53       }
  54     }
  55   >>
  56   \layout {
  57     \context {
  58       \Staff
  59       % set up grids
  60       \consists "Grid_point_engraver"
  61       % set the grid interval to one quarter note
  62       gridInterval = #(ly:make-moment 1 4)
  63     }
  64     \context {
  65       \Score
  66       \consists "Grid_line_span_engraver"
  67       % this moves them to the right half a staff space
  68       \override NoteColumn #'X-offset = #-0.5
  69     }
  70   }
  71 }