MyOttava

Zur Navigation springen Zur Suche springen

Das Anfangszeichen einer Oktavierungsklammer mittels Scheme ändern:

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

Anwendung

\relative {
  c''1 c c \myOttava 1 c \ottava 0 c \myOttava 1 c
}

Links