input/test/metronome.ly

   1 \version "1.7.16"
   2
   3
   4
   5 % Test scm markup text and kerning
   6
   7 % Warning
   8 %
   9 % This is not a feature, it is a hack.  If you change anything,
  10 % it will probably break
  11
  12 % FIXME: put in an item, and typeset by an engraver.
  13
  14 eigthStem = \markup \combine
  15         \musicglyph #"flags-stem"
  16         \translate #'(0.0 . 3.5) \musicglyph #"flags-u3"
  17 eighthNote = \markup
  18         \override #'(word-space . 0.0)
  19         { \musicglyph #"noteheads-2"
  20           \translate #'(-0.05 . 0.1) \eigthStem }
  21
  22 \score {
  23   \notes\relative c'' {
  24     a1^\markup { \magnify #0.9 \eighthNote " = 64" }
  25   }
  26   \paper {
  27     raggedright = ##t
  28     \translator{
  29       \ScoreContext
  30       TextScript \override #'font-shape = #'upright
  31     }
  32   }
  33 }
  34 %% new-chords-done %%