Код:
begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
QuarantineFile('C:\Users\inoco\AppData\Roaming\Microsoft\check\check.vbs', '');
QuarantineFile('C:\Users\inoco\AppData\Roaming\Microsoft\chtask\chtask.vbs', '');
QuarantineFile('C:\Users\inoco\AppData\Roaming\Microsoft\gosystemss\gosystemss.vbs', '');
QuarantineFileF('C:\Users\inoco\AppData\Roaming\Microsoft\check', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js', true, '', 0, 0);
QuarantineFileF('C:\Users\inoco\AppData\Roaming\Microsoft\chtask', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js', true, '', 0, 0);
QuarantineFileF('C:\Users\inoco\AppData\Roaming\Microsoft\gosystemss', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js', true, '', 0, 0);
DeleteFile('C:\Users\inoco\AppData\Roaming\Microsoft\check\check.vbs', '32');
DeleteFile('C:\Users\inoco\AppData\Roaming\Microsoft\chtask\chtask.vbs', '32');
DeleteFile('C:\Users\inoco\AppData\Roaming\Microsoft\gosystemss\gosystemss.vbs', '32');
ExecuteFile('schtasks.exe', '/delete /TN "Driver Boot" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Systems Processer" /F', 0, 15000, true);
ExecuteFile('schtasks.exe', '/delete /TN "Windows Ran" /F', 0, 15000, true);
DeleteFileMask('C:\Users\inoco\AppData\Roaming\Microsoft\check', '*', true);
DeleteFileMask('C:\Users\inoco\AppData\Roaming\Microsoft\chtask', '*', true);
DeleteFileMask('C:\Users\inoco\AppData\Roaming\Microsoft\gosystemss', '*', true);
DeleteDirectory('C:\Users\inoco\AppData\Roaming\Microsoft\check');
DeleteDirectory('C:\Users\inoco\AppData\Roaming\Microsoft\chtask');
DeleteDirectory('C:\Users\inoco\AppData\Roaming\Microsoft\gosystemss');
RegKeyParamDel('HKEY_LOCAL_MACHINE', 'Software\Microsoft\Windows\CurrentVersion\Run', 'IseUI');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
ExecuteSysClean;
ExecuteRepair(8);
ExecuteWizard('SCU', 2, 2, true);
RebootWindows(true);
end.
Компьютер перезагрузится.