Re: help Run
Posted: 2010-09-27 09:30:01
Последняя попытка. Если опять будет вылетать значит выкинь инжект
Зы а у тебя сколько ядер на компе? (CTRL+Shift+ESC -> Быстродействие -> Хронология загрузки... сколько графиков?)

Code: Select all
sub Looting()
var t,l,m
m=12
t=1820
dim LootingItem[13]
LootingItem[0] = '0x13BA' ##Sw
LootingItem[1] = '0x023F' ##Shield
LootingItem[2] = '0x13FE' ##Katana
LootingItem[3] = '0x1515' ##Cloak
LootingItem[4] = '0x13FC' ##Crossbow
LootingItem[5] = '0x143E' ##Scythe
LootingItem[6] = '0x13FD' ##CrossBow
LootingItem[7] = '0x1BC3' ##Shield
LootingItem[8] = '0x0287' ##Sw
LootingItem[9] = '0x204E' ##DeathRobe
LootingItem[10] = '0x143F' ##FScythe
LootingItem[11] = '0x1530' ##Cloak
LootingItem[12] = '0x0284' ##Robe
uo.set("finddistance",4)
for l=0 to m
uo.findtype(LootingItem[l],"-1","1")
while uo.FindCount() > 0
uo.grab("0","finditem")
wait(t)
uo.findtype(LootingItem[l],"-1","1")
wend
if uo.GetSerial("lastcontainer") <> uo.GetSerial(uo.ObjAtLayer('Bpack')) then
uo.FindType(LootingItem[l],"-1","lastcontainer")
while UO.FindCount() > 0
uo.grab(0,"finditem")
wait(t)
uo.FindType(LootingItem[l],"-1","lastcontainer")
wend
endif
next
end sub
Зы а у тебя сколько ядер на компе? (CTRL+Shift+ESC -> Быстродействие -> Хронология загрузки... сколько графиков?)