Page 1 of 1
Копка кладов
Posted: 2005-09-17 09:29:55
by mike
Алгоритм:
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.
При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.
Posted: 2005-09-17 18:47:37
by Sfagnum
чот ты намудрил... там 2 прицела дОлжно быть... а что на что не помню
что там юзается лопата или карта...
Posted: 2005-09-17 19:08:16
by mike
Sfagnum wrote:чот ты намудрил... там 2 прицела дОлжно быть... а что на что не помню
что там юзается лопата или карта...
лопата -карта -место
0x0F39 тип лопаты.
фигня у меня получается....
Posted: 2005-09-17 19:48:52
by Sfagnum
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
за прицел не ручаюсь... но хз... хз... может и получится.
Posted: 2005-09-17 20:13:27
by mike
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
за прицел не ручаюсь... но хз... хз... может и получится.
соединю то что у меня и это мож получится то что хочу =)
Posted: 2005-09-17 21:29:50
by Sfagnum
главное отпиши подошло ли
ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать
Posted: 2005-09-18 08:44:14
by mike
Sfagnum wrote:главное отпиши подошло ли
ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать
не проще поверь )
здесь разброс получается может быть больше.
не подошло ошибку выдает - uo.finditem
вообщем как и у меня.
Posted: 2005-09-19 11:34:06
by Sfagnum
mike wrote:Sfagnum wrote:главное отпиши подошло ли
ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать
не проще поверь )
здесь разброс получается может быть больше.
не подошло ошибку выдает - uo.finditem
вообщем как и у меня.
ну надеюсь ты значения 'карта' и 'карта' сменил на тип и цвет карты соответственно? и вообще покажи этот кусок как ты в живую пользовать пробывал.
Re: Копка кладов
Posted: 2005-09-21 01:01:03
by I{oJIxo3
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: Копка кладов
Posted: 2005-09-21 22:23:29
by I{oJIxo3
Проверь на месте, я тестил без откапывания.
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
Re: Копка кладов
Posted: 2006-02-13 22:45:33
by Fenixsis
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
Может кто поможет со скриптом просто этот не работает.
Хотелось бы чтоб все же чар мог капать вокруг себя клады ..
Скажем так чтоб то что здесь, какбы задумано осущиствилось ..
Заранее спасибо ...
Posted: 2006-02-14 03:44:59
by Smog
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
Странно была же тема ... и там было что то типа, пишите Сфагнуму в личку .... и там я обяснял про "поведение" скрипта. Но ... честно в лом писать еще раз. Вообщем просто скажу что я копаю этим.
Posted: 2006-02-14 08:14:25
by Smog
Я надеюсь ) что ты не один из тех пи....сов которые все время копают карты (4 лева) с моим домом и все время стараются меня убить.
Posted: 2006-02-14 17:37:54
by GimFlex
Smog wrote:Я надеюсь ) что ты не один из тех пи....сов которые все время копают карты (4 лева) с моим домом и все время стараются меня убить.