home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Hack-Phreak Scene Programs
/
cleanhpvac.zip
/
cleanhpvac
/
CON-03A.ZIP
/
CONS_COM.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1995-11-01
|
274b
|
23 lines
unit cospiracy_comms_routines;
procedure
procedure send_file(ansi : string );
var
ch : char;
f : text;
begin
assign(f,'text\'+ansi);
reset(f);
repeat
read(f,ch)
sc(ch);
until eof(f)
close(f)
end;