[Nickers]

И еще
buf:=#$A7#$B1#$12#$01#$00#$40#$80#$58#$00#$01#$00# $00#$00#$00#$00#$00#$00#$00#$00#$00#$00;
что означает етот пакет ???

Это собстна пакет, который он посылает нужно каждую пару писать с #$...

Можешь любой пакет вставить))
В конкретном случае этот пакет был на покупку 1ккк адены за 1гб...

Берешь Таймер в его тело пихаешь:
Оффтоп

if (GetItem(57,3,4)<1500000000) then
   begin
      Repeat
         begin
            buf:=#$A7#$B1#$12#$01#$00#$40#$80#$58#$00#$01#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00;
            SendToServer;
         end;
      Until (GetItem(57,3,4)<1500000000);
   end;

Скрипт тамбика можно на этом форуме найти даже без поиска...

Есть так же вариант вставить в само тело проверку в любом скрипте, но не факт, что там буит ГетИтем функция или вообще база инвентаря...