Mon, 02 Feb 2004 13:51:21 +0200 (EET), Heikki a dit :
> On Mon, 02 Feb 2004 11:39:54 +0100 Han-Wen Nienhuys
> <[EMAIL PROTECTED]> wrote:
>> I am a little worried by the namespace pollution. I think it is better
>> to define markup-commands like flat-markup, threeq-markup, so that
>> \flat \natural etc. only work in \markup { }
> I completely agree. This would resolve the strange naming of accidentals.
> Actually, I was thinking that there should be names which work only in some
> context .. but that feature is already there, it's great!
I second that.
------------------------------------
#(def-markup-command (doublesharp paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals-4")))
#(def-markup-command (threeqsharp paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals-3")))
#(def-markup-command (sharp paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals-2")))
#(def-markup-command (semisharp paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals-1")))
#(def-markup-command (natural paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals-0")))
#(def-markup-command (semiflat paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals--1")))
#(def-markup-command (flat paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals--2")))
#(def-markup-command (threeqflat paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals--3")))
#(def-markup-command (doubleflat paper props) ()
(interpret-markup paper props (markup #:musicglyph "accidentals--4")))
\score {
\notes {
c''-\markup { \doublesharp
\threeqsharp
\sharp
\semisharp
\natural
\semiflat
\flat
\threeqflat
\doubleflat }
}
\paper { raggedright = ##t }
}
------------------------------------
nicolas
_______________________________________________
Lilypond-devel mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/lilypond-devel
