//SprintStatics.sr - last modified February 5, 1981 // SprintStatics.Bcpl -- Spruce Printer Statics // See also SharedStatics.Bcpl, SharedStatics.Bj // See SpruceStatics.Bcpl for spooler statics external [ SprintSavedUFP savedSCP // Swat Context Procedure; used to set Trident Swat proc. // Printer internal statics BandWindow FontWindow logBandRecordSize nLeadingBands nTrailingBands maxPrintPassRecs scanTicks // # of 38 usec. clock ticks in 4 printer scan lines. onlyOnCopy // if non-zero, current entities are conditioned by this. partNumber // current part number, for error reporting signalBand AdapterScales BitClock MotorSpeed LineSyncDelay PageSyncDelay VideoGate debugTrail Func // table address for DoFunc // break page "comment" statics comments // the comment vector numComments // current count commentFree // free pointer // break page Date and Time String printDateString // filled in by CONVUDT, put on break page // Pointer to table of Bin serial numbers BinSerials // Error management -- see SpruceCondition, ForceBandPage errorPending // to prevent recursive error handling activities restartFrame didContinue // Ether "Ear" inPacket outPacket lenOut knockResult // if interrupt level sets true, somebody knocked earStack // for interrupt "context", for ear and clock-level stuff earMask // interrupt channel for ear interrupt tickMask // clock interrupt generates this one, used to limit ear duty cycle tickCount // non-zero during poll if ear is being duty cycle-limited tickCount0 // max ear duty cycle is 60/tickCount0 times/second tickStack // print control numPrinted ] static [ SprintSavedUFP savedSCP // Swat Context Procedure; used to set Trident Swat proc. // April 13, 1978 9:00 AM, versions 7 (interpret, engine changes) // March 2, 1978 1:46 PM ,versions 6 (OS version 14) // January 20, 1978, January 20, 1978 2:18 PM 2:18 PM, September 24, 1977 3:22 PM, // September 26, 1977 7:48 AM, October 17, 1977 11:42 AM // June 13, 1978 8:56 AM, versions 8 // September 14, 1978 3:40 PM, versions 9 sprintFPRD // InLd descriptor for running Spruce Printer spruceFPRD // Send to printer for returning // Printer internal statics BandWindow FontWindow logBandRecordSize nLeadingBands nTrailingBands maxPrintPassRecs scanTicks // # of 38 usec. clock ticks in 4 printer scan lines. onlyOnCopy // if non-zero, current entities are conditioned by this. partNumber // current part number, for error reporting signalBand AdapterScales BitClock MotorSpeed LineSyncDelay PageSyncDelay VideoGate debugTrail Func // table address for DoFunc // break page "comment" statics comments // the comment vector numComments // current count commentFree // free pointer // break page Date and Time String printDateString // filled in by CONVUDT, put on break page // Pointer to table of Bin serial numbers BinSerials // Error management -- see SpruceCondition, ForceBandPage errorPending // to prevent recursive error handling activities restartFrame didContinue // Ether "Ear" inPacket outPacket lenOut knockResult // if interrupt level sets true, somebody knocked earStack // for interrupt "context", for ear and clock-level stuff earMask // interrupt channel for ear interrupt tickMask // clock interrupt generates this one, used to limit ear duty cycle tickCount // non-zero during poll if ear is being duty cycle-limited tickCount0 = 6 // max ear duty cycle is 60/tickCount0 times/second tickStack // print control numPrinted ] // DCS, July 25, 1977 8:10 PM, derived from here and there // July 27, 1977 9:59 PM, add some more // August 10, 1977 9:12 PM, add break page "comment" statics // August 26, 1977 9:54 AM, add errorPending // August 28, 1977 7:46 AM, Spruce->Sprint, Sprouller->Spruce // September 2, 1977 4:21 PM, add ether "ear" statics // September 7, 1977 8:29 AM, add numPrinted // September 26, 1977 7:47 AM, add onlyOnCopy // October 17, 1977 11:43 AM, major version 4 // December 7, 1977 9:28 AM, add partNumber // December 20, 1977 11:54 AM, add savedSCP // January 18, 1978 10:38 AM, add scanTicks // January 20, 1978 2:18 PM, major version 5 // March 3, 1978 7:14 AM, major version 6, for OS v14 (new time standard) // April 13, 1978 9:00 AM, major version 7 (interpret, engine changes) // April 17, 1978 4:56 PM, replace MotorScale and BitScale by AdapterScales // May 11, 1978 6:30 PM, add knockResult, earStack, earMask // May 12, 1978 10:59 AM, add tickMask, tickCount, tickStack, tickCount0 // June 13, 1978 8:56 AM, major versions 8, better Ear, multi-width fonts // September 14, 1978 3:40 PM, new version method, versions 9 // September 20, 1978 9:18 AM, move Version static to SharedStatics // January 26, 1981 6:00PM, added printDateString static // February 5, 1981 3:52 PM. added BinSerials