Yoko

All sides of Injection
It is currently 2025-11-05 22:17:28

All times are UTC+02:00




Post new topic  Reply to topic  [ 15 posts ] 
Author Message
PostPosted: 2005-02-22 23:13:12 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
вот скрипт....тут надо изменить чтоб шринк не перетаскивал на лошадь, а 2клик на шринк и потом на лошадь

Code:
sub Taming() 
var shrink='0x0F09'         ; тип шринка (+)
var Exit=0, i=0
DIM hr[3]

hr[0]='0x2121'     ;тут я ввел тип зашринкованных лошадей
hr[1]='0x20F6'
hr[2]='0x00CC'

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
UO.FindType(shrink,'0x0388','backpack')             ;  где 0x0388-цвет шринка
uo.moveitem('finditem',1,'TOT')           
wait(500)

for i=0 to 2
uo.findtype(hr[i],-1,'ground')         
if uo.findcount() then
uo.grab('all','finditem')
endif
next
uo.cast('Recall','0x40164DD0') ; runa
Exit=1
wait(2000) ; На всякий случай, можно попробовать убрать
Endif
wend
end sub


Top
   
 Post subject:
PostPosted: 2005-02-22 23:46:13 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
Code:
uo.moveitem('finditem',1,'TOT')    


косяк тут видать.... пробовал на usetype, useobject не работает ?

Гм изменил использование шринка...... терь при таргете


Top
   
 Post subject:
PostPosted: 2005-02-23 00:10:48 
Offline
User avatar

Joined: 2004-07-18 13:01:15
Posts: 141
Попробуй так:
Code:
UO.WaitTargetType('Тип хорсы') 
UO.Usetype('Тип шринка')


Top
   
 Post subject:
PostPosted: 2005-02-23 07:09:07 
Offline
User avatar

Joined: 2004-07-10 00:38:43
Posts: 203
Location: From DrW
Помоему лучше так (ихмо):
Code:
UO.WaitTargetType('Тип хорсы') 
UO.Usetype('Тип шринка' 'Цвет шринка')

_________________
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...
Code:
sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm


Top
   
 Post subject:
PostPosted: 2005-02-23 10:16:34 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
не работает!


Top
   
PostPosted: 2005-02-23 10:56:57 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
Gromiz wrote:
Code:
If Uo.InJournal('It seems')  Then 
wait(5000)                               ; пусть педали подбегут
uo.waittargetobject('TOT')
UO.UseType(shrink,'0x0388')             ;  где 0x0388-цвет шринка
wait(500)

for i=0 to 2
uo.findtype(hr[i],-1,'ground')         
if uo.findcount() then
uo.grab('all','finditem')
endif


PS waittargetground это для прицела по типу ;)


Top
   
 Post subject:
PostPosted: 2005-02-23 12:05:54 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
-)...шринкует ...но забывает забрать лошадь в пак


Top
   
PostPosted: 2005-02-23 12:34:14 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
ну ты пока и не просил ;)
Gromiz wrote:
Code:
for i=0 to 2
uo.findtype(hr[i],-1,'ground')         
if uo.findcount() then
uo.moveitem('finditem',-1,'backpack')
endif
next
а он вообще находится, в смысле зазипованные педали?


Top
   
 Post subject:
PostPosted: 2005-02-23 12:37:48 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
ах да...
UO.UseType(shrink,'0x0388') ; где 0x0388-цвет шринка
wait(500)
тут вместо wait(500) или перед ним не помешал бы CheckLag() ИМХО ессно...


Top
   
 Post subject:
PostPosted: 2005-02-23 13:26:09 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
вот полная версия скрипта...щас идет проверка..по идее усе прально!
Code:
sub Taming() 
var shrink='0x0F09'         ; тип шринка (+)
var Exit=0, i=0
DIM hr[3]

hr[0]='0x2121'     ;тут я ввел тип зашринкованных лошадей
hr[1]='0x20F6'
hr[2]='0x00CC'

uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems')  Then
wait(5000)                               ; пусть педали подбегут
uo.waittargetobject('TOT')
UO.UseType(shrink,'0x0388')
CheckLag()
repeat
wait(500)

for i=0 to 2
uo.findtype(hr[i],-1,'ground')         
if uo.findcount() then
uo.moveitem('finditem',-1,'backpack')
endif
next
uo.cast('Recall','0x40164DD0') ; runa
Exit=1
wait(2000) ; На всякий случай, можно попробовать убрать
Endif
wend
end sub

sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub


Top
   
 Post subject:
PostPosted: 2005-02-23 13:31:30 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
СКРИПТ РАБОТАЕТ


Top
   
 Post subject:
PostPosted: 2005-02-23 13:55:13 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
Gromiz wrote:
СКРИПТ РАБОТАЕТ
странно...
Gromiz wrote:
Code:
UO.UseType(shrink,'0x0388') 
CheckLag()
repeat
wait(500)
repeat - откуда тут взялся? и самое главное где он зарывается :roll:


Top
   
 Post subject:
PostPosted: 2005-02-23 14:47:08 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
да это лишнее "repeat"... СКРИПТ РАБОТАЕТ


Top
   
 Post subject:
PostPosted: 2005-02-23 17:53:07 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
ну так поправь ;)


Top
   
 Post subject:
PostPosted: 2005-02-23 18:49:21 
Offline

Joined: 2005-02-08 18:39:50
Posts: 444
Location: Moscow
Sfagnum wrote:
ну так поправь ;)


усе сделано _)) :roll:


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 15 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 6 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited