]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/rehearsal-mark-number.ly
* input/regression/rehearsal-mark-number.ly: new file.
[lilypond.git] / input / regression / rehearsal-mark-number.ly
1 \header { texidoc= "
2
3 Marks can be printed as numbers.  
4 By setting @code{markFormatter} we may choose a different style of mark printing. Also, marks can be specified manually, with a markup argument" 
5           
6       }
7
8 \version "2.1.7"
9
10
11 global =  \notes {
12     \property Score.markFormatter = #format-mark-numbers 
13   s1 | \mark \markup { \musicglyph #"scripts-coda" }
14   s1 | \mark \default
15   s1 | \mark \default
16     \property Score.markFormatter
17     = #(lambda (mark  context)
18         (make-bold-markup (make-box-markup (number->string mark))))
19         
20     s1 | \mark \default
21     s1 | \mark \default
22   }
23
24
25 one =  \notes \relative c {
26   c''1 c c c c c c 
27 }
28
29
30 \score{
31 \context Staff  << \global \one >>
32 }
33