Код:
begin
QuarantineFile('C:\Users\User\AppData\Local\FileSystemDriver\FileSystemDriver.exe', '');
QuarantineFile('C:\Users\User\AppData\Local\SearchGo\searchgo.exe', '');
QuarantineFile('C:\Users\User\AppData\Roaming\setupsk\ml.py', '');
QuarantineFile('C:\Users\User\AppData\Roaming\setupsk\python\pythonw.exe', '');
QuarantineFile('C:\Users\User\AppData\Roaming\setupsk\app.py', '');
QuarantineFile('C:\Users\User\appdata\locallow\searchgo\searchgo.dll', '');
DeleteFile('C:\Users\User\AppData\Local\Mail.Ru\MailRuUpdater.exe', '32');
DeleteFile('C:\Users\User\AppData\Local\FileSystemDriver\FileSystemDriver.exe', '32');
DeleteFile('C:\Users\User\AppData\Local\SearchGo\searchgo.exe', '32');
DeleteFile('C:\Users\User\AppData\Roaming\setupsk\ml.py', '32');
DeleteFile('C:\Users\User\Favorites\Links\Интернет.url', '32');
DeleteFile('C:\Users\User\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Mail.Ru.lnk', '32');
DeleteFile('C:\Users\User\AppData\Roaming\setupsk\python\pythonw.exe', '32');
DeleteFile('C:\Users\User\AppData\Roaming\setupsk\app.py', '32');
DeleteFile('C:\Users\User\appdata\locallow\searchgo\searchgo.dll', '32');
DeleteFileMask('c:\users\user\appdata\local\mail.ru', '*', true);
DeleteFileMask('c:\users\user\appdata\local\filesystemdriver', '*', true);
DeleteFileMask('c:\users\user\appdata\local\searchgo', '*', true);
DeleteFileMask('c:\users\user\appdata\roaming\setupsk', '*', true);
DeleteFileMask('c:\users\user\appdata\locallow\searchgo', '*', true);
DeleteDirectory('c:\users\user\appdata\local\mail.ru');
DeleteDirectory('c:\users\user\appdata\local\filesystemdriver');
DeleteDirectory('c:\users\user\appdata\local\searchgo');
DeleteDirectory('c:\users\user\appdata\roaming\setupsk');
DeleteDirectory('c:\users\user\appdata\locallow\searchgo');
ExecuteFile('schtasks.exe', '/delete /TN "FileSystemDriver" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "MailRuUpdater" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "SearchGo Task" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "setupsk" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "setupsk2" /F', 0, 15000, true);
RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'MailRuUpdater');
RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'qyyemxapjq');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteWizard('SCU', 3, 3, true);
ExecuteWizard('TSW', 3, 3, true);
RebootWindows(false);
end.
Компьютер перезагрузится.