Что то не получаетсЯ(

[SESTRA]

Вот как суда добавить проверку на пак ?

Code: Select all

Sub pobeg1() 
UO.Set('finddistance', '1') 
UO.Findtype('0x0ED4', '-1', 'ground') 
If UO.FindCount('finditem')>0 then 
UO.Recall('finditem', '2') 
wait(350)
UO.Recall('finditem', '6')
wait(350)
UO.Recall('finditem', '10')
wait(350)
UO.Recall('finditem', '15')
wait(350)
UO.Recall('finditem', '28') 
wait(350)
UO.Recall('finditem', '30') 
wait(350)
endif 
UO.Set('finddistance', '15') 
end sub

Тобиш проверку для альфы

Code: Select all

 If NOT UO.ObjAtLayer('Torso') or UO.Count('0x0EFA')==0 Then ;Проверка на пак 
            UO.UseObject('backpack') 
            Wait(5) 
         End If 

Я пытался взять из темы то что ишют многи ток не че не получается (
и кстате те скрипты не работают почему то(

You Must Die: Плохому танцору ...

[SESTRA]

Ну подскажи как сделать?))

[SLAK]

Плохому танцору ...

они могут просто не подходить под его шард

[SESTRA]

не то что я сам верхнее сделал все ок работаит ток проверку на пак не могу сделать(

[SLAK]

Вот как суда добавить проверку на пак ?

Несовсем понял, проверку на отрыт ли бекпак?
И ваще опиши что делает твое творчество, просто интересно...

[SESTRA]

Нет чтоб он его открывал

[SLAK]

Нет чтоб он его открывал

Code: Select all

uo.deletejournal()
repeat
uo.useobject('backpack')
wait(1000)
until uo.InJournal('contain')

[SESTRA]

Во сенк все робит)