pro Example2,output_folder
    device,decomposed=0
    loadct,0
    for ps=0,1 do begin
        ;when ps=0 make screen plot, when ps=1 do postscript...
        w=obj_new("gmwindow",xsize=6,ysize=4,ppcm=100,pt_size=6,filename=output_folder+"example2",ps=ps) 
        
        w->plot,indgen(20),findgen(20)^2,psym=-5,ytitle="an axis title",background=255,color=0
        w->oplot,indgen(20),400-findgen(20)^2,psym=-(w->symcat(11)),color=128
        w->xyouts,5,200,"a label",color=0,charsize=1.5
        w->tvscl,dist(50),10,10
        w->save
        obj_destroy,w
    endfor
end

;Example2,"d:\mydocs\tmp\"