/*

    STATA/GPH	HP LaserJet+ Printer Configuration File
	  	Copyright (C) 1986-1989, by ==C=R=C==

		o 300 dots per inch (high-resolution) portrait aspect
	     	  (Requires 345K of PC memory to build graphic image)

	NOTE: 	This configuration will NOT work on a regular LaserJet
	      	(without the LaserJet PLUS features).

		For release 2 STATA/GPHDOT	
		
*/

layout p 					/*  Portrait layout  */
{

   name("HP LaserJet+: TeX High-Resolution Portrait")  /* Signon msg */
   output(=,hpt)                /* Default dev. or output file, .ext */

   dpi(300,300) 		/* aspect ratio only: dots per inch  */
   length(450,600)		/* default image size is 4.5"x6.0"   */
   grid(466,616)		/* this is the lid on the imagesize  */

   yskip(3,2,2,1)		/* shading parameters: skips between */
   xskip(6,4,2,1)		/* dots on y-axis, x-axis	     */	
   xoffset(3,2,1,0) 		/* starting x-offset for shading     */

		  			/* multiple image structures */
   image 1 { length(200,275) clip(0,0) }
   image 2 { length(200,275) clip(0,325) }
   image 3 { length(200,275) clip(250,0) }
   image 4 { length(200,275) clip(250,325) }

   init(			/* This data sent before all else    */
	27,'&ll',		/* disable perforation skip mode     */
	27,'&k.4H',		/* set to 1/300" cursor positioning  */
	27,'&l.16C',		/* in both y and x directions        */
	27,'*t300R',		/* 300 dots per inch resolution      */
	27,'&kG',		/* select 'normal' cursor behaviour  */
/*      27,'&a300r300C'            define upper left corner of image */
	27,'&a-00r-00C'         /* define upper left corner of image */
	)

   reset(13)                    /* Final CR before eject             */
/* eject(27, 'E')                  Reset LaserJet to power-on status */

   setcopies(27,"&l%dX")	/* How to set copies on LaserJet     */

					/* Multiple image structures */
   prefix(27,'*r1A')		/* start graphics: respect cursor    */
   postfix(27,'*rB') 	 	/* Get out of LaserJet graphics mode */
   lprefix(27,"*b%dW") 		/* "TRANSFER GRAPHICS" PACKET format */

   scheme(     		/* Technical graphic handshake parameters    */
        0,     		/* mode= RASTER (raster rows are printed)    */
	0,     		/* dir= FORWARD (no bit reversal required)   */
       24,     		/* flines= 24 (# of rasters in frame)        */
	3,     		/* glptype= 3 (PACKET: "%d" format length)   */
	3,     		/* glplen= 3 (tprefix is "%d"  row  format)  */
	1,     		/* bytes per head is 1      		     */
	8,     		/* bits per byte is 8: use entire head	     */
	0,     		/* portrait orientation                      */
	1,     		/* print graphics only: draw own text 	     */
	0      		/* No graphics data bias		     */
	)

}

layout l					 /* Landscape layout */ 
{	
   name("HP LaserJet+: High-Resolution Landscape")

   init(
	27,'&ll',
	27,'&k.4H',
	27,'&l.16C',
	27,'*t300R',
	27,'&kG',
	27,'&a225r300C'				/* landscape margins */
	)

   scheme(0,0,24,3,3,1,8,1,1,0)			 /* landscape scheme */

}