Помогите часть макроса написать!

[AHTOH]

Я переделываю макрос ветерана на ламбер!!!дак вот мне нужно чтоб чар отбивал реги на рекол от дома, брал их (по 5 штук) и пребивал остатки....... ЖДУ помощи................ ПЛИЗ

Code: Select all

sub TakeRegs() 
var Time,Space 
Time=Time() 
Space=' '
uo.TextOpen() 
uo.TextPrint('берем реги - ' +Space +Time)
#####BM
UO.FindType("0x0F7B","-1","ground")
Var bm = UO.GetSerial("finditem")
key(bm,0)
MovingItems("regi",'-1',5) 
wait(1000) 
Checklag() 
key(bm,1)
######BP
UO.FindType("0x0F7A","-1","ground")
Var bp = UO.GetSerial("finditem")
key(bp,0)
MovingItems("regi",'-1',5) 
wait(1000) 
Checklag() 
key(bp,1)
######MR
UO.FindType("0x0F86","-1","ground")
Var mr = UO.GetSerial("finditem")
key(mr,0)
MovingItems("regi",'-1',5) 
wait(1000) 
Checklag() 
key(mr,1)
end sub 



sub key(obj,d)# d-если 0 то отбить, если 1 то прибить!
var key='0x4427A46B'
uo.DeleteJournal()
CheckLag() 
if d==0 then 
repeat
UO.useobject('key')
wait(500)
CheckLag()
wait(500)
UO.Waittargetground(obj)
until uo.InJournal('You successfully unlock it from the structure.')
CheckLag()
else
repeat
UO.useobject('key')
wait(500)
CheckLag() 
UO.Waittargetground(obj)
until uo.InJournal('You successfully lock it down to structure.')
CheckLag()
end sub

В чем ошибка???? Не че не пойму.....
Инжект сначало пишет что итем найден а потом пишет что не найден, да еще и таргет кансалет....

[AHTOH]

Ну блин........ уже целый день жду!! Ни кто!!!......так и не ответил

[flake]

Не совсем понял, что значит "отбивать" и "прибивать".
Обьясни подробнее, как это делается на твоем шарде.

[AHTOH]

Не совсем понял, что значит "отбивать" и "прибивать".
Обьясни подробнее, как это делается на твоем шарде.

На моем шарде можно около дома положить вещь, и дважды кликнуть на ключ а потом на положенную вещь, и тогда она как бы прибита к дому будет..... т.е. её взять не кто не сможет пока не отобьеш тм же способом..... ПОНЯТНО????

А кстате АП!!

[AHTOH]

АП ))) Ну же ответьте!!!!