Код:
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;
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1804', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '2201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1004', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1001', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1201', 3);
DelCLSID('{7A05BDCB-8F81-45C5-B9EC-3764E6FC1439}');
QuarantineFile('C:\Program Files (x86)\VK Downloader\kfCFztp.exe.exe','');
QuarantineFile('C:\Users\VaniaLSD\AppData\Roaming\newSI_650\s_inst.exe','');
DelBHO('{82c5f263-be95-45cb-a318-1334f0162580}');
QuarantineFile('C:\Program Files (x86)\musicbar Toolbar\rubar.dll','');
QuarantineFile('C:\Users\VaniaLSD\AppData\Local\Microsoft\Redist\VCRedist.exe','');
DeleteFile('C:\Users\VaniaLSD\AppData\Local\Amigo\Application\amigo.exe','32');
DeleteFile('C:\Users\VaniaLSD\AppData\Local\Amigo\Application\ok.exe','32');
DeleteFile('C:\Users\VaniaLSD\AppData\Local\Amigo\Application\vk.exe','32');
DeleteFile('C:\Users\VaniaLSD\AppData\Local\Microsoft\Redist\VCRedist.exe','32');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\RunOnce','VCRedist');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\Run','gzbqgfqjrh');
DeleteFile('C:\Program Files (x86)\musicbar Toolbar\rubar.dll','32');
DeleteFile('C:\Users\VaniaLSD\AppData\Roaming\newSI_650\s_inst.exe','32');
DeleteFile('C:\Windows\Tasks\newSI_650.job','64');
DeleteFile('C:\Windows\Tasks\Update Service for VK Downloader.job','64');
DeleteFile('C:\Windows\Tasks\Update Service for VK Downloader2.job','64');
DeleteFile('C:\Program Files (x86)\VK Downloader\kfCFztp.exe.exe','32');
DeleteFile('C:\Windows\system32\Tasks\newSI_650','64');
DeleteFile('C:\Windows\system32\Tasks\Update Service for VK Downloader','64');
DeleteFile('C:\Windows\system32\Tasks\Update Service for VK Downloader2','64');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
ExecuteREpair(9);
RebootWindows(false);
end.
Компьютер перезагрузится.