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 минут.