libvips/contrib/vdump/vdump.pro

26 lines
527 B
Prolog
Raw Normal View History

2007-08-29 18:23:50 +02:00
%%Pages: 1
%%Creator: vdump
%%EndComments
%%BeginDocument: vdump
/doimage {
/b exch def /m exch def /n exch def
/pix n string def
n m b [n 0 0 m neg 0 m]
{ currentfile pix readhexstring pop }
image
} def
/spotsize {
/perinch exch def
currentscreen 3 -1 roll
pop perinch
3 1 roll setscreen
} def
/invert {
/curtran currenttransfer cvlit def
/newtran curtran length 3 add array def
newtran 0 {1 exch sub} putinterval
newtran 3 curtran putinterval
newtran cvx settransfer
} def
80 spotsize