See, that's just amazing. personally, I think \markup \concat {4\char
##x2032 " 33"\char##x2033 } is a little shorter, but it's kind of
awesome that that can be done with all that stuff that apparently
means something.
Am 24.01.2009 um 21:49 schrieb Mark Polesky:
Don't forget you can store all the formatting as a music-function:
timestamp =
#(define-music-function (parser location minutes seconds) (number?
number?)
(let ((min (number->string minutes)) (sec (number->string
seconds)))
#{ \mark \markup \rounded-box \small \concat { $min ′ $sec
″ } #}))
{ c'1 \timestamp #4 #33 c' }
And solely out of paranoia, here's a version that doesn't rely on
the special utf-8 characters -- in case my prime and double-prime
characters above get corrupted on the way to your mailbox/browser:
timestamp =
#(define-music-function (parser location minutes seconds) (number?
number?)
(let ((min (number->string minutes)) (sec (number->string
seconds)))
#{ \mark \markup \rounded-box \small \concat
{ $min \char ##x2032 $sec \char ##x2033 } #}))
{ c'1 \timestamp #4 #33 c' }
- Mark
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
