home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 2 / FFMCD02.bin / new / text / font / metafont / inputs / cm / cmnerv.mf < prev    next >
Encoding:
Text File  |  1993-12-21  |  4.0 KB  |  91 lines
  1. % Computer Modern Inch-High Sans Serif Bold Extended, Nervous!
  2. if unknown cmbase: input cmbase fi
  3. numeric Pt#; 250/36Pt#=1in#;
  4. font_identifier:="CMNERV"; font_size 10Pt#;
  5.  
  6. u#:=22/36Pt#;      % unit width
  7. width_adj#:=22/36Pt#;    % width adjustment for certain characters
  8. serif_fit#:=-9/36Pt#;    % extra sidebar near lowercase serifs
  9. cap_serif_fit#:=-11/36Pt#;  % extra sidebar near uppercase serifs
  10. letter_fit#:=0Pt#;    % extra space added to all sidebars
  11.  
  12. body_height#:=270/36Pt#;  % height of tallest characters
  13. asc_height#:=250/36Pt#;    % height of lowercase ascenders
  14. cap_height#:=250/36Pt#;    % height of caps
  15. fig_height#:=250/36Pt#;    % height of numerals
  16. x_height#:=165/36Pt#;    % height of lowercase without ascenders
  17. math_axis#:=90/36Pt#;    % axis of symmetry for math symbols
  18. bar_height#:=90/36Pt#;    % height of crossbar in lowercase e
  19. comma_depth#:=38/36Pt#;    % depth of comma below baseline
  20. desc_depth#:=70/36Pt#;    % depth of lowercase descenders
  21.  
  22. crisp#:=26/36Pt#;    % diameter of serif corners
  23. tiny#:=26/36Pt#;    % diameter of rounded corners
  24. fine#:=9/36Pt#;      % diameter of sharply rounded corners
  25. thin_join#:=9/36Pt#;    % width of extrafine details
  26. hair#:=49/36Pt#;    % lowercase hairline breadth
  27. stem#:=49/36Pt#;    % lowercase stem breadth
  28. curve#:=49/36Pt#;    % lowercase curve breadth
  29. ess#:=43/36Pt#;      % breadth in middle of lowercase s
  30. flare#:=40/36Pt#;    % diameter of bulbs or breadth of terminals
  31. dot_size#:=47/36Pt#;    % diameter of dots
  32. cap_hair#:=49/36Pt#;    % uppercase hairline breadth
  33. cap_stem#:=53/36Pt#;    % uppercase stem breadth
  34. cap_curve#:=53/36Pt#;    % uppercase curve breadth
  35. cap_ess#:=51/36Pt#;    % breadth in middle of uppercase s
  36. rule_thickness#:=30/36Pt#;  % thickness of lines in math symbols
  37.  
  38. dish#:=0Pt#;      % amount erased at top or bottom of serifs
  39. bracket#:=0Pt#;      % vertical distance from serif base to tangent
  40. jut#:=0Pt#;      % protrusion of lowercase serifs
  41. cap_jut#:=0Pt#;      % protrusion of uppercase serifs
  42. beak_jut#:=0Pt#;    % horizontal protrusion of beak serifs
  43. beak#:=1.5/36Pt#;    % vertical protrusion of beak serifs
  44. vair#:=26/36Pt#;    % vertical diameter of hairlines
  45. notch_cut#:=49/36Pt#;    % maximum breadth above or below notches
  46. bar#:=26/36Pt#;      % lowercase bar thickness
  47. slab#:=36/36Pt#;    % serif and arm thickness
  48. cap_bar#:=34/36Pt#;    % uppercase bar thickness
  49. cap_band#:=31/36Pt#;    % uppercase thickness above/below lobes
  50. cap_notch_cut#:=45/36Pt#;  % max breadth above/below uppercase notches
  51. serif_drop#:=2/36Pt#;    % vertical drop of sloped serifs
  52. stem_corr#:=1/36Pt#;    % for small refinements of stem breadth
  53. vair_corr#:=2/36Pt#;    % for small refinements of hairline height
  54. apex_corr#:=18/36Pt#;    % extra width at diagonal junctions
  55.  
  56. o#:=8/36Pt#;      % amount of overshoot for curves
  57. apex_o#:=0Pt#;      % amount of overshoot for diagonal junctions
  58.  
  59. slant:=0;      % tilt ratio $(\Delta x/\Delta y)$
  60. fudge:=.88;      % factor applied to weights of heavy characters
  61. math_spread:=.5;    % extra openness of math symbols
  62. superness:=3/4;      % parameter for superellipses
  63. superpull:=1/18;    % extra openness inside bowls
  64. beak_darkness:=0;    % fraction of triangle inside beak serifs
  65. ligs:=2;      % level of ligatures to be included
  66.  
  67. square_dots:=true;    % should dots be square?
  68. hefty:=true;      % should we try hard not to be overweight?
  69. serifs:=false;      % should serifs and bulbs be attached?
  70. monospace:=false;    % should all characters have the same width?
  71. variant_g:=false;    % should an italic-style g be used?
  72. low_asterisk:=false;    % should the asterisk be centered at the axis?
  73. math_fitting:=false;    % should math-mode spacing be used?
  74.  
  75. extra_endchar:="nervsize;"&extra_endchar;
  76.  
  77. picture thispict;
  78. def nervsize = cullit;
  79.   thispict := currentpicture;
  80.   addto currentpicture also thispict shifted (0,-.5hair);
  81.   numeric delta,low;
  82.   delta := .011(h+d+.5hair); low := -d-.1(h+d)-.5hair;
  83.   for k = 0 upto 25:
  84.     unfill(-w,low+5k*delta)--(2w,low+5k*delta)
  85.       --(2w,low+(5k+4)*delta)--(-w,low+(5k+4)*delta)
  86.       --cycle;
  87.     endfor;
  88.   enddef;
  89.  
  90. generate roman % switch to the driver file
  91.