]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-1.5.9
authorfred <fred>
Wed, 27 Mar 2002 02:02:41 +0000 (02:02 +0000)
committerfred <fred>
Wed, 27 Mar 2002 02:02:41 +0000 (02:02 +0000)
ly/catalan.ly [new file with mode: 0644]
ly/english.ly [new file with mode: 0644]
ly/italiano.ly [new file with mode: 0644]
ly/nederlands.ly [new file with mode: 0644]
ly/norsk.ly [new file with mode: 0644]
ly/svenska.ly [new file with mode: 0644]

diff --git a/ly/catalan.ly b/ly/catalan.ly
new file mode 100644 (file)
index 0000000..74d4285
--- /dev/null
@@ -0,0 +1,74 @@
+%{
+
+ Common catalan names for notes. "b" means flat (bemoll), "d" means sharp (diesi).
+ Also "s" is included for sharp (sostingut).  Both "diesi" and "sostingut" are approved
+ by "Diccionari de la Llengua Catalana" from "Institut d'Estudis Catalans".
+
+ Adapted from italiano.ly.
+
+ English: a   b   c   d   e   f   g
+ Catalan: la  si  do  re  mi  fa  sol
+
+ For spanish naming just use the sharp sign "s" (sostenido) instead of "s"
+(sostenido) .
+%}
+
+% contributed by Jaume Obrador <jobrador@ipc4.uib.es>
+
+
+% For using "sostingut" notation, which is also correct
+\pitchnames #`(
+       (dobb . ,(make-pitch -1 0 -2 ))
+       (dob . ,(make-pitch -1 0 -1 ))
+       (do . ,(make-pitch -1 0 0 ))
+       (dod . ,(make-pitch -1 0 1 ))
+       (dodd . ,(make-pitch -1 0 2 ))
+       (rebb . ,(make-pitch -1 1 -2 ))
+       (reb . ,(make-pitch -1 1 -1 ))
+       (re . ,(make-pitch -1 1 0 ))
+       (red . ,(make-pitch -1 1 1 ))
+       (redd . ,(make-pitch -1 1 2 ))
+       (mibb . ,(make-pitch -1 2 -2 ))
+       (mib . ,(make-pitch -1 2 -1 ))
+       (mi . ,(make-pitch -1 2 0 ))
+       (mid . ,(make-pitch -1 2 1 ))
+       (midd . ,(make-pitch -1 2 2 ))
+       (fabb . ,(make-pitch -1 3 -2 ))
+       (fab . ,(make-pitch -1 3 -1 ))
+       (fa . ,(make-pitch -1 3 0 ))
+       (fad . ,(make-pitch -1 3 1 ))
+       (fadd . ,(make-pitch -1 3 2 ))
+       (solbb . ,(make-pitch -1 4 -2 ))
+       (solb . ,(make-pitch -1 4 -1 ))
+       (sol . ,(make-pitch -1 4 0 ))
+       (sold . ,(make-pitch -1 4 1 ))
+       (soldd . ,(make-pitch -1 4 2 ))
+       (labb . ,(make-pitch -1 5 -2 ))
+       (lab . ,(make-pitch -1 5 -1 ))
+       (la . ,(make-pitch -1 5 0 ))
+       (lad . ,(make-pitch -1 5 1 ))
+       (ladd . ,(make-pitch -1 5 2 ))
+       (sibb . ,(make-pitch -1 6 -2 ))
+       (sib . ,(make-pitch -1 6 -1 ))
+       (si . ,(make-pitch -1 6 0 ))
+       (sid . ,(make-pitch -1 6 1 ))
+       (sidd . ,(make-pitch -1 6 2 ))
+       (dos . ,(make-pitch -1 0 1 ))
+       (doss . ,(make-pitch -1 0 2 ))
+       (res . ,(make-pitch -1 1 1 ))
+       (ress . ,(make-pitch -1 1 2 ))
+       (mis . ,(make-pitch -1 2 1 ))
+       (miss . ,(make-pitch -1 2 2 ))
+       (fas . ,(make-pitch -1 3 1 ))
+       (fass . ,(make-pitch -1 3 2 ))
+       (sols . ,(make-pitch -1 4 1 ))
+       (solss . ,(make-pitch -1 4 2 ))
+       (las . ,(make-pitch -1 5 1 ))
+       (lass . ,(make-pitch -1 5 2 ))
+       (sis . ,(make-pitch -1 6 1 ))
+       (siss . ,(make-pitch -1 6 2 ))
+)
+
+
+
+\version "1.3.146"
diff --git a/ly/english.ly b/ly/english.ly
new file mode 100644 (file)
index 0000000..9afeff2
--- /dev/null
@@ -0,0 +1,82 @@
+%{
+     English note names spelled out in full, and abbreviated
+     with s for sharp and f for flat.
+%}
+
+\pitchnames #`(
+       (cflatflat . ,(make-pitch -1 0 -2 ))
+       (cflat . ,(make-pitch -1 0 -1 ))
+       (c . ,(make-pitch -1 0 0 ))
+       (csharp . ,(make-pitch -1 0 1 ))
+       (csharpsharp . ,(make-pitch -1 0 2 ))
+       (dflatflat . ,(make-pitch -1 1 -2 ))
+       (dflat . ,(make-pitch -1 1 -1 ))
+       (d . ,(make-pitch -1 1 0 ))
+       (dsharp . ,(make-pitch -1 1 1 ))
+       (dsharpsharp . ,(make-pitch -1 1 2 ))
+       (eflatflat . ,(make-pitch -1 2 -2 ))
+       (eflat . ,(make-pitch -1 2 -1 ))
+       (e . ,(make-pitch -1 2 0 ))
+       (esharp . ,(make-pitch -1 2 1 ))
+       (esharpsharp . ,(make-pitch -1 2 2 ))
+       (fflatflat . ,(make-pitch -1 3 -2 ))
+       (fflat . ,(make-pitch -1 3 -1 ))
+       (f . ,(make-pitch -1 3 0 ))
+       (fsharp . ,(make-pitch -1 3 1 ))
+       (fsharpsharp . ,(make-pitch -1 3 2 ))
+       (gflatflat . ,(make-pitch -1 4 -2 ))
+       (gflat . ,(make-pitch -1 4 -1 ))
+       (g . ,(make-pitch -1 4 0 ))
+       (gsharp . ,(make-pitch -1 4 1 ))
+       (gsharpsharp . ,(make-pitch -1 4 2 ))
+       (aflatflat . ,(make-pitch -1 5 -2 ))
+       (aflat . ,(make-pitch -1 5 -1 ))
+       (a . ,(make-pitch -1 5 0 ))
+       (asharp . ,(make-pitch -1 5 1 ))
+       (asharpsharp . ,(make-pitch -1 5 2 ))
+       (bflatflat . ,(make-pitch -1 6 -2 ))
+       (bflat . ,(make-pitch -1 6 -1 ))
+       (b . ,(make-pitch -1 6 0 ))
+       (bsharp . ,(make-pitch -1 6 1 ))
+       (bsharpsharp . ,(make-pitch -1 6 2 ))
+
+       (cff . ,(make-pitch -1 0 -2 ))
+       (cf . ,(make-pitch -1 0 -1 ))
+       (c . ,(make-pitch -1 0 0 ))
+       (cs . ,(make-pitch -1 0 1 ))
+       (css . ,(make-pitch -1 0 2 ))
+       (dff . ,(make-pitch -1 1 -2 ))
+       (df . ,(make-pitch -1 1 -1 ))
+       (d . ,(make-pitch -1 1 0 ))
+       (ds . ,(make-pitch -1 1 1 ))
+       (dss . ,(make-pitch -1 1 2 ))
+       (eff . ,(make-pitch -1 2 -2 ))
+       (ef . ,(make-pitch -1 2 -1 ))
+       (e . ,(make-pitch -1 2 0 ))
+
+       (es . ,(make-pitch -1 2 1 ))    
+       (ess . ,(make-pitch -1 2 2 ))
+       (fff . ,(make-pitch -1 3 -2 ))
+       (ff . ,(make-pitch -1 3 -1 ))
+       (f . ,(make-pitch -1 3 0 ))
+       (fs . ,(make-pitch -1 3 1 ))
+       (fss . ,(make-pitch -1 3 2 ))
+       (gff . ,(make-pitch -1 4 -2 ))
+       (gf . ,(make-pitch -1 4 -1 ))
+       (g . ,(make-pitch -1 4 0 ))
+       (gs . ,(make-pitch -1 4 1 ))
+       (gss . ,(make-pitch -1 4 2 ))
+       (aff . ,(make-pitch -1 5 -2 ))
+       (af . ,(make-pitch -1 5 -1 ))
+       (a . ,(make-pitch -1 5 0 ))
+       (as . ,(make-pitch -1 5 1 ))
+       (ass . ,(make-pitch -1 5 2 ))
+       (bff . ,(make-pitch -1 6 -2 ))
+       (bf . ,(make-pitch -1 6 -1 ))
+       (b . ,(make-pitch -1 6 0 ))
+       (bs . ,(make-pitch -1 6 1 ))
+       (bss . ,(make-pitch -1 6 2 ))
+)
+
+\version "1.3.146"
+
diff --git a/ly/italiano.ly b/ly/italiano.ly
new file mode 100644 (file)
index 0000000..263d2bf
--- /dev/null
@@ -0,0 +1,51 @@
+%{
+ Common italian names for notes. "b" means flat (bemolle), "d" means sharp (diesis)
+ Adapted from dutch.ly.
+
+ English: a   b   c   d   e   f   g
+ Italian: la  si  do  re  mi  fa  sol
+
+ For french naming just change 'do' in 'ut'.
+%}
+
+% contributed by Paolo Zuliani <zuliap@easynet.it>
+
+\pitchnames #`(
+       (dobb . ,(make-pitch -1 0 -2 ))
+       (dob . ,(make-pitch -1 0 -1 ))
+       (do . ,(make-pitch -1 0 0 ))
+       (dod . ,(make-pitch -1 0 1 ))
+       (dodd . ,(make-pitch -1 0 2 ))
+       (rebb . ,(make-pitch -1 1 -2 ))
+       (reb . ,(make-pitch -1 1 -1 ))
+       (re . ,(make-pitch -1 1 0 ))
+       (red . ,(make-pitch -1 1 1 ))
+       (redd . ,(make-pitch -1 1 2 ))
+       (mibb . ,(make-pitch -1 2 -2 ))
+       (mib . ,(make-pitch -1 2 -1 ))
+       (mi . ,(make-pitch -1 2 0 ))
+       (mid . ,(make-pitch -1 2 1 ))
+       (midd . ,(make-pitch -1 2 2 ))
+       (fabb . ,(make-pitch -1 3 -2 ))
+       (fab . ,(make-pitch -1 3 -1 ))
+       (fa . ,(make-pitch -1 3 0 ))
+       (fad . ,(make-pitch -1 3 1 ))
+       (fadd . ,(make-pitch -1 3 2 ))
+       (solbb . ,(make-pitch -1 4 -2 ))
+       (solb . ,(make-pitch -1 4 -1 ))
+       (sol . ,(make-pitch -1 4 0 ))
+       (sold . ,(make-pitch -1 4 1 ))
+       (soldd . ,(make-pitch -1 4 2 ))
+       (labb . ,(make-pitch -1 5 -2 ))
+       (lab . ,(make-pitch -1 5 -1 ))
+       (la . ,(make-pitch -1 5 0 ))
+       (lad . ,(make-pitch -1 5 1 ))
+       (ladd . ,(make-pitch -1 5 2 ))
+       (sibb . ,(make-pitch -1 6 -2 ))
+       (sib . ,(make-pitch -1 6 -1 ))
+       (si . ,(make-pitch -1 6 0 ))
+       (sid . ,(make-pitch -1 6 1 ))
+       (sidd . ,(make-pitch -1 6 2 ))
+)
+
+\version "1.3.146"
diff --git a/ly/nederlands.ly b/ly/nederlands.ly
new file mode 100644 (file)
index 0000000..bba3d0a
--- /dev/null
@@ -0,0 +1,49 @@
+\version "1.3.146"
+%{
+ common dutch names for notes. es means flat, is means sharp
+%}
+
+\pitchnames #`(
+       (ceses . ,(make-pitch -1 0 -2))
+       (ces . ,(make-pitch  -1 0 -1 ))
+       (c . ,(make-pitch  -1 0 0 ))
+       (cis . ,(make-pitch  -1 0 1 ))
+       (cisis . ,(make-pitch  -1 0 2 ))
+       (deses . ,(make-pitch  -1 1 -2 ))
+       (des . ,(make-pitch  -1 1 -1 ))
+       (d . ,(make-pitch  -1 1 0 ))
+       (dis . ,(make-pitch  -1 1 1 ))
+       (disis . ,(make-pitch  -1 1 2 ))
+       (eeses . ,(make-pitch  -1 2 -2 ))
+       (eses . ,(make-pitch  -1 2 -2 ))
+       (ees . ,(make-pitch  -1 2 -1 ))
+       (es . ,(make-pitch  -1 2 -1 ))
+       (e . ,(make-pitch  -1 2 0 ))
+       (eis . ,(make-pitch  -1 2 1 ))
+       (eisis . ,(make-pitch  -1 2 2 ))
+       (feses . ,(make-pitch  -1 3 -2 ))
+       (fes . ,(make-pitch  -1 3 -1 ))
+       (f . ,(make-pitch  -1 3 0 ))
+       (fis . ,(make-pitch  -1 3 1 ))
+       (fisis . ,(make-pitch  -1 3 2 ))
+       (geses . ,(make-pitch  -1 4 -2 ))
+       (ges . ,(make-pitch  -1 4 -1 ))
+       (g . ,(make-pitch  -1 4 0 ))
+       (gis . ,(make-pitch  -1 4 1 ))
+       (gisis . ,(make-pitch  -1 4 2 ))
+       (aeses . ,(make-pitch  -1 5 -2 ))
+       (ases . ,(make-pitch  -1 5 -2 ))
+       (aes . ,(make-pitch  -1 5 -1 ))
+       (as . ,(make-pitch  -1 5 -1 ))
+       (a . ,(make-pitch  -1 5 0 ))
+       (ais . ,(make-pitch  -1 5 1 ))
+       (aisis . ,(make-pitch  -1 5 2 ))
+       (beses . ,(make-pitch  -1 6 -2 ))
+       (bes . ,(make-pitch  -1 6 -1 ))
+       (b . ,(make-pitch  -1 6 0 ))
+       (bis . ,(make-pitch  -1 6 1 ))
+       (bisis . ,(make-pitch  -1 6 2 ))
+)
+
+
+
diff --git a/ly/norsk.ly b/ly/norsk.ly
new file mode 100644 (file)
index 0000000..f6630ba
--- /dev/null
@@ -0,0 +1,107 @@
+
+%      Idx norsk.ly,v 1.1 1998/03/25 11:38:28 arvidg Exp arvidg $      
+
+%{
+
+ Common norwegian names for notes, including versions without the
+ double s-es to save typing, as well as the traditional names with
+ them not to confuse musicians.  "es" or "ess" means flat, "is" or
+ "iss" means sharp.
+
+ Otherwise, the main difference from the dutch names is the that the
+ "b" is called "h" in norwegian, while the dutch "bes" is a norwegian
+ "b".
+
+ Staying within the (proud?) naming convention for norwegian language
+ setup used in LaTeX, this file is called "norsk.ly" instead of
+ "norwegian.ly", even if all other languages' files use the english
+ name.
+
+ This file is based on "dutch.ly".  Basically, I copied "dutch.ly",
+ duplicated all lines containing at least one "is" or "es", changed
+ every other "is" into an "iss" and every other "es" into an "ess",
+ added "ass" et al, and made some b->h-related changes.  There may be
+ bugs in here please tell me (or send patches) if you find any.
+
+                                  Arvid Gr=F8tting <arvidg@ifi.uio.no>
+
+%}
+
+\pitchnames #`(
+       (ceses . ,(make-pitch -1 0 -2 ))
+       (cessess . ,(make-pitch -1 0 -2 ))
+       (ces . ,(make-pitch -1 0 -1 ))
+       (cess . ,(make-pitch -1 0 -1 ))
+       (c . ,(make-pitch -1 0 0 ))
+       (cis . ,(make-pitch -1 0 1 ))
+       (ciss . ,(make-pitch -1 0 1 ))
+       (cisis . ,(make-pitch -1 0 2 ))
+       (cississ . ,(make-pitch -1 0 2 ))
+       (deses . ,(make-pitch -1 1 -2 ))
+       (dessess . ,(make-pitch -1 1 -2 ))
+       (des . ,(make-pitch -1 1 -1 ))
+       (dess . ,(make-pitch -1 1 -1 ))
+       (d . ,(make-pitch -1 1 0 ))
+       (dis . ,(make-pitch -1 1 1 ))
+       (diss . ,(make-pitch -1 1 1 ))
+       (disis . ,(make-pitch -1 1 2 ))
+       (dississ . ,(make-pitch -1 1 2 ))
+       (eeses . ,(make-pitch -1 2 -2 ))
+       (eessess . ,(make-pitch -1 2 -2 ))
+       (eses . ,(make-pitch -1 2 -2 ))
+       (essess . ,(make-pitch -1 2 -2 ))
+       (ees . ,(make-pitch -1 2 -1 ))
+       (eess . ,(make-pitch -1 2 -1 ))
+       (es . ,(make-pitch -1 2 -1 ))
+       (ess . ,(make-pitch -1 2 -1 ))
+       (e . ,(make-pitch -1 2 0 ))
+       (eis . ,(make-pitch -1 2 1 ))
+       (eiss . ,(make-pitch -1 2 1 ))
+       (eisis . ,(make-pitch -1 2 2 ))
+       (eississ . ,(make-pitch -1 2 2 ))
+       (feses . ,(make-pitch -1 3 -2 ))
+       (fessess . ,(make-pitch -1 3 -2 ))
+       (fes . ,(make-pitch -1 3 -1 ))
+       (fess . ,(make-pitch -1 3 -1 ))
+       (f . ,(make-pitch -1 3 0 ))
+       (fis . ,(make-pitch -1 3 1 ))
+       (fiss . ,(make-pitch -1 3 1 ))
+       (fisis . ,(make-pitch -1 3 2 ))
+       (fississ . ,(make-pitch -1 3 2 ))
+       (geses . ,(make-pitch -1 4 -2 ))
+       (gessess . ,(make-pitch -1 4 -2 ))
+       (ges . ,(make-pitch -1 4 -1 ))
+       (gess . ,(make-pitch -1 4 -1 ))
+       (g . ,(make-pitch -1 4 0 ))
+       (g . ,(make-pitch -1 4 0 ))
+       (gis . ,(make-pitch -1 4 1 ))
+       (giss . ,(make-pitch -1 4 1 ))
+       (gisis . ,(make-pitch -1 4 2 ))
+       (gississ . ,(make-pitch -1 4 2 ))
+       (aeses . ,(make-pitch -1 5 -2 ))
+       (aessess . ,(make-pitch -1 5 -2 ))
+       (ases . ,(make-pitch -1 5 -2 ))
+       (assess . ,(make-pitch -1 5 -2 ))
+       (aes . ,(make-pitch -1 5 -1 ))
+       (aess . ,(make-pitch -1 5 -1 ))
+       (as . ,(make-pitch -1 5 -1 ))
+       (ass . ,(make-pitch -1 5 -1 ))
+       (a . ,(make-pitch -1 5 0 ))
+       (ais . ,(make-pitch -1 5 1 ))
+       (aiss . ,(make-pitch -1 5 1 ))
+       (aisis . ,(make-pitch -1 5 2 ))
+       (aississ . ,(make-pitch -1 5 2 ))
+       (bes . ,(make-pitch -1 6 -2 ))
+       (bess . ,(make-pitch -1 6 -2 ))
+       (b . ,(make-pitch -1 6 -1 ))
+       (b . ,(make-pitch -1 6 -1 ))
+       (h . ,(make-pitch -1 6 0 ))
+       (his . ,(make-pitch -1 6 1 ))
+       (hiss . ,(make-pitch -1 6 1 ))
+       (hisis . ,(make-pitch -1 6 2 ))
+       (hississ . ,(make-pitch -1 6 2 ))
+)
+
+
+
+\version "1.3.146"
diff --git a/ly/svenska.ly b/ly/svenska.ly
new file mode 100644 (file)
index 0000000..c9b5498
--- /dev/null
@@ -0,0 +1,43 @@
+%
+% common Swedish names for notes. "ess" means flat, "iss" means sharp
+%
+% by Mats Bengtsson.
+
+\pitchnames #`(
+       (cessess . ,(make-pitch -1 0 -2 ))
+       (cess . ,(make-pitch -1 0 -1 ))
+       (c . ,(make-pitch -1 0 0 ))
+       (ciss . ,(make-pitch -1 0 1 ))
+       (cississ . ,(make-pitch -1 0 2 ))
+       (dessess . ,(make-pitch -1 1 -2 ))
+       (dess . ,(make-pitch -1 1 -1 ))
+       (d . ,(make-pitch -1 1 0 ))
+       (diss . ,(make-pitch -1 1 1 ))
+       (dississ . ,(make-pitch -1 1 2 ))
+       (essess . ,(make-pitch -1 2 -2 ))
+       (ess . ,(make-pitch -1 2 -1 ))
+       (e . ,(make-pitch -1 2 0 ))
+       (eiss . ,(make-pitch -1 2 1 ))
+       (eississ . ,(make-pitch -1 2 2 ))
+       (fessess . ,(make-pitch -1 3 -2 ))
+       (fess . ,(make-pitch -1 3 -1 ))
+       (f . ,(make-pitch -1 3 0 ))
+       (fiss . ,(make-pitch -1 3 1 ))
+       (fississ . ,(make-pitch -1 3 2 ))
+       (gessess . ,(make-pitch -1 4 -2 ))
+       (gess . ,(make-pitch -1 4 -1 ))
+       (g . ,(make-pitch -1 4 0 ))
+       (giss . ,(make-pitch -1 4 1 ))
+       (gississ . ,(make-pitch -1 4 2 ))
+       (assess . ,(make-pitch -1 5 -2 ))
+       (ass . ,(make-pitch -1 5 -1 ))
+       (a . ,(make-pitch -1 5 0 ))
+       (aiss . ,(make-pitch -1 5 1 ))
+       (aississ . ,(make-pitch -1 5 2 ))
+       (hessess . ,(make-pitch -1 6 -2 ))
+       (b . ,(make-pitch -1 6 -1 ))
+       (h . ,(make-pitch -1 6 0 ))
+       (hiss . ,(make-pitch -1 6 1 ))
+       (hississ . ,(make-pitch -1 6 2 ))
+)
+\version "1.3.146"