Page 1 of 1
Народ помогите скрипт дописать
Posted: 2007-01-28 12:33:39
by tigerr1
Привет всем кто читает ету тему!
#itemId()
sub Item()
uo.print("Identification")
UO.Useskill('Item Identification')
uo.waittargettype("0x13fd")
wait(3000)
uo.say(",drophere")
Endsub
просьба сделайте чтобы онискал в бек пеке по айди вешь,потом айдишил ее отслеживая по журналу файл или нет если файл то повторял. А потом просто выкидывал бы себе под ноги её и все заново! за раннее спасибо...
P.S в скриптах вообще не шарю..
Posted: 2007-01-28 16:47:38
by Savage
Code: Select all
sub Item()
VAR Item="0x13fd"
While UO.Count(Item)
UO.FindType(Item,-1,'backpack')
wait(300)
If UO.FindCount() Then
Repeat
UO.DeleteJournal()
UO.WaitTargetObject('finditem')
UO.Useskill('Item Identification')
wait(4000)
Until UO.InJournal('Не файл сообщение')
UO.DropHere('finditem')
Endif
Wend
end sub
Posted: 2007-01-28 20:44:30
by tigerr1
Savage
BIGRespect 
Posted: 2007-01-28 23:03:05
by tigerr1
спасибо тебе за скрипт но если не сложно могеш его чуток поправить?
sub Item()
VAR Item="0x0995"
While UO.Count(Item)
UO.FindType(Item,-1,'backpack')
wait(300)
If UO.FindCount() Then
Repeat
UO.DeleteJournal()
UO.WaitTargetObject('finditem')
UO.Useskill('Item Identification')
wait(10000)
Until UO.InJournal('This is a normal item')
UO.DropHere('finditem')
Endif
Wend
end sub
сюда можно вставить чтобы он шарил по сумкам в бек пеке а то он ищет токо в самом паке и негде больше..а в паке можно токо 148 итемов иметь...т.е на ночь не хватит...и еще про сброс вещей...можно сделать так чтобы он скидывал ето в пак под ногами или рядом в сундук.....извини если побеспокоил но просто очень надо.....
Posted: 2007-01-29 12:08:08
by Savage
Code: Select all
sub Item()
VAR Item="0x0995"
VAR Sunduk="0x12345678"
While UO.Count(Item)
UO.FindType(Item,-1,'my')
wait(300)
If UO.FindCount() Then
Repeat
UO.DeleteJournal()
UO.WaitTargetObject('finditem')
UO.Useskill('Item Identification')
wait(10000)
Until UO.InJournal('This is a normal item')
UO.MoveItem('finditem',1,Sunduk)
Endif
Wend
end sub