// Copyright Xerox Corporation 1979, 1980

// Standard PRESS definitions
// William Newman 4-24-75
// last edited June 14, 1978  11:48 AM
// added date1, date2 to DDV

manifest [
	Presspassword=27183	// Press password
	]

// Structures

// DDV used to access PRddir -- PR file document directory

structure DDV: [
	passwd	word	// password=27183
	nrecs		word	// total no of records in PR file
	nparts	word	// no of parts
	pdstart	word	// where part directory begins
	pdrecs	word	// no of records
	backp	word	// back pointer
	date1		word
	date2		word
	fcopy	word	// first copy to print
	lcopy	word	// last copy to print
	]

manifest [ DDVlen=size DDV/16 ]

// PD used to read page directory info

structure PD: [
	type	word
	pstart	word
	precs	word
	infile	bit 1		// true or false according to
				// whether part is still in input file
	dirty	bit 1		// to indicate if page is dirty
	padding	bit 14
	]

manifest [ PDlen=size PD/16 ]

// PDV is structure for storing stuff about part directory

structure PDV: [
	npages	word		// count of pages
	pageno	word		// page in vector
	recno	word		// record now in buf
	tbl	word		// table of page data
	buf	word		// address of 256-word buffer
	]

manifest [ PDVlen=size PD/16 ]

// FE used to read Font Directory entries

structure FE: [
	length	word	// length of entry
	set	bit 8
	fno	bit 8
	destm	bit 8	// first char code
	destn	bit 8	// last
	fam	word 10	// name string
	face	bit 8
	source	bit 8	// first char
	siz	word
	rotn	word
	]

manifest [ FElen=size FE/16 ]

// EH used to access Entity Header (now called Trailer)

structure EH: [
	type	bit 8		// entity type
	fontset	bit 8		// font set
	dstart1	word		// byte address of data, high-order
	dstart2	word		// low-order
	dlength1 word		// byte length of data, high-order
	dlength2 word		// low-order
	xe	word		// origin x
	ye	word		// y
	xleft	word		// lh corner
	ybottom	word
	width	word
	height	word
	length	word		// length in words of entity
	]

manifest [ EHlen=size EH/16 ]

// Entity command defs

manifest [
	EShowShort=0
	ESkipShort=#40
	EShowSkip=#100
	ESpaceXShort=#140
	ESpaceYShort=#150
	EFont=#160

	ESpare=#354	// to test for command class

	ECopy=#355
	ESetX=#356
	ESetY=#357
	EShow=#360
	ESkip=#361
	ESkipControl=#362
	EShowOneChar=#363
	ESpaceX=#364
	ESpaceY=#365
	EResetSpace=#366
	ESpace=#367
	ESetBright=#370
	ESetHue=#371
	ESetSat=#372
	EShowObject=#373
	EShowDots=#374
	EDotsOpaque=#375
	ERect=#376
	ENop=#377

	ShiftENop=#177400		// ENop, shifted left

	EDotCode=#400
	EDotWindow=1
	EDotSize=2
	EDotsFollow=3
	EDotMode=#1000

	]