Leitereigene Mehrklänge Dur Moll/lily

Zur Navigation springen Zur Suche springen

=\version "2.20.0"
\language "deutsch"

#(use-modules (ice-9 regex))
#(ly:load "x11-color.scm")
\include "exceptions.ily"

\include "mehrklang.ily"
\include "bookparts.ily"
\include "scheme.ily"
\include "kadenzen.ily"
\include "titel.ly"

\paper {
  markup-system-spacing.minimum-distance = #5
  markup-markup-spacing.minimum-distance = #5
  score-system-spacing.minimum-distance = #10
  system-system-spacing.minimum-distance = #10
  system-system-spacing.padding = #10
  top-markup-spacing.minimum-distance = #10
  markup-system-spacing.basic-distance = 12
  oddHeaderMarkup = ##f
  evenHeaderMarkup = #oddHeaderMarkup
  oddFooterMarkup = #oddHeaderMarkup
  evenFooterMarkup = #oddHeaderMarkup
  ragged-right = ##f
  ragged-last = ##f
  ragged-bottom = ##t
  ragged-last-bottom = ##t
  %left-margin = 30\mm
  line-width = 150\mm
  indent = 0\mm
  annotate-spacing = ##f
}

\layout {

  \context {
    \Staff
    \remove "Time_signature_engraver"
  }

  \context {
    \PianoStaff
    \override SystemStartBrace.collapse-height = #1
  }

  \context {
    \Score
    \override BarNumber.stencil = ##f
    \override KeyCancellation.break-visibility = #all-invisible
    \override StaffGrouper.staffgroup-staff-spacing.basic-distance = #15
    \override StaffGrouper.staffgroup-staff-spacing.padding = #4
    \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1
    \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.minimum-distance = #3
    %\remove "Default_bar_line_engraver"
    automaticBars =##f
    \override SpacingSpanner.strict-note-spacing = ##t
  }

  \context {
    \ChordNames
    \alias ChordNames
    \override ChordName.self-alignment-X = #LEFT
    chordNameLowercaseMinor = ##f
    \override Rest.stencil = ##f
    chordNoteNamer = #(chord-name->german-markup #f)
    chordChanges = ##f
    chordNameLowercaseMinor = ##f
    chordNameExceptions = #chExceptions
    chordRootNamer = #germanChords
    majorSevenSymbol = \markup { maj7 }
    \override ChordName.font-name = #"Arial Narrow"
    \override ChordName.layer = #2
    \override ChordName.extra-spacing-width = #'(+inf.0 . -inf.0)
    \override ChordName.font-size = #1
    noChordSymbol = ##f
    \override VerticalAxisGroup.staff-affinity = #UP
    \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #1
  }

  \context {
    \Dynamics
    \override VerticalAxisGroup.staff-affinity = #UP
    \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #1
  }
}

myKey = #major

DurStufen = {
  s1\dynamictext "I"  s\dynamictext "ii"
  s\dynamictext "iii"  s\dynamictext "IV"
  s\dynamictext "V"  s\dynamictext "vi"
  s\dynamictext "vii"
}

Stufen = {
  s1-"I" s1-"ii" s1-"iii" s-"IV" s-"V" s-"vi" s-"vii"
}
\myBookparts < c g d a, e h, fis ges des as, b, f > \relative c' { c1 d e f g a h } #"Leitereigene Mehrklänge " "Dur" ##t
#'()

myKey = #minor

Stufen = {
  s1-"i" s1-"ii" s1-"III" s-"iv" s-"v" s-"VI" s-"VII"
}
DurStufen = {
  s1\dynamictext "i"  s\dynamictext "ii"
  s\dynamictext "III"  s\dynamictext "iv"
  s\dynamictext "v"  s\dynamictext "VI"
  s\dynamictext "VII"
}

\myBookparts < a, e h, fis cis gis dis es b, f c g d > \relative c' { c1 d es f g as h } #"Leitereigene Mehrklänge " "Moll" ##f

=\version "2.20.0"
\language "deutsch"

#(use-modules (ice-9 regex))
#(ly:load "x11-color.scm")
\include "exceptions.ily"

\include "mehrklang.ily"
\include "bookparts.ily"
\include "scheme.ily"
\include "kadenzen.ily"
\include "titel.ly"

\paper {
  markup-system-spacing.minimum-distance = #5
  markup-markup-spacing.minimum-distance = #5
  score-system-spacing.minimum-distance = #10
  system-system-spacing.minimum-distance = #10
  system-system-spacing.padding = #10
  top-markup-spacing.minimum-distance = #10
  markup-system-spacing.basic-distance = 12
  oddHeaderMarkup = ##f
  evenHeaderMarkup = #oddHeaderMarkup
  oddFooterMarkup = #oddHeaderMarkup
  evenFooterMarkup = #oddHeaderMarkup
  ragged-right = ##f
  ragged-last = ##f
  ragged-bottom = ##t
  ragged-last-bottom = ##t
  %left-margin = 30\mm
  line-width = 150\mm
  indent = 0\mm
  annotate-spacing = ##f
}

\layout {

  \context {
    \Staff
    \remove "Time_signature_engraver"
  }

  \context {
    \PianoStaff
    \override SystemStartBrace.collapse-height = #1
  }

  \context {
    \Score
    \override BarNumber.stencil = ##f
    \override KeyCancellation.break-visibility = #all-invisible
    \override StaffGrouper.staffgroup-staff-spacing.basic-distance = #15
    \override StaffGrouper.staffgroup-staff-spacing.padding = #4
    \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.padding = #1
    \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing.minimum-distance = #3
    %\remove "Default_bar_line_engraver"
    automaticBars =##f
    \override SpacingSpanner.strict-note-spacing = ##t
  }

  \context {
    \ChordNames
    \alias ChordNames
    \override ChordName.self-alignment-X = #LEFT
    chordNameLowercaseMinor = ##f
    \override Rest.stencil = ##f
    chordNoteNamer = #(chord-name->german-markup #f)
    chordChanges = ##f
    chordNameLowercaseMinor = ##f
    chordNameExceptions = #chExceptions
    chordRootNamer = #germanChords
    majorSevenSymbol = \markup { maj7 }
    \override ChordName.font-name = #"Arial Narrow"
    \override ChordName.layer = #2
    \override ChordName.extra-spacing-width = #'(+inf.0 . -inf.0)
    \override ChordName.font-size = #1
    noChordSymbol = ##f
    \override VerticalAxisGroup.staff-affinity = #UP
    \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #1
  }

  \context {
    \Dynamics
    \override VerticalAxisGroup.staff-affinity = #UP
    \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #1
  }
}

myKey = #major

DurStufen = {
  s1\dynamictext "I"  s\dynamictext "ii"
  s\dynamictext "iii"  s\dynamictext "IV"
  s\dynamictext "V"  s\dynamictext "vi"
  s\dynamictext "vii"
}

Stufen = {
  s1-"I" s1-"ii" s1-"iii" s-"IV" s-"V" s-"vi" s-"vii"
}
\myBookparts < c g d a, e h, fis ges des as, b, f > \relative c' { c1 d e f g a h } #"Leitereigene Mehrklänge " "Dur" ##t
#'()

myKey = #minor

Stufen = {
  s1-"i" s1-"ii" s1-"III" s-"iv" s-"v" s-"VI" s-"VII"
}
DurStufen = {
  s1\dynamictext "i"  s\dynamictext "ii"
  s\dynamictext "III"  s\dynamictext "iv"
  s\dynamictext "v"  s\dynamictext "VI"
  s\dynamictext "VII"
}

\myBookparts < a, e h, fis cis gis dis es b, f c g d > \relative c' { c1 d es f g as h } #"Leitereigene Mehrklänge " "Moll" ##f