bypass -h )0 Проблемы восприятия!!!

[tmwtmw]

Просматриваю диалоги с помощью:
uses SysUtils, Classes;
var L:TStringList;

Begin
print(Engine.DlgText);
L := TStringList.Create; //Создаем объект (список для строк)
L.Add(Engine.DlgText); //Добавляем в список строку
L.SaveToFile('C:/1.html'); //Сохраняем список в файл
L.Free;
end.
Собственно взято с вашего форума, вижу кнопки такими : )0 .
Вопрос есть шансы без скрипт рекордеров (принцип) расшифровывать знаки майя, адрик их не понимает или не так копирую?

 

[Reliable]

на форуме есть тем по этому поводу



function Buff(value:string):boolean;
var
s:string;
bypass:string;
i:integer;
b:boolean;
mass:array [1..100] of string;
Obj: TL2Buff;
begin
Engine.Settarget('Buffer');
Engine.DlgOpen();
s:=Engine.DlgText;
b:=true;
i:=1;
while b do
begin
Delete(s,1,Pos('<button',s)-1);
mass:=Copy(s,1,Pos('>',s));
Delete(s,1,Length(mass));
inc(i);
if Pos('<button',s) = 0 then
b:=false;
end;
for i:=1 to 100 do
if mass <> '' then
if Pos(value,mass) <> 0 then
begin
bypass := mass;
delete(bypass,1,pos('action="',bypass)+17);
bypass:=Copy(bypass,1,pos('"',bypass)-1);
break;
end;
Engine.ByPassToServer(bypass);
end;


и используй в скрипте
begin

buff('название набора');
end;

 

[tmwtmw]

Можешь объяснить, мне для каждого нпц надо делать отдельную фуyкцию? Например для квестов.
P.S. Дайте пожалуйста ссылку на старую тему, в танке еду.

 

[Reliable]

@tmwtmw, в вк мне отпиши посмотрим что можно сделать