home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d101 / psintrp.lha / PsIntrp / letters < prev    next >
Text File  |  1987-09-05  |  388b  |  31 lines
  1.  
  2. save
  3.  
  4. 2 pencolor
  5.  
  6. /simplex findfont 12 scalefont setfont
  7.  
  8. /char (x) def
  9.  
  10. /caps {
  11.    65 1 65 25 add  % for A to Z
  12.    { char exch 0 exch put
  13.      char show } for
  14.    } def
  15.  
  16. /small {
  17.    97 1 97 25 add
  18.    { char exch 0 exch put
  19.      char show } for
  20.    } def
  21.  
  22. 50 300 moveto  small
  23. 50 250 moveto  caps
  24.  
  25. /simplex findfont  20 scalefont setfont
  26.  
  27. 50 200 moveto  small
  28. 50 150 moveto  caps
  29.  
  30. restore
  31.