Napisz skrypt

Wymagane są usługi programisty internetowego. Należy napisać skrypt, aby zatrzymać działające pliki w systemie. Celem jest zatrzymanie procesów zewnętrznych (wszystkich oprócz procesów systemowych). Skrypt jest napisany w edytorze skryptów AVZ, jest używany w nim.
Przykład
Var Var Var Var Var.
i: integer;
Begin.
// Aktualizacja listy procesów
RefreshProcessList;
AddToLog ('Liczba procesów = '+IntToStr' (GetProcessCount))
// Pętla analizy otrzymanej listy
for i := 0 to GetProcessCount - 1 do start
// Wyjście PID procesu i jego nazwa
AddToLog(IntToStr(GetProcessPID(i)) + '+ GetProcessName(i)');
// Zatrzymywanie procesu pod warunkiem
if pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 then
TerminateProcess(GetProcessPID(i))
end;
End.

Wykorzystano następujące przykłady: AddToLog, GetProcessCount, GetProcessName, GetProcessPID, RefreshProcessList, TerminateProcess

Ten przykład demonstruje użycie wszystkich opisanych powyżej funkcji do pracy z procesami. Najpierw lista procesów jest aktualizowana za pomocą funkcji RefreshProcessList. Następnie lista jest przeglądana w pętli z informacjami wyjściowymi w protokole.
Dodatkowo, procesy, których nazwa pliku wykonywalnego zawiera tekst „trojan.exe”, są zatrzymywane przez wywołanie TerminateProcess, do którego przekazywany jest identyfikator procesu (PID).