Просмотр новых публикаций

Choose a background

Отключен JavaScript

У вас отключен JavaScript. Некоторые возможности системы не будут работать. Пожалуйста, включите JavaScript для получения доступа ко всем функциям.

Адрик обмен опытом/скриптами

Автор Antey , 23 сен 2023 07:18

Скрипты на Адрик

Авторизуйтесь для ответа в теме

Сообщений в теме: 9

#1
Antey

Отправлено 23 Сентябрь 2023 - 07:18

Пользователь

Пользователи
13 сообщений

Доброго всем Дня. Хочу создать темку для обмена рабочими, провереными скриптами для этого сервера на адреналин.

Так же огромная просьба выкладывать скрипты не Зашифрованными!!! чтобы можно было самому изменить не или иные конфигурации а так же небыло сюрпризом для человека который скачает скрипт что его персонаж сделает 2-3 круга а потом удалит весь инвентарь)

Сообщение отредактировал Antey: 23 Сентябрь 2023 - 07:25

#2
Antey

Отправлено 23 Сентябрь 2023 - 07:18

Пользователь

Пользователи
13 сообщений

Кому не жалко выложите скрипт на фарм нон стоп халиши. Заранее благодарен.

#3
Antey

Отправлено 24 Сентябрь 2023 - 05:34

Пользователь

Пользователи
13 сообщений

возвращение на фарм после смерти - гиран - фарм зона мобы из ит

Begin

while 1<>2 do begin

if User.Dead then begin

Delay(1000);

Engine.GoHome;

Delay(1000);

engine.FaceControl(0, false);

Delay(1000);

end;

if user.inrange(81376, -148095, -3456, 1000) then

Engine.MoveTo(81376, 148095, -3456);

Engine.MoveTo(82739, 148066, -3479);

Engine.MoveTo(83425, 147933, -3415);

if user.inrange(83425, -147933, -3415, 500) then

delay(1000);

Engine.SetTarget('Clarissa');

delay(1000);

Engine.SetTarget('Clarissa');

delay(1000);

Engine.SetTarget('Clarissa');

Engine.DlgOpen();

delay(1000);

Engine.DlgSel(1);

delay(1000);

Engine.DlgSel(15);

delay(3000);

Engine.MoveTo(-82227, -49215, -10368);

Engine.MoveTo(-81848, -48688, -10365);

Engine.MoveTo(-79918, -46443, -10717);

delay(1000);

engine.FaceControl(0, true);

end;

end.

#4
Meteor

Отправлено 23 Апрель 2025 - 00:05

Продвинутый пользователь

Пользователи
58 сообщений

Скрипт для обмена Christmas Tree

uses SysUtils;

function ItemCount(id: integer): integer;
var i: integer;
begin
  result:= 0;                                          
  for i:= 0 to Inventory.User.Count-1 do begin
    if (Inventory.User.Items(i).ID = id) then
      Inc(result, Inventory.User.Items(i).Count);
  end;
end;


begin
  Print('Start - Christmas Tree (' + IntToStr(ItemCount(5560)) + ')');
  while (ItemCount(5556) > 3) and (ItemCount(5557) > 3) and (ItemCount(5558) > 9) and (ItemCount(5559) > 0) do begin
    if User.Target.ID <> 31863 then Engine.SetTarget(31863);
    if (User.DistTo(User.Target) > 75) then Engine.MoveToTarget(-50);
    Engine.DlgOpen();
    Delay(250);
    Engine.BypassToServer('00');
  end;
  Print('End - Christmas Tree (' + IntToStr(ItemCount(5560)) + ')');
  PlaySound(ExePath + '/Sounds/msg.wav');
end.

#5
Meteor

Отправлено 23 Апрель 2025 - 00:07

Продвинутый пользователь

Пользователи
58 сообщений

Скрипт для обмена Special Christmas Tree

uses SysUtils;

function ItemCount(id: integer): integer;
var i: integer;
begin
  result:= 0;                                          
  for i:= 0 to Inventory.User.Count-1 do begin
    if (Inventory.User.Items(i).ID = id) then
      Inc(result, Inventory.User.Items(i).Count);
  end;
end;


begin
  Print('Start - Special Christmas Tree (' + IntToStr(ItemCount(5561)) + ')');
  while (ItemCount(5560) > 9) do begin
    if User.Target.ID <> 31863 then Engine.SetTarget(31863);
    if (User.DistTo(User.Target) > 75) then Engine.MoveToTarget(-50);
    Engine.DlgOpen();
    Delay(250);
    Engine.BypassToServer('01');
  end;
  Print('End - Special Christmas Tree (' + IntToStr(ItemCount(5561)) + ')');
  PlaySound(ExePath + '/Sounds/msg.wav');
end.

#6
Meteor

Отправлено 26 Апрель 2025 - 13:38

Продвинутый пользователь

Пользователи
58 сообщений

Скрипт для обмена чертежей по квесту Legacy of Insolence / Script for exchanging blueprints for the Legacy of Insolence quest

uses SysUtils;

function ItemCount(id: integer): integer;
var i: integer;
begin
  result:= 0;                                          
  for i:= 0 to Inventory.User.Count-1 do begin
    if (Inventory.User.Items(i).ID = id) then
      Inc(result, Inventory.User.Items(i).Count);
  end;
end;

function ExchangeCount(): integer;
var
  i: integer;
  tmp: integer;
  StartID: Word;
begin
  StartID:= 5989;
  result:= ItemCount(StartID);                                          
  for i:= 1 to 12 do begin
    tmp:= ItemCount(StartID + i);
    if result > tmp then result:= tmp;
  end;
end;


var
  qty: Integer;

begin
  qty := ExchangeCount();
  Print('Start: ' + IntToStr(qty));
  while (Engine.Status = lsOnline) and (qty > 0) do begin
    if (User.Target.ID <> 30844) then Engine.SetTarget(30844);
    Delay(250);
    Engine.DlgOpen;
    Delay(250);
    Engine.DlgSel(6);
    Delay(250);
    Engine.DlgSel(3);
    Delay(250);
    // 1 - Dark Crystal, 2 - Tallum, 3 - Nightmare, 4 - Majestic
    Engine.DlgSel(1);
    Delay(250);
    Print(qty);
    Dec(qty);
  end;
  PlaySound(ExePath + '/Sounds/msg.wav');
end.

Сообщение отредактировал Meteor: 26 Апрель 2025 - 13:39

#7
Vasya228

Отправлено 08 Май 2025 - 12:17

Пользователь

Пользователи
20 сообщений

скрипт тт рецы :

uses sysutils;

var obj: TL2NPC; obj21: TL2Effect;

i:Integer;

X:Integer=0;

buff:TL2Buff;

procedure MoveToCheckStealth(x,y,z:integer);

begin

Engine.Useskill(411);

Engine.Useskill(4);

Engine.MoveTo(x,y,z);

end;

begin

for i:=1 to 1000 do

begin

while true do begin

if User.Dead then begin

Engine.gohome;

delay(500);

end;

X:=X+1;

Engine.Say('go go ' + inttostr(X));

delay(300);

Engine.UseItem(734);

delay(500);

MoveToCheckStealth(147976, -55256, -2712);

delay(500);

engine.settarget(31275);

delay(500);

engine.dlgOPen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.dlgsel(11);

delay(2000); // задержка тп с Гдд в ХС

MoveToCheckStealth(145976, -112696, -2384);

MoveToCheckStealth(148920, -112568, -2080);

MoveToCheckStealth(149176, -112472, -2048);

MoveToCheckStealth(149528, -112680, -2048);

engine.SetTarget(31521);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.dlgsel(1);

delay(1000);

engine.bypasstoserver('Quest _621_EggDelivery jeremy_q0621_0104.htm');

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.dlgsel(2);

delay(1000);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor jeremy_q0622_0104.htm');

delay(1500);

MoveToCheckStealth(149100, -112430, -2072);

MoveToCheckStealth(148169, -112663, -2164);

MoveToCheckStealth(147912, -113048, -2144);

MoveToCheckStealth(147528, -113304, -2112);

engine.SetTarget(31547);

delay(500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor beolin_q0622_0201.htm');

delay(1500);

MoveToCheckStealth(148637, -111871, -2159);

MoveToCheckStealth(149627, -110822, -2273);

MoveToCheckStealth(148967, -108781, -2569);

MoveToCheckStealth(145763, -108986, -3402);

MoveToCheckStealth(143215, -108754, -3526);

MoveToCheckStealth(141682, -109407, -3594);

engine.SetTarget(31546);

delay(500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor kuber_q0622_0301.htm');

delay(1500);

MoveToCheckStealth(141763, -107971, -3552);

MoveToCheckStealth(140663, -106423, -3634);

MoveToCheckStealth(140668, -105535, -3635);

engine.SetTarget(31545);

delay(500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor crocus_q0622_0401.htm');

delay(1500);

MoveToCheckStealth(142225, -104436, -3632);

MoveToCheckStealth(143084, -104068, -3599);

MoveToCheckStealth(143630, -103422, -3595);

MoveToCheckStealth(143701, -102734, -3518);

MoveToCheckStealth(144408, -102045, -3505);

MoveToCheckStealth(144797, -100712, -3283);

MoveToCheckStealth(146350, -101089, -3173);

MoveToCheckStealth(149050, -100855, -2929);

MoveToCheckStealth(151284, -101495, -2900);

MoveToCheckStealth(153809, -101009, -2933);

MoveToCheckStealth(154831, -104208, -2810);

MoveToCheckStealth(155733, -104693, -2748);

MoveToCheckStealth(155813, -105614, -2756);

MoveToCheckStealth(155654, -105680, -2757);

engine.SetTarget(31544);

delay(500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor naff_q0622_0501.htm');

delay(1500);

MoveToCheckStealth(155448, -106680, -2704);

MoveToCheckStealth(156472, -106888, -2656);

MoveToCheckStealth(159512, -106904, -2400);

MoveToCheckStealth(161480, -107640, -2224);

MoveToCheckStealth(162664, -108904, -2232);

MoveToCheckStealth(162296, -111432, -2088);

MoveToCheckStealth(162504, -113080, -2512);

MoveToCheckStealth(161704, -116232, -2128);

MoveToCheckStealth(159656, -115928, -1744);

MoveToCheckStealth(158136, -115784, -1864);

MoveToCheckStealth(157720, -115512, -1888);

MoveToCheckStealth(157640, -115368, -1888);

engine.SetTarget(31543);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor pulin_q0622_0601.htm');

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery pulin_q0621_0201.htm');

delay(1500);

MoveToCheckStealth(156536, -113928, -1712);

MoveToCheckStealth(156328, -112392, -1824);

MoveToCheckStealth(156648, -110952, -2560);

MoveToCheckStealth(156760, -110328, -2656);

MoveToCheckStealth(156360, -109128, -2656);

MoveToCheckStealth(155944, -106168, -2720);

MoveToCheckStealth(155656, -105736, -2736);

engine.SetTarget(31544);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery naff_q0621_0301.htm');

delay(1500);

MoveToCheckStealth(155624, -105624, -2736);

MoveToCheckStealth(154184, -103608, -2912);

MoveToCheckStealth(153224, -101848, -2720);

MoveToCheckStealth(152120, -101432, -2896);

MoveToCheckStealth(150392, -101272, -2880);

MoveToCheckStealth(148296, -101000, -2960);

MoveToCheckStealth(144776, -100808, -3296);

MoveToCheckStealth(144248, -102824, -3536);

MoveToCheckStealth(140760, -105416, -3616);

engine.SetTarget(31545);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery crocus_q0621_0401.htm');

delay(1500);

MoveToCheckStealth(141080, -107528, -3600);

MoveToCheckStealth(141720, -107912, -3536);

MoveToCheckStealth(141624, -109400, -3568);

engine.SetTarget(31546);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery kuber_q0621_0501.htm');

delay(1500);

MoveToCheckStealth(143144, -108936, -3520);

MoveToCheckStealth(144696, -108936, -3472);

MoveToCheckStealth(146488, -108936, -3208);

MoveToCheckStealth(148248, -108888, -2720);

MoveToCheckStealth(149032, -108904, -2544);

MoveToCheckStealth(149576, -110168, -2368);

MoveToCheckStealth(149464, -111016, -2256);

MoveToCheckStealth(148712, -111880, -2160);

MoveToCheckStealth(147928, -112776, -2128);

MoveToCheckStealth(147528, -113272, -2096);

engine.SetTarget(31547);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(2);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery beolin_q0621_0601.htm');

delay(1500);

MoveToCheckStealth(148984, -112552, -2080);

MoveToCheckStealth(149240, -112472, -2048);

MoveToCheckStealth(149512, -112680, -2048);

engine.SetTarget(31521);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery jeremy_q0621_0701.htm');

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.dlgsel(2);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor jeremy_q0622_0701.htm');

delay(1500);

Engine.UseItem(736);

delay(25000);

if user.inrange(145264, -57680, -2960,250,150) then begin

MoveToCheckStealth(146104, -58104, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(147232, -58480, -2960,250,150) then begin

MoveToCheckStealth(146120, -58072, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(144752, -56752, -2960,250,150) then begin

MoveToCheckStealth(145880, -57944, -2960);

MoveToCheckStealth(146120, -58072, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(145696, -57696, -2960,250,150) then begin

MoveToCheckStealth(146152, -58024, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(147664, -56464, -2768,250,150) then begin

MoveToCheckStealth(147720, -58344, -2960);

MoveToCheckStealth(146040, -58200, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(145392, -56960, -2960,250,150) then begin

MoveToCheckStealth(145784, -57800, -2960);

MoveToCheckStealth(146168, -58008, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(147680, -56928, -2768,250,150) then begin

MoveToCheckStealth(147688, -58424, -2960);

MoveToCheckStealth(146104, -58104, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(150400, -56752, -2960,250,150) then begin

MoveToCheckStealth(149720, -57816, -2960);

MoveToCheckStealth(148120, -58360, -2960);

MoveToCheckStealth(146584, -58232, -2960);

MoveToCheckStealth(146168, -57976, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(146832, -55904, -2768,250,150) then begin

MoveToCheckStealth(145336, -57000, -2960);

MoveToCheckStealth(146040, -58200, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(144496, -55088, -2960,250,150) then begin

MoveToCheckStealth(144776, -55448, -2960);

MoveToCheckStealth(145368, -57592, -2960);

MoveToCheckStealth(146120, -58024, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(150704, -55744, -2960,250,150) then begin

MoveToCheckStealth(150248, -56952, -2960);

MoveToCheckStealth(149656, -57896, -2960);

MoveToCheckStealth(147240, -58376, -2960);

MoveToCheckStealth(146120, -58056, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(144944, -55392, -2960,250,150) then begin

MoveToCheckStealth(145144, -57224, -2960);

MoveToCheckStealth(146168, -58040, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(148560, -55904, -2768,250,150) then begin

MoveToCheckStealth(147848, -56232, -2768);

MoveToCheckStealth(146600, -56184, -2768);

MoveToCheckStealth(145288, -57016, -2960);

MoveToCheckStealth(145912, -57960, -2960);

MoveToCheckStealth(146120, -58088, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(147680, -56928, -2768,250,150) then begin

MoveToCheckStealth(147720, -58440, -2960);

MoveToCheckStealth(146456, -58216, -2960);

MoveToCheckStealth(146152, -58056, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(144960, -56224, -2960,250,150) then begin

MoveToCheckStealth(145672, -57816, -2960);

MoveToCheckStealth(146104, -58056, -2960);

MoveToCheckStealth(146392, -57560, -2944);

end;

if user.inrange(148288, -58304, -2960,250,150) then begin

MoveToCheckStealth(146728, -58312, -2960);

MoveToCheckStealth(146152, -58024, -2960);

MoveToCheckStealth(146392, -57528, -2944);

end;

if user.inrange(146272, -58176, -2976, 250, 150) then begin

MoveToCheckStealth(146152, -58088, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(149120, -58064, -2976, 250, 150) then begin

MoveToCheckStealth(146584, -58232, -2960);

MoveToCheckStealth(146152, -58008, -2960);

MoveToCheckStealth(146392, -57528, -2944);

end;

if user.inrange(149088, -56256, -2776, 250, 150) then begin

MoveToCheckStealth(148024, -56328, -2768);

MoveToCheckStealth(147736, -57208, -2768);

MoveToCheckStealth(147672, -58312, -2960);

MoveToCheckStealth(146072, -58152, -2960);

MoveToCheckStealth(146392, -57544, -2944);

end;

if user.inrange(146368, -56256, -2776, 250, 150) then begin

MoveToCheckStealth(145336, -56968, -2960);

MoveToCheckStealth(145832, -57864, -2960);

MoveToCheckStealth(146120, -58024, -2960);

MoveToCheckStealth(146408, -57544, -2944);

end;

if user.inrange(149872, -57424, -2976, 250, 150) then begin

MoveToCheckStealth(149320, -58008, -2960);

MoveToCheckStealth(147496, -58392, -2960);

MoveToCheckStealth(146120, -58072, -2960);

MoveToCheckStealth(146392, -57528, -2944);

end;

engine.SetTarget(31267);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(4);

delay(500);

engine.bypasstoserver('Quest _622_DeliveryofSpecialLiquor warehouse_keeper_lietta_q0622_0801.htm');

delay(1500);

MoveToCheckStealth(146072, -58200, -2960);

MoveToCheckStealth(148584, -58120, -2960);

MoveToCheckStealth(149208, -57896, -2960);

MoveToCheckStealth(149112, -57672, -2952);

MoveToCheckStealth(149320, -57480, -2952);

engine.SetTarget(31584);

delay(1500);

engine.dlgOpen();

delay(1500);

engine.dlgsel(1);

delay(500);

engine.bypasstoserver('Quest _621_EggDelivery brewer_valentine_q0621_0801.htm');

delay(1500);

MoveToCheckStealth(149080, -57640, -2952);

MoveToCheckStealth(149256, -57976, -2960);

MoveToCheckStealth(147672, -58184, -2960);

MoveToCheckStealth(147720, -57272, -2760);

MoveToCheckStealth(147864, -56008, -2784); //меняем если застрял у тп с следущей строкой(стоит ловушка из персонажей)

//MoveToCheckStealth(147720, -56040, -2768);

MoveToCheckStealth(148072, -55608, -2720);

//engine.SetTarget(31031);

//delay(1500);

//engine.dlgOpen();

//delay(1500);

//Engine.BypassToServer('06');

//delay(1500);

//Engine.BypassToServer('01'); // 4 профиль

delay(1500);

MoveToCheckStealth(147976, -55256, -2712);

end;

end.

#8
Vasya228

Отправлено 09 Май 2025 - 15:46

Пользователь

Пользователи
20 сообщений

скрипт на вход в рифт :

var obj: TL2NPC; obj21: TL2Effect;

npc: tl2npc;

begin

while true do

begin

if npclist.byid(25338, npc) then begin

engine.settarget(31865);

delay (500);

Engine.dlgopen();

delay(500);

Engine.DlgSel (1);

end;

delay(1000);

engine.settarget(31493);

delay(1000);

engine.dlgOPen();

delay(800);

engine.dlgsel(1);

delay(1000);

end;

end.

#9
Vasya228

Отправлено 09 Май 2025 - 15:50

Пользователь

Пользователи
20 сообщений

автофарм ит с тп гдд:

begin

while User.Level > 1 do begin

if User.Dead then begin

Delay(1000);

Engine.FaceControl(0, False);

Delay(1000);

Engine.GoHome;

Delay(15000);

Engine.UseItem(8599); \\юзает ы скролл на рековери (убирает дэбафф дэд пенальти)

Delay(1000);

Engine.MoveTo(147704, -58392, -2976);

Engine.MoveTo(147800, -56632, -2784);

Delay(1000);

Engine.SetTarget(52001);

Delay(500);

Engine.DlgOpen;

Delay(500);

Engine.DlgSel('Схемы');

Delay(500);

Engine.DlgSel('CP HP MP');

Delay(500);

Engine.CancelTarget;

Engine.MoveTo(147912, -55256, -2728);

Delay(1000);

Engine.SetTarget(52006);

Delay(500);

Engine.DlgOpen;

Delay(500);

Engine.DlgSel(6);

Delay(10000);

Engine.MoveTo(185048, -75607, -2728); \\путь к первой комнате

Engine.MoveTo(184552, -78727, -2728);

Engine.MoveTo(183016, -78615, -2728);

Engine.MoveTo(181400, -76983, -2728);

Engine.MoveTo(181139, -75271, -2728);

Engine.MoveTo(177896, -75336, -2728);

Engine.FaceControl(0, True);

end;

end.

Нубл тп с ГДД

begin

while User.Level > 1 do begin

if User.Dead then begin

Delay(1000);

Engine.FaceControl(0, False);

Delay(1000);

Engine.GoHome;

Delay(15000);

Engine.UseItem(8599); \\юзает ы скролл на рековери (убирает дэбафф дэд пенальти)

Delay(1000);

Engine.MoveTo(147704, -58392, -2976);

Engine.MoveTo(147800, -56632, -2784);

Delay(1000);

Engine.SetTarget(52001);

Delay(500);

Engine.DlgOpen;

Delay(500);

Engine.DlgSel('Схемы');

Delay(500);

Engine.DlgSel('CP HP MP');

Delay(500);

Engine.CancelTarget;

Engine.MoveTo(147912, -55256, -2728);

Delay(1000);

Engine.SetTarget(31275);

Delay(500);

Engine.DlgOpen;

Delay(500);

Engine.DlgSel(3);

Delay(500);

Engine.DlgSel(2);

Delay(500);

Engine.DlgSel(10);

Delay(10000);

Engine.MoveTo(178324, -83367, -7216); \\путь к первой комнате

Engine.MoveTo(177864, -83359, -7216);

Engine.MoveTo(177876, -82327, -7216);

Engine.MoveTo(179892, -82347, -6592);

Engine.MoveTo(181028, -82547, -6592);

Engine.MoveTo(181304, -83847, -6592);

Engine.MoveTo(183160, -83855, -5960);

Engine.FaceControl(0, True);

end;

end.

Путь к следующим комнатам допишете сами!

Не забываем купить скроллы снятия пенальти после смерти!

Что не ясно или не понятно - Гугл в помощ!)))

#10
Moriarty

Отправлено 17 Май 2025 - 10:41

Пользователь

Пользователи
19 сообщений

Так как ИТ это ПВП зона и бот будет бежать через другие комнаты, в которых могут фармить другие игроки массовыми скилами. То рекомендуется после перехода в коридор из первой большой комнаты (где мобы НЕ агры) в ПВП зону, подождать там 2 минуты, что бы слетел флаг и тогда продолжать движение.

В противном случае можно набить немало ПВП чужому боту))))