@lilypond[verbatim,quote,ragged-right,fragment,relative=2]
a'2 b
-#(set-octavation 1)
+\ottava #1
a b
-#(set-octavation 0)
+\ottava #0
a b
@end lilypond
-La función @code{set-octavation} también admite los valores -1 (para
+La función @code{ottava} también admite los valores -1 (para
8va bassa), 2@tie{}(para 15ma) y -2 (para 15ma bassa) como argumentos.
% Place dynamics above staff
\dynamicUp
% Start Ottava Bracket
-#(set-octavation 1)
+\ottava #1
c' \startTextSpan
% Add Dynamic Text
c\pp
% Add Dynamic Text
c\ff c \stopTextSpan
% Stop Ottava Bracket
-#(set-octavation 0)
+\ottava #0
c, c c c
@end lilypond
%Place following Ottava Bracket below Text Spanners
\once \override Staff.OttavaBracket #'outside-staff-priority = #340
% Start Ottava Bracket
-#(set-octavation 1)
+\ottava #1
c' \startTextSpan
% Add Dynamic Text
c\pp
% Add Dynamic Text
c\ff c \stopTextSpan
% Stop Ottava Bracket
-#(set-octavation 0)
+\ottava #0
c, c c c
@end lilypond
Les marques d'octaviation, @emph{Ottava}, permettent d'introduire une
transposition spécifique d'une octave pour la portée en cours. C'est
-la fonction @code{set-octavation} qui s'en charge.
+la fonction @code{ottava} qui s'en charge.
@cindex ottava
@cindex 15ma
@lilypond[quote,ragged-right,verbatim,fragment]
\relative c''' {
a2 b
- #(set-octavation 1)
+ \ottava #1
a b
- #(set-octavation 0)
+ \ottava #0
a b
}
@end lilypond
-La fonction @code{set-octavation} peut aussi prendre en argument les
+La fonction @code{ottava} peut aussi prendre en argument les
valeurs -1@tie{}(pour 8va bassa), 2@tie{}(pour 15ma --- 2 octaves) ou
-2@tie{}(pour 15ma bassa). En interne, cette fonction détermine les
propriétés @code{ottavation} (p.ex. en @code{"8va"} ou @code{"8vb"})
et @code{centralCPosition}. Vous pouvez modifier le texte d'une marque
d'octaviation en définissant @code{ottavation} après avoir fait appel
-à @code{set-octavation} :
+à @code{ottava} :
@lilypond[quote,ragged-right,verbatim]
{
- #(set-octavation 1)
+ \ottava #1
\set Staff.ottavation = #"8"
c'''
}
@knownissues
-@code{set-octavation} gère difficilement les changements de clé qui
+@code{ottava} gère difficilement les changements de clé qui
pourraient intervenir alors qu'elle est effective.
@lilypond[verbatim,quote,relative=2]
a'2 b
-#(set-octavation 1)
+\ottava #1
a b
-#(set-octavation 0)
+\ottava #0
a b
@end lilypond
-The @code{set-octavation} function also takes -1 (for 8va bassa),
+The @code{ottava} function also takes -1 (for 8va bassa),
2@tie{}(for 15ma), and -2 (for 15ma bassa) as arguments.
% Place dynamics above staff
\dynamicUp
% Start Ottava Bracket
-#(set-octavation 1)
+\ottava #1
c' \startTextSpan
% Add Dynamic Text
c\pp
% Add Dynamic Text
c\ff c \stopTextSpan
% Stop Ottava Bracket
-#(set-octavation 0)
+\ottava #0
c, c c c
@end lilypond
%Place following Ottava Bracket below Text Spanners
\once \override Staff.OttavaBracket #'outside-staff-priority = #340
% Start Ottava Bracket
-#(set-octavation 1)
+\ottava #1
c' \startTextSpan
% Add Dynamic Text
c\pp
% Add Dynamic Text
c\ff c \stopTextSpan
% Stop Ottava Bracket
-#(set-octavation 0)
+\ottava #0
c, c c c
@end lilypond
texidoc = "Excercise all output functions"
}
-\version "2.11.51"
+\version "2.11.53"
\paper { ragged-right = ##t }
\new StaffGroup \new PianoStaff <<
\new Staff
{
- #(set-octavation 1)
+ \ottava #1
\times 2/3 { c'8[\< f]( f''\!) }
- #(set-octavation 0)
+ \ottava #0
<f,, \5>4
\override TextScript #'color = #red
but they don't confuse one another."
}
-\version "2.11.51"
+\version "2.11.53"
\layout { ragged-right = ##t}
\relative c'' {
\clef "alto"
a b c a
- #(set-octavation 1)
+ \ottava #1
a b c a
\clef "bass"
a b c a
- #(set-octavation 2)
+ \ottava #2
a b c a
\clef "treble"
- #(set-octavation -1)
+ \ottava #-1
a b c a
}
}
-\version "2.11.51"
+\version "2.11.53"
+
\relative {
\override Staff.OttavaBracket #'dash-period = #0.1
\override Score.OttavaBracket #'dash-fraction = #1
- #(set-octavation 1)
+ \ottava #1
c4 c
}
}
-\version "2.11.51"
+\version "2.11.53"
\layout { ragged-right = ##t }
\relative c''' {
a2 b
- #(set-octavation 1)
+ \ottava #1
a2 b \time 3/4 \break c''2. \break
a
- #(set-octavation 0)
+ \ottava #0
g,,2 b4 c2 a4
}
texidoc =
"Both edge heights of an ottava bracket can be specified."
}
-\version "2.11.51"
+
+\version "2.11.53"
\layout { ragged-right = ##t}
\relative c''' {
%standard ottavation
- #(set-octavation 1)
+ \ottava #1
a b c
- #(set-octavation 0)
+ \ottava #0
a
%override the left edge height to produce standard text with a left edge
- #(set-octavation 1)
+ \ottava #1
\once \override Staff.OttavaBracket #'edge-height = #'(1.2 . 1.2)
a b c
- #(set-octavation 0)
+ \ottava #0
a
% Look! we can make them go up!
- #(set-octavation 1)
+ \ottava #1
\once \override Staff.OttavaBracket #'edge-height = #'(-1 . -1)
a b c
- #(set-octavation 0)
+ \ottava #0
a
% and have them go in different directions
- #(set-octavation 1)
+ \ottava #1
\once \override Staff.OttavaBracket #'edge-height = #'(-1.2 . 1.2)
a b c
- #(set-octavation 0)
+ \ottava #0
a
}
\header
{
texidoc = "Ottava brackets are supported, through the
-use of the scheme function @code{set-octavation}.
+use of the music function @code{\\ottava}.
The spanner should go below a staff for 8va bassa, and the ottavation
markup can be tuned with @code{Staff.ottavation}.
"
}
-\version "2.11.51"
+
+\version "2.11.53"
%% . There must be a minimum distance between the octavation line and the
%% topmost staff line, taking into account the height of the closing
\relative c''' {
a b c a
- #(set-octavation 1)
+ \ottava #1
a b c a
- #(set-octavation 0)
- #(set-octavation 2)
+ \ottava #0
+ \ottava #2
a b c a
- #(set-octavation 0)
- #(set-octavation -1)
+ \ottava #0
+ \ottava #-1
a b c a
- #(set-octavation 0)
+ \ottava #0
\break
a,
- #(set-octavation 1)
+ \ottava #1
\set Staff.ottavation = #"8"
b
- #(set-octavation 0)
+ \ottava #0
c a
- #(set-octavation -1)
+ \ottava #-1
\set Staff.ottavation = \markup { \concat { 8 \tiny \raise #0.8 vb }}
b a g
- #(set-octavation 0)
+ \ottava #0
c
- #(set-octavation -1)
+ \ottava #-1
\set Staff.ottavation = #"8"
c,,16
- #(set-octavation 0)
+ \ottava #0
c'16
- #(set-octavation -1)
+ \ottava #-1
\set Staff.ottavation = #"8"
g,,16
}
(make-music 'RelativeOctaveCheck
'origin location
'pitch (pitch-of-note pitch-note)
- ))
+ ))
+
+ottava = #(define-music-function (parser location octave) (number?)
+ (_i "set the octavation ")
+ (make-ottava-set octave))
+
partcombine =
#(define-music-function (parser location part1 part2) (ly:music? ly:music?)
(make-part-combine-music parser
str = str.replace ("setHairpinDim", "dimHairpin")
return str
-@rule ((2, 11, 53), "infinite-spacing-height -> extra-spacing-height")
+@rule ((2, 11, 53), "infinite-spacing-height -> extra-spacing-height, \
+#(set-octavation oct) -> \\ottava #oct")
def conv (str):
str = re.sub (r"infinite-spacing-height\s+=\s+##t", r"extra-spacing-height = #'(-inf.0 . +inf.0)", str)
str = re.sub (r"infinite-spacing-height\s+=\s+##f", r"extra-spacing-height = #'(0 . 0)", str)
+ str = re.sub (r"#\(set-octavation (-*[0-9]+)\)", r"\\ottava #\1", str)
return str
# Guidelines to write rules (please keep this at the end of this file)
dir = self.ly_octave_shift_indicator ()
value = ''
if dir:
- value = '#(set-octavation %s)' % dir
+ value = '\ottava #%s' % dir
return {
-1: value,
- 1: '#(set-octavation 0)'}.get (self.span_direction, '')
+ 1: '\ottava #0'}.get (self.span_direction, '')
class TrillSpanEvent (SpanEvent):
def ly_expression (self):