Код:
begin
QuarantineFileF('C:\PROGRA~2\SupTab', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFileF('C:\Program Files (x86)\Internet Speed Checker', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFile('C:\PROGRA~2\SupTab\SEARCH~1.DLL', '');
QuarantineFile('C:\PROGRA~2\SupTab\SEARCH~2.DLL', '');
QuarantineFile('C:\Windows\System32\wsaudio.dll', '');
QuarantineFile('C:\Windows\System32\ihctrl32.dll', '');
QuarantineFile('C:\Windows\System32\d3dadapter.dll', '');
DeleteFile('C:\PROGRA~2\SupTab\SEARCH~1.DLL', '32');
DeleteFile('C:\PROGRA~2\SupTab\SEARCH~2.DLL', '32');
DeleteFile('C:\Program Files (x86)\globalUpdate\Update\GoogleUpdate.exe', '32');
DeleteFile('C:\Users\ГУЛЯ\AppData\Local\Amigo\Application\amigo.exe', '32');
DeleteFile('C:\Windows\System32\d3dadapter.dll', '32');
DeleteFile('C:\Windows\System32\ihctrl32.dll', '32');
DeleteFileMask('C:\PROGRA~2\SupTab', '*', true);
DeleteFileMask('C:\Program Files (x86)\Internet Speed Checker', '*', true);
DeleteFileMask('C:\Program Files (x86)\globalUpdate', '*', true);
DeleteFileMask('C:\Users\ГУЛЯ\AppData\Local\Amigo', '*', true);
DeleteDirectory('C:\PROGRA~2\SupTab');
DeleteDirectory('C:\Program Files (x86)\Internet Speed Checker');
DeleteDirectory('C:\Program Files (x86)\globalUpdate');
DeleteDirectory('C:\Users\ГУЛЯ\AppData\Local\Amigo');
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-1-6" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-1-7" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-11" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-5" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-6" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "8cb19361-5d7e-424e-bdbf-099d380efdbd-7" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "globalUpdateUpdateTaskMachineCore" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "globalUpdateUpdateTaskMachineUA" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "{BB43D375-B87C-4B8C-AF75-473D484384F9}" /F', 0, 15000, true);
RegKeyStrParamWrite('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings', 'ProxyServer', '');
RegKeyParamWrite('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Internet Settings', 'ProxyEnable', 'REG_DWORD', '0');
ExecuteSysClean;
ExecuteRepair(22);
ExecuteRepair(23);
ExecuteRepair(4);
ExecuteRepair(3);
ExecuteWizard('SCU', 2, 2, true);
RebootWindows(true);
end.
Компьютер перезагрузится.