Бoт - локомотив от Alexus

[Kostya]

Бот очень хорош и работает на многих серверах, сам тестил, сам бегал и качался, но есть несколько но... допустим я б хотел что б версию interlude добавили такую шнягу, чтоб он валил только тогда когда у него ХП выше 30% или 50%, а до этого времени пил ХП банки, и ещё чтоб он мог использовать хоть 1 скилл на мобе ( боевой ), допустим он его будет использовать каждые 20секунд во время боя, будет очень даже кстате, а так большой респект!

[alexteam]

поймай пакет на использование скила и всунь в отправку.

[Kostya]

да дело то в том что в програменге вообще 0((.. вот и ищу помощи, можете помоч чтоб допустим вызывалась команда с /useshortcut 1 2 или /useshortcut 1 3 , так как бы будет проще) Да и что нащет хп?

[TAMBIK]

Kostya,
какую версию бота используешь

[Kostya]

Бот - локомотив от Alexus
версия : 0.4 (бета)
дата: 03.01.09

[Necrolity]

Спасибо автору за отличного бота.
У меня следующая проблема:
Есть две версии пакетхака, 3.5.2.102 и последний 3.5.15.126. На первом через какое-то время phx вылетает с ошибкой (чуть позднее дам саму ошибку), а на последнем бот-локомотив работает нормально, а вот бот-хелпер: как только включаешь происходят три сценария.
Как только чар хелпер переходит к атаке (не уверен точно), клиент дисконнектит;
без всяких ошибок вылетает phx;
phx критует

Хроники - Interlude, пакетхак работает корректно,

Bot-helper от Alexus
версия: 0.3 (бета)
дата: 08.04.08
---------------
Бот - локомотив от Alexus
версия : 0.3.1 (бета)
дата: 03.01.09

[alexteam]

после вылета ошибки - текст ошибки (полный, его можно скопировать) в студию . на скрине нихрена кроме того что происходит это при вызове сендтуклиент/сервер не видно.

[freel]

Всем доброго вечера, сразу напишу версия пнх 3.4.1.83 версия бота 0.4(бета), клиент С6.
Вобщем проблема такая, он не хочет собирать дроп, то есть убил моба и побежал бить следующего, а на дроп ему по боку. Настройки по поводу дропа стоят стандартные(то есть какие и были) частота срабатывания сбора дропа -500, время на сбор дропа -10, кто может подсказать в чем проблема? Пробовал менять эти цифры, толку 0.

[TAMBIK]

freel,
посмотри пакет от сервера 0C дроп падает приходит и
покажи какой

[TAMBIK]

добавил мож правильно а там хз

//-----------
 HPLevel = 70; // Уровень жизни в %, при котором начинаем глотать банки
                        //наверно лучше  увеличить до 85-90
 HPBottleID = 1539;  //  ItemID 1060=Lesser Healing Potion;    1061=Healing Potion;   1539=Greater Healing 

Potion;
 DrinkDelay = 14; // минимальное время задержки повторного питься HP-бутылки (10 - 20 сек).
      // наверно лучше уменьшить до12
//--------
//можно добавить Уровень жизни в %, при котором бот остановиться для востоновления  жизни
 HPpauseLevel = 30; // Уровень жизни в %, при котором бот остановиться для востоновления  жизни можно менять
 CurHP = 100; // разница между макс HP и текушей при которой бот продолжит действовать можно менять

//======
// если добавили  HPpauseLevel = 30; и  CurHP = 100;  то в скрипте дополняем вот так
// здесь
//--------
 MyX, MyY, MyZ : integer;          // Мои статы
 MyID, MyHP, MyMaxHP: integer;
 MyMP, MyMaxMP, MyCP, MyMaxCP: integer;
 HPlevelProcent : integer;                 
 HPpauseProcent: integer;   // добавить
 HPpause:Boolean;             // добавить
//--------
// здесь
procedure Init; //Вызывается при включении скрипта
 var
  i,n : integer;
 begin
 HPpause:=false;     //  добавить
//=====
//  и  здесь
procedure StatusUpdate;       // обновление данных о себе
 var
  i:integer;
 begin
  for i:=0 to ReadD(6)-1 do
   case pck[i*8+10] of
    #$09: MyHP:=ReadD(i*8+14);
    #$0A: MyMaxHP:=ReadD(i*8+14);
    #$0B: MyMP:=ReadD(i*8+14);
    #$0C: MyMaxMP:=ReadD(i*8+14);
            end;
 if   HPpause and (CurHP<=MyMaxHP-MyHP)   then  //  добавить
          PauseGame;                                           //  добавить
          HPpause:=false;                                    //  добавить
          end;
  if MyMaxHP > 0 then HPlevelProcent:= Round((MyMaxHP/100)*HPLevel);

 if MyMaxHP > 0 then HPpauseProcent:= Round((MyMaxHP/100)* HPpauseLevel);// вот эту строку добавить
 end;

//также  здесь
 #$0E: if MyID=ReadD(2) then     //   StatusUpdate:h(ObjectID)d(Attributes)
     begin
     StatusUpdate;
 if (MyHP > 0) and (MyHP < HPlevelProcent) then if Wait(time1,DrinkDelay) then DrinkBottle;     // пьем бутылки
 if MyHP > HPlevelProcent then time1:=1;
 if MyHP = 0 then      // Проверка не убили ли нас...
        begin
       SendMsg_to_CL('Нас убили...');
       log.Lines.Add('Нас убили...');
       StopGame;
       end;
if (MyHP > 0) and (MyHP < HPpauseProcent) then   begin //  добавить
          HPpause:=true;                                            //  добавить
       SendMsg_to_CL(' перекур...');                         // добавить
       log.Lines.Add(' перекур...');                          //  добавить                           
       end;
       end;