home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / pascal / spx10.zip / SPX_INT.ZIP / SPX_IMG.INT < prev    next >
Text File  |  1993-05-10  |  792b  |  28 lines
  1. Unit SPX_IMG;
  2.  
  3. { SPX Library Version 1.0  Copyright 1993 Scott D. Ramsay }
  4.  
  5. Interface
  6.  
  7. Uses SPX_VGA;
  8.  
  9. type
  10.   VidHdrType = record
  11.                  position,count : word;
  12.                end;
  13.  
  14. var
  15.   rgb256         : RGBlist;     { palette of last loaded PCX file }
  16.   x1pcx,y1pcx,                  { pcx size from load PCX file loaded }
  17.   x2pcx,y2pcx  : word;          {  using loadspcx }
  18.  
  19. function loadpcx(pfilename:string):integer;
  20. procedure filepcx(var pcxfile:file;size:longint);
  21. function loadspcx(fname:string;x,y:integer):boolean;
  22. procedure drawpcx(var p;size:word);
  23. procedure drawspcx(var start;size:longint;x,y:integer);
  24. procedure DrawPtr(var p;merge:boolean;sz:longint);
  25. function LoadPTR(fn:string;merge:boolean):integer;
  26. function SavePTR(fn:string):integer;
  27.  
  28.