Path: utzoo!attcan!uunet!mcvax!enea!liuida!andwi
From: andwi@miraculix.liu.se (Andreas Wickberg)
Newsgroups: comp.lang.postscript
Subject: Re: PostScript problems
Message-ID: <821@miraculix.liu.se>
Date: 1 Jul 88 13:51:10 GMT
References: <5@phys0.anu.oz>
Organization: CIS Dept, Univ of Linkoping, Sweden
Lines: 32

In article <5@phys0.anu.oz> bill@phys0.anu.oz writes:
>The second problem is this: what I would like to be able to do is a proper
>"solid shadowing" of a font ...

This is not exactly what you asked for, but hopfully it helps a bit.
It's a shading I come up with yesterday when I demonstrated why there
might be a point in hacking postscript directly. It relies on the fact
that 'stroke' uses the transformation matrix, a feature I don't think is
documented in the red book.

%!PS

/shprint {
  gsave
    dup exec matrix currentmatrix
      1 setlinewidth
      -30 rotate 10 4 scale gsave stroke grestore
      gsave .8 .6 scale 1 setgray stroke grestore
      .6 .025 scale stroke -.5 dup transform 3 -1 roll
    setmatrix itransform translate
    exec .7 setgray gsave fill grestore .1 setlinewidth stroke
  grestore
} bind def

1 setlinejoin currentscreen 3 -1 roll pop 90 3 1 roll setscreen
/Palatino-Bold findfont 50 scalefont setfont
{ 248 400 moveto (P) true charpath -5 0 rmoveto (ost) true charpath
  220 370 moveto (S) true charpath -3 0 rmoveto (cript) true charpath
  flattenpath
} shprint

showpage