Код:
begin
ExecuteAVUpdate;
ShowMessage('Внимание! Перед выполнением скрипта AVZ автоматически закроет все сетевые подключения.'+#13#10+'После перезагрузки компьютера подключения к сети будут восстановлены в автоматическом режиме.');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
if not IsWOW64
then
begin
SearchRootkit(true, true);
SetAVZGuardStatus(true);
end;
ClearQuarantine;
TerminateProcessByName('c:\program files\pennybee\pennybee.exe');
SetServiceStart('PennyBee', 4);
StopService('PennyBee');
QuarantineFile('C:\Program Files\suptab\windowssupportdll32.dll','');
QuarantineFile('C:\Program Files\suptab\search~2.dll','');
QuarantineFile('C:\Program Files\suptab\search~1.dll','');
QuarantineFile('C:\Program Files\Microsoft Data\nsi.exe','');
QuarantineFile('C:\Users\Борис\AppData\Local\Yandex\browser.bat','');
QuarantineFile('C:\Users\9532~1\AppData\Roaming\PennyBee\UpdateProc\bkup.dat','');
QuarantineFile('C:\Program Files\punto.bat','');
QuarantineFile('C:\WINDOWS\system32\drivers\{5eeb83d0-96ea-4249-942c-beead6847053}Gw.sys','');
QuarantineFile('C:\WINDOWS\system32\drivers\ttnfd.sys','');
QuarantineFile('C:\WINDOWS\system32\drivers\ssnfd.sys','');
QuarantineFile('c:\program files\pennybee\pennybee.exe','');
DeleteFile('C:\Program Files\PennyBee\PennyBee.exe','32');
DeleteFile('C:\WINDOWS\system32\drivers\ssnfd.sys','32');
DeleteFile('C:\WINDOWS\system32\drivers\ttnfd.sys','32');
DeleteFile('C:\WINDOWS\system32\drivers\{5eeb83d0-96ea-4249-942c-beead6847053}Gw.sys','32');
DeleteFile('C:\Program Files\punto.bat','32');
DeleteFile('C:\Users\9532~1\AppData\Roaming\PennyBee\UpdateProc\bkup.dat','32');
DeleteFile('C:\Users\Борис\AppData\Local\Yandex\browser.bat','32');
DeleteFile('C:\WINDOWS\Tasks\PennyBee.job','32');
DeleteFile('C:\WINDOWS\system32\Tasks\ASP','32');
DeleteFile('C:\WINDOWS\system32\Tasks\chrome5','32');
DeleteFile('C:\WINDOWS\system32\Tasks\chrome5_logon','32');
DeleteFile('C:\Program Files\Microsoft Data\nsi.exe','32');
DeleteFile('C:\WINDOWS\system32\Tasks\LaunchSignup','32');
DeleteFile('C:\WINDOWS\system32\Tasks\PennyBee','32');
DeleteFile('C:\WINDOWS\system32\Tasks\ReimageUpdater','32');
DeleteFile('C:\Program Files\suptab\search~1.dll','32');
DeleteFile('C:\Program Files\suptab\search~2.dll','32');
DeleteFile('C:\Program Files\suptab\windowssupportdll32.dll','32');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\RunOnce','PennyBee');
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);
DeleteService('{5eeb83d0-96ea-4249-942c-beead6847053}w');
DeleteService('{5eeb83d0-96ea-4249-942c-beead6847053}Gw');
DeleteService('ttnfd');
DeleteService('ssnfd');
DeleteService('WindowsMangerProtect');
DeleteService('Util SmarterPower');
DeleteService('Update SmarterPower');
DeleteService('UniversalUpdater');
DeleteService('PennyBee');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.