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

Рек=нубл(Полезный скрипт)

k23

Рег
26 Сен 2015
Сообщения
13
Реакции
0
Нашел в шаре еще чуть под делал!



var Index :integer;
begin
while Engine.Status = lsOnline do begin
if (ChatMessage.ChatType = mtAll) and ChatMessage.Unread then
begin
Index:=-1000;
Index:=Pos('n',ChatMessage.Text);
Index:=Pos('Н',ChatMessage.Text);
if Index=0 then
begin
Engine.CancelTarget;
Engine.SetTarget(ChatMessage.Sender);
Engine.UseSkill(1323);
delay(2000);
end;



end;
end;
end.
 
Судя по скрипту, нобл дается не по реку, а по определению в чате букв "n" и "H"
 
Б*** мой скрипт
Я его писал и буквально на той неделе!
http://rawr.su/topic/3093-recnooble/
http://forum.lineage2bot.net/viewtopic.php?f=6&t=4659


k23 написал(а):
ar Index :integer; begin while Engine.Status = lsOnline do begin if (ChatMessage.ChatType = mtAll) and ChatMessage.Unread then begin Index:=-1000; Index:=Pos('n',ChatMessage.Text); Index:=Pos('Н',ChatMessage.Text); if Index=0 then begin Engine.CancelTarget; Engine.SetTarget(ChatMessage.Sender); Engine.UseSkill(1323); delay(2000); end; end; end; end.
А поделал убрал строчку мув.
Которая возвращала чара к ГК чтоб не убегал за людми по всему городу!
Ты ж даже не знаешь что Index=-1000; Нафиг не надо и для чего оно туда вписывало!
 
Назад
Сверху