input/lsr/parts/Rehearsal-mark-numbers.ly

   1 \version "2.10.12"
   2
   3 \header { texidoc = "
   4 Marks can be printed as numbers.
   5 By setting @{markFormatter@} we may choose a different style of mark printing. Also, marks can be specified manually, with a markup argument.
   6 " }
   7
   8 \paper { ragged-right = ##t }
   9
  10 \relative c''{
  11   \set Score.markFormatter = #format-mark-numbers
  12   c1 | \mark \markup { \musicglyph #"scripts.coda" }
  13   c1 | \mark \default
  14   c1 | \mark \default
  15   \set Score.markFormatter
  16   = #(lambda (mark  context)
  17       (make-box-markup (format-mark-numbers mark context)))
  18   c1 | \mark \default
  19   \set Score.markFormatter
  20   = #(lambda (mark  context)
  21       (make-circle-markup (format-mark-numbers mark context)))
  22   c1 | \mark \default
  23 }