Показать сообщение отдельно
Старый 10.08.2012, 04:48   #2
Местный
 
Аватар для SeregaZ
 
Регистрация: 16.08.2009
Сообщений: 1,224
Сказал Спасибо: 4
Имеет 229 спасибок в 182 сообщенях
SeregaZ пока неопределено
По умолчанию

у меня вот был где-то скрипт на тему "баф" в пати чате и понивод давал коняшный баф. система аналогичная. сам подправишь под свои хроники.
PHP код:
var
a:integer;

j:integer;
nick:string;
text:string;

procedure Init//Вызывается при включении скрипта
begin
 useforconnectname 
:= 'PonyVod';
 
//useforconnectname := 'SVPONIVOD';
end;

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

end
;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin

  
if FromServer and (pck[1]=#$4A) and (pck[6]=#$03) and   //пати чат просят баф
  
then begin
     j
:=10;                 // j - стартовая позиция указателя
     //CharOID:=ReadD(j);   // -- OID перса
     //TextType:=ReadD(j); //-- индекс чата в котором пишется текст
     
nick:=ReadS(j);    //-- считывается ник, и, одновременно, указатель байта сдвигается на его длинну, т.е после выполнения команды будет j:=j+(длинна_блока_оканчивающегося "00 00")
     
text:=ReadS(j);    //-- считываем текст сообщения
     
if (text='баф') or (text='аф'then begin

        
// пакет на запуск бафа пони
        
buf:=HStr('45 F3 03 00 00 00 00 00 00 00');
        
SendToServer;

     
end;
  
end;  
end
__________________
хочу картинку в подпись!
SeregaZ вне форума   Ответить с цитированием