lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Neil Thornock
Subject: Re: sustainOff apparantly does not seem to work in bracket style
Date: Tue, 22 Dec 2009 14:49:34 -0700

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
>



-- 
Neil Thornock, D.M.
Check out the newly designed website!
http://neilthornock.net
Assistant Professor of Music
Composition/Theory
Brigham Young University




reply via email to

[Prev in Thread] Current Thread [Next in Thread]