Фарм фрозен лабиринта смотрителей (52-58)

[Groma]

procedure Shutgart();
begin
if User.inrange(87184,-140256,-1536, 250, 150) then begin
Engine.MoveTo(87184,-140256,-1536);
Engine.MoveTo(87368,-140838,-1512);
Engine.MoveTo(87319,-141796,-1338);
Engine.MoveTo(87145,-142916,-1313);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(87408,-142304,-1336, 250, 150) then begin
Engine.MoveTo(87408,-142304,-1336);
Engine.MoveTo(87145,-142916,-1313);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(88240,-142736,-1336, 250, 150) then begin
Engine.MoveTo(88240,-142736,-1336);
Engine.MoveTo(87585,-142662,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(85056,-141328,-1528, 250, 150) then begin
Engine.MoveTo(85056,-141328,-1528);
Engine.MoveTo(85181,-141845,-1539);
Engine.MoveTo(85804,-142279,-1339);
Engine.MoveTo(87157,-142636,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(88624,-142480,-1336, 250, 150) then begin
Engine.MoveTo(88624,-142480,-1336);
Engine.MoveTo(87548,-142686,-1331);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(86400,-142672,-1336, 250, 150) then begin
Engine.MoveTo(86400,-142672,-1336);
Engine.MoveTo(87143,-142570,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(86560,-140320,-1536, 250, 150) then begin
Engine.MoveTo(86560,-140320,-1536);
Engine.MoveTo(87300,-140655,-1539);
Engine.MoveTo(87385,-141436,-1339);
Engine.MoveTo(87246,-142537,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(88448,-140512,-1536, 250, 150) then begin
Engine.MoveTo(88448,-140512,-1536);
Engine.MoveTo(87410,-140642,-1539);
Engine.MoveTo(87299,-141493,-1338);
Engine.MoveTo(87291,-142607,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(89712,-141472,-1528, 250, 150) then begin
Engine.MoveTo(89712,-141472,-1528);
Engine.MoveTo(89497,-141893,-1539);
Engine.MoveTo(88963,-142272,-1339);
Engine.MoveTo(87737,-142631,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(87344,-141696,-1336, 250, 150) then begin
Engine.MoveTo(87344,-141696,-1336);
Engine.MoveTo(87354,-142594,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(85472,-140752,-1536, 250, 150) then begin
Engine.MoveTo(85472,-140752,-1536);
Engine.MoveTo(85191,-141803,-1539);
Engine.MoveTo(85909,-142322,-1338);
Engine.MoveTo(87096,-142671,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(89360,-140944,-1536, 250, 150) then begin
Engine.MoveTo(89360,-140944,-1536);
Engine.MoveTo(89539,-141762,-1539);
Engine.MoveTo(88910,-142276,-1339);
Engine.MoveTo(87637,-142734,-1332);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(87776,-140384,-1536, 250, 150) then begin
Engine.MoveTo(87776,-140384,-1536);
Engine.MoveTo(87403,-140707,-1539);
Engine.MoveTo(87351,-141645,-1338);
Engine.MoveTo(87310,-142568,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(84720,-141936,-1536, 250, 150) then begin
Engine.MoveTo(84720,-141936,-1536);
Engine.MoveTo(85201,-141842,-1539);
Engine.MoveTo(85807,-142262,-1339);
Engine.MoveTo(87116,-142704,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
if User.inrange(85968,-142384,-1336, 250, 150) then begin
Engine.MoveTo(85968,-142384,-1336);
Engine.MoveTo(87116,-142704,-1338);
Engine.MoveTo(87070,-143418,-1290);
end;
end;

var obj: TL2NPC;
obj2: TL2Effect;
Enemy: TL2Live;
Begin
while true do begin

if User.Dead then
begin
Engine.FaceControl(0,false);
Engine.gohome;
delay(15000);
Shutgart();
end;

Shutgart();


Engine.MoveTo(87021, -143119, -1327);
Engine.MoveTo(87292, -142682, -1350);
Engine.MoveTo(87270, -142044, -1357);
Engine.MoveTo(87223, -141790, -1368);
Engine.MoveTo(87167, -141407, -1366);

Engine.SetTarget(32327);
Engine.DlgOpen();
Delay(1000);
Engine.DlgSel(1);
Delay(1000);
Engine.DlgSel(1);
Engine.MoveTo(87263, -141937, -1367);
Engine.MoveTo(87285, -142562, -1366);
Engine.MoveTo(87247, -142956, -1335);
Engine.MoveTo(87176, -143317, -1319);
Engine.MoveTo(87037, -143441, -1318);

Engine.SetTarget(31964);
Engine.DlgOpen();
Delay(1000);
Engine.DlgSel(1);
Delay(1000);
Engine.DlgSel(13);
Delay(10000);

Engine.MoveTo(115151, -108302, -872);
Engine.MoveTo(116222, -107778, -898);
Engine.MoveTo(118069, -107524, -1101);
Engine.MoveTo(118580, -107257, -1135);
Engine.MoveTo(119017, -106840, -1284);
Engine.MoveTo(119420, -105743, -1554);
Engine.MoveTo(120173, -105215, -1908);
Engine.MoveTo(120598, -105355, -2070);
Engine.MoveTo(121173, -105926, -2149);
Engine.MoveTo(121447, -106427, -2185);



if user.InRange(121447, -106427, -2185,500) then begin

Engine.FaceControl(0,true);
while not User.Dead do delay(2000);
end;

Delay(2000);
end;
delay(550);
end.

Бегает, бафается, фармит. Если спойлом, то спойлит кости и МХ.

 

[Agonia]

вангую 20 гномов в одном месте

 

[Groma]

вангую 20 гномов в одном месте

в тесноте да не в обиде

 

[totoshka]

А ці змінні для чого?

var obj: TL2NPC;
obj2: TL2Effect;
Enemy: TL2Live;

 

[savant]

Автор так посылает туда всех конкурентов Сам же пойдет спойлить в другое место :lol:

 

[Agonia]

А ці змінні для чого?

Народ я все понимаю, родной язык и все такое, но форум вроде-бы русскоязычный, по своему опыту 70% Русских - не понимают Украинский )

Автор так посылает туда всех конкурентов Сам же пойдет спойлить в другое место

маршрут то поменять можно(топик-скрипта)

 

[Groma]

А ці змінні для чого?

а потому что это не полный скрипт ) у меня там еще проверки

 

[totoshka]

Народ я все понимаю, родной язык и все такое, но форум вроде-бы русскоязычный, по своему опыту 70% Русских - не понимают Украинский )

ой да ладно, желания достаточно чтобы понять...

Повторюсь.
Для чего переменные?

var obj: TL2NPC;
obj2: TL2Effect;
Enemy: TL2Live;

я их не вижу в скрипте.

 

[Agonia]

Для чего переменные?

это не переменные, классы описывающие Нпц, маг эффекты, живых объектов, подробнее погляди в ScriptHelp в папке бота.

 

[PandaTrader]

Спасибо за скрипт.Подправил для себя и фармлю дестром вкусный спот по квесту:3