Page 1 of 1

авто ресс

Posted: 2005-07-11 15:43:49
by maximka4
хочется узнать цену скрипта на авто ресс
тоесть если убьют чар летит воскрешается, берет все что нужно с собой на прокачку и летить на прокачку.
самое главное чтобы скрипт легко настраивался.

Posted: 2005-07-11 15:58:51
by Dron D.
Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...

Posted: 2005-07-11 16:21:37
by maximka4
Dron D. wrote:Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...
хм. спасибо, надо еще раз все внимательно обсмотреть :)

Posted: 2005-07-11 17:00:42
by omi4
Шард какой?

Как переместится к кресту? Через хелп? Команду или как еще..

Posted: 2005-07-11 17:33:47
by kexwer
omi4 wrote:Шард какой?

Как переместится к кресту? Через хелп? Команду или как еще..



Я бы тоже был не против :)
DRW ,через хелп Help!!!

Posted: 2005-07-11 17:59:03
by Leo
Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.

Posted: 2005-07-11 18:06:08
by omi4

Code: Select all

# ВНИМАНИЕ!!!!!!! Нужна любая функция CheckLag() 

sub GoRess()
   if UO.Dead() then
      var p, n=1
      uo.useobject('self')
      var oldX=UO.GetX(), oldY=UO.GetY()
      while n==1
         CheckLag()
      ; -------------------------- 8< ---------------------------
         uo.LClick(1109,53) ; Координаты HELP на Антаресе при открытом верхнем меню не нужно
         CheckLag()
         wait(500)
      ; -------------------------- 8< ---------------------------
         uo.LClick(265,288)  ; Координаты кнопки в HELPе ресалки
         CheckLag()
         wait(500)
         uo.LClick(175,203) ; Координаты кнопки Minoc
         CheckLag()
         wait(5000)
         if oldX<>UO.GetX() and oldY<>UO.GetY() then
            n=0
         else
            n=1
         endif
      wend
      # ------- ХОДИЛКА для подхода к кресту ----------
      # ------------- 8<--- На Антаресе не нужна ---------
      for p=1 to 3
         CheckLag()
         uo.press(39)
         wait(500)
      next
      # ------------- 8<----------------------------------------
      uo.useobject('0x4001BDF0') ; ID креста
      wait(200)
      UO.Exec('warmode 0')
      ; RunebookRecall() ; что делать после того как реснулся, тут должна быть ВАША Функция.
   endif
end sub


Для ДРВ и Антарес

Posted: 2005-07-11 19:52:53
by maximka4
Leo wrote:Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.
а координаты пилота пойдут?

Posted: 2005-07-11 19:58:05
by Leo
maximka4 wrote:
Leo wrote:Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.
а координаты пилота пойдут?


Да

Posted: 2005-07-13 15:29:06
by kexwer
Почему скрипт сразу вырубаеться, и не чего не делает?

Posted: 2005-07-13 17:08:46
by SAMURAI
kexwer wrote:Почему скрипт сразу вырубаеться, и не чего не делает?
А гостом быть пробовал?.. :)

Posted: 2005-07-13 17:13:07
by omi4
Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.

Posted: 2005-07-13 17:21:40
by kexwer
omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



Ну я нубом проверял :)

Posted: 2005-07-13 17:26:20
by omi4
kexwer wrote:
omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



Ну я нубом проверял :)


1)Проверь наличие функции CheckLag()
2) Настрой Координаты в строчках uo.LClick(хххх,хххх) - (Пилотом или встроенным редактором инжи)

Posted: 2005-07-13 17:28:28
by kexwer
omi4 wrote:
kexwer wrote:
omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



Ну я нубом проверял :)


1)Проверь наличие функции CheckLag()
2) Настрой Координаты в строчках uo.LClick(хххх,хххх) - (Пилотом или встроенным редактором инжи)


Чек лага нету :(

Posted: 2005-07-13 17:36:48
by omi4
Search

Code: Select all

sub CheckLag() 
   UO.DeleteJournal()
   UO.Click('backpack')
   repeat
      wait(500)
   until UO.InJournal("backpack")
end sub

Posted: 2005-07-13 17:46:24
by kexwer
спасибо, заработало

Posted: 2005-07-14 01:37:58
by gods
Dron D. wrote:Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...


Интересно как мёртвым чаром можна реольнутся?

Posted: 2005-07-14 01:55:59
by Dron D.
На дрв такая тема: Если ты мертв, то через меню - помошь - застревание - там 6 городов, если ты вылетаешь гостом, то вылетание моментально, если живым то около 5 минут.