Yoko

Возникло сразу несколько вопросов....
Написал скрипт на Крафт стрел - все работает
Пишу скрипт на Тинкер - не пашет... выдает следующие ошибки....
Сначала весь Текс :

;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. А вот тут начинается самая прелесть:

  UO.FindType('IngType','-1','BagId')
  UO.MoveItem('finditem','10','backpack')
  

эти строчки работоспособны... (переносим из мешочка в бэкпак инги...)

  UO.WaitMenu("Select","Parts","Select","Iron Key")
  UO.WaitTargetType('IngType')
  UO.UseType('ToolId')

не пашет, хотя пахать должно... И пишет он следующее:
Previous waitmenu cancelled:
Select
Now waiting for menu...
No item found
Он не находит ингов, которые лежат в бэкпаке!... хотя они там!...
Как это исправить? плиз помогите...

  Wait(12000)
  UO.FindType('KeyType','-1')
  UO.MoveItem('finditem','1','BagForId')
  Wait(100)
  UO.DeleteJournal()

Далее все работает...

[code]КОДЫ СВОИ ПИСАТЬ НАДО ВОТ ВНУТРИ ТАКИХ ХРЕНОВИН, СКОЛЬКО РАЗ ПОВТОРЯТЬ НУЖНО!?[/code]

Я злой.

_________________
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Skype: d119060

Прошу прощения.... более повторять ошибку не буду....

Меню проверь. Команду wait, для начала, ни кто не отменял. А ваапще тебе паузы нужны в скрипте, после выполнений действия, и динамические по журналу.

Wait??? и куда??? я так поня, что в команде UO.WaitMenu() паузы автоматом расписываются.... в отличии от команды UO.AutoMenu()
при сем при том... заменяю на следующее добавляя ожидания:

  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.

В чем ошибка (

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

Вставь это в САМОМ НАЧАЛЕ скрипта, кстати разве ключи в меню Партс делаются?

ничего не изменилось....
все равно не находит итем...

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

поменяй:

UO.FindType(IngType, '-1', BagId)

Так у меня и так строчка идеентичная... Если речь идет о знаках, то без ' - закрывающих верхних опострофов выдает ошибки....

Разобрался.... оказалась тупейшая очепятка.... (((((( еле заметил...

Бывает )))