Re: Time signature and beat markers

[Mark Knoop]

At 21:16 on 06 Nov 2018, Andrew Bernard wrote:
>Answering my own question, this simple approach works:
>
>  \time 5/4
>  \set Timing.measureLength = #(ly:make-moment 1/4)
>
>I'm happy to make the thincker barlines manually, unless anybody has
>some clever special engraver ideas.

Try something like this:

\version "2.19.21"

barSigs = #(define-music-function
  (numbars timesig)
  (number? fraction?)
  (_i "make empty bars")
  (let* ((tsnumerator (car timesig))
         (tsdenominator (cdr timesig))
         (dotbeats (- tsnumerator 1)))
    #{
    \time #timesig
    \repeat unfold #numbars {
      \repeat unfold #dotbeats { s4 \bar "|" }
      s4 \bar "."
    }
    #}))

{
  <<
    { % this is your global variable
      \barSigs 3 5/4 % 3 bars of 5/4
      \barSigs 1 3/4 % 1 bar of 3/4
    }
    { % this is your music
      \repeat unfold 18 c'4
    }
  >>
}

-- 
Mark Knoop