Помогите написать скрипт

[Pusha]

спс что попытался но нехочет оно работать.

[PanAm]

В смысле? скрипт неработает или задуманное?
если скрипт - то тут может быть еше нюанс, скрипт должен работать только с одним запущенным окном. Запускается по START в любой чат.
ну и на конец -читерить можно только на достаточно кривом сервере... работать со своим инвентарум в обход сервера редко где проходит

[Pusha]

оО что то начало налаживатся после крит эрора запускаю ставлю галочку напротив скрипта всё норм ошибки нет пишу в основной чат START и нечего

Добавлено через 7 минут
о слушай начало работать тока я поменял

(pck[1]=#$49)

(pck[1]=#$38)

Добавлено через 16 минут
Блин всё работает всё правильно, ток просто когда я это праделываю в ручную отправляю пакеты по очереди всё работает, а тут 1 пакет отправляется и его действие происходит, тут срузу отправляется 2 но действие неприсходит, за ним я проследил от сервера идёт пакет типа ошибки ActionFailed

1F

.

Если можеш сделай плз чтоб между 1 и 2 тоже был интервал.я думаю это решит проблему.

[PanAm]

Все можно )
попробуйте заменить процедуру SendPck

procedure SendPck(Sender: TObject);
begin
  if (Counter mod 2) = 0 then begin
    buf:=hstr('7C B1 19 00 00');
    SendToClient;
  end else begin
    buf:=hstr('65 DE 7D 22 10 00 00 00 00');
    SendToServer;
  end;
  Dec(Counter);                //Уменьшаем счетчик
  if Counter=0 then            //Проверяем
    Timer.enabled :=false;     //и если надо выключаем
end;

и в 2 местах
Counter := 10; на Counter := 20;

[Pusha]

спс большое помогло