AWARE [SYSTEMS] Imaging expertise for the Delphi developer
AWare Systems, Imaging expertise for the Delphi developer, Home TIFF and LibTiff Mailing List Archive

LibTiff Mailing List

TIFF and LibTiff Mailing List Archive
October 2000

Previous Thread
Next Thread

Previous by Thread
Next by Thread

Previous by Date
Next by Date

Contact

The TIFF Mailing List Homepage
This list is run by Frank Warmerdam
Archive maintained by AWare Systems



Valid HTML 4.01!



Thread

2000.10.18 09:52 "Problem with EPS Level 2", by Rainer Hoffmann
2000.10.18 10:15 "Re: Problem with EPS Level 2", by Rob Daykin
2000.10.18 10:47 "Re: Problem with EPS Level 2", by Rainer Hoffmann
2000.10.18 11:00 "Re: Problem with EPS Level 2", by Rob Daykin
2000.10.18 11:49 "Re: Problem with EPS Level 2", by Rainer Hoffmann
2000.10.18 12:48 "Re: Problem with EPS Level 2", by Howard Kaikow

2000.10.18 10:47 "Re: Problem with EPS Level 2", by Rainer Hoffmann

The eps header is

%!PS-Adobe-3.0 EPSF-3.0
%%Creator: tiff2ps
%%Title: tje_rw_mw_cfw_qap.tif
%%CreationDate: Wed Oct 18 12:33:38 2000
%%DocumentData: Clean7Bit
%%Origin: 0 0
%%BoundingBox: 0 0 576 432
%%LanguageLevel: 2
%%Pages: (atend)
%%EndComments
%%BeginSetup
gsave newpath clippath pathbbox grestore
  4 2 roll 2 copy translate
  exch 3 1 roll sub 3 1 roll sub exch
  currentpagedevice /PageSize get aload pop
  exch 3 1 roll div 3 1 roll div abs exch abs
  2 copy gt { exch } if pop
  dup 1 lt { dup scale } { pop } ifelse
%%EndSetup
%%Page: 1 1
gsave
100 dict begin
576.000000 432.000000 scale
% PostScript Level 2 only.
/DeviceRGB setcolorspace
/im_y 0 def
/im_h 2 def
{ % exec
450 { % repeat
 /im_stream currentfile /ASCII85Decode filter def
 <<
  /ImageType 1
  /Width 1200
  /Height 2
  /ImageMatrix [ 1200 0 0 -900 0 900 im_y sub ]
  /BitsPerComponent 8
  /Interpolate true
  /Decode [0 1 0 1 0 1]
  /DataSource im_stream /RunLengthDecode filter
 >> image
 im_stream flushfile
 /im_y im_y 2 add def
 /im_h 900 im_y sub dup 2 gt { pop 2 } if def
} repeat
}
%%BeginData:
exec