psopen,'idl.ps'
device,output='%%! This string inserted with DEVICE,OUTPUT="...".'
x=FINDGEN(100)
y=x*x/100
PLOT,x,y
psclose
exit