Op dinsdag 16-12-2008 om 13:07 uur [tijdzone +0100], schreef Hans Aberg:
> On 16 Dec 2008, at 05:58, Mark Polesky wrote:

> You might call for using Unicode:
>   r16 g♯( a g♯ f♯♯ g♯ c♯ e d♯ c♯ d♯ c♯ b♯ c♯ e  
> g♯)
> 
> You need a font, though, and perhaps a special key map, too.

Now that's a fun idea.  It even works!

Jan.

-- 
Jan Nieuwenhuizen <[email protected]> | GNU LilyPond - The music typesetter
http://www.xs4all.nl/~jantien       | http://www.lilypond.org
>From 754e0a023043e6fc9a25a17fcc1da83b78528ab4 Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <[email protected]>
Date: Tue, 16 Dec 2008 14:42:04 +0100
Subject: [PATCH] Add UTF8 sharp and flat to nederlands.ly.

---
 input/regression/ulily.ly |   12 ++++++++++++
 lily/lexer.ll             |    2 +-
 ly/nederlands.ly          |   11 +++++++++++
 3 files changed, 24 insertions(+), 1 deletions(-)
 create mode 100644 input/regression/ulily.ly

diff --git a/input/regression/ulily.ly b/input/regression/ulily.ly
new file mode 100644
index 0000000..f58de1e
--- /dev/null
+++ b/input/regression/ulily.ly
@@ -0,0 +1,12 @@
+\header {
+texidoc = "
+Unicode symbols for sharp and flat can be used in note names.
+[WIP: for C only, only in nederlands.ly]
+"
+}
+
+\version "2.11.51"
+
+{
+c♭♭ c♭ c c♯ c♯♯
+}
diff --git a/lily/lexer.ll b/lily/lexer.ll
index 8dd7667..79bbb46 100644
--- a/lily/lexer.ll
+++ b/lily/lexer.ll
@@ -113,7 +113,7 @@ SCM (* scm_parse_error_handler) (void *);
 %x sourcefilename
 %x version
 
-A		[a-zA-Z\200-\377]
+A		[a-zA-Z\200-\377]|(\150\564|\150\565)
 AA		{A}|_
 N		[0-9]
 AN		{AA}|{N}
diff --git a/ly/nederlands.ly b/ly/nederlands.ly
index eed0653..3e1d432 100644
--- a/ly/nederlands.ly
+++ b/ly/nederlands.ly
@@ -7,6 +7,17 @@ notenames should only contain letters. No digits or punctuation.
 %}
 
 dutchPitchnames = #`(
+	(c♭♭ . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
+;;	(ceh . ,(ly:make-pitch -1 0 SEMI-FLAT))
+	(c . ,(ly:make-pitch -1 0 FLAT))
+;;	(ceseh . ,(ly:make-pitch -1 0 THREE-Q-FLAT))
+	(c♭ . ,(ly:make-pitch -1 0 NATURAL))
+	(c♯ . ,(ly:make-pitch -1 0 SHARP))
+;;	(cih . ,(ly:make-pitch -1 0 SEMI-SHARP))
+;;	(cisih . ,(ly:make-pitch -1 0 THREE-Q-SHARP))
+	(c♯♯ . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
+	(d♭♭ . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
+
 	(ceses . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
 
 	(ceh . ,(ly:make-pitch -1 0 SEMI-FLAT))
-- 
1.6.0.rc1.49.g98a8

_______________________________________________
lilypond-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to