]> git.donarmstrong.com Git - lilypond.git/commitdiff
release: 0.1.35 release/0.1.35
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 5 Dec 1997 11:09:12 +0000 (12:09 +0100)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 5 Dec 1997 11:09:12 +0000 (12:09 +0100)
44 files changed:
.dstreamrc
AUTHORS.text
Documentation/lilypond.pod
INSTALL.text
NEWS
README
TODO
VERSION
bin/clean-fonts.sh
configure
configure.in
init/feta16.ly
init/feta20.ly
init/lily-init.ly [new file with mode: 0644]
init/r20.ly [deleted file]
init/symbol.ly [deleted file]
init/table16.ly
init/table20.ly
input/font.ly
input/scsii-menuetto.ly
input/standchen-16.tex
input/wtk1-fugue2.ly
lily/VERSION
lily/include/text-def.hh
lily/lookup.cc
lily/main.cc
lily/parser.y
lily/text-def.cc
make/lelievijver.lsm
make/lilypond.lsm
make/lilypond.lsm.in
make/lilypond.spec
mf/TODO
mf/feta-beugel.mf [new file with mode: 0644]
mf/feta-braces16.mf [new file with mode: 0644]
mf/feta-braces20.mf [new file with mode: 0644]
mf/feta-klef.mf
mf/feta-watzieik.mf
tex/feta16.tex
tex/feta20.tex
tex/fetdefs.tex
tex/lilyponddefs.tex
tex/taupindefs.tex
tex/titledefs.tex

index 178573bd1ab6ada7aad989c2d9a0c545b07002a5..636a2a37df66f0586d4a1ea3dc11f86eedaab0c8 100644 (file)
@@ -10,13 +10,13 @@ InitDeclarations    1
 Declarations           1
 # FlexLexer debug
 InitLexer              1
-Lexer                  0
+Lexer                  1
 
 
 # flower lib
 File_path              1
-Matrix                 0
-Vector                 0
+Matrix                 1
+Vector                 1
 
 # lily
 Atom                   0
index b71a96a7dfdd7ec055faae959db1a2968fb0130b..d5bbbea66e1ff2b069c779c011d4379621d60ba7 100644 (file)
@@ -61,6 +61,6 @@ C\bC\bC\bCO\bO\bO\bON\bN\bN\bNT\bT\bT\bTR\bR\bR\bRI\bI\bI\bIB\bB\bB\bBU\bU\bU\bUT\bT\bT\bTO\bO\bO\bOR\bR\bR\bRS\bS
 
 
 
-25/Nov/97                LilyPond 0.1.34                        1
+25/Nov/97                LilyPond 0.1.35                        1
 
 
index 20f75f4b82b77ef44bf54eed0e79c0b79e76d721..970bef1dee00d0a948e21435d6d70851a79986e8 100644 (file)
@@ -51,7 +51,7 @@ Show a summary of usage.
 
 =item B<-i,--init=>F<FILE>,
 
-Set init file to F<FILE> (default: F<symbol.ly>).
+Set init file to F<FILE> (default: F<lily-init.ly>).
 
 =item B<--include, -I>=F<DIRECTORY>,
 
@@ -197,7 +197,7 @@ Than it would help if you send a dump of the Interval and the Item
 
 =over 5
 
-=item F<symbol.ly>
+=item F<lily-init.ly>
 
 The initialisation file with symbol tables etc.  It
 includes files from the directory F<init/>.
index e92908767e94d93e09e6786de11820dcefc3e8ca..4e80e3a5725348197fe8e7614d6a0707e48be3c2 100644 (file)
@@ -61,7 +61,7 @@ R\bR\bR\bRU\bU\bU\bUN\bN\bN\bNN\bN\bN\bNI\bI\bI\bIN\bN\bN\bNG\bG\bG\bG
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        1
+2/Dec/97                 LilyPond 0.1.35                        1
 
 
 
@@ -127,7 +127,7 @@ C\bC\bC\bCO\bO\bO\bON\bN\bN\bNF\bF\bF\bFI\bI\bI\bIG\bG\bG\bGU\bU\bU\bUR\bR\bR\bRI\bI\bI\bIN\bN\bN\bNG\bG\bG\bG a\b
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        2
+2/Dec/97                 LilyPond 0.1.35                        2
 
 
 
@@ -193,7 +193,7 @@ INSTALL(1)            LilyPond documentation           INSTALL(1)
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        3
+2/Dec/97                 LilyPond 0.1.35                        3
 
 
 
@@ -259,7 +259,7 @@ I\bI\bI\bIN\bN\bN\bNS\bS\bS\bST\bT\bT\bTA\bA\bA\bAL\bL\bL\bLL\bL\bL\bLI\bI\bI\bIN\bN\bN\bNG\bG\bG\bG
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        4
+2/Dec/97                 LilyPond 0.1.35                        4
 
 
 
@@ -325,7 +325,7 @@ R\bR\bR\bRE\bE\bE\bED\bD\bD\bDH\bH\bH\bHA\bA\bA\bAT\bT\bT\bT L\bL\bL\bLI\bI\bI\bIN\bN\bN\bNU\bU\bU\bUX\bX\bX\bX
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        5
+2/Dec/97                 LilyPond 0.1.35                        5
 
 
 
@@ -391,6 +391,6 @@ A\bA\bA\bAU\bU\bU\bUT\bT\bT\bTH\bH\bH\bHO\bO\bO\bOR\bR\bR\bRS\bS\bS\bS
 
 
 
-2/Dec/97                 LilyPond 0.1.34                        6
+2/Dec/97                 LilyPond 0.1.35                        6
 
 
diff --git a/NEWS b/NEWS
index 6e6df564d19de228e7c704d4a348f3c18f8784c0..1c5b06fafbf64679ebb992b83e11560163286958 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,8 +1,17 @@
+
+pl 35
+       - naming: lily-init iso symbol.ly
+       - mf braces
+       - center textscripts.
+
 pl 34.jcn1
        - mf: nicening of dyn, klef, rest
        - fingerfont
        - bf: 12/8
+       
 
+********
+dec 2
 pl 34
        - bf: mf: numbers and alto clef
        - bf: scsi-menuet
diff --git a/README b/README
index 34d7ec453265a99a630a3bf889b3cad330e8fcbf..82740ef2da72d4c22de8a3d97eae594bf2b77a61 100644 (file)
--- a/README
+++ b/README
@@ -56,7 +56,7 @@ the mailing lists.  See Documentation/links.pod for more info
 6. DOZE
 
 If you have received this file as part of a DOS/Window32 distribution
-(lilypond-*.zip ), then it is advisable to also download the source
+(lilypond-*.zip), then it is advisable to also download the source
 package, since it might contain more documentation
 
        ftp://pcnov095.win.tue.nl/pub/lilypond/ (Europe)
@@ -67,7 +67,7 @@ The website also contains the complete documentation
        http://www.stack.nl/~hanwen/lilypond/index.html
 
 If you decide to build LilyPond from source, please read the INSTALL
-document first, esp. the Windows NT/95 section.
+document first, especially the Windows NT/95 section.
 
 7. CAVEATS
 
@@ -78,3 +78,5 @@ Linux-Intel unix users.
 files, eg
 
        rm `find /var/lib/texmf/fonts -name 'feta*'`
+
+a script to do this for you is in bin/cleanfonts.sh
diff --git a/TODO b/TODO
index 0566fb41f02c224a1ab5d9e3ba2f2b8f8271b73f..1d54876a950e82fd1a00693945ee98e85b33ede1 100644 (file)
--- a/TODO
+++ b/TODO
@@ -7,6 +7,10 @@ Most of the items are marked in the code as well, with full explanation.
 grep for TODO and ugh/ugr
 
 0.2:
+       * handle ^C for tmp/file creation.
+
+       * PS for beams.
+
        * add a screenshot to the website. :)
 
        * fix stdin input
@@ -407,7 +411,6 @@ Mudela.
 
        * pushgroup/popgroup
 
-
        * multi threading?
          - 1 thread per element/ 1 thread per line
          - 1 thread per Translator
diff --git a/VERSION b/VERSION
index 8b2e671a4773546852b735cdf2b6a05105efbb39..6244dccf3d85a5d399534436487355600b73ca8f 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -1,7 +1,7 @@
 TOPLEVEL_MAJOR_VERSION = 0
 TOPLEVEL_MINOR_VERSION = 1
-TOPLEVEL_PATCH_LEVEL = 34
-TOPLEVEL_MY_PATCH_LEVEL = jcn1
+TOPLEVEL_PATCH_LEVEL = 35
+TOPLEVEL_MY_PATCH_LEVEL = 
 
 # use the above to send patches, always empty for released version:
 # please don't move these comments up; the patch should fail if 
index 0610fba7e3edbbacbbfe5f9220ddeab4752f4aac..07814d664e66d6e67ae658804f2c289070330019 100644 (file)
@@ -1,8 +1,15 @@
 #!/bin/sh
 
+case  $# in
+0) 
+    WHAT="" ;;
+1)
+    WHAT=$1;;
+esac
+    
 # remove possibly stale .pk/.tfm files 
-echo> /tmp/cleaning-font
-FILES=`find /var/lib/texmf/ -name 'font-en-tja*' -o -name 'feta*'`
-# FILES=`find /var/lib/texmf/ -name 'font-en-tja*' -o name 'feta-*" -o -name 'vette-beam*' -o -name 'dyn10*'`
+echo> /tmp/cleaning-font-dummy
+FILES=`find /var/lib/texmf/ -name "feta*$WHAT*"`
+
 echo removing $FILES
-rm  $FILES /tmp/cleaning-font
+rm  $FILES /tmp/cleaning-font-dummy
index 9e40e3a6da66a0d2a365777f15ec1203ceee2bb3..dfc33d3ad9ee04bf1ab6ad353239ab7fd3ce3941 100755 (executable)
--- a/configure
+++ b/configure
@@ -674,7 +674,7 @@ if test x$MINGWPREFIX != xno; then
 fi
 
 if test $optimise_b = yes; then
-    DEFINES="$DEFINES -O2 -DSTRING_UTILS_INLINED"
+    DEFINES="$DEFINES -finline-functions -O2 -DSTRING_UTILS_INLINED"
 fi
 
 if test "x$OSTYPE" = "xWindows_NT"; then
index 0efe69bab076960a54551c967100c3553830756e..ee5bc6a4f7374a709dfcda8ec0dde947832c3d70 100644 (file)
@@ -95,7 +95,7 @@ if test x$MINGWPREFIX != xno; then
 fi
 
 if test $optimise_b = yes; then
-    DEFINES="$DEFINES -O2 -DSTRING_UTILS_INLINED"
+    DEFINES="$DEFINES -finline-functions -O2 -DSTRING_UTILS_INLINED"
 fi
 
 if test "x$OSTYPE" = "xWindows_NT"; then
@@ -171,7 +171,7 @@ AC_JUNK_ARGS( [if test "x$MFDIR" = xauto; then
 )
 
 AC_CHECK_SEARCH_RESULT($MAKE, GNU make,  You should install GNU make)
-AC_CHECK_SEARCH_RESULT( $BISON, bison,  Please install Bison, 1.25 or better)
+AC_CHECK_SEARCH_RESULT($BISON, bison,  Please install Bison, 1.25 or better)
 AC_CHECK_SEARCH_RESULT($PERL, perl, You should install Perl, version 5 or better)
 AC_CHECK_SEARCH_RESULT($PYTHON, python, You should install Python)
 AC_CHECK_SEARCH_RESULT($PODMAN, pod,  You should install Perl, version 5 or better)
index 083ff06cca881c89a4b3209ca7098c998d41814a..826e96a29bf70d15b97db3c8f9a18209efabdd14 100644 (file)
@@ -1,5 +1,5 @@
 % generated automatically by mf-to-table.py version 0.4
-% on Thu Dec  4 23:42:11 1997
+% on Fri Dec  5 11:52:40 1997
 % Do not edit
 % input from out/feta16.log
 % name=\symboltables {
@@ -9,11 +9,11 @@
         "0o"   "\\outsidewholerest"    -2.50\pt        8.50\pt -2.50\pt        0.40\pt 
         "1o"   "\\outsidehalfrest"     -2.50\pt        8.50\pt -0.40\pt        2.50\pt 
         "2"    "\\quartrest"   -0.00\pt        4.32\pt 3.00\pt 14.40\pt        
-        "3"    "\\eighthrest"  -0.00\pt        5.33\pt 4.00\pt 11.47\pt        
-        "4"    "\\sixteenthrest"       -0.00\pt        6.23\pt -0.00\pt        11.47\pt        
-        "5"    "\\thirtysecondrest"    -0.00\pt        7.03\pt -0.00\pt        15.47\pt        
-        "6"    "\\sixtyfourthrest"     -0.00\pt        7.53\pt -0.00\pt        19.47\pt        
-        "7"    "\\hundredtwentyeighthrest"     -0.00\pt        8.38\pt -0.00\pt        23.47\pt        
+        "3"    "\\eighthrest"  -0.00\pt        5.33\pt 4.00\pt 11.27\pt        
+        "4"    "\\sixteenthrest"       -0.00\pt        6.18\pt -0.00\pt        11.27\pt        
+        "5"    "\\thirtysecondrest"    -0.00\pt        6.98\pt -0.00\pt        15.27\pt        
+        "6"    "\\sixtyfourthrest"     -0.00\pt        7.49\pt -0.00\pt        19.27\pt        
+        "7"    "\\hundredtwentyeighthrest"     -0.00\pt        8.34\pt -0.00\pt        23.27\pt        
         }
     "accidentals"       = \table {
         "1"    "\\sharp"       -0.00\pt        4.40\pt -6.00\pt        6.00\pt 
index 4accbaf1c6e1549e087967782515c8809e6fcf58..01297a8189192e43ac32d7bf77c727537240b8be 100644 (file)
@@ -1,5 +1,5 @@
 % generated automatically by mf-to-table.py version 0.4
-% on Thu Dec  4 23:42:34 1997
+% on Fri Dec  5 11:52:42 1997
 % Do not edit
 % input from out/feta20.log
 % name=\symboltables {
@@ -9,11 +9,11 @@
         "0o"   "\\outsidewholerest"    -3.13\pt        10.62\pt        -3.13\pt        0.50\pt 
         "1o"   "\\outsidehalfrest"     -3.13\pt        10.62\pt        -0.50\pt        3.13\pt 
         "2"    "\\quartrest"   -0.00\pt        5.40\pt 3.75\pt 18.00\pt        
-        "3"    "\\eighthrest"  -0.00\pt        6.67\pt 5.00\pt 14.33\pt        
-        "4"    "\\sixteenthrest"       -0.00\pt        7.79\pt -0.00\pt        14.33\pt        
-        "5"    "\\thirtysecondrest"    -0.00\pt        8.78\pt -0.00\pt        19.33\pt        
-        "6"    "\\sixtyfourthrest"     -0.00\pt        9.41\pt -0.00\pt        24.33\pt        
-        "7"    "\\hundredtwentyeighthrest"     -0.00\pt        10.47\pt        -0.00\pt        29.33\pt        
+        "3"    "\\eighthrest"  -0.00\pt        6.67\pt 5.00\pt 14.08\pt        
+        "4"    "\\sixteenthrest"       -0.00\pt        7.72\pt -0.00\pt        14.08\pt        
+        "5"    "\\thirtysecondrest"    -0.00\pt        8.72\pt -0.00\pt        19.08\pt        
+        "6"    "\\sixtyfourthrest"     -0.00\pt        9.36\pt -0.00\pt        24.08\pt        
+        "7"    "\\hundredtwentyeighthrest"     -0.00\pt        10.42\pt        -0.00\pt        29.08\pt        
         }
     "accidentals"       = \table {
         "1"    "\\sharp"       -0.00\pt        5.50\pt -7.50\pt        7.50\pt 
diff --git a/init/lily-init.ly b/init/lily-init.ly
new file mode 100644 (file)
index 0000000..564fca5
--- /dev/null
@@ -0,0 +1,51 @@
+% symbol.ly
+%
+% FIXME other name
+  
+\version "0.1.7";
+  
+breve = \duration { -1 0 }
+longa = \duration { -2 0 }
+
+\include "dynamic.ly"
+\include "dutch.ly" 
+\include "script.ly"
+
+
+Gourlay = 1.0
+Wordwrap = 0.0
+
+\include "paper16.ly"
+\include "paper20.ly"
+
+
+default_paper = \paper{
+       \paper_sixteen
+}
+
+% ugh
+\include "midi.ly"
+
+% declarations for standard directions
+left = -1
+right = 1
+up = 1
+down = -1
+center=0
+
+
+stemup = {
+       \skip 1*0;
+       % Stupid hack to make < { \stemup } > work
+       \property Voice.ydirection = \up 
+       }
+stemboth= {
+       \skip 1*0;
+       \property Voice.ydirection = \center
+}
+stemdown = {   
+       \skip 1*0;
+       \property Voice.ydirection = \down
+}
+
+
diff --git a/init/r20.ly b/init/r20.ly
deleted file mode 100644 (file)
index e935658..0000000
+++ /dev/null
@@ -1,7 +0,0 @@
-% generated at Mon Sep 22 22:23:19 1997 from out/r20.log
-% changes will be lost
-% font-en-tja=\symboltables {
-       "rests" = \table {
-               "-2"    "\eighthrest"   0.00\pt 5.40\pt 17.55\pt        0.00\pt
-               }
-       %  } % font-en-tja
diff --git a/init/symbol.ly b/init/symbol.ly
deleted file mode 100644 (file)
index 564fca5..0000000
+++ /dev/null
@@ -1,51 +0,0 @@
-% symbol.ly
-%
-% FIXME other name
-  
-\version "0.1.7";
-  
-breve = \duration { -1 0 }
-longa = \duration { -2 0 }
-
-\include "dynamic.ly"
-\include "dutch.ly" 
-\include "script.ly"
-
-
-Gourlay = 1.0
-Wordwrap = 0.0
-
-\include "paper16.ly"
-\include "paper20.ly"
-
-
-default_paper = \paper{
-       \paper_sixteen
-}
-
-% ugh
-\include "midi.ly"
-
-% declarations for standard directions
-left = -1
-right = 1
-up = 1
-down = -1
-center=0
-
-
-stemup = {
-       \skip 1*0;
-       % Stupid hack to make < { \stemup } > work
-       \property Voice.ydirection = \up 
-       }
-stemboth= {
-       \skip 1*0;
-       \property Voice.ydirection = \center
-}
-stemdown = {   
-       \skip 1*0;
-       \property Voice.ydirection = \down
-}
-
-
index 91b8bda16cb8480f8eeb46ecb016d29a8596109a..644f0c0ac3bf066194de0eb65573e3f21fd64f80 100644 (file)
@@ -62,7 +62,8 @@ table_sixteen=
 
      % dims ignored for this table
      "param" = \table {
-       "brace" "\pianobrace{%}"        0.0\pt  0.0\pt  0.0\pt  0.0\pt
+%      "brace" "\pianobrace{%}"        0.0\pt  0.0\pt  0.0\pt  0.0\pt
+       "brace" "\pianobrace{%}"        0.0\pt  0.0\pt  32.0\pt 80.0\pt
        "meter" "\generalmeter{%}{%}"   0.0\pt  10.0\pt -8.0\pt 8.0\pt
        "stem"  "\stem{%}{%}"
        "fill"  "\hbox{}"
index b4f6a19f2860c039727ed4542166be282ff46f35..7015bf914ab727881a478bc636d314d9f1a9b82c 100644 (file)
@@ -66,7 +66,8 @@ table_twenty =
 
     % dims ignored for this table
     "param" = \table {
-        "brace"    "\pianobrace{%}"    0.0\pt  0.0\pt  0.0\pt  0.0\pt
+%       "brace"    "\pianobrace{%}"    0.0\pt  0.0\pt  0.0\pt  0.0\pt
+        "brace"    "\pianobrace{%}"    0.0\pt  0.0\pt  40.0\pt 100.0\pt         
         "meter"        "\generalmeter{%}{%}"   0.0\pt  10.0\pt -5.0\pt 5.0\pt
         "stem" "\stem{%}{%}"
         "fill" "\hbox{}"
index d92a906734bca28e1f4abe81875a39c22e22083a..ac54e3e36aa9c5c28e65aa02f1568c442991c575 100644 (file)
@@ -2,7 +2,7 @@
 title= "The Feta font";
 subtitle = "proofsheet"; 
 enteredby =     "jcn";
-copyright =     "PD";
+copyright =     "public domain";
 TestedFeatures =        "This file tests the Feta music-font"
         "(Feta definitively is not an abbreviation of Font-En-TjA)";
 }
@@ -44,6 +44,7 @@ TestedFeatures =       "This file tests the Feta music-font"
                c4^"1" d^"2" e^"3" f^"4" g^"5"
                < bes4^"1" e_"2" c_"4" >
                a'^"0"
+               
                % ugh, \flageolet is like open, but maybe a perfect circle
                a^\open
                \textstyle "roman";
index 60c57179ee574dc875cb6415944bb31f963de1ee..889c56e12454630cb0f6949b08187bfa5afd51de 100644 (file)
@@ -37,8 +37,11 @@ IImenuetto = \melodic{
        \duration 8;
                < a2 f2 d2 \f > bes4-.  |
 %%2
+       \textstyle "finger";            % ugh.
+       
        < [ bes8^"1" e8 c8_"2"_"4" >
                a8 bes8-. g8-. ] a4-.^"4" |
+
 %%3
        < d4 'bes4-. > g4-. [ f8-. e8-. ] |
 %%4
@@ -100,6 +103,7 @@ IImenuetto = \melodic{
 %%23
        [ 'g8 g8 ] < e4. 'a4. > d8-\upbow |
 %%24
+       \textstyle "roman";             % ugh
        < d2.^"fine" 'a2. 'd2._"3 mins."> 
        \bar ":|";
 }
index 50081e7f9ab9bdbc9eea6d88b75dda3bb52534a8..9ad6f3a77dd5e41f20916d7c9e13c081487b8a3b 100644 (file)
@@ -4,11 +4,10 @@
 \evensidemargin\oddsidemargin
 \advance\textwidth30mm
 
+\input titledefs
 %\pagestyle{empty}
 \begin{document}
-\input lilyponddefs
 \musixsixteendefs
-\input titledefs
 \def\interscoreline{\vskip3mm}
 \title{St\"andchen\normalsize\\[2ex](Serenade)}
 \composer{Franz Schubert (1797-1828)}
index cd62181c6d130b8fbb1cb4667a21bcaed05a435b..3c9e2f93912d61663a763cfad681271258a47930 100644 (file)
@@ -22,7 +22,7 @@ global =
          \meter 4/4;                % should be \meter C
          \keyCminor 
         \skip 1*32;
-        \bar "|.";
+        \bar "|."; |
     }
   
 dux =
index 5f9cd128f230fdb3f8d0e0f17e25c43514797022..4a2e61f93918ab89ce08c86f0e7e0d068954b434 100644 (file)
@@ -1,4 +1,4 @@
 MAJOR_VERSION = 0
 MINOR_VERSION = 1
-PATCH_LEVEL = 34
+PATCH_LEVEL = 35
 MY_PATCH_LEVEL =
index d40a4c7b2778da142c53f7bf1c9070ec47ab0fbf..78dd152e9af861c113537210d5310b4c80718eb2 100644 (file)
@@ -23,7 +23,7 @@ public:
 
       -1 = raggedright, 0 = center, 1 = raggedleft
      */
-    int align_i_;
+    Direction align_i_;
 
     String text_str_;
     String style_str_;
index 5c304c2cb2216b2fe8e998acb5bb6c4a09979fdd..d2e4c12d9024a0a2ef0faaf411fe823ec9203dd2 100644 (file)
@@ -227,27 +227,32 @@ Lookup::stem (Real y1,Real y2) const
 Atom
 Lookup::vbrace (Real &y) const
 {
-  if (y < 2* 20 PT)
+  Atom brace = (*symtables_p_)("param")->lookup ("brace");
+  Interval ydims = brace.dim_[Y_AXIS];
+  Real min_y = ydims[LEFT];
+  Real max_y = ydims[RIGHT];
+  Real step = 2.0 PT;
+  if (y < min_y)
     {
       warning (_("piano brace too small (") + print_dimen (y)+ ")");
-      y = 2*20 PT;
+      y = min_y;
     }
-  if (y > 67 * 2 PT)
+  if (y > max_y)
     {
       warning (_("piano brace too big (") + print_dimen (y)+ ")");
-      y = 67 *2 PT;
+      y = max_y;
     }
 
-  int idx = int (rint ((y/2.0 - 20) + 148));
-
-  Atom s = (*symtables_p_)("param")->lookup ("brace");
+  
+  int idx = int (rint ((y- min_y)/step)) + 1;
+  
   {
     Array<String> a;
     a.push (idx);
-    s.tex_ = substitute_args (s.tex_,a);
-    s.dim_.y() = Interval (-y/2,y/2);
+    brace.tex_ = substitute_args (brace.tex_,a);
+    brace.dim_[Y_AXIS] = Interval (-y/2,y/2);
   }
 
-
-  return s;
+  return brace;
 }
index b059da16078fccbf1d101ca4632614b930821d79..f88d3a20af05dafef7970610e0b7d2d4097815dc 100644 (file)
@@ -158,7 +158,7 @@ main (int argc, char **argv)
 
   Getopt_long oparser (argc, argv,theopts);
   cout << get_version_str() << endl;
-  String init_str ("symbol.ly");
+  String init_str ("lily-init.ly");
 
   while (Long_option_init const * opt = oparser())
     {
index 9f02016a412aae4aef8763c5d6532a6d61bad50e..b4f85ba14c008c6e22334586dc59eab41fababa2 100644 (file)
@@ -902,7 +902,9 @@ script_req:
        ;
 
 gen_script_def:
-       text_def        { $$ = $1; }
+       text_def        { $$ = $1;
+               ((Text_def*) $$)->align_i_ = CENTER; /* UGH */
+       }
        | mudela_script { $$ = $1;
                $$-> set_spot (THIS->here_input ());
        }
index c41bfeb58a404bc90c42f019826a98bee6727b62..1e75aa83aec358037dd75034f44dc5464b33d715 100644 (file)
@@ -34,7 +34,7 @@ Text_def::do_print() const
 
 Text_def::Text_def()
 {   
-  align_i_ = 1;                        // right
+  align_i_ = RIGHT;
   style_str_ = "roman";
 }
 
index 0ec4bb236e0b7e8df3e3e499013d0283f203d084..895a6072076f10a5804122aefbdd9a39573d1bc0 100644 (file)
@@ -1,7 +1,7 @@
 Begin3
 Titel: LilyPond
-Versie: 0.1.34
-Inschrijf datum: 03DEC97
+Versie: 0.1.35
+Inschrijf datum: 05DEC97
 Beschrijving: LilyPond is de muziek typesetter van het GNU Project.  
                Het programma genereert muziek in zichtbare of 
                hoorbare vorm uit uit een muzikale definitie file: 
@@ -16,8 +16,8 @@ Auteur: hanwen@stack.nl (Han-Wen Nienhuys)
        jan@digicash.com (Jan Nieuwenhuizen)
 Onderhouden door: hanwen@stack.nl (Han-Wen Nienhuys)
 Voornaamste plek: sunsite.unc.edu /pub/Linux/apps
-       395k lilypond-0.1.34.tar.gz 
+       395k lilypond-0.1.35.tar.gz 
 Oorspronkelijke plek: pcnov095.win.tue.nl /pub/lilypond/
-       395k lilypond-0.1.34.tar.gz 
+       395k lilypond-0.1.35.tar.gz 
 Copi"eer politie: GPL
 End
index 3c14c25a1723c761dabb14aff83281437bb7b3e8..5c18142039857a425779e4614c591a70e4ee9fe9 100644 (file)
@@ -1,7 +1,7 @@
 Begin3
 Title: LilyPond
-Version: 0.1.34
-Entered-date: 03DEC97
+Version: 0.1.35
+Entered-date: 05DEC97
 Description: LilyPond is the GNU Project music typesetter.  The program
                generates visual or auditive output from a music 
                definition file: it can typeset formatted sheet music 
@@ -14,8 +14,8 @@ Author: hanwen@stack.nl (Han-Wen Nienhuys)
        jan@digicash.com (Jan Nieuwenhuizen)
 Maintained-by: hanwen@stack.nl (Han-Wen Nienhuys)
 Primary-site: sunsite.unc.edu /pub/Linux/apps/sound/convert
-       440k lilypond-0.1.34.tar.gz 
+       460k lilypond-0.1.35.tar.gz 
 Original-site: pcnov095.win.tue.nl /pub/lilypond/development/
-       440k lilypond-0.1.34.tar.gz 
+       460k lilypond-0.1.35.tar.gz 
 Copying-policy: GPL
 End
index bc3e34ed5d93cca5246badeb489aa13039ba1e3a..b98fc8e244a43d66f5bc0b97fede0be68aa045a6 100644 (file)
@@ -14,8 +14,8 @@ Author: hanwen@stack.nl (Han-Wen Nienhuys)
        jan@digicash.com (Jan Nieuwenhuizen)
 Maintained-by: hanwen@stack.nl (Han-Wen Nienhuys)
 Primary-site: sunsite.unc.edu /pub/Linux/apps/sound/convert
-       440k lilypond-@TOPLEVEL_VERSION@.tar.gz 
+       460k lilypond-@TOPLEVEL_VERSION@.tar.gz 
 Original-site: pcnov095.win.tue.nl /pub/lilypond/development/
-       440k lilypond-@TOPLEVEL_VERSION@.tar.gz 
+       460k lilypond-@TOPLEVEL_VERSION@.tar.gz 
 Copying-policy: GPL
 End
index 8e3d32b7d8a2b8a76b72bafa080293fc4b1884ea..a3b3567d0a3bf2755118b842c8f838749286fd5f 100644 (file)
@@ -1,9 +1,9 @@
 Name: lilypond
-Version: 0.1.34
+Version: 0.1.35
 Release: 1
 Copyright: GPL
 Group: Applications/Publishing
-Source0: alpha.gnu.org:/gnu/lilypond/development/lilypond-0.1.34.tar.gz
+Source0: alpha.gnu.org:/gnu/lilypond/development/lilypond-0.1.35.tar.gz
 Summary: A program for typesetting music.
 URL: http://www.stack.nl/~hanwen/lilypond
 Packager: Han-Wen Nienhuys <hanwen@stack.nl>
diff --git a/mf/TODO b/mf/TODO
index c94d227b8648c5892c819b8e23ab19bddea51137..13465460b9b8581b63cbf07add3ebc015c497406 100644 (file)
--- a/mf/TODO
+++ b/mf/TODO
@@ -8,7 +8,6 @@
        - more symbols
          * some scripts:
          * piano pedals,
-         * braces.
          * trills
          * maxima notehead
          * coda signs.
diff --git a/mf/feta-beugel.mf b/mf/feta-beugel.mf
new file mode 100644 (file)
index 0000000..df625dc
--- /dev/null
@@ -0,0 +1,44 @@
+input feta-macros;
+input feta-params;
+
+save code;
+code :=0;
+
+
+def draw_brace( expr height_sharp, width_sharp) = 
+       save pendir, height, width, thin, thick;
+       save penangle;
+       height# := height_sharp;
+       width#  := width_sharp;
+
+       beginchar(incr code, width#, height#/2, height#/2);
+       define_pixels (height, width);
+       thin = 2 stafflinethickness;
+       thick = .5 interline;
+       
+       z2 = .5 [z1, z3];
+       y3 = y1 + height/2;
+       x3 = x1 + width;
+       y1 =0;
+       x3 = - width / 2;
+
+       pair pendir;
+       pendir = unitvector(x3 - x1, y3/6 - y1);
+       penangle = angle pendir - 90;
+       penpos3(thin, penangle);
+       penpos2(thick, angle(z3 -z1) -90 );
+       penpos1(2/3 thin, penangle);
+       
+       penlabels(1,2,3);
+       fill z2r ..  simple_serif (z3r, z3l, 90)
+               .. z2l .. simple_serif (z1l, z1r, 90) ..cycle;
+
+       addto currentpicture also currentpicture yscaled -1;
+endchar;
+enddef;
+
+
+for h :=  2 staffsize#  step 2 pt# until (6 * staffsize#):
+       draw_brace(h, interline# );
+endfor
diff --git a/mf/feta-braces16.mf b/mf/feta-braces16.mf
new file mode 100644 (file)
index 0000000..c5748c1
--- /dev/null
@@ -0,0 +1,17 @@
+
+% 
+% feta-braces16.mf --  implement 
+% 
+% source file of the Feta (Font-En-Tja) music font
+% 
+% (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+% 
+
+font_identifier:="feta-braces16";
+font_size 16;
+mode_setup;
+
+staffsize#:=16pt#;
+input feta-beugel;
+end.
+
diff --git a/mf/feta-braces20.mf b/mf/feta-braces20.mf
new file mode 100644 (file)
index 0000000..a3a3d6c
--- /dev/null
@@ -0,0 +1,15 @@
+% 
+% feta-braces20.mf --  implement 
+% 
+% source file of the Feta (Font-En-Tja) music font
+% 
+% (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+% 
+
+font_identifier:="feta-braces16";
+font_size 20;
+mode_setup;
+
+staffsize#:=20pt#;
+input feta-beugel;
+end.
index 385f6dffb3361155188f022a33eee5b0b74a2a48..bd9eb4f542cdee772e01a2098f6e97859b28546d 100644 (file)
@@ -130,7 +130,9 @@ def draw_bass_klef(expr exact_center, reduction) =
        labels(2,4);
        penlabels(1,2,3,4);
 
-       pickup pencircle scaled (.35 reduced_il);
+       save dot_diam;
+       2 dot_diam = reduction* (interline - stafflinethickness);
+       pickup pencircle scaled dot_diam;
        draw z5;
        draw z5 yscaled -1;
 enddef;
index 8bcdf19bc8ee190ee918a5cc509f4f2b313297b5..b87363a983fd65da528132adc185e0d023bd9274 100644 (file)
@@ -11,19 +11,19 @@ define_pixels(beamheight);
 pen beam_pen;
 beam_pen:=penrazor scaled beamheight rotated 90;
 
-ELEM_TAN:=0.05;
-SLOPES:=20;
-LENGTHS:=6;
-ELEM_FACTOR := 2;
-ELEM_INITIAL_LEN:=2;
+elem_tan:=0.05;
+slopes:=20;
+lengths:=6;
+elem_factor := 2;
+elem_initial_len:=2;
 
-for i := -SLOPES upto SLOPES:
-       width:= ELEM_INITIAL_LEN;
-       for j:=1 upto LENGTHS:
-               beginchar(128 + i * LENGTHS + j -1 ,width,0,0);
+for i := -slopes upto slopes:
+       width:= elem_initial_len;
+       for j:=1 upto lengths:
+               beginchar(128 + i * lengths + j -1 ,width,0,0);
                        pickup beam_pen;
-                       draw origin--(lft w,w*i*ELEM_TAN);
+                       draw origin--(lft w,w*i*elem_tan);
                        endchar;
-               width:=ELEM_FACTOR *width;
+               width:=elem_factor *width;
                endfor;
        endfor;
index d47d5aa631637f3b9d7d1973d748768e43abe2fe..f80938b853149cf391bd64397ce78a69733e86c8 100644 (file)
@@ -1,5 +1,5 @@
 % generated automatically by mf-to-table.py version 0.4
-% on Thu Dec  4 23:42:11 1997
+% on Fri Dec  5 11:52:40 1997
 % Do not edit
 % input from out/feta16.log
 % name
index 8ccf31e844aeb4577884521d9ca62891c3c61ae4..3b2ee96e3e2700116199dededb701844d0ebef7b 100644 (file)
@@ -1,5 +1,5 @@
 % generated automatically by mf-to-table.py version 0.4
-% on Thu Dec  4 23:42:34 1997
+% on Fri Dec  5 11:52:42 1997
 % Do not edit
 % input from out/feta20.log
 % name
index 96ee2494cfd36ee4a7b9b2dcaa800b32a5c67b7d..0301959589d47170a077ca4bb2680b6076be347a 100644 (file)
@@ -6,15 +6,18 @@
         \font\vetfont=feta-beams16
         \font\fetanummer=feta-nummer8
         \font\dynfont=feta-din10 scaled \magstep1
-        \font\fingerfont=feta-nummer4
+        \font\bracefont=feta-braces16
+         \font\fingerfont=feta-nummer4
 }
 \def\fettwentydefs{
         \font\fontentja=feta20
         \font\vetfont=feta-beams20
         \font\fetanummer=feta-nummer10
         \font\dynfont=feta-din10 scaled \magstep2
-        \font\fingerfont=feta-nummer5
+        \font\bracefont=feta-braces20
+         \font\fingerfont=feta-nummer5
 }
+
 \def\fetdef#1#2{\def#1{%
         \hbox{\fetchar{#2}}}}
 
@@ -37,6 +40,8 @@
         \hbox to0.45\balkheight{\hss\fetanummer #2\hss}%
         \vss}}
 
+\def\pianobrace#1{{\bracefont\char #1}}
+
 \newcount\embedcount\embedcount=0
 \newwrite\checkexists
 \newwrite\embedfile
 }
 
 
+
index 49a0f3e3c4349870d97df4ffaf670cc593814cd2..3e2300989e7adbdf8084c2ff7859c24470326a7f 100644 (file)
 \def\startbar#1{\leftalign{\thickbar{#1}\kern\smallspace\thinbar{#1}}}
 \def\finishbar#1{\rightalign{\thinbar{#1}\kern\smallspace\thickbar{#1}}}
 
-\def\pianobrace#1{{\musicdraw\char#1}}
 \def\slurcharh#1{{\slurhfont\char#1}}
 \def\slurcharu#1{{\slurufont\char#1}}
 \def\slurchard#1{{\slurdfont\char#1}}
index f65eff62b819908ca1990c5fab62a74aa8ca4f77..582c4dcd90e14844f89e0aa5d4bfd9a38ddc6f5f 100644 (file)
 \musicdef\downbow{22}
 
 \def\tr{{\it tr}}
+\def\pianobrace#1{{\musicdraw\char#1}}
 
 % \def\beamuslope#1#2{{\count0=#2\advance\count0 by#1
 %         \advance\count0 by 122
index 9cd871e4d90b3129eff7e9996cf0b25257ae386e..f134e99e2a86ca3a3162f989d04d63ca42632a7c 100644 (file)
@@ -13,7 +13,8 @@
 \def\thearranger{}
 \def\theinstrument{}
 %
-\newcommand*{\title}[1]{\def\thetitle{#1\\}}
+% duh.  LaTeX has a \title too.
+\renewcommand*{\title}[1]{\def\thetitle{#1\\}}
 \newcommand*{\subtitle}[1]{\def\thesubtitle{#1\\}}
 \newcommand*{\composer}[1]{\def\thecomposer{#1\\}}
 \newcommand*{\arranger}[1]{\def\thearranger{#1}}