Скриипт на Боукрафт , такого в поиске нету....
Posted: 2007-05-05 15:10:29
[code][code]
VAR Sunduk='0x40415859' ; ИД сундука где все логи
VAR TDagger='0x0F51' ; Тип даггера
VAR TLogs='0x1BDD' ; Тип логов
VAR TTorch='0x1BD4' ; Тип торчей
VAR TShaft='0x1BD4' ; Тип шафтов
; В руке или паке даггер, в сундуке логи и запускаем !!!
sub BowCraft_shaft()
uo.useobject(Sunduk)
wait(200)
while 1==1
UO.FindType(TLogs,'0x0000','backpack')
While UO.GetQuantity('finditem')==0
UO.FindType(TLogs,'0x0000',Sunduk)
wait(200)
UO.Grab('1','finditem')
Wend
wait(200)
uo.WaittargetType(TLogs)
uo.Usetype(TDagger)
uo.WaitMenu('What do you want to carve the wood into?','shaft (1 log)')
wait (1000)
uo.DeleteJournal()
while not (uo.InJournal("You put") or uo.InJournal("You fail"))
wait(10)
wend
if uo.weight > 200 then
UO.SetReceivingContainer(Sunduk)
wait(200)
UO.FindType(TShaft)
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.UnSetReceivingContainer()
end if
wend
end sub
ну не могу я его переделать под себя..... суть: Берем из ящика 7 логов , даггером дабл клик на логи , появляеться меню "Bowyer Items" , кликаем на него , появляеться выбор Kindling или Shafts.....мне нужно чтобы делал киндлинги , но скрипт останавливаеться на последнем , приходиться пилотом выстовлять дабл клик на хворосте ) но хотелось бы задействовать тока инжу, если не сложно помогите....
