On Sat, Nov 3, 2012 at 6:11 PM, Olivier Biot <olivier.b...@gmail.com> wrote:
> Hi David,
>
> Thanks a lot - I now start to see the mistakes I made (excess
> parentheses around the cond expression and excess parentheses around
> the return values in the cond sub expressions).
>
> I have however to use quotes around the note name for it to work.
>
> Here's code that actually works, maybe it can be useful for others:
>
[...]
I now got the method to use 2 parameters and produce the key signature in text:
%%% START of snippet 1
tonicEN = #(define-scheme-function (parser layout tonic arg) (string? string?)
(string-append
(cond
( (string=? tonic "a") "A" )
( (string=? tonic "b") "B" )
( (string=? tonic "c") "C" )
( (string=? tonic "d") "D" )
( (string=? tonic "e") "E" )
( (string=? tonic "f") "F" )
( (string=? tonic "g") "G" )
( (string=? tonic "aes") "A flat" )
( (string=? tonic "bes") "B flat" )
( (string=? tonic "ces") "C flat" )
( (string=? tonic "des") "D flat" )
( (string=? tonic "ees") "E flat" )
( (string=? tonic "fes") "F flat" )
( (string=? tonic "ges") "G flat" )
( (string=? tonic "ais") "A sharp" )
( (string=? tonic "bis") "B sharp" )
( (string=? tonic "cis") "C sharp" )
( (string=? tonic "dis") "D sharp" )
( (string=? tonic "eis") "E sharp" )
( (string=? tonic "fis") "F sharp" )
( (string=? tonic "gis") "G sharp" )
)
(cond
( (string=? arg "major") " major" )
( (string=? arg "minor") " minor" )
)
)
)
%%% END of snippet 1
I have a similar tonicDE and tonicFR function now. I can call only one
of those and assign the value to a header parameter (e.g., title).
What I now need to figure out, is how to print the output in a markup,
like in the currently not working snippets below:
%%% START of snippet 2
\header {
title = \markup {\italic \tonicEN "cis" "minor"}
}
%%% END of snippet 2
%%% START of snippet 3
\markup {
\fill-line {
\center-column {
\concat {
\italic \tonicEN "cis" "minor"
\upright \tonicDE "cis" "minor"
}
}
}
}
%%% END of snippet 3
Best regards,
Olivier
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
