Код:
begin
QuarantineFileF('c:\program files (x86)\filter', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 , 0);
QuarantineFile('C:\WINDOWS\System32\themctrl.dll', '');
QuarantineFile('C:\WINDOWS\System32\wbiosrvp.dll', '');
QuarantineFile('C:\Program Files (x86)\Corich\ckimersp.exe', '');
QuarantineFile('C:\ProgramData\80a218a409K960\80a218a409K960.dll', '');
QuarantineFile('C:\ProgramData\446a962a357K945\446a962a357K945.dll', '');
QuarantineFile('C:\Program Files (x86)\Ckikachcoihusy\rererle.exe', '');
QuarantineFile('C:\ProgramData\195a484a728K436\195a484a728K436.dll', '');
QuarantineFile('F:\autorun.inf', '');
DeleteFile('C:\Program Files (x86)\filter\2\CppWindowsService.exe', '32');
DeleteFile('C:\WINDOWS\System32\themctrl.dll', '32');
DeleteFile('C:\WINDOWS\System32\wbiosrvp.dll', '32');
DeleteFile('C:\Program Files (x86)\Corich\ckimersp.exe', '32');
DeleteFile('C:\ProgramData\80a218a409K960\80a218a409K960.dll', '32');
DeleteFile('C:\ProgramData\446a962a357K945\446a962a357K945.dll', '32');
DeleteFile('C:\Program Files (x86)\Ckikachcoihusy\rererle.exe', '32');
DeleteFile('C:\ProgramData\195a484a728K436\195a484a728K436.dll', '32');
DeleteFile('F:\autorun.inf', '32');
DeleteFile('C:\Users\konst\Favorites\Links\Интернет.url');
DeleteService('CppWindowsService');
DeleteFileMask('c:\program files (x86)\filter', '*', true);
DeleteFileMask('c:\program files (x86)\corich', '*', true);
DeleteFileMask('c:\programdata\80a218a409k960', '*', true);
DeleteFileMask('c:\programdata\446a962a357k945', '*', true);
DeleteFileMask('c:\program files (x86)\ckikachcoihusy', '*', true);
DeleteFileMask('c:\programdata\195a484a728k436', '*', true);
DeleteDirectory('c:\program files (x86)\filter');
DeleteDirectory('c:\program files (x86)\corich');
DeleteDirectory('c:\programdata\80a218a409k960');
DeleteDirectory('c:\programdata\446a962a357k945');
DeleteDirectory('c:\program files (x86)\ckikachcoihusy');
DeleteDirectory('c:\programdata\195a484a728k436');
ExecuteFile('schtasks.exe', '/delete /TN "Arokergeduhert Cache" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "browser\skypebrowserhost" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "browser\skypebrowserhost-exe" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "flash\flashutil_activex" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "liveupdate\liveupdate" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Microsoft\dtsaabij\fvrjerga" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Phewertainfujent" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-skypeapp_11-13-133-0_x64__kzf8qxf38zg5c\skypehost" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows-photos_17" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows-photos_17-313" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows-photos_17-313-10010" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows-photos_17-313-10010-0_x64__8wekyb3d8bbwe\microsoft" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windows-photos_17-313-10010-0_x64__8wekyb3d8bbwe\microsoft-photos" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windowscommunicationsapps_17" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windowscommunicationsapps_17-8104" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windowscommunicationsapps_17-8104-42387" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-windowscommunicationsapps_17-8104-42387-0_x64__8wekyb3d8bbwe\hxtsr" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "microsoft-zunevideo_10-17022-10311-0_x64__8wekyb3d8bbwe\video-ui" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "phone\skype" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Plarety Cache" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "update service\mrupdsrv" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "updater\updater" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "zaxargamebrowser" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "zaxarloader" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "{e2803110-78b3-4664-a479-3611a381656a}\vc_redist-x86" /F', 0, 15000, true);
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'SYSTEM\CurrentControlSet\Services\themctrl\Parameters', 'ServiceDll');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'SYSTEM\CurrentControlSet\Services\wbiosrvp\Parameters', 'ServiceDll');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteWizard('SCU', 2, 2, true);
RebootWindows(true);
end.
Компьютер перезагрузится.