Как повесить ласттаргет ?

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
some
Posts: 197
Joined: 2007-05-23 19:51:18

Как повесить ласттаргет ?

Post by some »

Нашел вот такой скриптец на автотаргет :

Code: Select all

UO.Set('quiet','1')
	uo.exec('set finddistance 25')
	Ignores()
	DIM Chars[2]
	Chars[0] = '0x0190' ## - Òèï male.
	Chars[1] = '0x0191' ## - Òèï female.
	uo.findtype(Chars[0], '-1', '1')
	maleplayernum = uo.findcount()
	uo.findtype(Chars[1], '-1', '1')
	femaleplayernum = uo.findcount()
	allplayernum = maleplayernum + femaleplayernum
	for a = 0 to 1 ## - Ïåðåáèðàåì òèïû male/female.
		uo.findtype(Chars[a], '-1', '1')
		if allplayernum == 1 then
			if UO.GetMaxHP('finditem') < 200 then ; ïðîâåðêà íà õï, ÷òîáû îòñåèâàëî âåíäîðîâ.
				UO.AddObject('lasttarget','finditem')
			endif
		else
			if uo.findcount() > 0 then
				temp = uo.findcount()
				for i=0 to uo.findcount()
					uo.findtype(Chars[a], '-1', '1')
					UO.GetStatus('finditem')
					if UO.GetMaxHP('finditem') < 200 then
						lastplayernum = lastplayernum + 1
						if lastplayernum < 5 then
							UO.AddObject('AddTarget'+str(lastplayernum), 'finditem')
						else
							i = temp
						endif
						if lastplayernum == 1 then
							UO.AddObject('Enemy','finditem')
						endif
						UO.Ignore('finditem', 'on')
					endif
				next
			endif
		endif
	next
	UO.Set('quiet','0')
	UO.Print("lasttarget: "+UO.GetName('MainTarget'))
	UO.Click('lasttarget')
	UO.IgnoreReset()
end sub
скрипт работает исправно, правда есть одно маленькое НО, он записывает найденных в enemy . как сделать чтобы сразу записывал в ласттаргет ? а то все скрипты переделывать на касты приходится.
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: Как повесить ласттаргет ?

Post by tylllkah »

some wrote:Нашел вот такой скриптец на автотаргет :

Code: Select all

UO.Set('quiet','1')
	uo.exec('set finddistance 25')
	Ignores()
	DIM Chars[2]
	Chars[0] = '0x0190' ## - Òèï male.
	Chars[1] = '0x0191' ## - Òèï female.
	uo.findtype(Chars[0], '-1', '1')
	maleplayernum = uo.findcount()
	uo.findtype(Chars[1], '-1', '1')
	femaleplayernum = uo.findcount()
	allplayernum = maleplayernum + femaleplayernum
	for a = 0 to 1 ## - Ïåðåáèðàåì òèïû male/female.
		uo.findtype(Chars[a], '-1', '1')
		if allplayernum == 1 then
			if UO.GetMaxHP('finditem') < 200 then ; ïðîâåðêà íà õï, ÷òîáû îòñåèâàëî âåíäîðîâ.
				UO.AddObject('lasttarget','finditem')
			endif
		else
			if uo.findcount() > 0 then
				temp = uo.findcount()
				for i=0 to uo.findcount()
					uo.findtype(Chars[a], '-1', '1')
					UO.GetStatus('finditem')
					if UO.GetMaxHP('finditem') < 200 then
						lastplayernum = lastplayernum + 1
						if lastplayernum < 5 then
							UO.AddObject('AddTarget'+str(lastplayernum), 'finditem')
						else
							i = temp
						endif
						if lastplayernum == 1 then
							UO.AddObject('Enemy','finditem')
						endif
						UO.Ignore('finditem', 'on')
					endif
				next
			endif
		endif
	next
	UO.Set('quiet','0')
	UO.Print("lasttarget: "+UO.GetName('MainTarget'))
	UO.Click('lasttarget')
	UO.IgnoreReset()
end sub
скрипт работает исправно, правда есть одно маленькое НО, он записывает найденных в enemy . как сделать чтобы сразу записывал в ласттаргет ? а то все скрипты переделывать на касты приходится.
Если я не ошибаюсь ласт таргет может быть только один. И чтоб переключиться быстро на другого игрока в настройках самой ультимы можно забиндить кнопку)
Где-то у меня валяйся скрипт на добавление враго и друзей, если нужно могу поискать и скинуть
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Как повесить ласттаргет ?

Post by ZeroDX »

попбробуй через uo.set
some
Posts: 197
Joined: 2007-05-23 19:51:18

Re: Как повесить ласттаргет ?

Post by some »

попробую , и да тушкан - скинь скрипт , посмотрю как у тебя это реализовано
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Re: Как повесить ласттаргет ?

Post by Nmy »

зачем скрипт если можно сделать next target в клиенте а в инже использовать laststatus?
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: Как повесить ласттаргет ?

Post by tylllkah »

Nmy wrote:зачем скрипт если можно сделать next target в клиенте а в инже использовать laststatus?
Я так же предлогал)))

Может у них ласт таргет не работает?)
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
some
Posts: 197
Joined: 2007-05-23 19:51:18

Re: Как повесить ласттаргет ?

Post by some »

ну неудобно же будет - я прилетаю в данж с ребятами ( друзья ) - вижу оппонента - пока таргентнекстом проклацаешь - ГГ, лут ушел
Juicy Fruit
Posts: 820
Joined: 2011-06-11 19:54:23

Re: Как повесить ласттаргет ?

Post by Juicy Fruit »

Мышкой статус снять? Нэ?
some
Posts: 197
Joined: 2007-05-23 19:51:18

Re: Как повесить ласттаргет ?

Post by some »

не всегда успеешь .
хочу именно через скрипт
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: Как повесить ласттаргет ?

Post by tylllkah »

some wrote:не всегда успеешь .
хочу именно через скрипт
В моем надо таргетом тыркать доя добавления, лучше через сам клиент как сказал энеми и я
Лови:

Code: Select all

##################################################################### 
#Константы 
##################################################################### 
#ID противника 
var Enemy='Enemy' 
#ID союзника 
var Alias='Alias'  
##################################################################### 
#Добавление глобальных объектов 
##################################################################### 
#Добавление союзника 
sub addAlias() 
uo.print('Select Alias:') 
uo.exec('addobject Alias') 
while uo.targeting() 
wait(100) 
wend 
end sub 
##################################################################### 
#Добавление противника 
sub addEnemy() 
uo.print('Select Enemy:') 
uo.exec('addobject Enemy') 
while uo.targeting() 
wait(100) 
wend 
end sub 
##################################################################### 
#Каст Стрелки на друга 
sub aliasARBook() 
castBook('Magic Arrow',4,Alias) 
end sub 
##################################################################### 
#Каст Стрелки в противника 
sub enemyARBook() 
castBook('Magic Arrow',4,Enemy) 
end sub 
##################################################################### 
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: Как повесить ласттаргет ?

Post by tylllkah »

по моему проще:

Code: Select all

var x

uo.set('lasttarget','laststatus')
x=uo.getserial('lasttarget')

Sub Arrow()  
If UO.Mana>=4 AND UO.BP>0 AND UO.NS>0 Then 
   UO.Cast('Magic Arrow',x) 
Else 
   UO.Print("No mana") 
Endif 
Endsub 
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: Как повесить ласттаргет ?

Post by tylllkah »

Если понравилась идея юзай мой автолоуд
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Post Reply