Page 1 of 1
Blacksmithing Помогите ПЛЗ.
Posted: 2006-08-13 12:42:52
by Alegarh
Проблемма в том, что при написании пути Крафта скрипт путается незнаю почему ??? Наверно изза совпадения 3-ей и 4-ой строчки, помогите...
Code: Select all
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Dull Copper Armor')
uo.automenu('Dull Copper Armor & Shields','t Dull Copper Armor & Shield')
uo.automenu('Dull Copper Armor & Shields','Dull Copper Heater Shield (18')
Posted: 2006-08-19 21:30:29
by 1a2a3a4a5a6a
Последняя строчка, в названии айтема нехватает закрывающей скобки. А вообще, раз ты на ДрВ, то кол-во ингов в названии можно не указывать.
Posted: 2006-08-24 13:22:25
by Alegarh
Не проблемма не в этом, так я и не понял в чём дело, вроде это ошибка Ультимы

Posted: 2006-08-24 14:12:43
by Savage
Амперсанд.
Posted: 2006-08-24 14:50:50
by Alegarh
Вхат???
Posted: 2006-08-24 17:05:14
by Savage
Глючить может из за амперсанда. Для захвата меню достаточно одного слова. Пробуй настраивать построчно. Сначала запускаешь одну строку меню и делаешь попытку сковать предмет если меню провалилось на 1 левел запускаешь вторую строчку и пробуешь ковать предмет.... и так пока не скует. Таким же образом выявляется неработающий пункт меню.
Вот скрипт старенький, может уже и не работает.
Code: Select all
sub bsarm()
VAR IngName,Delay=3000
IngName="Gold"
UO.FindType('0x0E76','0x0000')
UO.SetCatchBag('finditem')
UO.AutoMenu(IngName+' Plate','Platemail (25')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Plate:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Plate
endif
UO.CancelMenu()
wait(Delay)
UO.AutoMenu(IngName+' Plate','Platemail Legs')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Legs:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Legs
endif
UO.CancelMenu()
wait(Delay)
UO.AutoMenu(IngName+' Plate','Platemail Arms')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Arms:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Arms
endif
UO.CancelMenu()
wait(Delay)
UO.AutoMenu(IngName+' Plate','Platemail Gauntlets')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Gloves:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Gloves
endif
UO.CancelMenu()
wait(Delay)
UO.AutoMenu(IngName+' Plate','Plate Helm')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Helm:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Helm
endif
UO.CancelMenu()
wait(Delay)
UO.AutoMenu(IngName+' Plate','Platemail Gorget')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Gorget:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Gorget
endif
UO.CancelMenu()
wait(Delay)
goto End
UO.AutoMenu(IngName+' Plate','Heater')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
Heater:
UO.DeleteJournal()
UO.UseType('ing')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
if UO.InJournal("You have failed") then
goto Heater
endif
UO.CancelMenu()
wait(Delay)
End:
UO.UnSetCatchBag()
end sub
Posted: 2006-08-25 15:09:16
by Alegarh
Спасибо буду, тестировать.