Expand solfège notation

CONTRIBUTORS

@@ -29,6 +29,7 @@ Matthew Sheets (mesheets@users.sourceforge.net)
   Modified conio to remove the CONF_ASCII dependency from CONF_PROGRAM
   Updated Makefiles to support building programs written in Esterel
   Enable configurable package/kernel naming
+  Expand musical scale note defines
   Added tempo calculation support for sound/music
   Refactor "makelx" to "writelx"
   Various code cleanups...
@@ -38,7 +39,7 @@ Carl Troein (troein@users.sourceforge.net)
   GCC now calls floatunsisf for ulong-to-float conversion.
 
 Mark Riley (http://home.surewest.net/markril/lego/dcc/)
-  LDCC - Digital Command Control implementation
+  LDCC - Digital Command Control (DCC) implementation
 
 Taiichi Yuasa (http://www.xslisp.com/)
   XS: Lisp on Lego MindStorms

include/dmusic.h

@@ -251,6 +251,7 @@ extern "C" {
 #define PITCH_Gb8    94
 #define PITCH_G8     95
 #define PITCH_Gm8    96
+#define PITCH_Ab8    96
 #define PITCH_A8     97
 
 //@}

xs/lisp/front.c

@@ -1243,100 +1243,156 @@ void initReader() {
 
 	defReaderConstant("La0" ,  0);
 	defReaderConstant("La#0",  1);
+	defReaderConstant("Tib0" , 1);
+	defReaderConstant("Sib0" , 1);
+	defReaderConstant("Ti0" ,  2);
 	defReaderConstant("Si0" ,  2);
 	defReaderConstant("Do1" ,  3);
 	defReaderConstant("Do#1",  4);
+	defReaderConstant("Reb1",  4);
 	defReaderConstant("Re1" ,  5);
 	defReaderConstant("Re#1",  6);
+	defReaderConstant("Mib1",  6);
 	defReaderConstant("Mi1" ,  7);
 	defReaderConstant("Fa1" ,  8);
 	defReaderConstant("Fa#1",  9);
+	defReaderConstant("Sob1",  9);
 	defReaderConstant("So1" , 10);
 	defReaderConstant("So#1", 11);
+	defReaderConstant("Lab1", 11);
 	defReaderConstant("La1" , 12);
 	defReaderConstant("La#1", 13);
+	defReaderConstant("Tib1", 13);
+	defReaderConstant("Sib1", 13);
+	defReaderConstant("Ti1" , 14);
 	defReaderConstant("Si1" , 14);
 	defReaderConstant("Do2" , 15);
 	defReaderConstant("Do#2", 16);
+	defReaderConstant("Reb2", 16);
 	defReaderConstant("Re2" , 17);
 	defReaderConstant("Re#2", 18);
+	defReaderConstant("Mib2", 18);
 	defReaderConstant("Mi2" , 19);
 	defReaderConstant("Fa2" , 20);
 	defReaderConstant("Fa#2", 21);
+	defReaderConstant("Sob2", 21);
 	defReaderConstant("So2" , 22);
 	defReaderConstant("So#2", 23);
+	defReaderConstant("Lab2", 23);
 	defReaderConstant("La2" , 24);
 	defReaderConstant("La#2", 25);
+	defReaderConstant("Tib2", 25);
+	defReaderConstant("Sib2", 25);
+	defReaderConstant("Ti2" , 26);
 	defReaderConstant("Si2" , 26);
 	defReaderConstant("Do3" , 27);
 	defReaderConstant("Do#3", 28);
+	defReaderConstant("Reb3", 28);
 	defReaderConstant("Re3" , 29);
 	defReaderConstant("Re#3", 30);
+	defReaderConstant("Mib3", 30);
 	defReaderConstant("Mi3" , 31);
 	defReaderConstant("Fa3" , 32);
 	defReaderConstant("Fa#3", 33);
+	defReaderConstant("Sob3", 33);
 	defReaderConstant("So3" , 34);
 	defReaderConstant("So#3", 35);
+	defReaderConstant("Lab3", 35);
 	defReaderConstant("La3" , 36);
 	defReaderConstant("La#3", 37);
+	defReaderConstant("Tib3", 37);
+	defReaderConstant("Sib3", 37);
+	defReaderConstant("Ti3" , 38);
 	defReaderConstant("Si3" , 38);
 	defReaderConstant("Do4" , 39);
 	defReaderConstant("Do#4", 40);
+	defReaderConstant("Reb4", 40);
 	defReaderConstant("Re4" , 41);
 	defReaderConstant("Re#4", 42);
+	defReaderConstant("Mib4", 42);
 	defReaderConstant("Mi4" , 43);
 	defReaderConstant("Fa4" , 44);
 	defReaderConstant("Fa#4", 45);
+	defReaderConstant("Sob4", 45);
 	defReaderConstant("So4" , 46);
 	defReaderConstant("So#4", 47);
+	defReaderConstant("Lab4", 47);
 	defReaderConstant("La4" , 48);
 	defReaderConstant("La#4", 49);
+	defReaderConstant("Tib4", 49);
+	defReaderConstant("Sib4", 49);
+	defReaderConstant("Ti4" , 50);
 	defReaderConstant("Si4" , 50);
 	defReaderConstant("Do5" , 51);
 	defReaderConstant("Do#5", 52);
+	defReaderConstant("Reb5", 52);
 	defReaderConstant("Re5" , 53);
 	defReaderConstant("Re#5", 54);
+	defReaderConstant("Mib5", 54);
 	defReaderConstant("Mi5" , 55);
 	defReaderConstant("Fa5" , 56);
 	defReaderConstant("Fa#5", 57);
+	defReaderConstant("Sob5", 57);
 	defReaderConstant("So5" , 58);
 	defReaderConstant("So#5", 59);
+	defReaderConstant("Lab5", 59);
 	defReaderConstant("La5" , 60);
 	defReaderConstant("La#5", 61);
+	defReaderConstant("Tib5", 61);
+	defReaderConstant("Sib5", 61);
+	defReaderConstant("Ti5" , 62);
 	defReaderConstant("Si5" , 62);
 	defReaderConstant("Do6" , 63);
 	defReaderConstant("Do#6", 64);
+	defReaderConstant("Reb6", 64);
 	defReaderConstant("Re6" , 65);
 	defReaderConstant("Re#6", 66);
+	defReaderConstant("Mib6", 66);
 	defReaderConstant("Mi6" , 67);
 	defReaderConstant("Fa6" , 68);
 	defReaderConstant("Fa#6", 69);
+	defReaderConstant("Sob6", 69);
 	defReaderConstant("So6" , 70);
 	defReaderConstant("So#6", 71);
+	defReaderConstant("Lab6", 71);
 	defReaderConstant("La6" , 72);
 	defReaderConstant("La#6", 73);
+	defReaderConstant("Tib6", 73);
+	defReaderConstant("Sib6", 73);
+	defReaderConstant("Ti6" , 74);
 	defReaderConstant("Si6" , 74);
 	defReaderConstant("Do7" , 75);
 	defReaderConstant("Do#7", 76);
+	defReaderConstant("Reb7", 76);
 	defReaderConstant("Re7" , 77);
 	defReaderConstant("Re#7", 78);
+	defReaderConstant("Mib7", 78);
 	defReaderConstant("Mi7" , 79);
 	defReaderConstant("Fa7" , 80);
 	defReaderConstant("Fa#7", 81);
+	defReaderConstant("Sob7", 81);
 	defReaderConstant("So7" , 82);
 	defReaderConstant("So#7", 83);
+	defReaderConstant("Lab7", 83);
 	defReaderConstant("La7" , 84);
 	defReaderConstant("La#7", 85);
+	defReaderConstant("Tib7", 85);
+	defReaderConstant("Sib7", 85);
+	defReaderConstant("Ti7" , 86);
 	defReaderConstant("Si7" , 86);
 	defReaderConstant("Do8" , 87);
 	defReaderConstant("Do#8", 88);
+	defReaderConstant("Reb8", 88);
 	defReaderConstant("Re8" , 89);
 	defReaderConstant("Re#8", 90);
+	defReaderConstant("Mib8", 90);
 	defReaderConstant("Mi8" , 91);
 	defReaderConstant("Fa8" , 92);
 	defReaderConstant("Fa#8", 93);
+	defReaderConstant("Sob8", 93);
 	defReaderConstant("So8" , 94);
 	defReaderConstant("So#8", 95);
+	defReaderConstant("Lab8", 95);
 	defReaderConstant("La8" , 96);
 
 }