научите работать с чатом

[Liiion911]

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.

читает команды приходящие ото всех игроков.

begin

if FromClient and (ConnectName=Name) and (pck[1]=#$49) then
   begin
   mess:=ReadS(2);;
          // тут делаем что то с твоими переменными.
          // месс - текст сообщения или команды
       end;
end.

читает только те команды, которые мы сами же отправляем.



писал на ходу, есть множество недоработко в приведнном коде, например необходимо убивать отправленый пакет, а то все будут видеть наши команды... и т.д. и т.п. )) Советую почитать готовые скрипты. почти все они на управлении из чата.

ИМХО, лудшее управление не на чат командах а на HTML окнах )
ЗЫ. не зжабуть в константах указать Name