Re: segmented glissando lines

[Orm Finnendahl]

Hi Pierre, Urs,

 that's excellent and very instructional, thanks!

--
Orm


Am Samstag, den 10. Januar 2015 um 23:56:03 Uhr (+0100) schrieb Pierre 
Perol-Schneider:
> Hi Orm,
> 
> How about :
> 
> \version "2.19.15"
> 
> #(define (add-gliss m)
>    (case (ly:music-property m 'name)
>      ((NoteEvent) (set! (ly:music-property m 'articulations)
>                       (append (ly:music-property m 'articulations)
>                          (list (make-music (quote GlissandoEvent)))))
>                    m)
>      (else #f)))
> 
> addGliss = #(define-music-function (parser location music)
>                  (ly:music?)
>            (map-some-music add-gliss music))
> 
> \relative c'' {
>   \override Glissando.thickness = #2
>   \override Glissando.bound-details =#'(
>      (right (attach-dir . 1) (padding . 0))
>      (left  (attach-dir . 1) (padding . 0)))
>   \override NoteHead.no-ledgers = ##t
>   \addGliss {
>     d,2
>     \omit Stem
>     \override NoteHead.transparent = ##t
>     f' d, f' e, g' d, f'
>   }
> }
> 
> 
> Cheers,
> Pierre

> _______________________________________________
> lilypond-user mailing list
> address@hidden
> https://lists.gnu.org/mailman/listinfo/lilypond-user