COMBINED MODES OF PCL5 RASTER GRAPHICS
     
     This program combines three forms of raster compression
     to allow the most efficient means of printing a
     rectangle with a dot in the middle.  The modes of
     raster compression illustrated here can be used with
     all PCL 5 printers.  The LaserJet IIP is capable of
     using Run Length Encoded and TIFF, but not Delta Row
     Compression.
     
     This program was done using QBasic:
     
     Legend:     LPRINT CHR$(27); = Escape in Basic.  The
                 quote marks are syntax parameters and the
                 semicolon at the end of the line supresses
                 the carriage return (CR) and line feed
                 (LF).
     
     
     
     WIDTH "LPT1:",255             This command prevents
                                   basic from inserting an
                                   unwanted carriage return
                                   after 80 characters are
                                   printed.
     
     LPRINT CHR$(27);"E";          Printer reset.
     
     LPRINT CHR$(27);"*p900x1200Y";     Position cursor 900
                                   dots in from the left
                                   edge of the logical page
                                   and 1200 dots down from
                                   the default top margin.
     
     LPRINT CHR$(27);"*t75R";      Set raster resolution to
                                   75 dots per inch.
     
     LPRINT CHR$(27);"*r0F";       Print raster image in the
                                   orientation of the
                                   logical page.  This
                                   command is not used with
                                   the Series II or earlier
                                   printers.
     
     LPRINT CHR$(27);"*r1A";       Begin raster graphics at
                                   the current cursor
                                   position.
     
     LPRINT CHR$(27);"*b1m2W";
     CHR$(6);CHR$(254);            Specifies Run-Length
                                   Encoding as the form of
                                   raster compression and
                                   tells the printer to
                                   interpret two bytes as
                                   raster data.
     
     LPRINT CHR$(27);"*b1m6W";
     CHR$(0);CHR$(192);CHR$(4);
     CHR$(0);CHR$(0);CHR$(6);      Specifies Run-Length
                                   Encoding to print the
                                   following:-zero
                                   repetitions (one
                                   occurrence) of byte (192)-
                                   four repetitions of byte
                                   (0) (five occurrences)-
                                   zero repetitions (one
                                   occurrence) of byte (6)
     
     LPRINT CHR$(27);"*b3m0W";     Use Delta Row Compression
                                   to repeat the previous
                                   seed row.
     
     LPRINT CHR$(27);"*b3m0W";     Repeat Row.
     
     LPRINT CHR$(27);"*b3m2W";
     CHR$(3);CHR$(24);             Use Delta Row Compression
                                   to print the following:
                                   -replace one byte offset
                                   by three from the
                                   original byte with byte
                                   value (0).
     
     LPRINT CHR$(27);"*b3m2W";
     CHR$(3);CHR$(0);              Use Delta Row Compression
                                   to print the following:
                                   -replace one byte offset
                                   by three from the
                                   original byte with byte
                                   value (0).
     
     LPRINT CHR$(27);"*b3m0W";     Repeat the previous seed
                                   row.
     
     LPRINT CHR$(27);"*b3m0W";     Repeat the previous seed
                                   row.
     
     LPRINT CHR$(27);"*b1m2W";
     CHR$(6);CHR$(254);            Specifies Run-Length
                                   Encoding as the form of
                                   raster compression and
                                   tells the printer to
                                   interpret two bytes as
                                   raster data.
     
     LPRINT CHR$(27);"*rB";        End raster graphics.
     
     LPRINT CHR$(27);"E";          Resets the printer and
                                   ejects the page.
     
     End                           End Program.
     
     

            Copyright  Hewlett-Packard Co. 1993
   The information contained herein is subject to change
                      without notice.
   Hewlett-Packard shall not be liable for incidental or
  consequential damages in connection with the use of this
                         material.