Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
QuarantineFileF('c:\program files (x86)\filter', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFile('C:\Program Files (x86)\filter\2\CppWindowsService.exe', '');
QuarantineFile('C:\Users\славик\AppData\Local\svshost\svshost.exe', '');
QuarantineFileF('C:\ProgramData\ShopperPro\', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0, 0);
QuarantineFileF('C:\PROGRA~2\YOUTUB~1\', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0, 0);
DeleteFile('C:\Program Files (x86)\filter\2\CppWindowsService.exe', '32');
DeleteFile('C:\Users\славик\AppData\Local\svshost\svshost.exe', '32');
ExecuteFile('schtasks.exe', '/delete /TN "fupdate" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "SPBIW_UpdateTask_Time_323832383638343135392d2d37505a2a6c55326c342341" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "SPDriver" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "svshost" /F', 0, 15000, true);
DeleteService('CppWindowsService');
DeleteFileMask('c:\program files (x86)\filter', '*', true);
DeleteFileMask('C:\ProgramData\ShopperPro\', '*', true);
DeleteDirectory('C:\ProgramData\ShopperPro\');
DeleteDirectory('c:\program files (x86)\filter');
RegKeyParamDel('HKEY_CURRENT_USER', 'Software\Microsoft\Windows\CurrentVersion\Run', 'axdgvijfcm');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteWizard('SCU', 2, 3, true);
RebootWindows(true);
end.