Triolenklammern (Länge) die Zweite

[chf]

Liebe Freunde,

schon sah ich mich am Ziel, aber im Zusammenhang wollte doch noch nicht alles passen...
Findet ihr den Schritt zur Feinabstimmung?

Gruß
chf

[eluze]

Liebe Freunde,

schon sah ich mich am Ziel, aber im Zusammenhang wollte doch noch nicht alles passen...
Findet ihr den Schritt zur Feinabstimmung?

Gruß
chf

natürlich - wo siehst du ein problem?

Eluze

[chf]

...darin, dass die Abschlüsse der Klammern nich übereinanderliegen!

[eluze]

...darin, dass die Abschlüsse der Klammern nich übereinanderliegen!

mit all diesen tweaks? und den eingeschobenen schlüsseln?

vielleicht  ist es hier nötig mit

Code: [Auswählen]

\override SpacingSpanner #'uniform-stretching = ##t
\override SpacingSpanner #'strict-note-spacing = ##tund weiteren override's/set's nachzuhelfen?

die tuplet klammerabschlüsse scheinen sich übrigens an den notenhälsen zu orientieren, somit ist es von bedeutung, ob eine note nach oben oder unten gerichtet ist oder ob eine pause da steht!
Eluze

[chf]

...und mit weiteren override's/set's nachzuhelfen?

Hallo Freunde

Welche weiteren overrides könnten das sein?
unter Einbeziehung aller Tipps konnte ich weitgehende Angleichung erreichen.
Zur Perfektion fehlt noch bissl was.
Wenn euch noch was einfällt... Sowas wie "extendBracket" in kleinsten Schritten...



Lieben Dank bis hierher
chf

[eluze]

Welche weiteren overrides könnten das sein?
unter Einbeziehung aller Tipps konnte ich weitgehende Angleichung erreichen.

nun ja, im manual wird in spacing-zusammenhängen auch

Code: [Auswählen]

proportionalNotationDuration = #(ly:make-moment 1/20) erwähnt, vielleicht kann das was bringen?!

sonst: kannst du den aktuellen code posten, damit wir dort weitermachen können, wo wir schon sind?

Eluze

[harm6]

Hi,

wie wärs so:

Code: [Auswählen]

\version "2.16.2"

#(define* ((new-stil #:optional (potrusion-factor 0.7)) grob)
;; Adds vertical lines to the left and the right of a TupletBracket.
;; The optional argument 'potrusion'-factor determines how much the lines stick
;; out, above and below the TupletBracket
  (let* ((staff-space (ly:staff-symbol-staff-space grob))
         (stil (ly:tuplet-bracket::print grob))
         (pos (ly:tuplet-bracket::calc-positions grob))
         (thickness (/ (or (ly:grob-property grob 'thickness) 1.6) 10))
         (line-add (make-line-stencil
          thickness
          0
          (- (car pos) (* potrusion-factor staff-space))
          0
          (+ (car pos) (* potrusion-factor staff-space))))
         (new-stil (ly:stencil-combine-at-edge
                     (ly:stencil-combine-at-edge
                       stil
                       X
                       LEFT
                       line-add
                       (/ thickness -2))
                     X
                     RIGHT
                     line-add
                     (/ thickness -2))))
                     
      new-stil))
         
bothFlaredFlatTB = {
  \override TupletBracket #'stencil = #(new-stil)
  \override TupletBracket #'edge-height = #'(0 . 0)
}

revertBothFlaredFlatTB = {
  \revert TupletBracket #'stencil
  \revert TupletBracket #'edge-height
}

hideTuplet = {
  \override TupletBracket #'stencil = ##f
  \override TupletNumber #'stencil = ##f
}

revertHideTuplet = {
  \revert TupletBracket #'stencil
  \revert TupletNumber #'stencil
}
   
one = \relative c'' {
  \time 5/4
  r4
 
  %% Move tuplet down, give it some padding:
  \tupletDown
  \override TupletBracket #'staff-padding = 4
 
  %% Ad Libitum: Lengthen the TupletBracket,
  %% move it in X-direction.
  %% Also, move TupletNumber:
  \override TupletBracket #'shorten-pair = #'(-1 . -1)
  \override TupletBracket #'X-offset = #0.5
  \override TupletNumber #'extra-offset = #'(0.5 . 0)
 
  \set tupletSpannerDuration = #(ly:make-moment 1 2)
  \times 2/3 {
    \bothFlaredFlatTB
    <ces' bes'>4
    \once \hideNotes r
    <ees, des'>
    \once \hideNotes r
    %% Ad libitum: tweaking a NoteColumn:
    \once \override NoteColumn #'X-offset = #2
    <aes, ges'>
    \once \hideNotes r
  }
 
  %% revert tuplet-settings:
  \revert TupletBracket #'staff-padding
  \revert TupletBracket #'shorten-pair
  \revert TupletBracket #'X-offset
  \revert TupletNumber #'extra-offset
  \revertBothFlaredFlatTB
  \tupletNeutral
 
  \time 7/4
}
 
two = \relative c' {
  \clef bass
  s4
 
  %% move Tuplet down to avoid some spacing issues, hide it
  \tupletDown
  \hideTuplet
 
  \set tupletSpannerDuration = #(ly:make-moment 1 2)
  \times 2/3 {
    \once \hideNotes r
    \clef treble
    \once \stemUp
    %% Ad libitum: tweaking a NoteColumn:
    \once \override NoteColumn #'X-offset = #-1.5
    <aes' ges'>
    \once \hideNotes r
    <ces, des'>
    \once \hideNotes r
    \clef bass
    %% Ad libitum: tweaking a NoteColumn:
    \once \override NoteColumn #'X-extent = #'(0 . 5.5)
    <ees, des'>
  }
 
  %% revert tuplet-settings:
  \revertHideTuplet
  \tupletNeutral
}

\new PianoStaff \with {
    \override StaffGrouper #'staff-staff-spacing #'basic-distance = #15
  }
<<
  \new Staff \one
  \new Staff \two
>>

Kommentare im Code.

HTH,
  Harm

[chf]

Hallo Harm,

so ist's sehr recht!
Tausend Dank!

Gute Nacht
Christa