Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- \version "2.24.3"
- \language "deutsch"
- tieColumnShapes =
- #(define-music-function
- (offsets-list)
- (list?)
- #{
- \once \override TieColumn.ties =
- #(lambda (grob)
- (for-each (lambda (tie clr offsets)
- (ly:grob-set-property! tie 'control-points offsets)
- (ly:grob-set-property! tie 'color clr)
- )
- (ly:grob-array->list (ly:grob-object grob 'ties))
- (circular-list red green)
- offsets-list
- )
- )
- #}
- )
- \header {
- % Usuń domyślną stopkę LilyPonda
- tagline = ##f
- }
- \paper {
- #(set-paper-size "a4")
- }
- \layout {
- }
- \score {
- \relative c {
- \clef bass
- \key c \major
- \time 4/4
- r16
- \tieColumnShapes #'(
- ((0 . 0) (0 . 1) (0 . 0) (0 . 0))
- ((0 . 0) (0 . 0) (5 . 0) (0 . 0))
- ((0 . 0) (0 . 0) (0 . 0) (0 . 0))
- )
- <es ~ ges ~ f' ~>8.
- <es ges f'>4
- ~ ~ ~
- <es ges f'>2
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement