pro idl_fonts set_plot,'x' !p.charsize = 10 device, font = 'Helvetica Bold', /tt_font xyouts, .2, .2, 'hello', /normal device, font = 'Courier Bold', /tt_font xyouts, .2, .3, 'hello', /normal device, font = 'Times', /tt_font xyouts, .2, .4, 'hello', /normal set_plot,'z' erase !p.font = 1 !p.charsize = 5 device, font = 'Helvetica Bold' xyouts, .4, .2, 'hello', /normal device, font = 'Courier Bold' xyouts, .4, .3, 'hello', /normal device, font = 'Times' xyouts, .4, .4, 'hello', /normal pngimg = tvrd() tvlct,reds,greens,blues,/get write_png, '~/IDL/idl_style/Fonts.png', $ PngImg,reds,greens,blues stop end