input/cary-layout.ly

   1
   2 \version "2.12.0"
   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     \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
  23   }
  24 }
  25
  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
  38 }
  39
  40 #(set-global-staff-size 14)
  41
  42
  43 %% definitions.
  44
  45
  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")
  55
  56 beam = #(define-music-function (parser location left right) (number? number?)
  57         (cond ((and (= left 0) (> right 0))
  58                         #{
  59                                 \set stemRightBeamCount = #$right
  60                         #})
  61
  62                         ((and (> left 0) (= right 0))
  63                         #{
  64                                 \set stemLeftBeamCount = #$left
  65                         #})
  66
  67                         (else
  68                         #{
  69                                 \set stemLeftBeamCount = #$left
  70                                 \set stemRightBeamCount = #$right
  71                         #})
  72         )
  73 )
  74
  75 fraction = #(define-music-function (parser location music) (ly:music?)
  76         #{ \tweak #'text #tuplet-number::calc-fraction-text $music #})
  77
  78 triangle = #(define-music-function (parser location music) (ly:music?)
  79         #{ \once \set shapeNoteStyles = #'#(do do do do do do do) $music #})
  80
  81 semicircle = #(define-music-function (parser location music) (ly:music?)
  82         #{ \once \set shapeNoteStyles = #'#(re re re re re re re) $music #})
  83
  84 blackdiamond = #(define-music-function (parser location music) (ly:music?)
  85         #{ \once \set shapeNoteStyles = #'#(mi mi mi mi mi mi mi) $music #})
  86
  87 tiltedtriangle = #(define-music-function (parser location music) (ly:music?)
  88         #{ \once \set shapeNoteStyles = #'#(fa fa fa fa fa fa fa) $music #})
  89
  90 square = #(define-music-function (parser location music) (ly:music?)
  91         #{ \once \set shapeNoteStyles = #'#(la la la la la la la) $music #})
  92
  93 wedge = #(define-music-function (parser location music) (ly:music?)
  94         #{ \once \set shapeNoteStyles = #'#(ti ti ti ti ti ti ti) $music #})
  95
  96 harmonic = #(define-music-function (parser location music) (ly:music?)
  97         #{ \once \set shapeNoteStyles = #'#(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) $music #})
  98
  99 cross = #(define-music-function (parser location music) (ly:music?)
 100         #{ \once \set shapeNoteStyles = #'#(cross cross cross cross cross cross cross) $music #})
 101
 102 white = #(define-music-function (parser location music) (ly:music?)
 103         #{ \once \override NoteHead #'duration-log = #1 $music #})
 104