Кружок нубов(Вопрос-Ответ)

[Stasrus]

Подскажите почему не работает?

begin
if FromClient and (ConnectName='SokolA')
and (pck=HStr('1b 04 00 00 00')) then begin
buf:=HStr('45 00 00 00 00 00 00 00 00 00');
SendToServerEx('SokolB');
pck:='';
end;
end.

п.с. Имена менял

Если посылать отдельно 1b 04 00 00 00 и 45 00 00 00 00 00 00 00 00 00 работает, сам скрипт нет, может потому что интерлюдия?

[NLObP]

Сообщение от Stasrus

Подскажите почему не работает?

begin
if FromClient and (ConnectName='SokolA')
and (pck=HStr('1b 04 00 00 00')) then begin
buf:=HStr('45 00 00 00 00 00 00 00 00 00');
SendToServerEx('SokolB');
pck:='';
end;
end.

п.с. Имена менял

Если посылать отдельно 1b 04 00 00 00 и 45 00 00 00 00 00 00 00 00 00 работает, сам скрипт нет, может потому что интерлюдия?

Так делал?

Сообщение от Xkor

При получении от клиента играющего за чара с ником SokolA пакета 1b 04 00 00 00 (социальное действие "Victory") непропустит этот пакет и отправит пакет 45 00 00 00 00 00 00 00 00 00 (команда сесть) от имени клиента играющего за чара с ником SokolB, тоесть играете вы в два окна, в одном SokolA, в другом SokolB, нажимаете в первом Victory, и SokolB садится.