Перейти к содержанию

6200xs

Members
  • Публикаций

    37
  • Зарегистрирован

  • Посещение

Весь контент 6200xs

  1. Цели, как и пути их достижения, могут быть разными. Кому-то нравится самостоятельно карабкаться на вершину, преодолевая препятствия, принимая непростые решения, становясь сильнее и увереннее в себе. Есть и такие, кто выбирает путь попроще и поинтереснее и подключает к исполнению своих планов ресурсы других людей – их знания, умения и навыки, уникальные способности и таланты, полезные связи. По своей воле не каждый согласится исполнять желания постороннего человека. Но у каждого можно найти болевые точки, слабые места и подобрать особые ключи, которые позволят управлять мыслями, эмоциями, повед
  2. Чего мелочитесь светло-синие. Вы сразу просите чтоб везде была вар зона. И сервак переименуем под вас х1 Хард ПВП. МИНУС ООГ , что еще вам поменять ? Вы лучше расскажите от куда у вас шмотки и эпики на пустом серве. Не реал ли случайно ?)))
  3. смотря куда тянешь пачку и от куда
  4. как взять в таргет самонером перса если он в не зоне. какой командой можно прописать Эту функцию КТО В КУРСЕ ?
  5. 6200xs

    скрипт для биша

    CLEANSE_ID = 1409; ITERATION_DELAY = 100; var skill: TL2Skill; i: Integer; begin while Engine.Status = lsOnline do begin if (SkillList.ByID(CLEANSE_ID, skill)) then begin for i:=0 to Party.Chars.Count - 1 do begin if ((Party.Chars.Items(i).AbnormalID > 0) and (Party.Chars.Items(i).AbnormalID <> 366)) then begin Engine.SetTarget(Party.Chars.Items(i)); Engine.UseSkill(CLEANSE_ID, true, true); end; if ((User.AbnormalID > 0) and (Party.Chars.Items(i).AbnormalID <> 366)) and then
  6. кто знает где найти бай пасы или как их получить .Иногда бот говорит с НПС но не берет квест или вообще с ним не разговаривает. Кто как решает этот вопрос ?
  7. ЛС на 1н час облегчил бы нам жизнь
  8. 6200xs

    объединение кланов

    предлагаю объединить кланы. на х1 ищите ник Karapyz
  9. https://chat.whatsapp.com/JIf0U6XzNjz9zsJYLmspv1
  10. ПРОТИВ заточек - вайпа и вообще любых изменений на сервере х1
  11. может легче и стало но не для моего компа. все равно за часа 3 -4 до рестарта лучше релогнуть комп.
  12. было бы отлично добавить эпик в магазин.
  13. 6200xs

    5.7

    Выпущена новая версия .позволяет отключить все анимации при необходимости. как работает эта кнопка отключения и включения анимаций при необходимости ?
  14. пробовал 3 скрипта не один не пашет . var i:integer; begin with Engine,User do begin for i:=1 to 15000 do while LearnSkill(i) do LearnSkill(i); end; end. .............................................. procedure LearnSkills(); var i: integer; begin for i:= 0 to LearnList.Count-1 do begin // пробегаем по списку доступных умений if (User.Level >= LearnList(i).NeedLevel) // если наш уровень подходит and (User.SP >= LearnList(i).SpCost) then begin // и у нас хватает SP (+ можно проверять другие услов
  15. const Amount:integer = 90; //Количество циклов варения Ingredient:String = 'Quest _373_SupplierOfReagents x_2_I_6015'; //ByPass ингредиента Catalyst:String = 'Quest _373_SupplierOfReagents x_1_I_6017'; //ByPass катализатора Temperature:String = 'Quest _373_SupplierOfReagents tmp_1'; //Температура var Current:integer; procedure Step(Dlg1,Dlg2:integer; Dlg3:string); begin Engine.DlgOpen; Delay(500); Engine.DlgSel(Dlg1); Delay(500); Engine.DlgSel(Dlg2); Delay(500); Engine.ByPassToServer(Dlg3); Delay(5
  16. все работает конечно когда чистый качь. проблема возникает когда эпик или рб со станом или кенселом. Или выставляешь производительность на максимум. в боте такое не настроишь. с чего начать писать скрипт ? он должен знать откатился ли ЛС для того чтоб юзать , и моментально реагировать на то что в руках не та пуха. var Item: TL2Item; begin while true do Begin Delay(3000); if inventory.user.byid(6608, item) and not (Item.Equipped) then // Если пушка в инвентаре и не одета ID пушки begin //[6608] id п
×
×
  • Создать...