                      Plug-ins
                                  
                          MentoAntivirus v1.6

p.
1.  pp.
2. p .
3.  .
4. .


1.  pp.
MentoAntivirus - pp, p  pp p   p.
  p    (DLL         p  p
pp, p  p  p     .
         (, VB ,VC++ etc.)
  ( ,    p )   
p .  pp,      , p
p ,       (   ADINF )    -
  - , p   .       
.
 .
 p 1.6   p  p,  p  800  600.
(  pp ).
  p   p.

2.p .
   p   .
 p  p.

/pp  - /pp MasterBoot, Boot, FAT, Dir  pp
Windo'.
/pp  - /pp  .

     . mainbase.dpr

library mainbase;

uses
  SysUtils,
  Classes,
  windows;

function GetName:shortstring;export;stdcall;
begin
GetName:='MentatXX - feb 99 - 212 ';
{'  -         -
-  '}
{ ,    ANSI - }
end;

function GetAuthorName:shortstring;export;stdcall;
begin
GetAuthorName:='MentatXX';
{  -  }
end;

function IsPlug:boolean;export;stdcall;
begin
IsPlug:=true;
{   - ,   }
end;

procedure TestDrive(var report:shortstring;var result:integer);stdcall;export;stdcall;
var found:boolean;
begin
{ REPORT     }

{        }
if found then
         begin
         result:=1;
         report:=' $virname.family';
         {B Report     
             .  .
         ( ).     -
               .}
         end
         else result:=0;
end;

procedure TestFile(var report:shortstring;var result:integer);stdcall;export;stdcall;
var found:boolean;
begin
{ REPORT    }

{        }
if found then
         begin
         result:=1;
         report:=' $virname.family';
         {B Report     
             .  .
         ( ).     -
               .}
         end
         else result:=0;
end;

procedure CureFile(var report:shortstring;var result:integer);stdcall;export;stdcall;
begin
{ REPORT    }
{        }
result:=2; {  }
result:=1; {   }
result:=0; {   }
report:='';
{ Report     }
end;

procedure CureDisk(var report:shortstring;var result:integer);stdcall;export;stdcall;
begin
{ REPORT     }
{        }
result:=2; {  }
result:=1; {   }
result:=0; {   }
report:='';
{ Report     }
end;



exports GetName,IsPlug,TestDrive,TestFile,GetAuthorName,CureDisk,CureFile;

begin
end.

p   p.

1.
shortstring -   p   255.
_   ________________________________
^                 ^
|   255  .
|
1-   p  p

2.
integer -   4 .




3. p MAV.THP.
   p  $topic virname.familyname
			       $topic virname.virsize
  $endtopic
 p  p   p( p p
)
( pp p p )
    p   p, p 
SETUP   MAV.THP  .


4. .

 p pp  p  :
p -  p  p.
p -  .

  p p   
  MENTATXX@MAIL.RU ,       
 p pp.

    p   p MentoAntivirus.


		  p :
				MENTATXX@MAIL.RU
				MENTATXX@CHAT.RU



