[QaK]

const
  RB_List = [10245]; //ИД Рейда
  RB_Count = 1; //Количество Рейдов в нашей базе (одна штука)
  TellTo = 'nik'; // Ник, кому в Пм писать, что обнаружен РБ

var
  i: integer;

begin
  if FromServer and (pck[1]=#$16) then // Если от сервера приходит пакет с описанием моба\НПЦ
  for i:=0 to RB_Count-1 do                    // пробераем по  нашему списку ИД Рейдов
  if (RB_List[i]+1000000=ReadD(6)) then begin  // Если ИД Рейда который мы задали выше+1000000= ИД из пакета c описанием НПЦ
    buf:=#$38;                                //Пишем в приват персу, ник которого указали выше
    WriteS('RB detected!');              
    WriteD(2);
    WriteS(TellTo);
    SendToServer;
  end;
end.

2downtester, это называется скрипт нефиг тут выпендриваться.