Лидеры

*Рейты х2 продлено до 15:00 13.01.2023г.

var obj: TL2NPC; obj2: TL2Effect; Enemy: TL2Live; Buff: TL2Buff; begin while 1 <> 2 do //бесконечный цикл begin if (not User.Buffs.ByID(1204, buff)) or User.dead then // если нет хаст бафа begin Engine.FaceControl(0, false); //выключаем бота delay(500); Engine.UseItem(1829); delay(1000); Engine.gohome(rtClanHall); // сое кх Delay(25000); Engine.SetTarget(35467); // Здесь указываем id кх менеджера Engine.MoveToTarget(-10); Delay(1000); Engine.DlgOpen(); Delay(1000); Engine.DlgSel(3); Delay(1000); Engine.DlgSel(2); Delay(1000); Engine.DlgSel(1); Delay(2500); Engine.SetTarget(35652); //Npc бафер. Engine.MoveToTarget(-10); Delay(1000); Engine.DlgOpen; Delay(1000); Engine.DlgSel(3); Delay(1000); Engine.DlgSel(3); //выбор строки профиль бафа Delay(1000); Engine.MoveTo(147768, -55208, -2712); Engine.MoveTo(148008, -55256, -2712); if Engine.SetTarget(32033)then // Малафей Engine.MoveToTarget(-10); Engine.DlgOpen(); Delay(1000); Engine.DlgSel(3); //Выбор раздела тп Delay(1000); Engine.DlgSel(6); //Вставляем номер строки локации. Delay(6000); if User.InRange(12968,-248480,-9589,250)then //Вставляем свои координаты точки проверки местности begin // путь к споту. Пример: "Engine.MoveTo(13819,-248476,-9591);" Engine.LoadZone('...'); // Вместо ... пишем своё название сохраненный карты по типу map.zmap Engine.FaceControl(0, True); // Включаем бота end; end; end; end.

А вы на таро посмотрите

это норм, тут всегда так было...

чистый клиент скачай установи и туда патч от корвета и все норм будет бывает если система вин10 не хватает файла engine.dll попробуй его скачай и в папку систем закинь

Доброго времени суток! Если ты новенький на сервере и нету денег на шмот, то напиши мне в лс GCraft или GNecr. Помогу с аденой на первое время!

Function CheckItemCount (const itemID: Integer; const quest: Boolean = False) : Integer; var tempItem: TL2Item; Begin if quest then Inventory.Quest.ByID(itemID, tempItem) else Inventory.User.ByID(itemID, tempItem); Result := tempItem.Count; End; Begin If Engine.SetTarget(31554) then //Берем в таргет нпс "Kahman" Begin Engine.MoveToTarget(-20); Delay(100); Engine.DlgOpen; Delay(500); Engine.DlgSel(1); Delay(500); Engine.DlgSel(2); Delay(500); Engine.DlgSel(1); Delay(500); end; While CheckItemCount(8085, True) > 20 do //проверка итема Engine.DlgSel(2); //тут выставляем номер строки ресурса до 9 (по дефолту стоит сейчас Асоф) Delay(500); Engine.DlgSel(2); Delay(500); End.

Ивент продлён на неделю. Дроп игрушек до 16.01.2023г. НПЦ до конца месяца.

Вот и подошел к своему концу год нынешний, и все ближе к нам год новый, уже 2023-й. Что хотелось бы сказать про старый год? Уходящий год принес каждому из нас большие испытания, изменил и нас, и наши семьи, и весь мир вокруг нас, спецоперация и всё что с ней связано сильно подкосила наше любимое комьюнити ла2, недавние друзья и товарищи стали врагами. Но жизнь продолжается и нам нужно двигаться дальше несмотря ни на что. Хочу поблагодарить всех игроков, спасибо, что вы с нами, что играете, жертвуете, голосуете, помогаете, верите в нас и живете вместе с нами! Желаю вам в новом году мирного неба над головой, счастья вам и вашим близким! Что бы все ваши мечты сбылись, а горести забылись! Всех с праздником, ура!!!

Присоединяюсь к поздравлению, всем желаю счастья, здоровья и успехов в личной жизни и не только.

Берёте в таргет Баффера и самом скрипте вам надо прописать порядковый номер рецепта, который нужно делать, пояснения в скрипте есть. Craft.txt

Окей. А этим скриптом за 2-5 мин будет 1ккк. Там минуту выкроил, там секунду сэкономил. В конкуренции машин выигрывает тот, кто лучше оптимизирован. Здесь никто ни на чём не настаивает =) Только насчёт авторства я бы поспорил, имхо Лика первая такое делала.

Без скрипта крафтишь ~100к сосок в час. Со скриптом ~1ккк сосок за 5 минут. Вот и всё отличие З.Ы. скрипт ужасный, никому пользоваться не советую. Советую пойти и купить соски у меня