Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 25.03.2009, 12:01   #51
Пользователь
 
Регистрация: 05.02.2009
Сообщений: 62
Сказал Спасибо: 1
Имеет 18 спасибок в 9 сообщенях
lexayar пока неопределено
По умолчанию

Исправил две нехорошие ошибки в боте:
тут, бот брал не ближайшего моба, а первого попавшегося.
Код:
function GetMinDistID : integer;     // функция поиска ближайшего моба в БД
 var
  i, Dist, MinDist : integer;
 begin
  result:= 0;
  if MobsLastIndex = 0 then exit;
  MinDist:=RastoyanieToMe(MobsXYZ[1,OX], MobsXYZ[1,OY]);
  for i:=1 to MobsLastIndex do if (MobsDist[i] <= Radius) and (MobsIsAttackable[i]) then
   begin
    Dist:= RastoyanieToMe(MobsXYZ[i,OX], MobsXYZ[i,OY]);
    if Dist <= MinDist then
     begin
      MinDist:= Dist;
      result:= i;
     end;                     // если нашли хоть одного моба или несколько, товозращаем индекс ближайшего
   end;
 end;
А тут, если вы качаетесь не один, то бот бегал и пытался убить уже убитых не вами мобов.
Код:
procedure Die06;
var
  i: integer;
begin
  i:= TestPovtor(ReadD(2));
  if i > 0 then begin
    MobsIsAttackable[i]:= false;
    MobsAgression[i]:= false;
    if MobsObjID[i] = TargetID then
    begin
      TimerCombat.enabled:= false;
      if Spoil and Spoiled then
       if ReadD(22) = 1 then RequestMagicSkillUse(42);
      LastKilledMobObjID:=TargetID;
      inc (MobsKilled);               // подводим статистику
      Spoiled:= false;
      TargetID:= 0;
      TimerCombat.enabled:= true;
    end;
  end;
end;
Делал раньше еще какие то доработки, уже не помню.

Добавлено через 3 минуты
Раньше бот тупил ппц из за этого, и сразу было видно. А теперь точно не отличишь от человека

Добавлено через 9 минут
Еще вспомнил одну фишку, я играю на хеллбоунде может с этим связано, а может это ошибка, но в процедуре InventoryCreate начальное смещение у меня почему то не 76 а 76-4, вот так:
Код:
offset:= 76-4;

Последний раз редактировалось lexayar, 25.03.2009 в 12:01. Причина: Добавлено сообщение
lexayar вне форума   Ответить с цитированием
За это сообщение lexayar нажился 5 спасибками от:
Старый 25.03.2009, 12:01   #52
Новичок
 
Регистрация: 14.11.2008
Сообщений: 10
Сказал Спасибо: 0
Имеет 2 спасибок в 2 сообщенях
crol пока неопределено
По умолчанию

работает на l2.ru ?
crol вне форума   Ответить с цитированием
Старый 25.03.2009, 12:09   #53
Рыцарь
 
Аватар для QaK
 
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
QaK пока неопределено
По умолчанию

crol, нет.
QaK вне форума   Ответить с цитированием
За это сообщение QaK нажился спасибкой от:
Старый 27.03.2009, 16:18   #54
Местный
 
Аватар для nezabudkin
 
Регистрация: 06.03.2008
Сообщений: 154
Сказал Спасибо: 46
Имеет 130 спасибок в 38 сообщенях
nezabudkin
По умолчанию

Цитата:
Сообщение от crol Посмотреть сообщение
работает на l2.ru ?
когда пакетхак сделают под l2.ru тогда и заработает.
nezabudkin вне форума   Ответить с цитированием
За это сообщение nezabudkin нажился спасибкой от:
Старый 30.03.2009, 13:32   #55
Заблокирован
 
Регистрация: 01.10.2007
Сообщений: 76
Сказал Спасибо: 22
Имеет 7 спасибок в 7 сообщенях
Murdoc
По умолчанию

Что то я в версии для ХБ не нашел процедуры Die06... А за исправление с дистанцией спасибо теперь гораздо "человечнее" ботик бегает
Murdoc вне форума   Ответить с цитированием
Старый 01.04.2009, 10:34   #56
Пользователь
 
Регистрация: 05.02.2009
Сообщений: 62
Сказал Спасибо: 1
Имеет 18 спасибок в 9 сообщенях
lexayar пока неопределено
По умолчанию

Цитата:
Сообщение от Murdoc Посмотреть сообщение
Что то я в версии для ХБ не нашел процедуры Die06...
Смотри версию 0.5.2 от 22.01.09.
lexayar вне форума   Ответить с цитированием
За это сообщение lexayar нажился спасибкой от:
Старый 01.04.2009, 12:28   #57
Заблокирован
 
Регистрация: 01.10.2007
Сообщений: 76
Сказал Спасибо: 22
Имеет 7 спасибок в 7 сообщенях
Murdoc
По умолчанию

Цитата:
Сообщение от lexayar Посмотреть сообщение
Смотри версию 0.5.2 от 22.01.09.
Спасибо! Я прозевал обновление скрипта А он на хеллбаунде без правки пакетов работет?
Murdoc вне форума   Ответить с цитированием
Старый 01.04.2009, 12:50   #58
Пользователь
 
Регистрация: 05.02.2009
Сообщений: 62
Сказал Спасибо: 1
Имеет 18 спасибок в 9 сообщенях
lexayar пока неопределено
По умолчанию

Работает
lexayar вне форума   Ответить с цитированием
За это сообщение lexayar нажился спасибкой от:
Старый 06.04.2009, 10:19   #59
Новичок
 
Регистрация: 28.03.2009
Сообщений: 17
Сказал Спасибо: 1
Имеет 2 спасибок в 2 сообщенях
MaRLiN пока неопределено
По умолчанию Ку

ребят, всё врое бы работает неплохо, но бот не автономен, мин 20 покачается и зависает=(( причем и клиент и программа, а потом в клиенте пишет дисконект! в чём проблемка?
MaRLiN вне форума   Ответить с цитированием
Старый 06.04.2009, 13:47   #60
Заблокирован
 
Регистрация: 01.10.2007
Сообщений: 76
Сказал Спасибо: 22
Имеет 7 спасибок в 7 сообщенях
Murdoc
По умолчанию

Цитата:
Сообщение от MaRLiN Посмотреть сообщение
ребят, всё врое бы работает неплохо, но бот не автономен, мин 20 покачается и зависает=(( причем и клиент и программа, а потом в клиенте пишет дисконект! в чём проблемка?
Неправда. это что то у тебя или с коннектом или с сервом. сегодня в 9.00 запустил и все работает без зависаний(и так каждый день с 9.00 до 17.00 ). Не отваливается если не пропадает инет.
Murdoc вне форума   Ответить с цитированием
За это сообщение Murdoc нажился спасибкой от:
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг


Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 15:38.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!