Код:
begin
SearchRootkit(true, true);
QuarantineFile('C:\Documents and Settings\Irina\Application Data\curl\curl.exe', '');
QuarantineFile('C:\Documents and Settings\Irina\Application Data\curl\curl_7_54.exe', '');
QuarantineFile('C:\Documents and Settings\Irina\Local Settings\Application Data\DuckGo\duckgo.exe', '');
QuarantineFile('C:\Documents and Settings\Irina\Local Settings\Application Data\FileSystemDriver\FileSystemDriver.exe', '');
QuarantineFile('C:\Documents and Settings\Irina\Local Settings\Application Data\monotype\monotype.exe', '');
DeleteFile('C:\Documents and Settings\Irina\Application Data\curl\curl.exe', '32');
DeleteFile('C:\Documents and Settings\Irina\Application Data\curl\curl_7_54.exe', '32');
DeleteFile('C:\Documents and Settings\Irina\Local Settings\Application Data\DuckGo\duckgo.exe', '32');
DeleteFile('C:\Documents and Settings\Irina\Local Settings\Application Data\FileSystemDriver\FileSystemDriver.exe', '32');
DeleteFile('C:\Documents and Settings\Irina\Local Settings\Application Data\monotype\monotype.exe', '32');
ExecuteFile('schtasks.exe', '/delete /TN "C:\WINDOWS\Tasks\curl.job" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "curl.job" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "curls.job" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "DuckGo Task.job" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "FileSystemDriver.job" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "monotype.job" /F', 0, 15000, true);
DeleteFileMask('c:\documents and settings\irina\application data\curl', '*', true);
DeleteFileMask('c:\documents and settings\irina\local settings\application data\duckgo', '*', true);
DeleteFileMask('c:\documents and settings\irina\local settings\application data\filesystemdriver', '*', true);
DeleteFileMask('c:\documents and settings\irina\local settings\application data\monotype', '*', true);
DeleteDirectory('c:\documents and settings\irina\application data\curl');
DeleteDirectory('c:\documents and settings\irina\local settings\application data\duckgo');
DeleteDirectory('c:\documents and settings\irina\local settings\application data\filesystemdriver');
DeleteDirectory('c:\documents and settings\irina\local settings\application data\monotype');
CreateQurantineArchive(GetAVZDirectory+'quarantine.zip');
BC_ImportDeletedList;
ExecuteSysClean;
ExecuteWizard('SCU', 2, 2, true);
BC_Activate;
RebootWindows(false);
end.
Компьютер перезагрузится.