네 답변 감사합니다.

bit_per_pixel=8 명령어를 이용해서 post script형식에서도 true color를 사용할 수 있는 것은 이제 이해가 되었습니다.

그러나 제가 현재는,
1. 먼저 다음과같이 window로 그림을 그리고
window, xsize=xa4, ysize=ya4,/pixmap
Device, decomposed=0

2. 중간에
snap = TVRD(true=1, position(0)*!D.X_size, position(1)*!D.Y_Size, $
(position(2)-position(0))*!D.X_Size, $
(position(3)-position(1))*!D.Y_Size)
mask=(snap eq 255)
seaColor=255
sea=mask*seaColor
TV, sea ,position(0), position(1)
와같이 TVRD를 이용해서 mask를 만들고 기타 그림을 모두 그린 뒤

3.png 형식으로 그림을 출력할 때는 다음과같이 png 형식으로 출력파일을 만들엇으나
img= TVRD(true=1)
write_png, mmmm(month)+’_pdfcontour.png’, img, R,G,B
현재는
img= TVRD(true=1)
까지만해서 최종 결과그림을 img에 저장하고 이를

4. 다음과 같이 PS device에서
outfile = mmmm(month)+’_PDF.eps’
set_plot, ‘PS’
device, /encapsulated ,/color , filename=outfile, /portrait, /palatino, /bold, BITS_PER_PIXEL=8
device, xsize=21, ysize=27.7, $
xoffset =0.5, yoffset=0.5

TVSCL, img, /true, /CENTIMETERS, XSIZE=21, ysize=27.7

DEVICE, /CLOSE
로 저장만 Post script로 다시해주는 식으로 작성을 했는데
이렇게 그림은 window에서 그리고 (TVRD 명령어를 중간에 사용하면서)
저장을 다시한번 EPS 파일로 하는 방법말고

한번에 postscript로 그림을 그려서 저장까지 하고 싶습니다.
따라서
SET_PLOT, ‘PS’와 DEVICE, /CLOSE
사이에서 TVRD 명령어를 대체해서 저장하고 있는 그림을 배열로 받아볼 수 있는 혹은 바로 where 함수등을 이용해서 mask를 얻어내는 작업을 어떻게 하면 할 수 있는지 궁금합니다.