User:Lilipond/Klaviernoten/Czerny337-34/variable

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search
myTitel = "Tägliche Übungen Op.337"

Struktur =
{
  \override Score.NonMusicalPaperColumn.page-break-permission = ##f
  \override Score.NonMusicalPaperColumn.line-break-permission = ##f
  \repeat unfold 4 { s2. * 3 \break }
  %s \pageBreak
  \repeat unfold 3 { s2. * 3 \break }
}

cofu = \markup { \normal-text \italic "cresc. poco a poco" }
sfcf = #(make-dynamic-script cofu)

Dyn= {
  \override DynamicText.self-alignment-X = #-1
  s1\p
  s8 s8\cresc s4 s4 s8\f s8
  s2\f s4 s4\sf
  s4\p s4\sfcf s4
  s2 s2\f
  s4 |
  s1\f s1
  s1\f
}

#(define (my-tuplet-number::calc-denominator-text grob)
   (let (;; let 'direction evaluate to use the generic tie-markup-command
          (dir (ly:grob-property grob 'direction)))
     (make-tie-markup
      (string-append  "  " (tuplet-number::calc-denominator-text grob) "  "))))

tupletFormats = {
  \override TupletNumber.font-size = #0
  \override TupletNumber.font-shape = #'italic
  \override TupletBracket.padding = #1.5
  \override TupletNumber.text = #my-tuplet-number::calc-denominator-text
}

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