Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
QuarantineFileF('c:\programdata\krb updater utility', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFile('C:\Users\Zver\AppData\Roaming\cppredistx86.exe', '');
QuarantineFile('C:\ProgramData\KRB Updater Utility\krbupdater.exe', '');
QuarantineFile('C:\Users\Zver\AppData\Local\Microsoft\627135E6D8FDD5F91F34E3CFEB0647B6\F60406B65F23C03A30E30EA3B567E954.exe', '');
DeleteFile('C:\Users\Zver\AppData\Roaming\cppredistx86.exe', '32');
DeleteFile('C:\ProgramData\KRB Updater Utility\krbupdater.exe', '32');
DeleteFile('C:\Users\Zver\AppData\Local\Microsoft\627135E6D8FDD5F91F34E3CFEB0647B6\F60406B65F23C03A30E30EA3B567E954.exe', '32');
ExecuteFile('schtasks.exe', '/delete /TN "DelayedItemsByChemtableSoftware\KRB Updater Utility" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\67E9545B3AE03E03A30C32F56BF60406" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\67E9545B3AE03E03A30C32F56BF60406SB" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\67E9545B3AE03E03A30C32F56BF60406" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\67E9545B3AE03E03A30C32F56BF60406SB" /F', 0, 15000, true);
DeleteFileMask('c:\programdata\krb updater utility', '*', true);
DeleteDirectory('c:\programdata\krb updater utility');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Run', '67E9545B3AE03E03A30C32F56BF60406SB');
RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'Microsoft Visual C++ 2010');
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1001', 1);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1004', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '2201', 3);
RegKeyIntParamWrite('HKCU', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\', '1804', 1);
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteRepair(1);
ExecuteWizard('SCU', 2, 3, true);
RebootWindows(true);
end.