Re: How can I adjust length-fraction of tremolo on beamed stem?

[takumi ikeda]

Thank you for your reply.
But I'd like to adjust "length-fraction", the intervals between
tremolo-beams. not Y-offset.

Takumi

2018-04-25 17:41 GMT+09:00 Thomas Morley :
> 2018-04-25 8:05 GMT+02:00 takumi ikeda :
>> \version "2.19.61"
>>
>> {
>>   \override Stem.length = #10
>>   \override StemTremolo.beam-thickness = #0.3
>>   \override StemTremolo.slope = #0.2
>>   \override StemTremolo.beam-width = #1.5
>>   \override StemTremolo.extra-offset = #'(0 . 1)
>>   \override StemTremolo.length-fraction = #0.7 %% not works on the beams.
>>   %\override Beam.length-fraction = #0.7 %% would like to adjust
>> only tremolo, not beams.
>>   c''4:64 c''8.:64 c''16:64
>> }
>>
>> % Thanks,
>> % Takumi
>
>
>
> Does below help already?
>
> \version "2.19.81"
>
> tst =
> #(define-music-function (y)(number?)
> #{
>   \override StemTremolo.after-line-breaking =
>   #(lambda (grob)
> (let* ((y-off (ly:grob-property grob 'Y-offset))
>(dir (ly:grob-property grob 'direction)))
>   (ly:grob-set-property! grob 'Y-offset (+ y-off (* y dir)
> #})
>
> {
>   \override Stem.length = #10
>   \tst -0.5
>   c''4:64 c''8.:64 c''32:128 c''32:128
> }
>
>
> Cheers,
>   Harm

___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Re: How can I adjust length-fraction of tremolo on beamed stem?

[Thomas Morley]

2018-04-25 8:05 GMT+02:00 takumi ikeda :
> \version "2.19.61"
>
> {
>   \override Stem.length = #10
>   \override StemTremolo.beam-thickness = #0.3
>   \override StemTremolo.slope = #0.2
>   \override StemTremolo.beam-width = #1.5
>   \override StemTremolo.extra-offset = #'(0 . 1)
>   \override StemTremolo.length-fraction = #0.7 %% not works on the beams.
>   %\override Beam.length-fraction = #0.7 %% would like to adjust
> only tremolo, not beams.
>   c''4:64 c''8.:64 c''16:64
> }
>
> % Thanks,
> % Takumi



Does below help already?

\version "2.19.81"

tst =
#(define-music-function (y)(number?)
#{
  \override StemTremolo.after-line-breaking =
  #(lambda (grob)
(let* ((y-off (ly:grob-property grob 'Y-offset))
   (dir (ly:grob-property grob 'direction)))
  (ly:grob-set-property! grob 'Y-offset (+ y-off (* y dir)
#})

{
  \override Stem.length = #10
  \tst -0.5
  c''4:64 c''8.:64 c''32:128 c''32:128
}


Cheers,
  Harm

___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user