помогите разобраться... БС

Ask for help

Moderators: Murderator+, Murderator

Post Reply
Waterboy
Posts: 25
Joined: 2006-02-02 23:16:49

помогите разобраться... БС

Post by Waterboy »

Есть меню...

var MenuIron="'Blacksmithing' 'Weapons'"
var MenuOther="'Colored' 'Weapons'"
var MenuSwords="Weapons' 'Swords & Blades'"
var MenuDagger="'Swords & Blades' 'dagger'"

Есть строки исполнения команд
UO.Exec('automenu '+MenuDagger)
UO.Exec('automenu '+nIng[i]+MenuSwords)
UO.Exec('automenu '+MenuOther)
UO.Exec('automenu '+MenuIron)

Но блин прокачал я до тех пор как стал делать майсы и все дальше на даггеры двигаться не хочет..((
Кто то может сказать почему?
Waterboy
Posts: 25
Joined: 2006-02-02 23:16:49

Re: помогите разобраться... БС

Post by Waterboy »

Что ни кто не может подсказать?? Или не корректный вопрос?

Давайте по другому...


Скрипт


var MenuIron="'Blacksmithing' 'Weapons'"
var MenuOther="'Colored' 'Weapons'"
var MenuSwords="Weapons' 'Swords & Blades'"
var MenuDagger="'Swords & Blades' 'dagger'"
DIM cIng[6]
DIM nIng[6]
DIM tIng[6]
nIng[0]="'Rusty "

nIng[1]="'Old Copper "
nIng[2]="'Dull Copper "
nIng[3]="'Copper "
nIng[4]="'Bronze "
nIng[5]="'Silver "
cIng[0]='0x0000' ; Rusty

cIng[1]='0x0590' ; Old Copper
cIng[2]='0x060A' ; Dull Copper
cIng[3]='0x0000' ; Copper
cIng[4]='0x0488' ; Bronze
cIng[5]='0x0000' ; Silver
tIng[0]='0x1BF2'
tIng[1]='0x1BEF'
tIng[2]='0x1BEF'
tIng[3]='0x1BE3'
tIng[4]='0x1BEF'
tIng[5]='0x1BF5'
UO.CancelMenu()
UO.UnSetReceivingContainer()
for i = 0 to 5
Exit=0
UO.FindType('0x402034A4','backpack')
UO.UseObject('0x402034A4')

UO.UseObject(idContainer)

wait(500)
CheckLag()
UO.FindType(tIng[i],cIng[i],idContainer)
if UO.GetQuantity('finditem')>20 Then
UO.Grab(200,'finditem')
wait(1000)
CheckLag()
UO.Exec('automenu '+MenuDagger)

UO.Exec('automenu '+MenuSwords)



UO.Exec('automenu '+MenuOther)
UO.Exec('automenu '+MenuIron)
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.UseType(tIng[i],cIng[i])
while not UO.InJournal("You put") and not UO.InJournal("Вы так и не смогли сделать хоть что-нибудь стоящее!")
wait(100)
wend

repeat
wait(100)
until UO.Timer()>=LastTimer+100
end if
CheckLag()
.................



По крайне мере часть что отвечает за сам бс

Прописано все правильно
БС-Оружие- оп а тут загвоздка есть майсы есть клинки... так вот дальше скрипт и не стопориться и... короче ни чего не делает
ТОлько менюха светиться Оружие и выбор Клинки или Мейсы
как только на клинки нажимаю он мне клепает даггер и продолжает скрипт...


Кто то подскажите в чем дело!...
Waterboy
Posts: 25
Joined: 2006-02-02 23:16:49

Re: помогите разобраться... БС

Post by Waterboy »

Ясно.. ни кто не может сказать!...
Тоды меняется вся менюха и вместо


var MenuIron="'Blacksmithing' 'Weapons'"
var MenuOther="'Colored' 'Weapons'"
var MenuSwords="Weapons' 'Swords & Blades'"
var MenuDagger="'Swords & Blades' 'dagger'"
................
UO.Exec('automenu '+MenuDagger)
UO.Exec('automenu '+MenuSwords)
UO.Exec('automenu '+MenuOther)
UO.Exec('automenu '+MenuIron)


Пишется


UO.Automenu("Blacksmithing","Weapons")
UO.Automenu("Weapons","Swords & Blades")
UO.Automenu("Swords & Blades","dagger")

Жаль что ни кто не захотел подсказать вооще в чем дело!...
Мне к примеру просто уже интересно действительно в чем...
Или он просто изначально не верный?
Post Reply