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

Работоспособность функции UO.WaitMenu
http://forum.yoko.com.ua/viewtopic.php?f=3&t=13140		 Page 1 of 1
Author:  GroundBeast [ 2008-01-27 22:40:38 ]
Post subject:  Работоспособность функции UO.WaitMenu
Возникло сразу несколько вопросов....
Написал скрипт на Крафт стрел - все работает
Пишу скрипт на Тинкер - не пашет... выдает следующие ошибки....
Сначала весь Текс :
Code:
;Tinkering V 1.0.0.a GroundBeast (c)
;
sub Tinkering()
Var i
;------------------------------------------------------------------------
UO.DeleteJournal()
UO.Print('Shoose Tinker tools')
UO.AddObject('ToolId')
While UO.Targeting() == 2
  Wait(500)
Wend
UO.SaveConfig()
UO.Print('Done')
Wait(300)
UO.Print('Shoose ingots')
UO.AddType('IngType')
While UO.Targeting() == 2
  Wait(500)
Wend
UO.SaveConfig()
UO.Print('Done')
Wait(300)
UO.Print('Shoose Bag with ingots')
UO.AddObject('BagId')
While UO.Targeting() == 2
  Wait(500)
Wend
UO.SaveConfig()
UO.Print('Done')
Wait(300)
UO.Print('Shoose Bag for work')
UO.AddObject('BagForId')
While UO.Targeting() == 2
  Wait(500)
Wend
UO.SaveConfig()
UO.Print('Done')
Wait(300)
UO.Print('Shoose Type of key')
UO.AddType('KeyType')
While UO.Targeting() == 2
  Wait(500)
Wend
UO.SaveConfig()
UO.Print('Done')
Wait(300)
;------------------------------------------------------------------------
UO.UseObject('BagId')
UO.UseObject('BagForId')
;------------------------------------------------------------------------
For i = 0 to 100
If UO.Count('IngType') > 0 Then
  UO.FindType('IngType','-1','BagId')
  UO.MoveItem('finditem','10','backpack')
  UO.WaitMenu("Select","Parts","Select","Iron Key")
  UO.WaitTargetType('IngType')
  UO.UseType('ToolId')
  Wait(12000)
  UO.FindType('KeyType','-1')
  UO.MoveItem('finditem','1','BagForId')
  Wait(100)
  UO.DeleteJournal()
;------------------------------------------------------------------------
Else
  UO.Print('Out Of Ingots')
  Wait(5000)
  UO.DeleteJournal()
;------------------------------------------------------------------------
EndIf
Next
endsub


О скрипте:
1.В первой части мы просто кликаем по всяким яким нужным для скрипта вещам... - тут все работает, все запоминает...
2. Во второй части мы просто открываем бэги - там мне посоветовал Купер...
3. А вот тут начинается самая прелесть:
Code:
  UO.FindType('IngType','-1','BagId')
  UO.MoveItem('finditem','10','backpack')
 

эти строчки работоспособны... (переносим из мешочка в бэкпак инги...)
Code:
  UO.WaitMenu("Select","Parts","Select","Iron Key")
  UO.WaitTargetType('IngType')
  UO.UseType('ToolId')

не пашет, хотя пахать должно... И пишет он следующее:
Previous waitmenu cancelled:
Select
Now waiting for menu...
No item found
Он не находит ингов, которые лежат в бэкпаке!... хотя они там!...
Как это исправить? плиз помогите...
Code:
  Wait(12000)
  UO.FindType('KeyType','-1')
  UO.MoveItem('finditem','1','BagForId')
  Wait(100)
  UO.DeleteJournal()

Далее все работает...
Author:  Destruction [ 2008-01-27 22:42:35 ]
Post subject: 
Code:
[code]КОДЫ СВОИ ПИСАТЬ НАДО ВОТ ВНУТРИ ТАКИХ ХРЕНОВИН, СКОЛЬКО РАЗ ПОВТОРЯТЬ НУЖНО!?[/code]


Я злой.
Author:  GroundBeast [ 2008-01-27 22:44:09 ]
Post subject: 
Прошу прощения.... более повторять ошибку не буду....
Author:  Kynep [ 2008-01-27 22:53:28 ]
Post subject: 
GroundBeast wrote:
Прошу прощения.... более повторять ошибку не буду....


Меню проверь. Команду wait, для начала, ни кто не отменял. А ваапще тебе паузы нужны в скрипте, после выполнений действия, и динамические по журналу.
Author:  GroundBeast [ 2008-01-27 23:05:53 ]
Post subject: 
Wait??? и куда??? я так поня, что в команде UO.WaitMenu() паузы автоматом расписываются.... в отличии от команды UO.AutoMenu()
при сем при том... заменяю на следующее добавляя ожидания:

Code:
  UO.FindType('IngType','-1','BagId')
  UO.MoveItem('finditem','5','backpack')
  Wait(200)
  UO.AutoMenu("Select","Parts")
  Wait(300)
  UO.AutoMenu("Select","Iron Key")
  UO.WaitTargetType('IngType')
  UO.UseType('ToolId')
  Wait(12000)


Получаю следующую ошибку:

Items found:2
Items Found:1
Warning Autochoice replaced
AutomenuAdded. Waiting for Choices
0:[Select]=> [Parts]
Warning Autochoice replaced
AutomenuAdded. Waiting for Choices
0:[Select]=> [Iron Key]
Auto target cancelled
No item found.

В чем ошибка (
Author:  Kynep [ 2008-01-27 23:22:03 ]
Post subject: 
GroundBeast wrote:
Wait??? и куда??? я так поня, что в команде UO.WaitMenu() паузы автоматом расписываются.... в отличии от команды UO.AutoMenu()
при сем при том... заменяю на следующее добавляя ожидания:

В чем ошибка (


Code:
  UO.CancelMenu()
  UO.AutoMenu("Select", "Parts")
  Wait(100)
  UO.AutoMenu("Parts", "Iron Key")


Вставь это в САМОМ НАЧАЛЕ скрипта, кстати разве ключи в меню Партс делаются?
Author:  GroundBeast [ 2008-01-27 23:30:43 ]
Post subject: 
ничего не изменилось....
все равно не находит итем...

На Мидле так.... )
Author:  Kynep [ 2008-01-27 23:33:11 ]
Post subject: 
GroundBeast wrote:
ничего не изменилось....
все равно не находит итем...

На Мидле так.... )


поменяй:
Code:
UO.FindType(IngType, '-1', BagId)
Author:  GroundBeast [ 2008-01-27 23:39:04 ]
Post subject: 
Так у меня и так строчка идеентичная... Если речь идет о знаках, то без ' - закрывающих верхних опострофов выдает ошибки....
Author:  GroundBeast [ 2008-01-28 08:33:44 ]
Post subject: 
Разобрался.... оказалась тупейшая очепятка.... (((((( еле заметил...
Author:  Kynep [ 2008-01-28 08:54:05 ]
Post subject: 
GroundBeast wrote:
Разобрался.... оказалась тупейшая очепятка.... (((((( еле заметил...


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