DIRECTORYBansheeStatus USING [Type],Interpress USING [Master],LSEPFace USING [BandBufferCount],PaperHandling USING [BannerMode, PrintOrder],PaperTypes USING [Paper],PrincOps USING [PageCount],PrintingState USING [Type];BansheeEngine: CEDAR DEFINITIONS = BEGINJob: TYPE = RECORD [banner: PaperHandling.BannerMode _ oncePerDocument,printOrder: PaperHandling.PrintOrder _ lastPageOutFirst,copyCount: CARDINAL _ 1,document: Interpress.Master,  -- for lack of anyting bettter for BandBLTImage.Handle,firstPage: CARDINAL _ 0,  -- pages don't include banner sheetlastPage: CARDINAL _ LAST[CARDINAL]];  -- and numbering is zero-relativeJobHandle: TYPE = REF Job;DisplayDigit: TYPE = MACHINE DEPENDENT {zero(0), one, two, three, four, five, six, seven, eight, nine, A, L, C, d, E, F, blank(20H)};maximumBufferSize: PrincOps.PageCount = 16 * LAST[LSEPFace.BandBufferCount];minimumBufferSize: PrincOps.PageCount = 16 * FIRST[LSEPFace.BandBufferCount];Beep: PROCEDURE[];Display: PROCEDURE [digitLS, digitMS: DisplayDigit];GetPageBalance: PROCEDURE RETURNS [balance: CARDINAL];GetPaperSize: PROCEDURE RETURNS [paperSize: PaperTypes.Paper];GetPrintingState: PROCEDURE RETURNS [state: PrintingState.Type];GetStatus: PROCEDURE RETURNS [status: BansheeStatus.Type];Initialize: PROCEDURE [bufferSize: PrincOps.PageCount, enableUnlimited: BOOLEAN];SetJob: PROCEDURE [job: JobHandle];SetPrintingState: PROCEDURE [state: PrintingState.Type];WaitPrintingState: PROCEDURE [targetState: PrintingState.Type, targetEqual: BOOLEAN]RETURNS [state: PrintingState.Type];WaitStatus: PROCEDURE RETURNS [status: BansheeStatus.Type];END...LOGWho / When / What.Strickberger /  9-Nov-84 15:12:00 / Created.Strickberger / 28-Jan-85 16:22:43 / Update to new BansheeFace.Jacks / 20-Jun-85 17:44:32 / Added copyright notice; updated to PS Euclid interfaces.Strickberger / 24-Jun-85 14:32:23 / Update to Pilot 12.0.Strickberger / 17-Sep-85 18:35:12 / Added enableUnlimited parameter to Initialize.Strickberger / 114-Oct-85 16:29:28 / GetPaperSize returns PaperTypes.Paper instead of PaperTypes.PaperSize.  V  File BansheeEngine.mesaCopyright (C) Xerox Corporation 1984, 1985, 1986. All rights reserved.last edited by Strickberger 14-Oct-85 16:29:28Tim Diebert: October 6, 1986 2:08:13 pm PDTTYPEs:Constants:PROCEDUREs:cause the Banshee to beep oncedisplay characters on Banshee displayreturns number of pages remaining to be printed in job returns type of paper in paper trayreturns current state (started, stopped, or completed) of jobreturns current printer statusbufferSize should be a multiple of 16 Environment.PageCount.enableUnlimited is ignored if memory size < 1.5Mbsets the implementation's internal job handle to the value passed as a parametersets next state of jobreturns when current job achieves desired relationship (equal or not equal) with the target statereturns with the new status when an engine message is broadcast ÊÚ  ˜ codešœ™KšœF™FKšœ.™.K™+—K˜ šÏk	˜	Kšœœ˜Kšœœ
˜Kšœ	œ˜!Kšœœ˜-Kšœœ	˜Kšœ	œ˜Kšœœ˜—K˜ KšÏnœœœ˜(˜ Kšœ™—˜ šœœœ˜K˜3K˜8Kšœœ˜KšœÏc7˜UKšœœŸ#˜=Kšœ
œœœŸ!˜H——˜ Kšœœœ˜—˜ Kšœœœ	œ_˜…—˜ Kšœ
™
—˜ Kšœ-œ˜L—˜ Kšœ-œ˜M—K˜ ˜ Kšœ™—˜ šžœ	œ˜Kšœ™——˜ šžœ	œ"˜4Kšœ%™%——˜ šžœ	œœœ˜6Kšœ7™7——˜ šžœ	œœ˜>Kšœ#™#——˜ šžœ	œœ˜@Kšœ=™=——˜ šž	œ	œœ˜:Kšœ™——˜ šž
œ	œ3œ˜QKšœ<™<Kšœ1™1——˜ šžœ	œ˜#KšœP™P——˜ šžœ	œ˜8Kšœ™——˜ šžœ	œ0œœ˜yKšœa™a——˜ šž
œ	œœ˜;Kšœ?™?——˜ Kšœ˜—K˜ Kš˜K˜K˜,K˜>Kšœ@œ˜UK˜9K˜RK˜kK˜ — …—    R  ‚  