var j:integer; NumStr:string;
begin
for j:=0 to 999 do
begin
    if j=0 then
        NumStr:='CurrentControlSet' else 
        if j<10 then
            NumStr:='ControlSet00'+IntToStr(j) else
            if j<100 then
                NumStr:='ControlSet0'+IntToStr(j) else
                NumStr:='ControlSet'+IntToStr(j);
if RegKeyExistsEx('HKLM', 'SYSTEM\'+NumStr+'\Services\BITS') then
  begin
  RegKeyResetSecurity('HKLM', 'SYSTEM\'+NumStr+'\Services\BITS');
  RegKeyStrParamWrite('HKLM', 'SYSTEM\'+NumStr+'\Services\BITS', 'ImagePath', '%SystemRoot%\System32\svchost.exe -k netsvcs');
  AddToLog('Значение параметра ImagePath в разделе реестра HKLM\SYSTEM\'+NumStr+'\Services\BITS исправлено на оригинальное.');
  end;
if RegKeyExistsEx('HKLM', 'SYSTEM\'+NumStr+'\Services\wuauserv') then
  begin 
  RegKeyResetSecurity('HKLM', 'SYSTEM\'+NumStr+'\Services\wuauserv');
  RegKeyStrParamWrite('HKLM', 'SYSTEM\'+NumStr+'\Services\wuauserv', 'ImagePath', '%SystemRoot%\System32\svchost.exe -k netsvcs');
  AddToLog('Значение параметра ImagePath в разделе реестра HKLM\SYSTEM\'+NumStr+'\Services\wuauserv исправлено на оригинальное.');
  end;
end;
SaveLog(GetAVZDirectory + 'fystemRoot.log');
end.

 
begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
DeleteFile('C:\DOCUME~1\57F6~1\LOCALS~1\Temp\Dat18.tmp');
DeleteFile('C:\WINDOWS\system32\9f29ad3a.exe');
DeleteFile('\\?\globalroot\systemroot\system32\jlnhzpt.exe');
RegKeyParamDel('HKEY_LOCAL_MACHINE','Software\Microsoft\Windows\CurrentVersion\Run','AdVantage Setup');
ExecuteSysClean;
RebootWindows(true);
end.

 
begin
SearchRootkit(true, true);
SetAVZGuardStatus(true);
DeleteFile('c:\windows\system32\aYFfJKm.exe');
DeleteFile('c:\windows\system32\FMg9VvC.exe');
DeleteFile('c:\windows\system32\XsP65k7.exe');
DeleteFile('c:\windows\system32\x0al6uC.exe');
DeleteFile('c:\windows\system32\86Bw3G8.exe');
DeleteFile('c:\windows\system32\y5IBpHc.exe');
DeleteFile('c:\windows\system32\7Sdr0ie.exe');
DeleteFile('c:\windows\system32\gq5emYN.exe');
DeleteFile('c:\windows\system32\DSEoKG4.exe');
DeleteFile('c:\windows\system32\3ewhmo6.exe'); 
ExecuteSysClean;
RebootWindows(true);
end.