Код:
begin
TerminateProcessByName('C:\Program Files (x86)\diamondata\bin\diamondata.PurBrowse64.exe');
TerminateProcessByName('c:\program files (x86)\diamondata\bin\diamondata.browseradapter.exe');
TerminateProcessByName('c:\program files (x86)\movies toolbar\safetynut\safetynutmanager.exe');
TerminateProcessByName('c:\program files (x86)\diamondata\updatediamondata.exe');
TerminateProcessByName('c:\program files (x86)\diamondata\bin\utildiamondata.exe');
ClearQuarantine;
QuarantineFile('C:\Program Files (x86)\ExpressFiles\EFUpdater.exe','');
QuarantineFile('C:\Users\Олег\AppData\Local\SwvUpdater\Updater.exe','');
QuarantineFile('C:\Program Files (x86)\Minibar\Minibar.dll','');
QuarantineFile('C:\Users\Олег\AppData\Local\WebPlayer\FLV Player\WebPlayer.exe','');
QuarantineFile('C:\Users\Олег\AppData\Local\WebPlayer\AppsHat\WebPlayer.exe','');
QuarantineFile('C:\Users\08A4~1\AppData\Local\Temp\install262023.exe','');
QuarantineFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64\safetycrt.dll','');
QuarantineFile('C:\Program Files (x86)\diamondata\bin\utildiamondata.exe','');
QuarantineFile('C:\Program Files (x86)\diamondata\updatediamondata.exe','');
QuarantineFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\SafetyNutManager.exe','');
QuarantineFile('C:\Windows\system32\drivers\{a6d34414-c1ea-40a6-b61e-fb2d4e4ad212}w64.sys','');
QuarantineFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64\configmgrc1.cfg','');
QuarantineFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\safetycrt.dll','');
QuarantineFile('C:\Program Files (x86)\diamondata\bin\{a6d34414-c1ea-40a6-b61e-fb2d4e4ad212}.dll','');
QuarantineFile('C:\Program Files (x86)\diamondata\bin\diamondataBAApp.dll','');
QuarantineFile('c:\program files (x86)\winshop\bin\winshopserver.exe','');
QuarantineFile('c:\program files (x86)\diamondata\bin\utildiamondata.exe','');
QuarantineFile('c:\program files (x86)\diamondata\updatediamondata.exe','');
QuarantineFile('c:\program files (x86)\movies toolbar\safetynut\safetynutmanager.exe','');
QuarantineFile('C:\Program Files (x86)\diamondata\bin\diamondata.PurBrowse64.exe','');
QuarantineFile('c:\program files (x86)\diamondata\bin\diamondata.browseradapter.exe','');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
DeleteFile('c:\program files (x86)\diamondata\bin\diamondata.browseradapter.exe','32');
DeleteFile('C:\Program Files (x86)\diamondata\bin\diamondata.PurBrowse64.exe','32');
DeleteFile('c:\program files (x86)\movies toolbar\safetynut\safetynutmanager.exe','32');
DeleteFile('c:\program files (x86)\diamondata\updatediamondata.exe','32');
DeleteFile('c:\program files (x86)\diamondata\bin\utildiamondata.exe','32');
DeleteFile('C:\Program Files (x86)\diamondata\bin\diamondataBAApp.dll','32');
DeleteFile('C:\Program Files (x86)\diamondata\bin\{a6d34414-c1ea-40a6-b61e-fb2d4e4ad212}.dll','32');
DeleteFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\safetycrt.dll','32');
DeleteFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64\configmgrc1.cfg','32');
DeleteFile('C:\Windows\system32\drivers\{a6d34414-c1ea-40a6-b61e-fb2d4e4ad212}w64.sys','32');
DeleteFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\SafetyNutManager.exe','32');
DeleteFile('C:\Program Files (x86)\diamondata\updatediamondata.exe','32');
DeleteFile('C:\Program Files (x86)\diamondata\bin\utildiamondata.exe','32');
RegKeyParamDel('HKEY_LOCAL_MACHINE','System\CurrentControlSet\Control\Session Manager\AppCertDlls','x86');
DeleteFile('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64\safetycrt.dll','32');
RegKeyParamDel('HKEY_LOCAL_MACHINE','System\CurrentControlSet\Control\Session Manager\AppCertDlls','x64');
DeleteFile('C:\Users\Олег\AppData\Local\SwvUpdater\Updater.exe','32');
DeleteFile('C:\Windows\Tasks\AmiUpdXp.job','64');
DeleteFile('C:\Windows\system32\Tasks\AmiUpdXp','64');
DeleteService('F06DEFF2-5B9C-490D-910F-35D3A91196222');
DeleteService('Util diamondata');
DeleteService('Update diamondata');
DeleteService('SafetyNutManager');
DeleteFileMask('C:\Program Files (x86)\diamondata','*', true);
DeleteDirectory('C:\Program Files (x86)\diamondata');
DeleteFileMask('c:\program files (x86)\movies toolbar\safetynut','*', true);
DeleteDirectory('c:\program files (x86)\movies toolbar\safetynut');
DeleteFileMask('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64','*', true);
DeleteDirectory('C:\Program Files (x86)\Movies Toolbar\SafetyNut\x64');
DeleteFileMask('C:\Users\Олег\AppData\Local\SwvUpdater','*', true);
DeleteDirectory('C:\Users\Олег\AppData\Local\SwvUpdater');
ExecuteSysClean;
ExecuteWizard('TSW',2,2,true);
RebootWindows(true);
end.
Компьютер перезагрузится.