Am 04.02.2014 16:07, schrieb Kevin Patrick Barry:
Can you please post what you have achieved so far? It's hard to guess
without seeing your code.
Marc
Sorry for the slow reply. A small example of what I am trying follows:
#(define-markup-command (sus layout props args) (markup-list?)
(interpret-markup layout props
#{
\markup \concat {
\fontsize #-2 \number #(car args)
\raise #0.7 \draw-line #(cons (cddr args) 0)
\fontsize #-2 \number #(cadr args)
}
#}
))
I just grepped through the code and found out that number-or-markup?
is already defined. SO you can use it like this:
#(define-markup-command (sus layout props num-or-markup)
(number-or-markup?)
(interpret-markup layout props
(if (number? num-or-markup)
-- stuff for numbers --
-- stuff for markup --
)))
HTH,
Marc
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user