/*                                                                             
    The following SAS program may be used to create drivers                     
    which will support multiple paper sizes using the HPGL/2 and                
    PostScript emulation modes on the Lexmark Optra C printer.                
    It is assumed that the new driver entries will be stored in                 
    the SASHELP.DEVICES catalog. If you do not have update access               
    to this catalog, create the driver entries 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.09 OF SAS/GRAPH                   
          SOFTWARE.                                                             
 */                                                                             
                                                                                
*libname gdevice0 'your.sas.library';                                           
proc gdevice c=SASHELP.devices nofs;                                            
copy hpxl300  from=sashelp.devices newname=optcgla;                             
mod optcgla   des='Lexmark Optra C - HPGL/2 - Letter size'                       
              xmax=7.99                                                         
              ymax=10.5                                                         
              xpixels=8117                                                      
              ypixels=10668                                                     
              ucc='00000103'x                                                   
              horigin=0                                                         
              vorigin=0                                                         
              hsize=0                                                           
              vsize=10.250                                                      
              lrows=0                                                           
              lcols=0                                                           
              prows=52                                                          
              pcols=77                                                          
              gprolog='1B252D313233343558'x                                     
                      '40504A4C20'x             /* @PJL          */             
                      '454E54455220'x           /* ENTER         */             
                      '4C414E47554147453D'x     /* LANGUAGE=     */             
                      '50434C0A'x               /* PCL           */             
                      '1B45'x                   /* Reset         */             
                      '1B266C3241'x             /* Letter Size   */             
                      '1B266C304F'x             /* Portrait      */             
                      '1B2A6335373630783735363059'x /* Pict Frame*/             
                      '1B2A7030782D31303659'x   /* Move cursor   */             
                      '1B2A633054'x             /* Set anchor pt */             
                      '1B253142'x               /* Switch HPGL/2 */             
                      '494E3B'x                 /* IN;           */             
                      '4950302C302C383131372C31303636383B'x                     
              gepilog='1B253141'x               /* Switch to PCL */             
                      '1B252D313233343558'x                                     
              handshake=xonxoff                                                 
              lfactor=2                                                         
              ;                                                                 
run;                                                                            
copy xl300ps from=sashelp.devices newname=optcpsa;                              
mod optcpsa des='Lexmark Optra C - PS - Letter size'                         
            vsize=10.250
            prows=83
            xpixels=5100
            ypixels=6600
;                                                                               
copy dj1200pm from=sashelp.devices newname=optcpsa4;                             
mod optcpsa4 des='Lexmark Optra C - PS - A4 size'                         
             vsize=26.190 CM
             vorigin=2.380 CM
             prows=83
             xpixels=4960
             ypixels=7014
;                                                                               
run;                                                                            
quit;