begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
 QuarantineFile('c:\users\k17fac~1\appdata\local\temp\cupbch.exe','');
 TerminateProcessByName('c:\users\k17fac~1\appdata\local\temp\cupbch.exe');
 DeleteFile('c:\users\k17fac~1\appdata\local\temp\cupbch.exe');
BC_ImportDeletedList;
ExecuteSysClean;
BC_Activate;
ExecuteRepair(11);
ExecuteRepair(17);
ExecuteRepair(13);
RebootWindows(true);
end.

var
  qfolder: string;
  qname: string;
begin
  qname := GetAVZDirectory + '..\Quarantine\quarantine.zip';
  qfolder := ExtractFilePath(qname);
  if (not DirectoryExists(qfolder)) then CreateDirectory(qfolder);
  CreateQurantineArchive(qname);
  ExecuteFile('explorer.exe', qfolder, 1, 0, false);
end.

begin
ExecuteRepair(13);
RebootWindows(true);
end.