From 86f02d911398a55f8b6bfa8e1d843b96856c031b Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Wed, 21 Jul 1999 12:42:47 +0200 Subject: [PATCH] release: 1.1.64 --- DEDICATION | 2 +- Documentation/BLURB.in | 5 +- Documentation/tex/lilypond-regtest.doc | 37 ++-- Documentation/tex/reference-manual.yo | 28 +++ NEWS | 25 ++- TODO | 15 +- VERSION | 4 +- debian/control | 5 +- debian/out/control | 5 +- input/bugs/ch.ly | 3 + input/bugs/dots.fly | 2 + input/test/allfontstyle.ly | 13 +- input/test/dots.fly | 3 +- input/test/spacing-loose.ly | 6 + input/test/spacing-natural.ly | 8 + input/test/spacing-tight.ly | 4 +- input/test/stem-direction.sly | 2 +- lib/duration-iter.cc | 3 +- lily/break-align-item.cc | 13 +- lily/dot-column.cc | 27 ++- lily/grace-engraver-group.cc | 3 +- lily/lookup.cc | 21 +- lily/parser.yy | 7 +- lily/rhythmic-column-engraver.cc | 16 +- lily/spacing-spanner.cc | 22 +- lily/stem.cc | 11 +- ly/engraver.ly | 2 + ly/ledger.ly | 7 + ly/letter.ly | 6 + ly/paper11.ly | 6 +- ly/params.ly | 4 +- make/out/lilypond.lsm | 13 +- make/out/lilypond.spec | 9 +- make/toplevel.make.in | 5 +- mf/GNUmakefile | 6 +- mf/feta-autometric.mf | 2 +- mf/feta.mp | 52 ----- midi2ly/midi-parser.cc | 2 +- mutopia/Coriolan/coriolan-part-paper.ly | 6 +- mutopia/Coriolan/coriolan.ly | 4 +- mutopia/Coriolan/fagotto-2.ly | 2 +- mutopia/Coriolan/flauto-2.ly | 2 +- mutopia/Coriolan/viola-1.ly | 8 +- mutopia/Coriolan/viola-part.ly | 22 +- mutopia/Coriolan/violino-1.ly | 4 +- mutopia/Coriolan/violoncello.ly | 4 +- mutopia/F.Schubert/AnSylvia.ly | 110 +++++----- mutopia/Hymns/diademata.ly | 79 ++++--- mutopia/Hymns/ode.ly | 54 ++--- mutopia/Hymns/stille.ly | 268 ++++++++++++++---------- stepmake/make/out/stepmake.lsm | 8 +- stepmake/make/out/stepmake.spec | 4 +- stepmake/stepmake/metapost-rules.make | 19 +- 53 files changed, 563 insertions(+), 435 deletions(-) create mode 100644 input/bugs/ch.ly create mode 100644 input/bugs/dots.fly create mode 100644 input/test/spacing-loose.ly create mode 100644 input/test/spacing-natural.ly create mode 100644 ly/ledger.ly create mode 100644 ly/letter.ly delete mode 100644 mf/feta.mp diff --git a/DEDICATION b/DEDICATION index b6a224e0b3..5ce61d6331 100644 --- a/DEDICATION +++ b/DEDICATION @@ -21,7 +21,7 @@ Eva, Roos, Judith, Tim, and, of course, Wendy! Of course, our other friends in the `Eindhovens Jongeren Ensemble' -(http://www.cs.uu.nl/~hanwen/eje.html) cannot go unmentioned either. +(http://www.cs.uu.nl/~hanwen/eje/) cannot go unmentioned either. --- * --- diff --git a/Documentation/BLURB.in b/Documentation/BLURB.in index d423023825..0d7df0a9d9 100644 --- a/Documentation/BLURB.in +++ b/Documentation/BLURB.in @@ -1,4 +1,5 @@ -LilyPond produces beautiful sheet music using a high level description -file as input. LilyPond is part of the GNU project. +LilyPond is a music typesetter. It produces beautiful sheet music +using a high level description file as input. It is part of the GNU +project. diff --git a/Documentation/tex/lilypond-regtest.doc b/Documentation/tex/lilypond-regtest.doc index 6c6cdc4796..74ca05df7a 100644 --- a/Documentation/tex/lilypond-regtest.doc +++ b/Documentation/tex/lilypond-regtest.doc @@ -25,11 +25,11 @@ you must create a special context called Thread. \mudelafile{noteheadstyle.ly} -Noteheads can have dots, and ---although this is bad style--- rests -can too. Augmentation dots should never be printed on a staff line, -but rather be shifted: down stem notes shift dots down, up stem up. -In case of chords, all dots should be in a column. The dots go along -as rests are shifted to avoid collisions. +Noteheads can have dots, and ---although this is bad style in duple +meters--- rests can too. Augmentation dots should never be printed on +a staff line, but rather be shifted: down stem notes shift dots down, +up stem up. In case of chords, all dots should be in a column. The +dots go along as rests are shifted to avoid collisions. \mudelafile{dots.fly} @@ -54,7 +54,8 @@ the two systems for y dimensions (1 unit = staffspace, 1 unit = 1 point) are mixed. Stems, beams, ties and slurs should behave similarly, when placed -on the middle staff line. +on the middle staff line. Of course stem-direction is down for high +notes, and up for low notes. \mudelafile{stem-direction.sly} @@ -190,12 +191,23 @@ effects. In this example, space for opposite pointed stems is adjusted \mudelafile{stem-spacing.sly} -Even if a line is very tightly spaced, there will still be room -between prefatory matter and the following notes. The same holds at -the end of line. +Even if a line is very tightly spaced, there will still be room +between prefatory matter and the following notes. The space after the +prefatory is very rigid. In contrast, the space before the barline +must stretch like the space within the measure. + +Tight: \mudelafile{spacing-tight.ly} +Natural: + +\mudelafile{spacing-natural.ly} + +Loose: + +\mudelafile{spacing-loose.ly} + \section{Global stuff} @@ -206,9 +218,8 @@ knowing it. Consequently, they fall over often. \mudelafile{bar-scripts.ly} Staff margins are also markings attached to barlines. They should be -left otf the staff, and be centered vertically wrt the staff. They -may be on normal staffs, but also on compound staffs, like the -PianoStaff +left of the staff, and be centered vertically wrt the staff. They may +be on normal staffs, but also on compound staffs, like the PianoStaff \mudelafile{staff-margin.ly} @@ -222,7 +233,7 @@ two measures all have the same distance from each other: Fonts are available in a default set of sizes: 11, 13, 16, 20, 23 and 26pt staffheight. Sizes of the text fonts and symbol fonts are made -to match the staff dimensions. +to match the staff dimensions. \mudelafile{size11.ly} diff --git a/Documentation/tex/reference-manual.yo b/Documentation/tex/reference-manual.yo index 4e5e209a0c..34e88a3dea 100644 --- a/Documentation/tex/reference-manual.yo +++ b/Documentation/tex/reference-manual.yo @@ -1944,6 +1944,34 @@ can contain code(\translator) keywords. The code(\paper) block can also contain identifier assignments and parameter assignments. Unlike at the top level, these assignments must be terminated by a semicolon. +subsect(Changing Font Size and Paper Size) + +The Feta font provides musical symbols at six different sizes. These +fonts are 11 point, 13 point, 16 point, 20 point, 23 point, and 26 +point. The point size of a font is the height of the five line staff +when displayed in the font. The default font is 20 points. To select +a different font size you must load the desired size with an +code(\include) keyword at the top level and then you must select the +desired size with an identifier in the code(\paper) block. To load a +font use the command code(\include "paper)var(N)code(.ly") where +var(N) is the desired font size. For example, using code(\include +"paper26.ly") will produce very large music. This statement should +appear at the top level at the top of your Mudela file. To select the +font for printing, this you must include code(\paper_twentysix) in the +code(\paper) block of your file. The identifiers that are used to +select different font sizes are code(paper_eleven), +code(paper_thirteen), code(paper_sixteen), code(paper_twenty), +code(paper_twentythree), and code(paper_twentysix). + +To change the paper size, you must first set the code(papersize) +variable at the top level. Set it to code(a4), code(letter), or +code(legal). After this specification, you must set the font as +described above. If you want the default font, then use the 20 point +font. The new paper size will not take effect if the font is not +loaded and selected afterwords. Paper size selection works by loading +a file named after the paper size you select. + + subsect(Paper variables) diff --git a/NEWS b/NEWS index e8e469e939..8936143ef0 100644 --- a/NEWS +++ b/NEWS @@ -1,8 +1,31 @@ +pl 63.uu1 + - mutopia updates courtesy Peter Chubb + - Don't make Time_scaled_music for c4*2/3 entry, only do the +time compression. Should cure spurious Tuplet_brace/spanner warnings. + +pl 63.hwn1 + - bf: Spacing for key/timesig at end of staff. + - negative font magnification + - slurs on grace notes. + - paper var stem_default_neutral_direction + - bf: dot-columns. + +pl 63.jcn2 + - bf: midi2ly/duration-iter/convert: handle durations >= 1 + - set reasonable default for text/dynamic paddings + pl 63.jcn1 + - junked some of (my) old metapost stuff + +pl 63.lu1 - some faq entries - chord input and proceccing fixes - bf: nederlands.ly - + +********** +pl 62.jcn4 + - fixes coriolan + pl 62.hwn1 - ps-to-pfa.py: use std modules re, find - minor input fixes diff --git a/TODO b/TODO index 35ff2f3e24..a0dde3ec79 100644 --- a/TODO +++ b/TODO @@ -11,24 +11,21 @@ Grep for TODO and ugh/ugr/urg. .* TODO before 1.2 . * align left edge of broken (de)cresc/slur/tie/tuplet/volta . * auto-staff-switching. +. * warning if feta-nummer.tfm not found . * broken examples: input/star-spangled-banner.ly: hw? -mutopia/J.S.Bach/Petites-Preludes/preludes-paper.ly? hw? mutopia/J.S.Bach/Solo-Cello-Suites/prelude-cello.ly: hw: slurs + autobeamer ? mutopia/Coriolan/* - . * spacing of accidentals . * key restorations & repeats . * spanners from grace to normal ctxt +. * rename \paper? . * Grace_slur_engraver. . * paperXX.ly \quartwidth, font setting not up to date. (Should read from AFM?) . * input/star-spangled-banner.ly: fold for lyrics? . * Break_req handling is silly (break_forbid () + \break fucks up.) . * account for accidentals in spacing. -. * indent = 0.0 with linewidth=-1.0 . * \shape 1st dim skipped? -. * PostScript -. * half notes in pfa . * We need feta-din*.mf files for more sizes than 10. . * fix dynamics decently, ie. use kerning & ligatures. @@ -74,6 +71,7 @@ one of the spacing bugs mentioned in the TODO. The words are aligned with the main note, not the start of the grace note. This is usually wrong, but is sometimes right. . * decimal point in \paper {} +. * tie-direction . * use melismaBusy in Lyric context to typeset melismata correctly. . * ly2dvi/lilypond logfile. . * hang Item on Spanner @@ -268,13 +266,14 @@ touching it. Address 0xefffeca8 is 728 bytes below frame pointer in function . * GNU diff 2.7: diff -rN does not see a new directory with empty file . * patch: don't touch timestamp if all patches fail. -. * mf-to-table -> add space before ; in AFM output. (-> check AFM - spec. Is this a bug in afm2tfm?) +. * MetaPost: should not generate setgray for unfill +. * mfplain.ini not in tetex 0.9 +. * mf-to-table -> add space 'before ; in AFM output. (-> check AFM +spec. Is this a bug in afm2tfm?) . * check out GCC signatures? . * glibc 2.0: f = fopen ("/dev/null", "r") assert (feof (f)) - . * tetex: mfplain.mem . * timesig: sometimes bottom digit too high: Xdvi doesn't handle newly created fonts correctly. diff --git a/VERSION b/VERSION index 78a3f7965a..c87048392c 100644 --- a/VERSION +++ b/VERSION @@ -1,8 +1,8 @@ PACKAGE_NAME=LilyPond MAJOR_VERSION=1 MINOR_VERSION=1 -PATCH_LEVEL=63 -MY_PATCH_LEVEL=lu1 +PATCH_LEVEL=64 +MY_PATCH_LEVEL= # use the above to send patches: MY_PATCH_LEVEL is always empty for a # released version. diff --git a/debian/control b/debian/control index 3076aee6f7..597acece90 100644 --- a/debian/control +++ b/debian/control @@ -10,8 +10,9 @@ Depends: ${shlibs:Depends}, tetex-bin (>= 0.9.981031-2) Recommends: python-base (>= 1.5.1), python-misc (>= 1.5.1), tetex-base (>= 0.9.981030-1), tetex-extra (>= 0.9.981030-1) Conflicts: musixtex-fonts, tetex-base (<< 0.9) Description: The GNU Project music typesetter. - LilyPond produces beautiful sheet music using a high level description - file as input. LilyPond is part of the GNU project. + LilyPond is a music typesetter. It produces beautiful sheet music + using a high level description file as input. It is part of the GNU + project. . diff --git a/debian/out/control b/debian/out/control index 3076aee6f7..597acece90 100644 --- a/debian/out/control +++ b/debian/out/control @@ -10,8 +10,9 @@ Depends: ${shlibs:Depends}, tetex-bin (>= 0.9.981031-2) Recommends: python-base (>= 1.5.1), python-misc (>= 1.5.1), tetex-base (>= 0.9.981030-1), tetex-extra (>= 0.9.981030-1) Conflicts: musixtex-fonts, tetex-base (<< 0.9) Description: The GNU Project music typesetter. - LilyPond produces beautiful sheet music using a high level description - file as input. LilyPond is part of the GNU project. + LilyPond is a music typesetter. It produces beautiful sheet music + using a high level description file as input. It is part of the GNU + project. . diff --git a/input/bugs/ch.ly b/input/bugs/ch.ly new file mode 100644 index 0000000000..3f4869781a --- /dev/null +++ b/input/bugs/ch.ly @@ -0,0 +1,3 @@ + + \score {\notes \context Voice = VA \relative c' { + } } diff --git a/input/bugs/dots.fly b/input/bugs/dots.fly new file mode 100644 index 0000000000..66f99d1de7 --- /dev/null +++ b/input/bugs/dots.fly @@ -0,0 +1,2 @@ + + diff --git a/input/test/allfontstyle.ly b/input/test/allfontstyle.ly index 0e995e64ab..aae8b05cd7 100644 --- a/input/test/allfontstyle.ly +++ b/input/test/allfontstyle.ly @@ -3,8 +3,15 @@ \score { \notes \relative c'' \context Staff { - \repeat "semi" 2 { \time 4/4; c4^"foo" } - \alternative { d-4 e-\fermata } \grace { c16 } f-\ff + \property Staff.textEmptyDimension = "1" + \repeat "semi" 2 { \time 4/4; c4^"cuivr\\'e"_\fermata } + \alternative { + { \property Voice.textStyle = "italic" d-4_"cantabile" } + { e } } \grace { c16 } + \property Voice.textStyle = "large" + f4-\ff^""^"Largo" \mark "B"; g + } + \paper { linewidth = -1.0; + \translator { \BarNumberingStaffContext} } - \paper { linewidth = -1.0; } } diff --git a/input/test/dots.fly b/input/test/dots.fly index a111a6df2f..8a00b4861f 100644 --- a/input/test/dots.fly +++ b/input/test/dots.fly @@ -1,6 +1,7 @@ d''4. b c4 | -%This doesn't really work yet. + + \context Staff < \context Voice = VA { \stemup r4. } diff --git a/input/test/spacing-loose.ly b/input/test/spacing-loose.ly new file mode 100644 index 0000000000..e0893afab8 --- /dev/null +++ b/input/test/spacing-loose.ly @@ -0,0 +1,6 @@ +\score { + \notes { \time 2/2; c'2 c'2 \time 2/2; } + \paper { linewidth = 5.0\cm; + indent = 0.0; + } +} diff --git a/input/test/spacing-natural.ly b/input/test/spacing-natural.ly new file mode 100644 index 0000000000..3a31c995c3 --- /dev/null +++ b/input/test/spacing-natural.ly @@ -0,0 +1,8 @@ + +\score { + \notes { \time 2/2; c'2 c'2 \time 2/2; } + \paper { linewidth = -1.0 \cm; + indent = 0.0; + } +} + diff --git a/input/test/spacing-tight.ly b/input/test/spacing-tight.ly index 93ae30563d..90a6e8bafc 100644 --- a/input/test/spacing-tight.ly +++ b/input/test/spacing-tight.ly @@ -1,5 +1,7 @@ \score { \notes { \time 2/2; c'2 c'2 \time 2/2; } - \paper { linewidth = 2.9\cm; } + \paper { linewidth = 2.5 \cm; + indent = 0.0; + } } diff --git a/input/test/stem-direction.sly b/input/test/stem-direction.sly index 0ac11c4480..70df9e2cfb 100644 --- a/input/test/stem-direction.sly +++ b/input/test/stem-direction.sly @@ -1 +1 @@ -b''4 ~ b8()b8 +b''4 ~ b8()b8 e4 e, diff --git a/lib/duration-iter.cc b/lib/duration-iter.cc index 5b16deeb88..9472c0217d 100644 --- a/lib/duration-iter.cc +++ b/lib/duration-iter.cc @@ -114,6 +114,5 @@ Duration_iterator::forward_dur () bool Duration_iterator::ok () { - return (cursor_dur_.durlog_i_ - && !((cursor_dur_.durlog_i_ == 0) && (cursor_dur_.dots_i_ > 2))); + return cursor_dur_.length_mom () <= Moment (4); } diff --git a/lily/break-align-item.cc b/lily/break-align-item.cc index 3e1ba4e18c..cf7cc9a649 100644 --- a/lily/break-align-item.cc +++ b/lily/break-align-item.cc @@ -104,8 +104,12 @@ Break_align_item::do_pre_processing() Axis_align_item::do_pre_processing(); - Real pre_space = elems[0]->extent (X_AXIS)[LEFT]; - Real spring_len = elems.top ()->extent (X_AXIS)[RIGHT]; + + Real pre_space = elems[0]->extent (X_AXIS)[LEFT] + + elems[0]->relative_coordinate (column_l ()->dim_cache_[X_AXIS], X_AXIS); + Real spring_len = elems.top ()->extent (X_AXIS)[RIGHT] + + elems.top ()->relative_coordinate (column_l ()->dim_cache_[X_AXIS], X_AXIS); + Real stretch_distance =0.; if (SCM_CAR (symbol_list) == extra_space_scm_sym) @@ -121,13 +125,16 @@ Break_align_item::do_pre_processing() /* Hint the spacing engine how much space to put in. + + + The pairs are in the format of an interval (ie. CAR < CDR). */ column_l ()->set_elt_property (extra_space_scm_sym, scm_cons (gh_double2scm (pre_space), gh_double2scm (spring_len))); column_l ()->set_elt_property (stretch_distance_scm_sym, - gh_cons (gh_double2scm (dists[0]), + gh_cons (gh_double2scm (-dists[0]), gh_double2scm (stretch_distance))); } diff --git a/lily/dot-column.cc b/lily/dot-column.cc index 56ffe94762..d510fba7f4 100644 --- a/lily/dot-column.cc +++ b/lily/dot-column.cc @@ -55,6 +55,21 @@ Dot_column::Dot_column () set_axes(X_AXIS,X_AXIS); } +/* + Will fuck up in this case. + + X. . + X.X . + |X . + | + | + |X . + | + | + + + Should be smarter. + */ void Dot_column::do_post_processing () { @@ -62,11 +77,21 @@ Dot_column::do_post_processing () return; Slice s; s.set_empty (); - + + Array taken_posns; + int conflicts = 0; for (int i=0; i < dot_l_arr_.size (); i++) { + for (int j=0; j < taken_posns.size (); j++) + if (taken_posns[j] == dot_l_arr_[i]->position_i_) + conflicts++; + taken_posns.push (dot_l_arr_[i]->position_i_); s.unite (Slice (dot_l_arr_[i]->position_i_,dot_l_arr_[i]->position_i_)); } + + if (!conflicts) + return; + int middle = s.center (); /* +1 -> off by one diff --git a/lily/grace-engraver-group.cc b/lily/grace-engraver-group.cc index 220b8c82f3..6c7547362d 100644 --- a/lily/grace-engraver-group.cc +++ b/lily/grace-engraver-group.cc @@ -116,7 +116,8 @@ Grace_engraver_group::pass_to_top_b (Music *m) const if (Span_req * sp = dynamic_cast (m)) { if (sp->span_type_str_ == "slur") - return true; + // return true; + return false; } return false; } diff --git a/lily/lookup.cc b/lily/lookup.cc index cc9466bc12..d82c1f55ba 100644 --- a/lily/lookup.cc +++ b/lily/lookup.cc @@ -10,7 +10,7 @@ TODO Glissando */ - +#include #include #include "lookup.hh" #include "debug.hh" @@ -361,7 +361,7 @@ Lookup::filledbox (Box b ) const /** Magnification steps. These are powers of 1.2. The numbers are taken from Knuth's plain.tex: */ -static Real mag_steps[] = {1, 1, 1.200, 1.440, 1.7280, 2.074, 2.488}; + /** TODO: THIS IS UGLY. Since the user has direct access to TeX @@ -381,10 +381,13 @@ Lookup::text (String style, String text, Paper_def *paper_l) const { font_h = paper_l->get_var ("font_" + style); } - + + + Real realmag = 1.0; if (paper_l->scope_p_->elem_b ("magnification_" + style)) { font_mag = (int)paper_l->get_var ("magnification_" + style); + realmag = pow (1.2, font_mag); } /* @@ -426,13 +429,6 @@ Lookup::text (String style, String text, Paper_def *paper_l) const } } - if (font_mag > 1 && font_mag < 7 ) - { - /* UGH */ - w *= mag_steps[font_mag]; - ydims *= mag_steps[font_mag]; - } - if(brace_count) { warning (_f ("Non-matching braces in text `%s', adding braces.", text.ch_C())); @@ -447,9 +443,8 @@ Lookup::text (String style, String text, Paper_def *paper_l) const } } - - DOUT << "\n" << to_str (w) << "\n"; - m.dim_.x () = Interval (0, w); + ydims *= realmag; + m.dim_.x () = Interval (0, w*realmag); m.dim_.y () = ydims; diff --git a/lily/parser.yy b/lily/parser.yy index 88da679854..bcbcf0cf10 100644 --- a/lily/parser.yy +++ b/lily/parser.yy @@ -747,11 +747,12 @@ Simple_music: | property_def | translator_change | Simple_music '*' unsigned '/' unsigned { - /* urg */ - $$ = new Time_scaled_music ($3, $5, $1); + $$ = $1; + $$->compress (Moment($3, $5 )); } | Simple_music '*' unsigned { - $$ = new Time_scaled_music ($3, 1, $1); + $$ = $1; + $$->compress (Moment ($3, 1)); } ; diff --git a/lily/rhythmic-column-engraver.cc b/lily/rhythmic-column-engraver.cc index d1d322af16..5e03c9b3fb 100644 --- a/lily/rhythmic-column-engraver.cc +++ b/lily/rhythmic-column-engraver.cc @@ -57,11 +57,10 @@ Rhythmic_column_engraver::process_acknowledged () stem_l_ = 0; } - /* - since ncol_p_ is announced, it already has its grace_scm_sym set, if we're - in a Grace context. - */ - if (ncol_p_->get_elt_property (grace_scm_sym) == SCM_BOOL_F) + + bool wegrace = get_property ("weAreGraceContext",0).to_bool (); + + if (!wegrace) for (int i=0; i < grace_slur_endings_.size(); i++) grace_slur_endings_[i]->add_column (ncol_p_); grace_slur_endings_.clear (); @@ -71,8 +70,9 @@ Rhythmic_column_engraver::process_acknowledged () void Rhythmic_column_engraver::acknowledge_element (Score_element_info i) { - if (get_property ("weAreGraceContext",0).to_bool () != + if ((get_property ("weAreGraceContext",0).to_bool () != (i.elem_l_->get_elt_property (grace_scm_sym) != SCM_BOOL_F)) + && !dynamic_cast (i.elem_l_)) return ; Item * item = dynamic_cast (i.elem_l_); @@ -125,8 +125,4 @@ Rhythmic_column_engraver::do_post_move_processing() stem_l_ =0; } - - - - ADD_THIS_TRANSLATOR(Rhythmic_column_engraver); diff --git a/lily/spacing-spanner.cc b/lily/spacing-spanner.cc index 5063bfa7a4..5b4a599fe3 100644 --- a/lily/spacing-spanner.cc +++ b/lily/spacing-spanner.cc @@ -79,10 +79,10 @@ Spacing_spanner::do_measure (int col1, int col2) const Item* combinations[4][2]={{l,r}, {lb,r}, {l,rb},{lb,rb}}; - for (int i=0; i < 4; i++) + for (int j=0; j < 4; j++) { - Score_column * lc = dynamic_cast (combinations[i][0]); - Score_column *rc = dynamic_cast (combinations[i][1]); + Score_column * lc = dynamic_cast (combinations[j][0]); + Score_column *rc = dynamic_cast (combinations[j][1]); if (!lc || !rc) continue; @@ -112,14 +112,20 @@ Spacing_spanner::do_measure (int col1, int col2) const } s.distance_f_ = left_distance; - if (!lc->musical_b () || !rc->musical_b ()) + /* + Only do tight spaces *after* barlines, not before. + + We want the space before barline to be like the note + spacing in the measure. + */ + if (!lc->musical_b ()) s.strength_f_ = non_musical_space_strength; Real right_dist = 0.0; if (next_hint != SCM_BOOL_F) { next_hint = SCM_CADR(next_hint); - right_dist += gh_scm2double (next_hint); + right_dist += - gh_scm2double (next_hint); } else { @@ -142,10 +148,8 @@ Spacing_spanner::do_measure (int col1, int col2) const stretch_dist += left_distance; if (next_stretch_hint != SCM_BOOL_F) - { - // see regtest spacing-tight - // stretch_dist += gh_scm2double (SCM_CADR (next_stretch_hint)); - } + // see regtest spacing-tight + stretch_dist += - gh_scm2double (SCM_CADR (next_stretch_hint)); else stretch_dist += right_dist; diff --git a/lily/stem.cc b/lily/stem.cc index 3551ad97cf..2dd984cac7 100644 --- a/lily/stem.cc +++ b/lily/stem.cc @@ -149,10 +149,13 @@ Stem::get_center_distance (Direction d) const Direction Stem::get_default_dir () const { - return (get_center_distance (UP) > - get_center_distance (DOWN)) - ? DOWN - : UP; + int du = get_center_distance (UP); + int dd = get_center_distance (DOWN); + + if (sign (dd - du)) + return Direction (sign (dd -du)); + + return Direction (int(paper_l ()->get_var ("stem_default_neutral_direction"))); } Direction diff --git a/ly/engraver.ly b/ly/engraver.ly index 4c21a7d1f5..7cca986936 100644 --- a/ly/engraver.ly +++ b/ly/engraver.ly @@ -82,6 +82,7 @@ RhythmicStaffContext=\translator{ \translator{\RhythmicStaffContext} VoiceContext = \translator { \type "Engraver_group_engraver"; + dynamicPadding = "5.0"; \consists "Dynamic_engraver"; % must come before text_engraver. \name Voice ; @@ -99,6 +100,7 @@ VoiceContext = \translator { % ugh. Order matters here. \consists "Melisma_engraver"; + textScriptPadding = "3.0"; \consists "Text_engraver"; \consists "Script_engraver"; \consists "Script_column_engraver"; diff --git a/ly/ledger.ly b/ly/ledger.ly new file mode 100644 index 0000000000..6aee59cd7c --- /dev/null +++ b/ly/ledger.ly @@ -0,0 +1,7 @@ + +% ledger.ly + +hsize = 11.0 \in; +vsize = 17.0 \in; + + diff --git a/ly/letter.ly b/ly/letter.ly new file mode 100644 index 0000000000..9d7cf77b23 --- /dev/null +++ b/ly/letter.ly @@ -0,0 +1,6 @@ +% letter.ly + +hsize = 8.5 \in; +vsize = 11.0 \in; + + diff --git a/ly/paper11.ly b/ly/paper11.ly index f41bc11c7e..2026d92ba5 100644 --- a/ly/paper11.ly +++ b/ly/paper11.ly @@ -5,8 +5,8 @@ paper_eleven = \paper { staffheight = 11.0\pt; % ugh see table11 for sizes - quartwidth = 3.63\pt; - wholewidth = 5.45\pt; + quartwidth = 3.63 \pt; + wholewidth = 5.45 \pt; font_large = 8.; font_Large = 6.; @@ -17,7 +17,7 @@ paper_eleven = \paper { font_number = 4.; font_dynamic = 10.; font_mark = 6.; - + magnification_dynamic = -4.0; -1=\font "feta11" -2=\font "feta11" 0=\font "feta11" diff --git a/ly/params.ly b/ly/params.ly index e9fc341694..033f1c9a3f 100644 --- a/ly/params.ly +++ b/ly/params.ly @@ -201,12 +201,14 @@ stemSpacingCorrection = 0.5*\interline; % relative strength of space following tprefatory matter, and inline clefs. -non_musical_space_strength = 40.0; +non_musical_space_strength = 8.0; %If columns do not have spacing information set, set it to this much loose_column_distance = 2.0 * \interline; +% if stem is on middle line, choose this direction. +stem_default_neutral_direction = 1.0; \include "engraver.ly"; diff --git a/make/out/lilypond.lsm b/make/out/lilypond.lsm index 12d099bf33..37ec490e5d 100644 --- a/make/out/lilypond.lsm +++ b/make/out/lilypond.lsm @@ -1,10 +1,11 @@ Begin3 Title: LilyPond -Version: 1.1.63 -Entered-date: 20JUL99 +Version: 1.1.64 +Entered-date: 21JUL99 Description: -LilyPond produces beautiful sheet music using a high level description -file as input. LilyPond is part of the GNU project. +LilyPond is a music typesetter. It produces beautiful sheet music +using a high level description file as input. It is part of the GNU +project. Keywords: music notation typesetting midi fonts engraving @@ -12,8 +13,8 @@ Author: hanwen@cs.uu.nl (Han-Wen Nienhuys) janneke@gnu.org (Jan Nieuwenhuizen) Maintained-by: hanwen@stack.nl (Han-Wen Nienhuys) Primary-site: sunsite.unc.edu /pub/Linux/apps/sound/convert - 1000k lilypond-1.1.63.tar.gz + 1000k lilypond-1.1.64.tar.gz Original-site: ftp.cs.uu.nl /pub/GNU/LilyPond/development/ - 1000k lilypond-1.1.63.tar.gz + 1000k lilypond-1.1.64.tar.gz Copying-policy: GPL End diff --git a/make/out/lilypond.spec b/make/out/lilypond.spec index 72f5d55443..a9c8b2f628 100644 --- a/make/out/lilypond.spec +++ b/make/out/lilypond.spec @@ -1,9 +1,9 @@ Name: lilypond -Version: 1.1.63 +Version: 1.1.64 Release: 1 Copyright: GPL Group: Applications/Publishing -Source0: ftp.cs.uu.nl:/pub/GNU/LilyPond/development/lilypond-1.1.63.tar.gz +Source0: ftp.cs.uu.nl:/pub/GNU/LilyPond/development/lilypond-1.1.64.tar.gz Summary: A program for printing sheet music. URL: http://www.cs.uu.nl/~hanwen/lilypond Packager: Han-Wen Nienhuys @@ -13,8 +13,9 @@ Prereq: tetex %description -LilyPond produces beautiful sheet music using a high level description -file as input. LilyPond is part of the GNU project. +LilyPond is a music typesetter. It produces beautiful sheet music +using a high level description file as input. It is part of the GNU +project. diff --git a/make/toplevel.make.in b/make/toplevel.make.in index 55c21d3ad1..0b829a8511 100644 --- a/make/toplevel.make.in +++ b/make/toplevel.make.in @@ -27,7 +27,10 @@ STEPMAKE_TEMPLATES=toplevel yolily-toplevel po include $(depth)/make/stepmake.make # -website: htmldoc examples doc++ +website: htmldoc examples doc++ fonts + +fonts: + $(MAKE) -C mf examples: $(MAKE) CONFIGSUFFIX='www' -C input WWW diff --git a/mf/GNUmakefile b/mf/GNUmakefile index 21c285a5a4..a6804652c5 100644 --- a/mf/GNUmakefile +++ b/mf/GNUmakefile @@ -4,9 +4,7 @@ depth = .. STEPMAKE_TEMPLATES=metafont metapost install install-out -EXTRA_DIST_FILES += README feta.mp - -# wtf is feta.mp ? +EXTRA_DIST_FILES += README FET_FILES = $(wildcard feta[0-9]*.mf) @@ -42,4 +40,4 @@ $(outdir)/%.afm $(outdir)/%.tex $(outdir)/%.dep: $(outdir)/%.log $(PYTHON) $(buildscripts)/mf-to-table.py --package=$(topdir) --outdir=$(outdir) --dep $(outdir)/$( 0: makebox_with_breapth(proofrule); fi -% chardx := 10*(w + b); + chardx := (w + b); %what the hack is chardx shipit; endgroup enddef; diff --git a/mf/feta.mp b/mf/feta.mp deleted file mode 100644 index fb0fb32c68..0000000000 --- a/mf/feta.mp +++ /dev/null @@ -1,52 +0,0 @@ -% -% What's this ? --hwn -% - -% feta.mp - -batchmode; - -mode_def ljfour = - proofing:=0; % no, we're not making proofs - fontmaking:=1; % yes, we are making a font - tracingtitles:=0; % no, don't show titles at all - pixels_per_inch:=600; % that's the meaning of lowres - blacker:=.25; % make pens a bit blacker - fillin:=.0; % compensate for diagonal fillin - o_correction:=1; % but don't overshoot as much - enddef; - -if false: -def mode_param (suffix v) (expr e) = - if unknown mode_guard_.v: - v := e; - mode_guard_.v := 1; - fi -enddef; - -% This macro is invoked by all the modes, after |pixels_per_inch| -% has been defined, thus saving some space and time. -def mode_common_setup_ = - mode_param (proofing, 0); - mode_param (fontmaking, 1); - mode_param (tracingtitles, if pixels_per_inch > 700: 1 else: 0 fi); -enddef; - -% Works for a 600$\,$dpi Accel-a-Writer {\tt mackay@cs.washington.edu}, -% 16 August 95. -mode_def ljfour = %\[ HP LaserJet 4 (600dpi) - mode_param (pixels_per_inch, 600); - mode_param (blacker, .25); - mode_param (fillin, 0); - mode_param (o_correction, 1); - mode_common_setup_; -enddef; - -laserjetfour := ljfour; -fi - -mode=ljfour; -mag=100.0; - -input feta20.mf - diff --git a/midi2ly/midi-parser.cc b/midi2ly/midi-parser.cc index 6b4fbe0d6d..ed9c5a49e3 100644 --- a/midi2ly/midi-parser.cc +++ b/midi2ly/midi-parser.cc @@ -53,7 +53,7 @@ unsigned Midi_parser::get_u (int n) { assert (n <= (int)sizeof(int)); - return String_convert::bin2_i (get_str (n)); + return String_convert::bin2_u (get_str (n)); } String diff --git a/mutopia/Coriolan/coriolan-part-paper.ly b/mutopia/Coriolan/coriolan-part-paper.ly index 2154b4118f..9b1377d666 100644 --- a/mutopia/Coriolan/coriolan-part-paper.ly +++ b/mutopia/Coriolan/coriolan-part-paper.ly @@ -1,8 +1,6 @@ \paper { \translator { \OrchestralPartStaffContext } - \translator { \ScoreContext - skipBars = 1; - } + \translator { \VoiceContext beamAuto=0; } + \translator { \ScoreContext skipBars = 1; } castingalgorithm = \Wordwrap; - } diff --git a/mutopia/Coriolan/coriolan.ly b/mutopia/Coriolan/coriolan.ly index f1f569d53f..530d6daed8 100644 --- a/mutopia/Coriolan/coriolan.ly +++ b/mutopia/Coriolan/coriolan.ly @@ -74,9 +74,9 @@ strijkers = \context StaffGroup = strijkers_group < \$strijkers > \paper{ - % Give hara-kiri something to do... - % URG fixme Score+HaraKiri! linewidth = 130.0\mm; + \translator { \VoiceContext beamAuto=0; } + \translator { \HaraKiriStaffContext } \translator { \OrchestralScoreContext } } \midi{ \tempo 4 = 160; } diff --git a/mutopia/Coriolan/fagotto-2.ly b/mutopia/Coriolan/fagotto-2.ly index 1ee6a0f2c8..a7da1b1e91 100644 --- a/mutopia/Coriolan/fagotto-2.ly +++ b/mutopia/Coriolan/fagotto-2.ly @@ -14,7 +14,7 @@ fagotto2 = \notes \relative c { fis4-. r r2 | r1 | g4-. r r2 | g4-. r r2 | R1 *5 | %20 r2 r4 g,4-. | - R1*6 | r4 g'\f r2 | R1*5 | as1\ff %~ | + R1*6 | r4 g'\f r2 | R1*6 | as1\ff %~ | %35 } diff --git a/mutopia/Coriolan/flauto-2.ly b/mutopia/Coriolan/flauto-2.ly index 5a0299cfdd..5a85db28d2 100644 --- a/mutopia/Coriolan/flauto-2.ly +++ b/mutopia/Coriolan/flauto-2.ly @@ -14,7 +14,7 @@ flauto2 = \notes \relative c { c4-. r r2 | r1 | es4-. r r2 | d,4-. r r2 | R1 *4 | r2 r2 | %20 - r2 r4 b4-. | R1*6 | r4 c r2 | R1*5 | c1 % ~ | + r2 r4 b4-. | R1*6 | r4 c r2 | R1*6 | c1 % ~ | %35 } diff --git a/mutopia/Coriolan/viola-1.ly b/mutopia/Coriolan/viola-1.ly index 44b2312950..1ee2457763 100644 --- a/mutopia/Coriolan/viola-1.ly +++ b/mutopia/Coriolan/viola-1.ly @@ -79,8 +79,8 @@ viola1 = \notes \relative c { [d8-"cresc." d-.] es4. es8-. d4 ~ | [d8 d-.] es4. es8-. d4 ~ | [d8 d-.] es4. es8-. d4 ~ | - [d8 d-.] es4. es8-. d4 | - fis,2:\ff fis4: g: | + [d8 d-.] es4. es8-. d4 (| + )fis,2:\ff fis4: g: | %85 d2: d: | fis: fis4: g: | c,: d: c: d: | b2: b4: c: | f': es: f: es: | %90 @@ -222,8 +222,8 @@ viola1 = \notes \relative c { [g8 g-.] as4. as8-. g4 ~ | %210 [g8 g-.] as4. as8-. g4 ~ | - [g8 g-.] as4. as8-. g4 ~ | - b,2:16\ff b4: c: | g'2: g: | + [g8 g-.] as4. as8-. g4 (| + )b,2:16\ff b4: c: | g'2: g: | %214 b,2:16\ff b4: c: | g'2: g: | e2:16\ff e4: f: | b,: c: b: c: | diff --git a/mutopia/Coriolan/viola-part.ly b/mutopia/Coriolan/viola-part.ly index 451392a491..d7448fa7a7 100644 --- a/mutopia/Coriolan/viola-part.ly +++ b/mutopia/Coriolan/viola-part.ly @@ -13,21 +13,21 @@ copyright = "public domain"; \include "viola-1.ly" \include "viola-2.ly" -$viola_staff = \context Staff = violai < - \property Staff.midiInstrument = "viola" - \property Staff.instrument = "Viola" - \property Staff.instr = "Vla." - \clef "alto"; - \notes \context Voice=one < - \global - \$viola1 - \$viola2 - > +$viola_staff = \context GrandStaff = viola < + \$viola1_staff + \$viola2_staff > \score{ \$viola_staff - \include "coriolan-part-paper.ly" + %%\include "coriolan-part-paper.ly" + \paper{ + castingalgorithm = \Wordwrap; + \translator { \VoiceContext beamAuto=0; } + \translator { \HaraKiriStaffContext } + % \translator { \ScoreContext skipBars = 1; } + \translator { \OrchestralScoreContext skipBars = 1; } + } \midi{ \tempo 4 = 160; } } diff --git a/mutopia/Coriolan/violino-1.ly b/mutopia/Coriolan/violino-1.ly index 8579677fe8..5ea0add43d 100644 --- a/mutopia/Coriolan/violino-1.ly +++ b/mutopia/Coriolan/violino-1.ly @@ -76,8 +76,8 @@ violino1 = \notes \relative c { [a8 bes-.] bes4. bes8-. bes4~| [bes8 bes-.] bes4. bes8-. bes4~| [bes8 c-.] c4. c8-. c4~| - [c8 d-.] d4. d8-. d4~| - es2:16\ff es4: d: | + [c8 d-.] d4. d8-. d4(| + )es2:16\ff es4: d: | %85 fis: g: fis: g: | es2: es4: d: | diff --git a/mutopia/Coriolan/violoncello.ly b/mutopia/Coriolan/violoncello.ly index 2ea3f661e9..b2743d9e0b 100644 --- a/mutopia/Coriolan/violoncello.ly +++ b/mutopia/Coriolan/violoncello.ly @@ -204,8 +204,8 @@ violoncello = \notes \relative c { %185 [g(f' d f][g f d )g,~] | [g(e' c d][g e c )g~] | - [g(d' b d][g d b )g~] | - e2\ff d' | cis a ~ | + [g(d' b d][g d b )g(] | + )e2\ff d' | cis a ~ | %190 [a8( f' d f][a f d )a!~] | [a( e' cis e][a e c )a!~] | diff --git a/mutopia/F.Schubert/AnSylvia.ly b/mutopia/F.Schubert/AnSylvia.ly index f2b0d496cc..409e7aefde 100644 --- a/mutopia/F.Schubert/AnSylvia.ly +++ b/mutopia/F.Schubert/AnSylvia.ly @@ -15,10 +15,10 @@ title = "An Sylvia"; \include "paper16.ly"; \include "paper13.ly"; -pianoRH=\notes \relative c'' { +pianoRH=\notes \relative c' { \clef "G"; %1 - <[b,8-.(\pp d-. g-.> <)b-. d-. g-.>] + <[b8-.(\pp d-. g-.> <)b-. d-. g-.>] <[b8-. d-. g-.(> <)b-. d-. g-.>] | %2 @@ -236,7 +236,7 @@ tune=\notes \relative c'' { %18 r1 | %19 - d2. \context Staff < {\voiceone b8 ~ g8} {\voicetwo [b8 g8]} > | + d2. \context Staff < {\voiceone b8( )g8} {\voicetwo [b8 g8]} > | %20 \property Voice.slurdash = 2 fis4( )e \property Voice.slurdash = "" @@ -259,50 +259,50 @@ tune=\notes \relative c'' { r1 \bar "|."; } -fourbars=\lyrics { "_"1*5 } +fourbars=\lyrics { ""1*4 } verseOne=\lyrics { - Who2. is4 | Syl- via, _2 | + Who2. is4 | Syl- via, ""2 | What2. is4 | she,2 That4 | all our swains com- | mend2 her?4 " " | " "1 | Ho-4 - - ly, | - fair,2 _4 and | + fair,2 ""4 and | wise2. is4 | - she;2 _4 The | + she;2 ""4 The | heav'ns4 such grace did | - lend2 her4 _ | _1 | + lend2 her4 "" | ""1 | That2. a-4 | - do- red _2 | + do- red ""2 | She2. might4 | - be,2 _ | + be,2 "" | That2 a- | do- red | - she2. might4 | be.2 _ | + she2. might4 | be.2 "" | } verseTwo=\lyrics { - Is2. she4 | kind,2 _4 as | - she2. is4 |fair?2 _4 For | - beau- ty lives with | kind-2 ness4 _ | _1 | - To2. her4 |eyes2 _4 doth | Love 2. re-4 | - pair,2 _4 To | help him of his | blind-2 ness;4 _ | - _1 | - And2*3/2 be-8 ing | help'd4 - _ _ | in-2. hab-8 its | - there,2 _4 And | - be-2 ing | help'd in- | ha-2 -4 bits4 | there.2 _2 | + Is2. she4 | kind,2 ""4 as | + she2. is4 |fair?2 ""4 For | + beau- ty lives with | kind-2 ness4 "" | ""1 | + To2. her4 |eyes2 ""4 doth | Love 2. re-4 | + pair,2 ""4 To | help him of his | blind-2 ness;4 "" | + ""1 | + And2*3/2 be-8 ing | help'd4 - "" "" | in-2. hab-8 its | + there,2 ""4 And | + be-2 ing | help'd in- | ha-2 -4 bits4 | there.2 ""2 | } verseThree=\lyrics { - Then2. to4 | Syl-4 via _2 | - let2. us4 | sing,2 _4 That | - Syl- via is ex- | cel4 - ing; _ | _1 | - She2. ex-4 | cels2 _4 each | mor - - tal | - thing,2 _4 Up- | on the dull earth | dwell-2 ing4 - _ | _1 | - To2. her4 | gar- lands _2 | let2. us4 | - bring,2 _ | To her | gar- lands | let2. us4 | - bring.2 _ | + Then2. to4 | Syl-4 via ""2 | + let2. us4 | sing,2 ""4 That | + Syl- via is ex- | cel4 - ing; "" | ""1 | + She2. ex-4 | cels2 ""4 each | mor - - tal | + thing,2 ""4 Up- | on the dull earth | dwell-2 ing4 + "" | ""1 | + To2. her4 | gar- lands ""2 | let2. us4 | + bring,2 "" | To her | gar- lands | let2. us4 | + bring.2 "" | } @@ -310,38 +310,38 @@ verseThree=\lyrics { %% German Words -- syllabification may be incorrect (entered by %% someone who knows no German!) origVerseOne=\lyrics { - Was2. ist4 | Sil-4 via, _2 | - sag-2. et4 | an,2 _4 + Was2. ist4 | Sil-4 via, ""2 | + sag-2. et4 | an,2 ""4 Da{\ss}4 | - sie die wie- te | Flur2 preist?4 _ | _1| - Sch\"on2. und4 | zart2 _4 seh'- | ich2. sie4 | - nah'n,2 _4 Auf4 | - Him- melsg- gunst " und" | Spur2 weist,4 _ | _1 - Da{\ss}2. ihr4 | al- les _2 | - un-2. ter4 | tan.2 _ | - Da{\ss}2 ihr | al- les | un-2. ter4 | tan2 _ | + sie die wie- te | Flur2 preist?4 "" | ""1| + Sch\"on2. und4 | zart2 ""4 seh'- | ich2. sie4 | + nah'n,2 ""4 Auf4 | + Him- melsg- gunst " und" | Spur2 weist,4 "" | ""1 + Da{\ss}2. ihr4 | al- les ""2 | + un-2. ter4 | tan.2 "" | + Da{\ss}2 ihr | al- les | un-2. ter4 | tan2 "" | } origVerseTwo=\lyrics { - Ist2. sie4 | sch\"on2 _4 und4 | gut2. da-4 | zu?2 _4 - Reiz4| labt wie mil- de | Kind-2 heit;4 _ | _1 | - Ihr-2. em4 | Aug'-2 _4 eilt | A-2. mor4 | - zu,2 _4 - Dort4 | heilt er sein- e | Blind-2 heit,4 _ | _1 | - Und2. ver-4 | weilt2 _4 in4 | s\"u{\ss}-2. er4 - Ruh'.2 _ | - Und2 ver-2 | weilt in | s\"u{\ss}-2. er4| Ruh'.2 _ | + Ist2. sie4 | sch\"on2 ""4 und4 | gut2. da-4 | zu?2 ""4 + Reiz4| labt wie mil- de | Kind-2 heit;4 "" | ""1 | + Ihr-2. em4 | Aug'-2 ""4 eilt | A-2. mor4 | + zu,2 ""4 + Dort4 | heilt er sein- e | Blind-2 heit,4 "" | ""1 | + Und2. ver-4 | weilt2 ""4 in4 | s\"u{\ss}-2. er4 + Ruh'.2 "" | + Und2 ver-2 | weilt in | s\"u{\ss}-2. er4| Ruh'.2 "" | } origVerseThree=\lyrics { - Dar4 - - um | Sil- via, _2 | t\"on',2. o4 | - Sang,2 _4 - Der4 | hold- en Sil- via | Ehr-2 en;4 _4 | _1 | - Je2. den4 | Reiz2 _4 be- |siegt2. sie4 | lang,2 _4 - Den | Er- de kann ge- | w\"ah-2 ren;4 _ | _1 | - Kr\"an-2. ze4 | ihr2 _4 und4 | Sai-2. ten4 - |klang!2 _ - Kr\"an-2 ze | ihr und | Sai-2. ten-4 |klang!2 _ | + Dar4 - - um | Sil- via, ""2 | t\"on',2. o4 | + Sang,2 ""4 + Der4 | hold- en Sil- via | Ehr-2 en;4 ""4 | ""1 | + Je2. den4 | Reiz2 ""4 be- |siegt2. sie4 | lang,2 ""4 + Den | Er- de kann ge- | w\"ah-2 ren;4 "" | ""1 | + Kr\"an-2. ze4 | ihr2 ""4 und4 | Sai-2. ten4 + |klang!2 "" + Kr\"an-2 ze | ihr und | Sai-2. ten-4 |klang!2 "" | } global=\notes { @@ -374,7 +374,7 @@ GermanWords = \lyrics< Vocals= < \context Staff = vocal < - \notes \transpose c {\clef "F"; \global\tune} + \notes {\clef "G2"; \global\tune} % {\context Lyrics = vocal \EnglishWords} {\context Lyrics = vocal \GermanWords} > diff --git a/mutopia/Hymns/diademata.ly b/mutopia/Hymns/diademata.ly index 5a6a838bc5..b3310914a3 100644 --- a/mutopia/Hymns/diademata.ly +++ b/mutopia/Hymns/diademata.ly @@ -1,78 +1,84 @@ \header { -filename = "diademata.ly"; -enteredby = "Peter Chubb"; -composer = "Sir G. J. Elvey"; -date = "1868"; -title = "Diademata"; -metre = "6 6. 8 6. D"; + filename = "diademata.ly"; + enteredby = "Peter Chubb"; + composer = "Sir G. J. Elvey"; + date = "1868"; + title = "Diademata"; + metre = "6 6. 8 6. D"; } + \version "1.1.52"; sop=\notes \transpose c''{ - ees2 | ees4 ees4 g2 g2 | c'1. \bar "||"; - c'2 | bes2 ees aes g | f1. \bar "||"; - f2 | g bes c' bes | a g4 ~ f bes2 - ees'2 | d' ees' c' c' | bes1. \bar "||"; - bes2 | bes g f ees | c'1. \bar "||"; - c'2 | c' a g f | d'1. \bar "||"; + ees2 ees4 ees4 g2 g2 | c'1. + c'2 | bes2 ees aes g | f1. + f2 | g bes c' bes | a g4( )f bes2 + ees'2 | d' ees' c' c' | bes1. + bes2 | bes g f ees | c'1. + c'2 | c' a g f | d'1. d'2 | ees'2. d'4 c'2 bes | aes f g - bes2 | aes g f f | ees\breve \bar "||"; + bes2 | aes g f f | ees\breve } alt=\notes \transpose c''{ - bes,2 bes,4 bes,4 ees2 ees2 | ees1. \bar "||"; - ees2 | ees ees d ees | d1. \bar "||"; + bes,2 bes,4 bes,4 ees2 ees2 | ees1. + ees2 | ees ees d ees | d1. d2 | ees f ees g | ees c f - ees2 | f g c f | d1. \bar "||"; - d2 | ees ees d ees | ees1. \bar "||"; - e2 | f f ees ees | d1. \bar "||"; + ees2 | f g c f | d1. + d2 | ees ees d ees | ees1. + e2 | f f ees ees | d1. f2 | ees ees ees ees | ees d ees - ees | ees ees ees d | ees\breve \bar "||"; + ees | ees ees ees d | ees\breve } ten=\notes \transpose c' { - g2 g4 g4 g2 g2 | aes1. \bar "||"; - aes2 | bes c' aes bes | bes1. \bar "||"; + g2 g4 g4 g2 g2 | aes1. + aes2 | bes c' aes bes | bes1. bes2 | bes bes g g | c' a bes - a2 | bes bes bes a | bes1. \bar "||"; - bes2 | bes bes aes bes | c'1. \bar "||"; - bes2 | a c' bes c' | bes1. \bar "||"; + a2 | bes bes bes a | bes1. + bes2 | bes bes aes bes | c'1. + bes2 | a c' bes c' | bes1. bes2 | bes bes aes bes | c' bes bes - bes c' bes bes2. aes4 | g\breve \bar "||"; + bes c' bes bes2. aes4 | g\breve } bass=\notes \transpose c' { - ees2 ees4 ees4 c2 c2 | aes,1. \bar "||"; - aes2 | g aes f ees | bes,1. \bar "||"; + ees2 ees4 ees4 c2 c2 | aes,1. + aes2 | g aes f ees | bes,1. bes,2 | ees d c ees | f ees d - c2 bes, ees f f | bes,1. \bar "||"; - aes2 | g ees f g | aes1. \bar "||"; - g2 | f f g a | bes1. \bar "||"; + c2 bes, ees f f | bes,1. + aes2 | g ees f g | aes1. + g2 | f f g a | bes1. aes2 | g g aes g | f bes ees - g,2 | aes, ees bes, bes, | ees\breve \bar "||"; + g,2 | aes, ees bes, bes, | ees\breve } global = \notes{ \time 4/2; - \property Staff.timeSignatureStyle="none" \key ees; + \skip 2*4; \skip 1.; \bar "||"; + \skip 2; \skip 2*4; \skip 1.; \bar "||";\break + \skip 2; \skip 2*12;\skip 1.; \bar "||";\break + \skip 2; \skip 2*4; \skip 1.; \bar "||"; + \skip 2; \skip 2*4; \skip 1.; \bar "||";\break + \skip 2; \skip 2*12;\skip 1.; \bar "||"; } $upper_staff = \context Staff = upper { - \global \clef "treble"; \context Staff < + \global { \voiceone \sop } { \voicetwo \alt } > } $lower_staff = \context Staff = lower { - \global \clef "bass"; \context Staff < + \global { \voiceone \ten } { \voicetwo \bass } > @@ -84,7 +90,12 @@ $lower_staff = \context Staff = lower { \$lower_staff > \paper { + indent = 0.0\mm; linewidth= 140.0\mm; gourlay_maxmeasures = 6.0; + \translator{ + \StaffContext + \remove "Time_signature_engraver"; + } } } diff --git a/mutopia/Hymns/ode.ly b/mutopia/Hymns/ode.ly index aef853723d..24542cdbc6 100644 --- a/mutopia/Hymns/ode.ly +++ b/mutopia/Hymns/ode.ly @@ -1,40 +1,40 @@ \header { -filename = "ode.ly"; -enteredby = "Peter Chubb"; -composer = " Beethoven"; -date = "1800"; -title = "Ode to Joy"; -metre = "8 7 8 7 D"; + filename = "ode.ly"; + enteredby = "Peter Chubb"; + composer = "Beethoven"; + date = "circa. 1800"; + title = "Ode to Joy"; + metre = "8 7 8 7 D"; } \version "1.1.52"; sop=\notes \relative c'' { - b4 b c d | d c b a | g g a b | b4. a8 a2 \bar "||"; - b4 b c d | d c b a | g g a b | a4. g8 g2 \bar "||"; - a4 a b g | a [b8 ~ c] b4 g | a [b8 ~ c] b4 a | g a d,2 \bar "||"; - b'4 b c d | d c b a | g g a b | a4. g8 g2 \bar "||"; + b4 b c d | d c b a | g g a b | b4. a8 a2 | + b4 b c d | d c b a | g g a b | a4. g8 g2 | + a4 a b g | a [b8( )c] b4 g | a [b8( )c] b4 a | g a d,2 | + b'4 b c d | d c b a | g g a b | a4. g8 g2 | } alto=\notes \relative c'' { - g4 g a g | g4. a8 g4 fis | d d fis g| g4. fis8 fis2 \bar "||"; - g4 g a g | g4. a8 g4 fis | d d fis g| g4 fis d2 \bar "||"; - d4 d d d | d d d d | d d fis fis | e cis d2 \bar "||"; - d4 g a a b [g8~a] g4 e | e d fis g |g fis g2 \bar "||"; + g4 g a g | g4. a8 g4 fis | d d fis g| g4. fis8 fis2 | + g4 g a g | g4. a8 g4 fis | d d fis g| g4 fis d2 | + d4 d d d | d d d d | d d fis fis | e cis d2 | + d4 g a a b [g8( )a] g4 e | e d fis g |g fis g2 | } tenor=\notes \relative c'{ - d4 d c b | e4. d8 d4 d | b b d d | d4. d8 d2 \bar "||"; - d4 d c b | e4. d8 d4 d | b b d d | d4 d b2 \bar "||"; - fis4 fis g e | fis [g8 ~ a8] g4 e | fis fis fis b | b a g ~ fis \bar "||"; - g4 d' f, f | g4. d'8 d4 c | g g c c | d d b2 \bar "||"; + d4 d c b | e4. d8 d4 d | b b d d | d4. d8 d2 | + d4 d c b | e4. d8 d4 d | b b d d | d4 d b2 | + fis4 fis g e | fis [g8( )a8] g4 e | fis fis fis b | b a g( )fis | + g4 d' f, f | g4. d'8 d4 c | g g c c | d d b2 | } bass= \notes \relative c' { - g4 g g g | e4. fis8 g4 d | b b a g | d'4. d8 d2 \bar "||"; - g4 g g g | e4. fis8 g4 d | b b a g | d' d g,2 \bar "||"; - d'4 d d d | d d d d | d d dis dis | e a, d2 \bar "||"; - g4 g f f | e4. fis8 g4 c, | c b a g | d' d g,2 \bar "||"; + g4 g g g | e4. fis8 g4 d | b b a g | d'4. d8 d2 | + g4 g g g | e4. fis8 g4 d | b b a g | d' d g,2 | + d'4 d d d | d d d d | d d dis dis | e a, d2 | + g4 g f f | e4. fis8 g4 c, | c b a g | d' d g,2 | } @@ -42,26 +42,28 @@ global=\notes{ \time 4/4; \property Staff.timeSignatureStyle="C" \key G; + \skip 1*4; \bar "||"; + \skip 1*4; \bar "||"; + \skip 1*4; \bar "||"; + \skip 1*4; \bar "|."; } $upper_staff = \context Staff = upper \notes { - \global \clef "G"; \context Staff < + \global {\voiceone \sop} {\voicetwo \alto} > - \bar "|."; } $lower_staff = \context Staff = lower \notes { - \global \clef "F"; \context Staff < + \global {\voiceone \tenor} {\voicetwo \bass } > - \bar "|."; } \score{ diff --git a/mutopia/Hymns/stille.ly b/mutopia/Hymns/stille.ly index a2d5573c88..6974285d12 100644 --- a/mutopia/Hymns/stille.ly +++ b/mutopia/Hymns/stille.ly @@ -1,163 +1,183 @@ \header { -title = "Stille Nacht"; -subtitle = "(Silent Night)"; -filename = "stille.ly"; -enteredby = "Peter Chubb"; -composer = "Franz X. Gruber"; -poet = "Joseph Mohr"; + title = "Stille Nacht"; + subtitle = "(Silent Night)"; + filename = "stille.ly"; + enteredby = "Peter Chubb"; + composer = "Franz X. Gruber"; + poet = "Joseph Mohr"; } \version "1.1.52"; +%{ + Note: there are other verses, but the three here seem to be + the most commonly sung ones. + I don't know who did the translation or the arrangement. +%} + global=\notes { - \time 6/4; - \key Bes; + \time 6/4; + \key Bes; + \skip 1.*12; + \bar "|."; } sop=\notes \relative f' { + \property Voice . articulationScriptVerticalDirection = \up %1 - f4. ( ) g8 f4 d2. | - f4. ( ) g8 f4 d2 r4 | - c'2 c4 a2 r4 | - bes2 bes4 f2. | + f4. ( ) g8 f4 d2. | + f4. ( ) g8 f4 d2 r4 | + c'2 c4 a2 r4 | + bes2 bes4 f2. | %5 - g2 g4 bes4.( )a8 g4 | - f4.()g8 f4 d2 r4 | - g2 g4 bes4.( )a8 g4 | - f4.()g8 f4 d2 r4 | + g2 g4 bes4.( )a8 g4 | + f4.()g8 f4 d2 r4 | + g2 g4 bes4.( )a8 g4 | + f4.()g8 f4 d2 r4 | %9 - c'2 c4 es4.()c8 a4 | - bes2.~ ( r4 | - bes4 ( )f d f4.( )es8 c4 | - bes2. ~ bes2 r4 \bar "|."; + c'2 c4 es4. c8 a4 | + bes2. ( < ~bes2-- )d2-- > r4 | + bes4 ( )f d f4.( )es8 c4 | + bes2. ~ bes2 r4 } alt=\notes\relative c' { + \property Voice . articulationScriptVerticalDirection = \down %1 - d4. es8 d4 bes2. | - d4. es8 d4 bes2 r4 | - es2 es4 ges2 r4 | - f2 es4 d2. | + d4. es8 d4 bes2. | + d4. es8 d4 bes2 r4 | + es2 es4 ges2 r4 | + f2 es4 d2. | %5 - es2 es4 es4. f8 es4 | - d4. es8 d4 bes2 r4 | - es2 es4 es4. f8 es4 | - d4. es8 d4 c( )bes r4 | + es2 es4 es4. f8 es4 | + d4. es8 d4 bes2 r4 | + es2 es4 es4. f8 es4 | + d4. es8 d4 c( )bes r4 | %9 - es4( )f g a4. a8 ges4| - f2.~ e!2-- r4 | - d2 bes4 d4. c8 c4 | - bes2. ~ bes2 r4 \bar "|."; + es4( )f g a4. a8 ges4| + f2.( )e!2-- r4 | + d2 bes4 d4. c8 c4 | + bes2. ~ bes2 r4 } ten=\notes\relative c' { - bes2 bes4 f2. | - bes2 a4 f2 r4 | - a2 a4 c2 r4 | - bes2 a4 f2 ( ) bes4 | + \property Voice . articulationScriptVerticalDirection = \up + + bes2 bes4 f2. | + bes2 a4 f2 r4 | + a2 a4 c2 r4 | + bes2 a4 f2 ( ) bes4 | %5 - bes2 bes4 g4. a8 bes4 | - bes4. bes8 bes4 f2 r4 | - bes2 bes4 g4. a8 bes4 | - bes4. bes8 bes4 f2 r4 | + bes2 bes4 g4. a8 bes4 | + bes4. bes8 bes4 f2 r4 | + bes2 bes4 g4. a8 bes4 | + bes4. bes8 bes4 f2 r4 | %9 - g2 bes4 c4. c8 c4 | - bes2. ~ g2-- r4 | - bes2 g4 a4. bes8 a4 | - bes2. ~ bes2 r4 \bar "|."; + g2 bes4 c4. c8 c4 | + bes2. ( ) g2-- r4 | + bes2 g4 a4. bes8 a4 | + bes2. ~ bes2 r4 } bass=\notes\relative c { + \property Voice . articulationScriptVerticalDirection = \down %1 - bes2 bes4 bes2. | - bes2 bes4 bes2 r4 | - f'2 f4 es2 r4 | - d2 c4 bes2. | + bes2 bes4 bes2. | + bes2 bes4 bes2 r4 | + f'2 f4 es2 r4 | + d2 c4 bes2. | %5 - es2 es4 es2 es4 | - bes4. bes8 bes4 bes2 r4 | - es2 es4 es4. es8 es4 | - bes4. bes8 bes4 bes2 r4 | + es2 es4 es2 es4 | + bes4. bes8 bes4 bes2 r4 | + es2 es4 es4. es8 es4 | + bes4. bes8 bes4 bes2 r4 | %9 - c4 d es f4. f8 es4 | - d2. ~ c2-- r4 | - f2 f4 f4. g8 a4 | - bes2. ~ bes2 r4 \bar "|."; -} - -chords=\lyrics{ - "B\\textflat"1 ""2 - "B\\textflat maj7"1 ""2 - "F7"2. "E\\textflat dim"2. | - "B\\textflat /D"2 "Cm7"4 "B\\textflat"2. | - "E\\textflat"1 ""2 | - "B\\textflat"1 ""2 | - "E\\textflat"1 ""2 | - "B\\textflat"1 ""2 | - "Cm "4 "Gm7sus4/D "4 "Cm/E\\textflat "4 "F7"2 "E\\textflat dim"4 | - "B\\textflat /D"2. "C9"2 ""4 | - "B\\textflat /F"2. "F7"2. | - "B\\textflat"2 ""2 ""2 + c4 d es f4. f8 es4 | + d2. ( ) c2-- r4 | + f2 f4 f4. g8 a4 | + bes2. ~ bes2 r4 +} + +harm=\chords{ + \property Score.chordInversion = 1 + + bes1. | + bes-7+ | + f2.-7 es-dim | + bes2/d c4-m7 bes2. | + es1. | + bes1. | + es1. | + bes1. | + c4-m + g-m7.4/d % should be Gm7sus4 + c-m/es f2-7 es4-dim | + bes2./d c2.-9 | + bes2./f f-7 | + bes1. } v1 = \lyrics { - Stil-2 le4 Nacht,2. hei-4. li-8 ge4 Nacht,2. - Al-2 les4 schl\"aft,2. ein-2 sam4 wacht2. - Nur2 das4 trau-2 te,4 hoch-4. heil8 ige4 Paar,2. - Hold-2 er4 Knabe2 im4 lock-4. i-8 gen4 Haar2. - Schlaf2 in4 himm-4. li-8 scher4 Ruh'!2 - - - Schlaf2 in4 himm-4. li-8 scher4 Ruh'!2 - - + Stil2 -- le4 Nacht,2. hei4. -- li8 -- ge4 Nacht,2. + Al2 -- les4 schl\"aft,2. ein2 -- sam4 wacht2. + Nur2 das4 trau2 -- te,4 hoch4. -- heil8 ige4 Paar,2. + Hold2 -- er4 Knabe2 im4 lock4. -- i8 -- gen4 Haar2. + Schlaf2 in4 himm4. -- li8 -- scher4 Ruh'!1 __ ""2 + Schlaf2 in4 himm4. -- li8 -- scher4 Ruh'!1 __ ""2 } + v2 = \lyrics { - Stil-2 le4 Nacht,2. hei-4. li-8 ge4 Nacht,2. - Hir-2 ten4 erst2. kund2 ge-4 macht2. - Durch2 der4 En-2 gel4 Ha-4. lle-8 lu4 ja2. + Stil2 -- le4 Nacht,2. hei4. -- li8 -- ge4 Nacht,2. + Hir2 -- ten4 erst2. kund2 ge4 -- macht2. + Durch2 der4 En2 -- gel4 Ha4. -- lle8 -- lu4 ja2. T\"ont2 es4 laut2 von4 fern2 und4 nah:2. - "``Christ,"2 der4 Ret-4. ter,8 ist4 "da!''"2 - - - "``Christ,"2 der4 Ret-4. ter,8 ist4 "da!''"2 - - + "``Christ,"2 der4 Ret4. -- ter,8 ist4 "da!''"1 __ ""2 + "``Christ,"2 der4 Ret4. -- ter,8 ist4 "da!''"1 __ ""2 } v3 = \lyrics { - Stil-2 le4 Nacht,2. hei-4. li-8 ge4 Nacht,2. - Go-2 ttes4 Sohn,2. o-2 wie4 lacht2. - Lieb'2 aus4 dei-2 nem4 g\"ott-4. li-8 chen4 Mund,2. - Da2 uns4 schlägt2 die4 ret-2 tende4 Stund'.2. - Christ,2 in4 Dei-4. ner8 Ge-4 burt!2 - - - Christ,2 in4 Dei-4. ner8 Ge-4 burt!2 - - + Stil2 -- le4 Nacht,2. hei4. -- li8 -- ge4 Nacht,2. + Go2 -- ttes4 Sohn,2. o2 -- wie4 lacht2. + Lieb'2 aus4 dei2 -- nem4 g\"ott4. -- li8 -- chen4 Mund,2. + Da2 uns4 schlägt2 die4 ret2 -- tende4 Stund'.2. + Christ,2 in4 Dei4. -- ner8 Ge4 -- burt!1 __ ""2 + Christ,2 in4 Dei4. -- ner8 Ge4 -- burt!1 __ ""2 } v1e = \lyrics { - Sil-2 ent4 night,2. Ho-2 ly4 night,2. + Si2 -- lent4 night,2. Ho2 -- ly4 night,2. All2 is4 calm,2. all2 is4 bright,2. - 'Round2 yon4 Vir-2 gin4 Mo-4. ther8 and4 Child2. - Ho-2 ly4 In-4. fant8 so4 ten-4. der8 and4 mild,2. - Sleep2 in4 hea-4. ven-8 ly4 peace,2 - - - Sleep2 in4 hea-4. ven-8 ly4 peace.2 - - + 'Round2 yon4 Vir2 -- gin4 Mo4. -- ther8 and4 Child2. + Ho2 -- ly4 In4. -- fant8 so4 ten4. -- der8 and4 mild,2. + Sleep4. __ ""8 in4 hea4. -- ven-8 ly4 peace,1 __ ""2 + Sleep4. __ ""8 in4 hea4. -- ven-8 ly4 peace.1 __ ""2 } + v2e = \lyrics { - Si-2 lent4 night,2. Ho-2 ly4 night,2. - Shep-2 herds4 quake2. at2 the4 sight,2. - Glo-2 ies4 stream2 from4 hea-4. ven8 a-4 far,2. - Hea-2 v'nly4 hosts2 sing4 "``A-"4. lle-8 lu-4 ia;2. - Christ2 the4 Sa-4. viour8 is4 born,2. - Christ2 the4 Sa-4. viour8 is4 "born.''"2. + Si2 -- lent4 night,2. Ho2 -- ly4 night,2. + Shep2 -- herds4 quake2. at2 the4 sight,2. + Glo2 -- ries4 stream4. __ ""8 from4 hea4. -- ven8 a4 -- far,2. + Hea2 -- v'nly4 hosts4. __ ""8 sing4 "``A"4. -- lle8 -- lu4 -- ia;2. + Christ4. __ ""8 the4 Sa4. -- viour8 is4 born,1 __ ""2 + Christ4. __ ""8 the4 Sa4. -- viour8 is4 "born.''"1 __ ""2 } v3e = \lyrics { - Si-2 lent4 night,2. Ho-2 ly4 night,2. + Si2 -- lent4 night,2. Ho2 -- ly4 night,2. Son2 of4 God,2. love's2 pure4 light2. - Ra-2 diant4 beams4. from8 Thy4 ho-4. ly8 face,2. - With2 the4 dawn2 of4 sa-4. ving8 grace2. - Je-2 sus,4 Lord,4. at8 Thy4 birth,2. - Je-2 sus,4 Lord,4. at8 Thy4 birth.2. + Ra2 -- diant4 beams4. from8 Thy4 ho2 -- ly4 face,2. + With2 the4 dawn4. __ ""8 of4 sa2 -- ving4 grace2. + Je2 -- sus,4 Lord,4. at8 Thy4 birth,1 __ ""2 + Je2 -- sus,4 Lord,4. at8 Thy4 birth.1 __ ""2 } upper= \notes { \context Staff = upper { - \clef "treble"; \global + \clef "treble"; \context Staff < + \global { \voiceone \sop } { \voicetwo \alt } > @@ -166,22 +186,40 @@ upper= \notes { lower = \notes { \context Staff = lower { - \clef "bass"; \global + \clef "bass"; \context Staff < + \global { \voicethree \ten } { \voicefour \bass } > } } +GermanWords=\context Lyrics=upper < + \v1 + \v2 + \v3 +> + +EnglishWords=\context Lyrics=upper < + \v1e + \v2e + \v3e +> + \score { - \context ChoirStaff - < - { \context Lyrics = top \chords } - \upper - { \context Lyrics = upper \v1 } - { \context Lyrics = upper \v2 } - { \context Lyrics = upper \v3 } - \lower - > + \context ChoirStaff < + \context ChordNames \harm + \upper +% \EnglishWords + \GermanWords + \lower + > + \paper { % fit onto single A4 page + textheight=290.0\mm; + indent=0.0\mm; + } + \midi{ + } } + diff --git a/stepmake/make/out/stepmake.lsm b/stepmake/make/out/stepmake.lsm index de724303c6..c6f31cea88 100644 --- a/stepmake/make/out/stepmake.lsm +++ b/stepmake/make/out/stepmake.lsm @@ -1,15 +1,15 @@ Begin3 Title: StepMake -Version: 0.1.78 -Entered-date: 20JUL99 +Version: 0.1.79 +Entered-date: 21JUL99 Description: Keywords: music notation typesetting midi fonts engraving Author: janneke@gnu.org (Jan Nieuwenhuizen) hanwen@cs.ruu.nl (Han-Wen Nienhuys) Maintained-by: janneke@gnu.org (Jan Nieuwenhuizen) Primary-site: sunsite.unc.edu /pub/Linux/apps/sound/convert - 40k stepmake-0.1.78.tar.gz + 40k stepmake-0.1.79.tar.gz Original-site: pcnov095.win.tue.nl /pub/lilypond/development/ - 40k stepmake-0.1.78.tar.gz + 40k stepmake-0.1.79.tar.gz Copying-policy: GPL End diff --git a/stepmake/make/out/stepmake.spec b/stepmake/make/out/stepmake.spec index 8430d20b25..ff5cbd6ca1 100644 --- a/stepmake/make/out/stepmake.spec +++ b/stepmake/make/out/stepmake.spec @@ -1,9 +1,9 @@ Name: stepmake -Version: 0.1.78 +Version: 0.1.79 Release: 1 Copyright: GPL Group: Development -Source0: pcnov095.win.tue.nl:/pub/lilypond/development/stepmake-0.1.78.tar.gz +Source0: pcnov095.win.tue.nl:/pub/lilypond/development/stepmake-0.1.79.tar.gz Summary: generic make package Packager: janneke@gnu.org (Jan Nieuwenhuizen) Buildroot: /tmp/stepmake-install diff --git a/stepmake/stepmake/metapost-rules.make b/stepmake/stepmake/metapost-rules.make index 8c73b296e0..ef846f8a3c 100644 --- a/stepmake/stepmake/metapost-rules.make +++ b/stepmake/stepmake/metapost-rules.make @@ -1,18 +1,10 @@ -# urg -# i've got no idea what this scaling could be for, on both sides... -# it seems that 'low_res', which should be all we ever need according -# to the metapost mfplain guru, really does 200dpi, iso 600dpi (minimun) -# -$(METAPOST) "&mfmp \mode=ljfour; \mag=100.0; batchmode; input $<" -# -$(METAPOST) "&mfplain \mode=lowres; \mag=100.0; batchmode; input $<" - $(outdir)/%.0: %.mf mfplain.mem -$(METAPOST) "&mfplain \mode=lowres; \mag=1.0; nonstopmode; input $<" - - -mfplain.mem: mfplain.ini - $(INIMETAPOST) mfplain.ini +MFPLAIN_MP=/usr/share/texmf/metapost/base/mfplain.mp +mfplain.mem: $(MFPLAIN_MP) + $(INIMETAPOST) -interaction=nonstopmode $(MFPLAIN_MP) dump $(outdir)/%.pfa: $(outdir)/%.0 @@ -20,8 +12,3 @@ $(outdir)/%.pfa: $(outdir)/%.0 rm -f $(basename $(@F)).[0-9]* rm -f $(basename $<).log $(basename $<).tfm - - -#dokkum:~/usr/src/lilypond/mf$ inimpost /usr/share/texmf/metapost/base/mfplain.mp -#[....] \dump - -- 2.39.2