--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;j(635)\i102I59b9B42b9B10bi22BI32b1B41i18I1i27I21i26I39i25I PageG: TYPE=MACHINE DEPENDENT RECORD --Press's PageG Structurej\37i25I [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, --dittoj(0,3648)(1,5728)\25i16I23i19I25i10I21i24I25i30I22i44I22i58I42i58I23i46I43i27I24i25I24i5I 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(635)\23i31I39i46bI3Bi15I61i24I258i12bI1B20b1B22b14B2i18bI7B42i19I Init: PUBLIC PROC[] RETURNS [disk: tfsdskPtr, firstVDA: VDA _ LOOPHOLE[0, VDA], goAhead: BOOLEAN _ FALSE];l3633d2998\b4B102b ReadCommandFile: PUBLIC PROC[] RETURNS[okToProceed: BOOLEAN _ FALSE];z20496l3633d2998\b15B PrintInit: PROC[] ; z20496l3633d2998\b9B --From PressLockCodez20496l3633d2998\i LockNeededCode: PROC[]; z20496l3633d2998\b14B --From PrintSlotz20496l3633d2998\i PSlot: PUBLIC PROC[disk: tfsdskPtr, pageG: PageGptr, lastPage: BOOLEAN, firstVDA: PAGE, filePtr: POINTER TO FP];z20496l3633d2998\b5B SlotInit: PUBLIC PROC[]; END. --of PressDefs --File PressDefs.mesa Last edited September 3, 1981 11:44 AM By Glen Williams \b9B23i