Управление другим чаром из 1 окна

[spiritofsands]

Немного переделал антигмлист:
- задается тип игры;
- работает на Interlude и Hellbound.
- меняет команду "/gmlist" на "-gmlist"

// Antigmlist v1.0                                                          
//                  Замена команды /gmlist на -gmlist                       
//                                         by spiritofsands                 
const
        game='hb'; // 'int' для interlude и 'hb' для Hellbound    <= менять тип игры тут
var gmlist,inmsg:string;
procedure Init; //Вызывается при включении скрипта
begin
if game='int' then
    begin
    gmlist:=#$81;
    inmsg:=#$38;
    end;
if game='hb' then
    begin
    gmlist:=#$8B;
    inmsg:=#$49;
    end;
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
 begin
 if (fromclient) then
  begin
  case pck[1] of
  gmlist: pck:='';
  inmsg:
   begin
       if (reads(2)='-gmlist') then
       begin
            pck:='';
            buf:=gmlist;
            sendtoserver;
       end;
   end;
  end;
 end; 
end.

Добавлено через 17 часов 13 минут
Есть проблема: когда пытаешся что-то подобрать, бот считает это таргетом цели и бежит сам подбирать. Как исправить?