авто ресс

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:Почему скрипт сразу вырубаеться, и не чего не делает?
А гостом быть пробовал?.. :)
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© 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