Adrenalin
http://forum.lineage2bot.net/

Вопросы по скриптам
http://forum.lineage2bot.net/viewtopic.php?f=6&t=214
Страница 64 из 66

Автор:  lapeeno [ Пт дек 29, 2017 4:51 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

mrak51 писал(а):
Подскажите как прописать проверку дистанции до цели к примеру если цель в радиусе 100 от персонажа выполняет действие?

Код:
uses SysUtils, Classes, RegExpr;
var
Item: TL2Item;
i: Integer;
obj:  TL2Effect;
buffer, GK: TL2npc;
Buff: TL2Effect;
////
if NpcList.ByID(1234567, buffer) and (buffer.DistTo(User) <1500)
then begin  //1
Print('NPC есть в радиусе 1500');

Автор:  lapeeno [ Пт дек 29, 2017 5:07 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

Вообщем дошли наконецто руки до написания простенькой антикапчи, но сначала тестировать ее конечно лучше не на чарах )) а чисто в боте, для этого мне нужна помощь, я хочу в боте в скрипт загружать из txt или html файла (сохраненые капчи) строки и с ними уже работать, но тут проблемка - у меня парсинг работает с типом string а подгружается данные с типом TStringlist и их надо както подружить - как перевести изстринглист в одну строку для парсинга ? или как подгрузить сразу в виде стринг ?
Код:
uses SysUtils, Classes;
var
  kusok, HTML: string;
  L :TStringlist;     
begin
L := TStringList.Create;   
L.LoadFromFile('C:/1.txt'); 
print(L); // в систем чате не выводит стринглист ?

//L:= HTML; // <=== текущая задача


//HTML:=Engine.DlgText; // потом будет както так

      kusok := Copy(HTML, 1023, 14);  // просто для тестов и настройки
      print(kusok);

      //if kusok = ...
      //...
L.Free;     
end.

Автор:  lapeeno [ Пт дек 29, 2017 8:53 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

Как хорошо пообщатся с умным человеком, самим с собой)))
вот вдруг каму пригодится
Код:
uses SysUtils, Classes, RegExpr;
var L,StrList               :TStringList;
var Str,TempStr,kusok,HTML  :String;

begin
L := TStringList.Create;   
L.LoadFromFile('C:/1.txt');
HTML := L.Text;
print(HTML);

//HTML:=Engine.DlgText; // потом будет както так

      kusok := Copy(HTML, 1023, 14);  // просто для тестов и настройки
      print(kusok);

      //if kusok = ...
      //...
L.Free;     
end.

Автор:  Yri4 [ Сб дек 30, 2017 11:24 am ]
Заголовок сообщения:  Re: Вопросы по скриптам

Ребят проблемка,может кто-то сталкилвался с подобным,купил скрипт текстантикаптчу ,скачал уставновил все как по инструкции ну чтот я не догоняю запускаются все скрипты в паке кроме одного который мне нужен а именно CaptchaASCII,ну ни как не реагирует,может кто сталкивался с данной проблемкой или я что-то делаю не так.
p.s отблагодарю если решим : ) писать в личку .
По всему форуму лазить не стал,может есть решение.

Автор:  naderta [ Сб дек 30, 2017 7:07 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

Yri4 писал(а):
Ребят проблемка,может кто-то сталкилвался с подобным,купил скрипт текстантикаптчу ,скачал уставновил все как по инструкции ну чтот я не догоняю запускаются все скрипты в паке кроме одного который мне нужен а именно CaptchaASCII,ну ни как не реагирует,может кто сталкивался с данной проблемкой или я что-то делаю не так.
p.s отблагодарю если решим : ) писать в личку .
По всему форуму лазить не стал,может есть решение.

разрабу скриптов пиши в скайп

Автор:  Yri4 [ Сб дек 30, 2017 7:48 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

naderta писал(а):
Yri4 писал(а):
Ребят проблемка,может кто-то сталкилвался с подобным,купил скрипт текстантикаптчу ,скачал уставновил все как по инструкции ну чтот я не догоняю запускаются все скрипты в паке кроме одного который мне нужен а именно CaptchaASCII,ну ни как не реагирует,может кто сталкивался с данной проблемкой или я что-то делаю не так.
p.s отблагодарю если решим : ) писать в личку .
По всему форуму лазить не стал,может есть решение.

разрабу скриптов пиши в скайп

Новый год на носу,он же тоже человек,отдохнуть хочет.

Автор:  Yri4 [ Вс дек 31, 2017 5:41 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

Yri4 писал(а):
naderta писал(а):
Yri4 писал(а):
Ребят проблемка,может кто-то сталкилвался с подобным,купил скрипт текстантикаптчу ,скачал уставновил все как по инструкции ну чтот я не догоняю запускаются все скрипты в паке кроме одного который мне нужен а именно CaptchaASCII,ну ни как не реагирует,может кто сталкивался с данной проблемкой или я что-то делаю не так.
p.s отблагодарю если решим : ) писать в личку .
По всему форуму лазить не стал,может есть решение.

разрабу скриптов пиши в скайп

Новый год на носу,он же тоже человек,отдохнуть хочет.

Проблема решена : )

Автор:  blik [ Ср янв 10, 2018 6:15 am ]
Заголовок сообщения:  Re: Вопросы по скриптам

Нужен простой скрипт для юзания руны мавр. ид:23755 . Упаковка руны мавр ид;23758. Как толька в инвентаре исчезнет мавр, скрипт должен распаковать упаковку.

Автор:  naderta [ Вс мар 04, 2018 9:11 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

Как сделать уведомление о том что у тебя чтото купили? В гиране на торге сидишь например, чтото купили - подсветилось окно.

Автор:  IvaniuS [ Пн мар 05, 2018 5:35 pm ]
Заголовок сообщения:  Re: Вопросы по скриптам

в систем чате пишется - отлавливай это сообщение.

Страница 64 из 66 Часовой пояс: UTC + 2 часа
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/