]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/ly-examples/cary-layout.ily
Merge remote branch 'origin/master' into release/unstable
[lilypond.git] / Documentation / ly-examples / cary-layout.ily
1
2 \version "2.17.30"
3
4 \layout {
5   indent = #0
6   ragged-right = ##t
7   \context {
8     \Score
9
10     proportionalNotationDuration = #(ly:make-moment 1/64)
11     \override Beam.breakable = ##t
12     autoBeaming = ##f
13     tupletFullLength = ##t
14     \hide BarNumber
15     \hide BarLine
16     \hide SpanBar
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
23   }
24 }
25
26 \midi {
27   \context {
28     \Score
29     autoBeaming = ##f % synchronize lyrics the same way as \layout does
30   }
31 }
32
33 \paper {
34   oddHeaderMarkup = \markup \fill-line { " " }
35   evenHeaderMarkup = \markup \fill-line { " " }
36   oddFooterMarkup = \markup {
37     \fill-line {
38       \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
39   evenFooterMarkup = \markup {
40     \fill-line {
41       \bold \fontsize #3 \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string } }
42   printfirst-page-number = ##t
43   print-page-number = ##t
44   ragged-last-bottom = ##t
45   markup-system-spacing #'minimum-distance = #25
46 }
47
48 #(set-global-staff-size 14)
49
50
51 %% definitions.
52
53
54 ppX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "pp" #:hspace 0)))
55 pX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "p" #:hspace 0)))
56 mpX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "mp" #:hspace 0)))
57 fX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "f" #:hspace 0)))
58 ffX = #(make-dynamic-script (markup #:combine #:transparent #:dynamic "f" #:line(#:hspace 0 #:dynamic "ff" #:hspace 0)))
59 sfp = #(make-dynamic-script "sfp")
60 sfpp = #(make-dynamic-script "sfpp")
61 sffp = #(make-dynamic-script "sffp")
62 sffpp = #(make-dynamic-script "sffpp")
63
64 beam = #(define-music-function (parser location left right) (number? number?)
65         (cond ((and (= left 0) (> right 0))
66                         #{
67                                 \set stemRightBeamCount = #right
68                         #})
69
70                         ((and (> left 0) (= right 0))
71                         #{
72                                 \set stemLeftBeamCount = #left
73                         #})
74
75                         (else
76                         #{
77                                 \set stemLeftBeamCount = #left
78                                 \set stemRightBeamCount = #right
79                         #})
80         )
81 )
82
83 fraction = #(define-music-function (parser location music) (ly:music?)
84         #{ \tweak text #tuplet-number::calc-fraction-text #music #})
85
86 triangle = #(define-music-function (parser location music) (ly:music?)
87         #{ \once \set shapeNoteStyles = ##(do do do do do do do) #music #})
88
89 semicircle = #(define-music-function (parser location music) (ly:music?)
90         #{ \once \set shapeNoteStyles = ##(re re re re re re re) #music #})
91
92 blackdiamond = #(define-music-function (parser location music) (ly:music?)
93         #{ \once \set shapeNoteStyles = ##(mi mi mi mi mi mi mi) #music #})
94
95 tiltedtriangle = #(define-music-function (parser location music) (ly:music?)
96         #{ \once \set shapeNoteStyles = ##(fa fa fa fa fa fa fa) #music #})
97
98 square = #(define-music-function (parser location music) (ly:music?)
99         #{ \once \set shapeNoteStyles = ##(la la la la la la la) #music #})
100
101 wedge = #(define-music-function (parser location music) (ly:music?)
102         #{ \once \set shapeNoteStyles = ##(ti ti ti ti ti ti ti) #music #})
103
104 harmonic = #(define-music-function (parser location music) (ly:music?)
105         #{ \once \set shapeNoteStyles = ##(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) #music #})
106
107 cross = #(define-music-function (parser location music) (ly:music?)
108         #{ \once \set shapeNoteStyles = ##(cross cross cross cross cross cross cross) #music #})
109
110 white = #(define-music-function (parser location music) (ly:music?)
111         #{ \once \override NoteHead.duration-log = #1 #music #})