----- Original Message -----
From: "David Kastrup" <d...@gnu.org>
To: "Phil Holmes" <m...@philholmes.net>
Cc: <lilypond-user@gnu.org>
Sent: Monday, May 30, 2016 3:18 PM
Subject: Re: Further scheme help, please
Phil Holmes <m...@philholmes.net> writes:
Assuming 2.19.not-too-old:
LyRep =
#(define-music-function (n) (number?)
#{ all of the above up to the underlines
$@(make-list n #{ \lyricmode { _ } #})
\unset lyricMelismaAlignment
#})
For 2.18, you'll need the typical parser location rap before n.
--
David Kastrup
Thanks David. This is what I have:
LyRep =
#(define-music-function (n) (number?)
#{
\once \override Lyrics.LyricText.Y-extent = #'(-10 . 10) % stops
collisions with stems
\set Lyrics.lyricMelismaAlignment = #CENTER % keeps the symbol centred
\markup { \raise #1 % shifts it up
{ \draw-circle #0.1 #0.1 ##t % draw the first circle
\raise #1 { \draw-line #'( 0 . -2 ) } % draw first line
\raise #1 { \draw-line #'( 0 . -2 ) } % draw second line
\draw-circle #0.1 #0.1 ##t } % draw final circle
}
$@(make-list n #{ \lyricmode { _ } #})
\unset lyricMelismaAlignment
#})
When I run it, I get the output I want, but with the following error in the
log file:
Definitions.ly:111:5: error: markup outside of text script or \lyricmode
\markup { \raise #1 % shifts it up
LyricTest.ly:27:21: error: error in #{ ... #}
\LyRep #4
Any idea why?
--
Phil Holmes
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
