-pl 30.jcn1
+--- ../lilypond-1.1.30/NEWS Mon Feb 15 15:43:56 1999
+++ b/NEWS Wed Feb 17 00:10:16 1999
+@@ -1,3 +1,7 @@
+pl 30.mb1
+ - Added support for magnification of TeX fonts ==>
+ larger dynamics in 20pt scores. (Doesn't work in Postscript)
+
+ pl 30 (feb 15)
+
+ pl 29.uu1pl 30.jcn1
- sm fixes, intl/ fixes
pl 30 (feb 15)
{0,0}
};
+// Magic numbers from Knuths plain.tex:
+static Real mag_steps[] = {1, 1, 1.200, 1.440, 1.7280, 2.074, 2.488};
+
static Dictionary<char const *> cmr_dict (cmr_init);
Molecule
{
Molecule m;
-
+ int font_mag = 1;
Real font_h = paper_l_->get_var ("font_normal");
if (paper_l_->scope_p_->elem_b ("font_" + style))
{
font_h = paper_l_->get_var ("font_" + style);
}
+ if (paper_l_->scope_p_->elem_b ("magnification_" + style))
+ {
+ font_mag = (int)paper_l_->get_var ("magnification_" + style);
+ }
+
if (cmr_dict.elem_b (style))
{
style = String (cmr_dict [style]) + to_str ((int)font_h); // ugh
}
}
+ if (font_mag > 1 && font_mag < 7 )
+ {
+ style = style + String(" scaled \\magstep ") + to_str (font_mag);
+ w *= mag_steps[font_mag];
+ ydims *= mag_steps[font_mag];
+ }
+
DOUT << "\n" << to_str (w) << "\n";
m.dim_.x () = Interval (0, w);
m.dim_.y () = ydims;