Re: Vertical spacing of numeric time signature

2019-05-09 Thread mskala
On Thu, 9 May 2019, Malte Meyn wrote:
> Am 09.05.19 um 16:53 schrieb msk...@ansuz.sooke.bc.ca:
> > Is there any simple way to modify the vertical spacing between numerator
> > and denominator in a numeric time signature?
> >
>
> Not really simple. But it can be done by redefining the stencil:

Thanks!

-- 
Matthew Skala
msk...@ansuz.sooke.bc.ca People before tribes.
https://ansuz.sooke.bc.ca/

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


Re: Vertical spacing of numeric time signature

2019-05-09 Thread Malte Meyn



Am 09.05.19 um 16:53 schrieb msk...@ansuz.sooke.bc.ca:

Is there any simple way to modify the vertical spacing between numerator
and denominator in a numeric time signature?



Not really simple. But it can be done by redefining the stencil:

\version "2.21.0"

#(define (fraction-with-gap gap)
   (lambda (grob)
 (let* ((frac (ly:grob-property grob 'fraction))
(num (car frac))
(den (cdr frac))
(fontsize (magnification->font-size (/ (- 4 gap) 4)))
(baseline-skip (+ 2 (/ gap 2)))
(m (markup
#:vcenter
#:fontsize fontsize
#:override `(baseline-skip . ,baseline-skip)
 #:center-column (#:number (number->string num)
   #:number (number->string den)
   (grob-interpret-markup grob m

{
  % The number 0.5 can be changed. It’s the size of the gap in 
staff-spaces.

  \override Staff.TimeSignature.stencil = #(fraction-with-gap 0.5)
  \time 3/4
  s2.
  \time 5/4
  s4*5
}

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