Reinstate headword time signatures.
[lilypond.git] / input / cary-layout.ly
blob3bfde1d7b73a68cada473eb7671130c4e922aad8
2 \version "2.11.51"
4 \layout {
5 indent = #0
6 ragged-right = ##t
7 \context {
8 \Score
10 proportionalNotationDuration = #(ly:make-moment 1 64)
11 \override Beam #'breakable = ##t
12 autoBeaming = ##f
13 tupletFullLength = ##t
14 \override BarNumber #'transparent = ##t
15 \override BarLine #'transparent = ##t
16 \override SpanBar #'transparent = ##t
17 \override Beam #'break-overshoot = #'(-0.5 . 1.0)
18 \override TextScript #'staff-padding = #6
19 \override Glissando #'thickness = #3
20 \override SpacingSpanner #'strict-grace-spacing = ##t
21 \override TupletBracket #'bracket-visibility = ##t
22 \override NoteColumn #'ignore-collision = ##t
26 \paper {
27 oddHeaderMarkup = \markup \fill-line { " " }
28 evenHeaderMarkup = \markup \fill-line { " " }
29 oddFooterMarkup = \markup {
30 \fill-line {
31 \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
32 evenFooterMarkup = \markup {
33 \fill-line {
34 \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
35 printfirst-page-number = ##t
36 print-page-number = ##t
37 ragged-last-bottom = ##t
40 #(set-global-staff-size 14)
43 %% definitions.
46 ppX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "pp" #:hspace 0)))
47 pX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "p" #:hspace 0)))
48 mpX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "mp" #:hspace 0)))
49 fX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "f" #:hspace 0)))
50 ffX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "ff" #:hspace 0)))
51 sfp = #(make-dynamic-script "sfp")
52 sfpp = #(make-dynamic-script "sfpp")
53 sffp = #(make-dynamic-script "sffp")
54 sffpp = #(make-dynamic-script "sffpp")
56 beam = #(define-music-function (parser location left right) (number? number?)
57 (cond ((and (= left 0) (> right 0))
59 \set stemRightBeamCount = #$right
60 #})
62 ((and (> left 0) (= right 0))
64 \set stemLeftBeamCount = #$left
65 #})
67 (else
69 \set stemLeftBeamCount = #$left
70 \set stemRightBeamCount = #$right
71 #})
75 fraction = #(define-music-function (parser location music) (ly:music?)
76 #{ \tweak #'text #tuplet-number::calc-fraction-text $music #})
78 triangle = #(define-music-function (parser location music) (ly:music?)
79 #{ \once \set shapeNoteStyles = #'#(do do do do do do do) $music #})
81 semicircle = #(define-music-function (parser location music) (ly:music?)
82 #{ \once \set shapeNoteStyles = #'#(re re re re re re re) $music #})
84 blackdiamond = #(define-music-function (parser location music) (ly:music?)
85 #{ \once \set shapeNoteStyles = #'#(mi mi mi mi mi mi mi) $music #})
87 tiltedtriangle = #(define-music-function (parser location music) (ly:music?)
88 #{ \once \set shapeNoteStyles = #'#(fa fa fa fa fa fa fa) $music #})
90 square = #(define-music-function (parser location music) (ly:music?)
91 #{ \once \set shapeNoteStyles = #'#(la la la la la la la) $music #})
93 wedge = #(define-music-function (parser location music) (ly:music?)
94 #{ \once \set shapeNoteStyles = #'#(ti ti ti ti ti ti ti) $music #})
96 harmonic = #(define-music-function (parser location music) (ly:music?)
97 #{ \once \set shapeNoteStyles = #'#(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) $music #})
99 cross = #(define-music-function (parser location music) (ly:music?)
100 #{ \once \set shapeNoteStyles = #'#(cross cross cross cross cross cross cross) $music #})
102 white = #(define-music-function (parser location music) (ly:music?)
103 #{ \once \override NoteHead #'duration-log = #1 $music #})