// PRESS.DF

// last modified
// RML November 21, 1977  10:27 AM add vPRESS structure
// RML April 1, 1978  9:50 PM single page color Press file

structure Qelement:
	[
	@Q
	pwput 	word	// pointer to current output word
	lbput	word	// left byte flag : true, left byte next.
	remainput	word	// free bytes in buffer
	]

structure PRESS:
	[ acfaCur	@CFA
	daPrev		word
	aqbufFree	@Q
	aqbufDl		@Qelement
	aqbufEl		@Qelement
	aqbufPd		@Qelement
	daPgn1		word
	];

structure ELTRAILER:
	[ type		byte
	fontSet		byte
	beginByte↑0,1	word
	byteLength↑0,1	word
	Xe		word
	Ye		word
	left		word
	bottom		word
	width		word
	height		word
	entityLength	word
	]

structure FS:
	[ rvmpfefunfa	word
	blank		word 15
	rvmpfefn	word
	= rvmpfedafm	word
	blank		word 15
	rvmpfenmd	word
	= rvmpfedafs	word
	blank		word 15
	rvmpfesn1	word
	blank		word 15
	rvmpfesn2	word
	blank		word 15
	mpfefactive	word
	lfm		word
	];


structure vPRESS:
	[ value	word
	State	word
	]

manifest 
	[
	vPressX = 0
	vPressY = 2
	vPressFont = 4
	vPressSpace = 6
	vPressHue = 8
	vPressValue = 10
	vPressChroma = 12
	]

manifest vPressl = vPressChroma + 2

manifest	[ 
	lnrec0 = 64;
	lnrec1 = 1024;
	lnrec3 = 512;
	lnrece = 256;
	fenil = -1;
	tabnil = 0;
	fsnnil = -1;
	effcnst = lnrec0+lnrec1+lnrec3;
	fcrec2 = (lnrec0+lnrec1)*2;
	maxfsn = 5
	fsndef = 0;
	siztlentry = 8
	lrec2nil= 0
	maxsbtime = 30
	lnfs = (size FS)/16;
	];

manifest	[	// Press
	lPress = (size PRESS)/16
	lElTrailer = (size ELTRAILER)/16

	pttomicamlt	= 635
	pttomicadiv	= 18

	pressEntityNoopm	= 377b
	pressSetXm	= 356b
	pressSetYm	= 357b
	pressShowCharsm	= 360b
	pressShowCharsShortm	= 0b
	pressSetFontm	= 160b
	pressSetBrightnessm	= 370b
	pressSetHuem	= 371b
	pressSetSaturationm	= 372b
	pressShowRectanglem	= 376b
	pressSetSpaceXm	= 364b

	pressMaxX	= 21590
	pressMaxY	= 27940

	pressPassWord	= 27183

	pressUlDym	= 87	// a little OTW
	pressUlHeightm	= 21
	]