--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