Jump to content

6200xs

Members
  • Content Count

    34
  • Joined

  • Last visited

Everything posted by 6200xs

  1. Чего мелочитесь светло-синие. Вы сразу просите чтоб везде была вар зона. И сервак переименуем под вас х1 Хард ПВП. МИНУС ООГ , что еще вам поменять ? Вы лучше расскажите от куда у вас шмотки и эпики на пустом серве. Не реал ли случайно ?)))
  2. смотря куда тянешь пачку и от куда
  3. хз не встречал
  4. +10 Heaven Divider обмен на Вала
  5. как взять в таргет самонером перса если он в не зоне. какой командой можно прописать Эту функцию КТО В КУРСЕ ?
  6. это для меня сложно
  7. 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
  8. кто знает где найти бай пасы или как их получить .Иногда бот говорит с НПС но не берет квест или вообще с ним не разговаривает. Кто как решает этот вопрос ?
  9. ЛС на 1н час облегчил бы нам жизнь
  10. предлагаю объединить кланы. на х1 ищите ник Karapyz
  11. ПРОТИВ заточек - вайпа и вообще любых изменений на сервере х1
  12. 6200xs

    5.7

    может легче и стало но не для моего компа. все равно за часа 3 -4 до рестарта лучше релогнуть комп.
  13. было бы отлично добавить эпик в магазин.
  14. 6200xs

    5.7

    Выпущена новая версия .позволяет отключить все анимации при необходимости. как работает эта кнопка отключения и включения анимаций при необходимости ?
  15. пробовал 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 (+ можно проверять другие услов
  16. 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
  17. все работает конечно когда чистый качь. проблема возникает когда эпик или рб со станом или кенселом. Или выставляешь производительность на максимум. в боте такое не настроишь. с чего начать писать скрипт ? он должен знать откатился ли ЛС для того чтоб юзать , и моментально реагировать на то что в руках не та пуха. 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 п
  18. буду пробывать еще варианты хотя такое проделывал.
×
×
  • Create New...