авто ресс

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
maximka4
Posts: 147
Joined: 2004-10-13 15:08:08

авто ресс

Post by maximka4 »

хочется узнать цену скрипта на авто ресс
тоесть если убьют чар летит воскрешается, берет все что нужно с собой на прокачку и летить на прокачку.
самое главное чтобы скрипт легко настраивался.
maxim viktorovich
Dron D.
Posts: 190
Joined: 2004-12-13 01:27:00

Post by Dron D. »

Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...
maximka4
Posts: 147
Joined: 2004-10-13 15:08:08

Post by maximka4 »

Dron D. wrote:Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...
хм. спасибо, надо еще раз все внимательно обсмотреть :)
maxim viktorovich
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

Шард какой?

Как переместится к кресту? Через хелп? Команду или как еще..
kexwer
Posts: 159
Joined: 2005-06-19 19:21:28

Post by kexwer »

omi4 wrote:Шард какой?

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



Я бы тоже был не против :)
DRW ,через хелп Help!!!
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post 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


Для ДРВ и Антарес
Last edited by omi4 on 2005-07-13 17:14:04, edited 3 times in total.
maximka4
Posts: 147
Joined: 2004-10-13 15:08:08

Post by maximka4 »

Leo wrote:Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.
а координаты пилота пойдут?
maxim viktorovich
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

maximka4 wrote:
Leo wrote:Скрипт элементарный. Просто клики мышкой по координатам, потом подход к кресту, юзание его и всё.
а координаты пилота пойдут?


Да
kexwer
Posts: 159
Joined: 2005-06-19 19:21:28

Post by kexwer »

Почему скрипт сразу вырубаеться, и не чего не делает?
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

kexwer wrote:Почему скрипт сразу вырубаеться, и не чего не делает?
А гостом быть пробовал?.. :)
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.
kexwer
Posts: 159
Joined: 2005-06-19 19:21:28

Post by kexwer »

omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



Ну я нубом проверял :)
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

kexwer wrote:
omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



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


1)Проверь наличие функции CheckLag()
2) Настрой Координаты в строчках uo.LClick(хххх,хххх) - (Пилотом или встроенным редактором инжи)
kexwer
Posts: 159
Joined: 2005-06-19 19:21:28

Post by kexwer »

omi4 wrote:
kexwer wrote:
omi4 wrote:Поправил скрипт, если и сейчас не поможет. То и правда скилл гостинг сильно маленький.



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


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


Чек лага нету :(
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

Search

Code: Select all

sub CheckLag() 
   UO.DeleteJournal()
   UO.Click('backpack')
   repeat
      wait(500)
   until UO.InJournal("backpack")
end sub
kexwer
Posts: 159
Joined: 2005-06-19 19:21:28

Post by kexwer »

спасибо, заработало
gods
Posts: 5
Joined: 2005-03-20 09:14:47

Post by gods »

Dron D. wrote:Помню около года назад, был скипт какой то, то ли на мининг, то ли на лумбер... там был етот кусок: чар рекалился к кресту, ресался, рекалился домой, брал все что нужно и шел дальше по скрипту... но ето было давно, зато правда...


Интересно как мёртвым чаром можна реольнутся?
Dron D.
Posts: 190
Joined: 2004-12-13 01:27:00

Post by Dron D. »

На дрв такая тема: Если ты мертв, то через меню - помошь - застревание - там 6 городов, если ты вылетаешь гостом, то вылетание моментально, если живым то около 5 минут.
Post Reply