Hi, everybody,
I'm trying to create pultiple-plot multiple-page landscape postscript
output, and getting only the first page.
Is that one of those "not workinig" features you just have to know it
is ot working, or (hopefully!) something is wrong with my code?
Any idea would be most welcome!
Alex
pro profile_compare
restore, 'imk'
restore, 'esa'
set_plot, 'PS'
PageParam = PSWINDOW(/LANDSCAPE, /CM, PAGESIZE='A4')
device, /encapsulated, filename = 'name.ps'
device, _extra=PageParam
Device, DECOMPOSED=0, COLOR=1, BITS_PER_PIXEL=8
!P.MULTI=[0, 5, 3, 0, 0]
FOR i = 0L, N_ELEMENTS(a) - 1 DO BEGIN
meanings = ['name_1', 'name_2'']
colors = [cgColor('green'), cgColor('red')]
lines = [0,0]
plot,findgen(2), xrange=[-0.5, 11], yrange=[0,120],
XStyle=1.0, YStyle=1.0, $
xtitle='VMR, ppmv', ytitle='Height, km', $
title='some_title', charsize=1.2, /nodata
LEGEND, meanings, color=colors, linestyle=lines,
charsize=0.7, box=0, /right
oplot, *imk[b].target, *imk[b].altitude, color =
cgColor('green')
oplot, *esa[a[i]].o3.vmr,
*esa[a[i]].corrected_tangent_altitude.tangent, color = cgColor('red')
ENDELSE
IF int( (i+1)/15.0 ) EQ (i+1)/15.0 THEN ERASE
ENDFOR
device, /close_file
set_plot, 'X'
end
|