% source file of the Feta (defintively not an abbreviation for Font-En-Tja)
% music font
%
-% (c) 1997, 1998 Han-Wen Nienhuys <hanwen@stack.nl>
+% (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
% Jan Nieuwenhuizen <janneke@gnu.org>
%
height# = 5/4 width#;
height# = interline#;
thin = 1.2 stafflinethickness;
- thick = 1.4 thin;
+ thick = 2 thin;
set_char_box(width#/2, width#/2, height#/2, height#/2);
-
- penpos1(thick, 0);
+
+ penpos1(thick, 0);
penpos2(thin, 90);
z1r = (w, 0);
z2r = (0, h);
addto currentpicture also currentpicture xscaled -1;
addto currentpicture also currentpicture yscaled -1;
- pickup pencircle scaled thin;
- save x,y;
- z3r = (0, -h);
- z4 = (0, -2h);
+ z3 = (0, -h);
+ z4 = (0, -1.5h);
penlabels(3,4);
- draw z3r -- z4;
+ draw_brush(z3,1.4*thin, z4,0.9*thick);
fet_endchar;
-
%
% FIXME: rounded endings
%