home *** CD-ROM | disk | FTP | other *** search
-
- %!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
-