Re: sustainOff apparantly does not seem to work in bracket style

[stefankaegi]

Yes, you are right. Thank you.

Am Dienstag, den 22.12.2009, 14:49 -0700 schrieb Neil Thornock:
> Try removing the tempoMark at the beginning of that measure and do it
> again.  Rehearsal marks do not cooperate with spanners in my
> experience.  (not tested, just a hunch)
> 
> Neil
> 
> On Mon, Dec 21, 2009 at 5:33 PM, Graham Percival
> <address@hidden> wrote:
> > Please send a tiny example.
> > http://lilypond.org/doc/v2.13/Documentation/web/tiny-examples
> >
> > Cheers,
> > - Graham
> >
> > On Tue, Dec 22, 2009 at 01:12:26AM +0100, stefankaegi wrote:
> >> Hi
> >>
> >> It seems I have a problem with pedal in bracket style. Please check out
> >> the files I send with this mail. Actually there should be pedal until
> >> the beginning of the 6. bar. But instead there's nothing like that. If I
> >> use the regular pedal style this problem doesn't appear. But bracket
> >> style is desired.
> >>
> >> Thank you,
> >> Stefan
> >
> >> \version "2.12.0"
> >>
> >>
> >> tempoMark =
> >>     #(define-music-function (parser location prependText notevalue 
> >> appendText) (string? string? string?)
> >>         #{
> >>             \mark \markup
> >>             { \line { \fontsize #-2 \italic $prependText " (" \fontsize 
> >> #-4 \general-align #Y #DOWN
> >> \note #$notevalue #1 \fontsize #-2 $appendText ) } }
> >>         #})
> >>
> >>
> >>
> >> RH = \relative c' {
> >>
> >> %20
> >>
> >> \time 5/4
> >>
> >> b1 ~ b4
> >>
> >>
> >>
> >> %21
> >>
> >> \once \override Score.RehearsalMark #'self-alignment-X = #-1
> >> \time 4/4 \tempoMark "sehr langsam" "8" "= 60"
> >>
> >>
> >> \once \override Staff.OttavaBracket #'padding = #4
> >> \ottava #1
> >>
> >> \times 2/3 { b'''8^\markup { \halign #-0.72 \italic "anzuschlagen wie 
> >> Regentropfen" } \( c,8
> >> \ottava #0 r8 }
> >>
> >> \once \override Staff.OttavaBracket #'padding = #2
> >>
> >> \ottava #1 es'4
> >>
> >> \change Staff = "LH"
> >>
> >> r4
> >>
> >> \change Staff = "RH"
> >>
> >> es,4 \) \ottava #0
> >>
> >>
> >> %22
> >>
> >> \time 5/4
> >>
> >> des,4 \(
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(3.2 . 0)
> >>
> >> \ottava #1 fis'4
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(5 . -1.5)
> >>
> >> \ottava #2 as'4
> >> \ottava #0 e,,2 ~
> >>
> >>
> >>
> >> %23
> >>
> >> e4 \)
> >>
> >> \once \override PhrasingSlur #'extra-offset = #'(0 . 2)
> >>
> >> r4 \( g2
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(5 . 0)
> >>
> >> \ottava #2 d''4 \ottava #0
> >>
> >>
> >>
> >> %24
> >>
> >> \time 6/4
> >>
> >> ces,,2 e,4
> >>
> >> \change Staff = "LH"
> >>
> >> r4
> >>
> >> \change Staff = "RH"
> >>
> >> es'4 \ottava #2
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(5 . -1.2)
> >> \once \override Script #'padding = #4
> >>
> >> d''4\fermata \)
> >> \ottava #0
> >>
> >> \bar "||"
> >>
> >>
> >>
> >> %25
> >>
> >> \once \override Score.RehearsalMark #'self-alignment-X = #-1
> >> \time 7/4 \tempoMark "schneller" "4" "= 80"
> >>
> >> r8 e,,16 (
> >> as16-. ) r8 f,16-. d16-. r4 fis'4 ( des'4 ) bes,,16->-. r8. r4
> >>
> >> }
> >>
> >>
> >> LH = \relative c, {
> >>
> >> \clef bass
> >>
> >> %20
> >>
> >> \time 5/4
> >>
> >> d16_\markup { \italic "rubato, acc." } ( ges16-. ) es16-. c16-.
> >> e4\tenuto_\markup { \italic "a tempo" } \(
> >> \acciaccatura ces'16^\markup { \italic "r.h." } as,4 g'4 \)
> >> des16-. f,16_\markup { \italic "poco rit." } ( bes16 a16 )
> >>
> >>
> >>
> >> %21
> >>
> >> \time 4/4
> >>
> >> \times 2/3 { r4 g'8 }
> >>
> >> \ottava #-1
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(3.2 . 0)
> >>
> >> d,4 \ottava #0
> >>
> >> \once \override Slur #'direction = #UP
> >>
> >> \acciaccatura ges'16
> >>
> >> \change Staff = "RH"
> >>
> >> a''''4
> >>
> >> \change Staff = "LH"
> >>
> >> bes,,,4
> >>
> >>
> >>
> >> %22
> >>
> >> \time 5/4
> >>
> >> r2 \times 2/3 { d,,8 e''8^\markup { \italic r.h. } as,,,8 }
> >>
> >> g'4 \clef treble
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(5 . 0)
> >>
> >> \ottava #2 des'''''4 \ottava #0
> >>
> >>
> >>
> >> %23
> >>
> >> \clef bass \ottava #-2
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(5 . 0)
> >>
> >> a,,,,,,4\ppp \ottava #0
> >>
> >> f''8 des''8^\markup { \italic "r.h." }
> >>
> >> r2
> >>
> >> as4
> >>
> >>
> >>
> >> %24
> >>
> >> \time 6/4
> >>
> >> \clef bass
> >>
> >> \ottava #-1
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(3.2 . 0)
> >>
> >> fis,,4 \ottava #0 des''4 r4
> >>
> >> \once \override Slur #'direction = #UP
> >>
> >> \acciaccatura g16
> >>
> >> \change Staff = "RH"
> >>
> >> c''4
> >>
> >> \change Staff = "LH"
> >>
> >> \once \override Staff.OttavaBracket #'dash-period = #-1
> >> \once \override Staff.OttavaBracket #'extra-offset = #'(3.2 . 0)
> >>
> >> \ottava #-1 c,,,,,4 \ottava #0 r4\fermata
> >>
> >> \bar "||"
> >>
> >>
> >>
> >> %25
> >>
> >> \time 7/4
> >>
> >> <ges''\harmonic d'\harmonic es\harmonic>1*7/4_\markup { \italic "stumm 
> >> niederdrücken" }
> >>
> >>
> >> }
> >>
> >>
> >>
> >>
> >>
> >> dynamics = {
> >>
> >> %20
> >> s4\p\< s4\!\mp s4\> s4\!\p s4
> >>
> >> %21
> >> s1
> >>
> >> %22
> >> s1 s4
> >>
> >> %23
> >> s4 s2.\p s4
> >>
> >> %24
> >> s1.
> >>
> >> %25
> >> s8 s8\mf s8 s8\mp s4 s2\mf s2\f
> >>
> >> }
> >>
> >> pedal = {
> >>
> >> \set PianoStaff.pedalSustainStyle = #'bracket
> >>
> >> %20
> >> s4 s8\sustainOn s8\sustainOff s4 s4 s8.
> >> \override Staff.SustainPedalLineSpanner #'staff-padding = #1
> >> s16\sustainOn
> >> |
> >> %21
> >> s1
> >>
> >> %22
> >> s1 s4
> >>
> >> %23
> >> s1 s4
> >>
> >> %24
> >> s1.
> >>
> >> %25
> >> \override Staff.SustainPedalLineSpanner #'staff-padding = #5
> >> s8 s8\sustainOff s4 s4 s4 s4 s4 s4\sustainOn
> >>
> >> }
> >>
> >>
> >>
> >> \score {
> >>
> >>  \new PianoStaff <<
> >>   \new Staff = "RH" << \RH >>
> >>   \new Dynamics = "dynamics" \dynamics
> >>   \new Staff = "LH" << \LH \pedal >>
> >> >>
> >>
> >> \layout {
> >>   % define Dynamics context
> >>   \context {
> >>     \type "Engraver_group"
> >>     \name Dynamics
> >>     \alias Voice
> >>     \consists "Output_property_engraver"
> >>     \consists "Piano_pedal_engraver"
> >>     \consists "Script_engraver"
> >>     \consists "New_dynamic_engraver"
> >>     \consists "Dynamic_align_engraver"
> >>     \consists "Text_engraver"
> >>     \consists "Skip_event_swallow_translator"
> >>     \consists "Axis_group_engraver"
> >>
> >>     pedalSustainStrings = #'("Ped." "*Ped." "*")
> >>     pedalUnaCordaStrings = #'("una corda" "" "tre corde")
> >>
> >>     \override DynamicLineSpanner #'Y-offset = #0
> >>     \override TextScript #'font-size = #2
> >>     \override TextScript #'font-shape = #'italic
> >>     \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
> >>     \consists "Text_spanner_engraver"
> >>
> >>
> >> }
> >>
> >>     \context {
> >>      \PianoStaff
> >>      \accepts Dynamics
> >>
> >>      \override TupletBracket #'bracket-visibility = ##f
> >>
> >>
> >>     }
> >>   }
> >> }
> >>
> >> \score {
> >>  \new PianoStaff <<
> >>   \new Staff = "RH" << \RH \dynamics >>
> >>   \new Staff = "LH" << \LH \dynamics >>
> >>   \new Dynamics = "pedal" \pedal
> >> >>
> >>
> >> \midi {
> >>  \context {
> >>   \type "Performer_group"
> >>    \name Dynamics
> >>    \consists "Piano_pedal_performer"
> >>    }
> >>
> >>  }
> >>
> >>
> >> }
> >>
> >> \paper {
> >>
> >> paper-height = 28\cm
> >> ragged-last = ##t
> >>
> >> }
> >>
> >
> >
> >> _______________________________________________
> >> lilypond-user mailing list
> >> address@hidden
> >> http://lists.gnu.org/mailman/listinfo/lilypond-user
> >
> >
> >
> > _______________________________________________
> > lilypond-user mailing list
> > address@hidden
> > http://lists.gnu.org/mailman/listinfo/lilypond-user
> >
> 
> 
>