10 proofing:=0; % no, we're not making proofs
11 fontmaking:=1; % yes, we are making a font
12 tracingtitles:=0; % no, don't show titles at all
13 pixels_per_inch:=600; % that's the meaning of lowres
14 blacker:=.25; % make pens a bit blacker
15 fillin:=.0; % compensate for diagonal fillin
16 o_correction:=1; % but don't overshoot as much
20 def mode_param (suffix v) (expr e) =
21 if unknown mode_guard_.v:
27 % This macro is invoked by all the modes, after |pixels_per_inch|
28 % has been defined, thus saving some space and time.
29 def mode_common_setup_ =
30 mode_param (proofing, 0);
31 mode_param (fontmaking, 1);
32 mode_param (tracingtitles, if pixels_per_inch > 700: 1 else: 0 fi);
35 % Works for a 600$\,$dpi Accel-a-Writer {\tt mackay@cs.washington.edu},
37 mode_def ljfour = %\[ HP LaserJet 4 (600dpi)
38 mode_param (pixels_per_inch, 600);
39 mode_param (blacker, .25);
40 mode_param (fillin, 0);
41 mode_param (o_correction, 1);
45 laserjetfour := ljfour;