Cz op840 nr 1/scheme

Zur Navigation springen Zur Suche springen
wagra = \once \override Slur.details.max-slope = 0
waacc =
#(define-music-function (mus)
   (ly:music?)
   #{
     {
       \once \override Slur.details.max-slope = 0
       \acciaccatura $mus
     }
   #})

myott =
#(define-music-function (o) (integer?)
   (let ((text (case o
                 ((0) #f)
                 ((1 -1) "8")
                 ((2 -2) "15"))))
     #{
       \ottava #o
       \set Staff.ottavation = #text
     #}))

durde = \markup "C Dur."
durfr = \markup "Ut majeur."
molde = \markup \bold { "C moll. " }
molfr = \markup \italic { "(Ut mineur.)" }

\layout {
  \context {
    \Voice
    beamExceptions = #'()
    \consists "Dot_column_engraver"
    \override BreathingSign.text =
    \markup { \musicglyph #"scripts.lvarcomma" }
    \override Stem.neutral-direction = #down
    \override Script.outside-staff-priority = #'()
    \override Script.padding = #1
  }

  \context {
    \Staff
    explicitKeySignatureVisibility = #end-of-line-invisible
    \override KeyCancellation.break-visibility = #end-of-line-invisible
    \remove Keep_alive_together_engraver
    \remove "Dot_column_engraver"
    \RemoveEmptyStaves
    beamExceptions = #'()
    \override BreathingSign.text =
    \markup { \musicglyph #"scripts.lvarcomma" }
  }
  \context {
    \Staff
    \name BarNumberStaff
    \alias Staff
    \consists "Bar_number_engraver"
    \override BarNumber.color = #(rgb-color 0.7 0.7 0.7)
    \override BarNumber.layer = #-200
    \override BarNumber.outside-staff-priority =#'()
    \override BarNumber.padding = #1
    \override BarNumber.font-size = #-1.9
    \override BarNumber.font-series = #'bold
    \override BarNumber.self-alignment-X = #0
    \override BarNumber.break-visibility = #end-of-line-invisible
  }

  \context {
    \Score
    \accepts BarNumberStaff
    \override VerticalAxisGroup.remove-first = ##t
    \remove "Bar_number_engraver"
    \override MetronomeMark.font-size = #1
    \override MetronomeMark.font-shape = #'caps
    \override BarLine.thick-thickness = 5
    barNumberVisibility = #all-bar-numbers-visible
    \override Timing.beamExceptions = #'()
    \override Timing.baseMoment = #(ly:make-moment 1/4)
  }

  \context {
    \Dynamics
    %\override Hairpin.to-barline = ##f
    alignBelowContext = melodie
    \override TextSpanner.outside-staff-priority = ##f
    \override TextSpanner.padding = #'()
    \override DynamicText.outside-staff-priority = ##f
    \override DynamicText.padding = #4
  }

  \context {
    \PianoStaff
    \accepts BarNumberStaff
    \remove Keep_alive_together_engraver
  }
}