input/cary-layout.ly

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