% name of textfile: P17 Doorknob hanger (DL/Synergetics Feb 91 v1.0)
% ....

% =========

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

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

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

% ==========


% Prints a pair of identical doorknob hangers using the BLANKS USA
% die cut forms

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

590 790 translate -180 rotate      % print feet first
/showthegrid false def             % show the layout grid?

% we need a new entry into the stepnrptparams dictionary ....

/stepnrptparams 10 dict def
stepnrptparams begin
/twodoorhangers [  2 1 285 750 22 18 10 false false] def
end

% here is the message we want repeated

/repeatproc { gsave 
0 0 10 setgrid
showthegrid {25 52 showgrid} if

/font0 /AvantGarde-Demi [6 0 0 5.5 0 0] gonzofont
/yinc 6.1  def

12.5 42 (DO
NOT
DISTURB!) cc

% fonts for faces

/font1 /Symbol [2 0 0 2 0 0] gonzofont
/font2 /Symbol [2.25 0 0 2 0 0] gonzofont
/font3 /ZapfDingbats [22 0 0 22 0 0] gonzofont
/font4 /Symbol [2 -2 0 2.5 0 0] gonzofont

/sadsun {
/yinc 0.9 def
0 0 (|1\267  \267

|2\307



 

|3b) cc
} def

gsave 12.5 18.5 translate sadsun grestore 
} def

% manual                    % optional manual feed

(twodoorhangers) stepandrepeat 


% eof