Мне нужно содействие в борьбе с вирусом

begin
ShowMessage('Внимание! Перед выполнением скрипта AVZ автоматически закроет все сетевые подключения.' + #13#10 + 'После перезагрузки компьютера подключения к сети будут восстановлены в автоматическом режиме.');
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
if not IsWOW64
 then
  begin
   SearchRootkit(true, true);
   SetAVZGuardStatus(True);
  end;
 TerminateProcessByName('c:\users\vovka\appdata\local\kometa\application\kometa.exe');
 TerminateProcessByName('c:\users\vovka\appdata\local\kometa\kometaup.exe');
 QuarantineFile('C:\Users\vovka\AppData\Roaming\newSI_1014\s_inst.exe','');
 QuarantineFile('C:\Users\vovka\AppData\Roaming\cpuminer\sgminer\sgminer.cmd','');
 QuarantineFile('C:\Users\vovka\AppData\Local\Kometa\Panel\KometaLaunchPanel.exe','');
 QuarantineFile('C:\Program Files (x86)\Zaxar\ZaxarLoader.exe','');
 QuarantineFile('C:\Users\vovka\AppData\Local\Kometa\kometaup.exe','');
 QuarantineFile('c:\users\vovka\appdata\local\kometa\application\kometa.exe','');
 DeleteFile('c:\users\vovka\appdata\local\kometa\application\kometa.exe','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\kometaup.exe','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\kometa-client-util.dll','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\libegl.dll','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\libglesv2.dll','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\chrome_elf.dll','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\chrome_child.dll','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Application\44.0.2403.125\chrome.dll','32');
 DeleteFile('C:\Program Files (x86)\Zaxar\ZaxarLoader.exe','32');
 DeleteFile('C:\Users\vovka\AppData\Local\Kometa\Panel\KometaLaunchPanel.exe','32');
 DeleteFile('C:\Users\vovka\AppData\Roaming\cpuminer\sgminer\sgminer.cmd','32');
 DeleteFile('C:\Users\vovka\AppData\Roaming\newSI_1014\s_inst.exe','32');
 DeleteFile('C:\WINDOWS\Tasks\newSI_1014.job','64');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.

begin
CreateQurantineArchive('c:\quarantine.zip');
end.