sub BS()
var ixx, ironbag, color, forg
ironbag = "0x40412F10"
color = "0x0750"
forg = "0x404820D6"
uo.cancelmenu()
;UO.automenu('Blacksmithing','Colored Armor & Weapons')
;UO.automenu('Colored Armor & Weapons','Rusty Weapons')
;UO.automenu('Rusty Weapons','Rusty Swords & Blades')
;UO.automenu('Rusty Swords & Blades','Rusty Dagger')
repeat
UO.FindType("0x1BEF", color, "my")
If UO.GetQuantity('finditem')<10 then
uo.Print("NET IRON'a")
uo.Print("BERU ESHE...")
UO.FindType("0x1BEF", color, ironbag)
if uo.FindCount() then
uo.moveitem("finditem", "500")
wait(3000)
else
uo.Print("IRON konetc")
GoTo ExitF
endif
endif
UO.DeleteJournal()
UO.UseObject("finditem")
ixx = 0
while not (UO.InJournal("You put") or UO.InJournal("You have failed")) or (ixx<=50)
wait(100)
ixx = ixx + 1
wend
if UO.InJournal("You put") then
UO.FindType("0x0F51", color, "my")
if uo.FindCount() then
UO.DeleteJournal()
UO.WaitTargetObject("finditem")
UO.UseObject(forg)
ixx = 0
while not UO.InJournal("You put") and not UO.InJournal("It is") and ixx <= 50
wait(100)
ixx = ixx + 1
wend
wait(500)
endif
endif
until FALSE
ExitF:
UO.Print("*** The end ***")
end sub
Помогите с БС (переделка скрипта под цвет.мет)
Moderators: Murderator+, Murderator
Помогите с БС (переделка скрипта под цвет.мет)
Вот переделал скрипт для БС, который ковал даггеры из айрона под цвет мет (расти). Но не работает. вылезает менюшка Blacksmithing и всё. никаких дальше действий не происходит... помогите найти проблему!
Re: Помогите с БС (переделка скрипта под цвет.мет)
t00k wrote:Вот переделал скрипт для БС, который ковал даггеры из айрона под цвет мет (расти). Но не работает. вылезает менюшка Blacksmithing и всё. никаких дальше действий не происходит... помогите найти проблему!
Замени эту строчку
Code: Select all
while not (UO.InJournal("You put") or UO.InJournal("You have failed")) or (ixx<=50)
на эту:
Code: Select all
while not UO.InJournal("You put") and not UO.InJournal("You have failed") and ixx<=50