home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Programme_zum_Heft / Programmieren / Kurztests / PascalPCQ / Include / Graphics / Pens.i < prev    next >
Text File  |  1990-08-28  |  1KB  |  46 lines
  1. {
  2.     Pens.i of PCQ Pascal
  3.  
  4.     This is not a standard Amiga include file, but since the
  5.     various drawing routines don't seem to fit in any other
  6.     include file, this one was created to declare them.
  7. }
  8.  
  9.  
  10. Procedure Draw(rp : Address; x, y : Short);
  11.     External;
  12.  
  13. Procedure DrawCircle(rp : Address; cx, cy, radius : Short);
  14.     External;
  15.  
  16. Procedure DrawEllipse(rp : Address; cx, cy, a, b : Short);
  17.     External;
  18.  
  19. Procedure Flood(rp : Address; mode : Integer; x, y : Short);
  20.     External;
  21.  
  22. Procedure Move(rp : Address; x, y : Short);
  23.     External;
  24.  
  25. Procedure PolyDraw(rp : Address; count : Short; ary : Address);
  26.     External;
  27.  
  28. Function ReadPixel(rp : Address; x, y : Short) : Integer;
  29.     External;
  30.  
  31. Procedure RectFill(rp : Address; xmin, ymin, xmax, ymax : Short);
  32.     External;
  33.  
  34. Procedure SetAPen(rp : Address; pen : Byte);
  35.     External;
  36.  
  37. Procedure SetBPen(rp : Address; pen : Byte);
  38.     External;
  39.  
  40. Procedure SetDrMd(rp : Address; mode : Byte);
  41.     External;
  42.  
  43. Procedure WritePixel(rp : Address; x, y : Short);
  44.     External;
  45.  
  46.