/* The following SAS program may be used to create a driver (LJ4PSLGL) that will produce landscape oriented graphs on legal-size paper on the HP LaserJet 4 printer. Note that the driver supports the PostScript language. It is assumed that the new driver entry will be stored in the SASHELP.DEVICES catalog. If you do not have update access to this catalog, create the driver entry in your own catalog, GDEVICE0.DEVICES. You may do this by uncommenting the LIBNAME statement below and changing SASHELP to GDEVICE0 on the PROC GDEVICE statement. NOTE: This code is for use with Release 6.10 and above of SAS/GRAPH software on all platforms. */ *LIBNAME GDEVICE0 'YOUR.LIBRARY.NAME'; PROC GDEVICE C=SASHELP.DEVICES NOFS; COPY PSL FROM=SASHELP.DEVICES NEWNAME=LJ4PSLGL; MODIFY LJ4PSLGL DES='HP LaserJet 4/600dpi/PS/legal/landscape' XPIXELS=5100 YMAX=14 YPIXELS=8400 HSIZE=7.5 VSIZE=13 HORIGIN=0.5 VORIGIN=0.5 ROTATE=LANDSCAPE LROWS=60 LCOLS=130 PROWS=105 PCOLS=75 GPROLOG= '7374617475736469637420626567696E206C6567616C7472617920656E640A'x CHARREC=( 1,113,85,'/Courier', 'Y', 2,113,85,'/Courier-Oblique', 'Y', 3,113,85,'/Courier-Bold', 'Y', 4,113,85,'/Courier-BoldOblique', 'Y', 5,113,85,'/Times-Roman', 'Y', 6,113,85,'/Times-Italic', 'Y', 7,113,85,'/Times-Bold', 'Y', 8,113,85,'/Times-BoldItalic', 'Y', 9,113,85,'/Helvetica', 'Y', 10,113,85,'/Helvetica-Oblique', 'Y', 11,113,85,'/Helvetica-Bold', 'Y', 12,113,85,'/Helvetica-BoldOblique', 'Y', 13,113,85,'/Symbol', 'Y', 14,113,85,'/AvantGarde-Book', 'Y', 15,113,85,'/AvantGarde-BookOblique', 'Y', 16,113,85,'/AvantGarde-Demi', 'Y', 17,113,85,'/AvantGarde-DemiOblique', 'Y', 18,113,85,'/Bookman-Demi', 'Y', 19,113,85,'/Bookman-DemiItalic', 'Y', 20,113,85,'/Bookman-Light', 'Y', 21,113,85,'/Bookman-LightItalic', 'Y', 22,113,85,'/Helvetica-Narrow', 'Y', 23,113,85,'/Helvetica-Narrow-Bold', 'Y', 24,113,85,'/Helvetica-Narrow-BoldOblique', 'Y', 25,113,85,'/Helvetica-Narrow-Oblique', 'Y', 26,113,85,'/NewCenturySchlbk-Roman', 'Y', 27,113,85,'/NewCenturySchlbk-Bold', 'Y', 28,113,85,'/NewCenturySchlbk-Italic', 'Y', 29,113,85,'/NewCenturySchlbk-BoldItalic', 'Y', 30,113,85,'/Palatino-Roman', 'Y', 31,113,85,'/Palatino-Bold', 'Y', 32,113,85,'/Palatino-Italic', 'Y', 33,113,85,'/Palatino-BoldItalic', 'Y', 34,113,85,'/ZapfChancery-MediumItalic', 'Y', 35,113,85,'/ZapfDingbats', 'Y'); RUN; QUIT;