Закрываются окна

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;
 QuarantineFile('C:\PROGRA~1\BEARSH~1\MediaBar\Datamngr\DATAMN~1.EXE','');
 QuarantineFile('c:\users\user\appdata\roaming\regdrv.exe','');
 DeleteFile('c:\users\user\appdata\roaming\regdrv.exe','32');
 RegKeyParamDel('HKEY_CURRENT_USER','Software\Microsoft\Windows\CurrentVersion\Run','Registry Driver');
 DeleteFile('C:\PROGRA~1\BEARSH~1\MediaBar\Datamngr\DATAMN~1.EXE','32');
 DeleteFile('C:\Program Files\Ask.com\Updater\Updater.exe','32');
 DeleteFile('C:\Program Files\MediaGet\mediaget.exe','32');
 DeleteFile('C:\Users\user\AppData\Local\MediaGet2\mediaget.exe','32');
 DeleteFile('C:\Program Files\Ticno\Multibar\multibar.exe','32');
 DeleteFile('C:\Program Files\pchd\PCHDPlayer.exe','32');
 DeleteFile('C:\Program Files\VPets\VPets.exe','32');
 DeleteFile('C:\Users\user\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Mail.Ru.lnk','32');
 DeleteFile('C:\Users\user\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Вконтакте.lnk','32');
 DeleteFile('C:\Users\user\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Одноклассники.lnk','32');
 RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\DATAMNGR','command');
 RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\ApnUpdater','command');
 RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\MediaGet2','command');
 RegKeyParamDel('HKEY_LOCAL_MACHINE','SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\multibar.exe','command');
BC_ImportAll;
ExecuteSysClean;
BC_Activate;
RebootWindows(false);
end.

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