ololo, вот так надо
delphi Код:
procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
if FromServer then
begin
case pck[1] of
#$00: pck:=''; /// вместо 00 ид того пакета который "отсекать"
end;
end;
end.