% name of textfile: P5 Grocery List (DL/Synergetics Jan 91 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

% ==========


% Uses graphics drawing and repeating commands to create a simple form.


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 

/showthegrid true 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.02 def          % stretch spaces between characters slightly
/sstretch 0.1 def           % stretch spaces between words

/font1 /NewCenturySchlbk-Bold 2.1 gonzofont   % define title letters
/font2 /NewCenturySchlbk-Bold 1.1 gonzofont   % define smaller letters


/yinc 1 def                 % set the vertical line spacing                

gsave 15 20 translate        % set lower left corner of list

line3 1 setlinecap
0 0 mt 34 u 30 r 34 d 30 l   % print a heavy box

line1
[{0 0 mt 30 r} 2 17] yrpt    % print group of horizontal lines


line2
6 0 mt 34 u
20 0 mt 34 u                 % print vertical dividers

line3
0 32 mt 30 r                 % and a title divider               


15 36.5
(|1MY  GROCERY  LIST) cc     % show the title

3 32.5 (|2QUAN.) cc          % and subtitles
13 32.5 (ITEM) cc
25 32.5 (STORE) cc

2 copies                     % make two copies
showpage                     % and show the page

% eof