Yoko
http://forum.yoko.com.ua/

Копка кладов
http://forum.yoko.com.ua/viewtopic.php?f=20&t=5200		 Page 1 of 1
Author:  mike [ 2005-09-17 09:29:55 ]
Post subject:  Копка кладов
Алгоритм:
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.

При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.
Author:  Sfagnum [ 2005-09-17 18:47:37 ]
Post subject: 
чот ты намудрил... там 2 прицела дОлжно быть... а что на что не помню ;)
что там юзается лопата или карта... :roll:
Author:  mike [ 2005-09-17 19:08:16 ]
Post subject: 
Sfagnum wrote:
чот ты намудрил... там 2 прицела дОлжно быть... а что на что не помню ;)
что там юзается лопата или карта... :roll:

лопата -карта -место
0x0F39 тип лопаты.

фигня у меня получается....
Author:  Sfagnum [ 2005-09-17 19:48:52 ]
Post subject: 
Code:
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
за прицел не ручаюсь... но хз... хз... может и получится.
Author:  mike [ 2005-09-17 20:13:27 ]
Post subject: 
Sfagnum wrote:
Code:
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
за прицел не ручаюсь... но хз... хз... может и получится.

соединю то что у меня и это мож получится то что хочу =)
Author:  Sfagnum [ 2005-09-17 21:29:50 ]
Post subject: 
главное отпиши подошло ли ;)

ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать
Author:  mike [ 2005-09-18 08:44:14 ]
Post subject: 
Sfagnum wrote:
главное отпиши подошло ли ;)

ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать

не проще поверь )
здесь разброс получается может быть больше.

не подошло ошибку выдает - uo.finditem
вообщем как и у меня.
Author:  Sfagnum [ 2005-09-19 11:34:06 ]
Post subject: 
mike wrote:
Sfagnum wrote:
главное отпиши подошло ли ;)

ЗЫ. ИМХО проще проверять координаты карты... если диапозон влизает в нужный +/- 3 от твоих координат... тодыть копать

не проще поверь )
здесь разброс получается может быть больше.

не подошло ошибку выдает - uo.finditem
вообщем как и у меня.
ну надеюсь ты значения 'карта' и 'карта' сменил на тип и цвет карты соответственно? и вообще покажи этот кусок как ты в живую пользовать пробывал.
Author:  I{oJIxo3 [ 2005-09-21 01:01:03 ]
Post subject:  Re: Копка кладов
mike wrote:
Алгоритм:
Происк карты сокровищ в паке, таргет на лопату, на карту и под себя.
если сообщение You found a treasure! новый поиск, если нет то игнорирование карты.

При написании возникла проблема с таргетами и игнорированием объекта, если кто поможет буду очень благодарен.



"новый поиск" - чего поиск ?
Поиск карт с такой же координатой на текущем тайле (потому
что бывает на 1-ом тайле 2 клада) или ты имеешь ввиду
остановку скрипта, для перехода чара на другой тайл ?
Опиши подробней смысл скрипта. Тогда может с остальным смогу
помоч.

Вот код с для наведения первого прицела на карту, вторго на
твои координаты (под чара :)), после юзанья лопаты.
Code:
....
UO.FindType('0x14EB',-1,2)
UO.UseObject('LOPATA')
UO.WaitTargetObject('finditem')
UO.WaitTargetTile('0',STR(UO.GetX()),STR(UO.GetY()),'0')
...
Author:  I{oJIxo3 [ 2005-09-21 22:23:29 ]
Post subject:  Re: Копка кладов
Проверь на месте, я тестил без откапывания.
Code:
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
Author:  Fenixsis [ 2006-02-13 22:45:33 ]
Post subject:  Re: Копка кладов
I{oJIxo3 wrote:
Проверь на месте, я тестил без откапывания.
Code:
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




Может кто поможет со скриптом просто этот не работает.
Хотелось бы чтоб все же чар мог капать вокруг себя клады ..
Скажем так чтоб то что здесь, какбы задумано осущиствилось ..
Заранее спасибо ...
Author:  Smog [ 2006-02-14 03:44:59 ]
Post subject: 
Code:
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


Странно была же тема ... и там было что то типа, пишите Сфагнуму в личку .... и там я обяснял про "поведение" скрипта. Но ... честно в лом писать еще раз. Вообщем просто скажу что я копаю этим.
Author:  Smog [ 2006-02-14 08:14:25 ]
Post subject: 
Я надеюсь ) что ты не один из тех пи....сов которые все время копают карты (4 лева) с моим домом и все время стараются меня убить.
Author:  GimFlex [ 2006-02-14 17:37:54 ]
Post subject: 
Smog wrote:
Я надеюсь ) что ты не один из тех пи....сов которые все время копают карты (4 лева) с моим домом и все время стараются меня убить.


:)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/