% name of textfile: P16 Fontclip (DL/Synergetics Feb 02 v1.0)
% ....


% =========

% This file requires the previous download of gonzo.psl
% available from https://www.tinaja.com/pssamp1.shtml

% Make sure the following line agrees with your own gonzo.psl location

(C:/Users/don/Desktop/gonzo/gonzo.psl) run  % use internal gonzo

% ==========


% Shows how to clip to a font path for special effects

gutility begin             % turn on the gonzo utilities
nuisance begin             % turn on the nuisance commands
printerror                 % turn on the printing error trapper  


/showthegrid false def     % Do we want to see the layout grid?
                           % true = yes; false = no


20 15 10 setgrid           % create a full page ten point grid

showthegrid 
{57 76 showgrid} if        % and maybe show the grid


/cstretch 0 store

/font1 /Helvetica-BoldOblique 64.5 gonzofont   % pick big letter
/font2 /Helvetica-BoldOblique 1.5 gonzofont  % pick little letter

/lilkathys {font2 [{0 0 (Kathy) cl} 5 20 ] xrpt} def

/allkathys {
 0 1.7 80 {gsave 0 exch translate lilkathys grestore} for} def







font1 
2 8 moveto 
(K) false charpath



gsave clip allkathys grestore

gsave white 0.6 setlinewidth stroke grestore

line3 stroke






 

% eof                            %  no showpage needed