--File PressDefs.mesa Last edited April 15, 1982 3:06 PM By Glen Williams
--added BandWidth to PageG

DIRECTORY
TridentDefs USING [FP, PAGE, tfsdskPtr, VDA];

PressDefs: DEFINITIONS =

BEGIN OPEN TridentDefs;

abortFile: ERROR;

--Types and Variables

PressPassword: INTEGER = 27183;

RTC: POINTER TO INTEGER = LOOPHOLE[430B];--REAL TIME CLOCK.
--Public Exported Variables
numPages: CARDINAL;
--exported from PressInit
pageGarray: POINTER TO ARRAY OF PageG;--exported from PressInit

PageGptr: TYPE = POINTER TO PageG;
PageG: TYPE=MACHINE DEPENDENT RECORD--Press’s PageG Structure
[FirstBand:CARDINAL,--lowest used band
LastBand:CARDINAL,--highest used band
BitMargin:CARDINAL,--Margin and
BitWc:CARDINAL,--word count of scan lines
BandPos:LONG CARDINAL, --File position of band stuff
BitPage:CARDINAL, --File position of bits (units = 1024 words)
CopyCrucial:[0..1),--True if different version needed for differrent copies
SimplePage:[0..1),
ColorPass:[0..2),--for color printers: 0=magenta, 1=yellow, 2=cyan, 3=black
ColorUsed:[0..1),--true if color used (scan conversion used this)
blank:[0..2048],
PageNumber:CARDINAL,--From original Press file.
nRecords:CARDINAL,--For spruce-like operation
fontLoad:CARDINAL, --ditto
BandWidth: CARDINAL];--the number of scan lines/band

PageGLength: INTEGER = SIZE [PageG];
--need this for rumaging around in Press.Bits

--
from PressInit
copies: INTEGER;
invertMode: BOOLEAN;
filePtr: POINTER TO FP;
--pointer to bits file
reprint: BOOLEAN;
readBandsFile: BOOLEAN;

nPrinterColors, portrait, printerDevice, printerMode, ResolutionB, ResolutionS, SLOTScanLength, SLOTScanMarginAdjust, SLOTBitMarginAdjust, SLOTDouble, SLOTTimeOut, printerMaxBitsPerScan, ScanLengthInches: INTEGER;

--from Press
serverMode: BOOLEAN;
uCodeLoaded: BOOLEAN;

--Procedures
--from BootRam.mesa
RamBoot: PUBLIC PROCEDURE [fileName: STRING];

--
from PressInit.mesa
Init: PUBLIC PROC[] RETURNS [disk: tfsdskPtr, firstVDA: VDA ← LOOPHOLE[0, VDA], goAhead: BOOLEAN ← FALSE];
ReadCommandFile: PUBLIC PROC[] RETURNS[okToProceed: BOOLEAN ← FALSE];
PrintInit: PROC[] ;
--From PressLockCode
LockNeededCode: PROC[];
--From PrintSlot
PSlot: PUBLIC PROC[disk: tfsdskPtr, pageG: PageGptr, lastPage: BOOLEAN, firstVDA: PAGE, filePtr: POINTER TO FP];

SlotInit
: PUBLIC PROC[];

END.
--of PressDefs
--File PressDefs.mesa Last edited September 3, 1981 11:44 AM By Glen Williams