home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 August / macformat-027.iso / mac / Shareware City / Developers / Oberon⁄F / Mac / Mod / QuickDraw (.txt) < prev    next >
Encoding:
Oberon Document  |  1994-06-07  |  18.3 KB  |  347 lines  |  [oODC/obnF]
  1. Documents.StdDocumentDesc
  2. Documents.DocumentDesc
  3. Containers.ViewDesc
  4. Views.ViewDesc
  5. Stores.StoreDesc
  6. Documents.ModelDesc
  7. Containers.ModelDesc
  8. Models.ModelDesc
  9. Stores.ElemDesc
  10. TextViews.StdViewDesc
  11. TextViews.ViewDesc
  12. TextModels.StdModelDesc
  13. TextModels.ModelDesc
  14. TextModels.AttributesDesc
  15. Geneva
  16. Geneva
  17. StdStamps.StdViewDesc
  18. Geneva
  19. Geneva
  20. Geneva
  21. MODULE MacQuickDraw;
  22. (* cp 
  23.     Point and Rect are aliases of MacTypes.Point and MacTypes.Rect
  24.     QuickDraw global variables in Global-record
  25.     No support for old color model
  26.     FontInfo, CharWidth, StringWidth, TextWidth, StdTxMeas moved to FontMgr
  27.     GetIndPattern not implemented
  28.     IMPORT SYSTEM, MacTypes;
  29.     CONST
  30.         (** source transfer modes **)
  31.         srcCopy* = 0;
  32.         srcOr* = 1;
  33.         srcXor* = 2;
  34.         srcBic* = 3;
  35.         notSrcCopy* = 4;
  36.         notSrcOr* = 5;
  37.         notSrcXor* = 6;
  38.         notSrcBic* = 7;
  39.         (** pattern transfer modes **)
  40.         patCopy* = 8;
  41.         patOr* = 9;
  42.         patXor* = 10;
  43.         patBic* = 11;
  44.         notPatCopy* = 12;
  45.         notPatOr* = 13;
  46.         notPatXor* = 14;
  47.         notPatBic* = 15;
  48.         (** standard picture comments **)
  49.         picLParen* = 0;
  50.         picRParen* = 1;
  51.         (** eight-color system values **)
  52.         whiteColor* = 30;
  53.         blackColor* = 33;
  54.         yellowColor* = 69;
  55.         magentaColor* = 137;
  56.         redColor* = 205;
  57.         cyanColor* = 273;
  58.         greenColor* = 341;
  59.         blueColor* = 409;
  60.         HANDLE = 2;
  61.         UNTAGGED = 1;
  62.         CODE = 1;
  63.     TYPE
  64.         Style* = MacTypes.Style;
  65.         Point* = MacTypes.Point;
  66.         Rect* = MacTypes.Rect;
  67.         GrafVerb* = MacTypes.Enum;
  68.         Region* = MacTypes.Region;
  69.         RgnPtr* = MacTypes.RgnPtr;
  70.         RgnHandle* = MacTypes.RgnHandle;
  71.         BitMap* = RECORD (MacTypes.Data)
  72.             baseAddr*: MacTypes.Ptr;
  73.             rowBytes*: INTEGER;
  74.             bounds*: Rect
  75.         END;
  76.         Pattern* = ARRAY [UNTAGGED] 8 OF MacTypes.PackedByte;
  77.         PatPtr* = POINTER TO Pattern;
  78.         PatHandle* = POINTER [HANDLE] TO Pattern;
  79.         Cursor* = RECORD (MacTypes.Data)
  80.             data*, mask*: ARRAY [UNTAGGED] 16 OF INTEGER;
  81.             hotSpot*: Point
  82.         END;
  83.         CursPtr* = POINTER TO Cursor;
  84.         CursHandle* = POINTER [HANDLE] TO Cursor;
  85.         QDProcs* = RECORD (MacTypes.Data)
  86.             textProc*,
  87.             lineProc*,
  88.             rectProc*,
  89.             rRectProc*,
  90.             ovalProc*,
  91.             arcProc*,
  92.             polyProc*,
  93.             rgnProc*,
  94.             bitsProc*,
  95.             commentProc*,
  96.             txMeasProc*,
  97.             getPicProc*,
  98.             putPicProc*: MacTypes.ProcPtr
  99.         END;
  100.         QDProcsPtr* = POINTER TO QDProcs;
  101.         GrafPort* = RECORD (MacTypes.Data) END;
  102.         GrafPtr* = POINTER TO GrafPort;
  103.         BWGrafPort* = RECORD (GrafPort)
  104.             device*: INTEGER;
  105.             portBits*: BitMap;
  106.             portRect*: Rect;
  107.             visRgn*,
  108.             clipRgn*: RgnHandle;
  109.             bkPat*,
  110.             fillPat*: Pattern;
  111.             pnLoc*,
  112.             pnSize*: Point;
  113.             pnMode*: INTEGER;
  114.             pnPat*: Pattern;
  115.             pnVis*: INTEGER;
  116.             txFont*: INTEGER;
  117.             txFace*: Style;
  118.             txMode*,
  119.             txSize*: INTEGER;
  120.             spExtra*: MacTypes.Fixed;
  121.             fgColor*,
  122.             bkColor*: LONGINT;
  123.             colrBit*,
  124.             patStretch*: INTEGER;
  125.             picSave*,
  126.             rgnSave*,
  127.             polySave*: MacTypes.Handle;
  128.             grafProcs*: QDProcsPtr
  129.         END;
  130.         BWGrafPtr* = POINTER TO BWGrafPort;
  131.         Picture* = RECORD (MacTypes.Data)
  132.             picSize*: INTEGER;
  133.             picFrame*: Rect
  134.         END;
  135.         PicPtr* = POINTER TO Picture;
  136.         PicHandle* = POINTER [HANDLE] TO Picture;
  137.         Polygon* = RECORD (MacTypes.Data)
  138.             polySize*: INTEGER;
  139.             polyBBox*: Rect;
  140.             polyPoints*: ARRAY [UNTAGGED] 1 OF Point
  141.         END;
  142.         PolyPtr* = POINTER TO Polygon;
  143.         PolyHandle* = POINTER [HANDLE] TO Polygon;
  144.         PenState* = RECORD (MacTypes.Data)
  145.             pnLoc*,
  146.             pnSize*: Point;
  147.             pnMode*: INTEGER;
  148.             pnPat*: Pattern
  149.         END;
  150.         Globals* = RECORD (MacTypes.Data)                (* QD offsets *)    (* Oberon offsets *)
  151.             privates: ARRAY [UNTAGGED] 39 OF INTEGER;
  152.             randSeed*: LONGINT;                                (* -126 *)        (* 0 *)
  153.             screenBits*: BitMap;                                    (* -122 *)        (* 4 *)
  154.             arrow*: Cursor;                                        (* -108 *)        (* 18 *)
  155.             dkGray*, ltGray*, gray*, black*, white*: Pattern;     (* -40, ... -8 *)    (* 86, 94, 102, 110, 118 *)
  156.             thePort*: BWGrafPtr                                    (* 0 *)              (* 126 *)
  157.         END;
  158.     VAR globals*: Globals;
  159.     PROCEDURE [CODE] InitGraf* (VAR thePort:BWGrafPtr)    0A8H, 06EH;
  160.     (** GrafPort Routines **)
  161.     PROCEDURE [CODE] OpenPort* (port: GrafPtr) 0A8H, 06FH;
  162.     PROCEDURE [CODE] InitPort* (port: GrafPtr) 0A8H, 06DH;
  163.     PROCEDURE [CODE] ClosePort* (port: GrafPtr) 0A8H, 07DH;
  164.     PROCEDURE [CODE] SetPort* (port: GrafPtr) 0A8H, 073H;
  165.     PROCEDURE [CODE] GetPort* (VAR port: GrafPtr) 0A8H, 074H;
  166.     PROCEDURE [CODE] GrafDevice* (device: INTEGER) 0A8H, 072H;
  167.     PROCEDURE [CODE] SetPortBits* (bm: BitMap) 0A8H, 075H;
  168.     PROCEDURE [CODE] PortSize* (width, height: INTEGER) 0A8H, 076H;
  169.     PROCEDURE [CODE] MovePortTo* (leftGlobal, topGlobal: INTEGER) 0A8H, 077H;
  170.     PROCEDURE [CODE] SetOrigin* (h, v: INTEGER) 0A8H, 078H;
  171.     PROCEDURE [CODE] SetClip* (rgn: RgnHandle) 0A8H, 079H;
  172.     PROCEDURE [CODE] GetClip* (rgn: RgnHandle) 0A8H, 07AH;
  173.     PROCEDURE [CODE] ClipRect* (r: Rect) 0A8H, 07BH;
  174.     PROCEDURE [CODE] BackPat* (pat: Pattern) 0A8H, 07CH;
  175.     (** Eight-Color System Routines **)
  176.     PROCEDURE [CODE] ForeColor* (color: LONGINT) 0A8H, 062H;
  177.     PROCEDURE [CODE] BackColor* (color: LONGINT) 0A8H, 063H;
  178.     (** Cursor Handling **)
  179.     PROCEDURE [CODE] InitCursor* 0A8H, 050H;
  180.     PROCEDURE [CODE] SetCursor* (crsr: Cursor) 0A8H, 051H;
  181.     PROCEDURE [CODE] HideCursor* () 0A8H, 052H;
  182.     PROCEDURE [CODE] ShowCursor* () 0A8H, 053H;
  183.     PROCEDURE [CODE] ObscureCursor* () 0A8H, 056H;
  184.     (** Pen and Line Drawing **)
  185.     PROCEDURE [CODE] HidePen* 0A8H, 096H;
  186.     PROCEDURE [CODE] ShowPen* 0A8H, 097H;
  187.     PROCEDURE [CODE] GetPen* (VAR pt: Point) 0A8H, 09AH;
  188.     PROCEDURE [CODE] GetPenState* (VAR pnState: PenState) 0A8H, 098H;
  189.     PROCEDURE [CODE] SetPenState* (pnState: PenState) 0A8H, 099H;
  190.     PROCEDURE [CODE] PenSize* (width, height: INTEGER) 0A8H, 09BH;
  191.     PROCEDURE [CODE] PenMode* (mode: INTEGER) 0A8H, 09CH;
  192.     PROCEDURE [CODE] PenPat* (pat: Pattern) 0A8H, 09DH;
  193.     PROCEDURE [CODE] PenNormal* 0A8H, 09EH;
  194.     PROCEDURE [CODE] MoveTo* (h, v: INTEGER) 0A8H, 093H;
  195.     PROCEDURE [CODE] Move* (dh, dv: INTEGER) 0A8H, 094H;
  196.     PROCEDURE [CODE] LineTo* (h, v: INTEGER) 0A8H, 091H;
  197.     PROCEDURE [CODE] Line* (dh, dv: INTEGER) 0A8H, 092H;
  198.     (** Text Drawing **)
  199.     PROCEDURE [CODE] TextFont* (font: INTEGER) 0A8H, 087H;
  200.     PROCEDURE [CODE] TextFace* (face: INTEGER) 0A8H, 088H;
  201.     PROCEDURE [CODE] TextMode* (mode: INTEGER) 0A8H, 089H;
  202.     PROCEDURE [CODE] TextSize* (size: INTEGER) 0A8H, 08AH;
  203.     PROCEDURE [CODE] SpaceExtra* (extra: MacTypes.Fixed) 0A8H, 08EH;
  204.     PROCEDURE [CODE] DrawChar* (ch: INTEGER) 0A8H, 083H;
  205.     PROCEDURE [CODE] DrawString* (s: MacTypes.Str255) 0A8H, 084H;
  206.     PROCEDURE [CODE] DrawText* (textBuf: LONGINT; firstByte, byteCount: INTEGER) 0A8H, 085H;
  207.     (** Calculations with Rectangles **)
  208.     PROCEDURE [CODE] SetRect* (VAR r: Rect; left, top, right, bottom: INTEGER) 0A8H, 0A7H;
  209.     PROCEDURE [CODE] OffsetRect* (VAR r: Rect; dh, dv: INTEGER) 0A8H, 0A8H;
  210.     PROCEDURE [CODE] InsetRect* (VAR r: Rect; dh, dv: INTEGER) 0A8H, 0A9H;
  211.     PROCEDURE [CODE] SectRect* (src1, src2: Rect; VAR dstRect: Rect): BOOLEAN 0A8H, 0AAH;
  212.     PROCEDURE [CODE] UnionRect* (src1, src2: Rect; VAR dstRect: Rect) 0A8H, 0ABH;
  213.     PROCEDURE [CODE] PtInRect* (pt: Point; r: Rect): BOOLEAN 0A8H, 0ADH;
  214.     PROCEDURE [CODE] Pt2Rect* (pt1, pt2: Point; VAR dstRect: Rect) 0A8H, 0ACH;
  215.     PROCEDURE [CODE] PtToAngle* (r: Rect; pt: Point; VAR angle: INTEGER) 0A8H, 0C3H;
  216.     PROCEDURE [CODE] EqualRect* (rect1, rect2: Rect): BOOLEAN 0A8H, 0A6H;
  217.     PROCEDURE [CODE] EmptyRect* (r: Rect): BOOLEAN 0A8H, 0AEH;
  218.     PROCEDURE [CODE] PinRect* (VAR theRect: MacTypes.Rect; thePt: MacTypes.Point): LONGINT 0A9H, 04EH;
  219.     (** Graphic Operations on Rectangles **)
  220.     PROCEDURE [CODE] FrameRect* (r: Rect) 0A8H, 0A1H;
  221.     PROCEDURE [CODE] PaintRect* (r: Rect) 0A8H, 0A2H;
  222.     PROCEDURE [CODE] EraseRect* (r: Rect) 0A8H, 0A3H;
  223.     PROCEDURE [CODE] InvertRect* (r: Rect) 0A8H, 0A4H;
  224.     PROCEDURE [CODE] FillRect* (r: Rect; pat: Pattern) 0A8H, 0A5H;
  225.     (** Graphic Operations on Ovals **)
  226.     PROCEDURE [CODE] FrameOval* (r: Rect) 0A8H, 0B7H;
  227.     PROCEDURE [CODE] PaintOval* (r: Rect) 0A8H, 0B8H;
  228.     PROCEDURE [CODE] EraseOval* (r: Rect) 0A8H, 0B9H;
  229.     PROCEDURE [CODE] InvertOval* (r: Rect) 0A8H, 0BAH;
  230.     PROCEDURE [CODE] FillOval* (r: Rect; pat: Pattern) 0A8H, 0BBH;
  231.     (** Graphic Operations on Rounded-Corner Rectangles **)
  232.     PROCEDURE [CODE] FrameRoundRect* (r: Rect; ovalWidth, ovalHeight: INTEGER) 0A8H, 0B0H;
  233.     PROCEDURE [CODE] PaintRoundRect* (r: Rect; ovalWidth, ovalHeight: INTEGER) 0A8H, 0B1H;
  234.     PROCEDURE [CODE] EraseRoundRect* (r: Rect; ovalWidth, ovalHeight: INTEGER) 0A8H, 0B2H;
  235.     PROCEDURE [CODE] InvertRoundRect* (r: Rect; ovalWidth, ovalHeight: INTEGER) 0A8H, 0B3H;
  236.     PROCEDURE [CODE] FillRoundRect* (r: Rect; ovalWidth, ovalHeight: INTEGER; pat: Pattern) 0A8H, 0B4H;
  237.     (** Graphic Operations on Arcs and Wedges **)
  238.     PROCEDURE [CODE] FrameArc* (r: Rect; startAngle, arcAngle: INTEGER) 0A8H, 0BEH;
  239.     PROCEDURE [CODE] PaintArc* (r: Rect; startAngle, arcAngle: INTEGER) 0A8H, 0BFH;
  240.     PROCEDURE [CODE] EraseArc* (r: Rect; startAngle, arcAngle: INTEGER) 0A8H, 0C0H;
  241.     PROCEDURE [CODE] InvertArc* (r: Rect; startAngle, arcAngle: INTEGER) 0A8H, 0C1H;
  242.     PROCEDURE [CODE] FillArc* (r: Rect; startAngle, arcAngle: INTEGER; pat: Pattern) 0A8H, 0C2H;
  243.     (** Calculations with Regions **)
  244.     PROCEDURE [CODE] NewRgn* (): RgnHandle 0A8H, 0D8H;
  245.     PROCEDURE [CODE] OpenRgn* 0A8H, 0DAH;
  246.     PROCEDURE [CODE] CloseRgn* (dstRgn: RgnHandle) 0A8H, 0DBH;
  247.     PROCEDURE [CODE] DisposeRgn* (rgn: RgnHandle) 0A8H, 0D9H;
  248.     PROCEDURE [CODE] CopyRgn* (srcRgn, dstRgn: RgnHandle) 0A8H, 0DCH;
  249.     PROCEDURE [CODE] SetEmptyRgn* (rgn: RgnHandle) 0A8H, 0DDH;
  250.     PROCEDURE [CODE] SetRectRgn* (rgn: RgnHandle; left, top, right, bottom: INTEGER) 0A8H, 0DEH;
  251.     PROCEDURE [CODE] RectRgn* (rgn: RgnHandle; r: Rect) 0A8H, 0DFH;
  252.     PROCEDURE [CODE] OffsetRgn* (rgn: RgnHandle; dh, dv: INTEGER) 0A8H, 0E0H;
  253.     PROCEDURE [CODE] InsetRgn* (rgn: RgnHandle; dh, dv: INTEGER) 0A8H, 0E1H;
  254.     PROCEDURE [CODE] SectRgn* (srcRgnA, srcRgnB, dstRgn: RgnHandle) 0A8H, 0E4H;
  255.     PROCEDURE [CODE] UnionRgn* (srcRgnA, srcRgnB, dstRgn: RgnHandle) 0A8H, 0E5H;
  256.     PROCEDURE [CODE] DiffRgn* (srcRgnA, srcRgnB, dstRgn: RgnHandle) 0A8H, 0E6H;
  257.     PROCEDURE [CODE] XorRgn* (srcRgnA, srcRgnB, dstRgn: RgnHandle) 0A8H, 0E7H;
  258.     PROCEDURE [CODE] PtInRgn* (pt: Point; rgn: RgnHandle): BOOLEAN 0A8H, 0E8H;
  259.     PROCEDURE [CODE] RectInRgn* (r: Rect; rgn: RgnHandle): BOOLEAN 0A8H, 0E9H;
  260.     PROCEDURE [CODE] EqualRgn* (rgnA, rgnB: RgnHandle): BOOLEAN 0A8H, 0E3H;
  261.     PROCEDURE [CODE] EmptyRgn* (rgn: RgnHandle): BOOLEAN 0A8H, 0E2H;
  262.     (** Graphic Operations on Regions **)
  263.     PROCEDURE [CODE] FrameRgn* (rgn: RgnHandle) 0A8H, 0D2H;
  264.     PROCEDURE [CODE] PaintRgn* (rgn: RgnHandle) 0A8H, 0D3H;
  265.     PROCEDURE [CODE] EraseRgn* (rgn: RgnHandle) 0A8H, 0D4H;
  266.     PROCEDURE [CODE] InvertRgn* (rgn: RgnHandle) 0A8H, 0D5H;
  267.     PROCEDURE [CODE] FillRgn* (rgn: RgnHandle; pat: Pattern) 0A8H, 0D6H;
  268.     (** Bit Transfer Operations **)
  269.     PROCEDURE [CODE] ScrollRect* (r: Rect; dh, dv: INTEGER; updateRgn: RgnHandle) 0A8H, 0EFH;
  270.     PROCEDURE [CODE] CopyBits* (srcBits, dstBits: BitMap; srcRect, dstRect: Rect; mode: INTEGER; maskRgn: RgnHandle) 0A8H, 0ECH;
  271.     (** Pictures **)
  272.     PROCEDURE [CODE] OpenPicture* (picFrame: Rect): PicHandle 0A8H, 0F3H;
  273.     PROCEDURE [CODE] PicComment* (kind, dataSize: INTEGER; dataHandle: MacTypes.Handle) 0A8H, 0F2H;
  274.     PROCEDURE [CODE] ClosePicture* 0A8H, 0F4H;
  275.     PROCEDURE [CODE] DrawPicture* (myPicture: PicHandle; dstRect: Rect) 0A8H, 0F6H;
  276.     PROCEDURE [CODE] KillPicture* (myPicture: PicHandle) 0A8H, 0F5H;
  277.     (** Calculations with Polygons **)
  278.     PROCEDURE [CODE] OpenPoly* (): PolyHandle 0A8H, 0CBH;
  279.     PROCEDURE [CODE] ClosePoly* 0A8H, 0CCH;
  280.     PROCEDURE [CODE] KillPoly* (poly: PolyHandle) 0A8H, 0CDH;
  281.     PROCEDURE [CODE] OffsetPoly* (poly: PolyHandle; dh, dv: INTEGER) 0A8H, 0CEH;
  282.     (** Graphic Operations on Polygons **)
  283.     PROCEDURE [CODE] FramePoly* (poly: PolyHandle) 0A8H, 0C6H;
  284.     PROCEDURE [CODE] PaintPoly* (poly: PolyHandle) 0A8H, 0C7H;
  285.     PROCEDURE [CODE] ErasePoly* (poly: PolyHandle) 0A8H, 0C8H;
  286.     PROCEDURE [CODE] InvertPoly* (poly: PolyHandle) 0A8H, 0C9H;
  287.     PROCEDURE [CODE] FillPoly* (poly: PolyHandle; VAR pat: Pattern) 0A8H, 0CAH;
  288.     (** Calculations with Points **)
  289.     PROCEDURE [CODE] AddPt* (srcPt: Point; VAR dstPt: Point) 0A8H, 07EH;
  290.     PROCEDURE [CODE] SubPt* (srcPt: Point; VAR dstPt: Point) 0A8H, 07FH;
  291.     PROCEDURE [CODE] SetPt* (VAR pt: Point; h, v: INTEGER) 0A8H, 080H;
  292.     PROCEDURE [CODE] EqualPt* (pt1, pt2: Point): BOOLEAN 0A8H, 081H;
  293.     PROCEDURE [CODE] LocalToGlobal* (VAR pt: Point) 0A8H, 070H;
  294.     PROCEDURE [CODE] GlobalToLocal* (VAR pt: Point) 0A8H, 071H;
  295.     (** Miscellaneous Routines **)
  296.     PROCEDURE [CODE] Random* (): INTEGER 0A8H, 061H;
  297.     PROCEDURE [CODE] GetPixel* (h, v: INTEGER): BOOLEAN 0A8H, 065H;
  298.     PROCEDURE [CODE] StuffHex* (thingPtr: MacTypes.Ptr; s: MacTypes.Str255) 0A8H, 066H;
  299.     PROCEDURE [CODE] ScalePt* (VAR pt: Point; srcRect, dstRect: Rect) 0A8H, 0F8H;
  300.     PROCEDURE [CODE] MapPt* (VAR pt: Point; srcRect, dstRect: Rect) 0A8H, 0F9H;
  301.     PROCEDURE [CODE] MapRect* (VAR r: Rect; srcRect, dstRect: Rect) 0A8H, 0FAH;
  302.     PROCEDURE [CODE] MapRgn* (rgn: RgnHandle; srcRect, dstRect: Rect) 0A8H, 0FBH;
  303.     PROCEDURE [CODE] MapPoly* (poly: PolyHandle; srcRect, dstRect: Rect) 0A8H, 0FCH;
  304.     (** Toolbox Utilities **)
  305.     PROCEDURE [CODE] PackBits* (VAR srcPtr, dstPtr: MacTypes.Ptr; srcBytes: INTEGER) 0A8H, 0CFH;
  306.     PROCEDURE [CODE] UnpackBits* (VAR srcPtr, dstPtr: MacTypes.Ptr; dstBytes: INTEGER) 0A8H, 0D0H;
  307.     PROCEDURE [CODE] GetIcon* (iconID: INTEGER): MacTypes.Handle 0A9H, 0BBH;
  308.     PROCEDURE [CODE] PlotIcon* (theRect: Rect; theIcon: MacTypes.Handle) 0A9H, 04BH;
  309.     PROCEDURE [CODE] GetPattern* (patID: INTEGER): PatHandle 0A9H, 0B8H;
  310.     PROCEDURE [CODE] GetCursor* (cursorID: INTEGER): CursHandle 0A9H, 0B9H;
  311.     PROCEDURE [CODE] ShieldCursor* (shieldRect: Rect; offsetPt: Point) 0A8H, 055H;
  312.     PROCEDURE [CODE] GetPicture* (picID: INTEGER): PicHandle 0A9H, 0BCH;
  313.     PROCEDURE [CODE] ReleasePicture* (pic: PicHandle) 0A9H, 0A3H;
  314.     PROCEDURE [CODE] DeltaPoint* (ptA, ptB: Point): LONGINT 0A9H, 04FH;
  315.     PROCEDURE [CODE] SlopeFromAngle* (angle: INTEGER): MacTypes.Fixed 0A8H, 0BCH;
  316.     PROCEDURE [CODE] AngleFromSlope* (slope: MacTypes.Fixed): INTEGER 0A8H, 0C4H;
  317.     (** Customizing QuickDraw Routines **)
  318.     PROCEDURE [CODE] SetStdProcs* (VAR procs: QDProcs) 0A8H, 0EAH;
  319.     PROCEDURE [CODE] StdText* (count: INTEGER; textBuf: MacTypes.Ptr; numer, denom: Point) 0A8H, 082H;
  320.     PROCEDURE [CODE] StdLine* (newPt: Point) 0A8H, 090H;
  321.     PROCEDURE [CODE] StdRect* (verb: GrafVerb; r: Rect) 0A8H, 0A0H;
  322.     PROCEDURE [CODE] StdRRect* (verb: GrafVerb; r: Rect; ovalWidth, ovalHeight: INTEGER) 0A8H, 0AFH;
  323.     PROCEDURE [CODE] StdOval* (verb: GrafVerb; r: Rect) 0A8H, 0B6H;
  324.     PROCEDURE [CODE] StdArc* (verb: GrafVerb; r: Rect; startAngle, arcAngle: INTEGER) 0A8H, 0BDH;
  325.     PROCEDURE [CODE] StdPoly* (verb: GrafVerb; poly: PolyHandle) 0A8H, 0C5H;
  326.     PROCEDURE [CODE] StdRgn* (verb: GrafVerb; rgn: RgnHandle) 0A8H, 0D1H;
  327.     PROCEDURE [CODE] StdBits* (VAR srcBits: BitMap; VAR srcRect, dstRect: Rect; mode: INTEGER; maskRgn: RgnHandle) 0A8H, 0EBH;
  328.     PROCEDURE [CODE] StdComment* (kind, dataSize: INTEGER; dataHandle: MacTypes.Handle) 0A8H, 0F1H;
  329.     PROCEDURE [CODE] StdGetPic* (dataPtr: MacTypes.Ptr; byteCount: INTEGER) 0A8H, 0EEH;
  330.     PROCEDURE [CODE] StdPutPic* (dataPtr: MacTypes.Ptr; byteCount: INTEGER) 0A8H, 0F0H;
  331.     (** 128K ROM **)
  332.     PROCEDURE [CODE] SeedFill* (srcPtr, dstPtr: MacTypes.Ptr; srcRow, dstRow, height, words, seedH, seedV:  INTEGER) 0A8H, 039H;
  333.     PROCEDURE [CODE] CalcMask* (srcPtr, dstPtr: MacTypes.Ptr; srcRow, dstRow, height, words:  INTEGER) 0A8H, 038H;
  334.     PROCEDURE [CODE] CopyMask* (srcBits, maskBits, dstBits: BitMap; srcRect, maskRect, dstRect: Rect) 0A8H, 017H;
  335. END MacQuickDraw.
  336. TextControllers.StdCtrlDesc
  337. TextControllers.ControllerDesc
  338. Containers.ControllerDesc
  339. Controllers.ControllerDesc
  340. TextRulers.StdRulerDesc
  341. TextRulers.RulerDesc
  342. TextRulers.StdStyleDesc
  343. TextRulers.StyleDesc
  344. TextRulers.AttributesDesc
  345. Geneva
  346. Documents.ControllerDesc
  347.