блок

MutageN · 08.03.2009, 03:50

помагите плиз! мне вот надо блокироватъ парочку покетов от сервера к клиенту.... как ето зделатъ?

AD! · 08.03.2009, 08:23

delphi Код:

procedure Init; //Вызывается при включении скрипта
begin
end;

procedure Free; //Вызывается при выключении скрипта
begin
end;

procedure OnConnect(WithClient: Boolean); //Вызывается при установке соединения
begin
end;

procedure OnDisonnect(WithClient: Boolean); //Вызывается при потере соединения
begin
end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
if (ConnectName='mynick') and (FromServer) and  (pck[1]=#$42) then
pck:='';
end.

блокирует пакет say2

MutageN · 08.03.2009, 19:05

спс

Добавлено через 4 часа 17 минут
a как переделaть чтоб блокировал пакет Useltem от сервера?

KrazyKeNNy · 08.03.2009, 19:39

Руками переделай.

MutageN · 09.03.2009, 23:05

да помагите! как имено переделать на пакет Useltem ?

Добавлено через 7 минут
помагите разобраца что и где переделовать имнео, и на что?

Добавлено через 0 час 00 минуты
скрипт непашет! хз....

5162 · 10.03.2009, 02:53

Извините что не совсем в тему.
Подскажите как будет выглядеть скрипт для социального действия?!
Мне нужно - один раз нажал приветствие, отправил 3-5 пакетов.
Заранее благодарен.

QaK · 10.03.2009, 08:18

5162, хроники какие? а вообще - топ "Да будет бот", первый пост - куча скриптов, в том числи и используются соц. действия.

Добавлено через 2 минуты
MutageN, пакета UseItem от СЕРВЕРА не существует, UseItem посылает клиент, это раз, во-вторых, если ты скрипт от AD! не можешь переделать - значит ты совсем не в теме - значит сиди кури основы паскаля, пакетный уровень ла2 и т.д.
З.Ы. Здесь полностью все за тебя делать не будут.

MutageN · 10.03.2009, 08:33

QaK, вобшето я можна сказать 1 рас сталкиваюсь со скриптами... а насчёт усеитема уверен? что усеитем от сервете небывывает? вот тут сервак удевительным одразом заставляет испоьзовать вещ пару рас... и как ето назеваецо тогда? лана мала таво заюзал так кака дали скрипт не пашет... проверте плиз..

lexayar · 10.03.2009, 12:14

MutageN, UseItem пакета от сервера не бывает. Если фишку не рубишь, дак напиши тогда по русски что требуется, а не в терминах, которые ты сам не знаешь. И хроники укажи.
Вот исправь строчку в скрипте для блокировки пакета UseItem от клиента:

Код:

if (ConnectName='mynick') and (FromClient) and  (pck[1]=#$14) then
  pck:='';

QaK · 10.03.2009, 12:16

MutageN, сначала научись грамотно писать, ну или проверяй текст в ворде если совсем все плохо, потом грамотно описывать проблему, все телепаты, как обычно, в отпуске, поэтому, понять, чего ты хочешь добиться никто не может, соответственно даже из самых альтруистических побуждений ответ тебе никто не даст, ибо непонятно, чего ты вообще хочешь сделать ...