Re: Image w/contours in PostScript? [message #1434] |
Tue, 09 November 1993 08:31  |
8015
Messages: 52 Registered: November 1993
|
Member |
|
|
In article <1993Nov8.140825.1@aurora.alaska.edu> ftacn@aurora.alaska.edu writes:
>
> I'm having trouble printing color PostScript files created in
> IDL on our Tektronix Phaser IIsdx printer. The files contain
> images upon which I would like to overlay contours. I have been
> doing the following to create my PostScript files:
>
< ... IDL plotting code deleted ... >
>
> Anyone have a better way to do this?
> -Andy Nicholas
> nicholas@uap.navy.nrl.mil
Hi Andy -
We were having many probs with IDL postscript files, also. Our solution
was to send a raster file to the printer instead of a postscript file.
Will the Tek printer handle anything besides PS? Can you send it a "Sun
Raster File", gif, tiff, or something else that IDL can produce? I can
help out if this is something you want to pursue.
Later,
Mike Schienle mgs@sbjse0.sbrc.hac.com
Hughes SBRC, Santa Barbara, CA (805)562-7466
|
|
|
|
Re: Image w/contours in PostScript? [message #1439 is a reply to message #1434] |
Tue, 09 November 1993 09:42  |
scollick
Messages: 8 Registered: November 1993
|
Junior Member |
|
|
> I'm having trouble printing color PostScript files created in
> IDL on our Tektronix Phaser IIsdx printer. The files contain
> images upon which I would like to overlay contours. I have been
> doing the following to create my PostScript files:
[stuff deleted]
I handle this a little differently. I use device coordinates to set
everything up.
In the following example, plot the contour of IMAGE(INX,INY).
----- start
set_plot,'PS'
; set the orientation dependent on x and y box sizes
if iny ge inx then begin ; use portrait mode
x = inx/float(iny) * 8.0
device,/inch,xsize=x,ysize=8.0,bits_per_pixel=8,xoffset=(8.5 -x)/2., $
yoffset=1.5,/color,filename = file
endif else begin ; use landscape mode
y = iny/float(inx) * 8.0
device,/inch,xsize=8.0,ysize=y,bits_per_pixel=8,yoffset=9.5, $
xoffset=(8.5-y)/2.,/color,filename = file,/landscape
endelse
!p.thick=2
!p.position=[0,0,1,1]
; now plot the contour
contour,image,/noerase,xstyle=5,ystyle=5,position=[0,0,1,1], /normal
device, /close
----- end
This works with our Tektronics Phaser color printer.
Good Luck,
--Keith Scollick
|
|
|