Форум работает в тестовом режиме. Все данные были перенесены со старого сайта 2018 года. Некоторая информация может быть недоступна, например вложения или хайды. Просьба сообщать о данных случаях через функционал "Жалоба", прямо под постом, где отсуствуют данные из хайда или проблемы с вложением.
Могут быть проблемы в "выкидыванием" с форума (слетевшей авторизацией). Нужно собрать статистику таких случаев.
Есть Тема, куда можете сообщить о проблемах с сайтом либо просто передать привет.

сбитие кастов сопом

Рег
20 Ноя 2015
Сообщения
94
Реакции
0
вместо ай подставвляете айди скиллов, которые нужно сбивать
был бы благодарен за инфу и пример, как это засунуть в массив
 
Код:
procedure sop228;
var
P1, P2 : pointer;
Action: TL2Action;
Actor: TL2Live;
SkillID: integer;
begin
 
while Engine.Status = lsOnline do
begin
Action := Engine.WaitAction([laCast], P1, P2);
if Action = laCast then

begin
Actor := TL2Live(P1);
SkillID := Actor.Cast.ID;
if (User.DistTo(Actor)<700) and not (Actor.IsMember) and ((SkillID = ай) or  (skillId = ай))
 
then
begin
Engine.SetTarget(Actor);
delay(10);
engine.useskill(1436);
delay(10); 
end;
end;
end;
 
end;

begin
script.newthread(@sop228);
end.
 
в чем прикол постить сообщение из хайда?
 
действительно соп228
 
Спасибо за скрипт, появилось пару идей)
 
Назад
Сверху