Hi Philip,
I tried to write a function along the following lines, but it didn't work:
>
> SATBVert = #(define-music-function
> (parser location sysvert StoA AtoT TtoB)
> (number? number? number? number?)
> #{
> \overrideProperty #"Score.NonMusicalPaperColumn"
> #'line-break-system-details
> #'( (Y-offset . $sysvert)
> (alignment-distances . ($StoA $AtoT $TtoB)))
> #})
>
[...]
> If someone could point me in the right direction -- a relevant example
> would
> be great -- I would be very grateful.
>
To insert your arguments into the alist you're overriding, you can do
something like this:
\version "2.15.39"
SATBVert = #(define-music-function
(parser location sysvert StoA AtoT TtoB)
(number? number? number? number?)
#{
\overrideProperty #"Score.NonMusicalPaperColumn"
#'line-break-system-details
#`((Y-offset . ,sysvert)
(alignment-distances . (,StoA ,AtoT ,TtoB)))
#})
(Note the backquote. For more on this syntax, see
http://www.gnu.org/software/guile/manual/html_node/Expression-Syntax.html#Expression-Syntax
)
HTH,
David
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
