Service Manuals, User Guides, Schematic Diagrams or docs for : xerox mesa 4.0_1978 listing Mesa_4_System RectanglesB.mesa_Sep78

<< Back | Home

Most service manuals and schematics are PDF files, so You will need Adobre Acrobat Reader to view : Acrobat Download Some of the files are DjVu format. Readers and resources available here : DjVu Resources
For the compressed files, most common are zip and rar. Please, extract files with Your favorite compression software ( WinZip, WinRAR ... ) before viewing. If a document has multiple parts, You should download all, before extracting.
Good luck. Repair on Your own risk. Make sure You know what You are doing.



Image preview - the first page of the document



>> Download RectanglesB.mesa_Sep78 documenatation <<

Text preview - extract from the document

RectanglesB.mesa                2-Sep-78 13:58:17                                Page   1



-- RectanglesB.Mesa   Edited by Sandman on May 12, 1978    2:51 PM
DIRECTORY
  AltoDefs: FROM "altodefs" USING [PageSize],
  ImageDefs: FROM "imagedefs" USING [
    AddCleanupProcedure, AddFileRequest, AllReasons, CleanupItem, CleanupMask,
    CleanupProcedure, FileRequest],
  InlineDefs: FROM "inlinedefs" USING [BITAND],
  IODefs: FROM "iodefs" USING [CR, DEL, SP],
  MiscDefs: FROM "miscdefs" USING [Zero],
  RectangleDefs: FROM "rectangledefs" USING [
     backgtype, BitmapErrorCode, BitmapObject, blonklines, BMHandle, BMptr,
    DCB, DCBchainHead, DCBnil, DCBptr, FAptr, Fptr, leftmargin, Rectangle,
     ROptions, Rptr, xCoord, yCoord].
  RectanglesA: FROM "rectanglesa" USING [
    ComputeCharWidth. defaultcharwidths. defaultlineheight. defaultmapdata.
     defaultpfont. FixupRectangle].
  SDDefs: FROM "sddefs" USING [sAddFileRequest. SO].
  SegmentDefs: FROM "segmentdefs" USING [
     DefaultBase, DefaultPages, DefaultVersion. DeleteFileSegment. FileError.
     FileNameError. FileSegmentAddress. FileSegmentHandle. Newfile.
     NewFileSegment. OldFileOnly, Read. ReleaseFile. SwapIn. Unlock].
  StreamDefs: FROM "streamdefs" USING [
     DisplayHandle. GetDisplayStreamList. SetDisplayLine].
  SystemDefs: FROM "systemdefs" USING [
    AllocateHeapNode, AllocateResidentPages. FreeHeapNode. FreePages];
DEFINITIONS FROM RectangleDefs;
RectanglesB: PROGRAM [pagesformap. mapwordsperline: CARDINAL]
  IMPORTS ImageDefs. MiscDefs, RectanglesA. SystemDefs. SegmentDefs,
    StreamDefs
  EXPORTS RectangleDefs SHARES RectangleDefs, RectanglesA =
  BEGIN OPEN RectanglesA;
-- CHARACTER constants
  CR: CHARACTER = IODefs.CR;
  Space: CHARACTER = IODefs.SP;
  DEL: CHARACTER = IODefs.DEL;
-- GLOBAL PUBLIC Data (all PUBLIC for initialization guy 11)
  savedfirstDCB: DCBptr ~ NIL;
  tempDCB: UNSPECIFIED;
  bitmaps: PUBLIC BMHandle ~ NIL;
  defaultfont: PUBLIC Fptr ~ NIL;        -- points to start of font
  defaultfontsegment: FileSegmentHandle ~ NIL;
  SevenBitCharacter: TYPE   CHARACTER[OC .. 177C];
  FileSegmentHandle: TYPE = SegmentDefs.FileSegmentHandle;
-- GLOBAL Data
  wordsinpage: CARDINAL   = AltoDefs.PageSize;
-- Bitmap Rectangle Routines
  CreateRectangle: PUBLIC PROCEDURE [
    bitmap: BMHandle. xO, width: xCoord. yO. height: yCool'd] RETURNS[Rptr] =
    BEGIN
    rectangle: Rptr;
    rectangle ~ SystemDefs.AllocateHeapNode[SIZE[Rectangle]];
    rectanglet ~ Rectangle[NIL. FALSE,. bitmap. xO. width. O. yO. height, 0];
    rectangle.options ~ ROptions[FALSE.FALSE];
    rectangle. link ~ bitmap. rectangles;
    bitmap.rectangles ~ rectangle;
    FixupRectangle[rectangle];
    RETURN[rectangle];
    END;
  DestroyRectangle: PUBLIC PROCEDURE [rectangle: Rptr] 

◦ Jabse Service Manual Search 2026 ◦ Jabse Pravopis ◦ onTap.bg ◦ Other service manual resources online : Fixya ◦ eServiceinfo