home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 079.lha / SpiroGraph / SpiroDetails.Def < prev    next >
Encoding:
Modula Definition  |  1986-11-20  |  1.3 KB  |  42 lines
  1. DEFINITION MODULE SpiroDetails;
  2.  
  3.               (* * * * * * * * * * * * * * * * * * * * * * *)
  4.               (* Various graphics and Intuition-related    *)
  5.               (* routines, plus a few odds and ends.       *)
  6.           (*                                           *)
  7.           (* This was coded for the Oxxi M2 compiler,  *)
  8.           (* but porting it to the TDI compiler should *)
  9.           (* be trivial.                               *)
  10.           (*                                           *)
  11.           (* (c) Copyright 1987 by Steve Faiwiszewski. *)
  12.           (* This program may be freely distributed,   *)
  13.           (* but it is not to be sold.                 *)
  14.           (* Please leave this notice intact.          *)
  15.               (* * * * * * * * * * * * * * * * * * * * * * *)
  16.  
  17. FROM SYSTEM IMPORT ADDRESS;
  18.  
  19. PROCEDURE OpenLibs;
  20.  
  21. PROCEDURE CleanUp(line : ARRAY OF CHAR; n : CARDINAL);
  22.  
  23. PROCEDURE OpenMyScreen(W,H,D : CARDINAL);
  24.  
  25. PROCEDURE OpenMyWindow(W,H,D : CARDINAL);
  26.  
  27. PROCEDURE Position(x,y: CARDINAL);
  28.  
  29. PROCEDURE PlotTo(x,y: CARDINAL);
  30.  
  31. PROCEDURE EraseScreen(ColorReg,W,H : CARDINAL);
  32.  
  33. PROCEDURE SetColor(ColorReg : CARDINAL);
  34.  
  35. PROCEDURE ChangeColorReg(ColorReg, red, green, blue : CARDINAL);
  36.  
  37. PROCEDURE GetMessages(VAR Done, NextPattern, PrevPattern : BOOLEAN);
  38.  
  39. PROCEDURE AddToAboutText(line : ADDRESS);
  40.  
  41. END SpiroDetails.
  42.