[Скрипт] Авто атака на все классы 3.0+

[serega402]

Цитата: Сообщение от vlq да мне тоже интересно) так же интересует сущевствует ли l2phx под 3.5-3.7 если да то где взять

Всем интересно.

[romeone]

БЛИН паузу между скилами сделать а то палево
З.Ы минус 1 акк

[klepa2]

НА ai leгенda юзакл кто бана ждать или нет?

[joker22841]

зделайте видео плиз где вкладка

[TomKpyz]

а где автоматизация это где ваще ??в игре скажите пожалуста я нуб просто))

[aleksei74ru]

Цитата: Сообщение от happytorn По многочисленным просьбам. Реинкарнация этой темы для 3.0 Проверялось на aion-fly x100 Скрипт для глада Активация Яростный удар V: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 177; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(168, 9); DoTheSkill(304, 9); DoTheSkill(303, 9); DoTheSkill(2017, 9); DoTheSkill(297, 9); DoTheSkill(354, 9); DoTheSkill(297, 9); DoTheSkill(396, 1); DoTheSkill(247, 1); DoTheSkill(397, 1); DoTheSkill(378, 9); DoTheSkill(376, 1); DoTheSkill(180, 9); DoTheSkill(298, 9); DoTheSkill(2032, 9); DoTheSkill(2023, 9); DoTheSkill(2024, 9); DoTheSkill(312, 9); DoTheSkill(157, 9); DoTheSkill(2028, 9); DoTheSkill(183, 1); DoTheSkill(2040, 1); DoTheSkill(239, 9); DoTheSkill(310, 9); DoTheSkill(365, 9); DoTheSkill(380, 9); DoTheSkill(310, 9); DoTheSkill(2035, 9); DoTheSkill(2037, 9); DoTheSkill(230, 1); DoTheSkill(235, 1); DoTheSkill(233, 1); DoTheSkill(2039, 1); DoTheSkill(234, 1); DoTheSkill(228, 1); DoTheSkill(2038, 1); DoTheSkill(2031, 1); DoTheSkill(226, 9); DoTheSkill(400, 1); DoTheSkill(399, 1); DoTheSkill(389, 1); DoTheSkill(2013, 1); DoTheSkill(398, 1); DoTheSkill(2266,1); DoTheSkill(2251,1); DoTheSkill(320,1); DoTheSkill(298,1); DoTheSkill(384,1); DoTheSkill(2033,1); DoTheSkill(2251,1); DoTheSkill(298,1); DoTheSkill(2266,1); DoTheSkill(226,1); DoTheSkill(2039,1); end; end.  Бафы Активация умение Улыбка: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); SendToServer; end; begin if pck=HStr('F9 00 6D 06 FF 15 1C 00 00 00 00 00') then begin DoTheSkill(232, 1); DoTheSkill(2029, 1); DoTheSkill(179, 9); DoTheSkill(391, 1); DoTheSkill(225, 1); DoTheSkill(243, 1); DoTheSkill(383, 1); DoTheSkill(245, 1); DoTheSkill(164, 9); DoTheSkill(242, 1); DoTheSkill(250, 1); DoTheSkill(287, 1); DoTheSkill(272, 1); DoTheSkill(258, 1); DoTheSkill(269, 1); DoTheSkill(182, 1); DoTheSkill(251, 1); DoTheSkill(173, 1); end; end.  Скрипт для стража Активация Яростный удар V PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 177; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(180, 5); DoTheSkill(2059, 4); DoTheSkill(2065, 4); DoTheSkill(550, 1); DoTheSkill(179, 5); DoTheSkill(2060, 2); DoTheSkill(2045, 4); DoTheSkill(2044, 4); DoTheSkill(2055, 4); DoTheSkill(1977, 1); DoTheSkill(542, 2); DoTheSkill(2053, 5); DoTheSkill(157, 4); DoTheSkill(405, 3); DoTheSkill(2059, 4); DoTheSkill(2066, 3); DoTheSkill(2046, 3); DoTheSkill(539, 3); DoTheSkill(1973, 1); DoTheSkill(2272, 2); end; end.  Все бафы Активация Блок щитом I PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 173; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(287, 1); DoTheSkill(513, 1); DoTheSkill(416, 1); DoTheSkill(466, 4); DoTheSkill(1978, 1); DoTheSkill(401, 1); DoTheSkill(466, 4); DoTheSkill(1978, 1); DoTheSkill(426, 1); DoTheSkill(2058, 4); DoTheSkill(537, 1); DoTheSkill(506, 1); DoTheSkill(413, 1); end; end.  Скрипт для сина Активация Стремительный удар V PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 578; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(862, 9); DoTheSkill(913, 1); DoTheSkill(949, 1); DoTheSkill(831, 9); DoTheSkill(862, 5); DoTheSkill(919, 1); DoTheSkill(2123, 1); DoTheSkill(813, 1); DoTheSkill(913, 1); DoTheSkill(836, 1); DoTheSkill(1984, 1); DoTheSkill(1988, 1); DoTheSkill(927, 1); DoTheSkill(850, 1); DoTheSkill(839, 1); DoTheSkill(577, 1); DoTheSkill(572, 1); DoTheSkill(920, 1); DoTheSkill(2113, 1); DoTheSkill(2126, 1); DoTheSkill(1987, 1); DoTheSkill(1990, 1); DoTheSkill(2125, 1); DoTheSkill(579, 9); DoTheSkill(875, 5); DoTheSkill(860, 5); DoTheSkill(2110, 4); DoTheSkill(2121, 1); DoTheSkill(1989, 1); DoTheSkill(2280, 9); DoTheSkill(2279, 9); DoTheSkill(2114, 1); DoTheSkill(2115, 1); DoTheSkill(853, 8); DoTheSkill(939, 1); DoTheSkill(578, 9); DoTheSkill(580, 6); DoTheSkill(932, 9); DoTheSkill(581, 3); DoTheSkill(932, 9); DoTheSkill(868, 9); DoTheSkill(856, 4); DoTheSkill(1983, 1); DoTheSkill(915, 1); DoTheSkill(804, 1); DoTheSkill(815, 4); DoTheSkill(801, 1); DoTheSkill(553, 9); DoTheSkill(820, 9); DoTheSkill(557, 7); DoTheSkill(567, 1); DoTheSkill(570, 7); DoTheSkill(865, 1); DoTheSkill(808, 9); DoTheSkill(812, 1); DoTheSkill(845, 7); DoTheSkill(847, 7); DoTheSkill(848, 7); DoTheSkill(849, 9); DoTheSkill(911, 1); DoTheSkill(834, 9); DoTheSkill(822, 1); DoTheSkill(826, 9); end; end.  Скрипт для Лука Активация Консентрация на уклонение I: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 572; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(632, 1); DoTheSkill(666, 1); DoTheSkill(2090, 1); DoTheSkill(631, 1); DoTheSkill(648, 1); DoTheSkill(2085, 1); DoTheSkill(2091, 1); DoTheSkill(629, 1); DoTheSkill(722, 1); DoTheSkill(721, 1); DoTheSkill(737, 1); DoTheSkill(691, 1); DoTheSkill(730, 1); DoTheSkill(736, 1); DoTheSkill(719, 1); DoTheSkill(2093, 1); DoTheSkill(630, 1); DoTheSkill(787, 1); DoTheSkill(2098, 1); DoTheSkill(2083, 1); end; end.  Скрипт для Хила Все скилы для няхи Активация Карающая молния II : PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 2148; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(2148, 2); DoTheSkill(1115, 3); DoTheSkill(982, 4); DoTheSkill(1117, 4); DoTheSkill(1181, 2); DoTheSkill(1131, 4); DoTheSkill(2144, 2); DoTheSkill(1029, 1); end; end.  Все скилы для асмо Молния воздаяния II : PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 2147; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(2147, 2); DoTheSkill(1115, 3); DoTheSkill(982, 4); DoTheSkill(1117, 4); DoTheSkill(1181, 2); DoTheSkill(1132, 4); DoTheSkill(2145, 2); DoTheSkill(1029, 1); end; end.  Скрипт для Чара Активация Удар метеора IV : PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 2142; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(2142, 5); DoTheSkill(1268, 4); DoTheSkill(1238, 3); DoTheSkill(1255, 3); DoTheSkill(1260, 4); DoTheSkill(1276, 4); DoTheSkill(2161, 3); end; end.  Бафы Активация благословение стойкости I: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 2142; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(1267,5); DoTheSkill(952,1); DoTheSkill(1234,1); DoTheSkill(1269,1); DoTheSkill(2176,1); DoTheSkill(2180,1); DoTheSkill(2288,1); DoTheSkill(1225,1); DoTheSkill(2160,1); DoTheSkill(1347,1); DoTheSkill(1339,1); DoTheSkill(1332,1); DoTheSkill(1259,1); end; end.  Скрипт для Волша Активация ожог IV: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 1527; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(2202, 2); DoTheSkill(2203, 2); DoTheSkill(2207, 4); DoTheSkill(2196, 3); DoTheSkill(1527, 5); DoTheSkill(1520, 4); DoTheSkill(1598, 3); DoTheSkill(2203, 2); end; end.  Скрипт для Закла Активация невыносимые муки: PHP код: var TargetID:integer; StartSkill:word; procedure DoTheSkill(SkillID:word; Level:byte); begin buf := HStr('EF 00 6D 10 FF 34 02 09 00 08 A4 00 00 00 00 00 00 00 00'); WriteH(SkillID, 6); WriteC(Level, 8); WriteD(TargetID, 10); SendToServer; end; begin StartSkill := 1230; if (FromClient) and (ReadC(1) = $EF) and (ReadH(6) = StartSkill) then begin TargetID := ReadD(10); DoTheSkill(1687, 3); DoTheSkill(2230, 3); DoTheSkill(1793, 5); DoTheSkill(2238, 4); DoTheSkill(1795, 3); end; end.  Для тех кто не знает как пользоваться скриптами: Вам нужно нажать Вкладка Автоматизация / Скрипты (Ctrl + E) / Новый скрипт / Пишим название / Стираем всё что есть, и добавляем скрипты / Ставим галочку справа , возле названия скрипта. Как проверить!? Вы должны нажать на тот скил который указан выше скрипта на ваш класс.

Такой вот вопросик: Какие скилы для хила здесь прописаны?(Сделал все как написано,все настроил а оно не робит!) серв айон-финал няхи=)
Автор ответь пожалуйста!!!!

[chunkylover]

На финале не робит ((( пакет другой на скилл идёт (волш EB 00 6D 14 FF F7 05 09 00 94 C7 76 00 9B 02 05 E9 00 00 )

[pepper31]

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

[aleksei74ru]

ТС зачем тему создал, если оффтоп?!

[happytorn]

Цитата: Сообщение от aleksei74ru Такой вот вопросик: Какие скилы для хила здесь прописаны?(Сделал все как написано,все настроил а оно не робит!) серв айон-финал няхи=) Автор ответь пожалуйста!!!!

Какие скилы, можно посмотреть по ID в базе. Теме пол года, пакеты в 3.9 (или какой там серв на финале) естественно сменились.

Цитата: Сообщение от chunkylover На финале не робит ((( пакет другой на скилл идёт (волш EB 00 6D 14 FF F7 05 09 00 94 C7 76 00 9B 02 05 E9 00 00 )

Значит на волша будет так

var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('EB 00 6D 14 FF F7 05 09 00 94 C7 76 00 9B 02 05 E9 00 00');
WriteH(SkillID, 6);
WriteC(Level, 8);
WriteD(TargetID, 10);
SendToServer;
end;

begin
StartSkill := 1527;
if (FromClient) and (ReadC(1) = $EB) and (ReadH(6) = StartSkill) then
begin
TargetID := ReadD(10);

DoTheSkill(2202, 2);
DoTheSkill(2203, 2);
DoTheSkill(2207, 4);
DoTheSkill(2196, 3);
DoTheSkill(1527, 5);
DoTheSkill(1520, 4);
DoTheSkill(1598, 3);
DoTheSkill(2203, 2);
end;
end.