Копка кладов
Moderators: Murderator+, Murderator
Копка кладов
Алгоритм:
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.
При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.
При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.
Code: Select all
uo.waittargettile('0',str(uo.getx()),str(uo.gety()),str(uo.getz()))
uo.usetype('0x0F39')
uo.finditem('карта','карта','backpack')
while uo.findcount() >0
uo.waittargetobject('finditem','lasttile')
uo.usetype('0x0F39')
uo.ignore('finditem')
#тут чего то ждёшь ;)
uo.finditem('карта','карта','backpack')
wend
Sfagnum wrote:за прицел не ручаюсь... но хз... хз... может и получится.Code: Select all
uo.waittargettile('0',str(uo.getx()),str(uo.gety()),str(uo.getz()))
uo.usetype('0x0F39')
uo.finditem('карта','карта','backpack')
while uo.findcount() >0
uo.waittargetobject('finditem','lasttile')
uo.usetype('0x0F39')
uo.ignore('finditem')
#тут чего то ждёшь ;)
uo.finditem('карта','карта','backpack')
wend
соединю то что у меня и это мож получится то что хочу =)
ну надеюсь ты значения 'карта' и 'карта' сменил на тип и цвет карты соответственно? и вообще покажи этот кусок как ты в живую пользовать пробывал.mike wrote:Sfagnum wrote:главное отпиши подошло ли
ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать
не проще поверь )
здесь разброс получается может быть больше.
не подошло ошибку выдает - uo.finditem
вообщем как и у меня.
Re: Копка кладов
mike wrote:Алгоритм:
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.
При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.
"новый поиск" - чего поиск ?
Поиск карт с такой же координатой на текущем тайле (потому
что бывает на 1-ом тайле 2 клада) или ты имеешь ввиду
остановку скрипта, для перехода чара на другой тайл ?
Опиши подробней смысл скрипта. Тогда может с остальным смогу
помоч.
Вот код с для наведения первого прицела на карту, вторго на
твои координаты (под чара

Code: Select all
....
UO.FindType('0x14EB',-1,2)
UO.UseObject('LOPATA')
UO.WaitTargetObject('finditem')
UO.WaitTargetTile('0',STR(UO.GetX()),STR(UO.GetY()),'0')
...
Re: Копка кладов
Проверь на месте, я тестил без откапывания.
Code: Select all
sub Ter()
Var tmap,i
for i=1 to UO.Count('0x14EB')
UO.DeleteJournal()
UO.FindType('0x14EB',-1,2)
tmap=UO.GetSerial('finditem')
UO.UseObject('LOPATA')
UO.WaitTargetObject('finditem')
UO.WaitTargetTile('0',STR(UO.GetX()),STR(UO.GetY()),'0')
wait(200)
if UO.InJournal("You feel that you are") then
UO.Ignore(tmap,'on')
EndIF
next
UO.IgnoreReset()
end sub
Smog[PK]
Re: Копка кладов
I{oJIxo3 wrote:Проверь на месте, я тестил без откапывания.Code: Select all
sub Ter()
Var tmap,i
for i=1 to UO.Count('0x14EB')
UO.DeleteJournal()
UO.FindType('0x14EB',-1,2)
tmap=UO.GetSerial('finditem')
UO.UseObject('LOPATA')
UO.WaitTargetObject('finditem')
UO.WaitTargetTile('0',STR(UO.GetX()),STR(UO.GetY()),'0')
wait(200)
if UO.InJournal("You feel that you are") then
UO.Ignore(tmap,'on')
EndIF
next
UO.IgnoreReset()
end sub
Может кто поможет со скриптом просто этот не работает.
Хотелось бы чтоб все же чар мог капать вокруг себя клады ..
Скажем так чтоб то что здесь, какбы задумано осущиствилось ..
Заранее спасибо ...
Code: Select all
sub Ter()
Var shovel,tmap,i,kolM,ch
kolM=UO.Count('0x14EB')
for i=1 to kolM
UO.DeleteJournal()
UO.FindType('0x14EB',-1,2)
tmap=UO.GetSerial('finditem')
UO.UseObject('0x40330563')
UO.WaitTargetObject('finditem')
wait(250)
UO.WaitTargetTile('0',STR(UO.GetX()),STR(UO.GetY()),'15')
wait(250)
if UO.InJournal("You feel that you are") then
UO.Ignore(tmap,'on')
EndIF
next
UO.Print(STR(UO.GetX())+' - '+STR(UO.GetY()))
UO.IgnoreReset()
end sub
Странно была же тема ... и там было что то типа, пишите Сфагнуму в личку .... и там я обяснял про "поведение" скрипта. Но ... честно в лом писать еще раз. Вообщем просто скажу что я копаю этим.