[Помогите!] Ткните носом пожалуйста

[Xantrax]

Цитата: то бежишь к заданной точке.

Вот тут-то и нужна ассемблерная вставка перемещения перса к точке с координатами, пока у меня этого ни разу не получилось. Конкретно в данный момент, сижу переписываю своего недоделанного бота с VS в C++Builder6. Думаю, как восстановлю исходную функциональность, то сначала попробую простую Асм вставку снятия моба с таргета, а потом уже буду смотреть как переместить перса в координаты...
Ну, и скромно надеюсь на вашу моральную и кодовую поддержку!))

Добавлено через 1 час 51 минуту
+036C BuffsArray /Список баффов/

+ [I*0x12] Buffs, word

Ммм, word==Word==WORD==unsigned short? Список бафов - это массив бафов? А он динамически расширяется с добавлением новых бафов или он имеет статический размер? Как понять что на тебе, допустим, бафф формы лисы?

[BritishColonist]

Xantrax, чтоб VS ничего не добавлял к функции инжекта, нужно описывать функцию так:

__declspec(naked) void Func()

[Xantrax]

Цитата: __declspec(naked) void Func()

Где ж вы все были, когда я тут, на страницах форума Войну и Мир в 4 томах писал о моих попытках внедрить асм код?
Сейчас уже поздно, я переписываю бота под С++ Builder 6, но за информацию все равно спасибо.

[BritishColonist]

Цитата: Сообщение от Xantrax я переписываю бота под С++ Builder 6

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

[Xantrax]

Пока без понятия, не пробовал. Но люди с этого форума под C Builder не жалуются, а значит наверное не делает.

[Xantrax]

Люди, поделитесь алгоритмом действий, помогите оживить бревно.
Я делаю так:

PHP код:

EnableFox = GetFormaPersa();
        if(EnableFox == 0)
        {
                inject.TransformToFox();
                inject.SayHelloPet();
                Sleep(4000);
                PetID = GetActivePetID();
                CallAttackTimer->Enabled = true;
        }
        else if(EnableFox == 1)
        {
                CallAttackTimer->Enabled = false;
                inject.TransformToFox();
                inject.SayGoodByePet();
                inject.TargetMobOff();
        } 


1) смотрю форму перса, если на двух ногах, то превращаюсь в лису + вызываю пета + получаю его ID, далее запускаю таймер, который с каждым тиком (раз в 5 сек)) проверяет состояние переменной int

PHP код:

NomerDeistvij:
void __fastcall TForm1::CallAttackTimerTimer(TObject *Sender)
{
                switch(NomerDeistvij)
                {
                        case 0:
                        {
                                NomerDeistvij = 1;
                                break;
                        }
                        case 1:
                        {
                                SelectTargetMob();
                                NomerDeistvij = 3;
                                break;
                        }
                        case 2:
                        {
                                //inject.DeselectTarget();
                                inject.MyPetHeal(PetID);
                                NomerDeistvij = 3;
                                break;
                        //inject.DeselectTarget();
                        }
                        case 3:
                        {
                                if(PetHPProc < 95)
                                       {
                                                NomerDeistvij = 2;

                                       }
                                if(CurrentPersTarget()!= 0)
                                {
                                        inject.NormalAttack();
                                        if(PersChi()>2)
                                                {
                                                        UseSkillLvl1();
                                                }
                                        NomerDeistvij = 3;
                                }
                                else
                                {
                                        NomerDeistvij = 1;
                                }
                                break;
                        }
                }
} 


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

Добавлено через 11 часов 57 минут
Ну, неужели никто не поделится даже мыслью?

[dwa83]

Я оживлял "полешко" таким вот способом клац
Там же есть ссылка от vogel на другой способ

Цитата: Сообщение от vogel реализация действий [Ссылки могут видеть только зарегистрированные пользователи. ] с нормальным полиморфизмом - правильнее.

[Xantrax]

Цитата: Сообщение от dwa83 реализация действий шаблоном "Command" с нормальным полиморфизмом - правильнее.

Ссылка битая!

Добавлено через 7 минут

Цитата: Tекстовое описание работы бота от dwa83 Для каждого действия бота мы напишем отдельную функцию. Так как и инжекты и считывания происходят давольно быстро, то и эти функции будут выполняться тоже быстро. Затем мы создадим функцию-переключатель, которая будет переключать бота между этими функциями. Мы создадим отдельную переменную, которая будет содержать числовое значение, и в зависимости от того, что это за значение, в программе будет выполняться соответствующая этому действию функция. В событии таймера мы напишем ВСЕ наши функции, но при каждом срабатывании таймера будет проверяться значение переменной и выполняться только одна из функций, а другие просто будут пропускаться.

У меня фактически делается тоже самое, только вот срабатывание таймера иногда приходит не вовремя, в результате выполняется тоже действие, т.е. переменной не успевает присвоиться следующее значение...

Добавлено через 9 минут

Цитата: // Стек действий struct ACTION_STACK

А нужен ли он вообще? Пусть каждая функция, выполняющая что-либо будет сама по себе...
Моя проблема заключается в том что во время убийства моба(в котором принимает участие и пет) нужно отслеживать здоровье пета и хилить его. Здоровье пета я отслеживаю отдельным таймером и соотвественно, когда оно ниже определенного значения должна включаться функция отхила. Но время выполнения операций разное, а тик таймера может придти в любой момент, иногда он приходит чисто когда переменная (по которой переключаются режимы) равна 2, а значит она опять хилит пета, ну и так далее....

[fds255]

Цитата: Сообщение от Xantrax Моя проблема заключается в том что во время убийства моба(в котором принимает участие и пет) нужно отслеживать здоровье пета и хилить его. Здоровье пета я отслеживаю отдельным таймером и соотвественно, когда оно ниже определенного значения должна включаться функция отхила. Но время выполнения операций разное, а тик таймера может придти в любой момент, иногда он приходит чисто когда переменная (по которой переключаются режимы) равна 2, а значит она опять хилит пета, ну и так далее....

таймеры не синхронизированы, лучший выход завязать все действия на один таймер

[Xantrax]

Цитата: таймеры не синхронизированы, лучший выход завязать все действия на один таймер

1-й таймер считывает информацию с интервалом 10 мс, так что я думаю расхождение не большое.
А если я объединю все в одном таймере и поставлю интервал срабатывания 10 мс, так у меня ни одно действие выполняться не будет, просто не будет успевать (так я думаю...)....

[fds255]

Xantrax,

можно сделать по другому:

procedure TForm1.Timer1Timer(Sender: TObject);
begin

CB1:=CB1+300;
if CB1>=... then
begin
CB1:=0;
......................
end;

CB2:=CB2+300;
if CB2>=... then
begin
CB2:=0;
......................
end;

end;

тайминг таймера 300мс поэтому и +300, можно изменить.

В этом случае у тебя не будет пересечения, а действия будут выполняться последовательно.

[Xantrax]

Цитата: можно сделать по другому:

Что-то я не понял идею... Что за CB? Чему равно CB до изменения его значения в функции.
CB = 0 - это остановка таймера?

[fds255]

Цитата: Сообщение от Xantrax Что за CB?

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

Да, кстати, зачем делать тайминг 10мс, т.е. 100 тиков в секунду, вполне можно обойтись и таймингом в 100-200мс, стабильнее будет работать, поверь.

[Xantrax]

Цитата: Сообщение от fds255 CB - это переменная которая при каждом тике таймера увеличивается на время тайминга

Почему на именно на время таймера, можно и на 1 увеличивать. И все равно задумку не понял...

PHP код:

int i = 0;
void TForm::Timer()
{
i+=1;
if(i>0)
{
выбираем таргет;
i = 0;
}
} 


А если какое-либо действие не успеет за это время выполниться? А если мне два раза нужно выполнить это действие? Логику по прежнему не понял. Он у меня на отрез отказывается хилить пета (( Проверяю, HPProc(проценты хп) пета и если меньше 95 (для теста), скидываю флаг на тот в котором должен выполняться хил, но 0 эмоций при запуске, хотя сама функция работает...
А если поставить break; после перехода на действие "хил пета", он только и делает, что хилит пета. Я не понимаю, почему он в коде проскакивает условие:

PHP код:

 if(PetHPProc < 95)
                                {
                                        NomerDeistvij = 2;
                                } 


[fds255]

Цитата: Сообщение от Xantrax Он у меня на отрез отказывается хилить пета ((

Ок, давай разберем твою функцию:

NomerDeistvij:
void __fastcall TForm1::CallAttackTimerTimer(TObject *Sender)
{
                switch(NomerDeistvij)
                {
                        case 0:
                        {
                                NomerDeistvij = 1;
                                break;
                        }
                        case 1:
                        {
                                SelectTargetMob();
                                NomerDeistvij = 3;
                                break;
                        }
                        case 2:
                        {
                                //inject.DeselectTarget();
                                inject.MyPetHeal(PetID);
                                NomerDeistvij = 3;
                                break;
                        //inject.DeselectTarget();
                        }
                        case 3:
                        {
                                if(PetHPProc < 95)
                                       {
                                                NomerDeistvij = 2;

                                       }
                                if(CurrentPersTarget()!= 0)
                                {
                                        inject.NormalAttack();
                                        if(PersChi()>2)
                                                {
                                                        UseSkillLvl1();
                                                }
                                        NomerDeistvij = 3;
                                }
                                else
                                {
                                        NomerDeistvij = 1;
                                }
                                break;
                        }
                }
}

Смотри когда case=3, что делает прога:

1) проверяет хп пета, и если оно меньше 95% то должна хилить пета, НО ДАЛЬШЕ ИДЕТ:

2) условие, что если в таргете кто либо есть, то атаковать и если есть более 2х чи то использовать скилл, это действие перебивает хилл пета,
поэтому в бою пет не хилится.

Как вариант, можно заслипить на время хилла пета последующие действия, т.е.

извиняюсь немного не так ), попробуй следующее

 if(PetHPProc < 95)
                                       {
                                                NomerDeistvij = 2;
                                                break;
                                       }

если не будет хилить, добавь слип в case=2

прочитал предыдущий пост и понял что ты так уже сделал )

тогда просто вместо 95 установи значение поменьше, 60 например, т.к. первый же удар моба сносит пету более 5% хп, поэтому прога только и хилит.