Код Фабрики Опции

[major]

Вот код-функция для определения расстояние между текущим юнитом и курсором. Осталось привязать к номеру существа и обработать щелчок мыши.

Код

!?MM0;
!!BG:N?y1; стек
!!MM:D?y2; позиция мыши
!!FU|y2<0/y2>186:E; выход если не на поле
!!BU:Oy2/?y-1; препятствие?
!!FU&y-1>0:E; тогда выходим
!!BU:Dy2/?y-1; труп лежит?
!!FU&y-1=-2:E; выходим если еще живой
!!BMy1:P?y3; позиция стека
!!VRy4:Sy3 :17; номер линейки стека
!!VRy5:Sy2 :17; номер линейки мыши
!!VRy6:Sy5 -y4; расстояние между линейками
!!VRy6&y6<0:*-1;
!!VRy7:Sy4 *17 -y3 *-1; расстояние от края для стека
!!VRy8:Sy5 *17 -y2 *-1; расстояние от края для мыши
!!VRy10:Sy4 %2; чет-нечет
!!VRy11:Sy5 %2;
!!VRy9:Sy8 -y7; расстояние по горизонтали
!!VRy9&y10=y11/y9<0:*-1; лучше
!!VRy12&y10=y11:Sy6 :2; не
!!VRy9&y10=0/y11<>0/y9<0:*-1; знать
!!VRy9&y10=0/y11<>0/y9>0:-1; что
!!VRy12&y10=0/y11<>0:Sy6 -1 :2; это
!!VRy9&y10<>0/y11=0/y9<0:*-1 -1;
!!VRy12&y10<>0/y11=0:Sy6 -1 :2;
!!VRy13:Sy6;
!!VRy13&y9>y12:+y9 -y12; расстояние от цели до курсора
!!FU&y13>3:E;
!!UN:R5/3/0; меняем курсор на спеллбук

Определяет расстояние для одноклеточного существа. При желании можно переделать и для двуклеточного. Взято максимальное расстояние 3 клетки.

[feanor]

Набыдлокодил утилитку для изменения параметров юнитов.

http://waper.ru/file/935302/HoMM_Monst.rar

[feanor]

Адскiя троглодиты обороняются опосля пѣрехода безъ атаки. Въ качестве дѣбага использована анимацiя "Щитъ"

Код

ZVSE
!?BG0;
!!BG:N?y1;
!!BG:A?y2;
!!BMy1:T?y3;
!!BMy1&y2=2/y3=71:V27 F?y5;
!!VRy5&y2=2/y3=71:|134217728;
!!BMy1&y2=2/y3=71:Fy5;

[feanor]

Багрепорт. От Феанора - Феанору.


!!BMv4003&v4003>-1:I?v4002; // [get side of monster stack] свои? 4002

на самом деле не свои, а "левые". Пофиксить.

[Shihad]

Где-то здесь полно глюков. Точно знаю, что надо прикрутить проверку на тактическую фазу.

Код

ZVSE
!?BG1&v997>-1;
!!BG:N?v4014; //4014 - текущий стек
!!BMv4014:T?v4015; //4015 - его тип
!?MM0&v4015=83; //Если это черные драконы[83], то запускаем могучую функцию major'а с некоторыми дополнениями
!!MM:D?y11; //11 - текущая положение мыши
!!BU&y11>-1/y11<190:Ey11/?v4013; //Есть кто живой на позиции y11? 4013 - номер стека на позиции
!!BMv4013&v4013>-1:I?v4012 N?v4018; //Если стек принадлежит атакующему(левому), то 4012 = 0. Иначе 1. Что-то мне здесь не нравится, похоже, в обороне это не сработает. Что делать будем? В 4018 - количество громов на поле.
//Здесь идет могучая функция майора.
!!BG:N?y1; стек
!!MM:D?y2; позиция мыши
!!FU|y2<0/y2>186:E; выход если не на поле
!!BU:Oy2/?y-1; препятствие?
!!FU&y-1>0:E; тогда выходим
!!BU:Dy2/?y-1; труп лежит?
!!FU&y-1=-2:E; выходим если еще живой
!!BMy1:P?y3; позиция стека
!!VRy4:Sy3 :17; номер линейки стека
!!VRy5:Sy2 :17; номер линейки мыши
!!VRy6:Sy5 -y4; расстояние между линейками
!!VRy6&y6<0:*-1;
!!VRy7:Sy4 *17 -y3 *-1; расстояние от края для стека
!!VRy8:Sy5 *17 -y2 *-1; расстояние от края для мыши
!!VRy10:Sy4 %2; чет-нечет
!!VRy11:Sy5 %2;
!!VRy9:Sy8 -y7; расстояние по горизонтали
!!VRy9&y10=y11/y9<0:*-1; лучше
!!VRy12&y10=y11:Sy6 :2; не
!!VRy9&y10=0/y11<>0/y9<0:*-1; знать
!!VRy9&y10=0/y11<>0/y9>0:-1; что
!!VRy12&y10=0/y11<>0:Sy6 -1 :2; это
!!VRy9&y10<>0/y11=0/y9<0:*-1 -1;
!!VRy12&y10<>0/y11=0:Sy6 -1 :2;
!!VRy13:Sy6;
!!VRy13&y9>y12:+y9 -y12; расстояние от цели до курсора
!!FU&y13>3:E; //В y13 записано расстояние от цели до курсора
//И вот тут она закончилась.
!!UN&v4013>-1/v4012=1/y13<6:R5/4/106; //Меняем курсор. На что - еще не врубился.
!?CM4&v013>-1; //по клику
!!CM:F?y15; //смотрим, чем ткнули
!!CM&y15=0:R0; //убили стандартное действие.
!!HE-1:A1/?v4016/2 F//?v4017//1; В переменную 4016 пишется номер артефакта, болтающийся на шее у героя. В 4017 - его сила магии.
!!HE-1&v4016>-1:A-v4016; //Снимаем его к чертям.
!!HE-1:A1/106/2 F//v4018/; //Галстук на шею, сила магии равна количеству громиков.
!!BMv4014:C19/y12/3/3/0; //каст цепухи по адресу y12. Трындец наступит всем врагам! И где-то здесь он выдает экзепшн и роняет игру. Чую, потому что ЧД - не маг т нужной анимации нет.
!!HE-1:A-106; //Снимаем галстук от молний.
!!HE-1:A1/v4016/2 F//v4017//1; //Взад, все взад...
!!BG&y10=0:A3;

[Shihad]

Это на ТЕ тестилось?

[feanor]

ZVSE
!?BG1&v997>-1;
!!BG:N?v4014; //4014 - текущий стек
!!BMv4014:T?v4015; //4015 - его тип
!?MM0&v4015=83; //Если это черные драконы[83], то запускаем могучую функцию major'а с некоторыми дополнениями
!!MM:D?y11; //11 - текущая положение мыши
!!BU&y11>-1/y11<190:Ey11/?v4013; //Есть кто живой на позиции y11? 4013 - номер стека на позиции
!!BMv4013&v4013>-1:I?v4012 N?v4018; //Если стек принадлежит атакующему(левому), то 4012 = 0. Иначе 1. Что-то мне здесь не нравится, похоже, в обороне это не сработает. Что делать будем? В 4018 - количество громов на поле.
//Здесь идет могучая функция майора.
!!BG:N?y1; стек
!!MM:D?y2; позиция мыши
!!FU|y2<0/y2>186:E; выход если не на поле
!!BU:Oy2/?y-1; препятствие?
!!FU&y-1>0:E; тогда выходим
!!BU:Dy2/?y-1; труп лежит?
!!FU&y-1=-2:E; выходим если еще живой
!!BMy1:P?y3; позиция стека
!!VRy4:Sy3 :17; номер линейки стека
!!VRy5:Sy2 :17; номер линейки мыши
!!VRy6:Sy5 -y4; расстояние между линейками
!!VRy6&y6<0:*-1;
!!VRy7:Sy4 *17 -y3 *-1; расстояние от края для стека
!!VRy8:Sy5 *17 -y2 *-1; расстояние от края для мыши
!!VRy10:Sy4 %2; чет-нечет
!!VRy11:Sy5 %2;
!!VRy9:Sy8 -y7; расстояние по горизонтали
!!VRy9&y10=y11/y9<0:*-1; лучше
!!VRy12&y10=y11:Sy6 :2; не
!!VRy9&y10=0/y11<>0/y9<0:*-1; знать
!!VRy9&y10=0/y11<>0/y9>0:-1; что
!!VRy12&y10=0/y11<>0:Sy6 -1 :2; это
!!VRy9&y10<>0/y11=0/y9<0:*-1 -1;
!!VRy12&y10<>0/y11=0:Sy6 -1 :2;
!!VRy13:Sy6;
!!VRy13&y9>y12:+y9 -y12; расстояние от цели до курсора
!!FU&y13>3:E; //В y13 записано расстояние от цели до курсора
//И вот тут она закончилась.
!!UN&v4013>-1/v4012=1/y13<6:R5/4/106; //Меняем курсор. На что - еще не врубился.
!?CM4&v4013>-1/v997>-1; //по клику
!!CM:F?y15; //смотрим, чем ткнули
!!CM&y15=0:R0; //убили стандартное действие.
!!HE-1:A1/?v4016/2 F/?v4017/1; В переменную 4016 пишется номер артефакта, болтающийся на шее у героя. В 4017 - его сила магии.
!!HE-1&v4016>-1:A-v4016; //Снимаем его к чертям.
!!HE-1:A1/106/2 F/v4018/; //Галстук на шею, сила магии равна количеству громиков.
!!BMv4014:C19/y12/3/3/0; //каст цепухи по адресу y12. Трындец наступит всем врагам! И где-то здесь он выдает экзепшн и роняет игру. Чую, потому что ЧД - не маг т нужной анимации нет.
!!HE-1:A-106; //Снимаем галстук от молний.
!!HE-1:A1/v4016/2 F/v4017/1; //Взад, все взад...
!!BG&y10=0:A3;

Пофиксил опечатки типа двойных слэшей
Вот так он успевает поругаться перед выдачей эксепшна.
Ругается на строку

!!HE-1&v4016>-1:A-v4016; //Снимаем его к чертям.

Емнип, надо чтот вроде
!!VRy16:S0 -v4016;
!!HE-1&v4016>-1: Ay16;

Добавлено ([mergetime]1249555355[/mergetime]):
Кстати, экспешн все таки от того, что комп не может скастовать цепнуху на гекс без юнита. Если заменить на фаербол или инферно (или поменять флаги у цепнухи?), то эксепшна нет. Но закл кастуется куда т в верхний левый угол

Добавлено ([mergetime]1249555634[/mergetime]):
..потому что y12 пустая. Пишем куда-нить
!!CM:D?y12;

[Shihad]

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

Код

ZVSE
ERMS_ScriptDate=15.8(August).2009
_WARNING_#1=IMPORTANT! This file is not in a plain text format. NEVER use any editor except ERM_S for making any kind of changes!
ERMS_PoweredBy=ERM Scripter v. 2004.10.5.945
*Скрипт Громовержцев - черные драконы бьют цепной молнией, если расстояние до цели не больше трех клеток.
!?BG1&v997>-1;
!!BG:N?v4014; //4014 - текущий стек
!!BMv4014:T?v4015; //4015 - его тип
!?MM0&v4015=83; //Если это черные драконы[83], то запускаем могучую функцию major'а с некоторыми дополнениями
!!BMv4014:N?v4016; **в 4016 пишется количество Громов в стеке.
!!MM:D?y11; //11 - текущая положение мыши
!!BU&y11>-1/y11<190:Ey11/?v4013; //Есть кто живой на позиции y11? 4013 - номер стека на позиции
!!BMv4013&v4013>-1:I?v4012; //Если стек принадлежит атакующему(левому), то 4012 = 0. Иначе 1. Что-то мне здесь не нравится, похоже, в обороне это не сработает. Что делать будем? В 4018 - количество громов на поле.
**Здесь идет могучая функция майора.
!!BG:N?y1; стек
!!MM:D?y2; позиция мыши
!!FU|y2<0/y2>186:E; выход если не на поле
!!BU:Oy2/?y-1; препятствие?
!!FU&y-1>0:E; тогда выходим
!!BU:Dy2/?y-1; труп лежит?
!!FU&y-1=-2:E; выходим если еще живой
!!BMy1:P?y3; позиция стека
!!VRy4:Sy3 :17; номер линейки стека
!!VRy5:Sy2 :17; номер линейки мыши
!!VRy6:Sy5 -y4; расстояние между линейками
!!VRy6&y6<0:*-1;
!!VRy7:Sy4 *17 -y3 *-1; расстояние от края для стека
!!VRy8:Sy5 *17 -y2 *-1; расстояние от края для мыши
!!VRy10:Sy4 %2; чет-нечет
!!VRy11:Sy5 %2;
!!VRy9:Sy8 -y7; расстояние по горизонтали
!!VRy9&y10=y11/y9<0:*-1; лучше
!!VRy12&y10=y11:Sy6 :2; не
!!VRy9&y10=0/y11<>0/y9<0:*-1; знать
!!VRy9&y10=0/y11<>0/y9>0:-1; что
!!VRy12&y10=0/y11<>0:Sy6 -1 :2; это
!!VRy9&y10<>0/y11=0/y9<0:*-1 -1;
!!VRy12&y10<>0/y11=0:Sy6 -1 :2;
!!VRy13:Sy6;
!!VRy13&y9>y12:+y9 -y12; расстояние от цели до курсора
!!FU&y13>3:E; //В y13 записано расстояние от цели до курсора
**И вот тут она закончилась.
!!UN&v4013>-1/v4012=1/y13<6:R5/4/106; //Меняем курсор. На что - еще не врубился.
**!!MM&v4013>-1/v4012=1/y13<6:M^Кастовать цепную молнию^;        **Здесь мы пишем подсказку.
!?CM4&v4013>-1/v997>-1/v4015=83/y13<6; //по клику
!!CM:F?y15; //смотрим, чем ткнули
!!CM:D?y12; //В 12 пишем номер слота.
!!CM&y15=0:R0; //убили стандартное действие.
**!!HE-1:A1/?v4016/2; В переменную 4016 пишется номер артефакта, болтающийся на шее у героя. В 4017 - его сила магии.
**!!HE-1&v4016>-1:A-v4016; //Снимаем его к чертям.
!!HE-1:A1/106/2; //Галстук на шею, сила магии равна количеству громиков.
!!HE-1:F+0/+0/?v4018/+0/1; Сохранили в 4018 силу магии героя.
!!HE-1:F+0/+0/v4016/+0; Сила магии равна количеству громов.
!!BMv4014:C19/y12/3/3/1; //каст цепухи по адресу y12. Трындец наступит всем врагам!
**!!HE-1:A-106; //Снимаем галстук от молний.
**!!HE-1:A1/v4016/2; //Взад, все взад...
!!HE-1:F+0/+0/v4018/+0;  Все назад!
!!BG&v4014=0:A3;

Немного подправил код.


Нашел баг - если у нас два стека драконов , то при переходе хода к второму после каста первого, второй может кастовать молнию до посинения. Похоже, !?BG не срабатывает.

[feanor]

Хм..и в чем я тогда протупил..

Код

ZVSE
!?BG0;
!!BG:A?y1 D?y2 N?y3;
!!BMy3:P?y4;
!!VRy2::17;
!!VRy4::17;
!!BMy3&y2=y4/y1=6:V11;

Базовая проверка на "разгон" драгунов. Пока просто показывает анимацию огненного щита, если некий юнит атакует цель перед собой.

[Vade Parvis]

feanor, классно!

[feanor]

http://forum.df2.ru/index.php?showtopic=68...=392454&st=40&#

cобственно про кнопку.

[feanor]

Убить Mana Vortex - 5BDD50: EB
Academy: 5BDFF5: EB

Про Summoning Portal еще черт-те когда было написано.
Теперь бы еще с торговцами разобраться и с сило

[Лентяй]

а можно по-подробнее, что ты с ними делаешь?

Добавлено ([mergetime]1267450240[/mergetime]):
ааа, дошло. )))

[Vade Parvis]

Полагаю, что Феанору хотелось материться по поводу кастов А если точнее — по поводу их несовместимости с ИИ.

Действия ИИ вырисовываются приблизительно такими:

Техномаг.
Паук. Если в пределах одного хода нет противника или если стек должен пропустить ход — саммонится мина-паук, отнимается заряд каста.

Кулак. Если в пределах одного хода есть стеки противника со скоростью меньше нашей, то изменяем свой урон до 50 (условный урон силового кулака), высчитываем стек, ХП которого ближе всего к наносимого стеком техномагов урону (т. е. совсем мелочь — тоже менее приоритетна, как и слишком мощные стеки), вейтимся, урон нормализуется. После вейта снова высчитываются враги в пределах прямой досягаемости, подбегаем к ним вплотную (не помню, реализуемо это прямым способом; если нет, то у меня есть намётки), иначе кастуем мину-паука.
Если во время хода рядом со стеком техномагов есть вражеский стек, то на него всегда кастуется "силовой кулак" (можно, конечно, высчитывать его относительную силу* и в зависимости от этого делать, но это ненужная заумь, полагаю), отнимается заряд каста.
* Мне пришло в голову высчитывание того, сможет ли стек техномагов уложить вражеский стек двумя "кулаками", с учётом числа наших, которых снесёт одна атака остатков стека-врага.

Гибберлинг.
На время просчёта цели для запуска гранаты гибберлинг становится стрелком-снайпером. ИИ должен стрелять гранатой в двух случаях:
1). В противостоящей ему армии есть стрелки — гранаты метаются в точку расположения приоритетной цели, если на ней нет гранат, или в соседние с ней, если точка уже занята гранатой.
2). Если в начале хода гибберлинга рядом с ним стоит враг — граната всегда кастуется в точку сразу за ним (полагаю, что просчитать эту точку не составляет проблемы). В этой ситуации ИИ никогда не атакует врукопашную.

Если в пределах хода гибберлинга есть повреждённый механический юнит, то его починке присваивается максимальный приоритет и гиб не стреляет.

Глайдер.
Пока у ИИ-шного глайдера есть гранаты, у него 0 выстрелов пистолета. Если до него не могут добраться за один ход враги, то всегда вейтится. В начале хода его урон выставляется равным урону от Облака и каким-то образом "агрессивность" поведения доводится до максимума (через временное повышение параметров?). Если он может долететь до цели, то подлетает вплотную без атаки, если не может — подлетает максимально близко; после этого параметры уменьшаются до нормального уровня.
Если в начале хода на расстоянии <= 4 есть враг, то атака замещается кастом облака, отнимается заряд каста, параметры уменьшаются до нормальных.

P.S. Сумбурно, ибо рубит на корню. Просто мысли не то, чтобы новые, но были благополучно забыты среди забот, вспомнившись только сейчас.

P.P.S. Основной теоретический вопрос — можно ли заставить ИИ подойти вплотную вместо атаки?

[Vade Parvis]

Насчёт техномага забылась одна вещь — скрипт ближнего каста молнии хорошо подходит юниту и в плане логики действий ни капли не противоречит остальным типам кастов для ИИ (просто небольшое скопление if/else, расписывать схему алгоритма, думаю, нафиг не нужно... или нужно? :willson: ).

[feanor]

Так. Раздача.
Мне не нравится сама идея выдачи оффенс-кастов техномагессе.
Гранатометство - тоже. Это первый уровень, а не пятый или восьмой.
Корабль с матросами мне тоже не нравятся.
А при упоминании всех хитрых вывертов, которые именуются абилкой глайдера, мне вообще хочется что-нибудь раздолбать.

[Vade Parvis]

Спс за ответ. Без критики бывает крайне тяжело заметить ошибки, даже вопиющие

Мне не нравится сама идея выдачи оффенс-кастов техномагессе.

Это, вообще-то, твоя идея И выходит куда интересней, чем с дефенсом, и, в отличие от дефенса, каст различных оффенс-кастов в разных ситуациях в принципе можно вбить в мозги АИ. Ну и плюс соответствует тактике безудержного раша, а также классично до одури, так как возвращает Чародея из King's Bounty Про то, что без оффенс-кастов Техномага у Фабрики будут откровенные проблемы с огневой мощью — не говорю.

Гранатометство - тоже. Это первый уровень, а не пятый или восьмой.

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

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

Буду рад чему-нибудь более адекватному Можно ли сделать атаку с возвратом, но с подменой координат стартовой точки при возврате?

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

[Vade Parvis]

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

Анимация стрелкового оружия в кач-ве "слабого" предпочтительна в том плане, что глайдер всегда в полёте.

[Shihad]

Мдаа... Давно я сюда не заходил - уже в "Коде" флудят. Материться хочется.

[Vade Parvis]

Fixed