home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 19 Printer
/
19-Printer.zip
/
PRPCX2.ZIP
/
PRPCX.PS
< prev
Wrap
Text File
|
1989-11-12
|
763b
|
49 lines
%!PS-Adobe 1.0
%%Title:
%%Creator:
%%Pages: 1
%%BoundingBox:
%%EndComments
gsave
% the next item translates the image from
% top-to-bottom .PCX format to PS bottom-to-top
/xform
{
[ bmap_wid 0 0 bmap_hgt neg 0 bmap_hgt ]
} def
/readproc
{
{ currentfile picstr readhexstring pop }
} def
/scaleit
{
x y translate
bmap_wid bmap_hgt scale
72 res div 72 res div scale
scx scg mul scy scg mul scale
/picstr bmap_wid 8 idiv string def
} def
/imagedata
{
bmap_wid bmap_hgt bpp xform readproc image
} def
/showit
{
grestore
showpage
} def
% Will generate <bmap_hgt> lines of image data,
% each with <bmap_wid>/8 bytes of data (in hex).
%%EndProlog