]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/parts/rehearsal-mark-numbers.ly
b40f5ec0a646107953be7fb570576c7449f01486
[lilypond.git] / input / lsr / parts / rehearsal-mark-numbers.ly
1 \version "2.10.12"
2
3 \header { texidoc = "
4 Marks can be printed as numbers.
5   
6
7 By setting @code{markFormatter} we may choose a different style of mark
8 printing. Also, marks can be specified manually, with a markup
9 argument. 
10 " }
11
12 \paper {
13   ragged-right = ##t 
14 }
15
16 \relative c''{
17   \set Score.markFormatter = #format-mark-numbers 
18   c1 | \mark \markup { \musicglyph #"scripts.coda" }
19   c1 | \mark \default
20   c1 | \mark \default
21   \set Score.markFormatter
22     = #(lambda (mark  context)
23         (make-box-markup (format-mark-numbers mark context)))
24   c1 | \mark \default
25   \set Score.markFormatter
26     = #(lambda (mark  context)
27         (make-circle-markup (format-mark-numbers mark context)))
28   c1 | \mark \default
29 }