🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: comp.lang.postscript
2 messages
2 total messages Started by Ed Japel Wed, 18 Nov 1992 20:41
Conference name placards
#5726
Author: Ed Japel
Date: Wed, 18 Nov 1992 20:41
8 lines
1002 bytes
Hi!  I have been trying to write a postscript program to print
a persons name on one long edge of a paper, and again along
the opposite edge, rotated so that when the paper is folded in the middle (lengthwise, the name will be readable from either side.  This should
not be as difficult as I am trying to make it, I have a bad case
of brain-block.   Thanks for any help!
 
Michael Moe
mkiteam@osiris.cso.uiuc.edu
Re: Conference name placards
#5738
Author: Matthew D. Goldman
Date: Thu, 19 Nov 1992 17:02
43 lines
2283 bytes
In article <BxxIt6.3KI@news.cso.uiuc.edu> mkiteam@osiris.cso.uiuc.edu (Ed Japel) writes:
>Hi!  I have been trying to write a postscript program to print
>a persons name on one long edge of a paper, and again along
>the opposite edge, rotated so that when the paper is folded in the middle (lengthwise, the name will be readable from either side.  This should
>not be as difficult as I am trying to make it, I have a bad case
>of brain-block.   Thanks for any help!
> 
>Michael Moe
>mkiteam@osiris.cso.uiuc.edu
>

%!
/SectorTitle {          % string x y r > -
        gsave                           % save graphics state
                /R exch def             % Pull info off stack.
                /Y exch def             %   remember first in and
                /X exch def             %   last out queue.
                0 setgray               % color to black
                /Times-Roman findfont   % select font
                32 scalefont            % set pointsize
                setfont                 % use this as the default font
               /X /Y moveto            % select x and y
                /R rotate               % orient text
                currentpoint translate  % orient new zero location.
                show                    % put the letter on the page
        grestore                        % put graphics state back
} def

(Test Info - 590 36 90) 590 36 90 SectorTitle
(Test Info - 75 600 270) 75 600 270 SectorTitle

showpage

That should do it.

Matt


-- 
Matthew Goldman              E-mail: goldman@orac.cray.com
Fax: (612) 683-3099                   Work: (612) 683-3061
      "Say George, I don't mean to interrupt, but 
       there's a glowing red dot on your forehead."
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads