Page 1 of 1

Помогите пожалусто

Posted: 2010-05-30 14:56:11
by justme
sub lootmob2()
var b
dim mobloot[30]
mobloot[0]='0x0F78' #
mobloot[1]='0x0F3F' #
mobloot[2]='0x0EED' #
mobloot[3]='0x1F5F' #
mobloot[4]='0x1F52' #
mobloot[5]='0x14EB' #
mobloot[6]='0x0F2F' #
mobloot[7]='0x0F30' #
mobloot[8]='0x0F21' #
mobloot[9]='0x0F13' #
mobloot[10]='0x0F1A' #
mobloot[11]='0x0F28' #
mobloot[12]='0x0F1F' #
mobloot[13]='0x0F25' #
mobloot[14]='0x0F19' #
mobloot[15]='0x0F17' #
mobloot[16]='0x0F22' #
mobloot[17]='0x0F24' #
mobloot[18]='0x0F16' #
mobloot[19]='0x0F1B'
mobloot[20]='0x0F11'
mobloot[21]='0x0F20'
mobloot[22]='0x0F1E'
mobloot[23]='0x0F10'
mobloot[24]='0x0F15' #
mobloot[25]='0x0F1D'
mobloot[26]='0x0F26'
mobloot[27]='0x0F12'
mobloot[28]='0x0F2A'
mobloot[29]='0x0F1C'
wait (500)
UO.Set('finddistance', '3')
UO.UseObject('lastcorpse')
wait (500)
if UO.GetQuantity('lastcorpse') then
UO.SetArm('temp')
UO.WaitTargetObject('lastcorpse')
UO.UseType('0x0F51'); dagger
wait (1000)
UO.Arm('temp')
wait(1000)
for b=0 To 30
uo.findtype(mobloot[b],'-1','lastcontainer')
if uo.findcount() then
uo.grab(0,'finditem')
wait (900)
endif
next
endif
endsub

вот я тут добавила пару типов диамантов роботаит всё лутит ну в консе пишет runtime error в етой строке uo.findtype(mobloot[b],'-1','lastcontainer') помогите пожалусто и кто может по прозбе зделайте штоп лутил в мешочек а не в сумку сразу спс за ранее 8)

Re: Помогите пожалусто

Posted: 2010-06-01 05:16:33
by Scripts Writer

Code: Select all

dim mobloot[30]
Массив на 30 элементов.

Code: Select all

mobloot[0]='0x0F78' # 
mobloot[1]='0x0F3F' #
...
mobloot[28]='0x0F2A'
mobloot[29]='0x0F1C'
Проинициализировано 30 элементов.

Code: Select all

for b=0 To 30
А бегаешь до 31.