Код:
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);
QuarantineFile('C:\Windows\system32\searchprotectservice.exe','');
QuarantineFile('C:\Windows\syswow64\searchprotectservice.exe','');
QuarantineFile('C:\Users\Lesha\AppData\Local\Temp\R.vbs','');
DelCLSID('{63332668-8CE1-445D-A5EE-25929176714E}');
SetServiceStart('SPS', 4);
SetServiceStart('UbarPolicyProvider', 4);
SetServiceStart('TAOFrame', 4);
SetServiceStart('TAOKernelDriver', 4);
SetServiceStart('TFsFlt', 4);
SetServiceStart('TS888x64', 4);
SetServiceStart('UbarCalloutDriver', 4);
DeleteService('UbarCalloutDriver');
DeleteService('TS888x64');
DeleteService('TFsFlt');
DeleteService('TAOKernelDriver');
DeleteService('TAOFrame');
DeleteService('UbarPolicyProvider');
DeleteService('SPS');
TerminateProcessByName('C:\Program Files\UBar\UbarService.exe');
TerminateProcessByName('C:\Program Files\UBar\ubar.exe');
QuarantineFile('C:\Program Files\UBar\UbarService.exe','');
QuarantineFile('C:\Program Files\UBar\ubar.exe','');
TerminateProcessByName('c:\windows\syswow64\searchprotectservice.exe');
QuarantineFile('c:\windows\syswow64\searchprotectservice.exe','');
TerminateProcessByName('c:\program files (x86)\tencent\qqpcmgr\11.1.16923.222\qqpcrtp.exe');
TerminateProcessByName('c:\users\lesha\appdata\roaming\daemon2.exe');
QuarantineFile('c:\users\lesha\appdata\roaming\daemon2.exe','');
DeleteFile('c:\users\lesha\appdata\roaming\daemon2.exe','32');
DeleteFile('c:\program files (x86)\tencent\qqpcmgr\11.1.16923.222\qqpcrtp.exe','32');
DeleteFile('c:\windows\syswow64\searchprotectservice.exe','32');
DeleteFile('C:\Program Files\UBar\UbarService.exe','32');
DeleteFile('C:\Program Files\UBar\ubar.exe','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\QMRtpCheck.dll','32');
DeleteFile('c:\program files (x86)\tencent\qqpcmgr\11.1.16923.222\qmsysrepprov.dll','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\TavPedc.dll','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\tpk\2.0.11037.1971\tpkcom.dll','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\tpk\2.0.11037.1971\tpkproxy.dll','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\tpk\2.0.11037.1971\tpkreport.dll','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\tpk\2.0.11037.1971\tpktt.dll','32');
DeleteFile('C:\ProgramData\Tencent\TSVulFw\TSVulFW.DAT','32');
DeleteFile('C:\Windows\system32\Drivers\TAOKernel64.sys','32');
DeleteFile('C:\Windows\system32\Drivers\TFsFltX64.sys','32');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\TS888x64.sys','32');
DeleteFile('C:\Program Files\UBar\UbarDriver.sys','32');
RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\Run','Daemon');
RegKeyParamDel('HKEY_LOCAL_MACHINE','Software\Microsoft\Windows\CurrentVersion\Shell Extensions\Approved','{63332668-8CE1-445D-A5EE-25929176714E}');
DeleteFile('C:\Program Files (x86)\Tencent\QQPCMgr\11.1.16923.222\QMContextScan.dll','32');
DeleteFile('C:\Users\Lesha\AppData\Local\Temp\R.vbs','32');
DeleteFile('C:\Windows\system32\Tasks\RestoreSearch','64');
DeleteFile('C:\Windows\syswow64\searchprotectservice.exe','32');
DeleteFile('C:\Windows\system32\searchprotectservice.exe','32');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.
Будет выполнена перезагрузка компьютера.