home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 9
/
CD_ASCQ_09_1193.iso
/
maj
/
4437
/
int
/
spx_img.int
< prev
next >
Wrap
Text File
|
1993-09-14
|
1KB
|
38 lines
Unit SPX_IMG;
{$O+ }
{ SPX Library Version 2.0 Copyright 1993 Scott D. Ramsay }
Interface
Uses spx_vga,spx_dos;
const
img_noerror = 0; { no error }
img_notbmp = 1; { not a win3.0 BMP file }
img_notpcx = 2; { not a 256 color PCX file }
img_errorload = 3; { file not found or open error }
img_errorread = 4; { other disk read error }
img_badcolor = 5; { not 8bit BMP file }
img_errorsave = 6; { error saving PTR file }
img_erralloc = 7; { memory allocation error }
type
VidHdrType = record
position,count : word;
end;
var
rgb256 : RGBlist;
function loadbmp(bfilename:string;x,y:integer):integer;
function loadpcx(pfilename:string):integer;
function loadspcx(fname:string;x,y:integer):integer;
procedure filepcx(var pcxfile:file;size:longint);
procedure drawpcx(var p;size:word);
procedure drawspcx(var start;size:longint;x,y:integer);
procedure DrawPtr(var p;merge:boolean;sz:longint);
function LoadPTR(fn:string;merge:boolean):integer;
function SavePTR(fn:string):integer;