Код:
begin
ShowMessage('Внимание! Перед выполнением скрипта AVZ автоматически закроет все сетевые подключения.' + #13#10 + 'После перезагрузки компьютера подключения к сети будут восстановлены в автоматическом режиме.');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
if not IsWOW64
then
begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
end;
QuarantineFile('C:\Windows\Adobe Flash\Adobe.exe','');
QuarantineFile('C:\Users\home\AppData\Roaming\runWIN\update.exe','');
QuarantineFile('C:\Users\home\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\runWIN.exe','');
TerminateProcessByName('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT\tiket.exe');
QuarantineFile('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT\tiket.exe','');
QuarantineFileF('C:\Users\home\AppData\Roaming\runWIN', '*.*', false,'', 0, 0, '', '');
QuarantineFileF('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT', '*.*', false,'', 0, 0, '', '');
DeleteFile('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT\tiket.exe','32');
DeleteFile('C:\Program Files (x86)\Internet Explorer\iexplore.exe.bat','32');
DeleteFile('C:\Users\home\AppData\Local\Yandex\YandexBrowser\Application\browser.exe.bat','32');
DeleteFile('C:\Users\home\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\runWIN.exe','32');
DeleteFile('C:\Users\home\AppData\Roaming\runWIN\update.exe','32');
DeleteFile('C:\Windows\Adobe Flash\Adobe.exe','32');
RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\Adobe Flash Player SU','command');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\Run','NewLoadSystemWIN32');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\Run','NewRunWIN');
DeleteFileMask('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT', '*', true);
DeleteDirectory('C:\Users\home\AppData\Roaming\Mail.RU NewGamesT');
DeleteFileMask('C:\Users\home\AppData\Roaming\runWIN', '*', true);
DeleteDirectory('C:\Users\home\AppData\Roaming\runWIN');
DeleteFileMask('C:\Windows\Adobe Flash', '*', true);
DeleteDirectory('C:\Windows\Adobe Flash');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.
Компьютер перезагрузится.