Thanks in advance
Greg Hodgdon
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
Assuming a color space of DeviceGray (i.e. setgray is the only color
value setting command) you could try the following:
/MySetGray {setgray} bind def
/setgray {1 exch sub MySetGray} bind def
to "reverse" the behaviour of setgray.
To set the initial color to white do:
1 MySetGray
You probably need to paint the page with the inverse of the default
white paper, in otherwords, black:
gsave initclip clippath 0 MySetGray fill grestore
Note that the presence of initclip means you won't be able to imbed
the page into another page.
This is gonna use up a lot of toner, why do you need/want to do this?
--
-- Rod --
ro...@polylogics.com
The most reliable way to do this is by setting up transfer functions
outside the main PostScript code. Then, assuming the code you're
printing doesn't further muck with the transfer functions, you should
get the effect you want.
The simplest (Level 1) approach is something like
{1 exch sub} settransfer
To be polite, you should consider that fact that there may already be a
transfer function set, and concatenate it to yours:
[currenttransfer //exec {1 exch sub} //exec] cvx bind settransfer
I think that's right. I haven't actually tested this code. If you
want to deal with separate transfer functions for separate colors,
etc., it gets more complicated, but it's about the same idea. That's
left as an exercise for the reader.
-pd