delphi Код:
begin
if FromServer and (ConnectName=Name) and (pck[1]=#$4a) then
begin
i:=10;
Channel:=ReadD(6);
names:=ReadS(i);
mess:=ReadS(i);;
// тут делаем что то с твоими переменными.
// тут канал - куда нам пришла команда
// намес - от каво пришла команда
// месс - текст сообщения
end;
end.
читает команды приходящие ото всех игроков.
delphi Код:
begin
if FromClient and (ConnectName=Name) and (pck[1]=#$49) then
begin
mess:=ReadS(2);;
// тут делаем что то с твоими переменными.
// месс - текст сообщения или команды
end;
end.
читает только те команды, которые мы сами же отправляем.
писал на ходу, есть множество недоработко в приведнном коде, например необходимо убивать отправленый пакет, а то все будут видеть наши команды... и т.д. и т.п. )) Советую почитать готовые скрипты. почти все они на управлении из чата.
ИМХО, лудшее управление не на чат командах а на HTML окнах )
ЗЫ. не зжабуть в константах указать
Name