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