plan9fox/sys/lib/troff/font/devutf/charlib/LH.example
2011-03-30 19:35:09 +03:00

131 lines
4.3 KiB
Text

%
% An example logo character. Building the PostScript program that prints
% your company logo is not addressed here; we assume you already have
% such a program, that it's relatively simple, and that it prints the
% logo by itself on a page. What you'll find here are instructions for
% converting that logo program into a character that can be accessed by
% troff and dpost.
%
% Building a new charlib character involves some PostScript programming.
% We've tried to isolate parameters that you'll need to change (Xoffset,
% Yoffset, and Scaling), but we can't guarantee things will work properly
% with every logo program. PostScript is a complex language and subtle
% interactions between your logo program and what we've done here can
% cause problems.
%
% Tuning the new character is an iterative process. You may want to adjust
% the size of the logo (via Scaling), it's position relative to adjacent
% characters and the baseline (Xoffset and Yoffset), and the distance troff
% moves after printing the character (width field in file ../S1). The steps
% to follow are:
%
% 1: Create a simple troff test file for the new character. Something
% like,
%
% .sp 1i
% .ps 10
% size 10: \(LH
% .sp 1i
% .ps 18
% size 18: \(LH
% .sp 1i
% .ps 36
% size 36: \(LH
% .sp 1i
% .ps 10
% four logo characters: \(LH\(LH\(LH\(LH
%
% is sufficient. The test file can go anywhere.
%
% 2: Change into directory /usr/lib/font/devpost/charlib. All file
% pathnames will be relative to that directory.
%
% 3: Save a copy of the working LH logo file. Then replace LH with
% this file (i.e. LH.example). Changes described below should be
% be made in the new LH file (not in LH.example).
%
% 4: Your PostScript logo program will eventually replace whatever
% you find between the <<StartLogo>> and <<EndLogo>> comment lines
% in the PostScript build_LH procedure (below). What's there now
% prints an example logo that you can use until you understand the
% remaining steps.
%
% 5: Print your troff test file using (assuming your making changes
% in the devpost charlib directory),
%
% troff -Tpost testfile | dpost | lp ...
%
% 6: Adjust the logo positioning by changing the numbers assigned to
% Xoffset and Yoffset (below). Both are in units of 72 per inch.
% Positive offsets should move the logo to the right and up the
% page.
%
% 7: Adjust the logo size by changing the the number assigned to
% Scaling. Unitsize also controls scaling, but there's no good
% reason to change both Scaling and Unitsize.
%
% 8: Control the horizontal distance troff moves after printing the
% new LH character by changing the width (i.e. the number in the
% second column) assigned to LH in file ../S1. Character width
% adjustments should probably wait until you're satisfied with
% the Scaling set in step 7.
%
% 9: Back to step 5 until your satisfied with the output.
%
% The remaining steps are suggested but not required:
%
% 10: Delete PostScript comments in your new LH charlib file - comments
% start with % and go to the end of the line.
%
% 11: Update the width field assigned to LH in file ../shell.lib. The
% new width should reflect what's currently in your S1 font file.
%
% 12: Make a similiar set of changes in /usr/lib/font/devLatin1/charlib.
% You can use the devpost version of LH to devLatin1/charlib/LH,
% but changes to files devLatin1/S1 and devLatin1/shell.lib must be
% entered by hand.
%
/Logo_Dict 100 dict dup begin
/Xoffset 0 def % 72 dpi with positive to the right
/Yoffset 0 def % 72 dpi with positive up the page
/Scaling 1.0 def % adjust this number to change the size
/Unitsize 36 def % for point size scaling - leave it be
/showpage {} def
end def
/build_LH { % don't bind this procedure
Logo_Dict begin
gsave
/charwidth exch def
currentpoint translate
resolution 72 div dup scale
Xoffset Yoffset translate
Scaling Scaling scale
ptsize Unitsize div dup scale
%% Replace everything between the <<StartLogo>> and <<EndLogo>>
%% comment lines by the PostScript program that prints your
%% logo.
%% <<StartLogo>>
newpath
.5 .5 scale
0 0 moveto
100 0 lineto
100 100 lineto
closepath
.5 setgray
fill
0 setgray
10 10 translate
45 rotate
0 5 moveto
/Helvetica findfont 18 scalefont setfont
(Example Logo) show
%% <<EndLogo>>
grestore
end
} def