Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
ClearQuarantineEx(true);
QuarantineFileF('c:\programdata\microsoft\macromed\flash player\f2245f4b-c437-4faf-95d5-3775585b11ac', '*', true, '', 0 , 0);
QuarantineFileF('c:\programdata\krb updater utility', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFile('C:\ProgramData\Microsoft\Macromed\Flash Player\F2245F4B-C437-4FAF-95D5-3775585B11AC\5D8662A6-127D-4FA0-88E6-BBCD2DEB14AC.exe', '');
QuarantineFile('C:\ProgramData\KRB Updater Utility\krbupdater-utility.exe', '');
QuarantineFile('C:\Users\seGUN\AppData\Local\Temp\speedpc.exe', '');
QuarantineFile('C:\Users\seGUN\AppData\Local\Microsoft\94B0A4209A127168708DE0BF8933CB2A\92697A29ACF084D37409A8F3FCBFCE4C.exe', '');
QuarantineFile('C:\Users\seGUN\AppData\Local\Microsoft\Start Menu\Вoйти в Интeрнeт.lnk', '');
DeleteFile('C:\ProgramData\Microsoft\Macromed\Flash Player\F2245F4B-C437-4FAF-95D5-3775585B11AC\5D8662A6-127D-4FA0-88E6-BBCD2DEB14AC.exe', '32');
DeleteFile('C:\ProgramData\KRB Updater Utility\krbupdater-utility.exe', '32');
DeleteFile('C:\Users\seGUN\AppData\Local\Microsoft\94B0A4209A127168708DE0BF8933CB2A\92697A29ACF084D37409A8F3FCBFCE4C.exe', '32');
DeleteFile('C:\Users\seGUN\AppData\Local\Microsoft\Start Menu\Вoйти в Интeрнeт.lnk');
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\BFCE4CCF3F8A90473D480FCA9292697A" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\AF2245F4B-C437-4FAF-95D5-3775585B11AC" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\BFCE4CCF3F8A90473D480FCA9292697A" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\Windows\F2245F4B-C437-4FAF-95D5-3775585B11AC" /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', 'F2245F4B-C437-4FAF-95D5-3775585B11AC');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\KRB Updater Utility', 'command');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\speedpc', 'command');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteWizard('TSW', 2, 3, true);
RebootWindows(true);
end.